IBM Support

PI70269: THE COMPILER LOOPS IF A PRTEXIT RETURNS RC=12 "OPERATION FAILED"DURING WRITING OF THE COMPILER LISTING.

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • The back end pipes lines of the LIST or OFFSET listing to the
    front end for dispatch in the CEEPIPI environment hosting the
    compiler exits. If the PRTEXIT signals it's operation failed,
    the compiler doesn't properly terminate and enters a loop due to
    save area structure issues.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V5.1 compiling     *
    *                 programs using the EXIT(PRTEXIT) compiler    *
    *                 option and providing a print user exit.      *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION: Compiler loop and ABEND: When a user    *
    *                      specified print exit returns a          *
    *                      non-zero return code, the compiler      *
    *                      goes into a loop ending with ABEND      *
    *                      S322 and the following messages are     *
    *                      generated: IGYSI5217-U  An error        *
    *                      occurred in PRTEXIT user-exit           *
    *                      "IGYPRTXT". Compiler terminated.        *
    *                      IGYRC5122-U  A RECURSIVE ENTRY TO THE   *
    *                      COBOL ABORT MODULE OCCURRED.            *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    When a user print exit returns a non-zero return code with the
    LIST or OFFSET compiler options in effect, the compiler goes
    into a loop.
    

Problem conclusion

  • The compiler was modified to terminate with return code 16 when
    a print user exit returns a non-zero return code.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI70269

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655W3200

  • Reported release

    510

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2016-10-06

  • Closed date

    2016-10-19

  • Last modified date

    2016-11-02

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

    PI69046

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

    128AC7Ÿ

Modules/Macros

  • IGYECNTL
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655W3200

Applicable component levels

  • R510 PSY UI41798

       UP16/10/26 P F610

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":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"510","Edition":"","Line of Business":{"code":"LOB17","label":"Mainframe TPS"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"510","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
02 November 2016