TCB mapping

Table 1. Structure TCBFIX
Offset Offset
Dec Hex Type Len Name(Dim) Description
-32 (-20) STRUCTURE 0 TCBFIX , - TCBPTR-32
-32 (-20) CHARACTER 32  TCBFRS(0) - FLOATING POINT REGISTER SAVE AREA
-32 (-20) DBL WORD 8  TCBFRS0 - SAVE AREA FOR FLOATING POINT REGISTER 0
-24 (-18) DBL WORD 8  TCBFRS2 - SAVE AREA FOR FLOATING POINT REGISTER 2
-16 (-10) DBL WORD 8  TCBFRS4 - SAVE AREA FOR FLOATING POINT REGISTER 4
-8 (-8) DBL WORD 8  TCBFRS6 - SAVE AREA FOR FLOATING POINT REGISTER 6
-8 (-8) X'20' 0  TCBPXLEN "*-TCBFIX" LENGTH OF PREFIX SECTION
               TCB PROPER
0 (0) DBL WORD 8   (0)
0 (0) X'20' 0  TCB "*" - TCBPTR
0 (0) ADDRESS 4  TCBRBP - ADDRESS OF THE RB FOR EXECUTING PROGRAM. THIS OFFSET FIXED BY ARCHITECTURE.
4 (4) ADDRESS 4  TCBPIE - Address of current PIE/EPIE. This field may be tested for zero to determine that there currently is no SPIE/ESPIE exit established for this task Ownership: RTM Serialization: Local Lock
8 (8) ADDRESS 4  TCBDEB - ADDRESS OF THE DEB QUEUE
12 (C) ADDRESS 4  TCBTIO - ADDRESS OF THE TASK I/O TABLE (TIOT)
16 (10) BITSTRING 4  TCBCMP(0) - TASK COMPLETION CODE AND INDICATORS
16 (10) BITSTRING 1  TCBCMPF - INDICATOR FLAGS
  1... ....  TCBCREQ "X'80'" - A DUMP HAS BEEN REQUESTED
  .1.. ....  TCBCSTEP "X'40'" - A STEP ABEND HAS BEEN REQUESTED
  ..1. ....  TCBCPP "X'20'" - SOME PROBLEM PROGRAM STORAGE WAS OVERLAID BY THE SECOND LOAD OF ABEND. A FIRST LOAD OVERLAY IS INDICATED IN TCBFLGS FIELD (OFFSET 29 DECIMAL). (OS/VS1)
  ..1. ....  TCBDMPO "X'20'" - DUMP OPTIONS WERE PROVIDED ON CALLRTM OR SETRP MACRO
  ...1 ....  TCBSTCC "X'10'" - COMPLETION CODE IS NOT TO BE STORED IN TCBCMPC (OFFSET 17 DECIMAL) IF AN ABEND IS ENCOUNTERED. THIS IS TO PREVENT AN OVERLAY OF THE ORIGINAL COMPLETION CODE. (OS/VS1)
  ...1 ....  TCBNOCC "X'10'" - A COMPLETION CODE WAS NOT PROVIDED ON CALLRTM MACRO. A DEFAULT CODE IS BEING USED.
  .... 1...  TCBCDBL "X'08'" - A DOUBLE ABEND HAS OCCURRED (OS/VS1)
  .... 1...  TCBCASID "X'08'" - ABEND WAS SCHEDULED VIA CROSS MEMORY ABTERM
  .... .1..  TCBCWTO "X'04'" - A DUMP MESSAGE (WTO) IS TO BE ISSUED TO THE OPERATOR (OS/VS1)
  .... .1..  TCBRV316 "X'04'" - INDICATES REASON CODE (TCBARC) IS VALID
  .... ..1.  TCBCIND "X'02'" - ABEND TO OUTPUT AN INDICATIVE DUMP (OS/VS1)
  .... ...1  TCBCMSG "X'01'" - AN ABEND MESSAGE IS PROVIDED TO BE PRINTED BY ABDUMP (OS/VS1)
17 (11) BITSTRING 3  TCBCMPC - SYSTEM COMPLETION CODE IN FIRST 12 BITS, USER COMPLETION CODE IN LAST 12 BITS
20 (14) ADDRESS 4  TCBTRN(0) - ADDRESS OF TESTRAN CONTROL CORE TABLE
20 (14) BITSTRING 1  TCBABF - FLAG BYTE
  1... ....  TCBMOD91 "X'80'" - BOTH TESTRAN AND DECIMAL SIMULATOR ON A MOD 91
  .1.. ....  TCBNOCHK "X'40'" - SUPPRESS TAKING CHECKPOINTS FOR THIS STEP (JOB STEP TCB)
  ..1. ....  TCBGRPH "X'20'" - GAM/SP ACTIVE FOR THIS TASK
  ...1 ....  TCB_REFRPROT_OVERRIDE "X'10'" - Even if the REFRPROT option is active, do not apply REFRPROT rules to LOADs under this task.
  .... 1...  TCBTCPP "X'08'" - TCAM POST-PENDING (RORI)
  .... .1..  TCBTCP "X'04'" - TEST TASK - USED BY TEST SVC
  .... ..1.  TCBOLTEP "X'02'" - OLTEP FUNCTIONS REQUIRE CLEANUP BEFORE ABNORMAL TERMINATION CAN BE INVOKED
  .... ...1  TCBDFRBP "X'01'" - Issue SVC 61 upon fetch. Set only when SVC 61 is being intercepted for deferred breakpoint processing
21 (15) ADDRESS 3  TCBTRNB - ADDRESS OF TESTRAN CONTROL CORE TABLE
24 (18) ADDRESS 4  TCBMSS(0) - ADDRESS OF LAST SPQE ON MSS QUEUE
24 (18) BITSTRING 1   - HIGH ORDER BYTE OF TCBMSS
25 (19) ADDRESS 3  TCBMSSB - SAME AS TCBMSS
28 (1C) BITSTRING 1  TCBPKF - STORAGE PROTECTION KEY FOR THIS TASK. IF THERE IS NO STORAGE PROTECTION, ALL BITS ARE ZERO.
  1... ....  TCBPKFU "X'80'" When on, user key
  1111 ....  TCBFLAG "X'F0'" - STORAGE PROTECTION KEY
  .... 1111  TCBZERO "X'0F'" - MUST BE ZERO
29 (1D) BITSTRING 5  TCBFLGS(0) - FLAG BYTE FIELDS
29 (1D) BITSTRING 1  TCBFLGS1 - FIRST TCB FLAG BYTE
  1... ....  TCBFA "X'80'" - May be on when a task is being abnormally terminated. Do NOT use this bit as an indicator in any program. It is not an intended interface. See the TCBEndingAbnormally bit for program use. Also see TCBDYING and TCBENDNG.
  .1.. ....  TCBFE "X'40'" - On when the system is calling resource managers during abnormal termination.
  ..1. ....  TCBFERA "X'20'" - ENTER ABEND ERASE ROUTINE WHEN IN CONTROL AGAIN
  ...1 ....  TCBNONPR "X'10'" - TASK IS NON-PREEMPTABLE
  .... 1...  TCBPDUMP "X'08'" - PREVENT DUMP INDICATOR
  .... .1..  TCBFT "X'04'" - TOP TASK IN TREE BEING ABTERMED
  .... ..1.  TCBFS "X'02'" - ABTERM DUMP COMPLETED PROBLEM PROGRAM STORAGE HAS BEEN OVERLAID TO PROCESS ABEND (OS/VS1)
  .... ...1  TCBFX "X'01'" - PROHIBIT QUEUEING OF ASYNCHRONOUS EXITS FOR THIS TASK
30 (1E) BITSTRING 1  TCBFLGS2 - SECOND FLAG BYTE
  1... ....  TCBFOINP "X'80'" - THE TASK IS ABENDING AND IS IN THE PROCESS OF (1) OPEN FOR DUMP DATA SET PROCESSING, (2) CLOSE FOR USER DATA SET OR (3) PURGE FOR ENQ'ED RESOURCES. THIS BIT IS USED IN CONJUNCTION WITH TCBSTACK. ICB374
  .1.. ....  TCBFSTI "X'40'" - SECOND JOB STEP INTERVAL HAS EXPIRED (INITIATOR TCB)
  ..1. ....  TCBFABOP "X'20'" - IF 1, THE SYSABEND DUMP DATA SET HAS BEEN OPENED FOR ABEND. IF 0, THE SYSUDUMP DUMP DATA SET WAS OPENED. THIS BIT IS ONLY USED FOR THE JOB STEP TCB AND IS USED IN CONJUNCTION WITH TCBFDSOP BIT. YM0651
  ...1 ....  TCBFSMC "X'10'" - TASK HAS ISSUED A SYSTEM-MUST-COMPLETE AND SET ALL OTHER TASKS IN THE SYSTEM NONDISPATCHABLE
  .... 1...  TCBFJMC "X'08'" - TASK HAS ISSUED A STEP-MUST-COMPLETE AND TURNED OFF ALL OTHER TASKS IN THE STEP
  .... .1..  TCBFDSOP "X'04'" - SYSABEND OPEN FOR JOB STEP
  .... ..1.  TCBFETXR "X'02'" - ETXR TO BE SCHEDULED
  .... ...1  TCBFTS "X'01'" - THIS TASK IS A MEMBER OF A TIME-SLICED GROUP
