NAME       : LGRVSPBK
 DESCRIPTION: Relocation mapping for HCPVSPBK
 DSECT      : $VSPBK
 FUNCTION   : LGRVSPBK describes those fields of the VSPBK 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 : HCPRLFPF - VSPBK 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 HCPVSPBK 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.

 $VSPBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      $VSPBK         Relocation mapping for HCPVSPBK
          00000001       $VSP_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 $VSP_HDRL      Header length (in bytes)
0002    2 Signed       2 $VSP_BITL      Length of mapped bits (in bytes)
0004    4 Signed       4 *              Reserved for future use
          00000008       $VSP_HDLN      *-$VSPBK Length of header (bytes)
      Bit map: Contains the VSPBK flags that are subject to
               relocation. These bits are defined sequentially,
               regardless of how they are defined in HCPVSPBK.
               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 $VSP_BITS (0)  Bit map area
0008    8 Bitstring    1 $VSP0
          1... ....      $VSPRDR        X'80' $VSPRDR VSPQFLG
          .1.. ....      $VSPPUN        X'40' $VSPPUN VSPQFLG
          ..1. ....      $VSPPRT        X'20' $VSPPRT VSPQFLG
          ...1 ....      $VSPSRCID      X'10' $VSPSRCID VSPQFLG
          .... 1...      $VSPACTV       X'08' $VSPACTV VSPCFLG
          .... .1..      $VSPCPYZ       X'04' $VSPCPYZ VSPCFLG
          .... ..1.      $VSPFLALL      X'02' $VSPFLALL VSP3800F
0009    9 Bitstring    1 $VSP1
          1... ....      $VSPCONT       X'80' $VSPCONT VSPOFLG
          .1.. ....      $VSPHOLD       X'40' $VSPHOLD VSPOFLG
          ..1. ....      $VSPKEEP       X'20' $VSPKEEP VSPOFLG
          ...1 ....      $VSPMSG        X'10' $VSPMSG VSPOFLG
          .... 1...      $VSPSTRT       X'08' $VSPSTRT VSPOFLG
          .... .1..      $VSPTERM       X'04' $VSPTERM VSPOFLG
          .... ..1.      $VSPEOF        X'02' $VSPEOF VSPOFLG
          .... ...1      $VSPFOR        X'01' $VSPFOR VSPOFLG
000A   10 Bitstring    2 $VSP2
          1... ....      $VSPRDEFF      X'80' $VSPRDEFF VSPGFLAG
          .1.. ....      $VSPRSCN       X'40' $VSPRSCN VSPGFLAG
          00000004       $VSP_BLEN      *-$VSP_BITS Length of bit map
                                        area
      Data:    Contains all HCPVSPBK 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.
000C   12 Bitstring    1 $VSP_DATA (0)  Start of data map
000C   12 Bitstring    1 $VSPLPP        Lines-per-page value (00 or
                                        30-255)
000D   13 Bitstring    1 $VSPCOPY       FILE COPY COUNT
000E   14 Bitstring    1 $VSPPGCPY      PAGE COPY COUNT (USED ONLY FOR
                                        3800)
000F   15 Bitstring    1 $VSPFLSHC      3800 FLASH COUNT FOR SPOOL FILES
0010   16 Bitstring    1 $VSPMODNO      3800 COPY MOD CHAR SET NUMBER
                                        (0-3)
0011   17 Bitstring    1 $VSPCLASS      SPOOL CLASS (A-Z OR 0-9)
0012   18 Bitstring    8 $VSPUSER       USERID TO RECIEVE RESULTING SPOOL
                                        FILES
001A   26 Bitstring    8 $VSPDIST       DISTRIBUTION CODE
0022   34 Bitstring    8 $VSPDEST       DESTination field
002A   42 Bitstring    8 $VSPFINAM      FILENAME
0032   50 Bitstring    8 $VSPFITYP      FILETYPE
003A   58 Bitstring    8 $VSPFORM       FORM NAME
0042   66 Bitstring    4 $VSPFLASH      3800 FORMS OVERLAY (FLASH) NAME
0046   70 Bitstring    4 $VSPFCB        3800 FORMS CONTROL BUFFER (FCB)
                                        NAME
