SRED - System recovery error data

      CONTROL BLOCK NAME = DFHSREDS
      DESCRIPTIVE NAME = CICS TS System Recovery Error Data
           Licensed Materials - Property of IBM
            Restricted Materials of IBM 
           5655-Y04
           (C) Copyright IBM Corp. 1989, 2015 
      FUNCTION = Declares the SRP_ERROR_DATA structure. This
                  contains information about an MVS abend, and is
                  passed to global user exit XSRAB.
     ------------------------------------------------------------------
Table 1.
Offset Hex Type Len Name (Dim) Description
(0) STRUCTURE 1344 SRP_ERROR_DATA SRP error data
(0) CHARACTER 4 SRP_ERROR_TYPE Abend type 'ASRB'
(4) BIT(16) 2 SRP_SYS_ABCODE System abend code
(6) BIT(16) 2 SRP_USER_ABCODE User abend code
(8) CHARACTER 4 SRP_ERROR_TRANID Transaction id
(C) CHARACTER 8 SRP_ERROR_STACK_NAME Kernel stack program
(14) CHARACTER 8 SRP_ERROR_PPT_NAME PPT program
(1C) FULLWORD 4 SRP_ERROR_OFFSET Offset in program
(20) BIT(8) 1 SRP_ERROR_FLAGS Flags
(20) 1... ....   SRP_CICS_CODE Abend in CICS code
(20) .1.. ....   SRP_USER_CODE Abend in user code
(20) ..1. ....   SRP_PPT_ENTRY PPT program present
(20) ...1 ....   SRP_VALID_OFFSET Valid offset present
(20) .... 1...   SRP_VALID_REASON Abend reason present
(20) .... .1..   SRP_NOT_CICS_RB CICS RB not in control at time of error
(20) .... ..11   * Reserved
(21) CHARACTER 4 SRP_ERROR_REASON Abend reason code
(25) CHARACTER 3 * Reserved
(28) CHARACTER 152 SRP_CICS_ERROR_DATA CICS error data
(28) CHARACTER 8 SRP_CICS_EC_PSW CICS EC PSW
(28) CHARACTER 2 * Padding
(2A) 1... ....   SRP_CICS_AR_MODE AR mode?
(30) CHARACTER 8 SRP_CICS_EC_INT CICS interrupt data
(38) CHARACTER 64 SRP_CICS_REGST CICS GP regs
(78) CHARACTER 64 SRP_CICS_AC_REGST CICS Access Regs
(B8) UNSIGNED 1 SRP_CICS_EXEC_KEY CICS PSW key N in form X'0N'
(B9) CHARACTER 7 * Reserved
(C0) CHARACTER 152 SRP_SYSTEM_ERROR_DATA System error data
(C0) CHARACTER 8 SRP_SYSTEM_EC_PSW System EC PSW
(C0) CHARACTER 2 * Padding
(C2) BIT(8) 1 * Padding
(C3) 1... ....   SRP_SYSTEM_AR_MODE AR mode ?
(C8) CHARACTER 8 SRP_SYSTEM_EC_INT System interrupt data
(D0) CHARACTER 64 SRP_SYSTEM_REGST System GP regs
(110) CHARACTER 64 SRP_SYSTEM_AC_REGST System Access regs
(150) UNSIGNED 1 SRP_SYSTEM_EXEC_KEY System PSW key N in form X'0N'
(151) CHARACTER 7 * Reserved
(158) CHARACTER 32 SRP_ERROR_FP_REGS FP regs
(158) CHARACTER 8 SRP_FP_REG_0 FP reg 0
(160) CHARACTER 8 SRP_FP_REG_2 FP reg 2
(168) CHARACTER 8 SRP_FP_REG_4 FP reg 4
(170) CHARACTER 8 SRP_FP_REG_6 FP reg 6
(178) CHARACTER 16 SRP_ERROR_SUBSPACE_ INFO
(178) CHARACTER 4 SRP_ALET ALET
(17C) CHARACTER 8 SRP_SUBSPACE_TOKEN Subspace token
(184) BIT(8) 1 SRP_SUBSPACE_FLAGS
(184) 1... ....   SRP_SUBSPACE_ACTIVE Subspace/basespace
(184) .111 1111   * Reserved
(185) CHARACTER 3 * Reserved
(188) CHARACTER 8 * Reserved
(190) CHARACTER 264 SRP_ADDITIONAL_REGS_ INFO
(190) BIT(8) 1 SRP_ADDITIONAL_REGS_ FLAGS data existence flg
(190) 1... ....   SRP_CICS_GPR64_AVAIL
(190) .1.. ....   SRP_SYSTEM_GPR64_ AVAIL
(190) ..1. ....   SRP_ADDITIONAL_FPR_ AVAIL
(190) ...1 ....   SRP_ERROR_VR_REGS_ AVAIL
(190) .... 1111   *
(191) CHARACTER 7 *
(198) CHARACTER 128 SRP_CICS_GP64_REGS cics 64-bit gpr !
(218) CHARACTER 128 SRP_SYSTEM_GP64_REGS system 64-bit gpr !
(298) CHARACTER 132 SRP_ADDITIONAL_FPR_ INFO
(298) CHARACTER 128 SRP_FP_REGS all FP registers !
(318) CHARACTER 4 SRP_FPC_REG fpc register !
(31C) CHARACTER 4 * Reserved
(320) CHARACTER 16 SRP_CICS_PSW16 CICS PSW16
(330) CHARACTER 16 SRP_SYSTEM_PSW16 System PSW16
(340) CHARACTER 512 SRP_ERROR_VR_REGS all VR registers