IBM Support

PI61725: PERFORM STATEMENT THAT CANNOT REACH ITS EXIT IS NOT FLAGGED

A fix is available

Subscribe

You can track all active APARs for this component.

 

APAR status

  • Closed as program error.

Error description

  • Generate a message for a PERFORM statement that is not able to
    reach its EXIT. Previous version of COBOL compiler generated
    such a message:
    
    IGYOP3093-W   The "PERFORM" statement at "PERFORM (line
    3606.01)" cannot reach its exit.
    

Local fix

Problem summary

  • ****************************************************************
    * USERS AFFECTED: Users of Enterprise COBOL V5.2 compiling     *
    *                 programs with PERFORM statements that        *
    *                 cannot reach their exits.                    *
    *                                                              *
    ****************************************************************
    * PROBLEM DESCRIPTION:                                         *
    *                      Missing compiler diagnostic message:    *
    *                      Previous versions of Enterprise COBOL   *
    *                      displayed message 'MSGIGYOP3093-W The   *
    *                      "PERFORM" statement at "PERFORM (line   *
    *                      X)" cannot reach its exit.' when a      *
    *                      PERFORM statement did not reach its     *
    *                      exit. Enterprise COBOL V5.1 and later   *
    *                      never produced this message.            *
    *                                                              *
    *                                                              *
    ****************************************************************
    * RECOMMENDATION: Apply the provided PTF.                      *
    *                                                              *
    ****************************************************************
    COBOL V5.1 and later never attempted to produce this message.
    

Problem conclusion

  • The compiler was fixed to produce the warning message when a
    PERFORM statement cannot reach its exit.
    

Temporary fix

Comments

APAR Information

  • APAR number

    PI61725

  • Reported component name

    ENT COBOL FOR Z

  • Reported component ID

    5655W3200

  • Reported release

    520

  • Status

    CLOSED PER

  • PE

    NoPE

  • HIPER

    NoHIPER

  • Special Attention

    NoSpecatt / Xsystem

  • Submitted date

    2016-04-29

  • Closed date

    2016-05-27

  • Last modified date

    2016-07-04

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

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

    PI63110 PI64257

Modules/Macros

  •    IGYCBE   IGYECWI  IGYMSGE  IGYMSGK  IGYMSGT
    

Fix information

  • Fixed component name

    ENT COBOL FOR Z

  • Fixed component ID

    5655W3200

Applicable component levels

  • R520 PSY UI38258

       UP16/06/02 P F606

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":"520","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":"520","Edition":"","Line of Business":{"code":"","label":""}}]

Document Information

Modified date:
04 July 2016