NAME       : BGCOM
 DESCRIPTION: VSE Partition Communication Region
 DSECT      : BGCOM
 FUNCTION   : BGCOM simulates the DOS/VS Partition
              Communication Region (BGCOM). The ABGCOM field
              in NUCON points to the BGCOM block. BGCOM is
              called by the BGCOM macro.

 BGCOM DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      BGCOM          VSE Partition Communication Region
0000    0 Character    8 JOBDATE        . 00 JOB DATE
0008    8 Character    1 *              . 08
0009    9 Character    2 SYSCENT        . 09 CENTURY ('19', '20' etc.)
000B   11 Bitstring    1 *              11 RESERVED
000C   12 Bitstring    1 COMUSCR (11)   . 12 USER SCRATCH AREA
0017   23 Bitstring    1 UPSI           . 23 UPSI BYTE
0018   24 Character    8 COMNAME        . 24 JOB NAME
0020   32 Address      4 PPEND          . 32 HIGHEST STORAGE ADDRESS OF
                                        PARTITION
0024   36 Address      4 HIPHAS         . 36 END ADDRESS OF LAST PHASE
                                        LOADED
0028   40 Address      4 HIPROG         . 40 END ADDRESS OF LONGEST PHASE
                                        LOADED
002C   44 Signed       2 LABLEN         . 44 LENGTH OF PROBLEM PROGRAM
                                        LABEL AREA
002E   46 Bitstring    2 PIK            . 46 PROGRAM INTERRUPT KEY
0030   48 Address      4 EOCADR         . 48 END OF VIRTUAL STORAGE
                                        ADDRESS
0034   52 Bitstring    1 CONFIG         . 52 MACHINE CONFIGURATION BYTE
0035   53 Bitstring    1 LTACT          . 53 SYSTEM CONFIGURATION BYTE
0036   54 Bitstring    1 SOB1           . 54 STANDARD LANGUAGE TRANSLATOR
                                        OPTIONS
0037   55 Bitstring    1 SOB2           . 55 STANDARD SUPERVISOR OPTIONS
0038   56 Bitstring    1 JCSW1          . 56 JOB CONTROL BYTE
0039   57 Bitstring    1 JCSW2          . 57 LINKAGE CONTROL BYTE
003A   58 Bitstring    1 JCSW3          . 58 NON-STD LANGUAGE TRANSLATOR
                                        OPTIONS
003B   59 Bitstring    1 JCSW4          . 59 JOB DURATION INDICATOR BYTE
003C   60 Signed       2 *              . 60 RESERVED
003E   62 Address      2 FOCLPT         . 62 ADDRESS OF FOCL
0040   64 Address      2 PUBPT          . 64 ADDRESS OF PUB
0042   66 Address      2 FAVPT          . 66 ADDRESS OF FAVP
0044   68 Address      2 JIBPT          . 68 ADDRESS OF JIB
0046   70 Address      2 *              . 70 RESERVED
0048   72 Address      2 FICLPT         . 72 ADDRESS OF FICL
004A   74 Address      2 NICLPT         . 74 ADDRESS OF NICL
004C   76 Address      2 LUBPT          . 76 ADDRESS OF LUB
004E   78 Address      1 SYSLINE        . 78 SYSLST LINE COUNT
004F   79 Character    9 SYSDATE (0)    . 79 SYSTEM DATE
004F   79 Bitstring    4 MMDD           MMDD OR DDMM
0053   83 Bitstring    5 YYDDD          YYDDD PORTION OF DATE
0058   88 Bitstring    1 LIOCSCOM (2)   88 LIOCS COMMUNICATION BYTES
005A   90 Address      2 PIBPT          . 90 ADDRESS OF PIB
005C   92 Signed       2 CHKPTID        . 92 LAST CHECKPOINT NUMBER
005E   94 Address      2 JOBZON         . 94 JOB ZONE IN MINUTES
0060   96 Address      2 DIBPT          96 BACKGROUND DIB POINTER
0062   98 Bitstring    1 DEVFLG1        98 DEV FLAGS FOR AUTOCLOSE
0063   99 Bitstring    1 OPNBYT2        99 RESERVED
0064  100 Bitstring    5 IJBHCFAD       100 JOB STMT ON HC FILE
0069  105 Bitstring    1 *              105 RESERVED
006A  106 Bitstring    2 PWTIMS         . 106 KEY OF PROGRAM WITH IT
                                        SUPPO
