COMSSSE 
COMMON
          CTEXT  COMSSSE - SYSTEM SECTOR EQUIVALENCES.
          SPACE  4,10 
          BASE   MIXED
*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
          SPACE  4,10 
***       COMSSSE - SYSTEM SECTOR EQUIVALENCES. 
*         P. D. FARRELL.     76/04/26.
*         A. D. FORET.       76/10/23.
          SPACE  4,10 
**               SSE DEFINES THE LOCATION OF DATA FIELDS WITHIN 
*         THE MASS STORAGE SYSTEM SECTOR. 
* 
*         LOCATION DEFINITIONS HAVE BEEN ORGANIZED INTO BLOCKS
*         OF FIVE PPU (ONE CENTRAL MEMORY) WORDS AND ARE DEFINED
*         RELATIVE TO PPU LOCATION ZERO WITH THE SYSTEM SECTOR
*         LOCATED IN THE PPU MASS STORAGE BUFFER BEGINNING AT 
*         LOCATION *BFMS*.  THE FIRST BYTE OF DATA WILL BE AT 
*         LOCATION *BFMS+2*, THE FIRST TWO BYTES BEING RESERVED 
*         FOR THE SYSTEM SECTOR MASS STORAGE CONTROL BYTES. 
          SPACE  4,10 
**        THE FOLLOWING DEFINITIONS ARE INCLUDED TO AVOID THE 
*         NECESSITY OF CALLING THE SYSTEM COMMON DECKS IN WHICH 
*         THEY ARE DEFINED.  IF ANY OF THESE DEFINITIONS ARE
*         CHANGED IN THEIR DEFINING COMMON DECKS THEY MUST
*         ALSO BE CHANGED HERE. 
  
  
 AAWC     EQU    9D          ACCESS CONTROL WORD
                             (COMSACC)
 ABSS     EQU    15D         SYSTEM SECTOR VALIDATION BLOCK LENGTH
                             (COMSACC)
 SSJL     EQU    5           SSJ PARAMETER BLOCK LENGTH 
                             (COMSSSJ)
  
          SPACE  4,10 
**        MASS STORAGE CONTROL BYTES. 
  
  
 BEGIN    BSSN   BFMS 
  
 BFMS     BSSN   1           12/ LINKAGE BYTE (=3777B)
          BSSN   1           12/ RECORD LENGTH (=77B) 
  
          SPACE  4,10 
**        COMMON DATA LOCATIONS.
* 
*         NOTE - THESE VALUES MUST ALSO BE CHANGED IN *PPCOM*.
  
  
 FNSS     BSSN   5           60/ COPY OF LOCAL FNT WORD 
  
 EQSS     BSSN   1           3/, 9/ EST ORDINAL 
 FTSS     BSSN   1           12/ FIRST TRACK
 NSSS     BSSN   1           12/ NEXT SECTOR/TRACK POINTER
 GQSS     BSSN   1           12/ QFT ORDINAL
 FASS     BSSN   1           12/  LOCAL FNT OFFSET
  
 DTSS     BSSN   5           11/ 0,1/ EOI,12/ ,36/ DATE AND TIME
  
          BSSN   5*5         5*60/ RESERVED FOR CDC 
          SPACE  4,10 
**        DATA FIELDS FOLLOWING THIS POINT ARE QUEUE TYPE 
*         DEPENDENT AND USAGES MAY OVERLAP. 
* 
*         THE SYMBOL DEFINING THIS AREA SHOULD BE USED ONLY 
*         BY PROGRAMS WHICH WISH TO REFER TO THE ENTIRE AREA. 
*         AS A BLOCK. 
  
  
 DDSS     BSSN   0           FILE DEPENDENT DATA AREA FWA 
  
 IOSS     BSSN   QFTE*5      QFTE*60/ COPY OF QFT ENTRY 
  
          BSSN   10*5-QFTE*5  (10-QFTE)*60/ RESERVED - QFT EXPANSION
          SPACE  4,10 