31 (1F) BITSTRING 1  TCBFLGS3 - THIRD FLAG BYTE. SERIALIZATION - TCBACTIV OR TASK NONDISPATCHABLE AND LOCAL LOCK
  1... ....  TCBFSM "X'80'" - ALL PSW'S IN SUPERVISOR STATE
  .1.. ....  TCBRT1S "X'40'" - RTM1 HAS INVOKED SLIP FOR A TASK IN EUT MODE. RTM2 MAY BYPASS SLIP PROCESSING OWNERSHIP - RTM
  ..1. ....  TCBABTRM "X'20'" - ABTERM BIT TO PREVENT MULTIPLE ABENDS
  ...1 ....  TCBFXSET "X'10'" - TCBFX WAS SET BY STATUS MCSTEP
  .... .1..  TCBKEY9 "X'04'" - TCB was attached using KEY=NINE and so is to be treated as having a different key than the attacher
  .... ..1.  TCBENQRM "X'02'" - ENQ/DEQ RESOURCE MANAGER HAS RECEIVED CONTROL. NO FURTHER DIRECTED ENQS ALLOWED. SERIALIZATION - TCBACTIV AND CMSEQDQ CLASS LOCK. OWNERSHIP - GRS.
  .... ...1  TCBDWSTA "X'01'" - THIS TASK WAS DETACHED WITH STAE=YES OPTION ICB315
32 (20) BITSTRING 1  TCBFLGS4 - NONDISPATCHABILITY FLAGS
  1... ....  TCBNDUMP "X'80'" - ABDUMP NONDISPATCHABILITY INDICATOR
  .1.. ....  TCBSER "X'40'" - SER1 NONDISPATCHABILITY INDICATOR
  ..1. ....  TCBRQENA "X'20'" - I/O RQE'S EXHAUSTED
  ...1 ....  TCBHNDSP "X'10'" - TASK OR JOB STEP IS MOMENTARILY 'FROZEN' UNTIL THE REQUIRED RESOURCES ARE AVAILABLE. THE BIT IS SET THROUGH THE USE OF THE 'STATUS' SVC ICB453
  .... 1...  TCBUXNDV "X'08'" - TASK IS TEMPORARILY NONDISPATCHABLE BECAUSE SMF TIME LIMIT OR SYSOUT LIMIT USER EXIT ROUTINE IS BEING EXECUTED FOR THIS STEP
  .... .1..  TCBRBWF "X'04'" - TOP RB IS IN WAIT STATE
  .... ...1  TCBONDSP "X'01'" - TASK TERMINATING AND NONDISPATCHABLE BECAUSE EITHER OPEN FOR DUMP DATA SET IS IN PROCESS OR CLOSE BY ABEND IS IN PROCESS
33 (21) BITSTRING 1  TCBFLGS5 - MORE NONDISPATCHABILITY FLAGS. IF ANY BIT IN THIS BYTE IS 1, THE TASK IS NONDISPATCHABLE.
  1... ....  TCBFC "X'80'" - TASK TERMINATED
  .1.. ....  TCBABWF "X'40'" - ABNORMAL WAIT
  .1.. ....  TCBUXNDF "X'40'" - TASK IS TEMPORARILY NONDISPATCHABLE BECAUSE SMF TIME LIMIT OR SYSOUT LIMIT USER EXIT ROUTINE IS BEING EXECUTED FOR THIS STEP. THIS BIT IS SET TO 1 IN ALL TCB'S EXCEPT JOB STEP TCB. (OS/VS1) ICB263
  ..1. ....  TCBPAGE "X'20'" - TASK IS NONDISPATCHABLE DUE TO EXCESSIVE PAGING RATE
  ...1 ....  TCBANDSP "X'10'" - TASK IS TEMPORARILY NONDISPATCHABLE BECAUSE IT WAS ATTACHED UNDER THE DISP=NO OPERAND
  .... 1...  TCBSYS "X'08'" - ANOTHER TASK IS IN SYSTEM-MUST-COMPLETE STATUS OR A SUMMARY BIT FOR FIELD TCBSYSCT
  .... .1..  TCBSTP "X'04'" - ANOTHER TASK IN THIS JOB STEP IS IN STEP-MUST-COMPLETE STATUS
  .... ..1.  TCBFCD1 "X'02'" - INITIATOR WAITING FOR REGION
  .... ...1  TCBPNDSP "X'01'" - PRIMARY NONDISPATCHABILITY BIT. THIS BIT IS SET TO 1 IF ANY OF THE SECONDARY NONDISPATCHABILITY BITS (OFFSETS 173, 174, 175, 200 OR 201 DECIMAL) IS SET TO 1. THIS BIT IS SET TO 0 IF A SECONDARY NONDISPATCHABILITY BIT IS SET TO 0 AND ALL OTHER SECONDARY NONDISPATCHABILITY BITS ARE 0.
34 (22) SIGNED 1  TCBLMP - TASK LIMIT PRIORITY
35 (23) SIGNED 1  TCBDSP - DISPATCHING PRIORITY FOR THIS TASK
36 (24) ADDRESS 4  TCBLLS - ADDRESS OF LAST LOAD LIST ELEMENT (LLE) IN LOAD LIST
40 (28) ADDRESS 4  TCBJLB - ADDRESS OF A JOBLIB DCB
44 (2C) ADDRESS 4  TCBJPQ(0) - ADDRESS OF LAST CDE FOR JOB PACK AREA (JPA) CONTROL QUEUE
44 (2C) BITSTRING 1  TCBPURGE - HIGH ORDER BYTE
  1... ....  TCBJPQF "X'80'" - JPQ PURGE FLAG
45 (2D) ADDRESS 3  TCBJPQB - LOW ORDER 24-BITS OF TCBJPQ
48 (30) CHARACTER 64  TCBGRS(0) - GENERAL REGISTER SAVE AREA. THIS OFFSET FIXED BY ARCHITECTURE.
48 (30) SIGNED 4  TCBGRS0 - SAVE AREA FOR GENERAL REGISTER 0
52 (34) SIGNED 4  TCBGRS1 - SAVE AREA FOR GENERAL REGISTER 1
56 (38) SIGNED 4  TCBGRS2 - SAVE AREA FOR GENERAL REGISTER 2
60 (3C) SIGNED 4  TCBGRS3 - SAVE AREA FOR GENERAL REGISTER 3
64 (40) SIGNED 4  TCBGRS4 - SAVE AREA FOR GENERAL REGISTER 4
68 (44) SIGNED 4  TCBGRS5 - SAVE AREA FOR GENERAL REGISTER 5
72 (48) SIGNED 4  TCBGRS6 - SAVE AREA FOR GENERAL REGISTER 6
76 (4C) SIGNED 4  TCBGRS7 - SAVE AREA FOR GENERAL REGISTER 7
80 (50) SIGNED 4  TCBGRS8 - SAVE AREA FOR GENERAL REGISTER 8
84 (54) SIGNED 4  TCBGRS9 - SAVE AREA FOR GENERAL REGISTER 9
88 (58) SIGNED 4  TCBGRS10 - SAVE AREA FOR GENERAL REGISTER 10
92 (5C) SIGNED 4  TCBGRS11 - SAVE AREA FOR GENERAL REGISTER 11
96 (60) SIGNED 4  TCBGRS12 - SAVE AREA FOR GENERAL REGISTER 12
100 (64) SIGNED 4  TCBGRS13 - SAVE AREA FOR GENERAL REGISTER 13
104 (68) SIGNED 4  TCBGRS14 - SAVE AREA FOR GENERAL REGISTER 14
108 (6C) SIGNED 4  TCBGRS15 - SAVE AREA FOR GENERAL REGISTER 15
112 (70) ADDRESS 4  TCBFSA(0) - ADDRESS OF THE FIRST PROBLEM PROGRAM SAVE AREA
112 (70) SIGNED 1   - FIRST BYTE OF TCBFSA
113 (71) ADDRESS 3  TCBFSAB - ADDRESS OF THE FIRST PROBLEM PROGRAM SAVE AREA
116 (74) ADDRESS 4  TCBTCB - Queue of TCBs in an address space. Note: The queue is not maintained in priority order.
120 (78) ADDRESS 4  TCBTME - ADDRESS OF THE TIMER QUEUE ELEMENT (TQE)
  1... ....  TCBTQET "X'80'" - IF ZERO, TASK TYPE TQE. IF ONE, REAL/WAIT TYPE TQE.
