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 |