NAME       : HCPDIUCV
 DESCRIPTION: DIRECTORY IUCV BLOCK
 DSECT      : DIUCV
 FUNCTION   : TO PRESERVE INFORMATION FROM THE "IUCV"
              DIRECTORY CONTROL STATEMENT.  THERE WILL
              BE ONE HCPDIUCV CREATED FOR EACH "IUCV"
              STATEMENT IN THE SOURCE DIRECTORY.
 LOCATED BY : FIELDS DVMDIDAS AND DVMDIDSP IN DVMD
              FIELDS DIUCDASD AND DIUCDISP IN DIUCV
              GPR2 IN HCPIUBAC
              GPR2 IN HCPIUBCO
              GPR2 in HCPIUPCO
              GPR5 in HCPUDRIA
              GPR5 in HCPUDRID
 CREATED BY : HCPDIR, HCPUDRIA
 DELETED BY : HCPIUBAC, HCPIUBCO, HCPIUPCO
 RELOCATION CONSIDERATIONS : None

 DIUCV DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      DIUCV          DIRECTORY IUCV BLOCK
0000    0 Character    8 DIUCUSER       USERID AUTHORIZED TO CONNECT TO
0008    8 Signed       4 DIUCDASD       DASD ADDRESS OF NEXT DIUCV CCPV
                                        for CKD DASD addresses PPPV for
                                        FBA DASD addresses
000C   12 Signed       2 DIUCDISP       DISPLACEMENT OF NEXT DIUCV
000E   14 Signed       2 DIUCMLIM       MESSAGE LIMIT
0010   16 Bitstring    1 DIUCSTAT       FLAGS
          1... ....      DIUCPRTY       X'80' DIUCPRTY PRIORITY WAS
                                        SPECIFIED
0011   17 Bitstring    1 DIUCFLAG       Flags for IUCV *IDENT dir. stmt.
          1... ....      DIUCGWAY       X'80' DIUCGWAY DIUCNAME is a
                                        gateway_LU
          .1.. ....      DIUCGLBL       X'40' DIUCGLBL DIUCNAME is a
                                        global resource
          ..1. ....      DIUCLCL        X'20' DIUCLCL DIUCNAME is a local
                                        resource
          .... ..1.      DIUCRVK        X'02' DIUCRVK Authorized to
                                        revoke
          .... ...1      DIUCIDEN       X'01' DIUCIDEN Authorized to
                                        identify
0012   18 Bitstring    6 *              Reserved for future IBM use
0018   24 Character    8 DIUCNAME       "RESANY", "GATEANY", or name of
                                        resource/gateway_LU (Only for
                                        IUCV *IDENT dir. stmt.)
          00000004       DIUCSIZE       (*-DIUCV+7)/8 DIUCV SIZE IN DW'S
          00000020       DIUCLEN        (*-DIUCV) DIUCV SIZE IN BYTES

          
*** DIUCV - DIRECTORY IUCV BLOCK
*
*     +-------------------------------------------------------+
*   0 |                       DIUCUSER                        |
*     +---------------------------+-------------+-------------+
*   8 |         DIUCDASD          |  DIUCDISP   |  DIUCMLIM   |
*     +------+------+-------------+-------------+-------------+
*  10 |:CSTAT|:CFLAG|/////////////////////////////////////////|
*     +------+------+-----------------------------------------+
*  18 |                       DIUCNAME                        |
*     +-------------------------------------------------------+
*  20
*
*** DIUCV - DIRECTORY IUCV BLOCK

 
Symbol         Dspl Value
-------------- ---- -----
DIUCDASD       0008
DIUCDISP       000C
DIUCFLAG       0011
DIUCGLBL       0011 40
DIUCGWAY       0011 80
DIUCIDEN       0011 01
DIUCLCL        0011 20
DIUCLEN        0018 00000020
DIUCMLIM       000E
DIUCNAME       0018
DIUCPRTY       0010 80
DIUCRVK        0011 02
DIUCSIZE       0018 00000004
DIUCSTAT       0010
DIUCUSER       0000