PH27537: If Data Item used in EXEC statement is not defined, message IGYPS2121 may issued twice

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• If a data item used in EXEC statement is not defined, message
  IGYPS2121 may be issued twice, it should be issued once per EXEC
  statement.
  
  USERS AFFECTED:
  USers of Enterprise COBOL compiling programs with EXEC
  statements and using CICS, SQL or SQLIMS compiler options.
  

Local fix

• BYPASS/CIRCUMVENTION:
  None(other than defining the missing data item)
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V6.3 compiling     *
  *                 programs with EXEC statements and using      *
  *                 CICS, SQL or SQLIMS compiler options.        *
  ****************************************************************
  * PROBLEM DESCRIPTION: If a data item used in an EXEC          *
  *                      statement is not defined, message       *
  *                      IGYPS2121 may be issued twice, it       *
  *                      should only be issued once per EXEC     *
  *                      statement.                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  The compiler generates many COBOL statements for a single EXEC
  statement and there might be multiple references to a data item
  that was only referenced once in the EXEC statement, resulting
  in message IGYPS2121 getting issued more than once.
  

Problem conclusion

• The compiler was changed to keep track of message IGYPS2121 and
  if it has already been issued for a missing data item it will
  not be issued again for that same data item.
  

Temporary fix

Comments

APAR Information

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

  PH25284

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

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R630 PSY UI70598

     UP20/07/24 P F007

• R631 PSY UI70599

     UP20/07/24 P F007

• R632 PSY UI70600

     UP20/07/24 P F007

• R63H PSY UI70601

     UP20/07/24 P F007

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.