PH31651: DFHTM1797 AT SHUTDOWN WHEN CUSTOM SHUTDOWN ASSIST PROGRAM ADDS FORCE PURGE LOGIC.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• If a transaction is defined SPURGE(NO) such as CEMT, purges
  will be rejected. However a force purge will not, this causes
  the transaction, including the shutdown transaction to abend
  when used in an assist program.
  
  Messages such as the following
  are observed in the job log when this condition
  occurs;
  
  +shutdown jobname THERE ARE NOW 000n TASKS STILL IN
  THE SYSTEM.
  ..
  +shutdown jobname ATTEMPTING TO PURGE TRANID
  CEMT, TERMID ????, USERID user, TASKNO nnnnnn
  ..
  +shutdown
  jobname ACTIVE: TRANID CEMT, TERMID ????, USERID user, TASKNO
  nnnnnn
  +DFHTM1797 jobname System termination program has
  abended.
  +DFHDU0201 jobname ABOUT TO TAKE SDUMP. DUMPCODE:
  TM1797 , DUMPID: 1/85
  
  
  Additional symptoms:
  KIXREVCTC
  
  TM1797
  

Local fix

• Remove the "MVC SDXN,EIBTASKN" instruction in the shutdown
  assist program DFHCESD.
  
  Remove "MOVE EIBTASKN TO SDXN." from the sample DFH0CESD assist
  program.
  
  Remove "sdxn = eibtaskn;" from the sample DFH$CESD assist
  program.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All CICS Users.                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Possible DFHTM1797 after issuing        *
  *                      PERFORM SHUTDOWN.                       *
  ****************************************************************
  CICS provides a default shutdown assist program, DFHCESD.  Prior
  to being called for the first time, DFHSTP sets fields SDXN to
  the task number of the task that triggered shutdown.  This is so
  the shutdown assist program can ignore this task.  However,
  DFHCESD was incorrectly updated to modify SDXN to the number of
  the current task when first called.  As a result the task that
  issued shutdown is subject to any actions taken by the shutdown
  assist program.  If shutdown was requested by CEMT, which has
  SPURGE(NO), no problem occurs because the PURGE issued by the
  default logic is ignored.  However if the sample is updated to
  issue a FORCEPURGE against the remaining tasks then task that
  issued shutdown will be purged causing a DFHTM1797.
  The incorrect update was also made to DFH0CESD and DFH$CESD.
  
  
  Keywords: msgDFHTM1797 TM1797 1797 BPXP018I msgBPXP018I
  

Problem conclusion

• DFHCESD, DFH0CESD and DFH$CESD have been changed to remove the
  setting of SDXN to EIBTASKN.
  

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:

  UI74063 UI74064 UI74065 UI74066 UI74067 UI74068 UI74069 UI74070
  UI74071

Modules/Macros

• DFH$CESD DFH0CESD DFHCESD  DFHCESDP
  

Fix information

• Fixed component name

  CICS TS Z/OS V5

• Fixed component ID

  5655Y0400

Applicable component levels

• R100 PSY UI74069

     UP21/02/21 P F102

• R101 PSY UI74070

     UP21/02/21 P F102

• R102 PSY UI74071

     UP21/02/21 P F102

• R200 PSY UI74066

     UP21/02/21 P F102

• R201 PSY UI74067

     UP21/02/21 P F102

• R202 PSY UI74068

     UP21/02/21 P F102

• R300 PSY UI74063

     UP21/02/21 P F102

• R301 PSY UI74064

     UP21/02/21 P F102

• R302 PSY UI74065

     UP21/02/21 P F102

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.