NAME       : HCPWIDBK
 DESCRIPTION: Work Indirect Data address BlocK
 DSECT      : WIDBK
 FUNCTION   :
              This block is used to contain a list of indirect
              address words (IDAW) and counts that identifies
              discontinuous storage buffers to IUCV
 LOCATED BY :
              WEIWIDBK - Address of buffer list WIDBK
              (located in WEIBK)
              WEIWIDSN - Send list WIDBK copy address
              (located in WEIBK)
              WEIWIDAN - Answer list WIDBK copy address
              (located in WEIBK)
 CREATED BY :
              HCPBOYGO - Logo WEIBK builder
              HCPVCERI - SNA Full-Screen Read Interface Routine
              HCPVCMIX - IUCV SEND issuer
              HCPVCYSM - SNA Full-Screen and DIAL Simulator
 DELETED BY :
              HCPVCERI - SNA Full-Screen Read Interface Routine
              HCPVCFRD - SNA Full-Screen Read Initiator
              HCPVCGWT - SNA Full-Screen Write Initiator
              HCPVCMIN - SNABK input chain control block releaser
              HCPVCMIX - IUCV SEND issuer
              HCPVCMUT - SNABK output chain control block releaser
              HCPVCXCU - Unchain an eligible VSM logo WEIBK
              HCPVCYSM - SNA Full-Screen and DIAL Simulator
 SERIALIZED :
              None
              Since this block is only accessed thru a WEIBK, access
              to this block's data must be serialized thru the
              owning WEIBK's serialization.
 RELOCATION CONSIDERATIONS : None

 WIDBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      WIDBK          Work Indirect Data address BlocK
0000    0 Dbl-Word     8 WIDHDR1 (0)    WIDBK header
0000    0 Signed       4 WIDWEBA1       WEBBK address
0004    4 Signed       4 WIDWEBL1       WEBBK length
          00000008       WIDHDRSZ       *-WIDHDR1 WIDBK header length
0008    8 Dbl-Word     8 WIDELMT (0)    First IDA element
0008    8 Signed       4 WIDADDR        Address of IDA buffer
000C   12 Signed       4 WIDCOUNT       Byte count of IDA buffer
          00000008       WIDELMSZ       *-WIDELMT IDA element length

 
*** WIDBK - Work Indirect Data address BlocK
*
*     +---------------------------+---------------------------+
*   0 |         WIDWEBA1          |         WIDWEBL1          |
*     +---------------------------+---------------------------+
*   8 |         WIDADDR           |         WIDCOUNT          |
*     +---------------------------+---------------------------+
*  10
*
*** WIDBK - Work Indirect Data address BlocK

 
Symbol         Dspl Value
-------------- ---- -----
WIDADDR        0008
WIDCOUNT       000C
WIDELMSZ       000C 00000008
WIDELMT        0008
WIDHDRSZ       0004 00000008
WIDHDR1        0000
WIDWEBA1       0000
WIDWEBL1       0004