124 (7C) ADDRESS 4  TCBJSTCB(0) - Address of job step TCB for this TCB
124 (7C) BITSTRING 1   - HIGH ORDER BYTE OF TCBJSTCB
125 (7D) ADDRESS 3  TCBJSTCA - LOW ORDER 24 BITS OF TCBJSTCB
128 (80) ADDRESS 4  TCBNTC - ADDRESS OF THE TCB FOR THE TASK PREVIOUSLY ATTACHED BY THE TASK THAT ATTACHED THIS TASK. FOR EXAMPLE, IF TASK A ATTACHED TASK B AND THEN TASK C, THIS FIELD IN TASK C'S TCB POINTS TO TASK B'S TCB, AND THIS FIELD IN TASK B'S TCB IS ZERO.
132 (84) ADDRESS 4  TCBOTC - ADDRESS OF THE TCB FOR THE TASK (THE ORIGINATING TASK) THAT ATTACHED THIS TASK. THIS FIELD IS ZERO IN THE TCB FOR A SYSTEM TASK.
136 (88) ADDRESS 4  TCBLTC - ADDRESS OF THE TCB FOR THE TASK LAST ATTACHED BY THIS TASK. NOTE - IF A TASK (THE ORIGINATING TASK) HAS ATTACHED OTHER TASKS, THE TCB'S FOR THE OTHER TASKS ARE ON THE SUBTASK QUEUE OF THE ORIGINATING TASK. TCBLTC IN THE TCB FOR THE ORIGINATING TASK POINTS TO THE LAST TCB (THE TCB FOR THE LAST ATTACHED TASK) IN THE SUBTASK QUEUE. IN EACH TCB ON THE SUBTASK QUEUE, EXCEPT THE FIRST TCB, TCBNTC POINTS TO THE PRECEDING TCB ON THE QUEUE.
140 (8C) ADDRESS 4  TCBIQE - ADDRESS OF AN INTERRUPTION QUEUE ELEMENT (IQE) FOR SCHEDULING THE ETXR ROUTINE OF THE TASK THAT ATTACHED THIS TASK.
144 (90) ADDRESS 4  TCBECB - ADDRESS OF THE ECB THAT WILL BE POSTED BY THE SUPERVISOR'S TASK TERMINATION ROUTINES WHEN NORMAL OR ABNORMAL TERMINATION OCCURS.
148 (94) BITSTRING 1  TCBTSFLG - TIME SHARING FLAGS
  1... ....  TCBTSTSK "X'80'" - SWAPPED TIME SHARING TASK (OS/VS1)
  .1.. ....  TCBSTPPR "X'40'" - TASK SHOULD BE MADE NONDISPATCHABLE VIA TCBSTPP WHEN IT IS NO LONGER RUNNING A PRIVILEGED PROGRAM
  ..1. ....  TCBATT "X'20'" - TASK SHOULD NOT HAVE ATTENTION EXITS SCHEDULED ON IT BY EXIT EFFECTOR. THIS OFFSET FIXED BY ARCHITECTURE.
  ...1 ....  TCBTIOTG "X'10'" - PURGE TGET/TPUT AFTER ATTENTION
  .... 1...  TCBSMCP "X'08'" - STATUS MCSTEP PENDING,TASK IS SUSPENDED
  .... ..1.  TCBDYDSP "X'02'" - M195 TASK IS MEMBER OF DYNAMIC DISPATCHING GROUP ICB262
  .... ...1  TCBCPUBN "X'01'" - FOR M195, ZERO MEANS I/O BOUND AND ONE MEANS CPU BOUND ICB262
149 (95) SIGNED 1  TCBSTPCT - NUMBER OF SETTASK STARTS WHICH MUST BE ISSUED BEFORE TASK IS MADE DISPATCHABLE - FIELD NOT RESTRICTED TO TSO
150 (96) SIGNED 1  TCBTSLP - LIMIT PRIORITY OF TIME SHARING TASK
151 (97) BITSTRING 1  TCBTSDP - DISPATCHING PRIORITY OF TIME SHARING TASK
152 (98) ADDRESS 4  TCBRD POINTER TO DPQE MINUS 8 FOR THE JOB STEP SERIALIZATION - THE LOCAL LOCK. OWNERSHIP - VSM.
152 (98) X'B8' 0  TCBPQE "TCBRD" SAME AS TCBRD
156 (9C) ADDRESS 4  TCBAE LIST ORIGIN OF AQE(S) FOR THIS TASK SERIALIZATION - THE LOCAL LOCK. OWNERSHIP - VSM.
156 (9C) X'BC' 0  TCBAQE "TCBAE" SAME AS TCBAE
160 (A0) ADDRESS 4  TCBSTAB(0) - ADDRESS OF THE CURRENT STAE CONTROL BLOCK
160 (A0) BITSTRING 1  TCBNSTAE - FLAGS INTERNAL TO STAE ROUTINE
  1... ....  TCBSTABE "X'80'" - ABEND ENTERED BECAUSE OF ERROR IN STAE PROCESSING
  .1.. ....  TCBQUIES "X'40'" - STAE INVOKED PURGE I/O ROUTINE WITH QUIESCE I/O OPTION
  ..1. ....  TCB33E "X'20'" - A 33E ABEND HAS OCCURRED FOR TASK
  ...1 ....  TCBPPSUP "X'10'" - 1=SUPERVISOR MODE,0=PROBLEM PROGRAM MODE INDICATOR TO SYNCH OF THE MODE OF THE USER EXIT
  .... 1...  TCBHALT "X'08'" - PURGE I/O ROUTINE DID NOT SUCCESSFULLY QUIESCE I/O, BUT I/O WAS HALTED
  .... .1..  TCBSYNCH "X'04'" - SYNCH ISSUED BY ASIR TO SCHEDULE EXIT ROUTINE
  .... ...1  TCBSTCUR "X'01'" - STAE RECURSION VALID ICB443
161 (A1) ADDRESS 3  TCBSTABB - ADDRESS OF THE CURRENT STAE CONTROL BLOCK
164 (A4) ADDRESS 4  TCBTCT(0) - ADDRESS OF THE TIMING CONTROL TABLE (TCT) IF SYSTEM MANAGEMENT FACILITIES (SMF) DATA IS BEING COLLECTED FOR THE TASK. ZERO IF SMF DATA IS NOT BEING COLLECTED FOR THE TASK. SERIALIZATION: LOCAL LOCK.
164 (A4) BITSTRING 1  TCBTCTGF - FLAG BYTE FOR TIMING CONTROL TABLE ICB318
  1... ....  TCBSMFGF "X'80'" - IF ZERO, THE TCT CORE TABLE IS NOT TO BE UPDATED BY GETMAIN/FREEMAIN. IF ONE, THE TCT CORE TABLE IS TO BE UPDATED BY GETMAIN/FREEMAIN. ICB318
165 (A5) ADDRESS 3  TCBTCTB - ADDRESS OF THE TIMING CONTROL TABLE (TCT) IF SYSTEM MANAGEMENT FACILITIES (SMF) DATA IS BEING COLLECTED FOR THE TASK. ZERO IF SMF DATA IS NOT BEING COLLECTED FOR THE TASK OR FOR OS/VS1, IF SMF IS NOT IN THE SYSTEM.
168 (A8) ADDRESS 4  TCBUSER - A WORD AVAILABLE TO THE USER
172 (AC) BITSTRING 4  TCBSCNDY(0) - SECONDARY NONDISPATCHABILITY BITS. IF ANY BIT IN THE FOLLOWING FOUR BYTES IS 1, THE PRIMARY NONDISPATCHABILITY BIT (OFFSET 33.7 DECIMAL) IS 1, AND THE TASK IS NONDISPATCHABLE.
172 (AC) BITSTRING 4  TCBNDSP(0) - SAME AS TCBSCNDY
172 (AC) BITSTRING 1  TCBNDSP0 - BYTE 0
  .... ...1  TCBNDJL "X'01'" Join/Leave processing
173 (AD) BITSTRING 1  TCBNDSP1 - BYTE 1
  1... ....  TCBDARTN "X'80'" - THE TASK IS TEMPORARILY NONDISPATCHABLE - DAMAGE ASSESSMENT ROUTINE (DAR)
173 (AD) X'80' 0  TNONDISP "TCBDARTN" * ALIAS *
  .1.. ....  TCBDARPN "X'40'" - THE TASK IS PERMANENTLY NONDISPATCHABLE - DAMAGE ASSESSMENT ROUTINE (DAR)
173 (AD) X'40' 0  PNONDISP "TCBDARPN" * ALIAS *
  ..1. ....  TCBRSTND "X'20'" - THE TASK IS TEMPORARILY NONDISPATCHABLE - RECOVERY MANAGEMENT SUPPORT AND SYSTEM ERROR RECOVERY (RMS/SER)
  ...1 ....  TCBRSPND "X'10'" - THE TASK IS PERMANENTLY NONDISPATCHABLE - RECOVERY MANAGEMENT SUPPORT AND SYSTEM ERROR RECOVERY (RMS/SER) (IF THIS BIT IS ON THEN THE PREVIOUS BIT MUST BE ON TOO)
  .... 1...  TCBDDRND "X'08'" - THE TASK IS IN DEVICE ALLOCATION AND DYNAMIC DEVICE RECONFIGURATION (DDR) HAS MADE IT NONDISPATCHABLE - RECOVERY MANAGEMENT SUPPORT AND SYSTEM ERROR RECOVERY (RMS/SER) (OS/VS1)
  .... .1..  TCBTPSP "X'04'" - DISPATCHING OF TCAM TASK MUST BE DELAYED UNTIL TCAM I/O APPENDAGE OR SVC ROUTINE HAS COMPLETED EXECUTION (TCAM IN MULTIPROCESSING ENVIRONMENT)
  .... ..1.  TCBPIEND "X'02'" - SRB IS TO BE SCHEDULED TO PERFORM PIE/PICA PROCESSING (FIRST LEVEL INTERRUPT HANDLER)
  .... ...1  TCBABTIN "X'01'" - THE TASK IS TEMPORARILY NONDISPATCHABLE WHILE BEING SET UP FOR ABTERM
174 (AE) BITSTRING 1  TCBNDSP2 - BYTE 2
  1... ....  TCBABD "X'80'" - ABDUMP IS PROCESSING (OS/VS1)
  .1.. ....  TCBSTPP "X'40'" - TASK SET NONDISPATCHABLE BY SETTASK
  ..1. ....  TCBNDSVC "X'20'" - TASK IS NONDISPATCHABLE BECAUSE SVC DUMP IS EXECUTING FOR ANOTHER TASK
  ...1 ....  TCBNDTS "X'10'" - TASK IS NONDISPATCHABLE BECAUSE IT IS BEING SWAPPED OUT
  .... 1...  TCBIWAIT "X'08'" - TASK IS NONDISPATCHABLE DUE TO AN INPUT WAIT
  .... .1..  TCBOWAIT "X'04'" - TASK IS NONDISPATCHABLE DUE TO AN OUTPUT WAIT
  .... ..1.  TCBDSS "X'02'" - DYNAMIC SUPPORT SYSTEM (DSS) HAS SET THIS TASK NONDISPATCHABLE ICB313
  .... ...1  TCBABE "X'01'" - ABEND ROUTINE WAS ENTERED FOR THIS TASK WHILE THE DCB FOR SYSABEND (OR SYSUDUMP) DATA SET WAS BEING OPENED FOR ANOTHER TASK (OS/VS1)