**        LOCATIONS USED FOR INPUT FILES. 
  
  
          LOC    DDSS+10*5
  
 JISS     BSSN   0           JOB INPUT DATA 
  
 JASS     BSSN   1           12/ JOB ABORT CODE 
 RNSS     BSSN   1           12/ RECORD NUMBER OF BAD CARD
 CNSS     BSSN   1           12/ NUMBER OF BAD CARD 
 CRSS     BSSN   2           24/ NUMBER OF CARDS READ 
  
 JCSS     BSSN   1           12/ JOB CARD CM FIELD LENGTH 
 JESS     BSSN   1           12/ JOB CARD ECS FIELD LENGTH/*UEBS* 
 JFSS     BSSN   0           JOB FLAGS
          BSSN   1           11/ RESERVED FOR CDC 
                             1/  KEYPUNCH MODE O26/O29
 JTSS     BSSN   2           6/  RESERVED FOR CDC 
                             18/ JOB STEP TIME LIMIT
  
 TNSS     BSSN   3           42/ TERMINAL NAME
 ISSS     BSSN   1           1/  RESERVED FOR CDC 
                             5/  INITIAL INTERACTIVE SUBSYSTEM
 TRSS     BSSN   1           12/ TERMINAL NUMBER
  
 SISS     BSSN   1           12/ SUBSYSTEM IDENTIFIER 
 CPSS     BSSN   1           12/ CONTROL POINT NUMBER 
 HRSS     BSSN   1           12/ HARDWARE ERROR RERUN COUNT 
 SESS     BSSN   1           12/ SOFTWARE ERROR RERUN COUNT 
          BSSN   1           12/ RESERVED FOR CDC 
  
 EPSS     BSSN   3           42/ ENCRYPTED BATCH PASSWORD 
 PESS     BSSN   2           18/ PASSWORD EXPIRATION DATE 
  
          BSSN   2*5         2*60/ RESERVED FOR CDC 
  
 DDSSL    EQU    *-JISS      LENGTH OF INPUT DATA 
          SPACE  4,10 
**        LOCATIONS USED FOR OUTPUT FILES.
  
  
          LOC    DDSS+10*5
  
 JOSS     BSSN   0           JOB OUTPUT DATA
          BSSN   2           24/ RESERVED FOR CDC 
 RASS     BSSN   2           24/ RANDOM ADDRESS OF DAYFILE
 SCSS     BSSN   1           2/ RESERVED FOR CDC
                             4/ PRINT IMAGE CODE
                             6/ SPACE CODE (580-PFC SUPPORT)
  
 LCSS     BSSN   1           12/ LINES OR CARDS LIMIT INDEX 
          BSSN   4           48/ RESERVED FOR CDC 
  
 RCSS     BSSN   1           12/ REPEAT COUNT 
 RTSS     BSSN   2           24/ RANDOM INDEX 
 RBSS     BSSN   1           12/ RE-QUEUE BUFFER
          BSSN   1           12/ RESERVED FOR CDC 
  
          BSSN   4*5         4*60/ RESERVED FOR CDC 
  
 DDSSL    EQU    *-JOSS      LENGTH OF OUTPUT DATA
          SPACE  4,10 
**        LOCATIONS USED FOR BOTH INPUT AND OUTPUT FILES. 
  
  
          LOC    BFMS+2+27*5
  
 FGSS     BSSN   0           FLAGS
          BSSN   1           1/  DATA IN USER DATA BLOCK
                             9/  RESERVED FOR CDC 
                             1/  FILE IN ACTIVE QUEUE 
                             1/  FILE PLACED IN QUEUE 
 RMSS     BSSN   1           12/ RESIDENT MAINFRAME MACHINE ID
 CMSS     BSSN   1           12/ CREATION MAINFRAME MACHINE ID
 FLSS     BSSN   2           24/ FILE LENGTH IN SECTORS 
  
*         THE DESTINATION FAMILY NAME AND USER NUMBER DETERMINE 
*         THE REMOTE BATCH TERMINAL FOR WHICH THE QUEUED FILE 
*         IS DESTINED TO.  THE *ROUTE* FIELD IN THE QFT AND EJT 
*         ENTRIES REFLECT THIS INFORMATION.  THESE FIELDS ARE 
*         ZERO IF THE FILE IS DESTINED TO A LOCAL BATCH DEVICE. 
  
 DASS     BSSN   5           42/ ACCOUNT NUMBER OF DESTINATION
                             18/ USER INDEX OF DESTINATION
  
 FDSS     BSSN   5           42/ FAMILY NAME OF DESTINATION 
                             18/ RESERVED FOR CDC 
  
*         FOR THE INPUT FILE, THE CREATOR FAMILY NAME AND 
*         USER NUMBER REFLECT THE INFORMATION ON THE
*         FIRST USER STATEMENT IN THE JOB.  FOR THE OUTPUT
*         FILE, THE CREATOR INFORMATION IS THE FAMILY NAME
*         AND USER NUMBER THAT IS CURRENTLY IN EFFECT WHEN
*         THE FILE IS QUEUED. 
  
 ACSS     BSSN   5           42/ USER NUMBER OF CREATOR 
                             18/ USER INDEX OF CREATOR
  
 FMSS     BSSN   3           42/ CREATION FAMILY NAME 
 SLSS     BSSN   2           18/ CREATION SYSTEM LOGICAL ID 
  
*         THE OWNERSHIP FAMILY NAME AND USER NUMBER DETERMINES
*         THE USER THAT CONTROLS THE JOB OR QUEUE FILE.  THIS 
*         USER CAN STATUS, ATTACH OR DROP THE JOB/QUEUED FILE 
*         USING ENQUIRE, QGET AND DROP CONTROL STATEMENTS.
*         THE FO,UI FIELDS IN THE QFT AND EJT ENTRY REFLECT 
*         THE INFORMATION.
  
 OASS     BSSN   5           42/ USER NUMBER OF OWNER 
                             18/ USER INDEX OF OWNER
  
 FOSS     BSSN   5           42/ FAMILY NAME OF OWNER 
                             18/ RESERVED FOR CDC 
  
 CJSS     BSSN   2           24/ JOB SEQUENCE NUMBER OF CREATOR 
          BSSN   1           12/ RESERVED FOR CDC 
 DCSS     BSSN   1           12/ DISPOSITION CODE 
 PRSS     BSSN   1           12/ PRIORITY 
  
 OJSS     BSSN   0
 CDSS     BSSN   0
          BSSN   2           24/ ORIGINAL JOB SEQUENCE NUMBER 
          BSSN   3           36/ QUEUED FILE CREATION DATE AND TIME 
  
 JNSS     BSSN   5           42/ USER JOB NAME
                             18/ RESERVED FOR CDC 
  
 CHSS     BSSN   5           60/ CHARGE NUMBER
  
 PJSS     BSSN   2*5         2*60/ PROJECT NUMBER 
  
  
*         THE REMOTE FAMILY NAME AND USER NAME IS USED TO SPECIFY 
*         THE TID THAT THE FILE WILL BE ROUTED TO ON A REMOTE 
*         MAINFRAME.
  
 RUSS     BSSN   5           42/ REMOTE USER NAME 
                             18/ RESERVED FOR CDC 
  
 RFSS     BSSN   5           42/ REMOTE FAMILY NAME 
                             18/ RESERVED FOR CDC 
  
          BSSN   5           60/ RESERVED FOR CDC 
  
 VASS     BSSN   ABSS*5      ABSS*60/ FIRST HALF OF VALIDATION BLOCK
 AWSS     EQU    VASS+5*AAWC ACCESS CONTROL WORD
  
 EISS     BSSN   0           END OF INITIALIZED FILE DATA 
 UBSS     BSSN   9D*5        9D*60/ USER DATA BLOCK 
  
          BSSN   0           LWA+1 OF QUEUE FILE SYSTEM SECTOR DATA 
          SPACE  4,10 
**        LOCATIONS USED FOR ROLLOUT FILES (FILE TYPE *ROFT*).
* 
*         A JOB ROLLOUT FILE IS DISTINGUISHED FROM A *DMP=* ROLLOUT 
*         FILE BY THE PRESENCE OF A ZERO VALUE IN LOCATION *FASS*.  THE 
*         *FNSS* FILE NAME OF A JOB ROLLOUT FILE IS THE JSN OF THE JOB. 
  
  
          LOC    DDSS 
  
 DBSS     BSSN   3*5         3*60/ DAYFILE BUFFER POINTERS
  
 SJSS     BSSN   1           12/ SSJ= FLAG, NONZERO IF SSJ= JOB 
 DPSS     BSSN   1           12/ DMP= CM FL CONTROL 
 CSSS     BSSN   1           12/ SERVICE CLASS CHANGE 
          BSSN   2           24/ RESERVED FOR CDC 
  
          BSSN   5*5         5*60/ RESERVED FOR CDC 
  
 SRSS     BSSN   1           12/  RESERVED FOR CDC
          BSSN   1           6/  FLAGS, 6/  RESERVED
          BSSN   3           18/ TIME INCREMENT 
                             18/ SRU INCREMENT
  
          BSSN   1*5         60/ RESERVED FOR CDC 
  
 SISS     BSSN   1           12/ SUBSYSTEM IDENTIFIER 
  
 CPSS     BSSN   1           12/CONTROL POINT NUMBER
 VMSS     BSSN   3           36/ SERVICE CLASS VALIDATION MASK
          BSSN   5*5         5*5/ RESERVED FOR CDC
  
 QASS     BSSN   6*5         6*5/ *QAC* *ALTER* PARAMETERS FOR *1RI*
  
 EJSS     BSSN   EJTE*5      EJT ENTRY AT TIME OF ROLLOUT 
  
          BSSN   10*5-EJTE*5  (10-EJTE)*60/ RESERVED FOR EJT EXPANSION
  
 R1SS     BSSN   5           60/ *RC1N* FROM NFL
  
 R2SS     BSSN   5           60/ *RC2N* FROM NFL
  
 IFSS     BSSN   5           60/ *INPUT* FILE FST ENTRY 
  
 PFSS     BSSN   5           60/ PRIMARY FILE FNT ENTRY 
  
 DFSS     BSSN   5           60/ DM* FILE FST ENTRY 
  
 COSS     BSSN   5           SCP CONNECTIONS (CPA WORD *SSCW*)
  
          BSSN   14D*5       16D*60/ RESERVED FOR CDC 
  
          BSSN   4*5         4*60/ RESERVED FOR INSTALLATIONS 
  
 LWSS     BSSN   0           LWA+1 OF ROLLOUT FILE SYSTEM SECTOR DATA 
          SPACE  4,10 
 END      BSSN
          SPACE  4,10 
 VR1$     IF     DEF,VR1$ 
  
  
*         THE FOLLOWING DEFINITIONS ARE VERSION ONE SYSTEM
*         SECTOR EQUIVALENCES SO THAT *QLOAD*, BY DEFINING
*         THE SYMBOL *VR1$* WILL BE ABLE TO REFORMAT A VER- 
*         SION ONE SYSTEM SECTOR INTO A VERSION TWO SYSTEM
*         SECTOR AND HENCE LOAD VERSION ONE QUEUED FILES. 
  
  
          QUAL   NOSV1
  
  
 ARBS     EQU    15D         VERSION 1 VALUE FOR ACCOUNT BLOCK LENGTH 
  
  
  
 BEGIN    BSSN   BFMS 
  
 BFMS     BSSN   1           12/ LINKAGE BYTE (=3777B)
          BSSN   1           12/ RECORD LENGTH (=77B) 
  
 FNSS     BSSN   5           60/ COPY OF FNT ENTRY
  
 EQSS     BSSN   1           3/ ,9/ EST ORDINAL 
 FTSS     BSSN   1           12/ FIRST TRACK
 NSSS     BSSN   1           12/ NEXT SECTOR/TRACK POINTER
          BSSN   1           12/ RESERVED FOR CDC 
 FASS     BSSN   1           12/ ADDRESS OF FST ENTRY 
  
 DTSS     BSSN   5           11/ 0,1/ EOI,12/ ,36/ DATE AND TIME
  
          BSSN   5*5         5*60/ RESERVED FOR CDC 
  
 DDSS     BSSN   0           FILE DEPENDENT DATA AREA FWA 
  
          LOC    DDSS 
  
 JISS     BSSN   0           JOB INPUT DATA 
  
 JSSS     BSSN   2           24/ JOB SEQUENCE NUMBER
          BSSN   1           12/ RESERVED FOR CDC 
 JTSS     BSSN   1           JOB CARD TIME LIMIT / 10B
 JFSS     BSSN   1           12/ JOB FLAGS
*                                BIT 11 = EI200 JOB IN PROGRESS 
*                                BIT  0 = KEYPUNCH MODE O26/O29 
  
 JCSS     BSSN   1           12/ JOB CARD CM FIELD LENGTH 
 JESS     BSSN   1           12/ JOB CARD ECS FIELD LENGTH
 CRSS     BSSN   2           24/ NUMBER OF CARDS READ 
          BSSN   1           12/ RESERVED FOR CDC 
  
 TNSS     BSSN   4           42/ TERMINAL NAME, 6/
          BSSN   1           12/ RESERVED FOR CDC 
  
          LOC    DDSS 
  
          BSSN   1           12/ RESERVED FOR CDC 
 PFSS     BSSN   1           12/ RESERVED FOR CDC 
 RASS     BSSN   2           24/ RANDOM ADDRESS OF DAYFILE
 SCSS     BSSN   1           12/ SPACE CODE (580-PFC SUPPORT) 
  
 LCSS     BSSN   1           12/ LINES OR CARDS LIMIT INDEX 
          BSSN   4           48/ RESERVED FOR CDC 
  
 RCSS     BSSN   1           12/ REPEAT COUNT 
 RTSS     BSSN   2           24/ RANDOM INDEX 
 RBSS     BSSN   1           12/ RE-QUEUE BUFFER
          BSSN   1           12/ RESERVED FOR CDC 
  
          LOC    BFMS+2+13*5
  
 OTSS     BSSN   1           12/ FILE ORIGIN TYPE 
 PRSS     BSSN   1           12/ FILE PRIORITY
 MISS     BSSN   1           12/ CREATION MAINFRAME MACHINE ID
 FLSS     BSSN   2           24/ FILE LENGTH IN SECTORS/10B 
                             24/ FILE LENGTH IN SECTORS (FOR DAYFILES)
  
 ICSS     BSSN   1           12/ INTERNAL CHARACTERISTICS 
 ECSS     BSSN   1           12/ EXTERNAL CHARACTERISTICS 
 FCSS     BSSN   1           12/ FORMS CODE 
 DVSS     BSSN   1           12/ DEVICE CODE
 DCSS     BSSN   1           NOS/BE DEVICE CODE 
  
 DASS     BSSN   5           42/ ACCOUNT NUMBER OF DESTINATION
                             18/ USER INDEX OF DESTINATION
  
 FDSS     BSSN   4           48/ FAMILY NAME OF DESTINATION 
 ODSS     BSSN   1           12/ FAMILY ORDINAL OF DESTINATION
  
 DISS     BSSN   2           24/ DESTINATION TERMINAL IDENTIFICATION
          BSSN   2           24/ RESERVED FOR CDC 
  
 QFSS     BSSN   1           12/ RESIDENT MAINFRAME MACHINE ID
  
 FSSS     BSSN   5           60/ FST ENTRY FOR QUEUE PROTECTED FILES
  
 FMSS     BSSN   4           48/ FAMILY NAME OF CREATOR 
 OOSS     BSSN   1           12/ FAMILY ORDINAL OF CREATOR
  
 ACSS     BSSN   5           42/ ACCOUNT NUMBER OF CREATOR
                             18/ UI OF CREATOR
  
 CDSS     BSSN   0
          BSSN   1           11/ 0
                              1/ RECOVERY FLAG
          BSSN   4           48/ QUEUED FILE CREATION DATE AND TIME 
  
 JNSS     BSSN   5           60/ JOB CARD JOB NAME
  
 OHSS     BSSN   5           60/ ORIGINATION HOST NAME
  
 DHSS     BSSN   5           60/ DESTINATION HOST NAME
  
 FRSS     BSSN   0           FILE ROUTING CONTROL 
          BSSN   4           48/ RESERVED FOR CDC 
          BSSN   1            1/ DATA IN USER DATA BLOCK
                              9/ RESERVED FOR CDC 
                              1/ QUEUE FILE STATUS (1 = ACTIVE) 
                              1/ FILE PLACED IN QUEUE 
  
 VASS     BSSN   ARBS*5      ARBS*60/ ACCOUNT FILE VALIDATION BLOCK 
  
 AWSS     EQU    VASS+5*AAWC ACCESS CONTROL WORD
  
          BSSN   5*2         2*60/ RESERVED FOR CDC 
  
 EISS     BSSN   0           END OF INITIALIZED FILE DATA 
 UBSS     BSSN   10D*5       10D*60/ USER DATA BLOCK
  
          LOC    DDSS 
  
 DBSS     BSSN   3*5         3*60/ DAYFILE BUFFER POINTERS
  
 INSS     BSSN   2*5         2*60/ INPUT FILE FNT AND FST 
  
 AESS     BSSN   13*5        13*5*12/ ASSIGNED EQUIPMENT LIST 
                               TERMINATED BY ZERO BYTE
  
 SJSS     BSSN   1           12/ SSJ= FLAG, NONZERO IF SSJ= JOB 
          BSSN   2           24/ RESERVED FOR CDC 
 FOSS     BSSN   1           6/ RESERVED, 6/ FAMILY EST ORDINAL 
 ERSS     BSSN   1           12/ ROLLOUT ECS FIELD LENGTH/1000B 
  
 SPSS     BSSN   SSJL*5      SSJ= JOB PARAMETER BLOCK 
  
 SWSS     BSSN   0           SYSTEM CONTROL POINT DATA (*SF.SWPI*)
          BSSN   2           6/ PRIORITY, 18/ COMPLETION ADDRESS
 CLSS     BSSN   1           6/ RESERVED,6/ JOB CLASS INFORMATION 
          BSSN   2           24/ RESERVED FOR CDC 
  
 SRSS     BSSN   1           12/ RESERVED FOR CDC 
          BSSN   1           6/ FLAGS, 6/ RESERVED
          BSSN   3           18/ FINE INCREMENT 
                             18/ SRU INCREMENT
  
 TLSS     BSSN   20*5        TERMINAL TABLE AT LAST ROLLOUT 
  
  
 TRSS     BSSN   20*5        TERMINAL TABLE FOR RECOVERY
  
 END      BSSN
  
          QUAL   *
 VR1$     ENDIF 
          BASE   *
          SPACE  4,10 
          ENDX
