NAME       : LGRDVLBK
 DESCRIPTION: Relocation mapping for HCPDVLBK
 DSECT      : $DVLBK
 FUNCTION   : LGRDVLBK describes those fields of the DVLBK that
              will be migrated to the destination system during
              guest relocation.
 LOCATED BY : This is a mapping of the RDODATA area within the
              RDOBK during guest relocation.
 CREATED BY : HCPRLFLF - DVLBK Formatter for LGR
 DELETED BY : HCPRLDRL - Release storage associated with an RDP
 RELOCATION CONSIDERATIONS : This control block is used during live guest
              relocation.  It is used to relocate a control block
              defined in a corresponding HCP COPY file.  Any
              fields or bits defined in HCPDVLBK which are
              required on the destination system must be defined
              here, and code must be added to migrate the field
              or bit during a relocation.

 $DVLBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      $DVLBK         Relocation mapping for HCPDVLBK
          00000001       $DVL_VER       1 Mapping version number for this
                                        DSECT. Version is independent of
                                        the CP level and need only be
                                        changed when this DSECT is
                                        changed. The convention is to
                                        increment by 1.
0000    0 Signed       2 $DVL_HDRL      Header length (in bytes)
0002    2 Signed       2 $DVL_BITL      Length of mapped bits (in bytes)
0004    4 Signed       4 *              Reserved for future use
          00000008       $DVL_HDLN      *-$DVLBK Length of header (bytes)
      Bit map: Contains the DVLBK flags that are subject to
               relocation. These bits are defined sequentially,
               regardless of how they are defined in HCPDVLBK.
               This yields a consistent mapping that ensures
               compatibility when a guest is relocated between
               systems at differing service levels.
               Names in the comments column indicate the control
               block byte which contains the flag. This name is
               subject to change if the flag definition changes.
         ====> NEVER change bits which already exist here.
         ====> NEVER change the order of bits in this section.
         ====> ALWAYS add new bits at the end of this section,
               together with new flag bytes as required.
0008    8 Signed       2 $DVL_BITS (0)  Bit map area
          00000000       $DVL_BLEN      *-$DVL_BITS Length of bit map
                                        area
      Data:    Contains all HCPDVLBK data that is subject to
               relocation, except for flag bits, which are
               handled separately.
               All fields are defined as XLnn to avoid alignment
               warnings and to pack the data efficiently.
         ====> NEVER change fields which already exist here.
         ====> NEVER change the order of fields in this section.
         ====> ALWAYS add new fields at the end of this section.
               together with new flag bytes as required.
0008    8 Bitstring    1 $DVL_DATA (0)  Start of data map
      DVL Header definition
0008    8 Bitstring    4 $DVLHFRST      First DVLRANGE
000C   12 Bitstring    4 $DVLHSOFR      DVLRANGE where GD left off
0010   16 Bitstring    4 $DVLHLAST      Last DVLRANGE
0014   20 Bitstring    4 $DVLHMXNM      Maximum OK number
0018   24 Bitstring    4 $DVLHADBM      Address of Already Done Bit Map
001C   28 Bitstring    4 *              Reserved for future IBM use
      DVL Range definition
0008    8 Bitstring    4 $DVLRNEXT      Next DVLRANGE in list
000C   12 Bitstring    4 $DVLRFRST      First number in range
0010   16 Bitstring    4 $DVLRSOFR      Number where GD left off
0014   20 Bitstring    4 $DVLRLST       Last number in range
0018   24 Bitstring    4 $DVLRCNT       Count of numbers in range
001C   28 Bitstring    4 $DVLRESET      0 ==> not processed yet
          00000020       $DVLBYSZ       *-$DVLBK Byte length of $DVLBK
          00000004       $DVLSIZE       ((*-$DVLBK)+7)/8 DWord length of
                                        $DVLBK

          
*** $DVLBK - Relocation mapping for HCPDVLBK
*
*     +-------------+-------------+---------------------------+
*   0 | $DVL_HDRL   | $DVL_BITL   |///////////////////////////|
*     +-------------+-------------+---------------------------+
*   8 |        $DVLHFRST          |        $DVLHSOFR          |
*     +---------------------------+---------------------------+
*  10 |        $DVLHLAST          |        $DVLHMXNM          |
*     +---------------------------+---------------------------+
*  18 |        $DVLHADBM          |///////////////////////////|
*     +---------------------------+---------------------------+
*  20
*
*** $DVLBK - Relocation mapping for HCPDVLBK
          
*** Overlay for $DVL_DATA in $DVLBK
*
*     +---------------------------+---------------------------+
*   8 |        $DVLRNEXT          |        $DVLRFRST          |
*     +---------------------------+---------------------------+
*  10 |        $DVLRSOFR          |         $DVLRLST          |
*     +---------------------------+---------------------------+
*  18 |         $DVLRCNT          |        $DVLRESET          |
*     +---------------------------+---------------------------+
*  20
*
*** Overlay for $DVL_DATA in $DVLBK

 
Symbol         Dspl Value
-------------- ---- -----
$DVL_BITL      0002
$DVL_BITS      0008
$DVL_BLEN      0008 00000000
$DVL_DATA      0008
$DVL_HDLN      0004 00000008
$DVL_HDRL      0000
$DVL_VER       0000 00000001
$DVLBYSZ       001C 00000020
$DVLHADBM      0018
$DVLHFRST      0008
$DVLHLAST      0010
$DVLHMXNM      0014
$DVLHSOFR      000C
$DVLRCNT       0018
$DVLRESET      001C
$DVLRFRST      000C
$DVLRLST       0014
$DVLRNEXT      0008
$DVLRSOFR      0010
$DVLSIZE       001C 00000004