PI91271: S0C4 ABEND IN IGZXPRS1 AT OFFSET X'3CE'

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When an Enterprise COBOL program calls another Enterprise COBOL
  COBOL using a Procedure Pointer, the Writable Static Area (WSA,
  CAACRENT) of the caller is not restored correctly.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 5.2 and later      *
  *                 releases compiling and running programs      *
  *                 that use PROCEDURE-POINTER data-items to     *
  *                 call sub-programs residing in different      *
  *                 Program Objects.                             *
  ****************************************************************
  * PROBLEM DESCRIPTION: The program terminates abnormally with  *
  *                      S0C4 ABEND in IGZXPRS1.                 *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  When a sub-program called by PROCEDURE-POINTER returns, the
  COBOL runtime library sets the Writable Static Area (WSA)
  address incorrectly for the caller program, leading to
  subsequent S0C4 ABEND in IGZXPRS1. This error occurs when the
  caller program and sub-program are residing in different
  Program Objects.
  
  FIXCAT keyword: COB0501T/K  COB0502T/K  COB0601T/K  COB0602T/K
  

Problem conclusion

• The COBOL runtime library has been fixed to set WSA addresses
  properly when handling PROCEDURE-POINTRE calls.
  

Temporary fix

Comments

APAR Information

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

  PI90195

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

  UI52552

Modules/Macros

• IGZCEV4  IGZCMGEN IGZCMGUE 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

• R7B0 PSY UI52552

     UP17/12/19 P F712

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.