*COMDECK  COMSDSS 
          CTEXT  COMSDSS - DEVICE SET SYMBOL DEFINITIONS
  
          BASE   DECIMAL
COMSDSS   SPACE  4
***       THE *COMSDSS* COMMON DECK PROVIDES DEFINITIONS OF SYMBOLS 
*         USED TO IDENTIFY FIELDS WITHIN THE VARIOUS TABLES (RESIDENT 
*         ON DISK) USED BY DEVICE SETS. 
RMSLABEL  SPACE  5,10 
*         ************************************************************* 
*         *                                                           * 
*         *      WARNING - ANY MODIFICATIONS TO THIS COMMON DECK      * 
*         *      SHOULD ALSO BE INCLUDED IN *IRCP* ON OPSYS PL1A      * 
*         *                                                           * 
*         ************************************************************* 
          SPACE  2
**        RMS DEVICE LABEL   (6000/7000 COMPATIBLE) 
          SPACE  3
N.LBRBLM  = 4                MAX. NO. PBS SCANNED IN LABEL SEARCH 
N.MRBR    = 8                MAXIMUM NO OF RBR-S FOR ONE DEVICE 
          SPACE  3
W.LBLD    = 0                FIRST WORD OF LABEL
 C.LBLD   = 0                DEVXZ XZ=00=6000,01=7000,02=BOTH,DISPLAY CD
 C.LBDATE = 2                DATE IN THE FORM YYDDD (DISPLAY CODE)
W.LBEX    = 1                THE EXPIRATION DATE (YYDDD)
 C.LBEX   = 2                EXPIRATION DATE YYDDD (DISPLAY CODE) 
W.LBVSN   = 2                VOLUME SERIAL NUMBER 
 C.LBVSN  = 0                VSN, LEFT-JUSTIFIED, ZERO-FILLED 
W.LBSN    = 3                SETNAME (LEFT JUST. ZERO FILL) 
 C.LBSN   = 0                SETNAME, LEFT-JUSTIFIED, ZERO-FILLED 
W.LBMEM   = 3                MAX. NUMBER OF MEMBERS IN THE SET
 C.LBMEM  = 4                NUMBER OF MEMBERS IN THE SET 
W.LBPFD   = 4D
 C.LBPFD  = 4                PFD ALLOCATION UNIT INDEX
W.LBDVSN  = 5                VSN OF PFD DEVICE
 C.LBDVSN = 0                VSN ON WHICH AUXILIARY PFD RESIDES 
W.LBXPFD  = 5                AUXILIARY PFD ALLOCATION UNIT
 C.LBXPFD = 4                AUXILIARY PFD ALLOCATION UNIT INDEX
W.LBPFC   = 6                PFC ALLOCATION UNIT (RB NUMBER)
 C.LBPFC  = 4                PFC ALLOCATION UNIT INDEX
W.LBRBTC  = W.LBPFC 
W.LBCVSN  = 7                VSN OF PFC DEVICE
 C.LBCVSN = 0                VSN ON WHICH AUXILIARY PFC RESIDES 
W.LBXPFC  = 7                AUXILIARY PFC ALLOCATION UNIT
 C.LBXPFC = 4                AUXILIARY PFC ALLOCATION UNIT INDEX
W.LBDAM   = 8                DAM ALLOCATION UNIT (RB NUMBER)
 C.LBDAM  = 4                DAM ALLOCATION UNIT INDEX
W.LBRBR   = W.LBDAM 
 C.LBRBR  = 4                RBR ALLOCATION UNIT INDEX
W.LBSMT   = 9                SET MEMBER TABLE ALLOCATION UNIT 
 C.LBSMT  = 4                SET MEMBER TABLE ALLOCATION UNIT INDEX 
W.LBFLW   = 10               FLAW TABLE ALLOCATION UNIT 
 C.LBFLW  = 4                FLAW TABLE ALLOCATION UNIT INDEX 
W.LBSFT   = 11               SYSTEM TABLE ALLOCATION UNIT 
 C.LBSFT  = 4                SYSTEM TABLE ALLOCATION UNIT INDEX 
W.LBDSR   = 12               DEADSTART RECOVERY ALLOCATION UNIT 
 C.LBDSR  = 4                DEADSTART RECOVERY ALLOCATION UNIT 
