PI59226: CEE0813S OR S878 ABEND USING COBOL CALL AND CANCEL

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• With a mix of Enterprise COBOL V5 and COBOL prior to V5,
  multiple CALLs and then CANCELs of subprograms results in
  storage problems. On the first call, a Load List Entry (CLLE)
  is created.  When a cancel is done, the CLLE is cleared out, but
  remains in storage until the enclave is terminated.  If that
  program is called again, a new CLLE is created instead of
  reusing the previous one.
    Another possible symptom is an increase in CPU during the
  CALL process, as we traverse the CLLE list.
  

Local fix

• Don't use CANCEL
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Enterprise COBOL V5 users running programs   *
  *                 that do repeated dynamic CALL and CANCEL of  *
  *                 pre-V5 COBOL programs.                       *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Runtime ABEND with msg: When a COBOL    *
  *                      V5 program dynamically calls then       *
  *                      cancels a pre-V5 program, and the       *
  *                      pre-V5 program is subsequently called   *
  *                      again, the runtime fails to reuse the   *
  *                      storage allocated for the internal      *
  *                      control block that is used to keep      *
  *                      track of the state of the program.      *
  *                      This small memory leak may result in    *
  *                      insufficient storage being available,   *
  *                      as indicated by LE message CEE0813S -   *
  *                      "Insufficient storage available to      *
  *                      satisfy a get storage request"          *
  *                      especially when running with the        *
  *                      ALL31(OFF) option in effect.            *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  The CLLE entry associated to pre-V4 COBOL program was not being
  reused once the program has been cancelled.
  

Problem conclusion

• The runtime was corrected to properly reuse storage for the
  internal control blocks.
  
  FIXCAT keyword:  COB0501T/K   COB0502T/K
  

Temporary fix

Comments

APAR Information

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

  PI56284

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

Modules/Macros

• IGZXLPKA
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R780 PSY UI36468

     UP16/03/30 P F603

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.