PH39705: A CANCEL may free the WSA for a composite COBOL executable before all comprising compile units have been cancelled

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• For COBOL 5 and later compile units in a dynamically called
  composite executable wherein compile units statically call each
  other, the reuse of COBOL load list entries may lead to a
  situation where cancellng the initial compile unit in the
  executable frees the writable static area (WSA) of the
  executable before all the contained compile units have been
  cancelled.
  
  Once this has happened, the cancel of the next contained compile
  unit will very likely take an 0C4 abend when it tries to access
  the compile unit's portion the now freed WSA.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5                 *
  *                 and later releases running programs under a  *
  *                 multi-threaded environment and performing    *
  *                 large number                                 *
  *                 of program cancels under IMS with            *
  *                 CANCEL_PGM=Y.                                *
  *                 Note that programs interoperating with Java, *
  *                  or calling the                              *
  *                 C pthread library functions directly or      *
  *                 indirectly, are                              *
  *                 multi-threaded.                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: 0C4 ABEND in COBOL                      *
  *                      runtime library IGZCEV41.               *
  ****************************************************************
  * RECOMMENDATION: Install the provided PTF.                    *
  ****************************************************************
  When a program object with multiple
  COBOL program statically linked together is canceled, and if
  the program is running in a multi-threaded environment, the WSA
  may be freed before all statically linked programs are processed
  . This leads to 0C4 ABEND when the storage of the programs are
  accessed in subsequent clean up processing.
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
  

Problem conclusion

• The error in the COBOL runtime library in cancel
  processing of statically linked program object has been
  corrected.
  

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:

Modules/Macros

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

• R7B0 PSY UI76827

     UP21/08/27 P F108

• R7C0 PSY UI76832

     UP21/08/27 P F108

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.