PM26223: IMS V12 PROVIDE RUNUNDER SUPPORT FOR ETO SUPPORT

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• Enhancements: IMS V12 rununder support.
  Defects fixed by this APAR:
  -  Several errors in macro IZTGEN:
     -  When using the IZTGEN process with both SLU1 Printer
        and SLU1 Console devices, the devices types were always
        moved to the output data set (ETO or GEN) specified for
        the SLU1 Console.
     -  Assembly errors when using UNIT=3284/3286.
     -  Assembly errors when UJCL fields spanned records.
  -  Incorrect message text for MSGIZT3348E.
  -  Error in translate table LTERM lookup
     when Node table entries were using USER/LTERM from
     table and SIGNON W/USERID.
  -  When viewing VTAM userdata settings in the Global
     E/CSA entry, userid offset incorrectly contained the
     offset for TRX.
  -  Program IZTLOAD experienced an ABEND0C4 (S0c4) when
     the options data dynamic allocation member resided in
     a library in the IMSDALIB dd statement concatenation, and
     the ETO Support E/CSA options data set section was not
     found.
     Message sequence:
     IZT4122I / IZT4107I / IZT4120I / IZT4110E / IZT4115I
  -  ABENDU0767 out of DFSIDSP0 at +187C.  U0767
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of IMS ETO Support V3.1                *
  ****************************************************************
  * PROBLEM DESCRIPTION: Provide rununder support for IMS V12    *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  This APAR is addressing the following issues:
  Enhancements added:
  Added support for IMS version 12.
  Added an option to specify the value used in place
  of the APPLID IMS provides in the DFS2002 message.
  Errors addressed:
  Corrected a potential IMS U0767 RC01 abend when
  VTAM userdata is passed for SLU2/3270 logon.
  
  Several errors in macro IZTGEN:
   When using the IZTGEN process with both SLU1 Printer
  and SLU1 Console devices, the devices types were always
  moved to the output data set (ETO or GEN) specified for
  the SLU1 Console.
   Assembly errors when using UNIT=3284/3286.
   Assembly errors when UJCL fields spanned records.
  
  Incorrect message text for IZT3348E.
  Error in IZTRAN translate table LTERM lookup
  when Node table entries were using USER/LTERM from
  table and SIGNON W/USERID.
  When viewing VTAM userdata settings in the Global
  E/CSA entry, userid offset incorrectly contained the
  offset for TRX.
  Program IZTLOAD experienced an ABEND0C4 (S0c4) when
  the options data set dynamic allocation member resided in
  a library in the IMSDALIB dd statement concatenation, and
  the ETO Support E/CSA options data set section was not
  found.
  Message sequence:
     IZT4122I / IZT4107I / IZT4120I / IZT4110E / IZT4115I
  

Problem conclusion

Temporary fix

Comments

• All modules have been updated to support IMS 12.1
   An option was added to allow user specification
  for the APPLID value of the DFS2002 message
   To correct the U0767 abend, the IWAIT was removed from
  the logon exit when acquiring HIOP storage
   The IZTGEN macro was corrected
   The abend was corrected in the batch initialization utility
  

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UK63011

Modules/Macros

•    H1J4310J IZTCCMDA IZTCCMDB IZTCCMDC IZTCCMDZ
  IZTCCMD7 IZTCCMD8 IZTCCMD9 IZTCLNAA IZTCLNAB IZTCLNAC IZTCLNA7
  IZTCLNA8 IZTCLNA9 IZTCLNBA IZTCLNBB IZTCLNBC IZTCLNB7 IZTCLNB8
  IZTCLNB9 IZTCLNXA IZTCLNXB IZTCLNXC IZTCLNX7 IZTCLNX8 IZTCLNX9
  IZTCLN00 IZTCTRNA IZTCTRNB IZTCTRNC IZTCTRN0 IZTCTRN7 IZTCTRN8
  IZTCTRN9 IZTCTRX0 IZTCUPD0 IZTDTRX0 IZTDYN0A IZTDYN0B IZTDYN0C
  IZTDYN0Z IZTDYN07 IZTDYN08 IZTDYN09 IZTGEN   IZTGLST0 IZTGMSGA
  IZTGMSGB IZTGMSGC IZTGMSGZ IZTGMSG7 IZTGMSG8 IZTGMSG9 IZTGUPD0
  IZTINITA IZTINITB IZTINITC IZTINIT7 IZTINIT8 IZTINIT9 IZTINSXA
  IZTINSXB IZTINSXC IZTINSXZ IZTINSX7 IZTINSX8 IZTINSX9 IZTINTXZ
  IZTLGFXA IZTLGFXB IZTLGFXC IZTLGFX7 IZTLGFX8 IZTLGFX9 IZTLGNXA
  IZTLGNXB IZTLGNXC IZTLGNXZ IZTLGNX7 IZTLGNX8 IZTLGNX9 IZTLIST
  IZTLKUP0 IZTLOAD1 IZTLUPD0 IZTNDMXA IZTNDMXB IZTNDMXC IZTNDMX7
  IZTNDMX8 IZTNDMX9 IZTNUPD0 IZTPFKIA IZTPFKIB IZTPFKIC IZTPFKI0
  IZTPFKI7 IZTPFKI8 IZTPFKI9 IZTPPUEA IZTPPUEB IZTPPUEC IZTPPUEZ
  IZTPPUE7 IZTPPUE8 IZTPPUE9 IZTSECIA IZTSECIB IZTSECIC IZTSECI7
  IZTSECI8 IZTSECI9 IZTSGFXA IZTSGFXB IZTSGFXC IZTSGFXZ IZTSGFX7
  IZTSGFX8 IZTSGFX9 IZTSGNXA IZTSGNXB IZTSGNXC IZTSGNXZ IZTSGNX7
  IZTSGNX8 IZTSGNX9 IZTSRCHA IZTSRCHB IZTSRCHC IZTSRCH1 IZTSRCH7
  IZTSRCH8 IZTSRCH9 IZTUDAT0 IZTUDAT1 IZTUD1I0 IZTUTBLA IZTUTBLB
  IZTUTBLC IZTUTBL0 IZTUTBL7 IZTUTBL8 IZTUTBL9 IZTUUPD0 IZTUXITA
  IZTUXITB IZTUXITC IZTUXITZ IZTUXIT7 IZTUXIT8 IZTUXIT9 IZTYDRUA
  IZTYDRUB IZTYDRUC IZTYDRU7 IZTYDRU8 IZTYDRU9 IZTYPRXA IZTYPRXB
  IZTYPRXC IZTYPRX7 IZTYPRX8 IZTYPRX9 IZT2002
  

Fix information

• Fixed component name

  IMS ETO SUPPORT

• Fixed component ID

  5655E1200

Applicable component levels

• R310 PSY UK63011

     UP10/12/15 P F012

Fix is available

• Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.