175 (AF) BITSTRING 1  TCBNDSP3 - BYTE 3
  1... ....  TCBLJSND "X'80'" - TASK IS ABENDING AND NONDISPATCHABLE BECAUSE IT HAS A JOB STEP SUBTASK. TCBONDSP MUST ALSO BE ON.
  .1.. ....  TCBNDNYI "X'40'" - RCT TASK IS NONDISPATCHABLE BECAUSE ADDRESS SPACE IS NOT YET INITIALIZED FULLY
  ..1. ....  TCBSRBND "X'20'" - TCB NONDISPATCHABLE BECAUSE SRB'S ARE STOPPED
  ...1 ....  TCBSLPER "X'10'" - SET NONDISPATCHABLE SO THAT SLIP/PER CAN ALTER RB PSW PER BIT
  .... 1...  TCBS3MR "X'08'" - STAGE 3 EXIT EFFECTOR MUST RUN TO SYNCHRONIZE ATTENTION INTERRUPT
  .... .1..  TCBAREQ "X'04'" - TSO AUTHORIZED REQUEST PROCESSING ACTIVE
  .... ..1.  TCBNDSMF "X'02'" - Indicates task is stopped because its CPU or continuous wait time has been exceeded. SMF determines whether to grant extension or abend task. Ownership: SMF.
  .... ...1  TCBNDINT "X'01'" - INITIATOR SETS THIS BIT TO PREVENT JOB STEP EXECUTION IN ORDER TO DO CANCEL PROCESSING (CAN CANCEL LOOP)
176 (B0) SIGNED 4  TCBMDIDS - RESERVED FOR MODEL-DEPENDENT SUPPORT AND FOR IBM PROPRIETARY PROGRAMMING SUPPORT ICBXXX
180 (B4) ADDRESS 4  TCBJSCB(0) - ADDRESS OF THE JOB STEP CONTROL BLOCK
180 (B4) BITSTRING 1  TCBRECDE - ABEND RECURSION BYTE ICB456
  1... ....  TCBREC "X'80'" - VALID REENTRY TO ABEND IF NON-ZERO VALUE IN FOLLOWING 7 BITS ICB456
  .... ...1  TCBOPEN "X'01'" - OPEN DUMP DATA SET ICB456
  .... ..1.  TCBCLOSD "X'02'" - CLOSE DIRECT SYSOUT ON TAPE ICB456
  .... ..11  TCBCLOSE "X'03'" - CLOSE OPEN DATA SETS ICB456
  .... .1..  TCBCLOSF "X'04'" - RESERVED. ICB456
  .... .1.1  TCBGREC "X'05'" - GRAPHICS ICB456
  .... .111  TCBADUMP "X'07'" - ABDUMP ICB456
  .... 1...  TCBPTAXE "X'08'" - PURGE TAXE ICB456
  .... 1..1  TCBMESG "X'09'" - MESSAGE RECURSION ICB456
  .... 1.1.  TCBDYNAM "X'0A'" - DD-DYNAM TIOT CLEANUP ICB456
  .... 1.11  TCBDAMSG "X'0B'" - ABEND IS ISSUING A WTOR ASKING WHETHER THE JOB STEP TASK SHOULD WAIT FOR THE DUMP AREA (OS/VS1)
  .... 11..  TCBQTIP "X'0C'" - PURGE TSO INTERPARTITION POSTS ICB456
  .... 11.1  TCBTCAMP "X'0D'" - PURGE TCAM INTERPARTITION POSTS ICB456
  .... 111.  TCBINDRC "X'0E'" - INDICATIVE DUMP (LOAD 8 OF ABEND) HAS ABENDED. ABEND WILL HANDLE THIS ABEND. (OS/VS1)
  .... 1111  TCBSAVCD "X'0F'" - ASIR RECURSION. SAVE OLD COMPLETION CODE ICB456
  ...1 ....  TCBTYP1W "X'10'" - TYPE 1 MESSAGE WRITE TO PROGRAMMER ICB456
  ..1. ....  TCBWTPSE "X'20'" - WRITE-TO-PROGRAMMER (WTP) FAILED. JOB STEP TIMER EXPIRED DURING JOB STEP ABEND AND THE STAE EXIT IS DENIED. (OS/VS1)
  ..1. ...1  TCBVTAM1 "X'21'" - ABEND IS ENTERING FIRST VTAM INTERFACE, ISTRAAA1, FOR TERMINATION OF TASK OR SUBTASK (OS/VS1)
  ..1. ..1.  TCBVTAM2 "X'22'" - ABEND IS ENTERING SECOND VTAM INTERFACE, ISTRAAA2, BECAUSE ISTRAAA1 ABENDED (OS/VS1)
  ..1. ..11  TCBVTAM3 "X'23'" - ABEND IS ENTERING FIRST VTAM INTERFACE, ISTRAAA0, BECAUSE VTAM ABENDED (OS/VS1)
  ..1. .1..  TCBVTAM4 "X'24'" - ABEND IS ENTERING SECOND VTAM INTERFACE, ISTRAAA2, BECAUSE ISTRAAA0 ABENDED (OS/VS1)
  ..11 ....  TCBNOSTA "X'30'" - STAE/STAI NOT TO BE HONORED ICB456
  ..11 ...1  TCBSTRET "X'31'" - RETURN FROM DUMP PROCESSING ICB456
  ..11 ..1.  TCBCONVR "X'32'" - CONVERT TO STEP ABEND ICB456
  ..11 ..11  TCBDARET "X'33'" - RETURN FROM DAMAGE ASSESSMENT ROUTINES ICB456
  ..11 .1..  TCBTYP1R "X'34'" - RETURN FROM TYPE 1 MESSAGE MODULE ICB456
  ..11 .1.1  TCBNEWRB "X'35'" - ABEND ISSUED SVC 13 TO TRANSFER CONTROL (XCTL) TO A NON-ABEND MODULE ICB456
  .1.. ....  TCBMCCNS "X'40'" - A MUST COMPLETE TASK HAS ABNORMALLY TERMINATED WITHOUT ENOUGH STORAGE FOR 2 RB'S FOR A WTOR ASKING WHETHER THE TASK'S RESOURCES ARE CRITICAL. THE RESOURCES ARE ASSUMED TO BE CRITICAL, AND THE PARTITION IS MARKED PERMANENTLY NONDISPATCHABLE. (OS/VS1) ICB492
181 (B5) ADDRESS 3  TCBJSCBB - ADDRESS OF THE JOB STEP CONTROL BLOCK
184 (B8) ADDRESS 4  TCBSSAT - ADDRESS OF THE SUBSYSTEM AFFINITY TABLE (SSAT). SERIALIZATION - TCBACTIV. OWNERSHIP - TASK MANAGEMENT.
188 (BC) ADDRESS 4  TCBIOBRC - ADDRESS OF IOB RESTORE CHAIN FOR I/O QUIESCED BY EOT YM2840
192 (C0) ADDRESS 4  TCBEXCPD - ADDRESS OF EXCP DEBUG AREA YM4297
196 (C4) ADDRESS 4  TCBEXT1(0) - ADDRESS OF OS-OS/VS COMMON TCB EXTENSION ICB311
196 (C4) BITSTRING 1   - RESERVED.
197 (C5) ADDRESS 3  TCBEXT1A - ADDRESS OF OS-OS/VS COMMON TCB EXTENSION ICB311
               OS/VS1 - OS/VS2 COMMON SECTION
200 (C8) BITSTRING 4  TCBBITS(0) - FLAG BYTES. IF A BIT IN THE FOLLOWING TWO BYTES IS SET TO 1, THE PRIMARY NONDISPATCHABILITY BIT (OFFSET 33.7 DECIMAL) IS SET TO 1, AND THE TASK IS NONDISPATCHABLE.
200 (C8) BITSTRING 1  TCBNDSP4 - SECONDARY NONDISPATCHABILITY FLAGS COMMON TO OS/VS1 AND OS/VS2. COORDINATED WITH PRIMARY NONDISPATCHABILITY FLAG TCBPNDSP. THIS BYTE IS NOT CURRENTLY SUPPORTED BY OS/VS2.
201 (C9) BITSTRING 1  TCBNDSP5 - SECONDARY NONDISPATCHABILITY FLAGS UNIQUE TO OS/VS1 OR OS/VS2. COORDINATED WITH PRIMARY NONDISPATCHABILITY FLAG TCBPNDSP. THIS BYTE IS NOT CURRENTLY SUPPORTED BY OS/VS2.
202 (CA) BITSTRING 1  TCBFLGS6 - TASK-RELATED FLAGS
  1... ....  TCBRV "X'80'" - THE PARTITION IS FIXED IN REAL STORAGE. VIRTUAL ADDRESSES ARE EQUAL TO REAL ADDRESSES.
  .1.. ....  TCBPIE17 "X'40'" - PAGE FAULT INTERRUPT IS TO BE PASSED TO THE TASK'S INTERRUPT EXIT AND AN 8-BYTE PICA IS IN EFFECT FOR THIS TASK ICB339
  ..1. ....  TCBCPU "X'20'" - TASK IS CPU-BOUND MEMBER OF AUTOMATIC PRIORITY GROUP (APG)
  ...1 ....  TCBSPVLK "X'10'" - TASK SCHEDULED FOR ABTERM WHILE OWNING SUPERVISOR LOCK
  .... 1...  TCBHCRM "X'08'" - Health Checker has established a task term resmgr for this task
  .... .1..  TCBMIGR "X'04'" - REGION SELECTED FOR MIGRATION FROM PRIMARY PAGING DEVICE
  .... ..1.  TCBAPG "X'02'" - TASK IS IN AUTOMATIC PRIORITY GROUP (APG)
  .... ...1  TCBNTJS "X'01'" - JOB STEP TASK BUT NOT HIGHEST IN FAILING TREE
