PH53969: STRING STATEMENT AND OVERLAPPING STORAGE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Add a check into the compiler to catch the obvious overlapping
  storage issue when the data-item names are identical in a STRING
  statement
  

Local fix

• BYPASS/CIRCUMVENTION:
  None
  
  RECOVERY ACTION:
  Apply PTF
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.4 compiling      *
  *                 programs containing COBOL code with the      *
  *                 STRING statement where the receiver data     *
  *                 item is also the 2nd or subsequent sender    *
  *                 data item and all sender data items are      *
  *                 fixed length items.                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: In the case described above, the result *
  *                      of the STRING statement is undefined    *
  *                      and users have requested a compile time *
  *                      message to be generated in order to     *
  *                      prevent accidentally coding this        *
  *                      pattern.                                *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  In the case described above, the result of the STRING statement
  is undefined. The compiler generated code may result in
  unexpected and unpredictable behavior. This pattern of COBOL
  code should be avoided and therefore a compile time message
  would be helpful to warn users.
  

Problem conclusion

• A compile time warning message has been added to warn users when
  this pattern is detected.
  

Temporary fix

Comments

APAR Information

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

  PH53261

• 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 IGYCJBLD IGYCJDM6 IGYCJDMR
  IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0 IGYCLVL1 IGYCLVL2 IGYCLVL3
  IGYCLVL8 IGYCMALL 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 UI91480

     UP23/04/26 P F304

• R641 PSY UI91481

     UP23/04/26 P F304

• R642 PSY UI91482

     UP23/04/26 P F304

• R64H PSY UI91483

     UP23/04/26 P F304

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.