Descriptive Name = Commarea for User Program Error Program
Licensed Materials - Property of IBM
Restricted Materials of IBM
5655-Y04
(C) Copyright IBM Corp. 1989, 2012
Function =
Commarea for PEP; created by DFHACP, passed to User PEP
Notes:
Dependencies = S/370
Restrictions = none
Register Conventions = none
Patch Label = none
Module Type = copy
Attributes = copy
------------------------------------------------------------------
Entry Point = none
Purpose = copybook
Linkage = none
Input = none
Output = none
Exit-normal = none
Exit-error = none
------------------------------------------------------------------
External References =
Routines =
Data Areas = none
Control Blocks = none
Global Variables = none
Tables = none
Macros =
------------------------------------------------------------------
Description
Copybook for Commarea for User's Program Error Program
------------------------------------------------------------------
Table 1.
| Offset Hex |
Type |
Len |
Name (Dim) |
Description |
| (0) |
STRUCTURE |
560 |
DFHPEP_COMMAREA |
Standard header section
|
| (0) |
CHARACTER |
4 |
PEP_COM_STANDARD |
| (0) |
CHARACTER |
1 |
PEP_COM_FUNCTION |
always '1' |
| (1) |
CHARACTER |
2 |
PEP_COM_COMPONENT |
always 'PC' |
| (3) |
CHARACTER |
1 |
PEP_COM_RESERVED |
Reserved |
Abend codes and EIB
|
| (4) |
CHARACTER |
4 |
PEP_COM_CURRENT_ ABEND_CODE |
current abcode |
| (8) |
CHARACTER |
4 |
PEP_COM_ORIGINAL_ ABEND_CODE |
original abcode |
| (C) |
CHARACTER |
85 |
PEP_COM_USERS_EIB |
EIB at abend |
Debugging information
|
| (64) |
CHARACTER |
84 |
PEP_COM_DEBUG |
| (64) |
CHARACTER |
8 |
PEP_COM_ABPROGRAM |
ABENDing program |
| (6C) |
CHARACTER |
8 |
PEP_COM_PSW |
PSW at abend |
| (74) |
UNSIGNED |
4 |
PEP_COM_ REGISTERS (4294967312:456210192) |
regs at abend |
| (B4) |
UNSIGNED |
1 |
PEP_COM_KEY |
execution key in form x'0n' (ASRA and ASRB) |
| (B5) |
UNSIGNED |
1 |
PEP_COM_STORAGE_HIT |
storage hit by 0C4 (ASRA only) |
| (B6) |
UNSIGNED |
1 |
PEP_COM_SPACE |
sub/basespce |
| (B7) |
CHARACTER |
1 |
PEP_COM_PADDING |
Reserved |
Return code - return ok or disable transaction
|
| (B8) |
UNSIGNED |
4 |
PEP_COM_RETURN_CODE |
Additional PSW EC mode information
|
| (BC) |
CHARACTER |
8 |
PEP_COM_INT |
PSW interrupt codes |
| (C4) |
ADDRESS |
4 |
* |
Reserved |
Breaking Event Address
|
| (C8) |
ADDRESS |
8 |
PEP_COM_BEAR |
Breaking Event Address |
Additional Register Information
|
| (D0) |
BIT(8) |
1 |
PEP_COM_FLAG1 |
Existence bits |
| (D0) |
1... .... |
|
PEP_COM_GP64_REGS_ AVAIL |
64-bit GPR |
| (D0) |
.1.. .... |
|
PEP_COM_ACCESS_REGS_ AVAIL |
Access regs |
| (D0) |
..1. .... |
|
PEP_COM_ORIGINAL_ FPR_AVAIL |
Original FPR |
| (D0) |
...1 .... |
|
PEP_COM_ADDITIONAL_ FPR_AVAIL |
Additional FPR |
| (D0) |
.... 1111 |
|
* |
| (D1) |
CHARACTER |
7 |
* |
| (D8) |
ADDRESS |
8 |
PEP_COM_GP64_ REGISTERS (4294967312:456208384) |
64-bit GPR |
| (158) |
CHARACTER |
132 |
PEP_COM_FP_REGISTERS |
FPR values |
| (158) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER0 |
FP Register 0 |
| (160) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER1 |
FP Register 1 |
| (168) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER2 |
FP Register 2 |
| (170) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER3 |
FP Register 3 |
| (178) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER4 |
FP Register 4 |
| (180) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER5 |
FP Register 5 |
| (188) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER6 |
FP Register 6 |
| (190) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER7 |
FP Register 7 |
| (198) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER8 |
FP Register 8 |
| (1A0) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER9 |
FP Register 9 |
| (1A8) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER10 |
FP Register 10 |
| (1B0) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER11 |
FP Register 11 |
| (1B8) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER12 |
FP Register 12 |
| (1C0) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER13 |
FP Register 13 |
| (1C8) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER14 |
FP Register 14 |
| (1D0) |
ADDRESS |
8 |
PEP_COM_FP_REGISTER15 |
FP Register 15 |
| (1D8) |
ADDRESS |
4 |
PEP_COM_FPC_REGISTER |
FPC register |
| (1DC) |
ADDRESS |
4 |
PEP_COM_ACCESS_ REGISTERS (4294967312:456208384) |
Access Registers |
| (21C) |
ADDRESS |
4 |
* |
Spare |
16 byte PSW at time of abend
|
| (220) |
CHARACTER |
16 |
PEP_COM_PSW16 |
16 byte PSW |
Table 2.
| Len |
Type |
Value |
Name |
Description |
PEP_COM_RETURN_CODE values
|
| 4 |
DECIMAL |
4 |
PEP_COM_RETURN_DISABLE |
| |
|
|
|
disable |
| 4 |
DECIMAL |
0 |
PEP_COM_RETURN_OK |
ok |
PEP_COM_STORAGE_HIT values
|
| 1 |
DECIMAL |
0 |
PEP_COM_NO_HIT |
No hit or no 0C4 |
| 1 |
DECIMAL |
1 |
PEP_COM_CDSA_HIT |
CDSA hit |
| 1 |
DECIMAL |
2 |
PEP_COM_ECDSA_HIT |
ECDSA hit |
| 1 |
DECIMAL |
3 |
PEP_COM_ERDSA_HIT |
ERDSA hit |
| 1 |
DECIMAL |
4 |
PEP_COM_RDSA_HIT |
RDSA hit |
| 1 |
DECIMAL |
5 |
PEP_COM_EUDSA_HIT |
EUDSA hit |
| 1 |
DECIMAL |
6 |
PEP_COM_UDSA_HIT |
UDSA hit |
| 1 |
DECIMAL |
7 |
PEP_COM_ETDSA_HIT |
ETDSA hit |
| 1 |
DECIMAL |
8 |
PEP_COM_GCDSA_HIT |
GCDSA hit |
| 1 |
DECIMAL |
9 |
PEP_COM_GUDSA_HIT |
GUDSA hit |
PEP_COM_KEY values
|
| 1 |
DECIMAL |
9 |
PEP_COM_USER_KEY |
USER key |
| 1 |
DECIMAL |
8 |
PEP_COM_CICS_KEY |
CICS key |
PEP_COM_SPACE_ACTIVE values
|
| 1 |
DECIMAL |
10 |
PEP_COM_SUBSPACE |
Error in s/space |
| 1 |
DECIMAL |
11 |
PEP_COM_BASESPACE |
Error in b/space |