203 (CB) BITSTRING 1  TCBFLGS7 - TASK-RELATED FLAGS
  1... ....  TCBGPECB "X'80'" - TASK IS IN AN ECB WAIT FOR A GETPART ICB339
  .1.. ....  TCBSENVP "X'40'" -
  ..1. ....  TCBSVCSP "X'20'" - IF 1, SVC SCREENING IS TO BE PROPAGATED TO SUBTASKS
  ...1 ....  TCBSTACK "X'10'" - SET IN JOB STEP TCB TO INDICATE THAT A TASK IN THE JOB STEP IS IN SERIAL ABEND PROCESSING. USED IN CONJUNCTION WITH TCBFOINP. ICB374
  .... 1...  TCBSVCS "X'08'" - IF 1, SVC SCREENING IS REQUIRED FOR THE TASK. THIS OFFSET FIXED BY ARCHITECTURE.
  .... .1..  TCBRSTSK "X'04'" - RESIDENT SYSTEM TASK
  .... ..1.  TCBADMP "X'02'" - ALL OTHER TASKS IN JOB STEP HAVE BEEN SET NONDISPATCHABLE BY ABDUMP. THIS BIT IS SET TO CONTROL JOB STEP DURING THE DUMPING PROCESS.
  .... ...1  TCBGTOFM "X'01'" - GENERALIZED TRACE FACILITY (GTF) TRACING HAS BEEN TEMPORARILY DISABLED UNDER THIS TASK ICB402
204 (CC) BITSTRING 1  TCBDAR - DAMAGE ASSESSMENT ROUTINE (DAR) FLAGS
  1... ....  TCBDARP "X'80'" - PRIMARY DAR RECURSION. DAR HAS BEEN ENTERED FOR THIS TASK.
  .1.. ....  TCBDARS "X'40'" - SECONDARY DAR RECURSION. IF DAR IS REENTERED, THIS TASK WILL BE SET NONDISPATCHABLE.
  ..1. ....  TCBDARD "X'20'" - A DUMP HAS BEEN REQUESTED FOR A WRITER OR SCHEDULER ABEND, AND THE USER HAS PROVIDED NO SYSABEND DD CARD (OS/VS1)
  ...1 ....  TCBDARC "X'10'" - RECURSION PERMITTED IN CLOSE - AFTER DAR PROCESSING COMPLETED (PCP)
  ...1 ....  TCBDARMC "X'10'" - DAR HAS BEEN ENTERED TO HANDLE A VALID RECURSION IN MUST-COMPLETE STATUS THROUGH ABEND ICB264
  .... 1...  TCBDARO "X'08'" - SYSTEM ERROR TASK IS FAILING. DAR DUMP SHOULD NOT REQUEST ANY ERROR RECOVERY PROCEDURE (ERP) PROCESSING.
  .... .1..  TCBDARWT "X'04'" - A WTO OPERATION WITH A 'REINSTATEMENT FAILURE' MESSAGE IS IN PROCESS FOR DAR ICB264
  .... ..1.  TCBDARMS "X'02'" - WTO OPERATION WITH A 'DAR IN PROGRESS' MESSAGE IS IN PROCESS FOR DAR (OS/VS1)
  .... ...1  TCBEXSVC "X'01'" - THE DUMP SVC ROUTINE IS EXECUTING FOR THIS TASK
205 (CD) BITSTRING 1  TCBRSV37 - RESERVED FOR USER
206 (CE) SIGNED 1  TCBSYSCT - NUMBER OF OUTSTANDING SYSTEM-MUST-COMPLETE REQUESTS (ICB497) YM3883
207 (CF) SIGNED 1  TCBSTMCT - NUMBER OF OUTSTANDING STEP-MUST-COMPLETE REQUESTS (ICB497) YM3883
208 (D0) ADDRESS 4  TCBEXT2(0) - ADDRESS OF OS/VS1 - OS/VS2 COMMON EXTENSION ICB311
208 (D0) BITSTRING 1   - FIRST BYTE OF TCBEXT2
209 (D1) ADDRESS 3  TCBEXT2A - ADDRESS OF OS/VS1 - OS/VS2 COMMON EXTENSION ICB311
               OS/VS2 TCB OVERLAY
212 (D4) SIGNED 4  TCBR0D4 - Reserved
216 (D8) ADDRESS 4  TCBXSB - ADDRESS OF CURRENT XSB FOR TASK. SERIALIZATION - TCBACTIV. OWNERSHIP - SUPERVISOR.
220 (DC) ADDRESS 4  TCBBACK - ADDRESS OF PREVIOUS TCB ON READY QUEUE. ZERO IN TOP TCB.
224 (E0) ADDRESS 4  TCBRTWA - POINTER TO CURRENT RTM2 WORK AREA
228 (E4) ADDRESS 4  TCBNSSP - NORMAL STACK SAVE AREA POINTER. SERIALIZATION - TCBACTIV. OWNERSHIP - SUPERVISOR.
  1... ....  TCBNSSQA "X'80'" - NORMAL STACK SAVED IN SQA INDICATOR.
232 (E8) ADDRESS 4  TCBXLAS - ASCB ADDRESS OF THE CML LOCK HELD WHILE TCB SUSPENDED OR INTERRUPTED. SERIALIZATION - TCBACTIV. OWNERSHIP - SUPERVISOR.
236 (EC) CHARACTER 1  TCBABCUR - ABEND RECURSION BYTE
237 (ED) SIGNED 1  TCBFJMCT - NUMBER OF OUTSTANDING STEP-MUST-COMPLETE REQUESTS ISSUED BY THE TASK
238 (EE) CHARACTER 1  TCBTID - The task identifier as specified on the TID parameter of ATTACH or ATTACHX. The following task identifiers are for internal use only:
238 (EE) X'FF' 0  TCBPAGID "255" - ID FOR PAGING SUPERVISOR TASK ICB403
238 (EE) X'FE' 0  TCBSYERR "254" - ID FOR SYSTEM ERROR TASK ICB403
238 (EE) X'FD' 0  TCBCOMM "253" - ID FOR COMMUNCIATIONS TASK ICB403
238 (EE) X'FC' 0  TCBIORMS "252" - ID FOR I/O RMS TASK ICB403
238 (EE) X'FB' 0  TCBMASTR "251" - ID FOR MASTER SCHEDULER TASK ICB403
238 (EE) X'FA' 0  TCBJES "250" - ID FOR JOB ENTRY SUBSYSTEM (JES) MONITOR TASK ICB403
238 (EE) X'F9' 0  TCBDSSID "249" - ID FOR DYNAMIC SUPPORT SYSTEM (DSS) TASK ICB403
238 (EE) X'F8' 0  TCBLOGID "248" - ID FOR SYSTEM LOG TASK
239 (EF) BITSTRING 1  TCBFLGS8 - GUPI FLAG BYTE FIELD SERIALIZATION - TCBACTIV (Must be running under this TCB when updating this field.)
  1... ....  TCBDYING "X'80'" - If on, indicates that this TCB will be terminating (normally or abnormally) and its mainline processing will not be allowed to run again. Also see the TCBENDNG bit. TCBDYING is set when any of the following occur: - the TCB is terminating normally - before Estae-type recovery routines receive control for Cancel and Detach (not including Detach with STAE) abends - after all recovery routines have percolated for retriable abends Ownership - RTM.
  .1.. ....  TCBNOIRB "X'40'" - If on, IRBs will not be queued to this TCB. A program setting this flag MUST save its current value and restore that value either when that program can tolerate IRBs being queued or before the current RB terminates.
  ..1. ....  TCBJTCBA "X'20'" - If on, this is the attach of the JSTCB by the initiator
  ...1 ....  TCBSDNDX "X'10'" - If on, this task is exempt from being set non-dispatchable for SDUMP by STATUS
  .... 1...  TCBENDNG "X'08'" - If on, indicates that this TCB will be terminating (normally or abnormally) and its mainline processing will not be allowed to run again. The key difference between TCBENDNG and TCBDYING is that TCBENDNG is set before all types of recovery routine if they will not be allowed to retry. TCBDYING is not set before FRRs and is set before Estae-type recovery routines only for Cancel and Detach abends. TCBENDNG is set when any of the following occur: - The TCB is terminating normally - before recovery routines (including FRRs) receive control for all non-retriable abends including Cancel, Detach, Detach with STAE, and RETRY=NO abterms - after all recovery routines have percolated for retriable abends Ownership - RTM.
  .... .1..  TCBENDINGABNORMALLY "X'04'" - If On, indicates that this TCB is abnormally terminating or (if the task has ended) has abnormally terminated. This bit is a direct intended interface replacement for TCBFA. TCBEndingAbnormally is set when RTM detects that a task will terminate abnormally and its mainline will not be allowed to run again in the following situations: - before Estae-type recovery (not FRRs) receives control for all non-retriable abends including Cancel, Detach, Detach with STAE, and RETRY=NO abterms - after all recovery routines have percolated for retriable abends - in all subtasks before TERM=YES Estae-type recovery is invoked for a Cancel or Detach abend of the current task If the task has ended, TCBEndingAbnormally can be used to determine whether STCBCMP contains an ABEND code or the contents of GPR 15 when the last program returned to the system. Ownership - RTM.
