NAME       : SUBSECT
 DESCRIPTION: BILINGUAL SUBSECT MACRO
 DSECT      : SUBSECT
 FUNCTION   : WORK AREA FOR USE DURING SUBSET MODE.
 NOTES      : Module Type is Macro
              Processor is Assembler H or PL/X
              PLAS modules which invoke this macro must also
              include DMSFATTR

 SUBSECT DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      SUBSECT        BILINGUAL SUBSECT MACRO
      READY/TIME MESSAGE FORMATTING AREA
0000    0 Bitstring    3 *              RESERVED FOR FUTURE USE
0003    3 Bitstring    1 SUBRMSGL       LENGTH OF RDYMSG IN BYTES NOTES :
                                        SUBMSG MUST START ON FULL WORD
                                        BOUNDRY AND SUBRMSGL MUST BE THE
                                        BYTE IMMEDIATELY PRECEDING RDYMSG
0004    4 Character   31 SUBRMSG        TEXT OF READY MESSAGE
          0000001F       SUBRMSGM       *-SUBRMSG MAXIMUM LENGTH OF READY
                                        MESSAGE
0023   35 Bitstring    1 *              RESERVED FOR FUTURE USE
0024   36 Signed       4 RMSGBUF (10)
      PLIST FOR GETTING TIMES FROM DMSINM
004C   76 Signed       4 CMSTIM (0)
004C   76 Character    8 *
0054   84 Signed       4 *              SPOT FOR VIRCPU
0058   88 Signed       4 *              SPOT FOR TOTCPU
005C   92 Address      4 *              SPOT FOR ADDRESS OF TIME BUFFER
0060   96 Signed       4 *              OCCUPIED LENGTH (FILLED IN BY
                                        CMSTIME)
      PLIST FOR ACTLKP AS USED BY SUBSET
0064  100 Signed       4 * (0)
0064  100 Character    8 STARS
006C  108 Character    8 *
0074  116 Character    2 *
      SUBSET ADDRESS STORAGE AREAS
0078  120 Signed       4 * (0)
0078  120 Signed       4 ASUBRET
007C  124 Signed       4 STAISAV
0080  128 Signed       4 STAESAV
0084  132 Signed       4 SWTCHSAV
0088  136 Signed       4 STAXSAV
008C  140 Signed       4 ASUBFST        ANCHOR TO THE ACTIVE FILE TABLE
                                        (AFT) chain to be hidden during
                                        Subset mode or zero if no open
                                        files
0090  144 Signed       4 ASUBSTAT       ADDRESS OF THE STATEFST IN THE
                                        FVS to be hidden during Subset
                                        mode
      WORK AREA FOR ERROR RETURN-CODE
0098  152 Dbl-Word     8 ERRNUM
      WORK AREA FOR DMSINM TO STORE DATE AND TIME
00A0  160 Dbl-Word     8 * (4)          - reserved -
00C0  192 Signed       4 SUBAODT        ANCHOR TO THE OPEN DIRECTORY
                                        TABLE (ODT) chain to be hidden
                                        during subset mode or zero if no
                                        open directories
00C4  196 Address      4 SUBSVADR       Address of storage gotten for
                                        SUBFSTs or zero if none
00C8  200 Signed       2 SUBSVSIZ       size in double words of storage
                                        gotten for SUBFSTs or zero if
                                        none
00CA  202 Signed       2 *              - reserved -
00CC  204 Signed       4 SUBREGSV (16)  Register save area for DMSLAF
                                        during SUBSET mode
010C  268 Signed       4 SPIESAV
0110  272 Bitstring   12 SUBFASTK       Hidden file attribute stack in
                                        DMSFATTR MACRO format
011C  284 Signed       4 SUBINMSV (15)  Savearea for DMSINMTZ/TS
0158  344 Dbl-Word     8 TIMBUF (5)     Used by DMSINM and DMSINMTS
          ..1. 1...      LTIMBUF        40 LTIMBUF Length of TIMBUF

          
*** SUBSECT - BILINGUAL SUBSECT MACRO
*
*     +--------------------+------+---------------------------+
*   0 |////////////////////|:RMSGL|                           |
*     +--------------------+------+                           |
*   8 |                                                       |
*     =                       SUBRMSG                         =
*     |                    +------+---------------------------+
*  20 |                    |//////|                           |
*     +--------------------+------+                           |
*  28 |                                                       |
*     =                       RMSGBUF                         =
*     |                           +---------------------------+
*     |                           |///////////////////////////|
*     +---------------------------+---------------------------+
*  50 |///////////////////////////|///////////////////////////|
*     +---------------------------+---------------------------+
*  58 |///////////////////////////|///////////////////////////|
*     +---------------------------+---------------------------+
*  60 |///////////////////////////|          STARS-           |
*     +---------------------------+---------------------------+
*  68 |          -(064)           |///////////////////////////|
*     +---------------------------+-------------+-------------+
*  70 |///////////////////////////|/////////////|/////////////|
*     +---------------------------+-------------+-------------+
*  78 |         ASUBRET           |         STAISAV           |
*     +---------------------------+---------------------------+
*  80 |         STAESAV           |         SWTCHSAV          |
*     +---------------------------+---------------------------+
*  88 |         STAXSAV           |         ASUBFST           |
*     +---------------------------+---------------------------+
*  90 |         ASUBSTAT          |///////////////////////////|
*     +---------------------------+---------------------------+
*  98 |                        ERRNUM                         |
*     +-------------------------------------------------------+
*  A0 |///////////////////////////////////////////////////////|
*     =///////////////////////////////////////////////////////=
*     |///////////////////////////////////////////////////////|
*     +---------------------------+---------------------------+
*  C0 |         SUBAODT           |         SUBSVADR          |
*     +-------------+-------------+---------------------------+
*  C8 |  SUBSVSIZ   |/////////////|                           |
*     +-------------+-------------+                           |
*  D0 |                                                       |
*     =                       SUBREGSV                        =
*     |                           +---------------------------+
* 108 |                           |         SPIESAV           |
*     +---------------------------+---------------------------+
* 110 |                       SUBFASTK                        |
*     |                           +---------------------------+
*     |                           |                           |
*     +---------------------------+                           |
* 120 |                                                       |
*     =                       SUBINMSV                        =
*     |                                                       |
*     +-------------------------------------------------------+
* 158 |                                                       |
*     =                        TIMBUF                         =
*     |                                                       |
*     +-------------------------------------------------------+
* 180
*
*** SUBSECT - BILINGUAL SUBSECT MACRO

 
Symbol         Dspl Value
-------------- ---- -----
ASUBFST        008C
ASUBRET        0078
ASUBSTAT       0090
CMSTIM         004C
ERRNUM         0098
LTIMBUF        0158 28
RMSGBUF        0024
SPIESAV        010C
STAESAV        0080
STAISAV        007C
STARS          0064
STAXSAV        0088
SUBAODT        00C0
SUBFASTK       0110
SUBINMSV       011C
SUBREGSV       00CC
SUBRMSG        0004
SUBRMSGL       0003
SUBRMSGM       0004 0000001F
SUBSVADR       00C4
SUBSVSIZ       00C8
SWTCHSAV       0084
TIMBUF         0158