PH16832: S0C4 IN _CLEANUP DURING CANCEL

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• When a dynamically called COBOL subroutine, which is statically
  linked with another COBOL subroutine, is CANCELed, an s0c4
  exception may occur.
  

Local fix

• In the Bind step of the statically linked programs, concatenate
  the object of the ENTRY routine first in the SYSLIN statement.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5 and later       *
  *                 releases running programs which use          *
  *                 COBOL CANCEL statements.                     *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: CANCEL statement terminates with a 0C4  *
  *                      The traceback in CEEDUMP shows an       *
  *                      exception within the COBOL runtime      *
  *                      routine _cleanup.                       *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF or follow the         *
  *                 circumvention.                               *
  ****************************************************************
  During CANCEL processing, the COBOL Runtime inadvertently freed
  storages allocated to the program before all CANCEL processing
  had been completed.
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
  

Problem conclusion

• The CANCEL processing in COBOL Runtime has been corrected to
  free storages in the proper sequence.
  

Temporary fix

Comments

APAR Information

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

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

  UI65941

Modules/Macros

• IGZCER4  IGZCEV4  IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI  IGZXCDA
  IGZXD24  IGZXDMR  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 UI66040

     UP19/10/30 P F910

• R7B0 PSY UI65941

     UP19/10/30 P F910

• R7C0 PSY UI65943

     UP19/10/30 P F910

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.