PK98411: AN ABENDS878 RETURN CODE 0C MAY OCCUR WHEN RUNNING DLL ENABLED MODULES IN CICS. THE MVS SUBPOOL 229 IS GROWING.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• A customer had multiple COBOL modules that were compiled with
  the Dynamic Load Library ( DLL ) attribute.  The modules resided
  in PDSE libraries.  As CICS ran, the MVS subpool 229 began to
  grow until storage ran out.  This resulted in abend878s and in
  this case rc x'0C'.  The SP 229 storage contained multiple eye-
  catchers of IEWPLMH, Binder Program Load Module Header control
  blocks used to manage DLL enabled modules.
    When CICS loads a DLL enabled module, the Binder creates an
  IEWPLMH block.  When CICS discards the module, Binder releases
  the control block for later reuse.
    In CICS TS R3.2 during the discard process, the loader 'END'
  function never makes it to the Binder and the Binder storage is
  orphaned.  The process fails in DFHLDSVC and the trace will show
       LDLD2 *EXC* BAD-RESPONSE-FROM-SVC-CALLFUNCTION(END)
  The process then continues on without any addition errors.  The
  end result is the program is discarded per CICS, but the Binder
  still has an IEWPLMH block.  If CICS physically re-loads the
  module, a new request is sent to the Binder, and a new IEWPLMH
  block is created for module management.  If this process occurs
  enough times, MVS will run out of storage.
    DFHLDSVC needs to accept the END request as it did
  in the past, and allow the Binder to release it's
  control blocks.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All                                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: An abend 878 with COBOL programs        *
  *                      defined with the Transient option and   *
  *                      compiled with the DLL parm.             *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  When a COBOL program has been compiled with the DLL parm and the
  program has been defined to CICS with the TRANSIENT option, a
  build up of duplicate IEWPLMH blocks will occur.  This can lead
  to an MVS storage shortage in subpool 229.
  
  When a program is released, DFHLDLD1 calls the loader SVC to
  inform DFSMS of the delete of the program.  The call to the
  loader SVC in DFHLDLD1 is occuring on the QR TCB.  This call is
  being rejected since the relevant control block structure has
  only been built on the RO TCB.
  
  Keywords: PDSE S878 abend878
  

Problem conclusion

• DFHLDLD1 has been changed to perform the LOADER_SVC_CALL on the
  RO TCB.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

• ž**** PE10/06/23 FIX IN ERROR. SEE APAR PM16899  FOR DESCRIPTION
  

APAR Information

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

  PK91585

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

  UK52226

Modules/Macros

•    DFHLDCOM DFHLDDMI DFHLDLD1 DFHLDLD2
  

Fix information

• Fixed component name

  CICS TS Z/OS V4

• Fixed component ID

  5655S9700

Applicable component levels

• R600 PSY UK52226

     UP09/11/28 P F911

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.