W.LBSD    = 13               SUBDIRECTORY-TABLE POINTER 
 C.LBSD   = 4 
W.LBPCM   = 14               PFC ALLOCATION MAP ALLOC. UNIT 
 C.LBPCM  = 4                PFC ALLOCATION MAP ALLOCATION UNIT 
W.LBFLT   = 15               PHYSICAL FLAW TABLE ALLOC. UNIT
 C.LBFLT  = 4                PHYSICAL FLAW TABLE ALLOCATION UNIT INDEX
W.LBNPFC  = 16               NUMBER OF PFC ENTRIES (BINARY) 
 C.LBNPFC = 0                NUMBER OF PFC ENTRIES
W.LBNPFP  = 16               NUMBER OF PFD PAGES PER SUB-DIR. 
 C.LBNPFP = 2                NUMBER OF PFD PAGES PER SUB-DIRECTORY
W.LBNSD   = 16               NUMBER OF SUB-DIRECTORIES
 C.LBNSD  = 4                NUMBER OF SUB-DIRECTORIES
W.LBCKS   = 17D              LABEL CHECKSUM (BITS 0-23) 
 C.LBCKS  = 4                CHECKSUM 
W.LBAUS   EQU    18          RB SIZE IN FIRST RBR 
 C.LBAUS  EQU    4           RB SIZE IN FIRST RBR 
W.LBDUP   EQU    19          UNIVERSAL PASSWORD 
W.LBDPI   EQU    20          PUBLIC PASSWORD
W.LBDFR   EQU    21          DEFAULT RETENTION PERIOD 
 C.LBDFR  EQU    4           DEFAULT RETENTION PERIOD 
W.LBDIAG  EQU    22          PREALLOCATION FLAG 
W.LBIL    EQU    23                SET INTERLOCK WORD 
 C.LBNMF  EQU    0           NUMBER OF MAINFRAMES MOUNTED 
 C.LBSETI EQU    1           1ST SET I/L BYTE (1 TO 4 FROM LEFT)
 S.LBSETI EQU    0           SET I/L BIT IN SET I/L BYTE
W.LBLI1   EQU    24                FIRST OF 4 ENTRIES IN LOGIN TBL
W.LBLI2   EQU    25 
W.LBLI3   EQU    26 
W.LBLI4   EQU    27 
W.LBCHS   = 30D              DUMPF SYNCHRONIZATION WORD 
*         THE BYTES IN THE LOGIN TABLE
C.LBEO    EQU    0                 EST ORDINAL BYTE 
C.LBMO    EQU    1                 MST ORDINAL BYTE 
C.LBATT   EQU    2                 LOCAL ATTRIBUTES BYTE
C.LBLID   EQU    4                 HOST MF LID BYTE(SECOND OF 2)
W.LBDSM   EQU    28 
C.LBDSM   EQU    4                 DISMOUNTED FLAG BYTE 
W.LBGLA   EQU    29                GLOBAL ATTRIBUTES WORD 
C.LBGLA   EQU    4                 GLOBAL ATTRIBUTES BYTE 
W.LBDPFS  EQU    30                DUMPF SYNCHRONIZATION WORD 
S.LBLASS  EQU    0                 LOCAL ATTRIBUTE BIT- SYSTEM SET
S.LBLAPF  EQU    1                 LOCAL ATTRIBUTE BIT- PF DEFAULT
S.LBLAQS  EQU    2                 LOCAL ATTRIBUTE BIT- QUEUE SET 
S.LBLASD  EQU    3                 LOCAL ATTRIBUTE BIT- SYS DEFAULT 
S.LBLASY  EQU    4                 LOCAL ATTRIBUTE BIT- SYS DEVICE
S.LBLASH  EQU    5                 LOCAL ATTRIBUTE BIT- SHARED DRIVE
S.LBGAPF  EQU    11                GLOBAL ATTRIBUTE BIT- PF DEVICE
S.LBGAQ   EQU    8D          GLOBAL ATTRIBUTE BIT - Q DEVICE. 
* 
W.LBLWA   EQU    31                *BEGINNING OF THE UNUSED END OF THE
*                                  * LABEL. REDEFINE THEIS SYMBOL WHEN
*                                  * YOU ADD WORDS AT END OF THE LABEL. 
* 
*         KEYWORD CODES -- A COPY OF THE MASTER LIST IN PFCCP 
* 
*PPC      =      1                 PRIVACY PROCEDURE NAME (IGNORED) 
 RPC      =      2                 RETENTION PERIOD 
 CYC      =      3                 CYCLE NUMBER 
 TKC      =      4                 TURNKEY PASSWORD 
 CNC      =      5                 CONTROL PASSWORD 
 MDC      =      6                 MODIFY  PASSWORD 
 EXC      =      7                 EXTEND  PASSWORD 
 RDC      =      10B               READ    PASSWORD 
 MRC      =      11B               MULTI-READ 
