IBM Support

PH42220: Entry point name is used as input to IGZIUXB instead of compile unit name for programs with multiple entry points for AMODE64

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • If a program compiled with TEST(SEPARATE(NODSNAME)) is called
    using a secondary entry point, the debug information will be
    inaccessible. Contrary to documentation, the exit IGZUIXB, used
    to map the compile unit name to a debug file, is passed the
    secondary entry name rather than the compile unit name.
    

Local fix

  • Use TEST(NOSEPARATE).
    

Problem summary

  • ****************************************************************
    * USERS AFFECTED: User of Enterprise COBOL 6.3 and later       *
    *                 releases running AMODE 64 programs           *
    *                 compiled with                                *
    *                 TEST(SEPARATE(NODSNAME)) that have           *
    *                 multiple entry points and produce a          *
    *                 CEEDUMP when the program is entered          *
    *                 through an alternate entry point.            *
    ****************************************************************
    * PROBLEM DESCRIPTION: In the CEEDUMP, the COBOL               *
    *                      'Local Variables' section               *
    *                      generates the following message:        *
    *                                                              *
    *                      Variables for {program-name}:           *
    *                      COBOL variables were inaccessible.      *
    *                      Reason: no debug file was found.        *
    *                      (TEST(SEPARATE(NODSNAME) was used and   *
    *                      IGZQUXB/IGZQUXC failed).                *
    *                                                              *
    *                      Along with the message, the COBOL       *
    *                      statement number that results in the    *
    *                      CEEDUMP might be missing.               *
    ****************************************************************
    * RECOMMENDATION: Install the provided PTF.                    *
    ****************************************************************
    The COBOL Runtime had an error locating and using the side
    debug file for programs with multiple entry points
    compiled with TEST(SEPARATE(NODSNAME)) and entered through
    an alternate entry point when a CEEDUMP was produced.
    The alternate entry point name was being used for
    locating the side debug file (via IGZQUXB) rather than the
    compile unit name.
    
    COB0603T/K
    

Problem conclusion

  • The COBOL Runtime has been fixed to use the compile unit name
    to access the side debug file (via IGZQUXB) regardless
    of what entry point was used to enter a COBOL program.
    
    With this APAR, a new sample IGZQIUXB for AMODE 64 COBOL
    programs is available in the SCEESAMP dataset.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PH42220

  • Reported component name

    LE ENT COBOL LI

  • Reported component ID

    568819812

  • Reported release

    7D0

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2021-11-19

  • Closed date

    2022-04-27

  • Last modified date

    2022-05-03

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

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

Modules/Macros

  • CELQSG04 CELQV004 IGZQAPI  IGZQCA64 IGZQCDA  IGZQINPL IGZQIUXB
    IGZQJNI2 IGZQR004
    

Fix information

  • Fixed component name

    LE ENT COBOL LI

  • Fixed component ID

    568819812

Applicable component levels

  • R7B0 PSY UI80299

       UP22/04/29 P F204

  • R7C0 PSY UI80301

       UP22/04/29 P F204

  • R7D0 PSY UI80302

       UP22/05/02 P F204

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":"7D0"}]

Document Information

Modified date:
04 May 2022