PM26001: DELETING A SUBSPACE TCB RESULTS IN A ABEND=S0067,REASON=00000020MODULE=ISGGTRM1+0248.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The deletion of a subspace is postponed due to the existence of
  an open TCB which has an affinity with the subspace. The
  termination of this open TCB is triggered but it is still
  terminating many minutes later when the next subspace
  housekeeping run occurs. This second run deletes the subspace
  and the ABEND067 eventually occurs some time later.
  .
  Here's the Dump that comes out:
  .
  DUMP TITLE=COMPON=ISG,COMPID=SCSDS, ISSUER=ISGRREC
  ,MODULE=ISGGTRM1+0248,ABEND=S0067,REASON=00000020
  .
  Symptom             Description
  -------             -----------
  PIDS/5752SCSDS      Program id: 5752SCSDS
  RIDS/ISGNPVT#L      Load module name: ISGNPVT
  RIDS/ISGGTRM1       Csect name: ISGGTRM1
  AB/S0067            System abend code: 0067
  PRCS/00000020       Abend reason code: 00000020
  REGS/0E01E          Register/PSW difference for R0E: 01E
  REGS/C4F68          Register/PSW difference for R0C:-4F68
  RIDS/ISGRREC#R      Recovery routine csect name: ISGRREC
  .
    Recovery Routine Label:  ISGRFRR
    Date Assembled:          11/13/09
    Module Level:            UA51185
    Subfunction:             GRS
  .
  Time of Error Information
  .
    PSW: 07045001 80000000 00000000 26933338
    Instruction length: 04   Interrupt code: 002B
    Failing instruction text: 0066B917 006A58B0 600850B0
    Exception access identification: 06
  .
  SYSTRACE shows the following:
  .
  05 0121 00995128  DSP        070C1000 8150B954  00000000
  00000000
  05 0121 00995128  PR     ...   0      01604DF6 0150B9AE
  05 0121 00995128  PC     ...   0      01605010
  00102
  05 0121 00995128  PGM    02B 070C5001 A6933338  0004002B
  00000000
  
  009AD000
  05 0121 00995128 *RCVY  PROG                    84067000
  00000020
  05 0121 00995128  SSRV    78          81278F0A  4000EF50
  00000998
                                                  00010000
  05 0121 00995128 *RCVY  FRR  070C4000 81609F70  84067000
  00000020
  05 0121 00995128  PC     ...   0      012A37C6
  0030B
  05 0121 00995128  SSRV   132          00000000  0100F570
  000020E0
  .
  Here's an example of the Data seen in the CICS Internal
  Trace:
  .
  TCB: 00995128 is one that has suffered the 067 abend.
  .
  It is KTCB 38204000 L807W and has tcb_reply in the
  CICS trace:
  .
  DS 0013 DSKE  EXIT - FUNCTION(TCB_REPLY)
                       RESPONSE(OK)
          TASK-DSTCB KE_NUM-000E TCB-L807W/00995128
          RET-A695A9E0 TIME-22:22:40.8161219858
  .
  The CICS trace shows:
  .
  DS 0002 DSAT  ENTRY - FUNCTION(DELETE_SUBSPACE_TCBS)
                        SUBSPACE_TOKEN(270A2B80)
                        TIME-22:22:22.3204339565
  .
  DS 0008 DSIT  ENTRY - FUNCTION(DELETE_TCB)
                        TCB_TOKEN(28C7E6C0 , 00000013)
                        TIME-22:22:22.3204365502
  .
  DS 0009 DSIT  EXIT - FUNCTION(DELETE_TCB)
                       RESPONSE(OK)
                       TIME-22:22:22.3205686596
  .
  DS 0003 DSAT  EXIT - FUNCTION(DELETE_SUBSPACE_TCBS)
                       RESPONSE(OK)
                       TIME-22:22:22.3205693784
  .
  Then when we try the DELETE_SUBSPACE_TCBS again:
  .
  DS 0002 DSAT  ENTRY - FUNCTION(DELETE_SUBSPACE_TCBS)
                        TIME-22:28:36.2952468601
  .
  DS 0003 DSAT  EXIT - FUNCTION(DELETE_SUBSPACE_TCBS)
                       RESPONSE(EXCEPTION)
                       REASON(TOO_FEW_TCBS)
                       TIME-22:28:36.2952504538
  .
  So CICS does not know about the subspace.
  .
  Additional Symptom(s) Search Keyword(s):
  KIXREVDAM  RSN00000020 RC20
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All                                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: AbendS067 due to a task on an open TCB  *
  *                      having its Subspace deleted before it   *
  *                      has completed MVS termination.          *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  AbendS067 Reason 20 from MVS occurs when a task running on an
  open TCB has its Subspace deleted by CICS even though it is
  still in the despatchable unit's access list.
  Keywords: S0067 abendS0067 abend067 067 DU-AL
  

Problem conclusion

• DFHDSAT DELETE_SUBSPACE_TCBS has been changed to detect if an
  open TCB which has already been posted for TCB termination is
  still in the process of terminating. If it is then DFHDSAT will
  return a response to DFHSMSU which prevents the subspace which
  has an affinity with the TCB from being deleted.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

APAR Information

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

  PM25169

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

  UK62286

Modules/Macros

•    DFHDSAT
  

Fix information

• Fixed component name

  CICS TS Z/OS V4

• Fixed component ID

  5655S9700

Applicable component levels

• R600 PSY UK62286

     UP10/12/02 P F012

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.