PH23903: S0C4 IGZXPRS1 OFFSET X'3C0' USING INCORRECT WSA ADDRESS

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• S0C4 IGZXPRS1 offset X'3C0' using incorrect WSA address
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5 or later        *
  *                 releases running programs which call, by     *
  *                 procedure pointer, the alternate entry       *
  *                 point of another COBOL V5 or later program.  *
  ****************************************************************
  * PROBLEM DESCRIPTION: The caller program terminates with 0C4  *
  *                      ABEND, or produces incorrect outputs    *
  *                      in subsequent static calls due to       *
  *                      storage corruption.                     *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  Due to incorrect handling of writable static area (the address
  in CRENT field in LE CAA + 0x1F4) in the COBOL  Runtime, V5+
  programs might terminate with 0C4 ABEND, or produce incorrect
  outputs with later static calls (after the current procedure
  pointer call), when all of the following conditions are met
  prior to the call:
  
  - COBOL V5+ program is calling another COBOL V5+ using
  procedure
  pointer
  - The caller and callee are in different program objects
  - The callee is entered through an alternate entry point
  - The callee has been initialized; that is, it has been called
    before.
  
  Note: V5+ means V5 or later releases
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
  

Problem conclusion

• The handing of writable static area in COBOL Runtime is
  corrected.
  

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

• IGZCEV4  IGZLLIBV IGZXAPI  IGZXCDA  IGZXD24  IGZXDMR  IGZXLPIO
  IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG
  IGZXPK2
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7A0 PSY UI69091

     UP20/04/25 P F004

• R7B0 PSY UI69093

     UP20/04/25 P F004

• R7C0 PSY UI69094

     UP20/04/25 P F004

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.