PH01731: ENABLE XTIOT TOLERATION FOR THE COBOL COMPILER

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When XTIOT is enabled on an LPAR and third party tools that
  invoke the COBOL compiler dynamically allocate datasets, the
  compiler needs to tolerate XTIOT.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.2 who are       *
  *                 submitting batch compiles from Computer      *
  *                 Associates Endevor processor and Endevor's   *
  *                 screening I/O function for Copybooks is      *
  *                 enabled, and the TEST compiler option has    *
  *                 been specified and the the source programs   *
  *                 include multiple COPY statements.            *
  ****************************************************************
  * PROBLEM DESCRIPTION: Unrecoverable error during compile.     *
  *                                                              *
  *                      IGYRC5108-U COBOL compiler              *
  *                      terminating:                            *
  *                      Uncorrectable program interrupt         *
  *                      condition.                              *
  *                      CURRENT COBOL COMPILER PHASE: IGYCLIBR  *
  *                      LAST MODULE RECORDING CONTROL:          *
  *                      IGYLLIBO                                *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  While searching for the data sets associated with the SYSLIB DD,
  or other COPYBOOK related DD statements, the compiler obtained
  a DCBTIOT offset for an open DCB, that had the value zero.
  This caused the compiler to suffer a S0C4 ABEND when it
  attempted to scan the TIOT entries using this DCBTIOT offset.
  

Problem conclusion

• The compiler has been changed so that it no longer relies on
  scanning the TIOT entries to find the data sets associated with
  SYSLIB, or other COPYBOOK related DD statements. These changes
  allow the compiler to tolerate the case where the TIOT entry in
  question is actually an XTIOT entry. This becomes necessary
  when the system administrator enables XTIOT support for an
  installation, by coding the NON_VSAM_XTIOT=YES option in
  SYS1.PARMLIB(DEVSUPxx).
  

Temporary fix

Comments

APAR Information

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

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

Modules/Macros

• IGY8CICS IGY8RWRD IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS
  IGYCCSRV IGYCDGEN IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2
  IGYCEN$3 IGYCEN$4 IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN
  IGYCFREE IGYCINIT IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4
  IGYCJA$5 IGYCJA$8 IGYCJA$D IGYCJA$R IGYCLIBH IGYCLIBO IGYCLIBR
  IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL
  IGYCOPI  IGYCOSCN IGYCPGEN IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL
  IGYCRWT  IGYCSCAN IGYCSIMD IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3
  IGYCUE$4 IGYCUE$5 IGYCUE$8 IGYCUE$D IGYCUE$R IGYCXREF IGYDRV
  IGYEQCWI IGYMSGE  IGYMSGK  IGYMSGT  IGYQCBE  IGYZQDRV IGYZQENU
  IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R620 PSY UI58632

     UP18/09/27 P F809

• R621 PSY UI58633

     UP18/09/27 P F809

• R622 PSY UI58634

     UP18/09/27 P F809

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.