*SDC      =      12B               SUBDIRECTORY NUMBER (IGNORED)
 XRC      =      13B               CN,MD,EX PASSWORD
 IDC      =      14B               IDENT
 NFC      =      15B               MAX NUMBER OF FILES
 ACC      =      16B               ACCOUNT
 ECC      =      17B               ECS BUFFER SIZE
 PWC      =      20B               PASSWORDS SUBMITTED (20-24)
 FOC      =      25B               FILE ORGANIZATION
 PSC      =      26B               POSITION 
 PS2C     =      27B               POSITION (CKP) 
 PFC      =      30B               PERMANENT FILE NAME
 LCC      =      31B               LOWEST CYCLE NUMBER
 STC      =      32B               MAINFRAME IDENT
 RWC      =      33B               EXCLUSIVE ACCESS REWRITE 
 FSC      =      34B               FROM SETNAME 
 TSC      =      35B               TO SETNAME 
 FMC      =      36B               FROM DEVICE SET MEMBER 
 TMC      =      37B               TO DEVICE SET MEMBER 
 SNC      =      40B               SETNAME
 VSC      =      41B               VISUAL SERIAL NUMBER 
 MPC      =      42B               MASTER PACK VSN
 RBC      =      43B               RECORD BLOCK CONFLICT
 NMC      =      44B               MAX NUMBER OF MEMBERS
 AXC      =      45B               AUXILARY PFD/PFC VSN 
 ESC      =      46B               EST ORDINAL
 DSC      =      47B               DEADSTART MODE 
 XPC      =      50B               PERM FILE DEVICE(*PF)
 XQC      =      51B               QUEUE FILE DEVICE(*Q)
 FRC      =      52B               FILE RETENTION PERIOD
 UVC      =      53B               UNIVERSAL PASSWORD 
 UPMC     =      54B               UNIVERSAL PERMISSIONS(UPC IN PFCCP)
 PBC      =      55B               PUBLIC PASSWORD
 MOC      =      60B               MODE 
 PPSDC    =      71B               NO OF PAGES PER SUBDIRECTORY 
 NSDC     =      72B               NO OF SUBDIRECTORIES 
 NRBTC    =      73B               NO OF PRUS IN THE PFC
 HTC      =      74B               844 HALF TRACK RECORDING MODE
 FTC      =      75B               844 FULL TRACK RECORDING MODE
 AIC      =      76B               AUDIT LIST OPTION
 LFC      =      77B               LOGICAL FILENAME FOR OUTPUT
 MAXPAR   =      16                MAX NO OF ENTRIES IN PARAM LIST
PFD       SPACE  5,10 
**        PERMANENT FILE DIRECTORY  (PFD)  SYMBOLS
          SPACE  3
W.PDHDR   = 0                12/-0,24/0LPFC4
W.PDSD    = 0                SUBDIRECTORY NUMBER TO WHICH ID WAS HASHED 
W.PDCPFN  = 0                NUMBER OF CHARACTERS IN PFN (BITS 6-11)
 C.PDCPFN = 4 
 S.PDCPFN = 6 
W.PDFLAG  = 0                      FLAG BYTE IN HEADER WORD 
 C.PDFLAG = 4 
 S.PDEF   = 3                      ENTRY IN USE FLAG
 S.PDESD  = 5                END OF SUBDIRECTORU FLAG 