006C  108 Signed       2 *              . 108 RESERVED
006E  110 Address      2 LTK            . 110 LOGICAL TRANSIENT KEY
0070  112 Signed       4 SYSPAR         . 112 ADDRESS OF SYSPARM
0074  116 Signed       4 JAPART         . 116 ADDRESS OF JOB ACCOUNTING
                                        TABLE
0078  120 Address      4 TODCOM         . 120 ADDR OF TOD COMMUNICATIONS
                                        AREA
007C  124 Address      2 PIB2PTR        . 124 ADDRESS OF PIB EXTENSION
007E  126 Address      2 PDTABB         . 126 ADDR OF MICR DTF TABLE
0080  128 Signed       4 LABELPTR       . 128 ADDR OF LABEL SPACE
0084  132 Address      2 BGCOMPT        . 132 ADDRESS OF BACKGROUND
                                        COMREG
0086  134 Bitstring    1 OPTNBYTE       . 134 OPTION INDICATOR BYTE
0087  135 Bitstring    1 RMSROPEN       . 135 SYSTEM CONFIG BYTE 2
0088  136 Address      4 *              . 136 RESERVED
008C  140 Bitstring    1 STDOPT         . 140 STANDARD JOB CONTROL OPTION
                                        BYTE
008D  141 Bitstring    1 TEMOPT         . 141 TMPORARY JOB CONTROL OPTION
                                        BYTE
008E  142 Bitstring    1 DISKCONF       . 142 DISK CONFIGURATION BYTE
008F  143 Character    8 PROCNAM        . 143 PROCEDURE NAME
0097  151 Bitstring    1 PSWTCH         . 151 INTERFACE BYTE FOR CATAL.
                                        PROC.
0098  152 Character    7 POVNAM         . 152 SAVE AREA FOR STATEMENT
                                        NAME
009F  159 Bitstring    1 INSIZE         . 159 81 BYTE SYSIN INDICATOR
00A0  160 Signed       4 POWPCB         160 ADDR OF PART CTL BLK
00A4  164 Bitstring    1 POWFLG1        164 POWER/VS FLAG BYTE 1
00A5  165 Bitstring    1 POWFLG2        165 POWER/VS FLAG BYTE 2
00A6  166 Signed       2 *              166 RESERVED
00A8  168 Signed       4 LUBEXT         168 ADDR OF LUB TAB EXT
00AC  172 Bitstring    1 JCSW5          172 JOB CTL SWITCH 5
00AD  173 Bitstring    1 JCSW6          173 JOB CTL SWITCH 6
00AE  174 Bitstring    1 STDOPT2        174 STD OPTIONS 2
00AF  175 Bitstring    1 TEMOPT2        175 TEMP OPTIONS 2
00B0  176 Signed       4 IJBJPL         176 ADDR OF JPL OF PARTITION
00B4  180 Signed       4 IJBAFCB        180 SLOT FOR CICS
00B8  184 Signed       4 IJBPHLST       184 ADDR FETCH/LOAD TRACE TABLE
00BC  188 Bitstring    8 IJBJOBLG       188 ADDR OF LAST HC JOBSTMNT
          000000C4       COMREND        * PLIST FOR DMSSTQ QUERY STORAGE
                                        FUNCTION
