TRA - Trace domain - common structures

      CONTROL BLOCK NAME = DFHTRA
      DESCRIPTIVE NAME = CICS TS Trace Domain - Common structures
                         and constants
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1986, 2014 
      FUNCTION = Contains the structure for :-
                   DFHTRA - TR anchor block
            TR domain Anchor Block storage definition
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 528 DFHTRA
(0) CHARACTER 16 TRA_PREFIX Standard control block prefix *
(0) HALFWORD 2 TRA_LENGTH Length of anchor block
(2) CHARACTER 1 TRA_ARROW '>'
(3) CHARACTER 3 TRA_DFH 'DFH'
(6) CHARACTER 2 TRA_DOMID 'TR'
(8) CHARACTER 8 TRA_BLOCK_NAME 'ANCHOR'
(10) CHARACTER 8 TRA_LOCK_BLOCK Trace lock block for DFHKERN Doubleword align for CDS
(18) ADDRESS 4 TRA_ATTACH_PLIST (2) Plist for DFHTRTCB subtask
(20) UNSIGNED 4 TRA_INTTABSIZE Internal trace table size
(24) UNSIGNED 4 TRA_GUARD_SIZE Size of table guard area
(28) CHARACTER 16 TRA_TCBTOKEN IARV64 TCB Token
(38) CHARACTER 8 TRA_CELL_POOL_64 Trace 64-bit cell pool id
(40) ADDRESS 8 TRA_INTTAB_PTR
         Address of start of table
(48) ADDRESS 8 TRA_ENDTAB_PTR
         1st byte after table
(50) ADDRESS 4 TRA_DFHTRAO_PTR Aux output routines
(54) ADDRESS 4 TRA_AUX_BUF_PTR Aux trace buffer address
(58) ADDRESS 4 TRA_AUX_DCB_PTR Address of aux trace DCB
(5C) UNSIGNED 4 TRA_AUX_DCB_LEN Length of aux trace DCB
(60) ADDRESS 4 TRA_AUX_DECB_PTR Address of aux trace DECB
(64) UNSIGNED 4 TRA_AUX_DECB_LEN Length of aux trace DECB
(68) CHARACTER 8 TRA_TIME_BASE STCK at last local midnight *
(70) CHARACTER 8 TRA_AUX_EXTENT Current aux trace extent
(78) UNSIGNED 1 TRA_AUTOSW_STATUS Autoswitch status
(79) UNSIGNED 1 TRA_AUX_STATUS Auxiliary trace status
(7A) UNSIGNED 1 TRA_AUX_INIT_STAT Auxiliary trace initial status *
(7B) UNSIGNED 1 * Reserved
(7C) BIT(32) 4 TRA_STATUS_FLAGS Status flags
(7C) 1... ....   TRA_MASTER Internal copy of master flag *
(7C) .1.. ....   TRA_INT_STATUS Internal trace status
(7C) ..1. ....   TRA_GTF_STATUS GTF trace status
(7C) ...1 ....   TRA_LOCK_TABLE Force use of table lock
(7C) .... 1...   TRA_TRAP_ACTIVE DFHTRAP active
(7C) .... .1..   TRA_AUX_FIF Next block first-in-file
(7C) .... ..1.   TRA_AUX_EOF Next block last-in-file
(7C) .... ...1   TRA_AVAILABLE Trace put available
(7D) 1... ....   TRA_TERMINATING Trace domain terminating
(7D) .1.. ....   TRA_AUX_IO_PENDING Output to aux pending
(7D) ..1. ....   TRA_AUX_DCB_DECB_OK Acquired DCB/DECB initialised *
(7D) ...1 ....   TRA_TRAO_RLSE_REQD RELEASE DFHTRAO required
(7D) .... 1...   TRA_PA_IN_CONTROL Parameter Mgr in control
(7D) .... .1..   TRA_TRAP_UNUSABLE DFHTRAP has prog checked
(7D) .... ..1.   TRA_TRAP_DISABLED Requested disabled
(7D) .... ...1   TRA_TRAP_INIT_STAT DFHTRAP initial status
(7E) 1... ....   TRA_INITIALISING Trace domain initialising
(7E) .1.. ....   TRA_AUX_STARTING Aux trace starting
(7E) ..1. ....   TRA_RETAIN_AUX_DCB Retain DCB for future use
(7E) ...1 ....   TRA_FT_ERR_BEFORE Prevent recurring FT errs
(7E) BIT(12) POS(5) 2 * Reserved
(80) ADDRESS 8 TRA_TRAP_WA_PTR
         DFHTRAP work area pointer
