PI67256: WITH OPTIMIZATION, PERFORM MAY SET ITS RETURN ADDRESS TO THE END OF PROGRAM, RESULTING IN ABEND0C1 UPON PARAGRAPH RETURN

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• In some circumstances, control flow optimization leads to an
  incorrect return address being loaded by a PERFORM. In the case
  at hand the return address is set to the end of the program
  code, and the return from the PERFORMed paragraph branches to
  the eyecatcher x'00CCDDFF' of the constants area following the
  program code, resulting in an abend0C1.
  

Local fix

• Compile with OPTIMIZE(0).
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5.1 compiling     *
  *                 programs at OPT(1|2) where a PERFORMed       *
  *                 paragraph A ends with a PERFORM statement    *
  *                 performing paragraph B, and B is performed   *
  *                 at least one other time.                     *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: The program ABENDs with an S0C1.        *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  The compiler was incorrectly getting rid of information that
  would tell the compiler to generate a label. The compiled
  program would attempt to branch to that label, but because the
  compiler hadn't created it, the code would branch to the start
  of the constant area instead. Since the constant area begins
  with an eyecatcher that isn't a valid z/OS instruction, the
  program abends with a S0C1.
  

Problem conclusion

• The compiler was fixed to create the label when it is needed.
  

Temporary fix

Comments

APAR Information

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

  PI65060

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

Modules/Macros

•    IGYCBE
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655W3200

Applicable component levels

• R510 PSY UI40241

     UP16/08/25 P F608

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.