004A   74 Bitstring    4 $VSPCMOD       3800 COPY MODIFICATION NAME
004E   78 Bitstring    4 $VSPCHAR0      3800 CHARACTER SET NAME - FIRST
0052   82 Bitstring    4 $VSPCHAR1      3800 CHARACTER SET NAME - SECOND
0056   86 Bitstring    4 $VSPCHAR2      3800 CHARACTER SET NAME - THIRD
005A   90 Bitstring    4 $VSPCHAR3      3800 CHARACTER SET NAME - FOURTH
005E   94 Bitstring    8 $VSPSRCND      Diagnose X'F8' original node
0066  102 Bitstring    8 $VSPSRCUS      Diagnose X'F8' original userid
006E  110 Bitstring    4 $VSPGSDT       POINTER TO GSDBK CONTAINING TAG
                                        DATA
0072  114 Bitstring    2 $VSPGSDL       GSDDCNT from VSPGSDT (GSDDATA
                                        length)
          00000074       $VSP_LEN       *-$VSPBK Total length, in bytes
          0000000F       $VSPSIZE       ($VSP_LEN+7)/8 $VSPBK DWord size

          
*** $VSPBK - Relocation mapping for HCPVSPBK
*
*     +-------------+-------------+---------------------------+
*   0 | $VSP_HDRL   | $VSP_BITL   |///////////////////////////|
*     +------+------+-------------+------+------+------+------+
*   8 |$VSP0 |$VSP1 |   $VSP2     |:PLPP |:PCOPY|(00E) |(00F) |
*     +------+------+-------------+------+------+------+------+
*  10 |(010) |(011) |               $VSPUSER-                 |
*     +------+------+-----------------------------------------+
*  18 |   -(012)    |               $VSPDIST-                 |
*     +-------------+-----------------------------------------+
*  20 |   -(01A)    |               $VSPDEST-                 |
*     +-------------+-----------------------------------------+
*  28 |   -(022)    |               $VSPFINAM-                |
*     +-------------+-----------------------------------------+
*  30 |   -(02A)    |               $VSPFITYP-                |
*     +-------------+-----------------------------------------+
*  38 |   -(032)    |               $VSPFORM-                 |
*     +-------------+---------------------------+-------------+
*  40 |   -(03A)    |        $VSPFLASH          |  $VSPFCB-   |
*     +-------------+---------------------------+-------------+
*  48 |   -(046)    |         $VSPCMOD          | $VSPCHAR0-  |
*     +-------------+---------------------------+-------------+
*  50 |   -(04E)    |        $VSPCHAR1          | $VSPCHAR2-  |
*     +-------------+---------------------------+-------------+
*  58 |   -(056)    |        $VSPCHAR3          |   (05E)-    |
*     +-------------+---------------------------+-------------+
*  60 |               -$VSPSRCND                |   (066)-    |
*     +-----------------------------------------+-------------+
*  68 |               -$VSPSRCUS                | $VSPGSDT-   |
*     +-------------+-------------+-------------+-------------+
*  70 |   -(06E)    |  $VSPGSDL   | 74
*     +-------------+-------------+
*
*** $VSPBK - Relocation mapping for HCPVSPBK

 
Symbol         Dspl Value
-------------- ---- -----
$VSP_BITL      0002
$VSP_BITS      0008
$VSP_BLEN      000A 00000004
$VSP_DATA      000C
$VSP_HDLN      0004 00000008
$VSP_HDRL      0000
$VSP_LEN       0072 00000074
$VSP_VER       0000 00000001
$VSPACTV       0008 08
$VSPCHAR0      004E
$VSPCHAR1      0052
$VSPCHAR2      0056
$VSPCHAR3      005A
$VSPCLASS      0011
$VSPCMOD       004A
$VSPCONT       0009 80
$VSPCOPY       000D
$VSPCPYZ       0008 04
$VSPDEST       0022
$VSPDIST       001A
$VSPEOF        0009 02
$VSPFCB        0046
$VSPFINAM      002A
$VSPFITYP      0032
$VSPFLALL      0008 02
$VSPFLASH      0042
$VSPFLSHC      000F
$VSPFOR        0009 01
$VSPFORM       003A
$VSPGSDL       0072
$VSPGSDT       006E
$VSPHOLD       0009 40
$VSPKEEP       0009 20
$VSPLPP        000C
$VSPMODNO      0010
$VSPMSG        0009 10
$VSPPGCPY      000E
$VSPPRT        0008 20
$VSPPUN        0008 40
$VSPRDEFF      000A 80
$VSPRDR        0008 80
$VSPRSCN       000A 40
$VSPSIZE       0072 0000000F
$VSPSRCID      0008 10
$VSPSRCND      005E
$VSPSRCUS      0066
$VSPSTRT       0009 08
$VSPTERM       0009 04
$VSPUSER       0012
$VSP0          0008
$VSP1          0009
$VSP2          000A