00C8  200 Dbl-Word     8 * (0)
00C8  200 Address      4 BGCSTQAD       196 ADDRESS TO BE QUERIED
00CC  204 Signed       4 BGCSTQLN       200 LENGTH OF STORAGE
00D0  208 Dbl-Word     8 BGCSTQNM       204 SUB_POOL NAME
00D8  216 Character    8 BGCSTQPT       212 DOS PARTITION SUB_POOL NAME
00E0  224 Character    8 BGCSTQVS       220 GETVIS AREA SUB_POOL NAME

          
*** BGCOM - VSE Partition Communication Region
*
*     +-------------------------------------------------------+
*   0 |                       JOBDATE                         |
*     +------+-------------+------+---------------------------+
*   8 |//////|  SYSCENT    |//////|         COMUSCR           |
*     +------+-------------+------+                    +------+
*  10 |                                                |UPSI  |
*     +------------------------------------------------+------+
*  18 |                       COMNAME                         |
*     +---------------------------+---------------------------+
*  20 |          PPEND            |          HIPHAS           |
*     +---------------------------+-------------+-------------+
*  28 |          HIPROG           |   LABLEN    |    PIK      |
*     +---------------------------+------+------+------+------+
*  30 |          EOCADR           |CONFIG|LTACT |SOB1  |SOB2  |
*     +------+------+------+------+------+------+------+------+
*  38 |JCSW1 |JCSW2 |JCSW3 |JCSW4 |/////////////|   FOCLPT    |
*     +------+------+------+------+-------------+-------------+
*  40 |   PUBPT     |   FAVPT     |   JIBPT     |/////////////|
*     +-------------+-------------+-------------+------+------+
*  48 |   FICLPT    |   NICLPT    |   LUBPT     |:LINE |(04F)-|
*     +-------------+------+------+-------------+------+------+
*  50 |       -MMDD        |              YYDDD               |
*     +-------------+------+------+-------------+-------------+
*  58 |  LIOCSCOM   |   PIBPT     |  CHKPTID    |   JOBZON    |
*     +-------------+------+------+-------------+-------------+
*  60 |   DIBPT     |:FLG1 |:BYT2 |        IJBHCFAD-          |
*     +------+------+------+------+-------------+-------------+
*  68 |-(064)|//////|   PWTIMS    |/////////////|    LTK      |
*     +------+------+-------------+-------------+-------------+
*  70 |          SYSPAR           |          JAPART           |
*     +---------------------------+-------------+-------------+
*  78 |          TODCOM           |  PIB2PTR    |   PDTABB    |
*     +---------------------------+-------------+------+------+
*  80 |         LABELPTR          |  BGCOMPT    |:NBYTE|:ROPEN|
*     +---------------------------+------+------+------+------+
*  88 |///////////////////////////|STDOPT|TEMOPT|:KCONF|(08F)-|
*     +---------------------------+------+------+------+------+
*  90 |                   -PROCNAM                     |PSWTCH|
*     +------------------------------------------------+------+
*  98 |                    POVNAM                      |INSIZE|
*     +---------------------------+------+------+------+------+
*  A0 |          POWPCB           |:FLG1 |:FLG2 |/////////////|
*     +---------------------------+------+------+------+------+
*  A8 |          LUBEXT           |JCSW5 |JCSW6 |:OPT2 |:OPT2 |
*     +---------------------------+------+------+------+------+
*  B0 |          IJBJPL           |         IJBAFCB           |
*     +---------------------------+---------------------------+
*  B8 |         IJBPHLST          |        IJBJOBLG-          |
*     +---------------------------+---------------------------+
*  C0 |          -(0BC)           |///////////////////////////|
*     +---------------------------+---------------------------+
*  C8 |         BGCSTQAD          |         BGCSTQLN          |
*     +---------------------------+---------------------------+
*  D0 |                       BGCSTQNM                        |
*     +-------------------------------------------------------+
*  D8 |                       BGCSTQPT                        |
*     +-------------------------------------------------------+
*  E0 |                       BGCSTQVS                        |
*     +-------------------------------------------------------+
*  E8
*
*** BGCOM - VSE Partition Communication Region

 
Symbol         Dspl Value
-------------- ---- -----
BGCOMPT        0084
BGCSTQAD       00C8
BGCSTQLN       00CC
BGCSTQNM       00D0
BGCSTQPT       00D8
BGCSTQVS       00E0
CHKPTID        005C
COMNAME        0018
COMREND        00BC 000000C4
COMUSCR        000C
CONFIG         0034
DEVFLG1        0062
DIBPT          0060
DISKCONF       008E
EOCADR         0030
FAVPT          0042
FICLPT         0048
FOCLPT         003E
HIPHAS         0024
HIPROG         0028
IJBAFCB        00B4
IJBHCFAD       0064
IJBJOBLG       00BC
IJBJPL         00B0
IJBPHLST       00B8
INSIZE         009F
JAPART         0074
JCSW1          0038
JCSW2          0039
JCSW3          003A
JCSW4          003B
JCSW5          00AC
JCSW6          00AD
JIBPT          0044
JOBDATE        0000
JOBZON         005E
LABELPTR       0080
LABLEN         002C
LIOCSCOM       0058
LTACT          0035
LTK            006E
LUBEXT         00A8
LUBPT          004C
MMDD           004F
NICLPT         004A
OPNBYT2        0063
OPTNBYTE       0086
PDTABB         007E
PIBPT          005A
PIB2PTR        007C
PIK            002E
POVNAM         0098
POWFLG1        00A4
POWFLG2        00A5
POWPCB         00A0
PPEND          0020
PROCNAM        008F
PSWTCH         0097
PUBPT          0040
PWTIMS         006A
RMSROPEN       0087
SOB1           0036
SOB2           0037
STDOPT         008C
STDOPT2        00AE
SYSCENT        0009
SYSDATE        004F
SYSLINE        004E
SYSPAR         0070
TEMOPT         008D
TEMOPT2        00AF
TODCOM         0078
UPSI           0017
YYDDD          0053