| (0) |
STRUCTURE |
0 |
DFHEDFDS |
| (0) |
FULLWORD |
4 |
EDFUEIA |
TCTTE EXEC INTERFACE ADDR |
| (4) |
FULLWORD |
4 |
EDFUTCA |
ADDRESS OF USER'S TCA |
| (8) |
FULLWORD |
4 |
EDFUR1 |
ADDRESS OF USER PARM LIST |
| (C) |
FULLWORD |
4 |
EDFUEISP |
ADDRESS OF USER'S EIS |
| (10) |
FULLWORD |
4 |
EDFUEIBP |
ADDRESS OF USER'S EIB EDF TASK MANAGEMENT INFO |
| (14) |
BITSTRING |
1 |
EDFXA |
TASK SWITCH ATTRIBUTE |
| (14) |
1111 1111 |
|
EDFLINK |
"X'FF'" CEDF ATTACHED TO LINK EDFD |
| (14) |
1111 111. |
|
EDFSTRT |
"X'FE'" CEDF ATTACHED TO START CEDF DEBUG MODE INFO |
| (15) |
BITSTRING |
1 |
EDFCTL1 |
COPY OF EISEDFDM REQUEST BYTE INFO |
| (16) |
BITSTRING |
1 |
EDFCTL2 |
COPY OF EISEDFRB EDF CONTROL INFO |
| (17) |
BITSTRING |
1 |
EDFCTL3 |
EDF CONTROL BITS |
| (17) |
1... .... |
|
EDFOUTD |
"X'80'" DISP=OUT FOR PAGE BUILD |
| (17) |
.1.. .... |
|
EDFDBCNT |
"X'40'" EDF DEBUG MODE CONTINUES |
| (17) |
..1. .... |
|
EDFIVPS |
"X'20'" INVALID PAGE SIZE |
| (17) |
...1 .... |
|
EDFUTPG |
"X'10'" USER TASK HAS BEEN PURGED |
| (17) |
.... 1... |
|
EDFPAGD |
"X'08'" DISP=PAGING FOR BMS |
| (17) |
.... .1.. |
|
EDFDTMOK |
"X'04'" EDFD TERMINATED CORRECTLY |
| (17) |
.... ..1. |
|
EDFSECV |
"X'02'" SECURITY VIOLATION |
| (17) |
.... ...1 |
|
EDFIPIC |
"X'01'" IPIC transaction |
| (18) |
BITSTRING |
1 |
EDFCTL4 |
USER LANGUAGE INFO |
| (19) |
BITSTRING |
1 |
EDFTOS |
BIT PATTERN=OUT OF SERVICE |
| (19) |
.... ..1. |
|
EDFNIS |
"X'02'" TERMERR RECEIVED |
| (1A) |
BITSTRING |
1 |
|
RESERVED |
| (1B) |
CHARACTER |
1 |
EDFOPSYS |
OPERATING SYS FROM CSAOPSYS |
| (1C) |
FULLWORD |
4 |
EDFUASTG |
ADDRESS OF USER'S AUTO STG |
| (20) |
FULLWORD |
4 |
EDFURE |
USER'S RETURN REGISTER |
| (24) |
FULLWORD |
4 |
EDFUCDB |
USER'S CODE BASE |
| (28) |
CHARACTER |
8 |
EDFPGMID |
USER'S PROGRAM NAME |
| (30) |
BITSTRING |
1 |
EDFENV |
Current Environment |
| (30) |
1... .... |
|
EDFURM |
"X'80'" URM |
| (31) |
BITSTRING |
2 |
|
Reserved FILE CONTROL INFO |
| (33) |
BITSTRING |
1 |
EDFFCRF |
FILE CONTROL RECORD FORMAT |
| (33) |
1... .... |
|
EDFFCF |
"X'80'" FC FIXED FORMAT |
| (33) |
.1.. .... |
|
EDFFCV |
"X'40'" FC VARYING FORMAT |
| (33) |
..1. .... |
|
EDFBDAM |
"X'20'" FC ACCESS METHOD=BDAM |
| (33) |
...1 .... |
|
EDFVSAM |
"X'10'" FC ACCESS METHOD=VSAM |
| (33) |
.... 1... |
|
EDFISAM |
"X'08'" FC ACCESS METHOD=ISAM |
| (34) |
HALFWORD |
2 |
EDFFCRL |
FILE CONTROL RECORD LENGTH |
| (36) |
BITSTRING |
1 |
EDFFCKL |
FILE CONTROL KEY LENGTH |
| (37) |
BITSTRING |
1 |
EDFUTCTR |
User's send/receive flags |
| (38) |
FULLWORD |
4 |
EDFABRA |
ADDRESS of EDF ABEND info |
| (3C) |
FULLWORD |
4 |
EDFUACP |
ADDR OF USER ABCODE SLOT |
| (40) |
FULLWORD |
4 |
EDFACP |
ADDR OF EDF ABCODE SLOT |
| (44) |
FULLWORD |
4 |
EDFURSAP |
ADDRESS OF USER REGISTERS |
| (48) |
FULLWORD |
4 |
EDFPLBA |
PARTITION LOWER BOUND ADDR |
| (4C) |
FULLWORD |
4 |
EDFPUBA |
PARTITION UPPER BOUND ADDR |
| (50) |
FULLWORD |
4 |
EDFUTCTA |
USER'S TCTTE ADDRESS |
| (54) |
CHARACTER |
4 |
EDFUQTID |
USER'S TERMID/TRANID |
| (58) |
FULLWORD |
4 |
EDFUARSA |
ADDR OF USER RSA |
| (5C) |
HALFWORD |
2 |
EDFUTRTO |
READ TIMEOUT VALUE |
| (5E) |
HALFWORD |
2 |
EDFCALEN |
USER'S EIBCALEN |
| (60) |
FULLWORD |
4 |
EDFCOMAA |
USER'S COMMAREA ADDR |
| (64) |
FULLWORD |
4 |
EDFUTEDA |
COPY OF TCTTEDA AS SET FOR APPLICATION REQUESTS |
| (68) |
FULLWORD |
4 |
EDFUEIEX |
COPY OF TCTEEIEX AS SET FOR APPLICATION REQUESTS |
| (6C) |
FULLWORD |
4 |
EDFPGMLN |
PROGRAM LENGTH |
| (70) |
FULLWORD |
4 |
EDFTSADR |
TERM. STATUS FIELD ADDR |
| (74) |
FULLWORD |
4 |
EDFMSA |
MODULE START ADDRESS |
| (78) |
FULLWORD |
4 |
EDFUR1SA |
ADDRESS OF EISEIPR1 (USED AND SET BY DFHEDFCC) |
| (7C) |
FULLWORD |
4 |
EDFUEILR |
COPY OF TCTEEILR AS SET FOR APPLICATION REQUESTS |
| (80) |
FULLWORD |
4 |
EDFUSESS |
User issb (if IPIC) |
| (84) |
CHARACTER |
4 |
EDFSYST |
sysid from which remote DPL abend was received |
| (88) |
FULLWORD |
4 |
EDF_USRTASK_SUSPTOK |
User task suspend token |
| (8C) |
FULLWORD |
4 |
EDFSECCL |
Security switch routine |
| (90) |
ADDRESS |
4 |
EDF_APPL_STATIC_STG_ PTR |
User program's static storage |
| (94) |
ADDRESS |
4 |
EDF_APPL_STATIC_STG_ LEN |
User's static storage length |
| (98) |
CHARACTER |
16 |
EDFPSW |
PSW |
| (A8) |
CHARACTER |
8 |
EDFINT |
INTERRUPT INFORMATION |
| (B0) |
CHARACTER |
2 |
EDFUEIDL |
COPY OF TCTEEIDL AS SET FOR APPLICATION REQUESTS |
| (B2) |
BITSTRING |
1 |
EDFUOPT2 |
SAVE TCTEOPT2 |
| (B3) |
BITSTRING |
1 |
EDFUJSA |
Save TCTEJSA |
| (B4) |
FULLWORD |
4 |
EDFWSLN |
LENGTH OF WORKING STORAGE |
| (B8) |
|
4 |
EDFUTXNO |
User task's transaction number |
| (BC) |
FULLWORD |
4 |
EDFERMSA |
NEW ERM EDF INTERFACE |
| (C0) |
FULLWORD |
4 |
EDFSITOD |
IPL TIME OF DAY IN SECONDS |
| (C4) |
CHARACTER |
4 |
EDFUTXID |
User's transaction id |
| (C8) |
BITSTRING |
1 |
EDFCTL5 |
FLAG BYTE INDICATING NEW ERM IFC |
| (C8) |
.... .1.. |
|
EDFSTKCM |
"X'04'" Command from user exit |
| (C9) |
BITSTRING |
1 |
EDFCTL6 |
flag byte |
| (C9) |
1... .... |
|
EDFRABND |
"X'80'" DPL remote abend indicator |
| (C9) |
.1.. .... |
|
EDFRPEND |
"X'40'" User task suspended, pending RESUME |
| (CA) |
HALFWORD |
2 |
EDFSTKC |
Programs EDF stack level |
| (CC) |
FULLWORD |
4 |
EDFTCAAD |
1st EDF Task's TCA address |
| (D0) |
FULLWORD |
4 |
(0) |
| (D0) |
CHARACTER |
128 |
EDFREGS (0) |
| (D0) |
DBL WORD |
8 |
(16) |
GP registers 0-15 at abend |
---------------------------------------------------------------------
The DLA_USAGE fields are flags to identify those tasks which have
need of the Debug Linkage Area. The DLA can only be freed when
all of the tasks have relinquished ownership.
---------------------------------------------------------------------
|
| (150) |
CHARACTER |
8 |
EDF_DLA_USAGE (0) |
Area controlling DLA |
| (150) |
|
4 |
EDF_DLA_USER_TASK_USE |
Task running DFHEDFX |
| (154) |
|
4 |
EDF_DLA_CEDF_TASK_USE |
CEDF running EDFP/EDFD |
| (154) |
|
0 |
EDFDSLEN |
"*-DFHEDFDS" LENGTH OF DFHEDFDS |