W.PDID    = 1                OWNER ID (RIGHT JUST., BLANK FILLED) 
W.PDN1    = 2 - 5            PERMANENT FILE NAME
W.PDN2    = 3 
W.PDN3    = 4 
W.PDN4    = 5 
W.PDCY    = 6 - 10           CYCLE NUMBER (BINARY, BITS 48-59)
W.PDIC    = 6 - 10           BIT 32 = 1 IF CYCLE IS INCOMPLETE
W.PDAC    = 6 - 10           BIT 31 = 1 IF CYCLE WAS ARCHIVED 
W.PDPE    = 6 - 10           BIT 30 = 1 IF CYCLE HAS PARITY ERRORS
W.PDFC    = 6 - 10           PRU OFFSET INTO PFC (BITS 0-17)
W.PDPW    = 11 - 15          FIRST PASSWORD IN PASSWORD LIST
PFC       SPACE  5,10 
**        PERMANENT FILE CATALOG  (PFC)  SYMBOLS
          SPACE  3
W.PCEF    = 0                BIT 1  1=FREE,0=LOCKED 
W.PCFC    = 1                BIT 2  1=NEW, 0=DUMPED 
W.PCARC   = 1                BIT 4  0=CYCLE NOT ARCHIVED, 1=ARCHIVED
W.PCFO    = 1                BIT 5  0=FO"IS OR DA, 1=FO=IS OR DA
W.PCRA    = 1                BIT 6  0=FILE NOT RANDOM, 1=FILE RANDOM
W.PCPS    = 1                BIT 7  0=FILE NOT POSITIONED, 1=POSITIONED 
W.PC9T    = 1                BIT 8  0=7 TRACK TAPE, 1=9 TRACK TAPE
W.PCRB    = 1                      RB CONFLICT IN THIS FILE 
 C.PCRB   = 4 
 S.PCRB   = 9 
W.PCHDR   = 1                PFC IN DISPLAY CODE
W.PCID    = 2                14B
W.PCN1    = 3                PERMANENT FILE NAME LEFT-JUSTIFIED, ZERO-
W.PCN2    = 4                 FILLED, DISPLAY CODE
W.PCN3    = 5 
W.PCN4    = 6 
W.PCCY    = 7                CYCLE NUMBER (BINARY)
W.PCPDE   = 7                PFD ENTRY NUMBER 
W.PCPFD   = 7                PFD POINTER AS A SECTOR OFFSET (BINARY)
W.PCCD    = 8                CREATION DATE = YYDDD (BINARY, BITS 42-59) 
W.PCRT    = 8                RETENSION PERIOD (BINARY, BITS 12-23)
W.PCDLA   = 9                DATE OF LAST ATTACH = YYDDD (BINARY, 42-59)
W.PCTLA   = 9                TIME OF LAST ATTACH = HHMMSS (BINARY, 0-17)
W.PCDLME  = 10               DATE OF LAST ALTER =  YYDDD (BINARY, 42-59)
W.PCTLME  = 10               TIME OF LAST ALTER = HHMMSS (BINARY, 0--17)
W.PCNA    = 11               NO. OF ATTACHES (BINARY, 48-59)
W.PCNE    = 11               NO. OF EXTENDS (BINARY, 36-47) 
W.PCNM    = 11               NO. OF MODIFIES (BINARY, 24-35)
W.PCESZ   = 11               SIZE OF ENTRY IN WORDS (BINARY, BITS 12-23)
W.PCR     = 12               WORD OFFSET FROM WORD 13 TO 1ST VSN
W.PCS     = 12               WORD OFFSET FROM WORD 13 TO USER AREA
W.PCT     = 12               WORD OFFSET FROM WORD 13 TO START OF CHAIN 
W.PCSD    = 12               SUB-DIRECTORY NUMBER (BINARY, 12-23) 
W.PCACT   = 13               ACCOUNT PARAMETER,LEFT-JUSTIFIED,BLANK-FILL
W.PCSZ    = 15               7000 FILE SIZE IN WORDS (BINARY) 
W.PCFAS   = 16               ALLOCATION STYLE  0=MINIMUM ALLOCATION UNIT
W.PCRQC   = 16               REQUEST CODE 
W.PCSAM   = 16               BIT 17  0=FO"IS/DA, 1=FO=IS/DA 
W.PCRND   = 16               BIT 18  0=FILE NOT RANDOM, 1=FILE RANDOM 
W.PCOVF   = 16               BIT 19  0=NO OVERFLOW, 1=OVERFLOW
W.PCNEW   = 16               BIT 20  0=FILE WRITTEN TO, 1=NEVER WRITTEN 
W.PCRFD   = 16               BIT 21   1=PF DEVICE ASSIGNED, 0=NOT PF
W.PCRVS   = 16               BIT 22   1=REQUESTED BY VSN, 0= NOT
W.PCDEV   = 16               BIT 23   1=ASSIGNED BY DEVICE TYPE, 0=NOT
W.PCFATL  = 16               24-35  FAT LENGTH IN WORDS 
W.PCSN    = 17               18-59  SETNAME (LEFT JUST. ZERO FILLED)
W.PCDLD   = 17               DATE OF LAST DUMP (YYDDD - BINARY) 
W.PCTLD   = 17               TIME OF LAST DUMP (HHMMSS - BINARY)
W.PCPW    = 18 - 22          7-59  PASSWORD LIST AS IN PFD
W.PCMLOC  = 23               0-59  MULTI-COMPUTER INTERLOCK WORD
W.PCPSN   = 24 - R+N         0-23  FILE POSITION, BINARY PRU OFFSET 
W.PCVSN   = 26 - R+N         24-59  VSN OF ARCHIVE TAPE 
SMT       SPACE  5,10 
**        SET MEMBER TABLE  (SMT)  SYMBOLS
          SPACE  3
