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, 1996 
      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 276 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 (4294967298:456208384) Plist for DFHTRTCB subtask
(20) CHARACTER 16 TRA_NAB_INFO Quadword used for space allocation by CDSG in init
(20) ADDRESS 8 TRA_NAB
         Next byte in internal table@L2C
(28) UNSIGNED 8 TRA_AVLEN Available in current block
(30) UNSIGNED 4 TRA_INTTABSIZE Internal trace table size
(34) UNSIGNED 4 TRA_GUARD_SIZE Size of table guard area
(38) CHARACTER 16 TRA_TCBTOKEN IARV64 TCB Token
(48) CHARACTER 8 TRA_CELL_POOL_64 Trace 64-bit cell pool id
(50) ADDRESS 8 TRA_INTTAB_PTR
         Address of start of table
(58) ADDRESS 8 TRA_ENDTAB_PTR
         1st byte after table
(60) ADDRESS 4 TRA_DFHTRAO_PTR Aux output routines
(64) ADDRESS 4 TRA_AUX_BUF_PTR Aux trace buffer address
(68) ADDRESS 4 TRA_AUX_DCB_PTR Address of aux trace DCB
(6C) UNSIGNED 4 TRA_AUX_DCB_LEN Length of aux trace DCB
(70) ADDRESS 4 TRA_AUX_DECB_PTR Address of aux trace DECB
(74) UNSIGNED 4 TRA_AUX_DECB_LEN Length of aux trace DECB
(78) CHARACTER 8 TRA_TIME_BASE STCK at last local midnight *
(80) CHARACTER 8 TRA_AUX_EXTENT Current aux trace extent
(88) UNSIGNED 1 TRA_AUTOSW_STATUS Autoswitch status
(89) UNSIGNED 1 TRA_AUX_STATUS Auxiliary trace status
(8A) UNSIGNED 1 TRA_AUX_INIT_STAT Auxiliary trace initial status *
(8B) UNSIGNED 1 * Reserved
(8C) BIT(32) 4 TRA_STATUS_FLAGS Status flags
(8C) 1... ....   TRA_MASTER Internal copy of master flag *
(8C) .1.. ....   TRA_INT_STATUS Internal trace status
(8C) ..1. ....   TRA_GTF_STATUS GTF trace status
(8C) ...1 ....   TRA_LOCK_TABLE Force use of table lock
(8C) .... 1...   TRA_TRAP_ACTIVE DFHTRAP active
(8C) .... .1..   TRA_AUX_FIF Next block first-in-file
(8C) .... ..1.   TRA_AUX_EOF Next block last-in-file
(8C) .... ...1   TRA_AVAILABLE Trace put available
(8D) 1... ....   TRA_TERMINATING Trace domain terminating
(8D) .1.. ....   TRA_AUX_IO_PENDING Output to aux pending
(8D) ..1. ....   TRA_AUX_DCB_DECB_OK Acquired DCB/DECB initialised *
(8D) ...1 ....   TRA_TRAO_RLSE_REQD RELEASE DFHTRAO required
(8D) .... 1...   TRA_PA_IN_CONTROL Parameter Mgr in control
(8D) .... .1..   TRA_TRAP_UNUSABLE DFHTRAP has prog checked
(8D) .... ..1.   TRA_TRAP_DISABLED Requested disabled
(8D) .... ...1   TRA_TRAP_INIT_STAT DFHTRAP initial status
(8E) 1... ....   TRA_INITIALISING Trace domain initialising
(8E) .1.. ....   TRA_AUX_STARTING Aux trace starting
(8E) ..1. ....   TRA_RETAIN_AUX_DCB Retain DCB for future use
(8E) ...1 ....   TRA_FT_ERR_BEFORE Prevent recurring FT errs
(8E) BIT(12) POS(5) 2 * Reserved
(90) ADDRESS 8 TRA_TRAP_WA_PTR
         DFHTRAP work area pointer
(98) ADDRESS 4 TRA_DFHTRAP_PTR DFHTRAP entry point
(9C) ADDRESS 4 * Reserved
(A0) ADDRESS 8 TRA_GTF_BUF_PTR
         Address of GTF buffer
(A8) UNSIGNED 4 TRA_ATS_ECB For aux subtask to wait on
(AC) UNSIGNED 4 TRA_MAIN_ECB For CICS TCBs to wait on
(B0) CHARACTER 72 TRA_ATS_REGSAVE Aux subtask register save
(F8) UNSIGNED 1 TRA_TRAO_REQ DFHTRAO request byte
(F9) UNSIGNED 1 TRA_TRAO_RC DFHTRAO return code
(FA) CHARACTER 2 * Reserved
(FC) ADDRESS 4 TRA_TRAO_PARMS TRAO parameter list
(100) ADDRESS 8 TRA_TRAO_BPTR
         TR block to be written
(108) UNSIGNED 4 TRA_AUX_TERMINATE_ECB Aux tracing terminate ECB
(108) 1... ....   TRA_AUX_TERM_ECB_WAIT WAIT BIT
(108) .1.. ....   TRA_AUX_TERM_ECB_POST POST BIT
(108) ..11 1111   * Reserved
(109) CHARACTER 3 * Reserved
(10C) ADDRESS 4 TRA_ATS_TCB Aux subtask TCB address
(110) ADDRESS 4 TRA_SM_ISOLATION_ TOKEN Isolation token

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