240 (F0) SIGNED 4  TCBXSCT(0) - DISPATCHER INTERSECT CONTROL WORD
240 (F0) BITSTRING 1  TCBXSCT1 - FLAG BYTE
  1... ....  TCBACTIV "X'80'" - BIT ON MEANS THIS TCB IS CURRENTLY ACTIVE ON A CPU. USED TO SYNCHRONIZE SOME STATUS SAVING AND DISPATCHABILITY INDICATORS WHEN ACTIVE OR NOT UNDER THE LOCAL LOCK.
  .1.. ....  TCBS3A "X'40'" - STAGE 3 EXIT EFFECTOR/RESUME/TCTL INTERSECT FLAG
  ..1. ....  TCBLLREQ "X'20'" - TASK REQUESTED LOCAL LOCK
  .... 1...  TCBTDORM "X'08'" - Turned on to detect dormant Tasks by Parallel Detach processing. Turned off by the Dispatcher during Task dispatch
241 (F1) BITSTRING 1  TCBXSCT2 - FLAG BYTE
  1... ....  TCBCMLF "X'80'" - CML RESOURCE MANAGER PROCESSING COMPLETE FOR THIS CML LOCK HOLDER.
  .1.. ....  TCBLLNEW "X'40'" - Lock Manager has given this task the local lock, but its status is in the TCB, not the IHSA. SERIALIZATION: TCBACTIV OWNERSHIP: Task Management
242 (F2) SIGNED 2  TCBCCPVI - ID OF THE CURRENT CPU RUNNING THIS TASK. USED FOR RECOVERY AND CPU AFFINITY.
244 (F4) ADDRESS 4  TCBFOE(0) - ADDRESS OF FIRST FIX OWNERSHIP ELEMENT (FOE) IN LIST FOR THIS TASK ICB339
244 (F4) BITSTRING 1   - RESERVED.
245 (F5) ADDRESS 3  TCBFOEA - ADDRESS OF FIRST FIX OWNERSHIP ELEMENT (FOE) IN LIST FOR THIS TASK ICB339
248 (F8) ADDRESS 4  TCBSWA - ADDRESS OF FIRST SCHEDULER WORK AREA (SWA) SPQE ON SWA SPQE CHAIN
252 (FC) ADDRESS 4  TCBSTAWA - ESTAE ROUTINE WORK AREA POINTER
256 (100) CHARACTER 4  TCBTCBID - CONTAINS BLOCK ID - 'TCB '
260 (104) ADDRESS 4  TCBRTM12 - POINTER TO PARAMETER AREAS PASSED FROM RTM1 TO RTM2
264 (108) BITSTRING 4  TCBESTAE(0) - AREA TO CONTAIN RECOVERY DATA FOR RTM
264 (108) CHARACTER 1  TCBSCBKY - KEY IN WHICH SYNCH IS TO PASS CONTROL TO THE USER EXIT
265 (109) BITSTRING 1  TCBESTRM - ESTAE TERM OPTIONS
  1... ....  TCBETERM "X'80'" - ESTAE EXIT ENTERED WITH TERM OPTION
  .1.. ....  TCBSTAFX "X'40'" - SERIALIZED BY TCB ACTIVE
266 (10A) SIGNED 1  TCBERTYP - TYPE OF ERROR CAUSING ENTRY TO THE RTM. SET BY RTM1.
267 (10B) SIGNED 1  TCBMODE - MASK INDICATING MODE OF SYSTEM AT TIME OF ERROR. SEE IHART1W/MODE FOR INDIVIDUAL BIT DEFINITIONS.
268 (10C) ADDRESS 4  TCBUKYSP - ADDRESS OF SPQE'S FOR SUBPOOLS 229 AND 230 (USER KEY STORAGE IN THE PRIVATE AREA)
272 (110) BITSTRING 2  TCBPROPF(0) - Flags propagated
272 (110) BITSTRING 1  TCBPROP0 - Byte 0 of TCBPROPF
  1... ....  TCBBITCB "X'80'" - This task is "below" the initiator TCB
273 (111) BITSTRING 1  TCBPROP1 - Byte 1 of TCBPROPF
274 (112) BITSTRING 2  TCBAFFN - CPU AFFINITY INDICATOR
276 (114) BITSTRING 1  TCBFBYT1 - FLAG BYTE. SERIALIZATION - TCBACTIV OR TASK NONDISPATCHABLE AND LOCAL LOCK
  1... ....  TCBEOTFM "X'80'" - END OF TASK FLAG FOR FREEMAIN. SET TO 1 BY TASK TERMINATION AT START OF TERMINATION PROCESSING AND RESET TO 0 AT FINISH. INDICATES THAT A FREEMAIN ON A BLOCK OF LOCAL STORAGE THAT IS STILL FIXED BY RSM SHOULD RESULT IN A RETURN CODE OF 8 RATHER THAN ABNORMAL TERMINATION.
  .1.. ....  TCBRTM1E "X'40'" - RTM1 IS CURRENTLY PROCESSING EUT FRR'S FOR THIS TASK
  ..1. ....  TCBNDIOS "X'20'" - TASK HAS BEEN SET NONDISPATCHABLE VIA STATUSND WHILE SVC 16 (PURGE) SCANS THE RB CHAIN PURGING APPENDAGE-SCHEDULED ASYNCHRONOUS EXIT ROUTINES RUNNING UNDER AN IRB/RQE OR NON-RESIDENT ERP'S RUNNING UNDER THE SIRB.
  ...1 ....  TCBPGNLY "X'10'" - SET BY RTM2 TO INDICATE ONLY PURGE PHASE TO BE PERFORMED
  .... 1...  TCBRTM2 "X'08'" - SET BY RTM2 TO INDICATE RTM2 HAS BEEN ENTERED FOR THIS TASK
  .... .1..  TCBEOT "X'04'" - SET BY RTM2 TO INDICATE TO EXIT THAT END OF TASK PROCESSING IS COMPLETE
  .... ..1.  TCBSATTN "X'02'" - SYNCHRONIZATION OF ATTENTION INTERRUPT REQUIRED BY EXIT PROLOG
  .... ...1  TCBLLH "X'01'" - Task was interrupted holding the local lock.
277 (115) BITSTRING 1  TCBFBYT2 - FLAG BYTE. SERIALIZATION - TCBACTIV OR TASK NONDISPATCHABLE AND LOCAL LOCK
  1... ....  TCBCNCB "X'80'" - SET BY RTM2 IN THE JOB STEP TCB WHEN IT HAS BEEN ENTERED ON THE TCB FOR AN X22 ABEND
  .1.. ....  TCBFMW "X'40'" - MOTHER WAITING FLAG. TURNED ON IN A SUBTASK IN RTM2 PROCESSING WHEN AN ANCESTOR TASK IS WAITING TO ABEND IT.
  ..1. ....  TCBFDW "X'20'" - Set by RTM2 to ensure that only one daughter task will terminate its jobstep task. No longer means 'daughter waiting'
  ...1 ....  TCBFPRAP "X'10'" - SET BY RTM2 TO PREVENT PERCOLATION TO THE TASK OF AN ASYNCHRONOUS ABEND
  .... 1...  TCBRT1NR "X'08'" - IF 1, ERROR PROPAGATED FROM RTM1 IS NON-RETRYABLE
  .... .1..  TCBECBNV "X'04'" - IF 1, ECB POINTED TO BY TCBECB IS NOT TO BE VALIDITY CHECKED. IF 0, ECB POINTED TO BY TCBECB IS TO BE VALIDITY CHECKED.
  .... ..1.  TCBSSPC "X'02'" - STATUS STOP PENDING,TASK HOLDS A CML LOCK OR IS IN FUNCTION MUST COMPLETE MODE.
  .... ...1  TCBRTM1C "X'01'" - A TASK WITH EUT FRRS HAS BEEN CANCELLED. THIS FLAG PASSES THE CANCEL REQUEST FROM RTM1 TO RTM2.
278 (116) BITSTRING 1  TCBFBYT3 - FLAG BYTE
  1... ....  TCBEXP "X'80'" - EXPANDED VERSION OF THE TCB
  .1.. ....  TCBNCTL "X'40'" - IF 1, INDICATES USER PROGRAM IS LOADED UNDER THIS TASK OR A LOWER TASK. OWNERSHIP: RACF
  ..1. ....  TCBRTMDE "X'20'" - DETACH HAS BEEN CALLED BY RTM
  ...1 ....  TCBMTDP "X'10'" - MEMTERM SDUMP
279 (117) BITSTRING 1  TCBFBYT4 - FLAG BYTE. SERIALIZATION: TCBACTIV.
  1... ....  TCBPMC "X'80'" - IF 1, INDICATES TASK IS IN PROCESS MUST COMPLETE MODE.
  .1.. ....  TCBNOJLB "X'40'" - If 1, indicates that TCBJLB is not to be used
  ..1. ....  TCBATSKL "X'20'" - If 1, this task's TASKLIB was provided by an authorized attacher
  .... 1...  TCB_KEEP_LS_EXTENT_VALID "X'08'" - If 1, do not unchain and page release a LSS during a Stack Empty (PIC31) exception Ownership: Supervisor
