PM55755: DFHLD0002 SEVERE ERROR (CODE X'0809') IN MODULE DFHLDLD

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Problem may be seen with either of the following messages:
  .
  DFHLD0002 A severe error (code X'0809') has occurred in
  module DFHLDLD.      or
  DFHLD0001 An abend (code 0C4/AKEA) has occurred at offset
  X'1496' in module DFHLDLD.
  .
  The problem is a locking problem with PG domain PLCB 's. A CONA
  task running on the QR TCB issues an EXEC CICS INQUIRE TASK
  request for a task currently executing on an L8 TCB. During
  processing of this request, DFHPGIS is called for
  INQUIRE_CURRENT_PROGRAM and is passed a valid TXN address. At
  time of the INQUIRE_CURRENT_PROGRAM from CONA, the task being
  inquired on is executing in a TRUE program CSFATRUE, and the
  head PLCB (field PTA_PLCB_HEAD ) is correspondingly CSFATRUE.
  .
  MVS system trace shows that the QR TCB loses control just as
  it's about to execute the LOAD instruction at offset '6C8' in
  DFHPGIS (UK63860). The QR TCB begins running shortly afterward
  but before it does, the task running on it's L8 TCB completes
  it's processing in CSFATRUE and DFHERM updates the PLCBs to
  reflect this. DFHERM uses an inline DFHPGEXI macro (functions
  PREPARE_EXIT and CLEAR_EXIT) to manipulate the PLCBs but doesn't
  hold the PG lock when it does this. So the head PLCB (field
  PTA_PLCB_HEAD ) changes out from under CONA who then goes on to
  load from the now invalid PLCB for CSFATRUE, picks up an invalid
  address and saves it in field PPTE_PTR. DFHPGIS then calls
  Loader domain passing an invalid token and either the DFHLD0002
  Severe error x'0809' or the abend0C4 in DFHLDLD will occur. It
  looks like the same problem could occur in DFHUEH who also uses
  the DFHPGEXI macro to manipulate the PLCBs for GLUEs.
  .
  Additional Symptom(s) Search Keyword(s):
  KIXREVSLY 0809 CONL PTA 0C4 S0C4 abendS0C4 abend0C4 GLUE
  DFHPG0001 An abend (code 0C4/AKEA) has occurred at
            offset X'0B28' in module DFHPGIS.
  ppte plcb pta DFHEIQSK PG0001  40404040
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All CICS users.                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Message DFHSR0001 contained the wrong   *
  *                      program name.                           *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The source of the field used to insert the program name in
  message DFHSR0001 is incorrect.
  Keywords: msgDFHSR0001 SR0001I calls to PREPARE_EXIT.
  

Problem conclusion

