DLJBK Back to Index page
 
Prolog 
Control Block Contents 
   DLJBK DSECT
Storage Layout 
Cross Reference (Contains links to field and bit definitions)
Programming Interface Information:
This information is NOT intended to be
used as Programming Interfaces of z/VM.


  DLJBK Prolog Top of page
 
 NAME       : HCPDLJBK
 DESCRIPTION: Mapping of HCPDLJ and HCPDLK Common Area
 DSECT      : DLJBK
 FUNCTION   : The DLJBK maps the common data area that is used by
              HCPDLJ and HCPDLK.
 LOCATED BY : CommAr pointer in WKAREA DSECT.
 CREATED BY : HCPDLJ using CMSSTOR macro.
 DELETED BY : HCPDLJ using CMSSTOR macro.
 REFERENCES :
 SERIALIZED :
 RELOCATION CONSIDERATIONS : None, allocated in CMS Storage
 COMPATIBILITY AND MIGRATION CONCERNS : None
 NOTES      :
 
 
  DLJBK Control Block Content Top of page
 

 DLJBK DSECT Top of page
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
 
 
  DLJBK Storage Layout Top of page
 
          
*** DLJBK - Mapping of HCPDLJ and HCPDLK Common Area
*
*     +-------------------------------------------------------+
*   0 |                        DLJEYE                         |
*     +---------------------------+---------------------------+
*   8 |///////////////////////////|         INDEVTYP          |
*     +---------------------------+---------------------------+
*  10 |///////////////////////////|          SDWBK@           |
*     +---------------------------+---------------------------+
*  18 |         SYMPREC@          |          DFMBK@           |
*     +---------------------------+---------------------------+
*  20 |          SDXBK@           |          SDSBK@           |
*     +---------------------------+---------------------------+
*  28 |          DFIZ@            |///////////////////////////|
*     +------+--------------------+---------------------------+
*  30 |:_TYPE|////////////////////|         REQ_LAST          |
*     +------+--------------------+---------------------------+
*  38 |         REQ_DEVE          |         TRKBUF@           |
*     +---------------------------+---------------------------+
*  40 |         REQ_CCHH          |         REQ_REC           |
*     +---------------------------+---------------------------+
*  48 |        REQ_RECFB          |///////////////////////////|
*     +---------------------------+---------------------------+
*  50 |        RECHEADPTR         |          RECPTR           |
*     +---------------------------+---------------------------+
*  58 |         REASCODE          |///////////////////////////|
*     +---------------------------+---------------------------+
*  60 |         REQ_DEV           |         CURR_DEV          |
*     +---------------------------+------+--------------------+
*  68 |        CURR_DEVE          |:FLAGS|////////////////////|
*     +---------------------------+------+--------------------+
*  70 |         DLKFBRC           |        CURR_RECFB         |
*     +---------------------------+---------------------------+
*  78 |        CURR_SIZFB         |///////////////////////////|
*     +---------------------------+---------------------------+
*  80 |         DLKGRRC           |        CURR_CCHH          |
*     +---------------------------+---------------------------+
*  88 |         CURR_REC          |        CURR_DEVSZ         |
*     +---------------------------+---------------------------+
*  90 |         DIAGA8RC          |        BYTESREAD          |
*     +---------------------------+---------------------------+
*  98 |///////////////////////////|///////////////////////////|
*     +---------------------------+---------------------------+
*  A0 |                        CCWEYE                         |
*     +-------------------------------------------------------+
*  A8 |                         CCW1                          |
*     +-------------------------------------------------------+
*  B0 |                         CCW2                          |
*     +-------------------------------------------------------+
*  B8 |                         CCW3                          |
*     +-------------------------------------------------------+
*  C0 |                        DEFEXT                         |
*     |                                                       |
*     +-------------------------------------------------------+
*  D0 |                        LOCATE                         |
*     |                                                       |
*     +-------------------------------------------------------+
*  E0 |///////////////////////////////////////////////////////|
*     |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  F0 |                                                       |
*     =                       SGIBAREA                        =
*     |                                                       |
*     +-------------------------------------------------------+
* 148
*
*** DLJBK - Mapping of HCPDLJ and HCPDLK Common Area
 
 
  DLJBK Cross Reference Top of page
 
 
Symbol         Dspl Value
-------------- ---- -----
BytesRead      0094
CCWEYE         00A0
CCW1           00A8
CCW2           00B0
CCW3           00B8
CURR_CCHH      0084
CURR_Dev       0064
CURR_DevE      0068
CURR_DevSz     008C
CURR_Rec       0088
CURR_RecFB     0074
CURR_SizFB     0078
DevOpen        006C 40
DEFEXT         00C0
DFIZ@          0028
DFMBK@         001C
DIAGA8RC       0090
DLJEYE         0000
DLJSIZE        00F0 00000148
DLKFlags       006C
DLKFBRC        0070
DLKGRRC        0080
GETNEXT        0030 80
InDevTyp       000C
LOCATE         00D0
ReasCode       0058
RecHeadPtr     0050
RecPtr         0054
REQ_CCHH       0040
REQ_Dev        0060
REQ_DevE       0038
REQ_Last       0034
REQ_Rec        0044
REQ_RecFB      0048
REQ_Type       0030
SympRec@       0018
SDSBK@         0024
SDWBK@         0014
SDXBK@         0020
SGIBAREA       00F0
TrkBuf@        003C
 
This information is based on z/VM 7.3.0 Last updated on 22 Jun 2022 at 15:49:08 EDT.
Copyright IBM Corporation, 1990, 2022