280 (118) ADDRESS 4  TCBRPT - ADDRESS OF RADIX PARTITION TREE FOR LOCAL STORAGE MANAGEMENT
284 (11C) ADDRESS 4  TCBVAT - ADDRESS OF THE VAT (VSAM). THERE IS ONE VAT PER JOB STEP TCB.
288 (120) ADDRESS 4  TCBSWASA - ADDRESS OF SAVE AREA USED BY SWA MANAGER
292 (124) ADDRESS 4  TCBSVCA2 - ADDRESS OF SVC SCREENING TABLE
296 (128) ADDRESS 4  TCBERD EXTENDED REGION DESCRIPTOR. SERIALIZATION - THE LOCAL LOCK. OWNERSHIP - VSM.
300 (12C) ADDRESS 4  TCBEAE EXTENDED ALLOCATED ELEMENT QUEUE ANCHOR. SERIALIZATION - THE LOCAL LOCK. OWNERSHIP - VSM.
304 (130) ADDRESS 4  TCBARC REASON CODE FOR ABEND OWNERSHIP - RTM
308 (134) SIGNED 4  TCBGRES - TASK GLOBAL RESOURCE COUNT - NUMBER OF GLOBAL RESOURCES OWNED BY THIS TASK
312 (138) ADDRESS 4  TCBSTCB ADDRESS OF STCB
316 (13C) CHARACTER 8  TCBTTIME - TCB'S ACCUMULATED CPU TIME
324 (144) ADDRESS 4  TCBCELAP - COMMON EXECUTION LIBRARY ANCHOR POINTER
328 (148) BITSTRING 2  TCBR148 - RESERVED
330 (14A) BITSTRING 1  TCBRBYT1 - RTM Flag byte Ownership: RTM Serialization: Local lock.
  1... ....  TCBPVICT "X'80'" - If 1, indicates that the associated task has received an ABEND13E as a result of Parallel Detach processing. Used by both RTM1 and RTM2.
  .1.. ....  TCBPKING "X'40'" - If 1, indicates that the associated Task has been marked as responsible for the removal of its subtasks (in RTM processing)
  ..1. ....  TCBPCAND "X'20'" - If 1, indicates that this Task has requested Parallel Detach protection and should be on the queue pointed to by ASSBPTAR
  ...1 ....  TCBPTOP "X'10'" - If 1, indicates that this Task is at the top of a Task structure that was Parallel Detached
331 (14B) BITSTRING 1  TCBLEVEL - LEVEL NUMBER OF TCB
  .... ..1.  TCBVS02A "X'02'" - JBB2110 (NOT IN BASE)
  .... ..1.  TCBVS02B "X'02'" - JBB2125
  .... ..11  TCBVS03 "X'03'" - JBB2133
  .... ..11  TCBVERS "X'03'" - LEVEL OF THIS MAPPING
332 (14C) ADDRESS 4  TCBBDT - ADDRESS OF BDT'S GSD LINKAGE CONTROL BLOCK
336 (150) SIGNED 4  TCBNDAXP - COUNT OF NUMBER OF CONSECUTIVE DISPATCHES REQUIRED ON A CP BEFORE THE TASK SHOULD BE REDISPATCHED ON AN AXP. OWNER: SUPERVISOR CONTROL SERIALIZATION: TCBACTIV BIT OF FIELD TCBXSCT1
340 (154) ADDRESS 4  TCBSENV - ADDRESS OF ACEE FOR THE TASK. THE ACEE DESCRIBES THE RACF AUTHORIZATION FOR THE TASK. OWNER: RACF SERIALIZATION: NONE, ONLY UPDATED BY TASK ITSELF
344 (158) DBL WORD 8   (0)
344 (158) X'158' 0  TCBMNLEN "*-TCB" - LENGTH OF MAIN SECTION OF TCB
Table 2. Structure TCBXTNT2
Offset Offset
Dec Hex Type Len Name(Dim) Description
0 (0) STRUCTURE 0 TCBXTNT2 , - START OF EXTENSION
0 (0) ADDRESS 4  TCBGTF(0) - ADDRESS OF GENERALIZED TRACE FACILITY (GTF) TEMPORARY TRACE BUFFER ICB312
0 (0) BITSTRING 1  TCBTFLG - GTF FLAG BYTE ICB312
  1... ....  TCBASYNC "X'80'" - GTF ASYNCHRONOUS GATHER ROUTINE IS IN CONTROL ICB312
  .1.. ....  TCBERRTN "X'40'" - GTF ASYNCHRONOUS GATHER ERROR ROUTINE IS IN CONTROL ICB312
  ..1. ....  TCBDSPIT "X'20'" - MACHINE CHECK INTERRUPTION HANDLER SHOULD UNCONDITIONALLY BRANCH TO THE DISPATCHER ICB312
1 (1) ADDRESS 3  TCBGTFA - ADDRESS OF GTF TEMPORARY TRACE BUFFER ICB312
4 (4) BITSTRING 1   - RESERVED.
5 (5) BITSTRING 3  TCBRCMP - MOST RECENT ABEND COMPLETION CODE (INCLUDING VALID RECURSIONS IN STAE) ICB411
8 (8) ADDRESS 4  TCBEVENT - ADDRESS OF EVENT TABLES QUEUE
12 (C) SIGNED 4  TCBRTMCT - COUNT OF TOKENS USED FOR ESTAE. SERIALIZATION - CS. OWNERSHIP - RTM.
16 (10) ADDRESS 4  TCBTQE - ADDRESS OF A REUSABLE TASK-RELATED TQE
20 (14) ADDRESS 4  TCBCAUF - ADDRESS OF SUBSYSTEM FACILITY CONTROL BLOCK
24 (18) ADDRESS 4  TCBPERCP - POINTER TO A QUEUE OF SPIS. AN SPI REPRESENTS THE PERCOLATION OF AN SRB'S FRR TO THE RELATED TASK. SERIALIZATION - TCBACTIV OR TASK NONDISPATCHABLE AND LOCAL LOCK. OWNERSHIP - RTM.
  1... ....  TCBRCVRY "X'80'" - TASK IS IN RECOVERY. SERIALIZATION - TCBACTIV. OWNERSHIP - RTM.