• CICS has been updated to correctly restore the program
  information on return from a lower program level where
  appropriate.
  
  The CICS Transaction Server for z/OS, Version 3, Release 2
  Supplementary Data Areas manual, GC34-6864-04, will be updated
  with the changes to the PTA and PLCB as follows:
  
  In Table 393, after PTA_FREE_HTB_CHAIN, add the following:
  Offset Type      Len Name                Description
  54     CHARACTER 44  PTA_PLCB_HEAD_COPY  Copy of info from head
                                           PLCB for
                                           inquire_current_program
  54     ADDRESS   4   PTA_PLCB_PREV_PTR   Previous PLCB
  58     CHARACTER 28  PTA_PLCB_PROGRAM_INSTANCE Instance of
                                                 current prog
  58     CHARACTER 8   PTA_PLCB_PROGRAM_NAME Prog name
  60     ADDRESS   4   PTA_PLCB_PROG_PPTE  PPT entry for this lvl
  64     CHARACTER 16  PTA_PLCB_PROGRAM_DETAILS This structure is
                                           used for improving
                                           performance
  64     ADDRESS   4   PTA_PLCB_LOAD_POINT Program load point
  68     ADDRESS   4   PTA_PLCB_ENTRY_POINT Program entry point
  68     CHARACTER 1   *
         1... ....     PTA_PLCB_AMODE_31   AMODE on=31 off=24
  6C     FULLWORD  4   PTA_PLCB_PROGRAM_LENGTH program_length
  70     ADDRESS   4   PTA_PLCB_LANGUAGE_TOKEN Progam language
                                              extension
  74     BIT(8)    1   PTA_PLCB_INSTANCE_FLAGS Bit settings are
                               the same as those in PPTE_DEFINTION
         1... ....     PTA_PLCB_CEDF_STATUS   CEDF status
         .1.. ....     *
         ..1. ....     PTA_PLCB_ANY_DATA_LOC  Data location
         ...1 ....     PTA_PLCB_DPLSUBSET  Program execution set
         .... 11..     *
         .... ...1     PTA_PLCB_DYNAMIC_STATUS Dynamic DPL status
  75     CHARACTER 1   PTA_PLCB_ENVIRONMENT Environment info
         UNSIGNED  1   PTA_PLCB_ENVIRONMENT_TYPE Enviroment type
  76     BIT(8)    1   PTA_PLCB_FLAGS
         1... ....     PTA_PLCB_INPUTMSG_SUPPLIED Input msg passed
                                     on link or XCTL to this level
         .1.. ....     PTA_PLCB_XCTL_IN_PROGRESS XCTL in progress
         ..1. ....     PTA_PLCB_HANDLE_ABEND_PGM Abend handler
                                                 program
         ...1 ....     PTA_PLCB_SYSEIB_REQUEST SYSEIB specified
         .... 1...     PTA_PLCB_HPJ_PROGRAM Java program object
         .... .111     *                     Reserved
  77     CHARACTER  1  *                     Unused
  78     CHARACTER  8  PTA_PLCB_INVOKING_PROG Invoking program
  80     FULLWORD   4  PTA_PLCB_HEAD_UPDATE_COUNT Number of times
                                              PLCB updated
  
  The last row should be updated with an offset of 84.
  
  Table 394 should updated as follows:
  After PLCB_BLOCK_NAME, insert the following:
  10     CHARACTER  35 PLCB_INQUIRE_DATA Used to copy into PTA
  .
  NOTE: NOTE: This APAR contains fixes for the following APARs
        from CICS Transaction Server for z/OS Version 4:
        PM41580, PM55461, and PM49126.
  .
  .
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

APAR Information

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

  PM41580

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

  UK77533 PM70502

Modules/Macros

•    DESHMP   DESLI1   DESPGAI  DESPGAQ  DESPGCM
  DESPGDC  DESPGDD  DESPGDM  DESPGDUF DESPGEX  DESPGHM  DESPGIS
  DESPGLD  DESPGLK  DESPGLU  DESPGPG  DESPGRP  DESPGST  DESPGUE
  DESPGXM  DFHAPLI1 DFHAPLJ1 DFHAPLX1 DFHAPPG  DFHERM   DFHPCXDF
  DFHPGAI  DFHPGAIA DFHPGAIM DFHPGAIT DFHPGAQ  DFHPGAQA DFHPGAQM
  DFHPGAQT DFHPGAQX DFHPGAQY DFHPGDCC DFHPGDCD DFHPGDD  DFHPGDDA
  DFHPGDDM DFHPGDDT DFHPGDM  DFHPGDUF DFHPGEX  DFHPGEXA DFHPGEXI
  DFHPGEXM DFHPGEXT DFHPGHM  DFHPGIS  DFHPGISA DFHPGISM DFHPGIST
  DFHPGISX DFHPGISY DFHPGLD  DFHPGLDA DFHPGLDM DFHPGLDT DFHPGLE
  DFHPGLEA DFHPGLEM DFHPGLET DFHPGLK  DFHPGLKA DFHPGLKM DFHPGLKT
  DFHPGLU  DFHPGLUA DFHPGLUM DFHPGLUT DFHPGPG  DFHPGPGA DFHPGPGM
  DFHPGPGT DFHPGRE  DFHPGREA DFHPGREM DFHPGRET DFHPGRP  DFHPGRPA
  DFHPGRPM DFHPGRPT DFHPGST  DFHPGUE  DFHPGXE  DFHPGXEA DFHPGXEM
  DFHPGXET DFHPGXM  DFHPGXMA DFHPGXMM DFHPGXMT DFHSUEX  DFHUEH
  

Fix information

• Fixed component name

  CICSTS V3 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R500 PSY UK77533

     UP12/04/13 P F204

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.