IBM Support

PI73815: S0C4 IGZEINI OFFSET X'238'

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • COBOL V5+ program performing a SORT is statically linked with a
    pre-V5 COBOL program.  The executable program object is linked
    as AMODE(24) and RMODE(24).  Exception in IGZEINI on a load
    instruction occurs on the call to the pre-V5 COBOL program.
    The exception occurs as psw is in 24 bit mode, attempting to
    address an 31 bit address.
      Problem occurs after applying the ptf for PI69070.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Enterprise COBOL users running both COBOL    *
    *                 V5+ and pre-V5 programs under AMODE 24, and  *
    *                 SORT statement is used in the COBOL V5+      *
    *                 program.                                     *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: Runtime ABEND ABEND0C4 in IGZEINI.      *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    If the COBOL V5+ program uses SORT with INPUT or OUTPUT
    PROCEDURE, and pre-COBOL V5 program is called from within the
    INPUT/OUTPUT PROCEDURE, and the program is running in AMODE 24,
    the COBOL runtime mistakenly allocates a control block  above
    the line. This causes abend ABEND0C4 when the control block is
    accessed.
    
    FIXCAT keyword:  COB0501T/K   COB0502T/K   COB0601T/K
    

Problem conclusion

  • The logic in the COBOL runtime has been corrected to work
    properly for this scenario.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI73815

  • Reported component name

    LE ENT COBOL LI

  • Reported component ID

    568819812

  • Reported release

    790

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2016-12-14

  • Closed date

    2017-01-20

  • Last modified date

    2017-02-01

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

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

    UI44109 UI44110

Modules/Macros

  • IGZCEV4  IGZLLIBV IGZXAPI  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 UI44109

       UP17/01/27 P F701

  • R790 PSY UI44110

       UP17/01/27 P F701

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.

[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SSCVR7X","label":"Runtime"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
14 December 2020