LE.SMT    = 2                LENGTH OF SMT ENTRY IN CM WORDS
          SPACE  3
W.SMTVSN  = 0                VSN, LEFT-JUSTIFIED, ZERO-FILLED 
 C.SMTVSN = 0                VSN
W.SMTFRO  = 0                FIRST DISK RBR ORDINAL (PRU OFFSET)
 C.SMTFRO = 3                FIRST DISK RBR ORDINAL 
W.SMTLRO  = 0                LAST DISK RBR ORDINAL (PRU OFFSET) 
 C.SMTLRO = 4                LAST DISK RBR ORDINAL
W.SMTUS   = 1                USEABLE SPACE
W.SMTSFF  = 1                PERMANENT FILE BIT, 0=NO, 1=YES
 C.SMTSFF = 0                PERMANENT FILE BIT BYTE
S.SMTSFF  = S.LBGAPF         DEVICE PF BIT SAME AAS IN LABEL
 S.SMTSM  = 10D              BIT FOR SET MOUNTED FLAG 
S.SMTSFQ  = S.LBGAQ          DEVICE Q  BIT SAME AS IN LABEL 
W.SMTMF   = 1                DEVICE MOUNTED FLAGS WORD
 C.SMTMF  = 0                DEVICE MOUNTED FLAGS BYTE
 S.SMTRM  = 6                RECORDING MODE FLAG (SET FOR FULL TRACK) 
 S.SMTPR  = 5                FLAG SET IF DEVICE PREALLOCATED
 S.SMTOD  = 4                OPERATOR DISMOUNT REQUEST FLAG 
 S.SMTMF  = 3                1ST DEV MNTD FLAG BIT (1 TO 4 FROM LEFT) 
W.SMTSA   = 1                TOTAL ALLOCABLE SPACE AVAILABLE
 C.SMTSA  = 2                SPACE AVAILABLE
W.SMTTS   = 1                TOTAL ALLOCATABLE SPACE ON THIS DEVICE 
 C.SMTTS  = 4                TOTAL SPACE
DAM       SPACE  5,10 
**        DEVICE ALLOCATION MAP  (DAM)  SYMBOLS 
          SPACE  3
W.DADAU   = 0                TOTAL NUMBER OF ALLOCATION UNITS 
 C.DADAU  = 1                TOTAL NUMBER OF ALLOCATION UNITS 
W.DADCA   = 0                CURRENTLY AVAILABLE ALLOCATION UNITS 
 C.DADCA  = 3                CURRENTLY AVAILABLE ALLOCATION UNITS 
W.DADSZ   = 0                SIZE OF BIT TABLE IN WORDS 
 C.DADSZ  = 4                SIZE OF BIT TABLE IN WORDS 
W.DADVSN  = 1                VSN
 C.DADVSN = 0                VSN
W.DADSMO  = 1                SET MEMBER ORDINAL 
 C.DADSMO = 3                SET MEMBER ORDINAL 
W.DADSAU  = 1                SECTOR/ALLOCATION UNIT 
 C.DADSAU = 4                SECTOR/ALLOCATION UNIT 
