|
Hex Dec Type/Val Lng Label (dup) Comments
---- ---- --------- ---- -------------- --------
0000 0 Structure $VPXBK Relocation mapping for HCPVPXBK
00000001 $VPX_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 $VPX_HDRL Header length (in bytes)
0002 2 Signed 2 $VPX_BITL Length of mapped bits (in bytes)
0004 4 Signed 4 * Reserved for future use
00000008 $VPX_HDLN *-$VPXBK Length of header (bytes)
Bit map: Contains the VPXBK flags that are subject to
relocation. These bits are defined sequentially,
regardless of how they are defined in HCPVPXBK.
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 $VPX_BITS (0) Bit map area
0008 8 Bitstring 1 $VPX0
1... .... $VPXTT0V X'80' $VPXTT0V VPXFLAG1
.1.. .... $VPXTT1V X'40' $VPXTT1V VPXFLAG1
..1. .... $VPXTT2V X'20' $VPXTT2V VPXFLAG1
...1 .... $VPXTT3V X'10' $VPXTT3V VPXFLAG1
.... 1... $VPXBTS X'08' $VPXBTS VPXFLAG1
.... .1.. $VPX4WCGM X'04' $VPX4WCGM VPXFLAG1
.... ..1. $VPXBLKDC X'02' $VPXBLKDC VPXFLAG1
.... ...1 $VPXALLDC X'01' $VPXALLDC VPXFLAG1
0009 9 Bitstring 1 $VPX1
1... .... $VPXCLPRS X'80' $VPXCLPRS VPXFLAG2
.1.. .... $VPXBIGBF X'40' $VPXBIGBF VPXFLAG2
..1. .... $VPXOVPRT X'20' $VPXOVPRT VPXFLAG2
...1 .... $VPXNORML X'10' $VPXNORML VPXFLAG2
.... 1... $VPXLFCB X'08' $VPXLFCB VPXFLAG2
.... .1.. $VPXB4WCG X'04' $VPXB4WCG VPXBFTR1
.... ..1. $VPXBBTS X'02' $VPXBBTS VPXBFTR1
.... ...1 $VPXBBTS3 X'01' $VPXBBTS3 VPXBPLNI
00000002 $VPX_BLEN *-$VPX_BITS Length of bit map
area
Data: Contains all HCPVPXBK 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.
000A 10 Bitstring 1 $VPX_DATA (0) Start of data map
000A 10 Bitstring 2 $VPXLCNT CURRENT LINE NUMBER
000C 12 Bitstring 2 $VPXPAGID CHANNEL PAGE ID
000E 14 Bitstring 2 $VPXLODCK RELATIVE DISPLACEMENT FOR LOAD
CHECKS
0010 16 Bitstring 1 $VPXWIDTH CODE FOR FORMS WIDTH
0011 17 Bitstring 1 $VPXLENTH CODE FOR FORMS LENGTH
0012 18 Bitstring 1 $VPXWCGM0 CONTENTS OF WCGM 0
0013 19 Bitstring 1 $VPXWCGM1 CONTENTS OF WCGM 1
0014 20 Bitstring 1 $VPXWCGM2 CONTENTS OF WCGM 2
0015 21 Bitstring 1 $VPXWCGM3 CONTENTS OF WCGM 3
0016 22 Bitstring 1 $VPXCURTT CURRENT TRANSLATE TABLE
0017 23 Bitstring 1 $VPXSVCCW CURRENT CCW COMMAND CODE
0018 24 Bitstring 4 $VPXIBUFC DATA COUNT FOR INTERMEDIATED
BUFFER
001C 28 Bitstring 2 $VPXBCPID CHANNEL PAGE ID
001E 30 Bitstring 2 $VPXBLINP FCB LINE POSITION
0020 32 Bitstring 2 $VPXBSPID STACKED PAGE ID
0022 34 Bitstring 2 $VPXBFPID FUSER PAGE ID
0024 36 Bitstring 2 $VPXBTPID TRANSFER PAGE ID
0026 38 Bitstring 1 $VPXBFWTH FORMS WIDTH CODE
0027 39 Bitstring 1 $VPXBFLNG LENGTH OF CURR PAGE (1/2 IN)
0028 40 Bitstring 1 $VPXBWCG0 WCGM 0 ID
0029 41 Bitstring 1 $VPXBWCG1 WCGM 1 ID
002A 42 Bitstring 1 $VPXBWCG2 WCGM 2 ID
002B 43 Bitstring 1 $VPXBWCG3 WCGM 3 ID
002C 44 Bitstring 1 $VPXBSTG STORAGE SIZE, 3800-3
002D 45 Bitstring 144 $VPXFCB FCB CURRENTLY LOADED
00BD 189 Bitstring 256 $VPXTRT0 BYTE MAP FOR UNPRINTABLE
01BD 445 Bitstring 256 $VPXTRT1 CHARACTERS FOR EACH
02BD 701 Bitstring 256 $VPXTRT2 OF THE POSSIBLE
03BD 957 Bitstring 256 $VPXTRT3 TRANSLATE TABLES
04BD 1213 Bitstring 204 $VPXOVMAP MAP FOR OVERPRINT DETECTION
00000589 $VPX_LEN *-$VPXBK Total length, in bytes
000000B2 $VPXSIZE ($VPX_LEN+7)/8 $VPXBK DWord size
| |