PH58188: UI93309/UI93310/UI93311 causes IGYPG5125-U compiler error in PHASE IGYCPGEN, ERROR CODE IPGATTA when us 23/12/06 PTF PECHANGE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• UI93309/UI93310/UI93311 causes IGYPG5125-U COMPILER ERROR IN
  PHASE IGYCPGEN, ERROR CODE IPGATTA WHEN USING EXIT option
  

Local fix

• N/A
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of the Enterprise COBOL V6.4       *
  *                 compiler running a compiler that has had     *
  *                 the                                          *
  *                 following PTFs applied:                      *
  *                                                              *
  *                 V6.4 Compiler August  2023 PTFs: UI93309;    *
  *                     UI93310; UI93311; UI93312                *
  *                                                              *
  *                 V6.4 Compiler October 2023 PTFs: UI94108;    *
  *                     UI94116; UI94117; UI94118                *
  *                                                              *
  *                 and are compiling source                     *
  *                 programs that contain a CALL statement of    *
  *                 the                                          *
  *                 form "Call Some-Program Using Some-Data",    *
  *                 and  also specify the EXIT compiler option   *
  *                 for                                          *
  *                 any of the supported EXIT types.             *
  ****************************************************************
  * PROBLEM DESCRIPTION: Abnormal termination. The compiler may  *
  *                      experience an abnormal termination and  *
  *                      end with RC=16.  Messages similar to    *
  *                      the following may also be issued:       *
  *                                                              *
  *                      000013  IGYPG5125-U   The compilation   *
  *                      was                                     *
  *                      terminated due to a compiler error in   *
  *                      phase id:  "IGYCPGEN".                  *
  *                                                              *
  *                      000013  IGYPG5201-U   Internal compiler *
  *                       error code                             *
  *                      "IpgAttA" occurred.                     *
  *                                                              *
  *                      Messages    Total    Informational      *
  *                      Warning    Error    Severe              *
  *                      Terminating                             *
  *                      Printed:       2                        *
  *                                                         2    *
  *                      Messages suppressed by MSGEXIT : 3      *
  *                      * Statistics for COBOL program INSPSTR: *
  *                      *    Source records = 18                *
  *                      *    Data Division statements = 2       *
  *                      *    Procedure Division statements = 3  *
  *                      *    Generated COBOL statements = 0     *
  *                      *    Program complexity factor = 3      *
  *                      End of compilation 1,  program INSPSTR, *
  *                        highest severity 16.                  *
  *                      Return code 16                          *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM provided PTF and rerun the     *
  *                 compile.                                     *
  ****************************************************************
  There was a new feature change that was added to the V6.4
  compiler and shipped in the August 2023 PTF, the "cob2 -M"
  option support, that generates an industry standard compiler
  make dependency file. This feature required new flags and data
  fields to be added to the internal, common compiler control
  block. This control block by design must be less than 4K in size
  and the new flags and data items for "cob2 -M" caused the common
  control block to exceed its 4K boundary. During compiler
  initialization, a large block of storage is obtained from z/OS
  and then carved up into smaller blocks to be used for specific
  purposes by the compiler. The first item in this larger block of
  storage is the common control block, and it is immediately
  followed by the data fields used for processing the different
  compiler exits supported by the EXIT compiler option. When the
  common control block exceeded its defined 4K boundary it
  overwrote some of these control fields used for the compiler
  EXITs.
  

Problem conclusion

• The common control block in the compiler was reduced to less
  than 4K in total size by eliminating some unused and unnamed
  data fields in the control block. This eliminated the memory
  overlay and allowed the supported compiler exits to function
  properly.
  

Temporary fix

Comments

• ×**** PE23/12/20 FIX IN ERROR. SEE APAR PH58893  FOR DESCRIPTION
  ×**** PE24/01/03 FIX IN ERROR. SEE APAR PH58988  FOR DESCRIPTION
  ×**** PE23/12/20 FIX IN ERROR. SEE APAR PH58893  FOR DESCRIPTION
  

APAR Information

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

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

  UI94827 UI94828 UI94829 UI94830

Modules/Macros

• 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 IGYCJBLD IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0
  IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOB2  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  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6
  IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UI94827

     UP23/12/15 P F312 {

• R641 PSY UI94828

     UP23/12/15 P F312 {

• R642 PSY UI94829

     UP23/12/15 P F312 {

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.