PH36215: When CBLPSHPOP(ON), 0C4 in COBOL runtime _Dump_Handler during CEEDUMP processing due to IGZXCIC not having PPA blocks

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The pop portion of the CICS CBLPSHPOP implementation is an
  injected stack frame for module IGZXCIC. This stack frame
  contains a COBOL 5+ signature in word 0, so the COBOL dump code
  is lead to expect the stack frame owner to have the usual PPA
  blocks, but there are no PPA blocks, leading to an 0C4.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V5.1 and later     *
  *                 releases running programs under CICS with    *
  *                 the CBLPSHPOP                                *
  *                 runtime option.                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: CICS debug session did not show         *
  *                      complete CEEDUMP information when the   *
  *                      CBLPSHPOP runtime                       *
  *                      option was used.                        *
  ****************************************************************
  * RECOMMENDATION: Install the PTF provided.                    *
  ****************************************************************
  A COBOL runtime library stackframe used
  to handle the CBLPSHPOP option was not setup properly. This
  caused an internal abend later during CEEDUMP processing when
  information on the stack was retrieved. As a result, output of
  the
  CEEDUMP was not complete.
  
  COB0501T/K COB0502T/K COB0601T/K COB0602T/K COB0603T/K
  

Problem conclusion

• The COBOL runtime library was fixed to set up
  information on the stack correctly when handling the CBLPSHPOP
  option.
  

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

• IGZCER4  IGZCEV4  IGZCMGEN IGZCMGUE IGZLLIBV IGZXAPI  IGZXCA31
  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 UI77335

     UP21/10/01 P F109

• R7C0 PSY UI77337

     UP21/10/01 P F109

• R7D0 PSY UI77339

     UP21/10/01 P F109

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.