PI90195: 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:

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

  PI91271 UI52550 UI52551

Modules/Macros

• IGZCEV4  IGZLLIBV IGZXAPI  IGZXCDA  IGZXDMR
  IGZXD24  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 UI52550

     UP17/12/19 P F712

• R790 PSY UI52551

     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.