PH02464: The compiler badly sizes the FIB when a file SELECT specifies a PASSWORD clause, but no key, leading to an FCB overlay

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The error
  
      IGZ0099C Internal error INIT-FCB was detected in module
          IGZ@VSAM.
          From compile unit {name} entry point {name} at compile
          unit offset +0000012C at entry offset +0000012C at
          address {address}.
  
  is encountered, where the offset is within the prolog code of
  the compile unit.
  
  The error arises as a consequence of code in the compile unit's
  __COMPUNITsinit static initialization routine, in which the
  initialization of an FIB overlays the beginning of an FCB. This
  is due to the compiler incorrectly sizing the FIB when the file
  SELECT specifies a PASSWORD clause, but no key.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.1 compiling and  *
  *                 running programs with one or both of the     *
  *                 following:                                   *
  *                 1) A VSAM sequential file with a password    *
  *                 2) A relative file with a password but no    *
  *                 keys are defined.                            *
  ****************************************************************
  * PROBLEM DESCRIPTION: Program abends with message:            *
  *                      IGZ0099C internal error INIT-FCB.       *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF                       *
  ****************************************************************
  The size of the file information block (FIB) for a file was
  incorrectly calculated in two cases:
  1) A VSAM sequential file with a password
  2) A relative file with a password but no keys are specified
  

Problem conclusion

• The compiler was updated to calculate the size of the file
  information block (FIB) correctly for VSAM sequential files
  with a password and relative files with a password.
  

Temporary fix

Comments

APAR Information

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

  PH00734

• 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.