| |
Hex Dec Type/Val Lng Label (dup) Comments
---- ---- --------- ---- -------------- --------
0000 0 Structure DLJBK Mapping of HCPDLJ and HCPDLK Common Area
0000 0 Character 8 DLJEYE Eyecatcher String
HCPDLJFD specific fields
0008 8 Signed 4 * Reserved for IBM Use
000C 12 Signed 4 InDevTyp Device type of input device
0010 16 Signed 4 * Reserved for IBM Use
0014 20 Address 4 SDWBK@ Addr in buffer of SDWBK
0018 24 Address 4 SympRec@ Addr in buffer of Symptom Record
001C 28 Address 4 DFMBK@ Addr in buffer of DFMBK
0020 32 Address 4 SDXBK@ Addr in buffer of SDXBK
0024 36 Address 4 SDSBK@ Addr in buffer of SDSBK
0028 40 Address 4 DFIZ@ Addr in buffer of DFIZ
HCPDLJFP internal fields
002C 44 Signed 4 * Reserved for IBM Use
HCPDLK Input Fields
0030 48 Bitstring 1 REQ_Type Input Flags
1... .... GETNEXT X'80' GETNEXT Request is for next
record
0031 49 Bitstring 1 * (3) Reserved for IBM Use
0034 52 Signed 4 REQ_Last Last CCHH or record of partition
0038 56 Signed 4 REQ_DevE Requested Device (EBCDIC)
003C 60 Address 4 TrkBuf@ Addr of buffer for curr track
0040 64 Signed 4 REQ_CCHH HCPDLKGR - Requested CCHH
0044 68 Signed 4 REQ_Rec HCPDLKGR - Requested Record
0048 72 Signed 4 REQ_RecFB HCPDLKFB - Requested Record
004C 76 Signed 4 * Reserved for IBM Use
HCPDLK Common Output Fields
0050 80 Address 4 RecHeadPtr If 3390, this is addr of header
of current record in buffer
0054 84 Address 4 RecPtr Addr of curr record in buffer
0058 88 Signed 4 ReasCode Possible reason code to further
decribe return code.
005C 92 Signed 4 * Reserved for IBM Use
HCPDLK common internal fields
0060 96 Signed 4 REQ_Dev Requested Device (binary)
0064 100 Signed 4 CURR_Dev Current Device (binary)
0068 104 Signed 4 CURR_DevE Current Device (EBCDIC)
006C 108 Bitstring 1 DLKFlags HCPDLK Persistent Flags
.1.. .... DevOpen X'40' DevOpen A device is 'open',
If ON, then CURR_Dev, CURR_DevE,
CURR_CCHH, CURR_Rec and
CURR_DevSz contain information.
006D 109 Bitstring 1 * (3) Reserved for IBM Use
HCPDLKFB internal fields
0070 112 Signed 4 DLKFBRC Return Code from HCPDLKFB
0074 116 Signed 4 CURR_RecFB Current Record
0078 120 Signed 4 CURR_SizFB Curr Dev Size (Blocks)
007C 124 Signed 4 * Reserved for IBM Use
HCPDLKGR internal fields
0080 128 Signed 4 DLKGRRC Return Code from HCPDLKGR
0084 132 Signed 4 CURR_CCHH Current CCHH
0088 136 Signed 4 CURR_Rec Current Record
008C 140 Signed 4 CURR_DevSz Curr Dev Size (Cyl)
0090 144 Signed 4 DIAGA8RC RC from DIAG A8
0094 148 Signed 4 BytesRead Size of track in buffer
0098 152 Signed 4 * Reserved for IBM Use
009C 156 Signed 4 * Reserved for IBM Use
00A0 160 Dbl-Word 8 CCWEYE Eyecatcher above CCW area
00A8 168 Dbl-Word 8 CCW1 Define Extent
00B0 176 Dbl-Word 8 CCW2 Locate Record
00B8 184 Dbl-Word 8 CCW3 Read Track
00C0 192 Bitstring 16 DEFEXT Define Extent Data Area
00D0 208 Bitstring 16 LOCATE Locate Record Data Area
00E0 224 Signed 4 * (4) Reserved for IBM Use
More HCPDLK Common internal fields
00F0 240 Dbl-Word 8 * (0)
00F0 240 Bitstring 88 SGIBAREA SGIOB Work Area
00000148 DLJSIZE *-DLJBK Size of this block in
bytes
DSECT for Record n
| |