IBM Support

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

A fix is available

Subscribe

You can track all active APARs for this component.

 

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 number

    PI91271

  • Reported component name

    LE ENT COBOL LI

  • Reported component ID

    568819812

  • Reported release

    7B0

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2017-12-07

  • Closed date

    2017-12-14

  • Last modified date

    2018-01-03

  • 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.

[{"Line of Business":{"code":"LOB35","label":"Mainframe SW"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"7B0"}]

Document Information

Modified date:
17 September 2021