(88) ADDRESS 4 TRA_DFHTRAP_PTR DFHTRAP entry point
(8C) ADDRESS 4 * Reserved
(90) ADDRESS 8 TRA_GTF_BUF_PTR
         Address of GTF buffer
(98) UNSIGNED 4 TRA_ATS_ECB For aux subtask to wait on
(9C) UNSIGNED 4 TRA_MAIN_ECB For CICS TCBs to wait on
(A0) CHARACTER 72 TRA_ATS_REGSAVE Aux subtask register save
(E8) UNSIGNED 1 TRA_TRAO_REQ DFHTRAO request byte
(E9) UNSIGNED 1 TRA_TRAO_RC DFHTRAO return code
(EA) CHARACTER 2 * Reserved
(EC) ADDRESS 4 TRA_TRAO_PARMS TRAO parameter list
(F0) ADDRESS 8 TRA_TRAO_BPTR
         TR block to be written
(F8) UNSIGNED 4 TRA_AUX_TERMINATE_ECB Aux tracing terminate ECB
(F8) 1... ....   TRA_AUX_TERM_ECB_WAIT WAIT BIT
(F8) .1.. ....   TRA_AUX_TERM_ECB_POST POST BIT
(F8) ..11 1111   * Reserved
(F9) CHARACTER 3 * Reserved
(FC) ADDRESS 4 TRA_ATS_TCB Aux subtask TCB address
(100) ADDRESS 4 TRA_SM_ISOLATION_ TOKEN Isolation token
(104) CHARACTER 0 TRA_PAD1 Pad to cache boundary
(104) CHARACTER 252 *
(200) CHARACTER 16 TRA_NAB_INFO Quadword used for space
(200) ADDRESS 8 TRA_NAB
         Next byte in internal table@L2C
(208) UNSIGNED 8 TRA_AVLEN Available in current block
(210) CHARACTER 0 *

Constants

Table 2.
Len Type Value Name Description
    Values for TRA_TRAO_REQ
1 DECIMAL 1 TRA_TRAO_TERM
1 DECIMAL 2 TRA_TRAO_OPEN
1 DECIMAL 3 TRA_TRAO_CLOSE
1 DECIMAL 4 TRA_TRAO_WRITE
1 DECIMAL 5 TRA_TRAO_CHECK
    Values for TRA_TRAO_RC
1 DECIMAL 1 TRA_TRAO_OK
1 DECIMAL 2 TRA_TRAO_INVALID
1 DECIMAL 3 TRA_TRAO_OPEN_FAILED
1 DECIMAL 4 TRA_TRAO_END_OF_EXTENT
1 DECIMAL 5 TRA_TRAO_AUX_ABEND
1 DECIMAL 6 TRA_TRAO_AUX_IO_ERROR
1 DECIMAL 7 TRA_TRAO_DCB_NOT_FOUND
    Values for TRA_INT_STATUS
0 BIT 1 TRA_INT_STARTED
0 BIT 0 TRA_INT_STOPPED
    Values for TRA_AUX_STATUS
1 DECIMAL 1 TRA_AUX_STARTED
1 DECIMAL 2 TRA_AUX_STOPPED
1 DECIMAL 3 TRA_AUX_PAUSED
    Values for TRA_GTF_STATUS
0 BIT 1 TRA_GTF_STARTED
0 BIT 0 TRA_GTF_STOPPED
    Values for TRA_AUTOSW_STATUS
1 DECIMAL 1 TRA_AUTOSW_OFF
1 DECIMAL 2 TRA_AUTOSW_ONCE
1 DECIMAL 3 TRA_AUTOSW_CONTINUOUS