28 (1C) SIGNED 4  TCBPERCT - COUNT OF SRB MODE FRRS WAITING TO PERCOLATE TO THIS TASK, BUT NOT REPRESENTED IN SPI QUEUE (TCBPERCP). SERIALIZATION - TCBACTIV OR TASK NONDISPATCHABLE AND LOCAL LOCK. OWNERSHIP - RTM.
32 (20) DBL WORD 8   (0) - FORCE LENGTH EQUATE TO DOUBLE WORD ICB362
32 (20) X'20' 0  TCBX2LEN "*-TCBXTNT2" LENGTH OF COMMON EXTENSION
32 (20) X'198' 0  TCBLEN "TCBPXLEN+TCBMNLEN+TCBX2LEN" - TCB LENGTH INCLUDING PREFIX END OF TCB
Table 3. Cross Reference for TCB
Name Offset Hex Tag  
PNONDISP AD 40  
TCB 0 20  
TCB_KEEP_LS_EXTENT_VALID 117 8  
TCB_REFRPROT_OVERRIDE 14 10  
TCBABCUR EC  
TCBABD AE 80  
TCBABE AE 1  
TCBABF 14  
TCBABTIN AD 1  
TCBABTRM 1F 20  
TCBABWF 21 40  
TCBACTIV F0 80  
TCBADMP CB 2  
TCBADUMP B4 7  
TCBAE 9C  
TCBAFFN 112  
TCBANDSP 21 10  
TCBAPG CA 2  
TCBAQE 9C BC  
TCBARC 130  
TCBAREQ AF 4  
TCBASYNC 0 80  
TCBATSKL 117 20  
TCBATT 94 20  
TCBBACK DC  
TCBBDT 14C  
TCBBITCB 110 80  
TCBBITS C8  
TCBCASID 10 8  
TCBCAUF 14  
TCBCCPVI F2  
TCBCDBL 10 8  
TCBCELAP 144  
TCBCIND 10 2  
TCBCLOSD B4 2  
TCBCLOSE B4 3  
TCBCLOSF B4 4  
TCBCMLF F1 80  
TCBCMP 10  
TCBCMPC 11  
TCBCMPF 10  
TCBCMSG 10 1  
TCBCNCB 115 80  
TCBCOMM EE FD  
TCBCONVR B4 32  
TCBCPP 10 20  
TCBCPU CA 20  
TCBCPUBN 94 1  
TCBCREQ 10 80  
TCBCSTEP 10 40  
TCBCWTO 10 4  
TCBDAMSG B4 B  
TCBDAR CC  
TCBDARC CC 10  
TCBDARD CC 20  
TCBDARET B4 33  
TCBDARMC CC 10  
TCBDARMS CC 2  
TCBDARO CC 8  
TCBDARP CC 80  
TCBDARPN AD 40  
TCBDARS CC 40  
TCBDARTN AD 80  
TCBDARWT CC 4  
TCBDDRND AD 8  
TCBDEB 8  
TCBDFRBP 14 1  
TCBDMPO 10 20  
TCBDSP 23  
TCBDSPIT 0 20  
TCBDSS AE 2  
TCBDSSID EE F9  
TCBDWSTA 1F 1  
TCBDYDSP 94 2  
TCBDYING EF 80  
TCBDYNAM B4 A  
TCBEAE 12C  
TCBECB 90  
TCBECBNV 115 4  
TCBENDINGABNORMALLY EF 4  
TCBENDNG EF 8  
TCBENQRM 1F 2  
TCBEOT 114 4  
TCBEOTFM 114 80  
TCBERD 128  
TCBERRTN 0 40  
TCBERTYP 10A  
TCBESTAE 108  
TCBESTRM 109  
TCBETERM 109 80  
TCBEVENT 8  
TCBEXCPD C0  
TCBEXP 116 80  
TCBEXSVC CC 1  
TCBEXT1 C4  
TCBEXT1A C5  
TCBEXT2 D0  
TCBEXT2A D1  
TCBFA 1D 80  
TCBFABOP 1E 20  
TCBFBYT1 114  
TCBFBYT2 115  
TCBFBYT3 116  
TCBFBYT4 117  
TCBFC 21 80  
TCBFCD1 21 2  
TCBFDSOP 1E 4  
TCBFDW 115 20  
TCBFE 1D 40  
TCBFERA 1D 20  
TCBFETXR 1E 2  
TCBFIX -20  
TCBFJMC 1E 8  
TCBFJMCT ED  
TCBFLAG 1C F0  
TCBFLGS 1D  
TCBFLGS1 1D  
TCBFLGS2 1E  
TCBFLGS3 1F  
TCBFLGS4 20  
TCBFLGS5 21  
TCBFLGS6 CA  
TCBFLGS7 CB  
TCBFLGS8 EF  
TCBFMW 115 40  
TCBFOE F4  
TCBFOEA F5  
TCBFOINP 1E 80  
TCBFPRAP 115 10  
TCBFRS -20  
TCBFRS0 -20  
TCBFRS2 -18  
TCBFRS4 -10  
TCBFRS6 -8  
TCBFS 1D 2  
TCBFSA 70  
TCBFSAB 71  
TCBFSM 1F 80  
TCBFSMC 1E 10  
TCBFSTI 1E 40  
TCBFT 1D 4  
TCBFTS 1E 1  
TCBFX 1D 1  
TCBFXSET 1F 10  
TCBGPECB CB 80  
TCBGREC B4 5  
TCBGRES 134  
TCBGRPH 14 20  
TCBGRS 30  
TCBGRS0 30  
TCBGRS1 34  
TCBGRS10 58  
TCBGRS11 5C  
TCBGRS12 60  
TCBGRS13 64  
TCBGRS14 68  
TCBGRS15 6C  
TCBGRS2 38  
TCBGRS3 3C  
TCBGRS4 40  
TCBGRS5 44  
TCBGRS6 48  
TCBGRS7 4C  
TCBGRS8 50  
TCBGRS9 54  
TCBGTF 0  
TCBGTFA 1  
TCBGTOFM CB 1  
TCBHALT A0 8  
TCBHCRM CA 8  
TCBHNDSP 20 10  
TCBINDRC B4 E  
TCBIOBRC BC  
TCBIORMS EE FC  
TCBIQE 8C  
TCBIWAIT AE 8  
TCBJES EE FA  
TCBJLB 28  
TCBJPQ 2C  
TCBJPQB 2D  
TCBJPQF 2C 80  
TCBJSCB B4  
TCBJSCBB B5  
TCBJSTCA 7D  
TCBJSTCB 7C  
TCBJTCBA EF 20  
TCBKEY9 1F 4  
TCBLEN 20 198  
TCBLEVEL 14B  
TCBLJSND AF 80  
TCBLLH 114 1  
TCBLLNEW F1 40  
TCBLLREQ F0 20  
TCBLLS 24  
TCBLMP 22  
TCBLOGID EE F8  
TCBLTC 88  
TCBMASTR EE FB  
TCBMCCNS B4 40  
TCBMDIDS B0  
TCBMESG B4 9  
TCBMIGR CA 4  
TCBMNLEN 158 158  
TCBMODE 10B  
TCBMOD91 14 80  
TCBMSS 18  
TCBMSSB 19  
TCBMTDP 116 10  
TCBNCTL 116 40  
TCBNDAXP 150  
TCBNDINT AF 1  
TCBNDIOS 114 20  
TCBNDJL AC 1  
TCBNDNYI AF 40  
TCBNDSMF AF 2  
TCBNDSP AC  
TCBNDSP0 AC  
TCBNDSP1 AD  
TCBNDSP2 AE  
TCBNDSP3 AF  
TCBNDSP4 C8  
TCBNDSP5 C9  
TCBNDSVC AE 20  
TCBNDTS AE 10  
TCBNDUMP 20 80  
TCBNEWRB B4 35  
TCBNOCC 10 10  
TCBNOCHK 14 40  
TCBNOIRB EF 40  
TCBNOJLB 117 40  
TCBNONPR 1D 10  
TCBNOSTA B4 30  
TCBNSSP E4  
TCBNSSQA E4 80  
TCBNSTAE A0  
TCBNTC 80  
TCBNTJS CA 1  
TCBOLTEP 14 2  
TCBONDSP 20 1  
TCBOPEN B4 1  
TCBOTC 84  
TCBOWAIT AE 4  
TCBPAGE 21 20  
TCBPAGID EE FF  
TCBPCAND 14A 20  
TCBPDUMP 1D 8  
TCBPERCP 18  
TCBPERCT 1C  
TCBPGNLY 114 10  
TCBPIE 4  
TCBPIEND AD 2  
TCBPIE17 CA 40  
TCBPKF 1C  
TCBPKFU 1C 80  
TCBPKING 14A 40  
TCBPMC 117 80  
TCBPNDSP 21 1  
TCBPPSUP A0 10  
TCBPQE 98 B8  
TCBPROPF 110  
TCBPROP0 110  
TCBPROP1 111  
TCBPTAXE B4 8  
TCBPTOP 14A 10  
TCBPURGE 2C  
TCBPVICT 14A 80  
TCBPXLEN -8 20  
TCBQTIP B4 C  
TCBQUIES A0 40  
TCBRBP 0  
TCBRBWF 20 4  
TCBRBYT1 14A  
TCBRCMP 5  
TCBRCVRY 18 80  
TCBRD 98  
TCBREC B4 80  
TCBRECDE B4  
TCBRPT 118  
TCBRQENA 20 20  
TCBRSPND AD 10  
TCBRSTND AD 20  
TCBRSTSK CB 4  
TCBRSV37 CD  
TCBRTMCT C  
TCBRTMDE 116 20  
TCBRTM1C 115 1  
TCBRTM1E 114 40  
TCBRTM12 104  
TCBRTM2 114 8  
TCBRTWA E0  
TCBRT1NR 115 8  
TCBRT1S 1F 40  
TCBRV CA 80  
TCBRV316 10 4  
TCBR0D4 D4  
TCBR148 148  
TCBSATTN 114 2  
TCBSAVCD B4 F  
TCBSCBKY 108  
TCBSCNDY AC  
TCBSDNDX EF 10  
TCBSENV 154  
TCBSENVP CB 40  
TCBSER 20 40  
TCBSLPER AF 10  
TCBSMCP 94 8  
TCBSMFGF A4 80  
TCBSPVLK CA 10  
TCBSRBND AF 20  
TCBSSAT B8  
TCBSSPC 115 2  
TCBSTAB A0  
TCBSTABB A1  
TCBSTABE A0 80  
TCBSTACK CB 10  
TCBSTAFX 109 40  
TCBSTAWA FC  
TCBSTCB 138  
TCBSTCC 10 10  
TCBSTCUR A0 1  
TCBSTMCT CF  
TCBSTP 21 4  
TCBSTPCT 95  
TCBSTPP AE 40  
TCBSTPPR 94 40  
TCBSTRET B4 31  
TCBSVCA2 124  
TCBSVCS CB 8  
TCBSVCSP CB 20  
TCBSWA F8  
TCBSWASA 120  
TCBSYERR EE FE  
TCBSYNCH A0 4  
TCBSYS 21 8  
TCBSYSCT CE  
TCBS3A F0 40  
TCBS3MR AF 8  
TCBTCAMP B4 D  
TCBTCB 74  
TCBTCBID 100  
TCBTCP 14 4  
TCBTCPP 14 8  
TCBTCT A4  
TCBTCTB A5  
TCBTCTGF A4  
TCBTDORM F0 8  
TCBTFLG 0  
TCBTID EE  
TCBTIO C  
TCBTIOTG 94 10  
TCBTME 78  
TCBTPSP AD 4  
TCBTQE 10  
TCBTQET 78 80  
TCBTRN 14  
TCBTRNB 15  
TCBTSDP 97  
TCBTSFLG 94  
TCBTSLP 96  
TCBTSTSK 94 80  
TCBTTIME 13C  
TCBTYP1R B4 34  
TCBTYP1W B4 10  
TCBUKYSP 10C  
TCBUSER A8  
TCBUXNDF 21 40  
TCBUXNDV 20 8  
TCBVAT 11C  
TCBVERS 14B 3  
TCBVS02A 14B 2  
TCBVS02B 14B 2  
TCBVS03 14B 3  
TCBVTAM1 B4 21  
TCBVTAM2 B4 22  
TCBVTAM3 B4 23  
TCBVTAM4 B4 24  
TCBWTPSE B4 20  
TCBXLAS E8  
TCBXSB D8  
TCBXSCT F0  
TCBXSCT1 F0  
TCBXSCT2 F1  
TCBXTNT2 0  
TCBX2LEN 20 20  
TCBZERO 1C F  
TCB33E A0 20  
TNONDISP AD 80