W.DADUA   = 2                USUABLE RB-S=TOTAL-(SYSTEM+FLAWS 
 C.DADUA  = 2                USUABLE RB-S 
W.DADSDA  = 2                STARTING DEVICE ADDRESS
 C.DADSDA = 4                STARTING DEVICE ADDRESS
W.DADSA2  = 2                UPPER PORTION OF W.DADSDA
 C.DADSA2 = 1                IN LOWER 6 BITS (1 BIT NOW USED, 844 ONLY) 
W.DADPBC  = 2                POINTER TO RB SIZE COMPATIBILITY BIT 
 C.DADPBC = 0 
 S.DADPBC = 11D 
W.DADAL   = 2                ALLOCATION-STYLE CODE
 C.DADAL  = 2                ALLOCATION STYLE IN UPPER 6 BITS.
FLW       SPACE  5,10 
**        FLAW TABLE  (FLW)  SYMBOLS
          SPACE  3
W.FLWAU   = 0                TOTAL NUMBER OF ALLOCATION UNITS 
 C.FLWAU  = 1                TOTAL NUMBER OF ALLOCATION UNITS 
W.FLWCA   = 0                CURRENTLY AVAILABLE ALLOCATION UNITS 
 C.FLWCA  = 2                CURRENTLY AVAILABLE ALLOCATION UNITS 
W.FLWSZ   = 0                SIZE OF BIT TABLE IN WORDS 
 C.FLWSZ  = 4                SIZE OF BIT TABLE IN WORDS 
W.FLWVSN  = 1                VSN
 C.FLWVSN = 0                VSN
W.FLWSMO  = 1                SET MEMBER ORDINAL 
 C.FLWSMO = 3                SET MEMBER ORDINAL 
W.FLWSAU  = 1                SECTOR/ALLOCATION UNIT 
 C.FLWSAU = 3                SECTOR/ALLOCATION UNIT 
W.FLWSDA  = 2                STARTING DEVICE ADDRESS
 C.FLWSDA = 3                STARTING DEVICE ADDRESS
W.FLWAL   = 2                ALLOCATION-STYLE CODE
 C.FLWAL  = 2                ALLOCATION STYLE IN UPPER 6 BITS.
W.FLWUA   = 2                USABLE RB"S (LOWER 12 BITS)
 C.FLWUA  = 2    USABLE RB"S (LOWER 12 BITS)
PAM       SPACE  5,10 
**        PFC ALLOCATION MAP  (PAM)  SYMBOLS
          SPACE  3
W.PAMNW   = 0                NUMBER OF WORDS IN PAM BODY
 C.PAMNW  = 3                NUMBER OF WORDS IN PAM BODY
W.PAMPEI  = 1                PURGE EOI POINTER
 C.PAMPEI = 1                PURGE EOI POINTER
W.PAMCEI  = 1                CURRENT EOI POINTER
 C.PAMCEI = 3                CURRENT EOI POINTER
  
          BASE   *
  
**        MACRO  DRB TO SPECIFY DEVICE CHARACTERISTICS
* 
*         FORMAL PARAMETERS ARE 
*                DT  -DEVICE TYPE 
*                PBS -PRU-S PER PB
*                NPB -MAXIMUM ALLOWED NO OF PB-S IN RBR 
*                     (SAME AS DEVICE CAPACITY EXCEPT FOR THE 6603) 
*         AFL -ADRESS OF PB NO-S TO PREALLOCATE 
*         NFL -NUMBER OF PB NO-S TO PREALLOCATE 
* 
MNFL      SET    0
DRB       MACRO  DT,PBS,NPB,AFL,NFL 
          IFGT   NFL,MNFL,1 
MNFL      SET    NFL
+         VFD    12/2L_DT,12/PBS,12/NPB,12/AFL,12/NFL 
          ENDM
* 
* 
**        PREALLOCATION AND DEFAULT RBR VALUES FOR VARIOUS DEVICES
* 
RCPHERE   RMT 
RCPV      EQU    *
          DRB    AH,160,4030,0,0
          DRB    AM,56,1000,1005,5
          DRB    AY,112,1616,1640,4 
          DRB    AZ,112,3232,3288,8 
          CON    0
          RMT 
  
COMSDSS   ENDX
