1                                                                                               SUN SEP 08/96   15:24:55   Page    1
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00001/001   UMLOAD                   D5.0 MASTER     SA  G          W009:UMLOAD/5.0                                                 
            5.0T1     1  UMLOAD.D5.0_MASTER.SA.001          1 LINE     80   88 PAGE UM   SHERRY              JULY 03, 1981  11:55:32
            5.0T1     1                       
0          The MTS relocatable loader.
0          Referenced by comments of: 1021/7, 1021/10 
00001/002A  UMLOAD                   UPDATE          UC  G          W009:UMLOAD.U                                                   
            5.1T1     1  UMLOAD.UPDATE.UC.002               1 LINE     71    2 PAGE UM   SHERRY              JULY 23, 1983  09:48:05
0          Update deck to produce current UMLOAD source from the 
           D5.0 base.
            
           *****************************************************************
           D5.0B version:
            
           A couple of minor bugs fixed.  Also has change to IPL symbol
           table allocation for new version of RAMROD.
            
           *****************************************************************
            
           *****************************************************************
           D5.1 version:
            
           Change to calculation of PR CXD length for LCSPR tables.  See
           update.
           *****************************************************************
00001/003A  UMLOAD                   OBJECT          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   SHERRY                                     
0          Object part of Resident System (468).
00001/004   UMLOAD                   LOADINFO DSECT  SA  G          *LOADINFODSECT                                                  
            5.0T1     3  UMLOAD.LOADINFO_DSECT.SA.004       1 LINE     67    1 PAGE UM   SHERRY              JULY 03, 1981  11:55:43
            5.0T1     3  *LOADINFODSECT       
0          Copy section for information returned by LOADINFO subroutine, part of (354/1).
0          Referenced by comments of: 495/1, 506/3, 545/3, 721/1, 738/1, 804/1, 1023/1 
00001/005A  UMLOAD                   INFO CLS        SA  O          W009:CLSINFO.S                                                  
            5.1T1     2  UMLOAD.INFO_CLS.SA.005             1 LINE    101   34 PAGE UM   SHERRY              JULY 23, 1983  09:48:05
0          A CLS-coded program available via the $INFO command at UM to allow the user
           to examine loader tables (including the resident IPL loader psect) and low
           core symbol tales (LCSYMBOL, SYSDEFS, <FIX>, etc.).  Assemble using
           COPY:MTS.MACROS (344/3) and the *OBJUTIL miscellaneous macros (721/15).
           Copies *CNFGINFODSECT (654) and OLD:CC.MACROS (1054/4). Requires the MSG routines (1023/1).
            
           ********************************************************************************
           Changes since D5.0:
            
1                                                                                               SUN SEP 08/96   15:24:55   Page    2
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0            - Now available as the staff-only command $INFO.
             - Some bug fixes.
             - Internal changes to reduce VM requirements.
           ********************************************************************************
00001/006A  UMLOAD                   INFO CLS        OE  O          *CLSINFO                                                        
            5.1T1     3  UMLOAD.INFO_CLS.OE.006             1 LINE  14652    5 PAGE UM   SHERRY              JULY 23, 1983  09:48:08
                         *CLSINFO             
00001/007A  UMLOAD                   INFO CLS        M              W009:CLSINFO.X                                                  
            5.1T1     4  UMLOAD.INFO_CLS.M.007              1 LINE     74    3 PAGE UM   SHERRY              JULY 23, 1983  09:48:08
                         W009:CLSINFO.X       
0          Message file used by the INFO CLS.  Line numbers in this file are important.
00001/008A  UMLOAD                   INFO CLS        WF             W009:CLSINFO.W                                                  
            5.1T1     5  UMLOAD.INFO_CLS.WF.008             1 LINE     86    4 PAGE UM   SHERRY              JULY 23, 1983  09:48:09
                         W009:CLSINFO.W       
0          Writeup describing the INFO CLS program.
00001/009A  UMLOAD                   CLSDRV          SA  O          W009:CLSDRV.S                                                   
            5.1T1     6  UMLOAD.CLSDRV.SA.009               1 LINE    109    1 PAGE UM   SHERRY              JULY 23, 1983  09:48:09
0          This is an interface program which permits the INFO CLS to be run as a normal
           program. Assemble with COPY:MTS.MACROS (344/3) and the *OBJUTIL macros (721/14).
00001/010A  UMLOAD                   CLSDRV          OC  O          W009:CLSDRV.O                                                   
            5.1T1     7  UMLOAD.CLSDRV.OC.010               1 LINE    612    1 PAGE UM   SHERRY              JULY 23, 1983  09:48:09
                         W009:CLSDRV.O        
00003/001   JOBLIST                                  SA  G          S1558 5.0T1 VLO FSNAME=JOBLIST..SA.001(1)                     10
            5.0T1    10  JOBLIST..SA.001                    1 LINE     71    5 PAGE UM   HELFFRICH           AUG. 05, 1981  01:57:33
            5.0T1    10                       
0          Many assemblies which together form the list of available jobs in UMMPS.
           Assemble with PAR=B.
0          Referenced by comments of: 534/1 
00003/002   JOBLIST                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00004/001A  TABLES                   UM TABLES       SA  G          WSG:TABLES                                                      
            5.1T1     8  TABLES..SA.001                     1 LINE    120    2 PAGE UM   WSG                 JULY 23, 1983  09:48:09
                         WSG.:TABLES          
0          Tables that define the hardware configuration for the UM Amdahl 5860, the
           installation name, the list of public disk volume names, the number of job
           tables, the year and time zone, the list of backup consoles used by the
           supervisor backup operator console support, and the list of regular operator
           consoles and printers used by the OPERATOR job.
1                                                                                               SUN SEP 08/96   15:24:55   Page    3
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           Beginning with D5.1, TABLES is generated by a comprehensive set of macros
           (004/3) making the definition of the I/O configuration almost trivial. This
           deck is distributed as an example of an I/O configuration; obviously, each
           installation will supply TABLES for its local configuration or use DECKGEN
           (004/5).
            
           Assemble using the TABLES MACROS (004/3), COPY:FILE.MACROS (482/45) and
           COPY:SETPARM (653) Use *ASMH with PAR=REL2 to suppress halfword relocatable
           Y-CON warning messages. Contains commands to assemble starting at line 0.
0          Referenced by comments of: 4/3, 482/48 
00004/002A  TABLES                   UM TABLES       OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   WSG                                        
0          Object part of Resident System (468).
00004/003C  TABLES                   MACROS          SM  G          MTA:TABLES.MAC                                                  
            5.1T1     9  TABLES.MACROS.SM.003               1 LINE     73   34 PAGE UM   MTA                 JULY 23, 1983  09:48:09
                         MTA:TABLES.MAC       
0          Macro library used for generation of TABLES assembly (004/1) from a
           description of the configuration. See TABLES writeup (004/4) for
           details of the macro usage.
0          Referenced by comments of: 4/1 
00004/004A  TABLES                   WRITEUP         WF             MTA:TABLES.W                                                    
            5.1T3   323  TABLES.WRITEUP.WF.004              1 LINE    106   13 PAGE UM   MTA                 AUG. 20, 1983  19:29:19
                         MTA:TABLES.W         
0          Referenced by comments of: 4/3 
00004/005A  TABLES                   DECKGEN         SA  O          MTS:DECKGEN(1000)                                               
            5.1T3   324  TABLES.DECKGEN.SA.005              1 LINE     72   45 PAGE UBC            HELFFRICH AUG. 20, 1983  19:29:20
0          Stand-alone program to generate an assembler object deck for the system tables
           CSECT based on input entered from the operator's console.  It will also write
           the generated object deck onto a tape, for subsequent use with the IPLREADER
           program (1021), which can replace the tables csect in a system with the one
           from the tape.  Uses the IPLREADER routines for console i/o, which means that
           a 3270 may be used.  Copies *CNFGINFODSECT (654).  Assemble with *ASMH using
           COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), and *SYSMAC.
            
           ********************************************************************************
           D5.0A version:
            
           Removed MAXADD from tables generated.
           ********************************************************************************
0          Referenced by comments of: 4/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page    4
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00004/006A  TABLES                   DECKGEN         OC  O          MTS:DECKGEN(1,999)                                              
            5.1T3   325  TABLES.DECKGEN.OC.006              1 LINE     80    9 PAGE UBC            HELFFRICH AUG. 20, 1983  19:29:23
                         MTS.:DECKGEN         
0          This object deck is also the third IPL deck in the first file of the
           distribution restore tape.
00004/007A  TABLES                   *IPL.DECKGEN    O   O          *IPL.DECKGEN                                                    
            5.1T3   326  TABLES.?IPL.DECKGEN.O.007          1 SEQ    4100   54 PAGE UBC            HELFFRICH AUG. 20, 1983  19:29:24
                         *IPL.DECKGEN         
0          Object for DECKGEN suitable for loading by the IPL reader.
00004/008A  TABLES                   DECKGEN DESCR   WF             MTS:DECKGEN.W                                                   
            5.1T3   327  TABLES.DECKGEN_DESCR.WF.008        1 LINE    126   10 PAGE UBC            HELFFRICH AUG. 20, 1983  19:29:26
                         MTS:DECKGEN.W        
0          Writeup describing how to use the DECKGEN program to generate a tables object
           deck. A copy is included with the paper documentation.
00005/001   JBRP                     D5.0 SOURCE     SA  G          S1561 5.0T4 VLO FSNAME=JBRP.D5.0_SOURCE.SA.001(1)            268
            5.0T4   268  JBRP.D5.0_SOURCE.SA.001            1 LINE     80    7 PAGE UM   MTA                 AUG. 09, 1981  22:30:26
            5.0T10  172                       
0          Job request processor (task initialization).
           Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
           Assemble using COPY:SETPARM (653).
00005/002   JBRP                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00006/001   FNDJTL                                   SA  G          S1558 5.0T1 VLO FSNAME=FNDJTL..SA.001(1)                      17
            5.0T1    17  FNDJTL..SA.001                     1 LINE     80    2 PAGE UM   MTA                 JULY 27, 1977  21:23:58
            5.0T1    17                       
0          FIND JOB TABLE.
00006/002   FNDJTL                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00007/001   FBJTJL                   D5.0 SOURCE     SA  G          S1561 5.0T4 VLO FSNAME=FBJTJL.D5.0_SOURCE.SA.001(1)          270
            5.0T4   270  FBJTJL.D5.0_SOURCE.SA.001          1 LINE     80    4 PAGE UM   MTA                 AUG. 09, 1981  22:31:05
            5.0T10  174                       
0          Free buffers and job table, called by EXIT (010).
           Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
           Assemble using COPY:SETPARM (653).
1                                                                                               SUN SEP 08/96   15:24:55   Page    5
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00007/002   FBJTJL                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00008/001   FIDCQ                                    SA  G          S1558 5.0T1 VLO FSNAME=FIDCQ..SA.001(1)                       18
            5.0T1    18  FIDCQ..SA.001                      1 LINE     72    1 PAGE UM   MTA                 JULY 03, 1981  11:58:50
            5.0T1    18                       
0          Free I/O devices and CPU queue. Copies COPY:LLMPSEQU (087) and
           COPY:GLOBALS (1026/3). Assemble using COPY:SETPARM (653) and
           COPY:MISC.MACROS (728/1).
00008/002A  FIDCQ                                    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
            
           **********************************************************************
           D5.1 version:
            
           Reassembled since LLMPSEQU changed.
           **********************************************************************
00009/001A  BUFALLOC                                 SA  G          MTS.:BUFALLOC.S                                               19
            5.1T1    10  BUFALLOC..SA.001                   1 LINE    128    4 PAGE UM   MTS       OGDEN     JULY 23, 1983  09:49:04
0          Subroutine to allocate and release 128-byte, shared memory,
           terminal, I/O buffers. This routine is called by several
           terminal device support routines (TSFO, PDP8RTN, MNETRTN, etc).
           It allocates buffers from a pool of buffers which are in paged,
           shared VM which BUFALLOC allocates dynamically. The purpose of
           these buffers is to have the terminal routines doing I/O into
           shared pages, thus reducing the number of different VM pages
           locked in real memory during terminal I/O. Copies COPY:GLOBALS
           (1026/3), COPY:LLMPSEQU (087), and *CNFGINFODSECT (654).
            
           The BUFSTAT program (009/3) prints which job is using which
           buffer(s).
            
           *****************************************************************************
           D5.0C version:
            
           BUFALLOC has been changed to fetch protect the pages it allocated in shared
           VM and as a result some BUFALLOC callers will need to be changed to do an
           SVC PROTOFF/SVC PROTON sequence around references to terminal buffers.
           *****************************************************************************
00009/002A  BUFALLOC                                 OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       OGDEN                            
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page    6
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00009/003A  BUFALLOC                 BUFSTAT         SA  G          MTS:BUFSTAT(1000)                                               
            5.1T1    11  BUFALLOC.BUFSTAT.SA.003            1 LINE     72    3 PAGE UM   MTS       OGDEN     JULY 23, 1983  09:49:05
                         MTS.:BUFSTAT         
0          Program to print which jobs are using which low-core terminal buffers, how many are not
           being used, and approximately how many more are required when they are all in use.
           Run with PROT=off. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
0          Referenced by comments of: 9/1, 618/1 
00009/004A  BUFALLOC                 BUFSTAT         OC  G          MTS:BUFSTAT(1,999)                                              
            5.1T1    12  BUFALLOC.BUFSTAT.OC.004            1 LINE     80    2 PAGE UM   MTS       OGDEN     JULY 23, 1983  09:49:05
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00010/001   EXIT                                     SA  G          S1558 5.0T1 VLO FSNAME=EXIT..SA.001(1)                        22
            5.0T1    22  EXIT..SA.001                       1 LINE     72    3 PAGE UM   MTA                 JULY 03, 1981  12:03:12
            5.0T1    22                       
0          Kills calling task.  Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
           Assemble using COPY:SETPARM (653) and COPY:DM.MACROS (769/29).
0          Referenced by comments of: 7/1 
00010/002C  EXIT                                     UC  G          MTA:EXIT.U(1)                                                   
            5.1T1    13  EXIT..UC.002                       1 LINE     68    1 PAGE UM   MTA                 JULY 23, 1983  09:49:05
0           Post D5.0 updates to EXIT.  Makes the SVC DISKIO conditional.
00010/003A  EXIT                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00011/001   CARDUC                                   SA  G          S1558 5.0T1 VLO FSNAME=CARDUC..SA.001(1)                      23
            5.0T1    23  CARDUC..SA.001                     1 LINE     80    9 PAGE UM   MTA                 JULY 30, 1973  03:30.59
            5.0T1    23                       
0          2501 and 2540 reader Unit Check Routines.
00011/002   CARDUC                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00012/001   TAPEUC                                                # (OBSOLETE)                                                      
            D4T1     23  TAPEUC..SA.001                     1 LINE     80   18 PAGE SFU                      JULY 27, 1977  21:25:13
            D4T1     23                       
0          Magnetic tape unit check routines, obsoleted by (787/19).
1                                                                                               SUN SEP 08/96   15:24:55   Page    7
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00013/001   PTRUC                    5.0 SOURCE      SA  G          S1561 5.0T4 VLO FSNAME=PTRUC.5.0_SOURCE.SA.001(1)            272
            5.0T4   272  PTRUC.5.0_SOURCE.SA.001            1 LINE     80   14 PAGE UM   MTA                 AUG. 09, 1981  22:31:11
            5.0T10  176                       
0          1403, 1443, 3211, and 3203 printer Unit Check Routines.
00013/002A  PTRUC                    UPDATE          UC  G          MTA:PTRUC.U                                                     
            5.1T1    14  PTRUC.UPDATE.UC.002                1 LINE     64    1 PAGE UM   MTA                 JULY 23, 1983  09:49:06
0          Update to bring the D5.0 PTRUC to current version.
            
           ******************************************************************
           D5.0B version:
            
           Fixes bug that loops on certain 3211 errors.
           ******************************************************************
00013/003A  PTRUC                                    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00014/001A  PUNUC                                    SA  G          W226:PUNUC                                                      
            5.1T1    15  PUNUC..SA.001                      1 LINE     71    4 PAGE UM   DWB                 JULY 23, 1983  09:49:06
0          2540, 2520, and 1442 punch Unit Check Routines.
            
           **********************************************************************
           D5.1 version:
            
           Changed to add support for a 2520 punch.
           **********************************************************************
00014/002   PUNUC                                    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   DWB                                        
0          Object part of Resident System (468).
00016/001A  CCTB                                     SA  G          PAGE:CCTB.S                                                     
            5.1T1    16  CCTB..SA.001                       1 LINE     80    3 PAGE UM   MTS       SHERRY    JULY 23, 1983  09:49:08
0          Used by MTS to translate logical carriage control to printer commands.
           recently changed to define "8" as bottom of logical page.  See the
           DSR update (637/2) for details. 
            
           ***********************************************************************
           D5.0B version:
            
           Changed to add ":" carriage control.
           ***********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page    8
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00016/002A  CCTB                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       SHERRY                           
0          Object part of Resident System (468).
00017/001   PN XLATE TABLE                           SA           # (OBSOLETE)                                                      
            D3T1     17  PN_XLATE_TABLE..SA.1               1 SEQ      80    1 PAGE UM                       JULY 30, 1973  23:01.33
00018/001   STOP/BLAST/GOOSE JOBS                    SA  G          S1558 5.0T1 VLO FSNAME=STOP/BLAST/GOOSE_JOBS..SA.001(1)       26
            5.0T1    26  STOP/BLAST/GOOSE_JOBS..SA.001      1 SEQ      80    1 PAGE UM   MTA                 JULY 30, 1973  23:01.54
            5.0T1    26                       
0          The STOP, BLAST, and GOOSE UMMPS job programs.  Unchanged since DIST 1.0.
00018/002   STOP/BLAST/GOOSE JOBS                    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00019/001A  TASKS JOB                                SA  G          S0792 WSGFS FSNAME=TASKS.SA                                     
            5.1T1    17  TASKS_JOB..SA.001                  1 LINE     80   10 PAGE UM   WSG                 FEB. 09, 1983  12:05:02
0          The job program version of *TASKS (145); contains the TSKFMT routine
           called by *TASKS (145/1) and SSRTN (413/1) and the TSKFMT2 routine
           called by the MTS Message System SCANJBTB routine (798/75). Copies
           COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
0          Referenced by comments of: 145/1, 413/1, 647/1 
00019/002A  TASKS JOB                                OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   WSG                                        
0          Object part of Resident System (468).
00020/001   JOBDUMP                                  SA  G          S1558 5.0T1 VLO FSNAME=JOBDUMP..SA.001(1)                     28
            5.0T1    28  JOBDUMP..SA.001                    1 SEQ      80    1 PAGE UM   MTA                 JULY 30, 1973  23:03.31
            5.0T1    28                       
0          UMMPS "JOBDUMP" job.  Uses SVC SJOBDUMP to dump the specified job.
           Unchanged since DIST 1.0.
00020/002   JOBDUMP                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00021/001A  BROADCST                                 SA  G          MTS:BROADCST(1000)                                              
            5.1T1    18  BROADCST..SA.001                   1 LINE     72    8 PAGE UM   MTS       OGDEN     JULY 23, 1983  09:51:12
                         MTS.:BROADCST        
0          Job program used by system operator to send messages to a specific user or
           to all users.  Has a SETA symbol (&DC) which controls conditional assembly
           of code which sends broadcast messages to the UM DATA CONCENTRATORS.
           Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).  Assemble using 
1                                                                                               SUN SEP 08/96   15:24:55   Page    9
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          COPY:MISC.MACROS (728).
00021/002A  BROADCST                                 OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       OGDEN                            
0          Object part of Resident System (468).
00021/003A  BROADCST                 PGM             OC  G          MTS:BROADCST(1,499)                                             
            5.1T1    19  BROADCST.PGM.OC.003                1 LINE     25    1 PAGE UM   MTS       OGDEN     JULY 23, 1983  09:51:13
0          A program that can be $RUN to do what the BROADCST JOB program does.
00023/001   TPMOVE JOBS                              SA  O          TAPE:TPMOVE(1000)                                               
            5.0T1    31  TPMOVE_JOBS..SA.001                1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  12:04:35
            5.0T1    31                       
0          Jobs to move a tape (rew, wtm, bsf, bsr, fsf, fsr, erg). the wtm job doesn't
           use a modeset, so the density will be unpredictable on dual-density tape
           drives.
            
           Requires the tape Unit Check Routines (787/19). Assemble using COPY:UC.MACROS
           (787/1).
0          Referenced by comments of: 787/20 
00023/002   TPMOVE JOBS                              OC  O        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00024/001   ONLINE/OFFLINE                           SA  G          MTS:ON/OFFLINE(1,999)                                           
            5.0T1    32  ONLINE/OFFLINE..SA.001             1 LINE     80    8 PAGE UM   MTA                 JULY 03, 1981  12:04:36
            5.0T1    32  MTS.:ON/OFFLINE      
0          Job to online or offline a device, control unit, channel, or channel-control unit path.
           Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087).
            
            1. To online/offline one or more devices:
                ONLINE|OFFLINE devname1 devname2 ...
            
            2. To online/offline a control unit:
                ONLINE|OFFLINE CU|ALL devname1|cu#1 devname2|cu#2 ...
               where the devnames must be names of devices that are attached to only one control unit,
               and the cu#s are control unit numbers as assigned in TABLES.
            
            3. To online/offline a connection between a channel and a control unit:
                ONLINE|OFFLINE CHAN|CH|CHANNEL chanad devname1|cu#1 devname2|cu#2 ...
               where chanad is either a channel number in hex (e.g. 0, 1, 2, etc.) or a channel address
               in hex (e.g. 080, 1d0, etc.).  The devnames must be devices attached to the specified
               channel in only one way.
            
            4. To online/offline a channel:
                ONLINE|OFFLINE CHAN|CH|CHANNEL chanad
               where chanad is the same as in 3. above.  Only one chanad may be given.
1                                                                                               SUN SEP 08/96   15:24:55   Page   10
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00024/002   ONLINE/OFFLINE                           OC  O        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00025/001   QN/PN/TN JOBS                            SA  G          MTS.:PNQNTN(1,900)                                              
            5.0T1    33  QN/PN/TN_JOBS..SA.001              1 LINE     67    3 PAGE UM   MTA                 AUG. 05, 1981  01:57:53
            5.0T1    33                       
0          Three assemblies that load the 1403 UCS buffer for QN, Pn, or Tn character sets.
           The Qn job contains a subroutine used by all the rest of them.
           For example, entering "PN PTR1 ECHO" on the operator's console will load the UCS buffer for PTR1 with the PN
           character set and echo the characters to the printer for verification.
           Unchanged since Distribution 2.0.
00025/002   QN/PN/TN JOBS                            OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00026/001   CPCC JOB                                 SA           # (OBSOLETE)                                                      
            D3T1     25  CPCC_JOB..SA.1                     1 SEQ      80    7 PAGE UM                       JULY 30, 1973  23:04.05
00031/001   GTZ                                                   # (OBSOLETE)                                                      
            D2.1    036                                                             UM                                              
00038/001   TSFO                                     SA  G  TSF     W032:TSFOSOU5.0                                                 
            5.0T1    34  TSFO..SA.001                       1 LINE     80  244 PAGE UM   COWAN     EMERY     JULY 03, 1981  12:04:39
            5.0T1    34                       
0          Source for TSFO (Twenty-Seven-Forty-One), the MTS device support routines for the IBM
           2703 (device types TTY and 2741) or the Memorex 1270 with auto-speed (device type MRXA).
           Assemble using COPY:MTS.MACROS (344/3).
00038/002   TSFO                     *2741RTN        OC  G          *2741RTN                                                        
            5.0T1    35  TSFO.*2741RTN.OC.002               1 LINE     80   17 PAGE UM   COWAN     EMERY     JULY 03, 1981  12:04:55
            5.0T1    35  *2741RTN             
0          This is the TSFO object file which is normally loaded into shared VM by PISTLE at IPL.
           The "COM" card at the beginning tells PISTLE to define the following symbols in LCSYMBOL:
              TSFO       entry point for device type 2741
              TEL2       entry point for device type TTY
              MTXA       entry point for device type MRXA
00038/003   TSFO                     *TTYRTN         OC  G          *TTYRTN                                                         
            5.0T1    36  TSFO.*TTYRTN.OC.003                1 LINE     30    1 PAGE UM   COWAN     EMERY     JULY 03, 1981  12:04:57
            5.0T1    36  *TTYRTN              
0          This file consists of:       $CONTINUE WITH *2741RTN RETURN
                                         LDT            TEL2
            
           It serves the same function as *2741RTN if the symbol TEL2 is undefined in LCSYMBOL.
           Normally TEL2 is defined by PISTLE at IPL.
1                                                                                               SUN SEP 08/96   15:24:55   Page   11
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00038/004   TSFO                     *MRXARTN        OC  G          *MRXARTN                                                        
            5.0T1    37  TSFO.*MRXARTN.OC.004               1 LINE     30    1 PAGE UM   COWAN     EMERY     JULY 03, 1981  12:04:58
            5.0T1    37  *MRXARTN             
0          This file consists of:       $CONTINUE WITH *2741RTN RETURN
                                         LDT            MRXA
            
           It serves the same function as *2741RTN if the symbol MRXA is undefined in LCSYMBOL.
           Normally MRXA is defined by PISTLE at IPL.
00038/005   TSFO                     TRTBLGEN        SA             S1558 5.0T1 VLO FSNAME=TSFO.TRTBLGEN.SA.005(1)                38
            5.0T1    38  TSFO.TRTBLGEN.SA.005               1 LINE     80   11 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:26
            5.0T1    38                       
0          Program to generate translate tables for use with TSFO. It was used to
           generate all non-ASCII tables included in the deck distributed, and can very
           easily be used to generate any arbitrary translate tables. Logical I/O units
           used are:
             1        Definition of names of characters (038/9).
             2        Definition of character set on the golfball, (038/10) and
                      (038/11) are examples.
             3        Definition of the code set being used, either (038/7) or
                      (038/8).
             SPRINT   printed output and error comments.
             SPUNCH   new translate tables.
            
           The program does extensive error checking and if any output occurs on SPUNCH
           it is probably OK.
            
0          Referenced by comments of: 38/7, 38/8, 38/9, 38/10, 38/11 
00038/006   TSFO                     TRTBLGEN        OC             S1558 5.0T1 VLO FSNAME=TSFO.TRTBLGEN.OC.006(1)                39
            5.0T1    39  TSFO.TRTBLGEN.OC.006               1 LINE     80    3 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:28
            5.0T1    39                       
00038/007   TSFO                     KBD2741PTTC     D              S1558 5.0T1 VLO FSNAME=TSFO.KBD2741PTTC.D.007(1)              40
            5.0T1    40  TSFO.KBD2741PTTC.D.007             1 LINE     41    1 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:30
            5.0T1    40                       
0          See (038/5).  This is the 2741 PTTC keyboard definition.
0          Referenced by comments of: 38/5 
00038/008   TSFO                     KBD2741CORR     D              S1558 5.0T1 VLO FSNAME=TSFO.KBD2741CORR.D.008(1)              41
            5.0T1    41  TSFO.KBD2741CORR.D.008             1 LINE     41    1 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:33
            5.0T1    41                       
0          See (038/5).  This is the 2741 correspondence keyboard definition.
0          Referenced by comments of: 38/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page   12
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00038/009   TSFO                     EBCDDEFN        D              S1558 5.0T1 VLO FSNAME=TSFO.EBCDDEFN.D.009(1)                 42
            5.0T1    42  TSFO.EBCDDEFN.D.009                1 LINE     32    3 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:35
            5.0T1    42                       
0          See (038/5). This is the definition of the names used for characters in the input.
0          Referenced by comments of: 38/5 
00038/010   TSFO                     GOLFPTTC        D              S1558 5.0T1 VLO FSNAME=TSFO.GOLFPTTC.D.010(1)                 43
            5.0T1    43  TSFO.GOLFPTTC.D.010                1 LINE     72    3 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:37
            5.0T1    43                       
0          See (038/5).  This file contains definitions of PTTC golf balls.
           The definitions start at line nnn, where nnn is the last 3 digits of the golf ball number.
           Contains "$CONTINUE WITH W032:GOLFPTTC" lines.
0          Referenced by comments of: 38/5 
00038/011   TSFO                     GOLFCORR        D              S1558 5.0T1 VLO FSNAME=TSFO.GOLFCORR.D.011(1)                 44
            5.0T1    44  TSFO.GOLFCORR.D.011                1 LINE     72    8 PAGE UM   COWAN     EMERY     JULY 27, 1977  21:28:39
            5.0T1    44                       
0          See (038/5).  This file contains definitions of correspondence golf balls.
           The definitions start at line nnn, where nnn is the last 3 digits of the golf ball number.
           Contains "$CONTINUE WITH W032:GOLFCORR" lines.
0          Referenced by comments of: 38/5 
00039/001   CASECONV                                              # (PART OF TRTABLES -- COMP. 779)                                 
            5.0T1    45  CASECONV..SA.001                   1 LINE     80    1 PAGE UM                       APR. 05, 1980  13:40:36
            5.0T1    45                       
0          Translate table to convert lower case to upper case.
           All other characters are unchanged.
00040/001   KEYWRD SCANNER                           SA  G          W164:KWIC(MIN,-1)                                               
            5.0T1    46  KEYWRD_SCANNER..SA.001             1 LINE     73   58 PAGE UM   STERKEN             JULY 03, 1981  12:05:25
            5.0T1    46                       
0          D5.0 base source for Keyword Scanner.  Copies COPY:GLOBALS (1026/3).
0          Referenced by comments of: 40/5, 798/33, 798/67, 798/81 
00040/002A  KEYWRD SCANNER           UPDATE          UC  G          W164:KWIC(10000,*L)                                             
            5.1T1    20  KEYWRD_SCANNER.UPDATE.UC.002       1 LINE     82    4 PAGE UM   STERKEN             JULY 23, 1983  09:51:13
00040/003A  KEYWRD SCANNER           OBJECT          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   STERKEN                                    
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page   13
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00040/004   KEYWRD SCANNER           CHANGES         WF             W164:FMT.KWSCAN                                                 
            5.0T1    48  KEYWRD_SCANNER.CHANGES.WF.004      1 LINE     81    4 PAGE UM   STERKEN             JULY 03, 1981  12:05:40
            5.0T1    48                       
00040/005   KEYWRD SCANNER           SPELLING CORR   SA  G          W164:KWIC.SPELL(1000)                                           
            5.0T1    49  KEYWRD_SCANNER.SPELLING_C.SA.005   1 LINE     70    3 PAGE UM   STERKEN             JULY 03, 1981  12:05:41
            5.0T1    49                       
0          Spelling correction subroutine used by MTS and the Keyword Scanner (40/1).
           Also user-callable.
00040/006   KEYWRD SCANNER           SPELLING CORR   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   STERKEN                                    
0          Object part of Resident System (468).
00041/001   GETSPACE/FREESPAC                        SA           # (OBSOLETE)                                                      
            D4T1     51  GETSPACE/FREESPAC.D4_MAST.SA.001   1 SEQ      80   28 PAGE UM                       JULY 27, 1977  21:31:43
0          Obsoleted by (732).
00042/001   MTS                      D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=MTS                         
            5.0T4   274  MTS.D5.0_MASTER.SA.001             1 LINE     80  175 PAGE UM   MTS       BURLING   AUG. 21, 1981  06:03:51
            5.0T10  178                       
0          Master source for MTS. Copies COPY:LLMPSEQU(100) (087),
           COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), COPY:JOBSTA
           (413/9), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS
           (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM (653), COPY:DM.MACROS
           (769/29), and *SYSMAC.
0          Referenced by comments of: 42/2, 344/1 
00042/002A  MTS                      UPDATE          UC  G          MTSS:MTS/UPD                                                    
            5.1T1    21  MTS.UPDATE.UC.002                  1 LINE    119  102 PAGE UM   MTS       BURLING   JULY 23, 1983  09:51:16
0          *CDUPDATE input to produce current source.
            
           The following is a complete list of the MTS pieces. These are the pieces
           which require the DSECT, i.e. use the THEDSECT macro, and its dependencies to
           assemble. The object for all these pieces is in RAMROD.
            
              MTS  (042) 
              FSUB (635) 
              CMDS (636) 
              USUB (638) 
              DSRS (637) 
              DSRI (639) 
              INFO (198)
              PLIM (464) 
              LLXU (354) 
              TIMT (539) 
              RSF  (578) 
              GATE (4000) 
1                                                                                               SUN SEP 08/96   15:24:55   Page   14
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             RNBR (651/13) 
              CMDSTAT (531)
              DYS  (513)
              TBLS (829)
            
           In addition, PRINTDUMP SSCN (400/5) is reassembled whenever MTS is
           reassembled. The object should be placed in PRINTDUMP.
0          Referenced by comments of: 344/1 
00042/003A  MTS                                      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00042/004A  MTS                                      L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=MTS.LIST                  
            5.1T1    22  MTS..L.004                         1 LINE    133  587 PAGE UM   MTS       BURLING   JULY 23, 1983  09:52:55
00042/005   MTS                      FILETYPE WORDS  WF             S1561 5.0T4 VLO FSNAME=MTS.FILETYPE_WORDS.WF.006(1)          278
            5.0T4   278  MTS.FILETYPE_WORDS.WF.006          1 LINE    134    3 PAGE UM   MTA       BURLING   MAY  28, 1975  22:49:52
            5.0T10  182                       
0          Writeup describing how to add a new type of file to MTS.
00042/006   MTS                      TSATBL WORDS    WF             S1561 5.0T4 VLO FSNAME=MTS.TSATBL_WORDS.WF.007(1)            279
            5.0T4   279  MTS.TSATBL_WORDS.WF.007            1 LINE    113    2 PAGE UM   MTA       BURLING   AUG. 21, 1981  06:06:29
            5.0T10  183                       
0          Writeup describing how to use the TSATBL macro (in COPY:MTS.MACROS).
00042/007C  MTS                      CHANGES         WX             MTSS:MTSCHANGESWX                                               
            5.1T1    23  MTS.CHANGES.WX.007                 1 LINE    117   14 PAGE UM   MTS       BURLING   JULY 23, 1983  09:53:01
0          TEXTFORM source for list of MTS changes since last distribution or
           redistribution.
00042/008A  MTS                      CHANGES         P              MTSS:MTSCHANGES                                                 
            5.1T1    24  MTS.CHANGES.P.008                  1 LINE     71   15 PAGE UM   MTS       BURLING   JULY 23, 1983  09:53:02
0          List of changes to MTS since the last distribution or redistribution.
00042/009A  MTS                      COMMENTS        D   G          MTSS:MTS/COM                                                    
            5.1T1    25  MTS.COMMENTS.D.009                 1 LINE     68    3 PAGE UM   MTS       BURLING   JULY 23, 1983  09:53:02
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00043/001   LCSYMBOL                                 SA           # (PART OF GATE)                                                  
                                                                                    UM                                              
0          Part of GATE (4000).
0          Referenced by comments of: 4000/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page   15
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00044/001A  PDP                      BASE SOURCE     SA  G          ALWB:PDP.5.0A                                                   
            5.1T1    26  PDP.BASE_SOURCE.SA.001             1 LINE     72   48 PAGE UM   J BODWIN            JULY 23, 1983  09:53:03
0          The paging drum processor. Assembly parameters allow version to be assembled
           for either 2305 fixed head file and 3330 migration disk, or 2301 drum and
           3330 migration disk and/or 3805 fixed block paging device. Distributed object
           is for 2305/3330/3805 combination normally used on UM system. Copies
           COPY:PCBDSECT (470), COPY:LLMPSEQU (087), and COPY:GLOBALS (1026/3).
            
           ********************************************************************
            
           This is the base source (as of D5.0A -- January 1982).
            
           ********************************************************************
0          Referenced by comments of: 44/2, 44/3, 540/3, 769/1 
00044/002A  PDP                      UPDATE          UC  G          ALWB:PDP.U                                                      
            5.1T1    27  PDP.UPDATE.UC.002                  1 LINE    100   14 PAGE UM   J BODWIN            JULY 23, 1983  09:53:05
0          This is the update which, when applied to (044/1) yields (044/3). 
0          Referenced by comments of: 44/3 
00044/003A  PDP                      CURRENT SOU     SA  G          ALWB:PDP.S                                                      
            5.1T1    28  PDP.CURRENT_SOU.SA.003             1 LINE     80   55 PAGE UM   J BODWIN            JULY 23, 1983  09:53:05
0          This is the current source for the PDP.  It is (044/1) with the
           (044/2) update applied.
0          Referenced by comments of: 44/2 
00044/004A  PDP                      2305/3330 OBJ   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   J BODWIN                                   
0          Version assembled for use with 2 FBA devices (UM has one 3805 and
           one 3825) and IBM 3330 (or equivalent) paging disk.
           Object part of Resident System (468).
00045/001   SUPERVISOR               D5.0 MASTER     SA  G          S1561 5.0T4 VLO FSNAME=SUPERVISOR.D5.0_MASTER.SA.001(1)      281
            5.0T4   281  SUPERVISOR.D5.0_MASTER.SA.001      1 LINE     80  356 PAGE UM   MTA                 SEP. 04, 1981  02:51:26
            5.0T10  185                       
0          Master source for D5.0 supervisor.  Copies COPY:GLOBALDEFS (1026/1),
           COPY:GLOBALSETS (1026/2), COYP:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT
           (470), and COPY:CMDAREADSECT (531/20).  Assemble with COPY:SETPARM
           (653), COPY:MISC.MACROS (728), COPY:UMMPS.MACROS (045/14), and
           COPY:DM.MACROS (769/29).
0          Referenced by comments of: 45/2, 540/3, 611/1, 769/1, 769/4, 769/16, 799/1, 806/1, 1070/1, 1070/2, 1081/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page   16
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00045/002A  SUPERVISOR               UPDATE          UC  G          MTA:UMMPS.U                                                     
            5.1T1    29  SUPERVISOR.UPDATE.UC.002           1 LINE     79   21 PAGE UM   MTA                 JULY 23, 1983  09:53:07
0          Update to D5.0 UMMPS to produce current UMMPS (45/1).
            
           ********************************************************************************
           D5.0C version:
            
           Bugs fixed, IPTE support, common segment support, DMGR changes, etc.
           ********************************************************************************
00045/003A  SUPERVISOR                               OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00045/004A  SUPERVISOR                               L              S0707 UMMPSL POSN=UMMPS.LISTING.370                             
            5.1T1    30  SUPERVISOR..L.004                  1 LINE    133  861 PAGE UM   MTA                 JULY 23, 1983  09:54:58
00045/005   SUPERVISOR               SVC WRITEUP     WT             W163:SVC.WT                                                     
            5.0T4   284  SUPERVISOR.SVC_WRITEUP.WT.005      1 LINE    122   41 PAGE UM   OGDEN               AUG. 05, 1981  01:30:38
            5.0T10  188                       
0          TEXT/360 input for a writeup describing all UMMPS supervisor call (SVC) instructions.
00045/006   SUPERVISOR               SVC WRITEUP     PT             MTS:SVC.W                                                       
            5.0T4   285  SUPERVISOR.SVC_WRITEUP.PT.006      1 LINE     83   80 PAGE UM   OGDEN               AUG. 21, 1981  06:39:45
            5.0T10  189  MTS.:SVC.W           
0          Copy this to a TN printer @CC (not @MCC).
00045/007   SUPERVISOR               TEST SVC STIO   SA  G          MTA:TESTSTIO(1,999)                                             
            5.0T1    51  SUPERVISOR.TEST_SVC_STIO.SA.007    1 LINE     67    3 PAGE UM   MTA                 JULY 03, 1981  12:08:19
            5.0T1    51                       
0          Test program for SVC STIO to be used in the Virtual Machine.
00045/008   SUPERVISOR               TEST SVC STIO   OC  G          MTA:TESTSTIO(1000)                                              
            5.0T1    52  SUPERVISOR.TEST_SVC_STIO.OC.008    1 LINE     80    2 PAGE UM   MTA                 JULY 03, 1981  12:08:20
            5.0T1    52                       
00045/009   SUPERVISOR               TEST PROT SVC   SA  O          S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_PROT_SVC.SA.009(1)     53
            5.0T1    53  SUPERVISOR.TEST_PROT_SVC.SA.009    1 LINE     80    5 PAGE UM   MTA                 JULY 27, 1977  21:46:22
            5.0T1    53                       
0          Program to test the SVCs related to protection.  Intended to be used while
           running MTS in the Virtual Machine.  Halts if an error occurs.
00045/010   SUPERVISOR               TEST PROT SVC   OC  O          S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_PROT_SVC.OC.010(1)     54
            5.0T1    54  SUPERVISOR.TEST_PROT_SVC.OC.010    1 LINE     80    1 PAGE UM   MTA                 JULY 27, 1977  21:46:25
            5.0T1    54                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   17
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00045/011   SUPERVISOR               TEST SETSTK     SA  G          S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_SETSTK.SA.011(1)       55
            5.0T1    55  SUPERVISOR.TEST_SETSTK.SA.011      1 LINE     59    1 PAGE UM   MTA                 MAY  13, 1978  17:01:22
            5.0T1    55                       
0          Program to test the changes to the SETSTK SVC.
00045/012   SUPERVISOR               TEST SETSTK     OC  G          S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_SETSTK.OC.012(1)       56
            5.0T1    56  SUPERVISOR.TEST_SETSTK.OC.012      1 LINE     80    1 PAGE UM   MTA                 MAY  13, 1978  17:01:23
            5.0T1    56                       
00045/013   SUPERVISOR               DOCUMENTATION   WF             S1558 5.0T1 VLO FSNAME=SUPERVISOR.DOCUMENTATION.WF.013(1)     57
            5.0T1    57  SUPERVISOR.DOCUMENTATION.WF.013    1 LINE     94    6 PAGE UM   MTA                 MAR. 26, 1979  02:15:12
            5.0T1    57                       
0          Summary of sections of UMMPS and what they do.  Prepared for a lecture to a
           graduate programming class.
            
           ************************************************************************************
           D5.0 version:
            
           This is out-of-date.
           ************************************************************************************
00045/014A  SUPERVISOR               MACROS          SM  G          COPY:UMMPS.MACROS                                               
            5.1T1    31  SUPERVISOR.MACROS.SM.014           1 LINE     73    8 PAGE UM   MTA                 JULY 23, 1983  09:55:15
                         COPY:UMMPS.MACROS    
0          Referenced by comments of: 45/1, 46/1, 400/1, 1070/3, 1081/1 
00045/015A  SUPERVISOR               SCHEDULING DES  WX             S1568 OGDEN2 FSNAME=CPUSCHED                                    
            5.1T1    32  SUPERVISOR.SCHEDULING_DES.WX.015   1 LINE     89    6 PAGE UM   OGDEN               DEC. 07, 1981  03:43:20
0          Description of CPU Scheduling, the Big Job Mechanism, and
           the BJPMOD subroutine (650). 
00045/016C  SUPERVISOR               PLUS LIBRARY    SQ  O          S1405 W8UMC FSNAME=SUPERVISOR.PLUS_LIBRARY.SQ.015               
            5.1T1    33  SUPERVISOR.PLUS_LIBRARY.SQ.016     1 LINE     68   27 PAGE UBC  BALLARD             JULY 26, 1982  19:59:43
0          This is a PLUS library including UMMPS-related definitions (system control 
           blocks, services, SVC numbers etc.)
            
           It now includes most of the supervisor data structures that are 
           used by code outside UMMPS.  Intertask-related definitions which
           were formerly in a separate library are now included here. 
            
           ***********************************************************************
           D5.0B version:
            
           This has now been updated to correspond to MTS distribution RD5.0A. 
           (There are a few new data structures introduced in D5.0 that have not
           yet been added to the library; however, the definitions that ARE in 
           the library have been revised for RD5.0A)
           ***********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page   18
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1077/1 
00045/017A  SUPERVISOR               PLUS LIBRARY    SQ  O          COPY:SUPER*SQL                                                  
            5.1T1    34  SUPERVISOR.PLUS_LIBRARY.SQ.017     1 LINE     68   27 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  10:06:51
0          This is a PLUS library including UMMPS-related definitions (system control 
           blocks, services, SVC numbers etc.)
            
           It now includes most of the supervisor data structures that are 
           used by code outside UMMPS.  Intertask-related definitions which
           were formerly in a separate library are now included here. 
            
            
           ********************************************************************
           D5.1 version:
            
           This is the current UM library.
           ********************************************************************
0          Referenced by comments of: 509/14 
00045/018C  SUPERVISOR               PLUS LIBRARY    SQ  O          COPY:SUPER#SQL                                                  
            5.1T1    35  SUPERVISOR.PLUS_LIBRARY.SQ.018     1 LINE     68   27 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  10:06:53
0          ********************************************************************
           D5.1 version:
            
           This is the base source as distributed with the first Resource
           Manager distribution.
           ********************************************************************
0          Referenced by comments of: 45/19 
00045/019C  SUPERVISOR               PLUS LIBRARY    UC  O          COPY:SUPER*UQL                                                  
            5.1T1    36  SUPERVISOR.PLUS_LIBRARY.UC.019     1 LINE     95    1 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  10:06:54
0          Updates used to produce the current UM library from (045/18).
00046/001   CONFIG                   D5.0 MASTER     SA  G          S0699 D3TAPE POSN=CONFIG.D5                                     
            5.0T4   288  CONFIG.D5.0_MASTER.SA.001          1 LINE     80   35 PAGE UM   MTA                 AUG. 09, 1981  22:48:50
            5.0T10  192                       
0          D5.0 master source for configuration program.  Copies COPY:GLOBALS (1026/3),
           COPY:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT (470), COPY:CMDAREADSECT
           (531/20), and *CNFGINFODSECT (654).  Assemble using COPY:MISC.MACROS (728),
           COPY:SETPARM (653), and the Supervisor macros (45/14).
0          Referenced by comments of: 1070/1, 1070/2 
00046/002A  CONFIG                   UPDATE          UC  G          MTA:CONFIG.U                                                    
            5.1T1    37  CONFIG.UPDATE.UC.002               1 LINE     72    4 PAGE UM   MTA                 JULY 23, 1983  10:06:54
0          Update to D5.0 CONFIG to produce current CONFIG.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page   19
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ********************************************************************************
           D5.0C version:
            
           Disk cache changes, IPTE support, common segment support.
           ********************************************************************************
00046/003A  CONFIG                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00046/004A  CONFIG                                   L              S0707 UMMPSL POSN=CNFG.LISTING.370                              
            5.1T1    38  CONFIG..L.004                      1 LINE    133  191 PAGE UM   MTA                 JULY 23, 1983  10:07:02
00047/001  *CATALOG                                  SA  G        # (OBSOLETE)                                                      
            D3T1     56  CATALOG..SA.1                      1 LINE     80    8 PAGE UM                       JULY 30, 1973  23:26.21
0          Obsoleted by FILESTATUS (529).
00049/001   SDUMP SUBR                               SA             S1558 5.0T1 VLO FSNAME=SDUMP_SUBR..SA.001(1)                  58
            5.0T1    58  SDUMP_SUBR..SA.001                 1 LINE     80   18 PAGE UM   MTS       BURLING   MAR. 26, 1979  02:16:17
            5.0T1    58                       
0          MTS subroutine to dump storage areas.  Also used by $DISPLAY command.
           Copies *CNFGINFODSECT (654).  Assemble using *SYSMAC.
0          Referenced by comments of: 463/1 
00049/002   SDUMP SUBR                               OC           # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00050/001   STATISTICS SAVE          *STA            C              *STA                                                            
            5.0T1    59  STATISTICS_SAVE.?STA.C.001         1 LINE     36    1 PAGE UM   SALISBURY           AUG. 05, 1981  01:58:16
            5.0T1    59  *STA                 
0          Command file used by the system operator to run the statistics save program.  Invoked by entering "MTS *STA"
           on the operator's console.  The save program dumps the MTS job statistics file (*STATISTICS) to tape.  MTS
           warns the operator when *STATISTICS has reached 7500 records by printing "*** *STATISTICS IS FULL ***"
           on the console.  When this happens, the operator should immediately enter "MTS *STA" to begin the save
           program before the file is really full (jobs will begin to "snark" if this happens).
0          Referenced by comments of: 256/2 
00050/002   STATISTICS SAVE          *STI            C              *STI                                                            
            5.0T1    60  STATISTICS_SAVE.?STI.C.002         1 LINE     59    1 PAGE UM   SALISBURY           AUG. 05, 1981  01:58:17
            5.0T1    60  *STI                 
0          Command file which is run automatically at system initialization by INIT:INITCMD 
           (97/2).  This causes the statistics save program (50/3) to check for a system 
           crash during the last statistics save.  If there was a crash, the directory 
           (50/6) is repaired and *STATISTICS (50/5) is resaved.
1                                                                                               SUN SEP 08/96   15:24:55   Page   20
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 97/2 
00050/003A  STATISTICS SAVE          SAVE PGM        SG  G          W044:NEWSTA.S                                                   
            5.1T1    39  STATISTICS_SAVE.SAVE_PGM.SG.003    1 LINE    114    8 PAGE UM   SALISBURY           JULY 23, 1983  10:07:04
0          Program to save *STATISTICS (50/5) on tape.  The use of this program is 
           described in the MTS Operators Manual (592).  In general, this program
           saves *STATISTICS on both a monthly and a daily tape and enters the
           signon/signoff time ranges into the file SYS:DIRECTORY (50/6).
            
           **********************************************************************
           D5.1 version:
            
           Changed for case conversion.
           **********************************************************************
0          Referenced by comments of: 50/2, 50/6 
00050/004A  STATISTICS SAVE          SAVE PGM        OC  G          SYS:NEWSTA                                                      
            5.1T1    40  STATISTICS_SAVE.SAVE_PGM.OC.004    1 LINE     80   12 PAGE UM   SALISBURY           JULY 23, 1983  10:07:05
                         SYS.:NEWSTA          
0          Contains a $CONTINUE WITH SYS:DIRLIB (742/5).
00050/005   STATISTICS SAVE          *STATISTICS     D            # MTS:TST.STAT                                                    
                                                                                    UM   SALISBURY                                  
                         *STATISTICS          
0          Data file used to accumulate MTS SIGNOFF statistics to be used for billing
           and job statistics.  Must be permitted as follows:
           P/N, RW (PKEY=*SYS.STAT, PKEY=SYS.:STA, MTS.&PKEY=*SYS.STAT, ACC.&PKEY=ACC.:ACCMAINT),
           R (PKEY=INIT:INITCHK, ACC.)
0          Referenced by comments of: 50/2, 50/3, 97/2 
00050/006   STATISTICS SAVE          DIRECTORY       D            # MTS:TST.DIR                                                     
                                                                                    UM   SALISBURY                                  
                         SYS.:DIRECTORY       
0          Directory of statistics files (*STATISTICS) that have been saved on daily
           and monthly statistics tapes by SYS:NEWSTA (50/3).  This directory may be 
           interrogated by the tape directory program (742).
0          Referenced by comments of: 50/2, 50/3 
00050/007   STATISTICS SAVE          WORK FILE       D   G        # SYS.:STATISTICS                                                 
                                                                                    UM   SALISBURY                                  
                         SYS.:STATISTICS@E    
00051/001  *WATFOR                                                # (OBSOLETE)                                                      
            D2T2    011                                                             UM                                              
1                                                                                               SUN SEP 08/96   15:24:55   Page   21
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00052/001A *COINFLIP                                 SA             *COINFLIP(1000)                                                 
            5.1T1    41  COINFLIP..SA.001                   1 LINE     72    3 PAGE UM   STERKEN             JULY 23, 1983  10:07:05
0          Demonstration program.
00052/002A *COINFLIP                                 OE             *COINFLIP(0,999)                                                
            5.1T1    42  COINFLIP..OE.002                   1 LINE   2055    1 PAGE UM   STERKEN             JULY 23, 1983  10:07:05
                         *COINFLIP            
00053/001   DISKDUMP                                 SA  G          FILE:DISKDUMP(1000)                                             
            5.0T1    65  DISKDUMP..SA.001                   1 LINE     72    6 PAGE UM   HELFFRICH           AUG. 05, 1981  01:58:25
            5.0T1    65                       
0          Program to dump disk and datacell physical records.  Doesn't call MTS file routines.
00053/002   DISKDUMP                                 OC  G          FILE:DISKDUMP(1,900)                                            
            5.0T1    66  DISKDUMP..OC.002                   1 LINE     80    3 PAGE UM   HELFFRICH           AUG. 05, 1981  01:58:28
            5.0T1    66  FILE:DISKDUMP        
00054/001  *TPS                                      S            # (OBSOLETE)                                                      
            D2T1    145                                                             UM                                              
00054/002  *TPS                      LL PTR UC       S            # (OBSOLETE)                                                      
            D2T1    146                                                             UM                                              
00055/001  *BCDEBCD                                  SA  G          S1558 5.0T1 VLO FSNAME=BCDEBCD..SA.001(1)                     67
            5.0T1    67  BCDEBCD..SA.001                    1 SEQ      80    2 PAGE UM   ENGLE               JULY 30, 1973  23:27.43
            5.0T1    67                       
0          Translate scientific 026 code to EBCD.
00055/002  *BCDEBCD                                  OC  G          *BCDEBCD                                                        
            5.0T1    68  BCDEBCD..OC.002                    1 LINE     80    1 PAGE UM   ENGLE               JULY 03, 1981  12:19:29
            5.0T1    68  *BCDEBCD             
00056/001  *2250RTN                                  SA           # (OBSOLETE)                                                      
            D4T1     91  2250RTN..SA.                       1 SEQ      80   26 PAGE UM                       JULY 30, 1973  23:28.54
00057/001  *TABEDIT                                  SA  O          S1558 5.0T1 VLO FSNAME=TABEDIT..SA.001(1)                     69
            5.0T1    69  TABEDIT..SA.001                    1 LINE     80    5 PAGE UM   PIRKOLA             JULY 27, 1977  21:50:27
            5.0T1    69                       
0          Program to reformat records using a specified tab character and tab stops.
           Copies *GDINFODSECT (594).  Assemble using *SYSMAC.
00057/002  *TABEDIT                                  OC  O          *TABEDIT                                                        
            5.0T1    70  TABEDIT..OC.002                    1 LINE     80    2 PAGE UM   PIRKOLA             JULY 03, 1981  12:19:31
            5.0T1    70  *TABEDIT             
00058/001  *T7D                                      S            # (OBSOLETE)                                                      
            D2T1    142                                                             UM                                              
1                                                                                               SUN SEP 08/96   15:24:55   Page   22
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00059/001  *TCP                                      S            # (OBSOLETE)                                                      
            D2T1    141                                                             UM                                              
00060/001   JBRP <MTS>                               S            # (OBSOLETE)                                                      
            D2T1    144                                                             UM                                              
00061/001  *T9D                                      S            # (OBSOLETE)                                                      
            D2T1    143                                                             UM                                              
00063/001  *PTSKRTN                                  SA           # (OBSOLETE)                                                      
            D4T1     94  PTSKRTN..SA.                       1 SEQ      80   14 PAGE UM                       JULY 30, 1973  23:30.18
00064/001  *OBJSCAN                                  SA  G  SCAN    W062:OBJSCAN.S(1)                                               
            5.0T1    71  OBJSCAN..SA.001                    1 LINE     80   21 PAGE UM   TIFFANY             JULY 03, 1981  12:19:31
            5.0T1    71                       
0          Scans object decks (or files) and prints entry points and line number
           ranges for each module encountered.  Copies *GDINFODSECT (594).
00064/002  *OBJSCAN                                  OE  G          *OBJSCAN                                                        
            5.0T1    72  OBJSCAN..OE.002                    1 SEQ    5162    4 PAGE UM   TIFFANY             JULY 03, 1981  12:19:35
            5.0T1    72  *OBJSCAN             
00065/001  *ASMERR                                   S            # (OBSOLETE)                                                      
            D2T1    323                                                             UM                                              
00066/001  *ASMG                     ASMGASM         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGASM                        1  
            5.0T1    73  ASMG.ASMGASM.SA.001                1 SEQ      80   20 PAGE UM   MTA                 JULY 03, 1981  12:20:47
            5.0T1    73                       
0          The G level assembler (ASMG) version 2, level 7 from the University of
           Waterloo.
00066/002  *ASMG                     ASMGBUFF        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGBUFF                       2  
            5.0T1    74  ASMG.ASMGBUFF.SA.002               1 SEQ      80   51 PAGE UM   MTA                 JULY 03, 1981  12:20:50
            5.0T1    74                       
00066/003  *ASMG                     ASMGFD          SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFD                         3  
            5.0T1    75  ASMG.ASMGFD.SA.003                 1 SEQ      80   21 PAGE UM   MTA                 JULY 03, 1981  12:20:52
            5.0T1    75                       
00066/004  *ASMG                     ASMGFEX         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFEX                        4  
            5.0T1    76  ASMG.ASMGFEX.SA.004                1 SEQ      80   19 PAGE UM   MTA                 JULY 03, 1981  12:20:53
            5.0T1    76                       
00066/005  *ASMG                     ASMGFI          SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFI                         5  
            5.0T1    77  ASMG.ASMGFI.SA.005                 1 SEQ      80   13 PAGE UM   MTA                 JULY 03, 1981  12:20:55
            5.0T1    77                       
00066/006  *ASMG                     ASMGFPP         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFPP                        6  
            5.0T1    78  ASMG.ASMGFPP.SA.006                1 SEQ      80   33 PAGE UM   MTA                 JULY 03, 1981  12:20:57
            5.0T1    78                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   23
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/007  *ASMG                     ASMGF1          SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF1                         7  
            5.0T1    79  ASMG.ASMGF1.SA.007                 1 SEQ      80   46 PAGE UM   MTA                 JULY 03, 1981  12:21:00
            5.0T1    79                       
00066/008  *ASMG                     ASMGF2          SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF2                         8  
            5.0T1    80  ASMG.ASMGF2.SA.008                 1 SEQ      80   89 PAGE UM   MTA                 JULY 03, 1981  12:21:04
            5.0T1    80                       
00066/009  *ASMG                     ASMGF2A         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF2A                        9  
            5.0T1    81  ASMG.ASMGF2A.SA.009                1 SEQ      80   60 PAGE UM   MTA                 JULY 03, 1981  12:21:09
            5.0T1    81                       
00066/010  *ASMG                     ASMGF3          SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF3                         10 
            5.0T1    82  ASMG.ASMGF3.SA.010                 1 SEQ      80   62 PAGE UM   MTA                 JULY 03, 1981  12:21:13
            5.0T1    82                       
00066/011  *ASMG                     ASMGF7C         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7C                        11 
            5.0T1    83  ASMG.ASMGF7C.SA.011                1 SEQ      80   26 PAGE UM   MTA                 JULY 03, 1981  12:21:15
            5.0T1    83                       
00066/012  *ASMG                     ASMGF7D         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7D                        12 
            5.0T1    84  ASMG.ASMGF7D.SA.012                1 SEQ      80   25 PAGE UM   MTA                 JULY 03, 1981  12:21:17
            5.0T1    84                       
00066/013  *ASMG                     ASMGF7E         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7E                        13 
            5.0T1    85  ASMG.ASMGF7E.SA.013                1 SEQ      80   26 PAGE UM   MTA                 JULY 03, 1981  12:21:19
            5.0T1    85                       
00066/014  *ASMG                     ASMGF7G         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7G                        14 
            5.0T1    86  ASMG.ASMGF7G.SA.014                1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  12:21:21
            5.0T1    86                       
00066/015  *ASMG                     ASMGF7I         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7I                        15 
            5.0T1    87  ASMG.ASMGF7I.SA.015                1 SEQ      80   15 PAGE UM   MTA                 JULY 03, 1981  12:21:22
            5.0T1    87                       
00066/016  *ASMG                     ASMGF7L         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7L                        16 
            5.0T1    88  ASMG.ASMGF7L.SA.016                1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  12:21:23
            5.0T1    88                       
00066/017  *ASMG                     ASMGF7N         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7N                        17 
            5.0T1    89  ASMG.ASMGF7N.SA.017                1 SEQ      80   13 PAGE UM   MTA                 JULY 03, 1981  12:21:25
            5.0T1    89                       
00066/018  *ASMG                     ASMGF7S         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7S                        18 
            5.0T1    90  ASMG.ASMGF7S.SA.018                1 SEQ      80    8 PAGE UM   MTA                 JULY 03, 1981  12:21:26
            5.0T1    90                       
00066/019  *ASMG                     ASMGF7V         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7V                        19 
            5.0T1    91  ASMG.ASMGF7V.SA.019                1 SEQ      80   21 PAGE UM   MTA                 JULY 03, 1981  12:21:28
            5.0T1    91                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   24
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/020  *ASMG                     ASMGF7X         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7X                        20 
            5.0T1    92  ASMG.ASMGF7X.SA.020                1 SEQ      80   36 PAGE UM   MTA                 JULY 03, 1981  12:21:30
            5.0T1    92                       
00066/021  *ASMG                     ASMGF8A         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8A                        21 
            5.0T1    93  ASMG.ASMGF8A.SA.021                1 SEQ      80   27 PAGE UM   MTA                 JULY 03, 1981  12:21:32
            5.0T1    93                       
00066/022  *ASMG                     ASMGF8C         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8C                        22 
            5.0T1    94  ASMG.ASMGF8C.SA.022                1 SEQ      80    6 PAGE UM   MTA                 JULY 03, 1981  12:21:34
            5.0T1    94                       
00066/023  *ASMG                     ASMGF8D         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8D                        23 
            5.0T1    95  ASMG.ASMGF8D.SA.023                1 SEQ      80   23 PAGE UM   MTA                 JULY 03, 1981  12:21:36
            5.0T1    95                       
00066/024  *ASMG                     ASMGF8I         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8I                        24 
            5.0T1    96  ASMG.ASMGF8I.SA.024                1 SEQ      80   15 PAGE UM   MTA                 JULY 03, 1981  12:21:38
            5.0T1    96                       
00066/025  *ASMG                     ASMGF8L         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8L                        25 
            5.0T1    97  ASMG.ASMGF8L.SA.025                1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  12:21:39
            5.0T1    97                       
00066/026  *ASMG                     ASMGF8M         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8M                        26 
            5.0T1    98  ASMG.ASMGF8M.SA.026                1 SEQ      80   27 PAGE UM   MTA                 JULY 03, 1981  12:21:41
            5.0T1    98                       
00066/027  *ASMG                     ASMGF8N         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8N                        27 
            5.0T1    99  ASMG.ASMGF8N.SA.027                1 SEQ      80   13 PAGE UM   MTA                 JULY 03, 1981  12:21:42
            5.0T1    99                       
00066/028  *ASMG                     ASMGF8P         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8P                        28 
            5.0T1   100  ASMG.ASMGF8P.SA.028                1 SEQ      80   22 PAGE UM   MTA                 JULY 03, 1981  12:21:44
            5.0T1   100                       
00066/029  *ASMG                     ASMGF8S         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8S                        29 
            5.0T1   101  ASMG.ASMGF8S.SA.029                1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  12:21:45
            5.0T1   101                       
00066/030  *ASMG                     ASMGF8V         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8V                        30 
            5.0T1   102  ASMG.ASMGF8V.SA.030                1 SEQ      80   21 PAGE UM   MTA                 JULY 03, 1981  12:21:47
            5.0T1   102                       
00066/031  *ASMG                     ASMGIS00        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS00                       31 
            5.0T1   103  ASMG.ASMGIS00.SA.031               1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  12:21:49
            5.0T1   103                       
00066/032  *ASMG                     ASMGIS09        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS09                       33 
            5.0T1   104  ASMG.ASMGIS09.SA.032               1 SEQ      80    9 PAGE UM   MTA                 JULY 03, 1981  12:21:51
            5.0T1   104                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   25
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/033  *ASMG                     ASMGIS20        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS20                       35 
            5.0T1   105  ASMG.ASMGIS20.SA.033               1 SEQ      80    6 PAGE UM   MTA                 JULY 03, 1981  12:21:52
            5.0T1   105                       
00066/034  *ASMG                     ASMGIS44        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS44                       36 
            5.0T1   106  ASMG.ASMGIS44.SA.034               1 SEQ      80    9 PAGE UM   MTA                 JULY 03, 1981  12:21:54
            5.0T1   106                       
00066/035  *ASMG                     ASMGIS60        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS60                       37 
            5.0T1   107  ASMG.ASMGIS60.SA.035               1 SEQ      80   10 PAGE UM   MTA                 JULY 03, 1981  12:21:55
            5.0T1   107                       
00066/036  *ASMG                     ASMGIS67        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS67                       38 
            5.0T1   108  ASMG.ASMGIS67.SA.036               1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  12:21:56
            5.0T1   108                       
00066/037  *ASMG                     ASMGIS70        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS70                       39 
            5.0T1   109  ASMG.ASMGIS70.SA.037               1 SEQ      80   12 PAGE UM   MTA                 JULY 03, 1981  12:21:58
            5.0T1   109                       
00066/038  *ASMG                     ASMGIS71        SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS71                       40 
            5.0T1   110  ASMG.ASMGIS71.SA.038               1 SEQ      80   12 PAGE UM   MTA                 JULY 03, 1981  12:21:59
            5.0T1   110                       
00066/039  *ASMG                     ASMGRTA         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGRTA                        41 
            5.0T1   111  ASMG.ASMGRTA.SA.039                1 SEQ      80    5 PAGE UM   MTA                 JULY 03, 1981  12:22:01
            5.0T1   111                       
00066/040  *ASMG                     ASMGUP          SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGUP                         42 
            5.0T1   112  ASMG.ASMGUP.SA.040                 1 SEQ      80   20 PAGE UM   MTA                 JULY 03, 1981  12:22:02
            5.0T1   112                       
00066/041  *ASMG                     APARM           SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=APARM                          43 
            5.0T1   113  ASMG.APARM.SA.041                  1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  12:22:03
            5.0T1   113                       
00066/042  *ASMG                     ASMGSET         SA  G          S0032 ASMGOS 'ASMGOS 27' POSN=ASMGSET                        44 
            5.0T1   114  ASMG.ASMGSET.SA.042                1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  12:22:04
            5.0T1   114                       
00066/043  *ASMG                     COMMENCE        SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=COMMENCE                       45 
            5.0T1   115  ASMG.COMMENCE.SM.043               1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:05
            5.0T1   115                       
00066/044  *ASMG                     COMMON          SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=COMMON                         46 
            5.0T1   116  ASMG.COMMON.SM.044                 1 SEQ      80   18 PAGE UM   MTA                 JULY 03, 1981  12:22:07
            5.0T1   116                       
00066/045  *ASMG                     DCBOUT          SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=DCBOUT                         47 
            5.0T1   117  ASMG.DCBOUT.SM.045                 1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:08
            5.0T1   117                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   26
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/046  *ASMG                     DEFCHAR         SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=DEFCHAR                        48 
            5.0T1   118  ASMG.DEFCHAR.SM.046                1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  12:22:09
            5.0T1   118                       
00066/047  *ASMG                     ELZERO          SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=ELZERO                         49 
            5.0T1   119  ASMG.ELZERO.SM.047                 1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:10
            5.0T1   119                       
00066/048  *ASMG                     EMSG            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=EMSG                           50 
            5.0T1   120  ASMG.EMSG.SM.048                   1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:11
            5.0T1   120                       
00066/049  *ASMG                     ENTRYOUT        SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=ENTRYOUT                       51 
            5.0T1   121  ASMG.ENTRYOUT.SM.049               1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:12
            5.0T1   121                       
00066/050  *ASMG                     EPTR            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=EPTR                           52 
            5.0T1   122  ASMG.EPTR.SM.050                   1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:12
            5.0T1   122                       
00066/051  *ASMG                     FDIMEN          SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=FDIMEN                         53 
            5.0T1   123  ASMG.FDIMEN.SM.051                 1 SEQ      80    9 PAGE UM   MTA                 JULY 03, 1981  12:22:14
            5.0T1   123                       
00066/052  *ASMG                     FINISH          SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=FINISH                         54 
            5.0T1   124  ASMG.FINISH.SM.052                 1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:15
            5.0T1   124                       
00066/053  *ASMG                     GETT            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=GETT                           55 
            5.0T1   125  ASMG.GETT.SM.053                   1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:16
            5.0T1   125                       
00066/054  *ASMG                     INST            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=INST                           56 
            5.0T1   126  ASMG.INST.SM.054                   1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  12:22:17
            5.0T1   126                       
00066/055  *ASMG                     INSTSET         SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=INSTSET                        57 
            5.0T1   127  ASMG.INSTSET.SM.055                1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  12:22:18
            5.0T1   127                       
00066/056  *ASMG                     LIST1EQU        SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=LIST1EQU                       58 
            5.0T1   128  ASMG.LIST1EQU.SM.056               1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  12:22:20
            5.0T1   128                       
00066/057  *ASMG                     MESSAGE         SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=MESSAGE                        59 
            5.0T1   129  ASMG.MESSAGE.SM.057                1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:20
            5.0T1   129                       
00066/058  *ASMG                     PRINTOUT        SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=PRINTOUT                       60 
            5.0T1   130  ASMG.PRINTOUT.SM.058               1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:21
            5.0T1   130                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   27
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/059  *ASMG                     PRNT            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=PRNT                           61 
            5.0T1   131  ASMG.PRNT.SM.059                   1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:22
            5.0T1   131                       
00066/060  *ASMG                     PUTT            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=PUTT                           62 
            5.0T1   132  ASMG.PUTT.SM.060                   1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:23
            5.0T1   132                       
00066/061  *ASMG                     RD              SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=RD                             63 
            5.0T1   133  ASMG.RD.SM.061                     1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:24
            5.0T1   133                       
00066/062  *ASMG                     SETR            SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=SETR                           64 
            5.0T1   134  ASMG.SETR.SM.062                   1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:25
            5.0T1   134                       
00066/063  *ASMG                     SNAPDATA        SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=SNAPDATA                       65 
            5.0T1   135  ASMG.SNAPDATA.SM.063               1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:26
            5.0T1   135                       
00066/064  *ASMG                     SNAPOUT         SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=SNAPOUT                        66 
            5.0T1   136  ASMG.SNAPOUT.SM.064                1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  12:22:27
            5.0T1   136                       
00066/065  *ASMG                     TIMEOUT         SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=TIMEOUT                        67 
            5.0T1   137  ASMG.TIMEOUT.SM.065                1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:28
            5.0T1   137                       
00066/066  *ASMG                     TRANSLAT        SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=TRANSLAT                       68 
            5.0T1   138  ASMG.TRANSLAT.SM.066               1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:29
            5.0T1   138                       
00066/067  *ASMG                     UPEMSG          SM  G          S0032 ASMGOS 'ASMGOS 27' POSN=UPEMSG                         69 
            5.0T1   139  ASMG.UPEMSG.SM.067                 1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  12:22:30
            5.0T1   139                       
00066/068  *ASMG                     ASMGMOD         SA  G          S0003 FSWATF FSNAME=ASMGMOD                                     
            5.0T1   140  ASMG.ASMGMOD.SA.068                1 LINE     80    1 PAGE UM   MTA                 SEP. 22, 1978  00:38:16
            5.0T1   140                       
00066/069  *ASMG                     ASMGMOD         OC  G        # (PART OF ASMGMOD)                                               
            D4T1    165  ASMG.ASMGMOD.OC.069                1 LINE     80    1 PAGE UM   MTA                 JULY 27, 1977  21:53:37
00066/070  *ASMG                     GTIMEST         OC  G          S0563 D4T1 VLO FSNAME=ASMG.GTIMEST.OC.070(1)                 166
            5.0T1   141  ASMG.GTIMEST.OC.070                1 LINE     80    1 PAGE UM   MTA                 JULY 27, 1977  21:53:39
            5.0T1   141                       
00066/071  *ASMG                     ASMGUPD         UU  G          S0003 FSWATF FSNAME=ASMGUPD                                     
            5.0T1   142  ASMG.ASMGUPD.UU.071                1 LINE     83   40 PAGE UM   MTA                 SEP. 22, 1978  00:33:53
            5.0T1   142                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   28
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/072  *ASMG                     ASMGJOB         C              S0003 FSWATF FSNAME=ASMGJOB                                     
            5.0T1   143  ASMG.ASMGJOB.C.072                 1 LINE    124    1 PAGE UM   MTA                 SEP. 22, 1978  00:39:08
            5.0T1   143                       
00066/073  *ASMG                     ASMGJOB2        C              S0003 FSWATF FSNAME=ASMGJOB2                                    
            5.0T1   144  ASMG.ASMGJOB2.C.073                1 LINE    112    1 PAGE UM   MTA                 SEP. 22, 1978  00:39:29
            5.0T1   144                       
00066/074  *ASMG                     ASMGLINK        C              S0003 FSWATF FSNAME=ASMGLINK                                    
            5.0T1   145  ASMG.ASMGLINK.C.074                1 LINE    112    1 PAGE UM   MTA                 SEP. 22, 1978  00:40:31
            5.0T1   145                       
00066/075  *ASMG                     ASMGCOPY        C              S0003 FSWATF FSNAME=ASMGCOPY                                    
            5.0T1   146  ASMG.ASMGCOPY.C.075                1 LINE     26    2 PAGE UM   MTA                 SEP. 22, 1978  00:41:07
            5.0T1   146                       
00066/076  *ASMG                     *ASMG           OE  G          *ASMG                                                           
            5.0T1   147  ASMG.*ASMG.OE.076                  1 SEQ    8849    3 PAGE UM   MTA                 JULY 03, 1981  12:29:17
            5.0T1   147  *ASMG                
00066/077  *ASMG                     ASMGFPP         OE  G          ETC:ASMGFPP                                                     
            5.0T1   148  ASMG.ASMGFPP.OE.077                1 SEQ   12064    5 PAGE UM   MTA                 JULY 03, 1981  12:29:18
            5.0T1   148  ETC.:ASMGFPP         
00066/078A *ASMG                     ASMGF1          OE  G          ETC:ASMGF1                                                      
            5.1T1    43  ASMG.ASMGF1.OE.078                 1 SEQ    9088    3 PAGE UM   MTA                 JULY 23, 1983  10:07:06
                         ETC.:ASMGF1          
00066/079  *ASMG                     ASMGF2          OE  G          ETC:ASMGF2                                                      
            5.0T1   150  ASMG.ASMGF2.OE.079                 1 SEQ   20784    6 PAGE UM   MTA                 JULY 03, 1981  12:29:20
            5.0T1   150  ETC.:ASMGF2          
00066/080  *ASMG                     ASMGF3          OE  G          ETC:ASMGF3                                                      
            5.0T1   151  ASMG.ASMGF3.OE.080                 1 SEQ    8286    3 PAGE UM   MTA                 JULY 03, 1981  12:29:22
            5.0T1   151  ETC.:ASMGF3          
00066/081  *ASMG                     ASMGF7          OE  G          ETC:ASMGF7                                                      
            5.0T1   152  ASMG.ASMGF7.OE.081                 1 SEQ   12904    6 PAGE UM   MTA                 JULY 03, 1981  12:29:23
            5.0T1   152  ETC.:ASMGF7          
00066/082  *ASMG                     ASMGF8          OE  G          ETC:ASMGF8                                                      
            5.0T1   153  ASMG.ASMGF8.OE.082                 1 SEQ    9552    6 PAGE UM   MTA                 JULY 03, 1981  12:29:24
            5.0T1   153  ETC.:ASMGF8          
00066/083  *ASMG                     ASMGIS00        OE  G          ETC:ASMGIS00                                                    
            5.0T1   154  ASMG.ASMGIS00.OE.083               1 SEQ    2220    1 PAGE UM   MTA                 JULY 03, 1981  12:29:25
            5.0T1   154  ETC.:ASMGIS00        
00066/084  *ASMG                     ASMGIS09        OE  G          ETC:ASMGIS09                                                    
            5.0T1   155  ASMG.ASMGIS09.OE.084               1 SEQ    1834    1 PAGE UM   MTA                 JULY 03, 1981  12:29:26
            5.0T1   155  ETC.:ASMGIS09        
1                                                                                               SUN SEP 08/96   15:24:55   Page   29
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00066/085  *ASMG                     ASMGIS20        OE  G          ETC:ASMGIS20                                                    
            5.0T1   156  ASMG.ASMGIS20.OE.085               1 SEQ    1199    1 PAGE UM   MTA                 JULY 03, 1981  12:29:27
            5.0T1   156  ETC.:ASMGIS20        
00066/086  *ASMG                     ASMGIS44        OE  G          ETC:ASMGIS44                                                    
            5.0T1   157  ASMG.ASMGIS44.OE.086               1 SEQ    1866    1 PAGE UM   MTA                 JULY 03, 1981  12:29:27
            5.0T1   157  ETC.:ASMGIS44        
00066/087  *ASMG                     ASMGIS60        OE  G          ETC:ASMGIS60                                                    
            5.0T1   158  ASMG.ASMGIS60.OE.087               1 SEQ    2074    1 PAGE UM   MTA                 JULY 03, 1981  12:29:28
            5.0T1   158  ETC.:ASMGIS60        
00066/088  *ASMG                     ASMGIS67        OE  G          ETC:ASMGIS67                                                    
            5.0T1   159  ASMG.ASMGIS67.OE.088               1 SEQ    2160    1 PAGE UM   MTA                 JULY 03, 1981  12:29:29
            5.0T1   159  ETC.:ASMGIS67        
00066/089  *ASMG                     ASMGIS70        OE  G          ETC:ASMGIS70                                                    
            5.0T1   160  ASMG.ASMGIS70.OE.089               1 SEQ    2372    1 PAGE UM   MTA                 JULY 03, 1981  12:29:30
            5.0T1   160  ETC.:ASMGIS70        
00066/090  *ASMG                     ASMGIS71        OE  G          ETC:ASMGIS71                                                    
            5.0T1   161  ASMG.ASMGIS71.OE.090               1 SEQ    2380    1 PAGE UM   MTA                 JULY 03, 1981  12:29:30
            5.0T1   161  ETC.:ASMGIS71        
00066/091  *ASMG                     ASMGRTA         OE  G          ETC:ASMGRTA                                                     
            5.0T1   162  ASMG.ASMGRTA.OE.091                1 SEQ    1280    1 PAGE UM   MTA                 JULY 03, 1981  12:29:31
            5.0T1   162  ETC.:ASMGRTA         
00066/092  *ASMG                     ASMGUP          OE  G          ETC:ASMGUP                                                      
            5.0T1   163  ASMG.ASMGUP.OE.092                 1 SEQ    3538    1 PAGE UM   MTA                 JULY 03, 1981  12:29:32
            5.0T1   163  ETC.:ASMGUP          
00066/093  *ASMG                     USER'S GUIDE    P              S0881 ASMG27 POSN=ASMG.GUIDE.USERS                           3  
            5.0T1   164  ASMG.USER'S_GUIDE.P.093            1 SEQ      80   41 PAGE UM   MTA                 JULY 03, 1981  12:30:00
            5.0T1   164                       
00066/094  *ASMG                     IMPLEMENTATION  P              S0881 ASMG27 POSN=ASMG.GUIDE.IMPL                            4  
            5.0T1   165  ASMG.IMPLEMENTATION.P.094          1 SEQ      78   27 PAGE UM   MTA                 JULY 03, 1981  12:30:03
            5.0T1   165                       
00066/095  *ASMG                     *ASMGSYSMAC     SM  G          *ASMGSYSMAC                                                     
            5.0T1   166  ASMG.*ASMGSYSMAC.SM.095            1 LINE     80   81 PAGE UM   MTA                 JULY 03, 1981  12:30:04
            5.0T1   166  *ASMGSYSMAC          
00067/001C  FILE SAVE                CAT             SQ  G          RSTR:FS_CAT(1000)                                               
            5.1T1    44  FILE_SAVE.CAT.SQ.001               1 LINE     69    8 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:06
0          This component is a combination of what were previously two components,
           FILE SAVE, component 67, and FILE SAVE - ONLINE, component 716.
            
           (067/1) is the first portion of the MTS filesave, i.e., disk backup,
           program. This program is run once per week at UM to produce a backup
           of all disk files in case of hardware or software problems. On other
           days, a partial filesave is produced using the online file save
1                                                                                               SUN SEP 08/96   15:24:55   Page   30
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          program (067/23) of those files which have changed since the
           previous file save was run. The tapes generated by the full save are
           copied, see (610), and saved for several months. Six week intervals
           of these full tapes are saved for several years. We have found that
           this procedure, which includes storing the full tapes in another
           building, seems to provide a reasonable backup.
            
           *************************************************************************
            
           This is the PLUS source for the catalog scan portion of full file save.
           Requires the following PLUS source libraries:
            
             RSTR:FS_*SQL    (067/9)
             COPY:FILE*SQL   (482/65)
             COPY:MTS*SQL    (344/4)
             *PLUS.SOURCELIB (1042/5)
0          Referenced by comments of: 67/1 
00067/002C  FILE SAVE                CAT             OC  G          RSTR:FS_CAT(1,999.5)                                            
            5.1T1    45  FILE_SAVE.CAT.OC.002               1 LINE   4454    7 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:07
                         RSTR:FS_CAT          
0          Contains a "$Continue with FILE:FINT*OL (482/70) + COPY:SYSDEFS" record
           at line 999.5.
00067/003C  FILE SAVE                MAIN            SQ  G          RSTR:FS_MAIN(1000)                                              
            5.1T1    46  FILE_SAVE.MAIN.SQ.003              1 LINE     72   12 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:07
0          Main portion of the full file save. This portion saves a series of
           volumes. It is run by the slave streams (067/19).
            
           Note: The subroutine Read_Extract makes Getspace requests that are
           potentially > 1MB in size. At UM, we use the Ramrod GSFS_BIG
           (1019/9) module to manage this. The object for GSFS_BIG is included
           with the object for FS_MAIN (067/4). Installations that have
           installed updates to the STOR routines that allow > 1MB allocations
           can just use *OBJUTIL to delete the module GSFS_BIG.
            
           Requires the following PLUS source libraries:
            
             RSTR:FS_*SQL    (067/9)
             COPY:FILE*SQL   (482/65)
             COPY:MTS*SQL    (344/4)
             *PLUS.SOURCELIB (1042/5)
00067/004C  FILE SAVE                MAIN            OC  G          RSTR:FS_MAIN(1,999.5)                                           
            5.1T1    47  FILE_SAVE.MAIN.OC.004              1 LINE   2044   11 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:08
                         RSTR:FS_MAIN         
0          Contains a $CONTINUE WITH FILE:FINT*OL (482/70) + RSTR:VTOCREAD (067/11)
           + RSTR:SAVEFILE (067/10) + RSTR:TAPEOUT (067/24) + COPY:SYSDEFS record
           at line 999.5
            
1                                                                                               SUN SEP 08/96   15:24:55   Page   31
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Also contains a copy of the object for the Ramrod GSFS_BIG (1019/9) module.
0          Referenced by comments of: 67/3 
00067/005C  FILE SAVE                FINR            SQ  G          RSTR:FS_FINR(1000)                                              
            5.1T1    48  FILE_SAVE.FINR.SQ.005              1 LINE     74    8 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:08
0          Portion of the full file save which resets the must-be-saved
           bits in the catalog.
            
           Requires the following PLUS source libraries:
            
             RSTR:FS_*SQL    (067/9)
             COPY:FILE*SQL   (482/65)
             COPY:MTS*SQL    (344/4)
             *PLUS.SOURCELIB (1042/5)
00067/006C  FILE SAVE                FINR            OC  G          RSTR:FS_FINR(1,999.5)                                           
            5.1T1    49  FILE_SAVE.FINR.OC.006              1 LINE   5424    7 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:09
                         RSTR:FS_FINR         
0          Contains a "$CONTINUE WITH FILE:FINT*OL (482/70) + COPY:SYSDEFS" record
           at line 999.5
00067/007C  FILE SAVE                FDIR            SQ  G          RSTR:FS_FDIR(1000)                                              
            5.1T1    50  FILE_SAVE.FDIR.SQ.007              1 LINE     71    4 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:09
0          Portion of the full file save to produce the FILEDIRnn files for
           input to the merge processor.
            
           Requires the following PLUS source libraries:
            
             RSTR:FS_*SQL    (067/9)
             COPY:FILE*SQL   (482/65)
             *PLUS.SOURCELIB (1042/5)
00067/008C  FILE SAVE                FDIR            OC  G          RSTR:FS_FDIR(1,999.5)                                           
            5.1T1    51  FILE_SAVE.FDIR.OC.008              1 LINE   3428    5 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:10
                         RSTR:FS_FDIR         
0          Contains a "$CONTINUE WITH *DUMMY*" record at line 999.5
00067/009C  FILE SAVE                PLUS LIBRARY    SQ  G          RSTR:FS_*SQL                                                    
            5.1T1    52  FILE_SAVE.PLUS_LIBRARY.SQ.009      1 LINE     74    3 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:10
                         RSTR:FS_*SQL         
0          PLUS source library for the re-written piece of the full file save.
           The "MAIN" subcomponent was functionally replaced by CAT, MAIN, FINR
           and FDIR subcomponents.
0          Referenced by comments of: 67/1, 67/3, 67/5, 67/7 
1                                                                                               SUN SEP 08/96   15:24:55   Page   32
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00067/010   FILE SAVE                SAVEFILE        SA  G  SFIL    RSTR:SAVEFILE(1000)                                             
            5.0T1   168  FILE_SAVE.SAVEFILE.SA.002          1 LINE     80   11 PAGE UM   HELFFRICH           AUG. 05, 1981  02:00:59
            5.0T1   168  RSTR:SAVEFILE        
0          Assemble using COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728) and *SYSMAC.
0          Referenced by comments of: 67/4, 67/23, 67/26, 67/44, 502/8 
00067/011   FILE SAVE                VTOCRD          SA  G  VTOC    RSTR:VTOCREAD(1000)                                             
            5.0T1   169  FILE_SAVE.VTOCRD.SA.003            1 LINE     80   14 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:02
            5.0T1   169  RSTR:VTOCREAD        
0          Subroutine to read entire VTOC of disk volume.  Assemble using *SYSMAC and
           COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 67/4, 67/44, 104/135, 682/21, 682/38, 682/46, 682/47, 1021/9, 1030/1, 1030/3 
00067/012   FILE SAVE                RESTART         SA  G          RSTR:LFS.RESTART(1000)                                          
            5.0T1   171  FILE_SAVE.RESTART.SA.005           1 LINE     72    3 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:06
            5.0T1   171                       
0          Program used by weekly save (067/17) to cause the weekly tapes to be re-used 
           after their cycle period has expired. This period is currently 6 weeks.  This
           has to be done because if filesave crashes with part of a set of tapes written,
           it would not reuse the partially written tapes of the set when restarted.
           This program is a kludge. Assemble with the file save macros (067/35).
0          Referenced by comments of: 67/16 
00067/013   FILE SAVE                RESTART         OC  G          RSTR:LFS.RESTART(1,999)                                         
            5.0T1   172  FILE_SAVE.RESTART.OC.006           1 LINE     80    3 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:06
            5.0T1   172  RSTR:LFS.RESTART     
00067/014C  FILE SAVE                LISTER          SA  G          RSTR:LISTER(1000)                                               
            5.1T1    53  FILE_SAVE.LISTER.SA.014            1 LINE     72    8 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:10
0          File save listing program. This program should be run after file
           saves and after file save tape copy program to generate a hard copy
           listing of the save (if desired). The program reads the files named
           "FILEDIRnn" or "COPYDIRnn" and produces a listing of the result. The
           listing contains the tape number upon which each file saved (or
           copied) resides.
            
           This program does not rely upon the existence of the master tape
           directory (RSTR:TAPEDIR) for its functioning. Any item which it
           finds in a copy or listing file is simply collected, and listed.
00067/015C  FILE SAVE                LISTER          OC  G          RSTR:LISTER(1,999)                                              
            5.1T1    54  FILE_SAVE.LISTER.OC.015            1 LINE     80    5 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:11
                         RSTR:LISTER          
1                                                                                               SUN SEP 08/96   15:24:55   Page   33
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00067/016A  FILE SAVE                SPECIAL START   C              *SVS                                                            
            5.1T1    55  FILE_SAVE.SPECIAL_START.C.016      1 LINE     19    1 PAGE UM   BURLING             JULY 23, 1983  10:07:11
                         RSTR:*SVS            
0          Operator file which uses features of LFS.RESTART (067/12) to run a
           special full file save at a non-standard time of the week. Contains
           the command $SOURCE RSTR:SVWCMD(500) (067/18).
00067/017A  FILE SAVE                WEEKLY START    C              *SVW                                                            
            5.1T1    56  FILE_SAVE.WEEKLY_START.C.017       1 LINE     17    1 PAGE UM   BURLING             JULY 23, 1983  10:07:11
                         RSTR:*SVW            
0          Operator file which is used to start the weekly full filesave
           process. All users should be off the system when this is run. This
           file will $Source to RSTR:SVWCMD (067/18) which will scan the
           catalog and build a catalog extract file for each volume to be
           saved, and then start up some number of slave streams (currently 8
           at UM) using *TSN.
            
           Invoked by entering "MTS *SVW" on the operator's console.
0          Referenced by comments of: 67/12, 67/18 
00067/018A  FILE SAVE                WEEKLY START    C   G          RSTR:SVWCMD                                                     
            5.1T1    57  FILE_SAVE.WEEKLY_START.C.018       1 LINE     87    3 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:11
                         RSTR:SVWCMD          
0          Command file which does the weekly and special file saves.
           $Sourced to by *SVW (067/17).
            
           This file contains, starting at line 2000, a list of the public
           volumes to be saved.  Any volumes not on this list will still be
           saved, after suitable complaint.
0          Referenced by comments of: 67/16, 67/17, 67/19 
00067/019A  FILE SAVE                WEEKLY SLAVE    C              *TSN                                                            
            5.1T1    58  FILE_SAVE.WEEKLY_SLAVE.C.019       1 LINE     14    1 PAGE UM   BURLING             JULY 23, 1983  10:07:12
                         RSTR:*TSN            
0          Operator file used by RSTR:SVWCMD (067/18) to start slave streams.
           Not normally used by itself.
0          Referenced by comments of: 67/3 
00067/020A  FILE SAVE                WEEKLY SLAVE    C   G          RSTR:TSNCMD                                                     
            5.1T1    59  FILE_SAVE.WEEKLY_SLAVE.C.020       1 LINE     87    1 PAGE UM   WHALEY    BURLING   JULY 23, 1983  10:07:12
                         RSTR:TSNCMD          
0          Command file which is invoked from *TSN.  This is the commands for
           the individual slave streams.
1                                                                                               SUN SEP 08/96   15:24:55   Page   34
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00067/021C  FILE SAVE                MERGE LOCK      C   G          RSTR:MRG_LOCK                                                   
            5.1T1    60  FILE_SAVE.MERGE_LOCK.C.021         1 LINE     60    1 PAGE UM   BURLING             JULY 23, 1983  10:07:12
                         RSTR:MRG_LOCK        
0          This file is used by the weekend (total) file save to tell when the
           slave streams have finished, and to keep *DCS (a program to start up
           the Data Concentrators), *LAS (154/1), and *MNS (642/1) from starting
           up prematurely.
00067/022A  FILE SAVE                *SAV            C              *SAV                                                            
            5.1T1    61  FILE_SAVE.?SAV.C.022               1 LINE     89    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:13
                         RSTR:*SAV            
0          Command file to start the online filesave and merge operations.  Invoked by
           entering "MTS *SAV" on the operator's console.
            
           This file also contains commands to purge the journal log file.  It may
           need to be changed according to local installation preference.
0          Referenced by comments of: 67/46 
00067/023   FILE SAVE                SAVE PGM        SA  G  OLFS    RSTR:DSF(1000)                                                  
            5.0T1   185  FILE_SAVE.SAVE_PGM.SA.019          1 LINE     80   22 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:18
            5.0T1   185  RSTR:DSF             
0          Source for the online filesave.  This program saves the changed files in
           the system and creates files with names of the form "FILEDIRnn", where nn=01,02,...,
           which constitute the input to the merge program (067/27).  The merge program
           ultimately makes the save times for the files saved by the online file
           save available to *RESTORE (712). 
            
           Calls SAVEFILE (067/10) and TAPEOUT (067/24).  Assemble using COPY:FILE.MACROS
           (482/45) and the filesave macros (067/35).  NOTE: The directory files
           RSTR:FILEDIR.MAC, RSTR:FILEDIR.NEW, and RSTR:TAPEDIR must be permitted
           read to PKEY=*RESTORE, UNLIM to RSTR, and RW to PKEY=DEADUCATDES.
0          Referenced by comments of: 67/1, 67/24, 67/26, 67/44 
00067/024   FILE SAVE                TAPEOUT         SA  G  TPDO    RSTR:TAPEOUT(1000)                                              
            5.0T1   187  FILE_SAVE.TAPEOUT.SA.021           1 LINE     80   25 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:25
            5.0T1   187                       
0          Subroutine called by the save program (067/23) to write a filesave tape 
           which  maintains a tape directory file named "TAPEDIR".  It will also
           create and permit a tape directory if one does not exist.  The tapes have
           rack numbers of the form fsnnnn, where
            
              nnnn=0001-0999 for daily -- change only -- saves
                  =1000-1999 for weekly full saves
                  =2000-     for deadfile saves -- not currently used at UM
            
           Has assembly EQU's for setting the save cycle period -- currently 42 days.
           Assemble using the file save macros (067/35).
1                                                                                               SUN SEP 08/96   15:24:55   Page   35
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 67/4, 67/23, 67/26, 502/8 
00067/025   FILE SAVE                TAPEOUT         OC  G          RSTR:TAPEOUT(1,999)                                             
            5.0T1   188  FILE_SAVE.TAPEOUT.OC.022           1 LINE     80    9 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:44
            5.0T1   188  RSTR:TAPEOUT         
00067/026   FILE SAVE                SAVE PGM        OC  G          RSTR:OLFSOBJ                                                    
            5.0T1   186  FILE_SAVE.SAVE_PGM.OC.020          1 LINE     80   17 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:23
            5.0T1   186  RSTR:OLFSOBJ         
0          Contains object of (067/10), (067/23), and (067/24).
0          Referenced by comments of: 671/1 
00067/027   FILE SAVE                MERGE PGM       SA  G  MERG    RSTR:MERGE(1000)                                                
            5.0T1   189  FILE_SAVE.MERGE_PGM.SA.023         1 LINE     80   17 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:52
            5.0T1   189                       
0          Program to merge FILEDIRnn files with the current FILEDIR.MAS making note of
           files which no longer exist and removing entries which are no longer
           available, according to TAPEDIR, because the tape has been reused. It also
           destroys FILEDIRnn files. FILEDIR.NEW is used so that the merge process is
           "crash- proof" -- it may be stopped and restarted. Calls non-resident copies
           (in case PISTLE has not been run) of the TIME (360) and JULGRG (522)
           subroutines and the CHKFILE subroutine (682/41). Program will create and
           permit the appropriate filesave directory files -- RSTR:FILEDIR.MAS and
           RSTR:FILEDIR.NEW -- if they don't already exist. Copies *CNFGINFODSECT (654)
           and *GFINFODSECT (593). Assemble using the filesave macros (067/35).
0          Referenced by comments of: 67/23, 682/41 
00067/028   FILE SAVE                MERGE PGM       OC  G          RSTR:MERGE(1,999)                                               
            5.0T1   190  FILE_SAVE.MERGE_PGM.OC.024         1 LINE     80    5 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:55
            5.0T1   190  RSTR:MERGE           
0          Contains two "ALI" RECORDS and "$CONTINUE WITH
           SEG2:CFE+SEG2:TIME+FILE:CHKFILE+COPY:SYSDEFS+*LIBRARY".
00067/029   FILE SAVE                TAPEDIRLIST     SA  G  TPDL    RSTR:TAPEDIRLIST(1000)                                          
            5.0T1   191  FILE_SAVE.TAPEDIRLIST.SA.025       1 LINE     80    4 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:57
            5.0T1   191                       
0          Program to list the "TAPEDIR" file in readable form.  Assemble using the FILESAVE
           macros (067/35).
00067/030   FILE SAVE                TAPEDIRLIST     OC  G          RSTR:TAPEDIRLIST(1,999)                                         
            5.0T1   192  FILE_SAVE.TAPEDIRLIST.OC.026       1 LINE     80    2 PAGE UM   HELFFRICH           AUG. 05, 1981  02:01:58
            5.0T1   192  RSTR:TAPEDIRLIST     
00067/031A  FILE SAVE                REGENERATE      SA  G          RSTR:REGENERATE(1000)                                           
            5.1T1    62  FILE_SAVE.REGENERATE.SA.031        1 LINE     72    4 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:13
0          Program to regenerate lost portions of the master file and tape directory files
           if a disk disaster, or something else, destroys them.  Assemble using the FILESAVE
1                                                                                               SUN SEP 08/96   15:24:55   Page   36
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          macro library (067/35).
            
           **********************************************************************
           D5.1 version:
            
            -- Changed to prompt for tape drive instead of taking it on the
               $RUN command.
            
            -- Changed to unlock files periodically so multiple streams can
               be run.
           **********************************************************************
00067/032A  FILE SAVE                REGENERATE      OC  G          RSTR:REGENERATE(1,998)                                          
            5.1T1    63  FILE_SAVE.REGENERATE.OC.032        1 LINE     80    4 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:13
                         RSTR:REGENERATE      
0          Contains a "$CONTINUE WITH *ENDJUNK" card.
00067/033   FILE SAVE                *FSM            C              *FSM                                                            
            5.0T1   195  FILE_SAVE.?FSM.C.029               1 LINE     28    1 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:00
            5.0T1   195  RSTR:*FSM            
0          Command file to start the online filesave merge operation only.  Invoked by
           entering "MTS *FSM" on the operator's console.
0          Referenced by comments of: 97/2 
00067/034   FILE SAVE                WRITEUP         WF             RSTR:OLFS.W                                                     
            5.0T1   196  FILE_SAVE.WRITEUP.WF.030           1 LINE    102    5 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:01
            5.0T1   196  RSTR:OLFS.W          
0          Informal documentation for the online file save.
00067/035   FILE SAVE                MACROS          SM  G          RSTR:FS.MACROS                                                  
            5.0T1   197  FILE_SAVE.MACROS.SM.031            1 LINE     72    3 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:02
            5.0T1   197  RSTR:FS.MACROS       
0          FILESAVE macro library.
0          Referenced by comments of: 67/12, 67/23, 67/24, 67/27, 67/29, 67/31, 67/46, 610/1, 671/1, 671/3, 682/39, 712/1,
                 712/3 
00067/036   FILE SAVE                RECOVER         SA  G          RSTR:RECOVER(1001)                                              
            5.0T1   198  FILE_SAVE.RECOVER.SA.032           1 LINE     72    1 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:03
            5.0T1   198                       
0          Small program to copy and re-label a set of weekly filesave tapes erroneously
           written by FILESAVE.
00067/037   FILE SAVE                RECOVER         OC  G          RSTR:RECOVER(1,999)                                             
            5.0T1   199  FILE_SAVE.RECOVER.OC.033           1 LINE     80    2 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:04
            5.0T1   199  RSTR:RECOVER         
1                                                                                               SUN SEP 08/96   15:24:55   Page   37
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00067/038   FILE SAVE                FILEDIR.MAS     D            # RSTR:FILEDIR.MAS                                                
                                                                                    UM   HELFFRICH                                  
                         RSTR:FILEDIR.MAS@E   
0          Online FILESAVE file directory file.
00067/039   FILE SAVE                FILEDIR.NEW     D            # RSTR:FILEDIR.NEW                                                
                                                                                    UM   HELFFRICH                                  
                         RSTR:FILEDIR.NEW@E   
0          Online FILESAVE file directory file.
00067/040   FILE SAVE                TAPEDIR         D            # RSTR:TAPEDIR                                                    
                                                                                    UM   HELFFRICH                                  
                         RSTR:TAPEDIR@E       
0          Online FILESAVE tape directory file.
00067/041   FILE SAVE                FSLOG           D            # RSTR:FSLOG                                                      
                                                                                    UM   HELFFRICH                                  
                         RSTR:FSLOG@E         
0          FILESAVE permanent log file.
00067/042   FILE SAVE                FSJOURNAL       D            # RSTR:FSJOURNAL                                                  
                                                                                    UM   HELFFRICH                                  
                         RSTR:FSJOURNAL@E     
0          FILESAVE journal log file.
00067/043   FILE SAVE                RECOVERING      WF             RSTR:RECOVERING                                                 
            5.0T1   200  FILE_SAVE.RECOVERING.WF.039        1 LINE    106    3 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:45
            5.0T1   200  RSTR:RECOVERING      
0          Writeup describing how to regenerate the file save directories if they are
           damaged as a result of a disk disaster.
00067/044   FILE SAVE                TESTER          SA  O          RSTR:FSTEST(1000)                                               
            5.0T1   201  FILE_SAVE.TESTER.SA.040            1 LINE     46    1 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:46
            5.0T1   201                       
0          Series of object modules to be concatenated to online FILESAVE (067/23) to
           debug it.  $CONTINUEs WITH SAVEFILE (067/10) + VTOCREAD (067/11) + COPY:SYSDEFS (579/3).
00067/045   FILE SAVE                TESTER          OC  O          RSTR:FSTEST(1,999)                                              
            5.0T1   202  FILE_SAVE.TESTER.OC.041            1 LINE     80    1 PAGE UM   HELFFRICH           AUG. 05, 1981  02:02:47
            5.0T1   202  RSTR:FSTEST          
00067/046A  FILE SAVE                TAPE PREVIEW    SA  O          RSTR:TAPEPREVIEW(1000)                                          
            5.1T1    64  FILE_SAVE.TAPE_PREVIEW.SA.046      1 LINE     72    5 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:13
0          Program invoked by *SAV (067/22) to print out the next "n" online FILESAVE
           tapes to be used.  Takes the number "n" in the parameter field, where "n"
           is the number of tapes to print out.  Assemble using the FILESAVE macros
1                                                                                               SUN SEP 08/96   15:24:55   Page   38
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (067/35).
00067/047A  FILE SAVE                TAPE PREVIEW    OC  O          RSTR:TAPEPREVIEW(1,999)                                         
            5.1T1    65  FILE_SAVE.TAPE_PREVIEW.OC.047      1 LINE     80    3 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:14
                         RSTR:TAPEPREVIEW     
00069/001  *DRAW                                     SA           # (OBSOLETE)                                                      
            D4T1    210  DRAW..SA.                          1 SEQ      80   13 PAGE UM                       JULY 30, 1973  23:38.23
00071/001A  LISTSTAT                                 SA  G          W030:LISTSTAT(1,999)                                            
            5.1T1    66  LISTSTAT..SA.001                   1 LINE     72   10 PAGE UM   LIFT                JULY 23, 1983  10:07:14
0          Program to print *STATISTICS records.  Will read records on SCARDS from a
           file or blocked tape, such as produced by *CMB.  Prints output on SPRINT.
           Alternate subroutine entry LIST#, used by SCAN (753), lets caller specify
           I/O FDUBS instead of SCARDS/SPRINT.  Program must be run with PROT=OFF.
           If a rate number appears in the *STATISTICS record and the job was run after
           the beginning of 1974, the MTS GETRATES subroutine (651/11) is called to
           obtain a set of rates used to print the cost of the job.  Otherwise, rates
           are obtained from assembled-in tables. For this reason, the program will have
           to be reassembled at each installation since the rate tables will be wrong.
           Assemble using COPY:MTS.MACROS (344/3). Copies COPY:RATEVEC (651/3).
           Source in lines 1,999.
            
           *****************************************************************************
           D5.0B version:
            
           Changed to add new STAT record format.
           *****************************************************************************
0          Referenced by comments of: 707/3, 753/5 
00071/002A  LISTSTAT                                 OC  G          MTS:LISTSTAT                                                    
            5.1T1    67  LISTSTAT..OC.002                   1 LINE   7436    3 PAGE UM   LIFT                JULY 23, 1983  10:07:15
                         MTS:LISTSTAT         
00072/001  *FORTEDIT                                 SA  O        # (OBSOLETE)                                                      
            D3T1    170  FORTEDIT..SA.1                     1 SEQ      80   20 PAGE UM                       JULY 30, 1973  23:39.26
00073/001  *DSK                                      C              *DSK                                                            
            5.0T1   207  DSK..C.001                         1 LINE     32    1 PAGE UM   HELFFRICH           JULY 03, 1981  12:35:13
            5.0T1   207  FILE:*DSK            
0          Command file to run SYS:DSK (073/5).  Invoked by entering "MTS *DSK" on operators console.
0          Referenced by comments of: 644/1, 682/4 
00073/002  *DSK                      *DSO            C              *DSO                                                            
            5.0T1   208  DSK.*DSO.C.002                     1 LINE     21    1 PAGE UBC  HOGG      HELFFRICH JULY 03, 1981  12:35:14
            5.0T1   208  *DSO                 
0          Command file invoked by entering "MTS *DSO" from operator's console which
           signs on under user id "SYS" and runs SYS:DSK (073/5) with output to a
           temporary file, the end of which (showing the total disk space used and
1                                                                                               SUN SEP 08/96   15:24:55   Page   39
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          available) is then copied to the operator's console.
00073/003  *DSK                      BASE SOURCE     SA  G          FILE:DSKMAN(-10000,-1)                                          
            5.0T1   209  DSK.BASE_SOURCE.SA.003             1 LINE     80    6 PAGE UM   HELFFRICH           JULY 03, 1981  12:35:15
            5.0T1   209  FILE:DSKMAN          
0          This program is a front-end to the VOLREL subroutine, in (482/4).  It allows
           the operators to manipulate information in the system's DSKTAB entries, which
           affect the availability and certain attributes of the mts public volumes.
           Volumes can be added to, removed from, or temporarily "forgotten" by the
           system.  Additionally, they can also be designated to have the following
           characteristics:  no catalog permitted; no files created on them unless
           explicitly requested; or no files created on them unless space is unavailable 
           elsewhere.  The program will also display information in the DSKTAB entries 
           which are of operator interest, e.g., the number of free pages on each disk. 
           Assemble using COPY:FILE.MACROS (482/45).  See (682/4) for a writeup.
0          Referenced by comments of: 73/4 
00073/004  *DSK                      UPDATE          UC  G          FILE:DSKMAN(1000)                                               
            5.0T1   210  DSK.UPDATE.UC.004                  1 LINE     68    3 PAGE UM   HELFFRICH           JULY 03, 1981  12:35:16
            5.0T1   210                       
0          Update deck to be applied to (073/3) to yield current source.
00073/005  *DSK                      DSKMAN          OC  G          SYS:DSK                                                         
            5.0T1   211  DSK.DSKMAN.OC.005                  1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  12:35:18
            5.0T1   211  SYS.:DSK             
0          Referenced by comments of: 73/1, 73/2 
00074/001  *2250EDIT                                 SA           # (OBSOLETE)                                                      
            D4T1    216  2250EDIT..SA.                      1 SEQ      80   29 PAGE UM                       JULY 30, 1973  23:39.56
00076/001   RESERVE DISK             *RSV            C              *RSV                                                            
            5.0T1   212  RESERVE_DISK.*RSV.C.001            1 LINE     45    1 PAGE UM   MTA                 JULY 03, 1981  12:35:19
            5.0T1   212  *RSV                 
0          Command file to run the disk reserve program (076/3).  Invoked by entering "MTS *RSV"
           on operator's console.
00076/002   RESERVE DISK             RESERVE PGM     SA  G          S1558 5.0T1 VLO FSNAME=RESERVE_DISK.RESERVE_PGM.SA.002(1)    213
            5.0T1   213  RESERVE_DISK.RESERVE_PGM.SA.002    1 LINE     80    1 PAGE UM   MTA                 JULY 30, 1973  23:40.00
            5.0T1   213                       
0          Program to execute a reserve command for a disk pack. Used only with 2844 or 2 tail switch.
00076/003   RESERVE DISK             RESERVE PGM     OC  G          SYS:RSV                                                         
            5.0T1   214  RESERVE_DISK.RESERVE_PGM.OC.003    1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  12:35:24
            5.0T1   214  SYS.:RSV             
0          Referenced by comments of: 76/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page   40
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00077/001   STATBUFF                                 SA  G          S1558 5.0T1 VLO FSNAME=STATBUFF..SA.001(1)                   215
            5.0T1   215  STATBUFF..SA.001                   1 LINE     80    1 PAGE UM   HELFFRICH           JULY 27, 1977  21:56:41
            5.0T1   215                       
0          Points to the buffer used by the STAT job (079) if it is active.  The second
           word points to the STAT job's job table.
00077/002   STATBUFF                                 OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00078/001   STAT SUBROUTINE                          SA  G          S1558 5.0T1 VLO FSNAME=STAT_SUBROUTINE..SA.001(1)            216
            5.0T1   216  STAT_SUBROUTINE..SA.001            1 LINE     80    4 PAGE UM   HELFFRICH           JULY 27, 1977  21:56:44
            5.0T1   216                       
0          Subroutine to produce STAT job entries for MTS I/O.
00078/002   STAT SUBROUTINE                          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00079/001A  STAT JOB                                 SA  G          W170:STAT.JOB(1000)                                             
            5.1T1    68  STAT_JOB..SA.001                   1 LINE     80   13 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:15
                         W170:STAT.JOB        
0          The "STAT" job will save statistics about hardware interrupts, MTS I/O
           operations, and internal supervisor functions (such as the execution
           of SIO) on tape. Can produce large amounts of data quickly. *ANALYSIS
           (140) can help analyze the data. Copies COPY:GLOBALS (1026/3) and
           COPY:LLMPSEQU (087). Assemble using COPY:SETPARM (653),
           COPY:MISC.MACROS (728), COPY:UC.MACROS (787/1), and OLD:CC.MACROS
           (1054/4).
            
           **********************************************************************
           D5.0B version:
            
           Fixes bugs.
           **********************************************************************
0          Referenced by comments of: 77/1, 79/3, 140/1, 787/20 
00079/002A  STAT JOB                                 OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00079/003   STAT JOB                 STATSW          SA  G          W170:STAT.PROG(1000)                                            
            5.0T1   218  STAT_JOB.STATSW.SA.003             1 LINE     72    5 PAGE UM   HELFFRICH           JULY 03, 1981  12:35:38
            5.0T1   218  W170:STAT.PROG       
0          The STATSW job program (which is also a MTS-callable routine) parses an input
           line from OPER (or SCARDS, if MTS called) and calls the STATSSUB subroutine in
1                                                                                               SUN SEP 08/96   15:24:55   Page   41
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          the STAT job assembly (079/1) to do the dirty work relating to data collection
           recording switching.  See the comments in the source listing.
0          Referenced by comments of: 79/5 
00079/004   STAT JOB                 STATSW JOB      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00079/005   STAT JOB                 MTS STATSW      OC  G          MTS:STATSW                                                      
            5.0T1   219  STAT_JOB.MTS_STATSW.OC.005         1 LINE     24    1 PAGE UM   HELFFRICH           JULY 03, 1981  12:35:40
            5.0T1   219  MTS.:STATSW          
0          Contains RIP and LCS cards to force reference to the MTS entry point to
           STATSW (079/3) to enable the STATSW job to be run as an MTS program.
00079/006   STAT JOB                 MEMO 393        WF             S0607 ARCHIV FSNAME=STAT.CCMEMO                                 
            5.0T1   220  STAT_JOB.MEMO_393.WF.006           1 LINE     97    2 PAGE UM   HELFFRICH           MAY  13, 1978  17:03:09
            5.0T1   220                       
0          This is Computing Center Memo 393 -- "Data-Collection Facility".
           Requires hand-inserted characters.
0          Referenced by comments of: 140/2, 140/7 
00080/001   INIT JOB                                 SA  G          S1558 5.0T1 VLO FSNAME=INIT_JOB..SA.001(1)                   221
            5.0T1   221  INIT_JOB..SA.001                   1 LINE     70    1 PAGE UM   MTA                 JULY 03, 1981  12:35:44
            5.0T1   221                       
0          After IPL, the "INIT" job is automatically started (without an operator request).
           If &OPERJOB (in COPY:GLOBALS) is set, the INIT job will start the operator job
           and wait up to 20 seconds for it to start. Then it starts the disk manager (769). 
           After finding the disk locations of the MTS file catalogs, it turns over the 
           remaining work of initializing the system to MTS by using the SVC STRTJB to start 
           "MTS *INIT", see (097/1).  Installations not using the operator job will want to 
           change the value of &OPERJOB and reassemble the INIT job to remove the 20 second 
           delay.  Copies COPY:GLOBALS (1026/3).
00080/002   INIT JOB                                 OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00082/001   DMOD                                     SA           # (OBSOLETE)                                                      
            D4T1    224  DMOD..SA.001                       1 LINE     80    7 PAGE UM                       JULY 27, 1977  21:56:50
00083/001  *EBCDBCD                                  SA  G          S1558 5.0T1 VLO FSNAME=EBCDBCD..SA.001(1)                    222
            5.0T1   222  EBCDBCD..SA.001                    1 LINE     80    3 PAGE UM   WSG                 JAN. 11, 1980  17:33:39
            5.0T1   222                       
0          Program to translate arbitrary length 029 keypunch records to 026.
           Source in lines 1,999.
1                                                                                               SUN SEP 08/96   15:24:55   Page   42
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00083/002  *EBCDBCD                                  OC  G          *EBCDBCD                                                        
            5.0T1   223  EBCDBCD..OC.002                    1 LINE     80    1 PAGE UM   WSG                 JULY 03, 1981  12:36:03
            5.0T1   223  *EBCDBCD             
00084/001   AUDIO RESP UNIT - 7772   ARURTN          SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.AR.SA.001(1)   224
            5.0T1   224  AUDIO_RESP_UNIT_-_7772.AR.SA.001   1 LINE     80   56 PAGE UM   WSG                 JULY 28, 1976  00:35:37
            5.0T1   224                       
0          Device support routines for the IBM 7772 Audio Response Unit.  No longer in use at UM.
           References *ARUDEF (084/4) and *SPEAK (084/3).
           Uses BAS and BASR instructions like crazy.  Assemble with PAR=IS=67.
0          Referenced by comments of: 84/3, 84/4 
00084/002   AUDIO RESP UNIT - 7772   *ARURTN         OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*A.OC.002(1)   225
            5.0T1   225  AUDIO_RESP_UNIT_-_7772.*A.OC.002   1 LINE     80    4 PAGE UM   WSG                 JULY 28, 1976  00:35:45
            5.0T1   225                       
0          Object suitable for loading into shared VM.
00084/003   AUDIO RESP UNIT - 7772   *SPEAK          D   G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*S.D.003(1)    226
            5.0T1   226  AUDIO_RESP_UNIT_-_7772.*S.D.003    1 LINE    255   60 PAGE UM   WSG                 JULY 30, 1973  23:42.25
            5.0T1   226                       
0          Vocabulary file for *ARURTN (084/1).
0          Referenced by comments of: 84/1 
00084/004   AUDIO RESP UNIT - 7772   *ARUDEF         D   G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*A.D.004(1)    227
            5.0T1   227  AUDIO_RESP_UNIT_-_7772.*A.D.004    1 LINE     10    1 PAGE UM   WSG                 JULY 30, 1973  23:42.34
            5.0T1   227                       
0          Public "text insertion" file for *ARURTN (084/1)
0          Referenced by comments of: 84/1 
00084/005   AUDIO RESP UNIT - 7772   DCVD SUBR       SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SA.005(1)   228
            5.0T1   228  AUDIO_RESP_UNIT_-_7772.DC.SA.005   1 LINE     80    5 PAGE UM   WSG                 FEB. 13, 1976  17:36:01
            5.0T1   228                       
0          Subroutine to convert digitally coded voice from the format expected
           by the 7772 to a more reasonable format.
0          Referenced by comments of: 84/12, 84/15, 84/17 
00084/006   AUDIO RESP UNIT - 7772   DCVD SUBR       OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.OC.006(1)   229
            5.0T1   229  AUDIO_RESP_UNIT_-_7772.DC.OC.006   1 LINE     80    1 PAGE UM   WSG                 FEB. 13, 1976  17:36:06
            5.0T1   229                       
0          Put this in *LIBRARY.
1                                                                                               SUN SEP 08/96   15:24:55   Page   43
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00084/007   AUDIO RESP UNIT - 7772   DCVC SUBR       SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SA.007(1)   230
            5.0T1   230  AUDIO_RESP_UNIT_-_7772.DC.SA.007   1 LINE     80    4 PAGE UM   WSG                 FEB. 13, 1976  17:36:17
            5.0T1   230                       
0          Subroutine to convert digitally coded voice to the format expected by the 7772.
0          Referenced by comments of: 84/12, 84/15, 84/17 
00084/008   AUDIO RESP UNIT - 7772   DCVC SUBR       OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.OC.008(1)   231
            5.0T1   231  AUDIO_RESP_UNIT_-_7772.DC.OC.008   1 LINE     80    1 PAGE UM   WSG                 FEB. 13, 1976  17:36:26
            5.0T1   231                       
0          Put this in *LIBRARY.
00084/009   AUDIO RESP UNIT - 7772   DCVG SUBR       SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SA.009(1)   232
            5.0T1   232  AUDIO_RESP_UNIT_-_7772.DC.SA.009   1 LINE     80    3 PAGE UM   WSG                 FEB. 13, 1976  17:36:52
            5.0T1   232                       
0          Subroutine to retrieve the digitally coded voice used by the 7772.
0          Referenced by comments of: 84/12, 84/15, 84/17 
00084/010   AUDIO RESP UNIT - 7772   DCVG SUBR       OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.OC.010(1)   233
            5.0T1   233  AUDIO_RESP_UNIT_-_7772.DC.OC.010   1 LINE     80    1 PAGE UM   WSG                 FEB. 13, 1976  17:36:55
            5.0T1   233                       
0          Put this in *LIBRARY.
00084/011   AUDIO RESP UNIT - 7772   *ARUVOC         D   G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*A.D.011(1)    234
            5.0T1   234  AUDIO_RESP_UNIT_-_7772.*A.D.011    1 LINE    102   11 PAGE UM   WSG                 JULY 30, 1973  23:42.36
            5.0T1   234                       
0          Listing of ARU vocabulary (*SPEAK) suitable for printing.
00084/012   AUDIO RESP UNIT - 7772   CREVOC          SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.CR.SA.012(1)   235
            5.0T1   235  AUDIO_RESP_UNIT_-_7772.CR.SA.012   1 LINE     80   19 PAGE UM   WSG                 FEB. 13, 1976  17:38:37
            5.0T1   235                       
0          Program to create an AUR vocabulary file. Calls the *LIBRARY
           subroutines DCVD (084/5), DCVC (084/7), and DCVG (084/9) as well as
           the MSG subroutine (084/13).
0          Referenced by comments of: 84/13, 84/14 
00084/013   AUDIO RESP UNIT - 7772   CREVOC MSG SUB  SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.CR.SA.013(1)   236
            5.0T1   236  AUDIO_RESP_UNIT_-_7772.CR.SA.013   1 LINE     80    5 PAGE UM   WSG                 FEB. 25, 1976  12:52:33
            5.0T1   236                       
0          MSG subr called by CREVOC (084/12). 
0          Referenced by comments of: 84/12, 84/14 
1                                                                                               SUN SEP 08/96   15:24:55   Page   44
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00084/014   AUDIO RESP UNIT - 7772   *CREVOC         OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*C.OC.014(1)   237
            5.0T1   237  AUDIO_RESP_UNIT_-_7772.*C.OC.014   1 LINE     80    3 PAGE UM   WSG                 FEB. 25, 1976  12:51:48
            5.0T1   237                       
0          Object for CREVOC (084/12) and the MSG subr (084/13).
           Also contains error messages starting at line 800.
           Line numbers are important in this file.
00084/015   AUDIO RESP UNIT - 7772   VLIST           SA  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.VL.SA.015(1)   238
            5.0T1   238  AUDIO_RESP_UNIT_-_7772.VL.SA.015   1 LINE     80    4 PAGE UM   WSG                 FEB. 13, 1976  17:39:10
            5.0T1   238                       
0          Program to either speak or print an Audio Response Unit vocabulary file.
           Calls the *LIBRARY subroutines DCVD (084/5), DCVC (084/7), and DCVG (084/9).
00084/016   AUDIO RESP UNIT - 7772   *VLIST          OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*V.OC.016(1)   239
            5.0T1   239  AUDIO_RESP_UNIT_-_7772.*V.OC.016   1 LINE     80    1 PAGE UM   WSG                 FEB. 13, 1976  17:39:14
            5.0T1   239                       
00084/017   AUDIO RESP UNIT - 7772   DCVDEC          SF  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SF.017(1)   240
            5.0T1   240  AUDIO_RESP_UNIT_-_7772.DC.SF.017   1 LINE     67    1 PAGE UM   WSG                 FEB. 13, 1976  17:39:56
            5.0T1   240                       
0          Program to form and list the info which would be transmitted to the ARU for a text line.
           Calls the *LIBRARY subroutines DCVD (084/5), DCVC (084/7), and DCVG (084/9).
00084/018   AUDIO RESP UNIT - 7772   *DCVDEC         OC  G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*D.OC.018(1)   241
            5.0T1   241  AUDIO_RESP_UNIT_-_7772.*D.OC.018   1 LINE    454    1 PAGE UM   WSG                 FEB. 13, 1976  17:40:05
            5.0T1   241                       
00084/019   AUDIO RESP UNIT - 7772   *FSK            D   G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*F.D.019(1)    242
            5.0T1   242  AUDIO_RESP_UNIT_-_7772.*F.D.019    1 LINE     31    1 PAGE UM   WSG                 JULY 30, 1973  23:43.01
            5.0T1   242                       
0          An ARU vocabulary that translates all output to 11-bit (frame size) ASCII code.
00084/020   AUDIO RESP UNIT - 7772   *IM             D   G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*I.D.020(1)    243
            5.0T1   243  AUDIO_RESP_UNIT_-_7772.*I.D.020    1 LINE     87    1 PAGE UM   WSG                 JULY 30, 1973  23:43.03
            5.0T1   243                       
0          An ARU vocabulary that translates all output to international morse code.
00084/021   AUDIO RESP UNIT - 7772   *NOTES          D   G          S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*N.D.021(1)    244
            5.0T1   244  AUDIO_RESP_UNIT_-_7772.*N.D.021    1 LINE     91    2 PAGE UM   WSG                 JULY 30, 1973  23:43.05
            5.0T1   244                       
0          An ARU vocabulary that defines two octaves of "musical" tones.
00086/001  *2501RTN                                  SA  G          S1558 5.0T1 VLO FSNAME=2501RTN..SA.001(1)                    245
            5.0T1   245  2501RTN..SA.001                    1 LINE     80   16 PAGE UM   DWB                 JULY 27, 1977  21:58:36
            5.0T1   245                       
0          MTS device support routines for the IBM 2501 card reader.  Calls BINEBCD (243).
1                                                                                               SUN SEP 08/96   15:24:55   Page   45
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 243/1 
00086/002  *2501RTN                                  OC  G          *2501RTN                                                        
            5.0T1   246  2501RTN..OC.002                    1 LINE     80    2 PAGE UM   DWB                 JULY 03, 1981  12:36:20
            5.0T1   246  *2501RTN             
0          Object for 2501 routines.
00087/001A  LLMPSEQU                                 SA  G          COPY:LLMPSEQU                                                   
            5.1T1    69  LLMPSEQU..SA.001                   1 LINE     80   14 PAGE UM   MTA                 JULY 23, 1983  10:07:17
                         COPY:LLMPSEQU        
0          Copy section for definitions of job table, device list, device table, etc. which
           is copied by many programs.  Its name comes straight from ancient history (Lincoln
           Labs multi-programming supervisor equalities).
           The line numbers in this file are important since some programs copy it starting
           at line 100.
           NOTE:  Programs copying this file must first copy COPY:GLOBALS (1026/3).
0          Referenced by comments of: 5/1, 7/1, 8/1, 9/1, 9/3, 10/1, 19/1, 21/1, 24/1, 42/1, 44/1, 45/1, 46/1, 79/1, 101/1,
                 104/98, 116/1, 135/1, 198/1, 353/2, 354/1, 354/5, 387/1, 387/2, 387/7, 387/27, 388/1, 400/1, 400/5, 400/15,
                 413/1, 464/1, 482/4, 482/7, 500/51, 507/2, 509/1, 513/1, 531/1, 531/8, 539/1, 540/1, 540/3, 540/6, 540/8,
                 540/12, 540/17, 540/26, 545/3, 545/15, 554/1, 554/3, 570/1, 577/1, 577/3, 577/8, 577/11, 578/1, 615/15,
                 621/2, 629/4, 631/16, 634/1, 634/3, 635/1, 636/1, 637/1, 638/1, 639/1, 642/16, 647/1, 651/13, 682/24, 693/1,
                 731/3, 732/1, 770/1, 777/1, 798/75, 806/1, 818/1, 829/1, 866/1, 1012/1, 1021/1, 1021/4, 1079/18, 1081/1,
                 3024/1, 4000/1 
00090/001  *HEXLIST                                  SA           # (OBSOLETE)                                                      
            D3T1    202  HEXLIST..SA.1                      1 LINE     80    6 PAGE UM                       JULY 30, 1973  23:43.29
00091/001  *DOUBLE                                   SA           # (OBSOLETE)                                                      
            D3T1    204  DOUBLE..SA.1                       1 LINE     80   16 PAGE UM                       JULY 27, 1973  22:03.05
00092/001   FILE RESTORE             RSTFMT0         SA  G          RSTR:RSTFMT0(1000)                                              
            5.0T1   247  FILE_RESTORE.RSTFMT0.SA.001        1 LINE     71   28 PAGE UM   HELFFRICH           JULY 03, 1981  12:36:21
            5.0T1   247  RSTR:RSTFMT0         
0          Main program to restore files from tapes produced by FILESAVE or DEADFILES.
           Assemble using *SYSMAC.
0          Referenced by comments of: 92/2, 92/3, 92/4 
00092/002   FILE RESTORE             RSTFMT1         SA  G          RSTR:RSTFMT1(1000)                                              
            5.0T1   248  FILE_RESTORE.RSTFMT1.SA.002        1 LINE     71   17 PAGE UM   HELFFRICH           JULY 03, 1981  12:36:28
            5.0T1   248  RSTR:RSTFMT1         
0          Subroutine called by (092/1).  Assemble using *SYSMAC.
0          Referenced by comments of: 92/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page   46
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00092/003A  FILE RESTORE             RSTFMT2         SA  G          RSTR:RSTFMT2(1000)                                              
            5.1T1    70  FILE_RESTORE.RSTFMT2.SA.003        1 LINE     72   22 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:17
                         RSTR:RSTFMT2         
0          Subroutine called by (092/1) and *RESTORE (712).  Assemble using *SYSMAC and 
           COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 92/4, 712/1, 712/3, 712/4 
00092/004A  FILE RESTORE                             OC  G          RSTR:RST                                                        
            5.1T1    71  FILE_RESTORE..OC.004               1 LINE   2256   25 PAGE UM   HELFFRICH           JULY 23, 1983  10:07:19
                         RSTR:RST             
0          Object from (092/1), (092/2), and (092/3).  Also contains object for old
           tape unit check routines, the source for which is not distributed since they
           are obsolete.
00092/005   FILE RESTORE             *RST            C              *RST                                                            
            5.0T1   251  FILE_RESTORE.*RST.C.005            1 LINE     66    1 PAGE UM   HELFFRICH           JULY 03, 1981  12:36:47
            5.0T1   251  RSTR:*RST            
0          Command file to run file restore program (RSTR:RST).  Invoked by entering "MTS *RST"
           on operator's console.
00094/001  *TIME                                     SA  G          S1558 5.0T1 VLO FSNAME=TIME..SA.001(1)                       252
            5.0T1   252  TIME..SA.001                       1 LINE     80    2 PAGE UM   TIFFANY             JULY 27, 1977  21:59:07
            5.0T1   252                       
0          Program to print time and date.
00094/002  *TIME                                     OC  G          *TIME                                                           
            5.0T1   253  TIME..OC.002                       1 SEQ     247    1 PAGE UM   TIFFANY             JULY 03, 1981  12:36:49
            5.0T1   253  *TIME                
00096/001  *SYMBOLS                                  SA  G          S1558 5.0T1 VLO FSNAME=SYMBOLS..SA.001(1)                    254
            5.0T1   254  SYMBOLS..SA.001                    1 LINE     80   13 PAGE UM   SHERRY              MAR. 26, 1979  02:20:51
            5.0T1   254                       
0          Prints external symbols defined in *LIBRARY, *SSP, and LCSYMBOL.
00096/002  *SYMBOLS                                  OC  G          *SYMBOLS                                                        
            5.0T1   255  SYMBOLS..OC.002                    1 LINE   1628    3 PAGE UM   SHERRY              JULY 03, 1981  12:36:53
            5.0T1   255  *SYMBOLS             
00097/001   INIT                     *INIT           C              *INIT                                                           
            5.0T1   256  INIT.*INIT.C.001                   1 LINE     47    1 PAGE UM   ENGLE               JULY 03, 1981  12:36:54
            5.0T1   256  INIT:*INIT           
0          The command file *INIT is automatically invoked by the system after IPL.  No
           operator action is required.  This command file signs on under the id INIT
           and sources to INIT:INITCMD.
            
           *INIT(10), *INIT(20), *INIT(30), *INIT(40), and *INIT(50) are invoked later by
           ACCINITL in INIT:INIT to produce lists of the user ids which were not properly
1                                                                                               SUN SEP 08/96   15:24:55   Page   47
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          signed off when the system last went down (if any) so that they may be "fixed".
0          Referenced by comments of: 80/1 
00097/002A  INIT                     INIT:INITCMD    C              INIT:INITCMD                                                    
            5.1T1    72  INIT.INIT:INITCMD.C.002            1 LINE     84    1 PAGE UM   MTA                 JULY 23, 1983  10:07:20
                         INIT:INITCMD         
0          This file contains the commands necessary to initialize the system after a reload.
           The following functions are performed:
            
             1.  INIT:REASON (097/22) is created, permitted and emptied.
             2.  The current time and date are checked against the time and date of the last signoff
                 in *STATISTICS (050/5) to verify, at least partially, that they are correct.
             3.  The program INITLOG (097/12) is run to obtain the reason for reloading from the
                 operator and write it at the end of the file INIT:LOG (097/21) and into INIT:REASON.
             4.  The PDP is started.
             5.  INIT:REASON is copied to the end of INIT:RELOADLOG (097/23).
             6.  RAMROD is run to write the comments for the current system to INIT:REASON(2000),
                 which is then copied to OPER.
             7.  The post-IPL loader, MTS *S2L (559/1), is started.
             8.  MTS *CLN (531/6) is started to begin the CMDSTAT data collection.
             9.  MTS *FSM (067/33) is started to clean up the online file save directories.
             10. MTS *STI (050/2) is started to check for a system crash during the last statistics save.
             11. The system status master job, JOBS MAC, is started.
             12. ETC:SAVE.COUNTS is emptied.
             13. The CLEAN program (097/8) is run to destroy any scratch files which were left around when
                 the system last went down.
             14. The INIT program (097/4) is run.  It starts up 5 (the number of auxiliary accounting files)
                 other jobs (MTS *INIT(10), MTS *INIT(20), etc.) to make 5 lists (in the files INIT1,
                 INIT2, etc.) of the user IDs which were signed-on when the system last went down.
                 When the 5 files are complete, it prints "THE ACCOUNTING FILE IS AVAILABLE" on
                 the operators console and begins "fixing" the IDs.  When finished, the total
                 number of IDs fixed is printed on the console.  No batch jobs should be allowed
                 to run (i.e. don't release execution) until this information has printed, since
                 it is possible that some of the batch jobs to be run will have user IDs which
                 are still being fixed.  It is ok to bring up terminal lines after the "ACCOUNTING
                 FILE IS AVAILABLE" message prints and after the "POST-IPL SYSTEM LOADED OK"
                 message prints, but some terminal users may not be able to signon until their
                 user IDs have been fixed.  These users will get a message which indicates that
                 their IDs are temporarily unavailable.
0          Referenced by comments of: 50/2, 97/14, 531/6, 531/7, 559/1 
00097/003C  INIT                     TST.INITCMD     C            # MTS:TST.INITCMD                                                 
                                                                                    UM   MTA                                        
                         INIT:INITCMD@UM      
00097/004A  INIT                     INIT:INIT       OE  G          INIT:INIT                                                       
            5.1T1    73  INIT.INIT:INIT.OE.004              1 LINE   1298    4 PAGE UM   ENGLE               JULY 23, 1983  10:07:20
                         INIT:INIT            
0          Program to initiate and control invocations of the program at INIT(1000)
           that fixes user IDs which were in use when the system last went down.
1                                                                                               SUN SEP 08/96   15:24:55   Page   48
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This file must be given the program key INIT. This program references
           INIT1, INIT2, etc. to get the user IDs to be listed. These lists are
           built by the program at INIT(1000).
0          Referenced by comments of: 97/2, 104/95 
00097/005A  INIT                     INITCHK         SA  G  ICHK    S0027 DISTRB FSNAME=INITCHK                                     
            5.1T1    74  INIT.INITCHK.SA.005                1 LINE     80    4 PAGE UM   ENGLE               AUG. 26, 1982  11:28:33
0          Program to check for reinitialization and that the operator has
           entered a "reasonable" time and date. Copies GRDEF (104/83).
0          Referenced by comments of: 104/91 
00097/006C  INIT                     INITCHK         UC  G          S0027 DISTRB FSNAME=INITCHKUPD                                  
            5.1T1    75  INIT.INITCHK.UC.006                1 LINE     72    1 PAGE UM   ENGLE               AUG. 26, 1982  11:28:39
0          Updates source from previous regular distribution to current one.
00097/007A  INIT                     INIT:INITCHK    OC  G          INIT:INITCHK                                                    
            5.1T1    76  INIT.INIT:INITCHK.OC.007           1 LINE   1280    2 PAGE UM   ENGLE               JULY 23, 1983  10:10:37
                         INIT:INITCHK         
0          Referenced by comments of: 104/91 
00097/008   INIT                     CLEAN           SA  G          FILE:SFDESTRY                                                   
            5.0T1   260  INIT.CLEAN.SA.006                  1 LINE     70    2 PAGE UM   HELFFRICH           JULY 03, 1981  12:36:57
            5.0T1   260  FILE:SFDESTRY        
0          Program to destroy scratch files.
           Assemble using COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 97/2 
00097/009   INIT                     CLEAN           OC  G          INIT:CLEAN                                                      
            5.0T1   261  INIT.CLEAN.OC.007                  1 LINE     80    1 PAGE UM   HELFFRICH           JULY 03, 1981  12:36:57
            5.0T1   261  INIT:CLEAN           
00097/010   INIT                     DINIT           SA  O          S1558 5.0T1 VLO FSNAME=INIT.DINIT.SA.008(1)                  262
            5.0T1   262  INIT.DINIT.SA.008                  1 LINE     80    7 PAGE UM   DWB                 AUG. 01, 1973  00:54.09
            5.0T1   262                       
0          Drum initialization program.  Has table of drum names to use assembled in.  As distributed, the table
           contains two names:  DRM1 and DRM2.  If the program can't acquire any of the specified drums from the
           supervisor, it prints "nnnn NOT AVAILABLE" and goes on to the next drum.
00097/011   INIT                     DINIT           OC             INIT:DINIT                                                      
            5.0T1   263  INIT.DINIT.OC.009                  1 LINE     80    4 PAGE UM   DWB                 JULY 03, 1981  12:36:59
            5.0T1   263  INIT:DINIT           
00097/012A  INIT                     INITLOG         SA  G          INIT:INITLOG.S                                                  
            5.1T1    77  INIT.INITLOG.SA.012                1 LINE     62    1 PAGE UM   MTA                 JULY 23, 1983  10:10:37
0          Program to log reloads. Run by *INIT and asks operator for reason for reload.
1                                                                                               SUN SEP 08/96   15:24:55   Page   49
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Copies *CNFGINFODSECT (654).  Assemble using *SYSMAC.
            
           *************************************************************************
           D5.0B version:
            
           Minor changes for the 5860.
           *************************************************************************
0          Referenced by comments of: 97/2 
00097/013A  INIT                     INITLOG         OC  G          INIT:INITLOG                                                    
            5.1T1    78  INIT.INITLOG.OC.013                1 LINE    661    2 PAGE UM   MTA                 JULY 23, 1983  10:10:37
                         INIT:INITLOG         
00097/014   INIT                     FMT2305         SA  G          S1558 5.0T1 VLO FSNAME=INIT.FMT2305.SA.012(1)                266
            5.0T1   266  INIT.FMT2305.SA.012                1 LINE     68    4 PAGE UBC  MTA                 JULY 03, 1981  12:37:01
            5.0T1   266                       
0          MTS program to initialize (i.e. format) a 2305 or its understudy.
           This program is run from INIT:INITCMD (097/2) at startup to format a 2305
           before starting the PDP.
00097/015   INIT                     FMT2305         OC  G          INIT:FMT2305                                                    
            5.0T1   267  INIT.FMT2305.OC.013                1 SEQ      80    2 PAGE UBC  MTA                 JULY 03, 1981  12:37:02
            5.0T1   267  INIT:FMT2305         
00097/016   INIT                     INIT:INIT1      D            # INIT:INIT1                                                      
                                                                                    UM   ENGLE                                      
                         INIT:INIT1@E         
0          List of user IDs in *ACCOUNTING1 which need to be fixed after IPL.
00097/017   INIT                     INIT:INIT2      D            # INIT:INIT2                                                      
                                                                                    UM   ENGLE                                      
                         INIT:INIT2@E         
0          List of user IDs in *ACCOUNTING2 which need to be fixed after IPL.
00097/018   INIT                     INIT:INIT3      D            # INIT:INIT3                                                      
                                                                                    UM   ENGLE                                      
                         INIT:INIT3@E         
0          List of user IDs in *ACCOUNTING3 which need to be fixed after IPL.
00097/019   INIT                     INIT:INIT4      D            # INIT:INIT4                                                      
                                                                                    UM   ENGLE                                      
                         INIT:INIT4@E         
0          List of user IDs in *ACCOUNTING4 which need to be fixed after IPL.
1                                                                                               SUN SEP 08/96   15:24:55   Page   50
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00097/020   INIT                     INIT:INIT5      D            # INIT:INIT5                                                      
                                                                                    UM   ENGLE                                      
                         INIT:INIT5@E         
0          List of user IDs in *ACCOUNTING5 which need to be fixed after IPL.
00097/021   INIT                     INIT:LOG        D            # INIT:LOG                                                        
                                                                                    UM   MTA                                        
                         INIT:LOG@E           
0          Log of system reloads.  Contains the time and date of each reload, the name
           of the system IPLed from, the reason for the reload (as entered by the operator),
           the list of scratch files destroyed, and the list of user IDs fixed.
0          Referenced by comments of: 97/2 
00097/022   INIT                     INIT:REASON     D            # INIT:REASON                                                     
                                                                                    UM   MTA                                        
                         INIT:REASON@E        
0          file to contain reason for reloading and current system name and comments
           after each reload.
0          Referenced by comments of: 97/2 
00097/023   INIT                     INIT:RELOADLOG  D            # INIT:RELOADLOG                                                  
                                                                                    UM   MTA                                        
                         INIT:RELOADLOG@E     
0          log of system reloads.  Same as INIT:LOG except does not contain the lists
           of scratch files or user IDs.
0          Referenced by comments of: 97/2 
00098/001  *SQUASH                                   SA           # (OBSOLETE)                                                      
            D2T1    278                                                             UM                                              
0          Obsoleted by *LINKEDIT (297) and *OBJUTIL (721).
00099/001  *IHC                                      M            # (OBSOLETE)                                                      
            D3T1    225  IHC..M.                            1 LINE     68    1 PAGE UM                       JULY 30, 1973  23:46.44
00100/001  *FILEDUMP                                 SA  G          S1558 5.0T1 VLO FSNAME=FILEDUMP..SA.001(1)                   268
            5.0T1   268  FILEDUMP..SA.001                   1 LINE     80    8 PAGE UM   PIRKOLA             JULY 27, 1977  22:03:25
            5.0T1   268                       
0          Use *TAPEDUMP instead.
00100/002  *FILEDUMP                                 OC  G          *FILEDUMP                                                       
            5.0T1   269  FILEDUMP..OC.002                   1 LINE     80    3 PAGE UM   PIRKOLA             JULY 03, 1981  12:37:04
            5.0T1   269  *FILEDUMP            
1                                                                                               SUN SEP 08/96   15:24:55   Page   51
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00101/001A  MOUNT COMMAND                            SA  G          TAPE:MOUNT.S                                                    
            5.1T1    79  MOUNT_COMMAND..SA.001              1 LINE    133   68 PAGE UM   SHERRY              JULY 23, 1983  10:10:37
0          This is new MOUNT CLS/subroutine which is based on the UBC rewrite of the UM
           version, by Ken Bowler. The comments on the source file document the
           differences between the two versions. this version of mount requires several
           changes to MTS, viz.,
            
              1) the internal tables addresses RSVNMTBA and FYTPTBLA in MTS must
                 be made available to mount through LCSYMBOL
              2) MSGCC is required
              3) the CLS transfer vector routine PKEY is required to push, set, and
                 pop program keys
              4) a port in the GATE for the MOUNT subroutine is required
              5) HALTIO entry is needed for the OPERATOR DSR.
            
           This version of the MOUNT subroutine supports the extended calling sequence
           described in MTS Volume 3 (501).
            
           Supports magnetic tapes, 2671 paper tape reader, paper tape punches on the UM
           Data Concentrator, 7772 audio response unit, floppy disks, and the Merit the
           maximum number of devices of each type (if zero, the code and tables to
           support that type are deleted). Another assembly parameter specifies the rack
           number for scratch tapes (distributed as 'POOL'). Other parameters specify
           the default density for scratch tapes (distributed as 8en for 7-track and
           1600 for 9-track). Another parameter specifies whether the tape ID is
           required (as distributed, it is). Another parameter specifies the supervisor
           lock number, if any, to be used for interlocking the operator communication,
           i.e. to prevent multiple mount requests from being presented to the operator
           simultaneously. This is distributed as zero, i.e. no interlocking). MOUNT
           calls the MNTSTAT subroutine (447/1) to record a MOUNT statistics record for
           every mount request. It also calls CUINFO for each mount done by the operator
           to increment the mount count (for billing). MOUNT will refuse any mount
           requiring operator intervention if the system is in unattended mode or if NTM
           is ON (batch jobs are rerun). Interfaces with the TAPESHARE check subroutine
           (1067/5).
            
           Copies COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), COPY:JOBSTA
           (413/9), COPY:LLMPSEQU (087), *GDINFODSECT (594), *CNFGINFODSECT (654),
           *SENSEDSECT (3025), and COPY:MNTGINFDSECT (806/3). Assemble using
           COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4), and *SYSMAC with
           PAR=PEXIT=*PEXIT.
            
           ********************************************************************************
           D5.0A version:
            
           A couple of bugs fixed.
           ********************************************************************************
            
           ********************************************************************************
           D5.0B version:
            
             -  Some changes to Merit support.
             -  Changes to call CSSET to set the CLS command status.
1                                                                                               SUN SEP 08/96   15:24:55   Page   52
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0            -  Some bug fixes.
           ********************************************************************************
            
           *****************************************************************************
           D5.1 version:
            
           CSSET call changed, bug in VOLUME command fixed, minor Merit change.
           *****************************************************************************
0          Referenced by comments of: 101/2, 271/1, 447/1, 806/1, 806/3, 1067/5 
00101/002A  MOUNT COMMAND                            OC  G          *CLSMOUNT                                                       
            5.1T1    80  MOUNT_COMMAND..OC.002              1 LINE  27126   34 PAGE UM   SHERRY              JULY 23, 1983  10:10:41
                         *CLSMOUNT            
0          Object for the MOUNT command CLS (101/1), the MNTSTAT subroutine (447/1),
           the MSGRACK# message (101/3) and the Tapeshare CHECK subroutine (1067/5).
           This file is loaded into shared VM after IPL by PISTLE.
0          Referenced by comments of: 447/2, 1067/6 
00101/003   MOUNT COMMAND            MSG RACK #      SA  G          TAPE:MSGRACK#.S                                                 
            5.0T1   272  MOUNT_COMMAND.MSG_RACK_#.SA.003    1 LINE     66    1 PAGE UM   SHERRY              JULY 03, 1981  12:37:22
            5.0T1   272                       
0          This subcomponent is just a MSG routine (1023) message that is printed by the
           MOUNT CLS whenever certain rack numbers are mounted.  The TAPESHARE routine
           CHECK (1067/5) gives a special return code to mount whenever certain rack
           numbers are referenced (they have a special field in their directory entries).
           This mechanism can be disabled by removing the object for MSGRACK# from *CLSMOUNT.
0          Referenced by comments of: 101/2 
00101/004   MOUNT COMMAND            *MOUNTSUB       OC  G          *MOUNTSUB                                                       
            5.0T1   274  MOUNT_COMMAND.*MOUNTSUB.OC.005     1 LINE     25    1 PAGE UM   MTS       SHERRY    JULY 03, 1981  12:37:24
            5.0T1   274  *MOUNTSUB            
0          This file contains an ENT card for the symbol "MOUNTSUB" followed by a 
           "$CONTINUE WITH *CLSMOUNT" card.  It is used as the file name in the
           LOADT table in MTS, and is loaded from if the MOUNTSUB subroutine is not
           defined in LCSYMBOL.
00101/005   MOUNT COMMAND            *MOUNT                       # (OBSOLETED BY $MOUNT)                                           
            D3T1    230  MOUNT.*MOUNT.OC.3                  1 LINE     24    1 PAGE UM                       JULY 30, 1973  23:47.04
00102/001  *DISMOUNT                                              # (OBSOLETED BY $RELEASE)                                         
            D3T1    232  DISMOUNT.*DISMOUNT.OC.3            1 LINE     24    1 PAGE UM                       JULY 30, 1973  23:47.08
00104/001A  ACCOUNTING               ACCFORMAT       SA  G  AFMT    S0027 DISTRB FSNAME=ACCFORMAT                                   
            5.1T1    81  ACCOUNTING.ACCFORMAT.SA.001        1 SEQ      80    3 PAGE UM   ENGLE               NOV. 23, 1982  16:41:42
0          COMPONENT (104) CONTAINS THE SOURCE AND OBJECT FOR THE MTS ACCOUNTING
           ROUTINES. THE FOLLOWING PROGRAMS CAN BE CONSTRUCTED BY COMBINING THE OBJECT
           FILES AS INDICATED BELOW:
1                                                                                               SUN SEP 08/96   15:24:55   Page   53
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                    *ACCRESTORE              ASTR+AFLU+AIO+GTFL+ACAT+FLRT+CSIG+TV+DEFS
                     *STATUS                  STAT+TZXP+TZON+TV+SYSDEFS
                     ACC:ACCDISPLAY           ADSP+ACCLIB
                     ACC:ACCERRORSCAN         ACNS+ACCLIB
                     ACC:ACCFILCHARGE         ADSP+AFLC+ACCLIB
                     ACC:ACCHEXDISP           ADSP+AXPR+ACCLIB
                     ACC:ACCLISTING           ALST+ACCLIB
                     ACC:ACCMAINT             AMAT+ACCLIB
                     ACC:ACCPASWD             APSW+GTFL+AIO+TZON+FLNM+TV
                     ACC:ACCRETRIEVE          ARTV+ATRD+ACCLIB
                     ACC:ACCSAVE              ASAV+ACCLIB
                     ACC:DIRDISPLAY           DDSP+ACCLIB
                     ACC:DIRLIST              DLST+ACCLIB
                     ACC:GETFILECHG           FLUP+TZXP+AIO+TZON+FLRT+TTRP+GTFL+TV+
                                              SYSDEFS
                     ACC:PROJECTDISP          APDS+ACCLIB
                     ACC:PROJECTIDS           APID+ACCLIB
                     ACC:PROJECTLIST          APLS+ACCLIB
                     ACC:PROJECTMAINT         APMT+ACCLIB
                     ACC:DISPROJECT           AMXM(&STAPRJ=1)+ACCLIB
                     ACCUPDAT                 ARDW+PRINT+AIO+TTRP+GTFL+OLDPRINT+
                                              ACCPRINT+TZON+TV+LCNT+ACCUPDAT
                     INIT:INIT(1,999)         AINT
                     INIT:INIT(1000)          AINS+GTFL+FLNM+AFLU+OFLD+ACAT+AIO+TV+
                                              FLRT+CSIG+SYSDEFS
                     ACC:ACCLIB               ACAT+ACNV+AERR+AFIN+AFKF+AFLA+AFLU+AIO+
                                              AIOI+ALPR+ALST+APLS+APPR+APRT+AUPR+CSIG+
                                              DIR+DPRT+FIOC+FLNM+FLRT+FLSH+GPID+GTFL+
                                              IOLC+LCNT+LOG+OFLD+RBTA+SCNV+STRD+TMCL+
                                              TTRP+TV+TZON+TZXP+SYSDEFS
                                              (SEE ACCOUNTING CLS FOR FIOC (631/14) AND
                                              AUPR (631/13); BILLING FOR SCNV (500/61);
                                              REBATE FOR RBTA (632/6) AND TIMEZONE FOR
                                              TZON (834/3) AND TZXP (834/6).
            
           ACCFORMAT (104/1) IS THE COPY SECTION THAT DESCRIBES THE ACCOUNTING FILE
           RECORD FORMAT. IT IS COPIED UNDER THE NAME "ACCFORMAT" BY COMPONENTS OF THE
           ACCOUNTING SYSTEM.
            
           *** NOTE: ACCOUNTING PROGRAMS HAVE A GBLB SYMBOL (&DC) TO ELIMINATE THE
                     ASSEMBLY OF INSTRUCTIONS FOR THE DATA CELL. IF THE VALUE OF &DC IS
                     0, THE INSTRUCTIONS WILL NOT BE ASSEMBLED. IF THE VALUE IS 1, THE
                     INSTRUCTIONS WILL BE ASSEMBLED. ALL DISTRIBUTION PROGRAMS HAVE THE
                     VALUE SET TO 0, AND THE RESULTS OF SETTING &DC TO 1 ARE NOT
                     GUARANTEED.
            
           ***************************************************************************
           D5.0C version:
            
           ACCFORMAT has been changed to full word fields for maximum and current file
           space.  Previously distributed programs will not assemble correctly with
           this version if they reference these fields.
           ***************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page   54
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 104/1, 104/5, 104/8, 104/11, 104/13, 104/15, 104/18, 104/24, 104/30, 104/36, 104/57,
                 104/61, 104/73, 104/92, 104/95, 104/101, 104/104, 104/108, 104/111, 104/116, 104/121, 502/1, 586/1, 631/8,
                 631/11, 632/4 
00104/002A  ACCOUNTING               ACCFORMAT       UC  G          S0027 DISTRB FSNAME=ACCFORMATUPD                                
            5.1T1    82  ACCOUNTING.ACCFORMAT.UC.002        1 LINE     72    2 PAGE UM   ENGLE               NOV. 23, 1982  16:41:49
0          Updates source from previous regular distribution to current
           distribution.
00104/003   ACCOUNTING               ACCPROJFMT      SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCPROJFMT.SA.002(1)       276
            5.0T1   276  ACCOUNTING.ACCPROJFMT.SA.002       1 LINE     80    1 PAGE UM   ENGLE               JAN. 25, 1979  16:25:29
            5.0T1   276                       
0          COPIED UNDER THE NAME "ACCPROJFMT" TO GIVE THE FORMAT OF THE PROJECT FILE *PROJECT.
0          Referenced by comments of: 104/24, 104/48, 104/61, 104/158, 500/37, 500/41, 631/8 
00104/004   ACCOUNTING               ACCPROJFMT      UC  G        # S0027 DISTRB FSNAME=ACCPROJFMT                                  
            D4.2T1   51  ACCOUNTING.ACCPROJFMT.UC.003       1 LINE     67    1 PAGE UM   ENGLE               JAN. 25, 1979  16:25:32
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/005A  ACCOUNTING               ACCERROR        SA  G  AERR    S0027 DISTRB FSNAME=ACCERROR                                    
            5.1T1    83  ACCOUNTING.ACCERROR.SA.005         1 LINE     80    8 PAGE UM   ENGLE               MAY  23, 1983  14:51:04
0          CHECKS ACCOUNTING RECORD FOR ERRORS (SUCH AS NEGATIVE NUMBERS). PART OF ACCERRORSCAN (104/64).
           COPIES ACCFORMAT (104/1).
00104/006C  ACCOUNTING               ACCERROR        UC  G          S0027 DISTRB FSNAME=ACCERRORUPD                                 
            5.1T1    84  ACCOUNTING.ACCERROR.UC.006         1 LINE     72    3 PAGE UM   ENGLE               MAY  23, 1983  14:51:07
0          Updates source from previous regular distribution to current one. 
00104/007A  ACCOUNTING               ACCERROR        OC  G          S0027 DISTRB FSNAME=AERR                                        
            5.1T1    85  ACCOUNTING.ACCERROR.OC.007         1 LINE     80    3 PAGE UM   ENGLE               MAY  23, 1983  14:51:11
00104/008A  ACCOUNTING               ACCPRINT        SA  G  APRT    S0027 DISTRB FSNAME=ACCPRINT                                    
            5.1T1    86  ACCOUNTING.ACCPRINT.SA.008         1 LINE     80   11 PAGE UM   ENGLE               NOV. 23, 1982  16:20:40
0          FORMATS AN ACCOUNTING RECORD FOR PRINTING. SUBROUTINE USED BY SEVERAL PROGRAMS.
           COPIES ACCFORMAT (104/1).
0          Referenced by comments of: 104/150 
00104/009A  ACCOUNTING               ACCPRINT        UC  G          S0027 DISTRB FSNAME=ACCPRINTUPD                                 
            5.1T1    87  ACCOUNTING.ACCPRINT.UC.009         1 LINE     72    5 PAGE UM   ENGLE               NOV. 23, 1982  16:20:44
0          Updates source from previous regular distribution to current one.
00104/010A  ACCOUNTING               ACCPRINT        OC  G          S0027 DISTRB FSNAME=APRT                                        
            5.1T1    88  ACCOUNTING.ACCPRINT.OC.010         1 LINE     80    6 PAGE UM   ENGLE               NOV. 23, 1982  16:20:47
1                                                                                               SUN SEP 08/96   15:24:55   Page   55
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/011A  ACCOUNTING               ACCLIST         SA  G  ALST    S0027 DISTRB FSNAME=ACCLIST                                     
            5.1T1    89  ACCOUNTING.ACCLIST.SA.011          1 LINE     80    4 PAGE UM   ENGLE               AUG. 20, 1982  16:43:36
0          READS THE ACCOUNTING FILE AND CALLS ACCLSTPR FOR EACH RECORD.
           COPIES ACCFORMAT (104/1).
00104/012C  ACCOUNTING               ACCLIST         UC  G          S0027 DISTRB FSNAME=ACCLISTUPD                                  
            5.1T1    90  ACCOUNTING.ACCLIST.UC.012          1 LINE     72    1 PAGE UM   ENGLE               AUG. 20, 1982  16:43:38
0          Updates source from previous regular distribution to current distribution.
00104/013A  ACCOUNTING               ACCLIST         OC  G          S0027 DISTRB FSNAME=ALST                                        
            5.1T1    91  ACCOUNTING.ACCLIST.OC.013          1 LINE     80    2 PAGE UM   ENGLE               AUG. 20, 1982  16:43:42
0          Copies ACCFORMAT (104/1).
00104/014A  ACCOUNTING               ACCLIST         OC  G          ACC:ACCLISTING                                                  
            5.1T1    92  ACCOUNTING.ACCLIST.OC.014          1 LINE    224    1 PAGE UM   ENGLE               JULY 23, 1983  10:11:31
                         ACC:ACCLISTING       
0          Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record.
00104/015   ACCOUNTING               ACCINITL        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCINITL.SA.012(1)         283
            5.0T1   283  ACCOUNTING.ACCINITL.SA.012         1 LINE     80    6 PAGE UM   ENGLE               AUG. 13, 1980  10:36:53
            5.0T1   283                       
0          RESTORES LOCK BITS AND FILE SPACE FIELDS FOR ALL RECORDS WITH CURRENT NUMBER OF SIGNONS > 0.
           COPIES ACCFORMAT (104/1).
00104/016   ACCOUNTING               ACCINITL        UC  G        # S0027 DISTRB FSNAME=ACCINITLUPD                                 
            5.0T1   284  ACCOUNTING.ACCINITL.UC.013         1 LINE     72    3 PAGE UM   ENGLE               AUG. 13, 1980  10:37:01
            5.0T1   284                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/017   ACCOUNTING               ACCINITL        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCINITL.OC.014(1)         285
            5.0T1   285  ACCOUNTING.ACCINITL.OC.014         1 LINE     80    2 PAGE UM   ENGLE               AUG. 13, 1980  10:37:08
            5.0T1   285                       
00104/018A  ACCOUNTING               STATUS          SA  G  STAT    S0027 DISTRB FSNAME=STATUS                                      
            5.1T1    93  ACCOUNTING.STATUS.SA.018           1 LINE     80   27 PAGE UM   ENGLE               AUG. 20, 1982  16:48:48
0          MAIN PROGRAM FOR *STATUS (129/2). COPIES ACCFORMAT (104/1). THIS
           PROGRAM HAS A GLOBAL SYMBOL &CLS. IF &CLS IS 0, THE OBJECT FOR *STATUS
           IS PRODUCED. IF &CLS IS 1, A SUBROUTINE TO BE CALLED BY THE ACCOUNTING
           CLS IS PRODUCED. THIS LATTER ASSEMBLY USES COPY:MTS.MACROS (344/3).
0          Referenced by comments of: 129/1, 129/2 
00104/019A  ACCOUNTING               STATUS          UC  G          S0027 DISTRB FSNAME=STATUSUPD                                   
            5.1T1    94  ACCOUNTING.STATUS.UC.019           1 LINE     72    3 PAGE UM   ENGLE               AUG. 20, 1982  16:49:01
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
1                                                                                               SUN SEP 08/96   15:24:55   Page   56
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/020A  ACCOUNTING               STATUS          OC  G          S0027 DISTRB FSNAME=STAT                                        
            5.1T1    95  ACCOUNTING.STATUS.OC.020           1 LINE     80    6 PAGE UM   ENGLE               AUG. 20, 1982  16:49:04
0          OBJECT FOR *STATUS (129/2).
00104/021A  ACCOUNTING               STATUS          OC  G          S0027 DISTRB FSNAME=STATCLS                                     
            5.1T1    96  ACCOUNTING.STATUS.OC.021           1 LINE     80    7 PAGE UM   ENGLE               AUG. 20, 1982  16:49:10
0          OBJECT FOR ACCOUNTING CLS SUBROUTINE.
0          Referenced by comments of: 631/22, 631/24 
00104/022   ACCOUNTING               FILERATE        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.FILERATE.SA.019(1)         290
            5.0T1   290  ACCOUNTING.FILERATE.SA.019         1 LINE     80    3 PAGE UM   ENGLE               DEC. 05, 1975  10:10:41
            5.0T1   290                       
0          SUBROUTINE TO RETURN A CURRENT RATE NUMBER AND THE FILE RATES FOR A SIGNON ID.
           COPIES GRDEF (104/83) AND COPY:RATEVEC (651/3).
0          Referenced by comments of: 484/1 
00104/023A  ACCOUNTING               FILERATE        OC  G          S0027 DISTRB FSNAME=FLRT                                        
            5.1T1    97  ACCOUNTING.FILERATE.OC.023         1 LINE     80    1 PAGE UM   ENGLE               AUG. 20, 1982  17:03:48
0          ***********************************************************************
           D5.0B version:
            
           Reassembled for new accounting record format.
           ***********************************************************************
00104/024A  ACCOUNTING               ACCMAINT        SA  G  AMAT    S0027 DISTRB FSNAME=ACCMAINT                                    
            5.1T1    98  ACCOUNTING.ACCMAINT.SA.024         1 LINE     80   63 PAGE UM   ENGLE               MAY  23, 1983  14:50:48
0          Main program for ACCMAINT. Run with PROT=OFF. Copies ACCFORMAT (104/1) and
           ACCPROJFMT (104/3). The external symbol ACCLOGFL contains the name of a file
           (ACC:ACCLOG) into which a log is written.
0          Referenced by comments of: 104/150 
00104/025A  ACCOUNTING               ACCMAINT        UC  G          S0027 DISTRB FSNAME=ACCMAINTUPD                                 
            5.1T1    99  ACCOUNTING.ACCMAINT.UC.025         1 LINE     72   10 PAGE UM   ENGLE               MAY  23, 1983  14:50:56
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/026A  ACCOUNTING               ACCMAINT        OC  G          S0027 DISTRB FSNAME=AMAT                                        
            5.1T1   100  ACCOUNTING.ACCMAINT.OC.026         1 LINE     80   11 PAGE UM   ENGLE               MAY  23, 1983  14:51:00
00104/027A  ACCOUNTING               ACCMAINT        OE  G          ACC:ACCMAINT                                                    
            5.1T1   101  ACCOUNTING.ACCMAINT.OE.027         1 LINE   5618    5 PAGE UM   ENGLE               JULY 23, 1983  10:12:19
                         ACC:ACCMAINT         
0          Contains a $CONTINUE WITH ACC:ACCLIB record.
1                                                                                               SUN SEP 08/96   15:24:55   Page   57
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/028   ACCOUNTING               ACCIO           SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCIO.SA.025(1)            295
            5.0T1   295  ACCOUNTING.ACCIO.SA.025            1 LINE     80   15 PAGE UM   ENGLE               JUNE 04, 1976  14:22:22
            5.0T1   295                       
0          GENERAL I/O SUBROUTINES FOR THE ACCOUNTING FILE(S).
0          Referenced by comments of: 104/47, 484/1 
00104/029   ACCOUNTING               ACCIO           OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCIO.OC.026(1)            296
            5.0T1   296  ACCOUNTING.ACCIO.OC.026            1 LINE     80    3 PAGE UM   ENGLE               JUNE 04, 1976  14:22:35
            5.0T1   296                       
0          THERE ARE REP CARDS IN THIS FILE TO CHANGE FILE NAMES TO PUBLIC FILES.
0          Referenced by comments of: 104/118, 104/119, 104/120, 631/22, 631/24 
00104/030   ACCOUNTING               ACCGFUPD        SA  G        # S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCGFUPD.SA.027(1)         297
            5.0T1   297  ACCOUNTING.ACCGFUPD.SA.027         1 LINE     72    1 PAGE UM   ENGLE               MAR. 21, 1975  01:02:18
            5.0T1   297                       
0          PROGRAM TO UPDATE FILE STORAGE FIELDS FOR ALL USERIDS. RUN WITH ACCRDWRT
           (104/39). COPIES ACCFORMAT (104/1).
0          Referenced by comments of: 104/39 
00104/031   ACCOUNTING               ACCGFUPD        OC  G        # W013:ACCGFUPD(1,98)                                          299
            5.0T1   298  ACCOUNTING.ACCGFUPD.OC.028         1 LINE     80    1 PAGE UM   ENGLE               JULY 03, 1981  12:41:21
            5.0T1   298                       
0          Referenced by comments of: 682/38 
00104/032A  ACCOUNTING               ACCDSPLA        SA  G  ADSP    S0027 DISTRB FSNAME=ACCDSPLA                                    
            5.1T1   102  ACCOUNTING.ACCDSPLA.SA.032         1 LINE     80    4 PAGE UM   ENGLE               AUG. 20, 1982  17:19:45
0          PROGRAM TO READ A SPECIFIC RECORD OF THE ACCOUNTING FILE AND CALL ACCPRINT FOR IT.
00104/033C  ACCOUNTING               ACCDSPLA        UC  G          S0027 DISTRB FSNAME=ACCDSPLAUPD                                 
            5.1T1   103  ACCOUNTING.ACCDSPLA.UC.033         1 LINE     72    1 PAGE UM   ENGLE               AUG. 20, 1982  17:19:49
0          Updates source from previous regular distribution to current one.
00104/034A  ACCOUNTING               ACCDSPLA        OC  G          S0027 DISTRB FSNAME=ADSP                                        
            5.1T1   104  ACCOUNTING.ACCDSPLA.OC.034         1 LINE     80    2 PAGE UM   ENGLE               AUG. 20, 1982  17:19:53
00104/035A  ACCOUNTING               ACCDSPLA        OC  G          ACC:ACCDISPLAY                                                  
            5.1T1   105  ACCOUNTING.ACCDSPLA.OC.035         1 LINE    216    1 PAGE UM   ENGLE               JULY 23, 1983  10:12:39
                         ACC:ACCDISPLAY       
00104/036A  ACCOUNTING               ACCSTRUP        SA  G  ASTR    S0027 DISTRB FSNAME=ACCSTRUP                                    
            5.1T1   106  ACCOUNTING.ACCSTRUP.SA.036         1 LINE     80    6 PAGE UM   ENGLE               AUG. 23, 1982  11:36:59
0          MAIN PROGRAM OF *ACCRESTORE - THE PROGRAM THAT *FIX RUNS.  RUN WITH PROT=OFF.
           COPIES ACCFORMAT (104/1).
1                                                                                               SUN SEP 08/96   15:24:55   Page   58
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 484/1 
00104/037C  ACCOUNTING               ACCSTRUP        UC  G          S0027 DISTRB FSNAME=ACCSTRUPUPD                                 
            5.1T1   107  ACCOUNTING.ACCSTRUP.UC.037         1 LINE     72    2 PAGE UM   ENGLE               AUG. 23, 1982  11:37:04
0          Updates source from previous regular distribution to current one.
00104/038A  ACCOUNTING               ACCSTRUP        OC  G          S0027 DISTRB FSNAME=ASTR                                        
            5.1T1   108  ACCOUNTING.ACCSTRUP.OC.038         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  11:37:12
00104/039   ACCOUNTING               ACCRDWRT        SA  G        # S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCRDWRT.SA.034(1)         303
            5.0T1   303  ACCOUNTING.ACCRDWRT.SA.034         1 LINE     80    6 PAGE UM   ENGLE               OCT. 05, 1972  12:20.15
            5.0T1   303                       
0          PROGRAM TO PERFORM GENERAL REFORMATTING OPERATION ON THE ACCOUNTING FILE. IT CALLS A USER PROVIDED
           SUBROUTINE CALLED ACCUPDAT TO DO THE ACTUAL REFORMATTING. ACCGFUPD (104/30) IS AN EXAMPLE OF SUCH A SUBROUTINE. THE
           COMMENTS AT THE FRONT OF THIS SUBCOMPONENT GIVE MORE INFORMATION.
0          Referenced by comments of: 104/30 
00104/040   ACCOUNTING               ACCRDWRT        OC  G        # S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCRDWRT.OC.035(1)         304
            5.0T1   304  ACCOUNTING.ACCRDWRT.OC.035         1 LINE     80    2 DISK UM   ENGLE               OCT. 05, 1972  12:20.35
            5.0T1   304                       
0          Referenced by comments of: 682/38 
00104/041A  ACCOUNTING               PRJCONVERT      SG  G          S0027 DISTRB FSNAME=PRJCONVERT                                  
            5.1T1   109  ACCOUNTING.PRJCONVERT.SG.041       1 LINE     61    1 PAGE UM   ENGLE               AUG. 23, 1982  11:49:41
0          Converts a Distribution 5.0 project file to Distribution 5.1 ... by
           converting expiration times to GMT. Old project file is read by SCARDS; new
           project file is on SPUNCH. Listing of new project file is on SPRINT.
0          Referenced by comments of: 632/3 
00104/042A  ACCOUNTING               PRJCONVERT      OC  G          S0027 DISTRB FSNAME=PCNV                                        
            5.1T1   110  ACCOUNTING.PRJCONVERT.OC.042       1 LINE     80    1 PAGE UM   ENGLE               AUG. 23, 1982  11:50:07
00104/043A  ACCOUNTING               ACCPRJMT        SA  G  APMT    S0027 DISTRB FSNAME=ACCPRJMT                                    
            5.1T1   111  ACCOUNTING.ACCPRJMT.SA.043         1 LINE     80   30 PAGE UM   ENGLE               MAY  25, 1983  14:36:42
0          MAIN PROGRAM FOR PROJECTMAINT - THE PROGRAM THAT MAINTAINS *PROJECT.  RUN WITH PROT=OFF.
           THE EXTERNAL SYMBOL ACCLOGFL CONTAINS THE NAME OF A FILE (ACC:ACCLOG) INTO
           WHICH A LOG IS WRITTEN.
0          Referenced by comments of: 104/150 
00104/044A  ACCOUNTING               ACCPRJMT        UC  G          S0027 DISTRB FSNAME=ACCPRJMTUPD                                 
            5.1T1   112  ACCOUNTING.ACCPRJMT.UC.044         1 LINE     72    4 PAGE UM   ENGLE               MAY  25, 1983  14:36:52
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
1                                                                                               SUN SEP 08/96   15:24:55   Page   59
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/045A  ACCOUNTING               ACCPRJMT        OC  G          S0027 DISTRB FSNAME=APMT                                        
            5.1T1   113  ACCOUNTING.ACCPRJMT.OC.045         1 LINE     80    5 PAGE UM   ENGLE               MAY  25, 1983  14:36:57
00104/046A  ACCOUNTING               ACCPRJMT        OE  G          ACC:PROJECTMAINT                                                
            5.1T1   114  ACCOUNTING.ACCPRJMT.OE.046         1 LINE   3616    3 PAGE UM   ENGLE               JULY 23, 1983  10:13:24
                         ACC:PROJECTMAINT     
0          Contains a $CONTINUE WITH ACC:ACCLIB record.
00104/047A  ACCOUNTING               ACCLIB          OL  G          ACC:ACCLIB                                                      
            5.1T1   115  ACCOUNTING.ACCLIB.OL.047           1 LINE    972   29 PAGE UM   ENGLE               JULY 23, 1983  10:13:24
                         ACC:ACCLIB           
0          THERE ARE REP CARDS IN THIS LIBRARY TO CHANGE FILE NAMES IN ACCIO (104/28) TO PUBLIC FILES.
           THIS FILE MUST BE PERMITTED AS FOLLOWS:  R PKEY=FILEINFO.
0          Referenced by comments of: 104/14, 104/107, 104/124, 104/155, 326/6, 632/4, 682/38 
00104/048A  ACCOUNTING               PRJPRINT        SA  G  APPR    S0027 DISTRB FSNAME=PRJPRINT                                    
            5.1T1   116  ACCOUNTING.PRJPRINT.SA.048         1 LINE     80   10 PAGE UM   ENGLE               AUG. 23, 1982  12:26:12
0          SUBROUTINE TO PRINT A RECORD FROM *PROJECT.
           COPIES ACCPROJFMT (104/3).
0          Referenced by comments of: 104/150 
00104/049C  ACCOUNTING               PRJPRINT        UC  G          S0027 DISTRB FSNAME=PRJPRINTUPD                                 
            5.1T1   117  ACCOUNTING.PRJPRINT.UC.049         1 LINE     72    3 PAGE UM   ENGLE               AUG. 23, 1982  12:26:26
0          Updates source from previous regular distribution to current one.
00104/050A  ACCOUNTING               PRJPRINT        OC  G          S0027 DISTRB FSNAME=APPR                                        
            5.1T1   118  ACCOUNTING.PRJPRINT.OC.050         1 LINE     80    4 PAGE UM   ENGLE               AUG. 23, 1982  12:26:32
00104/051   ACCOUNTING               PRJLIST         SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJLIST.SA.045(1)          313
            5.0T1   313  ACCOUNTING.PRJLIST.SA.045          1 LINE     80    4 PAGE UM   ENGLE               OCT. 05, 1972  15:13.34
            5.0T1   313                       
0          PROGRAM TO READ EACH RECORD FROM *PROJECT AND CALL PRJPRINT FOR IT.
0          Referenced by comments of: 500/41 
00104/052   ACCOUNTING               PRJLIST         OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJLIST.OC.046(1)          314
            5.0T1   314  ACCOUNTING.PRJLIST.OC.046          1 LINE     80    1 DISK UM   ENGLE               OCT. 05, 1972  15:13.55
            5.0T1   314                       
00104/053   ACCOUNTING               PRJLIST         OC  G          ACC:PROJECTLIST                                                 
                                                                                    UM   ENGLE                                      
                         ACC:PROJECTLIST      
1                                                                                               SUN SEP 08/96   15:24:55   Page   60
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/054   ACCOUNTING               PRJDSPLA        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJDSPLA.SA.048(1)         315
            5.0T1   315  ACCOUNTING.PRJDSPLA.SA.048         1 LINE     80    4 PAGE UM   ENGLE               OCT. 05, 1972  15:17.03
            5.0T1   315                       
0          PROGRAM TO READ A SPECIFIC RECORD FROM *PROJECT AND CALL PRJPRINT FOR IT.
00104/055   ACCOUNTING               PRJDSPLA        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJDSPLA.OC.049(1)         316
            5.0T1   316  ACCOUNTING.PRJDSPLA.OC.049         1 LINE     80    1 DISK UM   ENGLE               OCT. 05, 1972  15:17.49
            5.0T1   316                       
00104/056   ACCOUNTING               PRJDSPLA        OC  G          ACC:PROJECTDISP                                                 
                                                                                    UM   ENGLE                                      
                         ACC:PROJECTDISP      
00104/057A  ACCOUNTING               ACCPASWD        SA  G  APSW    S0027 DISTRB FSNAME=ACCPASWD                                    
            5.1T1   119  ACCOUNTING.ACCPASWD.SA.057         1 LINE     80    6 PAGE UM   ENGLE               AUG. 23, 1982  12:46:18
0          PROGRAM TO GENERATE A RANDOM PASSWORD FOR AN ACCOUNTING RECORD AND PRINT THE NEW PASSWORD PLUS
           THE DATE AND TIME THE PASSWORD WAS PREVIOUSLY SET.  THIS PROGRAM WRITES AN AUDIT
           TRAIL IN THE FILE *PWSTAT, WHICH MUST EXIST AS A LINE FILE WITH AT LEAST ONE LINE
           (WHICH MAY BE ANYTHING).  RUN WITH PROT=OFF.  COPIES ACCFORMAT (104/1).
0          Referenced by comments of: 104/187, 104/188, 104/195 
00104/058C  ACCOUNTING               ACCPASWD        UC  G          S0027 DISTRB FSNAME=ACCPASWDUPD                                 
            5.1T1   120  ACCOUNTING.ACCPASWD.UC.058         1 LINE     72    1 PAGE UM   ENGLE               AUG. 23, 1982  12:46:24
0          Updates source from previous regular distribution to current one.
00104/059A  ACCOUNTING               ACCPASWD        OC  G          S0027 DISTRB FSNAME=APSW                                        
            5.1T1   121  ACCOUNTING.ACCPASWD.OC.059         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  14:53:46
00104/060A  ACCOUNTING               ACCPASWD        OE  G          WPSW:PROGRAM1                                                   
            5.1T1   122  ACCOUNTING.ACCPASWD.OE.060         1 SEQ    3980    2 PAGE UM   ENGLE               JULY 23, 1983  10:13:48
                         WPSW:PROGRAM1        
00104/061A  ACCOUNTING               ACONSIST        SA  G  ACNS    S0027 DISTRB FSNAME=ACONSIST                                    
            5.1T1   123  ACCOUNTING.ACONSIST.SA.061         1 LINE     80   14 PAGE UM   ENGLE               AUG. 23, 1982  12:49:13
0          MAIN PROGRAM FOR ACCERRORSCAN.  RUN WITH PROT=OFF.
           COPIES ACCFORMAT (104/1) AND ACCPROJFMT (104/3).
0          Referenced by comments of: 104/150 
00104/062A  ACCOUNTING               ACONSIST        UC  G          S0027 DISTRB FSNAME=ACONSISTUPD                                 
            5.1T1   124  ACCOUNTING.ACONSIST.UC.062         1 LINE     69    1 PAGE UM   ENGLE               AUG. 23, 1982  12:49:19
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/063A  ACCOUNTING               ACONSIST        OC  G          S0027 DISTRB FSNAME=ACNS                                        
            5.1T1   125  ACCOUNTING.ACONSIST.OC.063         1 LINE     80    4 PAGE UM   ENGLE               AUG. 23, 1982  12:49:23
1                                                                                               SUN SEP 08/96   15:24:55   Page   61
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/064A  ACCOUNTING               ACONSIST        OC  G          ACC:ACCERRORSCAN                                                
            5.1T1   126  ACCOUNTING.ACONSIST.OC.064         1 LINE   1592    3 PAGE UM   ENGLE               JULY 23, 1983  10:13:49
                         ACC:ACCERRORSCAN     
0          Referenced by comments of: 104/5 
00104/065   ACCOUNTING               FILENAME        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.FILENAME.SA.058(1)         322
            5.0T1   322  ACCOUNTING.FILENAME.SA.058         1 LINE     80    1 PAGE UM   ENGLE               JAN. 25, 1979  16:39:44
            5.0T1   322                       
0          Contains the names of the files *ACCOUNTING, *PWSTAT, *PROJECT,
           *PROJDIRECTORY, and *STATISTICS.
0          Referenced by comments of: 104/166 
00104/066   ACCOUNTING               FILENAME        UC  G        # S0027 DISTRB FSNAME=FILENAMEUPD                                 
            D4.2T1   70  ACCOUNTING.FILENAME.UC.055         1 LINE     39    1 PAGE UM   ENGLE               JAN. 25, 1979  16:39:54
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/067   ACCOUNTING               FILENAME        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.FILENAME.OC.060(1)         323
            5.0T1   323  ACCOUNTING.FILENAME.OC.060         1 SEQ      80    1 PAGE UM   ENGLE               JAN. 25, 1979  16:40:00
            5.0T1   323                       
0          Referenced by comments of: 104/118, 104/119, 104/120, 631/22, 631/24 
00104/068   ACCOUNTING               DIRECTRY        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRECTRY.SA.061(1)         324
            5.0T1   324  ACCOUNTING.DIRECTRY.SA.061         1 LINE     80   17 PAGE UM   ENGLE               JAN. 10, 1979  15:27:14
            5.0T1   324                       
0          I/O SUBROUTINES FOR THE DIRECTORY FILE.  COPIES *CNFGINFODSECT (654).
00104/069   ACCOUNTING               DIRECTRY        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRECTRY.OC.062(1)         325
            5.0T1   325  ACCOUNTING.DIRECTRY.OC.062         1 LINE     80    4 PAGE UM   ENGLE               JAN. 10, 1979  15:27:27
            5.0T1   325                       
0          Referenced by comments of: 631/22, 631/24 
00104/070   ACCOUNTING               DIRLIST         SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRLIST.SA.063(1)          326
            5.0T1   326  ACCOUNTING.DIRLIST.SA.063          1 LINE     80    4 PAGE UM   ENGLE               DEC. 06, 1974  11:36.26
            5.0T1   326                       
0          MAIN PROGRAM FOR DIRLIST - LIST THE PROJECT DIRECTORY.
00104/071   ACCOUNTING               DIRLIST         OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRLIST.OC.064(1)          327
            5.0T1   327  ACCOUNTING.DIRLIST.OC.064          1 LINE     80    2 PAGE UM   ENGLE               DEC. 06, 1974  11:36.55
            5.0T1   327                       
00104/072   ACCOUNTING               DIRLIST         OC  G          ACC:DIRLIST                                                     
                                                                                    UM   ENGLE                                      
                         ACC:DIRLIST          
1                                                                                               SUN SEP 08/96   15:24:55   Page   62
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/073A  ACCOUNTING               FILUPDAT        SA  G  FLUP    S0027 DISTRB FSNAME=FILUPDAT                                    
            5.1T1   127  ACCOUNTING.FILUPDAT.SA.073         1 LINE     80    8 PAGE UM   ENGLE               AUG. 23, 1982  13:03:20
0          PROGRAM TO CHARGE USERS FOR FILE STORAGE FROM LAST SIGNON TO THE END OF THE
           CURRENT MONTH (IF NO PAR= IS GIVEN) OR EXPIRATION TIME.  IF PAR=MM/DD/YY IS
           GIVEN, UPDATE IS TO 24:00:00 OF MM/DD/YY OR EXPIRATION TIME.  IF PAR=
           MM/DD/YY HH:MM:SS IS GIVEN, UPDATE IS TO SPECIFIED TIME OR EXPIRATION TIME.
           PROGRAM UPDATES THE ACCOUNTING RECORD AND WRITES A STATISTICS RECORD FOR BILLING.
           RUN WITH PROT=OFF.  COPIES ACCFORMAT (104/1).
0          Referenced by comments of: 104/187, 104/188 
00104/074C  ACCOUNTING               FILUPDAT        UC  G          S0027 DISTRB FSNAME=FILUPDATUPD                                 
            5.1T1   128  ACCOUNTING.FILUPDAT.UC.074         1 LINE     69    1 PAGE UM   ENGLE               AUG. 23, 1982  13:03:24
0          Updates source from previous regular distribution to current one.
00104/075A  ACCOUNTING               FILUPDAT        OC  G          S0027 DISTRB FSNAME=FLUP                                        
            5.1T1   129  ACCOUNTING.FILUPDAT.OC.075         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  13:04:43
00104/076C  ACCOUNTING               ACCCONVERT      SG  G          S0027 DISTRB FSNAME=ACCCONVERT                                  
            5.1T1   130  ACCOUNTING.ACCCONVERT.SG.076       1 LINE     59    1 PAGE UM   ENGLE               AUG. 23, 1982  13:35:25
0          Converts auxiliary accounting files for previous distributions to current 
           distribution.  Old auxiliary accounting file is read by SCARDS; new auxiliary
           accounting file is on SPUNCH; listing of new auxiliary accounting file is on
           SPRINT.
00104/077C  ACCOUNTING               ACCCONVERT      OC  G          S0027 DISTRB FSNAME=ACCCNV                                      
            5.1T1   131  ACCOUNTING.ACCCONVERT.OC.077       1 LINE     80    1 PAGE UM   ENGLE               AUG. 23, 1982  13:37:06
00104/078A  ACCOUNTING               ACCCNVRT        SA  G  ACNV    S0027 DISTRB FSNAME=ACCCNVRT                                    
            5.1T1   132  ACCOUNTING.ACCCNVRT.SA.078         1 LINE     80    4 PAGE UM   ENGLE               AUG. 23, 1982  13:45:21
0          SUBROUTINE TO CONVERT A PREVIOUS ACCOUNTING RECORD FORMAT TO THE
           CURRENT FORMAT.
00104/079   ACCOUNTING               ACCCNVRT        UC  G        # S0027 DISTRB FSNAME=ACCCNVRTUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current one.
00104/080A  ACCOUNTING               ACCCNVRT        OC  G          S0027 DISTRB FSNAME=ACNV                                        
            5.1T1   133  ACCOUNTING.ACCCNVRT.OC.080         1 LINE     80    1 PAGE UM   ENGLE               AUG. 23, 1982  13:45:51
00104/081A  ACCOUNTING               DISPROJECT      OC  G          S0027 DISTRB FSNAME=DISPROJECT                                  
            5.1T1   134  ACCOUNTING.DISPROJECT.OC.081       1 LINE     80    7 PAGE UM   ENGLE               JUNE 10, 1983  16:27:32
0          Program to print "DISPLAY PROJECT" (as in $ACCOUNTING) for any given project.
           Run with PROT=OFF.  Produced by assembling ACCMXMAT (631/8) with &STAPRJ 
           set to one.
0          Referenced by comments of: 104/82, 631/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page   63
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/082A  ACCOUNTING               DISPROJECT      OE  G          ACC:DISPROJECT                                                  
            5.1T1   135  ACCOUNTING.DISPROJECT.OE.082       1 LINE   2390    3 PAGE UM   ENGLE               JULY 23, 1983  10:14:37
                         ACC:DISPROJECT       
0          LINKEDITED VERSION OF (104/81) +  (631/21) + "$CONTINUE WITH ACC:ACCLIB".
00104/083   ACCOUNTING               GRDEF           SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.GRDEF.SA.072(1)            333
            5.0T1   333  ACCOUNTING.GRDEF.SA.072            1 SEQ      80    1 PAGE UM   ENGLE               JAN. 10, 1973  17:16.39
            5.0T1   333                       
0          COPY SECTION.
0          Referenced by comments of: 97/5, 104/22, 104/92, 104/95, 104/98, 104/108, 104/114, 104/125, 104/139, 104/158,
                 360/1, 500/47, 586/1, 631/1, 631/5, 631/14, 632/4, 708/1 
00104/084   ACCOUNTING               WKDAY           SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.WKDAY.SA.073(1)            334
            5.0T1   334  ACCOUNTING.WKDAY.SA.073            1 LINE     80    1 PAGE UM   ENGLE               JAN. 09, 1973  12:14.08
            5.0T1   334                       
0          SUBROUTINE TO PRODUCE THE DAY OF THE WEEK FOR A GIVEN DATE.  USED IN INITCHK (104/91).
00104/085   ACCOUNTING               WKDAY           OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.WKDAY.OC.074(1)            335
            5.0T1   335  ACCOUNTING.WKDAY.OC.074            1 LINE     80    1 DISK UM   ENGLE               JAN. 09, 1973  12:14.29
            5.0T1   335                       
00104/086   ACCOUNTING               DIRDSPLA        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRDSPLA.SA.075(1)         336
            5.0T1   336  ACCOUNTING.DIRDSPLA.SA.075         1 LINE     80    3 PAGE UM   ENGLE               JAN. 12, 1973  13:57.36
            5.0T1   336                       
0          PROGRAM TO READ A SPECIFIC RECORD FROM *PRJDIRECTORY AND CALL DIRPRINT FOR IT.
00104/087   ACCOUNTING               DIRDSPLA        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRDSPLA.OC.076(1)         337
            5.0T1   337  ACCOUNTING.DIRDSPLA.OC.076         1 LINE     80    1 DISK UM   ENGLE               JAN. 12, 1973  13:57.46
            5.0T1   337                       
00104/088   ACCOUNTING               DIRDSPLA        OC  G          ACC:DIRDISPLAY                                                  
                                                                                    UM   ENGLE                                      
                         ACC:DIRDISPLAY       
00104/089   ACCOUNTING               DIRPRINT        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRPRINT.SA.078(1)         338
            5.0T1   338  ACCOUNTING.DIRPRINT.SA.078         1 LINE     80    6 PAGE UM   ENGLE               DEC. 06, 1974  12:00.11
            5.0T1   338                       
0          SUBROUTINE TO FORMAT A DIRECTORY ENTRY FOR PRINTING.  USED IN ACC:ACCLIB.
00104/090   ACCOUNTING               DIRPRINT        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRPRINT.OC.079(1)         339
            5.0T1   339  ACCOUNTING.DIRPRINT.OC.079         1 LINE     80    2 PAGE UM   ENGLE               DEC. 06, 1974  12:00.34
            5.0T1   339                       
00104/091   ACCOUNTING               INITCHK                      # (PART OF INIT)                                                  
                                                                                    UM   ENGLE                                      
0          DISTRIBUTED AS (097/5) AND (097/7)
1                                                                                               SUN SEP 08/96   15:24:55   Page   64
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 104/84 
00104/092A  ACCOUNTING               ACCFLUPD        SA  G  AFLU    S0027 DISTRB FSNAME=ACCFLUPD                                    
            5.1T1   136  ACCOUNTING.ACCFLUPD.SA.092         1 LINE     80    7 PAGE UM   ENGLE               AUG. 23, 1982  13:53:39
0          SUBROUTINE TO UPDATE FILE STORAGE INFORMATION IN AN ACCOUNTING RECORD.
           COPIES ACCFORMAT (104/1) AND GRDEF (104/83).
0          Referenced by comments of: 484/1 
00104/093A  ACCOUNTING               ACCFLUPD        UC  G          S0027 DISTRB FSNAME=ACCFLUPDUPD                                 
            5.1T1   137  ACCOUNTING.ACCFLUPD.UC.093         1 LINE     72    1 PAGE UM   ENGLE               AUG. 23, 1982  13:53:45
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/094A  ACCOUNTING               ACCFLUPD        OC  G          S0027 DISTRB FSNAME=AFLU                                        
            5.1T1   138  ACCOUNTING.ACCFLUPD.OC.094         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  13:53:51
00104/095A  ACCOUNTING               ACCINSCN        SA  G  AINS    S0027 DISTRB FSNAME=ACCINSCN                                    
            5.1T1   139  ACCOUNTING.ACCINSCN.SA.095         1 LINE     80    8 PAGE UM   ENGLE               AUG. 23, 1982  13:58:36
0          USED IN INIT:INIT (097/4).  COPIES ACCFORMAT (104/1) AND GRDEF (104/83).
00104/096A  ACCOUNTING               ACCINSCN        UC  G          S0027 DISTRB FSNAME=ACCINSCNUPD                                 
            5.1T1   140  ACCOUNTING.ACCINSCN.UC.096         1 LINE     72    1 PAGE UM   ENGLE               AUG. 23, 1982  13:58:42
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/097A  ACCOUNTING               ACCINSCN        OC  G          S0027 DISTRB FSNAME=AINS                                        
            5.1T1   141  ACCOUNTING.ACCINSCN.OC.097         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  13:59:11
00104/098   ACCOUNTING               CURSIG          SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.CURSIG.SA.087(1)           346
            5.0T1   346  ACCOUNTING.CURSIG.SA.087           1 LINE     80    1 PAGE UM   ENGLE               JAN. 08, 1973  17:55.52
            5.0T1   346                       
0          SUBROUTINE TO DETERMINE NUMBER OF CURRENT SIGNONS.  COPIES GRDEF (104/83) AND *LLMPSEQU.  NOTE THAT THE
           SOURCE SHOULD BE CHANGED (IF RE-ASSEMBLED) SO THAT IT COPIES COPY:LLMPSEQU (087) INSTEAD OF *LLMPSEQU
           WHICH NO LONGER EXISTS.
0          Referenced by comments of: 484/1 
00104/099   ACCOUNTING               CURSIG          OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.CURSIG.OC.088(1)           347
            5.0T1   347  ACCOUNTING.CURSIG.OC.088           1 LINE     80    1 DISK UM   ENGLE               JAN. 08, 1973  17:56.03
            5.0T1   347                       
00104/100   ACCOUNTING               DEDFLFIX                     # (PART OF DEADFILES)                                             
                                                                                    UM   ENGLE                                      
0          Distributed as (502/10) and (502/11)
00104/101A  ACCOUNTING               ACCLSTPR        SA  G  ALPR    S0027 DISTRB FSNAME=ACCLSTPR                                    
            5.1T1   142  ACCOUNTING.ACCLSTPR.SA.101         1 LINE     80   10 PAGE UM   ENGLE               NOV. 23, 1982  16:20:53
0          SUBROUTINE TO PRINT AN ACCOUNTING RECORD IN ABBREVIATED LISTING FORMAT.  COPIES ACCFORMAT (104/1).
1                                                                                               SUN SEP 08/96   15:24:55   Page   65
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 104/150 
00104/102A  ACCOUNTING               ACCLSTPR        UC  G          S0027 DISTRB FSNAME=ACCLSTPRUPD                                 
            5.1T1   143  ACCOUNTING.ACCLSTPR.UC.102         1 LINE     72    4 PAGE UM   ENGLE               NOV. 23, 1982  16:21:07
0          Updates source from previous regular distribution to current one.
00104/103A  ACCOUNTING               ACCLSTPR        OC  G          S0027 DISTRB FSNAME=ALPR                                        
            5.1T1   144  ACCOUNTING.ACCLSTPR.OC.103         1 LINE     80    4 PAGE UM   ENGLE               NOV. 23, 1982  16:21:12
00104/104A  ACCOUNTING               ACCFLCHG        SA  G  AFLC    S0027 DISTRB FSNAME=ACCFLCHG                                    
            5.1T1   145  ACCOUNTING.ACCFLCHG.SA.104         1 LINE     80    4 PAGE UM   ENGLE               AUG. 23, 1982  14:29:21
0          SUBROUTINE TO PRINT INFORMATION RELEVANT TO ACCUMULATED FILE CHARGES FOR AN ACCOUNTING RECORD.
           CALLED BY ACCDSPLA.  COPIES ACCFORMAT (104/1).
00104/105A  ACCOUNTING               ACCFLCHG        UC  G          S0027 DISTRB FSNAME=ACCFLCHGUPD                                 
            5.1T1   146  ACCOUNTING.ACCFLCHG.UC.105         1 LINE     72    1 PAGE UM   ENGLE               AUG. 23, 1982  14:29:27
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/106A  ACCOUNTING               ACCFLCHG        OC  G          S0027 DISTRB FSNAME=AFLC                                        
            5.1T1   147  ACCOUNTING.ACCFLCHG.OC.106         1 LINE     80    2 PAGE UM   ENGLE               AUG. 23, 1982  14:29:42
00104/107A  ACCOUNTING               ACCFLCHG        OE  G          ACC:ACCFILCHARGE                                                
            5.1T1   148  ACCOUNTING.ACCFLCHG.OE.107         1 LINE    838    1 PAGE UM   ENGLE               JULY 23, 1983  10:15:57
                         ACC:ACCFILCHARGE     
0          ACCDSPLA+ACCFLCHG.  Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record.
00104/108A  ACCOUNTING               APSWDISP        SA  G  APWD    S0027 DISTRB FSNAME=APSWDISP                                    
            5.1T1   149  ACCOUNTING.APSWDISP.SA.108         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  14:36:22
0          SUBROUTINE TO PRINT INTERNAL PASSWORD REPRESENTATION AND LAST DATE AND TIME SET FOR AN ACCOUNTING RECORD.
           CALLED BY ACCDSPLA.  COPIES ACCFORMAT (104/1) AND GRDEF (104/83).
00104/109C  ACCOUNTING               APSWDISP        UC  G          S0027 DISTRB FSNAME=APSWDISPUPD                                 
            5.1T1   150  ACCOUNTING.APSWDISP.UC.109         1 LINE     70    1 PAGE UM   ENGLE               AUG. 23, 1982  14:36:29
0          Updates source from previous regular distribution to current one.
00104/110A  ACCOUNTING               APSWDISP        OC  G          S0027 DISTRB FSNAME=APWD                                        
            5.1T1   151  ACCOUNTING.APSWDISP.OC.110         1 LINE     80    1 PAGE UM   ENGLE               AUG. 23, 1982  14:36:34
00104/111A  ACCOUNTING               ACCHEXPR        SA  O  AXPR    S0027 DISTRB FSNAME=ACCHEXPR                                    
            5.1T1   152  ACCOUNTING.ACCHEXPR.SA.111         1 LINE     80    3 PAGE UM   ENGLE               AUG. 23, 1982  15:03:48
0          SUBROUTINE TO PRINT AN ACCOUNTING RECORD IN HEX.  CALLED BY ACCDSPLA.
           COPIES ACCFORMAT (104/1).
00104/112C  ACCOUNTING               ACCHEXPR        UC  O          S0027 DISTRB FSNAME=ACCHEXPRUPD                                 
            5.1T1   153  ACCOUNTING.ACCHEXPR.UC.112         1 LINE     72    1 PAGE UM   ENGLE               AUG. 23, 1982  15:03:53
0          Updates source from previous regular distribution to current one.
1                                                                                               SUN SEP 08/96   15:24:55   Page   66
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/113A  ACCOUNTING               ACCHEXPR        OC  O          S0027 DISTRB FSNAME=AXPR                                        
            5.1T1   154  ACCOUNTING.ACCHEXPR.OC.113         1 LINE     80    1 PAGE UM   ENGLE               AUG. 23, 1982  15:03:56
00104/114   ACCOUNTING               TIMETRP         SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMETRP.SA.100(1)          357
            5.0T1   357  ACCOUNTING.TIMETRP.SA.100          1 LINE     80    3 PAGE UM   ENGLE               DEC. 06, 1974  12:04.25
            5.0T1   357                       
0          SUBROUTINE TO SET UP REAL TIME INTERRUPTS AND SET A FLAG AT THE INTERRUPT.  COPIES GRDEF (104/83).
00104/115   ACCOUNTING               TIMETRP         OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMETRP.OC.101(1)          358
            5.0T1   358  ACCOUNTING.TIMETRP.OC.101          1 LINE     80    1 PAGE UM   ENGLE               DEC. 06, 1974  12:04.41
            5.0T1   358                       
0          Referenced by comments of: 631/22, 631/24 
00104/116A  ACCOUNTING               ACCFLGRS        SA  G  ASAR    S0027 DISTRB FSNAME=ACCFLGRS                                    
            5.1T1   155  ACCOUNTING.ACCFLGRS.SA.116         1 LINE     80    6 PAGE UM   ENGLE               NOV. 23, 1982  16:21:16
0          Program to reset flags in a user's accounting record. If &FLAG is 'S'
           or null, the program will reset the signon attention flag. If &FLAG is
           'P', the program will reset the project sigfile attention flag. If
           &FLAG is 'I', the program will reset the signons inhibited flag. This
           program writes an audit trail in the file *PWSTAT, which must exist as
           a line file with at least one line (which may be anything). Run with
           PROT=OFF. Copies ACCFORMAT (104/1).
            
           ***************************************************************************
           D5.0C version:
            
           This was formerly ACCSGATR.
           ***************************************************************************
0          Referenced by comments of: 104/118, 104/119, 104/120, 104/187, 104/188, 104/195 
00104/117A  ACCOUNTING               ACCFLGRS        UC  G          S0027 DISTRB FSNAME=ACCFLGRSUPD                                 
            5.1T1   156  ACCOUNTING.ACCFLGRS.UC.117         1 LINE     72    2 PAGE UM   ENGLE               NOV. 23, 1982  16:21:21
0          Updates source from previous regular distribution to current one.
00104/118A  ACCOUNTING               ACCFLGRS        OC  G          WPSW:PROGRAM2                                                   
            5.1T1   157  ACCOUNTING.ACCFLGRS.OC.118         1 SEQ    3084    2 PAGE UM   ENGLE               JULY 23, 1983  10:16:28
                         WPSW:PROGRAM2        
0          Linkeditted object for (104/116), with &FLAG='S' or null, and
           (104/130), (104/29), (104/67), (104/177), and (164). Resets the signon
           attention flag.
00104/119C  ACCOUNTING               ACCFLGRS        OC  G          WPSW:PROGRAM3                                                   
            5.1T1   158  ACCOUNTING.ACCFLGRS.OC.119         1 LINE   3084    3 PAGE UM   ENGLE               JULY 23, 1983  10:16:28
                         WPSW:PROGRAM3        
0          Linkeditted object for (104/116), with &FLAG='P', and (104/130),
           (104/29), (104/67), (104/177), and (164). Resets the signon project
           attention flag.
1                                                                                               SUN SEP 08/96   15:24:55   Page   67
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/120C  ACCOUNTING               ACCFLGRS        OC  G          WPSW:PROGRAM4                                                   
            5.1T1   159  ACCOUNTING.ACCFLGRS.OC.120         1 LINE   3084    3 PAGE UM   ENGLE               JULY 23, 1983  10:16:28
                         WPSW:PROGRAM4        
0          Linkeditted object for (104/116), with &FLAG='I', and (104/130),
           (104/29), (104/67), (104/177), and (164). Resets the flag which
           inhibits signon.
00104/121A  ACCOUNTING               ACCSAVE         SA  G  ASAV    S0027 DISTRB FSNAME=ACCSAVE                                     
            5.1T1   160  ACCOUNTING.ACCSAVE.SA.121          1 LINE     80    8 PAGE UM   ENGLE               AUG. 23, 1982  15:26:05
0          MAIN PROGRAM FOR ACC:ACCSAVE TO SAVE ACCOUNTING AND PROJECT FILES ON TAPE.
           COPIES ACCFORMAT (104/1).
0          Referenced by comments of: 104/152 
00104/122C  ACCOUNTING               ACCSAVE         UC  G          S0027 DISTRB FSNAME=ACCSAVEUPD                                  
            5.1T1   161  ACCOUNTING.ACCSAVE.UC.122          1 LINE     71    2 PAGE UM   ENGLE               AUG. 23, 1982  15:26:18
0          Updates source from previous regular distribution to current one.
00104/123A  ACCOUNTING               ACCSAVE         OC  G          S0027 DISTRB FSNAME=ASAV                                        
            5.1T1   162  ACCOUNTING.ACCSAVE.OC.123          1 LINE     80    4 PAGE UM   ENGLE               AUG. 23, 1982  15:26:23
00104/124A  ACCOUNTING               ACCSAVE         OE  G          ACC:ACCSAVE                                                     
            5.1T1   163  ACCOUNTING.ACCSAVE.OE.124          1 LINE   2142    1 PAGE UM   ENGLE               JULY 23, 1983  10:16:53
                         ACC:ACCSAVE          
0          Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record.
00104/125A  ACCOUNTING               ACCTAPRD        SA  G  ATRP    S0027 DISTRB FSNAME=ACCTAPRD                                    
            5.1T1   164  ACCOUNTING.ACCTAPRD.SA.125         1 LINE     80    4 PAGE UM   ENGLE               AUG. 23, 1982  15:41:48
0          VERSION OF ACCREAD TO BE USED WITH ACCOUNTING FILE SAVE TAPES.
           COPIES GRDEF (104/83).
00104/126C  ACCOUNTING               ACCTAPRD        UC  G          S0027 DISTRB FSNAME=ACCTAPRDUPD                                 
            5.1T1   165  ACCOUNTING.ACCTAPRD.UC.126         1 LINE     72    1 PAGE UM   ENGLE               AUG. 23, 1982  15:42:12
0          Updates source from previous regular distribution to current one.
00104/127A  ACCOUNTING               ACCTAPRD        OC  G          S0027 DISTRB FSNAME=ATRD                                        
            5.1T1   166  ACCOUNTING.ACCTAPRD.OC.127         1 LINE     80    2 PAGE UM   ENGLE               AUG. 23, 1982  15:42:14
00104/128   ACCOUNTING               GETFILE         SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.GETFILE.SA.109(1)          365
            5.0T1   365  ACCOUNTING.GETFILE.SA.109          1 LINE     80    4 PAGE UM   ENGLE               OCT. 07, 1980  16:58:00
            5.0T1   365                       
0          SUBROUTINE TO GET A FDUB, ETC.
1                                                                                               SUN SEP 08/96   15:24:55   Page   68
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/129   ACCOUNTING               GETFILE         UC  G        # S0027 DISTRB FSNAME=GETFILEUPD                                  
            5.0T1   366  ACCOUNTING.GETFILE.UC.110          1 LINE     71    1 PAGE UM   ENGLE               OCT. 07, 1980  16:58:03
            5.0T1   366                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/130   ACCOUNTING               GETFILE         OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.GETFILE.OC.111(1)          367
            5.0T1   367  ACCOUNTING.GETFILE.OC.111          1 LINE     80    2 PAGE UM   ENGLE               OCT. 07, 1980  16:58:05
            5.0T1   367                       
0          Referenced by comments of: 104/118, 104/119, 104/120, 484/1, 631/22, 631/24 
00104/131   ACCOUNTING               ACATALOG        SA  G  ACAT    FILE:ACATALOG(1000)                                             
            5.0T1   368  ACCOUNTING.ACATALOG.SA.112         1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  12:44:21
            5.0T1   368                       
0          SUBROUTINE THAT GETS THE CURRENT DISK AND DATA CELL SPACE FOR A USER FROM THE CATALOG AND DSCB. USED BY
           ACC:ACCMAINT, INIT:INIT, AND *ACCRESTORE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00104/132   ACCOUNTING               ACATALOG        OC  G          FILE:ACATALOG(1,998)                                            
            5.0T1   369  ACCOUNTING.ACATALOG.OC.113         1 LINE     80    2 PAGE UM   HELFFRICH           JULY 03, 1981  12:44:22
            5.0T1   369  FILE:ACATALOG        
0          Referenced by comments of: 484/1 
00104/133   ACCOUNTING               ACATALOG        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACATALOG.SA.114(1)         370
            5.0T1   370  ACCOUNTING.ACATALOG.SA.114         1 LINE     80    3 PAGE UM   MTA                 JULY 27, 1977  22:18:36
            5.0T1   370                       
0          THIS IS A SPECIAL VERSION OF ACATALOG (REFERRED TO AS "SUPER ACATALOG") WHICH PERFORMS THE SAME FUNCTION,
           BUT CALLS THE ACATSUB SUBROUTINE (104/135) TO BUILD A TABLE OF USER ID VERSUS FILE SPACE FOR ALL USERS ON THE
           FIRST CALL TO ACATALOG.  FROM THEN ON, IT JUST DOES A TABLE LOOKUP TO GET THE SIZE -- THE RESULT BEING A VERY
           FAST ACATALOG.  THIS VERSION IS ONLY USED WHEN EVERY USER'S FILE SPACE IS TO BE RECALCULATED.  AT UM, IT HAS
           ONLY BEEN USED WHEN NEW FILE SYSTEMS ARE INSTALLED, I.E. WHEN A COMPLETE FILE SAVE AND RESTORE HAVE BEEN DONE.
0          Referenced by comments of: 104/135 
00104/134   ACCOUNTING               ACATALOG        OC  G          FILE:ACATALOG.FAST                                              
            5.0T1   371  ACCOUNTING.ACATALOG.OC.115         1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  12:44:23
            5.0T1   371  FILE:ACATALOG.FAST   
0          Referenced by comments of: 682/38 
00104/135A  ACCOUNTING               ACATALOG.FAST   SA  G          FILE:REALACATSUB(1,999)                                         
            5.1T1   167  ACCOUNTING.ACATALOG.FAST.SA.135    1 LINE     71    7 PAGE UM   MTA                 JULY 23, 1983  10:16:55
0          SUBROUTINE CALLED BY SUPER ACATALOG (104/133).  IT BUILDS A
           TABLE OF THE AMOUNT OF SPACE USED BY EACH USERID WHICH HAS
           FILES.  THIS VERSION IS DIFFERENT FROM THE PROGRAM USED IN DISK
           DISASTER RECOVERY, SEE COMP (682/46) TO VERIFY CATALOG/DSCB
           CONSISTENCY.  CALLS VTOCREAD (067/11).  ASSEMBLE USING 
           COPY:FILE.MACROS (482/45).
1                                                                                               SUN SEP 08/96   15:24:55   Page   69
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 104/133, 682/38 
00104/136A  ACCOUNTING               ACATALOG.FAST   OC  G          FILE:REALACATSUB(1000)                                          
            5.1T1   168  ACCOUNTING.ACATALOG.FAST.OC.136    1 LINE   1964    3 PAGE UM   MTA                 JULY 23, 1983  10:16:55
                         FILE:REALACATSUB     
00104/137A  ACCOUNTING               WRITEUP         WF             S0027 DISTRB FSNAME=ACCWRITEUP                                  
            5.1T1   169  ACCOUNTING.WRITEUP.WF.137          1 LINE     80    9 PAGE UM   ENGLE               AUG. 24, 1982  16:54:11
0          A WRITEUP DESCRIBING THE MTS ACCOUNTING SYSTEM: FILES AND MAINTENANCE PROGRAMS.
00104/138A  ACCOUNTING               WRITEUP         UC             S0027 DISTRB FSNAME=ACCWRITEUPUPD                               
            5.1T1   170  ACCOUNTING.WRITEUP.UC.138          1 LINE     80    3 PAGE UM   ENGLE               AUG. 24, 1982  16:54:15
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/139   ACCOUNTING               IOLOKCK         SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.IOLOKCK.SA.120(1)          376
            5.0T1   376  ACCOUNTING.IOLOKCK.SA.120          1 LINE     80    5 PAGE UM   ENGLE               DEC. 05, 1975  12:27:08
            5.0T1   376                       
0          SUBROUTINE TO INTERCEPT I/O ERRORS AND NON-ZERO RETURN CODES FROM SETLCK IN ORDER
           TO PREVENT INTERRUPTION OF FILE LOCK WAITS.  SETIOERR MUST BE CALLED WITH IOLOKCK AS
           THE I/O ERROR SUBROUTINE IN ORDER TO ACTIVATE THE I/O ERROR INTERCEPT.
           COPIES GRDEF (104/83).
00104/140   ACCOUNTING               IOLOKCK         OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.IOLOKCK.OC.121(1)          377
            5.0T1   377  ACCOUNTING.IOLOKCK.OC.121          1 LINE     80    2 PAGE UM   ENGLE               DEC. 05, 1975  12:27:18
            5.0T1   377                       
0          Referenced by comments of: 631/22, 631/24 
00104/141   ACCOUNTING               FLINFCL         SG  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.FLINFCL.SG.122(1)          378
            5.0T1   378  ACCOUNTING.FLINFCL.SG.122          1 LINE     59    1 PAGE UM   ENGLE               FEB. 27, 1978  13:45:51
            5.0T1   378                       
0          PROGRAM TO READ THE ACCOUNTING FILES AND PRINT STATISTICS ON FILE USAGE
           BROKEN DOWN BY THE FIRST LETTER OF THE PROJECT NUMBER FOR ACTIVE (UNEXPIRED)
           SIGNON ID'S AND SUMMARIZED FOR ALL DEAD (EXPIRED) ID'S.  IF PAR=DEAD IS GIVEN,
           THE REVERSE IS DONE, I.E., THE USAGE INFORMATION IS BROKEN DOWN BY THE FIRST
           LETTER OF THE PROJECT NUMBER FOR DEAD ID'S AND SUMMARIZED FOR ALL ACTIVE ID'S.
           THE PARAMETER MM/DD/YY (OR DATE=MM/DD/YY) MAY ALSO BE GIVEN TO SPECIFY A
           DATE; FILES BELONGING TO ID'S EXPIRING AT OR BEFORE MIDNIGHT OF THAT DATE ARE
           CONSIDERED DEAD.  IF NO DATE IS SPECIFIED, THEN THE PREVIOUS MIDNIGHT IS
           USED AS THE TIME.  IN ADDITION, IF PAR=STAFF IS GIVEN, ADDITIONAL INFORMATION
           FOR EACH SIGNON ID BELONGING TO A PROJECT BEGINNING WITH THE LETTER W IS PRINTED.
           THIS SECTION LOADS THE MAIN FUNCTION (104/143) FROM ACC:ACCLIB+NEW:GOMLIB.
00104/142   ACCOUNTING               FLINFCL         OC  G          ACC:FILEINFO                                                    
            5.0T1   379  ACCOUNTING.FLINFCL.OC.123          1 LINE     80    1 PAGE UM   ENGLE               FEB. 24, 1981  15:43:56
            5.0T1   379  ACC:FILEINFO         
0          This file has the program key ACC.:FILEINFO.
            
           ********************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page   70
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Contains a REP line to cause loading only from ACC:ACCLIB instead 
           of from ACC:ACCLIB+NEW:GOMLIB.
           ********************************************************************************
00104/143A  ACCOUNTING               ACCFLINF        SG  G          S0027 DISTRB FSNAME=ACCFLINF                                    
            5.1T1   171  ACCOUNTING.ACCFLINF.SG.143         1 LINE    100    4 PAGE UM   ENGLE               AUG. 24, 1982  17:05:01
0          MAIN FUNCTION TO READ THE ACCOUNTING FILES AND PRINT STATISTICS ON FILE USAGE.
0          Referenced by comments of: 104/141, 104/146, 104/148 
00104/144A  ACCOUNTING               ACCFLINF        UC  G          S0027 DISTRB FSNAME=ACCFLINFUPD                                 
            5.1T1   172  ACCOUNTING.ACCFLINF.UC.144         1 LINE     88    1 PAGE UM   ENGLE               AUG. 24, 1982  17:05:08
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/145A  ACCOUNTING               ACCFLINF        OC  G          S0027 DISTRB FSNAME=AFIN                                        
            5.1T1   173  ACCOUNTING.ACCFLINF.OC.145         1 LINE     80    7 PAGE UM   ENGLE               AUG. 24, 1982  17:05:14
00104/146   ACCOUNTING               ACCFLKWF        SG  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLKWF.SG.127(1)         382
            5.0T1   382  ACCOUNTING.ACCFLKWF.SG.127         1 LINE     70    1 PAGE UM   ENGLE               FEB. 27, 1978  14:01:40
            5.0T1   382                       
0          KWSCAN EXECUTE SUBROUTINE FOR ACCFLINF (104/143).
00104/147   ACCOUNTING               ACCFLKWF        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLKWF.OC.128(1)         383
            5.0T1   383  ACCOUNTING.ACCFLKWF.OC.128         1 LINE     80    1 PAGE UM   ENGLE               FEB. 27, 1978  14:02:24
            5.0T1   383                       
00104/148   ACCOUNTING               ACCFLATN        SG  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLATN.SG.129(1)         384
            5.0T1   384  ACCOUNTING.ACCFLATN.SG.129         1 LINE     55    1 PAGE UM   ENGLE               JAN. 09, 1979  15:35:45
            5.0T1   384                       
0          GOM ATTENTION INTERRUPT EXIT FOR ACCFLINF (104/143).
00104/149   ACCOUNTING               ACCFLATN        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLATN.OC.130(1)         385
            5.0T1   385  ACCOUNTING.ACCFLATN.OC.130         1 LINE     80    1 PAGE UM   ENGLE               JAN. 09, 1979  15:38:12
            5.0T1   385                       
00104/150   ACCOUNTING               LINCOUNT        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.LINCOUNT.SA.133(1)         388
            5.0T1   388  ACCOUNTING.LINCOUNT.SA.133         1 LINE     80    1 PAGE UM   ENGLE               JAN. 09, 1979  13:00:46
            5.0T1   388                       
0          DEFINITION OF THE VARIABLE LINCOUNT.  REFERENCED BY ACCPRINT (104/8),
           ACCLSTPR (104/101), PRJPRINT (104/48), ACCMAINT (104/24), ACCPRJMT
           (104/43), AND ACONSIST (104/61).
00104/151   ACCOUNTING               LINCOUNT        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.LINCOUNT.OC.134(1)         389
            5.0T1   389  ACCOUNTING.LINCOUNT.OC.134         1 LINE     80    1 PAGE UM   ENGLE               JAN. 09, 1979  13:01:15
            5.0T1   389                       
1                                                                                               SUN SEP 08/96   15:24:55   Page   71
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/152A  ACCOUNTING               ACCRETRV        SG  G          S0027 DISTRB FSNAME=ACCRETRV                                    
            5.1T1   174  ACCOUNTING.ACCRETRV.SG.152         1 LINE    128    7 PAGE UM   ENGLE               AUG. 24, 1982  17:17:13
0          PROGRAM TO MOUNT A MONTHLY ACCSAVE TAPE (104/121) OR AN ANNUAL TAPE AND
           DISPLAY OR LIST ACCOUNTING OR PROJECT RECORDS.  ASSUMES THAT THE ANNUAL
           TAPES ARE IN RACK NUMBERS ACCNN WHERE NN STARTS WITH TPBASE AND IS INCREMENTED
           BY 2.  ASSUMES THAT THE FIRST YEAR IS 19YY WHERE YY IS BASEYR. (TPBASE=29,
           BASEYR=78 IN DISTRIBUTED VERSION.)  ALSO ASSUMES THE EXISTENCE OF PROGRAMS
           IN ACC:ACCDISPLAY, ACC:PROJECTDISP, ACC:ACCLISTING, AND ACC:PROJECTLIST.
0          Referenced by comments of: 104/156 
00104/153A  ACCOUNTING               ACCRETRV        UC  G          S0027 DISTRB FSNAME=ACCRETRVUPD                                 
            5.1T1   175  ACCOUNTING.ACCRETRV.UC.153         1 LINE     72    2 PAGE UM   ENGLE               AUG. 24, 1982  17:17:23
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00104/154A  ACCOUNTING               ACCRETRV        OC  G          S0027 DISTRB FSNAME=ARTV                                        
            5.1T1   176  ACCOUNTING.ACCRETRV.OC.154         1 LINE     80   13 PAGE UM   ENGLE               AUG. 24, 1982  17:18:00
00104/155A  ACCOUNTING               ACCRETRV        OE  G          ACC:ACCRETRIEVE                                                 
            5.1T1   177  ACCOUNTING.ACCRETRV.OE.155         1 LINE   7132    6 PAGE UM   ENGLE               JULY 23, 1983  10:16:58
                         ACC.:ACCRETRIEVE     
0          ACCRETRV+ACCTAPRD.  Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record.
00104/156   ACCOUNTING               TIMECALL        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMECALL.SA.139(1)         393
            5.0T1   393  ACCOUNTING.TIMECALL.SA.139         1 LINE     80    1 PAGE UM   ENGLE               JAN. 09, 1979  13:05:36
            5.0T1   393                       
0          INTERFACE TO DYNAMICALLY LINK TO THE TIME SUBROUTINE. CALLED BY ACCRETRV
           (104/152).
00104/157   ACCOUNTING               TIMECALL        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMECALL.OC.140(1)         394
            5.0T1   394  ACCOUNTING.TIMECALL.OC.140         1 LINE     80    1 PAGE UM   ENGLE               JAN. 09, 1979  13:06:23
            5.0T1   394                       
00104/158   ACCOUNTING               GTPRJIDS        SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.GTPRJIDS.SA.141(1)         395
            5.0T1   395  ACCOUNTING.GTPRJIDS.SA.141         1 LINE     80   14 PAGE UM   ENGLE               FEB. 04, 1981  14:25:28
            5.0T1   395                       
0          SUBROUTINE TO OBTAIN THE SIGNON IDS BELONGING TO A PROJECT.  COPIES GRDEF
           (104/83), ACCPROJFMT (104/3) AND *CNFGINFODSECT (654).
00104/159   ACCOUNTING               GTPRJIDS        UC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.GTPRJIDS.UC.142(1)         396
            5.0T1   396  ACCOUNTING.GTPRJIDS.UC.142         1 LINE     71    1 PAGE UM   ENGLE               FEB. 04, 1981  14:26:13
            5.0T1   396                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
1                                                                                               SUN SEP 08/96   15:24:55   Page   72
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/160   ACCOUNTING               GTPRJIDS        OC  G          SEG2:GPID                                                       
            5.0T1   397  ACCOUNTING.GTPRJIDS.OC.143         1 LINE   2752    2 PAGE UM   ENGLE               JULY 03, 1981  12:45:09
            5.0T1   397  SEG2:GPID            
00104/161   ACCOUNTING               ACCPRJID        SG  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCPRJID.SG.144(1)         398
            5.0T1   398  ACCOUNTING.ACCPRJID.SG.144         1 LINE    112    1 PAGE UM   ENGLE               JAN. 09, 1979  13:08:32
            5.0T1   398                       
0          PROGRAM TO LIST THE SIGNON ID'S FOR A SPECIFIED PROJECT.
00104/162   ACCOUNTING               ACCPRJID        OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCPRJID.OC.145(1)         399
            5.0T1   399  ACCOUNTING.ACCPRJID.OC.145         1 LINE     80    4 PAGE UM   ENGLE               JAN. 09, 1979  13:08:55
            5.0T1   399                       
00104/163   ACCOUNTING               ACCPRJID        OE  G          ACC:PROJECTIDS                                                  
                                                                                    UM   ENGLE                                      
                         ACC.:PROJECTIDS      
00104/164   ACCOUNTING               IDRANGE         SG  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.IDRANGE.SG.147(1)          400
            5.0T1   400  ACCOUNTING.IDRANGE.SG.147          1 LINE     84    3 PAGE UM   ENGLE               JAN. 09, 1979  14:35:56
            5.0T1   400                       
0          PROGRAM TO PRINT THE LAST ID IN A RANGE GIVEN THE FIRST ID AND NUMBER
           OF ID'S OR THE NUMBER OF ID'S GIVEN THE FIRST AND LAST ID'S WITH OPTION
           TO LIST ALL ID'S IN THE RANGE.  COLLATING SEQUENCE IS A-H, J-N, P-Z, 0-9.
00104/165   ACCOUNTING               IDRANGE         OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.IDRANGE.OC.148(1)          401
            5.0T1   401  ACCOUNTING.IDRANGE.OC.148          1 LINE     80    4 PAGE UM   ENGLE               JAN. 09, 1979  14:36:14
            5.0T1   401                       
00104/166A  ACCOUNTING               ACCKILL         SG  O          S0027 DISTRB FSNAME=ACCKILL                                     
            5.1T1   178  ACCOUNTING.ACCKILL.SG.166          1 LINE     72    3 PAGE UM   ENGLE               NOV. 23, 1982  16:21:46
0          Program to be run by the operators to set the flag to inhibit
           signons. Program prompts for operator's name, name of person
           requesting the change, the signon ID, and the signon ID a second
           time for verification. Information about the change is written in
           PASWRDFL. See FILENAME (104/65).
0          Referenced by comments of: 104/188 
00104/167A  ACCOUNTING               ACCKILL         UC  G          S0027 DISTRB FSNAME=ACCKILLUPD                                  
            5.1T1   179  ACCOUNTING.ACCKILL.UC.167          1 LINE     71    1 PAGE UM   ENGLE               NOV. 23, 1982  16:21:55
0          UPDATES SOURCE FROM THE PREVIOUS REGULAR DISTRIBUTION TO THE CURRENT
           DISTRIBUTION.
00104/168A  ACCOUNTING               ACCKILL         OC  O          SYS.:ACCKILL                                                    
            5.1T1   180  ACCOUNTING.ACCKILL.OC.168          1 LINE   5555    4 PAGE UM   ENGLE               JULY 23, 1983  10:17:26
                         SYS:ACCKILL          
0          Referenced by comments of: 104/169, 104/170 
1                                                                                               SUN SEP 08/96   15:24:55   Page   73
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/169   ACCOUNTING               ACCKILL         C              SYS:CPW                                                         
            5.0T1   405  ACCOUNTING.ACCKILL.C.152           1 LINE     51    1 PAGE UM   MTA                 AUG. 05, 1981  02:05:27
            5.0T1   405  SYS:CPW              
0          File $SOURCEd to by (104/170) to run ACCKILL (104/168).
0          Referenced by comments of: 104/170 
00104/170   ACCOUNTING               ACCKILL         C              *CPW                                                            
            5.0T1   406  ACCOUNTING.ACCKILL.C.153           1 LINE     11    1 PAGE UM   MTA                 AUG. 05, 1981  02:05:28
            5.0T1   406  *CPW                 
0          Operator file which $SOURCEs to (104/169) to $RUN (104/168).
0          Referenced by comments of: 104/169 
00104/171   ACCOUNTING               AIOIF           SA  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.AIOIF.SA.152(1)            407
            5.0T1   407  ACCOUNTING.AIOIF.SA.152            1 LINE     80    1 PAGE UM   ENGLE               AUG. 15, 1980  11:23:00
            5.0T1   407                       
0          THIS IS AN INTERFACE TO THE ACCOUNTING I/O SUBROUTINES FOR PROGRAMS WRITTEN
           IN LANGUAGES WHICH CANNOT ACCESS GENERAL REGISTERS 0 OR 13.
00104/172   ACCOUNTING               AIOIF           OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.AIOIF.OC.153(1)            408
            5.0T1   408  ACCOUNTING.AIOIF.OC.153            1 LINE     80    1 PAGE UM   ENGLE               AUG. 15, 1980  11:23:05
            5.0T1   408                       
00104/173   ACCOUNTING               LOG             SG  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.LOG.SG.154(1)              409
            5.0T1   409  ACCOUNTING.LOG.SG.154              1 LINE     80    3 PAGE UM   ENGLE               FEB. 20, 1980  10:41:31
            5.0T1   409                       
0          SUBROUTINE TO WRITE AN AUDIT TRAIL IN A LOG FILE.
0          Referenced by comments of: 631/22, 631/24 
00104/174   ACCOUNTING               LOG             UC  G        # S0027 DISTRB FSNAME=LOGUPD                                      
            4.3T1    90  ACCOUNTING.LOG.UC.145              1 LINE     67    1 PAGE UM   ENGLE               FEB. 20, 1980  10:41:38
00104/175   ACCOUNTING               LOG             OC  G          S1558 5.0T1 VLO FSNAME=ACCOUNTING.LOG.OC.156(1)              410
            5.0T1   410  ACCOUNTING.LOG.OC.156              1 LINE     80    4 PAGE UM   ENGLE               FEB. 20, 1980  10:41:45
            5.0T1   410                       
00104/176C  ACCOUNTING               TRANSVEC        SA  G  TV      S0027 DISTRB FSNAME=TRANSVEC                                    
            5.1T1   181  ACCOUNTING.TRANSVEC.SA.176         1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:17:53
0          Standard transfer vector address.
00104/177C  ACCOUNTING               TRANSVEC        OC  G          S0027 DISTRB FSNAME=TV                                          
            5.1T1   182  ACCOUNTING.TRANSVEC.OC.177         1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:17:55
0          Referenced by comments of: 104/118, 104/119, 104/120 
1                                                                                               SUN SEP 08/96   15:24:55   Page   74
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/178C  ACCOUNTING               PRJEXPIR        SG  G          S0027 DISTRB FSNAME=PRJEXPIR                                    
            5.1T1   183  ACCOUNTING.PRJEXPIR.SG.178         1 LINE     95    1 PAGE UM   ENGLE               AUG. 26, 1982  17:18:18
0          Program to list expiration times, university account numbers, and unit
           codes for all projects which expire on the current date (*), a given
           date (MM/DD/YY), or within a range of dates (MM/DD/YY MM/DD/YY).
0          Referenced by comments of: 484/1 
00104/179   ACCOUNTING               PRJEXPIR        UC  G        # S0027 DISTRB FSNAME=PRJEXPIRUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current one.
00104/180C  ACCOUNTING               PRJEXPIR        OC  G          S0027 DISTRB FSNAME=PEXP                                        
            5.1T1   184  ACCOUNTING.PRJEXPIR.OC.180         1 LINE     80    3 PAGE UM   ENGLE               AUG. 26, 1982  17:18:58
00104/181C  ACCOUNTING               OPTFIELD        SA  G  OFLD    S0027 DISTRB FSNAME=OPTFIELD                                    
            5.1T1   185  ACCOUNTING.OPTFIELD.SA.181         1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:20:15
0          Subroutine to locate an optional field in an accounting or a statistics record.
00104/182   ACCOUNTING               OPTFIELD        UC  G        # S0027 DISTRB FSNAME=OPTFIELDUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current one.
00104/183C  ACCOUNTING               OPTFIELD        OC  G          S0027 DISTRB FSNAME=OFLD                                        
            5.1T1   186  ACCOUNTING.OPTFIELD.OC.183         1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:20:18
0          Referenced by comments of: 631/22, 631/24 
00104/184C  ACCOUNTING               ACCUNUSE        SG  O          S0027 DISTRB FSNAME=ACCUNUSE                                    
            5.1T1   187  ACCOUNTING.ACCUNUSE.SG.184         1 LINE    105    3 PAGE UM   ENGLE               JAN. 31, 1983  11:49:57
0          Produces a listing of unused blocks of signon IDs and the number of IDs
           within each block for a specified range.
00104/185   ACCOUNTING               ACCUNUSE        UC  G  AUNU  # S0027 DISTRB FSNAME=ACCUNUSEUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current distribution.
00104/186C  ACCOUNTING               ACCUNUSE        OC  O          S0027 DISTRB FSNAME=AUNU                                        
            5.1T1   188  ACCOUNTING.ACCUNUSE.OC.186         1 LINE     80    5 PAGE UM   ENGLE               JAN. 31, 1983  11:50:30
00104/187   ACCOUNTING               *ACCOUNTING     D            # MTS:$ACCOUNTING                                                 
                                                                                    UM   ENGLE                                      
                         *ACCOUNTING          
0          THIS FILE CONTAINS THE SUFFIXS FOR THE NAME OF THE AUXILIARY ACCOUNTING
           FILE CONTAINING THE ACCOUNTING RECORD FOR EACH USER ID.  THIS FILE MUST
           BE PERMITTED AS FOLLOWS: R/N,R (PKEY=*SYS.ACC,PKEY=*SYS.ACCOUNT,
           PKEY=INIT:INIT,PKEY=(ACCPASWD (104/57)),PKEY=(ACCSGATR (104/116)),
1                                                                                               SUN SEP 08/96   15:24:55   Page   75
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          PKEY=(FIX (502/10)),PKEY=*ACRESTORE,PKEY=(SCANFILES (502/1)),
           PKEY=(ACCKILL(104/149))),WE PKEY=INIT:INITCHK,RW ACC.,RWE 
           PKEY=(FILUPDAT (104/73)) 
            
           THE DISTRIBUTED SYSTEM HAS THE FOLLOWING USERIDS:  ACC., APL., BB00 ... BB99,
           BNCH, B001 ... B500, COPY, DIST, DWB., ETC., FILE, FIX., INIT, MAIL, MTA.,
           MTS., NEW., NPRV, RSTR, SEG2, STRT, SYS., TAPE, TMTS, UNSP, WSG., W009, AND
           W170.
00104/188A  ACCOUNTING               *ACCOUNTING1    D            # MTS:$ACCOUNTING1                                                
                                                                                    UM   ENGLE                                      
                         *ACCOUNTING1         
0          The auxiliary accounting files (*ACCOUNTING1, *ACCOUNTING2, etc.)
           contain the actual accounting records, one for each user id. The
           files must be permitted as follows:
           R/N,RWC (PKEY=*SYS.ACC,PKEY=*SYS.ACCOUNT,PKEY=INIT:INIT,
           PKEY=(FIX (502/10)),PKEY=*ACRESTORE,PKEY=(FILUPDAT (104/73)),
           PKEY=(SCANFILES (502/1)),PKEY=(ACCPASWD (104/57)),
           PKEY=(ACCSGATR (104/116)),PKEY=(ACCKILL (104/166))),
           R PKEY=ACC.:FILEINFO,RW ACC.
00104/189A  ACCOUNTING               *ACCOUNTING2    D            # MTS:$ACCOUNTING2                                                
                                                                                    UM   ENGLE                                      
                         *ACCOUNTING2         
00104/190A  ACCOUNTING               *ACCOUNTING3    D            # MTS:$ACCOUNTING3                                                
                                                                                    UM   ENGLE                                      
                         *ACCOUNTING3         
00104/191A  ACCOUNTING               *ACCOUNTING4    D            # MTS:$ACCOUNTING4                                                
                                                                                    UM   ENGLE                                      
                         *ACCOUNTING4         
00104/192A  ACCOUNTING               *ACCOUNTING5    D            # MTS:$ACCOUNTING5                                                
                                                                                    UM   ENGLE                                      
                         *ACCOUNTING5         
00104/193   ACCOUNTING               *PROJECT        D            # MTS:$PROJECT                                                    
                                                                                    UM   ENGLE                                      
                         *PROJECT             
0          THE PROJECT FILE CONTAINS A RECORD FOR EACH PROJECT.  THE FILE MUST BE PERMITTED AS FOLLOWS:
           P/N, RW (ACC., MTS.&PKEY=ACCMAINT), R PKEY=(*SYS.ACCOUNT,PKEY=*SYS.MESSAGE,PKEY=*USERDIRECTO)
           THIS FILE MUST ALSO BE PERMITTED READ TO THE USER ID WHICH RUNS THE BILLING PROGRAMS.
00104/194A  ACCOUNTING               *PRJDIRECTORY   D            # MTS:$PRJDIRECTOR                                                
                                                                                    UM   ENGLE                                      
                         *PRJDIRECTORY        
0          THE PROJECT DIRECTORY FILE CONTAINS LISTS OF THE USER ID'S BELONGING TO EACH
           PROJECT.  THE FILE MUST BE PERMITTED AS FOLLOWS:
           P/N, RW (ACC., MTS.&PKEY=ACCMAINT), R PKEY=(*SYS.ACCOUNT,PKEY=*SYS.MESSAGE,
           PKEY=*USERDIRECTO)
1                                                                                               SUN SEP 08/96   15:24:55   Page   76
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00104/195   ACCOUNTING               *PWSTAT         D            # *PWSTAT                                                         
                                                                                    UM   ENGLE                                      
                         *PWSTAT@E            
0          LOG FILE USED TO RECORD THE TIME AND DATE OF PASSWORD SETTINGS BY THE
           ACCOUNTING PROGRAMS.  MUST BE PERMITTED AS FOLLOWS:
           P/N, (RWC,TRUNC) ACC.&PKEY=NEW.:LOGPURGE, NONE PKEY=*MTS.FILESTA
           SOME INSTALLATIONS MAY CHOOSE TO PERMIT THIS FILE WE TO ALL SO THAT ANY USER
           WHO MANAGES TO RUN ACCPASWD (104/57) OR ACCSGATR (104/116) WILL LEAVE SOME
           EVIDENCE.  IN THEORY, THESE PROGAMS ARE NOT AVAILABLE TO USERS.
00104/196   ACCOUNTING               LOG FILE        D            # ACC.:ACCLOG                                                     
                                                                                    UM   ENGLE                                      
                         ACC.:ACCLOG@E        
0          THIS FILE WILL ACCUMULATE ACCOUNTING MAINTENANCE AND PROJECT MAINTENANCE
           DATA. IT SHOULD BE PURGED REGULARLY TO PREVENT IT BECOMING TOO LARGE.
           LOGPURGE (739) MAY BE USED FOR THIS PURPOSE.
00108/001  *PL360                    COMPILER        S3             DBMS:PL360COMP.S                                                
            5.0T1   411  PL360.COMPILER.S3.001              1 LINE     81   81 PAGE UM   STERKEN             JULY 03, 1981  12:45:36
            5.0T1   411                       
0          THIS VERSION OF PL360 IS BASED ON ONE RECEIVED FROM STANFORD IN LATE 1977 AND
           INSTALLED AT UM IN JANUARY, 1978. A SET OF UPDATES FROM STANFORD HAS BEEN
           APPLIED, AS HAVE SOME LOCAL CHANGES TO THE SYM RECORDS OUTPUT UNDER THE TEST
           OPTION. THE UNSP SNOOP SUBROUTINE, SEE (685/2), IS CALLED TO KEEP STATISTICS
           OF PL360 USAGE ON THE FILE ETC:PL360.SNOOP, WHICH SHOULD BE PERMITTED WRITEXP
           TO PKEY=*PL360.
            
           THE PL360 COMPILER CONSISTS OF TWO PARTS. PL360COMP IS WRITTEN IN PL360 AND
           CONTAINS ALL SYSTEM INDEPENDENT PORTIONS OF THE COMPILER. PL360INTF IS
           WRITTEN IN ASSEMBLY AND IS THE MTS INTERFACE TO PL360. THE ENTRY POINT IS IN
           PL360COMP.
            
           ONCE *PL360 IS BOOTSTRAPPED, THE OBJECT MODULES ARE OBTAINED AS FOLLOWS:
            
               $RUN *PL360 SCARDS=PL360COMP.S SPUNCH=PL360COMP.O SPRINT=*PRINT* 
                    PAR=SIZE=100
               $RUN *ASMH SCARDS=PL360INTF.S SPUNCH=PL360INTF.O SPRINT=*PRINT* 
            
           *PL360 IS THEN LINKEDITED AS FOLLOWS:
            
                $RUN *LINKEDIT
                INCLUDE UNSP:LIBRARY ONLY SNOOP
                RENAME WRITE WRITE#
                INCLUDE PL360COMP.O+PL360INTF.O
                COMBINE@NAME=PL360
                PUNCH ON *PL360 
                STOP
                $CONTROL *PL360 PKEY=*PL360
            
           *PL360 CREATES AND DESTROYS A TEMPORARY FILE (-PL360#01) IN WHICH IT KEEPS AN
           INTERMEDIATE VERSION OF THE OBJECT MODULES IT PRODUCES.
1                                                                                               SUN SEP 08/96   15:24:55   Page   77
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           THE MTS VERSION OF PL360 IS DESCRIBED FURTHER IN CCMEMO 75. THE BEST
           REFERENCE MANUAL FOR PL360 IS "INTRODUCTION TO PL360 PROGRAMMING" BY RICHARD
           L. GUERTIN (WADSWORTH PUBLISHING CO., BELMONT, CALIFORNIA).
00108/002A *PL360                    MTS INTERFACE   SA             DBMS:PL360INTF.S                                                
            5.1T1   189  PL360.MTS_INTERFACE.SA.002         1 LINE     72    8 PAGE UM   STERKEN             JULY 23, 1983  10:17:45
0          SOURCE FOR MTS INTERFACE OF PL/360.
00108/003A *PL360                    *PL360          OE             *PL360                                                          
            5.1T1   190  PL360.?PL360.OE.003                1 SEQ   29250   11 PAGE UM   STERKEN             JULY 23, 1983  10:17:46
                         *PL360               
00108/004A *PL360                    LIBRARY         SA             DBMS:PL360LIB.S                                                 
            5.1T1   191  PL360.LIBRARY.SA.004               1 LINE     80    3 PAGE UM   STERKEN             JULY 23, 1983  10:17:46
0          *PL360LIB CONTAINS VARIOUS UTILITY SUBROUTINES (READ, WRITE, 
           PAGE, PUNCH, ETC.) WHICH CAN BE REFERENCED FROM PL360 PROGRAMS 
           AS PRE-DECLARED  PROCEDURES.  THE CALLING SEQUENCE IS NOT
           OS-STANDARD.  SEE "INTRODUCTION TO PL360 PROGRAMMING" OR CCMEMO
           75 FOR DETAILS.  THESE ROUTINES ARE NOT USED BY PL360COMP.
            
           PL360LIB.S CONTAINS THE ASSEMBLY SOURCE FOR *PL360LIB.
00108/005  *PL360                    *PL360LIB       OE             *PL360LIB                                                       
            5.0T1   415  PL360.*PL360LIB.OE.005             1 LINE    572    1 PAGE UM   STERKEN             JULY 03, 1981  12:45:45
            5.0T1   415  *PL360LIB            
00110/001   TNL                                      SA           # (ABANDONED)                                                     
            D3T1    335  TNL.*TNL.S.1                       1 SEQ      80   30 PAGE UM                       JULY 31, 1973  00:08.57
00111/001  *PTPRRTN                                  SA  G  PTPR    W116:PTPR.S                                                     
            5.0T1   416  PTPRRTN..SA.001                    1 LINE     80   24 PAGE UM   YOUNG               JULY 03, 1981  12:45:46
            5.0T1   416                       
0          DEVICE SUPPORT ROUTINES FOR THE IBM 2671 PAPER TAPE READER.  ASKS THE 
           OPERATOR FOR THE CAUSE OF ANY EQUIPMENT CHECKS AND THEN TRANSMITS THAT
           INFORMATION TO THE USER.  MAXIMUM LENGTH OF THE OPERATOR'S RESPONSE IS
           GOVERNED BY THE LENGTH OF THE PAD WHICH IS FOUND IN THE PSECT (LENGTH IS
           COMPUTED BY &LENRESP).  MINIMUM LENGTH OF THE OPERATOR'S RESPONSE IS SET
           BY &MINRESP AND IS CURRENTLY SET TO 10 CHARACTERS.  COPIES COPY:MTS.MACROS.
00111/002  *PTPRRTN                                  OC  G          *PTPRRTN                                                        
            5.0T1   417  PTPRRTN..OC.002                    1 LINE     80    3 PAGE UM   YOUNG               JULY 03, 1981  12:45:48
            5.0T1   417  *PTPRRTN             
00116/001A *PDP8RTN                                  SA  G          WSG:PDP8                                                        
            5.1T1   192  PDP8RTN..SA.001                    1 LINE     73   62 PAGE UM   WSG                 JULY 23, 1983  10:17:47
0          MTS device support routines for the UM Front End Processors (Data
           Concentrators). Includes support for Votrax Audio Response Units
           by calling special subroutines (681) to perform I/O conversion.
           This DSR is also used for device type FDSK at UM, where floppy
1                                                                                               SUN SEP 08/96   15:24:55   Page   78
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          disks are attached through a Front End Processor. Copies
           COPY:LLMPSEQU (087), COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS
           (1026/2), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS
           (344/3).
0          Referenced by comments of: 681/1, 681/2, 681/15 
00116/002A *PDP8RTN                                  OC  G          *PDP8RTN                                                        
            5.1T1   193  PDP8RTN..OC.002                    1 LINE  32767   26 PAGE UM   WSG                 JULY 23, 1983  10:17:50
                         *PDP8RTN             
0          Referenced by comments of: 681/2, 681/3, 681/4, 681/10, 681/12, 681/14 
00116/003  *PDP8RTN                  *FDSKRTN        OC  G          *FDSKRTN                                                        
            5.0T1   420  PDP8RTN.*FDSKRTN.OC.003            1 LINE     23    1 PAGE UM   WSG                 JULY 03, 1981  12:46:00
            5.0T1   420  *FDSKRTN             
0          Consists of a "$CONTINUE WITH *PDP8RTN" line.
00116/004  *PDP8RTN                  MEMO 375        WF             S1558 5.0T1 VLO FSNAME=PDP8RTN.MEMO_375.WF.005(1)            422
            5.0T1   422  PDP8RTN.MEMO_375.WF.005            1 LINE    104   10 PAGE UM   WOLFSON             SEP. 07, 1978  15:03:42
            5.0T1   422                       
0          THIS IS COMPUTING CENTER MEMO 375 -- "THE DECWRITER TERMINAL AND MTS."
00116/005  *PDP8RTN                  MEMO 413        WF             S1558 5.0T1 VLO FSNAME=PDP8RTN.MEMO_413.WF.006(1)            423
            5.0T1   423  PDP8RTN.MEMO_413.WF.006            1 LINE     68    3 PAGE UM   WSG                 FEB. 29, 1980  10:17:22
            5.0T1   423                       
0          This is Computing Center Memo 413 -- "Guide for Using Decwriter Terminals with
           Various Terminal Controllers."
00116/006C *PDP8RTN                  MEMO 438        WF             S0792 FSNAME=MEMO438.WF                                         
            5.1T1   194  PDP8RTN.MEMO_438.WF.006            1 LINE    158   21 PAGE UM   WSG                 OCT. 05, 1982  17:36:58
0          This is Computing Center Memo 438 -- "The Revised Data Concentrator Device
           Command Language."
00117/001  *GRAPHMAC                                 SM           # (OBSOLETE)                                                      
            D4T1    396  GRAPHMAC..SM.                      1 SEQ      80   63 PAGE UM                       JULY 31, 1973  00:14.26
00119/001   SYN360                                   SS             S1558 5.0T1 VLO FSNAME=SYN360..SS.001(1)                     424
            5.0T1   424  SYN360..SS.001                     1 SEQ      80    5 PAGE UM   DWB                 JULY 31, 1973  00:15.37
            5.0T1   424                       
0          PROGRAM (IN SNOBOL) TO PRODUCE THE SYNTAX TABLES THAT SNOBOL USES TO PARSE ITS INPUT.
           USED AS "CPU BURNER" AND "PAGER" FOR SYSTEM TESTING.
0          Referenced by comments of: 119/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page   79
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00119/002   SYN360                   TABLES DATA     D              S1558 5.0T1 VLO FSNAME=SYN360.TABLES_DATA.D.002(1)           425
            5.0T1   425  SYN360.TABLES_DATA.D.002           1 SEQ      80    3 PAGE UM   DWB                 JULY 31, 1973  00:15.38
            5.0T1   425                       
0          INPUT TO (119/1).  ENDS WITH A "$CONTINUE WITH SYNTBL" CARD.
00120/001   REWIND SUBR                              SA  G          S1558 5.0T1 VLO FSNAME=REWIND_SUBR..SA.001(1)                426
            5.0T1   426  REWIND_SUBR..SA.001                1 LINE     80    1 PAGE UM   MTA                 MAY  13, 1978  17:05:05
            5.0T1   426                       
0          FORTRAN CALLABLE REWIND SUBROUTINE.  ASSEMBLE USING *SYSMAC.
00120/002   REWIND SUBR                              OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   MTA                                        
0           
           Object is in *LIBRARY (524/1).
00121/001  *USERS                                    SG  G          S1558 5.0T1 VLO FSNAME=USERS..SG.001(1)                      427
            5.0T1   427  USERS..SG.001                      1 LINE     75    1 PAGE UM   MTA                 APR. 05, 1980  14:06:21
            5.0T1   427                       
0          GOM PROGRAM TO ISSUE A "$SYSTEMSTATUS USERS" COMMAND (GRUDGINGLY).
           IT IS SUGGESTED THAT THIS PROGRAM NOT BE INSTALLED AT NEW INSTALLATIONS.
00121/002  *USERS                                    OC  G          *USERS                                                          
            5.0T1   428  USERS..OC.002                      1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  12:46:12
            5.0T1   428                       
00123/001  *PTASKS                                   SA           # (OBSOLETE)                                                      
            D4T1    405  PTASKS..SA.                        1 SEQ      80   17 PAGE UM                       JULY 31, 1973  00:15.58
00126/001   BLSTDEV                                  SA  G          S1558 5.0T1 VLO FSNAME=BLSTDEV..SA.001(1)                    429
            5.0T1   429  BLSTDEV..SA.001                    1 LINE     80    3 PAGE UM   MTA                 JULY 30, 1973  03:31.46
            5.0T1   429                       
0          SUBROUTINE TO RESET A DEVICE FOR A NEW OPERATION. USED BY SEVERAL DSR'S.
00126/002   BLSTDEV                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00128/001  *PTPPRTN                                  SA  S          S1558 5.0T1 VLO FSNAME=PTPPRTN..SA.001(1)                    430
            5.0T1   430  PTPPRTN..SA.001                    1 SEQ      80   19 PAGE UM   WSG                 JULY 31, 1973  00:17.03
            5.0T1   430                       
0          MTS device support routines for IBM 1018 paper tape punch. Has
           bugs and has not been used at UM for many years. Object not
           distributed.
1                                                                                               SUN SEP 08/96   15:24:55   Page   80
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00129/001  *STATUS                                   SA  G        # (PART OF ACCOUNTING)                                            
                                                                                    UM   ENGLE                                      
0          PROGRAM TO ALLOW USER TO PRINT INFO FROM HIS ACCOUNTING RECORD.
           RUN WITH PROT=OFF.
            
           Distributed as part of ACCOUNTING (104/18).
00129/002A *STATUS                                   OE  G          *STATUS                                                         
            5.1T1   195  STATUS..OE.002                     1 LINE   8412    4 PAGE UM   ENGLE               JULY 23, 1983  10:17:54
                         *STATUS              
0          CONSISTS OF:  STATUS (104/18) + *LCS (164).
           THIS FILE MUST BE PERMITTED AS FOLLOWS:  U/N,R PKEY=*MTS.RUN
           THIS FILE MUST BE GIVEN THE PROGRAM KEY *STATUS.
0          Referenced by comments of: 104/18, 104/20 
00131/001   STRTPDP                                               # (OBSOLETE)                                                      
            D2T1    149                                                             UM                                              
0          Obsoleted by the $SYSTEMSTATUS command.
00132/001  *PERMIT                                   SA           # (OBSOLETE)                                                      
            D4T1    409  PERMIT..SA.001                     1 LINE     80    6 PAGE UM                       JULY 27, 1977  22:26:58
00133/001  *PLOT                                     SA             S1011 ETC 'MISC' FSNAME=PTRCONVPLOT                             
            5.0T1   432  PLOT..SA.001                       1 LINE     72    8 PAGE UM   LIFT                DEC. 07, 1978  15:44:47
            5.0T1   432                       
0          CONVERSATIONAL INTERFACE TO PRINTER PLOT SUBROUTINES (282).
00133/002  *PLOT                                     OC             *PLOT                                                           
            5.0T1   433  PLOT..OC.002                       1 LINE     80    3 PAGE UM   LIFT                JULY 03, 1981  12:46:48
            5.0T1   433  *PLOT                
00135/001A *TAPERTN                                  SA  G          TAPE:TAPE                                                       
            5.1T1   196  TAPERTN..SA.001                    1 LINE     81   95 PAGE UM   SHERRY              JULY 23, 1983  10:17:55
                         TAPE:TAPE            
0          MTS device support routines for magnetic tapes.  NOTE:  The "NLC" control command
           (which only works if issued by a user ID which is authorized to $SET PROT=OFF or
           by user ID "SYS." with program key "*LABEL") overrides the normal checking for
           volume labels.  It is used by *LABEL (487) to label virgin tapes and FIND LABEL
           (729) to print unknown labels.  Copies COPY:LLMPSEQU (087), COPY:GLOBALDEFS
           (1026/1), COPY:GLOBALSETS (1026/2), *CNFGINFODSECT (654), and *SENSEDSECT (3025).
           Assemble using COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4),
           COPY:UC.MACROS (787/1), and COPY:SETPARM (653) with PAR=PEXIT=*PEXIT (775).
            
           ********************************************************************************
           D5.0A version:
            
           Some bugs fixed and implements TIMER=n control command to print warning
           message if tape not used for specific interval.
1                                                                                               SUN SEP 08/96   15:24:55   Page   81
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ********************************************************************************
            
           ********************************************************************************
           D5.0B version:
            
           Implements TRANSLATE control command to change translate table used
           for ASCII data translation.  Default translation tables changed from
           IBM to MTS.
           ********************************************************************************
            
           *****************************************************************************
           D5.1 version:
            
           Messages now in mixed case.  Lower case control commands accepted.  All 
           control commands now check for invalid or extra parameters.  Some bug fixes.
           *****************************************************************************
0          Referenced by comments of: 787/20, 806/1 
00135/002A *TAPERTN                  UPDATE          UC  G          TAPE:TAPE.U                                                     
            5.1T1   197  TAPERTN.UPDATE.UC.002              1 LINE    149   14 PAGE UM   SHERRY              JULY 23, 1983  10:17:58
00135/003A *TAPERTN                                  OC  G          *TAPERTN                                                        
            5.1T1   198  TAPERTN..OC.003                    1 LINE  20904   15 PAGE UM   SHERRY              JULY 23, 1983  10:17:59
                         *TAPERTN             
0          THIS FILE IS NORMALLY LOADED INTO SHARED VM BY PISTLE.
00136/001  *FIX                                      C   G          *FIX                                                            
            5.0T1   437  FIX..C.001                         1 LINE      7    1 PAGE UM   ENGLE               JULY 03, 1981  12:47:00
            5.0T1   437  *FIX                 
0          COMMAND FILE USED BY OPERATORS TO CLEAN UP A USERID (E.G. AFTER A SNARK).  THIS WILL SET THE
           CORRECT NUMBER OF CURRENT SIGNONS IN THE USER'S ACCOUNTING RECORD AND UPDATE HIS FILE SPACE
           INFORMATION.  THIS FILE SOURCES TO FIX:FIX (136/2).
           INVOKED BY ENTERING "MTS *FIX" ON OPERATORS CONSOLE.
00136/002  *FIX                      FIX:FIX         C   G          FIX:FIX                                                         
            5.0T1   438  FIX.FIX:FIX.C.002                  1 LINE     52    1 PAGE UM   ENGLE               JULY 03, 1981  12:47:01
            5.0T1   438  FIX.:FIX             
0          COMMAND FILE TO RUN *ACCRESTORE (484).
0          Referenced by comments of: 136/1 
00137/001  *UPDATE                   D5.0 MASTER     SA  G          W009:UPDATE.S                                                   
            5.0T1   439  UPDATE.D5.0_MASTER.SA.001          1 LINE     80   29 PAGE UM   SHERRY              JULY 03, 1981  12:47:03
            5.0T1   439                       
0          D5.0 MASTER SOURCE FOR THE MTS SOURCE UPDATE PROGRAM.  REQUIRES BLOCKED I/O ROUTINES (283).
1                                                                                               SUN SEP 08/96   15:24:55   Page   82
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00137/002  *UPDATE                                   OE  G          *UPDATE                                                         
            5.0T1   440  UPDATE..OE.002                     1 LINE   7560    4 PAGE UM   SHERRY              JULY 03, 1981  12:47:05
            5.0T1   440  *UPDATE              
00138/001  *TEXT360                  MONITOR         SA  G          S1558 5.0T1 VLO FSNAME=TEXT360.MONITOR.SA.001(1)             441
            5.0T1   441  TEXT360.MONITOR.SA.001             1 LINE     80   18 PAGE UM   TIFFANY             JULY 27, 1977  22:49:43
            5.0T1   441                       
0          NEW VERSION 7 OF TEXT/360 TEXT PROCESSING PROGRAM.  THE SEPARATE PROGRAMS
           *FMAINT, *BLDLIN, *PLAOUT, AND *POSTPR ARE NO LONGER USED.  INSTEAD, *TEXT360
           CONTAINS ALL THESE PROGRAMS.  IN ADDITION, MOST PARTS OF TEXT/360 HAVE BEEN
           RE-WRITTEN BECOMING BOTH SMALLER AND FASTER.
0          Referenced by comments of: 138/8 
00138/002A *TEXT360                  FMAINT          SA  G          S0990 TXT370 'TEXT370' POSN=FM.CT052                            
            5.1T1   199  TEXT360.FMAINT.SA.002              1 LINE     80   52 PAGE UM   TIFFANY             JULY 23, 1983  10:19:35
0          TEXT/360 FILE MAINTENANCE.
            
           *************************************************************************
           D5.0B version:
            
           The only changes were made for the font PO8UMA, *PGF(12) as follows:
            
               Name                  Text360 Representation      Output code
               --------------------  ----------------------      -----------
               Broken vertical line        //I                      6A
               Tilde                       //T                      73
               Up arrow                    //4                      74
               Down arrow                  //5                      75
               Left arrow                  //6                      76
               Right arrow                 //7                      77
               Grave accent                //M                      79
               Caret                       //E                      AA
            
           In addition, //W is now illegal. 
           *************************************************************************
00138/003  *TEXT360                  BLDLIN          SA  G          S1558 5.0T1 VLO FSNAME=TEXT360.BLDLIN.SA.003(1)              443
            5.0T1   443  TEXT360.BLDLIN.SA.003              1 LINE     80   94 PAGE UM   TIFFANY             JULY 27, 1977  22:49:54
            5.0T1   443                       
0          TEXT/360 BUILD LINES.
00138/004  *TEXT360                  HYPHEN          SA  G          S1558 5.0T1 VLO FSNAME=TEXT360.HYPHEN.SA.004(1)              444
            5.0T1   444  TEXT360.HYPHEN.SA.004              1 LINE     80   10 PAGE UM   TIFFANY             MAR. 26, 1979  02:31:56
            5.0T1   444                       
0          TEXT/360 SUBROUTINE TO HYPHENATE WORDS.
1                                                                                               SUN SEP 08/96   15:24:55   Page   83
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00138/005  *TEXT360                  PLAOUT          SA  G          S1558 5.0T1 VLO FSNAME=TEXT360.PLAOUT.SA.005(1)              445
            5.0T1   445  TEXT360.PLAOUT.SA.005              1 LINE     80   70 PAGE UM   TIFFANY             MAR. 26, 1979  02:31:56
            5.0T1   445                       
0          TEXT/360 PAGE LAYOUT.
00138/006  *TEXT360                  PPR1            SP  O          S1558 5.0T1 VLO FSNAME=TEXT360.PPR1.SP.006(1)                446
            5.0T1   446  TEXT360.PPR1.SP.006                1 LINE     80   28 PAGE UM   TIFFANY             MAR. 26, 1979  02:32:05
            5.0T1   446                       
0          TEXT/360 POST PROCESSOR.
00138/007  *TEXT360                  PPR2            SA  G          S1558 5.0T1 VLO FSNAME=TEXT360.PPR2.SA.007(1)                447
            5.0T1   447  TEXT360.PPR2.SA.007                1 LINE     80   11 PAGE UM   TIFFANY             JULY 27, 1977  22:50:26
            5.0T1   447                       
0          TEXT/360 SPELLING POSTPROCESSOR.
0          Referenced by comments of: 138/8 
00138/008A *TEXT360                  OBJECT          OE  G          *TEXT360                                                        
            5.1T1   200  TEXT360.OBJECT.OE.008              1 LINE  14896   28 PAGE UM   TIFFANY             JULY 23, 1983  10:19:35
                         *TEXT360             
0          OBJECT FROM (138/1) THROUGH (138/7).  ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD.
00138/009  *TEXT360                  *PRESCAN        SA  O          S1558 5.0T1 VLO FSNAME=TEXT360.*PRESCAN.SA.009(1)            449
            5.0T1   449  TEXT360.*PRESCAN.SA.009            1 LINE     80   40 PAGE UM   TIFFANY             JULY 27, 1977  22:50:30
            5.0T1   449                       
0          TEXT/360 PRESCAN PROGRAM.
00138/010  *TEXT360                  *PRESCAN        OE  O          *PRESCAN                                                        
            5.0T1   450  TEXT360.*PRESCAN.OE.010            1 LINE   8994    5 PAGE UM   TIFFANY             JULY 03, 1981  12:48:44
            5.0T1   450  *PRESCAN             
00138/011  *TEXT360                  *PRINT          SA  G          S0990 TXT370 'TEXT370' POSN=PRINT.EC120                         
            5.0T1   451  TEXT360.*PRINT.SA.011              1 SEQ      80   14 PAGE UM   TIFFANY             JULY 03, 1981  12:48:47
            5.0T1   451                       
0          TEXT/360 output printing program.
00138/012  *TEXT360                  *PRINT          OC  G          *PRINT                                                          
            5.0T1   452  TEXT360.*PRINT.OC.012              1 LINE   2464    4 PAGE UM   TIFFANY             JULY 03, 1981  12:48:48
            5.0T1   452  *PRINT               
00138/013  *TEXT360                  *DICTUPD        SP  G          S1558 5.0T1 VLO FSNAME=TEXT360.*DICTUPD.SP.013(1)            453
            5.0T1   453  TEXT360.*DICTUPD.SP.013            1 LINE     80    7 PAGE UM   TIFFANY             JULY 27, 1977  22:50:41
            5.0T1   453                       
0          PROGRAM TO MAINTAIN TEXT/360 SPELLING DICTIONARY.
1                                                                                               SUN SEP 08/96   15:24:55   Page   84
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00138/014  *TEXT360                  *DICTUPD        OE  O          *DICTUPD                                                        
            5.0T1   454  TEXT360.*DICTUPD.OE.014            1 LINE  10746    5 PAGE UM   TIFFANY             JULY 03, 1981  12:48:50
            5.0T1   454  *DICTUPD             
0          ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD.
00138/015  *TEXT360                  *DICT           D              *DICT                                                           
            5.0T1   455  TEXT360.*DICT.D.015                1 SEQ    4096   22 PAGE UM   TIFFANY             JULY 03, 1981  12:48:51
            5.0T1   455  *DICT                
0          TEXT/360 SPELLING DICTIONARY CONTAINING ABOUT 12000 WORDS.
00138/016A *TEXT360                  *HYPHDICT       D              *HYPHDICT                                                       
            5.1T1   201  TEXT360.?HYPHDICT.D.016            1 LINE     64    6 PAGE UM   MANUAL              JULY 23, 1983  10:19:36
                         *HYPHDICT            
0          A HYPHENATION OVERRIDE DICTIONARY FOR WORDS THAT MTS TEXT PROCESSING LANGUAGES
           CANNOT HYPHENATE CORRECTLY.
00138/017  *TEXT360                  *T360MASTCONV   SP  G          S1558 5.0T1 VLO FSNAME=TEXT360.*T360MASTCONV.SP.017(1)       457
            5.0T1   457  TEXT360.*T360MASTCONV.SP.017       1 LINE     70    3 PAGE UM   TIFFANY             JULY 12, 1979  22:25:52
            5.0T1   457                       
0          PROGRAM TO CONVERT A TEXT/360 MASTER FILE INTO A TEXT/360 INPUT STREAM.
00138/018  *TEXT360                  *T360MASTCONV   SA  G          S1558 5.0T1 VLO FSNAME=TEXT360.*T360MASTCONV.SA.018(1)       458
            5.0T1   458  TEXT360.*T360MASTCONV.SA.018       1 LINE     72    1 PAGE UM   TIFFANY             JULY 12, 1979  22:25:54
            5.0T1   458                       
0          A SUBROUTINE TO REPLACE "NONPRINTABLE" CHARACTERS WITH SPECIAL CHARACTERS
           PRECEDED BY EITHER A "/" OR "//".
00138/019  *TEXT360                  *T360MASTCONV   OE  G          *T360MASTCONV                                                   
            5.0T1   459  TEXT360.*T360MASTCONV.OE.019       1 LINE   5598    5 PAGE UM   TIFFANY             JULY 03, 1981  12:48:55
            5.0T1   459  *T360MASTCONV        
0          EXTERNAL SYMBOL IHESAPC SHOULD BE RENAMED IHESAPE.  ENDS WITH A
           "$CONTINUE WITH *PL1LIB" RECORD.
00140/001  *ANALYSIS                                 SA  G          S1558 5.0T1 VLO FSNAME=ANALYSIS..SA.001(1)                   460
            5.0T1   460  ANALYSIS..SA.001                   1 LINE     80   60 PAGE UM   MTA                 JULY 27, 1977  22:50:55
            5.0T1   460                       
0          PROGRAM USED IN ANALYZING THE STATISTICS PRODUCED ON MAGNETIC TAPE BY THE STAT JOB (079).
           ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 79/1 
00140/002  *ANALYSIS                                 OC  G          *ANALYSIS(1)                                                    
            5.0T1   461  ANALYSIS..OC.002                   1 LINE  11972    7 PAGE UM   MTA                 JULY 03, 1981  12:48:58
            5.0T1   461  *ANALYSIS            
0          THIS FILE CONTAINS SEVERAL OTHER THINGS STARTING AT LINE -1000.  SEE CCMEMO 393 (079/6).
1                                                                                               SUN SEP 08/96   15:24:55   Page   85
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00140/003  *ANALYSIS                 PL/1 MAIN PGM   SP             S1558 5.0T1 VLO FSNAME=ANALYSIS.PL/1_MAIN_PGM.SP.003(1)      462
            5.0T1   462  ANALYSIS.PL/1_MAIN_PGM.SP.003      1 LINE     80    1 PAGE UM   MTA                 JUNE 28, 1974  16:12.14
            5.0T1   462                       
0          PL/1 MAIN PROGRAM FOR USE WITH *ANALYSIS.
00140/004  *ANALYSIS                 PL/1 MAIN PGM   OC             *ANALYSIS(0,.999)                                               
            5.0T1   463  ANALYSIS.PL/1_MAIN_PGM.OC.004      1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  12:48:59
            5.0T1   463                       
00140/005  *ANALYSIS                 EXAMPLE STP2    SA  G          S0938 FSAVE2 VLO FSNAME=KIPSSTP2(2)                          124
            5.0T1   464  ANALYSIS.EXAMPLE_STP2.SA.005       1 LINE     73   24 PAGE UM   MTA                 NOV. 08, 1975  00:29:03
            5.0T1   464                       
0          EXAMPLE STP2 SUBROUTINE FOR USE WITH *ANALYSIS.  CALLS THE HISTOGRAM SUBROUTINE (140/7).
           COPIES *ANALYSIS(-800,-700) AND REQUIRES *SYSMAC.
0          Referenced by comments of: 140/7 
00140/006  *ANALYSIS                 EXAMPLE STP2    OC  G          S0938 FSAVE2 VLO FSNAME=KIPSSTP2(3)                          177
            5.0T1   465  ANALYSIS.EXAMPLE_STP2.OC.006       1 LINE     80   29 PAGE UM   MTA                 OCT. 25, 1976  22:22:14
            5.0T1   465                       
00140/007  *ANALYSIS                 HISTOGRAM       SA  G          *ANALYSIS(-400,-1)                                              
            5.0T1   466  ANALYSIS.HISTOGRAM.SA.007          1 LINE     72    6 PAGE UM   MTA                 JULY 03, 1981  12:50:00
            5.0T1   466                       
0          SUBROUTINE TO PLOT HISTOGRAMS, VAGUELY RELATED TO *ANALYSIS AND BRIEFLY DESCRIBED IN CCMEMO 393 (079/6).
           CALLED BY THE EXAMPLE STP2 SUBROUTINE (140/5). ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 140/5, 718/2, 799/1 
00140/008  *ANALYSIS                 HISTOGRAM       OC  G          *ANALYSIS(-600,-401)                                            
            5.0T1   467  ANALYSIS.HISTOGRAM.OC.008          1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  12:50:01
            5.0T1   467                       
00140/009  *ANALYSIS                 CALLSTP2        SA  G          MTA:CALLSTP2(1,999)                                             
            5.0T1   468  ANALYSIS.CALLSTP2.SA.009           1 LINE     70    3 PAGE UM   MTA                 JULY 03, 1981  12:50:02
            5.0T1   468  MTA.:CALLSTP2        
0          PROGRAM TO REPLACE *ANALYSIS FOR THE CASE WHERE ONLY STP2A, STP2D, AND/OR
           STP2E ARE SUPPLIED AND THE JOB AREA IS NOT NEEDED.  MUCH FASTER THAN *ANALYSIS
           FOR THIS CASE.
00140/010  *ANALYSIS                 CALLSTP2        OC  G          MTA:CALLSTP2(1000)                                              
            5.0T1   469  ANALYSIS.CALLSTP2.OC.010           1 LINE     80    2 PAGE UM   MTA                 JULY 03, 1981  12:50:03
            5.0T1   469                       
00141/001  *GPAKDRAW                                 S            # (OBSOLETE)                                                      
                                                                                    UM                                              
1                                                                                               SUN SEP 08/96   15:24:55   Page   86
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00143/001   REWIND# SUBR                             SA           # (PART OF RSF)                                                   
                                                                                    UM                                              
0          Now part of RSF (578)
00144/001  *ASA                                      SA  O          S1558 5.0T1 VLO FSNAME=ASA..SA.001(1)                        470
            5.0T1   470  ASA..SA.001                        1 LINE     80    4 PAGE UM   TIFFANY             JULY 27, 1977  23:16:57
            5.0T1   470                       
0          PRINTS OUTPUT WITH ASA STANDARD CARRIAGE CONTROL.
           ASSEMBLE WITH PAR=BATCH.
00144/002  *ASA                                      OC  O          *ASA                                                            
            5.0T1   471  ASA..OC.002                        1 LINE     80    1 PAGE UM   TIFFANY             JULY 03, 1981  12:50:05
            5.0T1   471  *ASA                 
00145/001  *TASKS                                    SA  G          S0792 WSGFS FSNAME=MTASKS.SA                                    
            5.0T1   472  TASKS..SA.001                      1 LINE     60    3 PAGE UM   WSG                 NOV. 17, 1980  15:53:50
            5.0T1   472                       
0          MTS program to print task status in same format as TASKS job (019).  Calls TSKFMT subroutine
           which is part of TASKS job (019).
0          Referenced by comments of: 19/1 
00145/002  *TASKS                                    OC  G          *TASKS                                                          
            5.0T1   473  TASKS..OC.002                      1 LINE     80    1 PAGE UM   WSG                 JULY 03, 1981  12:51:49
            5.0T1   473  *TASKS               
00146/001  *OLDED                                    SA           # (OBSOLETE)                                                      
            D2T1    325                                                             UM                                              
00147/001  *FILESCAN                                 SA  G          S1558 5.0T1 VLO FSNAME=FILESCAN..SA.001(1)                   474
            5.0T1   474  FILESCAN..SA.001                   1 LINE     80    9 PAGE UM   ENGLE               DEC. 05, 1975  16:09:05
            5.0T1   474                       
0          MTS FILE SCANNING PROGRAM.
00147/002  *FILESCAN                                 OE  G          *FILESCAN                                                       
            5.0T1   475  FILESCAN..OE.002                   1 LINE    255    2 PAGE UM   ENGLE               JULY 03, 1981  12:51:50
            5.0T1   475  *FILESCAN            
00148/001  *WATLIB                                                # *WATLIB                                                         
                                                                                    UM   SHERRY                                     
                         *WATLIB@UM           
0          This file has source for a bunch of FORTRAN subroutines and
           assembler subroutine object decks which *WATFIV assumes as the
           default library when attempting to resolve undefined symbols in
           WATFIV programs.
            
           Not distributed because of Waterloo restrictions.
0          Referenced by comments of: 148/2, 148/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page   87
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00148/002  *WATLIB                   WATSUB SUBR     SA  G          S1558 5.0T1 VLO FSNAME=WATLIB.WATSUB_SUBR.SA.002(1)          477
            5.0T1   477  WATLIB.WATSUB_SUBR.SA.002          1 LINE     66    3 PAGE UM   SHERRY              AUG. 14, 1977  19:11:25
            5.0T1   477                       
0          SOURCE FOR THE WATSUB SUBROUTINE.  OBJECT IS IN *WATLIB (148/1).
00148/003  *WATLIB                   TRACER SUBR     SA  G          S1558 5.0T1 VLO FSNAME=WATLIB.TRACER_SUBR.SA.003(1)          478
            5.0T1   478  WATLIB.TRACER_SUBR.SA.003          1 LINE     57    1 PAGE UM   SHERRY              AUG. 14, 1977  19:11:26
            5.0T1   478                       
0          SOURCE FOR THE TRACER SUBROUTINE.  OBJECT IS IN *WATLIB (148/1).
00148/004  *WATLIB                   WATGENLIB       SA  G          S1558 5.0T1 VLO FSNAME=WATLIB.WATGENLIB.SA.004(1)            479
            5.0T1   479  WATLIB.WATGENLIB.SA.004            1 LINE     80   23 PAGE UM   SHERRY              JULY 27, 1977  23:22:29
            5.0T1   479                       
0          WATFIV LIBRARY GENERATOR.  THE WATFIV CONTROL CARD CHARACTER IS "/"
           (ALTERNATIVELY "$"), SO THE SET SYMBOLS &CC AND &CCA SHOULD BE CHANGED
           APPROPRIATELY IF A DIFFERENT CONVENTION IS FOLLOWED.
           ASSEMBLE USING *SYSMAC.
00148/005  *WATLIB                   *WATGENLIB      OE  G          *WATGENLIB                                                      
            5.0T1   480  WATLIB.*WATGENLIB.OE.005           1 SEQ    3151    2 PAGE UM   SHERRY              JULY 03, 1981  12:51:54
            5.0T1   480  *WATGENLIB           
00151/001  *CONVSNOBOL                               SS  G          *CONVSNOBOL                                                     
            5.0T1   481  CONVSNOBOL..SS.001                 1 LINE     69    1 PAGE UM   SWARTZ              JULY 03, 1981  12:51:55
            5.0T1   481  *CONVSNOBOL          
0          $SOURCE FILE WHICH RUNS A SNOBOL PROGRAM TO ENHANCE CONVERSATIONAL USE OF SNOBOL.
00153/001  *MADTOPL1                                 SS     MPL1    *MADTOPL1                                                       
            5.0T1   482  MADTOPL1..SS.001                   1 LINE     80   21 PAGE UM                       JULY 03, 1981  12:51:56
            5.0T1   482  *MADTOPL1            
0          CONVERT MAD 7090 TO PL/I
00154/001  *LAS                                      C              *LAS                                                            
            5.0T1   483  LAS..C.001                         1 LINE      9    1 PAGE UM   WSG                 JULY 03, 1981  12:51:59
            5.0T1   483  STRT:*LAS            
0          Command file for starting MTS terminal lines. Invoked by entering
           "MTS *LAS" on the operators console. Signs on under user id "STRT"
           and sources to STRT:LAS (154/2).
0          Referenced by comments of: 67/21, 621/1 
00154/002  *LAS                      LAS             C              MTS:TST.LAS                                                     
            5.0T1   484  LAS.LAS.C.002                      1 LINE     67    1 PAGE UM   WSG                 JULY 03, 1981  12:52:00
            5.0T1   484  STRT:LAS             
0          Command file which starts up MTS terminal lines. This file will
           have to be modified for each installation's I/O configuration.
1                                                                                               SUN SEP 08/96   15:24:55   Page   88
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 154/1 
00154/003  *LAS                      LAS UM          C            # STRT:LAS                                                        
                                                                                    UM   WSG                                        
                         STRT:LAS@UM          
0          UM version of STRT:LAS.
00156/001   IPL PROGRAM                                           # (OBSOLETE)                                                      
            D3.2T1  131  IPL_PROGRAM..SA.01                 1 LINE     80   13 PAGE UM                       MAR. 21, 1975  01:13:31
00157/001   IPL BOOTSTRAP                            SA  G        # (OBSOLETE)                                                      
            D4T1    465  IPL_BOOTSTRAP..SA.001              1 LINE     80    4 PAGE UM                       JULY 27, 1977  23:22:41
            D4T1    465                       
00160/001   FRONCOPY                                 S            # (OBSOLETE)                                                      
            D2T1    387                                                             UM                                              
00162/001A  PSA DSECT                                SA  G          COPY:PSA                                                        
            5.1T1   202  PSA_DSECT..SA.001                  1 LINE     72    5 PAGE UM   MTA                 JULY 23, 1983  10:19:37
                         COPY:PSA             
0          Definition of prefixed storage area (PSA).
           Copied by CONFIG, the supervisor, and others.
           Requires that COPY:GLOBALS (1026/3) be copied first.
0          Referenced by comments of: 45/1, 46/1, 540/3, 577/1, 577/3, 577/8, 577/11, 634/3, 1021/1, 1021/4, 1081/1 
00163/001   PL1 COMPILER             MACLIB          SM  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.MACLIB.SM.001(1)         485
            5.0T1   485  PL1_COMPILER.MACLIB.SM.001         1 LINE     80   27 PAGE UM   TIFFANY             APR. 05, 1980  14:08:31
            5.0T1   485                       
0          PL/I(F) VERSION 5.5 COMPILER (RELEASE 21.8).
            
           THIS VERSION OF THE PL/I(F) COMPILER DIFFERS FROM PREVIOUS VERSIONS IN THE
           FOLLOWING WAYS:
            
            1) COMPILATION IS FASTER AND CHEAPER.
            2) INPUT RECORDS OVER 100 BYTES ARE TRUNCATED WITH A WARNING.
            3) COMPILER OPTIONS ARE NO LONGER SET TO DEFAULT AT THE SECOND (AND SUBSEQUENT)
               COMPILATION. THEY WILL BE THE SAME AS AT THE FIRST COMPILATION UNLESS
               OVERRIDDEN BY THE %PROCESS RECORD.
            4) OPTION DIAG IS THE DEFAULT IF SERCOM IS DIFFERENT THAN SPRINT OR IF
               SPRINT IS NOT USED.
            5) IF SPRINT IS SET TO A TERMINAL BY DEFAULT, THEN OPTIONS NOOPLIST,
               NOSOURCE2, NOSOURCE, NOXREF, NOATR, NOEXTREF, AND NOLIST ARE ASSUMED.
            6) TWO NEW OPTIONS HAVE BEEN ADDED:
                A) THE MTS/OS OPTION PRODUCES OBJECT MODULES THAT ARE INTENDED FOR
                   MTS OR OS, RESPECTIVELY. THE DEFAULT IS MTS.
                B) NUM/NONUM CONTROLS THE PRINTING OF MTS LINE NUMBERS IN THE SOURCE
                   LISTING. THE DEFAULT IS NUM.
            7) THE WORK FILE -SYSUT4 IS NOW A VIRTUAL MEMORY FILE.
            
           THIS SUBCOMPONENT, MACLIB, IS A MACRO LIBRARY FOR THE SIMULATION OF OS/360
1                                                                                               SUN SEP 08/96   15:24:55   Page   89
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          STUFF IN MTS.
0          Referenced by comments of: 163/3, 163/5, 163/6, 163/7, 163/8, 163/9, 163/10, 163/11, 163/13, 233/1, 506/11 
00163/002   PL1 COMPILER             MACLIB          SM  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.MACLIB.SM.002(1)         486
            5.0T1   486  PL1_COMPILER.MACLIB.SM.002         1 LINE     73    8 PAGE UM   TIFFANY             APR. 05, 1980  14:08:33
            5.0T1   486                       
0          ANOTHER MACRO LIBRARY.
00163/003   PL1 COMPILER             REPLACE         SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.REPLACE.SA.003(1)        487
            5.0T1   487  PL1_COMPILER.REPLACE.SA.003        1 LINE     80    3 PAGE UM   TIFFANY             APR. 05, 1980  14:08:35
            5.0T1   487                       
0          ROUTINE TO REPLACE A TIOT, ATTACHING ANYTHING TO AN MTS LOGICAL I/O UNIT IF APPLICABLE.
            
           ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/004   PL1 COMPILER             CHKLIO          SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.CHKLIO.SA.004(1)         488
            5.0T1   488  PL1_COMPILER.CHKLIO.SA.004         1 LINE     80    3 PAGE UM   TIFFANY             APR. 05, 1980  14:09:00
            5.0T1   488                       
0          ROUTINE TO CHECK IF A NAME IS AN MTS LOGICAL I/O UNIT.
00163/005   PL1 COMPILER             NONSENSE        SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.NONSENSE.SA.005(1)       489
            5.0T1   489  PL1_COMPILER.NONSENSE.SA.005       1 LINE     80    3 PAGE UM   TIFFANY             APR. 05, 1980  14:09:27
            5.0T1   489                       
0          ROUTINE TO SAY THAT SOMETHING DOES NOT EXIST OR IS NOT AVAILABLE.
            
           ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/006   PL1 COMPILER             FREEDDEF        SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.FREEDDEF.SA.006(1)       490
            5.0T1   490  PL1_COMPILER.FREEDDEF.SA.006       1 LINE     80    2 PAGE UM   TIFFANY             APR. 05, 1980  14:09:53
            5.0T1   490                       
0          ROUTINE TO FREE ALL DDEF'S.
            
           ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/007   PL1 COMPILER             FINDTIOT        SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.FINDTIOT.SA.007(1)       491
            5.0T1   491  PL1_COMPILER.FINDTIOT.SA.007       1 LINE     80    2 PAGE UM   TIFFANY             APR. 05, 1980  14:10:19
            5.0T1   491                       
0          ROUTINE TO FIND A TIOT GIVEN A "DDNAME."
            
           ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/008   PL1 COMPILER             DDEF            SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.DDEF.SA.008(1)           492
            5.0T1   492  PL1_COMPILER.DDEF.SA.008           1 LINE     80   10 PAGE UM   TIFFANY             APR. 05, 1980  14:10:46
            5.0T1   492                       
0          ROUTINE TO PROCESS DDEF COMMANDS AND GET A TIOT FOR EACH.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page   90
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/009   PL1 COMPILER             OPEN            SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.OPEN.SA.009(1)           493
            5.0T1   493  PL1_COMPILER.OPEN.SA.009           1 LINE     80   16 PAGE UM   TIFFANY             APR. 05, 1980  14:11:16
            5.0T1   493                       
0          SIMULATE OS/360 OPEN.  CURRENTLY ONLY BSAM AND QSAM ARE SUPPORTED. 
            
           ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/010   PL1 COMPILER             ROUT            SA  G  RUTE    W062:IOPACK(8000,8999)                                          
            5.0T1   494  PL1_COMPILER.ROUT.SA.010           1 LINE     80   32 PAGE UM   TIFFANY             JULY 03, 1981  12:52:08
            5.0T1   494                       
0          List of various routines.
           Assemble using the (163/1) macro library.
00163/011   PL1 COMPILER             CLOSE           SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.CLOSE.SA.011(1)          495
            5.0T1   495  PL1_COMPILER.CLOSE.SA.011          1 LINE     80    5 PAGE UM   TIFFANY             APR. 05, 1980  14:13:12
            5.0T1   495                       
0          SIMULATE OS/360 CLOSE.
            
           ASSEMBLE USING THE (163/1) MACRO LIBRARY.
00163/012   PL1 COMPILER             SETPFX          SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.SETPFX.SA.012(1)         496
            5.0T1   496  PL1_COMPILER.SETPFX.SA.012         1 LINE     80    7 PAGE UM   TIFFANY             APR. 05, 1980  14:13:46
            5.0T1   496                       
0          ALTERNATE ROUTINES: SETPFX, GETPFX WITH MULTICHARACTER PREFIX FEATURES.
0          Referenced by comments of: 233/1 
00163/013   PL1 COMPILER             UPDATE          UC             W062:PL1.UP                                                     
            5.0T1   497  PL1_COMPILER.UPDATE.UC.013         1 LINE     73   40 PAGE UM   TIFFANY             JULY 03, 1981  12:52:57
            5.0T1   497                       
0          Old *CDUPDATE input to produce current MTS PL/I compiler from OS/360 Release 21.8 source.
            
           The compiler may be produced in the following way: 
            
              1) use PL/1 maintenance HENPECKER (506/8) to pick up the specific module
                 sources from IEBUPDT OS Release 21.8 source.
              2) apply update (this subcomponent).
              3) run *ASMH (737/30) with macro library OSMACLIB (163/1).
            
           See (506/11) for information regarding the installation and
           maintenance of version 5.5 of the PL/I-F compiler.
00163/014   PL1 COMPILER             ESDLIST         SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.ESDLIST.SA.014(1)        498
            5.0T1   498  PL1_COMPILER.ESDLIST.SA.014        1 LINE     80    2 PAGE UM   TIFFANY             APR. 05, 1980  14:14:37
            5.0T1   498                       
0          TABLE OF SOMETHING OR OTHER USED BY PL/1 MAINTENANCE LLXU (506/7).
1                                                                                               SUN SEP 08/96   15:24:55   Page   91
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          SOURCE GENERATED BY PL/1 MAINTENANCE CRELCS (506/1).
00163/015   PL1 COMPILER             IEMTM           SA  G          S1558 5.0T1 VLO FSNAME=PL1_COMPILER.IEMTM.SA.015(1)          499
            5.0T1   499  PL1_COMPILER.IEMTM.SA.015          1 LINE     72   23 PAGE UM   TIFFANY             JULY 03, 1981  12:53:20
            5.0T1   499                       
0          COMPILER PHASE "TM" WHICH PRODUCES THE SYMPL1 RECORDS IF THE "TEST" OPTION IS USED.
00163/016   PL1 COMPILER             *PL1            OE  G          *PL1                                                            
            5.0T1   500  PL1_COMPILER.*PL1.OE.016           1 LINE   5204    9 PAGE UM   TIFFANY             JULY 03, 1981  12:53:27
            5.0T1   500  *PL1                 
0          Referenced by comments of: 163/17 
00163/017   PL1 COMPILER             PL1LINKLIB      OE  G          ETC:PL1LINKLIB                                                  
            5.0T1   501  PL1_COMPILER.PL1LINKLIB.OE.017     1 LINE  17779  238 PAGE UM   TIFFANY             JULY 03, 1981  12:53:28
            5.0T1   501  ETC:PL1LINKLIB       
0          A DIR-TYPE LIBRARY LINE FILE FROM WHICH *PL1 (163/16) LOADS PHASES DURING
           COMPILATION. 
00164/001  *LCS                                      OC  G          *LCS                                                            
            5.0T1   502  LCS..OC.001                        1 LINE     24    1 PAGE UM   MTA                 JULY 03, 1981  12:53:41
            5.0T1   502  *LCS                 
0          CONTAINS THE SINGLE LOADER CARD:
            LCS            LCSYMBOL
0          Referenced by comments of: 104/118, 104/119, 104/120, 129/2, 303/4, 739/4, 740/4 
00170/001  *LISTVTOC                                 SA           # (OBSOLETE)                                                      
            D2T1    105                                                             UM                                              
00171/001  *BATCH                                    SA           # (OBSOLETED BY *BATCH*)                                          
            D2T1    327                                                             UM                                              
00172/001  *UMIST                    MACRO LIB       SM             S1558 5.0T1 VLO FSNAME=UMIST.MACRO_LIB.SM.001(1)             503
            5.0T1   503  UMIST.MACRO_LIB.SM.001             1 LINE     72    8 PAGE UM   SALISBURY           SEP. 07, 1979  09:14:41
            5.0T1   503                       
0          (172/1) THRU (172/9) REPRESENT THE CURRENT SOURCE FOR *UMIST. IT CONSISTS OF 1 MACRO LIBRARY, 2 COPY SECTIONS, AND
           6 ASSEMBLIES. TO ASSEMBLE UMIST CREATE AND FILL UMIST.SYMS (172/2) AND UMIST.PSECT (172/3)
           (THE COPY SECTIONS), CREATE THE MACRO LIBRARY, AND ASSEMBLE ANY OR ALL OF THE ASSEMBLIES USING BOTH *SYSMAC
           AND THE SPECIAL MACRO LIBRARY.  COMPONENT (172/1) IS THE MACRO LIBRARY READY FOR COPYING INTO A FILE.
0          Referenced by comments of: 172/1 
00172/002  *UMIST                    /SYMBOLS        SA             S1558 5.0T1 VLO FSNAME=UMIST./SYMBOLS.SA.002(1)              504
            5.0T1   504  UMIST./SYMBOLS.SA.002              1 LINE     72    3 PAGE UM   SALISBURY           SEP. 07, 1979  09:16:28
            5.0T1   504                       
0          THIS IS THE UMIST.SYMS COPY SECTION
0          Referenced by comments of: 172/1, 172/4, 172/5, 172/7, 172/8, 172/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page   92
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00172/003  *UMIST                    /PSECT          SA             S1558 5.0T1 VLO FSNAME=UMIST./PSECT.SA.003(1)                505
            5.0T1   505  UMIST./PSECT.SA.003                1 LINE     72    4 PAGE UM   SALISBURY           SEP. 07, 1979  09:16:38
            5.0T1   505                       
0          THIS IS THE UMIST.PSECT COPY SECTION.
0          Referenced by comments of: 172/1, 172/5, 172/7, 172/8, 172/9 
00172/004  *UMIST                    /ENTRY          SA             S1558 5.0T1 VLO FSNAME=UMIST./ENTRY.SA.004(1)                506
            5.0T1   506  UMIST./ENTRY.SA.004                1 LINE     71    5 PAGE UM   SALISBURY           SEP. 07, 1979  09:17:28
            5.0T1   506                       
0          "/ENTRY" MODULE WHICH MAKES UMIST INDEPENDENT OF SYSTEM CONVENTIONS AS MUCH
           AS POSSIBLE. COPIES UMIST.SYMS (172/2).
0          Referenced by comments of: 172/11 
00172/005  *UMIST                    /TABLES         SA             S1558 5.0T1 VLO FSNAME=UMIST./TABLES.SA.005(1)               507
            5.0T1   507  UMIST./TABLES.SA.005               1 LINE     73    5 PAGE UM   SALISBURY           SEP. 07, 1979  09:17:51
            5.0T1   507                       
0          MASTER DEFINITION TABLES FOR VARIOUS UMIST FEATURES, E.G., SPECIAL SYMBOLS.
           CALLED "/TABLES". COPIES UMIST.SYMS (172/2) AND UMIST.PSECT (172/3).
00172/006  *UMIST                    /MISC           SA             S1558 5.0T1 VLO FSNAME=UMIST./MISC.SA.006(1)                 508
            5.0T1   508  UMIST./MISC.SA.006                 1 LINE     72    1 PAGE UM   SALISBURY           SEP. 07, 1979  09:18:10
            5.0T1   508                       
0          "/MISC" -- FOUR MISCELLANEOUS CONTROL SECTIONS USED WITH THE CODE: ACTIVE-NEUTRAL STRING STORAGE, PUSH DOWN STACK,
           INPUT BUFFER, AND FREE STORAGE.
00172/007  *UMIST                    /UTILITIES      SA             S1558 5.0T1 VLO FSNAME=UMIST./UTILITIES.SA.007(1)            509
            5.0T1   509  UMIST./UTILITIES.SA.007            1 LINE     77   24 PAGE UM   SALISBURY           SEP. 07, 1979  09:18:57
            5.0T1   509                       
0          "/UTILITIES" -- UTILITY FUNCTIONS, INCLUDING THE MAIN PROCESSOR, WHICH
           SUPPORT PRIMITIVE FUNCTIONS. THIS ASSEMBLY USES THE "SWPR" RPQ'ED
           INSTRUCTION. COPIES UMIST.SYMS (172/2) AND UMIST.PSECT (172/3).
00172/008  *UMIST                    /FCNS/1         SA             S1558 5.0T1 VLO FSNAME=UMIST./FCNS/1.SA.008(1)               510
            5.0T1   510  UMIST./FCNS/1.SA.008               1 LINE     71   27 PAGE UM   SALISBURY           SEP. 07, 1979  09:19:10
            5.0T1   510                       
0          "/FCNS/1" -- THE MOST IMPORTANT PRIMITIVE FUCNTIONS. COPIES UMIST.SYMS
           (172/2) AND UMIST.PSECT (172/3).
00172/009  *UMIST                    /FCNS/2         SA             S1558 5.0T1 VLO FSNAME=UMIST./FCNS/2.SA.009(1)               511
            5.0T1   511  UMIST./FCNS/2.SA.009               1 LINE     71   19 PAGE UM   SALISBURY           SEP. 07, 1979  09:19:24
            5.0T1   511                       
0          "/FCNS/2" -- MORE PRIMITIVE FUNCTIONS. COPIES UMIST.SYMS (172/2) AND
           UMIST.PSECT (172/3).
0          Referenced by comments of: 172/1, 172/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page   93
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00172/010  *UMIST                    TEST DECK       D              S1558 5.0T1 VLO FSNAME=UMIST.TEST_DECK.D.010(1)              512
            5.0T1   512  UMIST.TEST_DECK.D.010              1 LINE     80    3 PAGE UM   SALISBURY           SEP. 07, 1979  09:20:43
            5.0T1   512                       
0          "/TEST" COMPREHENSIVE TEST DECK FOR *UMIST. NOT PART OF UMIST ITSELF.
00172/011  *UMIST                    OBJECT          OE  G          *UMIST                                                          
            5.0T1   513  UMIST.OBJECT.OE.011                1 LINE  15736    8 PAGE UM   SALISBURY           JULY 03, 1981  12:53:50
            5.0T1   513  *UMIST               
0          LINKEDITED OBJECT OF (172/4) THROUGH (172/9). 
00175/001  *GPAKLIB                                  OL           # (OBSOLETE)                                                      
            D4T1    500  GPAKLIB..OL.                       1 SEQ    3888   40 DISK UM                       JAN. 22, 1973  18:22.11
00178/001  *PIL - OLD VERSION                        SA  S        # (OBSOLETE)                                                      
            D3T1    447  PIL..SA.1                          1 SEQ      80  215 PAGE UM                       JULY 31, 1973  00:38.27
0          Obsoleted by the new *PIL (566).
00179/001  *GPAKGRID                                 OC           # (OBSOLETE)                                                      
            D4T1    501  GPAKGRID..OC.                      1 LINE     80    7 DISK UM                       JAN. 22, 1973  22:06.14
00180/001   SCANDASD                                 SA           # (OBSOLETE)                                                      
            D2T1    117                                                             UM                                              
00182/001  *SNOBOL4                  MAIN            SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.MAIN.SA.001(1)                514
            5.0T1   514  SNOBOL4.MAIN.SA.001                1 SEQ      80  138 PAGE UM   SWARTZ              JULY 31, 1973  00:40.21
            5.0T1   514                       
0          BELL LABS SOURCE FOR VERSION 3.0 SNOBOL 4.
           COPIES MLINK (182/11), PARMS (182/12), AND MDATA (182/13).
0          Referenced by comments of: 182/6 
00182/002  *SNOBOL4                  SUBR            SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.SUBR.SA.002(1)                515
            5.0T1   515  SNOBOL4.SUBR.SA.002                1 SEQ      80   46 PAGE UM   SWARTZ              JULY 31, 1973  00:41.01
            5.0T1   515                       
0          BELL LABS SOURCE FOR SUBROUTINES.
00182/003  *SNOBOL4                  MACROS          SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.MACROS.SA.003(1)              516
            5.0T1   516  SNOBOL4.MACROS.SA.003              1 SEQ      80   41 PAGE UM   SWARTZ              JULY 31, 1973  00:44.08
            5.0T1   516                       
0          BELL LABS SOURCE FOR MACROS.
00182/004  *SNOBOL4                  GENERATE        C              S1558 5.0T1 VLO FSNAME=SNOBOL4.GENERATE.C.004(1)             517
            5.0T1   517  SNOBOL4.GENERATE.C.004             1 LINE    128    1 PAGE UM   SWARTZ              MAY  06, 1975  19:57:08
            5.0T1   517                       
0          MTS COMMANDS TO UPDATE, ASSEMBLE, AND TEST THE MTS VERSION OF SNOBOL4.
1                                                                                               SUN SEP 08/96   15:24:55   Page   94
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00182/005  *SNOBOL4                  LINKEDIT        C              S1558 5.0T1 VLO FSNAME=SNOBOL4.LINKEDIT.C.005(1)             518
            5.0T1   518  SNOBOL4.LINKEDIT.C.005             1 LINE     54    1 PAGE UM   SWARTZ              MAY  06, 1975  19:57:10
            5.0T1   518                       
0          MTS COMMANDS TO LINKEDIT, AND TEST THE MTS VERSION OF SNOBOL4.
00182/006  *SNOBOL4                  UPDATE          UU  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.UPDATE.UU.006(1)              519
            5.0T1   519  SNOBOL4.UPDATE.UU.006              1 LINE     80   23 PAGE UM   SWARTZ              APR. 30, 1975  22:36:24
            5.0T1   519                       
0          *UPDATE DECK TO MODIFIY BELL LABS SOURCE (182/1) TO BRING IT UP TO VERSION 3.10
           SNOBOL 4 AND TO ADD THE CHANGES NECESSARY TO RUN IT IN MTS.
00182/007  *SNOBOL4                  OBJECT          OE  G          *SNOBOL4                                                        
            5.0T1   520  SNOBOL4.OBJECT.OE.007              1 SEQ   32767   27 PAGE UM   SWARTZ              JULY 03, 1981  12:54:07
            5.0T1   520  *SNOBOL4             
0          OBJECT FROM ASSEMBLY OF MAIN AND SUBR, WHICH HAS BEEN COMBINED AND PURGED
           BY *LINKEDIT.
00182/008  *SNOBOL4                  MACLEAN         SP  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.MACLEAN.SP.008(1)             521
            5.0T1   521  SNOBOL4.MACLEAN.SP.008             1 SEQ      80    1 PAGE UM   SWARTZ              JULY 31, 1973  00:47.21
            5.0T1   521                       
0          SOURCE FOR A PROGRAM TO PROCESS THE MACRO LIBRARY AND COPY SECTIONS FOR A SNOBOL ASSEMBLY.
0          Referenced by comments of: 334/11 
00182/009  *SNOBOL4                  MACLEAN         OC  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.MACLEAN.OC.009(1)             522
            5.0T1   522  SNOBOL4.MACLEAN.OC.009             1 SEQ      80    2 PAGE UM   SWARTZ              JULY 31, 1973  00:47.23
            5.0T1   522                       
0          RUN THIS PLUS *PL1LIB.
00182/010  *SNOBOL4                  TEST PGMS       SS  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.TEST_PGMS.SS.010(1)           523
            5.0T1   523  SNOBOL4.TEST_PGMS.SS.010           1 LINE     72    3 PAGE UM   SWARTZ              APR. 30, 1975  22:36:43
            5.0T1   523                       
0          PROGRAMS FOR TESTING SNOBOL4.
00182/011  *SNOBOL4                  MLINK           SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.MLINK.SA.011(1)               524
            5.0T1   524  SNOBOL4.MLINK.SA.011               1 LINE     28    1 PAGE UM   SWARTZ              APR. 30, 1975  22:36:16
            5.0T1   524                       
0          COPY SECTION.
0          Referenced by comments of: 182/1, 334/1 
00182/012  *SNOBOL4                  PARMS           SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.PARMS.SA.012(1)               525
            5.0T1   525  SNOBOL4.PARMS.SA.012               1 LINE     68    1 PAGE UM   SWARTZ              APR. 30, 1975  22:36:18
            5.0T1   525                       
0          COPY SECTION.
1                                                                                               SUN SEP 08/96   15:24:55   Page   95
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 182/1, 334/1 
00182/013  *SNOBOL4                  MDATA           SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4.MDATA.SA.013(1)               526
            5.0T1   526  SNOBOL4.MDATA.SA.013               1 LINE     39    1 PAGE UM   SWARTZ              APR. 30, 1975  22:36:14
            5.0T1   526                       
0          COPY SECTION.
0          Referenced by comments of: 182/1, 334/1 
00191/001  *TRANSNOBOL                               SS  G          *TRANSNOBOL                                                     
            5.0T1   527  TRANSNOBOL..SS.001                 1 LINE     76    4 PAGE UM   SWARTZ              JULY 03, 1981  12:54:12
            5.0T1   527  *TRANSNOBOL          
0          CONVERT SNOBOL3 TO SNOBOL4. UNCHANGED SINCE DIST 1.
00193/001  *OSMAC                                    SM             *OSMAC                                                          
            5.0T1   528  OSMAC..SM.001                      1 LINE     72  159 PAGE UM   YOUNG               JULY 03, 1981  12:54:13
            5.0T1   528  *OSMAC               
0          MACRO LIBRARY FOR OS/360 RELEASE 21.0
0          Referenced by comments of: 193/2, 234/19, 458/1, 458/79, 545/3, 545/4, 545/8, 545/10, 545/12, 545/14, 545/15,
                 545/25, 545/27, 545/29, 545/31, 545/33, 545/35, 545/37, 545/39 
00193/002  *OSMAC                    BUILD PROGRAM   SA     MACB    W116:BUILDMAC.S                                                 
            5.0T1   529  OSMAC.BUILD_PROGRAM.SA.002         1 SEQ      80   11 PAGE UM   YOUNG               JULY 03, 1981  12:54:35
            5.0T1   529                       
0          THIS IS A PROGRAM TO BUILD *OSMAC (193/1).  IT READS NAMES OF MACROS (UP TO 255 CHARS PER LINE) FROM
           SCARDS, DELETING ANY NAMES WHICH ARE DUPLICATES OR WHICH ARE LONGER THAN 8 CHARS.  THE LIST
           OF MACRO NAMES IS TERMINATED BY AN END-OF-FILE FROM SCARDS.  THE NAMES ARE SORTED INTO 
           ALPHABETICAL ORDER AND THE MACRO TAPE IS THEN READ FROM LOGICAL I/O UNIT 0.
           THE SPECIFIED MACROS ARE WRITTEN IN THE MACRO LIBRARY FILE (LOGICAL I/O UNIT 1)
           BEGINNING AT LINE 3000.  THE READING IS TERMINATED WHEN ALL SPECIFIED MACROS HAVE BEEN
           FOUND OR WHEN 2 CONSEQUTIVE END-OF-FILES HAVE BEEN READ.  A DIRECTORY SHOWING THE STARTING
           LINE NUMBER FOR EACH MACRO IS PRINTED ON SPRINT.
            
           NORMALLY, THIS PROGRAM DELETES SEQUENCE ID FROM THE MACROS TO SAVE FILE SPACE (A LOT).
           STATEMENTS 201 AND 202 SHOULD BE DELETED IF SEQUENCE ID IS TO BE PRESERVED:
                    LA    1,72
                    STH   1,LEN
00193/003  *OSMAC                    BUILD PROGRAM   OC             W116:BUILDMAC                                                   
            5.0T1   530  OSMAC.BUILD_PROGRAM.OC.003         1 LINE     80    3 PAGE UM   YOUNG               JULY 03, 1981  12:54:36
            5.0T1   530                       
00196/001   PAGEIT                                   SA           # (OBSOLETE)                                                      
            D3T2      4  PAGEIT..SA.1                       1 LINE     80    3 PAGE UM                       JULY 31, 1973  20:59.23
0          Obsoleted by PAGLOAD (643).
1                                                                                               SUN SEP 08/96   15:24:55   Page   96
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00197/001A *SMDS                                     M              *SMDS                                                           
            5.1T1   203  SMDS..M.001                        1 LINE    168    7 PAGE UM   MTS                 JULY 23, 1983  10:19:37
                         *SMDS                
0          MTS MESSAGE FILE (SYSTEM MESSAGES DATA SET). USED IN CONJUNCTION
           WITH FMSG MACRO IN COPY:MTS.MACROS (344/3).
00197/002C *SMDS                     SMDSTBL GEN     SG  G          MTSS:GEN_SMDSTBL(1000,*L)                                       
            5.1T1   204  SMDS.SMDSTBL_GEN.SG.002            1 LINE     75    2 PAGE UM   MTS       BURLING   JULY 23, 1983  10:19:37
0          Program that scans *SMDS and produces an object deck (197/5) containing
           the messages from *SDMS to be read by the FMSG macro in COPY:MTS.MACROS
           (344/3).
0          Referenced by comments of: 197/4, 197/5 
00197/003C *SMDS                     SMDSTBL GEN     OC  G          MTSS:GEN_SMDSTBL(1,500)                                         
            5.1T1   205  SMDS.SMDSTBL_GEN.OC.003            1 LINE     80    3 PAGE UM   MTS       BURLING   JULY 23, 1983  10:19:38
00197/004C *SMDS                     SMDSTBL GEN     C   G          MTSS:GEN_SMDSTBL(0,.999)                                        
            5.1T1   206  SMDS.SMDSTBL_GEN.C.004             1 LINE     96    1 PAGE UM   MTS       BURLING   JULY 23, 1983  10:19:39
0          Source commands necessary to compile (197/2).
00197/005C *SMDS                     SMDSTBL         O   G        # (PART OF THE RESIDENT SYSTEM)                                   
                                                                                    UM   MTS       BURLING                          
0          The object deck, produced by the (197/2) program, containing the messages
           from *SMDS.  Part of the resident system.
            
           ****************************************************************************
           D5.0B version:
            
           At UM we've changed the FMSG macro in COPY:MTS.MACROS (344/3) so it
           no longer reads all its messages from *SMDS directly. The disk I/O
           was causing problems. We've written a program, Gen_smdstbl (197/2),
           that scans *SMDS and produces this subcomponent, an object deck
           containing the messages. FMSG searches here for messages first
           before looking in *SMDS.
           ****************************************************************************
0          Referenced by comments of: 197/2 
00198/001   GUINFO/CUINFO SUBRS      D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=INFO                        
            5.0T4   294  GUINFO/CUINFO_SUBRS.D5.0.SA.001    1 LINE     80   19 PAGE UM   MTS       BURLING   AUG. 09, 1981  22:49:16
            5.0T10  198                       
0          Subroutines to allow users to access (or change) certain information in the MTS dsect.
           Copies COPY:LLMPSEQU (087), COPY:JOBSTA (413/9), and COPY:GLOBALS (1026/3).
           Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and 
           COPY:SETPARM (653).
0          Referenced by comments of: 42/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page   97
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00198/002A  GUINFO/CUINFO SUBRS      UPDATE          UC  G          MTSS:INFO/UPD                                                   
            5.1T1   207  GUINFO/CUINFO_SUBRS.UPDAT.UC.002   1 LINE     82   15 PAGE UM   MTS       BURLING   JULY 23, 1983  10:19:39
0          *CDUPDATE input to produce current source.
00198/003A  GUINFO/CUINFO SUBRS                      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00198/004A  GUINFO/CUINFO SUBRS                      L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=INFO.LIST                 
            5.1T1   208  GUINFO/CUINFO_SUBRS..L.004         1 LINE    133   78 PAGE UM   MTS       BURLING   JULY 23, 1983  10:20:13
00198/005A  GUINFO/CUINFO SUBRS      COMMENTS        D   G          MTSS:INFO/COM                                                   
            5.1T1   209  GUINFO/CUINFO_SUBRS.COMME.D.005    1 LINE     67    1 PAGE UM   MTS       BURLING   JULY 23, 1983  10:20:14
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00200/001  *SDARTN                                   SA           # (OBSOLETE)                                                      
            D3T2      8  SDARTN..SA.1                       1 LINE     80   94 PAGE UM                       JULY 31, 1973  21:01.58
00201/001  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.001(1)              532
            5.0T1   532  GPSS.OS_SOURCE.SA.001              1 SEQ      80   20 PAGE UM   FLANIGAN            JULY 27, 1977  23:35:43
            5.0T1   532                       
0          THE MTS IMPLEMENTATION OF GPSS OFFERS SEVERAL FEATURES NOT PROVIDED BY THE IBM VERSION:
            
              1.  IMPROVED LISTING CONTROL WITH BATCH AND TERMINAL DEFAULTS.
              2.  LINE NUMBERS IN THE LISTING.
              3.  SENSIBLE CARRIAGE CONTROL (FAR FEWER PAGE SKIPS).
              4.  CAPABILITY OF DIRECTLY INTERFACING WITH SUBROUTINES THAT USE OS/I CALLING SEQUENCES.
              5.  SUBROUTINES TO ALLOW MANIPULATION OF GPSS DATA FROM FORTRAN PROGRAMS.
              6.  TIME ESTIMATES TO ALLOW ERROR OUTPUT TO BE PRINTED BEFORE MTS TERMINATES A JOB.
              7.  ATTENTION INTERRUPT CONTROL TO TELL THE USER WHERE HIS PROGRAM IS AND HOW MUCH HAS BEEN SPENT.
              8.  PADDING AND TRUNCATION OF JOBTAPES FOR DISK SPACE ECONOMY.
              9.  ERROR MESSAGE SUMMARY.
            
           THREE PRINCIPLE APPENDAGES ARE TACKED ONTO THE IBM MODULES TO MAKE THESE IMPROVEMENTS.  FIRST, A DRIVER PROGRAM
           IS PROVIDED TO SCAN THE PAR= FIELD AND SET-UP DEFAULTS; AND, AT THE CONCLUSION OF A RUN, TO PRINT AN ERROR
           SUMMARY WHERE APPROPRIATE.  SECOND, A SET OF INTERFACE SUBROUTINES PROVIDE A SIMULATED OS/360 ENVIRONMENT.
           ONE NOTABLE FEATURE OF THIS INTERFACE IS THAT SCRATCH FILE I/O IS IMPLEMENTED BY USE OF VIRTUAL MEMORY FILES.
           THIRD, A SET OF SMALL "HOOK" SUBROUTINES IS PROVIDED.  BECAUSE OF THE VOLATILITY OF THE RATHER POOR IBM
           CODE, SUCH FUNCTIONS AS IMPROVED LISTING CONTROL WERE IMPLEMENTED BY ASSEMBLING "HOOKS" INTO THE IBM CODE,
           EACH "HOOK" RESULTING IN A CALL TO A "HOOK" SUBROUTINE.  WHILE THE "HOOK" SUBROUTINES EXHIBIT WHAT WOULD
           APPEAR TO BE BAD PROGRAMMING PRACTICES (E.G. ABSOLUTE DISPLACEMENTS IN INSTRUCTIONS), THEY HAVE BEEN CODED
           IN SUCH A WAY AS TO BE INSENSITIVE TO REASSEMBLY OF THE IBM MODULES.
            
           COMPONENTS (201/1) THROUGH (201/11) ARE THE OS/360 SOURCE FOR GPSS VERSION 1 MODIFICATION LEVEL 3.
0          Referenced by comments of: 201/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page   98
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00201/002  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.002(1)              533
            5.0T1   533  GPSS.OS_SOURCE.SA.002              1 SEQ      80   11 PAGE UM   FLANIGAN            JULY 27, 1977  23:35:44
            5.0T1   533                       
00201/003  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.003(1)              534
            5.0T1   534  GPSS.OS_SOURCE.SA.003              1 SEQ      80    8 PAGE UM   FLANIGAN            JULY 27, 1977  23:35:46
            5.0T1   534                       
00201/004  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.004(1)              535
            5.0T1   535  GPSS.OS_SOURCE.SA.004              1 SEQ      80   62 PAGE UM   FLANIGAN            JULY 27, 1977  23:35:50
            5.0T1   535                       
00201/005  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.005(1)              536
            5.0T1   536  GPSS.OS_SOURCE.SA.005              1 SEQ      80  102 PAGE UM   FLANIGAN            JULY 27, 1977  23:35:55
            5.0T1   536                       
00201/006  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.006(1)              537
            5.0T1   537  GPSS.OS_SOURCE.SA.006              1 SEQ      80   22 PAGE UM   FLANIGAN            JULY 27, 1977  23:35:57
            5.0T1   537                       
00201/007  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.007(1)              538
            5.0T1   538  GPSS.OS_SOURCE.SA.007              1 SEQ      80   88 PAGE UM   FLANIGAN            JULY 27, 1977  23:36:02
            5.0T1   538                       
00201/008  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.008(1)              539
            5.0T1   539  GPSS.OS_SOURCE.SA.008              1 SEQ      80  112 PAGE UM   FLANIGAN            JULY 27, 1977  23:36:08
            5.0T1   539                       
00201/009  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.009(1)              540
            5.0T1   540  GPSS.OS_SOURCE.SA.009              1 SEQ      80  152 PAGE UM   FLANIGAN            JULY 27, 1977  23:36:16
            5.0T1   540                       
00201/010  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.010(1)              541
            5.0T1   541  GPSS.OS_SOURCE.SA.010              1 SEQ      80  109 PAGE UM   FLANIGAN            JULY 27, 1977  23:36:23
            5.0T1   541                       
00201/011  *GPSS                     OS SOURCE       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.011(1)              542
            5.0T1   542  GPSS.OS_SOURCE.SA.011              1 SEQ      80   57 PAGE UM   FLANIGAN            JULY 27, 1977  23:36:28
            5.0T1   542                       
0          Referenced by comments of: 201/1 
00201/012  *GPSS                     GPSSUPDATE      UU  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSSUPDATE.UU.012(1)             543
            5.0T1   543  GPSS.GPSSUPDATE.UU.012             1 LINE     80    7 PAGE UM   FLANIGAN            AUG. 13, 1974  15:30.13
            5.0T1   543                       
0          UPDATE DECK TO BE APPLIED TO 11 OS SOURCE FILES.  A TAPE-TO-TAPE UPDATE VIA *UPDATE
           USING *IBM* TO *MTS* IS ASSUMED.  THIS UPDATE PRODUCES VERSION 1, MOD 4 GPSS.
00201/013  *GPSS                     GPSS.OS.O       OE  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSS.OS.O.OE.013(1)              544
            5.0T1   544  GPSS.GPSS.OS.O.OE.013              1 LINE    255   43 PAGE UM   FLANIGAN            AUG. 13, 1974  15:28.34
            5.0T1   544                       
0          OBJECT CODE FOR 11 UPDATED IBM SOURCE FILES.
1                                                                                               SUN SEP 08/96   15:24:55   Page   99
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00201/014  *GPSS                     GPSSMAC         SM  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSSMAC.SM.014(1)                545
            5.0T1   545  GPSS.GPSSMAC.SM.014                1 LINE     80    8 PAGE UM   FLANIGAN            APR. 06, 1974  14:48.29
            5.0T1   545                       
0          MACRO LIBRARY NEEDED FOR ALL ASSEMBLIES.
00201/015  *GPSS                     GPSS.S          SA  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSS.S.SA.015(1)                 546
            5.0T1   546  GPSS.GPSS.S.SA.015                 1 LINE     80    7 PAGE UM   FLANIGAN            APR. 06, 1974  14:48.33
            5.0T1   546                       
0          SOURCE FOR MTS DRIVER PROGRAM.
00201/016  *GPSS                     GPSSPKG.S       SA  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSSPKG.S.SA.016(1)              547
            5.0T1   547  GPSS.GPSSPKG.S.SA.016              1 LINE     80    7 PAGE UM   FLANIGAN            APR. 06, 1974  14:48.38
            5.0T1   547                       
0          SOURCE FOR THE MTS INTERFACE SUBROUTINES WHICH SIMULATE OS/360 FUNCTIONS.
00201/017  *GPSS                     HOOKSECT.S      SA  G          S1558 5.0T1 VLO FSNAME=GPSS.HOOKSECT.S.SA.017(1)             548
            5.0T1   548  GPSS.HOOKSECT.S.SA.017             1 LINE     80   15 PAGE UM   FLANIGAN            APR. 06, 1974  14:48.50
            5.0T1   548                       
0          SOURCE FOR SUBROUTINES CALLED FROM "HOOKS" PLACED IN THE OS/360 CODE.
00201/018  *GPSS                     JUNK.S          SA  G          S1558 5.0T1 VLO FSNAME=GPSS.JUNK.S.SA.018(1)                 549
            5.0T1   549  GPSS.JUNK.S.SA.018                 1 LINE     80    3 PAGE UM   FLANIGAN            APR. 06, 1974  14:48.42
            5.0T1   549                       
0          SOURCE FOR SEVERAL SUBROUTINES.
00201/019  *GPSS                     GPSS.MTS.O      OE  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSS.MTS.O.OE.019(1)             550
            5.0T1   550  GPSS.GPSS.MTS.O.OE.019             1 LINE    255    7 PAGE UM   FLANIGAN            APR. 06, 1974  14:49.02
            5.0T1   550                       
0          OBJECT CODE FOR GPSS.S, GPSSPKG.S, HOOKSECT.S, AND JUNK.S.
00201/020  *GPSS                     *GPSS           OE  G          *GPSS                                                        543
            5.0T1   551  GPSS.*GPSS.OE.020                  1 SEQ   32767   34 PAGE UM   FLANIGAN            JULY 03, 1981  12:55:10
            5.0T1   551  *GPSS                
0          LINKEDIT OF GPSS.OS.O AND GPSS.MTS.O WITH ENTRY POINT ESD ITEMS PURGED.
           NOTE:  GPSS CALL THE FOLLOWING LIBRARY SUBROUTINES:  COST, SETIME, AND TIMNTRP.
00201/021  *GPSS                     GPSSLIB         SA  G          S1558 5.0T1 VLO FSNAME=GPSS.GPSSLIB.SA.021(1)                552
            5.0T1   552  GPSS.GPSSLIB.SA.021                1 LINE     80    8 PAGE UM   FLANIGAN            APR. 06, 1974  14:48.45
            5.0T1   552                       
0          SOURCE FOR SUBROUTINES WHICH ALLOW THE MANIPULATION OF GPSS DATA FROM FORTRAN SUBROUTINES.
00201/022  *GPSS                     *GPSSLIB        OC  G          *GPSSLIB                                                        
            5.0T1   553  GPSS.*GPSSLIB.OC.022               1 SEQ      80    1 PAGE UM   FLANIGAN            JULY 03, 1981  12:55:13
            5.0T1   553  *GPSSLIB             
1                                                                                               SUN SEP 08/96   15:24:55   Page  100
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00201/023  *GPSS                     *GPSSERR        M   G          *GPSSERR                                                        
            5.0T1   554  GPSS.*GPSSERR.M.023                1 LINE     73    9 PAGE UM   FLANIGAN            JULY 03, 1981  12:55:13
            5.0T1   554  *GPSSERR             
0          ERROR MESSAGE FILE.
00201/024  *GPSS                     TESTPROG        S   G          S1558 5.0T1 VLO FSNAME=GPSS.TESTPROG.S.024(1)                555
            5.0T1   555  GPSS.TESTPROG.S.024                1 LINE     80    1 PAGE UM   FLANIGAN            APR. 06, 1974  14:49.23
            5.0T1   555                       
0          SOURCE FOR TEST PROGRAM.
00201/025  *GPSS                     TESTOUTPUT      D   G          S1558 5.0T1 VLO FSNAME=GPSS.TESTOUTPUT.D.025(1)              556
            5.0T1   556  GPSS.TESTOUTPUT.D.025              1 LINE    129    3 PAGE UM   FLANIGAN            NOV. 02, 1974  13:57.22
            5.0T1   556                       
0          OUTPUT WHICH SHOULD BE OBTAINED FROM TEST PROGRAM.
00201/026  *GPSS                     NOTES           WF             S1558 5.0T1 VLO FSNAME=GPSS.NOTES.WF.026(1)                  557
            5.0T1   557  GPSS.NOTES.WF.026                  1 LINE    107    1 PAGE UM   FLANIGAN            MAR. 06, 1974  03:34.46
            5.0T1   557                       
0          WRITEUP DESCRIBING GPSS/360.
00204/001A  FORTRANG                 IEYFORT         SA  G          S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORT.S                       
            5.1T1   210  FORTRANG.IEYFORT.SA.001            1 LINE     71   11 PAGE UM   HANSEN              JUNE 02, 1983  18:59:30
0          THIS IS THE MTS VERSION OF THE CONTROL MODULE OF THE FORTRAN G COMPILER. IT INCORPORATES THE FUNCTIONS
           OF THE OS MODULES IEYFORT AND IEYFORT2.  THIS MODULE IS THE ENTRY POINT TO THE COMPILER.
            
           ****************************************************************************
           D5.1 version:
            
           Changed to use CONFIGINFO to locate virtual segments they use rather than
           having this built into the program.
           ****************************************************************************
0          Referenced by comments of: 551/1, 831/1 
00204/002A  FORTRANG                 IEYFORT         OC  G          S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORT.O                       
            5.1T1   211  FORTRANG.IEYFORT.OC.002            1 LINE     80    3 PAGE UM   HANSEN              JUNE 02, 1983  18:59:33
00204/003A  FORTRANG                 IEYFORTD        SA  G          S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORTD.S                      
            5.1T1   212  FORTRANG.IEYFORTD.SA.003           1 LINE     71   11 PAGE UM   HANSEN              JUNE 03, 1983  16:05:03
0          THIS IS THE CONTROL MODULE OF THE COMPILER VERSION WHICH PRODUCES SYM RECORDS.
           IT OBTAINS SYMBOL STORAGE IN SEGMENT 6 AND COMPILER STORAGE IN SEGMENTS 7 AND
           ABOVE, GREATLY REDUCING THE CHANCE OF A COMPILER PROGRAM INTERRUPT.
0          Referenced by comments of: 204/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  101
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00204/004A  FORTRANG                 IEYFORTD        OC  G          S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORTD.O                      
            5.1T1   213  FORTRANG.IEYFORTD.OC.004           1 LINE     80    3 PAGE UM   HANSEN              JUNE 03, 1983  16:05:25
00204/005   FORTRANG                 IEYALL          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYALL.SA.005(1)             562
            5.0T1   562  FORTRANG.IEYALL.SA.005             1 LINE     80   87 PAGE UM   HANSEN              OCT. 06, 1975  14:36:02
            5.0T1   562                       
0          FORTRAN G ALLOCATE MODULE.  COPIES IEYPSCT (204/27).  ASSEMBLE USING IEYMACROS
           (204/23).
00204/006   FORTRANG                 IEYALL          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYALL.OC.006(1)             563
            5.0T1   563  FORTRANG.IEYALL.OC.006             1 LINE     80    4 PAGE UM   HANSEN              JUNE 01, 1976  11:26:38
            5.0T1   563                       
00204/007   FORTRANG                 IEYEXT          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYEXT.SA.007(1)             564
            5.0T1   564  FORTRANG.IEYEXT.SA.007             1 LINE     80   60 PAGE UM   HANSEN              OCT. 06, 1975  14:36:23
            5.0T1   564                       
0          FORTRAN G EXIT MODULE.  COPIES IEYPSCT (204/27).  ASSEMBLE USING IEYMACROS (204/23).
00204/008   FORTRANG                 IEYEXT          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYEXT.OC.008(1)             565
            5.0T1   565  FORTRANG.IEYEXT.OC.008             1 LINE     80    4 PAGE UM   HANSEN              JUNE 01, 1976  11:26:43
            5.0T1   565                       
00204/009   FORTRANG                 IEYGEN          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYGEN.SA.009(1)             566
            5.0T1   566  FORTRANG.IEYGEN.SA.009             1 LINE     80  171 PAGE UM   HANSEN              OCT. 06, 1975  14:37:56
            5.0T1   566                       
0          FORTRAN G CODE GENERATION MODULE.  COPIES IEYPSCT (204/27).  ASSEMBLE USING
           IEYMACROS (204/23).
00204/010   FORTRANG                 IEYGEN          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYGEN.OC.010(1)             567
            5.0T1   567  FORTRANG.IEYGEN.OC.010             1 LINE     80    8 PAGE UM   HANSEN              JUNE 01, 1976  11:26:47
            5.0T1   567                       
00204/011   FORTRANG                 IEYINT          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYINT.SA.011(1)             568
            5.0T1   568  FORTRANG.IEYINT.SA.011             1 LINE     80    3 PAGE UM   HANSEN              OCT. 06, 1975  14:38:23
            5.0T1   568                       
0          FORTRAN G POP INTERPRETER.  COPIES IEYDINT (204/24).  ASSEMBLE USING IEYMACROS
           (204/23).
00204/012   FORTRANG                 IEYINT          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYINT.OC.012(1)             569
            5.0T1   569  FORTRANG.IEYINT.OC.012             1 LINE     80    4 PAGE UM   HANSEN              JUNE 01, 1976  11:26:51
            5.0T1   569                       
00204/013   FORTRANG                 IEYPAR          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPAR.SA.013(1)             570
            5.0T1   570  FORTRANG.IEYPAR.SA.013             1 LINE     80  188 PAGE UM   HANSEN              NOV. 13, 1975  09:23:17
            5.0T1   570                       
0          FORTRAN G PARSER MODIFIED TO ALLOW AN ARBITRARY NUMBER OF COMMENTS BETWEEN ANY
           TWO STATEMENTS.  COPIES IEYDINT (204/24).  ASSEMBLE USING IEYMACROS (204/23).
1                                                                                               SUN SEP 08/96   15:24:55   Page  102
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00204/014   FORTRANG                 IEYPAR          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPAR.OC.014(1)             571
            5.0T1   571  FORTRANG.IEYPAR.OC.014             1 LINE     80    9 PAGE UM   HANSEN              JUNE 01, 1976  11:26:55
            5.0T1   571                       
0          Contains REP cards which have been incorporated into the source.
00204/015   FORTRANG                 IEYROL          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYROL.SA.015(1)             572
            5.0T1   572  FORTRANG.IEYROL.SA.015             1 LINE     80   11 PAGE UM   HANSEN              OCT. 06, 1975  14:39:13
            5.0T1   572                       
0          FORTRAN G ROLL CONTROL MODULE FOR COMPILER WORKSPACE.  ASSEMBLE USING IEYMACROS
           (204/23).
00204/016   FORTRANG                 IEYROL          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYROL.OC.016(1)             573
            5.0T1   573  FORTRANG.IEYROL.OC.016             1 LINE     80    4 PAGE UM   HANSEN              JUNE 01, 1976  11:27:00
            5.0T1   573                       
00204/017   FORTRANG                 IEYOPT          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYOPT.SA.017(1)             574
            5.0T1   574  FORTRANG.IEYOPT.SA.017             1 LINE     68    3 PAGE UM   HANSEN              OCT. 08, 1975  16:28:22
            5.0T1   574                       
0          THIS IS AN OPTION SCANNER CALLED BY IEYFORT TO PARSE THE PAR FIELD.
00204/018   FORTRANG                 IEYOPT          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYOPT.OC.018(1)             575
            5.0T1   575  FORTRANG.IEYOPT.OC.018             1 LINE    255    1 PAGE UM   HANSEN              OCT. 08, 1975  16:31:46
            5.0T1   575                       
00204/019   FORTRANG                 IEYUNF          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYUNF.SA.019(1)             576
            5.0T1   576  FORTRANG.IEYUNF.SA.019             1 LINE     80   35 PAGE UM   HANSEN              OCT. 06, 1975  14:39:38
            5.0T1   576                       
0          FORTRAN G "UNIFY" MODULE.  COPIES IEYPSCT (204/27).  ASSEMBLE USING IEYMACROS
           (204/23).
00204/020   FORTRANG                 IEYUNF          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYUNF.OC.020(1)             577
            5.0T1   577  FORTRANG.IEYUNF.OC.020             1 LINE     80    8 PAGE UM   HANSEN              JUNE 01, 1976  11:27:04
            5.0T1   577                       
00204/021   FORTRANG                 IEYSYM          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYSYM.SA.021(1)             578
            5.0T1   578  FORTRANG.IEYSYM.SA.021             1 LINE     72   15 PAGE UM   HANSEN              DEC. 15, 1975  12:43:24
            5.0T1   578                       
0          THIS IS THE SYM CARD PRODUCING MODULE.  IT IS CALLED BY IEYFORTD (204/3).
00204/022   FORTRANG                 IEYSYM          OC  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYSYM.OC.022(1)             579
            5.0T1   579  FORTRANG.IEYSYM.OC.022             1 LINE     80    4 PAGE UM   HANSEN              DEC. 15, 1975  12:43:35
            5.0T1   579                       
00204/023   FORTRANG                 IEYMACROS       SM  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYMACROS.SM.023(1)          580
            5.0T1   580  FORTRANG.IEYMACROS.SM.023          1 LINE     80   62 PAGE UM   HANSEN              OCT. 08, 1975  16:29:23
            5.0T1   580                       
0          THE MACRO LIBRARY NEEDED TO ASSEMBLE ALL OS MODULES OF FORTRAN G, I.E. EVERYTHING
           EXCEPT IEYFORT, IEYFORTD, IEYOPT, AND IEYSYM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  103
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 204/5, 204/7, 204/9, 204/11, 204/13, 204/15, 204/19 
00204/024   FORTRANG                 IEYDINT         SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYDINT.SA.024(1)            581
            5.0T1   581  FORTRANG.IEYDINT.SA.024            1 LINE     80   34 PAGE UM   HANSEN              OCT. 08, 1975  16:30:07
            5.0T1   581                       
0          A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G.
0          Referenced by comments of: 204/11, 204/13 
00204/025   FORTRANG                 IEYMID          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYMID.SA.025(1)             582
            5.0T1   582  FORTRANG.IEYMID.SA.025             1 LINE     80    1 PAGE UM   HANSEN              OCT. 08, 1975  16:29:36
            5.0T1   582                       
0          A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G.
00204/026   FORTRANG                 IEYPRF          SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPRF.SA.026(1)             583
            5.0T1   583  FORTRANG.IEYPRF.SA.026             1 LINE     80    1 PAGE UM   HANSEN              OCT. 08, 1975  16:29:45
            5.0T1   583                       
0          A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G.
00204/027   FORTRANG                 IEYPSCT         SA  G          S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPSCT.SA.027(1)            584
            5.0T1   584  FORTRANG.IEYPSCT.SA.027            1 LINE     80    5 PAGE UM   HANSEN              OCT. 08, 1975  16:30:00
            5.0T1   584                       
0          A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G.
0          Referenced by comments of: 204/5, 204/7, 204/9, 204/19 
00204/028A  FORTRANG                 *FORTRANG       OE  G          *FORTRANG                                                       
            5.1T1   214  FORTRANG.?FORTRANG.OE.028          1 SEQ   32767   16 PAGE UM   HANSEN              JULY 23, 1983  10:22:11
                         *FORTRANG            
0          THE LINKEDITED OBJECT OF THE REGULAR (NON-TEST) FORTRAN G COMPILER.
           IT INCLUDES IEYFORT, IEYALL, IEYEXT, IEYINT, IEYGEN, IEYOPT, IEYPAR, IEYROL, AND IEYUNF.
            
           ****************************************************************************
           D5.1 version:
            
           Changed to use CONFIGINFO to locate virtual segments they use rather than
           having this built into the program.
           ****************************************************************************
00204/029A  FORTRANG                 TEST OBJECT     OE  G          *FTNGTEST                                                       
            5.1T1   215  FORTRANG.TEST_OBJECT.OE.029        1 SEQ   32767   17 PAGE UM   HANSEN              JULY 23, 1983  10:22:11
                         *FTNGTEST            
0          THE LINKEDITED OBJECT OF THE SYM CARD PRODUCING VERSION OF THE FORTRAN G COMPILER.
           IT INCLUDES IEYFORTD, IEYALL, IEYEXT, IEYINT, IEYGEN, IEYOPT, IEYPAR, IEYROL, IEYSYM, AND IEYUNF.
1                                                                                               SUN SEP 08/96   15:24:55   Page  104
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00210/001A *LISP                                     SA  G          WATF:LISP.MHRI                                                  
            5.1T1   216  LISP..SA.001                       1 LINE     71  105 PAGE UM   MTA                 JULY 23, 1983  10:22:12
0          NEW LISP INTERPRETER WRITTEN BY UM MENTAL HEALTH RESEARCH INSTITUTE.
           THE OLD OS/360 LISP IS NOW USED ONLY IN CONJUNCTION WITH REDUCE2 (556).
            
           ********************************************************************************
           D5.0B version:
            
           Bug fixed.
           ********************************************************************************
00210/002A *LISP                                     OE  G          *LISP                                                           
            5.1T1   217  LISP..OE.002                       1 LINE  32767   28 PAGE UM   MTA                 JULY 23, 1983  10:22:17
                         *LISP                
00210/003  *LISP                     TRANSIT         SA  G          C4541C GO FSNAME=TRANSIT.ASMG                                   
            5.0T1   589  LISP.TRANSIT.SA.003                1 LINE     93    7 PAGE UM   MTA                 JAN. 06, 1979  12:43:54
            5.0T1   589                       
0          THIS COMPONENT CONTAINS THE "HYPOTHETICAL WORLDS" FUNCTIONS, RPLACA2, RPLACD2,
           SETA2, NEWWORLD, REALWORLD, GETWORLD.
00210/004C *LISP                     TRANSIT         S   O          WATF:TRANSPORT.FI                                               
            5.1T1   218  LISP.TRANSIT.S.004                 1 LINE    104    2 PAGE UM   MTA                 JULY 23, 1983  10:22:18
0          Definitions for 3 functions left out of the TRANSIT package.  To install
           these, restore the TRANSIT package, define and compile these, and checkpoint
           the new TRANSIT package.
00210/005  *LISP                     EDITOR          S   G          C4541C GO FSNAME=EDIT.LISP                                      
            5.0T1   590  LISP.EDITOR.S.004                  1 LINE    152    6 PAGE UM   MTA                 JAN. 06, 1979  12:43:25
            5.0T1   590                       
0          THIS COMPONENT CONTAINS THE LISP SOURCE FOR A LISP DATA STRUCTURE EDITOR.
           IT WAS WRITTEN AT UBC AND IS DOCUMENTED IN MTS VOLUME 8.
00210/006  *LISP                     BREAK           S   G          C4541C GO FSNAME=DEBUG.LISP                                     
            5.0T1   591  LISP.BREAK.S.005                   1 LINE    126    5 PAGE UM   MTA                 JAN. 06, 1979  12:42:46
            5.0T1   591                       
0          THIS COMPONENT CONTAINS THE LISP SOURCE FOR A LISP DEBUGGING PACKAGE.
           IT WAS WRITTEN AT UBC AND IS DOCUMENTED IN MTS VOLUME 8.
00210/007  *LISP                     COMPILER        S   G          C4541C GO FSNAME=COMPILER.LISP                                  
            5.0T1   592  LISP.COMPILER.S.006                1 LINE    116   29 PAGE UM   MTA                 DEC. 07, 1979  09:48:26
            5.0T1   592                       
0          THIS IS THE LISP SOURCE FOR THE LISP COMPILER.
1                                                                                               SUN SEP 08/96   15:24:55   Page  105
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00210/008A *LISP                     *LISPLIB        O   G          *LISPLIB                                                        
            5.1T1   219  LISP.?LISPLIB.O.008                1 LINE  32517   75 PAGE UM   MTA                 JULY 23, 1983  10:22:18
                         *LISPLIB             
0          THIS IS A SEQ FILE WHICH CONTAINS CHECKPOINTED VERSIONS OF LESS FREQUENTLY
           USED FUNCTIONS IN A FORMAT UNDERSTOOD ONLY BY THE LISP INTERPRETER.
           IT CURRENTLY CONTAINS THE SUBCOMPONENTS TRANSIT, EDITOR, BREAK, AND COMPILER.
00212/001  *FILESNIFF                                SA  G        # (OBSOLETE)                                                      
            D3T2     49  FILESNIFF..SA.1                    1 LINE     80    6 PAGE UM                       JULY 31, 1973  21:17.52
0          Obsoleted by the FILESTATUS command (529).
00217/001  *LIBTOFASTLIB                             S            # (OBSOLETE)                                                      
            D2T1    289                                                             UM                                              
00220/001  *GOMAD                                    S            # (OBSOLETE)                                                      
            D2T1    293                                                             UM                                              
00221/001  **TP                                      S            # (OBSOLETE)                                                      
            D2T1    140                                                             UM                                              
00223/001   SIOERR SUBR                              SA  G          S1558 5.0T1 VLO FSNAME=SIOERR_SUBR..SA.001(1)                594
            5.0T1   594  SIOERR_SUBR..SA.001                1 LINE     80    1 PAGE UM   MTA                 JULY 27, 1977  23:54:04
            5.0T1   594                       
0          FORTRAN INTERFACE TO SETIOERR.
00223/002   SIOERR SUBR                              OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   MTA                                        
0           
           Object part of *LIBRARY (524/1)
00225/001A *SYSMAC                                   SM  G          MTA:SYSMAC                                                      
            5.1T1   220  SYSMAC..SM.001                     1 LINE     73  162 PAGE UM   MTA                 JULY 23, 1983  10:22:21
0          MTS general system macro library for *ASMH.  This version is the same as
           *SYSMAC on the test pack (225/2) except that the comments have not been
           removed.
0          Referenced by comments of: 648/1 
00225/002A *SYSMAC                                   SM  G          *SYSMAC                                                         
            5.1T1   221  SYSMAC..SM.002                     1 LINE     73  119 PAGE UM   MTA                 JULY 23, 1983  10:22:28
                         *SYSMAC              
0          Referenced by comments of: 225/1 
00225/003A *SYSMAC                   TEST PGM 1      SA  G          MTA:TESTIOMAC                                                   
            5.1T1   222  SYSMAC.TEST_PGM_1.SA.003           1 LINE     72   11 PAGE UM   MTA                 JULY 23, 1983  10:22:32
0          TEST PROGRAM FOR MANY MACROS IN *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  106
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00225/004  *SYSMAC                   TEST PGM 2      SA  G          MTA:TESTMINMAX                                                  
            5.0T1   598  SYSMAC.TEST_PGM_2.SA.004           1 LINE     45    3 PAGE UM   MTA                 JULY 03, 1981  12:58:00
            5.0T1   598                       
0          TESTS MIN AND MAX MACROS.
00229/001  *TIDY                                     SF           # (OBSOLETE)                                                      
            D4T1    589  TIDY..SF.001                       1 SEQ      80   60 PAGE UM                       JULY 31, 1973  21:20.10
0          Obsoleted by *FTNTIDY (727).
0          Referenced by comments of: 727/1 
00231/001  *GRAPHLIB                                 SA           # (OBSOLETE)                                                      
            D4T1    591  GRAPHLIB..SA.                      1 SEQ      80  211 PAGE UM                       JULY 31, 1973  21:21.10
00233/001   PL1 LIBRARY              MACLIB          SM  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.MACLIB.SM.001(1)          599
            5.0T1   599  PL1_LIBRARY.MACLIB.SM.001          1 LINE     80   66 PAGE UM   TIFFANY             JULY 27, 1977  23:22:48
            5.0T1   599                       
0          Subcomponents (233/1) through (233/12) are older versions of the I/O routines
           also distributed in the PL1 compiler, components (163/1) through (163/12).
           They are being distributed as a part of the PL1 library since they will not
           be added to the library, work upon which has been frozen due to the arrival
           of the PL1 Optimizing Compiler (813).
            
           MACLIB is a macro library for the simulation of OS/360 stuff in MTS.
0          Referenced by comments of: 233/1, 233/41 
00233/002   PL1 LIBRARY              SAMEQU          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SAMEQU.SA.002(1)          600
            5.0T1   600  PL1_LIBRARY.SAMEQU.SA.002          1 SEQ      80    4 PAGE UM   TIFFANY             JULY 27, 1977  23:23:35
            5.0T1   600                       
0          COPY SECTION FOR OS SIMULATION PACKAGE. COPIED BY SEVERAL PARTS OF PL1 SOURCE
0          Referenced by comments of: 233/3, 233/4, 233/5, 233/6, 233/7, 233/8, 233/9, 233/10, 233/11, 233/32 
00233/003   PL1 LIBRARY              REPLACE         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.REPLACE.SA.003(1)         601
            5.0T1   601  PL1_LIBRARY.REPLACE.SA.003         1 SEQ      80    3 PAGE UM   TIFFANY             JULY 27, 1977  23:23:36
            5.0T1   601                       
0          ROUTINE TO REPLACE A TIOT, ATTACHING ANYTHING TO AN MTS LOGICAL I/O UNIT IF APPLICABLE.
           COPIES SAMEQU (233/2).
00233/004   PL1 LIBRARY              CKLIO           SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CKLIO.SA.004(1)           602
            5.0T1   602  PL1_LIBRARY.CKLIO.SA.004           1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  23:23:38
            5.0T1   602                       
0          ROUTINE TO CHECK IF A NAME IS AN MTS LOGICAL I/O UNIT.  COPIES SAMEQU (233/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  107
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00233/005   PL1 LIBRARY              NONSENSE        SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.NONSENSE.SA.005(1)        603
            5.0T1   603  PL1_LIBRARY.NONSENSE.SA.005        1 SEQ      80    3 PAGE UM   TIFFANY             JULY 27, 1977  23:23:40
            5.0T1   603                       
0          ROUTINE TO SAY THAT SOMETHING DOES NOT EXIST OR IS NOT AVAILABLE.  COPIES SAMEQU (233/2).
00233/006   PL1 LIBRARY              FREEDDEF        SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.FREEDDEF.SA.006(1)        604
            5.0T1   604  PL1_LIBRARY.FREEDDEF.SA.006        1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  23:23:43
            5.0T1   604                       
0          ROUTINE TO FREE ALL DDEF'S.  COPIES SAMEQU (233/2).
00233/007   PL1 LIBRARY              FINDTIOT        SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.FINDTIOT.SA.007(1)        605
            5.0T1   605  PL1_LIBRARY.FINDTIOT.SA.007        1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  23:23:45
            5.0T1   605                       
0          ROUTINE TO FIND A TIOT GIVEN A "DDNAME."  COPIES SAMEQU (233/2).
00233/008   PL1 LIBRARY              DDEF            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.DDEF.SA.008(1)            606
            5.0T1   606  PL1_LIBRARY.DDEF.SA.008            1 SEQ      80    8 PAGE UM   TIFFANY             JULY 27, 1977  23:23:48
            5.0T1   606                       
0          ROUTINE TO PROCESS DDEF COMMANDS AND GET A TIOT FOR EACH.  COPIES SAMEQU (233/2).
00233/009   PL1 LIBRARY              OPEN            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.OPEN.SA.009(1)            607
            5.0T1   607  PL1_LIBRARY.OPEN.SA.009            1 SEQ      80   16 PAGE UM   TIFFANY             MAY  13, 1978  17:06:25
            5.0T1   607                       
0          SIMULATE OS/360 OPEN.  CURRENTLY ONLY BSAM AND QSAM ARE SUPPORTED.  COPIES
           SAMEQU (233/2).
00233/010   PL1 LIBRARY              ROUT            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ROUT.SA.010(1)            608
            5.0T1   608  PL1_LIBRARY.ROUT.SA.010            1 SEQ      80   26 PAGE UM   TIFFANY             MAY  13, 1978  17:06:27
            5.0T1   608                       
0          LIST OF VARIOUS ROUTINES.  COPIES SAMEQU (233/2).
00233/011   PL1 LIBRARY              CLOSE           SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CLOSE.SA.011(1)           609
            5.0T1   609  PL1_LIBRARY.CLOSE.SA.011           1 SEQ      80    4 PAGE UM   TIFFANY             JULY 27, 1977  23:23:56
            5.0T1   609                       
0          SIMULATE OS/360 CLOSE.  COPIES SAMEQU (233/2).
00233/012   PL1 LIBRARY              QUIT            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.QUIT.SA.012(1)            610
            5.0T1   610  PL1_LIBRARY.QUIT.SA.012            1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  23:23:57
            5.0T1   610                       
0          QUIT ONLY IN BATCH
0          Referenced by comments of: 233/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  108
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00233/013   PL1 LIBRARY              PL1MACLIB       SM  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.PL1MACLIB.SM.013(1)       611
            5.0T1   611  PL1_LIBRARY.PL1MACLIB.SM.013       1 LINE     80   13 PAGE UM   TIFFANY             JULY 27, 1977  23:56:02
            5.0T1   611                       
0          MACRO LIBRARY FOR PL/I LIBRARY ROUTINES.
0          Referenced by comments of: 233/41 
00233/014   PL1 LIBRARY              SNAP            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SNAP.SA.014(1)            612
            5.0T1   612  PL1_LIBRARY.SNAP.SA.014            1 SEQ      80    3 PAGE UM   TIFFANY             JULY 27, 1977  23:56:16
            5.0T1   612                       
0          SUBROUTINES TO DUMP.  USED BY IHEDUMP.
00233/015   PL1 LIBRARY              CNTL            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CNTL.SA.015(1)            613
            5.0T1   613  PL1_LIBRARY.CNTL.SA.015            1 SEQ      80    2 PAGE UM   TIFFANY             JULY 27, 1977  23:56:17
            5.0T1   613                       
0          SUBROUTINE TO INTERFACE BETWEEN PL/I PROGRAMS AND MTS 'CONTROL' SUBROUTINE.
00233/016   PL1 LIBRARY              RAND            SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.RAND.SA.016(1)            614
            5.0T1   614  PL1_LIBRARY.RAND.SA.016            1 LINE     80    2 PAGE UM   TIFFANY             JULY 28, 1977  00:03:58
            5.0T1   614                       
0          RANDOM NUMBER GENERATOR
00233/017   PL1 LIBRARY              USERID          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.USERID.SA.017(1)          615
            5.0T1   615  PL1_LIBRARY.USERID.SA.017          1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:00
            5.0T1   615                       
0          RUN TIME SUBR
00233/018   PL1 LIBRARY              BATCH           SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.BATCH.SA.018(1)           616
            5.0T1   616  PL1_LIBRARY.BATCH.SA.018           1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:02
            5.0T1   616                       
0          RUN TIME SUBROUTINE TO CALL CANREPLY
00233/019   PL1 LIBRARY              ELAPSED         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ELAPSED.SA.019(1)         617
            5.0T1   617  PL1_LIBRARY.ELAPSED.SA.019         1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:05
            5.0T1   617                       
0          RUN TIME SUBROUTINE
00233/020   PL1 LIBRARY              CPUTIME         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CPUTIME.SA.020(1)         618
            5.0T1   618  PL1_LIBRARY.CPUTIME.SA.020         1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:07
            5.0T1   618                       
0          RUN TIME SUBROUTINE
1                                                                                               SUN SEP 08/96   15:24:55   Page  109
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00233/021   PL1 LIBRARY              UN-QSAM         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.UN-QSAM.SA.021(1)         619
            5.0T1   619  PL1_LIBRARY.UN-QSAM.SA.021         1 LINE     80   18 PAGE UM   TIFFANY             JULY 27, 1977  01:52:09
            5.0T1   619                       
0          I/O ROUTINES FOR NON-STANDARD PL/I FILES -- IHEITB
00233/022   PL1 LIBRARY              KEY             SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.KEY.SA.022(1)             620
            5.0T1   620  PL1_LIBRARY.KEY.SA.022             1 SEQ      80    2 PAGE UM   TIFFANY             JULY 27, 1977  01:52:12
            5.0T1   620                       
0          NEXTKEY AND LASTKEY
00233/023   PL1 LIBRARY              ATTACH          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ATTACH.SA.023(1)          621
            5.0T1   621  PL1_LIBRARY.ATTACH.SA.023          1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:14
            5.0T1   621                       
0          PROGRAM TO CALL DDEF AT RUN TIME
00233/024   PL1 LIBRARY              DISPLAY         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.DISPLAY.SA.024(1)         622
            5.0T1   622  PL1_LIBRARY.DISPLAY.SA.024         1 SEQ      80    2 PAGE UM   TIFFANY             JULY 27, 1977  01:52:16
            5.0T1   622                       
0          REPLACEMENT FOR AN IBM SUBROUTINE.  OUTPUT ON SERCOM, INPUT FROM GUSER.
00233/025   PL1 LIBRARY              IHEMAIN         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEMAIN.SA.025(1)         623
            5.0T1   623  PL1_LIBRARY.IHEMAIN.SA.025         1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:19
            5.0T1   623                       
0          MAIN PROGRAM IF USER DOES NOT GIVE ONE
0          Referenced by comments of: 233/43 
00233/026   PL1 LIBRARY              IHEOST          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEOST.SA.026(1)          624
            5.0T1   624  PL1_LIBRARY.IHEOST.SA.026          1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:21
            5.0T1   624                       
0          GIVES TIME AND DATE.
00233/027   PL1 LIBRARY              SIGNOFF         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SIGNOFF.SA.027(1)         625
            5.0T1   625  PL1_LIBRARY.SIGNOFF.SA.027         1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:23
            5.0T1   625                       
0          RUN TIME SUBR
00233/028   PL1 LIBRARY              SYSERR          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SYSERR.SA.028(1)          626
            5.0T1   626  PL1_LIBRARY.SYSERR.SA.028          1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:26
            5.0T1   626                       
0          SYSTEM AND ERROR
1                                                                                               SUN SEP 08/96   15:24:55   Page  110
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00233/029   PL1 LIBRARY              IHELTT          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHELTT.SA.029(1)          627
            5.0T1   627  PL1_LIBRARY.IHELTT.SA.029          1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:28
            5.0T1   627                       
0          TRANSFER VECTOR TABLE IN *PL1LIB.
00233/030   PL1 LIBRARY              IHELTV          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHELTV.SA.030(1)          628
            5.0T1   628  PL1_LIBRARY.IHELTV.SA.030          1 SEQ      80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:30
            5.0T1   628                       
0          TRANSFER VECTOR TABLE IN SHAREDPL1LIB.
00233/031   PL1 LIBRARY              IHESAP          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHESAP.SA.031(1)          629
            5.0T1   629  PL1_LIBRARY.IHESAP.SA.031          1 LINE     80    8 PAGE UM   TIFFANY             JULY 27, 1977  01:52:32
            5.0T1   629                       
0          PL/I PROGRAM INITIALIZER.
0          Referenced by comments of: 233/43 
00233/032   PL1 LIBRARY              FINFO           SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.FINFO.SA.032(1)           630
            5.0T1   630  PL1_LIBRARY.FINFO.SA.032           1 SEQ      80    4 PAGE UM   TIFFANY             JULY 27, 1977  01:52:35
            5.0T1   630                       
0          ROUTINE TO GET INFORMATION FOR A PL/I FILE.  COPIES SAMEQU (233/2).
00233/033   PL1 LIBRARY              READ/WRITE      SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.READ/WRITE.SA.033(1)      631
            5.0T1   631  PL1_LIBRARY.READ/WRITE.SA.033      1 SEQ      80    5 PAGE UM   TIFFANY             JULY 27, 1977  01:52:38
            5.0T1   631                       
0          ROUTINES IHEREAD AND IHERITE.
00233/034   PL1 LIBRARY              NOTE/POINT      SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.NOTE/POINT.SA.034(1)      632
            5.0T1   632  PL1_LIBRARY.NOTE/POINT.SA.034      1 SEQ      80    2 PAGE UM   TIFFANY             JULY 27, 1977  01:52:40
            5.0T1   632                       
0          SUBROUTINE TO INTERFACE BETWEEN PL/I PROGRAMS AND THE MTS SUBROUTINES 'NOTE' AND 'POINT'.
00233/035   PL1 LIBRARY              PLCALL ET AL    SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.PLCALL_ET_AL.SA.035(1)    633
            5.0T1   633  PL1_LIBRARY.PLCALL_ET_AL.SA.035    1 LINE     80    6 PAGE UM   ENGLE               MAY  17, 1976  14:28:46
            5.0T1   633                       
0          SUBROUTINES PCALL, PLCALLD, PLCALLE, AND PLCALLF ENABLE A PL1 PROGRAM TO CALL SUBROUTINES
           WHICH REQUIRE THE NORMAL FTN OR ASM S-TYPE CALLING SEQUENCE.
           THE SUBROUTINES PL1ADR AND PL1RC ARE ALSO ENTRY POINTS TO THIS PROGRAM.
00233/036   PL1 LIBRARY              IHEATTN         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEATTN.SA.036(1)         634
            5.0T1   634  PL1_LIBRARY.IHEATTN.SA.036         1 LINE     80    9 PAGE UM   TIFFANY             JULY 27, 1977  01:52:50
            5.0T1   634                       
0          ASSEMBLE USING *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  111
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00233/037   PL1 LIBRARY              IHEZZZZZ        SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEZZZZZ.SA.037(1)        635
            5.0T1   635  PL1_LIBRARY.IHEZZZZZ.SA.037        1 LINE     80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:52:52
            5.0T1   635                       
0          A NULL-LENGTH CONTROL SECTION TO BE PLACED AT THE END OF SHAREDPL1LIB FOR THE
           BENEFIT OF SDS.
00233/038   PL1 LIBRARY              CALLPL1         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CALLPL1.SA.038(1)         636
            5.0T1   636  PL1_LIBRARY.CALLPL1.SA.038         1 LINE     72   10 PAGE UM   TIFFANY             JULY 27, 1977  01:52:55
            5.0T1   636                       
0          SUBROUTINES PL1SUB, PL1FCN, IPLFCN, PLDFCN, I2FCN, CPXFCN, CDFCN, LGLFCN,
           LG1FCN, PL1BEG, PL1END, AND IPL1RC WHICH CAN BE USED BY NON-PL1 PROGRAMS
           TO CALL PL1 PROCEDURES.
0          Referenced by comments of: 233/43 
00233/039   PL1 LIBRARY              MAXLEN          SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.MAXLEN.SA.039(1)          637
            5.0T1   637  PL1_LIBRARY.MAXLEN.SA.039          1 LINE     80    1 PAGE UM   TIFFANY             JULY 27, 1977  01:54:07
            5.0T1   637                       
0          MAXLEN OBTAINS THE MAXIMUM LENGTH FOR A GIVEN PL/1 CHARACTER VARYING STRING.
00233/040   PL1 LIBRARY              IHEDBNA         SA  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEDBNA.SA.040(1)         638
            5.0T1   638  PL1_LIBRARY.IHEDBNA.SA.040         1 SEQ      80    4 PAGE UM   TIFFANY             MAY  13, 1978  17:07:38
            5.0T1   638                       
0          THIS REPLACES THE IBM VERSION OF IHEDBNA WHICH CAUSED ADDRESSABILITY
           INTERRUPTS, ESPECIALLY IN *LINKEDIT WHILE CONVERTING BIT STRINGS TO
           ARITHMETIC VALUES.
00233/041   PL1 LIBRARY              UPDATE          UI  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.UPDATE.UI.041(1)          639
            5.0T1   639  PL1_LIBRARY.UPDATE.UI.041          1 LINE     73    9 PAGE UM   TIFFANY             JULY 27, 1977  01:54:11
            5.0T1   639                       
0          *IEBUPDAT INPUT TO PRODUCE CURRENT MTS PL1 LIBRARY FROM IBM RELEASE 21.8.
           THE RESULT OF THIS ASSEMBLY SHOULD BE ASSEMBLED USING THE FOLLOWING MACRO
           LIBRARIES (IN THE ORDER GIVEN):  PL1MACLIB (233/13), MACLIB (233/1), AND
           *SYSMAC.
00233/042   PL1 LIBRARY              ENDPL1LIB       OC  G          S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ENDPL1LIB.OC.042(1)       640
            5.0T1   640  PL1_LIBRARY.ENDPL1LIB.OC.042       1 LINE     24    1 PAGE UM   TIFFANY             JULY 27, 1977  01:54:14
            5.0T1   640                       
0          CONTAINS 5 LOADER CARDS (RIP PL1SYM, RIP IHEPRD, LCS LCSYMBOL, LCS PL1SYM, LCSPR IHEPRD).
00233/043   PL1 LIBRARY              *PL1LIB         OL  G          *PL1LIB                                                         
            5.0T1   641  PL1_LIBRARY.*PL1LIB.OL.043         1 SEQ    2642    3 PAGE UM   TIFFANY             JULY 03, 1981  12:59:29
            5.0T1   641  *PL1LIB              
0          NON-REENTRANT PART OF RUN-TIME LIBRARY; THE REMAINDER IS IN SHAREDPL1LIB.
           NOTE:  IHEMAIN (233/25) MUST COME AFTER BOTH IHESAP (233/31) AND CALLPL1
                  (233/38) IN THE DIR RECORD FOR THIS LIBRARY.
1                                                                                               SUN SEP 08/96   15:24:55   Page  112
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 326/6 
00233/044   PL1 LIBRARY              SHAREDPL1LIB    OE  G          SEG2:SHAREDPL1LIB                                               
            5.0T1   642  PL1_LIBRARY.SHAREDPL1LIB.OE.044    1 LINE    256   58 PAGE UM   TIFFANY             JULY 03, 1981  12:59:30
            5.0T1   642  SEG2:SHAREDPL1LIB    
0          REENTRANT PART OF RUN-TIME LIBRARY; LOADED INTO SHARED VM AT IPL BY PISTLE.
           CONTAINS IHEPRD WHICH IS SET UP CORRECTLY BY CRELCSPR (506/2).
00233/045   PL1 LIBRARY              UNSP PREAD      SA  G  PREA    S1153 UNSP VLO FSNAME=PREAD.S                                   
            5.0T1   643  PL1_LIBRARY.UNSP_PREAD.SA.045      1 LINE     80    3 PAGE UM   UNSP                NOV. 09, 1975  19:29:47
            5.0T1   643                       
0          THE FOLLOWING PROCEDURES CONSTITUTE THE UM "UNSUPPORTED" PL/1 LIBRARY.
            
           PREAD ALLOWS THE MTS READ SUBROUTINE TO BE CALLED FROM A PL/1 PROGRAM WITHOUT
           USING PLCALL.
00233/046   PL1 LIBRARY              UNSP PWRITE     SA  G  PWRI    S1153 UNSP VLO FSNAME=PWRITE.S                                  
            5.0T1   644  PL1_LIBRARY.UNSP_PWRITE.SA.046     1 LINE     80    3 PAGE UM   UNSP                NOV. 09, 1975  19:29:40
            5.0T1   644                       
0          PWRITE ALLOWS THE MTS WRITE SUBROUTINE TO BE CALLED FROM A PL/1 PROGRAM WITHOUT
           USING PLCALL.
00233/047   PL1 LIBRARY              UNSP SETLEN     SA  O  SETL    S1153 UNSP VLO FSNAME=SETLEN.S                                  
            5.0T1   645  PL1_LIBRARY.UNSP_SETLEN.SA.047     1 LINE     80    1 PAGE UM   UNSP                NOV. 09, 1975  19:30:07
            5.0T1   645                       
0          SETLEN RESETS THE LENGTH OF A PL/1 CHARACTER VARYING STRING.
00233/048   PL1 LIBRARY              UNSP LIBRARY    OL  O          UNSP:PL1LIB                                                     
            5.0T1   646  PL1_LIBRARY.UNSP_LIBRARY.OL.048    1 LINE    105    1 PAGE UM   UNSP                JULY 03, 1981  13:00:51
            5.0T1   646  UNSP:PL1LIB          
00233/049   PL1 LIBRARY              UNSP LIBRARY    WF             S1153 UNSP VLO FSNAME=PL1LIB.FMT                                
            5.0T1   647  PL1_LIBRARY.UNSP_LIBRARY.WF.049    1 LINE     81    4 PAGE UM   UNSP                SEP. 15, 1980  16:43:35
            5.0T1   647                       
00234/001   8ASR                     8ASRMAC         SM  G          S1558 5.0T1 VLO FSNAME=8ASR.8ASRMAC.SM.001(1)                648
            5.0T1   648  8ASR.8ASRMAC.SM.001                1 LINE     80   16 PAGE UM                       JUNE 02, 1976  20:37:42
            5.0T1   648                       
0          MACRO LIBRARY FOR DEC ASSEMBLERS.
0          Referenced by comments of: 234/4, 234/6 
00234/002   8ASR                     8ASREQU.C       SA  G          S1558 5.0T1 VLO FSNAME=8ASR.8ASREQU.C.SA.002(1)              649
            5.0T1   649  8ASR.8ASREQU.C.SA.002              1 LINE     80    4 PAGE UM                       JULY 19, 1977  11:33:37
            5.0T1   649                       
0          COPY SECTION.
0          Referenced by comments of: 234/4, 234/6 
1                                                                                               SUN SEP 08/96   15:24:55   Page  113
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00234/003   8ASR                     8ASRST.C        SA  G          S1558 5.0T1 VLO FSNAME=8ASR.8ASRST.C.SA.003(1)               650
            5.0T1   650  8ASR.8ASRST.C.SA.003               1 LINE     80    7 PAGE UM                       JULY 19, 1977  11:34:01
            5.0T1   650                       
0          COPY SECTION.
0          Referenced by comments of: 234/4, 234/6 
00234/004   8ASR                     MAIN PROGRAM    SA  G          S1558 5.0T1 VLO FSNAME=8ASR.MAIN_PROGRAM.SA.004(1)           651
            5.0T1   651  8ASR.MAIN_PROGRAM.SA.004           1 LINE     99   33 PAGE UM                       JULY 19, 1977  11:34:21
            5.0T1   651                       
0          MAIN PROGRAM FOR *8ASR, *9ASR, AND *1ASR.
           COPIES 8ASREQU.C (234/2) AND 8ASRST.C (234/3) AND REQUIRES 8ASRMAC (234/1).
0          Referenced by comments of: 234/6 
00234/005   8ASR                     MAIN PROGRAM    OC  G          S1558 5.0T1 VLO FSNAME=8ASR.MAIN_PROGRAM.OC.005(1)           652
            5.0T1   652  8ASR.MAIN_PROGRAM.OC.005           1 LINE     80   10 PAGE UM                       JULY 19, 1977  11:34:41
            5.0T1   652                       
0          Referenced by comments of: 234/10, 234/13, 234/18 
00234/006   8ASR                     SUBROUTINES     SA  G          S1558 5.0T1 VLO FSNAME=8ASR.SUBROUTINES.SA.006(1)            653
            5.0T1   653  8ASR.SUBROUTINES.SA.006            1 LINE    105   10 PAGE UM                       JUNE 02, 1976  20:41:06
            5.0T1   653                       
0          SUBROUTINES USED BY (234/4). COPIES 8ASREQU.C (234/2) AND 8ASRST.C (234/3)
           AND REQUIRES 8ASRMAC (234/1).
00234/007   8ASR                     SUBROUTINES     OC  G          S1558 5.0T1 VLO FSNAME=8ASR.SUBROUTINES.OC.007(1)            654
            5.0T1   654  8ASR.SUBROUTINES.OC.007            1 LINE     80    5 PAGE UM                       JUNE 02, 1976  20:41:13
            5.0T1   654                       
0          Referenced by comments of: 234/10, 234/13, 234/18 
00234/008   8ASR                     PDP-8 OP TBLS   SA  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP-8_OP_TBLS.SA.008(1)          655
            5.0T1   655  8ASR.PDP-8_OP_TBLS.SA.008          1 LINE     99    4 PAGE UM                       JUNE 02, 1976  20:41:53
            5.0T1   655                       
0          ASSEMBLY TO DEFINE PDP-8 OPERATION CODES FOR *8ASR.
00234/009   8ASR                     PDP-8 OP TBLS   OC  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP-8_OP_TBLS.OC.009(1)          656
            5.0T1   656  8ASR.PDP-8_OP_TBLS.OC.009          1 LINE     80    5 PAGE UM                       JUNE 02, 1976  20:42:06
            5.0T1   656                       
0          Referenced by comments of: 234/10 
00234/010   8ASR                     *8ASR           OE  G          *8ASR                                                           
            5.0T1   657  8ASR.*8ASR.OE.010                  1 SEQ   11502    7 PAGE UM                       JULY 03, 1981  13:01:24
            5.0T1   657  *8ASR                
0          OBJECT CONSISTING OF (234/5) + (234/7) + (234/9).
1                                                                                               SUN SEP 08/96   15:24:55   Page  114
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00234/011   8ASR                     PDP-9 OP TBLS   SA  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP-9_OP_TBLS.SA.011(1)          658
            5.0T1   658  8ASR.PDP-9_OP_TBLS.SA.011          1 LINE     99    4 PAGE UM                       JUNE 02, 1976  20:42:18
            5.0T1   658                       
0          ASSEMBLY TO DEFINE PDP-9 OPERATION CODES FOR *9ASR.
00234/012   8ASR                     PDP-9 OP TBLS   OC  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP-9_OP_TBLS.OC.012(1)          659
            5.0T1   659  8ASR.PDP-9_OP_TBLS.OC.012          1 LINE     80    5 PAGE UM                       JUNE 02, 1976  20:42:26
            5.0T1   659                       
0          Referenced by comments of: 234/13 
00234/013   8ASR                     *9ASR           OE  G          *9ASR                                                           
            5.0T1   660  8ASR.*9ASR.OE.013                  1 SEQ   11502    7 PAGE UM                       JULY 03, 1981  13:01:26
            5.0T1   660  *9ASR                
0          OBJECT CONSISTING OF (234/5) + (234/7) + (234/12).
00234/014   8ASR                     PDP-1 OP TBLS   SA  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP-1_OP_TBLS.SA.014(1)          661
            5.0T1   661  8ASR.PDP-1_OP_TBLS.SA.014          1 LINE     99    5 PAGE UM                       JUNE 02, 1976  20:42:35
            5.0T1   661                       
0          ASSEMBLY TO DEFINE PDP-1 OPERATION CODES FOR *1ASR.
00234/015   8ASR                     PDP-1 OP TBLS   OC  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP-1_OP_TBLS.OC.015(1)          662
            5.0T1   662  8ASR.PDP-1_OP_TBLS.OC.015          1 LINE     80    6 PAGE UM                       JUNE 02, 1976  20:42:43
            5.0T1   662                       
0          Referenced by comments of: 234/18 
00234/016   8ASR                     FRIDEN TR TBL   SA             S1558 5.0T1 VLO FSNAME=8ASR.FRIDEN_TR_TBL.SA.016(1)          663
            5.0T1   663  8ASR.FRIDEN_TR_TBL.SA.016          1 LINE     99    3 PAGE UM                       JUNE 02, 1976  20:42:57
            5.0T1   663                       
0          ASSEMBLY TO DEFINE TRANSLATE TABLE FOR FRIDEN TERMINAL USED IN CONNECTION WITH *1ASR.
00234/017   8ASR                     FRIDEN TR TBL   OC             S1558 5.0T1 VLO FSNAME=8ASR.FRIDEN_TR_TBL.OC.017(1)          664
            5.0T1   664  8ASR.FRIDEN_TR_TBL.OC.017          1 LINE     80    3 PAGE UM                       JUNE 02, 1976  20:43:05
            5.0T1   664                       
0          Referenced by comments of: 234/18 
00234/018   8ASR                     *1ASR           OE  G          *1ASR                                                           
            5.0T1   665  8ASR.*1ASR.OE.018                  1 SEQ   11986    7 PAGE UM                       JULY 03, 1981  13:01:29
            5.0T1   665  *1ASR                
0          OBJECT CONSISTING OF (234/5) + (234/7) + (234/15) + (234/17).
00234/019   8ASR                     OS INTERFACE    SA             S1558 5.0T1 VLO FSNAME=8ASR.OS_INTERFACE.SA.019(1)           666
            5.0T1   666  8ASR.OS_INTERFACE.SA.019           1 LINE     80    8 PAGE UM                       JUNE 29, 1973  21:38.49
            5.0T1   666                       
0          SUBROUTINES TO PROVIDE MTS ENVIRONMENT FOR 8ASR IN OS/360.  NOT COMPLETELY CHECKED OUT.
           OBJECT NOT DISTRIBUTED.  ASSEMBLE USING *OSMAC (193) OR USE OS/360.
1                                                                                               SUN SEP 08/96   15:24:55   Page  115
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00234/020A  8ASR                     LINK EDITOR     SA  G          W002:8LINK.S                                                    
            5.1T1   223  8ASR.LINK_EDITOR.SA.020            1 LINE     80   77 PAGE UM   KRAUSE              JULY 23, 1983  10:22:34
0          Program to linkedit relocatable PDP-8 object to produce loadable file or tape.
           Copies 8PANEL (234/24).
            
           *******************************************************************
           D5.1 version:
            
           Changed to run with PROT=ON.
           *******************************************************************
00234/021A  8ASR                     LINK EDITOR     OC  G          W002:8LINK                                                      
            5.1T1   224  8ASR.LINK_EDITOR.OC.021            1 LINE   3756   15 PAGE UM   KRAUSE              JULY 23, 1983  10:22:39
0          Referenced by comments of: 234/25 
00234/022   8ASR                     PDP8 SIMULATOR  SA  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP8_SIMULATOR.SA.022(1)         669
            5.0T1   669  8ASR.PDP8_SIMULATOR.SA.022         1 LINE     80   28 PAGE UM                       JUNE 29, 1973  21:42.44
            5.0T1   669                       
0          PDP-8 SIMULATOR SECTION OF *8LINK.  COPIES 8PANEL (234/24).
00234/023   8ASR                     PDP8 SIMULATOR  OC  G          S1558 5.0T1 VLO FSNAME=8ASR.PDP8_SIMULATOR.OC.023(1)         670
            5.0T1   670  8ASR.PDP8_SIMULATOR.OC.023         1 LINE     80    2 DISK UM                       JUNE 29, 1973  21:47.24
            5.0T1   670                       
0          Referenced by comments of: 234/25 
00234/024   8ASR                     8PANEL          SA  G          S1558 5.0T1 VLO FSNAME=8ASR.8PANEL.SA.024(1)                 671
            5.0T1   671  8ASR.8PANEL.SA.024                 1 LINE     80    3 PAGE UM                       JUNE 29, 1973  21:43.27
            5.0T1   671                       
0          COPY SECTION.
0          Referenced by comments of: 234/20, 234/22 
00234/025A  8ASR                     *8LINK          OE  G          *8LINK                                                          
            5.1T1   225  8ASR.?8LINK.OE.025                 1 SEQ    3756   13 PAGE UM   KRAUSE              JULY 23, 1983  10:22:40
                         *8LINK               
0          LINK EDIT OF (234/21) + (234/23).
00234/026   8ASR                     MEMO 329        WF             S1558 5.0T1 VLO FSNAME=8ASR.MEMO_329.WF.026(1)               673
            5.0T1   673  8ASR.MEMO_329.WF.026               1 LINE    234   32 PAGE UM                       JAN. 24, 1977  21:23:27
            5.0T1   673                       
0          THIS IS COMPUTING CENTER MEMO 329 -- "*8ASR PDP-8 ASSEMBLER AND *8LINK LINK
           EDITOR AND LOADER"
00238/001  *2250PLOT                                 SA           # (OBSOLETE)                                                      
            D4T1    654  2250PLOT..SA.                      1 SEQ      80    4 PAGE UM                       JULY 31, 1973  21:29.07
1                                                                                               SUN SEP 08/96   15:24:55   Page  116
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00241/001  *TRACK                                    SA           # (OBSOLETE)                                                      
            D4T1    655  TRACK..SA.                         1 SEQ      80    8 PAGE UM                       JULY 31, 1973  21:29.51
00243/001   BINEBCD                                  SA  G          S1558 5.0T1 VLO FSNAME=BINEBCD..SA.001(1)                    674
            5.0T1   674  BINEBCD..SA.001                    1 LINE     80    4 PAGE UM   MTA                 JULY 27, 1977  02:04:19
            5.0T1   674                       
0          SUBROUTINE TO CONVERT AN EBCDIC CARD WHICH WAS READ IN COLUMN BINARY BACK TO EBCDIC.  CALLED BY *2501RTN (086)
           AND BY HASP (387).  THIS VERSION DOES NO ERROR CHECKING.
0          Referenced by comments of: 86/1 
00243/002   BINEBCD                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00243/003   BINEBCD                                  SA  G          S1558 5.0T1 VLO FSNAME=BINEBCD..SA.003(1)                    675
            5.0T1   675  BINEBCD..SA.003                    1 LINE     80    4 PAGE UM   MTA                 JULY 27, 1977  02:04:21
            5.0T1   675                       
0          SAME SUBROUTINE, BUT WITH ERROR CHECKING.  OBJECT NOT DISTRIBUTED.
00244/001  **CT                                                   # (OBSOLETE)                                                      
            D2T1    138                                                             UM                                              
00249/001  *COPY                                     SA           # (OBSOLETE)                                                      
            D4T1    658  COPY..SA.001                       1 LINE     80    4 PAGE UM                       JULY 27, 1977  02:04:23
00251/001  *IEBUPDAT                                 SP  O          S1558 5.0T1 VLO FSNAME=IEBUPDAT..SP.001(1)                   676
            5.0T1   676  IEBUPDAT..SP.001                   1 SEQ      80    3 PAGE UM   TIFFANY             JULY 31, 1973  21:31.45
            5.0T1   676                       
0          A PROGRAM TO COPY TAPES CONTAINING CARD IMAGES CONFORMING TO THE IBM IEBUPDAT OR IEBUPDTE PROGRAMS.
           THIS PROGRAM WILL MAKE INSERTIONS AND DELETIONS.
00251/002  *IEBUPDAT                                 OC  O          *IEBUPDAT                                                       
            5.0T1   677  IEBUPDAT..OC.002                   1 LINE     80    5 PAGE UM   TIFFANY             JULY 03, 1981  13:01:39
            5.0T1   677  *IEBUPDAT            
0          ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD.
00251/003C *IEBUPDAT                 MEMO 449        PF  G          S0672 CCMEMO 'CCMEMOS'                                      294 
            5.1T1   226  IEBUPDAT.MEMO_449.PF.003           1 LINE     80   12 PAGE UM   YOUNG               JUNE 28, 1983  10:31:21
0          This is Computing Center Memo 449 -- "IBM Operating System Utility
           Programs."  Documents IEBUPDAT, IEHMOVE (291), VSSPDSBUILD (1078/54),
           and UNLINKER (562).
0          Referenced by comments of: 291/1, 562/1, 1078/56 
1                                                                                               SUN SEP 08/96   15:24:55   Page  117
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00253/001   LINE DIRECTORY SORT                      SA           # (OBSOLETE)                                                      
            D2T1    121                                                             UM                                              
0          Obsoleted by *VALIDATEFILE (546).
00254/001   BSLOAD                                   SA  G        # (OBSOLETE)                                                      
            D3.1T1  192  BSLOAD..SA.1                       1 LINE     80   26 PAGE UM                       MAR. 06, 1974  03:34.57
00256/001   STATISTICS COMBINE       *CMB            C              *CMB                                                            
            5.0T1   678  STATISTICS_COMBINE.*CMB.C.001      1 LINE     31    1 PAGE UM   WSG                 JULY 03, 1981  13:01:40
            5.0T1   678  *CMB                 
0          Command file to run STATISTICS COMBINE program (256/2). Invoked by
           entering "MTS *CMB" on the operator's console.
00256/002   STATISTICS COMBINE       COMBINE PGM     SA  G          S1558 5.0T1 VLO FSNAME=STATISTICS_COMBINE.COMBIN.SA.002(1)   679
            5.0T1   679  STATISTICS_COMBINE.COMBIN.SA.002   1 LINE     80    7 PAGE UM   WSG                 OCT. 02, 1978  11:48:07
            5.0T1   679                       
0          Program to combine and block MTS statistics tapes as produced by
           *STA (050/1). Program will ask for tape drive where output tape is
           mounted, then ask for input tape drive names. Combine process is
           ended by entering "DONE" for an input drive name. This program
           produces tapes which are blocked in a rather non-standard manner.
           However, most system programs which read *STATISTICS data are
           capable of deblocking these tapes. Source in lines 1,999.
0          Referenced by comments of: 256/1 
00256/003   STATISTICS COMBINE       COMBINE PGM     OC  G          SYS:CMB                                                         
            5.0T1   680  STATISTICS_COMBINE.COMBIN.OC.003   1 LINE     80    2 PAGE UM   WSG                 JULY 03, 1981  13:01:45
            5.0T1   680  SYS.:CMB             
00257/001  *MOMS                                     OC           # (NOT DISTRIBUTED)                                               
            D3T2    123  MOMS..OC.                          1 LINE    255   12 DISK UM                       FEB. 22, 1973  17:18.51
00258/001   RECEIPT CARDS            *RCP            C              *RCP                                                            
            5.0T1   681  RECEIPT_CARDS.*RCP.C.001           1 LINE     31    1 PAGE UM   DONNELLY            JULY 03, 1981  13:01:46
            5.0T1   681  *RCP                 
0          COMMAND FILE TO RUN BATCH RECEIPT (S-8) CARD GENERATOR PROGRAM (258/3).
           INVOKED BY ENTERING "MTS *RCP" FROM OPERATORS CONSOLE.
00258/002A  RECEIPT CARDS            RECEIPT PGM     SA     RECP    W035:RCP                                                        
            5.1T1   227  RECEIPT_CARDS.RECEIPT_PGM.SA.002   1 LINE     80    5 PAGE UM   DONNELLY            JULY 23, 1983  10:26:34
0          PROGRAM TO GENERATE MTS BATCH RECEIPT CARDS.
00258/003A  RECEIPT CARDS            RECEIPT PGM     OC             SYS:RCP                                                         
            5.1T1   228  RECEIPT_CARDS.RECEIPT_PGM.OC.003   1 LINE   1646    1 PAGE UM   DONNELLY            JULY 23, 1983  10:26:35
                         SYS.:RCP             
0          Referenced by comments of: 258/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  118
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00259/001  *LIST                                     SA           # (OBSOLETE)                                                      
            D2T1    332                                                             UM                                              
00260/001   SSP                                                   # (NOT DISTRIBUTED)                                               
            D3T2    127                                                             UM                                              
00261/001   SLIP                     SLIP FTN        SF  G          S1558 5.0T1 VLO FSNAME=SLIP.SLIP_FTN.SF.001(1)               684
            5.0T1   684  SLIP.SLIP_FTN.SF.001               1 LINE     84   25 PAGE UM   MTA                 DEC. 21, 1975  20:30:52
            5.0T1   684                       
0          SLIP IS A LIBRARY OF FORTRAN-CALLABLE SUBROUTINES FOR LIST PROCESSING.
           SEE THE DESCRIPTION IN THE CACM V.6, N.9, SEPT/63, PP 524-544.  THERE ARE
           TWO SEPARATE IMPLEMENTATIONS IN MTS:  *SLIP IS THE NORMAL DOUBLE-WORD
           VERSION, "LITTLE SLIP" (UNSP:LSLIPLIB) IS A SINGLE-PRECISION VERSION.
            
           THIS SUB-COMPONENT IS THE FORTRAN SOURCE FOR *SLIP.
00261/002   SLIP                     SLIP PRIM       SA  G          S1558 5.0T1 VLO FSNAME=SLIP.SLIP_PRIM.SA.002(1)              685
            5.0T1   685  SLIP.SLIP_PRIM.SA.002              1 LINE     79    4 PAGE UM   MTA                 MAY  03, 1977  15:46:19
            5.0T1   685                       
0          THIS IS THE ASSEMBLY SOURCE FOR *SLIP PRIMITIVES. CONTAINS MTS COMMANDS AT
           THE FRONT OF THE FILE FOR ASSEMBLY.
00261/003   SLIP                     *SLIP           OL  G          *SLIP                                                           
            5.0T1   686  SLIP.*SLIP.OL.003                  1 SEQ    2040   37 PAGE UM   MTA                 JULY 03, 1981  13:01:50
            5.0T1   686  *SLIP                
00261/004   SLIP                     *SLIPDEC        SF  G  SDEC    *SLIPDEC                                                        
            5.0T1   687  SLIP.*SLIPDEC.SF.004               1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  13:01:52
            5.0T1   687  *SLIPDEC             
0          THIS IS A SET OF FORTRAN DECLARATIONS FOR ALL SLIP FUNCTIONS.  IT IS TO BE
           USED BY PROGRAMS WHICH CALL THE *SLIP PACKAGE.
00261/005   SLIP                     LSLIP FTN       SF  O          S1153 UNSP VLO FSNAME=LSLIP.S                                   
            5.0T1   688  SLIP.LSLIP_FTN.SF.005              1 LINE     84   30 PAGE UM   UNSP                JUNE 22, 1976  16:35:26
            5.0T1   688                       
0          THIS SUB-COMPONENT IS THE FORTRAN SOURCE FOR THE "LITTLE SLIP" PACKAGE.
0          Referenced by comments of: 261/7 
00261/006   SLIP                     LSLIP LIBRARY   OL  O          UNSP:LSLIPLIB                                                   
            5.0T1   689  SLIP.LSLIP_LIBRARY.OL.006          1 LINE    946   36 PAGE UM   UNSP                JULY 03, 1981  13:02:06
            5.0T1   689  UNSP:LSLIPLIB        
00261/007   SLIP                     LSLIP LIBRARY   P              UNSP:LSLIPLIB.W                                                 
            5.0T1   690  SLIP.LSLIP_LIBRARY.P.007           1 LINE     69    1 PAGE UM   UNSP                JULY 03, 1981  13:02:09
            5.0T1   690                       
0          A WRITEUP FOR (261/5).
1                                                                                               SUN SEP 08/96   15:24:55   Page  119
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00265/001  *1                                        SM             *1                                                              
            5.0T1   691  1..SM.001                          1 LINE     80   31 PAGE UM   SALISBURY           JULY 03, 1981  13:02:10
            5.0T1   691  *1                   
0          MACRO LIBRARY FOR LIST PROCESSING IN ASSEMBLY LANGUAGE.  SIMILAR TO L6.
00267/001  *DOWNDATE                                 SA  O          S1558 5.0T1 VLO FSNAME=DOWNDATE..SA.001(1)                   692
            5.0T1   692  DOWNDATE..SA.001                   1 LINE     80    9 PAGE UM   MTA                 JULY 27, 1977  02:09:53
            5.0T1   692                       
0          THE INVERSE OF *UPDATE. WILL PRODUCE AN UPDATE DECK FROM TWO SOURCE TAPES.
           CALLS SCANPAR SUBROUTINE (267/3).
0          Referenced by comments of: 267/3 
00267/002  *DOWNDATE                                 OE  O          *DOWNDATE                                                       
            5.0T1   693  DOWNDATE..OE.002                   1 LINE   2626    2 PAGE UM   MTA                 JULY 03, 1981  13:02:15
            5.0T1   693  *DOWNDATE            
0          INCLUDES SCANPAR (267/3) OBJECT.
0          Referenced by comments of: 267/4 
00267/003  *DOWNDATE                 SCANPAR         SA             S1558 5.0T1 VLO FSNAME=DOWNDATE.SCANPAR.SA.003(1)            694
            5.0T1   694  DOWNDATE.SCANPAR.SA.003            1 LINE     80    3 PAGE UM   MTA                 JULY 27, 1977  02:09:57
            5.0T1   694                       
0          SUBROUTINE CALLED BY DOWNDATE (267/1) AND UNEDIT (561/1) TO SCAN PARAMETERS.
0          Referenced by comments of: 267/1, 267/2, 561/1 
00267/004  *DOWNDATE                 SCANPAR         OC           # (PART OF *DOWNDATE)                                             
            D4T1    678  DOWNDATE.SCANPAR.OC.004            1 LINE     80    1 PAGE UM   MTA                 JULY 27, 1977  02:09:59
            D4T2    191                       
0          Part of *DOWNDATE (267/2).
00268/001   @TESTITP                                 S            # (OBSOLETE)                                                      
            D2T1    421                                                             UM                                              
00270/001   DISMOUNT SUBR                            SA  G        # (PART OF MTS/FSUB)                                              
            5.0T1   695  DISMOUNT_SUBR..SA.001              1 LINE     70    3 PAGE UM                       JULY 03, 1981  13:02:16
            5.0T1   695                       
00271/001   MOUNT SUBR                                            # (OBSOLETE)                                                   680
            D4T1    680  MOUNT_SUBR..SA.001                 1 LINE     80    3 PAGE UM                       DEC. 01, 1976  12:50:44
0          Now part of the MOUNT command (101).
00273/001   FPC                                      SA  G          S1558 5.0T1 VLO FSNAME=FPC..SA.001(1)                        697
            5.0T1   697  FPC..SA.001                        1 LINE     80    6 PAGE UM   WSG                 JULY 31, 1973  21:33.40
            5.0T1   697                       
0          SUBROUTINES E7090, D7090, E7090P, D7090P TO CONVERT IBM 7090 SERIES FLOATING POINT NUMBERS TO SYSTEM/360
1                                                                                               SUN SEP 08/96   15:24:55   Page  120
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          LONG AND SHORT FORM.
00273/002   FPC                                      OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   WSG                                        
0           
           Object part of *LIBRARY (524/1)
00274/001   GLINT                                    S            # (NOT DISTRIBUTED)                                               
            D2T1    395                                                             UM                                              
00275/001   BITWISE LOGIC - IHCLOGIC                 SA  G          S1558 5.0T1 VLO FSNAME=BITWISE_LOGIC_-_IHCLOGIC..SA.001(1)   698
            5.0T1   698  BITWISE_LOGIC_-_IHCLOGIC..SA.001   1 LINE     80    4 PAGE UM   TIFFANY             SEP. 15, 1977  18:53:12
            5.0T1   698                       
0          SUBROUTINES AND, LAND, OR, LOR, XOR, LXOR, COMPL, LCOMPL, SHFTL, AND SHFTR USED FOR LOGICAL 
           OPERATIONS IN FORTRAN.
00275/002   BITWISE LOGIC - IHCLOGIC                 OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   TIFFANY                                    
0          Object part of *LIBRARY (524/1)
00278/001   IOH                                      SA  G          S1558 5.0T1 VLO FSNAME=IOH..SA.001(1)                        699
            5.0T1   699  IOH..SA.001                        1 LINE     80  153 PAGE UM   SWARTZ              MAY  13, 1978  17:07:43
            5.0T1   699                       
0          I/O CONVERSION PACKAGE.  ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 387/24, 400/1 
00278/002   IOH                                      OC  G          S1558 5.0T1 VLO FSNAME=IOH..OC.002(1)                        700
            5.0T1   700  IOH..OC.002                        1 LINE     80   21 PAGE UM   SWARTZ              MAY  13, 1978  17:08:15
            5.0T1   700                       
0          OBJECT IS ALSO IN *LIBRARY (524) -- MAY NOT BE EXACTLY THE SAME VERSION.
00278/003   IOH                      IOPKG           SA  G          S1558 5.0T1 VLO FSNAME=IOH.IOPKG.SA.003(1)                   701
            5.0T1   701  IOH.IOPKG.SA.003                   1 LINE     68    5 PAGE UM   SWARTZ              MAY  13, 1978  17:08:19
            5.0T1   701                       
0          COPIES *GDINFODSECT (594).
00278/004   IOH                      IOPKG           OC  G          S1558 5.0T1 VLO FSNAME=IOH.IOPKG.OC.004(1)                   702
            5.0T1   702  IOH.IOPKG.OC.004                   1 LINE     80    3 PAGE UM   SWARTZ              MAY  13, 1978  17:08:22
            5.0T1   702                       
0          OBJECT IS ALSO IN *LIBRARY (524).
00278/005   IOH                      TEST PGM        SA  G          S1558 5.0T1 VLO FSNAME=IOH.TEST_PGM.SA.005(1)                703
            5.0T1   703  IOH.TEST_PGM.SA.005                1 LINE     80   11 PAGE UM   SWARTZ              JULY 27, 1977  02:10:39
            5.0T1   703                       
0          PROGRAM TO TEST IOH.
1                                                                                               SUN SEP 08/96   15:24:55   Page  121
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00278/006   IOH                      TEST PGM        OC  G          S1558 5.0T1 VLO FSNAME=IOH.TEST_PGM.OC.006(1)                704
            5.0T1   704  IOH.TEST_PGM.OC.006                1 LINE     80   10 PAGE UM   SWARTZ              JULY 27, 1977  02:10:41
            5.0T1   704                       
00278/007   IOH                      IOHDBLIN        SA             S1558 5.0T1 VLO FSNAME=IOH.IOHDBLIN.SA.007(1)                705
            5.0T1   705  IOH.IOHDBLIN.SA.007                1 LINE     74    7 PAGE UM   SWARTZ              JULY 27, 1977  02:10:43
            5.0T1   705                       
00278/008   IOH                      IOHDBLIN        OE             ETC:IOHDBLIN                                                    
            5.0T1   706  IOH.IOHDBLIN.OE.008                1 SEQ    2530    1 PAGE UM   SWARTZ              JULY 03, 1981  13:02:28
            5.0T1   706  ETC.:IOHDBLIN        
00278/009   IOH                      IOHDBLOUT       SA             S1558 5.0T1 VLO FSNAME=IOH.IOHDBLOUT.SA.009(1)               707
            5.0T1   707  IOH.IOHDBLOUT.SA.009               1 LINE     73    5 PAGE UM   SWARTZ              JULY 27, 1977  02:10:48
            5.0T1   707                       
00278/010   IOH                      IOHDBLOUT       OE             ETC:IOHDBLOUT                                                   
            5.0T1   708  IOH.IOHDBLOUT.OE.010               1 SEQ    1363    1 PAGE UM   SWARTZ              JULY 03, 1981  13:02:30
            5.0T1   708  ETC.:IOHDBLOUT       
00278/011   IOH                      IOHEVAL         SA             S1558 5.0T1 VLO FSNAME=IOH.IOHEVAL.SA.011(1)                 709
            5.0T1   709  IOH.IOHEVAL.SA.011                 1 LINE     65    2 PAGE UM   SWARTZ              MAY  13, 1978  17:08:24
            5.0T1   709                       
00278/012   IOH                      IOHEVAL         OC             ETC:IOHEVAL                                                     
            5.0T1   710  IOH.IOHEVAL.OC.012                 1 SEQ      80    1 PAGE UM   SWARTZ              JULY 03, 1981  13:02:32
            5.0T1   710  ETC.:IOHEVAL         
00279/001   LINPG SUBR                                            # (NOT DISTRIBUTED)                                               
            D2T1    396                                                             UM                                              
00282/001   PRINTER PLOT SUBR                        SA  G          S1011 ETC 'MISC' FSNAME=PTRPLOT                                 
            5.0T1   711  PRINTER_PLOT_SUBR..SA.001          1 LINE     69   21 PAGE UM   LIFT                FEB. 23, 1979  11:28:04
            5.0T1   711                       
0          COPIES "PLOTDS" (282/2).  ASSEMBLE WITH PAR=BATCH.
0          Referenced by comments of: 133/1, 282/2 
00282/002   PRINTER PLOT SUBR        COPY SECTION    SA  G          S1011 ETC 'MISC' FSNAME=PTRPLOTD4DS                             
            5.0T1   712  PRINTER_PLOT_SUBR.COPY_SE.SA.002   1 LINE     69    3 PAGE UM   LIFT                APR. 06, 1977  18:45:48
            5.0T1   712                       
0          "PLOTDS" COPY SECTION COPIED BY (282/1).
0          Referenced by comments of: 282/1 
00282/003   PRINTER PLOT SUBR                        OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   LIFT                                       
0          Object part of *LIBRARY (524/1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  122
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00283/001   BLOCKED I/O - QSAM                       SA  G          W116:QSAM.S                                                  697
            5.0T1   713  BLOCKED_I/O_-_QSAM..SA.001         1 LINE     80   20 PAGE UM   YOUNG               JULY 03, 1981  13:02:42
            5.0T1   713                       
0          LIBRARY SUBROUTINES TO PERFORM FIXED BLOCKING (FORMAT FB) ON FILES, TAPES,
           ETC. ENTRY POINTS: QGETUCB (QGTUCB), QOPEN, QGET, QPUT, QCLOSE, QCNTRL, AND
           QFREEUCB (QFRUCB). COPIES *GDINFODSECT (594).
0          Referenced by comments of: 137/1 
00283/002   BLOCKED I/O - QSAM                       OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   YOUNG                                      
0          Object part of *LIBRARY (524/1)
00285/001   SKIP SUBR                                SA  G          S1558 5.0T1 VLO FSNAME=SKIP_SUBR..SA.001(1)                  714
            5.0T1   714  SKIP_SUBR..SA.001                  1 LINE     80    5 PAGE UM   WSG                 MAY  02, 1978  23:41:03
            5.0T1   714                       
0          Subroutine to space a file or tape forward or backward by records
           and/or files. Source in lines 1,999.
00285/002   SKIP SUBR                                OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   WSG                                        
0          Object part of *LIBRARY (524/1)
00286/001   MATH SUBRS                                            # (NOT DISTRIBUTED)                                               
            D2T1    389                                                             UM                                              
00287/001   SPIE SUBR                                SA  G          S1558 5.0T1 VLO FSNAME=SPIE_SUBR..SA.001(1)                  715
            5.0T1   715  SPIE_SUBR..SA.001                  1 LINE     80    3 PAGE UM   MTA                 JULY 27, 1977  02:12:55
            5.0T1   715                       
0          SUBROUTINE TO INTERFACE OS/360 'SPIE' MACRO WITH MTS 'PGNTTRP' SUBROUTINE.
00287/002   SPIE SUBR                                OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   MTA                                        
0          Object part of *LIBRARY (524/1)
00291/001A *IEHMOVE                                  SA  G  SCAN    W062:IEHMOVE.S                                                  
            5.1T1   229  IEHMOVE..SA.001                    1 LINE     80   39 PAGE UM   TIFFANY             JULY 23, 1983  10:26:35
0          Program to read unloaded OS/360 data sets in MTS. See also *UNLINKER (562).
           Calls the BLKRTN subroutine (562/2) to read OS/VS IEBCOPY or IEHMOVE tapes.
           Assemble with PEXIT=*PEXIT (775). Copies *GDINFODSECT (594) and *SENSEDSECT
           (3025).  This IEHMOVE is documented in CCMemo 449 (251/3).
            
           **********************************************************************
           D5.1 version:
            
           Recognizes VSS parameters to set up VSS PDS.
           **********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  123
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 251/3, 823/25, 824/3, 824/6 
00291/002A *IEHMOVE                                  OE  G          *IEHMOVE                                                        
            5.1T1   230  IEHMOVE..OE.002                    1 LINE   7960    6 PAGE UM   TIFFANY             JULY 23, 1983  10:26:37
                         *IEHMOVE             
00293/001  *MACGEN                                   SA  G          S1558 5.0T1 VLO FSNAME=MACGEN..SA.001(1)                     718
            5.0T1   718  MACGEN..SA.001                     1 LINE     80    3 PAGE UM   HELFFRICH           JULY 27, 1977  02:13:02
            5.0T1   718                       
0          GENERATE THE DIRECTORY FOR A MACRO LIBRARY.
           ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 648/41 
00293/002  *MACGEN                                   OE  G          *MACGEN                                                         
            5.0T1   719  MACGEN..OE.002                     1 SEQ     658    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:03:00
            5.0T1   719  *MACGEN              
00296/001   CHECKDASD                                SA           # (OBSOLETE)                                                      
            D2T1    119                                                             UM                                              
00297/001  *LINKEDIT                 LKEDCMD         SP  G          W052:LINK.CMD.S                                                 
            5.0T1   720  LINKEDIT.LKEDCMD.SP.001            1 LINE     99   33 PAGE UM   SHERRY              JULY 03, 1981  13:03:01
            5.0T2     1                       
0          MTS LINKAGE EDITOR MAIN PROGRAM - COMMAND PROCESSOR.
           CONTAINS  A "$CONTINUE WITH W052:LINK.COM" (297/6) RECORD.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
0          Referenced by comments of: 98/1, 297/15, 706/13, 813/13, 821/16, 821/26, 1000/11 
00297/002  *LINKEDIT                 INCLUDE         SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.INCLUDE.SP.002(1)            721
            5.0T1   721  LINKEDIT.INCLUDE.SP.002            1 LINE    100   17 PAGE UM   SHERRY              APR. 05, 1980  14:21:51
            5.0T2     2                       
0          CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/003  *LINKEDIT                 PUNCH           SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.PUNCH.SP.003(1)              722
            5.0T1   722  LINKEDIT.PUNCH.SP.003              1 LINE    100    7 PAGE UM   SHERRY              JULY 27, 1977  02:13:20
            5.0T2     3                       
0          CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/004  *LINKEDIT                 COMBINE         SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.COMBINE.SP.004(1)            723
            5.0T1   723  LINKEDIT.COMBINE.SP.004            1 LINE    100   10 PAGE UM   SHERRY              JULY 27, 1977  02:13:22
            5.0T2     4                       
0          CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  124
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00297/005  *LINKEDIT                 SUBR            SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.SUBR.SP.005(1)               724
            5.0T1   724  LINKEDIT.SUBR.SP.005               1 LINE     99    5 PAGE UM   SHERRY              JULY 27, 1977  02:13:25
            5.0T2     5                       
0          CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/006  *LINKEDIT                 LINK.COM        SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.LINK.COM.SP.006(1)           725
            5.0T1   725  LINKEDIT.LINK.COM.SP.006           1 LINE    100    6 PAGE UM   SHERRY              APR. 05, 1980  14:21:54
            5.0T2     6                       
0          COPY SECTION REQUIRED TO COMPILE THE INDIVIDUAL ROUTINES.
           LINE NUMBERS IN THIS FILE ARE IMPORTANT.
0          Referenced by comments of: 297/1, 297/2, 297/3, 297/4, 297/5, 297/8, 297/9, 297/10, 297/11, 297/12, 297/14, 297/15 
00297/007  *LINKEDIT                 ASMSUBR         SA  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.ASMSUBR.SA.007(1)            726
            5.0T1   726  LINKEDIT.ASMSUBR.SA.007            1 LINE     71    3 PAGE UM   SHERRY              JULY 27, 1977  02:13:29
            5.0T2     7                       
0          ASMG SUBROUTINES.
00297/008  *LINKEDIT                 DUMP            SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.DUMP.SP.008(1)               727
            5.0T1   727  LINKEDIT.DUMP.SP.008               1 LINE     92    4 PAGE UM   SHERRY              JULY 27, 1977  02:13:31
            5.0T2     8                       
0          SUBROUTINE TO PRODUCE ERROR DUMPS.
           CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/009  *LINKEDIT                 UTIL            SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.UTIL.SP.009(1)               728
            5.0T1   728  LINKEDIT.UTIL.SP.009               1 LINE     88    3 PAGE UM   SHERRY              APR. 05, 1980  14:21:56
            5.0T2     9                       
0          MISCELLANEOUS UTILITY SUBROUTINES.
           CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/010  *LINKEDIT                 UNLK            SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.UNLK.SP.010(1)               729
            5.0T1   729  LINKEDIT.UNLK.SP.010               1 LINE    100    6 PAGE UM   SHERRY              JULY 27, 1977  02:13:36
            5.0T2    10                       
0          SUBROUTINE TO UNLINK MULTIPLE-CSECT MODULES.
           CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/011  *LINKEDIT                 PURGE           SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.PURGE.SP.011(1)              730
            5.0T1   730  LINKEDIT.PURGE.SP.011              1 LINE     91    3 PAGE UM   SHERRY              JULY 27, 1977  02:13:40
            5.0T2    11                       
0          SUBROUTINE TO IMPLEMENT PURGE AND REPLACE (UPDATE) COMMANDS.
           CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  125
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00297/012  *LINKEDIT                 XMAL            SP  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.XMAL.SP.012(1)               731
            5.0T1   731  LINKEDIT.XMAL.SP.012               1 LINE     96    8 PAGE UM   SHERRY              JULY 27, 1977  02:13:42
            5.0T2    12                       
0          SUBROUTINE TO IMPLEMENT XREF, MAP, ATTRIBUTE, AND LIST COMMANDS.
           CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/013  *LINKEDIT                 IOCVT           SA  G          W052:LINK.IOCVT.S                                               
            5.0T1   732  LINKEDIT.IOCVT.SA.013              1 LINE     72   18 PAGE UM   SHERRY              JULY 03, 1981  13:03:22
            5.0T2    13                       
0          ROUTINES TO DO I/O CONVERSIONS, TEXT MODIFICATION, AND SCANNING;
           USED BY DISPLAY, SCAN, AND MODIFY COMMANDS.
           ASSEMBLE USING *SYSMAC.
00297/014  *LINKEDIT                 IOSUB           SP  G          W052:LINK.IOSUB.S                                               
            5.0T1   733  LINKEDIT.IOSUB.SP.014              1 LINE     91    3 PAGE UM   SHERRY              JULY 03, 1981  13:03:26
            5.0T2    14                       
0          SUBROUTINE USED BY DISPLAY, SCAN, AND MODIFY COMMANDS.
           CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS.
           COMPILE WITH PARAMETER SORMGIN=(2,100,1)
00297/015  *LINKEDIT                 LINK.CMD.GEN    C              W052:LINK.CMD.G                                                 
            5.0T1   734  LINKEDIT.LINK.CMD.GEN.C.015        1 LINE    106    1 PAGE UM   SHERRY              JULY 03, 1981  13:03:27
            5.0T2    15                       
0          THIS IS AN MTS COMMAND SOURCE FILE TO RECOMPILE LINK.CMD.S (297/1).
           LINE NUMBERS IN THIS FILE ARE IMPORTANT.  THIS FILE
           CONTAINS SOME $EDIT COMMANDS TO SET THE VERSION DATE IN W052:LINK.COM
           (297/6) BEFORE COMPILING.
00297/016  *LINKEDIT                 LINKLOAD        OC  G          S1558 5.0T1 VLO FSNAME=LINKEDIT.LINKLOAD.OC.016(1)           735
            5.0T1   735  LINKEDIT.LINKLOAD.OC.016           1 LINE  32767  121 PAGE UM   SHERRY              APR. 05, 1980  14:21:59
            5.0T2    16                       
0          UNLINKEDITED OBJECT FOR LINKAGE EDITOR.  THIS FILE HAS A "$CONTINUE WITH *PL1LIB" RECORD IN IT.
00297/017  *LINKEDIT                 LINKEDIT.G      C              S1558 5.0T1 VLO FSNAME=LINKEDIT.LINKEDIT.G.C.017(1)          736
            5.0T1   736  LINKEDIT.LINKEDIT.G.C.017          1 LINE     34    1 PAGE UM   SHERRY              JULY 27, 1977  02:13:54
            5.0T2    17                       
0          THIS FILE CONTAINS ALL THE MTS AND *LINKEDIT COMMANDS NECESSARY TO LINKEDIT
           THE UNLINKEDITED VERSION OF THE LINKAGE EDITOR (297/17).  THE *LINKEDIT
           COMMAND "RENAME IHESAPC IHESAPE" IS IMPORTANT SO THAT THE PAR= FIELD ON A
           $RUN *LINKEDIT COMMAND WON'T BE INTERCEPTED BY THE PL1 ENVIRONMENT.
0          Referenced by comments of: 297/17 
1                                                                                               SUN SEP 08/96   15:24:55   Page  126
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00297/018  *LINKEDIT                 OBJECT          OE  G          *LINKEDIT                                                       
            5.0T1   737  LINKEDIT.OBJECT.OE.018             1 SEQ   32767   71 PAGE UM   SHERRY              JULY 03, 1981  13:03:31
            5.0T2    18  *LINKEDIT            
0          THIS FILE HAS A "$CONTINUE WITH *PL1LIB" RECORD IN IT.
00298/001A *FORTRANH                 ASM SOU         SA  G          S1099 FORTRN FSNAME=FTNH.ASM                                    
            5.1T1   231  FORTRANH.ASM_SOU.SA.001            1 LINE     80  282 PAGE UM   HANSEN              OCT. 26, 1982  16:46:00
0          SOURCE FOR ASSEMBLER MODULES WHICH HAVE BEEN CHANGED FROM THE OS AND
           UNIVERSITY OF ROCHESTER VERSIONS.
            
           ASSEMBLE USING (298/7) MACRO LIBRARY.
0          Referenced by comments of: 298/5, 298/7, 551/1, 666/1, 668/1, 847/1 
00298/002A *FORTRANH                 FORTRAN SOU     SF  G          S1099 FORTRN FSNAME=FTNH.FTN                                    
            5.1T1   232  FORTRANH.FORTRAN_SOU.SF.002        1 LINE     80  161 PAGE UM   HANSEN              JUNE 02, 1983  15:53:58
0          SOURCE FOR FORTRAN MODULES WHICH HAVE BEEN CHANGED FROM THE OS AND UNIVERSITY
           OF ROCHESTER VERSIONS.
0          Referenced by comments of: 298/5 
00298/003  *FORTRANH                 ROCHESTER SOU   S   G          S1558 5.0T1 VLO FSNAME=FORTRANH.ROCHESTER_SOU.S.003(1)       740
            5.0T1   740  FORTRANH.ROCHESTER_SOU.S.003       1 LINE     80   93 PAGE UM   HANSEN              DEC. 01, 1978  12:43:27
            5.0T2    21                       
0          SOURCE (ASSEMBLER AND FORTRAN) FOR THE MODULES FROM THE UNIVERSITY OF
           ROCHESTER.
0          Referenced by comments of: 298/5 
00298/004  *FORTRANH                 OS SOURCE       S   O          S1558 5.0T1 VLO FSNAME=FORTRANH.OS_SOURCE.S.004(1)           741
            5.0T1   741  FORTRANH.OS_SOURCE.S.004           1 SEQ      80 1263 PAGE UM   HANSEN              MAR. 26, 1979  02:37:25
            5.0T2    22                       
0          SOURCE MODULES FOR THOSE PARTS OF FORTRAN H UNCHANGED FROM OS (RELEASE 20.1).
           NO PTF'S ARE INCLUDED IN THIS FILE.
0          Referenced by comments of: 298/5 
00298/005A *FORTRANH                 OBJECT          OC  G          S1099 FORTRN FSNAME=FORTRANH.O                                  
            5.1T1   233  FORTRANH.OBJECT.OC.005             1 LINE  22909  138 PAGE UM   HANSEN              JULY 11, 1983  13:49:25
0          COMPLETE, UN-LINKEDITED FORTRAN H COMPILER, CONSISTING OF OBJECT FOR (298/1),
           (298/2), (298/3), AND (298/4).
0          Referenced by comments of: 298/6 
1                                                                                               SUN SEP 08/96   15:24:55   Page  127
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00298/006A *FORTRANH                 *FORTRANH       OE  G          *FORTRANH                                                       
            5.1T1   234  FORTRANH.?FORTRANH.OE.006          1 LINE  32767  225 PAGE UM   HANSEN              JULY 23, 1983  10:28:55
                         *FORTRANH            
0          LINKEDITED VERSION OF (298/5).
00298/007  *FORTRANH                 MACLIB          SM  G          S1558 5.0T1 VLO FSNAME=FORTRANH.MACLIB.SM.007(1)             744
            5.0T1   744  FORTRANH.MACLIB.SM.007             1 LINE     72    3 PAGE UM   HANSEN              NOV. 14, 1978  18:00:46
            5.0T2    25                       
0          MACRO LIBRARY USED BY (298/1).
0          Referenced by comments of: 298/1 
00299/001  *LOVOC                                    S            # (OBSOLETE)                                                      
            D2T2    205                                                             UM                                              
00300/001  *LODEF                                    S            # (OBSOLETE)                                                      
            D2T2    206                                                             UM                                              
00302/001  *SSPSOURCE                                SF  G        # (NOT DISTRIBUTED)                                               
            D3T2    167  SSPSOURCE..SF.1                    1 LINE     80    5 PAGE UM                       FEB. 17, 1972  13:31.13
00303/001A  SORT                     SORT PGM        SA  G  SORT    S0027 DISTRB FSNAME=SORT                                        
            5.1T1   235  SORT.SORT_PGM.SA.001               1 LINE     80   93 PAGE UM   ENGLE               OCT. 05, 1982  13:06:28
0          GENERAL SORT PROGRAM.  COPIES *CNFGINFODSECT (654).
           ASSEMBLE AS FOLLOWS FOR THE TWO VERSIONS:
            
            
                  &SUB     SETB  0          FOR *SORT VERSION (303/4).
            
            
                  &SUB     SETB  1          FOR SORT SUBROUTINE VERSION (303/5).
            
            
           NOTE:  OTHER VALUES FOR MBYI AND MBYT MAY BE MORE APPROPRIATE FOR MACHINES OTHER
           THAN THE AMDAHL 470V/8 OR WITH A RATE STRUCTURE OTHER THAN ONE FOR WHICH THE COST
           OF 1 CPU SECOND EQUALS THE COST OF 200 VMI PAGE-SECONDS (AS AT UM).
0          Referenced by comments of: 584/1 
00303/002A  SORT                     SORT PGM        UC  G          S0027 DISTRB FSNAME=SORTUPDATE                                  
            5.1T1   236  SORT.SORT_PGM.UC.002               1 LINE     72    5 PAGE UM   ENGLE               OCT. 05, 1982  13:07:22
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00303/003A  SORT                     *SORT           OC  G          S0027 DISTRB FSNAME=SRT                                         
            5.1T1   237  SORT.?SORT.OC.003                  1 LINE     80   11 PAGE UM   ENGLE               OCT. 05, 1982  13:07:27
0          Referenced by comments of: 303/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  128
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00303/004A  SORT                     *SORT           OE  G          *SORT                                                           
            5.1T1   238  SORT.?SORT.OE.004                  1 SEQ    7736    4 PAGE UM   ENGLE               JULY 23, 1983  10:29:09
                         *SORT                
0          LINKEDITED COMBINATION OF (303/3) AND *LCS (164).
0          Referenced by comments of: 303/1, 449/1 
00303/005A  SORT                     SORT SUBR       OC  G          S0027 DISTRB FSNAME=SRT1                                        
            5.1T1   239  SORT.SORT_SUBR.OC.005              1 LINE     80   11 PAGE UM   ENGLE               SEP. 24, 1982  14:26:22
0          Referenced by comments of: 303/1, 1030/1 
00303/006   SORT                     SORT2/3/4 SUBR  SA  G  SRT2    S0027 DISTRB FSNAME=SORT2                                       
            5.0T1   750  SORT.SORT2/3/4_SUBR.SA.006         1 LINE     80   38 PAGE UM   ENGLE               APR. 17, 1981  17:56:51
            5.0T2    31                       
0          SORT2 IS A SUBROUTINE TO SORT AN ARRAY IN VM.
           SORT3 IS A SUBROUTINE TO SORT AN ARRAY IN VM INCLUDING A "TAGGED" ARRAY.
           SORT4 IS A SUBROUTINE TO SORT AN ARRAY OF ADDRESSES BASED ON THE DATA TO WHICH
           THE ADDRESSES REFER.
            
           COPIES *CNFGINFODSECT (654).
00303/007   SORT                     SORT2/3/4 SUBR  UC  G        # S0027 DISTRB FSNAME=SORT2UPDATE                                 
            5.0T1   751  SORT.SORT2/3/4_SUBR.UC.007         1 LINE     72    3 PAGE UM   ENGLE               APR. 17, 1981  17:57:07
            5.0T2    32                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00303/008   SORT                     SORT2/3/4 SUBR  OC  G          S1558 5.0T1 VLO FSNAME=SORT.SORT2/3/4_SUBR.OC.008(1)         752
            5.0T1   752  SORT.SORT2/3/4_SUBR.OC.008         1 LINE     80    5 PAGE UM   ENGLE               APR. 17, 1981  17:57:12
            5.0T2    33                       
00303/009   SORT                     MESSAGE         SA  G          S1558 5.0T1 VLO FSNAME=SORT.MESSAGE.SA.009(1)                753
            5.0T1   753  SORT.MESSAGE.SA.009                1 LINE     80    4 PAGE UM   ENGLE               MAR. 06, 1981  16:37:04
            5.0T2    34                       
0          MODULE TO PRINT SORT ERROR MESSAGES (303/12).
0          Referenced by comments of: 303/17 
00303/010   SORT                     MESSAGE         UC  G        # S0027 DISTRB FSNAME=MESSAGEUPDATE                            754
            5.0T1   754  SORT.MESSAGE.UC.010                1 LINE     72    1 PAGE UM   ENGLE               MAR. 06, 1981  16:37:32
            5.0T2    35                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00303/011   SORT                     MESSAGE         OE  G          S1558 5.0T1 VLO FSNAME=SORT.MESSAGE.OE.011(1)                755
            5.0T1   755  SORT.MESSAGE.OE.011                1 LINE     80    1 PAGE UM   ENGLE               MAR. 06, 1981  16:37:45
            5.0T2    36                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  129
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00303/012A  SORT                     MESSAGES        M              S0027 DISTRB FSNAME=SORTMESSAGES                                
            5.1T1   240  SORT.MESSAGES.M.012                1 LINE     81    3 PAGE UM   ENGLE               AUG. 26, 1982  12:56:49
0          SORT ERROR MESSAGES.
           NOTE:  LINE NUMBERS ARE IMPORTANT IN THIS FILE.
0          Referenced by comments of: 303/9, 303/17 
00303/013A  SORT                     CHECK           SA  G          S0027 DISTRB FSNAME=SORTCHK                                     
            5.1T1   241  SORT.CHECK.SA.013                  1 LINE     80    9 PAGE UM   ENGLE               AUG. 26, 1982  12:58:42
0          MODULE TO IMPLEMENT THE SORT "CHK" PARAMETER.
0          Referenced by comments of: 303/17 
00303/014C  SORT                     CHECK           UC  G          S0027 DISTRB FSNAME=SORTCHKUPD                                  
            5.1T1   242  SORT.CHECK.UC.014                  1 LINE     77    5 PAGE UM   ENGLE               AUG. 26, 1982  12:58:48
0          Updates source from previous regular distribution to current one.
00303/015A  SORT                     CHECK           OE  G          S0027 DISTRB FSNAME=CHK                                         
            5.1T1   243  SORT.CHECK.OE.015                  1 LINE   2268    1 PAGE UM   ENGLE               AUG. 26, 1982  13:00:50
00303/016A  SORT                     DOC             WT             S0027 DISTRB FSNAME=SORTWRITEUP                                 
            5.1T1   244  SORT.DOC.WT.016                    1 LINE    256   51 PAGE UM   ENGLE               MAY  26, 1983  10:20:22
0          TEXT/360 MASTER FOR MTS VOLUME 5 SORT WRITEUP.
00303/017A  SORT                     *SORTLM         OE  G          *SORTLM                                                         
            5.1T1   245  SORT.?SORTLM.OE.017                1 LINE   2753    4 PAGE UM   ENGLE               JULY 23, 1983  10:29:44
                         *SORTLM              
0          FILE CONTAINING ERROR MESSAGE PROGRAM (303/9), MESSAGES (303/12), CHECK ROUTINE (303/13),
           AND TAPESORT (303/24). LINE NUMBERS IN THIS FILE ARE IMPORTANT.
00303/018   SORT                     SRTTMTST        SA  G          S1558 5.0T1 VLO FSNAME=SORT.SRTTMTST.SA.017(1)               761
            5.0T1   761  SORT.SRTTMTST.SA.017               1 LINE     80    4 PAGE UM   ENGLE               JAN. 24, 1977  16:01:14
            5.0T2    42                       
0          MAIN PROGRAM TO PRODUCE CPU AND VMI TIMING RESULTS WHEN LOADED WITH *SORT.
00303/019   SORT                     SRTTMTST        OC  G          S1558 5.0T1 VLO FSNAME=SORT.SRTTMTST.OC.018(1)               762
            5.0T1   762  SORT.SRTTMTST.OC.018               1 LINE     80    1 PAGE UM   ENGLE               JAN. 24, 1977  16:02:11
            5.0T2    43                       
00303/020   SORT                     SORTPLOT        SF  G          S1558 5.0T1 VLO FSNAME=SORT.SORTPLOT.SF.019(1)               763
            5.0T1   763  SORT.SORTPLOT.SF.019               1 LINE     80    7 PAGE UM   ENGLE               MAY  18, 1976  11:19:41
            5.0T2    44                       
0          PROGRAM TO GENERATE CALCOMP TIMING PLOTS FOR THE SORT WRITEUP.
           INTERNAL STATEMENT NUMBER 87 SHOULD BE SKIPPED TO ELIMINATE THE
           PLOTTING OF DATA POINTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  130
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00303/021   SORT                     SORTPLOT        OC  G          S1558 5.0T1 VLO FSNAME=SORT.SORTPLOT.OC.020(1)               764
            5.0T1   764  SORT.SORTPLOT.OC.020               1 LINE   3500    4 PAGE UM   ENGLE               MAY  18, 1976  11:23:17
            5.0T2    45                       
00303/022A  SORT                     SORTPLOT        D   G          S0027 DISTRB FSNAME=SRTPDATA                                    
            5.1T1   246  SORT.SORTPLOT.D.022                1 LINE     28    3 PAGE UM   ENGLE               SEP. 30, 1982  11:46:43
0          DATA FOR SORT TIMING PLOTS, MEASURED ON AMDAHL 470V/8.
00303/023A  SORT                     SORTPLOT        D   G          S0027 DISTRB FSNAME=SRTPPLOT                                    
            5.1T1   247  SORT.SORTPLOT.D.023                1 LINE   2798   17 PAGE UM   ENGLE               SEP. 30, 1982  11:46:55
0          CALCOMP PLOT FILE FOR SORT TIMING PLOTS IN SORT WRITEUP.  CONTAINS PPEN RECORDS
           FOR MULTICOLOR PLOTTING.
00303/024   SORT                     TAPESORT        SA  G          S1558 5.0T1 VLO FSNAME=SORT.TAPESORT.SA.023(1)               767
            5.0T1   767  SORT.TAPESORT.SA.023               1 LINE     80   18 PAGE UM   ENGLE               OCT. 24, 1979  16:41:35
            5.0T2    48                       
0          MODULE TO IMPLEMENT THE TAPE MERGE OPTION IN SORT.
           CONTAINS A GBLC SYMBOL &MODE WITH VALUE '6250' WHICH SPECIFIES
           THE MODE (DENSITY) FOR THE POOL TAPES MOUNTED BY THIS PROGRAM.
0          Referenced by comments of: 303/17 
00303/025   SORT                     TAPESORT        UC  G        # S0027 DISTRB FSNAME=TAPESORTUPD                                 
            4.3T1   170  SORT.TAPESORT.UC.023               1 LINE     72    3 PAGE UM   ENGLE               OCT. 24, 1979  16:42:42
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00303/026   SORT                     TAPESORT        OC  G          S1558 5.0T1 VLO FSNAME=SORT.TAPESORT.OC.025(1)               768
            5.0T1   768  SORT.TAPESORT.OC.025               1 LINE     80    3 PAGE UM   ENGLE               OCT. 24, 1979  16:43:40
            5.0T2    49                       
00303/027   SORT                     SRT2TIME        SG  G          S1558 5.0T1 VLO FSNAME=SORT.SRT2TIME.SG.026(1)               769
            5.0T1   769  SORT.SRT2TIME.SG.026               1 LINE     72    4 PAGE UM   ENGLE               SEP. 09, 1977  16:42:55
            5.0T2    50                       
0          PROGRAM TO PRODUCE CPU TIMING RESULTS FOR SORT2, SORT3, AND SORT4.  MAY BE USED
           TO TIME ONE OR MORE VERSIONS OF THESE SUBROUTINES.  INFORMATION REQUESTED BY
           PROMPTING INCLUDES LOCATIONS (FILE NAMES ENTERED ONE/LINE TERMINATED BY EOF) OF
           ADDITIONAL VERSIONS (BESIDES THE ONE LOADED WITH THE PROGRAM), WHETHER THE RESULTS
           OF EACH INDIVIDUAL REPETITION ARE TO BE PRINTED, THE NUMBER OF REPETITIONS (0 OR
           MORE) FOR EACH TEST (RANDOM NUMBERS, ALREADY ORDERED, REVERSE ORDER, AND ALL
           EQUAL), ELEMENTS/ARRAY, ELEMENT LENGTH (LENGTH IS SAME FOR TAG ELEMENTS FOR
           SORT3), AND STARTING RANDOM NUMBER.  IF ELEMENTS/ARRAY OR ELEMENT LENGTH IS ZERO,
           A NEW SET OF NUMBER OF REPETITIONS WILL BE REQUESTED.
00303/028   SORT                     SRT2TIME        OC  G          S1558 5.0T1 VLO FSNAME=SORT.SRT2TIME.OC.027(1)               770
            5.0T1   770  SORT.SRT2TIME.OC.027               1 LINE     80    8 PAGE UM   ENGLE               SEP. 09, 1977  16:44:10
            5.0T2    51                       
0          >>>>>>>> NOTE:  REP CARD IN THIS OBJECT CAUSES THE TIMES TO BE PRINTED AS
                    TIME/N RATHER THAN TIME/(N*LOG2(N)).
1                                                                                               SUN SEP 08/96   15:24:55   Page  131
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00303/029   SORT                     SORT4F          SA  G          S1558 5.0T1 VLO FSNAME=SORT.SORT4F.SA.028(1)                 771
            5.0T1   771  SORT.SORT4F.SA.028                 1 LINE     80    3 PAGE UM   ENGLE               FEB. 20, 1980  13:49:43
            5.0T2    52                       
0          SORT4F IS A SUBROUTINE TO SORT AN ARRAY OF FORTRAN INDEXES BASED ON THE DATA
           TO WHICH THE INDEXES REFER.
00303/030   SORT                     SORT4F          OC  G          S1558 5.0T1 VLO FSNAME=SORT.SORT4F.OC.029(1)                 772
            5.0T1   772  SORT.SORT4F.OC.029                 1 LINE     80    1 PAGE UM   ENGLE               FEB. 20, 1980  13:49:51
            5.0T2    53                       
00304/001   TAPE DIAGNOSTIC          *TPD            C              *TPD                                                            
            5.0T1   773  TAPE_DIAGNOSTIC.*TPD.C.001         1 LINE     61    1 PAGE UM   WSG                 JULY 03, 1981  13:06:05
            5.0T2    54  *TPD                 
0          Command file to run the MTS TAPE DIAGNOSTIC program (304/2). Invoked
           by entering "MTS *TPD" on the operator's console.
00304/002   TAPE DIAGNOSTIC                          SA  G          WSG:TAPEDIAG(1,999)                                             
            5.0T1   774  TAPE_DIAGNOSTIC..SA.002            1 LINE     66    4 PAGE UM   WSG                 JULY 03, 1981  13:06:06
            5.0T2    55  WSG.:TAPEDIAG        
0          Simple tape diagnostic program. Reads and writes random length,
           random data records. Works on both 7- and 9-track. When it asks for
           a tape drive, parameters may be given after the drive name as
           follows:
            
             800   - for 9-track, test 800 bpi.
             1600  - for 9-track, test 1600 bpi.
             6250  - for 9-track, test 6250 bpi.
             all   - test the entire tape rather than the default 300 read/write
                     attempts.
            
           If none of the first three parameters is given, all 9-track
           densities will be tested in succession (800, 1600, and 6250). If any
           of these densities is not supported by the drive being tested, a
           warning message will be produced and that density is skipped. All
           three 7-track densities are always tested on an interleaved
           record-by-record basis.
0          Referenced by comments of: 304/1 
00304/003   TAPE DIAGNOSTIC                          OC  G          WSG:TAPEDIAG(1000)                                              
            5.0T1   775  TAPE_DIAGNOSTIC..OC.003            1 LINE     80    3 PAGE UM   WSG                 JULY 03, 1981  13:06:07
            5.0T2    56                       
00305/001  *FTNTOPL1                 SLCPF4          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SLCPF4.SP.001(1)             776
            5.0T1   776  FTNTOPL1.SLCPF4.SP.001             1 SEQ      80    2 PAGE UM   TIFFANY             JULY 31, 1973  22:47.13
            5.0T2    57                       
0          IBM PROGRAM 360-CV-710: LCP FORTRAN-IV TO PL/I, VERSION 1 LEVEL 0. THE SOURCE
           DECKS, (305/1) THROUGH (305/20), SHOULD BE STORED IN FILES NAMED AS
           INDICATED. THE UPDATE DECK (305/21) WILL CONVERT THESE FILES, WHICH ARE
           UNMODIFIED IBM SOURCE, INTO A VERSION THAT WILL RUN IN MTS. MOST OF THESE
1                                                                                               SUN SEP 08/96   15:24:55   Page  132
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          PROGRAMS ARE WRITTEN IN PL/I VERSION 4 WITH SORGMIN=(2,41). THE ONLY PROGRAMS
           WHICH ARE NOT PL/I ARE SCONVER, SPUTTBS, AND SLBLNK, WHICH ARE ASSEMBLY
           LANGUAGE. UNCHANGED SINCE DIST 2.
0          Referenced by comments of: 305/1 
00305/002  *FTNTOPL1                 SCONVER         SA  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SCONVER.SA.002(1)            777
            5.0T1   777  FTNTOPL1.SCONVER.SA.002            1 SEQ      80    4 PAGE UM   TIFFANY             JULY 31, 1973  22:47.14
            5.0T2    58                       
00305/003  *FTNTOPL1                 SPUTTBS         SA  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPUTTBS.SA.003(1)            778
            5.0T1   778  FTNTOPL1.SPUTTBS.SA.003            1 SEQ      80   24 PAGE UM   TIFFANY             JULY 31, 1973  22:47.18
            5.0T2    59                       
0          Referenced by comments of: 305/21 
00305/004  *FTNTOPL1                 SLTCOL          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SLTCOL.SP.004(1)             779
            5.0T1   779  FTNTOPL1.SLTCOL.SP.004             1 SEQ      80   12 PAGE UM   TIFFANY             JULY 31, 1973  22:47.22
            5.0T2    60                       
00305/005  *FTNTOPL1                 SIPPRS          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SIPPRS.SP.005(1)             780
            5.0T1   780  FTNTOPL1.SIPPRS.SP.005             1 SEQ      80   27 PAGE UM   TIFFANY             JULY 31, 1973  22:47.25
            5.0T2    61                       
00305/006  *FTNTOPL1                 SPH10           SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPH10.SP.006(1)              781
            5.0T1   781  FTNTOPL1.SPH10.SP.006              1 SEQ      80   11 PAGE UM   TIFFANY             JULY 31, 1973  22:47.28
            5.0T2    62                       
00305/007  *FTNTOPL1                 SFNPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SFNPRO.SP.007(1)             782
            5.0T1   782  FTNTOPL1.SFNPRO.SP.007             1 SEQ      80   10 PAGE UM   TIFFANY             JULY 31, 1973  22:47.30
            5.0T2    63                       
00305/008  *FTNTOPL1                 SDMPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SDMPRO.SP.008(1)             783
            5.0T1   783  FTNTOPL1.SDMPRO.SP.008             1 SEQ      80   18 PAGE UM   TIFFANY             JULY 31, 1973  22:47.32
            5.0T2    64                       
00305/009  *FTNTOPL1                 SNLPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SNLPRO.SP.009(1)             784
            5.0T1   784  FTNTOPL1.SNLPRO.SP.009             1 SEQ      80    9 PAGE UM   TIFFANY             JULY 31, 1973  22:47.34
            5.0T2    65                       
00305/010  *FTNTOPL1                 SFTPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SFTPRO.SP.010(1)             785
            5.0T1   785  FTNTOPL1.SFTPRO.SP.010             1 SEQ      80   21 PAGE UM   TIFFANY             JULY 31, 1973  22:47.38
            5.0T2    66                       
00305/011  *FTNTOPL1                 SRTPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SRTPRO.SP.011(1)             786
            5.0T1   786  FTNTOPL1.SRTPRO.SP.011             1 SEQ      80   10 PAGE UM   TIFFANY             JULY 31, 1973  22:47.40
            5.0T2    67                       
00305/012  *FTNTOPL1                 SIOPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SIOPRO.SP.012(1)             787
            5.0T1   787  FTNTOPL1.SIOPRO.SP.012             1 SEQ      80   25 PAGE UM   TIFFANY             JULY 31, 1973  22:47.43
            5.0T2    68                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  133
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00305/013  *FTNTOPL1                 SARPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SARPRO.SP.013(1)             788
            5.0T1   788  FTNTOPL1.SARPRO.SP.013             1 SEQ      80   27 PAGE UM   TIFFANY             JULY 31, 1973  22:47.47
            5.0T2    69                       
00305/014  *FTNTOPL1                 SCAPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SCAPRO.SP.014(1)             789
            5.0T1   789  FTNTOPL1.SCAPRO.SP.014             1 SEQ      80    4 PAGE UM   TIFFANY             JULY 31, 1973  22:47.49
            5.0T2    70                       
00305/015  *FTNTOPL1                 SIFPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SIFPRO.SP.015(1)             790
            5.0T1   790  FTNTOPL1.SIFPRO.SP.015             1 SEQ      80    6 PAGE UM   TIFFANY             JULY 31, 1973  22:47.52
            5.0T2    71                       
00305/016  *FTNTOPL1                 SALPRO          SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SALPRO.SP.016(1)             791
            5.0T1   791  FTNTOPL1.SALPRO.SP.016             1 SEQ      80    7 PAGE UM   TIFFANY             JULY 31, 1973  22:47.54
            5.0T2    72                       
00305/017  *FTNTOPL1                 SPH20           SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPH20.SP.017(1)              792
            5.0T1   792  FTNTOPL1.SPH20.SP.017              1 SEQ      80   16 PAGE UM   TIFFANY             JULY 31, 1973  22:47.58
            5.0T2    73                       
00305/018  *FTNTOPL1                 SPH30           SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPH30.SP.018(1)              793
            5.0T1   793  FTNTOPL1.SPH30.SP.018              1 SEQ      80   41 PAGE UM   TIFFANY             JULY 31, 1973  22:48.03
            5.0T2    74                       
00305/019  *FTNTOPL1                 SLBLNK          SA  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SLBLNK.SA.019(1)             794
            5.0T1   794  FTNTOPL1.SLBLNK.SA.019             1 SEQ      80    4 PAGE UM   TIFFANY             JULY 31, 1973  22:48.07
            5.0T2    75                       
00305/020  *FTNTOPL1                 SUT1            SP  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.SUT1.SP.020(1)               795
            5.0T1   795  FTNTOPL1.SUT1.SP.020               1 SEQ      80    3 PAGE UM   TIFFANY             JULY 31, 1973  22:48.08
            5.0T2    76                       
0          Referenced by comments of: 305/1 
00305/021  *FTNTOPL1                 UPDATE          UU  O          S1558 5.0T1 VLO FSNAME=FTNTOPL1.UPDATE.UU.021(1)             796
            5.0T1   796  FTNTOPL1.UPDATE.UU.021             1 LINE     80    4 PAGE UM   TIFFANY             JULY 27, 1977  02:25:15
            5.0T2    77                       
0          UPDATE DECK, INCLUDING MTS COMMANDS, TO PRODUCE IN A FILE "NEWLCP" A VERSION OF *FTNTOPL1 THAT WILL RUN
           IN MTS. THIS DECK WILL HAVE TO BE CHANGED TO MEET LOCAL CONDITIONS - IT CURRENTLY USES THE DATA CELL.
           LATEST VERSION CORRECTS SPUTTBS (305/3) SO THAT THERE CAN BE MORE THAN 200 INPUT CARDS.
0          Referenced by comments of: 305/1 
00305/022  *FTNTOPL1                                 OC  O          *FTNTOPL1                                                       
            5.0T1   797  FTNTOPL1..OC.022                   1 SEQ   22330   46 PAGE UM   TIFFANY             JULY 03, 1981  13:06:28
            5.0T2    78  *FTNTOPL1            
0          ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD.
1                                                                                               SUN SEP 08/96   15:24:55   Page  134
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00306/001  *WIREWRAP                 WW.S.MAIN       SA  G  WWMN    S0767 'SAVETAPE' FSNAME=WW.S.MAIN                               
            5.0T1   798  WIREWRAP.WW.S.MAIN.SA.001          1 LINE     80   55 PAGE UM   CASHMAN             AUG. 21, 1975  11:54:24
            5.0T2    79                       
0          PROGRAM TO PRODUCE ALL SORTS OF NEAT OUTPUT ABOUT WIRING BACKPANELS FOR HARDWARE DEVICES.
           INPUT TO THE PROGRAM IS A MACRO-ORIENTED LANGUAGE FOR DESCRIBING HARDWARE DEVICES FROM LOGIC
           DIAGRAMS.  OUTPUT INCLUDES LISTS OF SIGNALS, WIRE-CHAINS, IC'S USED, COST AND POWER TOTALS,
           AND A PUNCHED CARD DECK FOR AUTOMATICALLY DRIVING ANY GARDNER-DENVER WIREWRAP MACHINE.
           THE WIREWRAP PROGRAM CONSISTS OF THREE CSECTS:  WW.S.MAIN (306/1), WW.S.AUX (306/2),
           AND WW.S.MACR (306/3).  EACH REQUIRES COPY SECTIONS WWCOPY (306/5) AND WWDATA (306/6) AND MACRO
           LIBRARIES WWMAC (306/7) AND *SYSMAC.  THE OBJECT MODULE (*WIREWRAP) MUST BE RUN IN CONJUNCTION
           WITH THE *WWLIB (306/9) LIBRARY FILE OR MUST BE CONCATENATED WITH A PRIVATE SUBROUTINE
           PACKAGE USED TO DEFINE THE CHARACTERISTICS OF THE IC MOUNTING TECHNIQUE.  SOURCE FILE
           WWJOB (306/8) WILL ASSEMBLE *WIREWRAP.
0          Referenced by comments of: 306/1, 306/5, 306/6, 306/7, 861/3, 861/6, 861/7 
00306/002  *WIREWRAP                 WW.S.AUX        SA  G  WWAU    S0767 'SAVETAPE' FSNAME=WW.S.AUX                                
            5.0T1   799  WIREWRAP.WW.S.AUX.SA.002           1 LINE     80   42 PAGE UM   CASHMAN             AUG. 21, 1975  11:54:30
            5.0T2    80                       
0          Referenced by comments of: 306/1, 306/5, 306/6, 306/7 
00306/003  *WIREWRAP                 WW.S.MACR       SA  G  WWMC    S0767 'SAVETAPE' FSNAME=WW.S.MACR                               
            5.0T1   800  WIREWRAP.WW.S.MACR.SA.003          1 LINE     80   29 PAGE UM   CASHMAN             AUG. 21, 1975  11:54:38
            5.0T2    81                       
0          Referenced by comments of: 306/1, 306/5, 306/6, 306/7 
00306/004  *WIREWRAP                 *WIREWRAP       OE  G          *WIREWRAP                                                       
            5.0T1   801  WIREWRAP.*WIREWRAP.OE.004          1 SEQ   12724   15 PAGE UM   CASHMAN             JULY 03, 1981  13:12:00
            5.0T2    82  *WIREWRAP            
00306/005  *WIREWRAP                 WWCOPY          SA  G  WWCO    S0767 'SAVETAPE' FSNAME=WWCOPY                                  
            5.0T1   802  WIREWRAP.WWCOPY.SA.005             1 LINE     80    4 PAGE UM   CASHMAN             AUG. 21, 1975  11:55:07
            5.0T2    83                       
0          COPY SECTION USED BY (306/1), (306/2), AND (306/3)
0          Referenced by comments of: 306/1 
00306/006  *WIREWRAP                 WWDATA          SA  G  WWDA    S0767 'SAVETAPE' FSNAME=WWDATA                                  
            5.0T1   803  WIREWRAP.WWDATA.SA.006             1 LINE     80    8 PAGE UM   CASHMAN             AUG. 21, 1975  11:55:02
            5.0T2    84                       
0          COPY SECTION USED BY (306/1), (306/2), AND (306/3).
0          Referenced by comments of: 306/1 
00306/007  *WIREWRAP                 WWMAC           SM  G          S0767 'SAVETAPE' FSNAME=WWMAC                                   
            5.0T1   804  WIREWRAP.WWMAC.SM.007              1 LINE     73    3 PAGE UM   CASHMAN             AUG. 21, 1975  11:54:50
            5.0T2    85                       
0          MACRO LIB USED BY (306/1), (306/2), AND (306/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  135
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 306/1 
00306/008  *WIREWRAP                 WWJOB           C   G          S0767 'SAVETAPE' FSNAME=WWJOB                                   
            5.0T1   805  WIREWRAP.WWJOB.C.008               1 LINE     92    1 PAGE UM   CASHMAN             AUG. 21, 1975  11:54:55
            5.0T2    86                       
0          Referenced by comments of: 306/1 
00306/009  *WIREWRAP                 *WWLIB          OL  G          *WWLIB                                                          
            5.0T1   806  WIREWRAP.*WWLIB.OL.009             1 LINE   2948   37 PAGE UM   CASHMAN             JULY 03, 1981  13:12:05
            5.0T2    87  *WWLIB               
0          NON-STANDARD LIBRARY FILE USED BY *WIREWRAP TO OBTAIN CHARACTERISTICS OF THE IC
           MOUNTING TECHNIQUE.  CONSISTS OF A DIRECTORY FOLLOWED BY THE LINK-EDITED OBJECT
           MODULES FOR BAY TYPES:  LAB, LAB16, IC, MSERIES, PG1, PG3, PG5, PG13, UG1, MIC,
           RSERIES, 8SERIES, CHIP, AND DOUGLAS.  THE *WIREWRAP USER'S GUIDE (306/33)
           DESCRIBES MOST OF THESE BAY TYPES.  8SERIES IS USED FOR CLASSIC PDP-8 MINCOMPUTERS.
           CHIP AND DOUGLAS ARE DESCRIBED IN THEIR RESPECTIVE FORTRAN SOURCE CODES.  THIS
           LIBRARY ALSO MAKES USE OF OBJECT FILES *WWSQGRD (306/11), *WWSTGRD1 (306/13),
           AND *WWSTGRD2 (306/15).
0          Referenced by comments of: 306/1, 306/16, 306/17, 306/18, 306/19, 306/20, 306/21, 306/22, 306/23, 306/24, 306/25,
                 306/26, 306/27, 306/28, 306/29 
00306/010  *WIREWRAP                 SQGRD           SA  G  SQGR    S0767 'SAVETAPE' FSNAME=SQGRD.S                                 
            5.0T1   807  WIREWRAP.SQGRD.SA.010              1 LINE     80    7 PAGE UM   CASHMAN             DEC. 13, 1973  12:57.39
            5.0T2    88                       
0          SUBROUTINE FOR GARDNER-DENVER AUTOMATIC WIREWRAP MACHINE.
00306/011  *WIREWRAP                 SQGRD           OE  G          *WWSQGRD                                                        
            5.0T1   808  WIREWRAP.SQGRD.OE.011              1 SEQ     606    1 PAGE UM   CASHMAN             JULY 03, 1981  13:12:32
            5.0T2    89  *WWSQGRD             
0          Referenced by comments of: 306/9 
00306/012  *WIREWRAP                 STGRD1          SA  G  STG1    S0767 'SAVETAPE' FSNAME=STGRD1.S                                
            5.0T1   809  WIREWRAP.STGRD1.SA.012             1 LINE     80    8 PAGE UM   CASHMAN             DEC. 13, 1973  12:57.57
            5.0T2    90                       
0          SUBROUTINE FOR GARDNER-DENVER AUTOMATIC WIREWRAP MACHINE.
00306/013  *WIREWRAP                 STGRD1          OE  G          *WWSTGRD1                                                       
            5.0T1   810  WIREWRAP.STGRD1.OE.013             1 SEQ     726    1 PAGE UM   CASHMAN             JULY 03, 1981  13:12:34
            5.0T2    91  *WWSTGRD1            
0          Referenced by comments of: 306/9 
00306/014  *WIREWRAP                 STGRD2          SA  G  STG2    S0767 'SAVETAPE' FSNAME=STGRD2.S                                
            5.0T1   811  WIREWRAP.STGRD2.SA.014             1 LINE     80    8 PAGE UM   CASHMAN             DEC. 13, 1973  12:58.13
            5.0T2    92                       
0          SUBROUTINE FOR GARDNER-DENVER AUTOMATIC WIREWRAP MACHINE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  136
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00306/015  *WIREWRAP                 STGRD2          OE  G          *WWSTGRD2                                                       
            5.0T1   812  WIREWRAP.STGRD2.OE.015             1 SEQ    5718    2 PAGE UM   CASHMAN             JULY 03, 1981  13:12:36
            5.0T2    93  *WWSTGRD2            
0          Referenced by comments of: 306/9 
00306/016  *WIREWRAP                 LAB             SF  G  LAB     S0767 'SAVETAPE' FSNAME=LAB.S                                   
            5.0T1   813  WIREWRAP.LAB.SF.016                1 LINE     80    5 PAGE UM   CASHMAN             FEB. 20, 1976  14:55:25
            5.0T2    94                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'LAB'.  OBJECT MODULE IN *WWLIB (306/9).
00306/017  *WIREWRAP                 LAB16           SF  G          S0767 'SAVETAPE' FSNAME=LAB16.S                                 
            5.0T1   814  WIREWRAP.LAB16.SF.017              1 LINE     70    3 PAGE UM   CASHMAN             MAR. 13, 1978  15:48:56
            5.0T2    95                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'LAB16', WHICH IS THE SAME AS 'LAB' EXCEPT
           IT ALLOWS FOR 14- OR 16-PIN CHIPS.  OBJECT MODULE IN *WWLIB (306/9).
00306/018  *WIREWRAP                 MSERIES         SF  G  MSER    S0767 'SAVETAPE' FSNAME=MSERIES.S                               
            5.0T1   815  WIREWRAP.MSERIES.SF.018            1 LINE     80    5 PAGE UM   CASHMAN             DEC. 13, 1973  12:56.06
            5.0T2    96                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'MSERIES'. OBJECT MODULE IN *WWLIB (306/9).
00306/019  *WIREWRAP                 RSERIES         SF  G  RSER    S0767 'SAVETAPE' FSNAME=RSERIES.S                               
            5.0T1   816  WIREWRAP.RSERIES.SF.019            1 LINE     80    5 PAGE UM   CASHMAN             DEC. 13, 1973  12:56.35
            5.0T2    97                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'RSERIES'.  OBJECT MODULE IN *WWLIB (306/9).
00306/020  *WIREWRAP                 IC              SF  G  IC      S0767 'SAVETAPE' FSNAME=IC.S                                    
            5.0T1   817  WIREWRAP.IC.SF.020                 1 LINE     80    5 PAGE UM   CASHMAN             DEC. 13, 1973  12:55.30
            5.0T2    98                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'IC'.  OBJECT MODULE IN *WWLIB (306/9).
00306/021  *WIREWRAP                 MIC             SF  G  MIC     S0767 'SAVETAPE' FSNAME=MIC.S                                   
            5.0T1   818  WIREWRAP.MIC.SF.021                1 LINE     80    6 PAGE UM   CASHMAN             JAN. 16, 1974  13:12.44
            5.0T2    99                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'MIC'.  OBJECT MODULE IN *WWLIB (306/9).
00306/022  *WIREWRAP                 PG1             SF  G  PG1     S0767 'SAVETAPE' FSNAME=79.PG1SOU                               
            5.0T1   819  WIREWRAP.PG1.SF.022                1 LINE     80    6 PAGE UM   CASHMAN             DEC. 13, 1973  13:35.38
            5.0T2   100                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'PG1'.  OBJECT MODULE IN *WWLIB (306/9).
00306/023  *WIREWRAP                 PG3             SF  G  PG3     S0767 'SAVETAPE' FSNAME=79.PG3SOU                               
            5.0T1   820  WIREWRAP.PG3.SF.023                1 LINE     80    7 PAGE UM   CASHMAN             DEC. 13, 1973  13:36.09
            5.0T2   101                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'PG3'.  OBJECT MODULE IN *WWLIB (306/9).
1                                                                                               SUN SEP 08/96   15:24:55   Page  137
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00306/024  *WIREWRAP                 PG5             SF  G  PG5     S0767 'SAVETAPE' FSNAME=79.PG5SOU                               
            5.0T1   821  WIREWRAP.PG5.SF.024                1 LINE     80    6 PAGE UM   CASHMAN             DEC. 13, 1973  13:36.26
            5.0T2   102                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'PG5'.  OBJECT MODULE IN *WWLIB (306/9).
00306/025  *WIREWRAP                 PG13            SF  G  PG13    S0767 'SAVETAPE' FSNAME=79.PG13SOU                              
            5.0T1   822  WIREWRAP.PG13.SF.025               1 LINE     80    7 PAGE UM   CASHMAN             DEC. 13, 1973  13:35.53
            5.0T2   103                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'PG13'.  OBJECT MODULE IN *WWLIB (306/9).
00306/026  *WIREWRAP                 UG1             SA  G  UG1     S0767 'SAVETAPE' FSNAME=AUGATUG1.S                              
            5.0T1   823  WIREWRAP.UG1.SA.026                1 LINE     80   20 PAGE UM   CASHMAN             JAN. 16, 1974  13:13.19
            5.0T2   104                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'UG1'.  OBJECT MODULE IN *WWLIB (306/9).
00306/027  *WIREWRAP                 CHIP            SF  G          S0767 'SAVETAPE' FSNAME=CHIP.S                                  
            5.0T1   824  WIREWRAP.CHIP.SF.027               1 LINE     69    3 PAGE UM   CASHMAN             MAR. 01, 1978  10:29:04
            5.0T2   105                       
0          SUBROUTINE PACKAGE FOR BAY TYPE 'CHIP'.  USEFUL FOR "BREADBOARDING" APPLICATIONS;
           I.E. STICKING WIREWRAP SOCKETS INTO VECTOR BOARD.  COMPLETE DOCUMENTATION IS IN
           THE FORTRAN SOURCE FOR THE FIRST SUBROUTINE.  OBJECT MODULE IN *WWLIB (306/9).
00306/028  *WIREWRAP                 DOUGLAS         SF  G          S0767 'SAVETAPE' FSNAME=DOUGLAS.S                               
            5.0T1   825  WIREWRAP.DOUGLAS.SF.028            1 LINE     69    4 PAGE UM   CASHMAN             FEB. 20, 1976  14:58:54
            5.0T2   106                       
0          Subroutine package for bay type 'DOUGLAS' -- the DEC-bay-compatible
           '10-DE-77' socket board. Documentation is in the FORTRAN source for
           the first subroutine. Object module in *WWLIB (306/9).
00306/029  *WIREWRAP                 8SERIES         SF  G          S0767 'SAVETAPE' FSNAME=8SERIES.S                               
            5.0T1   826  WIREWRAP.8SERIES.SF.029            1 LINE     73    3 PAGE UM   CASHMAN             DEC. 13, 1973  12:57.00
            5.0T2   107                       
0          Subroutine package for bay type '8series' -- for DEC's PDP-8 classic
           mini-computer. Object module in *WWLIB (306/9).
00306/030A *WIREWRAP                 *WWICMAC        D              *WWICMAC                                                        
            5.1T1   248  WIREWRAP.?WWICMAC.D.030            1 LINE     65    4 PAGE UM   CASHMAN             JULY 23, 1983  10:30:03
                         *WWICMAC             
0          This file contains "Wirewrap macros" for most of the IC's used for
           logic design at the UM Computing Center. This file may be read by
           *WIREWRAP when the user specifies "PAR=TYPE=IC" for the mounting
           technique.
0          Referenced by comments of: 861/6, 861/7 
1                                                                                               SUN SEP 08/96   15:24:55   Page  138
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00306/031  *WIREWRAP                 *WWLABMAC       D              *WWLABMAC                                                       
            5.0T1   828  WIREWRAP.*WWLABMAC.D.031           1 LINE     55    3 PAGE UM   CASHMAN             JULY 03, 1981  13:19:04
            5.0T2   109  *WWLABMAC            
0          THIS FILE CONTAINS A "WIREWRAP MACRO" DICTIONARY FOR IC'S USED IN THE LOGIC LAB "SUITCASE" USED
           IN ECE DEPARTMENT CLASSES AT UM.  THIS FILE MAY BE READ BY *WIREWRAP WHEN THE USER SPECIFIES
           "PAR=TYPE=LAB" FOR THE MOUNTING TECHNIQUE.
00306/032  *WIREWRAP                 TTLMAC          D   G          S0767 'SAVETAPE' FSNAME=TTLMAC                                  
            5.0T1   829  WIREWRAP.TTLMAC.D.032              1 LINE     91    4 PAGE UM   CASHMAN             JUNE 18, 1976  13:38:55
            5.0T2   110                       
0          ANOTHER "WIREWRAP MACRO" DICTIONARY.
00306/033  *WIREWRAP                 MEMO 267        WT             S1558 5.0T1 VLO FSNAME=WIREWRAP.MEMO_267.WT.033(1)           830
            5.0T1   830  WIREWRAP.MEMO_267.WT.033           1 LINE     81   49 PAGE UM   CASHMAN             FEB. 03, 1977  16:58:19
            5.0T2   111                       
0          THIS IS COMPUTING CENTER MEMO 267 -- "*WIREWRAP USER'S GUIDE"
0          Referenced by comments of: 306/9 
00307/001  *OBJCONV                                  SA           # (OBSOLETE)                                                      
            D3T2    220  OBJCONV..SA.1                      1 SEQ      80    1 PAGE UM                       JULY 31, 1973  22:54.21
00308/001  *FMT                      MAIN            SA  O          S1558 5.0T1 VLO FSNAME=FMT.MAIN.SA.001(1)                    831
            5.0T1   831  FMT.MAIN.SA.001                    1 LINE     75   91 PAGE UBC  NIGHTINGA PICKELMAN AUG. 25, 1980  19:14:04
            5.0T2   112                       
0          FORMAT TEXT PROCESSING LANGUAGE, KNOWN AS *FMT THROUGHOUT MTS-LAND EXCEPT AT
           UM WHERE IT IS CALLED *FORMAT. THIS IS THE MAIN PROGRAM AND "MAIN LINE"
           SUBROUTINES. ALL ROUTINES USING THE FMT#DS COPY SECTION IN (308/4) ARE
           INCLUDED HERE, NAMELY FMT, FMTCC, FMTOUT, AND CONCARD. THIS VERSION HAS
           MULTIPLE COLUMN SUPPORT AND SUPERFMT. ASSEMBLE WITH PAR=B USING UBCMACLIB
           (308/4) AND *SYSMAC.
0          Referenced by comments of: 308/5, 560/1, 769/25, 798/98, 798/99, 802/31, 810/2, 861/8, 1036/4, 1079/23, 1079/24,
                 1089/4 
00308/002  *FMT                      SUBROUTINES     SA  O          S1558 5.0T1 VLO FSNAME=FMT.SUBROUTINES.SA.002(1)             832
            5.0T1   832  FMT.SUBROUTINES.SA.002             1 LINE     75   58 PAGE UBC  NIGHTINGA PICKELMAN AUG. 12, 1980  17:28:24
            5.0T2   113                       
0          SUBROUTINES WHICH DO NOT COPY FMT#DS. THE ROUTINE FMTOPTS SHOULD BE
           REASSEMBLED TO CHANGE THE NAME OF THE FUNCTION LIBRARY ETC:FMTLIB (308/16),
           IF NECESSARY. ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC.
0          Referenced by comments of: 308/5 
00308/003  *FMT                      MORE SUBRS      SA  O          S1558 5.0T1 VLO FSNAME=FMT.MORE_SUBRS.SA.003(1)              833
            5.0T1   833  FMT.MORE_SUBRS.SA.003              1 LINE     77   29 PAGE UBC  NIGHTINGA PICKELMAN AUG. 12, 1980  17:28:37
            5.0T2   114                       
0          ADDITIONAL SUBROUTINES WHICH ARE ALSO USED BY THE FUNCTIONS (308/6) ET SEQ.
1                                                                                               SUN SEP 08/96   15:24:55   Page  139
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC.
0          Referenced by comments of: 308/5 
00308/004  *FMT                      UBCMACLIB       SM  G          S1558 5.0T1 VLO FSNAME=FMT.UBCMACLIB.SM.004(1)               834
            5.0T1   834  FMT.UBCMACLIB.SM.004               1 LINE     73   14 PAGE UBC  NIGHTINGA PICKELMAN AUG. 25, 1980  19:13:53
            5.0T2   115                       
0          Referenced by comments of: 308/1, 308/2, 308/3, 308/7, 308/9 
00308/005  *FMT                      OBJECT          OE  O          *FORMAT                                                         
            5.0T1   835  FMT.OBJECT.OE.005                  1 SEQ   32167   13 PAGE UBC  NIGHTINGA PICKELMAN JULY 03, 1981  13:22:26
            5.0T2   116  *FORMAT              
0          OBJECT FROM (308/1), (308/2), AND (308/3).
00308/006  *FMT                      HYPHEN          S3  O          S1558 5.0T1 VLO FSNAME=FMT.HYPHEN.S3.006(1)                  836
            5.0T1   836  FMT.HYPHEN.S3.006                  1 LINE     80    3 PAGE UBC  NIGHTINGA PICKELMAN JUNE 30, 1980  20:14:28
            5.0T2   117                       
0          THIS COMPONENT AND THOSE FOLLOWING ARE THE SOURCE FOR THE FMT DYNAMICALLY
           LOADED FUNCTION LIBRARY (ETC:FMTLIB).
            
           THIS IS THE HYPHEN FUNCTION AND ITS SUBROUTINES.  IT HAS $CONTINUE WITHS
           WHICH ARE SELF-REFERENCING.  AFTER COMPILATION, REFERENCES IN THE OBJECT 
           TO INFREE1 SHOULD BE CHANGED TO INFREE#.  THIS FUNCTION REFERENCES THE 
           DATA FILE ETC:FMTDICT (308/17).
0          Referenced by comments of: 308/3, 308/7, 308/16 
00308/007  *FMT                      GSPFRSP         SA  O          S1558 5.0T1 VLO FSNAME=FMT.GSPFRSP.SA.007(1)                 837
            5.0T1   837  FMT.GSPFRSP.SA.007                 1 LINE     71    3 PAGE UBC  NIGHTINGA PICKELMAN JUNE 30, 1980  20:14:34
            5.0T2   118                       
0          SUBROUTINE CALLED BY HYPHEN (308/6).  ASSEMBLE USING UBCMACLIB (308/4) AND *SYSMAC.
0          Referenced by comments of: 308/17 
00308/008  *FMT                      INDEX           SF  O          S1558 5.0T1 VLO FSNAME=FMT.INDEX.SF.008(1)                   838
            5.0T1   838  FMT.INDEX.SF.008                   1 LINE     80   10 PAGE UBC  NIGHTINGA PICKELMAN AUG. 01, 1979  20:25:37
            5.0T2   119                       
0          INDEX FUNCTION AND SEVERAL SUBROUTINES.
            
00308/009  *FMT                      ASMFNS          SA  O          S1558 5.0T1 VLO FSNAME=FMT.ASMFNS.SA.009(1)                  839
            5.0T1   839  FMT.ASMFNS.SA.009                  1 LINE     68    5 PAGE UBC  NIGHTINGA PICKELMAN AUG. 14, 1978  11:37:32
            5.0T2   120                       
0          FUNCTIONS UCTRAN, IFDEF, IFNUL, BLOCK, CAPIT, DOUBLE, GETPAR, FMTCHAR,
           MOST, AND ALL.  ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  140
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00308/010  *FMT                      CONTENTS        SF  O          S1558 5.0T1 VLO FSNAME=FMT.CONTENTS.SF.010(1)                840
            5.0T1   840  FMT.CONTENTS.SF.010                1 LINE     73    4 PAGE UBC  NIGHTINGA PICKELMAN AUG. 14, 1978  11:37:48
            5.0T2   121                       
0          AFTER COMPILATION, CHANGE THE NAME "CONTNS  " TO "CONTENTS" IN THE OBJECT.
00308/011  *FMT                      COUNT           SF  G          S1558 5.0T1 VLO FSNAME=FMT.COUNT.SF.011(1)                   841
            5.0T1   841  FMT.COUNT.SF.011                   1 LINE     72    3 PAGE UBC  NIGHTINGA PICKELMAN AUG. 14, 1978  11:38:03
            5.0T2   122                       
00308/012  *FMT                      DATE            S3  O          S1558 5.0T1 VLO FSNAME=FMT.DATE.S3.012(1)                    842
            5.0T1   842  FMT.DATE.S3.012                    1 LINE     71    4 PAGE UBC  NIGHTINGA PICKELMAN AUG. 12, 1980  17:19:33
            5.0T2   123                       
00308/013  *FMT                      FTNFNS          SF  O          S1558 5.0T1 VLO FSNAME=FMT.FTNFNS.SF.013(1)                  843
            5.0T1   843  FMT.FTNFNS.SF.013                  1 LINE     72    6 PAGE UBC  NIGHTINGA PICKELMAN MAR. 03, 1981  11:00:19
            5.0T2   124                       
0          Functions STACK, NULL, CENTER, TEST, INPUT, MYSORT, PAD, FOR, SPREAD, EXIST,
           JUST, and FMTCNTRL.  After compilation, change the name "FMTCTL  " to "FMTCNTRL"
           in the object.
00308/014  *FMT                      SORT            SF  O          S1558 5.0T1 VLO FSNAME=FMT.SORT.SF.014(1)                    844
            5.0T1   844  FMT.SORT.SF.014                    1 LINE     64    1 PAGE UBC  NIGHTINGA PICKELMAN AUG. 01, 1979  20:25:24
            5.0T2   125                       
0          AFTER COMPILATION, CHANGE THE NAME "FMTSRT " TO FMTSORT" IN THE OBJECT.
00308/015  *FMT                      PAGE            SF  O          S1558 5.0T1 VLO FSNAME=FMT.PAGE.SF.015(1)                    845
            5.0T1   845  FMT.PAGE.SF.015                    1 LINE     72    3 PAGE UBC  NIGHTINGA PICKELMAN AUG. 14, 1978  11:40:07
            5.0T2   126                       
0          PAGE FUNCTION AND FMTPAG SUBROUTINE.
0          Referenced by comments of: 308/16 
00308/016  *FMT                      FMTLIB          OL  O          ETC:FMTLIB                                                      
            5.0T1   846  FMT.FMTLIB.OL.016                  1 LINE   6322   26 PAGE UBC  NIGHTINGA PICKELMAN JULY 03, 1981  13:23:48
            5.0T2   127  ETC.:FMTLIB          
0          FUNCTION LIBRARY CONSISTING OF OBJECT FROM (308/6) THROUGH (308/15).
0          Referenced by comments of: 308/2 
00308/017  *FMT                      DICT            D              ETC:FMTDICT                                                     
            5.0T1   847  FMT.DICT.D.017                     1 LINE     80    3 PAGE UBC  NIGHTINGA PICKELMAN JULY 03, 1981  13:23:53
            5.0T2   128  ETC.:FMTDICT         
0          HYPHENATION DICTIONARY DATA FILE USED BY (308/7).
0          Referenced by comments of: 308/6 
1                                                                                               SUN SEP 08/96   15:24:55   Page  141
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00308/018  *FMT                      JONMACLIB       SM  O          COPY:JONMACLIBFMT                                               
            5.0T1   848  FMT.JONMACLIB.SM.018               1 LINE    110    8 PAGE UBC  NIGHTINGA PICKELMAN JULY 03, 1981  13:23:54
            5.0T2   129  COPY:JONMACLIBFMT    
0          UBC'S JON:MACLIB -- FMT MACROS USED IN UBC DOCUMENTATION. DOCUMENTATION FOR
           JON:MACLIB IS IN (308/21). THERE MAY BE SOME PROBLEM USING UM'S *FORMAT WITH
           THESE MACROS, BUT NOT NECESSARILY. AT UM, THIS FILE IS PERMITTED ONLY TO
           P=W?.
0          Referenced by comments of: 308/19, 774/7, 1036/4, 1038/11, 1042/70, 1042/72, 1058/24, 1077/4, 1080/1, 1089/4,
                 3018/174 
00308/019  *FMT                      JONMACLIB       SF  O          S1558 5.0T1 VLO FSNAME=FMT.JONMACLIB.SF.019(1)               849
            5.0T1   849  FMT.JONMACLIB.SF.019               1 LINE     68    3 PAGE UBC  NIGHTINGA PICKELMAN AUG. 12, 1980  17:23:16
            5.0T2   130                       
0          FUNCTIONS DYNAMICALLY LOADED BY (308/18).
0          Referenced by comments of: 308/20 
00308/020  *FMT                      JONMACLIB       OL  O          COPY:JONFMT.FNLIB                                               
            5.0T1   850  FMT.JONMACLIB.OL.020               1 LINE   1120    4 PAGE UBC  NIGHTINGA PICKELMAN JULY 03, 1981  13:24:11
            5.0T2   131  COPY:JONFMT.FNLIB    
0          OBJECT OF (308/19).
00308/021  *FMT                      JONMACLIB       WF             COPY:JONMACLIB.F                                                
            5.0T1   851  FMT.JONMACLIB.WF.021               1 LINE    149    8 PAGE UBC  NIGHTINGA PICKELMAN JULY 03, 1981  13:24:11
            5.0T2   132                       
0          This is the UBC's writeup describing JONMACLIB.  Lines -99,-1 of the
           file contain CDUPDATE (1036) commands to make source compatible with UM's
           *FORMAT.
0          Referenced by comments of: 308/18 
00308/022  *FMT                      FMTAPA          WF             S1153 UNSP VLO FSNAME=FMTAPA.FMT                                
            5.0T1   852  FMT.FMTAPA.WF.022                  1 LINE     81    6 PAGE UM   NIGHTINGA UNSP      SEP. 15, 1980  16:42:59
            5.0T2   133                       
0          WRITEUP DESCRIBING A SET OF *FORMAT MACROS (308/24) WHICH PRODUCES HEADINGS
           IN AMERICAN PSYCHIATRIC ASSOCIATION FORMAT AND A FEW OTHER THINGS.
00308/023  *FMT                      FMTAPA          WF             UNSP:FMTAPA                                                     
            5.0T1   853  FMT.FMTAPA.WF.023                  1 LINE     51    1 PAGE UM   NIGHTINGA UNSP      JULY 03, 1981  13:24:37
            5.0T2   134                       
0          THIS FILE CONTAINS *FMT CONTROL COMMANDS.  IT IS TO BE "|INCLUD"ED BY
           *FMT FOR FILES WHICH USE FMTAPA (308/24).
1                                                                                               SUN SEP 08/96   15:24:55   Page  142
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00308/024  *FMT                      FMTAPA          WF             UNSP:FMTMACLIB                                                  
            5.0T1   854  FMT.FMTAPA.WF.024                  1 LINE     94    3 PAGE UM   NIGHTINGA UNSP      JULY 03, 1981  13:24:38
            5.0T2   135                       
0          THESE ARE THE FORMAT APA MACROS.
0          Referenced by comments of: 308/22, 308/23, 308/25 
00308/025  *FMT                      FMTAPA          OE             UNSP:FMTLIB                                                     
            5.0T1   855  FMT.FMTAPA.OE.025                  1 LINE    520    1 PAGE UM   NIGHTINGA UNSP      JULY 03, 1981  13:24:39
            5.0T2   136                       
0          OBJECT (WE DO NOT HAVE THE SOURCE) OF FUNCTIONS USED BY FMTAPA
           (308/24).
00309/001  *STASS360                                 SA           # (OBSOLETE)                                                      
            D3T2    225  STASS360.MONITOR.SA.1              1 SEQ      80   11 PAGE UM                       JULY 31, 1973  22:55.58
0          Obsoleted by *ASSIST (3023).
00311/001  *VARRLIST                                 S            # (OBSOLETE)                                                      
            D2T1    333                                                             UM                                              
00313/001   1130 RJE SUPPORT PROGRAM                 S            # (OBSOLETE)                                                      
            D2T1    096                                                             UM                                              
00314/001  *LABELSNIFF                               SA  G          W062:LBLSNIFF.S                                                 
            5.0T1   856  LABELSNIFF..SA.001                 1 LINE     73   37 PAGE UM   TIFFANY             JULY 03, 1981  13:24:40
            5.0T2   137                       
0          Program to print information about what's on a tape.
            
           Copies *SENSEDSECT (3025) and *GDINFODSECT (594). Requires the (314/3) macro library and *SYSMAC.
           Assemble with PEXIT=*PEXIT (775).
00314/002  *LABELSNIFF                               OE  G          *LABELSNIFF                                                     
            5.0T1   857  LABELSNIFF..OE.002                 1 LINE  15788   14 PAGE UM   TIFFANY             JULY 03, 1981  13:24:44
            5.0T2   138  *LABELSNIFF          
00314/003  *LABELSNIFF               MACLIB          SM  G          W062:LBLSNIFF.MAC                                               
            5.0T1   858  LABELSNIFF.MACLIB.SM.003           1 LINE     72    4 PAGE UM   TIFFANY             JULY 03, 1981  13:24:45
            5.0T2   139                       
0          Referenced by comments of: 314/1 
00315/001  *ANS                                      SA           # (OBSOLETE)                                                      
            D2T1    155                                                             UM                                              
00316/001   GENLIB                                   SA           # (OBSOLETE)                                                      
            D3T2    236  GENLIB..SA.                        1 SEQ      80    6 PAGE UNE                      JULY 31, 1973  22:59.46
0          Obsoleted by *OBJUTIL (721).
1                                                                                               SUN SEP 08/96   15:24:55   Page  143
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00318/001  *XPL                      SUBMONITOR      SA  G          S1558 5.0T1 VLO FSNAME=XPL.SUBMONITOR.SA.001(1)              859
            5.0T1   859  XPL.SUBMONITOR.SA.001              1 SEQ      80   24 PAGE UM   SHERRY              JULY 27, 1977  02:39:23
            5.0T2   140                       
0          XPL COMPILER AND EXECUTION CONTROL (SEE 1968 FJCC PROC, PP 617-636).  ONE NEVER $RUNS AN
           XPL OBJECT DECK SINCE THE OBJECT CODE IS STORED IN A FORMAT UNIQUE TO XPL.  RATHER, ONE
           RUNS THE XPL SUBMONITOR, WHICH IN TURN LOADS THE XPL PROGRAM AND PROVIDES A RUN-TIME
           INTERFACE TO MTS.  SINCE THE COMPILER ITSELF IS ALSO AN XPL PROGRAM, IT MUST BE RUN IN THE
           SAME MANNER, I.E. IT MUST BE RUN UNDER CONTROL OF THE SUBMONITOR.  THE 2 FILES *XPL
           AND *XPLGO CONTAIN MTS OBJECT FOR A SET OF DEFAULT FILE NAMES FOR THE COMPILER
           AND COMPILED CODE EXECUTION RESPECTIVELY.  EACH ENDS WITH "$CONTINUE WITH *XMON" SO THAT
           BY $RUNNING *XPL OR *XPLGO, THE SUBMONITOR (*XMON), WITH APPROPRIATE DEFAULTS, IS INVOKED.
            
           MODIFIED UBC SOURCE FOR THE XPL SUBMONITOR (*XMON).
00318/002  *XPL                      SUBMONITOR      OC  G          S1558 5.0T1 VLO FSNAME=XPL.SUBMONITOR.OC.002(1)              860
            5.0T1   860  XPL.SUBMONITOR.OC.002              1 SEQ      80    2 PAGE UM   SHERRY              JULY 27, 1977  02:39:26
            5.0T2   141                       
0          THIS FILE PLUS THE OBJECT FOR TRACE (318/4) CONSTITUTE *XMON.
           THE FOLLOWING PATCH SHOULD BE INSERTED INTO THIS OBJECT FILE:
            REP  0008C6  01,0700,0700       TRACE DIES IF LEFT IN
0          Referenced by comments of: 318/4 
00318/003  *XPL                      TRACE           SA  G          S1558 5.0T1 VLO FSNAME=XPL.TRACE.SA.003(1)                   861
            5.0T1   861  XPL.TRACE.SA.003                   1 SEQ      80   33 PAGE UM   SHERRY              JULY 27, 1977  02:39:35
            5.0T2   142                       
0          UNMODIFIED UBC SOURCE FOR TRACE SUBROUTINE USED BY THE SUBMONITOR (*XMON).
00318/004  *XPL                      TRACE           OC  G          S1558 5.0T1 VLO FSNAME=XPL.TRACE.OC.004(1)                   862
            5.0T1   862  XPL.TRACE.OC.004                   1 SEQ      80    2 PAGE UM   SHERRY              JULY 27, 1977  02:39:38
            5.0T2   143                       
0          THE SUBMONITOR OBJECT (318/2) PLUS THIS FILE CONSTITUTE *XMON.
           THE FOLLOWING 2 LOADER CARDS SHOULD ALSO BE ADDED AT THE END OF *XMON:
            LCS            LCSYMBOL
            LDT            XPLSM
0          Referenced by comments of: 318/2 
00318/005  *XPL                      *XMON           OE  G          *XMON                                                           
            5.0T1   863  XPL.*XMON.OE.005                   1 SEQ    4384    2 PAGE UM   SHERRY              JULY 03, 1981  13:24:54
            5.0T2   144  *XMON                
00318/006  *XPL                      DEFAULTS        SA  G          S1558 5.0T1 VLO FSNAME=XPL.DEFAULTS.SA.006(1)                864
            5.0T1   864  XPL.DEFAULTS.SA.006                1 SEQ      80    1 PAGE UM   SHERRY              JULY 27, 1977  02:39:44
            5.0T2   145                       
0          SOURCE FOR THE 2 SETS OF SUBMONITOR DEFAULTS, THE FIRST FOR THE EXECUTION OF THE COMPILER (*XPL)
           AND THE SECOND FOR THE EXECUTION OF COMPILED CODE (*XPLGO).
1                                                                                               SUN SEP 08/96   15:24:55   Page  144
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00318/007  *XPL                      *XPL            OC  G          *XPL                                                            
            5.0T1   865  XPL.*XPL.OC.007                    1 LINE     80    1 PAGE UM   SHERRY              JULY 03, 1981  13:24:55
            5.0T2   146  *XPL                 
0          OBJECT FOR THE FIRST DEFAULTS PROGRAM.  CONTAINS A "$CONTINUE WITH *XMON" LINE.
00318/008  *XPL                      *XPLGO          OC  G          *XPLGO                                                          
            5.0T1   866  XPL.*XPLGO.OC.008                  1 LINE     80    1 PAGE UM   SHERRY              JULY 03, 1981  13:24:56
            5.0T2   147  *XPLGO               
0          OBJECT FOR THE SECOND DEFAULTS PROGRAM.  CONTAINS A "$CONTINUE WITH *XMON" LINE.
00318/009  *XPL                      COMPILER        SX  G          *XCOM                                                           
            5.0T1   867  XPL.COMPILER.SX.009                1 LINE     80   54 PAGE UM   SHERRY              JULY 03, 1981  13:24:56
            5.0T2   148  *XCOM                
0          XPL SOURCE FOR THE XPL COMPILER (*XCOM).  THIS VERSION IS MODIFIED FROM AN EARLY STANFORD
           RELEASE; IT IS NOT THE SHARE RELEASE.  IT WAS USED QUITE HEAVILY AT UM AND IS RELATIVELY BUG-FREE.
           MOST XPL USERS NOW USE *EXPL (495) BECAUSE INDEPENDENTLY COMPILABLE PROCEDURES REDUCE
           THE COST OF COMPILER DEVELOPMENT.
           THE COMPILER SOURCE IS KEPT IN A PUBLIC FILE (*XCOM) SO THAT PARTS OF IT ARE AVAILABLE FOR
           EXTRACTION BY STUDENTS IN COMPILER WRITING COURSES.
00318/010  *XPL                      COMPILER        O   G          *XPLCOMPILER                                                    
            5.0T1   868  XPL.COMPILER.O.010                 1 SEQ     240   29 PAGE UM   SHERRY              JULY 03, 1981  13:25:00
            5.0T2   149  *XPLCOMPILER         
0          XPL FORMAT OBJECT FILE FOR THE XPL COMPILER (*XPLCOMPILER).
00318/011  *XPL                      *XPLIBRARY      SX  G          *XPLIBRARY                                                      
            5.0T1   869  XPL.*XPLIBRARY.SX.011              1 SEQ      80    1 PAGE UM   SHERRY              JULY 03, 1981  13:25:02
            5.0T2   150  *XPLIBRARY           
0          SOURCE LIBRARY USED BY ALL XPL COMPILATIONS. MUST BE IN *XPLIBRARY TO RUN XPL.
00318/012  *XPL                      *SKELETON       SX  G          *SKELETON                                                       
            5.0T1   870  XPL.*SKELETON.SX.012               1 LINE     80   10 PAGE UM   SHERRY              JULY 03, 1981  13:25:03
            5.0T2   151  *SKELETON            
0          THIS IS THE MINIMAL FRAMEWORK FOR A TABLE-DRIVEN COMPILER.  USER IS EXPECTED TO REPLACE THE
           SYNTAX TABLES WITH APPROPRIATE TABLES PRODUCED BY *ANALYZER AND COMPLETE THE COMPILER BY
           WRITING THE CODE SYNTHESIZER SECTION.
0          Referenced by comments of: 495/8 
00318/013  *XPL                      ANALYZER        SX  G          S1558 5.0T1 VLO FSNAME=XPL.ANALYZER.SX.013(1)                871
            5.0T1   871  XPL.ANALYZER.SX.013                1 SEQ      80   33 PAGE UM   SHERRY              JULY 27, 1977  02:40:20
            5.0T2   152                       
0          XPL PROGRAM TO ANALYZE A BNF DESCRIPTION OF A LANGUAGE AND PRODUCE TABLES FOR COMPILING IT.
0          Referenced by comments of: 495/7 
1                                                                                               SUN SEP 08/96   15:24:55   Page  145
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00318/014  *XPL                      *ANALYZER       O   G          *ANALYZER                                                       
            5.0T1   872  XPL.*ANALYZER.O.014                1 SEQ     240   24 PAGE UM   SHERRY              JULY 03, 1981  13:25:07
            5.0T2   153  *ANALYZER            
0          XPL FORMAT OBJECT FILE.
00318/015  *XPL                      XPLBNF          D   G          S1558 5.0T1 VLO FSNAME=XPL.XPLBNF.D.015(1)                   873
            5.0T1   873  XPL.XPLBNF.D.015                   1 SEQ      80    3 PAGE UM   SHERRY              JULY 27, 1977  02:40:28
            5.0T2   154                       
0          BNF DESCRIPTION OF XPL SUITABLE FOR INPUT TO *ANALYZER.
00318/016  *XPL                      MEMO 230        WF             S1558 5.0T1 VLO FSNAME=XPL.MEMO_230.WF.016(1)                874
            5.0T1   874  XPL.MEMO_230.WF.016                1 LINE    127    4 PAGE UM   SHERRY              JAN. 25, 1977  18:03:50
            5.0T2   155                       
0          THIS IS COMPUTING CENTER MEMO 230 -- "XPL USER'S GUIDE"
00319/001  *FLIKPLT                                  OC           # (OBSOLETE)                                                      
            D3T2    251  FLIKPLT..OC.                       1 LINE     80   15 PAGE UM                       JULY 31, 1973  23:03.29
00321/001  *PIB                                      OC           # (OBSOLETE)                                                      
            D3T2    252  PIB..OC.                           1 LINE     80  122 PAGE UM                       JULY 31, 1973  23:03.31
00322/001  *2260RTN                                  SA  G          MTA:2260RTN                                                     
            5.0T4   297  2260RTN..SA.001                    1 LINE     72   32 PAGE UM   MTA                 AUG. 09, 1981  22:49:31
            5.0T10  201                       
0          MTS DEVICE SUPPORT ROUTINES FOR IBM 2260 DISPLAY.
           SUPPORT FOR THE @MAXLEN MODIFIER HAS BEEN ADDED, BUT NOT TESTED DUE TO LACK OF
           HARDWARE AT UM.
            
           ASSEMBLE USING COPY:MTS.MACROS (344/3).
00322/002  *2260RTN                                  OC  G          *2260RTN                                                        
            5.0T4   298  2260RTN..OC.002                    1 LINE     80    4 PAGE UM   MTA                 AUG. 09, 1981  22:49:34
            5.0T10  202  *2260RTN             
00324/001   EDITOR - OLD                                          # (OBSOLETE)                                                      
            D3T2    255                                                             UM                       FEB. 02, 1973  21:38.36
00326/001A  STAT MONTHLY SUMMARY     MAIN PGM        SP  G          S0027 DISTRB FSNAME=SYSSTAT                                     
            5.1T1   249  STAT_MONTHLY_SUMMARY.MAIN.SP.001   1 LINE     94   18 PAGE UM   ENGLE               MAY  26, 1983  10:18:11
0          Reads statistics (*STATISTICS) tapes or files and prints many pages of interesting (hopefully)
           information about a months running of the system.  It also reads SPU utilization and HASP batch
           queue statistics from SSRTN (413/1), normally in SYS:SSRTNSUMM, and prints that information.
            
           The following logical i/o units are used:
            
            0         input of SSRTN (413/1) summary data.
            SPRINT    output. 
            
           The following PLIi file names are used: 
1                                                                                               SUN SEP 08/96   15:24:55   Page  146
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
            ERROR     log of skipped input records, list of weekday minutes during which the most
                      users were signed on, and list of weekend minutes during which the most users
                      were signed on.  The number of minutes for each category is approximately 1%
                      of the total minutes for the combined categories.
            SAVE      save or restore intermediate information (see below).
            SCARDS    uses get list for 6 or 7 items, followed by get data for 2 variables:
            
                         1)   'mm'    month to analyze, or
                              '00'    look at all input (requires 'full', Â'CPU', and Â'mixed')
            
                         2)   'yyyy'  year
            
                         3)   'part'  use data from whatever part of month is present, or
                              'full'  expect data from entire month, or
                              '9to5'  filters all data except 9am to 5pm, or
                              '5toM'  filters all data except 5pm to midnight, or
                              'cour'  filters all data except for project numbers beginning
                                      with "1", "2", or "3", or
                              'ugrd'  filters all data except for project numbers 1AWA, 1BF4,
                                      1AAA, 1AGA, 1APA, 1AVA, 1CXA, or 1HGA.
            
                         4)   'rest'  restore data (checkpoint) from save, or
                              'save'  save (checkpoint) data on save, or
                              'user'  save num of users versus time data only on save, or
                              'CPU.'  skip everything except jobs program statistics, or
                              'none'  none of above
            
                         5)   'CPU'   process jobs statistics data, see (413/10), or
                              'yes'   same as 'cpu', or
                              'not'   omit processing of jobs statistics
            
                         6)   'whole' no rate change during period of computation, or
                              'mixed' rate change occurred
            
                         7)   'dd'    first day (of month) for new rates.  Give only if 'mixed'
                                      given.
            
                         8)   testcount=n    number of input records to echo on SPRINT (debug)
            
                         9)   debug='1'b     produces general debug output.  Prints for only n
                                             records if testcount given.
            
                      This is followed by one or more lines each containing a mount request or
                      file name for statistics records.  The list of input files is terminated
                      by "done" or an end-of-file.
            
                      At UM, the normal input used is:
            
                           'mm' 'yyyy' 'part' 'none' 'CPU' 'whole' ;
                           statm 9tp *t* vol=statm 'mmm 19yy monthly statistics'
                           stat 9tp *t* vol=stat 'mmm+1 1, 19yy, 1 a.m. daily statistics'
                           bill 9tp *t* vol=stat 'mmm 19yy daily mts statistics file charges'
                           done
1                                                                                               SUN SEP 08/96   15:24:55   Page  147
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This program also reads two files automatically, *RATEFILE (651/10) and
           BATCHID (326/7).
0          Referenced by comments of: 326/2, 326/5, 326/6 
00326/002A  STAT MONTHLY SUMMARY     UPDATE          UC  G          S0027 DISTRB FSNAME=SYSSTATUPD                                  
            5.1T1   250  STAT_MONTHLY_SUMMARY.UPDA.UC.002   1 LINE     72   12 PAGE UM   ENGLE               AUG. 26, 1982  13:46:02
0          Updates source for MAIN PGM (326/1), PPAGES SUBR (326/3), and SETRATE
           (326/5) from previous regular distribution to current distribution. Assumes
           that source modules are concatenated in the order given.
00326/003A  STAT MONTHLY SUMMARY     PPAGES SUBR     SP  G          S0027 DISTRB FSNAME=PPAGES                                      
            5.1T1   251  STAT_MONTHLY_SUMMARY.PPAG.SP.003   1 LINE     99    9 PAGE UM   ENGLE               AUG. 26, 1982  13:46:55
0          Subroutine called by main program.
0          Referenced by comments of: 326/2, 326/6 
00326/004   STAT MONTHLY SUMMARY     CPUSE SUBR      SG  G          S1558 5.0T1 VLO FSNAME=STAT_MONTHLY_SUMMARY.CPUS.SG.004(1)   878
            5.0T1   878  STAT_MONTHLY_SUMMARY.CPUS.SG.004   1 LINE    179    4 PAGE UM   ENGLE               DEC. 13, 1977  16:12:06
            5.0T2   159                       
0          Subroutine which reads SSRTN summary data, see (413/1), and prints the results.  Called only if 'CPU'
           is specified for the fifth parameter or 'CPU.' is specified for the fourth parameter.
0          Referenced by comments of: 326/6 
00326/005A  STAT MONTHLY SUMMARY     SETRATE         SP  G          S0027 DISTRB FSNAME=SETRATE                                     
            5.1T1   252  STAT_MONTHLY_SUMMARY.SETR.SP.005   1 LINE     72    5 PAGE UM   ENGLE               AUG. 26, 1982  13:47:58
0          Subroutines which fill in a rate structure by calling GETRATES and decompose
           a rate number into subscripts. Assumption of how rate number is computed is
           builtin, see line 68 ff. (326/1) calls SETRATE to dynamically construct the
           current and old rates. External reference to GETRATE on ESD card in object
           deck must be changed or aliased to GETRATES. Run with PROT=OFF.
0          Referenced by comments of: 326/2, 326/6 
00326/006A  STAT MONTHLY SUMMARY     OBJECT          OC  G          S0027 DISTRB FSNAME=SYST                                        
            5.1T1   253  STAT_MONTHLY_SUMMARY.OBJE.OC.006   1 LINE     80  219 PAGE UM   ENGLE               JULY 21, 1983  11:46:05
0          Object modules for (326/1), (326/3), (326/4), and (326/5). Contains an
           ALI GETRATE GETRATES line and a $CONTINUE WITH *PL1LIB (233/43) +
           ACC:ACCLIB (104/47) card. Run with PROT=OFF. To run, issue something
           like:
            
           $RUN SYST 0=SYS:SSRTNSUMM SPRINT=OUT PAR=ERROR=-ERROR
00326/007A  STAT MONTHLY SUMMARY     BATCHID         D              S0027 DISTRB FSNAME=BATCHID                                     
            5.1T1   254  STAT_MONTHLY_SUMMARY.BATC.D.007    1 LINE      4    1 PAGE UM   ENGLE               MAY  26, 1983  10:19:29
0          100-line data file referenced to define the mapping between the first two digits
1                                                                                               SUN SEP 08/96   15:24:55   Page  148
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          of the S-8 number and the remote batch station ID's.
0          Referenced by comments of: 326/1 
00328/001   ALLLINES                                 SA           # (OBSOLETE)                                                      
            D2T1    264                                                             UM                                              
00330/001   ABKGET                                   SP  O          S1558 5.0T1 VLO FSNAME=ABKGET..SP.001(1)                     882
            5.0T1   882  ABKGET..SP.001                     1 LINE     80    5 PAGE UM   DWB                 APR. 05, 1980  14:27:12
            5.0T2   163                       
0          Program to sort and tabulate terminal answerback statistics from *STATISTICS data.
           Will read input from either an individual or monthly statistics tape.
           First line of input must be month and year, second and succeeding lines
           must be file or tape names, or mount requests, terminated by an END-OF-FILE
           or "DONE" -- for example
            
                       '01' '1977'                (line must have trailing blank)
                       STATM 9TP *T* VOL=STATM 'JAN 1977'
                       STAT 9TP *T* VOL=STAT '1 FEB 1977 01:00'
                       DONE
00330/002   ABKGET                                   OC  O          S1558 5.0T1 VLO FSNAME=ABKGET..OC.002(1)                     883
            5.0T1   883  ABKGET..OC.002                     1 LINE     80    9 PAGE UM   DWB                 APR. 05, 1980  14:27:14
            5.0T2   164                       
00334/001  *SNOBOL4B                 MAIN            SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.MAIN.SA.001(1)               884
            5.0T1   884  SNOBOL4B.MAIN.SA.001               1 SEQ      80  107 PAGE UM   SWARTZ              JULY 31, 1973  23:13.39
            5.0T2   165                       
0          Bell Labs source for Version 3.0 SNOBOL 4 with blocks (blocks version 1.0).
           This file is assumed to be file 1 on the input tape for the update.
           Copies MLINK (182/11), PARMS (182/12), and MDATA (182/13).
0          Referenced by comments of: 334/8 
00334/002  *SNOBOL4B                 SUBR            SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.SUBR.SA.002(1)               885
            5.0T1   885  SNOBOL4B.SUBR.SA.002               1 SEQ      80   49 PAGE UM   SWARTZ              JULY 31, 1973  23:14.01
            5.0T2   166                       
0          Bell Labs source for subroutines.  This file is assumed to be file 6 on the
           input tape for the update.
00334/003  *SNOBOL4B                 CLEANIO         SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.CLEANIO.SA.003(1)            886
            5.0T1   886  SNOBOL4B.CLEANIO.SA.003            1 SEQ      80    8 PAGE UM   SWARTZ              JULY 31, 1973  23:14.24
            5.0T2   167                       
0          Bell Labs source for CLEANIO.  This file is assumed to be file 5 on the input
           tape for the update.
1                                                                                               SUN SEP 08/96   15:24:55   Page  149
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00334/004  *SNOBOL4B                 BASIC MACROS    SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.BASIC_MACROS.SA.004(1)       887
            5.0T1   887  SNOBOL4B.BASIC_MACROS.SA.004       1 SEQ      80   41 PAGE UM   SWARTZ              JULY 31, 1973  23:14.15
            5.0T2   168                       
0          Bell Labs source for basic macros.  This file is assumed to be file 4 on the
           input tape for the update.
00334/005  *SNOBOL4B                 NEW MACROS      SA  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.NEW_MACROS.SA.005(1)         888
            5.0T1   888  SNOBOL4B.NEW_MACROS.SA.005         1 SEQ      80    5 PAGE UM   SWARTZ              JULY 31, 1973  23:14.21
            5.0T2   169                       
0          Bell Labs source for new macros.  This file is assumed to be file 3 on the
           input tape for the update.
00334/006  *SNOBOL4B                 GENERATE        C              S1558 5.0T1 VLO FSNAME=SNOBOL4B.GENERATE.C.006(1)            889
            5.0T1   889  SNOBOL4B.GENERATE.C.006            1 LINE    128    1 PAGE UM   SWARTZ              MAY  08, 1975  14:44:26
            5.0T2   170                       
0          MTS commands to update, assemble, and test the MTS version of SNOBOL4B.
00334/007  *SNOBOL4B                 LINKEDIT        C              S1558 5.0T1 VLO FSNAME=SNOBOL4B.LINKEDIT.C.007(1)            890
            5.0T1   890  SNOBOL4B.LINKEDIT.C.007            1 LINE     56    1 PAGE UM   SWARTZ              MAY  08, 1975  14:44:28
            5.0T2   171                       
0          MTS commands to LINKEDIT, and test the MTS version of SNOBOL4B.
00334/008  *SNOBOL4B                 UPDATE          UU  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.UPDATE.UU.008(1)             891
            5.0T1   891  SNOBOL4B.UPDATE.UU.008             1 LINE     80   22 PAGE UM   SWARTZ              MAY  08, 1975  14:44:18
            5.0T2   172                       
0          *UPDATE deck to modifiy Bell Labs source (334/1) to bring it up to version 3.10
           SNOBOL 4 with blocks (blocks version 1.10) and to add the changes necessary to
           run it in MTS.
00334/009  *SNOBOL4B                 OBJECT          OE  G          *SNOBOL4B                                                       
            5.0T1   892  SNOBOL4B.OBJECT.OE.009             1 SEQ   32767   41 PAGE UM   SWARTZ              JULY 03, 1981  13:35:44
            5.0T2   173  *SNOBOL4B            
0          Object from assembly of MAIN, SUBR, and CLEANIO plus FTN.O which has been combined
           and purged by *LINKEDIT.
00334/010  *SNOBOL4B                 FTN.O           OE  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.FTN.O.OE.010(1)              893
            5.0T1   893  SNOBOL4B.FTN.O.OE.010              1 LINE    255    5 PAGE UM   SWARTZ              MAY  08, 1975  14:44:42
            5.0T2   174                       
0          FORTRAN I/O routines for use by SNOBOL4B.
00334/011  *SNOBOL4B                 MACLEAN                      # (SEE *SNOBOL4)                                                  
                                                                                    UM   SWARTZ                                     
0          Same as MACLEAN under *SNOBOL4 (182/8).
1                                                                                               SUN SEP 08/96   15:24:55   Page  150
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00334/012  *SNOBOL4B                 TEST PGMS       SS  G          S1558 5.0T1 VLO FSNAME=SNOBOL4B.TEST_PGMS.SS.012(1)          894
            5.0T1   894  SNOBOL4B.TEST_PGMS.SS.012          1 LINE     74    5 PAGE UM   SWARTZ              MAY  08, 1975  14:44:44
            5.0T2   175                       
0          Programs for testing SNOBOL4B.
00335/001A *DITTO                                    SA  G          S0791 FMTJNK 'FORMAT' FSNAME=DITTO                              
            5.1T1   255  DITTO..SA.001                      1 LINE     71    4 PAGE UM   LIFT                NOV. 28, 1977  21:13:32
0          Program to produce ditto (or other duplicating process) masters on a 2741 or
           1050 from printed output (such as from *FORMAT) which may include overprinting.
            
           ********************************************************************************
           D5.0C version:
            
           Changed to set margins on device (this change is probably installation-
           dependent.
           ********************************************************************************
00335/002A *DITTO                                    OE  G          *DITTO                                                          
            5.1T1   256  DITTO..OE.002                      1 LINE   2426    2 PAGE UM   LIFT                JULY 23, 1983  10:33:39
                         *DITTO               
00336/001  *SPL                                                   # (NOT DISTRIBUTED)                                               
            D3T2    277                                                             UM                       JULY 31, 1973  23:16.06
00337/001   PRINTTRACE                               SA  G          MTA:PRINTTRACE(1,999)                                           
            5.0T4   299  PRINTTRACE..SA.001                 1 LINE     71    4 PAGE UM   MTA                 AUG. 09, 1981  22:49:35
            5.0T10  203  MTA.:PRINTTRACE      
0          Subroutine to print trace table entries from dump tape or STAT job tape. To get trace table on STAT job
           tape type "TRCTP" on Operators' console.
           Assemble using *SYSMAC.
            
0          Referenced by comments of: 400/1, 400/17, 540/20, 1028/3 
00337/002   PRINTTRACE                               OC  G          MTA:PRINTTRACE(1000,1999)                                       
            5.0T4   300  PRINTTRACE..OC.002                 1 LINE   3016    3 PAGE UM   MTA                 AUG. 09, 1981  22:49:37
            5.0T10  204                       
00338/001   RIPPLE                   PN/QN           SA  O          MTA:RIPPLE(1,999)                                               
            5.0T1   897  RIPPLE.PN/QN.SA.001                1 LINE     56    1 PAGE UM   MTA                 JULY 03, 1981  13:36:11
            5.0T2   178  MTA.:RIPPLE          
0          Program to ripple print on a PN or QN printer.  Useful for cleaning a train or checking out a printer.
           OLTEP (458) does a better job.
0          Referenced by comments of: 338/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  151
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00338/002   RIPPLE                   PN/QN           OC  O          MTA:RIPPLE(1000)                                                
            5.0T1   898  RIPPLE.PN/QN.OC.002                1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  13:36:11
            5.0T2   179                       
00338/003   RIPPLE                   *RIP            C              *RIP                                                            
            5.0T1   899  RIPPLE.*RIP.C.003                  1 LINE     36    1 PAGE UM   MTA                 JULY 03, 1981  13:36:12
            5.0T2   180  *RIP                 
0          Command file to run MTA:RIPPLE(1000).  Invoked by entering "MTS *RIP , PTRX" on the operator's console,
           where PTRX is the printer to be rippled.
0          Referenced by comments of: 338/6 
00338/004   RIPPLE                   TN              SA  O          MTA:TNRIP(1,999)                                                
            5.0T1   900  RIPPLE.TN.SA.004                   1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  13:36:13
            5.0T2   181  MTA.:TNRIP           
0          Same as (338/1) except for TN printers.
00338/005   RIPPLE                   TN              OC  O          MTA:TNRIP(1000)                                                 
            5.0T1   901  RIPPLE.TN.OC.005                   1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  13:36:13
            5.0T2   182                       
00338/006   RIPPLE                   *TNR            C              *TNR                                                            
            5.0T1   902  RIPPLE.*TNR.C.006                  1 LINE     18    1 PAGE UM   MTA                 JULY 03, 1981  13:36:14
            5.0T2   183  *TNR                 
0          Same as *RIP (338/3) except that it runs MTA:TNRIP(1000).
00339/001   WRITE80                                  S            # (OBSOLETE)                                                      
            D2T1    165                                                             UM                                              
00340/001   READRESTP                                SA  O          MTA:READRESTP(1,999)                                            
            5.0T1   903  READRESTP..SA.001                  1 LINE     72    9 PAGE UM   MTA                 JULY 03, 1981  13:36:15
            5.0T2   184                       
0          Program which will read a DUMP/RESTORE tape and extract things from an OS, DOC,
           or VS data set.  It produces output that can be used as input to *UNLINKER (562).
           It will process any OS data set which has no more than 3 extents and no note
           lists.  It prompts for data set names using GUSER and SERCOM, reads from unit
           0, and writes on unit 1.  "LIST NAMES" on GUSER will get a list of DSNAMES in
           the VTOC.  Copies *SENSEDSECT (3025).
0          Referenced by comments of: 340/2 
00340/002   READRESTP                SUBROUTINE      SA  O        # (PART OF MTA:READRESTP)                                         
                                                                                    UM   MTA                                        
0          Subroutine called by (340/1).
1                                                                                               SUN SEP 08/96   15:24:55   Page  152
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00340/003   READRESTP                                OC  O          MTA:READRESTP(1000)                                             
            5.0T1   904  READRESTP..OC.003                  1 LINE     80    5 PAGE UM   MTA                 JULY 03, 1981  13:36:18
            5.0T2   185                       
00341/001   RDRSTP                                                # (OBSOLETE)                                                      
            D2T1    168                                                             UM                                              
0          Obsoleted by *UNLINKER (562).
00342/001   LIBPRINT                                 S            # (OBSOLETE)                                                      
            D2T1    171                                                             UM                                              
00343/001   MTS.CONTAB                               SA           # (OBSOLETE)                                                      
            D3.2T1  180  MTS.CONTAB..SA.                    1 LINE     80    4 PAGE UM                       MAR. 21, 1975  01:24:57
0          Now part of COPY:MTS.MACROS (344/3).
00344/001   MTS.MACROS               D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=MTS_MACROS                  
            5.0T1   905  MTS.MACROS.D5.0_MASTER.SA.001      1 LINE     80  104 PAGE UM   MTS       BURLING   AUG. 05, 1981  02:18:08
            5.0T2   186                       
0          D5.0 master source for the MTS macro library which is used to assemble MTS (042)
           and the "MTS subroutines" as listed under the comments for (042/2) in
           addition to many other programs. Copies COPY:RATEVEC (651/3).
00344/002A  MTS.MACROS               UPDATE          UC  G          MTSS:MTSMAC/UPD                                                 
            5.1T1   257  MTS.MACROS.UPDATE.UC.002           1 LINE     90   90 PAGE UM   MTS       BURLING   JULY 23, 1983  10:33:39
0          *CDUPDATE input to produce the current source.
0          Referenced by comments of: 344/3 
00344/003A  MTS.MACROS               MACRO LIBRARY   SM  G          COPY:MTS.MACROS                                                 
            5.1T1   258  MTS.MACROS.MACRO_LIBRARY.SM.003    1 LINE     80  139 PAGE UM   MTS       BURLING   JULY 23, 1983  10:33:43
                         COPY:MTS.MACROS      
0          This is "COPY:MTS.MACROS" which is produced by *MACUTIL (738), using
           as input the output from the *CDUPDATE run of (344/2) against the
           appropriate base source.
0          Referenced by comments of: 1/5, 1/9, 38/1, 42/1, 71/1, 101/1, 104/18, 116/1, 135/1, 197/1, 197/2, 197/5, 198/1,
                 322/1, 343/1, 345/1, 346/1, 347/1, 348/1, 354/1, 354/5, 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8,
                 388/1, 388/2, 400/5, 413/5, 447/1, 464/1, 482/61, 500/51, 509/1, 513/1, 529/1, 531/1, 531/8, 531/15, 535/1,
                 535/3, 539/1, 553/1, 553/2, 553/7, 559/2, 567/1, 570/1, 578/1, 585/1, 600/1, 600/3, 600/5, 600/7, 600/9,
                 600/11, 600/18, 600/19, 600/20, 600/22, 600/23, 600/24, 600/25, 600/26, 600/27, 600/28, 600/29, 600/30,
                 600/31, 600/32, 600/33, 600/34, 615/15, 616/1, 617/1, 620/1, 622/1, 623/1, 624/1, 629/1, 631/1, 632/1, 635/1,
                 636/1, 637/1, 638/1, 639/1, 640/1, 645/1, 648/1, 651/13, 677/1, 680/1, 707/1, 725/1, 732/1, 753/1, 753/3,
                 761/1, 761/3, 770/1, 777/1, 798/24, 798/33, 798/35, 798/67, 798/69, 798/75, 798/81, 798/83, 806/1, 809/3,
                 809/4, 809/6, 811/2, 829/1, 866/1, 1019/1, 1067/5, 1070/3, 3024/1, 4000/1 
00344/004A  MTS.MACROS               PLUS LIBRARY    SQ  O          COPY:MTS*SQL                                                    
            5.1T1   259  MTS.MACROS.PLUS_LIBRARY.SQ.004     1 LINE    143   56 PAGE UBC  MTS       BURLING   JULY 23, 1983  10:33:48
0          This is a PLUS library of MTS internal definitions (data structures,
1                                                                                               SUN SEP 08/96   15:24:55   Page  153
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          routines, etc.). Includes versions of many of the more commonly required
           structures. Contains a fairly complete definition of the CLS transfer
           vector, and some other CLS-related definitions. Comments in the library
           members indicate the distribution level to which they correspond.
            
           ********************************************************************
           D5.1 version:
            
           This is the current UM library.
           ********************************************************************
0          Referenced by comments of: 67/1, 67/3, 67/5, 509/10, 509/14, 802/1, 802/25, 821/1, 843/1, 851/1, 852/1, 853/1,
                 854/1, 855/1, 856/1, 857/1, 858/1, 1086/1 
00344/005C  MTS.MACROS               PLUS LIBRARY    SQ  O          MTSS:MTS#SQL                                                    
            5.1T1   260  MTS.MACROS.PLUS_LIBRARY.SQ.005     1 LINE     74   54 PAGE UBC  MTS       BURLING   JULY 23, 1983  10:33:50
0          ********************************************************************
           D5.1 version:
            
           This is the base source as distributed with the first Resource
           Manager distribution.
           ********************************************************************
0          Referenced by comments of: 344/6 
00344/006C  MTS.MACROS               PLUS LIBRARY    UC  G          MTSS:MTS*UQL                                                    
            5.1T1   261  MTS.MACROS.PLUS_LIBRARY.UC.006     1 LINE    143   25 PAGE UM   BURLING   BURLING   JULY 23, 1983  10:33:52
0          ****************************************************************************
           D5.1 version:
            
           These are the updates which were used to produce the current UM
           library from (344/5).
           ****************************************************************************
00345/001   MTS.EQU                                  SA           # (OBSOLETE)                                                      
            D3.2T1  182  MTS.EQU..SA.                       1 LINE     80    4 PAGE UM                       MAR. 21, 1975  01:25:01
0          Now part of COPY:MTS.MACROS (344/3).
00346/001   MTS.DSECT                                SA           # (OBSOLETE)                                                      
            D3.2T1  183  MTS.DSECT..SA.                     1 LINE     80   20 PAGE UM                       MAR. 21, 1975  01:25:03
0          Now part of COPY:MTS.MACROS (344/3).
00347/001   MTS.EQU2                                 SA           # (OBSOLETE)                                                      
            D3.2T1  184  MTS.EQU2..SA.                      1 LINE     81    4 PAGE UM                       MAR. 21, 1975  01:25:08
0          Now part of COPY:MTS.MACROS (344/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  154
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00348/001   MTS.RHTABLE                              SA           # (OBSOLETE)                                                      
            D3.2T1  185  MTS.RHTABLE..SA.                   1 LINE     80    3 PAGE UM                       MAR. 21, 1975  01:25:10
0          Now part of COPY:MTS.MACROS (344/3).
00350/001   BLOCKLETTER                              SA           # (OBSOLETE)                                                      
            D2T1    252                                                             UM                                              
00353/001   BABYSIT                  *BBS            C              *BBS                                                            
            5.0T1   908  BABYSIT.*BBS.C.001                 1 LINE     37    1 PAGE UM   WSG                 JULY 03, 1981  13:37:13
            5.0T2   189  *BBS                 
0          Command file invoked by entering "MTS *BBS" from operator's console which
           signs on under user id "SYS." and runs (353/3) with i/o on the operator's
           console.
00353/002A  BABYSIT                                  SA  O          WSG:BBSIT                                                       
            5.1T1   262  BABYSIT..SA.002                    1 LINE     72    3 PAGE UM   WSG                 JULY 23, 1983  10:33:54
0          Program to watch for specified users to signon or signoff. Useful for
           catching a pirate. Run with PROT=OFF. Copies COPY:LLMPSEQU (087) and
           COPY:GLOBALS (1026/3).
            
           ********************************************************************
           For D5.1:
             Changed to print better information at each signon and signoff
             including the job number and time of day as well as a "bell"
             character. In addition, BABYSIT now fakes things so that another
             user looking at a task which is running BABYSIT will see it as
             being in "Jobsta wait" even though it isn't.
00353/003A  BABYSIT                                  OC  O          SYS:BABYSIT                                                     
            5.1T1   263  BABYSIT..OC.003                    1 LINE   1519    1 PAGE UM   WSG                 JULY 23, 1983  10:33:54
                         SYS:BABYSIT          
0          Referenced by comments of: 353/1 
00354/001   LLXU                     D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=LLXU                        
            5.0T4   301  LLXU.D5.0_MASTER.SA.001            1 LINE     80   59 PAGE UM   MTS       SHERRY    AUG. 09, 1981  22:49:39
            5.0T10  205                       
0          LOAD/LINK/XCTL/UNLOAD subroutines, the interface between MTS and UMLOAD.
           Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
           Assemble using COPY:MTS.MACROS (344/3) and COPY:CC.MACROS (1054/3).
0          Referenced by comments of: 1/4, 42/2 
00354/002A  LLXU                     UPDATE          UC  G          MTSS:LLXU/UPD                                                   
            5.1T1   264  LLXU.UPDATE.UC.002                 1 LINE     70    7 PAGE UM   MTS       SHERRY    JULY 23, 1983  10:33:54
0          *CDUPDATE input to produce current source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  155
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00354/003A  LLXU                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       SHERRY                           
0          Object part of Resident System (468).
00354/004A  LLXU                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=LLXU.LIST                 
            5.1T1   265  LLXU..L.004                        1 LINE    133  156 PAGE UM   MTS       SHERRY    JULY 23, 1983  10:33:57
00354/005   LLXU                     LLXUTEST        SA  G          W009:LLXUTEST.S                                                 
            5.0T1   911  LLXU.LLXUTEST.SA.005               1 LINE    157   47 PAGE UM   SHERRY              JULY 03, 1981  13:37:16
            5.0T2   192                       
0          PROGRAM TO TEST LOAD/LINK/XCTL/UNLOAD.  ASSEMBLE USING *SYSMAC, OLD:CC.MACROS (1054/4),
           COPY:MTS.MACROS (344/3), COPY:MISC.MACROS (728) AND THE *OBJUTIL MISCELLANEOUS
           MACROS (721/15).  COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU
           (087), AND *CNFGINFODSECT (654). CONTAINS REFERENCE TO W009:LLXUTEST.XTL 
           (354/9).  DOCUMENTATION ON THE USE OF THIS PROGRAM IS CONTAINED IN THE WRITEUP (354/11).
0          Referenced by comments of: 354/7, 354/9, 354/11 
00354/006   LLXU                     LLXUTEST        OC  G          W009:LLXUTEST.O                                                 
            5.0T1   912  LLXU.LLXUTEST.OC.006               1 LINE   9964   17 PAGE UM   SHERRY              JULY 03, 1981  13:37:36
            5.0T2   193                       
00354/007   LLXU                     FAKEGATE        SA  G          W009:FAKEGATE.S                                                 
            5.0T1   913  LLXU.FAKEGATE.SA.007               1 LINE     68    1 PAGE UM   SHERRY              JULY 03, 1981  13:37:39
            5.0T2   194                       
0          DUMMY VERSIONS OF ROUTINES IN GATE (4000) WHICH LLXU CALLS -- REQUIRED FOR
           LLXUTEST (354/5).
00354/008   LLXU                     FAKEGATE        OC  G          W009:FAKEGATE.O                                                 
            5.0T1   914  LLXU.FAKEGATE.OC.008               1 LINE    204    1 PAGE UM   SHERRY              JULY 03, 1981  13:37:40
            5.0T2   195                       
00354/009   LLXU                     TOXCTL          SA  G          W009:LLXUTEST.XTL(1000)                                         
            5.0T1   915  LLXU.TOXCTL.SA.009                 1 LINE     50    1 PAGE UM   SHERRY              JULY 03, 1981  13:37:41
            5.0T2   196                       
0          INTERFACE TO XCTL WHICH PERMITS XCTL TO BE TESTED BY LLXUTEST (354/5) WITHOUT
           UNLOADING THE TEST PROGRAM.
0          Referenced by comments of: 354/5 
00354/010   LLXU                     TOXCTL          OC  G          W009:LLXUTEST.XTL(1,999)                                        
            5.0T1   916  LLXU.TOXCTL.OC.010                 1 LINE     80    1 PAGE UM   SHERRY              JULY 03, 1981  13:37:42
            5.0T2   197                       
00354/011   LLXU                     TEST WRITEUP    WF             W009:LLXUTEST.W                                                 
            5.0T1   917  LLXU.TEST_WRITEUP.WF.011           1 LINE    119   14 PAGE UM   SHERRY              JULY 03, 1981  13:37:43
            5.0T2   198                       
0          WRITEUP DESCRIBING LLXUTEST (354/5).
1                                                                                               SUN SEP 08/96   15:24:55   Page  156
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 354/5 
00354/012A  LLXU                     COMMENTS        D   G          MTSS:LLXU/COM                                                   
            5.1T1   266  LLXU.COMMENTS.D.012                1 LINE     65    1 PAGE UM   MTS       BURLING   JULY 23, 1983  10:33:59
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00355/001   STATSCN                                  SA  G        # (OBSOLETED BY RSCAN (707) AND SCAN (753))                       
            5.0T1   918  STATSCN..SA.001                    1 LINE     80    7 PAGE UM                       JULY 03, 1981  13:37:50
            5.0T2   199                       
00357/001   RCALL/ADROF SUBRS                        SA  G          S1558 5.0T1 VLO FSNAME=RCALL/ADROF_SUBRS..SA.001(1)          920
            5.0T1   920  RCALL/ADROF_SUBRS..SA.001          1 LINE     80    4 PAGE UM   ENGLE               AUG. 13, 1980  13:34:26
            5.0T2   201                       
0          RCALL ALLOWS FORTRAN PROGRAMS TO CALL SUBROUTINES WITH R TYPE CALLING SEQUENCES, E.G. GETFD.
           ADROF ALLOWS FORTRAN PROGRAMS TO GET THE ADDRESS OF A VARIABLE, E.G. ADROF('ABC').
00357/002   RCALL/ADROF SUBRS                        UC  G        # S0027 DISTRB FSNAME=RCALLUPD                                    
            5.0T1   921  RCALL/ADROF_SUBRS..UC.002          1 LINE     72    2 PAGE UM   ENGLE               AUG. 13, 1980  13:34:31
            5.0T2   202                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00357/003   RCALL/ADROF SUBRS                        OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
00358/001  *TAPECOPY                                 SA  G          S0792 WSGFS FSNAME=TAPECOPY                                     
            5.0T1   922  TAPECOPY..SA.001                   1 LINE     72    9 PAGE UM   WSG                 JUNE 10, 1981  16:51:23
            5.0T2   203                       
0          Multiple file tape copy program.  Copies labeled or unlabeled tapes, 7- or 9-track.
00358/002  *TAPECOPY                                 OC  G          *TAPECOPY                                                       
            5.0T1   923  TAPECOPY..OC.002                   1 LINE   5127    3 PAGE UM   WSG                 JULY 03, 1981  13:38:17
            5.0T2   204  *TAPECOPY            
00360/001   TIME SUBR                                SA  G          S1558 5.0T1 VLO FSNAME=TIME_SUBR..SA.001(1)                  924
            5.0T1   924  TIME_SUBR..SA.001                  1 LINE     80   17 PAGE UM   ENGLE               FEB. 04, 1981  15:12:50
            5.0T2   205                       
0          SUBROUTINE TO DO THINGS WITH THE TIME (DATE/TIME, CPU, AND ELAPSED).
           COPIES GRDEF (104/83) AND *CNFGINFODSECT (654).
0          Referenced by comments of: 67/27, 798/3 
00360/002   TIME SUBR                                UC  G          S1558 5.0T1 VLO FSNAME=TIME_SUBR..UC.002(1)                  925
            5.0T1   925  TIME_SUBR..UC.002                  1 LINE     71    1 PAGE UM   ENGLE               FEB. 04, 1981  15:13:04
            5.0T2   206                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
1                                                                                               SUN SEP 08/96   15:24:55   Page  157
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00360/003   TIME SUBR                                OC  G          SEG2:TIME                                                       
            5.0T1   926  TIME_SUBR..OC.003                  1 LINE     80    4 PAGE UM   ENGLE               JULY 03, 1981  13:38:36
            5.0T2   207  SEG2:TIME            
0          LOADED INTO SHARED VM BY PISTLE.
00387/001A  HASP                     MAIN            SA  G  HSP     S1528 HASP FSNAME=HASP.MAIN                                     
            5.1T1   267  HASP.MAIN.SA.001                   1 LINE     80  229 PAGE UM   HANSEN              MAY  20, 1983  15:11:27
0          Source for main assembly of MTS HASP, which is derived from IBM HASP
           II version 2.3. Optionally uses the SLT instruction (see &NOSLT) to
           search PCEs, DCTs, and message blocks. Copies COPY:GLOBALSETS
           (1026/2), COPY:JOBSTA (413/9), and COPY:LLMPSEQU (087). If the value
           of the assembly parameter &MAXJOBS is changed, SSRTN (413/1) should
           be similarly changed and reassembled. Assemble using COPY:MTS.MACROS
           (344/3) and HASP.MACROS (387/6).
0          Referenced by comments of: 243/1, 400/1, 413/1, 570/3, 838/1 
00387/002A  HASP                     EXEC            SA  G  EXEC    S1528 HASP FSNAME=HASP.EXEC                                     
            5.1T1   268  HASP.EXEC.SA.002                   1 LINE     80   64 PAGE UM   HANSEN              JUNE 07, 1983  17:02:08
0          COPIES COPY:GLOBALSETS (1026/2), COPY:JOBSTA (413/9),  AND COPY:LLMPSEQU (087). 
           ASSEMBLE USING COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6).
00387/003A  HASP                     RDR             SA  G  RDR     S1528 HASP  FSNAME=HASP.RDR                                     
            5.1T1   269  HASP.RDR.SA.003                    1 LINE     80   97 PAGE UM   HANSEN              JULY 13, 1983  14:39:23
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
00387/004A  HASP                     PPR             SA  G  PPR     S1528 HASP FSNAME=HASP.PPR                                      
            5.1T1   270  HASP.PPR.SA.004                    1 LINE     80   38 PAGE UM   HANSEN              JUNE 07, 1983  17:02:36
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
00387/005A  HASP                     DATA            SA  G  DATA    S1528 HASP FSNAME=HASP.DATA                                     
            5.1T1   271  HASP.DATA.SA.005                   1 LINE     80   15 PAGE UM   HANSEN              JUNE 07, 1983  17:02:41
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
00387/006A  HASP                     MACROS          SM  G  MACS    S1528 HASP FSNAME=HASP.MACLIB                                   
            5.1T1   272  HASP.MACROS.SM.006                 1 LINE     80  142 PAGE UM   HANSEN              JUNE 07, 1983  17:02:13
0          HASP MACRO LIBRARY.
0          Referenced by comments of: 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8, 387/27, 387/30, 387/32, 387/35 
00387/007A  HASP                     OPER            SA  G  OPER    S1528 HASP FSNAME=HASP.OPER                                     
            5.1T1   273  HASP.OPER.SA.007                   1 LINE     80  114 PAGE UM   HANSEN              MAY  20, 1983  15:12:32
0          COPIES COPY:GLOBALSETS (1026/2) AND COPY:LLMPSEQU (087).  ASSEMBLE USING
1                                                                                               SUN SEP 08/96   15:24:55   Page  158
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6).
00387/008A  HASP                     MXMTR           SA  G  MXMT    S1528 HASP FSNAME=HASP.MXMTR                                    
            5.1T1   274  HASP.MXMTR.SA.008                  1 LINE     80   18 PAGE UM   HANSEN              MAY  20, 1983  15:12:29
0          MERIT BATCH TRANSMITTER PROCESSOR.  ASSEMBLE USING COPY:MTS.MACROS (344/3)
           AND HASP.MACROS (387/6). COPIES COPY:GLOBALSETS (1026/2).
00387/009A  HASP                     SEG2:HASP       OC  G          SEG2:HASP                                                       
            5.1T1   275  HASP.SEG2:HASP.OC.009              1 LINE     80  115 PAGE UM   HANSEN              JULY 23, 1983  10:36:00
                         SEG2:HASP            
0          The HASP object is loaded by PISTLE after IPL. This file also contains
           the HASPLING (388) object. The Merit ASCII/EBCDIC translation table
           (570/3) object is included in this file.
0          Referenced by comments of: 388/3, 570/4 
00387/010A  HASP                     LISTING         L              S1019 HASPLS POSN=HASP.LIST                                     
            5.1T1   276  HASP.LISTING.L.010                 1 LINE    133 1693 PAGE UM   HANSEN              JULY 23, 1983  10:37:06
00387/011   HASP                     HRTP1130        SA  G  1130    HASP:HRTP1130.U                                                 
            5.0T1   937  HASP.HRTP1130.SA.011               1 LINE     80  176 PAGE UM   HANSEN              JULY 03, 1981  13:41:28
            5.0T2   218                       
0          REMOTE TERMINAL PROGRAM FOR 1130.  THIS IS THE OS VERSION WITH A FEW BUGS FIXED.
00387/012   HASP                     HRTPLOAD        SA  G  LOAD    HASP:HRTPLOAD.U                                                 
            5.0T1   938  HASP.HRTPLOAD.SA.012               1 LINE     80   38 PAGE UM   HANSEN              JULY 03, 1981  13:41:45
            5.0T2   219                       
0          LOADER FOR REMOTE 1130 PROGRAM.  THIS IS THE OS VERSION WITH A FEW BUGS FIXED.
00387/013   HASP                     HRTPB360        SA  G  B360    HASP:HRTP360.ASM                                                
            5.0T1   939  HASP.HRTPB360.SA.013               1 LINE     80  104 PAGE UM   HANSEN              JULY 03, 1981  13:41:48
            5.0T2   220                       
0          REMOTE PROGRAM FOR 360'S (BOTH MODEL 20 AND OTHER).  THIS IS THE OS VERSION WITH BUGS FIXED.
           NOTE:  THIS REMOTE PROGRAM IS FROM HASP II VERSION 3.1, ALTHOUGH IT WORKS OK WITH MTS HASP (WHICH
                  WAS DERIVED PRINCIPALLY FROM HASP II VERSION 2.3). INCLUDES TN PRINTER SUPPORT.
00387/014   HASP                     HRTPSYS3        SA  G          S1558 5.0T1 VLO FSNAME=HASP.HRTPSYS3.SA.014(1)               940
            5.0T1   940  HASP.HRTPSYS3.SA.014               1 LINE     80  102 PAGE UM   HANSEN              AUG. 02, 1973  02:31.26
            5.0T2   221                       
0          REMOTE PROGRAM FOR IBM SYSTEM/3.  HERE AGAIN, THIS VERSION IS FROM HASP II VERSION 3.1.
00387/015   HASP                     RTPBOOT         B   G          S1558 5.0T1 VLO FSNAME=HASP.RTPBOOT.B.015(1)                 941
            5.0T1   941  HASP.RTPBOOT.B.015                 1 LINE    160    1 PAGE UM   HANSEN              AUG. 02, 1973  02:31.40
            5.0T2   222                       
0          BOOTSTRAP LOADER FOR 1130 REMOTE PROGRAM.  THESE ARE THE SIX BINARY CARDS THAT THE HASP
           MANUAL TELLS YOU TO HAND PUNCH.
           THE CARDS SHOULD BE COPIED TO *PUNCH*@BIN AND PLACED AT THE BEGINNING OF THE 1130 REMOTE PROGRAM DECK.
1                                                                                               SUN SEP 08/96   15:24:55   Page  159
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          NO SOURCE AVAILABLE.
00387/016   HASP                     LETRRIP         SA  G          S1558 5.0T1 VLO FSNAME=HASP.LETRRIP.SA.016(1)                942
            5.0T1   942  HASP.LETRRIP.SA.016                1 LINE     80    2 PAGE UM   HANSEN              AUG. 02, 1973  02:31.42
            5.0T2   223                       
0          PARTIAL SOURCE FOR AN MTS PROGRAM TO CONVERT 1130 OBJECT PROGRAMS ASSEMBLED BY *ASMG FROM ASMG OBJECT FORMAT
           TO 1130 BINARY OBJECT CARD FORMAT.  READS FROM SCARDS, WRITES ON SPUNCH.
0          Referenced by comments of: 387/17 
00387/017   HASP                     LETRRIP         OC  G          S1558 5.0T1 VLO FSNAME=HASP.LETRRIP.OC.017(1)                943
            5.0T1   943  HASP.LETRRIP.OC.017                1 LINE     80    6 PAGE UM   HANSEN              AUG. 02, 1973  02:31.44
            5.0T2   224                       
0          The object is in three parts:
            
             1. The OS/360 object for LETRRIP from HASP with REP cards to patch all
                OS SVC's into invalid op-codes which produce program interrupts which
                can be fielded;
             2. The object from (387/16); and
             3. The object for the ALGOL compiler (or library) MTS interface, (505/2)
                or (505/22).
00387/018   HASP                     *HSP            C              *HSP                                                            
            5.0T1   944  HASP.*HSP.C.018                    1 LINE      9    1 PAGE UM   WSG                 JULY 03, 1981  13:42:22
            5.0T2   225  STRT:*HSP            
0          Command file which signs on under user ID "STRT" and sources to
           STRT:HSP (387/19). Invoked by entering "MTS *HSP" from operators
           console.
00387/019   HASP                     STRT:HSP        C              MTS:TST.HSP                                                     
            5.0T1   945  HASP.HSP.C.019                     1 LINE     23    1 PAGE UM   WSG                 JULY 03, 1981  13:42:23
            5.0T2   226  STRT:HSP             
0          This file issues bunches of HASP commands ($START et al.). The
           particular commands will have to be modified for the I/O devices
           in use at each installation.
            
           The UM local version (not the distributed version) starts *HLG (752).
0          Referenced by comments of: 387/18 
00387/020C  HASP                     STRT:HSP UM     C            # STRT:HSP                                                        
                                                                                    UM   WSG                                        
                         STRT:HSP@UM          
0          This is the standard UM version of STRT:HSP.
1                                                                                               SUN SEP 08/96   15:24:55   Page  160
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00387/021   HASP                     *DRN            C              *DRN                                                            
            5.0T1   946  HASP.*DRN.C.020                    1 LINE      9    1 PAGE UM   WSG                 JULY 03, 1981  13:42:23
            5.0T2   227  STRT:*DRN            
0          Command file which signs on under user id "STRT" and sources to
           STRT:DRN (387/22). Invoked by entering "MTS *DRN" from operators
           console.
00387/022A  HASP                     STRT:DRN        C              STRT:DRN                                                        
            5.1T1   277  HASP.STRT:DRN.C.022                1 LINE     16    1 PAGE UM   WSG                 JULY 23, 1983  10:37:35
                         STRT:DRN             
0          This file issues "$DRAIN SAxx" HASP commands used to drain HASP
           prior to shutdown. The particular commands will have to be
           modified for the RJE lines used at each installation.
0          Referenced by comments of: 387/21 
00387/023A  HASP                     OPER MANUAL     WF             W225:HSPM.FMT                                                   
            5.1T1   278  HASP.OPER_MANUAL.WF.023            1 LINE    203   42 PAGE UM   DONNELLY            JULY 23, 1983  10:37:36
0          MTS HASP OPERATOR'S MANUAL.  NOTE:  SEE ALSO THE MAIN MTS OPERATOR'S MANUAL (592).
00387/024   HASP                     PCE SNIFFER     SA     PCE     HASP:PCE(1,999)                                                 
            5.0T1   949  HASP.PCE_SNIFFER.SA.023            1 LINE     80    4 PAGE UM   HANSEN              JULY 03, 1981  13:42:34
            5.0T2   230  HASP:PCE             
0          PCE SNIFFER UTILITY PROGRAM.
           EVERY 3 SECONDS, THIS PROGRAM PRINTS THE FOLLOWING OUTPUT LINE:
            
             F:N1   B:N2   T: N3P  N4U  N5B
            
           WHERE N1 IS THE NUMBER OF FREE HASP EXECUTION PCE'S,
                 N2 IS THE NUMBER OF PCE'S CURRENTLY BEING USED FOR BATCH EXECUTION,
                 N3 IS THE NUMBER OF *PRINT* PCE'S,
                 N4 IS THE NUMBER OF *PUNCH* PCE'S,
                 AND N5 IS THE NUMBER OF *BATCH* PCE'S.
            
           IF PAR=CHANGE IS SPECIFIED WHEN THE PROGRAM IS RUN, IT PRINTS THE LINE ONLY IF IT DIFFERS
           FROM THE PREVIOUS LINE PRINTED.
           IF PAR=VERIFY IS SPECIFIED, THE PROGRAM CHECKS TO MAKE SURE THE PCE'S ARE ATTACHED TO THE
           USER THEY THINK THEY ARE.  IF IT DISCOVERS A PCE FOR WHICH THE JOB TABLE USER ID DIFFERS
           FROM THE JCT ID, IT PRINTS:
            
             PCE: AAAAA   JCTID: IIII    JOB TABLE: PPPPPPPP   JOB N
            
           WHERE AAAAA IS THE HEX LOCN OF THE PCE,
                 IIII IS THE ID IN THE JCT (0000 IF ZERO, ???? IF JCT ADDR NOT LEGAL),
                 PPPPPPPP IS THE USERID AND PROJECT NO. FROM THE JOB TABLE (???????? IF BAD JOB NUMBER),
                 AND N IS THE JOB NUMBER.
            
           USES IOH (278) FOR OUTPUT FORMATTING AND REQUIRES THE HASP COPY SECTIONS.
0          Referenced by comments of: 569/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  161
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00387/025   HASP                     PCE SNIFFER     OC             HASP:PCE(1000)                                                  
            5.0T1   950  HASP.PCE_SNIFFER.OC.024            1 LINE     80    1 PAGE UM   HANSEN              JULY 03, 1981  13:42:35
            5.0T2   231                       
0          Referenced by comments of: 569/1 
00387/026   HASP                     WRITEUP         WF             S1558 5.0T1 VLO FSNAME=HASP.WRITEUP.WF.025(1)                951
            5.0T1   951  HASP.WRITEUP.WF.025                1 LINE    116   18 PAGE UM   HANSEN              APR. 23, 1981  14:18:33
            5.0T2   232                       
00387/027A  HASP                     DUMP/ANAL       SA             S1528 HASP FSNAME=D/A.ASM                                       
            5.1T1   279  HASP.DUMP/ANAL.SA.027              1 LINE     72   54 PAGE UM   HANSEN              MAY  20, 1983  15:10:53
0          THIS PROGRAM PERMITS A SYSTEM PROGRAMMER TO LOOK AT MEMORY OR A DUMP TAPE VIA
           A TAPE OPTIONALLY ASSIGNED TO UNIT 1 AND PRINT IT IN AN EASILY READABLE FORM.
           FORMS PERMITTED ARE PRIMARILY HASP DSECT FORMATS, E.G. PCE AND DCT, AND
           JOBTABLE OR DUMP FORMATS. A HELP COMMAND PROVIDES COMPREHENSIVE DESCRIPTIONS
           AS OBTAINED FROM (387/29). COPIES COPY:GLOBALSETS (1026/2) AND COPY:LLMPSEQU
           (087). REQUIRES ASSEMBLY WITH THE HASP MACROS (387/6). CONTAINS MTS COMMANDS
           AT THE BEGINNING OF THE FILE TO ASSEMBLE IT. IT ALSO CONTAINS A SPECIAL
           VERSION OF THE SYSADR SUBROUTINE (400/10) WHICH READS FROM THE DUMP TAPE. IT
           REQUIRES THE VMFIND SUBROUTINE (400/3).
0          Referenced by comments of: 387/29 
00387/028A  HASP                     DUMP/ANAL       OC             HASP:D/A                                                        
            5.1T1   280  HASP.DUMP/ANAL.OC.028              1 LINE    758   42 PAGE UM   HANSEN              JULY 23, 1983  10:37:43
                         HASP:D/A             
00387/029A  HASP                     DUMP/ANAL HELP  M              HASP:D/A.HELP                                                   
            5.1T1   281  HASP.DUMP/ANAL_HELP.M.029          1 LINE     68    5 PAGE UM   HANSEN              JULY 23, 1983  10:37:44
                         HASP:D/A.HELP        
0          HELP MESSAGE FILE FOR USE BY DUMP/ANAL (387/27).  THIS FILE IS IN THE FORM OF AN
           ASSEMBLER MACRO LIBRARY.
0          Referenced by comments of: 387/27 
00387/030A  HASP                     HASPTRACKS      SA  O          S1528 HASP FSNAME=HASPTRACKS.S                                  
            5.1T1   282  HASP.HASPTRACKS.SA.030             1 LINE     70    4 PAGE UM   HANSEN              MAY  20, 1983  15:13:20
0          PROGRAM TO CHECK FOR DUPLICATE OR MISSING TRACKS ON A HASP SPOOL PACK AND
           TO REPAIR (VERIFICATION REQUIRED) THE CYLINDER MAP IN MEMORY.  THE FILE
           BEGINS WITH MTS COMMANDS TO ASSEMBLE THE PROGRAM.  REQUIRES THE HASP MACRO
           LIBRARY (387/6) FOR ASSEMBLY.  COPIES COPY:GLOBALSETS (1026/2). CALLS THE
           SYSADR (400/10) SUBROUTINE.
0          Referenced by comments of: 387/31 
00387/031A  HASP                     HASPTRACKS      OC  O          HASP:HASPTRACKS                                                 
            5.1T1   283  HASP.HASPTRACKS.OC.031             1 LINE    256    7 PAGE UM   HANSEN              JULY 23, 1983  10:37:49
0          Object for HASPTRACKS (387/30) plus the object for SYSADR (400/10).
1                                                                                               SUN SEP 08/96   15:24:55   Page  162
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00387/032A  HASP                     QUESCAN         SA  O          S1528 HASP FSNAME=QUESCAN.S                                     
            5.1T1   284  HASP.QUESCAN.SA.032                1 LINE     71    5 PAGE UM   HANSEN              MAY  20, 1983  15:13:27
0          PROGRAM TO SCAN THE HASP QUEUE, VERIFYING THAT ALL ENTRIES ARE PROPERLY LINKED,
           LOCATING UNATTACHED SEGMENTS, AND MAKING OTHER TESTS.  THE FILE BEGINS WITH
           MTS COMMANDS TO ASSEMBLE THE PROGRAM.  COPIES THE HASP COPY SECTIONS AND REQUIRES
           THE HASP MACRO LIBRARY (387/6) FOR ASSEMBLY.  CALLS THE SYSADR (400/10) SUBR.
           COPIES COPY:GLOBALSETS (1026/2).
0          Referenced by comments of: 387/33 
00387/033A  HASP                     QUESCAN         OC  O          HASP:QUESCAN                                                    
            5.1T1   285  HASP.QUESCAN.OC.033                1 LINE    256    7 PAGE UM   HANSEN              JULY 23, 1983  10:37:50
0          OBJECT FOR QUESCAN (387/32) PLUS THE OBJECT FOR SYSADR (400/10).
00387/034   HASP                     HASPSTAT CMDS   C              *HPS                                                            
            5.0T1   959  HASP.HASPSTAT_CMDS.C.033           1 LINE     44    1 PAGE UM   HANSEN              AUG. 05, 1981  02:26:19
            5.0T2   240  *HPS                 
0          COMMAND FILE USED BY THE OPERATORS TO RUN THE HASPSTAT PROGRAM (387/35) TO
           CHECK FOR POSSIBLE HASP PROBLEMS.
00387/035A  HASP                     HASPSTAT        SA  O          S1528 HASP FSNAME=HASPSTAT.S                                    
            5.1T1   286  HASP.HASPSTAT.SA.035               1 LINE     68    3 PAGE UM   HANSEN              MAY  20, 1983  15:13:15
0          PROGRAM TO LOOK AT HASP WHILE IT'S RUNNING AND CHECK FOR POSSIBLE PROBLEMS.
           IF FOUND, THEY ARE PRINTED ON SERCOM.  THE FILE BEGINS WITH MTS COMMANDS TO
           ASSEMBLE THE PROGRAM. COPIES COPY:GLOBALSETS (1026/2). REQUIRES THE HASP
           MACRO LIBRARY (387/6) FOR ASSEMBLY.  CALLS THE SYSADR (400/10) SUBR.
0          Referenced by comments of: 387/34, 387/36 
00387/036A  HASP                     HASPSTAT        OC  O          HASP:HASPSTAT                                                   
            5.1T1   287  HASP.HASPSTAT.OC.036               1 LINE    256    6 PAGE UM   HANSEN              JULY 23, 1983  10:37:52
                         HASP:HASPSTAT        
0          Object for HASPSTAT (387/35) plus the object for SYSADR (400/10).
0          Referenced by comments of: 387/38 
00387/037C  HASP                     VIRT CONSOLE    S   O          HASP:CONSOLE.S                                                  
            5.1T1   288  HASP.VIRT_CONSOLE.S.037            1 LINE    204   29 PAGE UM   HANSEN              JULY 23, 1983  10:37:52
0          Source for the HASP virtual console program.  The PMF project
           file (387/40) has details and may be used to sort out all
           the pieces.
            
           ****************************************************************************
           D5.1 version:
            
           A problem was discovered with this version after the D5.1 tapes were
           written. The problem is that a timer exit (set by MTS) goes off while
           HASP:CONSOLE is in its intertask exit routine. Normally, MTS inhibits
1                                                                                               SUN SEP 08/96   15:24:55   Page  163
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          timer exits that occur more than two levels up on the CPU queue, but
           since the task is in user mode, this check is skipped and MTS takes
           the timer interrupt, doing a FLUSH in the process. The temporary fix
           we've installed on our system is
            
                            REP  000017  01,00
            
           This should be applied to CSECT TIMER_ON at about line 344. It causes
           the screen to NOT be updated based on a timer, but only when input
           is entered from the keyboard or when a message is received on the
           intertask link.
           ****************************************************************************
00387/038C  HASP                     VIRT CONSOLE    OC  O          HASP:CONSOLE                                                    
            5.1T1   289  HASP.VIRT_CONSOLE.OC.038           1 LINE   6328   26 PAGE UM   HANSEN              JULY 23, 1983  10:37:54
0          The object for the HASP virtual console program.  Requires
           HELP:FSHELP (845/6) and HASP:HASPSTAT (387/36).  References
           (387/39).
            
0          Referenced by comments of: 387/39 
00387/039C  HASP                     VIRT CONSOLE    D   O          HASP:CONSOLE.HELP                                               
            5.1T1   290  HASP.VIRT_CONSOLE.D.039            1 LINE     89   12 PAGE UM   HANSEN              JULY 23, 1983  10:37:54
0          The HELP text for use by (387/38).
0          Referenced by comments of: 387/38 
00387/040A  HASP                     PMF PROJECT     D   G          HASP:HASP                                                       
            5.1T1   291  HASP.PMF_PROJECT.D.040             1 LINE    186   11 PAGE UM   HANSEN              JULY 23, 1983  10:37:55
0          This is a PMF project file for handling HASP and friends.  It is
           used by the #PMF CLS (810).
0          Referenced by comments of: 387/37 
00387/041C  HASP                     RMT 360/20 GD                # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the HASP Remote 360/20 Operator's Guide. Only hard copies of this
           component are distributed.
00387/042C  HASP                     RMT 360/NON-20               # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the HASP Remote 360/non-20 Operator's Guide. Only hard copies of this
           component are distributed.
00387/043C  HASP                     RMT 1130/1800                # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the HASP Remote 1130/1800 Operator's Guide. Only hard copies of this
1                                                                                               SUN SEP 08/96   15:24:55   Page  164
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          component are distributed.
00387/044C  HASP                     RMT S/3 GDE                  # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the HASP Remote System/3 Operator's Guide. Only hard copies of this
           component are distributed.
00387/045C  HASP                     2780 RMT WKSTA               # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the HASP 2780 Remote Workstation Operator's Guide. Only hard copies of
           this component are distributed.
00388/001A  HASPLING                 MAIN            SA  G          S1528 HASP FSNAME=HASPLING                                      
            5.1T1   292  HASPLING.MAIN.SA.001               1 LINE     82   24 PAGE UM   HANSEN              MAY  20, 1983  15:13:06
0          Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU(100) (087), COPY:IT.DSECTS
           (1081/4) and COPY:UC.MACROS. Assemble using COPY:MTS.MACROS (344/3).
           Requires the Tape Unit Check Routines (787/19).
0          Referenced by comments of: 387/9, 787/20 
00388/002A  HASPLING                 MNET            SA  G          S1528 HASP FSNAME=HSPLNG.MNET                                   
            5.1T1   293  HASPLING.MNET.SA.002               1 LINE     82   11 PAGE UM   HANSEN              MAY  20, 1983  15:13:22
0          ASSEMBLE USING COPY:MTS.MACROS (344/3).
00388/003A  HASPLING                 OBJECT          OC  G        # (PART OF SEG2:HASP)                                             
                                                                                    UM   HANSEN                                     
0          Part of SEG2:HASP (387/9).
00389/001  *GENLIB                                   SA  G          S1558 5.0T1 VLO FSNAME=GENLIB..SA.001(1)                     965
            5.0T1   965  GENLIB..SA.001                     1 LINE     80  143 PAGE UM   TIFFANY             JULY 27, 1977  03:05:47
            5.0T2   246                       
0          THIS IS THE SOURCE FOR *GENLIB.
            
           NOTE:  *GENLIB IS STILL SUPPORTED BY UM, BUT *OBJUTIL (721) IS PREFERRED.
0          Referenced by comments of: 505/25 
00389/002  *GENLIB                                   OE  G          *GENLIB                                                         
            5.0T1   966  GENLIB..OE.002                     1 LINE  12279   14 PAGE UM   TIFFANY             JULY 03, 1981  13:43:28
            5.0T2   247  *GENLIB              
0          Contains a $CONTINUE WITH *LIBRARY (524/1) record.
00389/003  *GENLIB                   MESSAGES        M              ETC:GENLIBHELP                                                  
            5.0T1   967  GENLIB.MESSAGES.M.003              1 LINE     66   10 PAGE UM   TIFFANY             JULY 03, 1981  13:43:30
            5.0T2   248  ETC.:GENLIBHELP      
0          MESSAGE FILE REFERENCED FOR THE EXPLAIN COMMAND.
1                                                                                               SUN SEP 08/96   15:24:55   Page  165
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00390/001  *QUE                                                   # (OBSOLETE)                                                      
            5.0T1   968  QUE..C.001                         1 LINE     30    1 PAGE UM                       JULY 03, 1981  13:43:32
            5.0T2   249                       
0          Command file to print a listing (on *PRINT*) of the HASP queue.
           Invoked by entering "MTS *QUE" on the operator's console. Obsoleted
           by changes to HASP.
00391/001   FILE STATISTICS                          SP           # (OBSOLETE)                                                      
            D2T1    123                                                             UM                                              
00392/001  *FSAVE                                    SA           # (OBSOLETE)                                                      
            D2.2    116                                                             UM                                              
0          Obsoleted by *FS (548).
0          Referenced by comments of: 549/1 
00399/001   DUMP                                     SA  G          S0699 D3TAPE POSN=DUMP.D5                                       
            5.0T4   304  DUMP..SA.001                       1 LINE     80   12 PAGE UM   MTA                 AUG. 09, 1981  22:49:53
            5.0T10  208                       
0          THIS IS THE UMMPS SYSTEM DUMP PROGRAM.  IT TAKES A DUMP OF ALL OF REAL MEMORY PLUS, OPTIONALLY,
           THE VM FOR A SPECIFIED JOB.  IT WRITES THE DUMP UNFORMATED ONTO A 9-TRACK LABELED TAPE FOR
           WHICH THE VOLUME LABEL MUST BE 'DUMPXX'.  THE PRINTDUMP PROGRAM (400) WILL PRINT SELECTED
           PARTS OF A DUMP TAPE.
           COPIES COPY:GLOBALS (1026/3).  ASSEMBLE USING COPY:SETPARM (653).
0          Referenced by comments of: 400/1 
00399/002   DUMP                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00400/001   PRINTDUMP                D5.0 MAIN       SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.D5.0_MAIN.SA.001(1)         305
            5.0T4   305  PRINTDUMP.D5.0_MAIN.SA.001         1 LINE     80   89 PAGE UM   MTA                 AUG. 09, 1981  22:50:32
            5.0T10  209                       
0          Prints dump tapes produced by SYSTEM DUMP (399). A separate dump program is
           also available for HASP, see (387). PRINTDUMP requires PRINTTRACE (337), IOH
           (278) for the "TRACE" command only, TASKSTAT (647), and LOADCLAS (540/8).
           Copies COPY:LLMPSEQU (087), COPY:PCBDSECT (470), COPY:GLOBALDEFS (1026/1),
           COPY:GLOBALSETS (1026/2), and *CNFGINFODSECT (654). Assemble using
           COPY:SETPARM (653), the (400/16) macros, COPY:MNTR.MACROS (1058/30),
           OLD:CC.MACROS (1054/4), COPY:DM.MACROS (769/29), COPY:UMMPS.MACROS (045/14)
           and COPY:MISC.MACROS (728).
            
           Most subcomponents of PRINTDUMP require the (400/16) macros.
0          Referenced by comments of: 399/1, 4003/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  166
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00400/002A  PRINTDUMP                MAIN UPDATE     UC  G          MTA:DMPLST.U(1)                                                 
            5.1T1   294  PRINTDUMP.MAIN_UPDATE.UC.002       1 LINE     73    2 PAGE UM   MTA                 JULY 23, 1983  10:37:59
0          Update to produce the current source for the main program from the D5.0
           source.
00400/003   PRINTDUMP                5.0 VMFIND SUB  SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_VMFIND_SUB.SA.003(1)    307
            5.0T4   307  PRINTDUMP.5.0_VMFIND_SUB.SA.003    1 LINE     80    7 PAGE UM   MTA                 AUG. 09, 1981  22:50:44
            5.0T10  211                       
0          Subroutine to find a VM page on a dump tape.
0          Referenced by comments of: 387/27, 400/4 
00400/004C  PRINTDUMP                5.0 VMFIND SUB  UC  G          MTA:DMPLST.VMF.U                                                
            5.1T1   295  PRINTDUMP.5.0_VMFIND_SUB.UC.004    1 LINE     68    1 PAGE UM   MTA                 JULY 23, 1983  10:37:59
0           
           **************************************************************************
           D5.1 version:
            
           Fixes a bug in the D5.0 version of (400/3).
           **************************************************************************
00400/005   PRINTDUMP                D5 SSCN SUBR    SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.D5_SSCN_SUBR.SA.005(1)      309
            5.0T4   309  PRINTDUMP.D5_SSCN_SUBR.SA.005      1 LINE     80   17 PAGE UM   MTS       MTA       AUG. 09, 1981  22:50:48
            5.0T10  213                       
0          D4.0 master source for subroutine to dump the VM of an MTS task, formatting it
           appropriately.  Must be reassembled whenever the MTS dsect is changed.  Copies
           COPY:GLOBALS (1026/3) and COPY:LLMPSEQU(100) (087).  Assemble using
           COPY:MTS.MACROS (344/3) and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 42/2, 400/9 
00400/006A  PRINTDUMP                SSCN SUBR UPD   UC  G          MTSS:SSCN/UPD                                                   
            5.1T1   296  PRINTDUMP.SSCN_SUBR_UPD.UC.006     1 LINE     82    7 PAGE UM   MTS       MTA       JULY 23, 1983  10:38:00
0          *CDUPDATE (1036) input to produce the current source.
00400/007A  PRINTDUMP                SSCN SUBR LIST  L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=SSCN.LIST                 
            5.1T1   297  PRINTDUMP.SSCN_SUBR_LIST.L.007     1 LINE    133   62 PAGE UM   MTS       MTA       JULY 23, 1983  10:38:08
00400/008A  PRINTDUMP                SSCN SUBR COMM  D   G          MTSS:SSCN/COM                                                   
            5.1T1   298  PRINTDUMP.SSCN_SUBR_COMM.D.008     1 LINE     65    1 PAGE UM   MTS       MTA       JULY 23, 1983  10:38:09
0          This file contains annotation about changes to SSCN.
00400/009   PRINTDUMP                5.0 DUMP SUBR   SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_DUMP_SUBR.SA.008(1)     312
            5.0T4   312  PRINTDUMP.5.0_DUMP_SUBR.SA.008     1 LINE     80    4 PAGE UM   MTA                 AUG. 09, 1981  22:50:58
            5.0T10  216                       
0          Subroutine to format DUMP output.  Called by SSCN (400/5).
1                                                                                               SUN SEP 08/96   15:24:55   Page  167
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00400/010   PRINTDUMP                5.0 SYSADR SUB  SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_SYSADR_SUB.SA.010(1)    314
            5.0T4   314  PRINTDUMP.5.0_SYSADR_SUB.SA.010    1 LINE     80    3 PAGE UM   MTA                 AUG. 09, 1981  22:51:38
            5.0T10  218                       
0          Subroutine to resolve a name from the UMLOAD symbol table for the resident system
           on a dump tape.
0          Referenced by comments of: 387/27, 387/30, 387/31, 387/32, 387/33, 387/35, 387/36 
00400/011   PRINTDUMP                5.0 ICTAB SUBR  SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_ICTAB_SUBR.SA.012(1)    316
            5.0T4   316  PRINTDUMP.5.0_ICTAB_SUBR.SA.012    1 LINE     80   21 PAGE UM   MTA                 JULY 27, 1977  03:06:43
            5.0T10  220                       
0          SUBROUTINE WHICH IMPLEMENTS THE ICTAB COMMAND FOR PRINTDUMP.  THIS IS A MODIFIED
           VERSION OF TABLMOD (554).  ASSEMBLE USING COPY:FILE.MACROS (482/45).
00400/012   PRINTDUMP                5.0 ICSTAT SUB  SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_ICSTAT_SUB.SA.013(1)    317
            5.0T4   317  PRINTDUMP.5.0_ICSTAT_SUB.SA.013    1 LINE     80    6 PAGE UM   MTA                 JULY 27, 1977  03:06:45
            5.0T10  221                       
0          VERSION OF THE ICSTAT SUBROUTINE, PART OF (482/34), THAT WORKS FROM A DUMP TAPE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00400/013   PRINTDUMP                CMDREAD SUBR    SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.CMDREAD_SUBR.SA.014(1)      318
            5.0T4   318  PRINTDUMP.CMDREAD_SUBR.SA.014      1 LINE     72    7 PAGE UM   MTA                 APR. 05, 1980  14:40:26
            5.0T10  222                       
0          SUBROUTINE TO READ COMMANDS.  ASSEMBLE WITH OLD:CC.MACROS (1054/4).
           COPIES *GDINFODSECT (594).
00400/014   PRINTDUMP                IOSETUP SUBR    SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.IOSETUP_SUBR.SA.015(1)      319
            5.0T4   319  PRINTDUMP.IOSETUP_SUBR.SA.015      1 LINE     72    4 PAGE UM   MTA                 APR. 05, 1980  14:40:29
            5.0T10  223                       
0          SUBROUTINE TO FIND A DUMP TAPE.  COPIES *GDINFODSECT (594).
00400/015   PRINTDUMP                ITDUMP SUBR     SA  G          S1561 5.0T4 VLO FSNAME=PRINTDUMP.ITDUMP_SUBR.SA.016(1)      320 
            5.0T4   320  PRINTDUMP.ITDUMP_SUBR.SA.016       1 LINE     80   19 PAGE UM   MTA                 AUG. 09, 1981  23:04:03
            5.0T10  224                       
0          Dumps UBC Intertask stuff (1081).  Assemble with the PRINTDUMP
           macros (400/16).  Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU (
           (087), and COPY:IT.COPY_SECT (1081/5).
0          Referenced by comments of: 1081/5 
00400/016A  PRINTDUMP                MACROS          SM  G          MTA:DMPLST.MACROS                                               
            5.1T1   299  PRINTDUMP.MACROS.SM.016            1 LINE     75    3 PAGE UM   MTA                 JULY 23, 1983  10:38:09
0          Macro library required for assembly by most parts of PRINTDUMP. 
0          Referenced by comments of: 400/1, 400/15, 729/2, 814/4, 1012/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  168
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00400/017A  PRINTDUMP                                OC  G          MTS:PRINTDUMP                                                   
            5.1T1   300  PRINTDUMP..OC.017                  1 LINE  14738   37 PAGE UM   MTS       MTA       JULY 23, 1983  10:38:10
                         MTS.:PRINTDUMP       
0          THIS FILE CONTAINS THE OBJECT FOR ALL OF PRINTDUMP PLUS PRINTTRACE (337).
0          Referenced by comments of: 732/7, 814/2, 814/9, 814/11 
00410/001A *ASMTIDY                                  SA  G          LBT:ASMTIDY.S                                                   
            5.1T1   301  ASMTIDY..SA.001                    1 LINE     73   39 PAGE UM             TIFFANY   JULY 23, 1983  10:38:11
0          PROGRAM TO CLEAN UP AND ENTER ASSEMBLY PROGRAMS INTO FILES.
           USES ASMTIDY MACLIB (410/3) AND *SYSMAC.  COPIES *GDINFODSECT (594).
0          Referenced by comments of: 410/3 
00410/002A *ASMTIDY                                  OC  G          *ASMTIDY                                                        
            5.1T1   302  ASMTIDY..OC.002                    1 LINE  15572    9 PAGE UM             TIFFANY   JULY 23, 1983  10:38:13
                         *ASMTIDY             
00410/003  *ASMTIDY                  MACLIB          SM  G          LBT:ASMTIDY.MAC                                                 
            5.0T1   974  ASMTIDY.MACLIB.SM.003              1 LINE     73    4 PAGE UM             TIFFANY   JULY 03, 1981  13:43:45
            5.0T2   255                       
0          Macro library used for assembling (410/1).
0          Referenced by comments of: 410/1 
00413/001A  SYSTEM STATUS            SSRTN           SA  G          WSG:SSRTN                                                       
            5.1T1   303  SYSTEM_STATUS.SSRTN.SA.001         1 LINE     73   52 PAGE UM   WSG                 JULY 23, 1983  10:38:13
                         WSG.:SSRTN           
0          The System Status Routine, SSRTN, computes system load (CPU, paging,
           disk, channel, and drum space) during every 20 seconds of system
           operation. It is a subroutine called by the OPERATOR job (634), the
           JOBS job (413/3) and the MTS $SYSTEMSTATUS CLS (413/5). It also has a
           separate entry point, SSFMT, which only produces the formatted output
           vector as printed by the LOAD command. This entry is called by the
           OPERATOR job (to produce the top line on the console screen) and by
           the 3270 %ACTIVITY command (629/4). The MASTER command can only be
           activated by one task at a time. When issued, it causes that task to
           perform the load calculation every 20 seconds updating the information
           in the JOBSTA vector (413/7) for use by other tasks and also logging
           the data via CMDSTAT as record type 8. SSRTN calls BJPMOD (650),
           CHECKFE (731), TASKSTAT (647), TSKFMT (019), CMDSTATS (531), and
           PATHDEV (818). Copies COPY:BJPDSCT (650/3), COPY:JOBSTA (413/9),
           COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), *CNFGINFODSECT (654), and
           COPY:MNTQINFDSECT (806/3).
            
           **********************************************************************
           Changes since D5.0:
            
           1. Increase the number of AUX queue entries.
           2. Allow the displaying of VM of non-MTS jobs by any priv user.
1                                                                                               SUN SEP 08/96   15:24:55   Page  169
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          3. More JOBSTA values for BJPMOD added.
           4. Recognize the two high bits of HASP QUEPRTRT as QUEPN and QUETN
              if the HASP symbol $FINDJIT is undefined. If it is defined, call
              it to get actual JIT and use that to determine if PAGE printer
              or LINE printer with PN/TN/SP/ANY. This info is used in /Q cmmd.
              This is an upward compatible change for a new version of HASP
              not yet distributed.
           5. In addition, if $FINDJIT is defined, then QUEPRIO is redefined
              so that the priority is in the low 4 bits (instead of high).
              In addition, a new 3-bit job class is defined in QUEPRIO.
              This is an upward compatible change for the latest version of
              HASP.
           6. Changed to add a JOBSTA vector value for the disk cache size
              and to allow it to be displayed via /DIS CS.
           7. Increase the number of parallel queue entries to 2000 to match
              HASP (387). Installations should change this number, the symbol
              MAXJOBS, to match the value of &MAXJOBS in the local HASP. If
              the value is too small, the SSRTN Q command will not track all
              HASP jobs properly; if it is too large, 12 unused bytes of shared
              VM are allocated for each unneeded entry.
           **********************************************************************
0          Referenced by comments of: 19/1, 326/1, 326/4, 387/1, 413/3, 413/5, 413/7, 413/10, 540/10, 647/1, 650/1, 731/1,
                 806/1, 806/2, 806/3, 818/1 
00413/002A  SYSTEM STATUS            SSRTN           OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   WSG                                        
0          Object part of Resident System (468).
00413/003   SYSTEM STATUS            JOBS JOB        SA  G          S1558 5.0T1 VLO FSNAME=SYSTEM_STATUS.JOBS_JOB.SA.003(1)      976
            5.0T1   976  SYSTEM_STATUS.JOBS_JOB.SA.003      1 LINE     80    3 PAGE UM   WSG                 JULY 27, 1977  03:07:17
            5.0T2   257                       
0          UMMPS job program named "JOBS" to interface to SSRTN (413/1) from the
           job program level.
0          Referenced by comments of: 413/1 
00413/004   SYSTEM STATUS            JOBS JOB        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   WSG                                        
0          Object part of Resident System (468).
00413/005A  SYSTEM STATUS            SYS STAT CLS    SA  G          WSG:SSTA.CLS(1,999)                                             
            5.1T1   304  SYSTEM_STATUS.SYS_STAT_CL.SA.005   1 LINE     71    9 PAGE UM   WSG                 JULY 23, 1983  10:38:15
0          $SYSTEMSTATUS CLS for interfacing with SSRTN (413/1) from MTS command level.
           Assemble with PAR=PEXIT=*PEXIT and using COPY:MTS.MACROS (344/3).
            
           ********************************************************************************
           Changes since D5.0:
            
           Changed to accept mixed case input.
1                                                                                               SUN SEP 08/96   15:24:55   Page  170
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ********************************************************************************
0          Referenced by comments of: 413/1, 806/1 
00413/006A  SYSTEM STATUS            SYS STAT CLS    OC  G          *CLSSSTA                                                        
            5.1T1   305  SYSTEM_STATUS.SYS_STAT_CL.OC.006   1 LINE   2577    1 PAGE UM   WSG                 JULY 23, 1983  10:38:16
                         *CLSSSTA             
0          This file is normally loaded into shared VM at IPL by pistle.
00413/007   SYSTEM STATUS            JOBSTA VECTOR   SA  G          WSG:SSTA.VEC(1,999)                                             
            5.0T1   979  SYSTEM_STATUS.JOBSTA_VECT.SA.007   1 LINE     51    1 PAGE UM   WSG                 JULY 03, 1981  13:43:57
            5.0T2   260                       
0          System status information vector maintained by SSRTN (413/1).
           Copies COPY:JOBSTA (413/9).
0          Referenced by comments of: 413/1, 540/10 
00413/008A  SYSTEM STATUS            JOBSTA VECTOR   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   WSG                                        
0          This object deck should be kept in segment 0 to reduce the overhead of the SVC WAYT in SSRTN.
           Object part of Resident System (468).
00413/009A  SYSTEM STATUS            JOBSTA DSECT    SA  G          COPY:JOBSTA                                                     
            5.1T1   306  SYSTEM_STATUS.JOBSTA_DSEC.SA.009   1 LINE     71    3 PAGE UM   WSG                 JULY 23, 1983  10:38:16
                         COPY:JOBSTA          
0          This is the DSECT for the system status vector.
0          Referenced by comments of: 42/1, 101/1, 198/1, 387/1, 387/2, 413/1, 413/7, 540/10, 634/1, 647/1, 650/1, 731/1,
                 806/1, 829/1, 3024/3, 4000/37 
00413/010   SYSTEM STATUS            SUMMPRT         SG  G          WSG:SUMMPRT(1,999)                                              
            5.0T1   981  SYSTEM_STATUS.SUMMPRT.SG.010       1 LINE    121    1 PAGE UM   WSG                 JULY 03, 1981  13:43:59
            5.0T2   262  WSG.:SUMMPRT         
0          GOM program to print summary data collected by SSRTN (413/1).
0          Referenced by comments of: 326/1 
00413/011   SYSTEM STATUS            SUMMPRT         OC  G          WSG:SUMMPRT(1000)                                               
            5.0T1   982  SYSTEM_STATUS.SUMMPRT.OC.011       1 LINE     80    2 PAGE UM   WSG                 JULY 03, 1981  13:44:00
            5.0T2   263                       
00413/012   SYSTEM STATUS            DOCUMENTATION   WF             S0792 WSGFS FSNAME=SSRTN.DOC.WF                                 
            5.0T4   324  SYSTEM_STATUS.DOCUMENTATI.WF.012   1 LINE    106    3 PAGE UM   WSG                 AUG. 09, 1981  23:04:10
            5.0T10  228                       
0          Writeup describing the system load computation algorithm and job scheduling
           mechanism. (Note: this writeup is slightly out-of-date.)
1                                                                                               SUN SEP 08/96   15:24:55   Page  171
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00414/001  *TAPEDUMP                                 SA  G          S0792 WSGFS FSNAME=TAPEDUMP                                     
            5.0T1   983  TAPEDUMP..SA.001                   1 LINE     73   10 PAGE UM   WSG                 AUG. 29, 1980  17:33:28
            5.0T2   264                       
0          Program to dump 7- or 9-track tapes or files.
00414/002  *TAPEDUMP                                 OE  G          *TAPEDUMP                                                       
            5.0T1   984  TAPEDUMP..OE.002                   1 LINE   3883    3 PAGE UM   WSG                 JULY 03, 1981  13:44:05
            5.0T2   265  *TAPEDUMP            
00418/001  *HBT                                      S            # (OBSOLETED BY *...*)                                            
            D2T1    183                                                             UM                                              
00421/001  *SCN                                      S            # (OBSOLETED BY *...*)                                            
            D2T1    199                                                             UM                                              
00422/001   FORTRAN LIBRARY                          SA           # (OBSOLETE)                                                      
            D3T2    350  FORTRAN_LIBRARY.IBCOM#.SA.1        1 LINE     80   29 PAGE UM                       AUG. 02, 1973  02:49.57
0          Obsoleted by FIX (1002).
00436/001   GTDJMSR                                  SA             DWB:GRJTM(1,124)                                                
            5.0T1   985  GTDJMSR..SA.001                    1 LINE     77    3 PAGE UM   DWB                 JULY 03, 1981  13:44:05
            5.0T2   266                       
0          SUBROUTINE TO CONVERT GREGORIAN TIME AND DATE TO JULIAN MICRO-SECONDS SINCE MARCH 1, 1900.
           SIMILAR TO GRGJULTM (518), BUT TAKES DIFFERENT ARGUMENTS.
00436/002   GTDJMSR                                  OC           # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00436/003   GTDJMSR                  GTDJMS          SA             DWB:GTDJMS(1,999)                                               
            5.0T1   986  GTDJMSR.GTDJMS.SA.003              1 LINE     77    1 PAGE UM   DWB                 JULY 03, 1981  13:44:06
            5.0T2   267                       
0          SUBROUTINE WITH S-TYPE CALLING SEQUENCE TO INTERFACE TO GTDJMSR.  CONVERTS GREGORIAN
           TIME AND DATE TO JULIAN MICRO-SECONDS SINCE MARCH 1, 1900.
00436/004   GTDJMSR                  GTDJMS          OC           # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00437/001   JMSGTDR/JTUGTDR                          SA             DWB:JMSGTDR(125,999)                                            
            5.0T1   987  JMSGTDR/JTUGTDR..SA.001            1 LINE     77    4 PAGE UM   DWB                 JULY 03, 1981  13:44:07
            5.0T2   268                       
0          SUBROUTINE TO CONVERT JULIAN MICRO-SECONDS TO GREGORIAN TIME AND DATE.
           SIMILAR TO JULGRGTM (522), BUT TAKES DIFFERENT ARGUMENTS.  HAS ALTERNATE
           ENTRY POINT (JTUGTDR) WHICH CONVERTS JULIAN TIMER-UNITS TO GREGORIAN TIME
           AND DATE.  THIS IS THE UBC-CORRECTED VERSION OF FEB/77 WITH A FEW ADDITIONAL
           UM CORRECTIONS ADDED.
1                                                                                               SUN SEP 08/96   15:24:55   Page  172
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00437/002   JMSGTDR/JTUGTDR                          OC           # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00437/003   JMSGTDR/JTUGTDR          JMSGTD          SA             DWB:JMSGTD(1,999)                                               
            5.0T1   988  JMSGTDR/JTUGTDR.JMSGTD.SA.003      1 LINE     77    1 PAGE UM   DWB                 JULY 03, 1981  13:44:08
            5.0T2   269                       
0          SUBROUTINE WITH S-TYPE CALLING SEQUENCE TO INTERFACE TO JMSGTDR.
00437/004   JMSGTDR/JTUGTDR          JMSGTD          OC           # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00437/005   JMSGTDR/JTUGTDR          JTUGTD          SA             DWB:JTUGTD(1,999)                                               
            5.0T1   989  JMSGTDR/JTUGTDR.JTUGTD.SA.005      1 LINE     77    1 PAGE UM   DWB                 JULY 03, 1981  13:44:08
            5.0T2   270                       
0          SUBROUTINE WITH S-TYPE CALLING SEQUENCE TO INTERFACE TO JTUGTDR.
00437/006   JMSGTDR/JTUGTDR          JTUGTD          OC           # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00441/001  *FILEUSE                                  SA  G        # (OBSOLETE)                                                      
            D3T2    369  FILEUSE..SA.1                      1 LINE     80    5 PAGE UM                       AUG. 02, 1973  02:54.05
0          Obsoleted by the FILESTATUS command (529).
00442/001   CCATL                                    SA  O  CCAT    FILE:CCATL(1000)                                                
            5.0T1   990  CCATL..SA.001                      1 LINE     80   18 PAGE UM   HELFFRICH           JULY 03, 1981  13:44:09
            5.0T2   271  FILE:CCATL           
0          THE GENERAL OPERATION OF THIS PROGRAM IS TO ALLOCATE AN *MASTER.CATALOG0 OF
           THE REQUESTED SIZE AND THEN SUBALLOCATE TO THE MICAT, SYSCAT, SFCAT, AND USER
           CATALOG AS REQUESTED, ALLOCATING ADDITIONAL *MASTER.CATALOGN'S AS NECESSARY.
           AS A RESULT THE FOUR "LOGICAL PIECES" OF THE CATALOG MAY BE MADE TO ALL FALL
           WITHIN THE SAME EXTENT OR IN FOUR SEPARATE EXTENTS (AND VOLUMES) OR SOMEWHERE
           IN BETWEEN DEPENDING ON HOW THE EXTENT SIZES AND CATALOG SIZES ARE SPECIFIED.
           (AT UM, PUT THE MICAT, SYSCAT, AND SFCAT ON THREE SEPARATE VOLUMES TO
           MINIMIZE CONTENTION.) ASSEMBLE USING COPY:FILE.MACROS (482/45). SEE COMP
           (682/2) FOR A WRITEUP.
0          Referenced by comments of: 682/2 
00442/002   CCATL                                    OC  O          FILE:CCATL(1,999)                                               
            5.0T1   991  CCATL..OC.002                      1 LINE     80    5 PAGE UM   HELFFRICH           JULY 03, 1981  13:44:13
            5.0T2   272                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  173
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00443/001   FORMAT-TEXT360 CONVERTER                 SS  S          W073:FORMAT2T360                                                
            5.0T1   992  FORMAT-TEXT360_CONVERTER..SS.001   1 LINE     90    9 PAGE UM   SALISBURY           JULY 03, 1981  13:44:15
            5.0T2   273                       
0          SNOBOL PROGRAM TO CONVERT INPUT FOR *FORMAT TO INPUT FOR TEXT/360.
           THIS PROGRAM HAS MANY LIMITATIONS AND SOME KNOWN BUGS, BUT IS USUALLY BETTER THAN RETYPING.
00444/001A  MTS VOLUME 2             MASTER          WT             S0485 MTSV2 'MTS MANUALS' POSN=NEWM15.V2                        
            5.1T1   307  MTS_VOLUME_2.MASTER.WT.001         1 LINE    132  306 PAGE UM   MANUAL              JULY 23, 1983  10:40:48
0          TEXT/360 master for Volume 2 "Public File Descriptions" of the UM MTS manuals,
           April 1982, updated Febraury 1983.
            
           Editor:  Richard A. Salisbury
00444/002A  MTS VOLUME 2             PRINT           PT             S0485 MTSV2 'MTS MANUALS' POSN=PRINT15.V2                       
            5.1T1   308  MTS_VOLUME_2.PRINT.PT.002          1 LINE    132  555 PAGE UM   MANUAL              JULY 23, 1983  10:40:59
0          TEXT/360 PRINT FILE.
00444/003   MTS VOLUME 2             FLOWCHART       P              S1558 5.0T1 VLO FSNAME=MTS_VOLUME_2.FLOWCHART.P.003(1)       995
            5.0T1   995  MTS_VOLUME_2.FLOWCHART.P.003       1 SEQ     133    6 PAGE UM   MANUAL              MAR. 26, 1979  02:54:14
            5.0T2   276                       
0          *FLOWCHART EXAMPLE -- MUST BE PRINTED AT 8 LINES/INCH.
00444/004C  MTS VOLUME 2             UPDATE 1        P              W073:TNLV2.FEB83                                                
            5.1T1   309  MTS_VOLUME_2.UPDATE_1.P.004        1 LINE     80  108 PAGE UM   MANUAL              JULY 23, 1983  10:41:04
0          Update 1 to MTS Volume 2.
00447/001   MOUNT STATISTICS         MNTSTAT SUBR    SA  G          S1558 5.0T1 VLO FSNAME=MOUNT_STATISTICS.MNTSTAT.SA.001(1)    999
            5.0T1   999  MOUNT_STATISTICS.MNTSTAT.SA.001    1 LINE     80    3 PAGE UM   WSG                 JAN. 14, 1977  15:13:26
            5.0T2   280                       
0          THE MOUNT STATISTICS FACILITY IS USED TO SAVE INFORMATION ABOUT MOUNTS
           AND ATTEMPTED MOUNTS WHICH FAIL.  THIS INFORMATION IS COLLECTED VIA THE
           CMDSTAT FACILITY (531) AS RECORD TYPE 16.  THE CMDSTAT FACILITY PERIODICALLY
           PLACES THE MNTSTAT RECORDS IN THE FILE SYS:MOUNTSTAT.  THE SAVMS PROGRAM
           (447/3) SHOULD BE RUN ABOUT MONTHLY TO DUMP THE DATA FROM THIS FILE ONTO
           TAPE.  THE SAVMS PROGRAM WILL LEAVE THE RECORD FOR THE LAST REFERENCE TO 
           EACH RACK NUMBER IN THE FILE FOR ACCESS BY THE MSSCN PROGRAM (447/5) AND
           DELETE OLDER RECORDS.  THE MSDEL PROGRAM (447/8) CAN BE USED TO DELETE
           ANY ADDITIONAL UNWANTED RECORDS AFTER SAVMS HAS BEEN RUN.
            
           MNTSTAT IS A SUBROUTINE CALLED BY THE MOUNT COMMAND (101) TO LOG STATISTICS
           RECORDS ABOUT EACH MOUNT REQUEST.  ASSEMBLE USING COPY:MTS.MACROS (344/3).
0          Referenced by comments of: 101/1, 101/2, 447/3, 447/8 
00447/002   MOUNT STATISTICS         MNTSTAT SUBR    OC  G        # (PART OF *CLSMOUNT)                                             
                                                                                    UM   WSG                                        
0          Part of *CLSMOUNT (101/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  174
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00447/003   MOUNT STATISTICS         SAVMS PGM       SA  G  SVMS    WSG:SAVMS(1,999)                                                
            5.0T1  1000  MOUNT_STATISTICS.SAVMS_PG.SA.003   1 LINE     80    7 PAGE UM   WSG                 JULY 03, 1981  13:47:19
            5.0T2   281  WSG.:SAVMS           
0          PROGRAM TO DUMP THE MOUNT STATISTICS FROM SYS:MOUNTSTAT TO TAPE.  THIS PROGRAM
           IS RUN MONTHLY AT UM.  IT COPIES ALL PREVIOUSLY UNSAVED RECORDS TO A TAPE AND
           THEN DELETES ALL BUT THE LAST REFERENCE(S) (WITH AND WITHOUT RING=IN) FOR EACH
           RACK NUMBER.  AT UM, THIS LEAVES ABOUT 100 PAGES WORTH OF MOUNT STATISTICS.
           THIS IS DONE SO THAT AN ONLINE FILE CONTAINING THE LAST REFERENCE (AND LAST
           POTENTIAL CHANGE) FOR EACH TAPE IS AVAILABLE FOR THE MSSCN PROGRAM (447/5).
           THE FILE SYS:MOUNTSTAT MUST BE A LINE FILE.  THE TAPE IS BLOCKED VB(16379,255).
           AT UM, WE COPY EACH MONTH'S TAPE ONTO THE END OF A LARGER TAPE, SAVING THE
           MOUNT STATISTICS INDEFINITELY.  IT IS ADVISABLE TO OCCASIONALLY OPTIMIZE
           SYS:MOUNTSTAT BY COPYING IT TO ANOTHER FILE AND BACK SINCE THE PROCESS OF 
           DELETING THE OLD RECORDS (BY SAVMS) CAUSES THE FILE TO BECOME UNOPTIMIZED.
           THIS PROGRAM WILL HANDLE A MIXTURE OF BOTH THE RECORDS PRODUCED BY MNTSTAT
           (447/1) VIA CMDSTAT AND THE OLDER RECORDS PRODUCED BY THE D3.0 TAPESTAT PROGRAM.
0          Referenced by comments of: 447/1 
00447/004   MOUNT STATISTICS         SAVMS PGM       OC  G          WSG:SAVMS(1000)                                                 
            5.0T1  1001  MOUNT_STATISTICS.SAVMS_PG.OC.004   1 LINE     80    2 PAGE UM   WSG                 JULY 03, 1981  13:47:20
            5.0T2   282                       
00447/005   MOUNT STATISTICS         MSSCN PGM       SA  G  MSSN    WSG:MSSCN(1,999)                                                
            5.0T1  1002  MOUNT_STATISTICS.MSSCN_PG.SA.005   1 LINE     80   13 PAGE UM   WSG                 JULY 03, 1981  13:47:21
            5.0T2   283  WSG.:MSSCN           
0          PROGRAM TO SCAN MOUNT STATISTICS RECORDS (FROM FILE OR TAPE) LOOKING FOR SPECIFIED
           RACK NUMBERS OR USERS FOR SPECIFIED DATE RANGES.  IT PRINTS THE RECORDS ON SPRINT
           SORTED BY RACK NUMBER AND DATE/TIME.  FOR EXAMPLE,
            
                          $RUN MSSCN(1000) SCARDS=SYS:MOUNTSTAT
                          R S0622 03-25-76 05-22-76
                          U WSG. 01-14-77
                          P ABCD
                          R S08##
                          $ENDFILE
            
           WILL SCAN SYS:MOUNTSTAT FOR ALL MOUNTS OF TAPE S0622 FROM 25 MAR 76 TO 22 MAY 76,
           FOR ALL MOUNTS BY USER WSG ON 14 JAN 77, FOR ALL MOUNTS BY PROJECT ABCD, AND FOR
           ALL MOUNTS OF TAPES WITH RACK NUMBERS BEGINNING WITH S08 FOLLOWED BY ANY TWO
           CHARACTERS.  IF SCARDS IS NOT ASSIGNED, MSSCN WILL PROMPT FOR FDNAMES TO BE SCANNED.
           IF MORE THAN 500 RECORDS ARE LIKELY TO BE OUTPUT, THE PROGRAM SHOULD BE RUN WITH
           PAR=N, WHERE N IS AN UPPER BOUND (USED FOR SORTING).  THIS PROGRAM WILL ALSO ACCEPT
           THE OLDER RECORDS PRODUCED BY THE D3.0 TAPESTAT PROGRAM (NOW OBSOLETE).
0          Referenced by comments of: 447/1, 447/3, 447/7 
00447/006   MOUNT STATISTICS         MSSCN PGM       OC  G          SYS:MSSCN                                                       
            5.0T1  1003  MOUNT_STATISTICS.MSSCN_PG.OC.006   1 LINE     80    3 PAGE UM   WSG                 JULY 03, 1981  13:47:23
            5.0T2   284  SYS.:MSSCN           
1                                                                                               SUN SEP 08/96   15:24:55   Page  175
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00447/007   MOUNT STATISTICS         *MSS            C              *MSS                                                            
            5.0T1  1004  MOUNT_STATISTICS.*MSS.C.007        1 LINE     54    1 PAGE UM   WSG                 JULY 03, 1981  13:47:24
            5.0T2   285  *MSS                 
0          COMMAND FILE USED BY THE OPERATORS TO RUN MSSCN (447/5).  INVOKED BY ENTERING
           "MTS *MSS" ON THE OPERATOR'S CONSOLE.
00447/008   MOUNT STATISTICS         MSDEL PGM       SA  G          WSG:MSDEL(1,999)                                                
            5.0T1  1005  MOUNT_STATISTICS.MSDEL_PG.SA.008   1 LINE     64    2 PAGE UM   WSG                 JULY 03, 1981  13:47:25
            5.0T2   286  WSG.:MSDEL           
0          PROGRAM USED TO DELETE UNWANTED RECORDS FROM THE MOUNT STATISTICS FILE
           SYS:MOUNTSTAT.  IT ASKS FOR RACK NUMBERS TO BE DELETED, WHICH MUST BE ENTERED
           ONE PER LINE, FOLLOWED BY AN END-OF-FILE.  IT MAKES ONE PASS THROUGH SYS:MOUNTSTAT,
           WHICH IS LOCKED FOR MODIFICATION, AND DELETES ANY RECORD WHICH HAS ONE OF THE
           SPECIFIED RACK NUMBERS.  AT UM, THIS PROGRAM IS RUN PERIODICALLY TO CLEAN OUT
           OLD SERIES OF RACK NUMBERS TO KEEP SYS:MOUNTSTAT AT A REASONABLE SIZE.  THIS
           PROGRAM WILL NEVER DELETE ANY RECORD WHICH HAS NOT BEEN PREVIOUSLY SAVED ON TAPE
           AND WILL HANDLE A FILE WHICH IS A MIXTURE OF RECORDS PRODUCED BY MNTSTAT (447/1)
           AND THE D3.0 TAPESTAT PROGRAM (NOW OBSOLETE).
0          Referenced by comments of: 447/1 
00447/009   MOUNT STATISTICS         MSDEL PGM       OC  G          WSG:MSDEL(1000)                                                 
            5.0T1  1006  MOUNT_STATISTICS.MSDEL_PG.OC.009   1 LINE     80    2 PAGE UM   WSG                 JULY 03, 1981  13:47:26
            5.0T2   287                       
00447/010   MOUNT STATISTICS         SYS:MOUNTSTAT   D            # SYS:MOUNTSTAT                                                   
                                                                                    UM   WSG                                        
                         SYS:MOUNTSTAT@E      
00449/001  *DEB                                      S            # (OBSOLETE)                                                      
            D2T1    341                                                             UM                                              
0          Obsoleted by *SORT (303/4).
00451/001   CATALOG VERIFY - VNTD                                 # (PART OF FILE SYSTEM RECOVERY)                                  
                                                                                    UM                                              
0          Part of File System Recovery (682/18).
00453/001   DRUM INIT <STAND-ALONE>                  SA           # (OBSOLETE)                                                      
            D4T1    994                                                             UM                                              
0          STAND ALONE PROGRAM TO FORMAT DRUMS.
00455/001   DBS:MAC                                  SM           # (OBSOLETE)                                                      
            D3T3     17  DBS:MAC..SM.                       1 LINE     66    3 PAGE UM                       AUG. 01, 1973  18:21.38
00456/001  *CONFIG                                   SA           # (OBSOLETE)                                                      
            D2T1    318                                                             UM                                              
1                                                                                               SUN SEP 08/96   15:24:55   Page  176
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00457/001   TPSBUFFER                                SA           # (OBSOLETE)                                                      
            D2T1    147                                                             UM                                              
00458/001   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.001(1)          1007
            5.0T1  1007  OLTEP.21.7_SOURCE.SA.001           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:47:54
            5.0T3     1                       
0          (458/1) THROUGH (458/76) CONTAIN THE SOURCE FOR OS/360 RELEASE 21.7 OLTEP.
           THIS IS ASSEMBLED WITH *OSMAC (193) AND OLTEPMACLIB (458/77). OLTEP IS RUN UNDER
           FAKEOS. SEE (545).
0          Referenced by comments of: 338/1, 458/1 
00458/002   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.002(1)          1008
            5.0T1  1008  OLTEP.21.7_SOURCE.SA.002           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:47:55
            5.0T3     2                       
00458/003   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.003(1)          1009
            5.0T1  1009  OLTEP.21.7_SOURCE.SA.003           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:47:56
            5.0T3     3                       
00458/004   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.004(1)          1010
            5.0T1  1010  OLTEP.21.7_SOURCE.SA.004           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:47:57
            5.0T3     4                       
00458/005   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.005(1)          1011
            5.0T1  1011  OLTEP.21.7_SOURCE.SA.005           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:47:58
            5.0T3     5                       
00458/006   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.006(1)          1012
            5.0T1  1012  OLTEP.21.7_SOURCE.SA.006           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:47:59
            5.0T3     6                       
00458/007   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.007(1)          1013
            5.0T1  1013  OLTEP.21.7_SOURCE.SA.007           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:48:00
            5.0T3     7                       
00458/008   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.008(1)          1014
            5.0T1  1014  OLTEP.21.7_SOURCE.SA.008           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:01
            5.0T3     8                       
00458/009   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.009(1)          1015
            5.0T1  1015  OLTEP.21.7_SOURCE.SA.009           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:02
            5.0T3     9                       
00458/010   OLTEP                    21.7 SOURCE     SA  G          S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.010(1)          1016
            5.0T1  1016  OLTEP.21.7_SOURCE.SA.010           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:03
            5.0T3    10                       
00458/011   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  11 
            5.0T1  1017  OLTEP.21.7_SOURCE.SA.011           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:04
            5.0T3    11                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  177
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/012   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  12 
            5.0T1  1018  OLTEP.21.7_SOURCE.SA.012           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:05
            5.0T3    12                       
00458/013   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  13 
            5.0T1  1019  OLTEP.21.7_SOURCE.SA.013           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:06
            5.0T3    13                       
00458/014   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  14 
            5.0T1  1020  OLTEP.21.7_SOURCE.SA.014           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:07
            5.0T3    14                       
00458/015   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  15 
            5.0T1  1021  OLTEP.21.7_SOURCE.SA.015           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:48:08
            5.0T3    15                       
00458/016   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  16 
            5.0T1  1022  OLTEP.21.7_SOURCE.SA.016           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:09
            5.0T3    16                       
00458/017   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  17 
            5.0T1  1023  OLTEP.21.7_SOURCE.SA.017           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:10
            5.0T3    17                       
00458/018   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  18 
            5.0T1  1024  OLTEP.21.7_SOURCE.SA.018           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:48:11
            5.0T3    18                       
00458/019   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  19 
            5.0T1  1025  OLTEP.21.7_SOURCE.SA.019           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:12
            5.0T3    19                       
00458/020   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  20 
            5.0T1  1026  OLTEP.21.7_SOURCE.SA.020           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:14
            5.0T3    20                       
00458/021   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  21 
            5.0T1  1027  OLTEP.21.7_SOURCE.SA.021           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:15
            5.0T3    21                       
00458/022   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  22 
            5.0T1  1028  OLTEP.21.7_SOURCE.SA.022           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:16
            5.0T3    22                       
00458/023   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  23 
            5.0T1  1029  OLTEP.21.7_SOURCE.SA.023           1 SEQ      80    1 PAGE UM   MTA                 JULY 03, 1981  13:48:17
            5.0T3    23                       
00458/024   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  24 
            5.0T1  1030  OLTEP.21.7_SOURCE.SA.024           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:18
            5.0T3    24                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  178
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/025   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  25 
            5.0T1  1031  OLTEP.21.7_SOURCE.SA.025           1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  13:48:19
            5.0T3    25                       
00458/026   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  26 
            5.0T1  1032  OLTEP.21.7_SOURCE.SA.026           1 SEQ      80   12 PAGE UM   MTA                 JULY 03, 1981  13:48:21
            5.0T3    26                       
00458/027   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  27 
            5.0T1  1033  OLTEP.21.7_SOURCE.SA.027           1 SEQ      80   35 PAGE UM   MTA                 JULY 03, 1981  13:48:23
            5.0T3    27                       
00458/028   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  28 
            5.0T1  1034  OLTEP.21.7_SOURCE.SA.028           1 SEQ      80   19 PAGE UM   MTA                 JULY 03, 1981  13:48:25
            5.0T3    28                       
00458/029   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  29 
            5.0T1  1035  OLTEP.21.7_SOURCE.SA.029           1 SEQ      80   24 PAGE UM   MTA                 JULY 03, 1981  13:48:27
            5.0T3    29                       
00458/030   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  30 
            5.0T1  1036  OLTEP.21.7_SOURCE.SA.030           1 SEQ      80   12 PAGE UM   MTA                 JULY 03, 1981  13:48:29
            5.0T3    30                       
00458/031   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  31 
            5.0T1  1037  OLTEP.21.7_SOURCE.SA.031           1 SEQ      80   26 PAGE UM   MTA                 JULY 03, 1981  13:48:31
            5.0T3    31                       
00458/032   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  32 
            5.0T1  1038  OLTEP.21.7_SOURCE.SA.032           1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  13:48:33
            5.0T3    32                       
00458/033   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  33 
            5.0T1  1039  OLTEP.21.7_SOURCE.SA.033           1 SEQ      80   23 PAGE UM   MTA                 JULY 03, 1981  13:48:35
            5.0T3    33                       
00458/034   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  34 
            5.0T1  1040  OLTEP.21.7_SOURCE.SA.034           1 SEQ      80   21 PAGE UM   MTA                 JULY 03, 1981  13:48:37
            5.0T3    34                       
00458/035   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  35 
            5.0T1  1041  OLTEP.21.7_SOURCE.SA.035           1 SEQ      80    8 PAGE UM   MTA                 JULY 03, 1981  13:48:38
            5.0T3    35                       
00458/036   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  36 
            5.0T1  1042  OLTEP.21.7_SOURCE.SA.036           1 SEQ      80    7 PAGE UM   MTA                 JULY 03, 1981  13:48:39
            5.0T3    36                       
00458/037   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  37 
            5.0T1  1043  OLTEP.21.7_SOURCE.SA.037           1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  13:48:40
            5.0T3    37                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  179
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/038   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  38 
            5.0T1  1044  OLTEP.21.7_SOURCE.SA.038           1 SEQ      80    9 PAGE UM   MTA                 JULY 03, 1981  13:48:42
            5.0T3    38                       
00458/039   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  39 
            5.0T1  1045  OLTEP.21.7_SOURCE.SA.039           1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  13:48:43
            5.0T3    39                       
00458/040   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  40 
            5.0T1  1046  OLTEP.21.7_SOURCE.SA.040           1 SEQ      80   16 PAGE UM   MTA                 JULY 03, 1981  13:48:45
            5.0T3    40                       
00458/041   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  41 
            5.0T1  1047  OLTEP.21.7_SOURCE.SA.041           1 SEQ      80    8 PAGE UM   MTA                 JULY 03, 1981  13:48:46
            5.0T3    41                       
00458/042   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  42 
            5.0T1  1048  OLTEP.21.7_SOURCE.SA.042           1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  13:48:47
            5.0T3    42                       
00458/043   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  43 
            5.0T1  1049  OLTEP.21.7_SOURCE.SA.043           1 SEQ      80   37 PAGE UM   MTA                 JULY 03, 1981  13:48:49
            5.0T3    43                       
00458/044   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  44 
            5.0T1  1050  OLTEP.21.7_SOURCE.SA.044           1 SEQ      80   17 PAGE UM   MTA                 JULY 03, 1981  13:48:51
            5.0T3    44                       
00458/045   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  45 
            5.0T1  1051  OLTEP.21.7_SOURCE.SA.045           1 SEQ      80   15 PAGE UM   MTA                 JULY 03, 1981  13:48:53
            5.0T3    45                       
00458/046   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  46 
            5.0T1  1052  OLTEP.21.7_SOURCE.SA.046           1 SEQ      80   31 PAGE UM   MTA                 JULY 03, 1981  13:48:55
            5.0T3    46                       
00458/047   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  47 
            5.0T1  1053  OLTEP.21.7_SOURCE.SA.047           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:48:56
            5.0T3    47                       
00458/048   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  48 
            5.0T1  1054  OLTEP.21.7_SOURCE.SA.048           1 SEQ      80   12 PAGE UM   MTA                 JULY 03, 1981  13:48:58
            5.0T3    48                       
00458/049   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  49 
            5.0T1  1055  OLTEP.21.7_SOURCE.SA.049           1 SEQ      80   15 PAGE UM   MTA                 JULY 03, 1981  13:48:59
            5.0T3    49                       
00458/050   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  50 
            5.0T1  1056  OLTEP.21.7_SOURCE.SA.050           1 SEQ      80   10 PAGE UM   MTA                 JULY 03, 1981  13:49:01
            5.0T3    50                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  180
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/051   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  51 
            5.0T1  1057  OLTEP.21.7_SOURCE.SA.051           1 SEQ      80    5 PAGE UM   MTA                 JULY 03, 1981  13:49:02
            5.0T3    51                       
00458/052   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  52 
            5.0T1  1058  OLTEP.21.7_SOURCE.SA.052           1 SEQ      80   24 PAGE UM   MTA                 JULY 03, 1981  13:49:04
            5.0T3    52                       
00458/053   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  53 
            5.0T1  1059  OLTEP.21.7_SOURCE.SA.053           1 SEQ      80   27 PAGE UM   MTA                 JULY 03, 1981  13:49:06
            5.0T3    53                       
00458/054   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  54 
            5.0T1  1060  OLTEP.21.7_SOURCE.SA.054           1 SEQ      80   24 PAGE UM   MTA                 JULY 03, 1981  13:49:08
            5.0T3    54                       
00458/055   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  55 
            5.0T1  1061  OLTEP.21.7_SOURCE.SA.055           1 SEQ      80   33 PAGE UM   MTA                 JULY 03, 1981  13:49:10
            5.0T3    55                       
00458/056   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  56 
            5.0T1  1062  OLTEP.21.7_SOURCE.SA.056           1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  13:49:12
            5.0T3    56                       
00458/057   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  57 
            5.0T1  1063  OLTEP.21.7_SOURCE.SA.057           1 SEQ      80   39 PAGE UM   MTA                 JULY 03, 1981  13:49:15
            5.0T3    57                       
00458/058   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  58 
            5.0T1  1064  OLTEP.21.7_SOURCE.SA.058           1 SEQ      80   32 PAGE UM   MTA                 JULY 03, 1981  13:49:17
            5.0T3    58                       
00458/059   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  59 
            5.0T1  1065  OLTEP.21.7_SOURCE.SA.059           1 SEQ      80   21 PAGE UM   MTA                 JULY 03, 1981  13:49:19
            5.0T3    59                       
00458/060   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  60 
            5.0T1  1066  OLTEP.21.7_SOURCE.SA.060           1 SEQ      80   20 PAGE UM   MTA                 JULY 03, 1981  13:49:21
            5.0T3    60                       
00458/061   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  61 
            5.0T1  1067  OLTEP.21.7_SOURCE.SA.061           1 SEQ      80   18 PAGE UM   MTA                 JULY 03, 1981  13:49:23
            5.0T3    61                       
00458/062   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  62 
            5.0T1  1068  OLTEP.21.7_SOURCE.SA.062           1 SEQ      80    8 PAGE UM   MTA                 JULY 03, 1981  13:49:24
            5.0T3    62                       
00458/063   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  63 
            5.0T1  1069  OLTEP.21.7_SOURCE.SA.063           1 SEQ      80   10 PAGE UM   MTA                 JULY 03, 1981  13:49:26
            5.0T3    63                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  181
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/064   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  64 
            5.0T1  1070  OLTEP.21.7_SOURCE.SA.064           1 SEQ      80   12 PAGE UM   MTA                 JULY 03, 1981  13:49:27
            5.0T3    64                       
00458/065   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  65 
            5.0T1  1071  OLTEP.21.7_SOURCE.SA.065           1 SEQ      80   38 PAGE UM   MTA                 JULY 03, 1981  13:49:30
            5.0T3    65                       
00458/066   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  66 
            5.0T1  1072  OLTEP.21.7_SOURCE.SA.066           1 SEQ      80    7 PAGE UM   MTA                 JULY 03, 1981  13:49:32
            5.0T3    66                       
00458/067   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  67 
            5.0T1  1073  OLTEP.21.7_SOURCE.SA.067           1 SEQ      80    3 PAGE UM   MTA                 JULY 03, 1981  13:49:33
            5.0T3    67                       
00458/068   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  68 
            5.0T1  1074  OLTEP.21.7_SOURCE.SA.068           1 SEQ      80   19 PAGE UM   MTA                 JULY 03, 1981  13:49:34
            5.0T3    68                       
00458/069   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  69 
            5.0T1  1075  OLTEP.21.7_SOURCE.SA.069           1 SEQ      80   13 PAGE UM   MTA                 JULY 03, 1981  13:49:36
            5.0T3    69                       
00458/070   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  70 
            5.0T1  1076  OLTEP.21.7_SOURCE.SA.070           1 SEQ      80   15 PAGE UM   MTA                 JULY 03, 1981  13:49:37
            5.0T3    70                       
00458/071   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  71 
            5.0T1  1077  OLTEP.21.7_SOURCE.SA.071           1 SEQ      80   24 PAGE UM   MTA                 JULY 03, 1981  13:49:39
            5.0T3    71                       
00458/072   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  72 
            5.0T1  1078  OLTEP.21.7_SOURCE.SA.072           1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  13:49:41
            5.0T3    72                       
00458/073   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  73 
            5.0T1  1079  OLTEP.21.7_SOURCE.SA.073           1 SEQ      80    2 PAGE UM   MTA                 JULY 03, 1981  13:49:42
            5.0T3    73                       
00458/074   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  74 
            5.0T1  1080  OLTEP.21.7_SOURCE.SA.074           1 SEQ      80   21 PAGE UM   MTA                 JULY 03, 1981  13:49:44
            5.0T3    74                       
00458/075   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  75 
            5.0T1  1081  OLTEP.21.7_SOURCE.SA.075           1 SEQ      80   26 PAGE UM   MTA                 JULY 03, 1981  13:49:46
            5.0T3    75                       
00458/076   OLTEP                    21.7 SOURCE     SA  G          S0710 OLTEP                                                  76 
            5.0T1  1082  OLTEP.21.7_SOURCE.SA.076           1 SEQ      80    9 PAGE UM   MTA                 JULY 03, 1981  13:49:48
            5.0T3    76                       
0          Referenced by comments of: 458/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  182
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/077   OLTEP                    OLTEPMACLIB     SM  G          S0938 FSAVE2 VLO FSNAME=OLTEPMACLIB(1)                          
            5.0T1  1083  OLTEP.OLTEPMACLIB.SM.077           1 LINE     72   56 PAGE UM   MTA                 SEP. 23, 1975  00:49:30
            5.0T3    77                       
0          MACROS, SOME OF WHICH ARE USED BY OLTEP -- NOT SURE WHICH MACROS ARE NOT NEEDED.
0          Referenced by comments of: 458/1 
00458/078   OLTEP                    OBJECT          OC  G          ETC:OLTEP                                                       
            5.0T1  1084  OLTEP.OBJECT.OC.078                1 SEQ     920    2 PAGE UM   MTA                 JULY 03, 1981  13:50:10
            5.0T3    78  ETC.:OLTEP           
0          OBJECT FOR OLTEP MAIN PROGRAM AND IFDOLT59, WHICH IS INCLUDED TO GET THE RIGHT
           DEFINITION OF SOME MULTIPLY DEFINED SYMBOLS.
00458/079   OLTEP                    OLTEPLIB        OL  G          ETC:OLTEPLIB                                                    
            5.0T1  1085  OLTEP.OLTEPLIB.OL.079              1 LINE   2572   64 PAGE UM   MTA                 JULY 03, 1981  13:50:11
            5.0T3    79  ETC.:OLTEPLIB        
0          OBJECT LIBRARY FOR THE REST OF OLTEP.  SOME MODULES WHICH ARE NOT USED IN MTS ARE INCLUDED.
           THE FOLLOWING PATCHES ARE INCLUDED BECAUSE THESE MODULES USE MACROS WHICH ARE NOT IN *OSMAC (193):
            
           TO IFDOLT20:   REP  000000  0141F00020,07FE
           TO IFDOLT22:   REP  000386  014700
            
           HAS OTHER PATCHES AS WELL.
0          Referenced by comments of: 458/80 
00458/080   OLTEP                    OLTEPBLDLIN     D   G          MTA:OLTEPBLDLIN                                                 
            5.0T1  1086  OLTEP.OLTEPBLDLIN.D.080            1 LINE     60    1 PAGE UM   MTA                 JULY 03, 1981  13:50:16
            5.0T3    80  MTA:OLTEPBLDLIN      
0          INPUT TO CREBLDL (545/43) FOR OLTEP. CONTAINS ENTRIES FOR THINGS IN OLTEPLIB
           (458/79), BUT NOT OLTEPCDSLIB (458/86) OR OLTEPTSTLIB (458/82).
0          Referenced by comments of: 458/81 
00458/081   OLTEP                    OLTEPBLDL       D   G          ETC:OLTEPBLDL                                                   
            5.0T1  1087  OLTEP.OLTEPBLDL.D.081              1 SEQ     242   11 PAGE UM   MTA                 JULY 03, 1981  13:50:17
            5.0T3    81  ETC:OLTEPBLDL        
0          BLDL INFO FOR OLTEP. CREATED BY CREBLDL (545/43) USING (458/80), (458/83),
           AND (458/85) AS INPUT.
00458/082   OLTEP                    OLTEPTSTLIB     OL  G          MTS.:TST.OLTEPTST                                               
            5.0T1  1088  OLTEP.OLTEPTSTLIB.OL.082           1 LINE  26386  249 PAGE UM   MTA                 JULY 03, 1981  13:50:18
            5.0T3    82  ETC:OLTEPTSTLIB      
0          OBJECT LIBRARY FOR TEST SECTIONS AND CDS (CONFIGURATION DATA SET) MODULES.
           INCLUDES TESTS FOR: 2400, 2301, 2540, 2541, 2501, 1403, 2305, 2671, 2835,
           3270, AND 3274. ALSO INCLUDES SOSP FOR USE IN BUILDING CDS ENTRIES AND
           RETRIEVING TEST SECTIONS FROM THE OLTSEP TAPE. SOSP IS VERSION 8.0. TO ADD
           NEW TEST SECTIONS, SIMPLY PUT THEM IN THIS LIBRARY AND ADD A LINE FOR EACH TO
1                                                                                               SUN SEP 08/96   15:24:55   Page  183
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          OLTEPTSTBLDL (458/83) (AND RUN IT THROUGH CREBLDL). EACH TEST SECTION MUST
           HAVE AN ENTRY WITH THE SAME NAME AS THE SECTION (E.G. T2400A).
            
           ***************************************************************** 
                            Contains REP cards.
           *****************************************************************
0          Referenced by comments of: 458/80, 458/83 
00458/083   OLTEP                    OLTEPTSTBLDL    D              MTA:OLTEPTSTBLDL                                                
            5.0T1  1089  OLTEP.OLTEPTSTBLDL.D.083           1 LINE     60    7 PAGE UM   MTA                 JULY 03, 1981  13:50:37
            5.0T3    83                       
0          INPUT TO CREBLDL (545/43) FOR (458/82).
0          Referenced by comments of: 458/81, 458/82 
00458/084   OLTEP                    OLTEPCDS        D              MTA:OLTEPCDS                                                    
            5.0T1  1090  OLTEP.OLTEPCDS.D.084               1 LINE     81   10 PAGE UM   MTA                 JULY 03, 1981  13:50:39
            5.0T3    84                       
0          Input to CDS create program (458/90) to produce a CDS for the UM
           hardware configuration.
0          Referenced by comments of: 458/86, 458/89 
00458/085   OLTEP                    OLTEPCDSBLDL    D              MTA:OLTEPCDSBLDL                                                
            5.0T1  1091  OLTEP.OLTEPCDSBLDL.D.085           1 LINE     60   16 PAGE UM   MTA                 AUG. 05, 1981  02:30:37
            5.0T3    85                       
0          Input to CREBLDL (545/43) for the UM configuration cds.  This
           file was created by OLTEPOBJCVT (458/88) reading the output of
           OLTEPCRECDS (458/90).
0          Referenced by comments of: 458/81 
00458/086   OLTEP                    OLTEPCDSLIB     OL  G          ETC:OLTEPCDSLIB                                                 
            5.0T1  1092  OLTEP.OLTEPCDSLIB.OL.086           1 LINE  10404   31 PAGE UM   MTA                 JULY 03, 1981  13:50:44
            5.0T3    86  ETC.:OLTEPCDSLIB     
0          Library of CDS entries for the UM configuration produced by 
           OLTEPCRECDS (458/90) reading OLTEPCDS (458/84).
0          Referenced by comments of: 458/80 
00458/087   OLTEP                    OLTEPOBJCVT     SA  O          MTA:OLTEPOBJCVT(1,999)                                          
            5.0T1  1093  OLTEP.OLTEPOBJCVT.SA.087           1 LINE     72    3 PAGE UM   MTA                 JULY 03, 1981  13:50:48
            5.0T3    87                       
0          PROGRAM TO CONVERT OLTSEP, OLTEP, OR CDS DECKS WITH OR WITHOUT OS LINKEDIT
           CONTROL CARDS TO MTS FORMAT AND PRODUCE INPUT TO CREBLDL FOR THEM.  THE INPUT
           IS READ FROM SCARDS; THE MTS OBJECT DECKS ARE WRITTEN ON SPUNCH; A PROTOTYPE
           BLDL RECORD IS READ FROM UNIT 0; AND BLDL OUTPUT RECORDS WITH CORRECT NAME
           AND LENGTH ARE WRITTEN ON UNIT 1.
1                                                                                               SUN SEP 08/96   15:24:55   Page  184
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00458/088   OLTEP                    OLTEPOBJCVT     OC  O          MTA:OLTEPOBJCVT(1000)                                           
            5.0T1  1094  OLTEP.OLTEPOBJCVT.OC.088           1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  13:50:49
            5.0T3    88                       
0          Referenced by comments of: 458/85 
00458/089   OLTEP                    CDS CREATE PGM  SA  G          MTA:OLTEPCRECDS(1,999)                                          
            5.0T1  1095  OLTEP.CDS_CREATE_PGM.SA.089        1 LINE     72    4 PAGE UM   MTA                 JULY 03, 1981  13:50:51
            5.0T3    89                       
0          PROGRAM TO READ CDS DEFINITION CARDS, E.G. (458/84), AND PRODUCE DECKS
           FOR THE CDS MODULES ON SPUNCH.
           ASSEMBLE USING OLD:CC.MACROS (1054/4) AND *SYSMAC.
00458/090   OLTEP                    CDS CREATE PGM  OC  G          MTA:OLTEPCRECDS(1000)                                           
            5.0T1  1096  OLTEP.CDS_CREATE_PGM.OC.090        1 LINE     80    4 PAGE UM   MTA                 JULY 03, 1981  13:50:54
            5.0T3    90                       
0          Referenced by comments of: 458/84, 458/85, 458/86 
00458/091   OLTEP                    OLTEPCMD        C              MTA:OLTEPCMD                                                    
            5.0T1  1097  OLTEP.OLTEPCMD.C.091               1 LINE    124    1 PAGE UM   MTA                 JULY 03, 1981  13:50:55
            5.0T3    91  MTA.:OLTEPCMD        
0          THE FOLLOWING PROCEDURES SHOULD BE USED FOR RELEASE 21.7 OLTEP.
           TO RUN OLTEP, ISSUE THE FOLLOWING COMMAND:
            
             $SOURCE OLTEPCMD
            
           WHERE OLTEPCMD IS (458/91) MODIFIED FOR LOCAL FILE NAMES. THIS WILL LOAD THE
           SPECIAL VERSION OF FAKEOS AND START OLTEP WITH THE COMMENT "IFD102I OLTS
           RUNNING" BEING PRINTED. FURTHER OPERATOR COMMUNICATION WITH OLTEP IS
           DESCRIBED IN THE IBM MANUAL (FORM GC28-6650-6) ON PAGES 41-47. THE OPERATION
           OF OLTEP IN MTS IS AS DESCRIBED IN THIS MANUAL EXCEPT FOR THE FOLLOWING:
            
           1. PAGES 1-40 DESCRIBE HOW TO INSTALL AND INVOKE OLTEP IN OS AND ARE
              IRRELEVANT.
           2. THE PROCEDURE REQUIRED TO INTERRUPT A TEST IS TO PRESS THE ATTENTION KEY.
           3. ALL COMMUNICATION IS VIA THE TERMINAL, NOT THE OPERATOR'S CONSOLE.
           4. IT IS NOT NECESSARY TO TYPE "R 00,'XXX'", SINCE "XXX" IS TREATED IN
              EXACTLY THE SAME WAY.
           5. THE PRINTED OUTPUT FROM OLTEP (REFERED TO AS THE DIAGMSG DD IN THE MANUAL)
              WILL BE PUT IN THE TEMPORARY FILE -DIAG WHICH MAY BE COPIED TO *PRINT* AFTER
              OLTEP TERMINATES.
0          Referenced by comments of: 458/91 
00459/001  *ICSERIES                                 S            # (OBSOLETE)                                                      
            D2T2    155                                                             UM                                              
00460/001   WIREWRAP TEST                                         # (OBSOLETE)                                                      
            D2T2    156                                                             UM                                              
1                                                                                               SUN SEP 08/96   15:24:55   Page  185
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/001A  DISTRIBUTION             *DEDIT MAIN     SA  G          WSG:DEDIT                                                       
            5.1T1   310  DISTRIBUTION.?DEDIT_MAIN.SA.001    1 LINE     74   71 PAGE UM   WSG                 JULY 23, 1983  10:41:09
0          Distribution driver file editor used to construct and edit driver files.
           Copies COPY:DRDSECT (461/6) and *CNFGINFODSECT (654). Assemble with
           PAR=PEXIT=*PEXIT.
            
           ********************************************************************************
           Changes since D5.0:
            
            1. Bug fixed which could cause errors when using the MOVE command.
            2. Changed to page number output listings.
            3. REVL= on FOR, LIST, and PLIST commands now restricts the search
               to the specified revision level(s), rather that including all
               components with the specified levels.
            4. Added a HELP/EXPLAIN command which uses a help file (461/5).
            5. Added VISUAL command (461/2). Use HELP command for documentation.
            6. Modified FIXINTB, CREFFIX, et al to fix several bugs which caused
               component cross referencess to be incorrect under some obscure
               circumstances especially with the DELETE and MERGE commands.
            7. Add SET WARNING=ÈON|OFF¼ to control printing of various warning
               messages. Default is WARN=ON.
            8. Modified CREFFIX routine to print (if WARN=ON) what changes in
               component cross references have been made each time the COMMENT
               command is used. This will show what references to other
               components were added and deleted, as well as the name,
               subcomponent name, and type of the component to which the
               reference was added or deleted.
            
           D5.1 version:
            
            9. More bugs fixed in component cross reference code.
           10. Some error messages improved.
           11. Bugs fixed in "/name" processing, both non-visual and visual
               (461/2).
0          Referenced by comments of: 461/2, 461/3, 461/6, 528/10 
00461/002A  DISTRIBUTION             *DEDIT VIS CMD  SG  G          WSG:DEDIT.VIS.SG                                                
            5.1T1   311  DISTRIBUTION.?DEDIT_VIS_C.SG.002   1 LINE    166    9 PAGE UM   WSG                 JULY 23, 1983  10:41:11
0          GOM subroutine called by DEDIT (461/1) to implement the VISUAL
           command. Calls the Screen Support Routines (811). Object is part
           of *DEDIT (461/3).
            
           ******************************************************************
           Changes since D5.0:
             Changed for new version of the Screen Support Routines.
           ******************************************************************
0          Referenced by comments of: 461/1, 461/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  186
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/003A  DISTRIBUTION             *DEDIT OBJECT   OE  G          *DEDIT                                                          
            5.1T1   312  DISTRIBUTION.?DEDIT_OBJEC.OE.003   1 LINE  19462   17 PAGE UM   WSG                 JULY 23, 1983  10:41:12
                         *DEDIT               
0          Object for (461/1) + (461/2).
0          Referenced by comments of: 461/2 
00461/004C  DISTRIBUTION             *DEDIT HELP     WF             WSG:DEDIT.WF                                                    
            5.1T1   313  DISTRIBUTION.?DEDIT_HELP.WF.004    1 LINE     75   11 PAGE UM   WSG                 JULY 23, 1983  10:41:13
0          *FORMAT input for *DEDIT help file. This file should be run
           through *FORMAT to produce ETC:DEDIT.HELP (461/5).
            
           ********************************************************************
           For D5.1:
             Minor text corrections.
00461/005C  DISTRIBUTION             *DEDIT HELP     PF             ETC:DEDIT.HELP                                                  
            5.1T1   314  DISTRIBUTION.?DEDIT_HELP.PF.005    1 LINE     76   11 PAGE UM   WSG                 JULY 23, 1983  10:41:13
                         ETC:DEDIT.HELP       
0          File containing the text used by the *DEDIT help and explain commands.
0          Referenced by comments of: 461/1, 461/4 
00461/006   DISTRIBUTION             DRIVER DSECT    SA  G          COPY:DRDSECT                                                    
            5.0T1  1099  DISTRIBUTION.DRIVER_DSECT.SA.004   1 LINE     72    1 PAGE UM   WSG                 JULY 03, 1981  13:50:57
            5.0T3    93  COPY:DRDSECT         
0          Copy section for the driver file DSECT used by *FS (548) and *DEDIT (461/1).
           It defines the structure of a distribution driver file record.
0          Referenced by comments of: 461/1, 548/1 
00461/007A  DISTRIBUTION             DRIVERSCAN      SS  G          DIST:DRIVERSCN.SS                                               
            5.1T1   315  DISTRIBUTION.DRIVERSCAN.SS.007     1 LINE     75    5 PAGE UBC  BERRYMAN  WSG       JULY 23, 1983  10:41:15
0          Source for a Spitbol program that scans a distribution driver file
           and prints a list of component numbers that aren't in it. The
           program also performs a number of simple checks on component names,
           subcomponent names, component numbers, and subcomponent numbers. It
           will also verify that all of the files referenced exist and can be
           read. It uses the ACCESS function (461/8) to check for read access.
            
           *******************************************************************
           D5.1 version:
             All known bugs fixed.
0          Referenced by comments of: 461/8, 461/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  187
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/008   DISTRIBUTION             DRVSCAN ACCESS  SA  G          S1558 5.0T1 VLO FSNAME=DISTRIBUTION.DRVSCAN_ACCE.SA.010(1)  1102
            5.0T1  1102  DISTRIBUTION.DRVSCAN_ACCE.SA.010   1 LINE     72    3 PAGE UBC  BERRYMAN  WSG       JULY 03, 1981  13:51:01
            5.0T3    96                       
0          Spitbol interface to CHKFILE. Used by DRIVERSCAN (461/7). Object
           is part of (461/9).
0          Referenced by comments of: 461/7, 461/9 
00461/009A  DISTRIBUTION             DRIVERSCAN      OC  G          DIST:DRIVERSCAN                                                 
            5.1T1   316  DISTRIBUTION.DRIVERSCAN.OC.009     1 LINE   9776    6 PAGE UBC  BERRYMAN  WSG       JULY 23, 1983  10:41:15
                         DIST:DRIVERSCAN      
0          Object for (461/7) is at line 1; object for (461/8) is at line
           -1000. Contains a $CONTINUE WITH *SPITLIB record.
0          Referenced by comments of: 461/8 
00461/010C  DISTRIBUTION             DATECHK         SS  G          DIST:DATECHK.SS                                                 
            5.1T1   317  DISTRIBUTION.DATECHK.SS.010        1 LINE    126    3 PAGE UM   WSG                 JULY 23, 1983  10:41:16
0          Source for a Spitbol program to read through a driver file and look
           at components which DO NOT have a revision level on a specified list
           and, if the component is located in a file, to check the last change
           date of the file and compare it with the date the component was last
           distributed, reporting those files which have changed since the last
           distribution but which don't have a revision level and are thus not
           scheduled for distribution.
            
           Calls the LSTCHG function (461/11). Object part of (461/12).
0          Referenced by comments of: 461/11, 461/12 
00461/011C  DISTRIBUTION             DATECHK LSTCHG  SA  G          DIST:DATECHK.SA                                                 
            5.1T1   318  DISTRIBUTION.DATECHK_LSTC.SA.011   1 LINE     67    1 PAGE UM   WSG                 JULY 23, 1983  10:41:16
0          Asm source for the LSTCHG function used by DATECHK (461/10) to obtain
           the last change date of a specified file. Object part of (461/12).
0          Referenced by comments of: 461/10, 461/12 
00461/012C  DISTRIBUTION             DATECHK         OE  G          DIST:DATECHK                                                    
            5.1T1   319  DISTRIBUTION.DATECHK.OE.012        1 LINE   9504    6 PAGE UM   WSG                 JULY 23, 1983  10:41:16
                         DIST:DATECHK         
0          Object for (794/2) and (461/10) beginning at line 1. Object for (461/11)
           beginning at line -1000. Contains a $CONTINUE WITH *SPITLIB record.
0          Referenced by comments of: 461/10, 461/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  188
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/013   DISTRIBUTION             5-LINE          SA  G          S1558 5.0T1 VLO FSNAME=DISTRIBUTION.5-LINE.SA.012(1)        1104
            5.0T1  1104  DISTRIBUTION.5-LINE.SA.012         1 LINE     80    8 PAGE UBC  HOGG                MAR. 01, 1973  19:33:27
            5.0T3    98                       
0          Program to print the first 5 and last 5 lines of each file on a *FS
           tape. Used to verify dist tape contents.
00461/014   DISTRIBUTION             5-LINE          OC  G          MTS:FS5L                                                    1087
            5.0T1  1105  DISTRIBUTION.5-LINE.OC.013         1 LINE     80    3 PAGE UBC  HOGG                JULY 03, 1981  13:51:17
            5.0T3    99                       
00461/015A  DISTRIBUTION             DRIVER          D              W02X:5.1DRIVER                                                  
            5.1T3   364  DISTRIBUTION.DRIVER.D.015          2 LINE  32767  472 PAGE UM   SWEET               JAN. 28, 1987  11:29:01
                         DIST:DRIVER          
0          This is the complete driver file for UM D5.1.  Items included in
           D5.1 may be marked with revision levels as follows:
            
           REVL=A    subcomponents which have changed since D5.0 (Aug. 1981)
            
           REVL=C    new subcomponents which have been added to the 
                     production system at UM since D5.0.
            
           REVL=D    preliminary versions which may still change
                     significantly and in some incompatible way.
            
           Line numbers in this file are important. 
            
            
            
           *********************************************************************
            
           This driver file is normally kept in DIST:DRIVER at UM.
            
           *********************************************************************
0          Referenced by comments of: 461/16, 461/18 
00461/016A  DISTRIBUTION             DRIVER COMMENT  D              W02X:5.1COMM                                                    
            5.1T3   365  DISTRIBUTION.DRIVER_COMM.D.016     1 LINE    120  241 PAGE UM   SWEET               JAN. 28, 1987  11:29:40
                         DIST:COMM            
0          This is the comment file for the D5.1 driver file (461/15).  Line numbers in
           this file are important.
            
            
           *********************************************************************
            
           At UM this file is normally kept in DIST:COMM.
            
           *********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  189
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/017A  DISTRIBUTION             DRIV INDEX GEN  C              DIST:DISTINDEX                                                  
            5.1T1   320  DISTRIBUTION.DRIV_INDEX_G.C.017    1 LINE    133    1 PAGE UM   SWEET               JULY 23, 1983  10:42:44
                         DIST:DISTINDEX       
0          Command file to produce a driver file alphabetized index.
00461/018A  DISTRIBUTION             6250 INDEX      P              DIST:INDEX6250                                                  
            5.1T3   362  DISTRIBUTION.6250_INDEX.P.018      1 LINE    134  244 PAGE UM   SWEET               AUG. 20, 1983  19:55:21
                         DIST:INDEX6250       
0          6250 version of the index for the UM driver file (461/15). Copy to a
           printer.
00461/019A  DISTRIBUTION             GENERAL NOTES   WF             DIST:GENNOTES.WF                                                
            5.1T3   328  DISTRIBUTION.GENERAL_NOTE.WF.019   1 LINE    197   13 PAGE UM   SWEET               AUG. 20, 1983  19:42:02
                         DIST:GENNOTES.WF     
0          General notes on MTS Distribution 5.1.
00461/020A  DISTRIBUTION             NEW SYS         WF             DIST:NEWSYS.WF                                                  
            5.1T3   329  DISTRIBUTION.NEW_SYS.WF.020        1 LINE    156    5 PAGE UM   SWEET               AUG. 20, 1983  19:42:07
                         DIST:NEWSYS.WF       
0          A writeup describing the installation of MTS Distribution 5.1 at new
           installations, i.e. installations which have not previously used
           MTS.
00461/021A  DISTRIBUTION             EXISTING SYS    WF             DIST:OLDSYS.WF                                                  
            5.1T3   330  DISTRIBUTION.EXISTING_SYS.WF.021   1 LINE     81   10 PAGE UM   SWEET               AUG. 20, 1983  19:42:10
                         DIST:OLDSYS.WF       
0          A writeup describing the installation of MTS Distribution 5.1 at
           existing installations, i.e. installations which have previously used
           MTS.
00461/022A  DISTRIBUTION             D5.1 MEMO LIST  WF             DIST:MEMOLIST                                                   
            5.1T3   331  DISTRIBUTION.D5.1_MEMO_LI.WF.022   1 LINE    110    3 PAGE UM   SWEET               AUG. 20, 1983  19:42:11
0          Writeup showing the status of all UM Computing Center memos at the
           time of D5.1. Dynamically loads the IND functions from the
           publications function library (711/8).
00461/023A  DISTRIBUTION             MTS BIB         WF             DIST:MTS.BIB                                                    
            5.1T1   321  DISTRIBUTION.MTS_BIB.WF.023        1 LINE     69    3 PAGE UM   SWEET               JULY 23, 1983  10:42:52
0          Bibliography of published papers about MTS and related topics.
00461/024C  DISTRIBUTION             UM CNFIG CHART  P            # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the UM Machine configuration chart. Only hard copies of this
           component are distributed.
1                                                                                               SUN SEP 08/96   15:24:55   Page  190
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/025C  DISTRIBUTION             TSS DASDI INST               # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is instructions for TSS DASDI. Only hard copies of this component
           are distributed.
00461/026A  DISTRIBUTION             FM.GEN          S*  G          DIST:FM.GEN                                                     
            5.1T1   322  DISTRIBUTION.FM.GEN.S?.026         1 LINE     93   16 PAGE UM   WSG                 JULY 23, 1983  10:42:52
                         DIST:FM.GEN          
0          MTS commands and a Spitbol (actually SNOSTORM) program to generate input for
           FILE MOVE (1020) which can be used to build a test pack based on a driver
           file. The program will ask for the following:
            
              1.  The name of a file which contains a complete list of the files
                  currently on the test pack (possibly null),
              2.  The name of the driver file,
              3.  The driver file revision level to be used (enter a null line for
                  a full distribution), and
              4.  If you want the FILE MOVE input to contain LASTCHG= parameter which
                  will cause FILE MOVE to check to see if files being moved have
                  been changed since the date they were written on the distribution
                  tape.
            
           The program will read through the driver file and, for lines which have a
           non-blank disk name field (see *DEDIT) and the appropriate revision level, it
           will output (on SPUNCH) records which can be used as input to FILE MOVE. This
           input will contain three kinds of data:
            
              1.  Files to be destroyed on the test pack (ones no longer listed in the
                  disk name of any component),
              2.  Files to be moved to the test pack (ones with the appropriate revision
                  level), and
              3.  Files to be created on the test pack and which will be permitted the
                  same as the corresponding file on the regular system, but which will
                  be left empty (ones which have disk names ending with "@E").
            
           In addition, the program will look for other modifiers on disk names, besides
           @E, and write the FILE MOVE input to temporary file(s) with the same name(s)
           as the modifier(s) instead of writing it to SPUNCH. In this way, it is possible
           to generate FILE MOVE data for more than one test pack. At UM, this facility
           is used to maintain UM and benchmark test packs which differ slightly from
           the standard distribution test pack.
            
           The program will print an error message (on unit 1) for any component (at the
           specified revision level) which has a bad save control field or which is
           located on tape (since FILE MOVE doesn't have the capability of getting files
           from tapes). It will also output (on unit 0) a new file list for the pack,
           i.e., a list of what files will be on the pack after FILE MOVE is run.
1                                                                                               SUN SEP 08/96   15:24:55   Page  191
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00461/027A  DISTRIBUTION             MTS511 FILES    D              DIST:MTS511.FILES                                               
            5.1T3   332  DISTRIBUTION.MTS511_FILES.D.027    1 LINE     17    7 PAGE UM   J BODWIN            AUG. 20, 1983  19:42:12
                         DIST:MTS511.FILES    
0          A list of all the files on the D5.1 dump/restore pack.
00461/028   DISTRIBUTION             MEMO 378        WF             S1558 5.0T1 VLO FSNAME=DISTRIBUTION.MEMO_378.WF.026(1)      1109
            5.0T1  1109  DISTRIBUTION.MEMO_378.WF.026       1 LINE     92   11 PAGE UM   PIRKOLA             MAY  13, 1978  17:22:07
            5.0T3   103                       
0          This is Computing Center Memo 378 -- "Support Categories for
           Computing Center Software."
00461/029   DISTRIBUTION             CHG FORMS CMDS  C              MTS:CHANGEFORMS                                                 
            5.0T1  1110  DISTRIBUTION.CHG_FORMS_CM.C.027    1 LINE     66    1 PAGE UM   DWB                 JULY 03, 1981  13:51:49
            5.0T3   104                       
0          Command file to run the distribution change form generation program
           (461/30) which reads the change form data file (461/31) to produce
           change forms in the file -forms.
00461/030   DISTRIBUTION             CHG FORMS PGM   SS  G          MTS:CHGFORMPGM                                                  
            5.0T1  1111  DISTRIBUTION.CHG_FORMS_PG.SS.028   1 LINE     78    3 PAGE UM   DWB                 JULY 03, 1981  13:51:50
            5.0T3   105                       
0          Spitbol program to process the change form data file (461/31) and
           produce change forms.
0          Referenced by comments of: 461/29, 461/31 
00461/031   DISTRIBUTION             CHG FORMS DATA  D              MTS:CHGFORMDATA                                                 
            5.0T1  1112  DISTRIBUTION.CHG_FORMS_DA.D.029    1 LINE     94   93 PAGE UM   DWB                 JULY 03, 1981  13:51:52
            5.0T3   106                       
0          Data file of change forms relevant to Distribution 4. To be
           used as input to the change form program (461/30) to produce the
           actual printed forms. The construction of this data file is
           described in (461/32).
0          Referenced by comments of: 461/29, 461/30, 461/32 
00461/032   DISTRIBUTION             CHG FORMS DESC  WF             S1558 5.0T1 VLO FSNAME=DISTRIBUTION.CHG_FORMS_DE.WF.030(1)  1113
            5.0T1  1113  DISTRIBUTION.CHG_FORMS_DE.WF.030   1 LINE     68    3 PAGE UM   DWB                 MAY  13, 1978  17:22:07
            5.0T3   107                       
0          Memo to UM Computing Center staff about how to construct the change
           forms data file (461/31).
0          Referenced by comments of: 461/31 
00462/001   CHECKSUM                                 SA           # (OBSOLETE)                                                      
            D3T3     36  CHECKSUM..SA.1                     1 SEQ      80    3 PAGE UM                       AUG. 01, 1973  18:30.28
0          Obsoleted by MTS protection mechanisms.
1                                                                                               SUN SEP 08/96   15:24:55   Page  192
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00463/001   STDDMP SUBR                              SA  G          MTS:STDDMP(1000)                                                
            5.0T1  1114  STDDMP_SUBR..SA.001                1 LINE     72    5 PAGE UM   MTA                 JULY 03, 1981  13:52:00
            5.0T3   108                       
0          PRODUCES STANDARD FORMAT DUMPS.  SEE ALSO SDUMP (049).
00463/002   STDDMP SUBR                              OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00464/001   PLIMIT                   D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=PLIM                        
            5.0T4   325  PLIMIT.D5.0_MASTER.SA.001          1 LINE     80    3 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:04:25
            5.0T10  229                       
0          Checks page and punch limits. Copies COPY:LLMPSEQU (087) and
           COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3),
           COPY:SETPARM (653), and COPY:CC.MACROS (1054/3).
0          Referenced by comments of: 42/2 
00464/002A  PLIMIT                   UPDATE          UC  G          MTSS:PLIM/UPD                                                   
            5.1T1   323  PLIMIT.UPDATE.UC.002               1 LINE     68    2 PAGE UM   MTS       BURLING   JULY 23, 1983  10:42:55
0          *CDUPDATE input to produce current source.
00464/003A  PLIMIT                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00464/004A  PLIMIT                                   L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=PLIM.LIST                 
            5.1T1   324  PLIMIT..L.004                      1 LINE    133   20 PAGE UM   MTS       BURLING   JULY 23, 1983  10:43:31
00464/005A  PLIMIT                   COMMENTS        D   G          MTSS:PLIM/COM                                                   
            5.1T1   325  PLIMIT.COMMENTS.D.005              1 LINE     54    1 PAGE UM   MTS       BURLING   JULY 23, 1983  10:43:32
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00465/001  *APL                      MTS INTERFACE   SA  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.MTS                       
            5.0T1  1115  APL.MTS_INTERFACE.SA.001           1 LINE    101   42 PAGE UM   HELFFRICH           FEB. 16, 1981  16:27:12
            5.0T3   109                       
0          THE APL-MTS INTERFACE.  ASSEMBLE USING THE APL MACRO LIBRARY (465/3).  CONTAINS
           THE OBJECT AT LINE 1 AND THE SOURCE AT LINE 1000.  COPIES APLDEFN, DIRSECT,
           ZSYMBOLS, AND PERTERM FROM THE APL MACRO LIBRARY (465/3), AND *GFINFODSECT (593).
            
           IMPLEMENTS THE ")TIME" COMMAND.
1                                                                                               SUN SEP 08/96   15:24:55   Page  193
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00465/002  *APL                      TRTABS          SA  G  TRTA    S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.TRTA.S                    
            5.0T1  1116  APL.TRTABS.SA.002                  1 LINE     80   43 PAGE UM   HELFFRICH           MAR. 04, 1977  19:14:31
            5.0T3   110                       
0          SOURCE FOR THE APL TRANSLATE TABLES TO CONVERT APL INTERNAL CHARACTERS TO EXTERNAL
           CHARACTERS.  INCLUDES TABLES FOR:  1052, 1050, 2741, CORRESPONDENCE 2741, TTY 38
           APL ASSIGNMENT #3, GSI300/DTC300/DTC302, APL2 DEVICES (DDI265), LA36, AND ASCII
           DEVICES.  ASSEMBLE USING THE APL MACRO LIBRARY (465/3).
00465/003  *APL                      MACRO LIBRARY   SM  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.MACROS                    
            5.0T1  1117  APL.MACRO_LIBRARY.SM.003           1 LINE     80   18 PAGE UM   HELFFRICH           FEB. 16, 1981  13:03:23
            5.0T3   111                       
0          MACRO LIBRARY CONTAINING MACROS AND COPY SECTIONS REQUIRED FOR ASSEMBLING ALL
           THE APL SOURCE COMPONENTS.
0          Referenced by comments of: 465/1, 465/2, 465/4, 465/5, 465/6, 465/7, 465/8, 465/9, 465/10, 465/11, 465/12, 465/13,
                 465/14, 465/15, 465/16 
00465/004  *APL                      ARTH UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.ARTH.U                    
            5.0T1  1118  APL.ARTH_UPDATE.UU.004             1 LINE     72    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:17:46
            5.0T3   112                       
0          UPDATE TO BE APPLIED TO ORIGINAL SOURCE TO YIELD CURRENT UM SOURCE FOR ARTH MODULE.
           THE SUCCEEDING SUBCOMPONENTS (465/5) THROUGH (465/15) ARE SIMILAR.  ARTH CHANGES:
           MACRO FIXUP AND RECOGNITION OF "REVERSAL ALONG FIRST DIMENSION" OPERATOR.
           ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3).
0          Referenced by comments of: 465/5, 465/6, 465/7, 465/8, 465/9, 465/10, 465/11, 465/12, 465/13, 465/14, 465/15 
00465/005  *APL                      DEXP UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.DEXP.U                    
            5.0T1  1119  APL.DEXP_UPDATE.UU.005             1 LINE     61    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:18:21
            5.0T3   113                       
0          SEE COMMENTS FOR (465/4). DEXP CHANGES: FIX OF BUG CAUSING OCCASIONAL WRONG
           SIGN OF VALUE RETURNED BY SQUARE ROOT. ASSEMBLE RESULT USING THE APL MACRO
           LIBRARY (465/3).
0          Referenced by comments of: 465/4 
00465/006  *APL                      DYIB UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.DYIB.U                    
            5.0T1  1120  APL.DYIB_UPDATE.UU.006             1 LINE     65    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:18:55
            5.0T3   114                       
0          SEE COMMENTS FOR (465/4). DYIB CHANGES: IMPLEMENTATION OF PRIVILEGED DYADIC
           OPERATIONS. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3).
00465/007  *APL                      IBAR UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.IBAR.U                    
            5.0T1  1121  APL.IBAR_UPDATE.UU.007             1 LINE     72    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:19:29
            5.0T3   115                       
0          SEE COMMENTS FOR (465/4). IBAR CHANGES: CHANGE TO RETRIEVAL METHOD FOR TIME
           OF DAY IBEAM. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  194
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00465/008  *APL                      OCTL UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.OCTL.U                    
            5.0T1  1122  APL.OCTL_UPDATE.UU.008             1 LINE     72    1 PAGE UM   HELFFRICH           FEB. 16, 1981  16:27:57
            5.0T3   116                       
0          SEE COMMENTS FOR (465/4). OCTL CHANGES: CHANGES FOR CATN. ASSEMBLE RESULT
           USING THE APL MACRO LIBRARY (465/3).
00465/009  *APL                      REDU UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.REDU.U                    
            5.0T1  1123  APL.REDU_UPDATE.UU.009             1 LINE     72    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:20:30
            5.0T3   117                       
0          SEE COMMENTS FOR (465/4). REDU CHANGES: YIELDS NONCE ERROR IF "SCAN"
           OPERATION IS ATTEMPTED. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3).
00465/010  *APL                      SLCT UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.SLCT.U                    
            5.0T1  1124  APL.SLCT_UPDATE.UU.010             1 LINE     72    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:21:01
            5.0T3   118                       
0          SEE COMMENTS FOR (465/4). SLCT CHANGES: RECOGNITION OF EXPANSION AND
           COMPRESSION ALONG FIRST DIMENSION SYMBOLS. ASSEMBLE RESULT USING THE APL
           MACRO LIBRARY (465/3).
00465/011  *APL                      TPIN UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.TPIN.U                    
            5.0T1  1125  APL.TPIN_UPDATE.UU.011             1 LINE     72   13 PAGE UM   HELFFRICH           FEB. 16, 1981  16:28:41
            5.0T3   119                       
0          SEE COMMENTS FOR (465/4). TPIN CHANGES: )SYMBOLS COMMAND IMPLEMENTED; BUG
           RELATING TO IGNORING OF INPUT AFTER ATTN INTERRUPT FIXED; CHANGES TO OBTAIN
           DATE DIFFERENTLY; )COPY AND )PCOPY ERROR REPORTING ADDED; )TIME COMMAND
           IMPLEMENTED. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3).
00465/012  *APL                      VECT UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.VECT.U                    
            5.0T1  1126  APL.VECT_UPDATE.UU.012             1 LINE     65    1 PAGE UM   HELFFRICH           MAR. 04, 1977  19:22:13
            5.0T3   120                       
0          SEE COMMENTS FOR (465/4). VECT CHANGES: CALLS ERROR$ RATHER THAN ERROR.
           ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3).
00465/013  *APL                      AGOR UPDATE     UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.AGOR.U                    
            5.0T1  1127  APL.AGOR_UPDATE.UU.013             1 LINE     72    1 PAGE UM   HELFFRICH           FEB. 16, 1981  16:26:42
            5.0T3   121                       
0          SEE COMMENTS FOR (465/4). AGOR CHANGES: IMPLEMENTS ")TIME" COMMAND. ASSEMBLE
           RESULT USING THE APL MACRO LIBRARY (465/3).
00465/014  *APL                      DPY UPDATE      UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.DPY.U                     
            5.0T1  1128  APL.DPY_UPDATE.UU.014              1 LINE     72    1 PAGE UM   HELFFRICH           AUG. 08, 1979  22:04:56
            5.0T3   122                       
0          SEE COMMENTS FOR (465/4). DPY CHANGES: LABELED STATEMENTS IN FUNCTION ARE
           DISPLAYED ONE COLUMN TO THE LEFT. ASSEMBLE USING THE APL MACRO LIBRARY
           (465/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  195
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00465/015  *APL                      ERR UPDATE      UU  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.ERR.U                     
            5.0T1  1129  APL.ERR_UPDATE.UU.015              1 LINE     72    1 PAGE UM   HELFFRICH           FEB. 16, 1981  16:27:02
            5.0T3   123                       
0          SEE COMMENTS FOR (465/4). ERR CHANGES: IMPLEMENTS ")TIME" COMMAND. ASSEMBLE
           RESULT USING THE APL MACRO LIBRARY (465/3).
0          Referenced by comments of: 465/4 
00465/016  *APL                      CATN            SA  G          S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.CATN                      
            5.0T1  1130  APL.CATN.SA.016                    1 LINE     92   10 PAGE UM   HELFFRICH           FEB. 16, 1981  13:06:10
            5.0T3   124                       
0          Rewrite of catenation processor to provide full catenation capabilities in
           APL/MTS. Copies OPSECT and APLDEFN from the APL macro library (465/3).
00465/017  *APL                      OBJECT          OC  G          S1558 5.0T1 VLO FSNAME=APL.OBJECT.OC.017(1)                 1131
            5.0T1  1131  APL.OBJECT.OC.017                  1 LINE  11465   39 PAGE UM   HELFFRICH           JULY 03, 1981  13:54:39
            5.0T3   125                       
0          APL OBJECT LOADED INTO SHARED VM BY PISTLE AT IPL.
0          Referenced by comments of: 465/18 
00465/018  *APL                      *APL            OC  G          S1558 5.0T1 VLO FSNAME=APL.*APL.OC.018(1)                   1132
            5.0T1  1132  APL.*APL.OC.018                    1 LINE     24    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:54:45
            5.0T3   126                       
0          CONTAINS 4 LOADER CARDS (RIP, COM, LCS, LDT) TO FORCE REFERENCE TO SHARED VM APL (465/17).
00466/001   ACTIVCNT/ASTATSUB                        SA  G          S1558 5.0T1 VLO FSNAME=ACTIVCNT/ASTATSUB..SA.001(1)         1134
            5.0T1  1134  ACTIVCNT/ASTATSUB..SA.001          1 LINE     80    1 PAGE UM   DWB                 JULY 03, 1981  13:54:52
            5.0T3   128                       
0          ACTIVCNT CONTAINS THE NUMBER OF USERS SIGNED ON AND ASTATSUB IS USED
           TO COMMUNICATE BETWEEN MTS AND THE STAT JOB.
00466/002   ACTIVCNT/ASTATSUB                        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   DWB                                        
0          Object part of Resident System (468).
00467/001   ENDSEG2                                  SA  G          S1558 5.0T1 VLO FSNAME=ENDSEG2..SA.001(1)                   1135
            5.0T1  1135  ENDSEG2..SA.001                    1 LINE     65    1 PAGE UM   MTA                 JULY 03, 1981  13:54:53
            5.0T3   129                       
0          ASSEMBLY TO MARK THE END OF THE IPLED PART OF SHARED VM.
00467/002   ENDSEG2                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  196
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00468/001A  RESIDENT SYSTEM          D5.1 SYS        D              *IPL.D5.1SYS                                                    
            5.1T3   333  RESIDENT_SYSTEM.D5.1_SYS.D.001     1 SEQ    4100  242 PAGE UM   MTS       BURLING   AUG. 20, 1983  19:42:17
                         *IPL.D5.1SYS         
0          RAMROD IPL file for the D5.1 MTS system (with dummy TABLES)
           distributed on the DUMP/RESTORE pack. This IPL file is also
           on the MTSUTL distribution tape.
0          Referenced by comments of: 1/3, 3/2, 4/2, 5/2, 6/2, 7/2, 8/2, 9/2, 10/3, 11/2, 13/3, 14/2, 16/2, 18/2, 19/2, 20/2,
                 21/2, 23/2, 24/2, 25/2, 40/3, 40/6, 42/3, 44/4, 45/3, 46/3, 49/2, 77/2, 78/2, 79/2, 79/4, 80/2, 126/2, 198/3,
                 243/2, 354/3, 399/2, 413/2, 413/4, 413/8, 463/2, 464/3, 466/2, 467/2, 482/3, 482/6, 482/9, 482/12, 482/15,
                 482/18, 482/21, 482/24, 482/27, 482/30, 482/33, 482/35, 482/38, 513/3, 531/3, 534/2, 539/3, 554/2, 572/2,
                 576/2, 577/2, 577/7, 578/3, 579/2, 579/5, 579/8, 586/3, 589/3, 589/7, 589/9, 591/2, 628/4, 634/2, 634/5,
                 635/3, 636/3, 637/3, 638/3, 639/3, 647/2, 650/2, 651/12, 651/15, 651/18, 708/3, 723/2, 731/2, 731/4, 732/3,
                 758/2, 759/2, 769/3, 769/6, 769/9, 769/12, 769/15, 769/18, 769/21, 769/24, 769/31, 777/2, 778/2, 787/7,
                 787/10, 787/18, 787/20, 803/2, 818/3, 819/2, 829/3, 834/8, 1012/3, 1023/2, 1027/2, 1058/17, 1070/2, 1081/3,
                 1081/10, 4000/3 
00468/002A  RESIDENT SYSTEM          D5.1 UM SYS     D              *IPL.D5.1SYS.511                                                
            5.1T3   334  RESIDENT_SYSTEM.D5.1_UM_S.D.002    1 SEQ    4100  237 PAGE UM   MTS       BURLING   AUG. 20, 1983  19:42:27
                         *IPL.0               
0          RAMROD IPL file for the D5.1 MTS system with the UM I/O
           configuration, but only the MTS511 disk pack. This is the "current"
           system on the D5.1 DUMP/RESTORE pack.
00468/003A  RESIDENT SYSTEM          UM RAMROD       D              MTS.:D5.1ROD                                                    
            5.1T3   335  RESIDENT_SYSTEM.UM_RAMROD.D.003    1 LINE  32767  514 PAGE UM   MTS       BURLING   AUG. 20, 1983  19:42:38
                         MTS.:ROD             
0          Current UM RAMROD file.
            
           The following procedures are used in maintaining this file. Whenever
           a new system is installed i.e., made "current", three things are done:
            
             1.   The name of the system installed is changed to the "model
                  number" of the date it is installed, e.g. "AY108" for May 10,
                  1978.
            
             2.   The system installed is made the current system.
            
             3.   The oldest system is deleted so that there are about five
                  systems, the current one and the four preceding.
            
           When someone wishes to change a component, but not install a new
           system, a new system called "NEWSYS" is created from the current
           system (if it doesn't already exist) and the desired changes made and
           noted using the ANNOTATE command. Then when the NEWSYS system is
           actually to be installed as the running system, the procedure
           above is followed.
            
           A test system can be created at any time with any name, but when the
           new components are ready to be installed, they should be put in
           "NEWSYS" and the test system destroyed.
1                                                                                               SUN SEP 08/96   15:24:55   Page  197
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This file contains some copyrighted material, which we have permission
           to redistribute to other MTS installations, with the understanding
           that this file shall not be distributed to any other third parties.
           Please help us honor our commitment.
00468/004A  RESIDENT SYSTEM          *IPL.1          D            # *IPL.1                                                          
                                                                                    UM   MTS       BURLING                          
                         *IPL.1@E             
0          First backup system object in form suitable for loading by the IPL
           Reader. Note: this file is empty on the test pack.
00468/005A  RESIDENT SYSTEM          *IPL.2          D            # *IPL.2                                                          
                                                                                    UM   MTS       BURLING                          
                         *IPL.2@E             
0          Second backup system object in form suitable for loading by the IPL
           Reader. Note: this file is empty on the test pack.
00468/006A  RESIDENT SYSTEM          *IPL.3          D            # *IPL.3                                                          
                                                                                    UM   MTS       BURLING                          
                         *IPL.3@E             
0          Third backup system object in form suitable for loading by the IPL
           Reader. Note: this file is empty on the test pack.
00468/007A  RESIDENT SYSTEM          WRITEUP         WF             DIST:RESSYS.WF                                                  
            5.1T3   336  RESIDENT_SYSTEM.WRITEUP.WF.007     1 LINE    154    5 PAGE UM   MTS       BURLING   AUG. 20, 1983  19:43:15
                         DIST:RESSYS.WF       
0          A writeup describing the structure of the system object decks.
00469/001   360/20 RJE SUPPORT PGM                   S            # (OBSOLETE)                                                      
            D2T1    094                                                             UM                                              
00470/001   PCB DSECT                COPY:PCBDSECT   SA  G          COPY:PCBDSECT                                                   
            5.0T1  1136  PCB_DSECT.COPY:PCBDSECT.SA.001     1 LINE     72    3 PAGE UM   MTA                 JULY 03, 1981  13:54:54
            5.0T3   130  COPY:PCBDSECT        
0          Dsect for the page control block. Copied by the supervisor, PDP, and CONFIG
           among others.
0          Referenced by comments of: 44/1, 45/1, 46/1, 400/1, 577/1 
00471/001   REX                                      SA           # (OBSOLETE)                                                      
            D3.2T1  303  REX.MONITOR.SA.01                  1 LINE     80   78 PAGE UM                       JULY 16, 1974  13:04:27
00472/001  *ST360                    MAIN PGM        SA  G          S1558 5.0T1 VLO FSNAME=ST360.MAIN_PGM.SA.001(1)             1137
            5.0T1  1137  ST360.MAIN_PGM.SA.001              1 SEQ      80   41 PAGE UM   MTA                 AUG. 01, 1973  18:40.02
            5.0T3   131                       
0          THE STUDENT VIRTUAL MACHINE SIMULATOR.  THE SIMULATED MACHINE HAS THE FOLLOWING CHARACTERISTICS:
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  198
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             1.  THE SYSTEM/360 UNIVERSAL INSTRUCTION SET
              2.  NO INTERVAL TIMER
              3.  NO MEMORY PROTECTION
              4.  32K BYTES OF STORAGE
              5.  AN I/O COMPLEMENT CONSISTING OF:
            
                      A. 1052 OPERATOR'S CONSOLE            ADDRESS 0009
                      B. 2540 CARD READER                   ADDRESS 000C
                      C. 2540 CARD PUNCH                    ADDRESS 000D
                      D. 1403 LINE PRINTER                  ADDRESS 000E
                      E. 2 2401 9-TRACK TAPE DRIVES         ADDRESSES 0180-0181
            
              6.  EXCEPT AT IPL, SELF-MODIFYING CCW'S ARE NOT ALLOWED
              7.  INSTANTANEOUS I/O
            
           NOTE:  THE STANDARD VIRTUAL MACHINE (558) NOW HAS AN ASSEMBLY PARAMETER
                  TO PRODUCE A STUDENT VERSION.
0          Referenced by comments of: 472/2, 4240/1 
00472/002  *ST360                    CCWTRANS SUBR   SA  G          S1558 5.0T1 VLO FSNAME=ST360.CCWTRANS_SUBR.SA.002(1)        1138
            5.0T1  1138  ST360.CCWTRANS_SUBR.SA.002         1 SEQ      80   12 PAGE UM   MTA                 AUG. 01, 1973  18:49.51
            5.0T3   132                       
0          SUBROUTINE CALLED BY (472/1) TO TRANSLATE CCW LISTS. UNCHANGED SINCE DIST
           2.0.
00472/003  *ST360                    OBJECT          OE  G          *ST360                                                          
            5.0T1  1139  ST360.OBJECT.OE.003                1 SEQ    8720    5 PAGE UM   MTA                 JULY 03, 1981  13:55:01
            5.0T3   133  *ST360               
00473/001  *1130ASM                  CCD             SA             S1558 5.0T1 VLO FSNAME=1130ASM.CCD.SA.001(1)                1140
            5.0T1  1140  1130ASM.CCD.SA.001                 1 SEQ      80   48 PAGE UM                       AUG. 01, 1973  18:51.47
            5.0T3   134                       
0          IBM ASSEMBLER FOR THE IBM 1130 AND IBM 1800 COMPUTERS.  THIS VERSION HAS BEEN MODIFIED TO RUN IN MTS.
           THIS THING APPEARS TO CONSIST OF 4 ASSEMBLIES AND 1 COPY SECTION.  THE QUESTION IS WHICH IS WHICH.
           WE SUGGEST THAT THE FIRST MAY BE THE COPY SECTION, BUT WE'RE NOT SURE.
00473/002  *1130ASM                  M0              SA             S1558 5.0T1 VLO FSNAME=1130ASM.M0.SA.002(1)                 1141
            5.0T1  1141  1130ASM.M0.SA.002                  1 SEQ      80    2 PAGE UM                       AUG. 01, 1973  18:51.57
            5.0T3   135                       
00473/003  *1130ASM                  M12             SA             S1558 5.0T1 VLO FSNAME=1130ASM.M12.SA.003(1)                1142
            5.0T1  1142  1130ASM.M12.SA.003                 1 SEQ      80   74 PAGE UM                       AUG. 01, 1973  18:52.43
            5.0T3   136                       
00473/004  *1130ASM                  M3              SA             S1558 5.0T1 VLO FSNAME=1130ASM.M3.SA.004(1)                 1143
            5.0T1  1143  1130ASM.M3.SA.004                  1 SEQ      80   89 PAGE UM                       AUG. 01, 1973  18:53.47
            5.0T3   137                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  199
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00473/005  *1130ASM                  M4              SA             S1558 5.0T1 VLO FSNAME=1130ASM.M4.SA.005(1)                 1144
            5.0T1  1144  1130ASM.M4.SA.005                  1 SEQ      80   25 PAGE UM                       AUG. 01, 1973  18:54.12
            5.0T3   138                       
00473/006  *1130ASM                  OBJECT          OC             *1130ASM                                                        
            5.0T1  1145  1130ASM.OBJECT.OC.006              1 SEQ      80   18 PAGE UM                       JULY 03, 1981  13:55:09
            5.0T3   139  *1130ASM             
00475/001   OS SIMULATION PACKAGE                    S            # (OBSOLETE)                                                      
            D2T1    284                                                             UM                                              
00476/001   DBS:MSG                                  S            # (OBSOLETE)                                                      
            D2T1    441                                                             UM                                              
00480/001   APF                                      SA           # (OBSOLETE)                                                      
            D2T1    329                                                             UM                                              
00481/001   FILE SAVE - OLD VERSION                  O            # (OBSOLETE)                                                      
            D2T1    001                                                             UM                                              
00482/001   FILE SYSTEM              MOVE            SA  G          FILE:MOVE(*F,-1)                                                
            5.0T1  1146  FILE_SYSTEM.MOVE.SA.001            1 LINE     72    3 PAGE UM   HELFFRICH           JULY 03, 1981  13:55:11
            5.0T3   140                       
0          Subroutine to move core around.  Copies *CNFGINFODSECT (654).
00482/002A  FILE SYSTEM              MOVE            UC  G          FILE:MOVE(1000)                                                 
            5.1T1   326  FILE_SYSTEM.MOVE.UC.002            1 LINE     72    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:08
                         FILE:MOVE            
00482/003A  FILE SYSTEM              MOVE            OC  G        # (PART OF RESIDENT SYSTEM)                                       
            4.3AT1  133  FILE_SYSTEM.MOVE.OC.003            1 LINE     80    1 PAGE UM   HELFFRICH           OCT. 12, 1980  15:44:10
0          Object part of Resident System (468).
0          Referenced by comments of: 482/50 
00482/004   FILE SYSTEM              VOLGET          SA  G          FILE:VOLGET(*F,-1)                                              
            5.0T1  1148  FILE_SYSTEM.VOLGET.SA.004          1 LINE     80   23 PAGE UM   HELFFRICH           JULY 03, 1981  13:55:13
            5.0T3   142                       
0          Subroutine to acquire disk drive before doing I/O. Assemble with
           COPY:FILE.MACROS (482/45) and COPY:DM.MACROS (769/29). Copies COPY:GLOBALS
           (1026/3) and COPY:LLMPSEQU (087).
0          Referenced by comments of: 73/3, 534/3 
00482/005A  FILE SYSTEM              VOLGET          UC  G          FILE:VOLGET(1000)                                               
            5.1T1   327  FILE_SYSTEM.VOLGET.UC.005          1 LINE     68    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:09
                         FILE:VOLGET          
1                                                                                               SUN SEP 08/96   15:24:55   Page  200
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00482/006A  FILE SYSTEM              VOLGET          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/007   FILE SYSTEM              TRAK            SA  G          FILE:TRAK(-10000,-1)                                            
            5.0T1  1150  FILE_SYSTEM.TRAK.SA.007            1 LINE     80   25 PAGE UM   HELFFRICH           JULY 03, 1981  13:55:24
            5.0T3   144                       
0          BASIC SUBROUTINES TO HANDLE FILE BUFFERING AND WRITE THE DISK, OR TALK TO THE DISK 
           MANAGER (769) COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). ASSEMBLE WITH
           COPY:FILE.MACROS(482/45), COPY:SETPARM (653), AND COPY:DM.MACROS (769/29).
            
           NOTE:  THIS PROGRAM USES SOFTWARE COMMAND CHAINING FOR 2314'S AND 2311'S.
0          Referenced by comments of: 482/61 
00482/008A  FILE SYSTEM              TRAK            UC  G          FILE:TRAK(1000)                                                 
            5.1T1   328  FILE_SYSTEM.TRAK.UC.008            1 LINE     73    2 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:10
                         FILE:TRAK            
00482/009A  FILE SYSTEM              TRAK            OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/010   FILE SYSTEM              READI           SA  G          FILE:READI(*F,-1)                                               
            5.0T1  1152  FILE_SYSTEM.READI.SA.010           1 LINE     80    6 PAGE UM   HELFFRICH           JULY 03, 1981  13:55:35
            5.0T3   146                       
0          SUBROUTINE TO READ FROM A LINE FILE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/011A  FILE SYSTEM              READI           UC  G          FILE:READI(1000)                                                
            5.1T1   329  FILE_SYSTEM.READI.UC.011           1 LINE     68    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:11
                         FILE:READI           
00482/012A  FILE SYSTEM              READI           OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/013   FILE SYSTEM              WRITEI          SA  G          FILE:WRITEI(*F,-1)                                              
            5.0T1  1154  FILE_SYSTEM.WRITEI.SA.013          1 LINE     79   34 PAGE UM   HELFFRICH           JULY 03, 1981  13:55:37
            5.0T3   148                       
0          SUBROUTINE TO WRITE LINE FILES. ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/014A  FILE SYSTEM              WRITEI          UC  G          FILE:WRITEI(1000)                                               
            5.1T1   330  FILE_SYSTEM.WRITEI.UC.014          1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:11
                         FILE:WRITEI          
1                                                                                               SUN SEP 08/96   15:24:55   Page  201
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00482/015A  FILE SYSTEM              WRITEI          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/016   FILE SYSTEM              READL           SA  G          FILE:READL(*F,-1)                                               
            5.0T1  1156  FILE_SYSTEM.READL.SA.016           1 LINE     78   10 PAGE UM   HELFFRICH           JULY 03, 1981  13:55:53
            5.0T3   150                       
0          BASE SOURCE FOR SUBROUTINE TO FIND THE FIRST OR LAST LINE NUMBER IN A FILE.
           ALSO CONTAINS SUBROUTINES TO RENUMBER, COUNT, RETURN, AND SET LINES IN A LINE FILE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/017A  FILE SYSTEM              READL           UC  G          FILE:READL(1000)                                                
            5.1T1   331  FILE_SYSTEM.READL.UC.017           1 LINE     68    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:12
                         FILE:READL           
00482/018A  FILE SYSTEM              READL           OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/019   FILE SYSTEM              OPEN            SA  G          FILE:OPEN(-10000,-1)                                            
            5.0T1  1158  FILE_SYSTEM.OPEN.SA.019            1 LINE     80   52 PAGE UM   HELFFRICH           AUG. 05, 1981  02:34:27
            5.0T3   152                       
0          SUBROUTINES TO OPEN, CLOSE, CREATE, DESTROY, EMPTY, RENAME, AND TRUNCATE FILES.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/020   FILE SYSTEM              OPEN            UC  G          FILE:OPEN(1000)                                                 
            5.0T1  1159  FILE_SYSTEM.OPEN.UC.020            1 LINE    106   13 PAGE UM   HELFFRICH           AUG. 05, 1981  02:34:36
            5.0T3   153  FILE:OPEN            
00482/021   FILE SYSTEM              OPEN            OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/022   FILE SYSTEM              GETDSK          SA  G          FILE:GETDSK(-10000,-1)                                          
            5.0T1  1160  FILE_SYSTEM.GETDSK.SA.022          1 LINE     80   22 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:12
            5.0T3   154                       
0          SUBROUTINES TO ALLOCATE AND RELEASE DISK SPACE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/023   FILE SYSTEM              GETDSK          UC  G          FILE:GETDSK(1000)                                               
            5.0T1  1161  FILE_SYSTEM.GETDSK.UC.023          1 LINE     82    4 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:17
            5.0T3   155  FILE:GETDSK          
00482/024   FILE SYSTEM              GETDSK          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  202
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00482/025   FILE SYSTEM              FLINE           SA  G          FILE:FLINE(-10000,-1)                                           
            5.0T1  1162  FILE_SYSTEM.FLINE.SA.025           1 LINE     80    6 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:19
            5.0T3   156                       
0          SUBROUTINE TO SEARCH THE LINE DIRECTORY OF A LINE FILE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/026   FILE SYSTEM              FLINE           UC  G          FILE:FLINE(1000)                                                
            5.0T1  1163  FILE_SYSTEM.FLINE.UC.026           1 LINE     70    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:20
            5.0T3   157  FILE:FLINE           
00482/027   FILE SYSTEM              FLINE           OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/028   FILE SYSTEM              CATALOG         SA  G          FILE:CATALOG(*F,-1)                                             
            5.0T1  1164  FILE_SYSTEM.CATALOG.SA.028         1 LINE     80   65 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:21
            5.0T3   158                       
0          SUBROUTINES WHICH MAINTAIN THE CATALOG OF FILES.
           ASSEMBLE USING COPY:FILE.MACROS (482/45), (724/4), and (546/3).
00482/029A  FILE SYSTEM              CATALOG         UC  G          FILE:CATALOG(1000)                                              
            5.1T1   332  FILE_SYSTEM.CATALOG.UC.029         1 LINE     68    3 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:13
                         FILE:CATALOG         
00482/030A  FILE SYSTEM              CATALOG         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/031   FILE SYSTEM              RWSEQ           SA  G          FILE:RWSEQ(-10000,-1)                                           
            5.0T1  1166  FILE_SYSTEM.RWSEQ.SA.031           1 LINE     72   15 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:52
            5.0T3   160                       
0          SUBROUTINES TO READ AND WRITE SEQUENTIAL FILES.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/032   FILE SYSTEM              RWSEQ           UC  G          FILE:RWSEQ(1000)                                                
            5.0T1  1167  FILE_SYSTEM.RWSEQ.UC.032           1 LINE     68    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:54
            5.0T3   161  FILE:RWSEQ           
00482/033   FILE SYSTEM              RWSEQ           OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/034   FILE SYSTEM              TABLRTN         SA  G          FILE:TABLRTN                                                    
            5.0T1  1168  FILE_SYSTEM.TABLRTN.SA.034         1 LINE     78   31 PAGE UM   HELFFRICH           JULY 03, 1981  13:56:55
            5.0T3   162  FILE:TABLRTN         
0          SUBROUTINES TO MAINTAIN SYSTEM-WIDE SHARED FILE TABLE.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
1                                                                                               SUN SEP 08/96   15:24:55   Page  203
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ASSEMBLE STARTING AT LINE 1.
0          Referenced by comments of: 400/12, 482/50, 534/3 
00482/035   FILE SYSTEM              TABLRTN         OC  G          FILE:TABLRTN.O                                                  
            5.0T1  1169  FILE_SYSTEM.TABLRTN.OC.035         1 LINE     80   24 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:13
            5.0T3   163  FILE:TABLRTN.O       
0          OBJECT ALSO PART OF THE RESIDENT SYSTEM (468).
00482/036   FILE SYSTEM              GETFINF         SA  G          FILE:GETFINF(-10000,-1)                                         
            5.0T1  1170  FILE_SYSTEM.GETFINF.SA.036         1 LINE     80    8 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:15
            5.0T3   164                       
0          SUBROUTINE TO RETURN INFORMATION ABOUT A FILE.  CALLED BY MTS SUBROUTINE "GFINFO" (PART OF RSF).
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/037   FILE SYSTEM              GETFINF         UC  G          FILE:GETFINF(1000)                                              
            5.0T1  1171  FILE_SYSTEM.GETFINF.UC.037         1 LINE     68    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:17
            5.0T3   165  FILE:GETFINF         
00482/038   FILE SYSTEM              GETFINF         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00482/039   FILE SYSTEM              TEST DSACC      SA  G          FILE:DSACC(1,999)                                               
            5.0T1  1172  FILE_SYSTEM.TEST_DSACC.SA.039      1 LINE     41    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:18
            5.0T3   166  FILE:DSACC           
0          SPECIAL NOP VERSION OF DSACC FOR USE IN TESTING FILE ROUTINES.
0          Referenced by comments of: 482/46, 682/38 
00482/040   FILE SYSTEM              TEST DSACC      OC  G          FILE:DSACC(1000)                                                
            5.0T1  1173  FILE_SYSTEM.TEST_DSACC.OC.040      1 LINE     80    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:18
            5.0T3   167                       
00482/041A  FILE SYSTEM              FSTEST          SA  G          FILE:FSTEST(1005)                                               
            5.1T1   333  FILE_SYSTEM.FSTEST.SA.041          1 LINE     72   13 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:15
                         FILE:FSTEST          
0          File system test program.  Assemble using COPY:FILE.MACROS (482/45) and *SYSMAC.
           Uses many symbols in SYSDEFS unless loaded with private copies of file routines.
            
           ********************************************************************************
           D5.0A version:
            
           Added DDUMP command to dump file directory pages in sequence.
           ********************************************************************************
0          Referenced by comments of: 682/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  204
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00482/042A  FILE SYSTEM              FSTEST          OC  G          FILE:FSTEST(1,1004.999)                                         
            5.1T1   334  FILE_SYSTEM.FSTEST.OC.042          1 LINE     80    6 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:16
00482/043   FILE SYSTEM              FILE.MACROS     SM  G          FILE:MACROS(-10000,0)                                           
            5.0T1  1176  FILE_SYSTEM.FILE.MACROS.SM.043     1 LINE     80   10 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:26
            5.0T3   170                       
0          BASE SOURCE FOR THE FILE SYSTEM MACRO LIBRARY.
0          Referenced by comments of: 482/44 
00482/044A  FILE SYSTEM              FILE.MACROS     UC  G          FILE:MACROS(1000)                                               
            5.1T1   335  FILE_SYSTEM.FILE.MACROS.UC.044     1 LINE     69    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:16
                         FILE:MACROS          
0          Update to be applied to (482/43) to yield current macro source
           (482/45).
00482/045A  FILE SYSTEM              FILE.MACROS     SM  G          COPY:FILE.MACROS                                                
            5.1T1   336  FILE_SYSTEM.FILE.MACROS.SM.045     1 LINE     72   10 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:17
                         COPY:FILE.MACROS     
0          MACRO LIBRARY USED TO ASSEMBLE THE FILE SYSTEM AND RELATED ROUTINES.
0          Referenced by comments of: 4/1, 4/5, 67/10, 67/11, 67/23, 73/3, 92/3, 97/8, 104/131, 104/135, 400/11, 400/12,
                 442/1, 482/4, 482/10, 482/13, 482/16, 482/19, 482/22, 482/25, 482/28, 482/31, 482/34, 482/36, 482/41, 482/44,
                 482/50, 482/52, 482/61, 502/1, 502/8, 509/1, 540/17, 546/1, 554/1, 554/3, 578/1, 598/1, 599/1, 621/2, 629/4,
                 671/3, 682/18, 682/21, 682/24, 682/26, 682/28, 682/30, 682/32, 682/41, 682/43, 682/46, 724/1, 769/1, 769/4,
                 769/7, 769/10, 769/13, 769/16, 769/19, 769/22, 769/30, 790/2, 790/4, 790/5, 790/7, 818/1, 1020/1, 1021/1,
                 1021/4, 1021/7, 1030/1, 1041/5, 1041/12, 1079/18, 3024/38 
00482/046A  FILE SYSTEM              TEST FILERTNS   OC  G          FILE:FILERTNS                                                   
            5.1T3   337  FILE_SYSTEM.TEST_FILERTNS.OC.046   1 LINE     38    1 PAGE UM   HELFFRICH           AUG. 20, 1983  19:45:20
                         FILE:FILERTNS        
0          A SERIES OF $CONTINUE WITHS TO PICK UP THE VARIOUS FILE SYSTEM OBJECT DECKS,
           A TEST VERSION OF TABLES (482/48), AND A TEST VERSION OF DSACC (482/39).
0          Referenced by comments of: 482/48 
00482/047C  FILE SYSTEM              TEST FILERTNS   OC  G          FILE:FILERTNS.REA                                               
            5.1T1   337  FILE_SYSTEM.TEST_FILERTNS.OC.047   1 LINE     38    1 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:17
                         FILE:FILERTNS.REA    
0          Real file routines which are handy when you're on the test pack.
00482/048   FILE SYSTEM              TEST TABLES     SA  G          FILE:TABLES.TEST(1000)                                          
            5.0T1  1180  FILE_SYSTEM.TEST_TABLES.SA.047     1 LINE     56    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:31
            5.0T3   174                       
0          A CUT-DOWN VERSION OF TABLES (004) CONTAINING ONLY A DEVICE LIST WITH TWO
           DISKS, D340 AND D350, A DSKTAB WITH ONLY ONE PACK, AND CATALOG ROOT ENTRIES.
           USED WITH THE TEST VERSION OF THE FILE ROUTINES (482/46).
1                                                                                               SUN SEP 08/96   15:24:55   Page  205
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 482/46 
00482/049   FILE SYSTEM              TEST TABLES     OC  G          FILE:TABLES.TEST(1,998)                                         
            5.0T1  1181  FILE_SYSTEM.TEST_TABLES.OC.048     1 LINE     80    2 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:32
            5.0T3   175  FILE:TABLES.TEST     
00482/050   FILE SYSTEM              TABLRTN TEST    SA  G          FILE:TABLTST                                                    
            5.0T1  1182  FILE_SYSTEM.TABLRTN_TEST.SA.049    1 LINE     72   14 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:33
            5.0T3   176  FILE:TABLTST         
0          PROGRAM TO TEST THE SHARED FILE TABLE ROUTINES TABLRTN (482/34).
           TO USE THIS, THE SHARED FILE TABLE ROUTINES MUST BE RE-ASSEMBLED STARTING AT
           LINE 0, SO THAT ALL SVC'S ARE REPLACED WITH SUBROUTINE CALLS TO ENTRY POINTS IN
           THIS TABLE TEST PROGRAM.  THE COMMANDS ACCEPTED BY THIS PROGRAM ARE DOCUMENTED IN THE
           SOURCE.  THIS PROGRAM SHOULD BE ASSEMBLED USING *SYSMAC AND COPY:FILE.MACROS (482/45).
           THIS PROGRAM REQUIRES A COPY OF MOVE (482/3) IN ORDER TO LOAD PROPERLY.
00482/051   FILE SYSTEM              TABLRTN TEST    OC  G          FILE:TABLTST.O                                                  
            5.0T1  1183  FILE_SYSTEM.TABLRTN_TEST.OC.050    1 LINE     80    5 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:35
            5.0T3   177  FILE:TABLTST.O       
00482/052   FILE SYSTEM              CATALOG SCAN    SA  G          FILE:CATSCAN(1000)                                              
            5.0T1  1184  FILE_SYSTEM.CATALOG_SCAN.SA.051    1 LINE     70    9 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:36
            5.0T3   178  FILE:CATSCAN         
0          A PROGRAM WHICH GOES THROUGH THE CATALOG BY USER ID AND GATHERS INFORMATION OF INTEREST,
           E.G., THE NUMBER OF FILES WITH SPECIFIC SHARING DESCRIPTORS, ETC.  IT TAKES A LONG TIME
           TO RUN.  ASSEMBLE USING COPY:FILE.MACROS (482/45).
00482/053   FILE SYSTEM              CATALOG SCAN    OC  G          FILE:CATSCAN(1,999)                                             
            5.0T1  1185  FILE_SYSTEM.CATALOG_SCAN.OC.052    1 LINE     80    7 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:39
            5.0T3   179                       
00482/054   FILE SYSTEM              DOCUMENTATION   WF             S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DOCUMENTATION.WF.053(1)  1186
            5.0T1  1186  FILE_SYSTEM.DOCUMENTATION.WF.053   1 LINE    190   63 PAGE UM   HELFFRICH           DEC. 10, 1976  17:23:53
            5.0T3   180                       
0          FORMAT INPUT FOR THE MTS FILE SYSTEM INTERNAL DOCUMENTATION. THE FORMAT
           OUTPUT SHOULD BE RUN THROUGH THE INDEX PROGRAM (482/55) TO PRODUCE AN INDEX
           FOR THE FRONT OF THIS WRITEUP. COMPONENT (482/56) CONTAINS COMMANDS TO DO
           THIS. SEE ALSO COMP (682/1) FOR ADDITIONAL DOCUMENTATION RELATED TO THE FILE
           SYSTEM.
0          Referenced by comments of: 482/56, 482/59 
00482/055   FILE SYSTEM              INDEX           SS  G          S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.INDEX.SS.054(1)          1187
            5.0T1  1187  FILE_SYSTEM.INDEX.SS.054           1 LINE     68    1 PAGE UM   HELFFRICH           DEC. 10, 1976  17:24:07
            5.0T3   181                       
0          SNOBOL PROGRAM TO PRODUCE A TABLE OF CONTENTS FOR THE FILE SYSTEM INTERNAL DOCUMENTATION.
0          Referenced by comments of: 482/54, 482/56 
1                                                                                               SUN SEP 08/96   15:24:55   Page  206
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00482/056   FILE SYSTEM              DOC CMDS        C              S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DOC_CMDS.C.055(1)        1188
            5.0T1  1188  FILE_SYSTEM.DOC_CMDS.C.055         1 LINE     65    1 PAGE UM   HELFFRICH           DEC. 10, 1976  17:24:15
            5.0T3   182                       
0          A COMMAND FILE TO PRODUCE THE COMPLETE FILE SYSTEM INTERNAL DOCUMENTATION.
           IT REFERENCES THE FORMAT INPUT (482/54) AND THE INDEX PROGRAM (482/55).
0          Referenced by comments of: 482/54 
00482/057   FILE SYSTEM              DSECTLIST1      SS  G          S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DSECTLIST1.SS.056(1)     1189
            5.0T1  1189  FILE_SYSTEM.DSECTLIST1.SS.056      1 LINE     53    1 PAGE UM   HELFFRICH           JULY 27, 1977  03:56:53
            5.0T3   183                       
0          This SNOBOL program and DSECTLIST2 (482/58) are used to convert an assembly
           language DSECT into format input which includes symbol values for inclusion
           in a writeup.
0          Referenced by comments of: 482/58, 482/59 
00482/058   FILE SYSTEM              DSECTLIST2      SS  G          S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DSECTLIST2.SS.057(1)     1190
            5.0T1  1190  FILE_SYSTEM.DSECTLIST2.SS.057      1 LINE     63    1 PAGE UM   HELFFRICH           JULY 27, 1977  03:56:55
            5.0T3   184                       
0          The SPUNCH output from (482/57) should be run through this program, the
           SPUNCH output from this program then being *FORMAT input.
0          Referenced by comments of: 482/57, 482/59 
00482/059   FILE SYSTEM              DSECTLIST CMDS  C              S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DSECTLIST_CMD.C.058(1)   1191
            5.0T1  1191  FILE_SYSTEM.DSECTLIST_CMD.C.058    1 LINE     71    1 PAGE UM   HELFFRICH           JULY 27, 1977  03:56:57
            5.0T3   185                       
0          This command file will run the DSECTLIST programs (482/57) and (482/58) and
           slightly edit the output for each of the file system DSECTS: FCBEQU, BCBEQU,
           CATEQU, DSKDSCT, DSCBDSCT, PATEQU, ICEQU, and FDUBDSECT. The resulting output
           is included as part of (482/54).
00482/060A  FILE SYSTEM              SCRATCH SIZES   C              FILE:SCRATCHSIZES(1)                                            
            5.1T1   338  FILE_SYSTEM.SCRATCH_SIZES.C.060    1 LINE     75    3 PAGE UM   HELFFRICH           JULY 23, 1983  10:46:17
                         FILE:SCRATCHSIZES    
0          A SOURCE FILE TO GENERATE A LIST OF HOW MUCH SCRATCH AREA SPACE EACH FILE
           ROUTINE SUBROUTINE NEEDS.  THE FILE CONTAINS THE NECESSARY COMMANDS TO INVOKE
           THE ASSEMBLER, THE ASSEMBLER MACROS WHICH DO THE DIRTY WORK, AND THE DATA UPON
           WHICH THE MACROS WORK. 
           THE COMMANDS ARE DEPENDENT UPON THE FILE NAME WHICH CONTAINS THEM.
00482/061   FILE SYSTEM              TRAKSTAT        SA  O          FILE:TRAKSTAT(1000)                                             
            5.0T1  1193  FILE_SYSTEM.TRAKSTAT.SA.060        1 LINE     72    7 PAGE UM   HELFFRICH           JULY 03, 1981  13:57:54
            5.0T3   187  FILE:TRAKSTAT        
0          PROGRAM TO DISPLAY HISTOGRAMS, PREFERABLY ON A 3270 DEVICE, OF CURRENT DISK
           ACTIVITY IN VARIOUS CATEGORIES:  LINE DIRECTORY, DATA, CATALOG, PAT, AND
           DSCB. TAKES THE FOLLOWING PAR FIELD PARAMETERS:
1                                                                                               SUN SEP 08/96   15:24:55   Page  207
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
                      NOHIST         TO SUPPRESS HISTOGRAMS
                      NOCLEAR        TO SUPPRESS CLEARING OF CUMULATIVE I/O
                                     COUNTS
                      DT= NS|NM|NH¬  TO DEFINE SAMPLE INTERVAL
                      RESET= NO|YES¬ TO RESET SWITCH IN TRAK (482/7) WHICH
                                     TRIGGERS STATISTICS COLLECTION
            
           DEFAULT PARAMETERS ARE DT=15S, RESET=YES.  COPIES COPY:FILE.MACROS (482/45)
           AND COPY:MTS.MACROS (344/3).
00482/062   FILE SYSTEM              TRAKSTAT        OC  O          FILE:TRAKSTAT(1,999)                                            
            5.0T1  1194  FILE_SYSTEM.TRAKSTAT.OC.061        1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  13:58:01
            5.0T3   188                       
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00482/063   FILE SYSTEM              TRAKSTATAREA    SA  O          FILE:TRAKSTATAREA(1000)                                         
            5.0T1  1195  FILE_SYSTEM.TRAKSTATAREA.SA.062    1 LINE     62    1 PAGE UM   HELFFRICH           JULY 03, 1981  13:58:04
            5.0T3   189  FILE:TRAKSTATAREA    
0          THIS REGION MUST BE PISTLED WITH THE "ALIGN" OPTION BEFORE FILE SYSTEM
           STATISTICS MAY BE GENERATED. THE FIRST WORD OF THIS REGION IS A COUNT
           RELATING TO HOW MANY PUBLIC VOLUMES THERE ARE FOR WHICH STATISTICS MAY BE
           ACCUMULATED.
00482/064   FILE SYSTEM              TRAKSTATAREA    OC  O          FILE:TRAKSTATAREA(1,999)                                        
            5.0T1  1196  FILE_SYSTEM.TRAKSTATAREA.OC.063    1 LINE     80    2 PAGE UM   HELFFRICH           JULY 03, 1981  13:58:05
            5.0T3   190                       
00482/065C  FILE SYSTEM              PLUS LIBRARY    SQ  G          COPY:FILE*SQL                                                   
            5.1T1   339  FILE_SYSTEM.PLUS_LIBRARY.SQ.065    1 LINE     80   13 PAGE UBC  WHALEY    BURLING   JULY 23, 1983  10:46:18
                         COPY:FILE*SQL        
0          PLUS source library for various file system declarations.
            
           ********************************************************************
           D5.1 version:
            
           This is the current UM library.
           ********************************************************************
0          Referenced by comments of: 67/1, 67/3, 67/5, 67/7, 482/67, 482/69, 509/10, 509/14, 821/1, 843/1, 851/1, 852/1,
                 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1086/1 
00482/066C  FILE SYSTEM              PLUS LIBRARY    SQ  G          FILE:FILE#SQL                                                   
            5.1T1   340  FILE_SYSTEM.PLUS_LIBRARY.SQ.066    1 LINE     80   13 PAGE UBC  WHALEY    BURLING   JULY 23, 1983  10:46:18
0          ********************************************************************
           D5.1 version:
            
           This is the base source as distributed with the first Resource
           Manager distribution.
           ********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  208
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 482/67 
00482/067C  FILE SYSTEM              PLUS LIBRARY    UC  G          FILE:FILE*UQL                                                   
            5.1T1   341  FILE_SYSTEM.PLUS_LIBRARY.UC.067    1 LINE     65    1 PAGE UM   BURLING             JULY 23, 1983  10:46:19
0          These are the updates that were used to produce the current UM library
           (482/65) from (482/66).
00482/068C  FILE SYSTEM              PLUS INTERFACE  SA  G          FILE:FINT*SA                                                    
            5.1T1   342  FILE_SYSTEM.PLUS_INTERFAC.SA.068   1 LINE     85    5 PAGE UBC  WHALEY    BURLING   JULY 23, 1983  10:46:19
                         FILE:FINT*SA         
0          Assembler source for assembler part of PLUS (and CC) callable
           interface to various file routines. This does not take advantage
           of the PLUS version 23 linkage features.
00482/069C  FILE SYSTEM              PLUS INTERFACE  SQ  G          FILE:FINT*SQ                                                    
            5.1T1   343  FILE_SYSTEM.PLUS_INTERFAC.SQ.069   1 LINE     68    3 PAGE UBC  WHALEY    BURLING   JULY 23, 1983  10:46:19
                         FILE:FINT*SQ         
0          PLUS portion of PLUS interface to file routines.
            
           Requires the following PLUS source libraries:
            
             COPY:FILE*SQL   (482/65)
             *PLUS.SOURCELIB (1042/5)
00482/070C  FILE SYSTEM              PLUS INTERFACE  OL  G          FILE:FINT*OL                                                    
            5.1T1   344  FILE_SYSTEM.PLUS_INTERFAC.OL.070   1 LINE    380    4 PAGE UBC  WHALEY    BURLING   JULY 23, 1983  10:46:19
                         FILE:FINT*OL         
0          Object library for PLUS interface to file routines.
0          Referenced by comments of: 67/2, 67/4, 67/6 
00483/001  *WATFIV                   UPDATE          UU  G          W159:WAT5.SGEN                                                  
            5.0T1  1197  WATFIV.UPDATE.UU.001               1 LINE     80   31 PAGE UM   SHERRY              JULY 03, 1981  13:58:06
            5.0T3   191                       
0          The WATFIV update deck (483/1) is organized (by line number) as follows:
            
               LINE NUMBERS        FILE #    NAME
            
                2000,2999           *2*      ACCT
                9000,9999           *9*      ARITH
                11000,11999         *11*     CDEFN
                17000,17999         *17*     COMMR
                34000,34999         *34*     DODO
                42000,42999         *42*     ERROR
                44000,44999         *44*     ERRTEXTS
                46000,46999         *46*     EXTRN
                49000,49999         *49*     FORMAT
                50000,50999         *50*     FORMCONV
                51000,51999         *51*     FRIOSCAN
1                                                                                               SUN SEP 08/96   15:24:55   Page  209
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0               53000,53999         *53*     FUNCTION
                55000,55999         *55*     IBCOM#
                58000,58999         *58*     INOUT
                60000,60999         *60*     LANDR
                61000,61999         *61*     MAIN
                66000,66999         *66*     NAMELIST
                68000,68999         *68*     OPTIONS
                71000,71999         *71*     SCAN
                75000,75999         *75*     SPEX
                76000,76999         *76*     STARTA
                77000,77999         *77*     STARTB
                78000,78999         *78*     STOP#
                79000,79999         *79*     SYS
                84000,84999         *84*     WATIO
                85000,85999         *85*     WATLOAD
                86000,86999         *86*     ZMONTH
            
           Line numbers in this file are important.
           This component should be restored to a file named WAT5.SGEN since the command
           file (483/7) has numerous references to this file.
0          Referenced by comments of: 483/1, 483/7 
00483/002  *WATFIV                   FIOCS           SA  G          W159:WAT5.FIOCS.S                                               
            5.0T1  1198  WATFIV.FIOCS.SA.002                1 LINE     80   15 PAGE UM   SHERRY              JULY 03, 1981  13:58:10
            5.0T3   192                       
0          ASSEMBLE USING *SYSMAC + 2 MACRO LIBRARIES FROM WATERLOO.
0          Referenced by comments of: 483/8 
00483/003  *WATFIV                   DIOCS           SA  G          S1558 5.0T1 VLO FSNAME=WATFIV.DIOCS.SA.003(1)               1199
            5.0T1  1199  WATFIV.DIOCS.SA.003                1 LINE     80    3 PAGE UM   SHERRY              JULY 27, 1977  03:57:08
            5.0T3   193                       
0          ASSEMBLE USING *SYSMAC + 2 MACRO LIBRARIES FROM WATERLOO.
0          Referenced by comments of: 483/8 
00483/004  *WATFIV                   DEFAULT         SA  G          W159:WAT5.DFALT.S                                               
            5.0T1  1200  WATFIV.DEFAULT.SA.004              1 LINE     71    2 PAGE UM   SHERRY              JULY 03, 1981  13:58:14
            5.0T3   194                       
0          SUBROUTINE TO RETURN MTS PAGE AND TIME ESTIMATES TO SET UP DEFAULTS INTERNAL TO THE COMPILER.
           ASSEMBLE USING *SYSMAC.
           NOTE:  THIS ROUTINE IS ALSO USED BY ALGOLW (COMPONENT 528) AND PLC (COMPONENT 485).
0          Referenced by comments of: 483/8 
00483/005  *WATFIV                   OBJECT          OE  G        # *WATFIV                                                         
                                                                                    UM   SHERRY                                     
                         *WATFIV@UM           
0          NOTE:  BECAUSE OF WATERLOO RESTRICTIONS, THE WATFIV OBJECT CANNOT BE DISTRIBUTED.
1                                                                                               SUN SEP 08/96   15:24:55   Page  210
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00483/006  *WATFIV                   TEST DECKS      SF  G          W159:WAT5.TEST                                                  
            5.0T1  1201  WATFIV.TEST_DECKS.SF.006           1 LINE     80    8 PAGE UM   SHERRY              JULY 03, 1981  13:58:16
            5.0T3   195                       
0          THE FIRST FEW LINES ON THIS FILE CONTAIN THE MTS COMMANDS NEEDED TO COMPILE
           THE TEST DECKS WHICH START AT LINE 1000.  THEY MUST BE RUN WITH THE FOLLOWING
           I/O ASSIGNMENTS (TEMPORARY FILES):
            
                1   A SEQUENTIAL FILE
                2   A LINE FILE
                3   ANOTHER LINE FILE
            
           LINE NUMBERS IN THIS FILE ARE IMPORTANT.
00483/007  *WATFIV                   REASS           C              W159:WAT5.REASS                                                 
            5.0T1  1202  WATFIV.REASS.C.007                 1 LINE    116    6 PAGE UM   SHERRY              JULY 03, 1981  13:58:18
            5.0T3   196                       
0          THIS FILE CONTAINS ALL THE MTS COMMANDS NECESSARY TO GENERATE THE VARIOUS
           COMPONENTS OF WATFIV. THE MTS COMMANDS ARE ORGANIZED (BY LINE NUMBER)
           IDENTICALLY TO (483/1), E.G. THE SOURCE COMMANDS NECESSARY TO ASSEMBLE WATIO
           (TAPE FILE #84) ARE LOCATED IN THE LINE RANGE 84000,84999 AS ARE THE
           CORRESPONDING UPDATE CONTROL CARDS IN WAT5.SGEN (483/1). LINE NUMBERS IN THIS
           FILE ARE IMPORTANT SINCE (483/8) CONTAINS REFERENCES BY LINE NUMBER. THIS FIRST
           HUNDRED LINES OF THIS FILE CONTAIN DESCRIPTIONS OF THE VARIOUS SOURCE
           COMMANDS. THIS FILE CONTAINS TWO $MOUNT COMMANDS-- ONE TO MOUNT THE WATERLOO
           DISTRIBUTION TAPE AND ANOTHER TO MOUNT A TAPE WHICH RECEIVES THE UNLOADED
           WATFIV SOURCE FILES. THE MOUNT COMMANDS ARE AT LINE NUMBERS 101 AND 201,
           RESPECTIVELY, AND SHOULD BE REPLACED APPROPRIATELY.
0          Referenced by comments of: 483/1, 483/8 
00483/008  *WATFIV                   $SOU            C              W159:WAT5.$SOU                                                  
            5.0T1  1203  WATFIV.$SOU.C.008                  1 LINE     55    1 PAGE UM   SHERRY              JULY 03, 1981  13:58:19
            5.0T3   197                       
0          THIS FILE CONTAINS ALL THE "$SOURCE WAT5.REASS(---)" (483/7) COMMANDS NECESSARY
           TO GENERATE THE MTS VERSION OF WATFIV.  THIS IS A FIVE STEP PROCEDURE:
            
           1. THE SOURCE CODE FOR WATFIV IS UNLOADED FROM THE WATERLOO DISTRIBUTION TAPE
              (WATFIV V1L4) ONTO ANOTHER TAPE; A MACRO LIBRARY IS UNLOADED; AND THE
              FUNCTION OBJECT DECK LIBRARY IS UNLOADED AND UPDATED.
           2. THE COPY SECTIONS ACCT, CDEFN, COMMR, ERRTEXTS, EXTRN, OPTIONS, STARTA,
              STARTB, AND SYS ARE GENERATED (A DISK FILE WITH THE SAME NAME IS PRODUCED
              FOR EACH COPY SECTION).
           3. THE WATFIV CSECTS ARE ASSEMBLED.
           4. THE LOCAL MTS ORIGINATED ROUTINES FIOCS (483/2), DIOCS (483/3), DFLT
              (483/4), TIME (483/9), AND MTSFUN (483/10) ARE ASSEMBLED.
           5. THE RESULTING OBJECT DECKS ARE LINKEDITED VIA THE PROCEDURE (483/11) AND
              THE OUTPUT IS PLACED IN A FILE NAMED WAT5, WHICH MAY BE COPIED TO THE
              PUBLIC FILE *WATFIV.
            
           THUS, WATFIV WILL BE GENERATED IF THIS FILE IS $SOURCED TO.
1                                                                                               SUN SEP 08/96   15:24:55   Page  211
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 483/7 
00483/009  *WATFIV                   TIME            SA  O          S1558 5.0T1 VLO FSNAME=WATFIV.TIME.SA.009(1)                1204
            5.0T1  1204  WATFIV.TIME.SA.009                 1 LINE     80    7 PAGE UM   SHERRY              JULY 27, 1977  03:57:19
            5.0T3   198                       
0          VERSION OF THE MTS TIME SUBROUTINE RECODED TO CONFORM TO WATFIV CALLING CONVENTIONS.
           PROGRAM WRITTEN AT UBC.  ASSEMBLE USING *SYSMAC AND THE TWO WATERLOO MACRO LIBRARIES.
0          Referenced by comments of: 483/8 
00483/010  *WATFIV                   MTSFUN          SA  G          S1558 5.0T1 VLO FSNAME=WATFIV.MTSFUN.SA.010(1)              1205
            5.0T1  1205  WATFIV.MTSFUN.SA.010               1 LINE     80    4 PAGE UM   SHERRY              JULY 27, 1977  03:57:21
            5.0T3   199                       
0          CODE FOR BUILTIN SUBROUTINES RAND, SCLOCK, CLOCK, IEOR, IOR, IAND, AND ICOMPL.
           ASSEMBLE USING *SYSMAC AND THE TWO WATERLOO MACRO LIBRARIES.
0          Referenced by comments of: 483/8 
00483/011  *WATFIV                   RELINK          C              W159:WAT5.RELINK                                                
            5.0T1  1206  WATFIV.RELINK.C.011                1 LINE     20    1 PAGE UM   SHERRY              JULY 03, 1981  13:58:21
            5.0T3   200                       
0          LINKEDITOR COMMANDS REQUIRED TO LINKEDIT WATFIV.  "INCLUDES" WAT5.O (483/12).
0          Referenced by comments of: 483/8, 483/12 
00483/012  *WATFIV                   WAT5.O          OC  G          W159:WAT5.O                                                     
            5.0T1  1207  WATFIV.WAT5.O.OC.012               1 LINE     80    1 PAGE UM   SHERRY              JULY 03, 1981  13:58:22
            5.0T3   201                       
0          THIS FILE CONTAINS A SERIES OF "$CONTINUE WITH" RECORDS, THE OBJECT FOR SPIE,
           AND SOME LOADER CONTROL RECORDS TO CAUSE THE VARIOUS WATFIV SUB-COMPONENTS TO
           BE LOADED WHEN THIS FILE IS $RUN. ALSO REFERENCED BY (483/11) TO LINKEDIT
           WATFIV.
0          Referenced by comments of: 483/11 
00484/001A *ACCRESTORE                               OE  G          *ACCRESTORE                                                     
            5.1T1   345  ACCRESTORE..OE.001                 1 LINE   3584    3 PAGE UM   ENGLE               JULY 23, 1983  10:46:20
                         *ACCRESTORE          
0          PROGRAM TO COMPUTE NUMBER OF CURRENT SIGNONS AND CURRENT DISK SPACE FOR
           A USERID AND THEN UPDATE THE ACCOUNTING RECORD. FILE IS LINKEDIT OF
           ACCSTRUP (104/36), THE MAIN PROGRAM, PLUS CURSIG (104/98), ACATALOG
           (104/132), GETFILE (104/130), ACCIO (104/28), ACCFLUPD (104/92),
           FILERATE (104/22), TV (104/178), AND SYSDEFS. THIS FILE MUST BE
           PERMITTED AS FOLLOWS: U/N,R (P=W&PKEY=*MTS.RUN,USERID&PKEY=*MTS.ETC.RUN)
           WHERE "USERID" SHOULD BE REPLACED BY THE USER ID USED TO RUN DEADFILES
           (502). THIS FILE MUST BE GIVEN THE PROGRAM KEY *ACRESTORE.
0          Referenced by comments of: 136/2, 502/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  212
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00485/001  *PLC                      INSTALLATION    WF             PL1:PLCINSTALL.W                                                
            5.0T1  1209  PLC.INSTALLATION.WF.001            1 LINE    132    6 PAGE UM   TIFFANY             JULY 03, 1981  13:58:23
            5.0T3   203                       
0          Due to copyright restrictions, the master source, macro library, and object for
           PL/C cannot be distributed. It must be obtained directly from Cornell
           University.
            
           (485/1) consists of instructions for installing PL/C release 7.6 in MTS.
0          Referenced by comments of: 485/1, 485/22, 485/24 
00485/002  *PLC                      OSPLCGEN        C   G          S0548 PLCARC 'PLC ARCHIVE' FSNAME=OSPLCGEN                      
            5.0T1  1210  PLC.OSPLCGEN.C.002                 1 LINE     67    2 PAGE UM   TIFFANY             APR. 10, 1981  15:16:29
            5.0T3   204                       
0          MTS command file to generate OS PL/C in file OSPLC.
00485/003  *PLC                      MTSPLCGEN       C   G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MTSPLCGEN                    
            5.0T1  1211  PLC.MTSPLCGEN.C.003                1 LINE    110    3 PAGE UM   TIFFANY             APR. 10, 1981  15:16:47
            5.0T3   205                       
0          MTS command file to generate initial MTS PL/C in file MTSPLC.
00485/004  *PLC                      INITPLCGEN      C   O          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=INITPLCGEN                   
            5.0T1  1212  PLC.INITPLCGEN.C.004               1 LINE    110    2 PAGE UM   TIFFANY             APR. 10, 1981  15:16:59
            5.0T3   206                       
0          MTS command file to generate the copy section PLCLXRWT to be replaced in
           PLCMACLIB (485/37), and the object modules PLCMAIN, PLCRVT, and PLCRTT to
           be replaced in MTSPLC.
00485/005  *PLC                      MESGPLCGEN      C   G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MESGPLCGEN                   
            5.0T1  1213  PLC.MESGPLCGEN.C.005               1 LINE    106    1 PAGE UM   TIFFANY             APR. 10, 1981  15:17:10
            5.0T3   207                       
0          MTS command file to generate error messages with corrections.
00485/006  *PLC                      CLEANPLCGEN     C   G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CLEANPLCGEN                  
            5.0T1  1214  PLC.CLEANPLCGEN.C.006              1 LINE    106    3 PAGE UM   TIFFANY             APR. 10, 1981  15:17:19
            5.0T3   208                       
0          Final generation -- the result is an unpatched PLC object deck.
00485/007  *PLC                      CGDR.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CGDR.U                       
            5.0T1  1215  PLC.CGDR.U.UC.007                  1 LINE     71    3 PAGE UM   TIFFANY             APR. 10, 1981  15:24:47
            5.0T3   209                       
0          MTS update for the code-generation driver module.
1                                                                                               SUN SEP 08/96   15:24:55   Page  213
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00485/008  *PLC                      CGIG.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CGIG.U                       
            5.0T1  1216  PLC.CGIG.U.UC.008                  1 LINE     58    1 PAGE UM   TIFFANY             APR. 10, 1981  15:25:00
            5.0T3   210                       
0          MTS update for the code-generation interpretive coder.
00485/009C *PLC                      CGOP.U          UC  G          PL1:CGOP.U                                                      
            5.1T1   346  PLC.CGOP.U.UC.009                  1 LINE     67    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:20
0          MTS update for the module which generates code for operator tables.
           Corrects outstanding bug of ADD, MULTIPLY, and DIVIDE builtin functions.
00485/010  *PLC                      CGXG.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CGXG.U                       
            5.0T1  1217  PLC.CGXG.U.UC.009                  1 LINE     63    1 PAGE UM   TIFFANY             APR. 10, 1981  15:25:14
            5.0T3   211                       
0          MTS update for the expression code-generator.
00485/011  *PLC                      CONT.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CONT.U                       
            5.0T1  1218  PLC.CONT.U.UC.010                  1 LINE    100    9 PAGE UM   TIFFANY             APR. 10, 1981  15:25:28
            5.0T3   212                       
0          MTS update for the collection of CSECTS which control the sequencing of the
           compiler phases and provide interfacing between PL/C and the low level routines.
00485/012  *PLC                      CVNM.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CVNM.U                       
            5.0T1  1219  PLC.CVNM.U.UC.011                  1 LINE     67    1 PAGE UM   TIFFANY             APR. 10, 1981  15:25:45
            5.0T3   213                       
0          MTS update for number conversion routine.
00485/013  *PLC                      DGIO.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=DGIO.U                       
            5.0T1  1220  PLC.DGIO.U.UC.012                  1 LINE     95    1 PAGE UM   TIFFANY             APR. 10, 1981  15:25:55
            5.0T3   214                       
0          MTS update for the I/O-statement code generator.
00485/014  *PLC                      ERMW.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=ERMW.U                       
            5.0T1  1221  PLC.ERMW.U.UC.013                  1 LINE     92    3 PAGE UM   TIFFANY             APR. 10, 1981  15:26:15
            5.0T3   215                       
0          MTS update for the module which produces the error messages.
00485/015  *PLC                      EXEC.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXEC.U                       
            5.0T1  1222  PLC.EXEC.U.UC.014                  1 LINE     71    1 PAGE UM   TIFFANY             APR. 10, 1981  15:26:39
            5.0T3   216                       
0          MTS update for the module which contains run-time utility routines.
00485/016  *PLC                      EXIO.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXIO.U                       
            5.0T1  1223  PLC.EXIO.U.UC.015                  1 LINE     51    1 PAGE UM   TIFFANY             APR. 10, 1981  15:26:51
            5.0T3   217                       
0          MTS update for the module which contains common run-time I/O routines.
1                                                                                               SUN SEP 08/96   15:24:55   Page  214
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00485/017  *PLC                      EXON.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXON.U                       
            5.0T1  1224  PLC.EXON.U.UC.016                  1 LINE     44    1 PAGE UM   TIFFANY             APR. 10, 1981  15:27:00
            5.0T3   218                       
0          MTS update for the module containing the ON-unit manager.
00485/018  *PLC                      EXRI.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXRI.U                       
            5.0T1  1225  PLC.EXRI.U.UC.017                  1 LINE     99    1 PAGE UM   TIFFANY             MAY  15, 1981  11:32:25
            5.0T3   219                       
0          MTS update for the module which performs record I/O.
00485/019  *PLC                      EXUD.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXUD.U                       
            5.0T1  1226  PLC.EXUD.U.UC.018                  1 LINE     67    1 PAGE UM   TIFFANY             APR. 10, 1981  15:27:25
            5.0T3   220                       
0          MTS update for the module that processes undefined variables.
00485/020  *PLC                      GPCR.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=GPCR.U                       
            5.0T1  1227  PLC.GPCR.U.UC.019                  1 LINE     87    1 PAGE UM   TIFFANY             APR. 10, 1981  15:27:35
            5.0T3   221                       
0          MTS update for the module which performs conversions at run-time.
00485/021  *PLC                      IM.U            UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=IM.U                         
            5.0T1  1228  PLC.IM.U.UC.020                    1 LINE     98    5 PAGE UM   TIFFANY             APR. 10, 1981  15:27:47
            5.0T3   222                       
0          MTS update for the installation-dependent module.
00485/022  *PLC                      INIT.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=INIT.U                       
            5.0T1  1229  PLC.INIT.U.UC.021                  1 LINE     68    3 PAGE UM   TIFFANY             APR. 10, 1981  15:27:58
            5.0T3   223                       
0          See installation writeup (485/1) for details.
00485/023  *PLC                      LEXI.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=LEXI.U                       
            5.0T1  1230  PLC.LEXI.U.UC.022                  1 LINE     66    1 PAGE UM   TIFFANY             APR. 10, 1981  15:28:08
            5.0T3   224                       
0          Update applies to PLCMACLIB (485/37), which contains several copy sections
           for the Lexical Analyzer.  If you are changing PLCLEXI, PLCSYNA and PLCPICT
           must also be reassembled since they copy part of PLCLEXI.
00485/024  *PLC                      MESG.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MESG.U                       
            5.0T1  1231  PLC.MESG.U.UC.023                  1 LINE     59    1 PAGE UM   TIFFANY             APR. 10, 1981  15:28:22
            5.0T3   225                       
0          See installation writeup (485/1) for details.
1                                                                                               SUN SEP 08/96   15:24:55   Page  215
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00485/025  *PLC                      MIMO.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MIMO.U                       
            5.0T1  1232  PLC.MIMO.U.UC.024                  1 LINE     97    8 PAGE UM   TIFFANY             APR. 10, 1981  15:28:32
            5.0T3   226                       
0          MTS update for the module which gains initial control in PL/C (mini-monitor).
00485/026  *PLC                      OPTB.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=OPTB.U                       
            5.0T1  1233  PLC.OPTB.U.UC.025                  1 LINE     72    1 PAGE UM   TIFFANY             APR. 10, 1981  15:28:43
            5.0T3   227                       
0          MTS update for the module which defines the default options for PL/C.
00485/027  *PLC                      OPTN.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=OPTN.U                       
            5.0T1  1234  PLC.OPTN.U.UC.026                  1 LINE     99    4 PAGE UM   TIFFANY             APR. 10, 1981  15:28:52
            5.0T3   228                       
0          MTS update for the module which performs the compiler options scanning.
00485/028  *PLC                      PICT.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PICT.U                       
            5.0T1  1235  PLC.PICT.U.UC.027                  1 LINE     62    1 PAGE UM   TIFFANY             APR. 10, 1981  15:29:01
            5.0T3   229                       
0          MTS update for the module that processes pictures.
00485/029  *PLC                      RVRS.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=RVRS.U                       
            5.0T1  1236  PLC.RVRS.U.UC.028                  1 LINE     36    1 PAGE UM   TIFFANY             APR. 10, 1981  15:29:11
            5.0T3   230                       
0          MTS update for the reverse-translation generator.
00485/030  *PLC                      SYNA.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=SYNA.U                       
            5.0T1  1237  PLC.SYNA.U.UC.029                  1 LINE     68    3 PAGE UM   TIFFANY             APR. 11, 1981  16:19:06
            5.0T3   231                       
0          Update applies only to PLCMACLIB (485/37), which contains several copy
           sections for the Syntactic-Analysis Routine.
00485/031  *PLC                      SYSO.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=SYSO.U                       
            5.0T1  1238  PLC.SYSO.U.UC.030                  1 LINE    100   18 PAGE UM   TIFFANY             APR. 10, 1981  15:29:47
            5.0T3   232                       
0          MTS update for the module which interfaces with the operating system.
00485/032  *PLC                      XREF.U          UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=XREF.U                       
            5.0T1  1239  PLC.XREF.U.UC.031                  1 LINE     69    1 PAGE UM   TIFFANY             APR. 10, 1981  15:30:06
            5.0T3   233                       
0          MTS update for the cross-reference generator.
00485/033  *PLC                      DEFAULT         SA  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=DEFAULT.S                    
            5.0T1  1240  PLC.DEFAULT.SA.032                 1 LINE     71    3 PAGE UM   TIFFANY             APR. 19, 1978  17:48:53
            5.0T3   234                       
0          Subroutine to handle default page and time estimates in MTS -- not part of the
1                                                                                               SUN SEP 08/96   15:24:55   Page  216
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Cornell source.
00485/034  *PLC                      DEFAULT         OC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=DEFAULT.O                    
            5.0T1  1241  PLC.DEFAULT.OC.033                 1 LINE     80    1 PAGE UM   TIFFANY             APR. 19, 1978  17:48:00
            5.0T3   235                       
00485/035  *PLC                      PLCMSGS         SA  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PLCMSGS                      
            5.0T1  1242  PLC.PLCMSGS.SA.034                 1 LINE     72    4 PAGE UM   TIFFANY             APR. 10, 1981  15:30:20
            5.0T3   236                       
0          Source for a routine to print all PL/C error messages.  Use this for 
           verification of error messages. (Not a part of the Cornell source.)
           Copies *GDINFODSECT (594).
00485/036  *PLC                      PLCMSGS         OC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PLCMSGS.O                    
            5.0T1  1243  PLC.PLCMSGS.OC.035                 1 LINE     80    3 PAGE UM   TIFFANY             APR. 10, 1981  15:30:37
            5.0T3   237                       
0          Refers to PLCMSGA...PLCMSGF.
00485/037  *PLC                      PLCMACLIB       SM  G        # PL1:PLCMACLIB                                                   
                                                                                    UM   TIFFANY                                    
0          PL/C macro library.  Cannot be distributed due to copyright restriction.
0          Referenced by comments of: 485/4, 485/23, 485/30, 485/38 
00485/038  *PLC                      PLCMACLIB       UC  G          S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PLCMAC.UP                    
            5.0T1  1244  PLC.PLCMACLIB.UC.037               1 LINE     71    2 PAGE UM   TIFFANY             APR. 10, 1981  15:23:36
            5.0T3   238                       
0          Update for PLCMACLIB (485/37).
00485/039A *PLC                      OBJECT          OC  G        # SEG2:PLC                                                        
                                                                                    UM   TIFFANY                                    
0          PL/C segment 2 object.  Cannot be distributed due to copyright restrictions.
00485/040  *PLC                      *PLC            OC  G          *PLC                                                            
            5.0T1  1245  PLC.*PLC.OC.039                    1 SEQ      24    1 PAGE UM   TIFFANY             JULY 03, 1981  14:06:01
            5.0T3   239                       
0          These cards refer to the actual object loaded by PISTLE (559).
00486/001  *HBQ                                      SA           # (OBSOLETE)                                                      
            D4T1   1196  HBQ..SA.001                        1 LINE     80   18 PAGE UM                       FEB. 25, 1975  16:41:55
0          Obsoleted by the $SYSTEMSTATUS command.
00487/001A *LABEL                    MAIN PGM        SA  G          TAPE:LABEL(1,999)                                               
            5.1T1   347  LABEL.MAIN_PGM.SA.001              1 LINE     68    5 PAGE UM   LIFT                JULY 23, 1983  10:46:23
0          Program to initialize labeled or unlabeled magnetic tapes.  Calls TPINIT
           subroutine (487/4). Source in lines 1,999.
1                                                                                               SUN SEP 08/96   15:24:55   Page  217
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 135/1, 487/3 
00487/002A *LABEL                    MAIN PGM        OE  G          *LABEL                                                          
            5.1T1   348  LABEL.MAIN_PGM.OE.002              1 LINE   2088    1 PAGE UM   LIFT                JULY 23, 1983  10:46:23
                         *LABEL               
00487/003  *LABEL                    *LBL            C              *LBL                                                            
            5.0T1  1248  LABEL.*LBL.C.003                   1 LINE     34    1 PAGE UM   LIFT                JULY 03, 1981  14:06:04
            5.0T3   242  *LBL                 
0          COMMAND FILE TO RUN *LABEL (487/1) FOR THE OPERATORS.  INVOKED BY ENTERING
           "MTS *LBL" ON THE OPERATOR'S CONSOLE.
00487/004A *LABEL                    TPINIT SUBR     SA  G          TAPE:TAPEINIT(1,999)                                            
            5.1T1   349  LABEL.TPINIT_SUBR.SA.004           1 LINE     72    4 PAGE UM   LIFT                JULY 23, 1983  10:46:23
0          Subroutine, with alternate entry TAPEINIT, which initializes tapes (labeled or
           unlabeled).  Source in lines 1,999.
            
           *******************************************************************************
           D5.0B version:
            
           Change in ANSI labels.
           *******************************************************************************
0          Referenced by comments of: 487/1 
00487/005A *LABEL                    TPINIT SUBR     OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   LIFT                                       
0          Object part of *LIBRARY (524/1)
00488/001   CONTROL                                  SA           # (OBSOLETE)                                                      
            D2.3    035                                                             UM                                              
00489/001A  TESTIO                                   SA  G          S0792 WSGFS FSNAME=TT.SA                                        
            5.1T1   350  TESTIO..SA.001                     1 LINE     71    8 PAGE UM   WSG                 FEB. 09, 1983  12:11:18
0          The TESTIO program (also known as TAPETEST and TT) was designed to
           test MTS user-level I/O. It can be used to do simple reads and
           writes on arbitrary FDnames, but will also test backward reads,
           @MAXLEN reads, etc. See the writeup (489/3) for details. Copies
           *SENSEDSECT (3025).
00489/002A  TESTIO                                   OE  G          UNSP:TESTIO                                                     
            5.1T1   351  TESTIO..OE.002                     1 LINE   3524    3 PAGE UM   WSG                 JULY 23, 1983  10:46:27
                         UNSP:TESTIO          
00489/003A  TESTIO                                   P              UNSP:TESTIO.W                                                   
            5.1T1   352  TESTIO..P.003                      1 LINE     69    1 PAGE UM   WSG                 JULY 23, 1983  10:46:27
                         UNSP:TESTIO.W        
0          Referenced by comments of: 489/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  218
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00490/001  *LAR                                      C              *LAR                                                            
            5.0T1  1253  LAR..C.001                         1 LINE     29    1 PAGE UM   MTA                 JULY 03, 1981  14:06:13
            5.0T3   247  STRT:*LAR            
0          COMMAND FILE TO RUN UNITS (1012) TO RESET ALL 2703 (AND SIMILAR) LINES.
           IT RESETS EVERYTHING WITH DEVICE TYPE MRXA, SDA, TTY, OR 2741.
           INVOKED BY ENTERING "MTS *LAR" ON THE OPERATOR'S CONSOLE.
           IT SHOULD ONLY BE USED WHEN A 2703 OR MEMOREX 1270 HAS DROPPED ITS
           LINES SINCE IT FAKES A UNIT CHECK ON EACH 2703 ADDRESS.
00491/001  *SCRAMBLE                                              # (OBSOLETE)                                                      
            D4T1   1204  SCRAMBLE..SF.001                   1 LINE     50    1 PAGE UM                       JUNE 06, 1976  22:11:25
            D4T3    303                       
0          Obsoleted by *ENCRYPT (677)
00492/001  *DCALC                                    SP  G          S1558 5.0T1 VLO FSNAME=DCALC..SP.001(1)                     1254
            5.0T1  1254  DCALC..SP.001                      1 LINE     80   13 PAGE UM   MTA                 AUG. 03, 1973  21:27.08
            5.0T3   248                       
0          PL/I DESK CALCULATOR PROGRAM.
00492/002  *DCALC                                    OE  G          *DCALC                                                          
            5.0T1  1255  DCALC..OE.002                      1 SEQ   21678    9 PAGE UM   MTA                 JULY 03, 1981  14:06:17
            5.0T3   249  *DCALC               
0          Ends with a "$CONTINUE WITH *PL1LIB" card.
00493/001  *TALLY                    MAIN            SA  O          S1558 5.0T1 VLO FSNAME=TALLY.MAIN.SA.001(1)                 1256
            5.0T1  1256  TALLY.MAIN.SA.001                  1 LINE     80    9 PAGE UM   VALERIO             JULY 27, 1977  04:12:45
            5.0T3   250                       
0          TALLY IS A PROGRAM TO MONITOR THE EXECUTION OF A USER PROGRAM AND TO COUNT THE NUMBER OF TIMES
           EACH MACHINE INSTRUCTION IS EXECUTED.
00493/002  *TALLY                    SIM SUBR        SA  O          S1558 5.0T1 VLO FSNAME=TALLY.SIM_SUBR.SA.002(1)             1257
            5.0T1  1257  TALLY.SIM_SUBR.SA.002              1 LINE     80   36 PAGE UM   VALERIO             JULY 27, 1977  04:12:47
            5.0T3   251                       
00493/003  *TALLY                    OBJECT          OC  O          *TALLY                                                          
            5.0T1  1258  TALLY.OBJECT.OC.003                1 LINE    255    4 PAGE UM   VALERIO             JULY 03, 1981  14:06:20
            5.0T3   252  *TALLY               
00494/001  *CSMP                                     SA  G  CSMP    W020:CSMPDISTR(1,341)                                           
            5.0T1  1259  CSMP..SA.001                       1 LINE     80    8 PAGE UM   FLANIGAN            JULY 03, 1981  14:06:21
            5.0T3   253                       
0          CONTINUOUS SYSTEM MODELING PROGRAM (MODIFIED FROM IBM).
            
           *CSMP PROVIDES FULL COMPREHENSIVE CONTROL OVER ALL PHASES FOR ONE OR MORE STACKED MODELS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  219
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00494/002  *CSMP                                     OE  G          *CSMP                                                           
            5.0T1  1260  CSMP..OE.002                       1 SEQ      80    2 PAGE UM   FLANIGAN            JULY 03, 1981  14:06:22
            5.0T3   254  *CSMP                
00494/003  *CSMP                     CSMPTRAN        SA  G  CPTR    W020:CSMPDISTR(500,720)                                         
            5.0T1  1261  CSMP.CSMPTRAN.SA.003               1 LINE     80    6 PAGE UM   FLANIGAN            JULY 03, 1981  14:06:24
            5.0T3   255                       
0          TRANSLATION CONTROL.  ASSEMBLE USING *SYSMAC AND PUT IN *CSMPTRAN. 
           ADD "$CONTINUE WITH *CSMPLIB" AT END.
00494/004  *CSMP                     *CSMPTRAN       OE  G          *CSMPTRAN                                                       
            5.0T1  1262  CSMP.*CSMPTRAN.OE.004              1 SEQ      80    1 PAGE UM   FLANIGAN            JULY 03, 1981  14:06:25
            5.0T3   256  *CSMPTRAN            
0          ENDS WITH A "$CONTINUE WITH *CSMPLIB" CARD.
00494/005  *CSMP                     CSMPEXEC        SA  G  CPEX    W020:CSMPDISTR(1000,1107)                                       
            5.0T1  1263  CSMP.CSMPEXEC.SA.005               1 LINE     80    4 PAGE UM   FLANIGAN            JULY 03, 1981  14:06:25
            5.0T3   257                       
0          EXECUTION CONTROL
00494/006  *CSMP                     *CSMPEXEC       OE  G          *CSMPEXEC                                                       
            5.0T1  1264  CSMP.*CSMPEXEC.OE.006              1 SEQ      80    1 PAGE UM   FLANIGAN            JULY 03, 1981  14:06:26
            5.0T3   258  *CSMPEXEC            
00494/007  *CSMP                     CSMPLIB IBM     S   G          S0280 'FLANIGAN SYSTEM SOURCE ONE' FMT=FB(8000,80)           2  
            5.0T1  1265  CSMP.CSMPLIB_IBM.S.007             1 SEQ      80  155 PAGE UM   FLANIGAN            JULY 03, 1981  14:07:13
            5.0T3   259                       
0          ORIGINAL IBM SOURCE (FORTRAN AND ASM).
00494/008  *CSMP                     CSMPLIB UPD     UU  G          W020:CSMPDISTR(2000,2175)                                       
            5.0T1  1266  CSMP.CSMPLIB_UPD.UU.008            1 LINE     80    4 PAGE UM   FLANIGAN            JULY 03, 1981  14:07:15
            5.0T3   260                       
0          THIS UPDATE DECK APPLIES ALL KNOWN IBM APARS PLUS LOCAL CHANGES. IT ASSUMES
           THE FOLLOWING:
              1.  IBM SOURCE IS ON TAPE *S*
              2.  A POOL TAPE HAS BEEN MOUNTED AS *P*
              3.  AN EMPTY SEQUENTIAL FILE -A EXISTS
           THIS UPDATE PUTS THE UPDATED CSMP FORTRAN ROUTINES ON *P* WITH BLOCKING
           FACTOR 100, REWINDS IT, PUTS THE UPDATED CSMP ASSEMBLER ROUTINES IN -A, AND
           REWINDS AND UNLOADS *S*.
0          Referenced by comments of: 494/10 
00494/009  *CSMP                     CSMPLIB ASM     SA  G          W020:CSMPDISTR(1500,1531)                                       
            5.0T1  1267  CSMP.CSMPLIB_ASM.SA.009            1 LINE     70    1 PAGE UM   FLANIGAN            JULY 03, 1981  14:07:16
            5.0T3   261                       
0          TWO ASM ROUTINES USED DURING DYNAMIC LINKING.
1                                                                                               SUN SEP 08/96   15:24:55   Page  220
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 494/10 
00494/010  *CSMP                     *CSMPLIB        OL  G          *CSMPLIB                                                        
            5.0T1  1268  CSMP.*CSMPLIB.OL.010               1 SEQ    6924   32 PAGE UM   FLANIGAN            JULY 03, 1981  14:07:17
            5.0T3   262  *CSMPLIB             
0          LIBRARY MADE FROM ASM AND FTN ROUTINES UPDATED BY (494/8) AND ASM ROUTINES
           FROM COMPONENT (494/9). (NOTE: FORTRANH HAS BEEN USED.)
00495/001   EXPL                     SUBMONITOR      SA  G          W052:EXMON.S                                                    
            5.0T1  1269  EXPL.SUBMONITOR.SA.001             1 LINE     80   33 PAGE UM   SHERRY              JULY 03, 1981  14:07:19
            5.0T3   263                       
0          Extended version of XPL. Using this version, an XPL program can consist of a
           collection of independently compiled procedures. This version produces normal
           MTS object decks, rather than special object modules.
            
           The submonitor consists of 4 csects: XMON, XPLDFLTS, COMPACT#, and SORTIT.
           Also included are the runtime library routines INDEX, TIMEX, EXCALL, and MAIN
           (which is a dummy routine to print an error message if no main procedure
           exists).
            
           Assemble using *SYSMAC with PAR=BATCH. Copies *GDINFODSECT (594) and
           *LOADINFODSECT (001/4).
0          Referenced by comments of: 318/9, 495/2 
00495/002   EXPL                     *EXPLIB         OE  G          *EXPLIB                                                         
            5.0T1  1270  EXPL.*EXPLIB.OE.002                1 LINE   5914    6 PAGE UM   SHERRY              JULY 03, 1981  14:07:21
            5.0T3   264  *EXPLIB              
0          EXPL RUNTIME LIBRARY. THIS LIBRARY IS GENERATED BY *OBJUTIL (721) AND
           CONSISTS OF THE OBJECT MODULES PRODUCED BY ASSEMBLING (495/1).
0          Referenced by comments of: 782/60 
00495/003A  EXPL                     *EXCOM          SX  G          *EXCOM                                                          
            5.1T1   353  EXPL.?EXCOM.SX.003                 1 LINE    100   70 PAGE UM   SHERRY              JULY 23, 1983  10:46:28
                         *EXCOM               
0          EXPL SOURCE FOR THE EXTENDED XPL COMPILER.  THE RESULTING OBJECT MUST BE RUN
           CONCATENATED WITH *EXPLIB.
0          Referenced by comments of: 495/5 
00495/004C  EXPL                     EXCOM.U         UC  G          W052:EXCOM.U                                                    
            5.1T1   354  EXPL.EXCOM.U.UC.004                1 LINE    118   13 PAGE UM   SHERRY              JULY 23, 1983  10:46:31
0          Update deck to produce the current version of *EXCOM from the D5.0 version.
           Contains update to string catenate code required if an EXPL object
           module is to execute when loaded above segment 7.
1                                                                                               SUN SEP 08/96   15:24:55   Page  221
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00495/005A  EXPL                     EXPL OBJ        OE  G          W052:EXPL.O                                                     
            5.1T1   355  EXPL.EXPL_OBJ.OE.005               1 LINE  32767   42 PAGE UM   SHERRY              JULY 23, 1983  10:46:31
0          OBJECT PRODUCED BY COMPILING *ECXOM (495/3).
00495/006A  EXPL                     *EXPL           OE  G          *EXPL                                                           
            5.1T1   356  EXPL.?EXPL.OE.006                  1 SEQ   32767   43 PAGE UM   SHERRY              JULY 23, 1983  10:46:33
                         *EXPL                
0          IT IS MOST CONVENIENT TO LINKEDIT THE COMPILER AND SUBMONITOR TOGETHER TO MAKE *EXPL.  NOTE THAT THE
           ENTRY POINT MUST BE XPLSM.  WHEN LINKEDITING, THE XPLDFLTS CSECT WHICH SETS THE FREE STRING AREA SIZE
           (FSASIZE) TO 15 PAGES SHOULD BE USED.
            
           $SOURCE EXPL.LINK (495/9) TO GENERATE THE LINKEDITED VERSION OF EXPL.
00495/007   EXPL                     *EXPLBNF        D   G          *EXPLBNF                                                        
            5.0T1  1274  EXPL.*EXPLBNF.D.006                1 LINE     73    3 PAGE UM   SHERRY              JULY 03, 1981  14:08:32
            5.0T3   268  *EXPLBNF             
0          SUITABLE INPUT TO *ANALYZER (318/13) TO PRODUCE THE NECESSARY DECLARATIONS FOR
           DRIVING THE PARSING ALGORITHM FOR *EXPL.
00495/008   EXPL                     *EXSKELETON     SX  G          *EXSKELETON                                                     
            5.0T1  1275  EXPL.*EXSKELETON.SX.007            1 LINE     80   12 PAGE UM   SHERRY              JULY 03, 1981  14:08:32
            5.0T3   269  *EXSKELETON          
0          THIS IS A VERSION OF SKELETON (318/12), A PROTO-COMPILER FOR USE WITH *EXPL.
           IT CONSISTS OF SEVERAL INDEPENDENTLY COMPILABLE EXTERNAL PROCEDURES WHICH FORM
           THE FRAMEWORK FOR A TABLE-DRIVEN COMPILER.
00495/009   EXPL                     LINK            C   G          S1558 5.0T1 VLO FSNAME=EXPL.LINK.C.008(1)                   1276
            5.0T1  1276  EXPL.LINK.C.008                    1 LINE     22    1 PAGE UM   SHERRY              OCT. 12, 1980  15:46:30
            5.0T3   270                       
0          SOURCE FILE WHICH LINKEDITS THE APPROPRIATE PIECES OF THE SUBMONITOR AND EXCOM
           INTO AN EXPL COMPILER.
0          Referenced by comments of: 495/6 
00495/010   EXPL                     MEMO 416        WX             S1558 5.0T1 VLO FSNAME=EXPL.MEMO_416.WX.009(1)              1277
            5.0T1  1277  EXPL.MEMO_416.WX.009               1 LINE    199   14 PAGE UM   SHERRY              OCT. 12, 1980  15:46:30
            5.0T3   271                       
0          THIS IS COMPUTING CENTER MEMO 416 -- "EXPL - EXTENDED XPL." THIS MEMO
           OBSOLETES MEMOS 343 AND 390.
00496/001A *APC                                      SA  G          LBT:APC.S                                                       
            5.1T1   357  APC..SA.001                        1 LINE     82   68 PAGE UM   TIFFANY             JULY 23, 1983  10:46:34
0          This is the all-purpose compare program which is used primarily to test for
           equality between records of two files or devices.  Copies *GDINFODSECT (594)
           and *SENSEDSECT (3025).
            
           **************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  222
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          D5.0C version:
            
           Changed to acknowledge Lee Data devices.
           **************************************************************************
0          Referenced by comments of: 629/12, 1016/1 
00496/002A *APC                                      OE  G          *APC                                                            
            5.1T1   358  APC..OE.002                        1 LINE  21311    8 PAGE UM   TIFFANY             JULY 23, 1983  10:46:37
                         *APC                 
00496/003  *APC                      EXPLAIN MSG     M              ETC:APCEXP                                                      
            5.0T1  1280  APC.EXPLAIN_MSG.M.003              1 LINE     66   10 PAGE UM   TIFFANY             JULY 03, 1981  14:08:46
            5.0T3   274  ETC.:APCEXP          
0          Explain message file for *APC.
00496/004C *APC                      EXPER VERS DOC  P              W062:NEWAPC.P                                                   
            5.1T1   359  APC.EXPER_VERS_DOC.P.004           1 LINE     66    2 PAGE      TIFFANY             JULY 23, 1983  10:46:37
0          Components (496/5) through (496/24) comprise an experimental version of APC
           which uses the Screen Support Routines (811). Most of the source requires the
           PL/I Optimizing Compiler (813). 
            
           This subcomponent is a copy of MTS:FORUM item 350, which describes this
           version of *APC.
00496/005C *APC                      MAIN            SP  O          W062:NEWAPC.S                                                   
            5.1T1   360  APC.MAIN.SP.005                    1 LINE     68    5 PAGE UM   TIFFANY             JULY 23, 1983  10:46:38
0          This subcomponent is the main procedure. Requires the PL/I Optimizing
           Compiler (813).
0          Referenced by comments of: 496/4, 496/23 
00496/006C *APC                      CMD             SP  O          W062:APC_CMD.S                                                  
            5.1T1   361  APC.CMD.SP.006                     1 LINE     71   11 PAGE UM   TIFFANY             JULY 23, 1983  10:46:38
0          This is the routine which passes the commands and issues them.
00496/007C *APC                      VISUAL          SP  O          W062:APC_VISUAL.S                                               
            5.1T1   362  APC.VISUAL.SP.007                  1 LINE     69   10 PAGE UM   TIFFANY             JULY 23, 1983  10:46:39
0          This is the routine which does the visual mode; it requires the Screen
           Support Routines (811).
00496/008C *APC                      CONTINUE        SP  O          W062:APC_CONTINUE                                               
            5.1T1   363  APC.CONTINUE.SP.008                1 LINE     68    2 PAGE UM   TIFFANY             JULY 23, 1983  10:46:39
0          This is the  routine which issues the CONTINUE command.
1                                                                                               SUN SEP 08/96   15:24:55   Page  223
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00496/009C *APC                      SCAN            SP  O          W062:APC_SCAN.S                                                 
            5.1T1   364  APC.SCAN.SP.009                    1 LINE     67    2 PAGE UM   TIFFANY             JULY 23, 1983  10:46:39
0          This is the routine which issues the SCAN command.
00496/010C *APC                      LOG             SP  O          W062:APC_LOG.S                                                  
            5.1T3   338  APC.LOG.SP.010                     1 LINE     64    2 PAGE UM   TIFFANY             AUG. 20, 1983  19:45:20
0          This is the routine which issues the LOG command.
00496/011C *APC                      RDLINE          SP  O          W062:APC_ETC.S(2000,2999)                                       
            5.1T1   365  APC.RDLINE.SP.011                  1 LINE     65    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:39
0          This is the routine which reads a line from unit 0 or 1.
00496/012C *APC                      EQUAL           SP  O          W062:APC_ETC.S(4000,4999)                                       
            5.1T1   366  APC.EQUAL.SP.012                   1 LINE     66    2 PAGE UM   TIFFANY             JULY 23, 1983  10:46:40
0          This is the routine which compares two lines.
00496/013C *APC                      CONVERT LINE    SP  O          W062:APC_ETC.S(7000,7999)                                       
            5.1T1   367  APC.CONVERT_LINE.SP.013            1 LINE     65    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          This is the routine which converts and edits a fullword MTS line into a 
           twelve-character field.
00496/014C *APC                      DOUBLE          SP  O          W062:APC_ETC.S(9000,9999)                                       
            5.1T1   368  APC.DOUBLE.SP.014                  1 LINE     71    3 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          This is the routine which prints lines from both units in two-column format.
00496/015C *APC                      SINGLE          SP  O          W062:APC_ETC.S(10000,10999)                                     
            5.1T1   369  APC.SINGLE.SP.015                  1 LINE     67    2 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          This is the routine which prints a line from either unit 0 or unit 1 in 
           one-column format.
00496/016C *APC                      HEX             SP  O          W062:APC_ETC.S(1,999)                                           
            5.1T1   370  APC.HEX.SP.016                     1 LINE     67    2 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          Two entry points HEX and HEX4 convert character strings into hexadecimal
           format.
00496/017C *APC                      ERROR           SP  O          W062:APC_ETC.S(1000,1999)                                       
            5.1T1   371  APC.ERROR.SP.017                   1 LINE     68    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          This is the routine which prints an error message, given the message number.
00496/018C *APC                      FWD             SP  O          W062:APC_ETC.S(3000,3999)                                       
            5.1T1   372  APC.FWD.SP.018                     1 LINE     64    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          Two entry points FWD and BACK issue two commands FORWARD and BACK,
           respectively.
1                                                                                               SUN SEP 08/96   15:24:55   Page  224
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00496/019C *APC                      CONVERT         SP  O          W062:APC_ETC.S(5000,5999)                                       
            5.1T1   373  APC.CONVERT.SP.019                 1 LINE     68    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:41
0          This routine converts a character string into a fullword integer.
00496/020C *APC                      LNRCONV         SP  O          W062:APC_ETC.S(6000,6999)                                       
            5.1T1   374  APC.LNRCONV.SP.020                 1 LINE     67    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:42
0          This routine converts a character string into an internal MTS line number.
00496/021C *APC                      GETLNR          SP  O          W062:APC_ETC.S(8000,8999)                                       
            5.1T1   375  APC.GETLNR.SP.021                  1 LINE     63    2 PAGE UM   TIFFANY             JULY 23, 1983  10:46:42
0          This routine processes the screen line number field and positions the unit
           accordingly.
00496/022C *APC                      FDNAME          SA  O          W062:FDNAME(1,999)                                              
            5.1T1   376  APC.FDNAME.SA.022                  1 LINE     58    1 PAGE UM   TIFFANY             JULY 23, 1983  10:46:42
0          This routine returns a file/device name and the beginning line number,
           given the unit number.
0          Referenced by comments of: 496/23 
00496/023C *APC                      EXPER OBJECT    O   O          W062:VISUAL                                                     
            5.1T1   377  APC.EXPER_OBJECT.O.023             1 LINE  22100   25 PAGE UM   TIFFANY             JULY 23, 1983  10:46:42
0          Object modules from the subcomponents (496/5) through (496/22), an
           experimental version of *APC. Do not use *OBJUTIL (721), since the first
           csect of each module is always PLISTART. Contains a $CONTINUE WITH *PL1OPTLIB
           (827/5) record.
0          Referenced by comments of: 496/24 
00496/024C *APC                      LINKEDIT        OL  O          LBT:APC                                                         
            5.1T1   378  APC.LINKEDIT.OL.024                1 LINE  32767   26 PAGE UM   TIFFANY             JULY 23, 1983  10:46:43
0          This is linkeditted from (496/23) by combining the object modules.  This
           will speed up the loading mechanism.  Requires *PL1OPTLIB (827/5).
0          Referenced by comments of: 496/4 
00497/001  *SNAP                                     SF  G          S0280 'FLANIGAN SYSTEM SOURCE ONE' FMT=FB(8000,80)           1  
            5.0T1  1281  SNAP..SF.001                       1 SEQ      80  132 PAGE UM   FLANIGAN            JULY 03, 1981  14:08:57
            5.0T3   275                       
00497/002  *SNAP                                     UU  G          S1558 5.0T1 VLO FSNAME=SNAP..UU.002(1)                      1282
            5.0T1  1282  SNAP..UU.002                       1 LINE     73    1 PAGE UM   FLANIGAN            JULY 30, 1973  20:45.57
            5.0T3   276                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  225
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00497/003  *SNAP                                     OE  G          *SNAP                                                           
            5.0T1  1283  SNAP..OE.003                       1 SEQ    5212   27 PAGE UM   FLANIGAN            JULY 03, 1981  14:09:05
            5.0T3   277  *SNAP                
00498/001A *IG                       *IG             OL  G          *IG                                                             
            5.1T1   379  IG.?IG.OL.001                      1 LINE   8248   19 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:44
                         *IG                  
0          This is the coding conventions version of the Integrated Graphics, or IG,
           system. IG is a library of FORTRAN-callable subroutines for performing
           graphics operations on a large variety of devices. It consists of *IG and
           routines for device-dependent I/O support. Each source module for this
           component contains the MTS commands for assembling it. Each should be
           assembled using COPY:IG.COPY.M (498/28). Many modules use the Version Labeler
           (812).
            
            The following is a directory of the subcomponents of IG:
            
               Subcomponent #               Contents
             (498/2)   - (498/21)      Device-independent portion of IG
             (498/23)  - (498/24)      Dsects for use when debugging 
                         (498/28)      Macros and copy sections
             (498/29)  - (498/30)      Test programs
             (498/31)  - (498/33)      Statistics utilities
                         (498/34)      Source for PDP-9 op sys for use with IG
                         (498/35)      The character font library
             (498/36)  - (498/57)      Source for the character fonts
             (498/58)  - (498/59)      The new-IG-to-old-DDR adaptor routine
                         (498/60)      The skeleton new-style DDR
             (498/62)  - (498/137)     DDRs
             (498/138) - (498/145)     A new version, in PLUS, of Interactive IG
                         (498/146)     Implementation guide
                         (498/147)     EGP writeup
                         (498/148)     Usage statistics file
            
           This subcomponent is the object library IG users concatenate to their programs. 
            
           Contains the modules
            
                      #PWRIT      (498/20)
                      IAIG        (498/145)
            
           plus loader cards to reference the resident IG.
            
           NOTE:
            
           This assumes that SEG2:IG (498/02) has been installed in shared VM.
           If this is not the case, this module should be combined with all modules from
           SEG2:IG except LCS (498/17) and run through *OBJUTIL with PAR=LIB.
            
           This subcomponent requires the following other files:
              *SYSMAC
              OLD:CC.MACROS   (1054/4)
              *PEXIT           (775)
1                                                                                               SUN SEP 08/96   15:24:55   Page  226
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             ALWB:SIDELABEL   (747/3)
0          Referenced by comments of: 498/20, 812/1 
00498/002A *IG                       SEG2:IG         OL  G          SEG2:IG                                                         
            5.1T1   380  IG.SEG2:IG.OL.002                  1 LINE  13016   65 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:45
                         SEG2:IG              
0          This is the portion of IG that gets loaded into shared VM.  Contains the
           following IG modules:
            
                      LCS         (498/17)
                      DIUSERXF    (498/03)
                      DIRTNS      (498/5)
                      DSM         (498/7)
                      DUMP        (498/9)
                      EGP         (498/11)
                      #IGETDD     (498/13)
                      LOAD        (498/15)
                      PD          (498/18)
                      #SS         (498/21)
            
           and some loader control records (LCS, RIP, etc.) at the end.
0          Referenced by comments of: 498/1, 498/3, 498/5, 498/7, 498/9, 498/11, 498/13, 498/15, 498/18, 498/21 
00498/003A *IG                       DI USERXF       SA  G          GRAF:DIUSER/BAS                                                 
            5.1T1   381  IG.DI_USERXF.SA.003                1 LINE    136   13 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:47
0          This is the user-callable routines module for *IG's Device Interface to its
           device-dependent routines.
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2 
00498/004C *IG                       DI USERXF       UC  G          GRAF:DIUSER/UPD                                                 
            5.1T1   382  IG.DI_USERXF.UC.004                1 LINE     98    1 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:48
00498/005A *IG                       DI RTNS         SA  G          GRAF:DIRTNS/BAS                                                 
            5.1T1   383  IG.DI_RTNS.SA.005                  1 LINE    139   53 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:48
0          This is the internal routines module for *IG's Device Interface to its
           device-dependent routines.
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2, 498/57 
00498/006C *IG                       DI RTNS         UC  G          GRAF:DIRTNS/UPD                                                 
            5.1T1   384  IG.DI_RTNS.UC.006                  1 LINE    167    1 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:50
1                                                                                               SUN SEP 08/96   15:24:55   Page  227
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/007A *IG                       DSM             SA  G          GRAF:DSM/BAS                                                    
            5.1T1   385  IG.DSM.SA.007                      1 LINE    133   42 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:50
0          Source for Data Structure Modification csect (DSM).
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2 
00498/008C *IG                       DSM             UC  G          GRAF:DSM/UPD                                                    
            5.1T1   386  IG.DSM.UC.008                      1 LINE     73    3 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:52
00498/009A *IG                       DUMP            SA  G          GRAF:DUMP/BAS                                                   
            5.1T1   387  IG.DUMP.SA.009                     1 LINE    134    9 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:52
0          Source for IG Data Structure Dumping routine (IGDUMP).
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2 
00498/010C *IG                       DUMP            UC  G          GRAF:DUMP/UPD                                                   
            5.1T1   388  IG.DUMP.UC.010                     1 LINE     68    1 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:52
00498/011A *IG                       EGP             SA  G          GRAF:EGP/BAS                                                    
            5.1T1   389  IG.EGP.SA.011                      1 LINE    133   10 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:52
0          Source for External Graphics Procedure csect (EGP).
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2 
00498/012C *IG                       EGP             UC  G          GRAF:EGP/UPD                                                    
            5.1T1   390  IG.EGP.UC.012                      1 LINE     68    1 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:53
00498/013A *IG                       GETDD           SA  G          GRAF:GETDD/BAS                                                  
            5.1T1   391  IG.GETDD.SA.013                    1 LINE    135   21 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:53
0          Source for Get Device Dependent Routine csect (#IGETDD).
            
           Object is in SEG2:IG (498/02).
            
           This module has conditional assembly parts for UNE.  To use, change the
           SETC symbol &INSTALL (in IGGBLS) to UNE
0          Referenced by comments of: 498/2 
00498/014C *IG                       GETDD           UC  G          GRAF:GETDD/UPD                                                  
            5.1T1   392  IG.GETDD.UC.014                    1 LINE     94    3 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:54
1                                                                                               SUN SEP 08/96   15:24:55   Page  228
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/015A *IG                       LOAD            SA  G          GRAF:LOAD/BAS                                                   
            5.1T1   393  IG.LOAD.SA.015                     1 LINE    134   11 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:54
0          Source for Object Loading facility (IGLOAD#).
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2 
00498/016C *IG                       LOAD            UC  G          GRAF:LOAD/UPD                                                   
            5.1T1   394  IG.LOAD.UC.016                     1 LINE     98    4 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:55
00498/017  *IG                       LCS             SA  G          S1558 5.0T1 VLO FSNAME=IG.LCS.SA.010(1)                     1293
            5.0T1  1293  IG.LCS.SA.010                      1 LINE     68    2 PAGE UM   WHIPPLE             JULY 03, 1981  14:11:32
            5.0T3   287                       
0          Source for the module that defines the IG low core symbol table when IG
           is installed in shared VM.
0          Referenced by comments of: 498/1, 498/2 
00498/018A *IG                       PD              SA  G          GRAF:PD/BAS                                                     
            5.1T1   395  IG.PD.SA.018                       1 LINE    132   19 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:55
0          Source for Picture Description csect (PD).
            
           Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/2 
00498/019C *IG                       PD              UC  G          GRAF:PD/UPD                                                     
            5.1T1   396  IG.PD.UC.019                       1 LINE     85    1 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:56
00498/020  *IG                       PWRIT           SA  G          S1558 5.0T1 VLO FSNAME=IG.PWRIT.SA.012(1)                   1295
            5.0T1  1295  IG.PWRIT.SA.012                    1 LINE    113   10 PAGE UM   WHIPPLE             JULY 03, 1981  14:11:45
            5.0T3   289                       
0          Source for the *PLOTSYS (615/9) interface which allows CalComp plotting programs to run with IG instead.
            
           Object is in *IG (498/01).
0          Referenced by comments of: 498/1 
00498/021A *IG                       SYSTEM SERVICE  SA  G          GRAF:SS/BAS                                                     
            5.1T1   397  IG.SYSTEM_SERVICE.SA.021           1 LINE    132   12 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:57
0          Source code for the System Services csect (#SS).  Contains system-dependent
           code (GETSPACE, READ, WRITE, etc).
            
           This module has conditional assembly sections for UNE and Wayne State.
           The UNE code is untested by UM.  To use the conditional assembly, change
           the SETC symbol &INSTALL in IGGBLS (located in COPY:IG.COPY.M (498/28)) to
           either UNE or WSU.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  229
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Object is in SEG2:IG (498/02).
0          Referenced by comments of: 498/1, 498/2 
00498/022C *IG                       SYSTEM SERVICE  UC  G          GRAF:SS/UPD                                                     
            5.1T1   398  IG.SYSTEM_SERVICE.UC.022           1 LINE     96    2 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:57
00498/023  *IG                       DSECTS          SA  G          S1558 5.0T1 VLO FSNAME=IG.DSECTS.SA.014(1)                  1297
            5.0T1  1297  IG.DSECTS.SA.014                   1 LINE     93    1 PAGE UM   WHIPPLE             JULY 03, 1981  14:11:48
            5.0T3   291                       
0          This is a series of dsects defining many of the IG data structures.  Useful
           when debugging IG.
0          Referenced by comments of: 498/1 
00498/024  *IG                       DSECTS          OC  G          S1558 5.0T1 VLO FSNAME=IG.DSECTS.OC.015(1)                  1298
            5.0T1  1298  IG.DSECTS.OC.015                   1 LINE     80    1 PAGE UM   WHIPPLE             JULY 03, 1981  14:11:49
            5.0T3   292                       
0          A file that can be INCLUDED in SDS.  Contains definitions for the following
           dsects:
            
               XFRM   -- The transformation block
               BRANCH -- The branch block
               LEAF   -- The leaf block
               NODE   -- The node block
               BUD    -- The bud block
0          Referenced by comments of: 498/1 
00498/025A *IG                       IG MACROS       SA  G          GRAF:MACRO/BAS                                                  
            5.1T1   399  IG.IG_MACROS.SA.025                1 LINE     73   29 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:57
0          This is the D5.0 base source for the IG macros, i.e., it is
           COPY:IG.COPY.M (498/28) as distributed on D5.0.
0          Referenced by comments of: 498/26 
00498/026C *IG                       IG MACROS       UC  G          GRAF:MACRO/UPD                                                  
            5.1T1   400  IG.IG_MACROS.UC.026                1 LINE     99    5 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:59
0          Updates to the D5.0 base (498/25) to produce the current source (498/27) for 
           the IG macros.
00498/027C *IG                       IG MACROS       SA  G          GRAF:MACRO/CUR                                                  
            5.1T1   401  IG.IG_MACROS.SA.027                1 LINE     80   30 PAGE UM   WHIPPLE             JULY 23, 1983  10:46:59
0          Current version of the IG macro library.
           Run *MACUTIL on this file to produce (498/28).
0          Referenced by comments of: 498/26 
1                                                                                               SUN SEP 08/96   15:24:55   Page  230
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/028A *IG                       IG MACROS       SM  G          COPY:IG.COPY.M                                                  
            5.1T1   402  IG.IG_MACROS.SM.028                1 LINE     80   29 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:00
0          Library of copy sections and macros used by the various components of IG.
0          Referenced by comments of: 498/1, 498/21, 498/25, 498/27 
00498/029  *IG                       TEST            SF  G          GRAF:IG.TEST.S                                                  
            5.0T1  1300  IG.TEST.SF.017                     1 LINE     85   22 PAGE UM   WHIPPLE             JULY 03, 1981  14:11:55
            5.0T3   294                       
0          FORTRAN source for the program to test out new versions of IG.
0          Referenced by comments of: 498/1 
00498/030  *IG                       BRANCH MONITOR  SA  G          GRAF:BMON.S                                                     
            5.0T1  1301  IG.BRANCH_MONITOR.SA.018           1 LINE     80    5 PAGE UM   WHIPPLE             JULY 03, 1981  14:12:06
            5.0T3   295                       
0          Source for a program which monitors all the branches in a specified routine.
0          Referenced by comments of: 498/1 
00498/031A *IG                       STATS SAVE      C              GRAF:IG.SHUFFLE                                                 
            5.1T1   403  IG.STATS_SAVE.C.031                1 LINE     63    1 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:01
0          Commands to save the contents of the statistics file (498/148) maintained by IG.
           The tape mount command in this file must be changed for each installation 
           before it is of use.
0          Referenced by comments of: 498/1 
00498/032  *IG                       STATS CALC      SF  G          S1558 5.0T1 VLO FSNAME=IG.STATS_CALC.SF.020(1)              1303
            5.0T1  1303  IG.STATS_CALC.SF.020               1 LINE     67    2 PAGE UM   WHIPPLE             JUNE 16, 1976  19:12:11
            5.0T3   297                       
0          FORTRAN source for a program which calculates and groups information on 
           IG usage from the statistics gathered by IG.
00498/033  *IG                       STATS SCAN      SA  G          S1558 5.0T1 VLO FSNAME=IG.STATS_SCAN.SA.021(1)              1304
            5.0T1  1304  IG.STATS_SCAN.SA.021               1 LINE     87    3 PAGE UM   WHIPPLE             JUNE 16, 1976  19:12:16
            5.0T3   298                       
0          Assembler source for a program to scan selectively for certain records in 
           the statistics file maintained by IG.
0          Referenced by comments of: 498/1 
00498/034  *IG                       IGRI.339        S              S0596 BLAH 'IG ROUTINES' FSNAME=W114:IGRI.339.S                 
            5.0T1  1305  IG.IGRI.339.S.022                  1 LINE     79   13 PAGE UM   WHIPPLE             DEC. 21, 1974  16:04.29
            5.0T3   299                       
0          Source for an operating system for the DEC 339 / PDP-9 which allows the 
           running of IG.
1                                                                                               SUN SEP 08/96   15:24:55   Page  231
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 498/1 
00498/035  *IG                       FONTS           OE  G          ETC:IG.FONTS                                                    
            5.0T1  1306  IG.FONTS.OE.023                    1 LINE   8604   26 PAGE UM   WHIPPLE             JULY 03, 1981  14:16:51
            5.0T3   300  ETC:IG.FONTS         
0          This file contains the object for the IG character fonts. Each font starts
           on a multiple of line 100. 
0          Referenced by comments of: 498/1 
00498/036  *IG                       ASCII7          SA  G          S0933 IGDIST FSNAME=IG.ASCII7                                   
            5.0T1  1307  IG.ASCII7.SA.024                   1 LINE     71    4 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:05
            5.0T3   301                       
0          Source for the ASCII7 font used by IG.
0          Referenced by comments of: 498/1 
00498/037  *IG                       CYRILLIC2       SA  G          S0933 IGDIST FSNAME=IG.CYRILLIC2                                
            5.0T1  1308  IG.CYRILLIC2.SA.025                1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:14
            5.0T3   302                       
0          Source for the Cyrillic font used by IG.
00498/038  *IG                       GOTHIC.ENGLIS   SA  G          S0933 IGDIST FSNAME=IG.GOTHIC.EN                                
            5.0T1  1309  IG.GOTHIC.ENGLIS.SA.026            1 LINE     72    8 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:25
            5.0T3   303                       
0          Source for the Gothic English font used by IG.
00498/039  *IG                       GOTHIC.FRAKTU   SA  G          S0933 IGDIST FSNAME=IG.GOTHIC.FR                                
            5.0T1  1310  IG.GOTHIC.FRAKTU.SA.027            1 LINE     72    9 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:35
            5.0T3   304                       
0          Source for the Gothic Fraktur font used by IG.
00498/040  *IG                       GOTHIC.ITALIA   SA  G          S0933 IGDIST FSNAME=IG.GOTHIC.IT                                
            5.0T1  1311  IG.GOTHIC.ITALIA.SA.028            1 LINE     72    8 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:43
            5.0T3   305                       
0          Source for the Gothic Italian font used by IG.
00498/041  *IG                       GREEK           SA  G          S0933 IGDIST FSNAME=IG.GREEK                                    
            5.0T1  1312  IG.GREEK.SA.029                    1 LINE     71    4 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:50
            5.0T3   306                       
0          Source for the (obsolete) Greek font used by IG.  This font is obsolete
           because it uses a "funny" (i.e. different than *PLOTSYS) character
           mapping.  One of the other Greek fonts should be used instead.
1                                                                                               SUN SEP 08/96   15:24:55   Page  232
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/042  *IG                       GREEK.CARTOGR   SA  G          S0933 IGDIST FSNAME=IG.GREEK.CAR                                
            5.0T1  1313  IG.GREEK.CARTOGR.SA.030            1 LINE     70    3 PAGE UM   WHIPPLE             MAR. 02, 1981  10:54:57
            5.0T3   307                       
0          Source for the Greek Cartographic font used by IG.
00498/043  *IG                       GREEK.1         SA  G          S0933 IGDIST FSNAME=IG.GREEK1                                   
            5.0T1  1314  IG.GREEK.1.SA.031                  1 LINE     72    5 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:02
            5.0T3   308                       
0          Source for the Greek.1 font used by IG.
00498/044  *IG                       GREEK.2         SA  G          S0933 IGDIST FSNAME=IG.GREEK2                                   
            5.0T1  1315  IG.GREEK.2.SA.032                  1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:08
            5.0T3   309                       
0          Source for the Greek.2 font used by IG.
00498/045  *IG                       GREEK.2A        SA  G          S0933 IGDIST FSNAME=IG.GREEK2A                                  
            5.0T1  1316  IG.GREEK.2A.SA.033                 1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:13
            5.0T3   310                       
0          Source for the Greek.2a font used by IG.
00498/046  *IG                       ITALIC.2        SA  G          S0933 IGDIST FSNAME=IG.ITALIC2                                  
            5.0T1  1317  IG.ITALIC.2.SA.034                 1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:20
            5.0T3   311                       
0          Source for the Italic.2 font used by IG.
00498/047  *IG                       ITALIC.2A       SA  G          S0933 IGDIST FSNAME=IG.ITALIC2A                                 
            5.0T1  1318  IG.ITALIC.2A.SA.035                1 LINE     72    5 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:25
            5.0T3   312                       
0          Source for the Italic.2a font used by IG.
00498/048  *IG                       ITALIC.3        SA  G          S0933 IGDIST FSNAME=IG.ITALIC3                                  
            5.0T1  1319  IG.ITALIC.3.SA.036                 1 LINE     72    8 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:30
            5.0T3   313                       
0          Source for the Italic.3 font used by IG.
00498/049  *IG                       ROMAN.2         SA  G          S0933 IGDIST FSNAME=IG.ROMAN2                                   
            5.0T1  1320  IG.ROMAN.2.SA.037                  1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:37
            5.0T3   314                       
0          Source for the Roman.2 font used by IG.
00498/050  *IG                       ROMAN.2A        SA  G          S0933 IGDIST FSNAME=IG.ROMAN2A                                  
            5.0T1  1321  IG.ROMAN.2A.SA.038                 1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:42
            5.0T3   315                       
0          Source for the Roman.2a font used by IG.
1                                                                                               SUN SEP 08/96   15:24:55   Page  233
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/051  *IG                       ROMAN.3         SA  G          S0933 IGDIST FSNAME=IG.ROMAN3                                   
            5.0T1  1322  IG.ROMAN.3.SA.039                  1 LINE     72    8 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:48
            5.0T3   316                       
0          Source for the Roman.3 font used by IG.
00498/052  *IG                       SANSERIF.CART   SA  G          S0933 IGDIST FSNAME=IG.SANSERIFC                                
            5.0T1  1323  IG.SANSERIF.CART.SA.040            1 LINE     70    3 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:54
            5.0T3   317                       
0          Source for the Sanserif.cart font used by IG.
00498/053  *IG                       SANSERIF.1      SA  G          S0933 IGDIST FSNAME=IG.SANSERIF1                                
            5.0T1  1324  IG.SANSERIF.1.SA.041               1 LINE     72    5 PAGE UM   WHIPPLE             MAR. 02, 1981  10:55:59
            5.0T3   318                       
0          Source for the Sanserif.1 font used by IG.
00498/054  *IG                       SANSERIF.2      SA  G          S0933 IGDIST FSNAME=IG.SANSERIF2                                
            5.0T1  1325  IG.SANSERIF.2.SA.042               1 LINE     72    6 PAGE UM   WHIPPLE             MAR. 02, 1981  10:56:03
            5.0T3   319                       
0          Source for the Sanserif.2 font used by IG.
00498/055  *IG                       SCRIPT.1        SA  G          S0933 IGDIST FSNAME=IG.SCRIPT1                                  
            5.0T1  1326  IG.SCRIPT.1.SA.043                 1 LINE     72    5 PAGE UM   WHIPPLE             MAR. 02, 1981  10:56:10
            5.0T3   320                       
0          Source for the Script.1 font used by IG.
00498/056  *IG                       SCRIPT.2        SA  G          S0933 IGDIST FSNAME=IG.SCRIPT2                                  
            5.0T1  1327  IG.SCRIPT.2.SA.044                 1 LINE     72    7 PAGE UM   WHIPPLE             MAR. 02, 1981  10:56:15
            5.0T3   321                       
0          Source for the Script.2 font used by IG.
00498/057  *IG                       STANDARD        SA  G          S0933 IGDIST FSNAME=IG.STANDARD                                 
            5.0T1  1328  IG.STANDARD.SA.045                 1 LINE     71    3 PAGE UM   WHIPPLE             MAR. 02, 1981  10:56:20
            5.0T3   322                       
0          Source for the Standard font used by IG.  This was formerly a part of
           the DI assembly (498/5).
0          Referenced by comments of: 498/1 
00498/058A *IG                       OLD DDR ADAPT   SA  G          GRAF:IG.DDRXF.S                                                 
            5.1T1   404  IG.OLD_DDR_ADAPT.SA.058            1 LINE    130   13 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:02
0          This is an adaptor routine which provides the new coding convention DDR
           interface to *IG and at the same time provides the old DI interface to old-
           style device-dependent routines.  All that is needed to provide a new-style
           DDR from an old one is to place the object module for the old-style DDR after
           the object module for this subcomponent in a file.  This must be done for
           all existing DDRs to use the new version of *IG.  The new DDR external symbol
1                                                                                               SUN SEP 08/96   15:24:55   Page  234
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          is #IGDDR.
0          Referenced by comments of: 498/1 
00498/059A *IG                       OLD DDR ADAPT   OC  G          *IG.DDRXF                                                       
            5.1T1   405  IG.OLD_DDR_ADAPT.OC.059            1 LINE   2740    4 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:02
                         *IG.DDRXF            
0          Object for the new IG to old-style DDR adaptor routine.  This must be
           inserted in the front of each old-style DDR file.
0          Referenced by comments of: 498/1, 498/65, 498/69, 498/75, 498/77, 498/79, 498/81, 498/83, 498/85, 498/87, 498/89,
                 498/91, 498/93, 498/95, 498/102, 498/107, 498/111, 498/113, 498/119, 498/125, 498/132, 498/135, 498/137 
00498/060  *IG                       SKELETON DDR    SA             GRAF:SKELETON.DDR                                               
            5.0T1  1331  IG.SKELETON_DDR.SA.048             1 LINE    132    9 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:16
            5.0T3   325                       
0          Source code for a skeleton DDR.  This may be filled in to produce new-style
           DDRs.
0          Referenced by comments of: 498/1 
00498/061C *IG                       AED 512 DDR     SA             GRAF:AED512.S                                                   
            5.1T1   406  IG.AED_512_DDR.SA.061              1 LINE    132   21 PAGE UQV            WHIPPLE   JULY 23, 1983  10:47:03
0          Source for the DDR for the AED 512 terminals.  This is not installed
           in a public file at UM since no one around here has one of these
           terminals.
            
           File contains MTS commands at the beginning which do not necessarily
           work.
00498/062  *IG                       *IG.AGT         SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.AGT.SA.049(1)                 1332
            5.0T1  1332  IG.*IG.AGT.SA.049                  1 LINE     89    8 PAGE UM   WHIPPLE             FEB. 26, 1977  20:24:08
            5.0T3   326                       
0          Source for the DDR for the Adage 10 refresh display.
0          Referenced by comments of: 498/1 
00498/063  *IG                       *IG.AGT         OC  G          S1558 5.0T1 VLO FSNAME=IG.*IG.AGT.OC.050(1)                 1333
            5.0T1  1333  IG.*IG.AGT.OC.050                  1 LINE     80    3 PAGE UM   WHIPPLE             MAY  11, 1977  18:47:58
            5.0T3   327                       
0          Object for the Adage Graphics Terminal DDR.
00498/064  *IG                       *IG.AJ830       SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.AJ830.SA.051(1)               1334
            5.0T1  1334  IG.*IG.AJ830.SA.051                1 LINE     93   10 PAGE UM   WHIPPLE             JULY 09, 1977  14:04:41
            5.0T3   328                       
0          Source for the DDR for the Anderson-Jacobson 830 terminal with diablo printer
           and plot option.
1                                                                                               SUN SEP 08/96   15:24:55   Page  235
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/065  *IG                       *IG.AJ830       OC  G          *IG.AJ830                                                       
            5.0T1  1335  IG.*IG.AJ830.OC.052                1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:24
            5.0T3   329  *IG.AJ830            
0          Object for the Anderson-Jacobson 830 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/066  *IG                       *IG.CCMP        SA  G          GRAF:IG.CCMP.S                                                  
            5.0T1  1336  IG.*IG.CCMP.SA.053                 1 LINE    129   13 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:25
            5.0T3   330                       
0          Source for the DDR for the CalComp plotter via *PLOTSYS.
00498/067  *IG                       *IG.CCMP        OC  G          *IG.CCMP                                                        
            5.0T1  1337  IG.*IG.CCMP.OC.054                 1 SEQ    2784    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:28
            5.0T3   331  *IG.CCMP             
0          Object for the CalComp plotter DDR.  Has a $CONTINUE WITH *PLOTSYS (615/9) card.
00498/068  *IG                       *IG.CK400       SA  G          S0933 IGDIST FSNAME=IG.CK400.S                                  
            5.0T1  1338  IG.*IG.CK400.SA.055                1 LINE     90   11 PAGE UM   WHIPPLE             AUG. 06, 1979  12:36:50
            5.0T3   332                       
0          Source for the DDR for the Computek 400 storage tube display.
00498/069  *IG                       *IG.CK400       OC  G          *IG.CK400                                                       
            5.0T1  1339  IG.*IG.CK400.OC.056                1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:48
            5.0T3   333  *IG.CK400            
0          Object for the Computek 400 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/070  *IG                       *IG.CRT         SA  G          GRAF:IG.CRT.S                                                   
            5.0T1  1340  IG.*IG.CRT.SA.057                  1 LINE    128   17 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:49
            5.0T3   334                       
0          Source for the generic CRT DDR. Produces 21 line by 70 column printer-
           plots.
00498/071  *IG                       *IG.CRT         OC  G          *IG.CRT                                                         
            5.0T1  1341  IG.*IG.CRT.OC.058                  1 LINE   4600    6 PAGE UM   WHIPPLE             JULY 03, 1981  14:21:59
            5.0T3   335  *IG.CRT              
0          Object for the generic CRT DDR.
00498/072  *IG                       *IG.DEBUG       SA  G          GRAF:IG.DEBUG.S                                                 
            5.0T1  1342  IG.*IG.DEBUG.SA.059                1 LINE    130   15 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:00
            5.0T3   336                       
0          Source for the DDR for the debugging routines DDR.
1                                                                                               SUN SEP 08/96   15:24:55   Page  236
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/073  *IG                       *IG.DEBUG       OC  G          *IG.DEBUG                                                       
            5.0T1  1343  IG.*IG.DEBUG.OC.060                1 LINE   4708    5 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:02
            5.0T3   337  *IG.DEBUG            
0          Object for the Debugging DDR.
00498/074  *IG                       *IG.DTC300      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.DTC300.SA.061(1)              1344
            5.0T1  1344  IG.*IG.DTC300.SA.061               1 LINE     95    9 PAGE UM   WHIPPLE             JULY 09, 1977  14:04:56
            5.0T3   338                       
0          Source for the DDR for the Data Terminals Corporation 300 terminal with
           diablo printer and plot option.
00498/075  *IG                       *IG.DTC300      OC  G          *IG.DTC300                                                      
            5.0T1  1345  IG.*IG.DTC300.OC.062               1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:03
            5.0T3   339  *IG.DTC300           
0          Object for the Data Terminals Corporation 300 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/076  *IG                       *IG.DTC302      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.DTC302.SA.063(1)              1346
            5.0T1  1346  IG.*IG.DTC302.SA.063               1 LINE     95    9 PAGE UM   WHIPPLE             JULY 09, 1977  14:05:02
            5.0T3   340                       
0          Source for the DDR for the Data Terminals Corporation 302 terminal with
           diablo printer and plot option.
00498/077  *IG                       *IG.DTC302      OC  G          *IG.DTC302                                                      
            5.0T1  1347  IG.*IG.DTC302.OC.064               1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:05
            5.0T3   341  *IG.DTC302           
0          Object for the Data Terminals Corporation 302 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/078  *IG                       *IG.GT40        SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.GT40.SA.065(1)                1348
            5.0T1  1348  IG.*IG.GT40.SA.065                 1 LINE     91   10 PAGE UM   WHIPPLE             MAY  01, 1977  16:06:13
            5.0T3   342                       
0          Source for the DDR for the Digital Equipment Corporation GT40 refresh display.
00498/079  *IG                       *IG.GT40        OC  G          *IG.GT40                                                        
            5.0T1  1349  IG.*IG.GT40.OC.066                 1 LINE     80    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:07
            5.0T3   343  *IG.GT40             
0          Object for the Digital Equipment Corporation GT40 refresh display DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
1                                                                                               SUN SEP 08/96   15:24:55   Page  237
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/080  *IG                       *IG.HIDP11      SA             GRAF:IG.HIDP11.S                                                
            5.0T1  1350  IG.*IG.HIDP11.SA.067               1 LINE    101   12 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:08
            5.0T3   344                       
0          Source code for the Houston Instruments DP-11 plotter DDR.
00498/081  *IG                       *IG.HIDP11      OC             *IG.HIDP11                                                      
            5.0T1  1351  IG.*IG.HIDP11.OC.068               1 LINE   3348    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:11
            5.0T3   345  *IG.HIDP11           
0          Object for the Houston Instruments DP-11 plotter DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/082  *IG                       *IG.HP2648A     SA  G          GRAF:IG.HP2648A.S                                               
            5.0T1  1352  IG.*IG.HP2648A.SA.069              1 LINE    102   11 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:12
            5.0T3   346                       
0          Source for the DDR for the Hewlitt-Packard 2648a video-graphics terminal.
            
           This code is a modified version of what was sent from UBC.
00498/083  *IG                       *IG.HP2648A     OC  G          *IG.HP2648A                                                     
            5.0T1  1353  IG.*IG.HP2648A.OC.070              1 LINE   2524    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:17
            5.0T3   347  *IG.HP2648A          
0          Object for the Hewlitt-Packard video-graphics terminal DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/084  *IG                       *IG.HP7203      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.HP7203.SA.071(1)              1354
            5.0T1  1354  IG.*IG.HP7203.SA.071               1 LINE     95    9 PAGE UM   WHIPPLE             MAY  01, 1977  16:06:18
            5.0T3   348                       
0          Source for the DDR for the Hewlitt-Packard 7203a plotter with EIA interface.
00498/085  *IG                       *IG.HP7203      OC  G          *IG.HP7203                                                      
            5.0T1  1355  IG.*IG.HP7203.OC.072               1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:19
            5.0T3   349  *IG.HP7203           
0          Object for the Hewlitt-Packard 7203 plotter DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/086  *IG                       *IG.HP7221      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.HP7221.SA.073(1)              1356
            5.0T1  1356  IG.*IG.HP7221.SA.073               1 LINE    102   17 PAGE UM   WHIPPLE             AUG. 29, 1978  01:25:18
            5.0T3   350                       
0          Source for the DDR for the Hewlitt-Packard 7221a 4-pen plotter with EIA
           interface.
1                                                                                               SUN SEP 08/96   15:24:55   Page  238
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/087  *IG                       *IG.HP7221      OC  G          *IG.HP7221                                                      
            5.0T1  1357  IG.*IG.HP7221.OC.074               1 LINE     80    5 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:21
            5.0T3   351  *IG.HP7221           
0          Object for the Hewlitt-Packard 7221 plotter DDR.
            
           Contains  a $CONTINUE WITH *IG.DDRXF RETUREN (498/59) record.
00498/088C *IG                       *IG.HP7470      SA  G          GRAF:HP7470.S                                                   
            5.1T1   407  IG.?IG.HP7470.SA.088               1 LINE    129   15 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:04
0          Source for the DDR for the Hewlett Packard 7470 terminal.
            
           File contains MTS commands at the beginning which do not necessarily
           work.
00498/089C *IG                       *IG.HP7470      OC  G          *IG.HP7470                                                      
            5.1T1   408  IG.?IG.HP7470.OC.089               1 LINE     80    6 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:04
0          Object for the DDR for the Hewlett Packard 7470 terminal.
            
           Contains  a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/090  *IG                       *IG.HUGHES      SA  G          GRAF:IG.HUGHES.S                                                
            5.0T1  1358  IG.*IG.HUGHES.SA.075               1 LINE    101   19 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:21
            5.0T3   352                       
0          Source for the DDR for the Hughes graphics terminal.
00498/091  *IG                       *IG.HUGHES      OC  G          *IG.HUGHES                                                      
            5.0T1  1359  IG.*IG.HUGHES.OC.076               1 LINE   2900    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:22:23
            5.0T3   353  *IG.HUGHES           
0          Object for the Hughes Graphics terminal DDR.
            
           Contains  a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/092  *IG                       *IG.MX12000     SA  G          S0933 IGDIST FSNAME=IG.MX12000.S                                
            5.0T1  1360  IG.*IG.MX12000.SA.077              1 LINE     94   13 PAGE UM   WHIPPLE             JAN. 04, 1979  18:39:08
            5.0T3   354                       
0          Source for the DDR for the Magnavox 12000 plasma terminal.
00498/093  *IG                       *IG.MX12000     OC  G          *IG.MX12000                                                     
            5.0T1  1361  IG.*IG.MX12000.OC.078              1 LINE     80    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:00
            5.0T3   355  *IG.MX12000          
0          Object for the Magnavox 12000 terminal DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
1                                                                                               SUN SEP 08/96   15:24:55   Page  239
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/094  *IG                       *IG.PEP         SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.PEP.SA.079(1)                 1362
            5.0T1  1362  IG.*IG.PEP.SA.079                  1 LINE     96   11 PAGE UM   WHIPPLE             JULY 09, 1977  14:06:57
            5.0T3   356                       
0          Source for the DDR for the Princeton Electronic Products 801 lithicon display.
00498/095  *IG                       *IG.PEP         OC  G          *IG.PEP                                                         
            5.0T1  1363  IG.*IG.PEP.OC.080                  1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:02
            5.0T3   357  *IG.PEP              
0          Object for the Princeton Electronic Products 801 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/096  *IG                       *IG.PICK        SA  G          GRAF:IG.PICK.S                                                  
            5.0T1  1364  IG.*IG.PICK.SA.081                 1 LINE    129    8 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:03
            5.0T3   358                       
0          Source for the Pick Simulator DDR.
00498/097  *IG                       *IG.PICK        OC  G          *IG.PICK                                                        
            5.0T1  1365  IG.*IG.PICK.OC.082                 1 LINE   1284    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:09
            5.0T3   359  *IG.PICK             
0          Object for the Pick Simulator DDR.
00498/098  *IG                       *IG.PRINTER     SA  G          GRAF:IG.PRINTER.S                                               
            5.0T1  1366  IG.*IG.PRINTER.SA.083              1 LINE    132   17 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:10
            5.0T3   360                       
0          Source for the generalized DDR for printer plots. (This is a complete rewrite
           of the old IG.PRNT routine.)  Copies *GDINFODSECT (594).
            
           This DDR adapts itself to the maximum output width of the device it's used on. 
00498/099  *IG                       *IG.PRINTER     OC  G          *IG.PRINTER                                                     
            5.0T1  1367  IG.*IG.PRINTER.OC.084              1 LINE   4752    6 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:12
            5.0T3   361  *IG.PRINTER          
0          Object for the general printer-plot DDR.
00498/100C *IG                       PRINTRONIX DDR  SA  G          GRAF:PRINTRONIX.S(1)                                            
            5.1T1   409  IG.PRINTRONIX_DDR.SA.100           1 LINE     70    8 PAGE UBC            WHIPPLE   JULY 23, 1983  10:47:05
0          Source for the DDR for the Printronix terminal.  This is not installed
           in a public file at UM since no one around here has one of these.
00498/101  *IG                       *IG.QUMES5      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.QUMES5.SA.085(1)              1368
            5.0T1  1368  IG.*IG.QUMES5.SA.085               1 LINE     92   10 PAGE UM   WHIPPLE             JAN. 04, 1979  18:38:55
            5.0T3   362                       
0          Source for the DDR for the Qume Sprint5 terminal with diablo-style printer.
1                                                                                               SUN SEP 08/96   15:24:55   Page  240
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/102  *IG                       *IG.QUMES5      OC  G          *IG.QUMES5                                                      
            5.0T1  1369  IG.*IG.QUMES5.OC.086               1 LINE     80    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:22
            5.0T3   363  *IG.QUMES5           
0          Object for the Qumes5 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/103A *IG                       *IG.SAVE        SA  G          GRAF:IG.SAVE.S                                                  
            5.1T1   410  IG.?IG.SAVE.SA.103                 1 LINE    129   14 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:06
0          Source for the fake DDR which does saving of objects.
00498/104A *IG                       *IG.SAVE        OC  G          *IG.SAVE                                                        
            5.1T1   411  IG.?IG.SAVE.OC.104                 1 LINE   3042    6 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:06
                         *IG.SAVE             
0          Object for the Object-Save fake DDR.
00498/105C *IG                       SELANAR DDR     SA  G          GRAF:SELANAR.S(9)                                               
            5.1T1   412  IG.SELANAR_DDR.SA.105              1 LINE     73   16 PAGE RPI            WHIPPLE   JULY 23, 1983  10:47:07
0          Source for the DDR for the VT 100 Selanar terminal.  This is not installed
           in a public file at UM since no one around here has one of these terminals.
00498/106  *IG                       *IG.TD4000      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.TD4000.SA.089(1)              1372
            5.0T1  1372  IG.*IG.TD4000.SA.089               1 LINE     92    9 PAGE UM   WHIPPLE             JULY 09, 1977  14:07:12
            5.0T3   366                       
0          Source for the DDR for the Trend Data 4000 terminal with diablo printer and
           plot option.
00498/107  *IG                       *IG.TD4000      OC  G          *IG.TD4000                                                      
            5.0T1  1373  IG.*IG.TD4000.OC.090               1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:27
            5.0T3   367  *IG.TD4000           
0          Object for the Trend Data 4000 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/108C *IG                       TELIDON DDR     SA  G          GRAF:TELIDON.S                                                  
            5.1T1   413  IG.TELIDON_DDR.SA.108              1 LINE    132   18 PAGE UBC            WHIPPLE   JULY 23, 1983  10:47:07
0          Source for the DDR for the Telidon terminal.  This is not installed in a
           public file at UM since no one around here has one of these terminals.
            
           File contains MTS commands at the beginning which do not necessarily
           work.
0          Referenced by comments of: 498/109 
1                                                                                               SUN SEP 08/96   15:24:55   Page  241
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/109C *IG                       PDIFILE DDR     UC  G          GRAF:PDIFILE.U                                                  
            5.1T1   414  IG.PDIFILE_DDR.UC.109              1 LINE    128    2 PAGE UBC            WHIPPLE   JULY 23, 1983  10:47:09
0          Update to (498/108) to make it write Telidon output to a file.
00498/110  *IG                       *IG.TX4002      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.TX4002.SA.091(1)              1374
            5.0T1  1374  IG.*IG.TX4002.SA.091               1 LINE     96   10 PAGE UM   WHIPPLE             JULY 09, 1977  14:07:23
            5.0T3   368                       
0          Source for the DDR for the Tektronix 4002 storage tube display.
00498/111  *IG                       *IG.TX4002      OC  G          *IG.TX4002                                                      
            5.0T1  1375  IG.*IG.TX4002.OC.092               1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:28
            5.0T3   369  *IG.TX4002           
0          Object for the Tektronix 4002 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/112  *IG                       *IG.TX4006      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.TX4006.SA.093(1)              1376
            5.0T1  1376  IG.*IG.TX4006.SA.093               1 LINE     95   11 PAGE UM   WHIPPLE             JULY 09, 1977  14:07:28
            5.0T3   370                       
0          Source for the DDR for the Tektronix 4006 storage tube display.
00498/113  *IG                       *IG.TX4006      OC  G          *IG.TX4006                                                      
            5.0T1  1377  IG.*IG.TX4006.OC.094               1 LINE     80    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:30
            5.0T3   371  *IG.TX4006           
0          Object for the Tektronix 4006 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/114  *IG                       *IG.TX4010      SA  G          GRAF:IG.TX4010.S                                                
            5.0T1  1378  IG.*IG.TX4010.SA.095               1 LINE    131   16 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:30
            5.0T3   372                       
0          Source for the DDR for the Tektronix 4010 storage tube display.
00498/115  *IG                       *IG.TX4010      OC  G          *IG.TX4010                                                      
            5.0T1  1379  IG.*IG.TX4010.OC.096               1 SEQ    3776    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:36
            5.0T3   373  *IG.TX4010           
0          Object for the Tektronix 4010 DDR.
00498/116  *IG                       *IG.TX4014      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.TX4014.SA.097(1)              1380
            5.0T1  1380  IG.*IG.TX4014.SA.097               1 LINE    105   12 PAGE UM   WHIPPLE             OCT. 11, 1977  19:01:55
            5.0T3   374                       
0          Source for the DDR for the Tektronix 4014 storage tube display.
1                                                                                               SUN SEP 08/96   15:24:55   Page  242
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/117  *IG                       *IG.TX4014      OC  G          *IG.TX4014                                                      
            5.0T1  1381  IG.*IG.TX4014.OC.098               1 LINE   3902    5 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:57
            5.0T3   375  *IG.TX4014           
0          Object for the Tektronix 4014 DDR.
00498/118  *IG                       *IG.TX4025      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.TX4025.SA.099(1)              1382
            5.0T1  1382  IG.*IG.TX4025.SA.099               1 LINE     95   11 PAGE UM   WHIPPLE             APR. 08, 1978  16:57:48
            5.0T3   376                       
0          Source for the DDR for the Tektronix 4025 storage tube display.
00498/119  *IG                       *IG.TX4025      OC  G          *IG.TX4025                                                      
            5.0T1  1383  IG.*IG.TX4025.OC.100               1 LINE     80    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:58
            5.0T3   377  *IG.TX4025           
0          Object for the Tektronix 4025 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/120C *IG                       *IG.TX4025GIN   SA  G          GRAF:TX4025GIN.S                                                
            5.1T1   415  IG.?IG.TX4025GIN.SA.120            1 LINE    131   15 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:09
0          Source for the DDR for the Tektronics 4025 terminal with graphics input.
            
           File contains MTS commands at the beginning which do not necessarily
           work.
00498/121C *IG                       *IG.TX4025GIN   OC  G          *IG.TX4025GIN                                                   
            5.1T1   416  IG.?IG.TX4025GIN.OC.121            1 LINE   3484    5 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:10
0          Object for the Tektronics 4025 terminal with graphics input.
00498/122  *IG                       *IG.TX4027      SA  G          GRAF:IG.TX4027.S                                                
            5.0T1  1384  IG.*IG.TX4027.SA.101               1 LINE    131   17 PAGE UM   WHIPPLE             JULY 03, 1981  14:23:59
            5.0T3   378                       
0          Source for the DDR for the Tektronix 4027 raster display.
00498/123  *IG                       *IG.TX4027      OC  G          *IG.TX4027                                                      
            5.0T1  1385  IG.*IG.TX4027.OC.102               1 LINE   4140    5 PAGE UM   WHIPPLE             JULY 03, 1981  14:24:02
            5.0T3   379  *IG.TX4027           
0          Object for the Tektronix 4027 DDR.
00498/124  *IG                       *IG.TX4662      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.TX4662.SA.103(1)              1386
            5.0T1  1386  IG.*IG.TX4662.SA.103               1 LINE    102   12 PAGE UM   WHIPPLE             JAN. 04, 1979  18:39:03
            5.0T3   380                       
0          Source for the DDR for the Tektronix 4662 digital plotter.
1                                                                                               SUN SEP 08/96   15:24:55   Page  243
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/125  *IG                       *IG.TX4662      OC  G          *IG.TX4662                                                      
            5.0T1  1387  IG.*IG.TX4662.OC.104               1 LINE     80    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:24:04
            5.0T3   381  *IG.TX4662           
0          Object for the Tektronix 4662 plotter DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/126  *IG                       *IG.TX4663      SA  O          GRAF:IG.TX4663.S                                                
            5.0T1  1388  IG.*IG.TX4663.SA.105               1 LINE    131   17 PAGE UM   WHIPPLE             JULY 03, 1981  14:24:05
            5.0T3   382                       
0          Source for the Tektronix 4663 plotter DDR.
00498/127  *IG                       *IG.TX4663      OC  O          *IG.TX4663                                                      
            5.0T1  1389  IG.*IG.TX4663.OC.106               1 LINE   4372    6 PAGE UM   WHIPPLE             JULY 03, 1981  14:24:11
            5.0T3   383  *IG.TX4663           
0          Object for the Tektronix 4663 plotter DDR.
00498/128C *IG                       VT640 DDR       SA  G          GRAF:VT640.S(9)                                                 
            5.1T1   417  IG.VT640_DDR.SA.128                1 LINE     73   17 PAGE RPI            WHIPPLE   JULY 23, 1983  10:47:10
0          Source for the DDR for the Retro-graphics VT 640 terminal.  This is not
           in a public file at UM since no one around here has one of these terminals.
            
00498/129  *IG                       *IG.VUCOM       SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.VUCOM.SA.107(1)               1390
            5.0T1  1390  IG.*IG.VUCOM.SA.107                1 LINE     93    6 PAGE UM   WHIPPLE             FEB. 26, 1977  20:28:30
            5.0T3   384                       
0          Source for the DDR for the Vucom terminal.
00498/130  *IG                       *IG.VUCOM       OC  G          S0933 IGDIST FSNAME=IG.VUCOM.O                                  
            5.0T1  1391  IG.*IG.VUCOM.OC.108                1 LINE     80    3 PAGE UM   WHIPPLE             JUNE 16, 1976  19:09:45
            5.0T3   385                       
0          Object for the Vucom terminal DDR.
            
00498/131  *IG                       *IG.XX1620      SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.XX1620.SA.109(1)              1392
            5.0T1  1392  IG.*IG.XX1620.SA.109               1 LINE     95    9 PAGE UM   WHIPPLE             JULY 09, 1977  21:46:28
            5.0T3   386                       
0          Source for the DDR for the Xerox 1620 terminal with diablo printer.
00498/132  *IG                       *IG.XX1620      OC  G          *IG.XX1620                                                      
            5.0T1  1393  IG.*IG.XX1620.OC.110               1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:24:23
            5.0T3   387  *IG.XX1620           
0          Object for the Xerox 1620 terminal DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
1                                                                                               SUN SEP 08/96   15:24:55   Page  244
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/133  *IG                       *IG.ZETA        SA  G          S0933 IGDIST FSNAME=IG.ZETA.S                                   
            5.0T1  1394  IG.*IG.ZETA.SA.111                 1 LINE    101   12 PAGE UM   WHIPPLE             AUG. 06, 1979  12:38:34
            5.0T3   388                       
0          Source for the DDR for the Zeta plotter developed by NCSS.
            
           *************************************************************************
           D5.0 version:
            
           Needs some changes to run in MTS.  Object not distributed.
           *************************************************************************
00498/134  *IG                       *IG.3270        SA  G          GRAF:IG.3278.S                                                  
            5.0T1  1395  IG.*IG.3270.SA.112                 1 LINE     93    9 PAGE UM   WHIPPLE             JULY 03, 1981  14:25:18
            5.0T3   389                       
0          Source for the DDR for the IBM 3278 terminals.
            
           This is a slightly modified version of the DDR received from UBC.
           Changes were to fix a bug in graphic input.
00498/135  *IG                       *IG.3270        OC  G          *IG.3270                                                        
            5.0T1  1396  IG.*IG.3270.OC.113                 1 LINE   2859    4 PAGE UM   WHIPPLE             JULY 03, 1981  14:25:20
            5.0T3   390  *IG.3270             
0          Object for the IBM 3278 terminal DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
00498/136  *IG                       *IG.339         SA  G          S1558 5.0T1 VLO FSNAME=IG.*IG.339.SA.114(1)                 1397
            5.0T1  1397  IG.*IG.339.SA.114                  1 LINE     96    6 PAGE UM   WHIPPLE             APR. 08, 1978  16:58:02
            5.0T3   391                       
0          Source for the DDR for the Digital Equipment Corporation 339 refresh display.
00498/137  *IG                       *IG.339         OC  G          *IG.339                                                         
            5.0T1  1398  IG.*IG.339.OC.115                  1 LINE     80    3 PAGE UM   WHIPPLE             JULY 03, 1981  14:25:22
            5.0T3   392  *IG.339              
0          Object for the Digital Equipment Corporation 339 DDR.
            
           Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record.
0          Referenced by comments of: 498/1 
00498/138A *IG                       INTERACTIVE IG  SQ  G          GRAF:IAIG.S                                                     
            5.1T1   418  IG.INTERACTIVE_IG.SQ.138           1 LINE    142   13 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:11
0          Source for an interactive version of IG requiring no programming on part
           of user. Written in PLUS using *CLPARSER. May be used as a graphics
           monitor by calling the entry IAIG.
0          Referenced by comments of: 498/1, 498/142, 498/143 
1                                                                                               SUN SEP 08/96   15:24:55   Page  245
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/139A *IG                       INTERACTIVE IG  SA  G          GRAF:IAIG.ASM.S                                                 
            5.1T1   419  IG.INTERACTIVE_IG.SA.139           1 LINE     99    3 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:11
0          Source for the assembler interface to Interactive IG.  This is a slight
           modification of what is normally PLUSMAIN in (1042/56).
00498/140A *IG                       INTERACTIVE IG  SQ  G          GRAF:IG.PLUSLIB                                                 
            5.1T1   420  IG.INTERACTIVE_IG.SQ.140           1 LINE     77   13 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:12
0          Library containing PLUS declarations and dummy declarations for the IG
           routines. 
00498/141A *IG                       INTERACTIVE IG  D   G          GRAF:IAIG.GR                                                    
            5.1T1   421  IG.INTERACTIVE_IG.D.141            1 LINE    112    6 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:12
0          This the PLUS grammar for Interactive IG.
00498/142A *IG                       IAIG MISC FNS   SQ  G          W279:PLUSFNS*SQ                                                 
            5.1T1   422  IG.IAIG_MISC_FNS.SQ.142            1 LINE    107    3 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:13
0          Source for miscellaneous functions used by IAIG.S (498/138).  Mostly have
           to do with converting real numbers to and from strings.
0          Referenced by comments of: 498/145 
00498/143A *IG                       IAIG MISC FNS   SQ  G          W279:PLUSFNS*SQL                                                
            5.1T1   423  IG.IAIG_MISC_FNS.SQ.143            1 LINE     61    2 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:13
0          Library of PLUS declarations for the miscellaneous functions used by IAIG.S (498/138).
00498/144A *IG                       INTERACTIVE IG  M   G          GRAF:IAIG.HELP                                                  
            5.1T1   424  IG.INTERACTIVE_IG.M.144            1 LINE     79    5 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:14
0          This is the help file for Interactive IG.
            
           *************************************************************************
           D5.0 changes:
            
           This file is grossly incomplete.
           *************************************************************************
00498/145A *IG                       INTERACTIVE IG  OC  G          GRAF:IAIG.O                                                     
            5.1T1   425  IG.INTERACTIVE_IG.OC.145           1 LINE   8248   16 PAGE UM   WHIPPLE             JULY 23, 1983  10:47:14
0          Object code for Interactive IG.  Contains all necessary parts of 
           PLUS:OBJLIB (1042/56), *CLPARSER (1076/6), and GRAF:PLUSFNS.S (498/142).
            
           Contains a "$CONTINUE WITH GRAF:NEWIG" card, which should by changed to 
           "$CONTINUE WITH *IG" at other installations.
0          Referenced by comments of: 498/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  246
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00498/146  *IG                       IMPLEMENTATION  WF             S1558 5.0T1 VLO FSNAME=IG.IMPLEMENTATION.WF.124(1)          1407
            5.0T1  1407  IG.IMPLEMENTATION.WF.124           1 LINE    145   25 PAGE UM   WHIPPLE             AUG. 29, 1978  01:29:16
            5.0T3   401                       
0          The Integrated Graphics internal guts and implementation guide.
            
           *************************************************************************
           D5.0 version:
            
           Currently obsolete.
           *************************************************************************
0          Referenced by comments of: 498/1 
00498/147  *IG                       EGP WRITEUP     WX             GRAF:IG.EGP.WX                                                  
            5.0T1  1408  IG.EGP_WRITEUP.WX.125              1 LINE     78    5 PAGE UM   WHIPPLE             JULY 03, 1981  14:25:44
            5.0T3   402                       
0          A writeup for External Graphics Procedures.
            
           **************************************************************************
           D5.0 version:
            
           Note:  This is a first cut.  Comments and suggestions would be welcome.
           **************************************************************************
0          Referenced by comments of: 498/1 
00498/148  *IG                       ETC:IG.STAT     D            # ETC:IG.STAT                                                     
                                                                                    UM   WHIPPLE                                    
                         ETC:IG.STAT@E        
0          File for accumulating usage statistics.
0          Referenced by comments of: 498/1, 498/31 
00500/001A  BILLING                  BLSIGCK         SG  G          S0027 DISTRB FSNAME=BLSIGCK                                     
            5.1T1   426  BILLING.BLSIGCK.SG.001             1 LINE     94    3 PAGE UM   ENGLE               AUG. 25, 1982  10:44:32
0          PROGRAM TO LIST ALL SIGNONS WHICH WERE MADE DURING THE BILLING PERIOD AND
           ARE STILL SIGNED ON OR WHICH STILL HAVE A STATISTICS RECORD IN THE 
           STATISTICS FILE.  IF SIGONSCN (500/51) DETECTS AN INCONSISTENCY, THIS
           PROGRAM ATTEMPTS TO CORRECT THE SITUATION BY REASSEMBLING THE SUBROUTINE
           ON THE ASSUMPTION THAT THE MTS DSECT HAS BEEN CHANGED.  PKEY=BILL:BLSIGCK.
           RUN WITH PROT=OFF.
0          Referenced by comments of: 500/51 
00500/002C  BILLING                  BLSIGCK         UC  G          S0027 DISTRB FSNAME=BLSIGCKUPD                                  
            5.1T1   427  BILLING.BLSIGCK.UC.002             1 LINE     71    1 PAGE UM   ENGLE               AUG. 25, 1982  10:44:37
0          Updates source from previous regular distribution to current one.
1                                                                                               SUN SEP 08/96   15:24:55   Page  247
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00500/003A  BILLING                  BLSIGCK         OC  G          S0027 DISTRB FSNAME=BLSC                                        
            5.1T1   428  BILLING.BLSIGCK.OC.003             1 LINE     80    5 PAGE UM   ENGLE               AUG. 25, 1982  10:44:43
00500/004A  BILLING                  BILLRFT         SP  G  BLRF    S0027 DISTRB FSNAME=BILLRFT                                     
            5.1T1   429  BILLING.BILLRFT.SP.004             1 LINE     80   24 PAGE UM   ENGLE               AUG. 25, 1982  11:06:42
0          PROGRAM TO REFORMAT STATISTICS RECORDS, HAND BILLING RECORDS, OS/360 BILLING RECORDS, AND NETWORK
           RECORDS FOR BILLING SORT.
0          Referenced by comments of: 500/29, 500/37, 500/43 
00500/005A  BILLING                  BILLRFT         UC  G          S0027 DISTRB FSNAME=BILLRFTUPD                                  
            5.1T1   430  BILLING.BILLRFT.UC.005             1 LINE     72    4 PAGE UM   ENGLE               AUG. 25, 1982  11:06:51
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/006A  BILLING                  BILLRFT         OC  G          S0027 DISTRB FSNAME=BLRF                                        
            5.1T1   431  BILLING.BILLRFT.OC.006             1 LINE     80   23 PAGE UM   ENGLE               AUG. 25, 1982  11:07:25
0          REFORMATTING PROGRAM FOR REGULAR BILLING (COMPILED WITH %NET='';).
00500/007A  BILLING                  BILLRFT         OC  G          S0027 DISTRB FSNAME=NETBLRF                                     
            5.1T1   432  BILLING.BILLRFT.OC.007             1 LINE     80   19 PAGE UM   ENGLE               AUG. 25, 1982  11:08:14
0          REFORMATTING PROGRAM FOR NETWORK BILLING (COMPILED WITH %NET='YES';).
00500/008A  BILLING                  BILLING         SP  G  BILL    S0027 DISTRB FSNAME=BILLING                                     
            5.1T1   433  BILLING.BILLING.SP.008             1 LINE     80   33 PAGE UM   ENGLE               MAY  25, 1983  16:21:09
0          PROGRAM TO DO MAIN PART OF BILLING AFTER SORT.
0          Referenced by comments of: 500/29, 500/31, 500/45 
00500/009A  BILLING                  BILLING         UC  G          S0027 DISTRB FSNAME=BILLINGUPD                                  
            5.1T1   434  BILLING.BILLING.UC.009             1 LINE     72    5 PAGE UM   ENGLE               MAY  25, 1983  16:21:27
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/010A  BILLING                  BILLING         OC  G          S0027 DISTRB FSNAME=BILL                                        
            5.1T1   435  BILLING.BILLING.OC.010             1 LINE     80   28 PAGE UM   ENGLE               AUG. 25, 1982  11:12:48
0          REGULAR BILLING (COMPILED WITH %NET='';).
00500/011A  BILLING                  BILLING         OC  G          S0027 DISTRB FSNAME=NETBILL                                     
            5.1T1   436  BILLING.BILLING.OC.011             1 LINE     80   17 PAGE UM   ENGLE               MAY  25, 1983  16:21:34
0          NETWORK BILLING (COMPILED WITH %NET='YES';).
00500/012A  BILLING                  BILPRNT         SP  G  BLPR    S0027 DISTRB FSNAME=BILPRNT                                     
            5.1T1   437  BILLING.BILPRNT.SP.012             1 LINE     80   14 PAGE UM   ENGLE               MAY  25, 1983  16:22:48
0          PROGRAM TO PRINT BILLING REPORTS.
0          Referenced by comments of: 500/30, 500/47 
1                                                                                               SUN SEP 08/96   15:24:55   Page  248
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00500/013C  BILLING                  BILPRNT         UC  G          S0027 DISTRB FSNAME=BILPRNTUPD                                  
            5.1T1   438  BILLING.BILPRNT.UC.013             1 LINE     72    4 PAGE UM   ENGLE               MAY  25, 1983  16:22:59
0          Updates source from previous regular distribution to current one.
00500/014A  BILLING                  BILPRNT         OC  G          S0027 DISTRB FSNAME=BLPR                                        
            5.1T1   439  BILLING.BILPRNT.OC.014             1 LINE     80   16 PAGE UM   ENGLE               MAY  25, 1983  16:23:07
00500/015A  BILLING                  BILLUTIL        SG  G          S0027 DISTRB FSNAME=BILLUTIL                                    
            5.1T1   440  BILLING.BILLUTIL.SG.015            1 LINE    194    2 PAGE UM   ENGLE               AUG. 25, 1982  11:25:46
0          PROGRAM TO EXTRACT MONTHLY INFORMATION FROM THE FILE DIVISION (500/30) AND
           ENTER IT INTO THE UTILIZATION DATA BANK (500/32).
0          Referenced by comments of: 500/32, 500/56 
00500/016A  BILLING                  BILLUTIL        UC  G          S0027 DISTRB FSNAME=BILLUTILUPD                                 
            5.1T1   441  BILLING.BILLUTIL.UC.016            1 LINE    194    1 PAGE UM   ENGLE               AUG. 25, 1982  11:26:32
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/017A  BILLING                  BILLUTIL        OC  G          S0027 DISTRB FSNAME=BLUT                                        
            5.1T1   442  BILLING.BILLUTIL.OC.017            1 LINE     80    4 PAGE UM   ENGLE               AUG. 25, 1982  11:26:43
00500/018A  BILLING                  BLPRVUTL        SG  G          S0027 DISTRB FSNAME=BLPRVUTL                                    
            5.1T1   443  BILLING.BLPRVUTL.SG.018            1 LINE     88    1 PAGE UM   ENGLE               AUG. 25, 1982  11:57:24
0          PROGRAM TO PRODUCE INPUT FOR TAXIR (668) SPECIFYING THE HEADING, MONTH, AND
           YEAR FOR A REPORT FOR THE PREVIOUS MONTH.
00500/019A  BILLING                  BLPRVUTL        UC  G          S0027 DISTRB FSNAME=BLPRVUTLUPD                                 
            5.1T1   444  BILLING.BLPRVUTL.UC.019            1 LINE     88    1 PAGE UM   ENGLE               AUG. 25, 1982  11:57:29
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/020A  BILLING                  BLPRVUTL        OC  G          S0027 DISTRB FSNAME=BPRU                                        
            5.1T1   445  BILLING.BLPRVUTL.OC.020            1 LINE     80    3 PAGE UM   ENGLE               AUG. 25, 1982  11:57:34
00500/021A  BILLING                  UTILSORT        SG  G          S0027 DISTRB FSNAME=UTILSORT                                    
            5.1T1   446  BILLING.UTILSORT.SG.021            1 LINE     71    1 PAGE UM   ENGLE               AUG. 25, 1982  12:06:02
0          PROGRAM TO SORT TAXIR (668) OUTPUT FROM THE UTILIZATION DATA BANK (500/32).
           SEE BILLSOURCE (500/28) FOR SOURCE COMMANDS UTILIZING THIS PROGRAM.
00500/022A  BILLING                  UTILSORT        UC  G          S0027 DISTRB FSNAME=UTILSORTUPD                                 
            5.1T1   447  BILLING.UTILSORT.UC.022            1 LINE     67    1 PAGE UM   ENGLE               AUG. 25, 1982  12:06:08
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/023A  BILLING                  UTILSORT        OC  G          S0027 DISTRB FSNAME=UTLS                                        
            5.1T1   448  BILLING.UTILSORT.OC.023            1 LINE     80    3 PAGE UM   ENGLE               AUG. 25, 1982  12:06:12
1                                                                                               SUN SEP 08/96   15:24:55   Page  249
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00500/024A  BILLING                  STATEMNT        SG  G          S0027 DISTRB FSNAME=STATEMNT                                    
            5.1T1   449  BILLING.STATEMNT.SG.024            1 LINE    158    6 PAGE UM   ENGLE               AUG. 25, 1982  12:09:41
0          PROGRAM TO PRODUCE COMPARATIVE STATEMENTS SHOWING FIGURES FOR "CURRENT"
           MONTH AND YEAR-TO-DATE FOR BOTH THE "CURRENT" YEAR AND THE PREVIOUS YEAR.
           AN INDICATION OF THE VALUES FOR THE PAR= FIELD IS GIVEN AT THE BEGINNING
           OF THE PROGRAM.  SEE BILLSOURCE (500/28) FOR SOURCE COMMANDS UTILIZING
           THIS PROGRAM.  FIRST LINE OF REPORT IS "THE UNIVERSITY OF MICHIGAN COMPUTING
           CENTER."
00500/025A  BILLING                  STATEMNT        UC  G          S0027 DISTRB FSNAME=STATEMNTUPD                                 
            5.1T1   450  BILLING.STATEMNT.UC.025            1 LINE    158    1 PAGE UM   ENGLE               AUG. 25, 1982  12:09:45
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/026A  BILLING                  STATEMNT        OC  G          S0027 DISTRB FSNAME=STMT                                        
            5.1T1   451  BILLING.STATEMNT.OC.026            1 LINE     80   10 PAGE UM   ENGLE               AUG. 25, 1982  12:09:51
00500/027A  BILLING                  BILLWRITEUP     WF  G          S0027 DISTRB FSNAME=BILLWRITEUP                                 
            5.1T1   452  BILLING.BILLWRITEUP.WF.027         1 LINE     82   10 PAGE UM   ENGLE               AUG. 25, 1982  15:48:27
0          WRITEUP FOR RUNNING BILLING.
00500/028A  BILLING                  BILLSOURCE      C              S0027 DISTRB FSNAME=BILLSOURCE                                  
            5.1T1   453  BILLING.BILLSOURCE.C.028           1 LINE    508    9 PAGE UM   ENGLE               MAY  25, 1983  16:31:45
0          COMMAND FILE FOR RUNNING BILLING.  LINE NUMBERS IN THIS FILE ARE IMPORTANT TO
           THE RESTART FILE (500/33).
0          Referenced by comments of: 500/21, 500/24, 500/33 
00500/029A  BILLING                  BILLTABLES      D              S0027 DISTRB FSNAME=BILLTABLES                                  
            5.1T1   454  BILLING.BILLTABLES.D.029           1 LINE     76    4 PAGE UM   ENGLE               MAY  25, 1983  16:28:19
0          MACHINE READABLE TABLE OF INFORMATION USED BY BILLING.  READ DURING EXECUTION OF BILLRFT (500/4) AND 
           BILLING (500/8).
00500/030   BILLING                  DIVISION        D              BILL:DIVISION                                                   
            5.0T1  1435  BILLING.DIVISION.D.029             1 LINE    104   27 PAGE UM   ENGLE               JULY 03, 1981  14:26:59
            5.0T3   429                       
0          MACHINE READABLE TABLE OF UNIVERSITY UNITS ACCORDING TO UNIT CODE.  READ AND WRITTEN BY BILPRNT (500/12).
0          Referenced by comments of: 500/15, 500/56 
00500/031A  BILLING                  COVER           D              S0027 DISTRB FSNAME=COVER                                       
            5.1T1   455  BILLING.COVER.D.031                1 LINE     66    1 PAGE UM   ENGLE               MAY  25, 1983  16:28:36
0          MACHINE READABLE COVER LETTER FOR LISTINGS OF INDIVIDUAL RUNS.  READ BY BILLING (500/8).
00500/032A  BILLING                  UTILIZATION     D   G          S0027 DISTRB FSNAME=UTILIZATION                                 
            5.1T1   456  BILLING.UTILIZATION.D.032          1 LINE    616    1 PAGE UM   ENGLE               AUG. 25, 1982  17:32:49
0          SKELETON TAXIR (668) UTILIZATION DATA BANK (I.E., THE DATA BANK WITHOUT THE
1                                                                                               SUN SEP 08/96   15:24:55   Page  250
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          DATA).  CALENDAR YEAR RANGE IS 1979 THROUGH 1985.  FISCAL YEAR RANGE IS 79-80
           THROUGH 85-86.  THIS DATA BANK IS UPDATED USING BILLUTIL (500/15).
0          Referenced by comments of: 500/15, 500/21 
00500/033A  BILLING                  RESTART         C              S0027 DISTRB FSNAME=RESTART                                     
            5.1T1   457  BILLING.RESTART.C.033              1 LINE     46    1 PAGE UM   ENGLE               AUG. 25, 1982  17:33:44
0          COMMAND FILE TO RESTART IN THE MIDDLE OF THE BILLING PROCESS AFTER SOME PARTS HAVE BEEN COMPLETED.
           HAS $CONTINUE WITH'S TO BILLSOURCE (500/28). LINE NUMBERS IN THIS FILE ARE IMPORTANT.
0          Referenced by comments of: 500/28 
00500/034A  BILLING                  BILLLIB         OL  G          S0027 DISTRB FSNAME=BILLLIB                                     
            5.1T1   458  BILLING.BILLLIB.OL.034             1 LINE    456   13 PAGE UM   ENGLE               AUG. 25, 1982  17:37:43
0          LIBRARY FOR BILLING PROGRAMS.  ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD.
00500/035   BILLING                  FLUSH           SP  G          S1558 5.0T1 VLO FSNAME=BILLING.FLUSH.SP.034(1)              1440
            5.0T1  1440  BILLING.FLUSH.SP.034               1 LINE     80    1 PAGE UM   ENGLE               JUNE 07, 1973  10:28.44
            5.0T3   434                       
0          SUBROUTINE TO FORCE A LINE OF OUTPUT TO A PL/I STREAM FILE (PUT STATEMENTS) TO BE PRINTED NOW (DAMNIT),
           E.G., ON A TERMINAL FOR PROMPTING FOR INPUT.
00500/036   BILLING                  FLUSH           OC  G          S1558 5.0T1 VLO FSNAME=BILLING.FLUSH.OC.035(1)              1441
            5.0T1  1441  BILLING.FLUSH.OC.035               1 LINE     80    1 PAGE UM   ENGLE               JAN. 08, 1974  15:46.26
            5.0T3   435                       
00500/037   BILLING                  BLPRJFL         SA  G          S1558 5.0T1 VLO FSNAME=BILLING.BLPRJFL.SA.036(1)            1442
            5.0T1  1442  BILLING.BLPRJFL.SA.036             1 LINE     80    4 PAGE UM   ENGLE               DEC. 06, 1974  13:12.59
            5.0T3   436                       
0          SUBROUTINE TO READ THE NEXT PROJECT RECORD FROM *PROJECT.  CALLED BY BILLRFT (500/4).
           COPIES ACCPROJFMT (104/3).
00500/038   BILLING                  BLPRJFL         OC  G          S1558 5.0T1 VLO FSNAME=BILLING.BLPRJFL.OC.037(1)            1443
            5.0T1  1443  BILLING.BLPRJFL.OC.037             1 LINE     80    1 PAGE UM   ENGLE               DEC. 06, 1974  13:13.11
            5.0T3   437                       
00500/039   BILLING                  PNLIST          SP  G          S1558 5.0T1 VLO FSNAME=BILLING.PNLIST.SP.038(1)             1444
            5.0T1  1444  BILLING.PNLIST.SP.038              1 LINE     80    5 PAGE UM   ENGLE               JAN. 10, 1979  16:34:56
            5.0T3   438                       
0          PROGRAM TO PRODUCE LISTINGS OF PROJECT NUMBERS IN *PROJECT SORTED BY UNIVERSITY ACCOUNT NUMBER, INTER-DEPARTMENTAL
           REQUISITION NUMBER, UNIT CODE, AND NAME.
0          Referenced by comments of: 500/41 
00500/040   BILLING                  PNLIST          OC  G          S1558 5.0T1 VLO FSNAME=BILLING.PNLIST.OC.039(1)             1445
            5.0T1  1445  BILLING.PNLIST.OC.039              1 LINE     80    6 PAGE UM   ENGLE               FEB. 12, 1979  11:52:37
            5.0T3   439                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  251
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00500/041   BILLING                  PNLSEXTR        SA  G          S1558 5.0T1 VLO FSNAME=BILLING.PNLSEXTR.SA.040(1)           1446
            5.0T1  1446  BILLING.PNLSEXTR.SA.040            1 LINE     80    3 PAGE UM   ENGLE               DEC. 06, 1974  13:16.12
            5.0T3   440                       
0          SUBROUTINE TO EXTRACT PROJECT INFORMATION FOR PNLIST (500/39).  CALLED BY PRJLIST (104/51) WHICH IS CALLED BY PNLIST.
           COPIES ACCPROJFMT (104/3).
00500/042   BILLING                  PNLSEXTR        OC  G          S1558 5.0T1 VLO FSNAME=BILLING.PNLSEXTR.OC.041(1)           1447
            5.0T1  1447  BILLING.PNLSEXTR.OC.041            1 LINE     80    1 PAGE UM   ENGLE               DEC. 06, 1974  13:16.32
            5.0T3   441                       
00500/043   BILLING                  BLRECPR         SP  G          S1558 5.0T1 VLO FSNAME=BILLING.BLRECPR.SP.042(1)            1448
            5.0T1  1448  BILLING.BLRECPR.SP.042             1 LINE     80    3 PAGE UM   ENGLE               MAY  03, 1974  14:16.05
            5.0T3   442                       
0          PROGRAM TO PRINT REFORMATTED BILLING RECORDS PRODUCED BY BILLRFT (500/4).
00500/044   BILLING                  BLRECPR         OC  G          S1558 5.0T1 VLO FSNAME=BILLING.BLRECPR.OC.043(1)            1449
            5.0T1  1449  BILLING.BLRECPR.OC.043             1 LINE     80    3 PAGE UM   ENGLE               MAY  03, 1974  14:16.20
            5.0T3   443                       
00500/045   BILLING                  POSIFIL         SP  G          S1558 5.0T1 VLO FSNAME=BILLING.POSIFIL.SP.044(1)            1450
            5.0T1  1450  BILLING.POSIFIL.SP.044             1 LINE     80    3 PAGE UM   ENGLE               JAN. 08, 1974  15:49.10
            5.0T3   444                       
0          SUBROUTINE CALLED BY BILLING (500/8) TO POSITION PL/1 FILES FOR RESTART.
00500/046   BILLING                  POSIFIL         OC  G          S1558 5.0T1 VLO FSNAME=BILLING.POSIFIL.OC.045(1)            1451
            5.0T1  1451  BILLING.POSIFIL.OC.045             1 LINE     80    2 PAGE UM   ENGLE               JAN. 08, 1974  15:49.29
            5.0T3   445                       
00500/047   BILLING                  BLDVSRTE        SA  G          S1558 5.0T1 VLO FSNAME=BILLING.BLDVSRTE.SA.046(1)           1452
            5.0T1  1452  BILLING.BLDVSRTE.SA.046            1 LINE     80    4 PAGE UM   ENGLE               JAN. 10, 1979  14:53:17
            5.0T3   446                       
0          SORT EXIT SUBROUTINES TO DO DIVISION SORT FOR BILPRNT (500/12).  COPIES GRDEF
           (104/83).
00500/048   BILLING                  BLDVSRTE        OC  G          S1558 5.0T1 VLO FSNAME=BILLING.BLDVSRTE.OC.047(1)           1453
            5.0T1  1453  BILLING.BLDVSRTE.OC.047            1 LINE     80    2 PAGE UM   ENGLE               FEB. 12, 1979  11:52:41
            5.0T3   447                       
00500/049   BILLING                  BILLMNT         SG  G          S1558 5.0T1 VLO FSNAME=BILLING.BILLMNT.SG.048(1)            1454
            5.0T1  1454  BILLING.BILLMNT.SG.048             1 LINE     73    1 PAGE UM   ENGLE               MAR. 01, 1977  17:10:37
            5.0T3   448                       
0          GOM PROGRAM TO MOUNT THE BILLING REPORT TAPE.
00500/050   BILLING                  BILLMNT         OC  G          S1558 5.0T1 VLO FSNAME=BILLING.BILLMNT.OC.049(1)            1455
            5.0T1  1455  BILLING.BILLMNT.OC.049             1 LINE     80    3 PAGE UM   ENGLE               MAR. 01, 1977  17:10:40
            5.0T3   449                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  252
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00500/051A  BILLING                  SIGONSCN        SA  G  SSCN    S0027 DISTRB FSNAME=SIGONSCN                                    
            5.1T1   459  BILLING.SIGONSCN.SA.051            1 LINE     80    5 PAGE UM   ENGLE               AUG. 26, 1982  10:14:10
0          SUBROUTINE TO SCAN THE JOB TABLE FOR SIGNONS MADE DURING THE BILLING
           PERIOD.  CALLED BY BLSIGCK (500/1).  COPIES COPY:GLOBALS (1026/3)
           AND COPY:LLMPSEQU(100) (087).  ASSEMBLE USING COPY:MTS.MACROS (344/3).
0          Referenced by comments of: 500/1 
00500/052C  BILLING                  SIGONSCN        UC  G          S0027 DISTRB FSNAME=SIGONSCNUPD                                 
            5.1T1   460  BILLING.SIGONSCN.UC.052            1 LINE     72    2 PAGE UM   ENGLE               AUG. 26, 1982  10:14:13
0          Updates source from previous regular distribution to current one.
00500/053A  BILLING                  SIGONSCN        OC  G          S0027 DISTRB FSNAME=SSCN                                        
            5.1T1   461  BILLING.SIGONSCN.OC.053            1 LINE     80    6 PAGE UM   ENGLE               AUG. 26, 1982  10:14:15
00500/054   BILLING                  TAPMNT          SG  G          S1558 5.0T1 VLO FSNAME=BILLING.TAPMNT.SG.052(1)             1458
            5.0T1  1458  BILLING.TAPMNT.SG.052              1 LINE     72    3 PAGE UM   ENGLE               JAN. 09, 1979  13:48:40
            5.0T3   452                       
0          SUBROUTINE TO ACQUIRE SUCCESSIVE FILES FOR A SPECIFIED RANGE FROM TAPE
           DIRECTORY TAPES.
00500/055   BILLING                  TAPMNT          OC  G          S1558 5.0T1 VLO FSNAME=BILLING.TAPMNT.OC.053(1)             1459
            5.0T1  1459  BILLING.TAPMNT.OC.053              1 LINE     80    5 PAGE UM   ENGLE               JAN. 09, 1979  13:50:32
            5.0T3   453                       
00500/056A  BILLING                  DIVTOTXR        SG  G          S0027 DISTRB FSNAME=DIVTOTXR                                    
            5.1T1   462  BILLING.DIVTOTXR.SG.056            1 LINE    135    4 PAGE UM   ENGLE               AUG. 26, 1982  10:29:39
0          PROGRAM TO PRODUCE TAXIR INPUT DATA FROM THE MONTHLY INFORMATION IN THE 
           FILE DIVISION (500/30).  THIS CAN BE RUN SEPARATELY WITH OUTPUT ON SPUNCH
           OR CALLED AS A SUBROUTINE BY BILLUTIL (500/15).
00500/057A  BILLING                  DIVTOTXR        UC  G          S0027 DISTRB FSNAME=DIVTOTXRUPD                                 
            5.1T1   463  BILLING.DIVTOTXR.UC.057            1 LINE    135    3 PAGE UM   ENGLE               AUG. 26, 1982  10:29:47
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00500/058A  BILLING                  DIVTOTXR        OC  G          S0027 DISTRB FSNAME=DTXR                                        
            5.1T1   464  BILLING.DIVTOTXR.OC.058            1 LINE     80    6 PAGE UM   ENGLE               AUG. 26, 1982  10:29:53
00500/059C  BILLING                  STACNVRT        SA  G  SCNV    S0027 DISTRB FSNAME=STACNVRT                                    
            5.1T1   465  BILLING.STACNVRT.SA.059            1 LINE     80    4 PAGE UM   ENGLE               AUG. 26, 1982  17:21:24
0          Subroutine to convert a previous statistics record format to the
           current format.
0          Referenced by comments of: 616/1, 617/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  253
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00500/060C  BILLING                  STACNVRT        UC  G        # S0027 DISTRB FSNAME=STACNVRTUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current
           distribution.
00500/061C  BILLING                  STACNVRT        OC  G          S0027 DISTRB FSNAME=SCNV                                        
            5.1T1   466  BILLING.STACNVRT.OC.061            1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:21:27
0          Referenced by comments of: 104/1 
00501/001A  MTS VOLUME 3             MASTER          WT             S0486 MTSV3 'MTS MANUALS' POSN=NEWM18.V3                        
            5.1T1   467  MTS_VOLUME_3.MASTER.WT.001         1 LINE    132  342 PAGE UM   MANUAL              JULY 23, 1983  10:56:53
0          TEXT/360 master for Volume 3 "System Subroutine Descriptions" of the UM MTS manuals,
           April 1981, updated March 1982 and February 1983.
            
           Editor:  Richard A. Salisbury
0          Referenced by comments of: 101/1 
00501/002A  MTS VOLUME 3             PRINT           PT             S0486 MTSV3 'MTS MANUALS' POSN=PRINT18.V3                       
            5.1T1   468  MTS_VOLUME_3.PRINT.PT.002          1 LINE    132  694 PAGE UM   MANUAL              JULY 23, 1983  10:57:06
0          TEXT/360 print file.  There is also a Xerox 9700 file (which is
           slightly modified from the TEXT/360 print file), which is
           available on request.
00501/003C  MTS VOLUME 3             UPDATE 1        P              W073:TNLV3.MAR82                                                
            5.1T1   469  MTS_VOLUME_3.UPDATE_1.P.003        1 LINE     79   84 PAGE UM   MANUAL              JULY 23, 1983  10:57:13
0          Update 1 to MTS Volume 3.
00501/004C  MTS VOLUME 3             UPDATE 1S       P              W073:TNLV3.MAR82S                                               
            5.1T1   470  MTS_VOLUME_3.UPDATE_1S.P.004       1 LINE     79   11 PAGE UM   MANUAL              JULY 23, 1983  10:57:17
0          Update 1 to MTS Volume 3 (systems section).
00501/005C  MTS VOLUME 3             UPDATE 2        P              W073:TNLV3.FEB83                                                
            5.1T1   471  MTS_VOLUME_3.UPDATE_2.P.005        1 LINE     79   80 PAGE UM   MANUAL              JULY 23, 1983  10:57:18
0          Update 2 to MTS Volume 3.
00501/006C  MTS VOLUME 3             UPDATE 2S       P              W073:TNLV3.FEB83S                                               
            5.1T1   472  MTS_VOLUME_3.UPDATE_2S.P.006       1 LINE     79   15 PAGE UM   MANUAL              JULY 23, 1983  10:57:21
0          Update 2 to MTS Volume 3 (systems section).
00502/001A  DEADFILES                SCANFILES       SA  G  SCFL    S0027 DISTRB FSNAME=SCANFILE                                    
            5.1T1   473  DEADFILES.SCANFILES.SA.001         1 LINE     80   13 PAGE UM   ENGLE               MAY  25, 1983  17:34:44
0          DEADfiles is a series of programs used to remove files which belong to
           expired user ID's. At UM, this is done once per month and the tape(s)
           generated are saved indefinitely. (502/14) describes the procedure.
1                                                                                               SUN SEP 08/96   15:24:55   Page  254
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           SCANFILES copies ACCFORMAT (104/1) and *GFINFODSECT (593). Assemble
           using COPY:FILE.MACROS (482/45). Calls the SCANMBOX subroutine
           (502/12) for dead mailbox information and UDSCAN (821/40) for dead
           name information. Run with PROT=OFF.
0          Referenced by comments of: 104/187, 104/188, 484/1, 821/40 
00502/002A  DEADFILES                SCANFILES       UC  G          S0027 DISTRB FSNAME=SCANFILEUPD                                 
            5.1T1   474  DEADFILES.SCANFILES.UC.002         1 LINE     72    3 PAGE UM   ENGLE               MAY  25, 1983  17:34:47
0          Updates source from previous regular distribution to current distribution.
00502/003A  DEADFILES                SCANFILES       OE  G          RSTR:SCANFILES                                                  
            5.1T1   475  DEADFILES.SCANFILES.OE.003         1 LINE   2751    6 PAGE UM   ENGLE               JULY 23, 1983  10:57:40
                         RSTR:SCANFILES       
00502/004   DEADFILES                DESTROY         SA  G          RSTR:DEADFILEDES(1000)                                          
            5.0T2     4  DEADFILES.DESTROY.SA.004           1 LINE     71    1 PAGE UM   HELFFRICH           JULY 03, 1981  14:46:40
            5.0T3   461  RSTR:DEADFILEDES     
0          Program to destroy a list of files.  Calls the file routines' DESTROY 
           entry point directly to circumvent denial of destroy access.
            
           Assemble using *SYSMAC.
00502/005   DEADFILES                DESTROY         OC  G          RSTR:DEADFILEDES(1,998)                                         
            5.0T2     5  DEADFILES.DESTROY.OC.005           1 LINE     80    1 PAGE UM   HELFFRICH           JULY 03, 1981  14:46:41
            5.0T3   462                       
00502/006A  DEADFILES                CATDES          SA  G          RSTR:DEADUCATDES(1000)                                          
            5.1T1   476  DEADFILES.CATDES.SA.006            1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  10:57:41
                         RSTR:DEADUCATDES     
0          Program to destroy user catalogs.  Running this program is the only way
           that catalog space is ever reclaimed and if this program is not run, the
           catalog will only get bigger.  This program also deletes file entries for
           expired user IDs from the FILESAVE master file directory so that the files
           may not be restored using *RESTORE.
            
           Assemble using *SYSMAC.
00502/007A  DEADFILES                CATDES          OC  G          RSTR:DEADUCATDES(1,998)                                         
            5.1T1   477  DEADFILES.CATDES.OC.007            1 LINE     80    3 PAGE UM   HELFFRICH           JULY 23, 1983  10:57:41
0          This file should have the program key RSTR:DEADUCATDES.
00502/008   DEADFILES                SAVEFILES       SA  G          RSTR:DEADSAVE(1000)                                             
            5.0T2     8  DEADFILES.SAVEFILES.SA.008         1 LINE     72    3 PAGE UM   HELFFRICH           JULY 03, 1981  14:46:43
            5.0T3   465                       
0          Program to save a specific set of files - usually the list of dead
           files, but it reads an arbitrary list. Assemble using *SYSMAC and
           COPY:FILE.MACROS (482/45). Calls the following subroutines: SAVEFILE
1                                                                                               SUN SEP 08/96   15:24:55   Page  255
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (067/10) and TAPEOUT (067/24).
00502/009   DEADFILES                SAVEFILES       OC  G          RSTR:DEADSAVE(1,998)                                            
            5.0T2     9  DEADFILES.SAVEFILES.OC.009         1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  14:46:44
            5.0T3   466  RSTR:DEADSAVE        
00502/010   DEADFILES                FIX             SA  G          S1559 5.0T2 VLO FSNAME=DEADFILES.FIX.SA.010(1)                10
            5.0T2    10  DEADFILES.FIX.SA.010               1 LINE     80    1 PAGE UM   ENGLE               JAN. 08, 1973  17:58.20
            5.0T3   467                       
0          Program to update the file information in an accounting record to
           adjust for the files destroyed. Calls *ACCRESTORE. Run with
           PROT=OFF.
0          Referenced by comments of: 104/100, 104/187, 104/188 
00502/011   DEADFILES                FIX             OC  G          MTS:TST.FIX                                                     
            5.0T2    11  DEADFILES.FIX.OC.011               1 LINE     80    1 PAGE UM   ENGLE               JULY 03, 1981  14:46:45
            5.0T3   468  RSTR:FIX             
0          Contains a $CONTINUE WITH *ACCRESTORE (484/1) record.
0          Referenced by comments of: 104/100 
00502/012C  DEADFILES                SCANMBOX        SG  G          RSTR:SCANMBOX(1000)                                             
            5.1T1   478  DEADFILES.SCANMBOX.SG.012          1 LINE     76    2 PAGE UM   STERKEN             JULY 23, 1983  10:57:42
0          Subroutine used by DEADFILES to retrieve active message system
           mailbox names.
0          Referenced by comments of: 502/1 
00502/013C  DEADFILES                SCANMBOX        OC  G          RSTR:SCANMBOX(1,999)                                            
            5.1T1   479  DEADFILES.SCANMBOX.OC.013          1 LINE     80    3 PAGE UM   STERKEN             JULY 23, 1983  10:57:42
00502/014C  DEADFILES                WRITEUP         P              RSTR:DEADFILES.W                                                
            5.1T3   339  DEADFILES.WRITEUP.P.014            1 LINE     67    3 PAGE UM   OGDEN               AUG. 20, 1983  19:45:21
0          Writeup describing how to run DEADFILES.
0          Referenced by comments of: 502/1 
00504/001A  MTS VOLUME 1             MASTER          WT             S0488 MTSV1 'MTS MANUALS' POSN=NEWM10.V1                        
            5.1T1   480  MTS_VOLUME_1.MASTER.WT.001         1 LINE    132  337 PAGE UM   MANUAL              JULY 23, 1983  11:00:53
0          TEXT/360 master for Volume 1, "Michigan Terminal System," of the UM MTS manuals,
           February 1983.
            
           Editor:  Richard A. Salisbury
0          Referenced by comments of: 798/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  256
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00504/002A  MTS VOLUME 1             PRINT           PT             S0488 MTSV1 'MTS MANUALS' POSN=PRINT10.V1                       
            5.1T1   481  MTS_VOLUME_1.PRINT.PT.002          1 LINE    132  489 PAGE UM   MANUAL              JULY 23, 1983  11:01:07
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which
           is slightly modified from the TEXT/360 print file), which is 
           available on request.
00504/003A  MTS VOLUME 1             INDEX SOURCE    D              S0488 MTSV1 'MTS MANUALS' POSN=V1INDEXSOU.10                    
            5.1T1   482  MTS_VOLUME_1.INDEX_SOURCE.D.003    1 LINE     73    7 PAGE UM   MANUAL              JULY 23, 1983  11:02:53
00505/001  *ALGOL                    DUMPRESTORE     C              S0504 'UBC -> UM #6' FMT=U(255)                              1  
            5.0T2    19  ALGOL.DUMPRESTORE.C.001            1 SEQ      44    2 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:11
            5.0T3   476                       
0          MTS COMMANDS USED TO GENERATE OR RESTORE THE ALGOL FILES ON THE UNE ALGOL
           DISTRIBUTION TAPE.  ALTHOUGH THESE COMMANDS ARE NOT APPROPRIATE FOR RESTORING
           THE ALGOL FILES FROM THE DISTRIBUTION TAPE, THEY ARE INCLUDED BECAUSE THEY SHOW
           THE ORGANIZATION OF THE UNE ALGOL.
00505/002  *ALGOL                    CINTSORC        SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         4  
            5.0T2    20  ALGOL.CINTSORC.SA.002              1 SEQ      80   30 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:16
            5.0T3   477                       
0          COMPILER/MTS INTERFACE MODULE.  ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 387/17, 505/19 
00505/003  *ALGOL                    FSACONV         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         5  
            5.0T2    21  ALGOL.FSACONV.SA.003               1 SEQ      80    2 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:17
            5.0T3   478                       
0          COPY SECTION COPIED BY COMPILER.
0          Referenced by comments of: 505/14, 505/20 
00505/004  *ALGOL                    FSAREA          SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         6  
            5.0T2    22  ALGOL.FSAREA.SA.004                1 SEQ      80    3 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:17
            5.0T3   479                       
0          COPY SECTION COPIED BY COMPILER.
0          Referenced by comments of: 505/14, 505/20, 505/21 
00505/005  *ALGOL                    IEX50T          SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         7  
            5.0T2    23  ALGOL.IEX50T.SA.005                1 SEQ      80   95 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:22
            5.0T3   480                       
0          COPY SECTION COPIED BY COMPILER.
0          Referenced by comments of: 505/14 
1                                                                                               SUN SEP 08/96   15:24:55   Page  257
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00505/006  *ALGOL                    IEX60000        SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         8  
            5.0T2    24  ALGOL.IEX60000.SA.006              1 SEQ      80   15 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:24
            5.0T3   481                       
0          COPY SECTION COPIED BY COMPILER.
0          Referenced by comments of: 505/15 
00505/007  *ALGOL                    OSALG00         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         14 
            5.0T2    25  ALGOL.OSALG00.SA.007               1 SEQ      80   10 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:36
            5.0T3   482                       
0          COMPS (505/7) THROUGH (505/16) ARE OS/360 ALGOL COMPILER SOURCE. EACH MUST BE
           ASSEMBLED USING THE SPECIAL OS MACRO LIBRARY (505/17). THIS SUBCOMPONENT
           COPIES WORKAREA (505/18).
0          Referenced by comments of: 505/7, 505/17, 505/19 
00505/008  *ALGOL                    OSALG01         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         15 
            5.0T2    26  ALGOL.OSALG01.SA.008               1 SEQ      80    4 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:37
            5.0T3   483                       
00505/009  *ALGOL                    OSALG10         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         16 
            5.0T2    27  ALGOL.OSALG10.SA.009               1 SEQ      80   22 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:38
            5.0T3   484                       
0          COPIES WORKAREA (505/18).
00505/010  *ALGOL                    OSALG11         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         17 
            5.0T2    28  ALGOL.OSALG11.SA.010               1 SEQ      80   88 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:42
            5.0T3   485                       
0          COPIES WORKAREA (505/18).
00505/011  *ALGOL                    OSALG20         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         18 
            5.0T2    29  ALGOL.OSALG20.SA.011               1 SEQ      80   16 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:45
            5.0T3   486                       
0          COPIES WORKAREA (505/18).
00505/012  *ALGOL                    OSALG30         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         19 
            5.0T2    30  ALGOL.OSALG30.SA.012               1 SEQ      80   62 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:48
            5.0T3   487                       
0          COPIES WORKAREA (505/18).
00505/013  *ALGOL                    OSALG40         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         20 
            5.0T2    31  ALGOL.OSALG40.SA.013               1 SEQ      80   17 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:50
            5.0T3   488                       
0          COPIES WORKAREA (505/18).
1                                                                                               SUN SEP 08/96   15:24:55   Page  258
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00505/014  *ALGOL                    OSALG50         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         21 
            5.0T2    32  ALGOL.OSALG50.SA.014               1 SEQ      80   96 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:55
            5.0T3   489                       
0          COPIES FSACONV (505/3), FSAREA (505/4), AND IEX50T (505/5).
00505/015  *ALGOL                    OSALG51         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         22 
            5.0T2    33  ALGOL.OSALG51.SA.015               1 SEQ      80   24 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:57
            5.0T3   490                       
0          COPIES IEX60000 (505/6) AND WORKAREA (505/18).
00505/016  *ALGOL                    OSALG51M        SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         23 
            5.0T2    34  ALGOL.OSALG51M.SA.016              1 SEQ      80    9 PAGE UNE  SALISBURY           JULY 03, 1981  14:50:58
            5.0T3   491                       
0          Referenced by comments of: 505/7, 505/17, 505/19 
00505/017  *ALGOL                    OSMAC           SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         24 
            5.0T2    35  ALGOL.OSMAC.SA.017                 1 SEQ      80  103 PAGE UNE  SALISBURY           JULY 03, 1981  14:51:03
            5.0T3   492                       
0          SPECIAL OS INTERFACE MACROS. MUST BE USED TO ASSEMBLE COMPS (505/7) THROUGH
           (505/16).
0          Referenced by comments of: 505/7, 505/20, 505/21 
00505/018  *ALGOL                    WORKAREA        SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         25 
            5.0T2    36  ALGOL.WORKAREA.SA.018              1 SEQ      80    4 PAGE UNE  SALISBURY           JULY 03, 1981  14:51:05
            5.0T3   493                       
0          COPY SECTION COPIED BY COMPILER AND LIBRARY.
0          Referenced by comments of: 505/7, 505/9, 505/10, 505/11, 505/12, 505/13, 505/15 
00505/019  *ALGOL                    *ALGOL          OC  G          *ALGOL                                                          
            5.0T2    37  ALGOL.*ALGOL.OC.019                1 SEQ      80   31 PAGE UM   SALISBURY           JULY 03, 1981  14:51:05
            5.0T3   494  *ALGOL               
0          COMPLETE COMPILER OBJECT FILE. CONSISTS OF OBJECT OF COMPS (505/7) THROUGH
           (505/16), THE OS/360 SOURCE, PLUS THE COMPILER/MTS INTERFACE MODULE (505/2)
           AND AN " ENT           COMENTRY" LOADER CARD TO SPECIFY THE COMPILER ENTRY POINT.
00505/020  *ALGOL                    LIBSORC         SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         11 
            5.0T2    38  ALGOL.LIBSORC.SA.020               1 SEQ      80  181 PAGE UNE  SALISBURY           JULY 03, 1981  14:51:38
            5.0T3   495                       
0          OS/360 LIBRARY SOURCE. ASSEMBLE USING OSMAC (505/17). COPIES FSACONV (505/3)
           AND FSAREA (505/4).
0          Referenced by comments of: 505/23 
1                                                                                               SUN SEP 08/96   15:24:55   Page  259
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00505/021  *ALGOL                    LIBSORC1        SA  G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         12 
            5.0T2    39  ALGOL.LIBSORC1.SA.021              1 SEQ      80   37 PAGE UNE  SALISBURY           JULY 03, 1981  14:51:42
            5.0T3   496                       
0          MORE OS/360 LIBRARY SOURCE. ASSEMBLE USING OSMAC (505/17). COPIES FSAREA
           (505/4).
0          Referenced by comments of: 505/23 
00505/022  *ALGOL                    LINTSORC        SA  G          S1559 5.0T2 VLO FSNAME=ALGOL.LINTSORC.SA.022(1)               40
            5.0T2    40  ALGOL.LINTSORC.SA.022              1 LINE     80   28 PAGE UM   SALISBURY           AUG. 03, 1973  22:24.23
            5.0T3   497                       
0          LIBRARY/MTS INTERFACE MODULE.  ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 387/17, 505/23 
00505/023  *ALGOL                    *ALGOLLIB       OL  G          *ALGOLLIB                                                       
            5.0T2    41  ALGOL.*ALGOLLIB.OL.023             1 SEQ    3963   11 PAGE UM   SALISBURY           JULY 03, 1981  14:51:58
            5.0T3   498  *ALGOLLIB            
0          COMPLETE LIBRARY OBJECT FILE. CONSISTS OF OBJECT OF COMPS (505/20) AND
           (505/21) ,THE OS/360 LIBRARY SOURCE, PLUS THE LIBRARY/MTS INTERFACE MODULE
           (505/22) AND AN " ENT            LIBENTRY" LOADER CARD TO SPECIFY THE LIBRARY
           ENTRY POINT.
00505/024  *ALGOL                    KDFSORC         S   G          S0504 'UBC -> UM #6' FMT=FB(3200,80)                         10 
            5.0T2    42  ALGOL.KDFSORC.S.024                1 SEQ      80   45 PAGE UNE  SALISBURY           JULY 03, 1981  14:52:10
            5.0T3   499                       
0          SOURCE FOR THE "KDF9" I/O LIBRARY.  MAY BE USED BY USERS WHO ARE ACCUSTOMED TO
           RUNNING ALGOL PROGRAMS ON THE KDF9 COMPUTER.  THE SOURCE IS ENTIRELY IN ALGOL
           EXCEPT FOR "FORMAT" WHICH IS ASSEMBLE LANGUAGE.
00505/025  *ALGOL                    *KDFLIB         OL  G          *KDFLIB                                                         
            5.0T2    43  ALGOL.*KDFLIB.OL.025               1 SEQ     348   56 PAGE UM   SALISBURY           JULY 03, 1981  14:52:11
            5.0T3   500  *KDFLIB              
0          KDF9 I/O LIBRARY AS PRODUCED BY *GENLIB (389).  NOTE:  THIS VERSION OF KDFLIB USES SHORT
           FLOATING POINT ARITHMETIC.  PAR=LONG,PROCEDURE SHOULD BE USED TO RECOMPILE THE LIBRARY
           IF LONG FLOATING POINT ARITHMETIC IS DESIRED.
00505/026  *ALGOL                    KDFLIBTEST      S   G          S1559 5.0T2 VLO FSNAME=ALGOL.KDFLIBTEST.S.026(1)              44
            5.0T2    44  ALGOL.KDFLIBTEST.S.026             1 LINE     67    1 PAGE UM   SALISBURY           AUG. 03, 1973  22:25.28
            5.0T3   501                       
0          ALGOL PROGRAM TO TEST *KDFLIB.
00506/001   PL1 MAINTENANCE          CRELCS          SA  G          S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.CRELCS.SA.001(1)       45
            5.0T2    45  PL1_MAINTENANCE.CRELCS.SA.001      1 SEQ      80    5 PAGE UM   TIFFANY             APR. 05, 1980  15:30:20
            5.0T3   502                       
0          CREATES LOW-CORE SYMBOL TABLES, ESPECIALLY PL1SYM, INTSUBS, AND INESD.
           REQUESTS ON GUSER THE NAME OF LCS TABLE, SUCH AS INESD.  THEN REQUESTS, ON
1                                                                                               SUN SEP 08/96   15:24:55   Page  260
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          SCARDS, THE COMPLETE LIST OF LOW-CORE SYMBOLS.
0          Referenced by comments of: 163/14, 506/2, 506/5, 506/6 
00506/002   PL1 MAINTENANCE          CRELCSPR        SA  G          S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.CRELCSPR.SA.002(1)     46
            5.0T2    46  PL1_MAINTENANCE.CRELCSPR.SA.002    1 LINE     80    6 PAGE UM   TIFFANY             JULY 28, 1977  01:46:04
            5.0T3   503                       
0          SAME AS (506/1) EXCEPT FOR PSEUDO-REGISTERS. IHEPRD IS GENERATED.
0          Referenced by comments of: 233/44 
00506/003A  PL1 MAINTENANCE          RUN             SA  G          PL1:RUN.S                                                    269
            5.1T1   483  PL1_MAINTENANCE.RUN.SA.003         1 LINE     85   22 PAGE UM   TIFFANY             JULY 23, 1983  11:02:54
0          Program used to simulate the loading process with the PL/I library in user
           VM, rather than shared VM (for checkout). Similar to UBC's *RUN program (not
           distributed), but with extra feature (specified by "S2L=" keyword) for
           loading libraries (such as FIX, SHAREDPL1LIB, etc.) into segment 12 instead
           of shared VM. See the source for usage instructions. Copies *LOADINFODSECT
           (001/4).  Requires PL1:SUBR.MAC (506/9).
            
           *******************************************************************************
           D5.0A version:
            
           Completely rewritten.  No longer requires the UBC macros.
           *******************************************************************************
00506/004   PL1 MAINTENANCE          SYMBOLS         SA  G          S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.SYMBOLS.SA.004(1)      48
            5.0T2    48  PL1_MAINTENANCE.SYMBOLS.SA.004     1 SEQ      80    5 PAGE UM   TIFFANY             JULY 28, 1977  01:46:12
            5.0T3   505                       
0          PRINT PL1LIB SYMBOLS AND THEIR CURRENT ADDRESSES.
00506/005   PL1 MAINTENANCE          PL1SYMBOLS      D              S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.PL1SYMBOL.D.005(1)     49
            5.0T2    49  PL1_MAINTENANCE.PL1SYMBOL.D.005    1 LINE    117    2 PAGE UM   TIFFANY             JULY 28, 1977  01:46:16
            5.0T3   506                       
0          LIST OF PL/I SYMBOL NAMES.  USED BY CRELCS (506/1).
00506/006   PL1 MAINTENANCE          INTSUBS         D              S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.INTSUBS.D.006(1)       50
            5.0T2    50  PL1_MAINTENANCE.INTSUBS.D.006      1 SEQ      56    1 PAGE UM   TIFFANY             JULY 28, 1977  01:46:20
            5.0T3   507                       
0          LIST OF INTERNAL SUBROUTINES.  USED BY CRELCS (506/1).
00506/007   PL1 MAINTENANCE          LLXU            SA  G  LLXU    W062:LOAD.S                                                     
            5.0T2    51  PL1_MAINTENANCE.LLXU.SA.007        1 LINE     80   20 PAGE UM   TIFFANY             JULY 03, 1981  14:57:15
            5.0T3   508                       
0          SIMULATE OS LINK/LOAD/XCTL WITH GOODIES. THIS ROUTINE DOESN'T CALL UMLOAD, 
           LLXU, AND FRIENDS;  IT HAS A SIMPLE LOADER TO SPEED UP THE COMPILER. 
           COPIES *GDINFODSECT (594).
1                                                                                               SUN SEP 08/96   15:24:55   Page  261
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 163/14 
00506/008   PL1 MAINTENANCE          HENPECKER       SA  G          PL1:PECKER.S                                                    
            5.0T2    52  PL1_MAINTENANCE.HENPECKER.SA.008   1 LINE    126   10 PAGE UM   TIFFANY             JULY 03, 1981  14:57:17
            5.0T3   509                       
0          Program to pick up the source modules from IEHUPDTE input tape such as
           the PL/1 compiler. Copies *GDINFODSECT (594) and *CNFGINFODSECT (654).
           Assemble with PL1:SUBR.MAC (506/9) and *SYSMAC.
0          Referenced by comments of: 163/13, 813/7, 827/8 
00506/009   PL1 MAINTENANCE          MACRO LIB       SM  G          PL1:SUBR.MAC                                                    
            5.0T2    53  PL1_MAINTENANCE.HENPECKER.SM.009   1 LINE     72    3 PAGE UM   TIFFANY             JULY 03, 1981  14:57:21
            5.0T3   510                       
0          Macro library containing various subroutine macros.
0          Referenced by comments of: 506/3, 506/8 
00506/010   PL1 MAINTENANCE          INSTALLATION    WF             S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.INSTALLAT.WF.010(1)    54
            5.0T2    54  PL1_MAINTENANCE.INSTALLAT.WF.010   1 LINE    140   18 PAGE UM   TIFFANY             JULY 28, 1977  01:46:32
            5.0T3   511                       
0          INSTRUCTIONS FOR INSTALLATION OF PL/I IN MTS AND DOCUMENTATION ON OS SIMULATION
           PACKAGE.
00506/011   PL1 MAINTENANCE          INSTALLATION    WF             W062:PL1INSTALL.W                                               
            5.0T2    55  PL1_MAINTENANCE.INSTALLAT.WF.011   1 LINE    134    5 PAGE UM   TIFFANY             JULY 03, 1981  14:57:23
            5.0T3   512                       
0          WRITEUP INDICATING HOW TO INSTALL AND MAINTAIN THE 
           PL/I-F COMPILER (163).
0          Referenced by comments of: 163/13 
00506/012C  PL1 MAINTENANCE          PRINTLOG        SP  G          W062:PRINTLOG                                                   
            5.1T1   484  PL1_MAINTENANCE.PRINTLOG.SP.012    1 LINE     69    3 PAGE UM   TIFFANY             JULY 23, 1983  11:02:56
0          A program that prints out the contents of ETC:PL1OPTLOG (813/4).
00506/013C  PL1 MAINTENANCE          PRINTLOG        OC  G          W062:PRINTLOG.O                                                 
            5.1T1   485  PL1_MAINTENANCE.PRINTLOG.OC.013    1 LINE   4424    4 PAGE UM   TIFFANY             JULY 23, 1983  11:02:56
0          Requires *PL1OPTLIB (827/5).
00506/014C  PL1 MAINTENANCE          KEEPO2X         SA  G          W062:KEEPX02(1,999)                                             
            5.1T1   486  PL1_MAINTENANCE.KEEPO2X.SA.014     1 LINE     65    1 PAGE UM   TIFFANY             JULY 23, 1983  11:02:57
0          Program to discard records that don't start with X'02'.
1                                                                                               SUN SEP 08/96   15:24:55   Page  262
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00506/015C  PL1 MAINTENANCE          KEEPO2X         OC  G          W062:KEEPX02(1000)                                              
            5.1T1   487  PL1_MAINTENANCE.KEEPO2X.OC.015     1 LINE     80    1 PAGE UM   TIFFANY             JULY 23, 1983  11:02:57
00507/001   TIMELIMIT                *LIM            C              *LIM                                                            
            5.0T2    56  TIMELIMIT.*LIM.C.001               1 LINE     60    1 PAGE UM   WSG                 JULY 03, 1981  14:57:24
            5.0T4     1  *LIM                 
0          Command file used by operators to find out how much CPU time is
           remaining for an executing batch job. Invoked by entering "MTS *LIM"
           on operator's console.
00507/002   TIMELIMIT                TLIMIT PGM      SA  G          S1559 5.0T2 VLO FSNAME=TIMELIMIT.TLIMIT_PGM.SA.002(1)         57
            5.0T2    57  TIMELIMIT.TLIMIT_PGM.SA.002        1 LINE     80    5 PAGE UM   WSG                 JAN. 13, 1977  16:30:08
            5.0T4     2                       
0          Program to compute how much time is left before a job exceeds its
           global time limit. Operator enters either a job number or user ID to
           specify the job(s) for which the remaining time is to be calculated.
           End-of-file terminates program. Copies COPY:LLMPSEQU (087),
           COPY:GLOBALS (1026/3), and *CNFGINFODSECT (654). Source in lines
           1,999.
00507/003   TIMELIMIT                TLIMIT PGM      OC  G          SYS:TLIMIT                                                      
            5.0T2    58  TIMELIMIT.TLIMIT_PGM.OC.003        1 LINE     80    1 PAGE UM   WSG                 JULY 03, 1981  14:57:25
            5.0T4     3  SYS.:TLIMIT          
00508/001  *BASIC                    STRT1           C              S1559 5.0T2 VLO FSNAME=BASIC.STRT1.C.001(1)                   59
            5.0T2    59  BASIC.STRT1.C.001                  1 LINE     70    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:22
            5.0T4     4                       
0          MTS commands to restore files needed to generate BASIC, (508/2) through
           (508/18) and (508/28) and (508/29), which it assumes are on an *FS tape by
           themselves.
00508/002  *BASIC                    STRT2           C              S1559 5.0T2 VLO FSNAME=BASIC.STRT2.C.002(1)                   60
            5.0T2    60  BASIC.STRT2.C.002                  1 LINE    128    1 PAGE UM   FRONCZAK            APR. 05, 1980  15:30:30
            5.0T4     5                       
0          MTS COMMANDS TO ASSEMBLE AND LINK-EDIT THE BASIC SOURCE, (508/19) THROUGH
           (508/27), WHICH IT ASSUMES ARE ON A REGULAR (NON-*FS) BLOCKED, LABELED TAPE.
0          Referenced by comments of: 508/1 
00508/003  *BASIC                    BIFDSECT        SA  G          S1559 5.0T2 VLO FSNAME=BASIC.BIFDSECT.SA.003(1)               61
            5.0T2    61  BASIC.BIFDSECT.SA.003              1 LINE     66    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:26
            5.0T4     6                       
0          THE DSECT USED BY "BUILT-IN" FUNCTIONS.
0          Referenced by comments of: 508/23 
1                                                                                               SUN SEP 08/96   15:24:55   Page  263
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00508/004A *BASIC                    CLIDSECT        SA  G          W070:CLIDSECT                                                   
            5.1T1   488  BASIC.CLIDSECT.SA.004              1 LINE     72    3 PAGE UM   FRONCZAK            JULY 23, 1983  11:02:57
0          THE DSECT USED BY COMMAND AND CMNDINIT.
0          Referenced by comments of: 508/19, 508/22, 508/25, 508/26 
00508/005  *BASIC                    DS6A            SA  G          S1559 5.0T2 VLO FSNAME=BASIC.DS6A.SA.005(1)                   63
            5.0T2    63  BASIC.DS6A.SA.005                  1 LINE     72    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:30
            5.0T4     8                       
0          THE DSECT USED BY LOADER.
0          Referenced by comments of: 508/22 
00508/006  *BASIC                    DSECTCOMM       SA  G          S1559 5.0T2 VLO FSNAME=BASIC.DSECTCOMM.SA.006(1)              64
            5.0T2    64  BASIC.DSECTCOMM.SA.006             1 LINE     70    3 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:33
            5.0T4     9                       
0          THE BASIC COMMON DSECT.
0          Referenced by comments of: 508/19, 508/20, 508/21, 508/22, 508/23, 508/24, 508/25, 508/26, 508/27 
00508/007  *BASIC                    DSECT9A         SA  G          S1559 5.0T2 VLO FSNAME=BASIC.DSECT9A.SA.007(1)                65
            5.0T2    65  BASIC.DSECT9A.SA.007               1 LINE     69    2 PAGE UM   FRONCZAK            APR. 01, 1979  22:26:50
            5.0T4    10                       
0          THE DSECT USED BY ENCODE, DECODE, AND CIOGLTCH.
0          Referenced by comments of: 508/22 
00508/008  *BASIC                    FHDRDSECT       SA  G          S1559 5.0T2 VLO FSNAME=BASIC.FHDRDSECT.SA.008(1)              66
            5.0T2    66  BASIC.FHDRDSECT.SA.008             1 LINE     72    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:37
            5.0T4    11                       
0          THE "FILE HEADER" DSECT.
0          Referenced by comments of: 508/24, 508/26 
00508/009  *BASIC                    GLOBALSYM       SA  G          S1559 5.0T2 VLO FSNAME=BASIC.GLOBALSYM.SA.009(1)              67
            5.0T2    67  BASIC.GLOBALSYM.SA.009             1 LINE     66    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:39
            5.0T4    12                       
0          CODE TO SET "GLOBAL SETC SYMBOLS" TO ENABLE OR DISABLE THE SLT AND SWPR INSTRUCTIONS AND DEFINE THE
           INSTALLATION NAME.
0          Referenced by comments of: 508/19, 508/20, 508/22, 508/23, 508/25 
00508/010  *BASIC                    INTFACMAC       SM  G          S1559 5.0T2 VLO FSNAME=BASIC.INTFACMAC.SM.010(1)              68
            5.0T2    68  BASIC.INTFACMAC.SM.010             1 LINE     58    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:41
            5.0T4    13                       
0          BASIC MACRO LIBRARY.
1                                                                                               SUN SEP 08/96   15:24:55   Page  264
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00508/011  *BASIC                    LDICDSCT        SA  G          S1559 5.0T2 VLO FSNAME=BASIC.LDICDSCT.SA.011(1)               69
            5.0T2    69  BASIC.LDICDSCT.SA.011              1 LINE     72    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:44
            5.0T4    14                       
0          THE "LOADING DIRECTORY" DSECT.
0          Referenced by comments of: 508/19, 508/21 
00508/012  *BASIC                    MAPDSECT        SA  G          S1559 5.0T2 VLO FSNAME=BASIC.MAPDSECT.SA.012(1)               70
            5.0T2    70  BASIC.MAPDSECT.SA.012              1 LINE     68    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:46
            5.0T4    15                       
0          THE "MAP ENTRY DESCRIPTION" DSECT.
0          Referenced by comments of: 508/19, 508/21 
00508/013  *BASIC                    OPDEFEQUS       SA  G          S1559 5.0T2 VLO FSNAME=BASIC.OPDEFEQUS.SA.013(1)              71
            5.0T2    71  BASIC.OPDEFEQUS.SA.013             1 LINE     70    2 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:48
            5.0T4    16                       
0          "EQUS" USED IN OPERATOR DEFINITIONS.
0          Referenced by comments of: 508/21 
00508/014  *BASIC                    OPDEFMACROS     SM  G          S1559 5.0T2 VLO FSNAME=BASIC.OPDEFMACROS.SM.014(1)            72
            5.0T2    72  BASIC.OPDEFMACROS.SM.014           1 LINE     72    3 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:50
            5.0T4    17                       
0          MACRO LIBRARY TO GENERATE THE OPERATOR DEFINITIONS.
00508/015  *BASIC                    PDSECT          SA  G          S1559 5.0T2 VLO FSNAME=BASIC.PDSECT.SA.015(1)                 73
            5.0T2    73  BASIC.PDSECT.SA.015                1 LINE     72    3 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:52
            5.0T4    18                       
0          THE DSECT USED BY THE LEXICAL SCAN ROUTINES (LEX----).
0          Referenced by comments of: 508/20 
00508/016  *BASIC                    SYMTABDEF       SA  G          S1559 5.0T2 VLO FSNAME=BASIC.SYMTABDEF.SA.016(1)              74
            5.0T2    74  BASIC.SYMTABDEF.SA.016             1 LINE     33    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:55
            5.0T4    19                       
0          THE SYMBOL TABLE DSECT (UNDOCUMENTED).
00508/017  *BASIC                    SYMTABSECT      SA  G          S1559 5.0T2 VLO FSNAME=BASIC.SYMTABSECT.SA.017(1)             75
            5.0T2    75  BASIC.SYMTABSECT.SA.017            1 LINE     70    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:57
            5.0T4    20                       
0          THE SYMBOL TABLE DSECT (DOCUMENTED).
0          Referenced by comments of: 508/20, 508/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  265
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00508/018  *BASIC                    WSLAYOUT        SA  G          S1559 5.0T2 VLO FSNAME=BASIC.WSLAYOUT.SA.018(1)               76
            5.0T2    76  BASIC.WSLAYOUT.SA.018              1 LINE     68    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:48:59
            5.0T4    21                       
0          THE "WORKING STORAGE LAYOUT" DSECT.
0          Referenced by comments of: 508/1, 508/19, 508/22 
00508/019A *BASIC                    CLI             SA  G          S0358 BSCSEF POSN=*BASIC.CLI                                    
            5.1T1   489  BASIC.CLI.SA.019                   1 LINE     80  129 PAGE UM   FRONCZAK            JULY 23, 1983  11:03:48
0          Copies (508/4), (508/6), (508/9), (508/11), (508/12), (508/18), and (508/28).
0          Referenced by comments of: 508/2 
00508/020  *BASIC                    LEX             SA  G          S0358 BSCSEF POSN=*BASIC.LEX                                    
            5.0T2    78  BASIC.LEX.SA.020                   1 SEQ      80  108 PAGE UM   FRONCZAK            JULY 03, 1981  14:58:56
            5.0T4    23                       
0          Copies (508/6), (508/9), (508/15), and (508/17).
00508/021A *BASIC                    CMP             SA  G          S0358 BSCSEF POSN=*BASIC.CMP                                    
            5.1T1   490  BASIC.CMP.SA.021                   1 LINE     80  108 PAGE UM   FRONCZAK            JULY 23, 1983  11:03:56
0          Copies (508/6), (508/11), (508/12), (508/13), and (508/17).
00508/022  *BASIC                    CPS             SA  G          S0358 BSCSEF POSN=*BASIC.CPS                                    
            5.0T2    80  BASIC.CPS.SA.022                   1 SEQ      80   80 PAGE UM   FRONCZAK            JULY 03, 1981  14:59:07
            5.0T4    25                       
0          Copies (508/4), (508/5), (508/6), (508/7), (508/9), and (508/18).
00508/023  *BASIC                    NUM             SA  G          S0358 BSCSEF POSN=*BASIC.NUM                                    
            5.0T2    81  BASIC.NUM.SA.023                   1 SEQ      80   62 PAGE UM   FRONCZAK            JULY 03, 1981  14:59:11
            5.0T4    26                       
0          Copies (508/3), (508/6), and (508/9).
00508/024A *BASIC                    VFL             SA  G          S0358 BSCEF POSN=*BASIC.VFL                                     
            5.1T1   491  BASIC.VFL.SA.024                   1 LINE     80   41 PAGE UM   FRONCZAK            JULY 23, 1983  11:04:02
0          Copies (508/6) and (508/8).
00508/025A *BASIC                    BIO             SA  G          S0358 BSCEF POSN=*BASIC.BIO                                     
            5.1T1   492  BASIC.BIO.SA.025                   1 LINE     80   51 PAGE UM   FRONCZAK            JULY 23, 1983  11:04:04
0          Copies (508/4), (508/6), (508/9), and (508/28).
00508/026A *BASIC                    INF             SA  G          S0358 BSCEF POSN=*BASIC.INF                                     
            5.1T1   493  BASIC.INF.SA.026                   1 LINE     80   52 PAGE UM   FRONCZAK            JULY 23, 1983  11:04:06
0          Copies (508/4), (508/6), (508/8), and (508/29).
1                                                                                               SUN SEP 08/96   15:24:55   Page  266
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00508/027  *BASIC                    BSI             SA  G          S0358 BSCSEF POSN=*BASIC.BSI                                    
            5.0T2    85  BASIC.BSI.SA.027                   1 SEQ      80    5 PAGE UM   FRONCZAK            JULY 03, 1981  14:59:23
            5.0T4    30                       
0          Copies (508/6).
0          Referenced by comments of: 508/2 
00508/028  *BASIC                    LIBSYM          SA  G          S1559 5.0T2 VLO FSNAME=BASIC.LIBSYM.SA.028(1)                 86
            5.0T2    86  BASIC.LIBSYM.SA.028                1 LINE     66    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:50:32
            5.0T4    31                       
0          PARAMETERIZES THE STAFF USER ID FOR BASIC LIBRARY FILES AS WELL AS THE LIBRARY PREFIX CHARACTER.
0          Referenced by comments of: 508/1, 508/19, 508/25 
00508/029  *BASIC                    SPECIALRATES    SA  G          S1559 5.0T2 VLO FSNAME=BASIC.SPECIALRATES.SA.029(1)           87
            5.0T2    87  BASIC.SPECIALRATES.SA.029          1 LINE     70    1 PAGE UM   FRONCZAK            JULY 28, 1977  01:50:33
            5.0T4    32                       
0          The disk storage charges used for the calculation of the remaining
           balance for: %print balance and statistics printing.
0          Referenced by comments of: 508/1, 508/26 
00508/030A *BASIC                    *BASIC          OC  G          *BASIC                                                          
            5.1T1   494  BASIC.?BASIC.OC.030                1 SEQ   32767   28 PAGE UM   FRONCZAK            JULY 23, 1983  11:04:07
                         *BASIC               
0          Object for BASIC.
            
           *******************************************************************************
           D5.0B version:
            
           Moved object out of shared VM.
           *******************************************************************************
00508/031A *BASIC                    BASICHELPC      M              ETC:BASICHELPC                                                  
            5.1T1   495  BASIC.BASICHELPC.M.031             1 LINE     68    1 PAGE UM   FRONCZAK            JULY 23, 1983  11:04:08
                         ETC.:BASICHELPC      
0          BASIC help command file.
00508/032  *BASIC                    SIGNONM FILE    D              ETC:BASICSIGNONM                                                
            5.0T2    92  BASIC.SIGNONM_FILE.D.034           1 LINE     59    1 PAGE UM   FRONCZAK            JULY 03, 1981  14:59:37
            5.0T4    37  ETC:BASICSIGNONM     
0          File containing BASIC "signon" message.
00508/033A *BASIC                    UPDATEFILE      UC             W070:UPDATEFILE                                                 
            5.1T1   497  BASIC.UPDATEFILE.UC.034            1 LINE     87    9 PAGE UM   FRONCZAK            JULY 23, 1983  11:04:09
0          ********************************************************************************
           D5.0B:
1                                                                                               SUN SEP 08/96   15:24:55   Page  267
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           Contains *CDUPDATE source which documents the D5.0A to D5.0B changes.
           ********************************************************************************
00509/001   PERMIT COMMAND           D5.0 MASTER     SA  G          MTS:PERMIT.S                                                    
            5.0T2    93  PERMIT_COMMAND..SA.001             1 LINE     80   27 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:38
            5.0T4    38                       
0          This is the source for the MTS $PERMIT command and the PERMIT, SETKEY,
           SETFPRIV, and SETFSAVE subroutines.  The PERMIT command is implemented
           as a CLS although it really isn't since it has no sub-commands.  This
           was done solely for ease of isolation, checkout, and modification.  Has
           $PERMIT CLS entry point PERCMD and subroutine entry points PERMIT, SETKEY,
           SETFPRIV, and SETFSAVE.  Calls many of the file routines directly.  Copies 
           COPY:GLOBALS (1026/3), *CNFGINFODSECT (654), and COPY:LLMPSEQU(100) (087).
           Assemble using COPY:MTS.MACROS (344/3), COPY:FILE.MACROS (482/45), 
           COPY:SETPARM (653) and COPY:MISC.MACROS (728).
0          Referenced by comments of: 529/1, 851/1 
00509/002A  PERMIT COMMAND           UPDATE          UC  G          MTS:PERMITUPD                                                   
            5.1T1   498  PERMIT_COMMAND.UPDATE.UC.002       1 LINE    177    3 PAGE UM   MTS       OGDEN     JULY 23, 1983  11:04:10
0          Update to produce current source, using the D5.0 source as base.
            
           ****************************************************************
           D5.0A changes:
            
           Changes required by mixed case commands are included.
           ****************************************************************
            
           ****************************************************************
           D5.0B changes:
            
           Changed to call CSSET.
           ****************************************************************
00509/003A  PERMIT COMMAND           *CLSPERMIT      OC  G          *CLSPERMIT                                                      
            5.1T1   499  PERMIT_COMMAND.?CLSPERMIT.OC.003   1 LINE     80    9 PAGE UM   MTS       OGDEN     JULY 23, 1983  11:04:10
                         *CLSPERMIT           
0          This file is normally loaded into shared VM by PISTLE, using the IPL option.
           The LOADER COM card defines the symbols PERCMD and SETFPRIV in LCSYMBOL.
           The other subroutines are named in the GATE (4000) (LCSYMBOL) and so can not
           be included in the COM card.
0          Referenced by comments of: 509/14 
00509/004   PERMIT COMMAND           *PERSUB         OC  G          *PERSUB                                                         
            5.0T2    96  PERMIT_COMMAND.*PERSUB.OC.004      1 LINE     26    1 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:42
            5.0T4    41  *PERSUB              
0          This file contains an ENT card for the symbol "PERSUB" followed by a 
           "$CONTINUE WITH *CLSPERMIT" card.  It is used as the file name in the
1                                                                                               SUN SEP 08/96   15:24:55   Page  268
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          LOADT table in MTS, and is loaded from if the PERSUB subroutine is not
           defined in LCSYMBOL.
00509/005   PERMIT COMMAND           *SKEYSUB        OC  G          *SKEYSUB                                                        
            5.0T2    97  PERMIT_COMMAND.*SKEYSUB.OC.005     1 LINE     26    1 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:43
            5.0T4    42  *SKEYSUB             
0          This file contains an ENT card for the symbol "SKEYSUB" followed by a 
           "$CONTINUE WITH *CLSPERMIT" card.  It is used as the file name in the
           LOADT table in MTS, and is loaded from if the SKEYSUB subroutine is not
           defined in LCSYMBOL.
00509/006   PERMIT COMMAND           *SFSAVSUB       OC  G          *SFSAVSUB                                                       
            5.0T2    98  PERMIT_COMMAND.*SFSAVSUB.OC.006    1 LINE     26    1 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:44
            5.0T4    43  *SFSAVSUB            
0          This file contains an ENT card for the symbol "SFSSUB" followed by a 
           "$CONTINUE WITH *CLSPERMIT" card.  It is used as the file name in the
           LOADT table in MTS, and is loaded from if the SFSSUB subroutine is not
           defined in LCSYMBOL.
00509/007   PERMIT COMMAND           *SPRIVSUB       OC  G          *SPRIVSUB                                                       
            5.0T2    99  PERMIT_COMMAND.*SPRIVSUB.OC.007    1 LINE     25    1 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:45
            5.0T4    44  *SPRIVSUB            
0          This file contains an ENT card for the symbol "SETFPSUB" followed by a 
           "$CONTINUE WITH *CLSPERMIT" card.  It is used as the file name in the
           LOADT table in MTS, and is loaded from if the SETFPSUB subroutine is not
           defined in LCSYMBOL.
00509/008   PERMIT COMMAND           SUBR TEST PGM   SF             MTS:TESTPERSUB(1,999)                                           
            5.0T2   100  PERMIT_COMMAND.SUBR_TEST.SF.008    1 LINE     72    3 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:46
            5.0T4    45                       
0          PROGRAM TO TEST THE PERMIT SUBROUTINE.
00509/009   PERMIT COMMAND           SUBR TEST PGM   SF             MTS:TESTPERSUB2(1,999)                                          
            5.0T2   101  PERMIT_COMMAND.SUBR_TEST.SF.009    1 LINE     71    2 PAGE UM   MTS       OGDEN     JULY 03, 1981  14:59:47
            5.0T4    46                       
0          ANOTHER PROGRAM TO TEST THE PERMIT SUBROUTINE.
00509/010C  PERMIT COMMAND           NEW SOURCE      SQ  G          CLS:PERMIT*SQ                                                   
            5.1T1   500  PERMIT_COMMAND.NEW_SOURCE.SQ.010   1 LINE     68    7 PAGE UM   BURLING             JULY 23, 1983  11:04:11
0          Plus source for rewritten PERMIT CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:PERMIT*SRL (509/12),
           *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 509/12, 509/13, 578/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  269
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00509/011C  PERMIT COMMAND           NEW GRAMMAR     SR  G          CLS:PERMIT*SR                                                   
            5.1T1   501  PERMIT_COMMAND.NEW_GRAMMA.SR.011   1 LINE     68    1 PAGE UM   BURLING             JULY 23, 1983  11:04:12
0          *Clparser (1076/6) grammar for rewritten $PERMIT CLS.
0          Referenced by comments of: 509/12, 509/13 
00509/012C  PERMIT COMMAND           NEW DECLAR      SQ  G          CLS:PERMIT*SRL                                                  
            5.1T1   502  PERMIT_COMMAND.NEW_DECLAR.SQ.012   1 LINE     66    1 PAGE UM   BURLING             JULY 23, 1983  11:04:12
0          Declarations generated by *CLPARSEGEN (1076/1) using (509/11) as input.  Used to
           compile (509/10).
0          Referenced by comments of: 509/10 
00509/013C  PERMIT COMMAND           NEW OBJECT      OC  G          *NEWCLSPERMIT                                                   
            5.1T1   503  PERMIT_COMMAND.NEW_OBJECT.OC.013   1 LINE   4158    3 PAGE UM   BURLING             JULY 23, 1983  11:04:12
                         *NEWCLSPERMIT        
0          Object for (509/10) and (509/11).
00509/014C  PERMIT COMMAND           NEW SUBR SOU    SQ  G          CLS:PERSUB*SQ                                                   
            5.1T1   504  PERMIT_COMMAND.NEW_SUBR_S.SQ.014   1 LINE     68   28 PAGE UM   BURLING             JULY 23, 1983  11:04:13
0          Plus source for rewrite of PERMIT subroutines (also SKEYSUB, SETFPSUB,
           and SETFPSUT). These are PISTLEd at UM, and used by Version(permit)=NEW,
           and any programs that call the PERMIT subroutine.
           Version(permit)=CURRENT (509/3) uses a private copy of the old PERMIT
           subroutines. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65),
           COPY:SUPER*SQL (045/17), CLS CMDSERV*SQL (851/1), CLS:PERSUB*SRL
           (509/16), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 509/16, 509/17 
00509/015C  PERMIT COMMAND           NEW SUBR GRAMM  SR  G          CLS:PERSUB*SR                                                   
            5.1T1   505  PERMIT_COMMAND.NEW_SUBR_G.SR.015   1 LINE     71    3 PAGE UM   BURLING             JULY 23, 1983  11:04:14
0          *Clparser (1076/6) grammar for PERMIT subroutines.
0          Referenced by comments of: 509/16, 509/17 
00509/016C  PERMIT COMMAND           NEW SUBR DECL   SQ  G          CLS:PERSUB*SRL                                                  
            5.1T1   506  PERMIT_COMMAND.NEW_SUBR_D.SQ.016   1 LINE     67    1 PAGE UM   BURLING             JULY 23, 1983  11:04:14
0          Declarations generated by *CLPARSEGEN (1076/1) using (509/15) as input.  Used
           to compile (509/14).
0          Referenced by comments of: 509/14 
00509/017C  PERMIT COMMAND           NEW SUBR OBJ    OC  G          SEG2:PERSUB                                                     
            5.1T1   507  PERMIT_COMMAND.NEW_SUBR_O.OC.017   1 LINE   3550   18 PAGE UM   BURLING             JULY 23, 1983  11:04:14
                         SEG2:PERSUB          
0          Object for (509/14) and (509/15).
1                                                                                               SUN SEP 08/96   15:24:55   Page  270
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 578/2 
00510/001   MTS VOLUME 13 (OLD)                      WF           # (OBSOLETE)                                                      
            5.0T2   102  MTS_VOLUME_13..WF.001              1 LINE    159   61 PAGE UM                       AUG. 01, 1973  22:10.11
            5.0T4    47                       
0          FORMAT input for Volume 13 "Data Concentrator User's Guide" of the
           UM MTS Manuals, August 1973.
            
           This manual is obsolete. There is a new Volume 13, dealing with 
           SDS. See comp (867).
0          Referenced by comments of: 867/1 
00511/001A *OBJLIST                                  SA  G          LBT:OBJLIST.S                                                273
            5.1T1   508  OBJLIST..SA.001                    1 LINE     72   25 PAGE UM   TIFFANY             JULY 23, 1983  11:04:15
0          PROGRAM TO DUMP MTS OBJECT DECKS IN A NICE FORMAT.  READS *ASMH (737) SYM
           RECORDS.
00511/002A *OBJLIST                                  OE  G          *OBJLIST                                                        
            5.1T1   509  OBJLIST..OE.002                    1 SEQ    7031    4 PAGE UM   TIFFANY             JULY 23, 1983  11:04:17
                         *OBJLIST             
00512/001A  MTS VOLUME 11            MASTER          WT             S0549 MTSV11 'MTS MANUALS' POSN=NEWM4.V11                       
            5.1T1   510  MTS_VOLUME_11.MASTER.WT.001        1 LINE    132   85 PAGE UM   MANUAL              JULY 23, 1983  11:05:29
0          TEXT/360 master for Volume 11 "Plot Description System" of the UM MTS manuals,
           August 1978, updated April 1980, and Sept. 1982.
            
           Editor:  Gail H. Lift
00512/002A  MTS VOLUME 11            PRINT           PT             S0549 MTSV11 'MTS MANUALS' POSN=PRINT4.V11                      
            5.1T1   511  MTS_VOLUME_11.PRINT.PT.002         1 LINE    132  174 PAGE UM   MANUAL              JULY 23, 1983  11:05:36
0          TEXT/360 print file.  There is also a Xerox 9700 print file
           (which is slightly modified from the TEXT/360 print file),
           available on request.
00512/003A  MTS VOLUME 11            FIGURES         SG  G          S0549 MTSV11 'MTS MANUALS' POSN=V11FIGS.MAIN.3                  
            5.1T1   512  MTS_VOLUME_11.FIGURES.SG.003       1 LINE     80    3 PAGE UM   MANUAL              JULY 23, 1983  11:05:45
0          GOM SOURCE FOR MAIN PROGRAM TO CALL SUBROUTINES WHICH GENERATE FIGURES
           FOR VOLUME 11.
00512/004A  MTS VOLUME 11            FIGURES         SF  G          S0549 MTSV11 'MTS MANUALS' POSN=V11FIGS.SUBR.3                  
            5.1T1   513  MTS_VOLUME_11.FIGURES.SF.004       1 LINE    150   40 PAGE UM   MANUAL              JULY 23, 1983  11:05:47
0          FORTRAN SOURCE FOR SUBROUTINES WHICH GENERATE FIGURES FOR VOLUME 11.
00512/005A  MTS VOLUME 11            INDEX SOURCE    D              S0549 MTSV11 'MTS MANUALS' POSN=V11INDEXSOU                     
            5.1T1   514  MTS_VOLUME_11.INDEX_SOURC.D.005    1 LINE     37    3 PAGE UM   MANUAL              JULY 23, 1983  11:06:25
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 11.
1                                                                                               SUN SEP 08/96   15:24:55   Page  271
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00512/006   MTS VOLUME 11            UPDATE 1        P              S1559 5.0T2 VLO FSNAME=MTS_VOLUME_11.UPDATE_1.PT.006(1)      111
            5.0T2   111  MTS_VOLUME_11.UPDATE_1.PT.006      1 LINE    103   19 PAGE UM   MANUAL              APR. 05, 1980  15:34:35
            5.0T4    56                       
0          THIS IS "UPDATE 1 TO MTS VOLUME 11," APRIL 1980.  $COPY TO A TN PRINTER 
           USING THE @MCC MODIFIER.
00512/007C  MTS VOLUME 11            UPDATE 2        P              W073:TNLV11.SEP82                                               
            5.1T1   515  MTS_VOLUME_11.UPDATE_2.P.007       1 LINE     79   27 PAGE UM   MANUAL              JULY 23, 1983  11:06:25
0          This is "Update 2 to MTS Volume 11," Sept. 1982.
00513/001   DYSSUB                   D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=DYS                         
            5.0T4   329  DYSSUB.D5.0_MASTER.SA.001          1 LINE     80   21 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:04:54
            5.0T10  233                       
0          Subroutine to process some $DISPLAY parameters.
            
           Copies COPY:LLMPSEQU(100) (087), COPY:GLOBALS (1026/3), *GDINFODSECT
           (594), *SENSEDSECT (3025), and *CNFGINFODSECT (654). Assemble using
           COPY:MTS.MACROS (344/3), COPY:SETPARM (653/1) and COPY:CC.MACROS
           (1054/3).
0          Referenced by comments of: 42/2 
00513/002A  DYSSUB                   UPDATE          UC  G          MTSS:DYS/UPD                                                    
            5.1T1   516  DYSSUB.UPDATE.UC.002               1 LINE     75   12 PAGE UM   MTS       BURLING   JULY 23, 1983  11:06:28
0          *CDUPDATE input to produce current source.
00513/003A  DYSSUB                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
            4.2CT1  117  DYSSUB..OC.003                     1 LINE     80    3 PAGE UM   MTS       BURLING   NOV. 27, 1979  23:12:48
0          NEW VERSIONS CAN BE LOADED INTO SHARED VM USING PISTLE (559), EVEN THOUGH
           DYSSUB IS INITIALLY LOADED AS PART OF THE RESIDENT SYSTEM.
           Object part of Resident System (468).
00513/004A  DYSSUB                                   L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=DYS.LIST                  
            5.1T1   517  DYSSUB..L.004                      1 LINE    133   89 PAGE UM   MTS       BURLING   JULY 23, 1983  11:07:07
00513/005A  DYSSUB                   COMMENTS        D   G          MTSS:DYS/COM                                                    
            5.1T1   518  DYSSUB.COMMENTS.D.005              1 LINE     68    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:07:08
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00514/001  *PL1TIDY                                  SP  G          W062:NEATENED                                                   
            5.0T2   112  PL1TIDY..SP.001                    1 LINE     72   18 PAGE UM   TIFFANY             JULY 03, 1981  15:00:19
            5.0T4    57                       
0          THIS IS A REVISED VERSION OF THE IBM "NEATER" PROGRAM.
           NOTE: AFTER COMPILATION, THE SYMBOL IHESAPC IN THE OBJECT MUST BE CHANGED TO IHESAPE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  272
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00514/002  *PL1TIDY                                  OE  G          OLD:PL1TIDY                                                     
            5.0T2   113  PL1TIDY..OE.002                    1 SEQ   25530    9 PAGE UM   TIFFANY             JULY 03, 1981  15:00:21
            5.0T4    58  *PL1TIDY             
0          ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD.
00514/003A *PL1TIDY                  PL/I OPT VERS   SP  G          PL1:PL1TIDY.S                                                   
            5.1T1   519  PL1TIDY.PL/I_OPT_VERS.SP.003       1 LINE     75   25 PAGE UM   TIFFANY             JULY 23, 1983  11:07:09
0          PL/I Optimizer version of PL/I tidying program.
00514/004A *PL1TIDY                  PL/I OPT VERS   OC  G          *PL1TIDY                                                        
            5.1T1   520  PL1TIDY.PL/I_OPT_VERS.OC.004       1 LINE  32767   16 PAGE UM   TIFFANY             JULY 23, 1983  11:07:11
0          Requires *PL1OPTLIB (827).
00515/001  *11ASR                    INSTAL          C              S1559 5.0T2 VLO FSNAME=11ASR.INSTAL.C.001(1)                 114
            5.0T2   114  11ASR.INSTAL.C.001                 1 LINE    125    1 PAGE UM   EADIE               JULY 03, 1981  15:00:22
            5.0T4    59                       
0          MTS commands to assemble and link edit all the csects for the PDP-11 assembler.
           Assemble using (515/2), *SYSMAC and COPY:MISC.MACROS (728).
0          Referenced by comments of: 516/1, 660/15, 686/32, 686/43, 755/1, 755/3, 861/4, 861/5 
00515/002  *11ASR                    MACLIB          SM  G          S1559 5.0T2 VLO FSNAME=11ASR.MACLIB.SM.002(1)                115
            5.0T2   115  11ASR.MACLIB.SM.002                1 LINE     64    4 PAGE UM   EADIE               APR. 05, 1980  15:34:51
            5.0T4    60                       
0          MACRO LIBRARY USED TO ASSEMBLE COMPS (515/3) THROUGH (515/7).
0          Referenced by comments of: 515/1, 515/3 
00515/003  *11ASR                    KERNEL          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.KERNEL.SA.003(1)                116
            5.0T2   116  11ASR.KERNEL.SA.003                1 LINE     86  105 PAGE UM   EADIE               JULY 03, 1981  15:00:26
            5.0T4    61                       
0          Copies SITECODE from the 11ASR macro library (515/2).
0          Referenced by comments of: 515/2, 515/11 
00515/004  *11ASR                    DCEVAL          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.DCEVAL.SA.004(1)                117
            5.0T2   117  11ASR.DCEVAL.SA.004                1 LINE     80   18 PAGE UM   EADIE               APR. 05, 1980  15:35:07
            5.0T4    62                       
00515/005  *11ASR                    REPSCN          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.REPSCN.SA.005(1)                118
            5.0T2   118  11ASR.REPSCN.SA.005                1 LINE     80    5 PAGE UM   EADIE               APR. 05, 1980  15:35:10
            5.0T4    63                       
00515/006  *11ASR                    MACPRO          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.MACPRO.SA.006(1)                119
            5.0T2   119  11ASR.MACPRO.SA.006                1 LINE     70   38 PAGE UM   EADIE               APR. 05, 1980  15:35:12
            5.0T4    64                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  273
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00515/007  *11ASR                    EXTF11          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.EXTF11.SA.007(1)                120
            5.0T2   120  11ASR.EXTF11.SA.007                1 LINE     72    7 PAGE UM   EADIE               APR. 05, 1980  15:35:23
            5.0T4    65                       
0          Referenced by comments of: 515/2 
00515/008  *11ASR                    OPCODE          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.OPCODE.SA.008(1)                121
            5.0T2   121  11ASR.OPCODE.SA.008                1 LINE     72   15 PAGE UM   EADIE               APR. 05, 1980  15:35:26
            5.0T4    66                       
00515/009  *11ASR                    MICROP          SA  G          S1559 5.0T2 VLO FSNAME=11ASR.MICROP.SA.009(1)                122
            5.0T2   122  11ASR.MICROP.SA.009                1 LINE     72    6 PAGE UM   EADIE               APR. 05, 1980  15:35:28
            5.0T4    67                       
00515/010  *11ASR                    OBJECT          OE  G          *11ASR                                                          
            5.0T2   123  11ASR.OBJECT.OE.010                1 SEQ   13512   39 PAGE UM   EADIE               JULY 03, 1981  15:00:43
            5.0T4    68  *11ASR               
00515/011A *11ASR                    11ASRERROR      M   G          ETC:11ASRERROR                                                  
            5.1T1   521  11ASR.11ASRERROR.M.011             1 LINE     70    4 PAGE UM   EADIE               JULY 23, 1983  11:07:12
                         ETC.:11ASRERROR      
0          ERROR COMMENT FILE REFERENCED BY 11ASR KERNAL (515/3) ON LINE 7455.
00515/012  *11ASR                    MEMO 286        WT             S1559 5.0T2 VLO FSNAME=11ASR.MEMO_286.WT.012(1)              125
            5.0T2   125  11ASR.MEMO_286.WT.012              1 LINE     80   49 PAGE UM   EADIE               JAN. 26, 1977  20:17:02
            5.0T4    70                       
0          THIS IS COMPUTING CENTER MEMO 286 -- "THE PDP-11 ASSEMBLER AND LINK EDITOR:
           A USER'S GUIDE TO *11ASR AND *LINK11"
0          Referenced by comments of: 516/3 
00516/001A *LINK11                                   SA  G          W267:LINK11(1000)                                               
            5.1T1   522  LINK11..SA.001                     1 LINE     80   57 PAGE UM   EADIE               JULY 23, 1983  11:07:12
0          Link editor for the PDP-11 assemblers *11ASR (515), MICRO-CROSS
           ASSEMBLERs (686), and PLUS11 (1050).
            
           ----(D5.0A)----------------------------------------------------------
            
           This version of the link editor has some improvements:
            
              1) GUSER is reset to *MSOURCE* after an attention. 
            
           *******************************************************************
           D5.1 version:
            
           This version has some changes and improvements:
            
              1) DIR record processing
            
              2) variable length hex input on commands
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  274
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             3) processing of TXT records with odd starting 
                 addresses and/or odd lengths
           ********************************************************************
0          Referenced by comments of: 660/1, 715/2, 715/3 
00516/002A *LINK11                                   OE  G          *LINK11                                                         
            5.1T1   523  LINK11..OE.002                     1 SEQ   13690    9 PAGE UM   EADIE               JULY 23, 1983  11:07:16
                         *LINK11              
0          Referenced by comments of: 1050/1 
00516/003A *LINK11                   USER'S GUIDE    WT           # (PART OF *11ASR)                                                
                                                                                    UM   EADIE                                      
0          See Memo 286 (515/12)
00517/001   LOGICAL OPERATORS                        SA  G          S1559 5.0T2 VLO FSNAME=LOGICAL_OPERATORS..SA.001(1)          128
            5.0T2   128  LOGICAL_OPERATORS..SA.001          1 LINE     70    4 PAGE UM   HARDING             JULY 28, 1977  01:59:54
            5.0T4    73                       
0          SUBROUTINES TO PROVIDE THE FOLLOWING SYSTEM/360 MACHINE OPERATIONS:  MVC, CLC, NC, OC, XC, TR, TRT, ED, AND EDMK.
00517/002   LOGICAL OPERATORS                        OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   HARDING                                    
0          Object part of *LIBRARY (524/1)
00518/001   GRGJUL SUBRS                             SA  G          S1559 5.0T2 VLO FSNAME=GRGJUL_SUBRS..SA.001(1)               129
            5.0T2   129  GRGJUL_SUBRS..SA.001               1 LINE     80    5 PAGE UM   ENGLE               DEC. 05, 1975  16:10:51
            5.0T4    74                       
0          GREGORIAN TO JULIAN DATE/TIME CONVERSION SUBROUTINES (GRGJULDT, GRGJULTM, AND GRJLSEC).
0          Referenced by comments of: 436/1, 529/1 
00518/002   GRGJUL SUBRS                             OC  G        # (PART OF JULGRG SUBRS)                                          
                                                                                    UM   ENGLE                                      
0          Part of JULGRG subroutines object (522/2).
00519/001   GRJLDT/GRJLTM SUBRS      GRJLDT          SA  G          S1559 5.0T2 VLO FSNAME=GRJLDT/GRJLTM_SUBRS.GRJLD.SA.001(1)   130
            5.0T2   130  GRJLDT/GRJLTM_SUBRS.GRJLD.SA.001   1 LINE     80    1 PAGE UM   ENGLE               JAN. 20, 1978  13:32:33
            5.0T4    75                       
0          GREGORIAN-TO-JULIAN CONVERSION SUBROUTINES (TWO OF MANY -- TOO MANY).
00519/002   GRJLDT/GRJLTM SUBRS      GRJLDT          OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  275
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00519/003   GRJLDT/GRJLTM SUBRS      GRJLTM          SA  G          S1559 5.0T2 VLO FSNAME=GRJLDT/GRJLTM_SUBRS.GRJLT.SA.003(1)   131
            5.0T2   131  GRJLDT/GRJLTM_SUBRS.GRJLT.SA.003   1 LINE     80    1 PAGE UM   ENGLE               JAN. 20, 1978  13:33:56
            5.0T4    76                       
00519/004   GRJLDT/GRJLTM SUBRS      GRJLTM          OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
00520/001   GROSDT                                   SA  G          S1559 5.0T2 VLO FSNAME=GROSDT..SA.001(1)                     132
            5.0T2   132  GROSDT..SA.001                     1 LINE     80    2 PAGE UM   ENGLE               JAN. 20, 1978  13:36:51
            5.0T4    77                       
0          GREGORIAN TO OS/360 (YYDDD) DATE CONVERSION SUBROUTINE.
00520/002   GROSDT                                   OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
00521/001   JLGRDT/JLGRTM            JLGRDT          SA  G          S1559 5.0T2 VLO FSNAME=JLGRDT/JLGRTM.JLGRDT.SA.001(1)        133
            5.0T2   133  JLGRDT/JLGRTM.JLGRDT.SA.001        1 LINE     80    1 PAGE UM   ENGLE               OCT. 03, 1972  11:55.50
            5.0T4    78                       
0          JULIAN-TO-GREGORIAN CONVERSION SUBROUTINES.
00521/002   JLGRDT/JLGRTM            JLGRDT          OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
00521/003   JLGRDT/JLGRTM            JLGRTM          SA  G          S1559 5.0T2 VLO FSNAME=JLGRDT/JLGRTM.JLGRTM.SA.003(1)        134
            5.0T2   134  JLGRDT/JLGRTM.JLGRTM.SA.003        1 LINE     80    1 PAGE UM   ENGLE               OCT. 03, 1972  11:57.15
            5.0T4    79                       
00521/004   JLGRDT/JLGRTM            JLGRTM          OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
00522/001   JULGRG SUBRS                             SA  G          S1559 5.0T2 VLO FSNAME=JULGRG_SUBRS..SA.001(1)               135
            5.0T2   135  JULGRG_SUBRS..SA.001               1 LINE     80    5 PAGE UM   ENGLE               MAY  03, 1973  10:00.10
            5.0T4    80                       
0          JULIAN TO GREGORIAN DATE/TIME CONVERSION SUBROUTINES (JULGRGDT, JULGRGTM, AND JLGRSEC).
0          Referenced by comments of: 67/27, 437/1, 529/1 
00522/002   JULGRG SUBRS                             OC  G          SEG2:CFE                                                        
            5.0T2   136  JULGRG_SUBRS..OC.002               1 LINE     80    1 PAGE UM   ENGLE               JULY 03, 1981  15:01:05
            5.0T4    81  SEG2:CFE             
0          THE OBJECT FOR THESE RE-ENTRANT SUBROUTINES IS LOADED IN SHARED VM FROM THE FILE "SEG2:REWIND#&CFE"
           BY PISTLE AT IPL.
1                                                                                               SUN SEP 08/96   15:24:55   Page  276
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 518/2 
00523/001   OSGRDT                                   SA  G          S1559 5.0T2 VLO FSNAME=OSGRDT..SA.001(1)                     137
            5.0T2   137  OSGRDT..SA.001                     1 LINE     80    2 PAGE UM   ENGLE               JAN. 20, 1978  13:38:52
            5.0T4    82                       
0          OS/360 (YYDDD) TO GREGORIAN DATE CONVERSION SUBROUTINE.
00523/002   OSGRDT                                   OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   ENGLE                                      
0          Object part of *LIBRARY (524/1)
00524/001A *LIBRARY                                  OL             *LIBRARY                                                        
            5.1T1   524  LIBRARY..OL.001                    1 LINE  32767   86 PAGE UM   SALISBURY           JULY 23, 1983  11:07:17
                         *LIBRARY             
0          OBJECT LIBRARY FOR SYSTEM NON-RESIDENT SUBROUTINES.  THE SOURCE FILES FOR THE PROGRAMS CONTAINED
           IN THIS LIBRARY ARE GIVEN ELSEWHERE IN THIS DISTRIBUTION UNDER THE SPECIFIC SUBROUTINE NAME.
           THIS LIBRARY IS AUTOMATICALLY SEARCHED WHEN PROGRAMS ARE LOADED IF THERE ARE UNRESOLVED SYMBOLS.
0          Referenced by comments of: 120/2, 223/2, 273/2, 275/2, 278/2, 278/4, 282/3, 283/2, 285/2, 287/2, 357/3, 389/2,
                 436/2, 436/4, 437/2, 437/4, 437/6, 487/5, 517/2, 519/2, 519/4, 520/2, 521/2, 521/4, 523/2, 528/60, 563/12,
                 606/2, 607/2, 612/2, 626/2, 627/2, 659/19, 659/28, 659/30, 659/32, 666/3, 687/2, 709/2, 744/1, 744/6, 773/1,
                 798/4, 800/2, 800/4, 801/2, 1005/4 
00524/002A *LIBRARY                  CREATELIB       C              LIB:CREATELIB                                                   
            5.1T1   525  LIBRARY.CREATELIB.C.002            1 LINE     55    1 PAGE UM   SALISBURY           JULY 23, 1983  11:07:20
0          MTS command file to construct a new library file; it copies the
           individual modules into a file, link edits the file, and then run
           *GENLIB. NOTE: This command file has many "$CONTINUE WITH" lines for
           private files (not distributed) which constitute the components of
           *LIBRARY.
0          Referenced by comments of: 524/3 
00524/003  *LIBRARY                  ENTERLIB        C              LIB:ENTERLIB                                                    
            5.0T2   140  LIBRARY.ENTERLIB.C.003             1 LINE     37    1 PAGE UM   SALISBURY           JULY 03, 1981  15:01:11
            5.0T4    85                       
0          MTS COMMAND FILE TO ENTER THE NEW LIBRARY FILE CONSTRUCTED BY CREATELIB (524/2)
           INTO *LIBRARY.  WITH RSF, THIS CAN BE DONE DURING NORMAL SYSTEM OPERATION.
00524/004  *LIBRARY                                  WF             S0592 SFILES FSNAME=MOD.LIB                                     
            5.0T2   141  LIBRARY..WF.004                    1 LINE     68    3 PAGE UM   SALISBURY           DEC. 03, 1980  16:01:50
            5.0T4    86                       
00525/001   ELEM FUNC LIB            SQRT            SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.SQRT.SA.001(1)          142
            5.0T2   142  ELEM_FUNC_LIB.SQRT.SA.001          1 LINE     70    1 DISK UM   HARDING             JUNE 27, 1972  12:02.02
            5.0T4    87                       
0          THE ELEMENTARY FUNCTION LIBRARY CONTAINS THE MATHEMATICAL AND IMPLICITLY
           CALLED SUBROUTINES USUALLY ASSOCIATED WITH THE FORTRAN IV LANGUAGE AS WELL AS
1                                                                                               SUN SEP 08/96   15:24:55   Page  277
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          A FEW ADDITIONAL FUNCTIONS WHICH, INEXPLICABLY, ARE NOT PART OF THE IBM
           FORTRAN LIBRARY. THESE FUNCTIONS ARE ALL RE-ENTRANT AND, THEREFORE, ARE
           NORMALLY LOADED INTO SHARED VM.
            
           COMPS (525/1) THROUGH (525/46) SHOULD BE ASSEMBLED USING EFL.MACLIB (525/47).
0          Referenced by comments of: 525/1, 525/47, 527/1, 528/53, 1000/32 
00525/002   ELEM FUNC LIB            EXP             SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.EXP.SA.002(1)           143
            5.0T2   143  ELEM_FUNC_LIB.EXP.SA.002           1 LINE     71    3 PAGE UM   HARDING             SEP. 24, 1974  09:04.04
            5.0T4    88                       
00525/003   ELEM FUNC LIB            ALOG10/ALOG     SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ALOG10/ALOG.SA.003(1)   144
            5.0T2   144  ELEM_FUNC_LIB.ALOG10/ALOG.SA.003   1 LINE     71    2 DISK UM   HARDING             JUNE 27, 1972  12:02.13
            5.0T4    89                       
00525/004   ELEM FUNC LIB            COS/SIN         SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.COS/SIN.SA.004(1)       145
            5.0T2   145  ELEM_FUNC_LIB.COS/SIN.SA.004       1 LINE     71    2 DISK UM   HARDING             JUNE 27, 1972  12:02.18
            5.0T4    90                       
00525/005   ELEM FUNC LIB            COTAN/TAN       SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.COTAN/TAN.SA.005(1)     146
            5.0T2   146  ELEM_FUNC_LIB.COTAN/TAN.SA.005     1 LINE     71    2 DISK UM   HARDING             JUNE 27, 1972  12:02.23
            5.0T4    91                       
00525/006   ELEM FUNC LIB            ARCOS/ARSIN     SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ARCOS/ARSIN.SA.006(1)   147
            5.0T2   147  ELEM_FUNC_LIB.ARCOS/ARSIN.SA.006   1 LINE     69    2 DISK UM   HARDING             JUNE 27, 1972  12:02.28
            5.0T4    92                       
00525/007   ELEM FUNC LIB            ATAN2/ATAN      SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ATAN2/ATAN.SA.007(1)    148
            5.0T2   148  ELEM_FUNC_LIB.ATAN2/ATAN.SA.007    1 LINE     70    2 DISK UM   HARDING             JUNE 27, 1972  12:02.33
            5.0T4    93                       
00525/008   ELEM FUNC LIB            COSH/SINH       SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.COSH/SINH.SA.008(1)     149
            5.0T2   149  ELEM_FUNC_LIB.COSH/SINH.SA.008     1 LINE     71    1 DISK UM   HARDING             JUNE 27, 1972  12:02.38
            5.0T4    94                       
00525/009   ELEM FUNC LIB            TANH            SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.TANH.SA.009(1)          150
            5.0T2   150  ELEM_FUNC_LIB.TANH.SA.009          1 LINE     68    1 DISK UM   HARDING             JUNE 27, 1972  12:02.42
            5.0T4    95                       
00525/010   ELEM FUNC LIB            ERFC/ERF        SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ERFC/ERF.SA.010(1)      151
            5.0T2   151  ELEM_FUNC_LIB.ERFC/ERF.SA.010      1 LINE     71    2 DISK UM   HARDING             JUNE 27, 1972  12:02.46
            5.0T4    96                       
00525/011   ELEM FUNC LIB            ALGAMA/GAMMA    SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ALGAMA/GAMM.SA.011(1)   152
            5.0T2   152  ELEM_FUNC_LIB.ALGAMA/GAMM.SA.011   1 LINE     69    2 DISK UM   HARDING             JUNE 27, 1972  12:02.51
            5.0T4    97                       
00525/012   ELEM FUNC LIB            DSQRT           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DSQRT.SA.012(1)         153
            5.0T2   153  ELEM_FUNC_LIB.DSQRT.SA.012         1 LINE     68    1 DISK UM   HARDING             JUNE 27, 1972  12:02.56
            5.0T4    98                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  278
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00525/013   ELEM FUNC LIB            DEXP            SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DEXP.SA.013(1)          154
            5.0T2   154  ELEM_FUNC_LIB.DEXP.SA.013          1 LINE     70    2 DISK UM   HARDING             JUNE 27, 1972  12:03.00
            5.0T4    99                       
00525/014   ELEM FUNC LIB            DLOG10/DLOG     SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DLOG10/DLOG.SA.014(1)   155
            5.0T2   155  ELEM_FUNC_LIB.DLOG10/DLOG.SA.014   1 LINE     67    2 DISK UM   HARDING             JUNE 27, 1972  12:03.05
            5.0T4   100                       
00525/015   ELEM FUNC LIB            DCOS/DSIN       SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DCOS/DSIN.SA.015(1)     156
            5.0T2   156  ELEM_FUNC_LIB.DCOS/DSIN.SA.015     1 LINE     69    2 DISK UM   HARDING             JUNE 27, 1972  12:03.11
            5.0T4   101                       
00525/016   ELEM FUNC LIB            DCOTAN/DTAN     SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DCOTAN/DTAN.SA.016(1)   157
            5.0T2   157  ELEM_FUNC_LIB.DCOTAN/DTAN.SA.016   1 LINE     71    2 DISK UM   HARDING             JUNE 27, 1972  12:03.15
            5.0T4   102                       
00525/017   ELEM FUNC LIB            DARCOS/DARSIN   SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DARCOS/DARS.SA.017(1)   158
            5.0T2   158  ELEM_FUNC_LIB.DARCOS/DARS.SA.017   1 LINE     69    2 DISK UM   HARDING             JUNE 27, 1972  12:03.20
            5.0T4   103                       
00525/018   ELEM FUNC LIB            DATAN2/DATAN    SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DATAN2/DATA.SA.018(1)   159
            5.0T2   159  ELEM_FUNC_LIB.DATAN2/DATA.SA.018   1 LINE     70    2 DISK UM   HARDING             FEB. 16, 1973  09:37.48
            5.0T4   104                       
00525/019   ELEM FUNC LIB            DCOSH/DSINH     SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DCOSH/DSINH.SA.019(1)   160
            5.0T2   160  ELEM_FUNC_LIB.DCOSH/DSINH.SA.019   1 LINE     68    2 DISK UM   HARDING             JUNE 27, 1972  12:03.32
            5.0T4   105                       
00525/020   ELEM FUNC LIB            DTANH           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DTANH.SA.020(1)         161
            5.0T2   161  ELEM_FUNC_LIB.DTANH.SA.020         1 LINE     68    1 DISK UM   HARDING             JUNE 27, 1972  12:03.36
            5.0T4   106                       
00525/021   ELEM FUNC LIB            DERFC/DERF      SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DERFC/DERF.SA.021(1)    162
            5.0T2   162  ELEM_FUNC_LIB.DERFC/DERF.SA.021    1 LINE     72    2 DISK UM   HARDING             JUNE 27, 1972  12:03.39
            5.0T4   107                       
00525/022   ELEM FUNC LIB            DLGAMA/DGAMMA   SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DLGAMA/DGAM.SA.022(1)   163
            5.0T2   163  ELEM_FUNC_LIB.DLGAMA/DGAM.SA.022   1 LINE     70    2 DISK UM   HARDING             JUNE 27, 1972  12:03.42
            5.0T4   108                       
00525/023   ELEM FUNC LIB            CABS            SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CABS.SA.023(1)          164
            5.0T2   164  ELEM_FUNC_LIB.CABS.SA.023          1 LINE     66    1 DISK UM   HARDING             JUNE 27, 1972  12:03.46
            5.0T4   109                       
00525/024   ELEM FUNC LIB            CSQRT           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CSQRT.SA.024(1)         165
            5.0T2   165  ELEM_FUNC_LIB.CSQRT.SA.024         1 LINE     67    2 DISK UM   HARDING             JUNE 27, 1972  12:03.50
            5.0T4   110                       
00525/025   ELEM FUNC LIB            CEXP            SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CEXP.SA.025(1)          166
            5.0T2   166  ELEM_FUNC_LIB.CEXP.SA.025          1 LINE     68    1 DISK UM   HARDING             JUNE 27, 1972  12:03.54
            5.0T4   111                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  279
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00525/026   ELEM FUNC LIB            CLOG            SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CLOG.SA.026(1)          167
            5.0T2   167  ELEM_FUNC_LIB.CLOG.SA.026          1 LINE     69    2 DISK UM   HARDING             JUNE 27, 1972  12:03.57
            5.0T4   112                       
00525/027   ELEM FUNC LIB            CCOS/CSIN       SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CCOS/CSIN.SA.027(1)     168
            5.0T2   168  ELEM_FUNC_LIB.CCOS/CSIN.SA.027     1 LINE     69    2 PAGE UM   HARDING             JULY 27, 1973  12:18.03
            5.0T4   113                       
00525/028   ELEM FUNC LIB            CDABS           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDABS.SA.028(1)         169
            5.0T2   169  ELEM_FUNC_LIB.CDABS.SA.028         1 LINE     69    1 DISK UM   HARDING             JUNE 27, 1972  12:04.04
            5.0T4   114                       
00525/029   ELEM FUNC LIB            CDSQRT          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDSQRT.SA.029(1)        170
            5.0T2   170  ELEM_FUNC_LIB.CDSQRT.SA.029        1 LINE     71    2 DISK UM   HARDING             JUNE 27, 1972  12:04.08
            5.0T4   115                       
00525/030   ELEM FUNC LIB            CDEXP           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDEXP.SA.030(1)         171
            5.0T2   171  ELEM_FUNC_LIB.CDEXP.SA.030         1 LINE     70    1 DISK UM   HARDING             JUNE 27, 1972  12:04.12
            5.0T4   116                       
00525/031   ELEM FUNC LIB            CDLOG           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDLOG.SA.031(1)         172
            5.0T2   172  ELEM_FUNC_LIB.CDLOG.SA.031         1 LINE     69    2 DISK UM   HARDING             JUNE 27, 1972  12:04.16
            5.0T4   117                       
00525/032   ELEM FUNC LIB            CDCOS/CDSIN     SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDCOS/CDSIN.SA.032(1)   173
            5.0T2   173  ELEM_FUNC_LIB.CDCOS/CDSIN.SA.032   1 LINE     63    2 DISK UM   HARDING             JUNE 27, 1972  12:04.19
            5.0T4   118                       
00525/033   ELEM FUNC LIB            FIXPI#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FIXPI#.SA.033(1)        174
            5.0T2   174  ELEM_FUNC_LIB.FIXPI#.SA.033        1 LINE     70    1 DISK UM   HARDING             JUNE 27, 1972  12:04.23
            5.0T4   119                       
00525/034   ELEM FUNC LIB            FRXPI#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FRXPI#.SA.034(1)        175
            5.0T2   175  ELEM_FUNC_LIB.FRXPI#.SA.034        1 LINE     66    1 DISK UM   HARDING             JUNE 27, 1972  12:04.25
            5.0T4   120                       
00525/035   ELEM FUNC LIB            FDXPI#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FDXPI#.SA.035(1)        176
            5.0T2   176  ELEM_FUNC_LIB.FDXPI#.SA.035        1 LINE     68    1 DISK UM   HARDING             JUNE 27, 1972  12:04.28
            5.0T4   121                       
00525/036   ELEM FUNC LIB            FCXPI#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FCXPI#.SA.036(1)        177
            5.0T2   177  ELEM_FUNC_LIB.FCXPI#.SA.036        1 LINE     67    1 DISK UM   HARDING             JUNE 27, 1972  12:04.31
            5.0T4   122                       
00525/037   ELEM FUNC LIB            FCDXI#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FCDXI#.SA.037(1)        178
            5.0T2   178  ELEM_FUNC_LIB.FCDXI#.SA.037        1 LINE     71    1 DISK UM   HARDING             JUNE 27, 1972  12:04.34
            5.0T4   123                       
00525/038   ELEM FUNC LIB            FRXPR#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FRXPR#.SA.038(1)        179
            5.0T2   179  ELEM_FUNC_LIB.FRXPR#.SA.038        1 LINE     66    1 DISK UM   HARDING             JUNE 27, 1972  12:04.37
            5.0T4   124                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  280
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00525/039   ELEM FUNC LIB            FDXPD#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FDXPD#.SA.039(1)        180
            5.0T2   180  ELEM_FUNC_LIB.FDXPD#.SA.039        1 LINE     67    1 DISK UM   HARDING             JUNE 27, 1972  12:04.43
            5.0T4   125                       
00525/040   ELEM FUNC LIB            CMPY#           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CMPY#.SA.040(1)         181
            5.0T2   181  ELEM_FUNC_LIB.CMPY#.SA.040         1 LINE     61    1 DISK UM   HARDING             JUNE 27, 1972  12:04.46
            5.0T4   126                       
00525/041   ELEM FUNC LIB            CDVD#           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDVD#.SA.041(1)         182
            5.0T2   182  ELEM_FUNC_LIB.CDVD#.SA.041         1 LINE     67    1 PAGE UM   HARDING             APR. 05, 1980  15:35:49
            5.0T4   127                       
00525/042   ELEM FUNC LIB            CDMPY#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDMPY#.SA.042(1)        183
            5.0T2   183  ELEM_FUNC_LIB.CDMPY#.SA.042        1 LINE     61    1 DISK UM   HARDING             JUNE 27, 1972  12:04.54
            5.0T4   128                       
00525/043   ELEM FUNC LIB            CDDVD#          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDDVD#.SA.043(1)        184
            5.0T2   184  ELEM_FUNC_LIB.CDDVD#.SA.043        1 LINE     67    1 PAGE UM   HARDING             APR. 05, 1980  15:35:51
            5.0T4   129                       
00525/044   ELEM FUNC LIB            DREAL           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DREAL.SA.044(1)         185
            5.0T2   185  ELEM_FUNC_LIB.DREAL.SA.044         1 LINE     58    1 DISK UM   HARDING             JUNE 27, 1972  12:05.00
            5.0T4   130                       
00525/045   ELEM FUNC LIB            DIMAG           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DIMAG.SA.045(1)         186
            5.0T2   186  ELEM_FUNC_LIB.DIMAG.SA.045         1 LINE     58    1 DISK UM   HARDING             JUNE 27, 1972  12:05.02
            5.0T4   131                       
00525/046   ELEM FUNC LIB            MINMAX          SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.MINMAX.SA.046(1)        187
            5.0T2   187  ELEM_FUNC_LIB.MINMAX.SA.046        1 LINE     65    2 DISK UM   HARDING             JUNE 27, 1972  12:05.05
            5.0T4   132                       
0          Referenced by comments of: 525/1, 525/47 
00525/047   ELEM FUNC LIB            EFL.MACLIB      SM  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.EFL.MACLIB.SM.047(1)    188
            5.0T2   188  ELEM_FUNC_LIB.EFL.MACLIB.SM.047    1 LINE     65    1 DISK UM   HARDING             JUNE 27, 1972  12:05.10
            5.0T4   133                       
0          EFL MACRO LIBRARY REQUIRED FOR ASSEMBLING COMPS (525/1) THROUGH (525/46).
0          Referenced by comments of: 525/1 
00525/048   ELEM FUNC LIB            ERRMON#         SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ERRMON#.SA.048(1)       189
            5.0T2   189  ELEM_FUNC_LIB.ERRMON#.SA.048       1 LINE     70    9 PAGE UM   HARDING             JULY 28, 1977  02:09:29
            5.0T4   134                       
0          EFL ERROR MONITOR.
0          Referenced by comments of: 527/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  281
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00525/049   ELEM FUNC LIB            <EFL>           SA  G          S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.<EFL>.SA.049(1)         190
            5.0T2   190  ELEM_FUNC_LIB.<EFL>.SA.049         1 LINE     57    3 PAGE UM   HARDING             SEP. 24, 1974  09:03.35
            5.0T4   135                       
0          SOURCE FOR LOW-CORE SYMBOL TABLE "<EFL>" WHICH DEFINES EACH OF THE ENTRY POINTS FOR THE EFL ROUTINES.
           THE <EFL> SYMBOL TABLE IS POINTED TO BY LCSYMBOL.
           THE ASSEMBLED NAME OF THIS PROGRAM IS "EFL" SINCE "<EFL>" IS AN ILLEGAL CSECT NAME.  THE OBJECT DECK MUST BE
           CHANGED (BY THE EDITOR) TO CHANGE THE NAME TO "<EFL>" IF IT IS RE-ASSEMBLED.
00525/050   ELEM FUNC LIB            OBJECT          OC  G          SEG2:EFL                                                        
            5.0T2   191  ELEM_FUNC_LIB.OBJECT.OC.050        1 LINE     80   17 PAGE UM   HARDING             JULY 03, 1981  15:03:58
            5.0T4   136  SEG2:EFL             
0          OBJECT LOADED INTO SHARED VM AT IPL BY PISTLE.
           THE FOLLOWING SYMBOLS ARE ADDED TO LCSYMBOL BY PISTLE:
            
             TRACER, TRACER#, SIOC, SIOC#, SIOCP, AND <EFL>
            
           THE SYMBOL <EFL> DEFINES A SEPARATE SYMBOL TABLE WHICH CONTAINS THE ADDRESSES OF
           OF ALL THE EFL ENTRY POINTS.
0          Referenced by comments of: 526/4, 527/2 
00526/001   SIOC SUBR                                SA  G          S1559 5.0T2 VLO FSNAME=SIOC_SUBR..SA.001(1)                  192
            5.0T2   192  SIOC_SUBR..SA.001                  1 LINE     80   42 PAGE UM   HARDING             JULY 28, 1977  02:09:37
            5.0T4   137                       
0          AN I/O CONVERSION PROGRAM TO PERFORM FLOATING POINT, INTEGER, LOGICAL, AND HEX CONVERSIONS.  THE CONVERSIONS
           AVAILABLE CORRESPOND TO THOSE USUALLY ASSOCIATED WITH THE D, E, F, G, I, L, AND Z FORTRAN FORMAT SPECIFICATIONS.
           THIS PROGRAM IS RE-ENTRANT AND, THEREFORE, IS NORMALLY LOADED INTO SHARED VM.
00526/002   SIOC SUBR                                OC  G          SEG2:SIOC                                                       
            5.0T2   193  SIOC_SUBR..OC.002                  1 LINE     80    3 PAGE UM   HARDING             JULY 03, 1981  15:04:01
            5.0T4   138  SEG2:SIOC            
00526/003   SIOC SUBR                SIOCP           SA  G          S1559 5.0T2 VLO FSNAME=SIOC_SUBR.SIOCP.SA.003(1)             194
            5.0T2   194  SIOC_SUBR.SIOCP.SA.003             1 LINE     80    6 PAGE UM   HARDING             APR. 05, 1980  15:35:56
            5.0T4   139                       
0          SUBROUTINE TO TRANSLATE FORTRAN FORMAT-LIKE CHARACTER STRINGS INTO THE DATA
           BLOCK REQUIRED FOR CALLING SIOC.
00526/004   SIOC SUBR                SIOCP           OC  G        # (PART OF ELEM FUNC LIB OBJECT)                                  
                                                                                    UM   HARDING                                    
0          Part of SEG2:EFL (525/50).
00527/001   TRACER SUBR                              SA  G          S1559 5.0T2 VLO FSNAME=TRACER_SUBR..SA.001(1)                195
            5.0T2   195  TRACER_SUBR..SA.001                1 LINE     80   52 PAGE UM   HARDING             SEP. 24, 1974  09:04.21
            5.0T4   140                       
0          THE TRACEBACK PROGRAM FORMERLY PROVIDED CONVERSATIONAL ERROR PROCESSING FOR ERROR
           CONDITIONS DETECTED BY THE ELEMENTARY FUNCTION LIBRARY (525) AS WELL AS PROGRAM
           AND ATTENTION INTERRUPT PROCESSING.  COMMANDS ARE AVAILABLE FOR DISPLAYING AND
1                                                                                               SUN SEP 08/96   15:24:55   Page  282
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ALTERING FLOATING POINT, INTEGER, CHARACTER, AND HEX DATA.  THIS PROGRAM IS
           RE-ENTRANT AND, THEREFORE, CAN BE LOADED INTO SHARED VM.
            
           NOTE:  AT UM, THIS COMPONENT IS CONSIDERED TO BE OBSOLETE AND WILL PROBABLY BE
                  REMOVED FROM THE SYSTEM IN THE NEAR FUTURE SINCE THE CURRENT VERSION OF
                  THE EFL ERROR MONITOR (525/48) NO LONGER CALLS IT.
00527/002   TRACER SUBR                              OC  G        # (PART OF ELEM FUNC LIB OBJECT)                                  
                                                                                    UM   HARDING                                    
0          Part of SEG2:EFL (525/50).
00528/001A  ALGOLW                   ALGOLW          OC  G          S1527 ALGOLW 'ARCHIVE'                                      97  
            5.1T1   526  ALGOLW.ALGOLW.OC.001               1 LINE     24    1 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  18:25:25
0           
           ALW  *********************************************************  ALW
           ALW  *                                                       *  ALW
           ALW  *                  U N E   A L G O L  W                 *  ALW
           ALW  *                                                       *  ALW
           ALW  *********************************************************  ALW
            
            
           ALW  =========================================================  ALW
            
           Contact people:
            
               Alan Hunter
                  NUMAC Computing Service
                     Computing Laboratory
                     The University of Newcastle upon Tyne
                     NEWCASTLE   NE1 7RU
                     England
            
               Jim Bodwin 
                  Computing Center
                     The University of Michigan
                     1075 Beal Avenue
                     Ann Arbor
                     MICHIGAN  48109
                     U.S.A. 
            
           ALW  =========================================================  ALW
            
           Installation of the Algol W system from this distribution is 
           described in subcomponent (528/24).  This and all other writeups
           included with this component should be $COPied to a TN
           printer @MCC.  The ALGOLW user manual, MTS Volume 16, is 
           distributed as component (741).
            
           ALW  =========================================================  ALW
            
           All subcomponents should be restored to filenames formed from:
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  283
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                            <subname>.<type>
            
           except (528/36), which should be restored to "MACLIB".
            
           ALW  =========================================================  ALW
            
           This subcomponent:
            
           This is the public file *ALGOLW if Algol W is loaded into shared VM.
           The following component (528/2) is *ALGOLW otherwise.  It is now the
           only public file in the Algol W system,  but contains only the
           loader records required to link into the post IPL loaded system.
           The compiler/monitor entry point name is AWDRIVER, in the post IPL
           Algol W system - subcomponent (528/2).  To install without
           re-assembly only (528/1) and (528/2) are required.  For non-shared
           VM systems only (528/2) and possibly (528/70) are required.
0          Referenced by comments of: 528/1, 528/2, 844/27, 844/32 
00528/002A  ALGOLW                   ALGOLW          OE  G          *ALGOLW                                                         
            5.1T1   527  ALGOLW.ALGOLW.OE.002               1 LINE  32767   59 PAGE UNE  HUNTER    J BODWIN  JULY 23, 1983  11:08:48
                         *ALGOLW              
0          Contains the re-entrant Algol W system, which may run in 
           either post-IPL loaded shared storage or in user segments.  It is
           built from the individual object decks by the set of MTS commands
           in subcomponent (528/40).
            
           To use in user segments this subcomponent should be restored and
           $RUN.  This is currently done at UM where the contents of this
           component reside in the public file *ALGOLW.  Another copy of this
           resides in *LIBRARY since this also includes the Algol W run-time
           library.  It is possible to split out the unneeded modules in the
           run-time library version.  However, this has not been done because
           of the problems associated with maintaining two versions.  Note that
           the run-time library IS used by the compiler.  For systems where
           Algol W is to reside in shared VM, this is the module may be loaded
           directly into shared VM and the preceeding file (528/1) should be
           restored to *ALGOLW.  Additionally, AWSEG2 (528/70) should be
           loaded into shared VM if Algol W was ever loaded into shared VM.
           See the component for a fuller description of why.
            
           A source file, subcomponent (528/39), may be used to transfer the
           contents of this file to the file SEG2:ALGOLW, which is normally the
           production Algol W system.  See also the comment below.
            
           The COM card defining LCSYMBOL entries is:
            COM ALGOLW01
            
           This subcomponent contains the assembled object decks from the
           following source decks:
            
              DRIVER.SA   (528/14) -- Compiler system control routine
              SERVICES.SA (528/51) -- Compiler service routines
1                                                                                               SUN SEP 08/96   15:24:55   Page  284
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             LOADER.SA   (528/33) -- Loader for CLG / Monitor
              SCAN.S3     (528/49) -- Compiler phase A : scan
              PARSE.S3    (528/42) -- Compiler phase A : parse
              AWB.S3      (528/07) -- Compiler phase B : code generate 
              RENTALIB.SA (528/47) -- Run time initialisation and interrupt exits
              GETENV.SA   (528/20) -- ALGOL W environment getter
              IOPACK.SA   (528/27) -- I/O system entries
              SYSPACK.SA  (528/55) -- I/O system unit control
              FMTPACK.SA  (528/16) -- I/O system format routines
              BADGUYS.SA  (528/09) -- Run time error processor
              GOODGUYS.SA (528/23) -- Run time debug processor
              FUNRTNS.SA  (528/18) -- Function entries
              SHORTFNS.SA (528/53) -- Short real and complex analytic functions
              LONGFNS.SA  (528/35) -- Long real and complex analytic functions
              RECORDS.S3  (528/45) -- Record allocation
              WOLFPACK.SA (528/58) -- Keyword / expression scanner
              MTSSIM.SA   (528/38) -- MTS system interface module
              LCS.SA      (528/31) -- ALGOL W low core symbol table
              DEFAULT.SA  (791/01) -- MTS time and page limit defaults
            
           If this file is to be loaded into shared VM then the following two
           lines should be appended first:
            LCS            LCSYMBOL
            LDT
0          Referenced by comments of: 528/1, 528/12, 528/39, 528/40 
00528/003   ALGOLW                   ASM             C   G          S1527 ALGOLW 'ARCHIVE'                                      82  
            5.0T2   198  ALGOLW.ASM.C.003                   1 LINE    114    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:20
            5.0T4   143                       
0          MTS skeleton command deck to assemble a mythical Algol W component
           "XYZ".  Copy it to a scratch file, say "-ASM", and edit/source:
            
               $EDIT -ASM :CHANGE@ALL /FILE ;XYZ;<name>;
               $SOURCE -ASM
            
           to assemble the subcomponent called <name>.
00528/004   ALGOLW                   AWA             C   G          S1527 ALGOLW 'ARCHIVE'                                      83  
            5.0T2   199  ALGOLW.AWA.C.004                   1 LINE     84    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:21
            5.0T4   144                       
0          MTS commands to compile the compiler, Phase A. The scanner is in (528/49),
           and its object is in (528/48). The parser is in (528/42), and its object is
           in (528/41).
0          Referenced by comments of: 528/41, 528/48 
00528/005   ALGOLW                   AWB             C   G          S1527 ALGOLW 'ARCHIVE'                                      84  
            5.0T2   200  ALGOLW.AWB.C.005                   1 LINE     70    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:22
            5.0T4   145                       
0          MTS commands to compiler the compiler, Phase B.
1                                                                                               SUN SEP 08/96   15:24:55   Page  285
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          The source is in (528/7), and the object is in (528/6).
0          Referenced by comments of: 528/6 
00528/006A  ALGOLW                   AWB             OC  G          S1527 ALGOLW 'ARCHIVE'                                      54  
            5.1T1   528  ALGOLW.AWB.OC.006                  1 LINE     80   52 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:44:51
0          Compiler scan and parse phase object produced by (528/5) from (528/7).
0          Referenced by comments of: 528/5 
00528/007A  ALGOLW                   AWB             S3  G          S1527 ALGOLW 'ARCHIVE'                                      30  
            5.1T1   529  ALGOLW.AWB.S3.007                  1 LINE     72   81 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:36:39
0          Source (PL360) for the Algol W compiler, phase B.
0          Referenced by comments of: 528/2, 528/5, 528/6, 528/65 
00528/008A  ALGOLW                   BADGUYS         OC  G          S1527 ALGOLW 'ARCHIVE'                                      59  
            5.1T1   530  ALGOLW.BADGUYS.OC.008              1 LINE     80   22 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:46:53
0          Object deck assembled from subcomponent (528/9).
00528/009A  ALGOLW                   BADGUYS         SA  G          S1527 ALGOLW 'ARCHIVE'                                      36  
            5.1T1   531  ALGOLW.BADGUYS.SA.009              1 LINE     72   51 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:38:51
0          Assembler source for the Algol W run time error and exception
           processor.
            
           SD:    AWXERROR
           LD:    ** None **
0          Referenced by comments of: 528/2, 528/8, 528/59, 528/66 
00528/010   ALGOLW                   BUILD           C   G          S1527 ALGOLW 'ARCHIVE'                                      85  
            5.0T2   205  ALGOLW.BUILD.C.010                 1 LINE     68    9 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:38
            5.0T4   150                       
0          Contains an MTS command deck to build the driver file for this
           distribution, from scratch, in a file called "_DRIVER".  It runs
           *DEDIT (461/1) - comments are stored in the driver file negative line range.
00528/011   ALGOLW                   COMMON          S3  G          S1527 ALGOLW 'ARCHIVE'                                      31  
            5.0T2   206  ALGOLW.COMMON.S3.011               1 LINE     72    4 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:39
            5.0T4   151                       
0          Compiler scan and parse phase : source for data segments and procedures
           common to both (528/49) and (528/42).
0          Referenced by comments of: 528/42, 528/49 
1                                                                                               SUN SEP 08/96   15:24:55   Page  286
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00528/012   ALGOLW                   DECKGEN         C   G          S1527 ALGOLW 'ARCHIVE'                                      86  
            5.0T2   207  ALGOLW.DECKGEN.C.012               1 LINE    113    3 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:40
            5.0T4   152                       
0          A command deck to assemble/compile all of the object decks for the ALGOL W
           system, assuming nothing. If *ALL* of the assemblies and compilations are
           successful then (528/40) is invoked to regenerate (528/2).
0          Referenced by comments of: 528/40 
00528/013A  ALGOLW                   DRIVER          OC  G          S1527 ALGOLW 'ARCHIVE'                                      61  
            5.1T1   532  ALGOLW.DRIVER.OC.013               1 LINE     80   13 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:48:05
0          Object deck assembled from subcomponent (528/14).
00528/014A  ALGOLW                   DRIVER          SA  G          S1527 ALGOLW 'ARCHIVE'                                      38  
            5.1T1   533  ALGOLW.DRIVER.SA.014               1 LINE     72   38 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:39:52
0          Assembler source for the Algol W compiler system driver routine.
           All scheduling of source programs through the compiler, and in
           CLG/Monitor mode, loading and execution of compiled programs, is 
           performed by this control section.  This includes processing of
           compiler parameters and those given on control cards.
            
           Copies GLOBALS (528/21).
            
           SD:    AWDRIVER      Compiler system (*ALW) entry point
           LD:    ** None **
0          Referenced by comments of: 528/2, 528/13, 528/21, 528/51, 528/67 
00528/015A  ALGOLW                   FMTPACK         OC  G          S1527 ALGOLW 'ARCHIVE'                                      62  
            5.1T1   534  ALGOLW.FMTPACK.OC.015              1 LINE     80   13 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:48:24
0          Object deck assembled from subcomponent (528/16).
00528/016A  ALGOLW                   FMTPACK         SA  G          S1527 ALGOLW 'ARCHIVE'                                      39  
            5.1T1   535  ALGOLW.FMTPACK.SA.016              1 LINE     72   50 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:40:29
0          Assembler source for the Algol W I/O format conversion routines.
           Processes input and output data conversion.   These are stack
           linked "Q-routines".
            
           SD:    AWFMTPAK      Q-routine transfer vector
           LD:    ** None **
0          Referenced by comments of: 528/2, 528/15, 528/68 
00528/017   ALGOLW                   FUNRTNS         OC  G          S1527 ALGOLW 'ARCHIVE'                                      63  
            5.0T2   212  ALGOLW.FUNRTNS.OC.017              1 LINE     80    5 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:52
            5.0T4   157                       
0          Object deck assembled from subcomponent (528/18).
1                                                                                               SUN SEP 08/96   15:24:55   Page  287
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00528/018   ALGOLW                   FUNRTNS         SA  G          S1527 ALGOLW 'ARCHIVE'                                      40  
            5.0T2   213  ALGOLW.FUNRTNS.SA.018              1 LINE     72   14 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:53
            5.0T4   158                       
0          Assembler source for the Algol W standard function entries control
           section.   Provides entries to implicit functions (powers, complex
           arithmetic, etc.) and the link through to standard functions of
           analysis provided by (528/53) and (528/35).
            
           SD:    AWFUNLIB
           LD:    AWCHKASR      Assertion check 
                  AWTIMEFN      Clock function - TIME
                  AWTRACER      Debug trace - TRACE
                  AWFMCALL      Formal call
                  AWFPARCV      Formal parameter conversion
                  AWREFCHK      Reference check
                  AWEXPNFN      Exponent function - EXPONENT
                  AWSANALF      Real analytic functions - (528/53)
                  AWLANALF      Long real analytic functions - (528/35)
                  AWSCANLF      Complex analytic functions - (528/53)
                  AWLCANLF      Long complex analytic functions - (528/35)
                  AWPOWERS      Powers evaluation
                  AWRICVFN      Real to integer conversion functions -
                                   ENTIER, ROUND, TRUNCATE
                  AWCARITH      Complex arithmetic
0          Referenced by comments of: 528/2, 528/17 
00528/019   ALGOLW                   GETENV          OC  G          S1527 ALGOLW 'ARCHIVE'                                      64  
            5.0T2   214  ALGOLW.GETENV.OC.019               1 LINE     80    6 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:55
            5.0T4   159                       
0          Object deck assembled from subcomponent (528/20).
00528/020   ALGOLW                   GETENV          SA  G          S1527 ALGOLW 'ARCHIVE'                                      41  
            5.0T2   215  ALGOLW.GETENV.SA.020               1 LINE     68   10 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:56
            5.0T4   160                       
0          Assembler source for the Algol W environment acquisition routines.
            
           SD:    AWGETENV    Non Algol W entry to Algol W
           LD:    ALWBEG      Explicit initialization
                  ALWEND      Explicit shutdown
                  AWLINKST    Link function environment switch
0          Referenced by comments of: 528/2, 528/19 
00528/021   ALGOLW                   GLOBALS         SA  G          S1527 ALGOLW 'ARCHIVE'                                      42  
            5.0T2   216  ALGOLW.GLOBALS.SA.021              1 LINE     68    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:57
            5.0T4   161                       
0          This file defines three assembler variables: 
            
              &INSTALL     -- set to your installation code (e.g. 'UNE')
1                                                                                               SUN SEP 08/96   15:24:55   Page  288
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             &VERSION     -- set to the version identifier
                              (normally a five-character date)
              &LIBNAME     -- the current Algol W entry in LCSYMBOL
            
            
           This file is copied by (528/14) and (528/38).  Conditional assembly
           *MUST* be confined to the system interface module (528/38) *ONLY*.
           (528/14) assembles two of the variables into an 8-byte descriptor:
           CL5'&VERSION',CL3'&INSTALL'.  This appears on the END card of any
           object program generated.  It also generates the COM card for 
           PISTLE using &LIBNAME.
0          Referenced by comments of: 528/14, 528/31, 528/33, 528/38 
00528/022   ALGOLW                   GOODGUYS        OC  G          S1527 ALGOLW 'ARCHIVE'                                      65  
            5.0T2   217  ALGOLW.GOODGUYS.OC.022             1 LINE     80    4 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:58
            5.0T4   162                       
0          Object deck assembled from subcomponent (528/23).
00528/023   ALGOLW                   GOODGUYS        SA  G          S1527 ALGOLW 'ARCHIVE'                                      43  
            5.0T2   218  ALGOLW.GOODGUYS.SA.023             1 LINE     68    2 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:04:59
            5.0T4   163                       
0          Assembler source for the Algol W run time debug processor routines
           processor.  (Implementation held pending MTS community decisions.)
            
           SD:    AWXDEBUG
           LD:    not yet finalized
0          Referenced by comments of: 528/2, 528/22 
00528/024   ALGOLW                   INSTALL         P   G          S1527 ALGOLW 'ARCHIVE'                                      93  
            5.0T2   219  ALGOLW.INSTALL.P.024               1 LINE     76    3 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:00
            5.0T4   164                       
0          Print file from subcomponent (528/25). Copy to a TN printer.
0          Referenced by comments of: 528/1, 528/25 
00528/025   ALGOLW                   INSTALL         WX  G          S1527 ALGOLW 'ARCHIVE'                                      92  
            5.0T2   220  ALGOLW.INSTALL.WX.025              1 LINE     74    3 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:01
            5.0T4   165                       
0          TEXTFORM source for:
            
              ==========================================================
              =   Algol W Installation Guide                           =
              =   by - Alan Hunter                                     =
              =   April 1970                                           =
              ==========================================================
            
           This short document describes how to install Algol W in the MTS
           operating system.  It is intended for the "keeper" of Algol W 
1                                                                                               SUN SEP 08/96   15:24:55   Page  289
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          at each particular installation.
           The print file is subcomponent (528/24).
0          Referenced by comments of: 528/24 
00528/026   ALGOLW                   IOPACK          OC  G          S1527 ALGOLW 'ARCHIVE'                                      66  
            5.0T2   221  ALGOLW.IOPACK.OC.026               1 LINE     80    7 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:02
            5.0T4   166                       
0          Object deck assembled from subcomponent (528/27).
00528/027   ALGOLW                   IOPACK          SA  G          S1527 ALGOLW 'ARCHIVE'                                      44  
            5.0T2   222  ALGOLW.IOPACK.SA.027               1 LINE     72   19 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:03
            5.0T4   167                       
0          Assembler source for the Algol W I/O system entries control section.
           Provides initial entries for all I/O entry standard procedures, and
           for string conversion functions.
            
           SD:    AWIOPACK
           LD:    AWRDEDIT      Basic input - READ, READON, READCARD
                  AWWREDIT      Basic output - WRITE, WRITEON, WRITECARD
                  AWGTEDIT      Unit input - GET, GETON
                  AWPTEDIT      Unit output - PUT, PUTON
                  AWGTCONV      Read internal string - GETSTRING
                  AWPTCONV      Write internal string - PUTSTRING
                  AWGETSTR      Unit string input - GETCARD, XGETCARD
                  AWPUTSTR      Unit string output - PUTCARD, XPUTCARD
                  AWDELETE      Unit indexed delete - XDELETE
                  AWIOSYSP      Control procedures - READER, WRITER, IOCONTROL,
                                   NEWLINE, RELEASE, PROTECT, REWIND, EMPTY,
                                   FLUSH, ATTNTRAP, OBEY, STOP
                  AWASSIGN      Unit allocation - ASSIGN
                  AWQUACON      Unit control - CONTROL, QUALIFY
                  AWSENSIO      Unit information - SENSE
                  AWSTRCVF      String conversion functions - INTBASE10, 
                                   INTBASE16, BASE10, LONGBASE10, BASE16,
                                   LONGBASE16, DATE
0          Referenced by comments of: 528/2, 528/26 
00528/028   ALGOLW                   KXSCAN          P   G          S1527 ALGOLW 'ARCHIVE'                                      94  
            5.0T2   223  ALGOLW.KXSCAN.P.028                1 LINE     88    6 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:05
            5.0T4   168                       
0          Print file from subcomponent (528/29). Copy to a TN printer.
0          Referenced by comments of: 528/29 
00528/029   ALGOLW                   KXSCAN          WX  G          S1527 ALGOLW 'ARCHIVE'                                      95  
            5.0T2   224  ALGOLW.KXSCAN.WX.029               1 LINE    102    3 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:07
            5.0T4   169                       
0          TEXTFORM source for:
1                                                                                               SUN SEP 08/96   15:24:55   Page  290
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
              ==========================================================
              =   Newcastle University Computing Laboratory            =
              =   NUMAC Document S21                                   =
              =   KXSCAN - A Keyword and Expression Scanner            =
              =   by - Alan Hunter                                     =
              =   December 1979 (incomplete)                           =
              ==========================================================
            
           This document describes the KXSCAN subroutine used for all keyword
           and expression decoding within Algol W.   It is completely 
           independent of both Algol W and any operating system, and has 
           been used in the OS/MVT and OS/VS2 3.7 systems at NUMAC.
           The print file is subcomponent (528/28).
            
           Copyright:       The University of Newcastle upon Tyne
0          Referenced by comments of: 528/28 
00528/030   ALGOLW                   LCS             OC  G          S1527 ALGOLW 'ARCHIVE'                                      67  
            5.0T2   225  ALGOLW.LCS.OC.030                  1 LINE     80    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:07
            5.0T4   170                       
0          Object deck assembled from subcomponent (528/31).
00528/031   ALGOLW                   LCS             SA  G          S1527 ALGOLW 'ARCHIVE'                                      45  
            5.0T2   226  ALGOLW.LCS.SA.031                  1 LINE     68    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:08
            5.0T4   171                       
0          Assembler source for the ALGOL W system low core symbol table.
            
           SD:    &libname      from (528/21)  Low core symbol table
           LD:    ** None **
0          Referenced by comments of: 528/2, 528/30 
00528/032   ALGOLW                   LOADER          OC  G          S1527 ALGOLW 'ARCHIVE'                                      68  
            5.0T2   227  ALGOLW.LOADER.OC.032               1 LINE     80    5 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:09
            5.0T4   172                       
0          Object deck assembled from subcomponent (528/33).
00528/033   ALGOLW                   LOADER          SA  S          S1527 ALGOLW 'ARCHIVE'                                      46  
            5.0T2   228  ALGOLW.LOADER.SA.033               1 LINE     72   18 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:10
            5.0T4   173                       
0          Assembler source for the Algol W system loader.   Used by the 
           compiler driver to load programs compiled in CLG or Monitor mode.
            
           Copies ALWB:GLOBALS (528/21).
            
           SD:    AWLOADER      Algol W loader
           LD:    ** None **
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  291
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 528/2, 528/32 
00528/034   ALGOLW                   LONGFNS         OC  S          S1527 ALGOLW 'ARCHIVE'                                      69  
            5.0T2   229  ALGOLW.LONGFNS.OC.034              1 LINE     80    6 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:12
            5.0T4   174                       
0          Object deck assembled from subcomponent (528/35).
00528/035   ALGOLW                   LONGFNS         SA  G          S1527 ALGOLW 'ARCHIVE'                                      47  
            5.0T2   230  ALGOLW.LONGFNS.SA.035              1 LINE     72   23 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:13
            5.0T4   175                       
0          Assembler source for the Algol W short precision analytic functions.
           Code adapted from the University of Michigan Elementary Function 
           Library, which was in turn adapted from the Chicago routines.
            
           SD:    AWLRLFNS      Long real function transfer vector -
                                   LONGSQRT, LONGEXP, LONGLN, LONGLOG, LONGSIN,
                                   LONGCOS, LONGARCTAN, LONGCOT, LONGARCSIN,
                                   LONGARCCOS, LONGSINH, LONGCOSH, LONGTANH,
                                   LONGERF, LONGERFC, LONGGAMMA, LONGLNGAMMA
           LD:    AWLCXFNS      Long complex function transfer vector -
                                   LONGCXSIN, LONGCXCOS, LONGCXSQRT, LONGCXLN,
                                   LONGCXEXP 
0          Referenced by comments of: 528/2, 528/18, 528/34 
00528/036   ALGOLW                   MACLIB          SM  G          S1527 ALGOLW 'ARCHIVE'                                      76  
            5.0T2   231  ALGOLW.MACLIB.SM.036               1 LINE     72   39 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:15
            5.0T4   176                       
0          Contains the Algol W system macro library.
0          Referenced by comments of: 528/1 
00528/037   ALGOLW                   MTSSIM          OC  G          S1527 ALGOLW 'ARCHIVE'                                      70  
            5.0T2   232  ALGOLW.MTSSIM.OC.037               1 LINE     80    5 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:19
            5.0T4   177                       
0          Object deck assembled from subcomponent (528/38).
00528/038   ALGOLW                   MTSSIM          SA  G          S1527 ALGOLW 'ARCHIVE'                                      48  
            5.0T2   233  ALGOLW.MTSSIM.SA.038               1 LINE     72   31 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:20
            5.0T4   178                       
0          Assembler source for the Algol W <--> MTS system interface
           module.   All communication between Algol W and the operating
           system is performed by calls to these entries.
            
           Copies ALWB:GLOBALS (528/21).
            
           SD:    AWMTSSIM
           LD:    AWSIMBGN      SIM initialisation 
                  AWSIMEND      SIM close down 
1                                                                                               SUN SEP 08/96   15:24:55   Page  292
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                 AWGTMAIN      Get main storage 
                  AWFRMAIN      Return main storage 
                  AWGTROOT      Get root dsect storage
                  AWFDROOT      Find root dsect storage
                  AWFRROOT      Free root dsect storage
                  AWERRRTN      Escape route for GETENV routines
                  AWXCLOCK      System clock 
                  AWRDRECD      Read in a record 
                  AWWRRECD      Write out a record 
                  AWWRDECK      Punch out a loader record
                  AWDSOPEN      Open a dataset 
                  AWDSCLOS      Close a dataset 
                  AWDSFREE      Free (release) a dataset 
                  AWDSRWND      Rewind a dataset 
                  AWDSUNIT      Assign a dataset to DDname 
                  AWDSCTRL      Control operation on dataset 
                  AWDSSENS      Return dataset information 
                  AWDSCLEA      Reset or empty a dataset 
                  AWCNRPLY      Query conversational
                  AWDDNAME      Get Device Definition names 
                  AWPREFIX      Set terminal prefix character 
                  AWATTNTR      Set attention interrupt exit 
                  AWPGNTTR      Set program interrupt exit 
                  AWTIMNTR      Set timer interrupt exit
                  AWSIMXIT      Escape route for compiler system
                  AWSYSCMD      Issue system command 
                  AWGETLCS      Return A(system LCS table) 
                  AWIDVLOG      Monitor ID verify and log 
                  AWEDITOR      Invoke system editor
                  AWLIBOBJ      Supply library file inclusion directive
                  AWEXLOAD      Load external object modules
                  AWCCLOOP      Supply information for page limit check 
                  AWDEFALT      Supply installation defaults
0          Referenced by comments of: 528/2, 528/21, 528/37 
00528/039   ALGOLW                   NEWSYS          C   G          S1527 ALGOLW 'ARCHIVE'                                      96  
            5.0T2   234  ALGOLW.NEWSYS.C.039                1 LINE     66    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:23
            5.0T4   179                       
0          This contains a set of MTS commands to change the current post-IPL
           (production) Algol W system.  It should be sourced from the id
           "SEG2".  Be sure that you are aware of the consequences of using
           this, and that you have the permission of your local Senior
           Systems Programmer to change files on "SEG2".  The new system
           is built using *OBJUTIL (721) using the file SEG2:ALGOLW (528/2)
           as a basis.
0          Referenced by comments of: 528/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  293
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00528/040   ALGOLW                   OBJBUILD        C   G          S1527 ALGOLW 'ARCHIVE'                                      87  
            5.0T2   235  ALGOLW.OBJBUILD.C.040              1 LINE     66    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:24
            5.0T4   180                       
0          Contains an MTS command deck to set up (528/2) from the individual object
           decks. During the conversion, SYM loader cards are deleted. This file is
           copied by (528/12).
0          Referenced by comments of: 528/2, 528/12 
00528/041   ALGOLW                   PARSE           OC  G          S1527 ALGOLW 'ARCHIVE'                                      55  
            5.0T2   236  ALGOLW.PARSE.OC.041                1 LINE     80   43 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:25
            5.0T4   181                       
0          Compiler scan and parse phase object produced by (528/4) from (528/42).
0          Referenced by comments of: 528/4 
00528/042   ALGOLW                   PARSE           S3  G          S1527 ALGOLW 'ARCHIVE'                                      32  
            5.0T2   237  ALGOLW.PARSE.S3.042                1 LINE     72   73 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:28
            5.0T4   182                       
0          PL360 source for the Algol W compiler, phase A, recursive 
           descent parser. Has a $CONTINUE WITH COMMON.S3 (528/11) record.
0          Referenced by comments of: 528/2, 528/4, 528/11, 528/41 
00528/043   ALGOLW                   RECORDS         C   G          S1527 ALGOLW 'ARCHIVE'                                      88  
            5.0T2   238  ALGOLW.RECORDS.C.043               1 LINE     66    1 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:33
            5.0T4   183                       
0          Contains an MTS command deck to compile the record allocation library routine
           (528/45).
00528/044   ALGOLW                   RECORDS         OC  G          S1527 ALGOLW 'ARCHIVE'                                      56  
            5.0T2   239  ALGOLW.RECORDS.OC.044              1 LINE     80    3 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:34
            5.0T4   184                       
0          Object deck compiled from subcomponent (528/45).
00528/045   ALGOLW                   RECORDS         S3  G          S1527 ALGOLW 'ARCHIVE'                                      33  
            5.0T2   240  ALGOLW.RECORDS.S3.045              1 LINE     72    5 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:35
            5.0T4   185                       
0          PL360 source for the Algol W record allocation routine.
            
           SD:    AWRCALOC      Record allocator
           LD:    ** None **
0          Referenced by comments of: 528/2, 528/43, 528/44 
1                                                                                               SUN SEP 08/96   15:24:55   Page  294
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00528/046   ALGOLW                   RENTALIB        OC  G          S1527 ALGOLW 'ARCHIVE'                                      71  
            5.0T2   241  ALGOLW.RENTALIB.OC.046             1 LINE     80    9 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:36
            5.0T4   186                       
0          Object deck assembled from subcomponent (528/47).
00528/047   ALGOLW                   RENTALIB        SA  G          S1527 ALGOLW 'ARCHIVE'                                      49  
            5.0T2   242  ALGOLW.RENTALIB.SA.047             1 LINE     68   18 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:37
            5.0T4   187                       
0          Assembler source for the Algol W library root control section.
           Provides the initialization entry for the run time stytem, with
           dummy section initialization code, and also the interrupt exits.
            
           SD:    AWSYSTEM      Initial run time entry
           LD:    AWSYINIT      root dummy section initialisation
                  AWCLOSE       system close down
0          Referenced by comments of: 528/2, 528/46 
00528/048   ALGOLW                   SCAN            OC  G          S1527 ALGOLW 'ARCHIVE'                                      57  
            5.0T2   243  ALGOLW.SCAN.OC.048                 1 LINE     80   19 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:39
            5.0T4   188                       
0          Compiler scan and parse phase object produced by (528/4) from (528/49).
0          Referenced by comments of: 528/4 
00528/049   ALGOLW                   SCAN            S3  G          S1527 ALGOLW 'ARCHIVE'                                      34  
            5.0T2   244  ALGOLW.SCAN.S3.049                 1 LINE     72   27 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:41
            5.0T4   189                       
0          Source (PL360) for the Algol W compiler, phase A, scanner.
           Has a $CONTINUE WITH COMMON.S3 (528/11) record.
0          Referenced by comments of: 528/2, 528/4, 528/11, 528/48 
00528/050   ALGOLW                   SERVICES        OC  G          S1527 ALGOLW 'ARCHIVE'                                      72  
            5.0T2   245  ALGOLW.SERVICES.OC.050             1 LINE     80    8 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:43
            5.0T4   190                       
0          Object deck assembled from subcomponent (528/51).
00528/051   ALGOLW                   SERVICES        SA  G          S1527 ALGOLW 'ARCHIVE'                                      50  
            5.0T2   246  ALGOLW.SERVICES.SA.051             1 LINE     70   32 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:44
            5.0T4   191                       
0          Assembler source for the Algol W compiler service routines.
           These supply I/O and other facilities to the compiler phases. 
           Their addresses are contained in a transfer vector in (528/14).
            
           SD:    AWCSRTNS
           LD:    AWGETCRD      Source cards input 
                  AWPUTLNE      Listing/Diagnostics output 
1                                                                                               SUN SEP 08/96   15:24:55   Page  295
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                 AWVFLIST      Virtual file listing routines 
                  AWXRFRTN      Cross reference 
                  AWPUTCRD      Object card output 
                  AWGTSTOR      Nested storage allocation 
                  AWFRSTOR      Nested storage release 
                  AWGTTIME      Processor time clock 
                  AWPUTMSG      Messages, AWCSRTNS + AWDRIVER 
0          Referenced by comments of: 528/2, 528/50 
00528/052   ALGOLW                   SHORTFNS        OC  G          S1527 ALGOLW 'ARCHIVE'                                      73  
            5.0T2   247  ALGOLW.SHORTFNS.OC.052             1 LINE     80    6 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:47
            5.0T4   192                       
0          Object deck assembled from subcomponent (528/53).
00528/053   ALGOLW                   SHORTFNS        SA  G          S1527 ALGOLW 'ARCHIVE'                                      51  
            5.0T2   248  ALGOLW.SHORTFNS.SA.053             1 LINE     72   20 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:49
            5.0T4   193                       
0          Assembler source for the Algol W short precision analytic functions.
           Code adapted from the University of Michigan Elementary Function 
           Library (525), which was in turn adapted from the Chicago routines.
            
           SD:    AWSRLFNS      Short real function transfer vector -
                                   SQRT, EXP,LN, LOG, SIN, COS, ARCTAN, TAN,
                                   COT, ARCSIN, ARCCOS, SINH, COSH, TANH, ERF,
                                   ERFC, GAMMA, LNGAMMA
           LD:    AWSCXFNS      Short complex function transfer vector -
                                   CXSIN, CXCOS, CXSQRT, CXLN, CXEXP
0          Referenced by comments of: 528/2, 528/18, 528/52 
00528/054A  ALGOLW                   SYSPACK         OC  G          S1527 ALGOLW 'ARCHIVE'                                      74  
            5.1T1   536  ALGOLW.SYSPACK.OC.054              1 LINE     80   14 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:50:18
0          Object deck assembled from subcomponent (528/55).
00528/055A  ALGOLW                   SYSPACK         SA  G          S1527 ALGOLW 'ARCHIVE'                                      52  
            5.1T1   537  ALGOLW.SYSPACK.SA.055              1 LINE     72   33 PAGE UNE  HUNTER    J BODWIN  JUNE 11, 1982  15:44:10
0          Assembler source for the Algol W I/O system record and device 
           control routines.   These are stack linked "Q-routines".
            
           SD:    AWSYSPAK      Q-routine transfer vector
           LD:    AWFMSCAN      Format string decoder (O/S type I rtn)
0          Referenced by comments of: 528/2, 528/54, 528/69 
00528/056   ALGOLW                   TESTPGMS        SW  G          S1527 ALGOLW 'ARCHIVE'                                      89  
            5.0T2   251  ALGOLW.TESTPGMS.SW.056             1 LINE     81    7 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:57
            5.0T4   196                       
0          Contains a set of small Algol W programs to test *ALGOLW as a
1                                                                                               SUN SEP 08/96   15:24:55   Page  296
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          compiler (source to object deck).
           To use:   $RUN *ALGOLW SCARDS=TESTPGMS.SW
00528/057   ALGOLW                   WOLFPACK        OC  G          S1527 ALGOLW 'ARCHIVE'                                      75  
            5.0T2   252  ALGOLW.WOLFPACK.OC.057             1 LINE     80   11 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:05:58
            5.0T4   197                       
0          Object deck assembled from subcomponent (528/58).
00528/058   ALGOLW                   WOLFPACK        SA  G          S1527 ALGOLW 'ARCHIVE'                                      53  
            5.0T2   253  ALGOLW.WOLFPACK.SA.058             1 LINE     72   49 PAGE UNE  HUNTER    J BODWIN  JULY 03, 1981  15:06:00
            5.0T4   198                       
0          Assembler source for the Algol W system independent subroutines.
           Provides a keyword/expression scanner and a block letter routine.
            
           SD:    AWINDRTN
           LD:    AWKXSCAN      Keyword and expression processing 
                  AWCVREAL      Convert real routine 
                  AWBLKLTR      Block letter generation 
                  AWSPACES      Stop on space table
                  AWSPACOM      Stop on space or comma table
                  AWNSPACE      Stop on not space table
                  AWNSPACM      Stop on not space or comma table
                  AWUCTOLC      Translate UC alpha to LC alpha table
                  AWATSIGN      Stop on an "@" table 
                  KXSCAN        Tourist synonym for AWKXSCAN
0          Referenced by comments of: 528/2, 528/57 
00528/059   ALGOLW                   AWSNAP          SA  G          S1527 ALGOLW 'ARCHIVE'                                      90  
            5.0T2   254  ALGOLW.AWSNAP.SA.059               1 LINE     68    3 PAGE UM   J BODWIN            JULY 03, 1981  15:06:08
            5.0T4   199                       
0          This subcomponent is not a part of ALGOLW, but an interface to the ALGOLW
           SNAPSHOT routine, which is part of BADGUYS (528/9). Documentation may be
           found in the source.
00528/060   ALGOLW                   AWSNAP          OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   J BODWIN                                   
0          Object part of *LIBRARY (524/1)
00528/061   ALGOLW                   *XALGOLW        OE  G        # (OBSOLETE)                                                      
            D4T2    238  ALGOLW.*XALGOLW.OE.006             1 SEQ    3402    2 PAGE UM   J BODWIN            JULY 28, 1977  02:13:51
0          *XALGOLW IS NO LONGER SUPPORTED AT UM. 
00528/062C  ALGOLW                   MEMO 427        WF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO427.SOU                       
            5.1T1   538  ALGOLW.MEMO_427.WF.062             1 LINE    137    4 PAGE UM   J BODWIN            MAY  04, 1983  16:53:45
0          This is Computing Center Memo 427 -- "Algol W Snapshot Dumps."
1                                                                                               SUN SEP 08/96   15:24:55   Page  297
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00528/063C  ALGOLW                   MEMO 427        PF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO427.OUT                       
            5.1T1   539  ALGOLW.MEMO_427.PF.063             1 LINE     76    4 PAGE UM   J BODWIN            MAY  04, 1983  16:53:25
0          Printer-ready version of (528/63).
0          Referenced by comments of: 528/63 
00528/064   ALGOLW                   UNSP I/O        SA  G  ALIO    S1153 UNSP VLO FSNAME=ALGOLIO.S                                 
            5.0T2   255  ALGOLW.UNSP_I/O.SA.062             1 LINE     80    5 PAGE UM   UNSP      J BODWIN  FEB. 23, 1979  04:51:31
            5.0T4   200                       
0          THE OBJECT OF THIS IS IN UNSP:LIBRARY (685/2). THIS MODULE IS USABLE, BUT 
           IT HAS BEEN OUTDATED BY NEW FEATURES OF *ALGOLW.
00528/065C  ALGOLW                   AWB             UC  G          S1527 ALGOLW 'ARCHIVE'                                      77  
            5.1T1   540  ALGOLW.AWB.UC.065                  1 LINE     67    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:55:53
0          Update deck tehat (when applied to AWB base source) produced (528/7).
           See dist 4.1 for the base source.
00528/066C  ALGOLW                   BADGUYS         UC  G          S1527 ALGOLW 'ARCHIVE'                                      78  
            5.1T1   541  ALGOLW.BADGUYS.UC.066              1 LINE     67    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:56:01
0          Update deck that (when applied to BADGUYS base source) produces (528/9).
           See dist 4.1 for the base source.
00528/067C  ALGOLW                   DRIVER          UC  G          S1527 ALGOLW 'ARCHIVE'                                      79  
            5.1T1   542  ALGOLW.DRIVER.UC.067               1 LINE     83    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:56:11
0          Update deck that (when applied to DRIVER base source) produces (528/14).
           See dist 4.1 for the base source.
00528/068C  ALGOLW                   FMTPACK         UC  G          S1527 ALGOLW 'ARCHIVE'                                      80  
            5.1T1   543  ALGOLW.FMTPACK.UC.068              1 LINE     65    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:56:19
0          Update deck that (when applied to FMTPACK base source) produces (528/16).
           See dist 4.1 for the base source.
00528/069C  ALGOLW                   SYSPACK         UC  G          S1527 ALGOLW 'ARCHIVE'                                      81  
            5.1T1   544  ALGOLW.SYSPACK.UC.069              1 LINE     66    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:56:30
0          Update deck that (when applied to SYSPACK base source) produces (528/55).
           See dist 4.1 for the base source.
00528/070C  ALGOLW                   AWSEG2          OC  G          S1527 ALGOLW 'ARCHIVE'                                      58  
            5.1T1   545  ALGOLW.AWSEG2.OC.070               1 LINE     80    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:46:44
0          This module is a FAKE LCS table with the name ALGOLW01 that should
           be loaded into shared VM on systems where Algol W USED to reside in
           shared VM but now is loaded into user VM.  This is needed because
           the old Algol W object modules contained:
            
             RIP ALGOLW01
             LCS
1                                                                                               SUN SEP 08/96   15:24:55   Page  298
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0            ... 
             object module
             ...
             LCS ALGOLW01
            
           The ALGOLW01 LCS table contained pointers to all of the Algol W
           routines that used to reside in shared VM.  Unless the "dummy" LCS
           table is loaded, such "old" object modules will produce a warning
           about ALGOLW01 not being found during loading.  I just wish that I
           had thought about this problem when I drempt up the ALGOLW01 scheme.
           Sigh.  Apologies to all who run across this.
0          Referenced by comments of: 528/1, 528/2, 528/71 
00528/071C  ALGOLW                   AWSEG2          SA  G          S1527 ALGOLW 'ARCHIVE'                                      35  
            5.1T1   546  ALGOLW.AWSEG2.SA.071               1 LINE     68    1 PAGE UM   J BODWIN            JUNE 11, 1982  15:38:48
0          Source file for above (528/70)
00529/001   FILESTATUS COMMAND       D5.0 MASTER     SA             MTS:FSTA.S                                                      
            5.0T2   256  FILESTATUS_COMMAND..SA.001         1 LINE     79   46 PAGE UM   MTS       PICKELMAN JULY 03, 1981  15:06:14
            5.0T4   201                       
0          SOURCE FOR FILESTATUS COMMAND WHICH IS NORMALLY LOADED BY PISTLE AT IPL AND
           EXECUTED WHENEVER A $FILESTATUS COMMAND IS ISSUED. THIS COMMAND PRINTS INFO
           ABOUT FILES. THE FILESTATUS COMMAND, LIKE THE PERMIT COMMAND, WAS IMPLEMENTED
           AS A COMMAND LANGUAGE SUBSYSTEM EVEN THOUGH IT REALLY ISN'T A CLS. SEE THE
           COMMENTS FOR (509/1).
            
           COPIES *GFINFODSECT (593) AND *GDINFODSECT (594). ASSEMBLE WITH
           COPY:MTS.MACROS (344/3). REQUIRES SHARED VM SUBROUTINES JULGRGDT (522) AND
           GRGJULDT (518).
0          Referenced by comments of: 47/1, 212/1, 441/1 
00529/002A  FILESTATUS COMMAND       UPDATE          UC  G          MTS:FSTAUPD                                                     
            5.1T1   547  FILESTATUS_COMMAND.UPDATE.UC.002   1 LINE    119    7 PAGE UM   MTS       PICKELMAN JULY 23, 1983  11:10:57
0          Uses D5.0 source as base.
            
           **********************************************************************
           D5.1 version:
            
           Mixed case messages added.
           **********************************************************************
00529/003A  FILESTATUS COMMAND                       OC             *CLSFILESTATUS                                                  
            5.1T1   548  FILESTATUS_COMMAND..OC.003         1 LINE     80   18 PAGE UM   MTS       PICKELMAN JULY 23, 1983  11:10:58
                         *CLSFILESTATUS       
1                                                                                               SUN SEP 08/96   15:24:55   Page  299
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00530/001  *AMENDS                                   SA             S1559 5.0T2 VLO FSNAME=AMENDS..SA.001(1)                     259
            5.0T2   259  AMENDS..SA.001                     1 LINE     80    6 PAGE UM   DWB                 JULY 28, 1977  02:17:36
            5.0T4   204                       
0          CHANGED TO PROMPT FOR OLD AND NEW COPIES IF UNITS 0 AND/OR 1 ARE NOT ASSIGNED.
00530/002  *AMENDS                                   OC             *AMENDS                                                         
            5.0T2   260  AMENDS..OC.002                     1 LINE     80    3 PAGE UM   DWB                 JULY 03, 1981  15:06:29
            5.0T4   205  *AMENDS              
00531/001   COMMAND STATISTICS       CMDSTAT D5.0    SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=CMDSTAT                     
            5.0T4   332  COMMAND_STATISTICS.CMDSTA.SA.001   1 LINE     80    6 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:05:08
            5.0T10  236                       
0          General system logging facility to log all MTS commands, the HASP log,
           the operator's console log, unit and machine check records, etc.
           Copies COPY:CMDAREADSECT (531/20), COPY:LLMPSEQU (087), COPY:GLOBALS
           (1026/3), AND *CNFGINFODSECT (654/1). Assemble using COPY:MTS.MACROS
           (344/3) and COPY:SETPARM (653/1).
            
           See the comments at the start of COPY:CMDAREADSECT (531/20) for a 
           list of the current codes.
            
           Records are logged by calling the S-type entry to CMDSTAT as follows:
                  CALL CMDSTATS,(LOC,LEN,TYPE)
           where LOC is the location of the record
                 LEN is the halfword length of the record
                 TYPE is the fullword record type
           and   RC=0 is normal
                 RC=4 mean all drop areas are full; the record has not been logged.
0          Referenced by comments of: 42/2, 413/1, 447/1, 752/1 
00531/002A  COMMAND STATISTICS       CMDSTAT UPDATE  UC  G          MTSS:CMDSTAT/UPD(1,99999)                                       
            5.1T1   549  COMMAND_STATISTICS.CMDSTA.UC.002   1 LINE     72    3 PAGE UM   MTS       BURLING   JULY 23, 1983  11:10:59
0          *CDUPDATE input to produce current source.
0          Referenced by comments of: 531/20, 632/1, 865/2, 866/4 
00531/003A  COMMAND STATISTICS       CMDSTAT OBJECT  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00531/004A  COMMAND STATISTICS       CMDSTAT LIST    L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=CMDSTAT.LIST              
            5.1T1   550  COMMAND_STATISTICS.CMDSTA.L.004    1 LINE    133   49 PAGE UM   MTS       BURLING   JULY 23, 1983  11:11:34
00531/005A  COMMAND STATISTICS       CMDSTAT COMM    D   G          MTSS:CMDSTAT/COM                                                
            5.1T1   551  COMMAND_STATISTICS.CMDSTA.D.005    1 LINE     66    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:11:35
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
1                                                                                               SUN SEP 08/96   15:24:55   Page  300
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00531/006A  COMMAND STATISTICS       *CLN            C              *CLN                                                            
            5.1T1   552  COMMAND_STATISTICS.?CLN.C.006      1 LINE     81    1 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:36
                         *CLN                 
0          Command file to delete various old data lines from INIT:UC3330LOG (621/14)
           and INIT:MCFILE (577/15) before starting *CMD (531/7).  Runs SYS:PURGE
           (739/5).  This file is started by INIT:INITCMD (097/2).
0          Referenced by comments of: 97/2, 531/7, 739/5 
00531/007A  COMMAND STATISTICS       *CMD            C   G          *CMD                                                            
            5.1T1   553  COMMAND_STATISTICS.?CMD.C.007      1 LINE     90    1 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:36
                         *CMD                 
0          When the system is IPLed, INIT:INITCMD (097/2) invokes *CLN (531/6), which in turn invokes *CMD.  After signon,
           *CMD runs CMDPIKUP (531/8).  An error file (CMDERRORS) must exist under the user id used for *CMD.
           The logged records fill up a 384 page file about 3 times per day under busy conditions.
           Two such files are used alternately.  The tapes onto which they are dumped fill up in about 2 weeks.
0          Referenced by comments of: 531/6, 531/10, 621/14 
00531/008   COMMAND STATISTICS       CMDPIKUP        SA  G  CMDP    SYS:CMDPIKUP(1000)                                              
            5.0T2   263  COMMAND_STATISTICS.CMDPIK.SA.007   1 LINE     80   20 PAGE UM   MTS       LIFT      JULY 03, 1981  15:06:31
            5.0T4   208  SYS:CMDPIKUP         
0          Program to pickup log records from CMDSTAT and save them in files;
           filenames are specified by the CMDDIR file (531/11). When a file fills up,
           CMDPIKUP uses the SVC STRTJB to start "MTS *DWB" (531/14) which dumps the
           filled file onto tape according to directory information in CMDDIR. In
           addition, machine and channel check records, type 10, are also written on
           unit 10 which is assigned to the file INIT:MCFILE. Unit check records, types
           4 and 25 are also written on unit 4 which is assigned to the file
           INIT:UC3330LOG(*l+1). CMDPIKUP requires an empty file named CMDSTATLOCK which
           is used to make sure that only one copy of this program is running at a time.
           When CMDPIKUP is started, it first scans the directory file looking for busy
           entries. If it finds any, it changes file busy to file full and tape busy to
           tape active, see (531/38), and then sets things up so a file-to-tape task
           (531/14) will be started up about 4 minutes after CMDPIKUP started (this
           delay is to allow PISTLE to finish loading MOUNT if the system has just been
           IPLed). This program also creates and fills files for use by *HLG (752/3).
            
           NOTE: The file "CMDDIR" (531/11) is referenced directly by this program.
           CMDPIKUP copies COPY:CMDAREADSECT (531/20), COPY:LLMPSEQU (087), COPY:GLOBALS
           (1026/3), *GFINFODSECT (593), and *GDINFODSECT (594). Assemble using
           COPY:MTS.MACROS (344/3) and MTA:MCHMAC (577/5).
0          Referenced by comments of: 531/7 
00531/009   COMMAND STATISTICS       CMDPIKUP        OC  G          SYS:CMDPIKUP(1,999)                                             
            5.0T2   264  COMMAND_STATISTICS.CMDPIK.OC.008   1 LINE     80    7 PAGE UM   MTS       LIFT      JULY 03, 1981  15:06:35
            5.0T4   209                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  301
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00531/010A  COMMAND STATISTICS       CMDSTATLOCK     D            # SYS:CMDSTATLOCK                                                 
                                                                                    UM   MTS       LIFT                             
                         SYS:CMDSTATLOCK@E    
0          File used by *CMD (531/7) to make sure only one copy at a time is running.
00531/011A  COMMAND STATISTICS       SYS:CMDDIR      D              MTS:TST.CMDDIR                                                  
            5.1T1   554  COMMAND_STATISTICS.SYS:CM.D.011    1 LINE     32    1 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:36
                         SYS.:CMDDIR          
0          This file specifies the names of the data files used for dumping the logged records.
           It also specifies the tape parameters used for dumping each file to tape when full.
           *** WARNING ***  When editting this file with the editor, never use visual mode
                            or the REPLACE command since the lines containing tape information
                            have hex fields which will be clobbered.
            
           ***************************************************************************
           D5.0B version:
            
           The format of this file has changed.  See (531/15) for description.
           ***************************************************************************
0          Referenced by comments of: 531/8, 531/15 
00531/012   COMMAND STATISTICS       SYS:CMDSTAT1    D            # SYS:CMDSTAT1                                                    
                                                                                    UM   MTS       LIFT                             
                         SYS:CMDSTAT1@E       
00531/013   COMMAND STATISTICS       SYS:CMDSTAT2    D            # SYS:CMDSTAT2                                                    
                                                                                    UM   MTS       LIFT                             
                         SYS:CMDSTAT2@E       
00531/014A  COMMAND STATISTICS       *DWB            C   G          MTS:TST.DWB                                                     
            5.1T1   555  COMMAND_STATISTICS.?DWB.C.014      1 LINE    175    1 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:36
                         *DWB                 
0          Command file invoked by CMDPIKUP to run the CMDTAPE program (531/15) which
           dumps a full log file to tape and updates the CMDFDIR directory to add a
           line of information for each file written. The CMDTAPE program also writes
           some command statistics into files; the current list of those files is
           contained within this file and in (531/15). The file CMDERRORS is required
           for logging.
            
           It would seem that Don could have thought of some name more original than
           his initials. Don's response: "Since no one would name an SVC after me, I
           was forced ... "
0          Referenced by comments of: 531/8 
00531/015A  COMMAND STATISTICS       CMDTAPE         SA  G          W030:CMDTAPE                                                    
            5.1T1   556  COMMAND_STATISTICS.CMDTAP.SA.015   1 LINE     69   11 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:37
0          Program to copy CMDSTAT log files to tape. Run by *DWB. NOTE: The
           files CMDDIR (531/11) and CMDFDIR (531/17) are referenced directly by
1                                                                                               SUN SEP 08/96   15:24:55   Page  302
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          this program. Copies COPY:CMDAREADSECT (531/20). Assemble using
           COPY:MTS.MACROS (344/3) and COPY:MISC.MACROS(728/1). Uses
           SEG2:MONITORS (559/4).
            
           ***********************************************************************
           D5.0B version:
            
           Changed for bulletproofing.
           ***********************************************************************
0          Referenced by comments of: 531/11, 531/14, 531/16, 531/17, 531/18, 531/19, 531/34 
00531/016A  COMMAND STATISTICS       CMDTAPE         OC  G          SYS:CMDTAPE.O                                                   
            5.1T1   557  COMMAND_STATISTICS.CMDTAP.OC.016   1 LINE   5144    3 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:38
                         SYS.:CMDTAPE.O       
0          Object of (531/15) and (722/1).
00531/017   COMMAND STATISTICS       SYS:CMDFDIR     D            # SYS.:CMDFDIR                                                    
            D4T2    266  COMMAND_STATISTICS.SYS:CM.D.010    1 LINE      ?    1 PAGE UM   MTS       LIFT      JULY 28, 1977  02:18:13
                         SYS.:CMDFDIR@E       
0          Data file, maintained by the CMDTAPE program (531/15), which has one line
           for each file on a command statistics tape.  It has the earliest and latest
           times for that file, the file number, and the mount information.  It is
           ordered by the earliest time.  Some programs use this file to determine
           what tape to use, given a time range.
0          Referenced by comments of: 531/15 
00531/018   COMMAND STATISTICS       CMDERRORS       D            # SYS:CMDERRORS                                                   
                                                                                    UM   MTS       LIFT                             
                         SYS:CMDERRORS@E      
0          Log file for CMDTAPE (531/15).
00531/019A  COMMAND STATISTICS       HASP RECEIPTS   D            # SYS:HASPRECEIPTS                                                
                                                                                    UM   MTS       LIFT                             
                         SYS:HASPRECEIPTS@E   
0          Log file, used by the CMDTAPE program (531/15), which logs the *PRINT*
           receipt numbers for the printed HASP logs produced by it.
0          Referenced by comments of: 787/6 
00531/020A  COMMAND STATISTICS       CMDAREADSECT    SA  G  CMDA    COPY:CMDAREADSECT                                               
            5.1T1   558  COMMAND_STATISTICS.CMDARE.SA.020   1 LINE     80    6 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:39
                         COPY:CMDAREADSECT    
0          Copy section for DSECT which defines a CMDSTAT record. Updated using the
           (531/2) CDUPDATE deck.
0          Referenced by comments of: 45/1, 46/1, 531/1, 531/8, 531/15, 531/34, 531/36, 540/10, 577/1, 621/2, 621/4, 621/8,
                 621/12, 655/4, 707/1, 707/2, 718/1, 753/1, 753/3, 787/5, 787/13, 787/15, 787/19, 787/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  303
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00531/021A  COMMAND STATISTICS       CMDAREADSECT    UC  G          MTSS:CMDSTAT/UPD(100000)                                        
            5.1T1   559  COMMAND_STATISTICS.CMDARE.UC.021   1 LINE      ?    1 PAGE UM   MTS       LIFT      JULY 23, 1983  11:11:39
0          **********************************************************************
           D5.1 version:
            
           There have been no updates, so this file is empty on the D5.1 tapes.
           **********************************************************************
00531/022   COMMAND STATISTICS       CHECKTIME       SA  G          S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CHECKT.SA.020(1)   271
            5.0T2   271  COMMAND_STATISTICS.CHECKT.SA.020   1 LINE     80    5 PAGE UM   MTS       LIFT      JULY 28, 1977  02:20:53
            5.0T4   216                       
0          Program to check command statistics output times to see if something is missing or whatever.  It prints the time/date of
           the first and last records and other records if the difference from the previous record is at least 1 second and is
           greater than 128 times the average of the last 8 differences, or if the difference is greater than 10 minutes.
           If the difference is negative, it does the same thing except that it uses 16 times the average of the last 8.
            
           If par=m is given, it goes through multiple files.
           If par=s is given, it prints every 128th record instead of making the above checks.
00531/023   COMMAND STATISTICS       CHECKTIME       OC  G          S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CHECKT.OC.021(1)   272
            5.0T2   272  COMMAND_STATISTICS.CHECKT.OC.021   1 LINE     80    3 PAGE UM   MTS       LIFT      JULY 28, 1977  02:20:56
            5.0T4   217                       
00531/024   COMMAND STATISTICS       CMDXTRACT       SF             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.SF.022(1)   273
            5.0T2   273  COMMAND_STATISTICS.CMDXTR.SF.022   1 LINE     71    1 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:18
            5.0T4   218                       
0          Program to extract command lines for a given userid and time range.
           Takes statistics input on SCARDS, prints lines (with time,date,ID
           PROJ NO,and task number) on 6. 5 (input) and SPRINT (output)
           should be attached to terminal. It will ask questions for its
           parameters.
0          Referenced by comments of: 531/26, 531/28 
00531/025   COMMAND STATISTICS       CMDXTRACT       OC             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.OC.023(1)   274
            5.0T2   274  COMMAND_STATISTICS.CMDXTR.OC.023   1 LINE    914    2 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:19
            5.0T4   219                       
00531/026   COMMAND STATISTICS       CMDXTRACT3      SF             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.SF.024(1)   275
            5.0T2   275  COMMAND_STATISTICS.CMDXTR.SF.024   1 LINE     65    1 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:19
            5.0T4   220                       
0          Program to extract HASP log items and other things. Asks for a record type
           and a "thing", e.g. an S8 number, to search for. Run it like (531/24).
00531/027   COMMAND STATISTICS       CMDXTRACT3      OC             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.OC.025(1)   276
            5.0T2   276  COMMAND_STATISTICS.CMDXTR.OC.025   1 LINE    778    2 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:20
            5.0T4   221                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  304
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00531/028   COMMAND STATISTICS       CMDXTRACT4      SF             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.SF.026(1)   277
            5.0T2   277  COMMAND_STATISTICS.CMDXTR.SF.026   1 LINE     71    2 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:21
            5.0T4   222                       
0          Extracts types 1 through 4 for a given time interval and optionally for a
           given userid. Run like (531/24).
00531/029   COMMAND STATISTICS       CMDXTRACT4      OC             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.OC.027(1)   278
            5.0T2   278  COMMAND_STATISTICS.CMDXTR.OC.027   1 LINE    954    2 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:21
            5.0T4   223                       
00531/030   COMMAND STATISTICS       PROCESSING      SF             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.PROCES.SF.028(1)   279
            5.0T2   279  COMMAND_STATISTICS.PROCES.SF.028   1 LINE     75    9 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:22
            5.0T4   224                       
0          Program to read and generate various statistics on command data
           (usage of various commands for various categories of users,
           average length of commands and command names,usage of
           abbreviations,...)
                SCARDS-data in
                6     -print out
                5     -prompt input
                SPRINT-prompt output
                (asks for number of files to process) 
0          Referenced by comments of: 531/32 
00531/031   COMMAND STATISTICS       PROCESSING      OC             S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.PROCES.OC.029(1)   280
            5.0T2   280  COMMAND_STATISTICS.PROCES.OC.029   1 LINE  20186   11 PAGE UM   MTS       LIFT      APR. 01, 1979  22:38:23
            5.0T4   225                       
00531/032   COMMAND STATISTICS       PROCESSING      SF             DWB:CMDPROC2(1,999)                                             
            5.0T2   281  COMMAND_STATISTICS.PROCES.SF.030   1 LINE    106    9 PAGE UM   MTS       LIFT      JULY 03, 1981  15:07:05
            5.0T4   226                       
0          This is a modified version of (531/30), modified to accumulate set options by
           CLD and to allow checkpointing and restoring of data with removal of some
           other stuff.
00531/033   COMMAND STATISTICS       PROCESSING      OC             DWB:CMDPROC2(1000)                                              
            5.0T2   282  COMMAND_STATISTICS.PROCES.OC.031   1 LINE  20398   18 PAGE UM   MTS       LIFT      JULY 03, 1981  15:07:11
            5.0T4   227                       
00531/034   COMMAND STATISTICS       SELECTCMD       SA  G  SELC    MTS:SELECTCMD(1,999)                                            
            5.0T2   283  COMMAND_STATISTICS.SELECT.SA.033   1 LINE     80    6 PAGE UM   MTS       LIFT      JULY 03, 1981  15:07:16
            5.0T4   228  MTS.:SELECTCMD       
0          Program to retrieve data from CMDSTAT tapes using directory built by CMDTAPE (531/15).
           Calls READBFR routine (709).  Copies COPY:CMDAREADSECT (531/20).
0          Referenced by comments of: 709/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  305
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00531/035   COMMAND STATISTICS       SELECTCMD       OC  G          MTS:SELECTCMD(1000)                                             
            5.0T2   284  COMMAND_STATISTICS.SELECT.OC.034   1 LINE   1450    3 PAGE UM   MTS       LIFT      JULY 03, 1981  15:07:17
            5.0T4   229                       
00531/036   COMMAND STATISTICS       CMDUTIL         SA  G          S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDUTI.SA.035(1)   285
            5.0T2   285  COMMAND_STATISTICS.CMDUTI.SA.035   1 LINE     80    9 PAGE UM   MTS       LIFT      APR. 05, 1980  18:06:37
            5.0T4   230                       
0          Program to print or copy (or both) command statistics records based on record
           types.  This program replaces and extends CMDAREAPRINT.  If no parameter
           is given, it will prompt for PRINT|COPY|BOTH and for the record types.  Currently,
           records which are not command statistics (i.e. not types 1, 2, 3, or 5) are just
           printed as bcd.  This is fine for the HASP and console logs, but not for others.
           Routines to format other record types for printing can be included when written.
           If PAR=COUNT is given, then it will neither copy nor print, but instead simply
           report the number of records of each type found.  It reads CMDSTAT data from
           SCARDS and prints output on SPRINT.  If the COPY function is specified, then
           record type n is written on MTS I/O unit n.  Copies COPY:CMDAREADSECT (531/20).
00531/037   COMMAND STATISTICS       CMDUTIL         OC  G          S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDUTI.OC.036(1)   286
            5.0T2   286  COMMAND_STATISTICS.CMDUTI.OC.036   1 LINE     80    4 PAGE UM   MTS       LIFT      APR. 05, 1980  18:06:40
            5.0T4   231                       
00531/038   COMMAND STATISTICS       CARE & FEEDING  WF           # (OBSOLETED BY THE OPER. MAN. - COMP. 592)                       
            5.0T2   289  COMMAND_STATISTICS.CARE_&.WF.039   1 LINE    112    3 PAGE UM   MTS       LIFT      JULY 03, 1981  15:14:59
            5.0T4   234                       
0          Writeup describing normal behavior of command statistics pickup and what to
           do when abnormalities occur.  See the most recent version of the Operator's
           Manual (592).
0          Referenced by comments of: 531/8 
00532/001  *PLOTSEE                                  SA  G          GRAF:PLOTSEE.S                                                  
            5.0T2   290  PLOTSEE..SA.001                    1 LINE     95   16 PAGE UM   WHIPPLE             JULY 03, 1981  15:14:59
            5.0T4   235                       
0          PLOT PREVIEWING PROGRAM.  USER OF ANY *IG-SUPPORTED DISPLAY CAN VIEW PDS PLOT
           FILES PRODUCED VIA *PLOTSYS.  HAS "WINDOWING" FACILITY.  USES PLOT SYSTEM
           ROUTINE PSYM (615/5) ASSEMBLED WITH THE &WHAT SETC SYMBOL SET TO 'IG'.
00532/002  *PLOTSEE                                  OE  G          *PLOTSEE                                                        
            5.0T2   291  PLOTSEE..OE.002                    1 LINE   7512   10 PAGE UM   WHIPPLE             JULY 03, 1981  15:15:10
            5.0T4   236  *PLOTSEE             
0          CONTAINS A "$CONTINUE WITH *IG" LINE.
00533/001  *FRISK                                    SA           # (OBSOLETE)                                                      
            D4T2    284  FRISK.MAIN.SA.001                  1 LINE     72   44 PAGE UBC                      JULY 18, 1977  15:53:27
0          Obsoleted by *FTNTIDY (727).
0          Referenced by comments of: 727/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  306
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00534/001   TMTS                     FAKE JOB-PGM    SA  G          MTS:TMTSFAKE(1,999)                                             
            5.0T2   292  TMTS.FAKE_JOB-PGM.SA.001           1 LINE     59    1 PAGE UM   MTA                 JULY 03, 1981  15:15:11
            5.0T4   237  MTS.:TMTSFAKE        
0          Dummy job program pointed to by TMTS job list entry, part of JOBLIST (003).
00534/002   TMTS                     FAKE JOB-PGM    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00534/003A  TMTS                     LOADMTS         SA  G          TMTS:LOADMTS(2000)                                              
            5.1T1   560  TMTS.LOADMTS.SA.003                1 LINE     72   10 PAGE UM   MTS       STERKEN   JULY 23, 1983  11:11:39
                         TMTS:LOADMTS         
0          Program to load a test version of MTS and friends into shared VM and plant the entry point in the TMTS job list entry.
            
           I/O unit usage:     GUSER - for user input
                               SERCOM - for prompting
                               SPRINT - map, messages, and everything written on SERCOM
            
           Two parameters may be given:  PAR=TEST (the default) means load the test system into private
                                         VM and don't change the entry point in the TMTS job list,
                                         PAR=NOTEST means load the test system into shared VM and
                                         change the TMTS job list entry point.
            
           The program finds the first unused address in shared VM using ENDSEG2 and asks if it
           is ok to start loading there.  Reply "OK" or with a new address in shared VM.
            
           The program prompts for the name of a file to load from, which should contain those
           parts of the system to be tested, but must contain at least the following:
            
             MTS, MTS SUBRS (GETSPACE/FREESPAC, GUINFO/CUINFO, PLIMIT, LLXU, TIMER, CMDS, RSF,
             GATE, USUB, FSUB, DSRS, DSRI), COST, CFDUB, SYSDEFS, GETRATES, RATEVEC, RATENBR,
             DYSSUB, CHARGE, STDDMP, MSG, and ENDSEG2.
            
           GATE should be assembled with &TMTS set to 1.  Other components may also be included,
           but neither VOLGET (482/4) nor TABLRTN (482/34) should be included.
            
           Copies *CNFGINFODSECT (654) and *GDINFOCSECT (594).
00534/004A  TMTS                     LOADMTS         OC  G          TMTS:LOADMTS(1,1999)                                            
            5.1T1   561  TMTS.LOADMTS.OC.004                1 LINE     80    5 PAGE UM   MTA                 JULY 23, 1983  11:11:40
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3).
00534/005A  TMTS                     TMTSLIB         OL  O          TMTS:TMTSLIB                                                    
            5.1T1   562  TMTS.TMTSLIB.OL.005                1 LINE  32767  148 PAGE UM   MTS                 JULY 23, 1983  11:11:41
                         TMTS:TMTSLIB         
0          This is a special (and not current) version of *LIBRARY which includes additional
           subroutines which normally are in shared VM and not part of *LIBRARY.  The test
           system should reference this file and not *LIBRARY.  The following command will
           cause this to be done:
1                                                                                               SUN SEP 08/96   15:24:55   Page  307
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
              $SET LIBSRCH=TMTS:TMTSLIB *LIBRARY=OFF
0          Referenced by comments of: 534/6 
00534/006A  TMTS                     POSTIPL         C   G          TMTS:POSTIPL                                                    
            5.1T1   563  TMTS.POSTIPL.C.006                 1 LINE     97    1 PAGE UM   MTS                 JULY 23, 1983  11:11:45
                         TMTS:POSTIPL         
0          Lines 1 to 9 of this file contain commands to run PISTLE to load
           SEG2:TIME(360) into shared VM and define its symbols in the TMTS
           LCSYMBOL. This file also contains the source, at line 10, and object,
           at line 1000, for a small FORTRAN/program which calls the
           TIME/subroutine with PROT=OFF to cause it to initialize itself. It
           also contains a $CONTINUE WITH TMTS:TMTSLIB (534/5) record. The
           procedure is to first load TMTS, start a TMTS task, SIGNON, and
           $SOURCE to this command file.
00535/001A  CLS INTERFACE            CLS DRIVER PGM  SA  O  DRIV    W237:MTSII.S                                                    
            5.1T1   564  CLS_INTERFACE.CLS_DRIVER.SA.001    1 LINE     80   39 PAGE UM   VALERIO             JULY 23, 1983  11:11:46
0          Program to fake an MTS/CLS interface for debugging a new CLS.  Since
           it executes as a normal program, SDS can be used in the debugging.
           Assemble using COPY:MTS.MACROS (344/3).
            
           *********************************************************************
           D5.1 version:
            
           More reliable version.
           *********************************************************************
00535/002A  CLS INTERFACE            CLS DRIVER PGM  OC  O          W237:MTSII.O                                                    
            5.1T1   565  CLS_INTERFACE.CLS_DRIVER.OC.002    1 LINE     80   14 PAGE UM   VALERIO             JULY 23, 1983  11:11:48
00535/003A  CLS INTERFACE            GOM T/V DSECT   SG  G          COPY:CLSTV.SG                                                   
            5.1T1   566  CLS_INTERFACE.GOM_T/V_DSE.SG.003   1 LINE     69    3 PAGE UM   MTS       STERKEN   JULY 23, 1983  11:11:48
                         COPY:CLSTV.SG        
0          THIS IS THE GOM EQUIVALENT OF THE CLSTV MACRO IN MTS.MACROS (344/3).
00536/001  *BRAILLE                                               # (OBSOLETE)                                                      
            D3T4    199  BRAILLE..SA.1                      1 LINE     73   21 PAGE UM                       JULY 30, 1973  03:34.19
00538/001  *COBOLU                   EXECUTOR        SA  G  COBU    MTA:COBOLU(1,999)                                               
            5.0T2   299  COBOLU.EXECUTOR.SA.001             1 LINE     80    4 PAGE UM   YOUNG               JULY 03, 1981  15:15:27
            5.0T4   244                       
0          THIS IS THE COBOL EXECUTOR (ANALOGOUS TO *FTN), I.E. IT IS THE COMPILER INTERFACE PROGRAM.
           COPIES FAKEOS.GBLS (545/20).  ASSEMBLE USING *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  308
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00538/002  *COBOLU                   EXECUTOR        OE  G          *COBOLU                                                         
            5.0T2   300  COBOLU.EXECUTOR.OE.002             1 LINE    746    1 PAGE UM   YOUNG               JULY 03, 1981  15:15:28
            5.0T4   245  *COBOLU              
00538/003  *COBOLU                   BLDLIN          D              MTA:COBOL.BLDLIN                                                
            5.0T2   301  COBOLU.BLDLIN.D.003                1 LINE     44    1 PAGE UM   YOUNG               JULY 03, 1981  15:15:29
            5.0T4   246                       
0          SCARDS INPUT TO CREBLDL (545/43) TO BUILD (538/4).
00538/004  *COBOLU                   BLDL            D              ETC:COBOL.BLDL                                                  
            5.0T2   302  COBOLU.BLDL.D.004                  1 SEQ     238    1 PAGE UM   YOUNG               JULY 03, 1981  15:15:30
            5.0T4   247  ETC.:COBOL.BLDL      
0          Referenced by comments of: 538/3 
00538/005  *COBOLU                   IKFCBL00        OE  O          ETC:IKFCBL00                                                    
            5.0T2   303  COBOLU.IKFCBL00.OE.005             1 SEQ    1024    4 PAGE UM   YOUNG               JULY 03, 1981  15:15:31
            5.0T4   248  ETC.:IKFCBL00        
0          COMPONENTS (538/5) THROUGH (538/16) ARE THE UNMODIFIED OS/360 OBJECT FOR THE
           ANSI COBOL COMPILER RELEASE 21.6, VERSION 2.
0          Referenced by comments of: 538/5 
00538/006  *COBOLU                   IKFCBL01        OE  O          ETC:IKFCBL01                                                    
            5.0T2   304  COBOLU.IKFCBL01.OE.006             1 SEQ    6144    5 PAGE UM   YOUNG               JULY 03, 1981  15:15:31
            5.0T4   249  ETC.:IKFCBL01        
0          OBJECT HAS REP CARDS TO CHANGE DEFAULT PAR FIELD, AMONG OTHER THINGS.
00538/007  *COBOLU                   IKFCBL1B        OE  O          ETC:IKFCBL1B                                                    
            5.0T2   305  COBOLU.IKFCBL1B.OE.007             1 SEQ    1024    7 PAGE UM   YOUNG               JULY 03, 1981  15:15:32
            5.0T4   250  ETC.:IKFCBL1B        
00538/008  *COBOLU                   IKFCBL10        OE  O          ETC:IKFCBL10                                                    
            5.0T2   306  COBOLU.IKFCBL10.OE.008             1 SEQ    1024   12 PAGE UM   YOUNG               JULY 03, 1981  15:15:33
            5.0T4   251  ETC.:IKFCBL10        
00538/009  *COBOLU                   IKFCBL20        OE  O          ETC:IKFCBL20                                                    
            5.0T2   307  COBOLU.IKFCBL20.OE.009             1 SEQ    1024   13 PAGE UM   YOUNG               JULY 03, 1981  15:15:34
            5.0T4   252  ETC.:IKFCBL20        
00538/010  *COBOLU                   IKFCBL30        OE  O          ETC:IKFCBL30                                                    
            5.0T2   308  COBOLU.IKFCBL30.OE.010             1 SEQ    1024    4 PAGE UM   YOUNG               JULY 03, 1981  15:15:35
            5.0T4   253  ETC.:IKFCBL30        
00538/011  *COBOLU                   IKFCBL40        OE  O          ETC:IKFCBL40                                                    
            5.0T2   309  COBOLU.IKFCBL40.OE.011             1 SEQ    1024   11 PAGE UM   YOUNG               JULY 03, 1981  15:15:36
            5.0T4   254  ETC.:IKFCBL40        
1                                                                                               SUN SEP 08/96   15:24:55   Page  309
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00538/012  *COBOLU                   IKFCBL50        OE  O          ETC:IKFCBL50                                                    
            5.0T2   310  COBOLU.IKFCBL50.OE.012             1 SEQ    1024    9 PAGE UM   YOUNG               JULY 03, 1981  15:15:37
            5.0T4   255  ETC.:IKFCBL50        
00538/013  *COBOLU                   IKFCBL51        OE  O          ETC:IKFCBL51                                                    
            5.0T2   311  COBOLU.IKFCBL51.OE.013             1 SEQ    1024   10 PAGE UM   YOUNG               JULY 03, 1981  15:15:37
            5.0T4   256  ETC.:IKFCBL51        
00538/014  *COBOLU                   IKFCBL6A        OE  O          ETC:IKFCBL6A                                                    
            5.0T2   312  COBOLU.IKFCBL6A.OE.014             1 SEQ    1024    1 PAGE UM   YOUNG               JULY 03, 1981  15:15:38
            5.0T4   257  ETC.:IKFCBL6A        
00538/015  *COBOLU                   IKFCBL60        OE  O          ETC:IKFCBL60                                                    
            5.0T2   313  COBOLU.IKFCBL60.OE.015             1 SEQ    1024    8 PAGE UM   YOUNG               JULY 03, 1981  15:15:39
            5.0T4   258  ETC.:IKFCBL60        
00538/016  *COBOLU                   IKFCBL70        OE  O          ETC:IKFCBL70                                                    
            5.0T2   314  COBOLU.IKFCBL70.OE.016             1 SEQ    1024   13 PAGE UM   YOUNG               JULY 03, 1981  15:15:40
            5.0T4   259  ETC.:IKFCBL70        
0          Referenced by comments of: 538/5 
00538/017  *COBOLU                   *COBLIB         OL  O          *COBLIB                                                         
            5.0T2   315  COBOLU.*COBLIB.OL.017              1 SEQ    1368    9 PAGE UM   YOUNG               JULY 03, 1981  15:15:41
            5.0T4   260  *COBLIB              
0          OBJECT LIBRARY FOR OS/360 RELEASE 21.6 COBOL LIBRARY.
           NOTE:  *GENLIB COMPLAINS ABOUT THIS (MULTIPLY DEFINED SYMBOLS).  IGNORE IT.
0          Referenced by comments of: 823/78 
00538/018  *COBOLU                   TEST PGM #1     SC             MTA:COBTEST                                                     
            5.0T2   316  COBOLU.TEST_PGM_#1.SC.018          1 LINE     67    1 PAGE UM   YOUNG               JULY 03, 1981  15:15:42
            5.0T4   261                       
0          TEST PROGRAM.
00538/019  *COBOLU                   TEST PGM #2     SC             MTA:COBTEST2                                                    
            5.0T2   317  COBOLU.TEST_PGM_#2.SC.019          1 LINE     73    4 PAGE UM   YOUNG               JULY 03, 1981  15:15:42
            5.0T4   262                       
0          ANOTHER TEST PROGRAM.
00538/020  *COBOLU                   TEST PGM #3     SC             MTA:COBTEST3                                                    
            5.0T2   318  COBOLU.TEST_PGM_#3.SC.020          1 LINE     59    1 PAGE UM   YOUNG               JULY 03, 1981  15:15:43
            5.0T4   263                       
0          TESTS THE SORT VERB.
00539/001   TIMNTRP                  D5.0 MASTER     SA  G          S1561 5.0T4 VLO FSNAME=TIMNTRP.D5.0_MASTER.SA.001(1)         336
            5.0T4   336  TIMNTRP.D5.0_MASTER.SA.001         1 LINE     80   26 PAGE UM   MTS       HELFFRICH AUG. 09, 1981  23:05:30
            5.0T10  240                       
0          MTS timer interrupt routines (user callable):  SETIME, RSTIME, GETIME, and TIMNTRP.
1                                                                                               SUN SEP 08/96   15:24:55   Page  310
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM 
           (653/1). Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087).
0          Referenced by comments of: 42/2 
00539/002A  TIMNTRP                  UPDATE          UC  G          MTSS:TIMT/UPD                                                   
            5.1T1   567  TIMNTRP.UPDATE.UC.002              1 LINE     84    9 PAGE UM   MTS       HELFFRICH JULY 23, 1983  11:11:49
0          *CDUPDATE input to produce current source.
00539/003A  TIMNTRP                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       HELFFRICH                        
0          Object part of Resident System (468).
00539/004A  TIMNTRP                                  L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=TIMT.LIST                 
            5.1T1   568  TIMNTRP..L.004                     1 LINE    133   79 PAGE UM   MTS       HELFFRICH JULY 23, 1983  11:12:13
00539/005   TIMNTRP                  TEST PROG #1    SA  O          S1559 5.0T2 VLO FSNAME=TIMNTRP.TEST_PROGRAM.SA.005(1)        319
            5.0T2   319  TIMNTRP.TEST_PROGRAM.SA.005        1 LINE     80    6 PAGE UM   MTS       HELFFRICH JULY 28, 1977  02:37:30
            5.0T4   264                       
0          DRIVER FOR TESTING TIMER ROUTINES.
00539/006   TIMNTRP                  TEST PROG #1    OC  O          S1559 5.0T2 VLO FSNAME=TIMNTRP.TEST_PROGRAM.OC.006(1)        320
            5.0T2   320  TIMNTRP.TEST_PROGRAM.OC.006        1 LINE     80    3 PAGE UM   MTS       HELFFRICH JULY 28, 1977  02:37:32
            5.0T4   265                       
0          Referenced by comments of: 539/9 
00539/007C  TIMNTRP                  TEST PROG #2    SA  G          W170:TESTTIMERDI(1000)                                          
            5.1T1   569  TIMNTRP.TEST_PROG_#2.SA.007        1 LINE     72    2 PAGE UM   HELFFRICH           JULY 23, 1983  11:12:14
0          Test program to check out timer interrupt processing in DSRI (639)
           during explicit concatenation processing. This program causes a snark
           if the user program gets dispatched in system mode, and otherwise runs
           to completion.
00539/008C  TIMNTRP                  TEST PROG #2    OC  G          W170:TESTTIMERDI(1,999)                                         
            5.1T1   570  TIMNTRP.TEST_PROG_#2.OC.008        1 LINE     80    3 PAGE UM   HELFFRICH           JULY 23, 1983  11:12:14
00539/009   TIMNTRP                  TEST PGM INPUT  D   O          S1559 5.0T2 VLO FSNAME=TIMNTRP.TEST_PGM_INPUT.D.007(1)       321
            5.0T2   321  TIMNTRP.TEST_PGM_INPUT.D.007       1 LINE     75    1 PAGE UM   MTS       HELFFRICH MAY  06, 1981  02:53:31
            5.0T4   266                       
0          Input to (539/6) to test real time waits, intended to test SDS's (600)
           handling of timer interrupts.
00539/010A  TIMNTRP                  COMMENTS        D   G          MTSS:TIMT/COM                                                   
            5.1T1   571  TIMNTRP.COMMENTS.D.010             1 LINE     68    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:12:14
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
1                                                                                               SUN SEP 08/96   15:24:55   Page  311
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00540/001A  SYSTEM WATCHERS          PDPBUG          SA  G          MTA:PDPBUG(1000)                                                
            5.1T1   572  SYSTEM_WATCHERS.PDPBUG.SA.001      1 LINE     68    4 PAGE UM   MTA                 JULY 23, 1983  11:12:15
                         MTA.:PDPBUG          
0          THIS COMPONENT CONSISTS OF PROGRAMS WHICH MONITOR THE ACTIVITY OF VARIOUS PARTS
           OF THE SYSTEM.
            
           PDPBUG IS A PROGRAM TO PRINT STATISTICS ABOUT SYSTEM PAGING.  COMMENTS IN THE SOURCE
           CODE DESCRIBE THE OUTPUT.  MUST BE RE-ASSEMBLED IF THE PDP IS RE-ASSEMBLED.
           THE ITEMS TO BE CHANGED ARE DOCUMENTED IN SOURCE COMMENTS.  COPIES COPY:LLMPSEQU(100)
           (087), COPY:GLOBALS (1026/3), AND *CNFGINFODSECT (654).  ASSEMBLE WITH 
           COPY:SETPARM (653).
00540/002A  SYSTEM WATCHERS          PDPBUG          OC  G          MTA:PDPBUG(1,999)                                               
            5.1T1   573  SYSTEM_WATCHERS.PDPBUG.OC.002      1 LINE     80    3 PAGE UM   MTA                 JULY 23, 1983  11:12:15
00540/003A  SYSTEM WATCHERS          PRNTCNTS        SA  G          MTA:PRNTCNTS(1000)                                              
            5.1T1   574  SYSTEM_WATCHERS.PRNTCNTS.SA.003    1 LINE     74   13 PAGE UM   MTA                 JULY 23, 1983  11:12:16
                         MTA.:PRNTCNTS        
0          PROGRAM TO PRINT ALL SORTS OF COUNTS AND TIMES FROM THE PDP (044) AND SUPERVISOR (045).  IT MUST BE REASSEMBLED
           WHENEVER EITHER THE PDP OR UMMPS CHANGES BECAUSE OF THE MANY SYMBOLS OF THE FORM "DISPN EQU X" WHICH GIVE THE LOCATIONS
           OF THE COUNTS IN THE PDP AND SUPERVISOR.  ASSEMBLE USING *SYSMAC.
           COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND COPY:PSA (162).
0          Referenced by comments of: 604/1, 1070/8 
00540/004A  SYSTEM WATCHERS          PRNTCNTS        OC  G          MTA:PRNTCNTS(1,999)                                             
            5.1T1   575  SYSTEM_WATCHERS.PRNTCNTS.OC.004    1 LINE     80    9 PAGE UM   MTA                 JULY 23, 1983  11:12:17
00540/005   SYSTEM WATCHERS          HOGS CMDS       C              *HGS                                                            
            5.0T4   343  SYSTEM_WATCHERS.HOGS_CMDS.C.005    1 LINE     40    1 PAGE UM   MTA                 AUG. 09, 1981  23:06:24
            5.0T10  247  *HGS                 
0          COMMAND FILE USED BY THE OPERATORS TO RUN THE HOGS PROGRAM (540/6) TO FIND
           OUT WHICH JOBS ARE USING THE MOST CPU TIME, VM, AND DRUM READS.
00540/006   SYSTEM WATCHERS          HOGS            SA  G          MTA:HOGS(1000)                                                  
            5.0T4   344  SYSTEM_WATCHERS.HOGS.SA.006        1 LINE     73    4 PAGE UM   MTA                 AUG. 09, 1981  23:06:24
            5.0T10  248  MTA.:HOGS            
0          PROGRAM TO FIND THE JOBS WHICH ARE USING THE MOST CPU TIME, VM, AND DRUM READS.
           COPIES COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3).  ASSEMBLE USING COPY:SETPARM
           (653).
0          Referenced by comments of: 540/5 
00540/007   SYSTEM WATCHERS          HOGS            OC  G          MTA:HOGS(1,999)                                                 
            5.0T4   345  SYSTEM_WATCHERS.HOGS.OC.007        1 LINE     80    3 PAGE UM   MTA                 AUG. 09, 1981  23:06:26
            5.0T10  249                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  312
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00540/008   SYSTEM WATCHERS          LOADCLAS        SA  G          MTS:LOADCLAS(1000)                                              
            5.0T4   346  SYSTEM_WATCHERS.LOADCLAS.SA.008    1 LINE     73    7 PAGE UM   MTA                 AUG. 09, 1981  23:06:27
            5.0T10  250                       
0          PROGRAM TO CALL TASKSTAT (647) FOR EVERY JOB IN THE SYSTEM EVERY 30 SECONDS AND
           SUMMARIZE THE RESULTS.  COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087).
           ASSEMBLE USING COPY:MISC.MACROS (728).
0          Referenced by comments of: 400/1, 647/1 
00540/009   SYSTEM WATCHERS          LOADCLAS        OC  G          MTS:LOADCLAS(1,999)                                             
            5.0T4   347  SYSTEM_WATCHERS.LOADCLAS.OC.009    1 LINE     80    5 PAGE UM   MTA                 AUG. 09, 1981  23:06:31
            5.0T10  251  MTS:LOADCLAS         
00540/010A  SYSTEM WATCHERS          DBJP            SA  G          MTS:DBJP(1000)                                                  
            5.1T1   576  SYSTEM_WATCHERS.DBJP.SA.010        1 LINE     73    4 PAGE UM   MTS       OGDEN     JULY 23, 1983  11:12:17
                         MTS.:DBJP            
0          PROGRAM TO DISPLAY BIG JOB PARAMETERS (AND OTHER STUFF).  EVERY 20 SECONDS
           IT PRINTS STATISTICS RELATING TO THE SYSTEM LOAD.  IF SCARDS IS EXPLICITLY
           ASSIGNED, THEN TYPE 8 CMDSTAT RECORDS GENERATED BY SSRTN (413) ARE USED TO
           GENERATE THE STATISTICS.  OTHERWISE, THE INCORE JOBSTA VECTOR (413/7) IS
           USED AS THE SOURCE OF INFORMATION.  DBJP CAN ALSO BE USED TO TEST NEW
           VERSION OF BJPMOD (650) BY CONCATENATING DBJP TO THE NEW BJPMOD OBJECT
           (BJPMOD MUST PRECEDE DBJP).  COPIES COPY:GLOBALS (1026/3), COPY:JOBSTA
           (413/9), COPY:BJPDSCT (650/3), COPY:CMDAREADSECT (531/20), *GDINFODSECT
           (594), AND *CNFGINFODSECT (654).
00540/011A  SYSTEM WATCHERS          DBJP            OC  G          MTS:DBJP(1,999)                                                 
            5.1T1   577  SYSTEM_WATCHERS.DBJP.OC.011        1 LINE   1866    4 PAGE UM   MTS       OGDEN     JULY 23, 1983  11:12:18
00540/012   SYSTEM WATCHERS          DPBJ            SA  G          MTS:DPBJ(1000)                                                  
            5.0T4   350  SYSTEM_WATCHERS.DPBJ.SA.012        1 LINE     73    3 PAGE UM   MTA                 AUG. 09, 1981  23:06:38
            5.0T10  254  MTS:DPBJ             
0          EVERY 20 SECONDS, THIS PROGRAM PRINTS THE NUMBER OF JOBS, IN EACH OF 4 CATEGORIES,
           THAT HAVE USED ANY CPU TIME IN THE PREVIOUS 20 SECONDS.  THE CATEGORIES ARE
           DETERMINED BY WHETHER THE JOB IS PAGING BOUND AND WHETHER IT IS OVER THE BIG
           JOB THRESHOLD, "BIGJTH".  COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087).
00540/013   SYSTEM WATCHERS          DPBJ            OC  G          MTS:DPBJ(1,999)                                                 
            5.0T4   351  SYSTEM_WATCHERS.DPBJ.OC.013        1 LINE   1268    2 PAGE UM   MTA                 AUG. 09, 1981  23:06:40
            5.0T10  255                       
00540/014A  SYSTEM WATCHERS          DRUMSTAT        SA  O          MTA:DRUMSTAT(1000)                                              
            5.1T1   578  SYSTEM_WATCHERS.DRUMSTAT.SA.014    1 LINE     72    3 PAGE UM   MTA                 JULY 23, 1983  11:12:18
                         MTA.:DRUMSTAT        
0          EVERY 30 SECONDS, THIS PROGRAM PRINTS DRUMIN, DRUMOUT, DISKIN, DISKOUT, LOOPS,
           NRP (NUMBER OF RELEASED PAGES), SKPREAD (NUMBER OF READS SKIPPED TO WAIT FOR MORE
           WORK), NCP (NUMBER OF CHANNEL PROGRAMS), NWPD (NUMBER OF WRITE PAGES DISCARDED,
           I.E. UNCHANGED), NGWP (NUMBER OF PAGES FROM GETWP), NOXACNT (NUMBER OF PAGES ON
           PIQ WITH NO EXTERNAL ADDRESS), PI/LOOP (PAGE INS PER LOOP), PI/CP, T/LOOP (TIME
           PER LOOP), T/PI, T/CP, AND %SS (PERCENT SUPERVISOR STATE) FOR THE PDP.
1                                                                                               SUN SEP 08/96   15:24:55   Page  313
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00540/015A  SYSTEM WATCHERS          DRUMSTAT        OC  O          MTA:DRUMSTAT(1,999)                                             
            5.1T1   579  SYSTEM_WATCHERS.DRUMSTAT.OC.015    1 LINE     80    2 PAGE UM   MTA                 JULY 23, 1983  11:12:18
00540/016   SYSTEM WATCHERS          GTUNIT MAIN     SG  G          S1561 5.0T4 VLO FSNAME=SYSTEM_WATCHERS.GTUNIT_MA.SG.017(1)   355
            5.0T4   355  SYSTEM_WATCHERS.GTUNIT_MA.SG.017   1 LINE     44    1 PAGE UM   OGDEN               NOV. 10, 1977  20:40:15
            5.0T10  259                       
0          MAIN PROGRAM TO CALL THE GTUNIT SUBR (540/17) EVERY 20 SECONDS.  CALLS THE PAR
           (687/1) AND ATRAP (689/1) SUBROUTINES.
0          Referenced by comments of: 540/18 
00540/017   SYSTEM WATCHERS          GTUNIT SUBR     SA  G          S1561 5.0T4 VLO FSNAME=SYSTEM_WATCHERS.GTUNIT_SU.SA.018(1)   356
            5.0T4   356  SYSTEM_WATCHERS.GTUNIT_SU.SA.018   1 LINE     80    4 PAGE UM   OGDEN               FEB. 03, 1978  15:16:59
            5.0T10  260                       
0          SUBROUTINE TO COUNT THE NUMBER OF GTUNIT WAITS OUTSTANDING FOR EACH PUBLIC
           DISK VOLUME, AND PRINT THE NON-ZERO RESULTS ON SPRINT.  CALLS TASKSTAT (647).
           COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087).  ASSEMBLE USING COPY:FILE.MACROS
           (482/45).
0          Referenced by comments of: 540/16, 540/18, 647/1 
00540/018   SYSTEM WATCHERS          GTUNIT          OE  G          FILE:GTUNIT                                                     
            5.0T4   357  SYSTEM_WATCHERS.GTUNIT.OE.019      1 LINE    652    3 PAGE UM   OGDEN               AUG. 09, 1981  23:14:20
            5.0T10  261  FILE:GTUNIT          
0          OBJECT FOR (540/16) AND (540/17).
00540/019A  SYSTEM WATCHERS          TTPRINT         SA  G          MTA:TTPRINT.S                                                   
            5.1T1   580  SYSTEM_WATCHERS.TTPRINT.SA.019     1 LINE     71    3 PAGE UM   MTA                 JULY 23, 1983  11:12:18
                         MTA.:TTPRINT.S       
0          PROGRAM TO PRINT THE SUPERVISOR TRACE TABLE AT THE TIME IT IS RUN, I.E., FROM
           MEMORY.
00540/020A  SYSTEM WATCHERS          TTPRINT         OE  G          MTA:TTPRINT                                                     
            5.1T1   581  SYSTEM_WATCHERS.TTPRINT.OE.020     1 LINE    376    1 PAGE UM   MTA                 JULY 23, 1983  11:12:18
                         MTA.:TTPRINT         
0          Contains $CONTINUE WITH MTA:PRINTTRACE (337/1) and $CONTINUE WITH
           COPY:DEFS (579/10) record.
00540/021   SYSTEM WATCHERS          UPTIME CMDS     C              *LRL                                                            
            5.0T4   360  SYSTEM_WATCHERS.UPTIME_CM.C.022    1 LINE      8    1 PAGE UM   MTA                 AUG. 09, 1981  23:14:25
            5.0T10  264  *LRL                 
0          COMMAND FILE USED BY THE OPERATORS TO PRINT THE REASON FOR THE LAST SYSTEM
           RELOAD AND THE ELAPSED TIME SINCE THAT RELOAD.  INVOKED BY ENTERING "MTS *LRL"
           ON THE OPERATOR'S CONSOLE.
0          Referenced by comments of: 540/22 
1                                                                                               SUN SEP 08/96   15:24:55   Page  314
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00540/022   SYSTEM WATCHERS          UPTIME CMDS     C              SYS:LRL                                                         
            5.0T4   361  SYSTEM_WATCHERS.UPTIME_CM.C.023    1 LINE     29    1 PAGE UM   MTA                 AUG. 09, 1981  23:14:26
            5.0T10  265  SYS.:LRL             
0          COMMAND FILE SOURCED TO BY *LRL (540/21) TO GET THE REASON FOR THE LAST
           RELOAD AND RUN THE UPTIME PROGRAM (540/23).
00540/023   SYSTEM WATCHERS          UPTIME PGM      SA  G          MTA:UPTIME(1000)                                                
            5.0T4   362  SYSTEM_WATCHERS.UPTIME_PG.SA.024   1 LINE     72    1 PAGE UM   MTA                 AUG. 09, 1981  23:14:27
            5.0T10  266                       
0          Program to print the elapsed time since the last IPL.  NOTE:  This program only
           works on a 370, 470, or 580.
0          Referenced by comments of: 540/22, 713/1 
00540/024   SYSTEM WATCHERS          UPTIME PGM      OC  G          UNSP:UPTIME                                                     
            5.0T4   363  SYSTEM_WATCHERS.UPTIME_PG.OC.025   1 LINE     80    1 PAGE UM   MTA                 AUG. 09, 1981  23:14:29
            5.0T10  267  UNSP:UPTIME          
0          Referenced by comments of: 713/1 
00540/025   SYSTEM WATCHERS          PWCT CMDS       C              *PWC                                                            
            5.0T4   364  SYSTEM_WATCHERS.PWCT_CMDS.C.026    1 LINE     58    1 PAGE UM   MTS       OGDEN     AUG. 09, 1981  23:14:30
            5.0T10  268  *PWC                 
0          COMMAND FILE USED BY THE OPERATORS TO RUN THE PWCT PROGRAM (540/26) TO PRINT WAIT
           COUNTS FOR MTS JOBS.  INVOKED BY ENTERING "MTS *PWC" ON THE OPERATOR'S CONSOLE.
00540/026A  SYSTEM WATCHERS          PWCT PGM        SA  G          MTS:PWC(1000)                                                   
            5.1T1   582  SYSTEM_WATCHERS.PWCT_PGM.SA.026    1 LINE     73   13 PAGE UBC  HOGG      OGDEN     JULY 23, 1983  11:13:37
                         MTS.:PWC             
0          PROGRAM TO PRINT WAIT COUNTS, I.E., COUNTS OF HOW MANY MTS TASKS ARE WAITING FOR
           WHAT.  IT TAKES THREE OPTIONAL INTEGER NUMBERS IN THE PAR FIELD SEPARATED BY
           BLANKS:  NUMBER OF SECONDS BETWEEN SAMPLES, NUMBER OF LINES OF OUTPUT BETWEEN
           HEADINGS, AND THE TOTAL NUMBER OF LINES OF OUTPUT BEFORE QUITTING.  COPIES
           COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3).  ASSEMBLE USING OLD:CC.MACROS
           (1054/4).
0          Referenced by comments of: 540/25, 647/1 
00540/027A  SYSTEM WATCHERS          PWCT PGM        OC  G          MTS:PWC(1,999)                                                  
            5.1T1   583  SYSTEM_WATCHERS.PWCT_PGM.OC.027    1 LINE   2880    4 PAGE UBC  HOGG      OGDEN     JULY 23, 1983  11:13:38
00540/028C  SYSTEM WATCHERS          PRINTQLEN       SA  G          MTS:PRINTQLEN(1000)                                             
            5.1T1   584  SYSTEM_WATCHERS.PRINTQLEN.SA.028   1 LINE     72    2 PAGE UM   MTA                 JULY 23, 1983  11:13:38
                         MTS:PRINTQLEN        
0          Program to print the lengths of the various CPU queues.
1                                                                                               SUN SEP 08/96   15:24:55   Page  315
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00540/029C  SYSTEM WATCHERS          PRINTQLEN       OC  G          MTS:PRINTQLEN(1,999)                                            
            5.1T1   585  SYSTEM_WATCHERS.PRINTQLEN.OC.029   1 LINE     80    2 PAGE UM   MTA                 JULY 23, 1983  11:13:39
00541/001  *DECODE                                   SA  G          S1559 5.0T2 VLO FSNAME=DECODE..SA.001(1)                     322
            5.0T2   322  DECODE..SA.001                     1 LINE     80    4 PAGE UM   MTA                 AUG. 01, 1973  22:56.50
            5.0T4   267                       
0          PROGRAM TO PROVIDE HASP-TYPE DECOMPRESSION/DEBLOCKING FOR EXPERIMENTAL REMOTE BATCH USAGE.
0          Referenced by comments of: 796/1, 796/4 
00541/002  *DECODE                                   OC  G          *DECODE                                                         
            5.0T2   323  DECODE..OC.002                     1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  15:19:09
            5.0T4   268  *DECODE              
00542/001  *DF                                                    # (NOT DISTRIBUTED)                                               
            D3T4    222                                                             UM                       AUG. 01, 1973  22:56.58
00543/001  *ENCODE                                   SA  G          S1559 5.0T2 VLO FSNAME=ENCODE..SA.001(1)                     324
            5.0T2   324  ENCODE..SA.001                     1 LINE     80   10 PAGE UM   MTA                 AUG. 01, 1973  22:57.23
            5.0T4   269                       
0          PROGRAM TO PROVIDE HASP-TYPE COMPRESSION/BLOCKING FOR EXPERIMENTAL REMOTE BATCH USAGE.
0          Referenced by comments of: 796/1 
00543/002  *ENCODE                                   OC  G          *ENCODE                                                         
            5.0T2   325  ENCODE..OC.002                     1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  15:19:11
            5.0T4   270  *ENCODE              
00544/001  *ENDJUNK                                  OC  G          *ENDJUNK                                                        
            5.0T2   326  ENDJUNK..OC.001                    1 LINE     24    1 PAGE UM   MTA                 JULY 03, 1981  15:19:12
            5.0T4   271  *ENDJUNK             
0          CONTAINS THE TWO LOADER CARDS:
            LCS            LCSYMBOL
            LDT
00545/001  *FAKEOS                   INSTALLATION    WF             S0989 UQV15 FSNAME=FAKEOS.INSTALLATION(1)                    15 
            5.0T2   327  FAKEOS.INSTALLATION.WF.001         1 LINE    100    3 PAGE UM   MTA                 FEB. 17, 1976  20:04:00
            5.0T4   272                       
0          SOMEWHAT OUT-OF-DATE WRITEUP DESCRIBING THE ORGANIZATION AND INSTALLATION OF *FAKEOS.
0          Referenced by comments of: 458/1, 762/3, 793/1 
00545/002  *FAKEOS                   WRITEUP         WF             S0989 UQV15 FSNAME=FAKEOS.WRITEUP(1)                         14 
            5.0T2   328  FAKEOS.WRITEUP.WF.002              1 LINE    148   11 PAGE UM   MTA                 FEB. 17, 1976  20:03:19
            5.0T4   273                       
0          UQV USER-LEVEL WRITEUP DESCRIBING THE USAGE AND FEATURES OF *FAKEOS.
           UM USER-LEVEL DOCUMENTATION IS IN MTS VOLUME 2.
1                                                                                               SUN SEP 08/96   15:24:55   Page  316
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00545/003  *FAKEOS                   MAIN D5 MASTER  SA  G          S1561 5.0T4 VLO FSNAME=FAKEOS.MAIN_D5_MASTER.SA.003(1)       367
            5.0T4   367  FAKEOS.MAIN_D5_MASTER.SA.003       1 LINE     80  244 PAGE UM   MTA                 AUG. 09, 1981  23:15:15
            5.0T10  271                       
0          MASTER SOURCE FOR THE FAKEOS MAIN PROGRAM.
           COPIES COPY:GLOBALDEFS (1026/1), FAKEOS.GBLS (545/20), COPY:GLOBALSETS (1026/2), COPY:LLMPSEQU (087),
           *LOADINFODSECT (001/4), *GDINFODSECT (594), AND *SENSEDSECT (3025).
           ASSEMBLE USING *SYSMAC (ON UNIT 2), *OSMAC (193) (ON UNIT 0), AND FOS.MACLIB (545/22).
0          Referenced by comments of: 545/22 
00545/004  *FAKEOS                   PREFIX D5 MAST  SA  G          S1561 5.0T4 VLO FSNAME=FAKEOS.PREFIX_D5_MAST.SA.004(1)       368
            5.0T4   368  FAKEOS.PREFIX_D5_MAST.SA.004       1 LINE     80   56 PAGE UM   MTA                 AUG. 09, 1981  23:15:56
            5.0T10  272                       
0          MASTER SOURCE FOR FAKEOS PREFIX.
           COPIES FAKEOS.GBLS (545/20), *GDINFODSECT (594), AND *CNFGINFODSECT (654).
           ASSEMBLE USING *SYSMAC (ON UNIT 2), *OSMAC (193) (ON UNIT 0), AND FOS.MACLIB (545/22).
0          Referenced by comments of: 545/22 
00545/005A *FAKEOS                   UPDATES         UC  G          MTA:FOS.UPDATES                                                 
            5.1T1   586  FAKEOS.UPDATES.UC.005              1 LINE     73    3 PAGE UM   MTA                 JULY 23, 1983  11:13:39
0          Post D5.0 updates to FAKEOS prefix, line 1, and main program, line 10000.
           Required to make FAKEOS work with a version of MTS that includes SVCTRP.
00545/006C *FAKEOS                   ASSEMBLY CMDS   C              MTA:FOS.ASM                                                     
            5.1T1   587  FAKEOS.ASSEMBLY_CMDS.C.006         1 LINE     90    1 PAGE UM   MTA                 JULY 23, 1983  11:13:39
0          COMMANDS TO ASSEMBLE FAKEOS PREFIX, AT LINE 1, AND MAIN PROGRAM, AT LINE
           1000.
00545/007  *FAKEOS                   OS LOWCORE      SA             S1559 5.0T2 VLO FSNAME=FAKEOS.OS_LOWCORE.SA.008(1)           331
            5.0T2   331  FAKEOS.OS_LOWCORE.SA.008           1 LINE     42    4 PAGE UM   MTA                 JULY 03, 1981  15:19:56
            5.0T4   276                       
0          CONTENTS OF FIRST HALF-PAGE OF OS.
00545/008  *FAKEOS                   BDAM SIMULATOR  SA             S1559 5.0T2 VLO FSNAME=FAKEOS.BDAM_SIMULATOR.SA.009(1)       332
            5.0T2   332  FAKEOS.BDAM_SIMULATOR.SA.009       1 LINE     87   69 PAGE UM   MTA                 MAR. 07, 1980  23:48:27
            5.0T4   277                       
0          SOURCE FOR OS BDAM SIMULATOR.
           COPIES FAKEOS.GBLS (545/20).
           ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22).
00545/009  *FAKEOS                   BDAM SIMULATOR  OE             ETC:BDAM                                                        
            5.0T2   333  FAKEOS.BDAM_SIMULATOR.OE.010       1 SEQ   15140    4 PAGE UM   MTA                 JULY 03, 1981  15:21:13
            5.0T4   278  ETC.:BDAM            
1                                                                                               SUN SEP 08/96   15:24:55   Page  317
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00545/010  *FAKEOS                   DDNAME SCANNER  SA             S1559 5.0T2 VLO FSNAME=FAKEOS.DDNAME_SCANNER.SA.011(1)       334
            5.0T2   334  FAKEOS.DDNAME_SCANNER.SA.011       1 LINE     80   20 PAGE UM   MTA                 MAY  25, 1978  15:00:44
            5.0T4   279                       
0          SOURCE FOR DDNAME SCANNER. COPIES FAKEOS.GBLS (545/20) and *GDINFODSECT
           (594). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22).
00545/011  *FAKEOS                   DDNAME SCANNER  OC           # (PART OF *FAKEOS)                                               
            D3.2T1  455  FAKEOS.VOSDDEF.OE.18               1 SEQ    2586    1 PAGE UM   MTA                 MAR. 21, 1975  01:50:37
0          Part of *FAKEOS (545/45)
00545/012  *FAKEOS                   EXCP SIMULATOR  SA             MTA:FOS.EXCP                                                    
            5.0T2   335  FAKEOS.EXCP_SIMULATOR.SA.013       1 LINE     72    8 PAGE UM   MTA                 JULY 03, 1981  15:21:53
            5.0T4   280                       
0          SOURCE FOR NON-OLTEP EXCP SIMULATOR.
           ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22).
00545/013  *FAKEOS                   EXCP SIMULATOR  OE             ETC:FAKEOS.EXCP                                                 
            5.0T2   336  FAKEOS.EXCP_SIMULATOR.OE.014       1 SEQ    2492    1 PAGE UM   MTA                 JULY 03, 1981  15:21:54
            5.0T4   281  ETC.:FAKEOS.EXCP     
00545/014A *FAKEOS                   OLTEP EXCP SIM  SA             MTA:FOS.OLTSEXCP                                                
            5.1T1   588  FAKEOS.OLTEP_EXCP_SIM.SA.014       1 LINE     96    5 PAGE UM   MTA                 JULY 23, 1983  11:13:40
0          SOURCE FOR OLTEP EXCP SIMULATOR.
           COPIES FAKEOS.GBLS (545/20).
           ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22).
0          Referenced by comments of: 545/16, 545/22 
00545/015A *FAKEOS                   OS SVC 59 SIML  SA             MTA:FOS.SVC59                                                   
            5.1T1   589  FAKEOS.OS_SVC_59_SIML.SA.015       1 LINE     86    6 PAGE UM   MTA                 JULY 23, 1983  11:13:41
0          SOURCE FOR OS SVC 59 SIMULATOR.
           COPIES FAKEOS.GLBS (545/20), COPY:GLOBALS (1026/3), *CNFGINFODSECT (654),
           AND COPY:LLMPSEQU (087). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22).
0          Referenced by comments of: 545/16, 545/22 
00545/016A *FAKEOS                   FOS.OLTS        OE             ETC:FOS.OLTS                                                    
            5.1T1   590  FAKEOS.FOS.OLTS.OE.016             1 LINE   1694    2 PAGE UM   MTA                 JULY 23, 1983  11:13:41
                         ETC.:FOS.OLTS        
0          OBJECT FROM (545/14) AND (545/15). CONTAINS A $CONTINUE WITH *FAKEOS RECORD.
           MUST BE CONCATENATED WITH *FAKEOS (545/45) WHEN RUNNING OLTEP.
00545/017A *FAKEOS                   IERRCO00        SA             MTA:FOS.IERRCO00(1,9999)                                        
            5.1T1   591  FAKEOS.IERRCO00.SA.017             1 LINE     78   19 PAGE UM   MTA                 JULY 23, 1983  11:13:41
0          Source for the VSS/FAKEOS SORT interface subroutine.
            
           ********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  318
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          D5.1 version:
            
           Now allows calls that don't include the E15 and E35 exits, and 
           hence which read and/or write data sets.  This version currently
           works only in VSS, not FAKEOS.
            
           This subroutine was inadvertantly put on the D5.1 tapes twice.  It
           is also (1078/62) and (1078/63).
           **********************************************************************
0          Referenced by comments of: 545/18, 1078/62 
00545/018C *FAKEOS                   VSS SORT        OC             MTA:VSS.SORT                                                    
            5.1T1   592  FAKEOS.VSS_SORT.OC.018             1 LINE     72    9 PAGE UM   MTA                 JULY 23, 1983  11:13:43
0          Object for IERRCO00 (545/17) and the SORT subroutine with the
           appropriate MVS linkedit statements to make a load module for IERRCO00
           usable in VSS.
00545/019C *FAKEOS                   VSS SORT        C              MTA:FOS.IERRCO00(-10,.999)                                      
            5.1T1   593  FAKEOS.VSS_SORT.C.019              1 LINE    138    1 PAGE UM   MTA                 JULY 23, 1983  11:13:43
0          Commands to assemble (line 0) and linkedit (line -10) IERRCO00 for
           use with VSS.
0          Referenced by comments of: 1078/62 
00545/020  *FAKEOS                   FAKEOS.GBLS     SA             MTA:FAKEOS.GBLS                                                 
            5.0T2   341  FAKEOS.FAKEOS.GBLS.SA.019          1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  15:22:00
            5.0T4   286                       
0          GLOBAL PARAMETERS COPY SECTION.
           EACH INSTALLATION SHOULD RE-DEFINE &OWNER, &COBUID, &MPSID, &FAKEID,
           &FAKMAIN, &ICENAME, AND &ETCID.
0          Referenced by comments of: 538/1, 545/3, 545/4, 545/8, 545/10, 545/14, 545/15, 545/39, 737/3 
00545/021  *FAKEOS                   FOS.LPA         SA             S1559 5.0T2 VLO FSNAME=FAKEOS.FOS.LPA.SA.020(1)              342
            5.0T2   342  FAKEOS.FOS.LPA.SA.020              1 LINE     55    1 PAGE UM   MTA                 JULY 03, 1981  15:22:01
            5.0T4   287                       
0          SYMBOL TABLE FOR MODULES MOVED FROM FOS.IGG TO *FAKEOS.  OBJECT IN *FAKEOS (545/45).
00545/022A *FAKEOS                   FOS.MACLIB      SM             MTA:FOS.MACLIB                                                  
            5.1T1   594  FAKEOS.FOS.MACLIB.SM.022           1 LINE     80   26 PAGE UM   MTA                 JULY 23, 1983  11:13:43
0          FAKEOS MACRO LIBRARY.
            
           ***************************************************************************
           D5.0B version:
            
           Since the main DSECT changed, everything that uses it must be reassembled
           (at least (545/3), (545/4), (545/14), (545/15).
           ***************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  319
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 545/3, 545/4, 545/8, 545/10, 545/12, 545/14, 545/15, 545/39 
00545/023A *FAKEOS                   IERRCO00 TEST   SA  G          MTA:FOS.IERRTEST(1,999)                                         
            5.1T1   595  FAKEOS.IERRCO00_TEST.SA.023        1 LINE     72    3 PAGE UM   MTA                 JULY 23, 1983  11:13:45
0          TEST PROGRAM FOR IERRCO00.  RUNS WITHOUT FAKEOS.  ALL THE SORT TEST DATA IS
           INTERNAL TO IT.  SETS THE "DIAG" PARAMETER TO IERRCO00 SO A LOT OF SORT TRACE
           OUTPUT IS PRODUCED.  CHECKS THE RESULT OF THE SORT AND PRINTS ERROR COMMENTS
           IF BAD.
00545/024A *FAKEOS                   IERRCO00 TEST   OC  G          MTA:FOS.IERRTEST(1000)                                          
            5.1T1   596  FAKEOS.IERRCO00_TEST.OC.024        1 LINE     80    4 PAGE UM   MTA                 JULY 23, 1983  11:13:45
00545/025  *FAKEOS                   BSAM TEST       SA             MTA:FOS.TESTBSAM(1,999)                                         
            5.0T2   346  FAKEOS.BSAM_TEST.SA.024            1 LINE     65    1 PAGE UM   MTA                 JULY 03, 1981  15:22:07
            5.0T4   291                       
0          PROGRAM TO TEST BSAM BY COPYING FROM INPUT TO SYSPRINT USING BSAM WITH DOUBLE
           BUFFERING ON BOTH.  ASSEMBLE USING *OSMAC (193) (ON UNIT 2) AND *SYSMAC (ON UNIT 0).
00545/026  *FAKEOS                   BSAM TEST       OC             MTA:FOS.TESTBSAM(1000)                                          
            5.0T2   347  FAKEOS.BSAM_TEST.OC.025            1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  15:22:08
            5.0T4   292                       
00545/027  *FAKEOS                   QSAM TEST       SA             MTA:FOS.TESTQSAM(1,999)                                         
            5.0T2   348  FAKEOS.QSAM_TEST.SA.026            1 LINE     69    1 PAGE UM   MTA                 JULY 03, 1981  15:22:09
            5.0T4   293                       
0          PROGRAM TO TEST QSAM BY COPYING INPUT TO OUTPUT USING QSAM.  ECHOS EACH LINE
           ON MTS UNIT 1.  GENERAL ENOUGH TO ALLOW ANY MODE OF GET AND PUT (MOVE, LOCATE,
           DATA) AND ANY RECORD FORMAT (NO MEAN TRICK IN OS!).  ASSEMBLE USING *SYSMAC
           (ON UNIT 2) AND *OSMAC (193) (ON UNIT 0) (SIC).
00545/028  *FAKEOS                   QSAM TEST       OC             MTA:FOS.TESTQSAM(1000)                                          
            5.0T2   349  FAKEOS.QSAM_TEST.OC.027            1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  15:22:10
            5.0T4   294                       
00545/029  *FAKEOS                   UPDATE TEST     SA             MTA:FOS.TSTUPDAT(1,999)                                         
            5.0T2   350  FAKEOS.UPDATE_TEST.SA.028          1 LINE     66    1 PAGE UM   MTA                 JULY 03, 1981  15:22:11
            5.0T4   295                       
0          TEST PROGRAM WHICH READS INPUT USING BSAM WITH DOUBLE BUFFERING AND REWRITES
           ANY LINE BEGINNING WITH "A" AFTER CHANGING THE "A" TO "B".  ALSO ECHOS LINES
           READ ON SYSPRINT USING QSAM.  ASSEMBLE WITH *SYSMAC (ON UNIT 0) AND *OSMAC (193)
           (ON UNIT 2).
00545/030  *FAKEOS                   UPDATE TEST     OC             MTA:FOS.TSTUPDAT(1000)                                          
            5.0T2   351  FAKEOS.UPDATE_TEST.OC.029          1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  15:22:12
            5.0T4   296                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  320
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00545/031  *FAKEOS                   TIMER TEST      SA             MTA:FOS.TESTTIME(1,999)                                         
            5.0T2   352  FAKEOS.TIMER_TEST.SA.030           1 LINE     69    1 PAGE UM   MTA                 JULY 03, 1981  15:22:12
            5.0T4   297                       
0          PROGRAM WHICH TESTS STIMER AND TTIMER IN OS.  PRINTS MESSAGES TELLING WHAT IT'S
           DOING.  ASSEMBLE USING *SYSMAC (ON UNIT 0) AND *OSMAC (193) (ON UNIT 2).  IF ASSEMBLED
           WITH *SYSMAC ONLY, IT WILL TEST STIMER AND TTIMER IN MTS.
0          Referenced by comments of: 607/1 
00545/032  *FAKEOS                   TIMER TEST      OC             MTA:FOS.TESTTIME(1000)                                          
            5.0T2   353  FAKEOS.TIMER_TEST.OC.031           1 LINE     80    2 PAGE UM   MTA                 JULY 03, 1981  15:22:14
            5.0T4   298                       
00545/033  *FAKEOS                   WTO/WTOR TEST   SA  O          MTA:FOS.WTOTST(1,999)                                           
            5.0T2   354  FAKEOS.WTO/WTOR_TEST.SA.032        1 LINE     72    1 PAGE UM   MTA                 JULY 03, 1981  15:22:14
            5.0T4   299                       
0          TESTS WTO (WRITE TO OPERATOR) AND WTOR (WRITE TO OPERATOR WITH REPLY). 
           ASSEMBLE WITH *OSMAC (193) ON UNIT 0 AND *SYSMAC ON UNIT 2.
00545/034  *FAKEOS                   WTO/WTOR TEST   OC  O          MTA:FOS.WTOTST(1000)                                            
            5.0T2   355  FAKEOS.WTO/WTOR_TEST.OC.033        1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  15:22:15
            5.0T4   300                       
00545/035  *FAKEOS                   SNAP TEST       SA  O          MTA:FOS.TESTDUMP(1,999)                                         
            5.0T2   356  FAKEOS.SNAP_TEST.SA.034            1 LINE     72    1 PAGE UM   MTA                 JULY 03, 1981  15:22:16
            5.0T4   301                       
0          Test program for SNAP macros.  Contains several assemblies.  Assemble with
           PAR=BATCH.  Requires *OSMAC (193) on unit 0.
00545/036  *FAKEOS                   SNAP TEST       OC  O          MTA:FOS.TESTDUMP(1000)                                          
            5.0T2   357  FAKEOS.SNAP_TEST.OC.035            1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  15:22:17
            5.0T4   302                       
0          Needs to be made into a library to be used.
00545/037  *FAKEOS                   TSO TEST        SA  O          MTA:FOS.TESTTSO(1,999)                                          
            5.0T2   358  FAKEOS.TSO_TEST.SA.036             1 LINE     72    1 PAGE UM   MTA                 JULY 03, 1981  15:22:17
            5.0T4   303                       
0          Test TGET, TPUT, and STAX macros.  Note that the D5.0 FAKEOS doesn't
           support these, but VSS, component 1078, does.  Requires *OSMAC (193).
00545/038  *FAKEOS                   TSO TEST        OC  O          MTA:FOS.TESTTSO(1000)                                           
            5.0T2   359  FAKEOS.TSO_TEST.OC.037             1 LINE     80    2 PAGE UM   MTA                 JULY 03, 1981  15:22:19
            5.0T4   304                       
00545/039  *FAKEOS                   BDAM DUMP       SA             MTA:FOS.BDAMDUMP(1000)                                          
            5.0T2   360  FAKEOS.BDAM_DUMP.SA.038            1 LINE     72    5 PAGE UM   MTA                 JULY 03, 1981  15:22:19
            5.0T4   305                       
0          SOURCE FOR PROGRAM TO DUMP BDAM FAKEOS FILES.
1                                                                                               SUN SEP 08/96   15:24:55   Page  321
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          COPIES FAKEOS.GBLS (545/20).
           ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22).
00545/040  *FAKEOS                   BDAM DUMP       OC             MTA:FOS.BDAMDUMP(1,999)                                         
            5.0T2   361  FAKEOS.BDAM_DUMP.OC.039            1 LINE     80    4 PAGE UM   MTA                 JULY 03, 1981  15:22:21
            5.0T4   306                       
00545/041  *FAKEOS                   FAKEOSTRACE     SA             S1559 5.0T2 VLO FSNAME=FAKEOS.FAKEOSTRACE.SA.040(1)          362
            5.0T2   362  FAKEOS.FAKEOSTRACE.SA.040          1 LINE     66    3 PAGE UM   MTA                 JULY 03, 1981  15:22:23
            5.0T4   307                       
0          SOURCE FOR PROGRAM TO PRINT FAKEOS TRACE FILE.  ASSEMBLE USING *SYSMAC.
00545/042  *FAKEOS                   *FAKEOSTRACE    OE             *FAKEOSTRACE                                                    
            5.0T2   363  FAKEOS.*FAKEOSTRACE.OE.041         1 LINE   2764    2 PAGE UM   MTA                 JULY 03, 1981  15:22:24
            5.0T4   308  *FAKEOSTRACE         
00545/043  *FAKEOS                   FAKEOSCREBLDL   SA             MTA:FOS.CREBLDL(1,999)                                          
            5.0T2   364  FAKEOS.FAKEOSCREBLDL.SA.042        1 LINE     68    3 PAGE UM   MTA                 JULY 03, 1981  15:22:24
            5.0T4   309                       
0          PROGRAM TO CREATE A DIRECTORY THAT FAKEOS WILL USE WHEN DOING A BLDL ON LINKLIB.
           TAKES INPUT DATA ON SCARDS, OUTPUT DIRECTORY WRITTEN ON UNIT 0.
           ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 458/80, 458/81, 458/83, 458/85, 538/3, 737/5, 737/6, 762/6, 762/7 
00545/044  *FAKEOS                   *FAKEOSCREBLDL  OE             *FAKEOSCREBLDL                                                  
            5.0T2   365  FAKEOS.*FAKEOSCREBLDL.OE.043       1 SEQ    1620    1 PAGE UM   MTA                 JULY 03, 1981  15:22:26
            5.0T4   310  *FAKEOSCREBLDL       
00545/045A *FAKEOS                   *FAKEOS         OE  G          *FAKEOS                                                         
            5.1T1   597  FAKEOS.?FAKEOS.OE.045              1 LINE  32767   17 PAGE UM   MTA                 JULY 23, 1983  11:13:45
                         *FAKEOS              
0          CURRENT OBJECT FOR FAKEOS.
0          Referenced by comments of: 545/11, 545/16, 545/21 
00545/046A *FAKEOS                   MESSAGE FILE    M              ETC:FAKEOS.MSG                                                  
            5.1T1   598  FAKEOS.MESSAGE_FILE.M.046          1 LINE    120    4 PAGE UM   MTA                 JULY 23, 1983  11:13:46
                         ETC.:FAKEOS.MSG      
0          ERROR MESSAGE FILE FOR FAKEOS.  LINE NUMBERS IN THIS FILE ARE IMPORTANT.
00545/047  *FAKEOS                   OS DATA MANAGE  OL             ETC:FOS.IGG                                                     
            5.0T2   367  FAKEOS.OS_DATA_MANAGE.OL.046       1 LINE   3668    6 PAGE UM   MTA                 JULY 03, 1981  15:22:27
            5.0T4   312  ETC.:FOS.IGG         
0          LIBRARY OF OS DATA MANAGEMENT MODULES FROM REL 21.8 AND IERRCO00.
           >>>>>> NOTE: OBJECT HAS REP CARDS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  322
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00546/001A *VALIDATEFILE                             SA  G          FILE:VALIDATEFILE(1000)                                         
            5.1T1   599  VALIDATEFILE..SA.001               1 LINE     73   27 PAGE UM   HELFFRICH           JULY 23, 1983  11:13:47
                         FILE:VALIDATEFILE    
0          Program to validate line files for consistency.  Can be used, by users, after a
           system crash during which a file was open.  Prompts for input.  Assemble using
           COPY:FILE.MACROS (482/45).
            
           ********************************************************************
           D5.1 version: 
            
           Fixes bugs in the zerocheck option.
           ********************************************************************
0          Referenced by comments of: 253/1 
00546/002A *VALIDATEFILE                             OE  G          *VALIDATEFILE                                                   
            5.1T1   600  VALIDATEFILE..OE.002               1 LINE   5532    4 PAGE UM   HELFFRICH           JULY 23, 1983  11:13:49
                         *VALIDATEFILE        
00546/003C *VALIDATEFILE                             WF  G          FILE:VALIDATEFI.W                                               
            5.1T1   601  VALIDATEFILE..WF.003               1 LINE     69    3 PAGE UM   HELFFRICH           JULY 23, 1983  11:13:49
0          Writeup describing *VALIDATEFILE.  Referenced by (682/1).
0          Referenced by comments of: 482/28, 682/1 
00547/001  *FOREVER                                  D              *FOREVER                                                        
            5.0T2   370  FOREVER..D.001                     1 LINE     51    3 PAGE UM   MTA                 JULY 03, 1981  15:22:35
            5.0T4   315  *FOREVER             
0          A FILE CONTAINING ABOUT 300 LINES OF JUNK, ENDING WITH "$CONTINUE WITH *FOREVER" SO THAT
           IT APPEARS TO CONTAIN EVEN MORE.
00548/001A *FS                       BASE SOURCE     SA  G          W930:FS/BASE                                                    
            5.1T1   602  FS.BASE_SOURCE.SA.001              1 LINE     73   96 PAGE UM   D BODWIN            JULY 23, 1983  11:13:49
0          User program to save and restore files on magnetic tape, maintaining
           a directory and preserving line numbers and file size information.
           This program is also used to generate MTS distribution tapes.
           Calls SNIFF subroutine (548/4).  Copies COPY:DRDSECT (461/6),
           *GFINFODSECT (593), *SENSEDSECT (3025) and *GDINFODSECT (594).
0          Referenced by comments of: 392/1, 461/6, 548/2, 548/3, 549/1, 550/1 
00548/002C *FS                       UPDATE          UC  G          W930:FS/UPD                                                     
            5.1T1   603  FS.UPDATE.UC.002                   1 LINE     75   78 PAGE UM   D BODWIN            JULY 23, 1983  11:13:55
0          Update to be applied to base source (548/1) to yield current
           source (548/3).
            
0          Referenced by comments of: 548/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  323
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00548/003C *FS                       CURR SOURCE     SA  G          W930:FS/SOUNEW                                                  
            5.1T1   604  FS.CURR_SOURCE.SA.003              1 LINE     80  163 PAGE UM   D BODWIN            JULY 23, 1983  11:13:59
0          The result of applying the (548/2) update to the (548/1) base 
           source.  Object is in (548/5).  Assemble using *PEXIT.
            
           ********************************************************************
           D5.1 version:
            
            
           1) Changed blocking format to be variable (8, 4, or 1 pages, depending
              on the density of the tape).
            
           THIS IS AN INCOMPATIBLE CHANGE AND SHOULD BE INSTALLED AS SOON AS
           POSSIBLE, SINCE ALL FORTHCOMING FS TAPES COMING FROM UM WILL BE
           WRITTEN WITH THIS NEW VERSION.
            
           2) Updated to copy *SENSEDSECT (3025).
           ********************************************************************
0          Referenced by comments of: 548/2 
00548/004A *FS                       SNIFF SUBR      SA  G          W930:FS.SNIFF(1,999)                                            
            5.1T1   605  FS.SNIFF_SUBR.SA.004               1 LINE     72    3 PAGE UM   D BODWIN            JULY 23, 1983  11:14:06
0          Subroutine to determine the amount of space required by a file. Called by *FS.
           Copies *GFINFODSECT (593). Assemble using *SYSMAC.
0          Referenced by comments of: 548/1, 548/6 
00548/005A *FS                       OBJECT          OE  G          NEW:FS                                                          
            5.1T1   606  FS.OBJECT.OE.005                   1 LINE  32767   14 PAGE UM   D BODWIN            JULY 23, 1983  11:14:06
                         *FS                  
0          Referenced by comments of: 548/3 
00548/006C *FS                       COMMANDS        C              W930:MAKEFS                                                     
            5.1T1   607  FS.COMMANDS.C.006                  1 LINE     95    1 PAGE UM   D BODWIN            JULY 23, 1983  11:14:07
0          $SOURCE file for producing a new version of *FS for testing, etc.
           Refers to files under the UM user ID W930. The new version of *FS is
           placed in a file named W930:FS/OBJ (which is not distributed and which
           you must $CREATE before $SOURCing this file). The contents of
           W930:FS/OBJ should be linkeditted with the FS.SNIFF subroutine (548/4),
           appended with COPY:SYSDEFS and placed in *FS after testing.
            
           This file is included mostly so that the new HELP facility will
           be easier for you all to install.
00548/007C *FS                       HELP            D              ETC:FS.HELP                                                     
            5.1T1   608  FS.HELP.D.007                      1 LINE    173    9 PAGE UM   D BODWIN            JULY 23, 1983  11:14:07
0          Text for the *FS help facility, used with the Full Screen help
           facility (component 845).
1                                                                                               SUN SEP 08/96   15:24:55   Page  324
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00549/001  *FSCON                                    SA  G          S1559 5.0T2 VLO FSNAME=FSCON..SA.001(1)                      371
            5.0T2   371  FSCON..SA.001                      1 LINE     80   33 PAGE UM   D BODWIN            JULY 28, 1977  02:43:20
            5.0T4   316                       
0          PROGRAM TO CONVERT *FSAVE (392) TAPES TO *FS (548) FORMAT.
           NO LONGER REQUIRES THE FSZ SUBROUTINE.
00549/002  *FSCON                                    OE  G          *FSCON                                                          
            5.0T2   372  FSCON..OE.002                      1 SEQ    8116    3 PAGE UM   D BODWIN            JULY 03, 1981  15:22:44
            5.0T4   317  *FSCON               
00550/001  *FSCOPY                                   SA           # (OBSOLETE)                                                      
            D3T4    270  FSCOPY..SA.1                       1 LINE     80   30 PAGE UBC                      AUG. 01, 1973  23:05.32
0          Obsoleted by *FS (548).
00551/001A *FTN                                      SA  G          S1099 FORTRN FSNAME=FTN.S                                       
            5.1T1   609  FTN..SA.001                        1 LINE     85   51 PAGE UM   HANSEN              OCT. 26, 1982  16:47:52
0          THIS VERSION OF *FTN INTERFACES TO THE FORTRAN G (204) AND FORTRAN H (298)
           COMPILERS AND ALSO TO OVERDRIVE (667), THE FORTRAN PREPROCESSOR.
           IT IS LOADED INTO SHARED VM AT IPL BY PISTLE WITH THE SINGLE SYMBOL FTN
           DEFINED IN LCSYMBOL.  THERE ARE 4 REFERENCES TO FILE NAMES IN THIS VERSION
           AT LINES 922 THROUGH 925.  AS DISTRIBUTED, THEY ARE *FORTRANH, *FORTRANG,
           *FTNGTEST, AND *OVERDRIVE RESPECTIVELY. COPIES *GDINFODSECT (594).
0          Referenced by comments of: 699/1 
00551/002A *FTN                      SHARED OBJECT   OC  G          SEG2:FTN                                                        
            5.1T1   610  FTN.SHARED_OBJECT.OC.002           1 LINE     80   13 PAGE UM   HANSEN              JULY 23, 1983  11:14:14
                         SEG2:FTN             
0          LOADED INTO SHARED VM AT IPL BY PISTLE.
00551/003  *FTN                                      OC  G          *FTN                                                            
            5.0T2   375  FTN..OC.003                        1 SEQ      24    1 PAGE UM   HANSEN              JULY 03, 1981  15:22:50
            5.0T4   320  *FTN                 
0          CONTAINS ONLY THE LOADER CARDS:
                 RIP  FTN 
                 LCS            LCSYMBOL
                 LDT            FTN 
0          Referenced by comments of: 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 
00552/001  *GASP                                     SF  G          S1559 5.0T2 VLO FSNAME=GASP..SF.001(1)                       376
            5.0T2   376  GASP..SF.001                       1 LINE     80   30 PAGE UM   FLANIGAN            APR. 18, 1975  08:59:55
            5.0T4   321                       
0          FTN SOURCE FOR GASP SIMULATION PACKAGE FOR EVENT-ORIENTED DISCRETE SIMULATION.
           NOTE:  SOURCE CONTAINS MANY "$CONTINUE WITH *GASPCOM RETURN" LINES.
0          Referenced by comments of: 552/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  325
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00552/002  *GASP                                     SA  G          S1559 5.0T2 VLO FSNAME=GASP..SA.002(1)                       377
            5.0T2   377  GASP..SA.002                       1 LINE     80    1 PAGE UM   FLANIGAN            JULY 28, 1977  02:46:12
            5.0T4   322                       
0          ASMG SOURCE FOR GASP ERROR EXIT ROUTINE.
0          Referenced by comments of: 552/3 
00552/003  *GASP                                     OL  G          *GASP                                                           
            5.0T2   378  GASP..OL.003                       1 SEQ    6930   15 PAGE UM   FLANIGAN            JULY 03, 1981  15:22:54
            5.0T4   323  *GASP                
0          OBJECT LIBRARY BUILT FROM ASM AND FTN COMPONENTS IN (552/1) AND (552/2).
00552/004  *GASP                     *GASPCOM        SF  G  GPCM    *GASPCOM(0,7)                                                   
            5.0T2   379  GASP.*GASPCOM.SF.004               1 LINE     80    1 PAGE UM   FLANIGAN            JULY 03, 1981  15:22:55
            5.0T4   324  *GASPCOM             
00552/005  *GASP                     MEMO 246        WF             S1559 5.0T2 VLO FSNAME=GASP.MEMO_246.WF.005(1)               380
            5.0T2   380  GASP.MEMO_246.WF.005               1 LINE    127   11 PAGE UM   FLANIGAN            JAN. 24, 1977  20:29:16
            5.0T4   325                       
0          THIS IS COMPUTING CENTER MEMO 246 -- "DESCRIPTION OF MTS GASP SIMULATION SYSTEM"
00552/006  *GASP                     INTERNAL DESC   P   G          S1559 5.0T2 VLO FSNAME=GASP.INTERNAL_DESC.P.006(1)           381
            5.0T2   381  GASP.INTERNAL_DESC.P.006           1 LINE     80   28 PAGE UM   FLANIGAN            JULY 28, 1977  02:46:54
            5.0T4   326                       
0          DESCRIPTION OF THE INTERNALS OF GASP.
00553/001   NETWORK CLS                              SA  G          S1559 5.0T2 VLO FSNAME=NETWORK_CLS..SA.001(1)                382
            5.0T2   382  NETWORK_CLS..SA.001                1 LINE     80   43 PAGE UM   PICKELMAN           JULY 03, 1981  15:22:57
            5.0T4   327                       
0          Command language subsystem for Merit Computer Network ($NET command).
           Described in "Merit Network User's Guide" in MTS Volume 4.
           Calls COPY subroutine (553/2) to implement the .COPY network command.
           Copies *GDINFODSECT (594) and *SENSEDSECT (3025).
           Assemble using COPY:MTS.MACROS (344/3).
0          Referenced by comments of: 553/3 
00553/002   NETWORK CLS              COPY SUBR       SA  G          S1559 5.0T2 VLO FSNAME=NETWORK_CLS.COPY_SUBR.SA.002(1)       383
            5.0T2   383  NETWORK_CLS.COPY_SUBR.SA.002       1 LINE     76   38 PAGE UM   PICKELMAN           JULY 03, 1981  15:23:01
            5.0T4   328                       
0          Subroutines to implement the .COPY network command.
           Assemble using Copy:MTS.MACROS (344/3).
0          Referenced by comments of: 553/1, 553/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  326
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00553/003   NETWORK CLS                              OE  G          *CLSNET                                                         
            5.0T2   384  NETWORK_CLS..OE.003                1 LINE  18144    6 PAGE UM   PICKELMAN           JULY 03, 1981  15:23:04
            5.0T4   329  *CLSNET              
0          Object from (553/1) and (553/2), normally loaded into shared VM by PISTLE
           after IPL.
00553/004   NETWORK CLS              MNET:NETCOPY    OE  G          MNET:NETCOPY                                                    
            5.0T2   385  NETWORK_CLS.MNET:NETCOPY.OE.004    1 LINE  10160    4 PAGE UM   PICKELMAN           JULY 03, 1981  15:23:05
            5.0T4   330                       
0          Contains loader cards (RIP, COM, LCS,) to force reference to shared VM
           NETCOPY subroutine, if NET CLS is loaded in shared VM.  This file is $RUN
           automatically when a .COPY network command (or equivalent at a non-MTS host)
           is issued at a remote host to copy a file to or from the local MTS host.
00553/005D  NETWORK CLS              NEW VERSION     SQ  G          W226:NET                                                        
            5.1T1   611  NETWORK_CLS.NEW_VERSION.SQ.005     1 LINE     68   19 PAGE UM   PICKELMAN           JULY 23, 1983  11:14:16
0          PLUS source for $NEWCLSNET (553/10). Contains commands at line 0 to
           assemble (should be changed to 0=*NEWCLSNET). Requires *CLPARSELIB
           (1076/11), *PLUS.SOURCELIB (1042/5), and the PLUS source libraries for
           this version of the Network CLS (553/8) and (553/9).
00553/006D  NETWORK CLS              NEW VERSION     SR  G          W226:NET-GRAMMER                                                
            5.1T1   612  NETWORK_CLS.NEW_VERSION.SR.006     1 LINE     68    4 PAGE UM   PICKELMAN           JULY 23, 1983  11:14:17
0          *CLPARSER grammar for the new version of $NET CLS (553/10).
00553/007D  NETWORK CLS              NEW VERSION     SA  G          W226:NET-COPY                                                   
            5.1T1   613  NETWORK_CLS.NEW_VERSION.SA.007     1 LINE     88   37 PAGE UM   PICKELMAN           JULY 23, 1983  11:14:17
0          Assembler source for new version of $NET CLS (553/10). Contains
           commands at line 0 to assemble (should be changed to 0=*NEWCLSNET).
           Assemble using COPY:MTS.MACROS (344/3).
00553/008D  NETWORK CLS              NEW VERSION     SQ  G          W226:CLS.SOURCE                                                 
            5.1T1   614  NETWORK_CLS.NEW_VERSION.SQ.008     1 LINE     68    6 PAGE UM   PICKELMAN           JULY 23, 1983  11:14:19
0          PLUS source library for new version of $NET CLS (553/10).
0          Referenced by comments of: 553/5 
00553/009D  NETWORK CLS              NEW VERSION     SQ  G          W226:PLUS.QL                                                    
            5.1T1   615  NETWORK_CLS.NEW_VERSION.SQ.009     1 LINE     68    3 PAGE UM   PICKELMAN           JULY 23, 1983  11:14:19
0          PLUS source library for new version of $NET CLS (553/10).  Contains
           a $CONTINUE WITH *PLUS.SOURCELIB (1042/5) record.
0          Referenced by comments of: 553/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  327
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00553/010D  NETWORK CLS              NEW VERSION     OC  G          *NEWCLSNET                                                      
            5.1T1   616  NETWORK_CLS.NEW_VERSION.OC.010     1 LINE  30804    9 PAGE UM   PICKELMAN           JULY 23, 1983  11:14:19
                         *NEWCLSNET           
0          Referenced by comments of: 553/5, 553/6, 553/7, 553/8, 553/9 
00554/001   TABLMOD                  JOB PROGRAM     SA  G  TBJP    FILE:TABLMOD                                                    
            5.0T2   388  TABLMOD.JOB_PROGRAM.SA.001         1 LINE     80   28 PAGE UM   HELFFRICH           JULY 03, 1981  15:23:08
            5.0T4   333  FILE:TABLMOD         
0          UMMPS JOB PROGRAM TO DISPLAY AND MODIFY INFORMATION IN THE SHARED FILE TABLE.
           INVOKED BY ENTERING "TABLMOD" ON THE OPERATOR'S CONSOLE.  THE FOLLOWING COMMANDS
           ARE AVAILABLE:
            
             VERIFY   VERIFYS ENTRY AND ELEMENT ALLOCATIONS ARE CONSISTANT BY CHASING
                      THROUGH VARIOUS CHAINS IN SHARED FILE TABLE.  ALSO PRINTS THE NUMBER
                      OF OPEN FILES, MATRIX COMPUTATIONS, AND DEADLOCK DETECTIONS.
            
             TRACE    PRINTS OUT THE ENTIRE SHARED FILE TABLE.  EACH ENTRY CONSISTS OF
                      A FILE NAME, JOB NUMBER, OPEN STATUS ("OPEN" OR "NOTO"), LOCK
                      STATUS ("LOCKR", "LOCKM", OR "LOCKD"), AND WAIT STATUS ("WAITO",
                      "WAITR", "WAITM", OR "WAITD").
            
             LSTAT    PRINTS THE INFORMATION ASSOCIATED WITH A SINGLE FILE ("LSTAT FILE
                      FNAME") OR A SINGLE JOB ("LSTAT JOB N") IN THE SAME FORMAT AS THE
                      TRACE COMMAND.
            
             LOCATE   PRINTS THE HALF-WORD OFFSET INTO THE SHARED FILE TABLE FOR THE ENTRY
                      ASSOCIATED WITH A PARTICULAR FILE ("LOCATE FILE FNAME").
            
             CLEAN    TAKES THE SPECIFIED JOB ("CLEAN JOB N") OFF ALL OPEN OR LOCKED
                      AND WAITING LISTS.
            
             CLEANF   SAME AS "CLEAN" EXCEPT FOR ONE FILE ONLY ("CLEANF JOB N FILE FNAME").
            
             DEQ      TAKES THE SPECIFIED JOB ("DEQ JOB N") OFF ALL WAITING LISTS.
            
             DEQF     SAME AS "DEQ" EXCEPT FOR ONE FILE ONLY ("DEQF JOB N FILE FNAME").
            
           THE TABLMOD PROGRAM TERMINATES WHEN AN END-OF-FILE IS ENTERED.
            
           COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087).  ASSEMBLE USING
           COPY:FILE.MACROS (482/45).  SEE COMP (682/9) FOR A WRITEUP.
0          Referenced by comments of: 400/11, 554/3, 682/9 
00554/002   TABLMOD                  TABLMOD JOB     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  328
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00554/003   TABLMOD                  MTS PROGRAM     SA  G        # (SAME AS JOB PROGRAM)                                           
                                                                                    UM   HELFFRICH                                  
0          MTS PROGRAM TO ALLOW SYSTEM PROGRAMMERS TO INTERROGATE AND ALTER THE SYSTEM-WIDE
           SHARED FILE TABLE.  TAKES THE SAME COMMANDS AS TABLMOD JOB (554/1) AS WELL AS A
           "DUMP" COMMAND TO DUMP THE WHOLE SHARED FILE TABLE.  IT CALLS SDUMP TO DO THIS.
           COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087).  ASSEMBLE USING
           COPY:FILE.MACROS (482/45) STARTING AT LINE 0 TO INCLUDE THE CODE NECESSARY FOR
           THE MTS PROGRAM.  CONTAINS A "$CONTINUE WITH W045:TABLMOD(2)" LINE.
            
           SAME AS (554/1).
00554/004   TABLMOD                  MTS PROGRAM     OC  G          FILE:TABLMODMP.O                                                
            5.0T2   389  TABLMOD.MTS_PROGRAM.OC.004         1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:23:10
            5.0T4   334  FILE:TABLMODMP.O     
00555/001   MESSAGE MANUAL           PGM             SS  G          S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.PGM.SS.001(1)          390
            5.0T2   390  MESSAGE_MANUAL.PGM.SS.001          1 LINE     70   11 PAGE UM   FRONCZAK            JULY 28, 1977  02:48:53
            5.0T4   335                       
0          SPITBOL PROGRAM TO PRODUCE MESSAGE MANUAL FROM DATA IN (555/4). RUN AS
           FOLLOWS:
            
           $RUN *SPITBOL SCARDS=MESSAGEPGM(5) 5=MESSAGEDATA 4=*MSOURCE* 6=*MSINK*
                         7=MSGMANPRT SPRINT=*PRINT* PAR=SIZE=MAX
            
           *PRINT* SHOULD BE SPECIFIED AS A TN PRINTER. THE PRINTOUT CONSISTS OF
           ALPHABETIZED USER MESSAGES AND ALPHABETIZED OPERATOR MESSAGES. INSTRUCTIONS
           ON PROGRAM USAGE MAY BE OBTAINED VIA &HELP.
00555/002   MESSAGE MANUAL           SPITBLK         SA  G          S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.SPITBLK.SA.002(1)      391
            5.0T2   391  MESSAGE_MANUAL.SPITBLK.SA.002      1 LINE     79    3 PAGE UM   FRONCZAK            JULY 28, 1977  02:48:56
            5.0T4   336                       
0          ROUTINE TO INTERFACE SPITBOL TO THE BLOKLETR SUBR (572).
00555/003   MESSAGE MANUAL           SPITBLK         OC  G          S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.SPITBLK.OC.003(1)      392
            5.0T2   392  MESSAGE_MANUAL.SPITBLK.OC.003      1 LINE     80    1 PAGE UM   FRONCZAK            JULY 28, 1977  02:48:58
            5.0T4   337                       
00555/004   MESSAGE MANUAL           DATA            D              S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.DATA.D.004(1)          393
            5.0T2   393  MESSAGE_MANUAL.DATA.D.004          1 LINE    107   52 PAGE UM   FRONCZAK            JULY 28, 1977  02:49:01
            5.0T4   338                       
0          A DATA FILE DESCRIBING THE VARIOUS SYSTEM MESSAGES.  THE FORMAT OF THE FILE
           IS AS FOLLOWS:
            
             1. LOCATION OF MESSAGES
                  A) MTS "FMSG" MESSAGES ARE FOUND STARTING AT THE LINE NUMBER WHICH IS
                     THE FMSG NUMBER.
                  B) MTS "CMSG" MESSAGES START AT LINE 2000.
                  C) OTHER MESSAGES START AT LINE 3000.
            
             2. FORMAT OF LINES
1                                                                                               SUN SEP 08/96   15:24:55   Page  329
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                 A GROUP OF CONSECTIVE LINES IN THE FILE HAS INFORMATION ABOUT A GIVEN
                  MESSAGE.  THE FIRST LINE SPECIFIES THE MESSAGE TEXT, WHILE SUCCEEDING
                  LINES IN THE GROUP INDENTIFY THE DESTINATION, SOURCE, AND MEANING.
                  EACH LINE IS IDENTIFIED BY ITS LEADING CHARACTERS, WHICH MUST BE UPPERCASE;
                  THE TEXT OF MESSAGES MAYBE OF MIXED CASE.  THE FOLLOWING LINE FORMATS ARE
                  SPECIFIED (ALL COMPONENT NAMES MUST BE GIVEN IN UPPERCASE):
            
                  A) MESSAGE LINE
                     BEGINS WITH "## "; MESSAGE, STARTING IN COLUMN 4, USUALLY IN UPPERCASE
                     WITH GENERIC PARTS IN LOWERCASE.
            
                  B) TEXT ELIMINATION LINE
                     BEGINS WITH " ELIM " FOLLOWED BY THE EXACT TEXT TO BE ELIMINATED
                     FROM THE MESSAGE LINE FOR SORTING PURPOSES ONLY, DELIMITED BY A CHARACTER
                     WHICH MUST NOT APPEAR IN THE ELIMINATION TEXT.  FOR EXAMPLE,
                     ELIM 'STRING'
            
                  C) DESTINATION OF MESSAGE
                     BEGINS WITH " DEST OPER" IF OPERATOR MESSAGE; NO DESTINATION LINE IF
                     NORMAL MESSAGE.
            
                  D) LOCATION OF MESSAGE TEXT
                     BEGINS WITH " TXTLOC "; TEXT LOCATION NAME STARTING IN COLUMN 8, SUCH AS
                     FSMG 21.  FOR EXAMPLE, TXTLOC PERMIT,509,SDM51,PRMT0445.
            
                  E) WHO ISSUED MESSAGE (MAY BE SEVERAL OF THESE IN A GROUP)
                     BEGINS WITH " SOURCE "; INFORMATION STARTING IN COLUMN 9:  COMPONENT
                     NAME, COMPONENT NUMBER, LABEL, SEQUENCE ID.  FOR EXAMPLE,
                     SOURCE PERMIT,509,SDM51,PRMT0445.
            
                  F) EXPLANATIONS OF MESSAGE (AS MANY LINES AS NEEDED)
                     BEGINS WITH 3 BLANKS; TEXT STARTING IN COLUMN 4.  ALL
                     LINES ARE USER-LEVEL EXPLANATION LINES UNTIL "#S " APPEARS
                     IN COLUMNS 1-3, IN WHICH CASE, THAT LINE AND SUBSEQUENT
                     LINES DEFINE THE SYSTEM-LEVEL EXPLANATION.
            
           THIS FILE CURRENTLY CONTAINS COMPLETE COVERAGE OF MTS ITSELF AND MOST CLS'S.
0          Referenced by comments of: 555/1 
00555/005   MESSAGE MANUAL           OUTPUT          P              S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.OUTPUT.P.005(1)        394
            5.0T2   394  MESSAGE_MANUAL.OUTPUT.P.005        1 LINE     98  191 PAGE UM   FRONCZAK            JULY 28, 1977  02:49:29
            5.0T4   339                       
0          COPY THIS OUTPUT TO A TN PRINTER FOR A COPY OF THE MESSAGE MANUAL.
00556/001A *REDUCE2                  MTS MASTER      S   G          S1669 5.0CT1 VLO FSNAME=REDUCE2.MTS_MASTER.S.001(1)          141
            5.1T1   617  REDUCE2.MTS_MASTER.S.001           1 LINE     80  181 PAGE UM   MTA                 MAR. 02, 1983  21:17:18
0          REDUCE2 is a LISP 1.5 program designed for general algebraic computations.
            
           This is the OS/360 version of REDUCE2 modified to run in either OS or MTS.
           The flag MTS* (which is set as part of the generation of the LISP compiler or front end)
           is non-NIL when running in MTS and NIL when running in OS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  330
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 210/1, 556/3 
00556/002  *REDUCE2                  OS SOURCE       S   G          S1559 5.0T2 VLO FSNAME=REDUCE2.OS_SOURCE.S.002(1)            396
            5.0T2   396  REDUCE2.OS_SOURCE.S.002            1 LINE     80  171 PAGE UM   MTA                 JULY 03, 1981  15:23:30
            5.0T4   341                       
0          OS/360 source for REDUCE2 (version of April 15, 1979).
0          Referenced by comments of: 556/3 
00556/003A *REDUCE2                  UPDATE          U   G          S1669 5.0CT1 VLO FSNAME=REDUCE2.UPDATE.U.003(1)              142
            5.1T1   618  REDUCE2.UPDATE.U.003               1 LINE     73   10 PAGE UM   MTA                 MAR. 02, 1983  21:17:31
0          Update deck to convert OS/360 source (556/2) to OS/MTS version (556/1).
            
           This is written in the language accepted by the Utah update program (556/21).
00556/004A *REDUCE2                  CHKPOINT        O   G          ETC:RDC2.CKPT                                                   
            5.1T1   619  REDUCE2.CHKPOINT.O.004             1 SEQ      80   68 PAGE UM   MTA                 JULY 23, 1983  11:16:29
                         ETC.:RDC2.CKPT       
0          File in LISP checkpoint format containing object for REDUCE2.  This file is referenced by *REDUCE2.
00556/005A *REDUCE2                  CHKPOINT        O   G          S1669 5.0CT1 VLO FSNAME=REDUCE2.CHKPOINT.O.005(1)            144
            5.1T1   620  REDUCE2.CHKPOINT.O.005             1 SEQ      80   84 PAGE UM   MTA                 MAR. 02, 1983  21:17:36
0          Checkpoint for REDUCE including the LISP compiler.  This version is needed if changes are to be made to 
           REDUCE without regenerating it from scratch (for example it is used to add the integration package).
00556/006  *REDUCE2                  *REDUCE2        C              *REDUCE2                                                        
            5.0T2   400  REDUCE2.*REDUCE2.C.006             1 LINE     54    1 PAGE UM   MTA                 JULY 03, 1981  15:23:52
            5.0T4   345  *REDUCE2             
0          File to which users $SOURCE to invoke REDUCE2.  It runs the REDUCE version of LISP and then
           loads the REDUCE2 checkpoint.
00556/007  *REDUCE2                  UPDCOMP         C              S1559 5.0T2 VLO FSNAME=REDUCE2.UPDCOMP.C.007(1)              401
            5.0T2   401  REDUCE2.UPDCOMP.C.007              1 LINE     62    1 PAGE UM   MTA                 JULY 03, 1981  15:23:53
            5.0T4   346                       
0          Commands to update and compile REDUCE2.
            
           This command file produces a checkpoint for a "test" version of REDUCE
           in the file "RDC2.NEW" under the id running it and a checkpoint for the production version in
           the scratch file "-RDC2CKPT".  This should be copied into the appropriate ETC: file to install it.
00556/008  *REDUCE2                  EXAMPLE         S              S1559 5.0T2 VLO FSNAME=REDUCE2.EXAMPLE.S.008(1)              402
            5.0T2   402  REDUCE2.EXAMPLE.S.008              1 LINE     72    3 PAGE UM   MTA                 JULY 03, 1981  15:23:53
            5.0T4   347                       
0          Example of REDUCE2 input. This is the input that produces *REDUCE2EXAMP.
0          Referenced by comments of: 556/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  331
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00556/009  *REDUCE2                  EXAMPLE OUTPUT  P              *REDUCE2EXAMP                                                   
            5.0T2   403  REDUCE2.EXAMPLE_OUTPUT.P.009       1 LINE    126    7 PAGE UM   MTA                 JULY 03, 1981  15:23:54
            5.0T4   348  *REDUCE2EXAMP        
0          Example of the output from *REDUCE2. Produced by feeding (556/8) to *REDUCE2.
00556/010  *REDUCE2                  LISP OS/MVS     SA  G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_OS/MVS.SA.010(1)         404
            5.0T2   404  REDUCE2.LISP_OS/MVS.SA.010         1 LINE     80  191 PAGE UM   MTA                 JULY 03, 1981  15:23:55
            5.0T4   349                       
0          Source for the LISP/360 interpreter  (OS/360 version) as distributed with REDUCE2.
0          Referenced by comments of: 556/11 
00556/011  *REDUCE2                  LISP UPDATE     U   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_UPDATE.U.011(1)          405
            5.0T2   405  REDUCE2.LISP_UPDATE.U.011          1 LINE     74   28 PAGE UM   MTA                 JULY 03, 1981  15:24:05
            5.0T4   350                       
0          Update to go from OS/360 source (556/10) to version that will run in either OS or MTS depending on the
           values of certain conditional assembly parameters.  These are as follows (all are SETB symbols):
            
                &MTS     1 to assemble an MTS version, 0 to assemble an OS/MVS version
                &HASHING 1 to assemble code to hash atoms onto the object list. 0 to do a linear search
                         of the object list for a new atom.  Normally one in MTS, can also be one for OS/MVS
                         version if GETMAIN is capable of getting space for the hash table.  If it can't,
                         LISP will not run if &HASHING is one.
                &MORSTOR 1 to get more storage when almost out. The symbol SBLKSIZ controls when to get more and
                         how much to get.  When only SBLKSIZ/32 cells are left after a garbage collection, LISP
                         will attempt to get up to SBLKSIZ/8 more cells (SBLKSIZ more bytes).  &MORSTOR is normally
                         on for the MTS version and SBLKSIZ defaults to 16 pages.  &MORSTOR can be on for the OS/MVS
                         version, but it probably won't do any good.  If more storage has been obtained, then 
                         SETSIZE, CONDENSE, and CHKPOINT can no longer be used. A checkpoint file to be RESTOREd
                         must fit in the original space and RESTORE discards all aditional space allocated.
            
           The other assembly parameters are the same as in the original version.
            
           The following are the changes  made to LISP converting it to MTS.
            
            1. The R= parameter on the RUN command controls the initial VM 
               allocation for LISP, not the amount to give back for data
               managment routines.  It will get more if needed, but if it does,
               CHKPOINT will no longer work.
            
            2. The OPEN function has been changed.  For exact details, contact MTA.
               In almost all cases in MTS, leaving the second parameter NIL will
               do what you want.
            
            3. VERBOS and PREVALQT both default off.
            
            4. *RAISE, $EOF$, and $EOL$ work as described in the Standard LISP
                report, except that $EOL$ is returned by READCH only if the 
                argument to READCH is '$EOL$ so REDUCE won't blow up.
            
            5. On input by READ, 'xxx is the same as (QUOTE xxx).  Since READ
1                                                                                               SUN SEP 08/96   15:24:55   Page  332
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0              is used by the top level loop, this applies to input there.
            
            6. There are several additional functions:
                 INLNR():integer  returns the internal form of the line number
                                  of the last line read.
                 BATCH():boolean  returns T if called in a batch job, NIL 
                                  otherwise
                 ATTN(U:any):NIL  disables LISPs attention interrupt trap if U 
                                  is NIL
                 MTS():NIL        calls MTS
                 SQRT(U:number):number returns the square root of U (as an integer
                                  if U is an integer with an exact square root) 
                 SETPCHAR(U:char):char sets the prefix character (for input only)
                                  to U and returns the old one.
            
           This update file is written in the language accepted by the update program distributed 
           with REDUCE (556/21).
00556/012  *REDUCE2                  LISP OBJECT     OE  G          ETC:RDC2.LISP                                                   
            5.0T2   406  REDUCE2.LISP_OBJECT.OE.012         1 LINE  32767   15 PAGE UM   MTA                 JULY 03, 1981  15:24:26
            5.0T4   351  ETC.:RDC2.LISP       
0          Object for MTS version of LISP.  Assembled with all of &MTS, &HASHING, and &MORSTOR on.
00556/013  *REDUCE2                  LISP ASSEMBLE   C   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_ASSEMBLE.C.013(1)        407
            5.0T2   407  REDUCE2.LISP_ASSEMBLE.C.013        1 LINE     66    1 PAGE UM   MTA                 JULY 03, 1981  15:24:28
            5.0T4   352                       
0          Commands to update and assemble LISP.  Leaves the new object in LISP360.O.
00556/014  *REDUCE2                  LISP COMPILER   S   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.S.014(1)        408
            5.0T2   408  REDUCE2.LISP_COMPILER.S.014        1 LINE     80   81 PAGE UM   MTA                 JULY 03, 1981  15:24:29
            5.0T4   353                       
0          LISP/360 compiler and front end.  This is the original version distributed with REDUCE.  It contains
           the LISP compiler and functions in standard LISP that are not in LISP360.
00556/015  *REDUCE2                  LISP COMPILER   U   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.U.015(1)        409
            5.0T2   409  REDUCE2.LISP_COMPILER.U.015        1 LINE     63    1 PAGE UM   MTA                 JULY 03, 1981  15:24:33
            5.0T4   354                       
0          Update to change os compiler into version for either MTS or OS/MVS.  Initializes the value of MTS*
           to NIL if running in OS/MVS version of LISP and to T if running in the MTS version of LISP.
00556/016  *REDUCE2                  LISP COMPILER   O   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.O.016(1)        410
            5.0T2   410  REDUCE2.LISP_COMPILER.O.016        1 LINE     80   14 PAGE UM   MTA                 JULY 03, 1981  15:24:34
            5.0T4   355                       
0          Checkpointed LISP/360 front end, MTS version.  LISP object format.
1                                                                                               SUN SEP 08/96   15:24:55   Page  333
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00556/017  *REDUCE2                  LISP COMPILER   O   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.O.017(1)        411
            5.0T2   411  REDUCE2.LISP_COMPILER.O.017        1 SEQ      80   29 PAGE UM   MTA                 JULY 03, 1981  15:24:35
            5.0T4   356                       
0          Checkpointed LISP compiler.  LISP object format.
00556/018  *REDUCE2                  LISP COMPILER   C   G          S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.C.018(1)        412
            5.0T2   412  REDUCE2.LISP_COMPILER.C.018        1 LINE     68    1 PAGE UM   MTA                 JULY 03, 1981  15:24:37
            5.0T4   357                       
0          Commands to generate the LISP compiler in COMPILE and the front end in FEND.
00556/019  *REDUCE2                  LISP DEBUG      S   O          WATF:LISPBREAK(1)                                               
            5.0T2   413  REDUCE2.LISP_DEBUG.S.019           1 LINE     77    3 PAGE UM   MTA                 JULY 03, 1981  15:24:38
            5.0T4   358                       
0          This program (written in LISP) defines two functions:  BREAK and UNBREAK and makes them REDUCE commands.
            
           BREAK takes a list of function names and sets a breakpoint at the entry and exit
           to each of them.  UNBREAK takes a list of function names and resets the breakpoint
           at each.  All functions must be previously defined.  Both BREAK and UNBREAK are
           defined as FEXPR's so that their arguments are not evaluated.  When a function
           which has a breakpoint set is called, the message ">>> ENTERINT name type args"
           is typed, where "name" is the name of the function, "type" is SUBR, FSUBR, EXPR,
           or FEXPR, and "args" are the names of the arguments.  When the function exits,
           the message ">>> EXITING name" is typed.  Both messages are followed by the
           message "LISTENING" and lines are read and passed to EVAL until "T" is entered.
           The atom "VALUE" will be bound to the result of the function on exit, and the
           arguments will be bound both times.  Conditional breakpoints may be set by making
           one of the arguments of BREAK a list.  CAR of the list is the name of the function
           and CADR of the list is a condition which must be true for the breakpoint to occur.
           The condition is tested when the function is called.
            
           Example:  BREAK (FN (FN2 (EQ ARG1 1)))   will always break at function FN and
                                                    break at FN2 if ARG1 is 1 (assuming ARG1
                                                    is the first argument of FN2).
00556/020  *REDUCE2                  UPDATE PROGRAM  SF  G          S1559 5.0T2 VLO FSNAME=REDUCE2.UPDATE_PROGRAM.SF.020(1)      414
            5.0T2   414  REDUCE2.UPDATE_PROGRAM.SF.020      1 LINE     72    4 PAGE UM   MTA                 JULY 03, 1981  15:24:39
            5.0T4   359                       
0          FORTRAN source for the program that updates the various parts of REDUCE.  Same as the original version from Utah
           except that it now accepts a "./ C xxx" command and ignores it (for comments).  It also echos its input commands.
00556/021  *REDUCE2                  UPDATE PROGRAM  OE  G          S1559 5.0T2 VLO FSNAME=REDUCE2.UPDATE_PROGRAM.OE.021(1)      415
            5.0T2   415  REDUCE2.UPDATE_PROGRAM.OE.021      1 LINE   1692    4 PAGE UM   MTA                 JULY 03, 1981  15:24:39
            5.0T4   360                       
0          Referenced by comments of: 556/3, 556/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  334
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00556/022  *REDUCE2                  PRINT PROGRAM   SF  O          S1559 5.0T2 VLO FSNAME=REDUCE2.PRINT_PROGRAM.SF.022(1)       416
            5.0T2   416  REDUCE2.PRINT_PROGRAM.SF.022       1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  15:24:40
            5.0T4   361                       
0          FORTRAN program to print the REDUCE writeups from Utah.  Reads 5 and 
           writes 6.
0          Referenced by comments of: 556/23, 556/24, 556/25, 556/26 
00556/023  *REDUCE2                  INSTALL GUIDE   P              S1559 5.0T2 VLO FSNAME=REDUCE2.INSTALL_GUIDE.P.023(1)        417
            5.0T2   417  REDUCE2.INSTALL_GUIDE.P.023        1 SEQ      80   11 PAGE UM   MTA                 JULY 03, 1981  15:25:18
            5.0T4   362                       
0          Utah's installation guide for REDUCE. Print using (556/22).
00556/024  *REDUCE2                  STANDARD LISP                  S1559 5.0T2 VLO FSNAME=REDUCE2.STANDARD_LISP..024(1)         418
            5.0T2   418  REDUCE2.STANDARD_LISP..024         1 SEQ      80   25 PAGE UM   MTA                 JULY 03, 1981  15:25:23
            5.0T4   363                       
0          The "Standard LISP Report" defining a dialect of LISP to be used for
           implementing REDUCE.  Print using (556/22).
00556/025  *REDUCE2                  LISP/370 REPRT                 S1559 5.0T2 VLO FSNAME=REDUCE2.LISP/370_REPRT..025(1)        419
            5.0T2   419  REDUCE2.LISP/370_REPRT..025        1 SEQ      80   23 PAGE UM   MTA                 JULY 03, 1981  15:25:25
            5.0T4   364                       
0          Report describing how LISP/370 deviates from standard LISP.  Print using
           (556/22).
00556/026  *REDUCE2                  USER'S MANUAL                  S1559 5.0T2 VLO FSNAME=REDUCE2.USER'S_MANUAL..026(1)         420
            5.0T2   420  REDUCE2.USER'S_MANUAL..026         1 SEQ      80   33 PAGE UM   MTA                 JULY 03, 1981  15:25:28
            5.0T4   365                       
0          Obsolete and incomplete user's manual for REDUCE, but all Utah has produced
           so far.  Print using (556/22).
00556/027  *REDUCE2                  TUTORIAL 1      D   G          *RDC.LESSON1                                                    
            5.0T2   421  REDUCE2.TUTORIAL_1.D.027           1 LINE     71    5 PAGE UM   MTA                 JULY 03, 1981  15:25:29
            5.0T4   366  *RDC.LESSON1         
0          The first of the REDUCE tutorials written by David Stoutemyer at the University of Hawaii.  Minor changes
           have been made to it for MTS.
00556/028  *REDUCE2                  TUTORIAL 2      D   G          *RDC.LESSON2                                                    
            5.0T2   422  REDUCE2.TUTORIAL_2.D.028           1 LINE     70    3 PAGE UM   MTA                 JULY 03, 1981  15:25:30
            5.0T4   367  *RDC.LESSON2         
00556/029  *REDUCE2                  TUTORIAL 3      D   G          *RDC.LESSON3                                                    
            5.0T2   423  REDUCE2.TUTORIAL_3.D.029           1 LINE     71    5 PAGE UM   MTA                 JULY 03, 1981  15:25:32
            5.0T4   368  *RDC.LESSON3         
1                                                                                               SUN SEP 08/96   15:24:55   Page  335
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00556/030  *REDUCE2                  TUTORIAL 4      D   G          *RDC.LESSON4                                                    
            5.0T2   424  REDUCE2.TUTORIAL_4.D.030           1 LINE     71    8 PAGE UM   MTA                 JULY 03, 1981  15:25:33
            5.0T4   369  *RDC.LESSON4         
00556/031  *REDUCE2                  TUTORIAL 5      D   G          *RDC.LESSON5                                                    
            5.0T2   425  REDUCE2.TUTORIAL_5.D.031           1 LINE     71    7 PAGE UM   MTA                 JULY 03, 1981  15:25:34
            5.0T4   370  *RDC.LESSON5         
00556/032  *REDUCE2                  INTEGRATION     S   O          S1559 5.0T2 VLO FSNAME=REDUCE2.INTEGRATION.S.032(1)          426
            5.0T2   426  REDUCE2.INTEGRATION.S.032          1 LINE     80   77 PAGE UM   MTA                 JULY 03, 1981  15:25:36
            5.0T4   371                       
0          Original source for the Cambridge integration package distributed with REDUCE.
00556/033  *REDUCE2                  INTEGRATION     U   O          S1559 5.0T2 VLO FSNAME=REDUCE2.INTEGRATION.U.033(1)          427
            5.0T2   427  REDUCE2.INTEGRATION.U.033          1 LINE     12    1 PAGE UM   MTA                 JULY 03, 1981  15:25:41
            5.0T4   372                       
0          Deletes one line that causes trouble in the 360 version of LISP.
00556/034  *REDUCE2                  INTEGRATION     C   O          S1559 5.0T2 VLO FSNAME=REDUCE2.INTEGRATION.C.034(1)          428
            5.0T2   428  REDUCE2.INTEGRATION.C.034          1 LINE     61    1 PAGE UM   MTA                 JULY 03, 1981  15:25:42
            5.0T4   373                       
0          Commands to generate the checkpoint file for the integration package in INT.CKPT.  Assumes that REDUCE has already
           been generated.
00556/035  *REDUCE2                  INTEGRATION     O   O          ETC:RDC2.INTCHK                                                 
            5.0T2   429  REDUCE2.INTEGRATION.O.035          1 LINE     80  100 PAGE UM   MTA                 JULY 03, 1981  15:25:42
            5.0T4   374                       
0          LISP checkpoint for REDUCE with the integration package.
00556/036  *REDUCE2                  INTEGRATION     C   O          UNSP:REDUCE2.INT                                                
            5.0T2   430  REDUCE2.INTEGRATION.C.036          1 LINE     55    1 PAGE UM   MTA                 JULY 03, 1981  15:25:48
            5.0T4   375                       
0          Commands to run REDUCE with the integration package.
00556/037  *REDUCE2                  MEMO 420        WF             S0672 CCMEMO 'CCMEMOS' FSNAME=M420                              
            5.0T2   431  REDUCE2.MEMO_420.WF.037            1 LINE     73    5 PAGE UM   MTA                 DEC. 04, 1980  09:52:53
            5.0T4   376                       
0          THIS IS COMPUTING CENTER MEMO 420 -- "CHANGES TO *REDUCE."
00557/001   FLOATEST                                 SA  O          S1559 5.0T2 VLO FSNAME=FLOATEST..SA.001(1)                   432
            5.0T2   432  FLOATEST..SA.001                   1 LINE     80    4 PAGE UM   DWB                 JULY 28, 1977  02:51:21
            5.0T4   377                       
0          PROGRAM TO TEST THAT FLOATING-POINT REGISTERS AND PROGRAM MASK ARE PRESERVED ACROSS ABNORMAL PROGRAM EXITS.
           DESIGNED TO BE RUN BOTH BY $RUN COMMAND AND UNDER CONTROL OF SDS ($DEBUG OR $SET DEBUG=ON AND $RUN).
1                                                                                               SUN SEP 08/96   15:24:55   Page  336
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00557/002   FLOATEST                                 OC  O          S1559 5.0T2 VLO FSNAME=FLOATEST..OC.002(1)                   433
            5.0T2   433  FLOATEST..OC.002                   1 LINE     80    3 PAGE UM   DWB                 JULY 28, 1977  02:51:23
            5.0T4   378                       
00558/001   VIRTUAL MACHINE          MAIN PGM        SA  G          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.MAIN_PGM.SA.001(1)    434
            5.0T2   434  VIRTUAL_MACHINE.MAIN_PGM.SA.001    1 LINE     72   67 PAGE UM   MTA                 JULY 03, 1981  15:28:57
            5.0T4   379                       
0          PROGRAM TO PROVIDE A SYSTEM/360 OR SYSTEM/370 VIRTUAL MACHINE. USES ASSEMBLY
           PARAMETERS TO SELECT VIRTUAL 370, 360/67, OR STANDARD 360. ANY OPTION WILL
           RUN ON EITHER A 360/67 OR 370 REAL MACHINE. COPIES S2301 (558/4),
           *CNFGINFODSECT (654), V370.S (558/2), AND OC.S (558/3). AN ADDITIONAL
           ASSEMBLY PARAMETER IS PROVIDED TO PRODUCE A STUDENT VIRTUAL MACHINE. ASSEMBLE
           USING *SYSMAC.
0          Referenced by comments of: 472/1, 558/7 
00558/002   VIRTUAL MACHINE          V370 SUPPORT    SA  G          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.V370_SUPP.SA.002(1)   435
            5.0T2   435  VIRTUAL_MACHINE.V370_SUPP.SA.002   1 LINE     72   10 PAGE UM   MTA                 JULY 03, 1981  15:29:03
            5.0T4   380                       
0          COPY SECTION CONTAINING THE 370 INSTRUCTION SIMULATION CODE.
0          Referenced by comments of: 558/1 
00558/003   VIRTUAL MACHINE          3066 SUPPORT    SA  G          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.3066_SUPP.SA.003(1)   436
            5.0T2   436  VIRTUAL_MACHINE.3066_SUPP.SA.003   1 LINE     68    6 PAGE UM   MTA                 JULY 03, 1981  15:29:05
            5.0T4   381                       
0          COPY SECTION CONTAINING THE 3066 SIMULATION CODE.
0          Referenced by comments of: 558/1 
00558/004   VIRTUAL MACHINE          2301 SUPPORT    SA  G          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.2301_SUPP.SA.004(1)   437
            5.0T2   437  VIRTUAL_MACHINE.2301_SUPP.SA.004   1 LINE     70    6 PAGE UM   MTA                 JULY 03, 1981  15:29:06
            5.0T4   382                       
0          COPY SECTION CONTAINING VIRTUAL 2301 AND 2305 DRUM SUPPORT.  THE DRUM
           IS SIMULATED USING VIRTUAL MEMORY.
0          Referenced by comments of: 558/1 
00558/005   VIRTUAL MACHINE          DEVICE LIST     SA  G          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.DEVICE_LI.SA.005(1)   438
            5.0T2   438  VIRTUAL_MACHINE.DEVICE_LI.SA.005   1 LINE     66    1 PAGE UM   MTA                 JULY 03, 1981  15:29:07
            5.0T4   383                       
0          DEVICE LIST FOR UM 470 I/O CONFIGURATION.  COPIES V370DEV.MAC (558/6).
00558/006   VIRTUAL MACHINE          DEVLIST MACROS  SM  O          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.DEVLIST_M.SM.006(1)   439
            5.0T2   439  VIRTUAL_MACHINE.DEVLIST_M.SM.006   1 LINE     69    3 PAGE UM   MTA                 JULY 03, 1981  15:29:08
            5.0T4   384                       
0          MACROS, AND SOME CALLS TO THEM, TO MAKE IT EASIER TO ASSEMBLE A DEVICE LIST FOR THE
           VIRTUAL MACHINE.  DOCUMENTATION IS INCLUDED IN THE COMMENTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  337
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 558/5 
00558/007   VIRTUAL MACHINE          370 OBJECT      OC  G          S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.370_OBJEC.OC.007(1)   440
            5.0T2   440  VIRTUAL_MACHINE.370_OBJEC.OC.007   1 LINE  10687   18 PAGE UM   MTA                 JULY 03, 1981  15:29:09
            5.0T4   385                       
0          OBJECT FOR UM VIRTUAL 370, I.E. (558/1) WITH Â&DUPLEX, Â&M67, Â&ST, AND
           &S370.
00558/008   VIRTUAL MACHINE          WRITEUP         P              S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.WRITEUP.P.008(1)      441
            5.0T2   441  VIRTUAL_MACHINE.WRITEUP.P.008      1 LINE     75   12 PAGE UM   MTA                 JULY 03, 1981  15:29:11
            5.0T4   386                       
0          WRITEUP TO BE COPIED TO A TN PRINTER.
           NOTE:  WRITEUP IS NOT UP TO DATE.
00559/001   PISTLE                   *S2L            C   G          MTS:TST.S2L                                                     
            5.0T2   442  PISTLE.*S2L.C.001                  1 LINE    109    1 PAGE UM   SHERRY              JULY 03, 1981  15:29:12
            5.0T4   387  SEG2:*S2L            
0          Command file to run PISTLE, the post-IPL system loader. Invoked by
           INIT:INITCMD (097/2) after IPL to load shared pieces of the system as
           described in SEG2:S2FILES. Runs the PRINTMAP program (559/10) to inform
           operators if system map changed. At UM, also uses the message system (798) to
           send a message to the names contained in the file "SEG2:MONITORS" (559/4)
           then to print a new map.
0          Referenced by comments of: 97/2, 485/40, 513/3, 798/3, 798/4, 821/17, 827/56 
00559/002A  PISTLE                                   SA  G          W009:PISTLE.S                                                   
            5.1T1   621  PISTLE..SA.002                     1 LINE    124   22 PAGE UM   SHERRY              JULY 23, 1983  11:16:33
0          Assemble with COPY:MTS.MACROS (344/3). Copies *CNFGINFODSECT (654).
            
           ********************************************************************************
           Changes since D5.0:
            
           New version allowing arbitrary low core symbol tables to be updated.  See the
           (559/7) writeup.
           ********************************************************************************
0          Referenced by comments of: 559/13, 4000/11 
00559/003A  PISTLE                                   OE  G          SEG2:S2L                                                        
            5.1T1   622  PISTLE..OE.003                     1 LINE   7524    4 PAGE UM   SHERRY              JULY 23, 1983  11:16:35
                         SEG2:S2L             
0          Referenced by comments of: 809/7 
00559/004C  PISTLE                   SEG2:MONITORS   D              SEG2:MONITORS                                                   
            5.1T1   623  PISTLE.SEG2:MONITORS.D.004         1 LINE     67    1 PAGE UM   MTS       OGDEN     JULY 23, 1983  11:16:35
                         SEG2:MONITORS        
0          This file contains, in line 1, the names of the current fire-fighters.
1                                                                                               SUN SEP 08/96   15:24:55   Page  338
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 531/15, 559/1, 864/2, 865/1 
00559/005A  PISTLE                   S2FILES         D              MTS:TST.S2FILES                                                 
            5.1T3   340  PISTLE.S2FILES.D.005               1 LINE     48    1 PAGE UM   WSG                 AUG. 20, 1983  19:45:22
                         SEG2:S2FILES         
0          A list of files from which PISTLE will load programs at IPL.
0          Referenced by comments of: 809/7 
00559/006C  PISTLE                   S2FILES         D              MTS:TST.S2F.UM                                                  
            5.1T1   624  PISTLE.S2FILES.D.006               1 LINE     48    1 PAGE UM   WSG                 JULY 23, 1983  11:21:07
                         SEG2:S2FILES@UM      
0          Version of SEG2:S2FILES for UM test pack.
00559/007A  PISTLE                   WRITEUP         WF             W009:PISTLE.W                                                   
            5.1T1   625  PISTLE.WRITEUP.WF.007              1 LINE    124    4 PAGE UM   SHERRY              JULY 23, 1983  11:21:08
                         W009:PISTLE.W        
0          Referenced by comments of: 559/2 
00559/008   PISTLE                   SETTIME         SF  G          S1559 5.0T2 VLO FSNAME=PISTLE.SETTIME.SF.006(1)              447
            5.0T2   447  PISTLE.SETTIME.SF.006              1 LINE     54    1 PAGE UM   ENGLE               AUG. 14, 1977  21:52:29
            5.0T4   392                       
0          PROGRAM RUN BY *S2L TO CALL THE TIME SUBROUTINE (WITH PROTECT OFF) TO CAUSE
           IT TO INITIALIZE ITSELF.
00559/009   PISTLE                   SETTIME         OC  G          SEG2:SETTIME                                                    
            5.0T2   448  PISTLE.SETTIME.OC.007              1 LINE    146    1 PAGE UM   ENGLE               JULY 03, 1981  15:29:24
            5.0T4   393  SEG2:SETTIME         
00559/010   PISTLE                   PRINTMAP        SA  G          SEG2:PRINTMAP(1000)                                             
            5.0T2   449  PISTLE.PRINTMAP.SA.008             1 LINE     69    3 PAGE UM   SHERRY              JULY 03, 1981  15:29:25
            5.0T4   394  SEG2:PRINTMAP        
0          PROGRAM TO SEE IF THE MAP PRODUCED BY PISTLE HAS CHANGED SINCE THE LAST
           SYSTEM RELOAD AND PRINT A MESSAGE TO THE OPERATOR IF IT HAS ADVISING THAT
           A NEW COPY OF THE MAP SHOULD BE PRINTED.
0          Referenced by comments of: 559/1 
00559/011   PISTLE                   PRINTMAP        OC  G          SEG2:PRINTMAP(1,999)                                            
            5.0T2   450  PISTLE.PRINTMAP.OC.009             1 LINE     80    3 PAGE UM   SHERRY              JULY 03, 1981  15:29:26
            5.0T4   395                       
00559/012   PISTLE                   S2MAP           D            # SEG2:S2MAP                                                      
                                                                                    UM   SHERRY                                     
                         SEG2:S2MAP@E         
0          FILE WHERE PISTLE WRITES THE SYSTEM MAP.
0          Referenced by comments of: 809/7, 1070/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  339
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00559/013   PISTLE                   LOADSVM DOC     WF             S1559 5.0T2 VLO FSNAME=PISTLE.LOADSVM_DOC.WF.011(1)          451
            5.0T2   451  PISTLE.LOADSVM_DOC.WF.011          1 LINE     88    3 PAGE UM   SHERRY              APR. 05, 1980  18:13:21
            5.0T4   396                       
0          WRITEUP DESCRIBING THE PISTLE SUBROUTINE INTERFACE LOADSVM (559/2).
00560/001  *TYPEIT                                   C              *TYPEIT                                                         
            5.0T2   452  TYPEIT..C.001                      1 LINE     69    2 PAGE UM   LIFT                JULY 03, 1981  15:29:33
            5.0T4   397  *TYPEIT              
0          A $SOURCE FILE WHICH CAN BE USED TO AID IN THE PREPARATION OF MATERIAL PRODUCED IN
           *FORMAT (308).  WE HAVE ATTEMPTED TO DISTRIBUTE ALL *FORMAT MACHINE-READABLE DOCUMENTATION
           IN THE FORM OF DIRECT INPUT TO *FORMAT AND NOT IN THE FORM USED WITH *TYPEIT.
00561/001  *UNEDIT                                   SA  G          S1559 5.0T2 VLO FSNAME=UNEDIT..SA.001(1)                     453
            5.0T2   453  UNEDIT..SA.001                     1 LINE     80   14 PAGE UM   MTA                 JULY 28, 1977  02:52:08
            5.0T4   398                       
0          PROGRAM TO COMPARE THE CURRENT VERSION OF A LINE FILE WITH A PREVIOUS VERSION AND PRODUCE THE APPROPRIATE
           MTS EDITOR COMMANDS FOR TRANSFORMING THE OLD VERSION TO THE NEW, I.E. THIS PROGRAM PRODUCES AN "UPDATE"
           DECK WHICH IS IN EDITOR FORMAT RATHER THAN *UPDATE FORMAT.
           CALL SCANPAR SUBROUTINE (267/3).
0          Referenced by comments of: 267/3 
00561/002  *UNEDIT                                   OE  G          *UNEDIT                                                         
            5.0T2   454  UNEDIT..OE.002                     1 SEQ    2536    2 PAGE UM   MTA                 JULY 03, 1981  15:29:35
            5.0T4   399  *UNEDIT              
00562/001  *UNLINKER                                 SA  G  UNLK    W062:UNLINKER.S                                                 
            5.0T2   455  UNLINKER..SA.001                   1 LINE     80   39 PAGE UM   TIFFANY             JULY 03, 1981  15:29:36
            5.0T4   400                       
0          Program to change OS/VS load modules into MTS object decks.  UNLINKER
           is documented in CCMemo 449 (251/3).
0          Referenced by comments of: 251/3, 291/1, 340/1, 341/1, 3031/1 
00562/002  *UNLINKER                 BLKRTN SUBR     SA  G  BLKR    W062:BLK.S                                                      
            5.0T2   456  UNLINKER.BLKRTN_SUBR.SA.002        1 LINE     80   34 PAGE UM   TIFFANY             JULY 03, 1981  15:29:38
            5.0T4   401                       
0          Subroutine to read OS/VS IEBCOPY or IEHMOVE tapes.
            
0          Referenced by comments of: 291/1 
00562/003  *UNLINKER                                 OE  G          *UNLINKER                                                       
            5.0T2   457  UNLINKER..OE.003                   1 LINE   8154   10 PAGE UM   TIFFANY             JULY 03, 1981  15:29:40
            5.0T4   402  *UNLINKER            
1                                                                                               SUN SEP 08/96   15:24:55   Page  340
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00563/001   CHAR MANIP SUBRS         BTD             SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.BTD.SA.001(1)        458
            5.0T2   458  CHAR_MANIP_SUBRS.BTD.SA.001        1 LINE     80    3 PAGE UBC  BRILL               AUG. 01, 1973  23:11.19
            5.0T4   403                       
0          THESE ARE THE UBC CHARACTER MANIPULATION SUBROUTINES.
00563/002   CHAR MANIP SUBRS         LCOMC/COMC      SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.LCOMC/CO.SA.002(1)   459
            5.0T2   459  CHAR_MANIP_SUBRS.LCOMC/CO.SA.002   1 LINE     80    3 PAGE UBC  BRILL               JULY 28, 1977  02:53:01
            5.0T4   404                       
00563/003   CHAR MANIP SUBRS         DTB             SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.DTB.SA.003(1)        460
            5.0T2   460  CHAR_MANIP_SUBRS.DTB.SA.003        1 LINE     80    3 PAGE UBC  BRILL               AUG. 01, 1973  23:11.29
            5.0T4   405                       
00563/004   CHAR MANIP SUBRS         FINDC           SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.FINDC.SA.004(1)      461
            5.0T2   461  CHAR_MANIP_SUBRS.FINDC.SA.004      1 LINE     80    3 PAGE UBC  BRILL               AUG. 01, 1973  23:11.35
            5.0T4   406                       
00563/005   CHAR MANIP SUBRS         FINDST          SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.FINDST.SA.005(1)     462
            5.0T2   462  CHAR_MANIP_SUBRS.FINDST.SA.005     1 LINE     80    4 PAGE UBC  BRILL               AUG. 01, 1973  23:11.40
            5.0T4   407                       
00563/006   CHAR MANIP SUBRS         IGC             SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.IGC.SA.006(1)        463
            5.0T2   463  CHAR_MANIP_SUBRS.IGC.SA.006        1 LINE     80    3 PAGE UBC  BRILL               AUG. 01, 1973  23:11.45
            5.0T4   408                       
00563/007   CHAR MANIP SUBRS         MOVEC           SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.MOVEC.SA.007(1)      464
            5.0T2   464  CHAR_MANIP_SUBRS.MOVEC.SA.007      1 LINE     80    1 PAGE UBC  BRILL               AUG. 01, 1973  23:11.51
            5.0T4   409                       
00563/008   CHAR MANIP SUBRS         SETC            SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.SETC.SA.008(1)       465
            5.0T2   465  CHAR_MANIP_SUBRS.SETC.SA.008       1 LINE     80    1 PAGE UBC  BRILL               AUG. 01, 1973  23:11.58
            5.0T4   410                       
00563/009   CHAR MANIP SUBRS         TRNC            SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.TRNC.SA.009(1)       466
            5.0T2   466  CHAR_MANIP_SUBRS.TRNC.SA.009       1 LINE     80    3 PAGE UBC  BRILL               AUG. 01, 1973  23:12.02
            5.0T4   411                       
00563/010   CHAR MANIP SUBRS         TRNST           SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.TRNST.SA.010(1)      467
            5.0T2   467  CHAR_MANIP_SUBRS.TRNST.SA.010      1 LINE     80    4 PAGE UBC  BRILL               AUG. 01, 1973  23:12.07
            5.0T4   412                       
00563/011   CHAR MANIP SUBRS         EQUC            SA             S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.EQUC.SA.011(1)       468
            5.0T2   468  CHAR_MANIP_SUBRS.EQUC.SA.011       1 LINE     80    1 PAGE UBC  BRILL               MAR. 06, 1974  22:01.57
            5.0T4   413                       
00563/012   CHAR MANIP SUBRS         OBJECT          OC           # (PART OF *LIBRARY)                                              
                                                                                    UM   BRILL                                      
0          Object part of *LIBRARY (524/1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  341
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00564/001   SYMBOL XREF PROGRAM                                   # (OBSOLETE)                                                   466
            D4T2    466  SYMBOL_XREF_PROGRAM..SA.001        1 LINE     80    3 PAGE UM                       JULY 28, 1977  02:53:57
            D4T5     78                       
0          PROGRAM READS ASSEMBLY SOURCE PROGRAMS FROM SCARDS AND WRITES EACH LINE WHICH CONTAINS A SEQUENCE OR
           SET SYMBOL ON SPUNCH WITH THE SYMBOL PREFIXED TO THE BEGINNING OF THE LINE (FOR SORTING).
00565/001   STOR PROTECT DIAGNOSTIC                  SA  G          MTS:TESTPROTECT(1,999)                                          
            5.0T2   469  STOR_PROTECT_DIAGNOSTIC..SA.001    1 LINE     70    3 PAGE UM   MTA                 JULY 03, 1981  15:29:48
            5.0T4   414                       
0          HARDWARE STORAGE PROTECT DIAGNOSTIC TO TEST ALL OF CORE ABOVE X'1000'.
           PSW RESTART WILL RERUN THE TEST, IF IT STOPS AFTER ONE LOOP (THE
           CURRENT VERSION LOOPS FOREVER).  ASSUMES A 1052 TYPEWRITER AT ADDRESS D40;
           THIS MAY BE CHANGED BY PATCHING IN A NEW CONSOLE ADDRESS AT LOCATION B02.
           IBM DOESN'T SEEM TO PROVIDE A DIAGNOSTIC TO PERFORM THE FUNCTIONS PROVIDED
           BY THIS PROGRAM.  THE FOLLOWING ERRORS ARE REPORTED BY NUMBER ALONG WITH
           THE FAILING ADDRESS AND THE ACTUAL KEY IF RELEVANT:
            
             1.  INTERRUPT ON LOAD WITH PSW KEY 2 AND STORAGE KEY 10.
             2.  KEY NOT EQUAL TO 14 AFTER TEST 1.
             3.  NO INTERRUPT ON STORE WITH PSW KEY 2 AND STORAGE KEY 10.
             4.  KEY NOT EQUAL TO 14 OR 16 AFTER TEST 3. (SHOULD REALLY BE 14,
                 BUT SOME MACHINES SET IT TO 16.)
             5.  STORAGE CHANGED AFTER TEST 3 OR INTERRUPT LOOKING.
             6.  NO INTERRUPT ON LOAD WITH PSW KEY 2 AND STORAGE KEY 18.
             7.  KEY NOT EQUAL TO 1C OR 18 AFTER TEST 6. (SHOULD REALLY BE 18,
                 BUT MOST MACHINES SET IT TO 1C.)
             8.  INTERRUPT ON LOAD WITH PSW KEY 1 AND STORAGE KEY 18.
             9.  KEY NOT EQUAL TO 1C AFTER TEST 8.
             10. INTERRUPT ON STORE WITH PSW KEY 1 AND STORAGE KEY 18.
             11. STORAGE NOT CHANGED CORRECTLY AFTER TEST 10 OR INTERRUPT LOOKING.
             12. KEY NOT EQUAL TO 1E AFTER TEST 10.
             13. RESET REFERENCE BIT (RRB) INSTRUCTION DOESN'T GIVE CONDITION
                 CODE 3 AFTER TEST 12.
             14. KEY NOT EQUAL TO 1A AFTER TEST 13.
            
           THE PROGRAM WILL LOOP CONTINUOUSLY. NOTHING WILL BE PRINTED EXCEPT
           ERROR MESSAGES, EACH OF WHICH WILL BE ACCOMPANIED BY A CONSOLE ALARM.
            
00565/002   STOR PROTECT DIAGNOSTIC                  OC  G          MTS:TESTPROTECT(1000)                                           
            5.0T2   470  STOR_PROTECT_DIAGNOSTIC..OC.002    1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  15:29:49
            5.0T4   415                       
0          NEEDS AN ABSOLUTE LOADER.  IPL ON A REAL OR VIRTUAL MACHINE.
00566/001  *PIL                      MACLIB          SM  G          S1559 5.0T2 VLO FSNAME=PIL.MACLIB.SM.001(1)                  471
            5.0T2   471  PIL.MACLIB.SM.001                  1 SEQ      80   14 PAGE UM   TIFFANY             JULY 28, 1977  02:54:18
            5.0T4   416                       
0          *PIL IS LATEST VERSION OF THE PITTSBURGH INTERPRETIVE LANGUAGE.
            
           NOTE:  MACLIB IS THE ONLY MACRO LIBRARY USED IN ASSEMBLING *PIL.
1                                                                                               SUN SEP 08/96   15:24:55   Page  342
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 178/1 
00566/002  *PIL                      DSECT           SA  G          S1559 5.0T2 VLO FSNAME=PIL.DSECT.SA.002(1)                   472
            5.0T2   472  PIL.DSECT.SA.002                   1 SEQ      80    4 PAGE UM   TIFFANY             JULY 28, 1977  02:54:19
            5.0T4   417                       
0          COMPS (566/2) THROUGH (566/10) ARE COPY SECTIONS.
0          Referenced by comments of: 566/2 
00566/003  *PIL                      EQUS            SA  G          S1559 5.0T2 VLO FSNAME=PIL.EQUS.SA.003(1)                    473
            5.0T2   473  PIL.EQUS.SA.003                    1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:21
            5.0T4   418                       
00566/004  *PIL                      EVOUTPUT        SA  G          S1559 5.0T2 VLO FSNAME=PIL.EVOUTPUT.SA.004(1)                474
            5.0T2   474  PIL.EVOUTPUT.SA.004                1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:23
            5.0T4   419                       
00566/005  *PIL                      FORMDS          SA  G          S1559 5.0T2 VLO FSNAME=PIL.FORMDS.SA.005(1)                  475
            5.0T2   475  PIL.FORMDS.SA.005                  1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:25
            5.0T4   420                       
00566/006  *PIL                      KEYCODES        SA  G          S1559 5.0T2 VLO FSNAME=PIL.KEYCODES.SA.006(1)                476
            5.0T2   476  PIL.KEYCODES.SA.006                1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:27
            5.0T4   421                       
00566/007  *PIL                      PARTDS          SA  G          S1559 5.0T2 VLO FSNAME=PIL.PARTDS.SA.007(1)                  477
            5.0T2   477  PIL.PARTDS.SA.007                  1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:29
            5.0T4   422                       
00566/008  *PIL                      SCRDS           SA  G          S1559 5.0T2 VLO FSNAME=PIL.SCRDS.SA.008(1)                   478
            5.0T2   478  PIL.SCRDS.SA.008                   1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:31
            5.0T4   423                       
00566/009  *PIL                      STACKDS         SA  G          S1559 5.0T2 VLO FSNAME=PIL.STACKDS.SA.009(1)                 479
            5.0T2   479  PIL.STACKDS.SA.009                 1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:33
            5.0T4   424                       
00566/010  *PIL                      STEPDS          SA  G          S1559 5.0T2 VLO FSNAME=PIL.STEPDS.SA.010(1)                  480
            5.0T2   480  PIL.STEPDS.SA.010                  1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:54:35
            5.0T4   425                       
0          Referenced by comments of: 566/2 
00566/011  *PIL                      PILL            SA  G          S1559 5.0T2 VLO FSNAME=PIL.PILL.SA.011(1)                    481
            5.0T2   481  PIL.PILL.SA.011                    1 SEQ      80    5 PAGE UM   TIFFANY             APR. 05, 1980  18:15:20
            5.0T4   426                       
0          COMPS (566/11) THROUGH (566/48) ARE THE ASM SOURCE FOR *PIL. REQUIRES
           *CNFGINFODSECT (654) FOR ASSEMBLY.
0          Referenced by comments of: 566/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  343
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00566/012  *PIL                      READIT          SA  G          S1559 5.0T2 VLO FSNAME=PIL.READIT.SA.012(1)                  482
            5.0T2   482  PIL.READIT.SA.012                  1 SEQ      80    6 PAGE UM   TIFFANY             JULY 28, 1977  02:57:02
            5.0T4   427                       
00566/013  *PIL                      TYPEIT          SA  G          S1559 5.0T2 VLO FSNAME=PIL.TYPEIT.SA.013(1)                  483
            5.0T2   483  PIL.TYPEIT.SA.013                  1 SEQ      80    6 PAGE UM   TIFFANY             JULY 28, 1977  02:57:14
            5.0T4   428                       
00566/014  *PIL                      PAGEMSG         SA  G          S1559 5.0T2 VLO FSNAME=PIL.PAGEMSG.SA.014(1)                 484
            5.0T2   484  PIL.PAGEMSG.SA.014                 1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:57:15
            5.0T4   429                       
00566/015  *PIL                      CANIT           SA  G          S1559 5.0T2 VLO FSNAME=PIL.CANIT.SA.015(1)                   485
            5.0T2   485  PIL.CANIT.SA.015                   1 SEQ      80    2 PAGE UM   TIFFANY             JULY 28, 1977  02:57:17
            5.0T4   430                       
00566/016  *PIL                      PIL2            SA  G          S1559 5.0T2 VLO FSNAME=PIL.PIL2.SA.016(1)                    486
            5.0T2   486  PIL.PIL2.SA.016                    1 SEQ      80   11 PAGE UM   TIFFANY             JULY 28, 1977  02:57:34
            5.0T4   431                       
00566/017  *PIL                      DSBRK           SA  G          S1559 5.0T2 VLO FSNAME=PIL.DSBRK.SA.017(1)                   487
            5.0T2   487  PIL.DSBRK.SA.017                   1 SEQ      80    8 PAGE UM   TIFFANY             JULY 28, 1977  02:57:48
            5.0T4   432                       
00566/018  *PIL                      BKDOWN          SA  G          S1559 5.0T2 VLO FSNAME=PIL.BKDOWN.SA.018(1)                  488
            5.0T2   488  PIL.BKDOWN.SA.018                  1 SEQ      80   21 PAGE UM   TIFFANY             JULY 28, 1977  02:57:49
            5.0T4   433                       
00566/019  *PIL                      FORMPROC        SA  G          S1559 5.0T2 VLO FSNAME=PIL.FORMPROC.SA.019(1)                489
            5.0T2   489  PIL.FORMPROC.SA.019                1 SEQ      80   44 PAGE UM   TIFFANY             JULY 28, 1977  02:57:53
            5.0T4   434                       
00566/020  *PIL                      PILSQRT         SA  G          S1559 5.0T2 VLO FSNAME=PIL.PILSQRT.SA.020(1)                 490
            5.0T2   490  PIL.PILSQRT.SA.020                 1 SEQ      80    2 PAGE UM   TIFFANY             JULY 28, 1977  02:57:54
            5.0T4   435                       
00566/021  *PIL                      PILATAN         SA  G          S1559 5.0T2 VLO FSNAME=PIL.PILATAN.SA.021(1)                 491
            5.0T2   491  PIL.PILATAN.SA.021                 1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:57:56
            5.0T4   436                       
00566/022  *PIL                      PILSINE         SA  G          S1559 5.0T2 VLO FSNAME=PIL.PILSINE.SA.022(1)                 492
            5.0T2   492  PIL.PILSINE.SA.022                 1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:57:58
            5.0T4   437                       
00566/023  *PIL                      PILLOGE         SA  G          S1559 5.0T2 VLO FSNAME=PIL.PILLOGE.SA.023(1)                 493
            5.0T2   493  PIL.PILLOGE.SA.023                 1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:58:00
            5.0T4   438                       
00566/024  *PIL                      PILETX          SA  G          S1559 5.0T2 VLO FSNAME=PIL.PILETX.SA.024(1)                  494
            5.0T2   494  PIL.PILETX.SA.024                  1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:58:03
            5.0T4   439                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  344
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00566/025  *PIL                      LOOKPS          SA  G          S1559 5.0T2 VLO FSNAME=PIL.LOOKPS.SA.025(1)                  495
            5.0T2   495  PIL.LOOKPS.SA.025                  1 SEQ      80    6 PAGE UM   TIFFANY             JULY 28, 1977  02:58:05
            5.0T4   440                       
00566/026  *PIL                      WANT16          SA  G          S1559 5.0T2 VLO FSNAME=PIL.WANT16.SA.026(1)                  496
            5.0T2   496  PIL.WANT16.SA.026                  1 SEQ      80    4 PAGE UM   TIFFANY             APR. 05, 1980  18:15:21
            5.0T4   441                       
0          Copies *CNFGINFODSECT (654).
00566/027  *PIL                      MOVPOL          SA  G          S1559 5.0T2 VLO FSNAME=PIL.MOVPOL.SA.027(1)                  497
            5.0T2   497  PIL.MOVPOL.SA.027                  1 SEQ      80    4 PAGE UM   TIFFANY             JULY 28, 1977  02:58:09
            5.0T4   442                       
00566/028  *PIL                      FORTROL         SA  G          S1559 5.0T2 VLO FSNAME=PIL.FORTROL.SA.028(1)                 498
            5.0T2   498  PIL.FORTROL.SA.028                 1 SEQ      80    6 PAGE UM   TIFFANY             JULY 28, 1977  02:58:11
            5.0T4   443                       
00566/029  *PIL                      RETHEAD         SA  G          S1559 5.0T2 VLO FSNAME=PIL.RETHEAD.SA.029(1)                 499
            5.0T2   499  PIL.RETHEAD.SA.029                 1 SEQ      80    5 PAGE UM   TIFFANY             JULY 28, 1977  02:58:13
            5.0T4   444                       
00566/030  *PIL                      TALPL           SA  G          S1559 5.0T2 VLO FSNAME=PIL.TALPL.SA.030(1)                   500
            5.0T2   500  PIL.TALPL.SA.030                   1 SEQ      80    2 PAGE UM   TIFFANY             JULY 28, 1977  02:58:15
            5.0T4   445                       
00566/031  *PIL                      CONVERT         SA  G          S1559 5.0T2 VLO FSNAME=PIL.CONVERT.SA.031(1)                 501
            5.0T2   501  PIL.CONVERT.SA.031                 1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:58:17
            5.0T4   446                       
00566/032  *PIL                      STEPMESS        SA  G          S1559 5.0T2 VLO FSNAME=PIL.STEPMESS.SA.032(1)                502
            5.0T2   502  PIL.STEPMESS.SA.032                1 SEQ      80    2 PAGE UM   TIFFANY             JULY 28, 1977  02:58:19
            5.0T4   447                       
00566/033  *PIL                      FUNCS           SA  G          S1559 5.0T2 VLO FSNAME=PIL.FUNCS.SA.033(1)                   503
            5.0T2   503  PIL.FUNCS.SA.033                   1 SEQ      80   30 PAGE UM   TIFFANY             JULY 28, 1977  02:58:32
            5.0T4   448                       
00566/034  *PIL                      LOPL            SA  G          S1559 5.0T2 VLO FSNAME=PIL.LOPL.SA.034(1)                    504
            5.0T2   504  PIL.LOPL.SA.034                    1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:58:43
            5.0T4   449                       
00566/035  *PIL                      DELVALS         SA  G          S1559 5.0T2 VLO FSNAME=PIL.DELVALS.SA.035(1)                 505
            5.0T2   505  PIL.DELVALS.SA.035                 1 SEQ      80   25 PAGE UM   TIFFANY             JULY 28, 1977  02:58:56
            5.0T4   450                       
00566/036  *PIL                      XFORMX          SA  G          S1559 5.0T2 VLO FSNAME=PIL.XFORMX.SA.036(1)                  506
            5.0T2   506  PIL.XFORMX.SA.036                  1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:59:09
            5.0T4   451                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  345
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00566/037  *PIL                      EXTRANS         SA  G          S1559 5.0T2 VLO FSNAME=PIL.EXTRANS.SA.037(1)                 507
            5.0T2   507  PIL.EXTRANS.SA.037                 1 SEQ      80    3 PAGE UM   TIFFANY             JULY 28, 1977  02:59:09
            5.0T4   452                       
00566/038  *PIL                      TYPEPS          SA  G          S1559 5.0T2 VLO FSNAME=PIL.TYPEPS.SA.038(1)                  508
            5.0T2   508  PIL.TYPEPS.SA.038                  1 SEQ      80   15 PAGE UM   TIFFANY             JULY 28, 1977  02:59:20
            5.0T4   453                       
00566/039  *PIL                      XPRES           SA  G          S1559 5.0T2 VLO FSNAME=PIL.XPRES.SA.039(1)                   509
            5.0T2   509  PIL.XPRES.SA.039                   1 SEQ      80   19 PAGE UM   TIFFANY             JULY 28, 1977  02:59:31
            5.0T4   454                       
00566/040  *PIL                      MINDIR          SA  G          S1559 5.0T2 VLO FSNAME=PIL.MINDIR.SA.040(1)                  510
            5.0T2   510  PIL.MINDIR.SA.040                  1 SEQ      80    5 PAGE UM   TIFFANY             JULY 28, 1977  02:59:32
            5.0T4   455                       
00566/041  *PIL                      HEADINS         SA  G          S1559 5.0T2 VLO FSNAME=PIL.HEADINS.SA.041(1)                 511
            5.0T2   511  PIL.HEADINS.SA.041                 1 SEQ      80    1 PAGE UM   TIFFANY             JULY 28, 1977  02:59:34
            5.0T4   456                       
00566/042  *PIL                      STROP           SA  G          S1559 5.0T2 VLO FSNAME=PIL.STROP.SA.042(1)                   512
            5.0T2   512  PIL.STROP.SA.042                   1 SEQ      80   15 PAGE UM   TIFFANY             JULY 28, 1977  02:59:36
            5.0T4   457                       
00566/043  *PIL                      SETUP           SA  G          S1559 5.0T2 VLO FSNAME=PIL.SETUP.SA.043(1)                   513
            5.0T2   513  PIL.SETUP.SA.043                   1 SEQ      80    6 PAGE UM   TIFFANY             JULY 28, 1977  02:59:38
            5.0T4   458                       
00566/044  *PIL                      SPLIT           SA  G          S1559 5.0T2 VLO FSNAME=PIL.SPLIT.SA.044(1)                   514
            5.0T2   514  PIL.SPLIT.SA.044                   1 SEQ      80    2 PAGE UM   TIFFANY             JULY 28, 1977  02:59:40
            5.0T4   459                       
00566/045  *PIL                      FORBREAK        SA  G          S1559 5.0T2 VLO FSNAME=PIL.FORBREAK.SA.045(1)                515
            5.0T2   515  PIL.FORBREAK.SA.045                1 SEQ      80   10 PAGE UM   TIFFANY             JULY 28, 1977  02:59:50
            5.0T4   460                       
00566/046  *PIL                      EVAL            SA  G          S1559 5.0T2 VLO FSNAME=PIL.EVAL.SA.046(1)                    516
            5.0T2   516  PIL.EVAL.SA.046                    1 SEQ      80   28 PAGE UM   TIFFANY             JULY 28, 1977  02:59:55
            5.0T4   461                       
00566/047  *PIL                      TYPARRY         SA  G          S1559 5.0T2 VLO FSNAME=PIL.TYPARRY.SA.047(1)                 517
            5.0T2   517  PIL.TYPARRY.SA.047                 1 SEQ      80   12 PAGE UM   TIFFANY             JULY 28, 1977  03:00:03
            5.0T4   462                       
00566/048  *PIL                      PROCESS         SA  G          S1559 5.0T2 VLO FSNAME=PIL.PROCESS.SA.048(1)                 518
            5.0T2   518  PIL.PROCESS.SA.048                 1 SEQ      80   51 PAGE UM   TIFFANY             JULY 28, 1977  03:00:07
            5.0T4   463                       
0          Referenced by comments of: 566/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  346
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00566/049  *PIL                      *PIL            OC  G          *PIL                                                            
            5.0T2   519  PIL.*PIL.OC.049                    1 LINE    928   21 PAGE UM   TIFFANY             JULY 03, 1981  15:30:24
            5.0T4   464  *PIL                 
00566/050  *PIL                      PLM             WT  G          S1559 5.0T2 VLO FSNAME=PIL.PLM.WT.050(1)                     520
            5.0T2   520  PIL.PLM.WT.050                     1 LINE    256   37 PAGE UM   TIFFANY             JULY 28, 1977  03:00:13
            5.0T4   465                       
0          TEXT/360 MASTER FILE FOR WRITEUP DESCRIBING THE INTERNAL STRUCTURE OF PIL/2
           FOR PROSPECTIVE DEVELOPERS.
00567/001  *1052RTN                                  SA  O          MTA:1052RTN                                                     
            5.0T4   372  1052RTN..SA.001                    1 LINE     72   23 PAGE UM   MTA                 AUG. 09, 1981  23:16:01
            5.0T10  276                       
0          MTS DEVICE SUPPORT ROUTINES FOR 1052 OPERATOR'S CONSOLE.  ALLOWS USE OF 1052
           CONSOLE OR 2150 AS AN MTS TERMINAL.  AWRITE AND HALTIO ENTRIES ADDED BUT NOT
           TESTED.  ASSEMBLE USING COPY:MTS.MACROS (344/3).
00567/002  *1052RTN                                  OC  O          *1052RTN                                                        
            5.0T4   373  1052RTN..OC.002                    1 LINE     80    5 PAGE UM   MTA                 AUG. 09, 1981  23:16:05
            5.0T10  277  *1052RTN             
00568/001  *TIMETALLY                                             # (OBSOLETE)                                                      
            D3.2T1  492  TIMETALLY..SA.01                   1 LINE     80   45 PAGE UM                       MAR. 21, 1975  01:53:09
0          Obsoleted by SDS (600).
00569/001   PCE SNIFFER                                           # (PART OF HASP)                                                  
                                                                                    UM                                              
0          Distributed as part of HASP (387/24) and (387/25).
00570/001A *MNETRTN                                  SA  G          W267:MNETRTN.S(1)                                               
            5.1T1   626  MNETRTN..SA.001                    1 LINE     72   51 PAGE UM   EADIE               JULY 23, 1983  11:21:09
0          MTS Device Support Routines for the Merit Computer Network interactive service.
              Assemble using *SYSMAC,
                             COPY:MTS.MACROS (344/3) and 
                             *PEXIT (775).
              COPY's         COPY:LLMPSEQU (087), 
                             COPY:GLOBALDEFS (1026/1) and 
                             COPY:GLOBALSETS (1026/2).
00570/002A *MNETRTN                                  OC  G          *MNETRTN                                                        
            5.1T1   627  MNETRTN..OC.002                    1 LINE  12872   14 PAGE UM   EADIE               JULY 23, 1983  11:21:13
                         *MNETRTN             
00570/003A *MNETRTN                  ASCII XLATE     SA  G          S0999 5.0AT1 VLO FSNAME=MNETRTN.ASCII_XLATE.SA.003(1)        120
            5.1T1   628  MNETRTN.ASCII_XLATE.SA.003         1 LINE     80    4 PAGE UM   EADIE               JAN. 21, 1982  23:10:07
0          MERIT ASCII/EBCDIC TRANSLATE TABLES MASCEBC AND EBCMASC WHICH ARE USED BOTH
           BY THE MERIT DSR AND HASP (387).
1                                                                                               SUN SEP 08/96   15:24:55   Page  347
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 387/9 
00570/004A *MNETRTN                  ASCII XLATE     OC  G        # (PART OF HASP)                                                  
                                                                                    UM   EADIE                                      
0          Part of SEG2:HASP (387/9).
00571/001   APL LIBRARY WS           ADVANCEDE       D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.ADVANCEDE.D.001(1)     524
            5.0T2   524  APL_LIBRARY_WS.ADVANCEDE.D.001     1 LINE    255    6 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:38
            5.0T4   469                       
0          THE APL LIBRARY WORKSPACES MUST BE RESTORED AS FILES UNDER USER ID "APL." USING AS FILE NAMES
           THE 3 DIGIT (WITH LEADING ZEROS) LIBRARY FILE NUMBER FOLLOWED BY THE WORKSPACE NAME,
           I.E., USE THE SAME NAMES AS WERE USED TO GENERATE THE DISTRIBUTION TAPE.
00571/002   APL LIBRARY WS           APLCOURSE       D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.APLCOURSE.D.002(1)     525
            5.0T2   525  APL_LIBRARY_WS.APLCOURSE.D.002     1 LINE    255    6 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:39
            5.0T4   470                       
00571/003   APL LIBRARY WS           CLASS           D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.CLASS.D.003(1)         526
            5.0T2   526  APL_LIBRARY_WS.CLASS.D.003         1 LINE    255    7 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:40
            5.0T4   471                       
00571/004   APL LIBRARY WS           NEWS            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.NEWS.D.004(1)          527
            5.0T2   527  APL_LIBRARY_WS.NEWS.D.004          1 SEQ   28872    8 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:41
            5.0T4   472                       
00571/005   APL LIBRARY WS           PLOTFORMA       D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.PLOTFORMA.D.005(1)     528
            5.0T2   528  APL_LIBRARY_WS.PLOTFORMA.D.005     1 LINE    255    6 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:42
            5.0T4   473                       
00571/006   APL LIBRARY WS           TYPEDRILL       D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.TYPEDRILL.D.006(1)     529
            5.0T2   529  APL_LIBRARY_WS.TYPEDRILL.D.006     1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:43
            5.0T4   474                       
00571/007   APL LIBRARY WS           WSFNS           D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.WSFNS.D.007(1)         530
            5.0T2   530  APL_LIBRARY_WS.WSFNS.D.007         1 LINE    255    3 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:44
            5.0T4   475                       
00571/008   APL LIBRARY WS           EIGENVALUE      D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.EIGENVALUE.D.008(1)    531
            5.0T2   531  APL_LIBRARY_WS.EIGENVALUE.D.008    1 SEQ   12980    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:45
            5.0T4   476                       
00571/009   APL LIBRARY WS           BRFNS           D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.BRFNS.D.009(1)         532
            5.0T2   532  APL_LIBRARY_WS.BRFNS.D.009         1 SEQ    8044    3 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:45
            5.0T4   477                       
00571/010   APL LIBRARY WS           CATALOG         D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.CATALOG.D.010(1)       533
            5.0T2   533  APL_LIBRARY_WS.CATALOG.D.010       1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:46
            5.0T4   478                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  348
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00571/011   APL LIBRARY WS           STP1            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP1.D.011(1)          534
            5.0T2   534  APL_LIBRARY_WS.STP1.D.011          1 LINE    255    9 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:47
            5.0T4   479                       
00571/012   APL LIBRARY WS           STP2            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP2.D.012(1)          535
            5.0T2   535  APL_LIBRARY_WS.STP2.D.012          1 LINE    255    6 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:47
            5.0T4   480                       
00571/013   APL LIBRARY WS           STP3            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP3.D.013(1)          536
            5.0T2   536  APL_LIBRARY_WS.STP3.D.013          1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:48
            5.0T4   481                       
00571/014   APL LIBRARY WS           STP4            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP4.D.014(1)          537
            5.0T2   537  APL_LIBRARY_WS.STP4.D.014          1 LINE    255    9 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:49
            5.0T4   482                       
00571/015   APL LIBRARY WS           STP5            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP5.D.015(1)          538
            5.0T2   538  APL_LIBRARY_WS.STP5.D.015          1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:50
            5.0T4   483                       
00571/016   APL LIBRARY WS           STP6            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP6.D.016(1)          539
            5.0T2   539  APL_LIBRARY_WS.STP6.D.016          1 LINE    255    5 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:51
            5.0T4   484                       
00571/017   APL LIBRARY WS           STP7            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP7.D.017(1)          540
            5.0T2   540  APL_LIBRARY_WS.STP7.D.017          1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:52
            5.0T4   485                       
00571/018   APL LIBRARY WS           STP8            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP8.D.018(1)          541
            5.0T2   541  APL_LIBRARY_WS.STP8.D.018          1 LINE    255    5 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:53
            5.0T4   486                       
00571/019   APL LIBRARY WS           COMPLEX         D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.COMPLEX.D.019(1)       542
            5.0T2   542  APL_LIBRARY_WS.COMPLEX.D.019       1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:53
            5.0T4   487                       
00571/020   APL LIBRARY WS           INDEX           D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.INDEX.D.020(1)         543
            5.0T2   543  APL_LIBRARY_WS.INDEX.D.020         1 LINE    255    4 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:54
            5.0T4   488                       
00571/021   APL LIBRARY WS           UTIL            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.UTIL.D.021(1)          544
            5.0T2   544  APL_LIBRARY_WS.UTIL.D.021          1 LINE    255    3 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:54
            5.0T4   489                       
00571/022   APL LIBRARY WS           ALGFORM         D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.ALGFORM.D.022(1)       545
            5.0T2   545  APL_LIBRARY_WS.ALGFORM.D.022       1 LINE    255    6 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:55
            5.0T4   490                       
00571/023   APL LIBRARY WS           COGO            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.COGO.D.023(1)          546
            5.0T2   546  APL_LIBRARY_WS.COGO.D.023          1 LINE    255    9 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:56
            5.0T4   491                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  349
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00571/024   APL LIBRARY WS           COMPCENT        D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.COMPCENT.D.024(1)      547
            5.0T2   547  APL_LIBRARY_WS.COMPCENT.D.024      1 LINE    255    3 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:57
            5.0T4   492                       
00571/025   APL LIBRARY WS           CW              D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.CW.D.025(1)            548
            5.0T2   548  APL_LIBRARY_WS.CW.D.025            1 LINE    255    7 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:58
            5.0T4   493                       
00571/026   APL LIBRARY WS           EDIT            D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.EDIT.D.026(1)          549
            5.0T2   549  APL_LIBRARY_WS.EDIT.D.026          1 LINE    255    7 PAGE UM   HELFFRICH           JULY 03, 1981  15:30:59
            5.0T4   494                       
00571/027   APL LIBRARY WS           MATRIXALG       D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.MATRIXALG.D.027(1)     550
            5.0T2   550  APL_LIBRARY_WS.MATRIXALG.D.027     1 LINE    255    8 PAGE UM   HELFFRICH           JULY 03, 1981  15:31:00
            5.0T4   495                       
00571/028   APL LIBRARY WS           SNOBOL          D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.SNOBOL.D.028(1)        551
            5.0T2   551  APL_LIBRARY_WS.SNOBOL.D.028        1 SEQ   17176    5 PAGE UM   HELFFRICH           JULY 03, 1981  15:31:00
            5.0T4   496                       
0          THIS SNOBOL INTERPRETER, WHICH DIDN'T WORK PREVIOUSLY, WAS FIXED BY A USER.
00571/029   APL LIBRARY WS           SRADEMO         D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.SRADEMO.D.029(1)       552
            5.0T2   552  APL_LIBRARY_WS.SRADEMO.D.029       1 LINE    255    9 PAGE UM   HELFFRICH           JULY 03, 1981  15:31:01
            5.0T4   497                       
00571/030   APL LIBRARY WS           KINGDOM         D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.KINGDOM.D.030(1)       553
            5.0T2   553  APL_LIBRARY_WS.KINGDOM.D.030       1 SEQ   17208    5 PAGE UM   HELFFRICH           JULY 03, 1981  15:31:02
            5.0T4   498                       
0          XM6 APL REWORK OF ALBERTA'S SV APL 'KINGDOM' SIMULATION GAME.
00571/031   APL LIBRARY WS           TESTS           D              S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.TESTS.D.031(1)         554
            5.0T2   554  APL_LIBRARY_WS.TESTS.D.031         1 SEQ    3080    2 PAGE UM   HELFFRICH           JULY 03, 1981  15:31:03
            5.0T4   499                       
0          WORKSPACE INTENDED FOR PROVIDING A TEST FACILITY FOR THE TRIAL OF NEW APL DEVICES.
00572/001   BLOKLETR SUBR                            SA  G  BKLT    W059:BLOKLETR.S                                                 
            5.0T2   555  BLOKLETR_SUBR..SA.001              1 LINE     80   11 PAGE UM   VALERIO             JULY 03, 1981  15:31:04
            5.0T4   500                       
0          SUBROUTINE CALLED BY MTS TO PRODUCE BLOCKLETTERS PRINTED ON *PRINT* TAIL SHEETS.
0          Referenced by comments of: 555/2 
00572/002   BLOKLETR SUBR                            OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   VALERIO                                    
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  350
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00573/001   MTS VOLUME 5             MASTER          WT             S0451 MTSV5 'MTS MANUALS' POSN=NEWM7.V5                         
            5.0T2   556  MTS_VOLUME_5.MASTER.WT.001         1 SEQ     132  248 PAGE UM   MANUAL              APR. 05, 1980  18:17:25
            5.0T5     1                       
0          TEXT/360 master for Volume 5 "System Services" of the UM MTS manuals,
           May 1983.
            
           Editor:  Richard A. Salisbury
00573/002   MTS VOLUME 5             PRINT           PT             S0451 MTSV5 'MTS MANUALS' POSN=PRINT7.V5                        
            5.0T2   557  MTS_VOLUME_5.PRINT.PT.002          1 SEQ     132  404 PAGE UM   MANUAL              APR. 05, 1980  18:17:37
            5.0T5     2                       
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which is
           slightly modified from the TEXT/360 print file), available on request.
00573/003   MTS VOLUME 5             LOADER MAP      P              S0451 MTSV5 'MTS MANUALS' POSN=V5.LOADERMAP.2                   
            5.0T2   558  MTS_VOLUME_5.LOADER_MAP.P.003      1 SEQ     128    2 PAGE UM   MANUAL              MAY  13, 1978  17:47:12
            5.0T5     3                       
0          PRINTED OUTPUT FOR THE EXAMPLE LOADER MAP IN VOLUME 5.
00573/004   MTS VOLUME 5             INDEX SOURCE    D              S0451 MTSV5 'MTS MANUALS' POSN=V5INDEXSOU.6                     
            5.0T2   559  MTS_VOLUME_5.INDEX_SOURCE.D.004    1 SEQ     145    6 PAGE UM   MANUAL              APR. 05, 1980  18:17:44
            5.0T5     4                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 5.
00574/001   MTS VOLUME 10            MASTER          WT             S0546 MTSV10 'MTS MANUALS' POSN=NEWM3.V10                       
            5.0T2   560  MTS_VOLUME_10.MASTER.WT.001        1 SEQ     150   98 PAGE UM   MANUAL              JULY 03, 1981  15:34:06
            5.0T5     5                       
0          TEXT/360 MASTER FOR VOLUME 10 "BASIC IN MTS" OF THE UM MTS MANUALS, DECEMBER 1980.
            
           EDITOR:  EDWARD J. FRONCZAK
00574/002   MTS VOLUME 10            OUTPUT          P              S0546 MTSV10 'MTS MANUALS' POSN=VOL10DEC80                      
            5.0T2   561  MTS_VOLUME_10.OUTPUT.P.002         1 SEQ      70  227 PAGE UM   MANUAL              JULY 03, 1981  15:34:28
            5.0T5     6                       
0          THIS FILE SHOULD BE COPIED DIRECTLY TO A PRINTER.  IT IS NOT A TEXT/360
           PRINT FILE; IT IS THE OUTPUT FROM *PRINT WITH AN INDEX INSERTED.
00575/001   MTS VOLUME 4             MASTER          WT             S0616 MTSV4 'MTS MANUALS'  POSN=NEWM5.V4                        
            5.0T2   562  MTS_VOLUME_4.MASTER.WT.001         1 SEQ     132  465 PAGE UM   MANUAL              JULY 03, 1981  15:36:20
            5.0T5     7                       
0          TEXT/360 MASTER FOR VOLUME 4 "TERMINALS AND TAPES" OF THE UM MTS MANUALS,
           DECEMBER 1980.
            
           EDITOR:  RICHARD A. SALISBURY
1                                                                                               SUN SEP 08/96   15:24:55   Page  351
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00575/002   MTS VOLUME 4             PRINT           PT             S0616 MTSV4 'MTS MANUALS'  POSN=PRINT5.V4                       
            5.0T2   563  MTS_VOLUME_4.PRINT.PT.002          1 SEQ     132  536 PAGE UM   MANUAL              JULY 03, 1981  15:36:35
            5.0T5     8                       
0          TEXT/360 PRINT FILE.
00575/003   MTS VOLUME 4             INDEX SOURCE    D              S0616 MTSV4 'MTS MANUALS'  POSN=V4INDEXSOU.5                    
            5.0T2   564  MTS_VOLUME_4.INDEX_SOURCE.D.003    1 SEQ     120   11 PAGE UM   MANUAL              JULY 03, 1981  15:37:15
            5.0T5     9                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 4.
00576/001   CVTOMR                                   SA  G          S1559 5.0T2 VLO FSNAME=CVTOMR..SA.001(1)                     565
            5.0T2   565  CVTOMR..SA.001                     1 LINE     80   15 PAGE UM   DWB                 JULY 28, 1977  03:07:26
            5.0T5    10                       
0          SUBROUTINE CALLED BY BOTH HASP (ONLY IF FIRST CARD FOLLOWING A DECK (S8) CARD IS AN OMR CARD) AND
           MTS (FOR ALL OTHER CONVERSION) TO CONVERT OMR CARDS TO EBCDIC.
           NOTE:  THIS ROUTINE CURRENTLY HANDLES THE WATERLOO OMR CARD FORMAT (2-4-6 MARK IN COLUMN 1),
           AND THE UM MTS-AND-FORTRAN CARD (1-5-7 MARK IN COLUMN 1).
00576/002   CVTOMR                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   DWB                                        
0          Object part of Resident System (468).
00577/001A  MACHINE CHECK RECOVERY   370 MCHCCH      SA  G          MTA:MCHCCH(1,999)                                               
            5.1T1   629  MACHINE_CHECK_RECOVERY.37.SA.001   1 LINE     80   14 PAGE UM   MTA                 JULY 23, 1983  11:22:36
0          370 model-independent machine and channel check handler. Assemble using
           COPY:SETPARM (653), *SYSMAC, MCHMAC (577/5), and COPY:MISC.MACROS (728).
           Copies COPY:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT (470),
           COPY:CMDAREADSECT (531/20), COPY:GLOBALS (1026/3), and COPY:BJPDSCT (650/3).
            
           ********************************************************************************
           D5.0B version:
            
           580 changes.
           ********************************************************************************
0          Referenced by comments of: 577/6, 589/2, 655/4 
00577/002A  MACHINE CHECK RECOVERY   370 MCHCCH      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00577/003   MACHINE CHECK RECOVERY   370 LOGGER      SA  G          S1559 5.0T2 VLO FSNAME=MACHINE_CHECK_RECOVERY.37.SA.003(1)   567
            5.0T2   567  MACHINE_CHECK_RECOVERY.37.SA.003   1 LINE     80    4 PAGE UBC            MTA       MAR. 21, 1975  01:55:46
            5.0T5    12                       
0          THIS IS A PROGRAM THAT PRODUCES ON SPUNCH A STANDALONE PROGRAM TO BE WRITTEN
           TO A TAPE AND IPL'D AFTER A HARD MACHINE CHECK. THE STANDALONE PROGRAM COPIES
           THE 370 MACHINE CHECK RECORD (I.E. PSA PLUS EXTENDED LOGOUT AREA) TO THE
1                                                                                               SUN SEP 08/96   15:24:55   Page  352
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          SECOND FILE OF THE TAPE FROM WHICH IT WAS IPL'D. THE RECORD ON TAPE HAS THE
           SAME FORMAT AS NORMAL MTS MACHINE CHECK LOGOUTS.
           COPIES COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), AND COPY:PSA (162).
           THIS PROGRAM HAS NEVER BEEN USED AT UM.
00577/004   MACHINE CHECK RECOVERY   370 LOGGER      OC  G          S1559 5.0T2 VLO FSNAME=MACHINE_CHECK_RECOVERY.37.OC.004(1)   568
            5.0T2   568  MACHINE_CHECK_RECOVERY.37.OC.004   1 LINE     80    3 PAGE UBC            MTA       MAR. 21, 1975  01:55:49
            5.0T5    13                       
00577/005A  MACHINE CHECK RECOVERY   MACROS          SM  G          MTA:MCHMAC                                                      
            5.1T1   630  MACHINE_CHECK_RECOVERY.MA.SM.005   1 LINE     72   28 PAGE UM   MTA                 JULY 23, 1983  11:22:37
0          Macros for assembling EREP and Machine Check Recovery.
            
           ********************************************************************************
           D5.0B version:
            
           580 changes.
           ********************************************************************************
0          Referenced by comments of: 531/8, 577/1, 577/8, 577/11, 589/2, 589/4, 589/5, 589/6, 589/8, 655/4 
00577/006A  MACHINE CHECK RECOVERY   MCHSUBR         SA  G          MTA:MCHSUBR(1,999)                                              
            5.1T1   631  MACHINE_CHECK_RECOVERY.MC.SA.006   1 LINE     69    1 PAGE UM   MTA                 JULY 23, 1983  11:22:38
0          MCHCCH (577/1) HAS A WXTRN FOR MCHSUBR AND IF IT IS PRESENT, MCHCCH
           CALLS IT TO DO MODEL DEPENDENT RECOVERY FOR A MACHINE CHECK. IT CAN BE
           DELETED FROM THE SYSTEM IF NOT NEEDED.
0          Referenced by comments of: 577/8 
00577/007A  MACHINE CHECK RECOVERY   MCHSUBR         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00577/008C  MACHINE CHECK RECOVERY   IGF00470        SA  G          S1644 5.0BT1 VLO FSNAME=MACHINE_CHECK_RECOVERY.IG.SA.008(1)  338
            5.1T1   632  MACHINE_CHECK_RECOVERY.IG.SA.008   1 LINE     79   12 PAGE UM   MTA                 NOV. 21, 1982  14:47:44
0          Model dependent machine check recovery for Amdahl 470.  This component used to
           be (577/6).  Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), COPY:PSA
           (162), and *CNFGINFODSECT (654).  Assemble with MCHMAC (577/5) and
           COPY:SETPARM (653).
00577/009C  MACHINE CHECK RECOVERY   IGF00470        OC  G        # (PART OF THE RESIDENT SYSTEM)                                   
                                                                                    UM   MTA                                        
00577/010A  MACHINE CHECK RECOVERY   IGF00580        SA  O          MTA:580MCH                                                      
            5.1T1   633  MACHINE_CHECK_RECOVERY.IG.SA.010   1 LINE     72    9 PAGE UM   MTA                 JULY 23, 1983  11:29:32
0          MVS model dependent machine check code for Amdahl 5860, Version 3.0.
            
           THIS IS COPYRIGHTED AND MUST NOT BE GIVEN TO ANY THIRD PARTY.
1                                                                                               SUN SEP 08/96   15:24:55   Page  353
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 577/11 
00577/011A  MACHINE CHECK RECOVERY   IGF00580        UC  O          MTA:580MCH.U(1,999)                                             
            5.1T1   634  MACHINE_CHECK_RECOVERY.IG.UC.011   1 LINE     75    4 PAGE UM   MTA                 JULY 23, 1983  11:29:33
0          Updates to turn the MVS 580 machine check module (577/10) into the MTS
           version.  Requires COPY:GLOBALS (1026/3), COPY:PSA (162), COPY:LLMPSEQU
           (087), MCHMAC (577/5), and COPY:SETPARM (653).
00577/012C  MACHINE CHECK RECOVERY   IGF00580        OC  O        # (PART OF THE RESIDENT SYSTEM)                                   
                                                                                    UM   MTA                                        
00577/013   MACHINE CHECK RECOVERY   GETLOGS         SA  G          MTA:GETLOGS(1000)                                               
            5.0T2   571  MACHINE_CHECK_RECOVERY.GE.SA.008   1 LINE     69    3 PAGE UM   MTA                 JULY 03, 1981  15:37:48
            5.0T5    16  MTA.:GETLOGS         
0          PROGRAM TO RETREIVE LOGS FROM THE CPS DISK ON AN AMDAHL 470 AND WRITE THEM (FORMATTED)
           ON SPRINT.  WHEN RUN, IT PRINTS (ON SERCOM) THE KEY FOR ALL LOGS ON THE DISK AND
           ASKS WHICH ONE YOU WANT (ON GUSER).  RUN WITH PROT=OFF.
00577/014   MACHINE CHECK RECOVERY   GETLOGS         OC  G          MTA:GETLOGS(1,999)                                              
            5.0T2   572  MACHINE_CHECK_RECOVERY.GE.OC.009   1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  15:37:49
            5.0T5    17                       
00577/015   MACHINE CHECK RECOVERY   INIT:MCFILE     D            # INIT:MCFILE                                                     
                                                                                    UM   MTA                                        
                         INIT:MCFILE@E        
0          LOG FILE USED BY THE CMDSTAT PICKUP PROGRAM (*CMD) TO SAVE TYPE 10 (MACHINE
           AND CHANNEL CHECK) RECORDS.
0          Referenced by comments of: 531/6, 655/3 
00578/001   RSF                      D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=RSF                         
            5.0T4   374  RSF.D5.0_MASTER.SA.001             1 LINE     80   90 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:16:07
            5.0T10  278                       
0          Really shared files (RSF) portion of MTS. Copies *GFINFODSECT (593),
           COPY:LLMPSEQU (087), and COPY:GLOBALS (1026/3). Assemble using
           COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM
           (653/1), and COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 42/2, 143/1, 593/1 
00578/002A  RSF                      UPDATE          UC  G          MTSS:RSF/UPD                                                    
            5.1T1   635  RSF.UPDATE.UC.002                  1 LINE    122   58 PAGE UM   MTS       BURLING   JULY 23, 1983  11:29:33
0          *CDUPDATE input to produce current source.
            
           *********************************************************************
           D5.1 updates:
            
           Contains the new system subroutines PATBUILD, PATMATCH, and PATFREE.
           These subroutines, which will eventually be moved out of RSF, do
1                                                                                               SUN SEP 08/96   15:24:55   Page  354
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          pattern matching like the FILESTATUS command.  They are used by 
           components (852), (853), (854), (855), (856), (857), (858), and 
           (509/10) through (509/17).
           *********************************************************************
00578/003A  RSF                                      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00578/004A  RSF                                      L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=RSF.LIST                  
            5.1T1   636  RSF..L.004                         1 LINE    133  298 PAGE UM   MTS       BURLING   JULY 23, 1983  11:30:12
00578/005A  RSF                      COMMENTS        D   G          MTSS:RSF/COM                                                    
            5.1T1   637  RSF.COMMENTS.D.005                 1 LINE     66    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:30:15
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00578/006C  RSF                      MEMO 453        WF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO453.SOU                       
            5.1T1   638  RSF.MEMO_453.WF.006                1 LINE     69    5 PAGE UM   D BODWIN            JUNE 06, 1983  15:28:52
0          This is Computing Center Memo 453 -- "Pattern Matching Routines."
0          Referenced by comments of: 578/7 
00578/007C  RSF                      MEMO 453        PF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO453.OUT                       
            5.1T1   639  RSF.MEMO_453.PF.007                1 LINE     79    8 PAGE UM   D BODWIN            JUNE 06, 1983  15:29:02
0          Printer-ready version of (578/6).
00579/001A  LOW CORE SYMBOL TABLES   SYSDEFS         SA  G          MTSS:SYSDEFS(1,999)                                             
            5.1T1   640  LOW_CORE_SYMBOL_TABLES.SY.SA.001   1 LINE     71    4 PAGE UM   MTS       BURLING   JULY 23, 1983  11:30:28
                         MTSS:SYSDEFS         
0          This is a low-core symbol table for the definition of symbols used for systems work, i.e. not required
           by user programs.  To reference this symbol table, the following 3 loader cards are required at the
           end of an object deck:
            
            RIP  SYSDEFS
            LCS            LCSYMBOL
            LCS            SYSDEFS
            
           Copies COPY:GLOBALS (1026/3).
0          Referenced by comments of: 682/38, 806/1 
00579/002A  LOW CORE SYMBOL TABLES   SYSDEFS         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  355
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00579/003   LOW CORE SYMBOL TABLES   COPY:SYSDEFS    OC  G          COPY:SYSDEFS                                                    
            5.0T4   378  LOW_CORE_SYMBOL_TABLES.CO.OC.003   1 LINE     24    1 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:16:22
            5.0T10  282  COPY:SYSDEFS         
0          Contains the 3 loader cards:
                 RIP  SYSDEFS 
                 LCS            LCSYMBOL
                 LCS            SYSDEFS 
0          Referenced by comments of: 9/4, 67/44, 482/62, 534/4, 616/2, 617/4, 642/15, 655/5, 682/27, 682/31, 682/33, 682/35,
                 682/42, 682/47, 752/5, 769/22, 804/2, 821/30, 866/2, 866/5, 1030/3, 1070/4 
00579/004A  LOW CORE SYMBOL TABLES   CCDEFS          SA  G          MTS:CCDEFS(1,999)                                               
            5.1T1   641  LOW_CORE_SYMBOL_TABLES.CC.SA.004   1 LINE     70    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:30:28
                         MTS:CCDEFS           
0          Contains source for a low core symbol table which is CC-callable from system
           routines.
00579/005   LOW CORE SYMBOL TABLES   CCDEFS          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00579/006   LOW CORE SYMBOL TABLES   COPY:CCDEFS     OC  G          COPY:CCDEFS                                                     
            5.0T4   380  LOW_CORE_SYMBOL_TABLES.CO.OC.006   1 LINE     24    1 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:16:25
            5.0T10  284  COPY:CCDEFS          
0          Contains 3 loader cards:
              RIP  CCDEFS 
              LCS            LCSYMBOL
              LCS            CCDEFS 
0          Referenced by comments of: 802/6 
00579/007A  LOW CORE SYMBOL TABLES   CCSYMBOL        SA  G          MTS:CCSYMBOL(1,999)                                             
            5.1T1   642  LOW_CORE_SYMBOL_TABLES.CC.SA.007   1 LINE     71    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:30:29
                         MTS:CCSYMBOL         
0          Contains source for a low core symbol table which is CC-callable from user
           routines.
            
           ****************************************************************************
            
           Currently, even the user routines are only callable in system mode, but this
           may change if and when we agree to release the Coding Conventions to the
           "public" and provide entries in the GATE (4000) for the CC routines (or get
           rid of the GATE completely).
           ****************************************************************************
00579/008   LOW CORE SYMBOL TABLES   CCSYMBOL        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  356
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00579/009   LOW CORE SYMBOL TABLES   COPY:CCSYMBOL   OC  G          COPY:CCSYMBOL                                                   
            5.0T4   382  LOW_CORE_SYMBOL_TABLES.CO.OC.009   1 LINE     24    1 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:16:27
            5.0T10  286  COPY:CCSYMBOL        
0          Contains 3 loader cards:
              RIP  CCSYMBOL
              LCS            LCSYMBOL
              LCS            CCSYMBOL
0          Referenced by comments of: 802/6, 1051/33, 1051/36, 1051/39, 1070/4 
00579/010   LOW CORE SYMBOL TABLES   COPY:DEFS       OC  G          COPY:DEFS                                                       
            5.0T4   383  LOW_CORE_SYMBOL_TABLES.CO.OC.010   1 LINE     24    1 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:16:28
            5.0T10  287  COPY:DEFS            
0          Contains the following loader cards:
              RIP  SYSDEFS 
              RIP  CCSYMBOL
              RIP  CCDEFS 
              RIP  MNTRLCS
              RIP  MNTRPRV
              LCS            LCSYMBOL
              LCS            SYSDEFS 
              LCS            CCSYMBOL
              LCS            CCDEFS 
              LCS            MNTRLCS
              LCSPR          MNTRPRV
0          Referenced by comments of: 540/20, 682/25, 724/3, 823/75, 1079/1 
00579/011A  LOW CORE SYMBOL TABLES   COPY:ZDEFS      OC  G          COPY:ZDEFS                                                      
            5.1T1   643  LOW_CORE_SYMBOL_TABLES.CO.OC.011   1 LINE     24    1 PAGE UM   MTS       BURLING   JULY 23, 1983  11:30:30
                         COPY:ZDEFS           
0          Contains ALI records to equate some of the "Z" symbols, e.g., ZREAD, to
           the corresponding LCSYMBOL name READ.
00579/012   LOW CORE SYMBOL TABLES   COPY:MNTRDEFS   OC  G          COPY:MNTRDEFS                                                   
            5.0T4   385  LOW_CORE_SYMBOL_TABLES.CO.OC.012   1 LINE     24    1 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:16:30
            5.0T10  289  COPY:MNTRDEFS        
0          Contains the following loader cards:
            
            RIP  SYSDEFS 
            RIP  MNTRLCS
            RIP  MNTRPRV 
            LCS            LCSYMBOL
            LCS            SYSDEFS 
            LCS            MNTRLCS
            LCSPR          MNTRPRV
0          Referenced by comments of: 1051/33, 1051/39 
1                                                                                               SUN SEP 08/96   15:24:55   Page  357
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00580/001A *INDEX                    INDEX           SP  O  INDX    S0027 DISTRB FSNAME=INDEX                                       
            5.1T1   644  INDEX.INDEX.SP.001                 1 LINE     80   18 PAGE UM   ENGLE               AUG. 26, 1982  10:59:32
0          PROGRAM TO PRODUCE MANUAL INDICES.
           WILL PRODUCE INDEX AS TEXT/360 INPUT, FORMAT INPUT, OR REGULAR PRINTED OUTPUT.
0          Referenced by comments of: 512/5, 573/4, 575/3, 665/3, 669/3, 675/3, 676/3, 683/3, 717/3, 733/3, 741/3, 748/3,
                 766/3, 805/3, 836/3, 849/3 
00580/002A *INDEX                    INDEX           UC  O          S0027 DISTRB FSNAME=INDEXUPD                                    
            5.1T1   645  INDEX.INDEX.UC.002                 1 LINE     72    3 PAGE UM   ENGLE               AUG. 26, 1982  10:59:36
00580/003A *INDEX                    INDEX           OC  O          S0027 DISTRB FSNAME=INDX                                        
            5.1T1   646  INDEX.INDEX.OC.003                 1 LINE     80   22 PAGE UM   ENGLE               AUG. 26, 1982  10:59:41
0          Referenced by comments of: 580/7 
00580/004C *INDEX                    INDXSRT         SA  G  IDXS    S0027 DISTRB FSNAME=INDXSRT                                     
            5.1T1   647  INDEX.INDXSRT.SA.004               1 LINE     80    4 PAGE UM   ENGLE               AUG. 26, 1982  11:00:32
0          Subroutines to interface between the INDEX program and SORT exits for
           indexes with large numbers of entries.
00580/005C *INDEX                    INDXSRT         UC  G        # S0027 DISTRB FSNAME=INDXSRTUPD                                  
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current one.
00580/006C *INDEX                    INDXSRT         OC  G          S0027 DISTRB FSNAME=IDXS                                        
            5.1T1   648  INDEX.INDXSRT.OC.006               1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  11:00:36
0          Referenced by comments of: 580/7 
00580/007C *INDEX                    *INDEX          OE  G          *INDEX                                                          
            5.1T1   649  INDEX.?INDEX.OE.007                1 LINE  32767   13 PAGE UM   ENGLE               JULY 23, 1983  11:30:59
0          Link edited combination of INDEX (580/3) and INDXSRT (580/6).  Ends with
           a $CONTINUE WITH *PL1LIB" line.
00581/001   INDEXGT                                  SA  G        # (OBSOLETE)                                                      
            D3T5      5  INDEXGT..SA.1                      1 LINE     80    3 PAGE UM                       AUG. 02, 1973  00:15.05
00582/001   LIBRARY INDEX PROGRAM                    C            # (OBSOLETE)                                                      
            D3T5      7  LIBRARY_INDEX_PROGRAM..C.1         1 LINE    138    1 PAGE UM                       AUG. 02, 1973  00:15.08
00583/001   KWIC/360                 SOURCE          SP             S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_A.SP.001(1)            576
            5.0T2   576  KWIC/360.PHASE_A.SP.001            1 LINE     80   30 PAGE UM   DWB                 JUNE 04, 1975  22:19:07
            5.0T5    21                       
0          Modified version of IBM program 360D-06.7.014. Paper documentation was
           included with Distribution 4.0 and is available upon request from Don
           Boettner at UM.
            
           Source for phases A through D, the SCAN2 and TRANS subroutines, and input for
1                                                                                               SUN SEP 08/96   15:24:55   Page  358
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          test run as follows:
            
              Lines 1068-1083 are primary stopwords
              Lines 1084-1085 are secondary stopwords
              Lines 1086-LAST are input cards
00583/002   KWIC/360                 PHASE A ET AL   OC             S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_A.OC.002(1)            577
            5.0T2   577  KWIC/360.PHASE_A.OC.002            1 SEQ      80    7 PAGE UM   DWB                 JULY 28, 1977  03:22:37
            5.0T5    22                       
0          Object for Phase A, SCAN2 subroutine, and TRANS subroutine.
           Ends with a "$CONTINUE WITH *PL1LIB" card.
00583/003   KWIC/360                 PHASE B         OC             S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_B.OC.004(1)            578
            5.0T2   578  KWIC/360.PHASE_B.OC.004            1 SEQ      80    3 PAGE UM   DWB                 JULY 28, 1977  03:22:39
            5.0T5    23                       
0          Ends with a "$CONTINUE WITH *PL1LIB" card.
00583/004   KWIC/360                 PHASE C         OC             S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_C.OC.006(1)            579
            5.0T2   579  KWIC/360.PHASE_C.OC.006            1 SEQ      80    4 PAGE UM   DWB                 JULY 28, 1977  03:22:42
            5.0T5    24                       
0          Ends with a "$CONTINUE WITH *PL1LIB" card.
00583/005   KWIC/360                 PHASE D         OC             S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_D.OC.008(1)            580
            5.0T2   580  KWIC/360.PHASE_D.OC.008            1 SEQ      80    4 PAGE UM   DWB                 JULY 28, 1977  03:22:44
            5.0T5    25                       
0          Ends with a "$CONTINUE WITH *PL1LIB" card.
00583/006   KWIC/360                 DOCUMENTATION                # (AVAILABLE UPON REQUEST)                                        
                                                                                    UM   SWEET                                      
0          This is the documentation for the KWIC program.  It is available
           from UM upon request.
00584/001   QUIC                     PHASE 1         SP             S1559 5.0T2 VLO FSNAME=QUIC.PHASE_1.SP.001(1)                581
            5.0T2   581  QUIC.PHASE_1.SP.001                1 LINE     81   35 PAGE UM   DWB                 MAY  13, 1976  20:59:32
            5.0T5    26                       
0          This is the IBM program 360D-06.7.022. It is used as follows: run Phase 1
           (QUIC1), then *SORT (303), then Phase 2 (QUIC2). Paper documentation was
           enclosed with Distribution 3.0 and is available upon request from Don
           Boettner at UM.
            
           The source for Phase 1 is in lines 252 through 1249.
           The source for Phase 2 is in lines 1347 through 1496.
           Test data is in lines 1269 through 1320.
1                                                                                               SUN SEP 08/96   15:24:55   Page  359
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00584/002   QUIC                     PHASE 1         OC             S1559 5.0T2 VLO FSNAME=QUIC.PHASE_1.OC.002(1)                582
            5.0T2   582  QUIC.PHASE_1.OC.002                1 LINE     80   21 PAGE UM   DWB                 JULY 28, 1977  03:23:21
            5.0T5    27                       
00584/003   QUIC                     PHASE 2         OC             S1559 5.0T2 VLO FSNAME=QUIC.PHASE_2.OC.004(1)                583
            5.0T2   583  QUIC.PHASE_2.OC.004                1 LINE     80    4 PAGE UM   DWB                 JULY 28, 1977  03:23:22
            5.0T5    28                       
00584/004   QUIC                     DOCUMENTATION                # (AVAILABLE UPON REQUEST)                                        
                                                                                    UM   SWEET                                      
0          This is the documentation for the QUIC program.  It is available
           from UM upon request.
00585/001A  CALC CLS                                 SA  G          W070:CALC.S                                                  531
            5.1T1   650  CALC_CLS..SA.001                   1 LINE    100   54 PAGE UM   FRONCZAK            JULY 23, 1983  11:30:59
0          THIS IS THE SOURCE FOR THE MTS $CALC COMMAND.  THE CALC COMMAND IS IMPLEMENTED AS A COMMAND LANGUAGE
           SUB-SYSTEM (CLS).  ASSEMBLE USING COPY:MTS.MACROS (344/3). LINES 1,5 CONTAIN MTS COMMANDS FOR 
           ASSEMBLY.
            
           ********************************************************************************
           D5.0A changes:
            
           Contains changes for CLS one-shot lowercase text processing.
           ********************************************************************************
00585/002A  CALC CLS                                 OC  G          *CLSCALC                                                        
            5.1T1   651  CALC_CLS..OC.002                   1 LINE     80    5 PAGE UM   FRONCZAK            JULY 23, 1983  11:31:01
                         *CLSCALC             
00586/001A  COST SUBR                                SA  G  COST    S0027 DISTRB FSNAME=COST                                        
            5.1T1   652  COST_SUBR..SA.001                  1 LINE     80    9 PAGE UM   ENGLE               AUG. 26, 1982  10:44:49
0          SUBROUTINE TO COMPUTE CURRENT COST OF RUN.  (E.G. CALLED BY MTS FOR $DISPLAY $).
           COPIES ACCFORMAT (104/1), AND GRDEF (104/83).
00586/002C  COST SUBR                                UC  G          S0027 DISTRB FSNAME=COSTUPD                                     
            5.1T1   653  COST_SUBR..UC.002                  1 LINE     72    2 PAGE UM   ENGLE               AUG. 26, 1982  10:44:54
0          Updates source from previous regular distribution to current one.
00586/003A  COST SUBR                                OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   ENGLE                                      
0          Object part of Resident System (468).
00587/001   RESEQUENCING PGM                         SA  G          MTS:RSEQ(1,999)                                              632
            5.0T2   587  RESEQUENCING_PGM..SA.001           1 LINE     69    3 PAGE UBC  HOGG      DWB       JULY 03, 1981  15:38:28
            5.0T5    32                       
0          TO USE THIS PROGRAM:
            
                $RUN RSEQ SCARDS=INPUT SPUNCH=OUTPUT SERCOM=ERRORS PAR=SEQNAME
1                                                                                               SUN SEP 08/96   15:24:55   Page  360
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           WHERE SEQNAME IS A 1 TO 8 CHARACTER SEQUENCE FIELD INITIALIZER.  IF OMITTED, THE SEQUENCE DEFAULTS TO
           00000001, 00000002, ETC.  IF THE LAST CHARACTER OF SEQNAME IS 1, THE SEQUENCING TAKES PLACE AT THAT COLUMN.
           FOR EXAMPLE, IF PAR=BARF IS GIVEN, THE SEQUENCE IS BARF0001, BARF0002, ETC.  IF PAR=BARF01
           IS GIVEN, THE SEQUENCE IS BARF0100, BARF0200, ETC.  SEQUENCING INTRUDES INTO THE ALPHABETIC FIELD IF
           NECESSARY.  FOR EXAMPLE, THE SEQUENCE ID FOLLOWING BARF9999 IS BARG0000.
           WRITES ON SPUNCH @I TO PRESERVE INPUT LINE NUMBERS.
00587/002   RESEQUENCING PGM                         OC  G          MTS:RSEQ(1000)                                                  
            5.0T2   588  RESEQUENCING_PGM..OC.002           1 LINE     80    2 PAGE UBC  HOGG      DWB       JULY 03, 1981  15:38:30
            5.0T5    33                       
00588/001   INTERCOM                                 SA     EAIC  # (OBSOLETE)                                                      
            D4T2    634  INTERCOM..SA.001                   1 LINE     80   13 PAGE UM                       FEB. 13, 1975  23:51:52
0          INTER-CPU COMMUNICATION PROGRAM USED ON 360/67 BY SUPERVISOR AND MACHINE
           CHECK ERROR RECOVERY. MODIFIED FROM TSS/360.
00589/001   CHANNEL CHECK RECOVERY   360/67          SA  G        # (OBSOLETE)                                                      
            D4T2    635  CHANNEL_CHECK_RECOVERY.36.SA.001   1 LINE     80    8 PAGE UM                       FEB. 13, 1975  23:53:49
0          360/67 I/O inboard error recording. Midified from TSS/360.
00589/002A  CHANNEL CHECK RECOVERY   370 CCHSUBR     SA  G          MTA:CCHSUBR(1,999)                                              
            5.1T1   654  CHANNEL_CHECK_RECOVERY.37.SA.002   1 LINE     72    1 PAGE UM   MTA                 JULY 23, 1983  11:31:04
0          MCHCCH (577/1) HAS A WXTRN FOR CCHSUBR AND IF IT IS PRESENT, MCHCCH
           CALLS IT TO DO MODEL DEPENDENT RECOVERY FOR A CHANNEL CHECK.  THIS
           VERSION OF CCHSUBR IS SIMPLY AN INTERFACE WHICH LOOKS AT THE MODEL
           NUMBER AND CHANNEL TYPE AND CALLS ONE OF IGFC60 (589/4), IGFC70
           (589/5), IGFC80 (589/6), IGFC47 (589/8), OR IGFC58 (589/10).  THESE
           ARE REFERENCED WITH WXTRNS AND MAY BE DELETED FROM THE SYSTEM IF NOT
           NEEDED.  ASSEMBLE USING MCHMAC (577/5).
0          Referenced by comments of: 589/8 
00589/003   CHANNEL CHECK RECOVERY   370 CCHSUBR     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00589/004   CHANNEL CHECK RECOVERY   IGFC60          SA             S1559 5.0T2 VLO FSNAME=CHANNEL_CHECK_RECOVERY.IG.SA.004(1)   590
            5.0T2   590  CHANNEL_CHECK_RECOVERY.IG.SA.004   1 LINE     80   26 PAGE UM   MTA                 NOV. 08, 1975  00:31:31
            5.0T5    35                       
0          VS2 SUBROUTINE TO CONVERT A 2860 CHANNEL LOGOUT INTO A 370 LIMITED CHANNEL LOGOUT.
           ASSEMBLE USING MCHMAC (577/5).
0          Referenced by comments of: 589/2, 589/5, 589/6, 589/7, 655/4 
00589/005   CHANNEL CHECK RECOVERY   IGFC70          SA           # (PART OF IGFC60)                                                
                                                                                    UM   MTA                                        
0          VS2 SUBROUTINE TO CONVERT A 2870 CHANNEL LOGOUT INTO A 370 LIMITED CHANNEL LOGOUT.
1                                                                                               SUN SEP 08/96   15:24:55   Page  361
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ASSEMBLE USING MCHMAC (577/5).
            
           Part of (589/4).
0          Referenced by comments of: 589/2, 589/7, 655/4 
00589/006   CHANNEL CHECK RECOVERY   IGFC80          SA           # (PART OF IGFC60)                                                
                                                                                    UM   MTA                                        
0          VS2 SUBROUTINE TO CONVERT A 2880 CHANNEL LOGOUT INTO A 370 LIMITED CHANNEL LOGOUT.
           ASSEMBLE USING MCHMAC (577/5).
            
           Part of (589/4).
0          Referenced by comments of: 589/2, 589/7, 655/4 
00589/007   CHANNEL CHECK RECOVERY   VS2CCH          OC           # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          OBJECT FOR (589/4), (589/5), AND (589/6).
           Object part of Resident System (468).
00589/008A  CHANNEL CHECK RECOVERY   IGFC47          SA  G          S0045 FSAVE3 FSNAME=470CCH(1)                               117 
            5.1T1   655  CHANNEL_CHECK_RECOVERY.IG.SA.008   1 LINE     85   11 PAGE UM   MTA                 JAN. 18, 1983  01:41:50
0          SUBROUTINE CALLED BY CCHSUBR (589/2) FOR CHANNEL CHECK RECOVERY IF RUNNING ON AN
           AMDAHL 470.  THIS PROGRAM PRODUCES A LIMITED CHANNEL LOGOUT FROM A FULL LOG.
           ASSEMBLE USING MCHMAC (577/5).
0          Referenced by comments of: 589/2, 655/4, 655/5 
00589/009A  CHANNEL CHECK RECOVERY   IGFC47          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00589/010A  CHANNEL CHECK RECOVERY   IGFC58          SA  O          MTA:580CCH                                                      
            5.1T1   656  CHANNEL_CHECK_RECOVERY.IG.SA.010   1 LINE     72    4 PAGE UM   MTA                 JULY 23, 1983  11:36:07
0          Amdahl source for MVS 580 channel check module. This is Version 3.0.
            
           THIS IS COPYRIGHTED AND MUST NOT BE GIVEN TO ANY THIRD PARTY.
0          Referenced by comments of: 589/2, 589/11 
00589/011A  CHANNEL CHECK RECOVERY   IGFC58          UC  O          MTA:580CCH.U(1)                                                 
            5.1T1   657  CHANNEL_CHECK_RECOVERY.IG.UC.011   1 LINE     74    1 PAGE UM   MTA                 JULY 23, 1983  11:36:07
                         MTA:580CCH.U         
0          Updates to (589/10) to produce MTS 580 channel check recovery.  Works with
           Version 3.0.
1                                                                                               SUN SEP 08/96   15:24:55   Page  362
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00589/012C  CHANNEL CHECK RECOVERY   IGFC58          OC  O        # (PART OF THE RESIDENT SYSTEM)                                   
                                                                                    UM   MTA                                        
00590/001  *SPITBOL                  MAIN UPDATE     UU  G          S1559 5.0T2 VLO FSNAME=SPITBOL.MAIN_UPDATE.UU.001(1)         592
            5.0T2   592  SPITBOL.MAIN_UPDATE.UU.001         1 LINE     72   13 PAGE UM   SWARTZ              MAY  13, 1978  17:48:20
            5.0T5    37                       
0          By contract, the source and object for SPITBOL cannot be distributed. Contact
           the Computer Science Dept. at Illinois Institute of Technology, Chicago, Il,
           USA.
            
           Update deck to bring the SPITBOL compiler and library from version 2.2.0 to
           2.2.6. Copies DEFLMOD (590/3) and WORK AREA (590/4).
0          Referenced by comments of: 678/4, 798/105 
00590/002  *SPITBOL                  XFACE UPDATE    UU  G          S1559 5.0T2 VLO FSNAME=SPITBOL.XFACE_UPDATE.UU.002(1)        593
            5.0T2   593  SPITBOL.XFACE_UPDATE.UU.002        1 LINE     72   40 PAGE UM   SWARTZ              MAY  13, 1978  17:48:22
            5.0T5    38                       
0          UPDATE DECK FOR MODIFYING THE SPITBOL VERSION 2.2 INTERFACE TO RUN IN MTS AT SPITBOL VERSION LEVEL 2.2.6.
           COPIES DEFLMOD (590/3) AND WORK AREA (590/4).
00590/003  *SPITBOL                  DEFLMOD         SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.DEFLMOD.SA.003(1)             594
            5.0T2   594  SPITBOL.DEFLMOD.SA.003             1 LINE     39    1 PAGE UM   SWARTZ              MAY  13, 1978  17:48:26
            5.0T5    39                       
0          COPY SECTION TO SET INSTALLATION AND COMPILER/LIBRARY GLOBAL VARIABLES.
0          Referenced by comments of: 590/1, 590/2 
00590/004  *SPITBOL                  WORK AREA       SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.WORK_AREA.SA.004(1)           595
            5.0T2   595  SPITBOL.WORK_AREA.SA.004           1 LINE     80    3 PAGE UM   SWARTZ              MAY  13, 1978  17:48:27
            5.0T5    40                       
0          COPY SECTION OF SPITBOL WORK AREA.
0          Referenced by comments of: 590/1, 590/2 
00590/005  *SPITBOL                  ZAP CONVERT     SS  G          S1559 5.0T2 VLO FSNAME=SPITBOL.ZAP_CONVERT.SS.005(1)         596
            5.0T2   596  SPITBOL.ZAP_CONVERT.SS.005         1 LINE     72    1 PAGE UM   SWARTZ              JULY 28, 1977  03:34:16
            5.0T5    41                       
0          SNOBOL PROGRAM TO CONVERT SPITBOL SUPERZAP DECKS INTO MTS COM AND REP LOADER CARDS.
00590/006  *SPITBOL                  *SPITBOL        OC  G        # *SPITBOL                                                        
            5.0T2   597  SPITBOL.?SPITBOL.OC.006            1 SEQ      24    1 PAGE UM   SWARTZ              AUG. 06, 1981  03:58:18
            5.0T5    42  *SPITBOL@UM          
0          LOADER CARDS TO FORCE REFERENCE TO THE SHARED VM SPITBOL.
1                                                                                               SUN SEP 08/96   15:24:55   Page  363
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00590/007  *SPITBOL                  ETC:SPITDEFLIB  OL  G          ETC:SPITDEFLIB                                                  
            5.0T2   598  SPITBOL.ETC:SPITDEFLIB.OL.007      1 LINE     24    1 PAGE UM   SWARTZ              JULY 20, 1977  03:40:47
            5.0T5    43  ETC:SPITDEFLIB@UM    
0          LOADER CARDS USED AS A DEFAULT LIBRARY FOR THE SPITBOL LOAD FUNCTION TO
           FORCE REFERENCE TO EFL AND LCSYMBOLS.
00590/008  *SPITBOL                  *SPITERR        M              *SPITERR                                                        
            5.0T2   599  SPITBOL.*SPITERR.M.008             1 LINE    175    4 PAGE UM   SWARTZ              JULY 03, 1981  15:39:36
            5.0T5    44  *SPITERR@UM          
0          SPITBOL ERROR MESSAGES.
00590/009A *SPITBOL                  *SPITDEBUG      SS  O          *SPITDEBUG                                                      
            5.1T1   658  SPITBOL.?SPITDEBUG.SS.009          1 LINE    111    4 PAGE UM   SWARTZ              JULY 23, 1983  11:36:08
                         *SPITDEBUG           
0          ALLOWS CONTINUING, DISPLAYING, MODIFYING, ETC. OF DATA AFTER AN ERROR IN SPITBOL.
           USED BY INCLUDING "-COPY *SPITDEBUG" IN THE SPITBOL SOURCE PROGRAM.  USES SUBROUTINES
           IN UNSP:SPITLIB (590/30).  USE THE "HELP" COMMAND TO EXPLAIN FUNCTIONS.
0          Referenced by comments of: 590/32, 715/5, 1070/5 
00590/010  *SPITBOL                  *SPITLIB        OL  O        # *SPITLIB                                                        
                                                                                    UM   SWARTZ                                     
                         *SPITLIB@UM          
0          *SPITLIB CANNOT BE DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
0          Referenced by comments of: 678/3, 757/2, 798/122, 1070/6 
00590/011  *SPITBOL                  UNSP CMD        SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_CMD.SA.011(1)            601
            5.0T2   601  SPITBOL.UNSP_CMD.SA.011            1 LINE     80    3 PAGE UM   UNSP                DEC. 23, 1975  19:33:48
            5.0T5    46                       
0          THIS FOLLOWING SUBCOMPONENTS ARE THE SOURCE FOR THE "UNSUPPORTED" SPITBOL
           FUNCTION LIBRARY, UNSP:SPITLIB (590/30). THESE FUNCTIONS SHOULD NOT BE 
           CONFUSED WITH THOSE IN *SPITLIB.
00590/012  *SPITBOL                  UNSP CREATE     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_CREATE.SA.012(1)         602
            5.0T2   602  SPITBOL.UNSP_CREATE.SA.012         1 LINE     80    4 PAGE UM   UNSP                SEP. 02, 1976  12:34:35
            5.0T5    47                       
00590/013  *SPITBOL                  UNSP CREPLY     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_CREPLY.SA.013(1)         603
            5.0T2   603  SPITBOL.UNSP_CREPLY.SA.013         1 LINE     80    2 PAGE UM   UNSP                SEP. 01, 1978  08:19:41
            5.0T5    48                       
00590/014  *SPITBOL                  UNSP GDINFO     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_GDINFO.SA.014(1)         604
            5.0T2   604  SPITBOL.UNSP_GDINFO.SA.014         1 LINE     80    4 PAGE UM   UNSP                SEP. 02, 1976  12:34:40
            5.0T5    49                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  364
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00590/015  *SPITBOL                  UNSP GETFD      SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_GETFD.SA.015(1)          605
            5.0T2   605  SPITBOL.UNSP_GETFD.SA.015          1 LINE     80    3 PAGE UM   UNSP                SEP. 02, 1976  12:34:44
            5.0T5    50                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/016  *SPITBOL                  UNSP GUINFO     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_GUINFO.SA.016(1)         606
            5.0T2   606  SPITBOL.UNSP_GUINFO.SA.016         1 LINE     80    4 PAGE UM   UNSP                SEP. 02, 1976  12:34:51
            5.0T5    51                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/017  *SPITBOL                  UNSP MTSCMD     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_MTSCMD.SA.017(1)         607
            5.0T2   607  SPITBOL.UNSP_MTSCMD.SA.017         1 LINE     80    3 PAGE UM   UNSP                DEC. 23, 1975  19:34:03
            5.0T5    52                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/018  *SPITBOL                  UNSP READ       SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_READ.SA.018(1)           608
            5.0T2   608  SPITBOL.UNSP_READ.SA.018           1 LINE     80    4 PAGE UM   UNSP                SEP. 02, 1976  12:35:05
            5.0T5    53                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/019  *SPITBOL                  UNSP SETPFX     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SETPFX.SA.019(1)         609
            5.0T2   609  SPITBOL.UNSP_SETPFX.SA.019         1 LINE     80    3 PAGE UM   UNSP                JAN. 13, 1976  11:29:00
            5.0T5    54                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/020  *SPITBOL                  UNSP SNS        SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SNS.SA.020(1)            610
            5.0T2   610  SPITBOL.UNSP_SNS.SA.020            1 LINE     80    3 PAGE UM   UNSP                SEP. 02, 1976  12:34:54
            5.0T5    55                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/021  *SPITBOL                  UNSP WRITE      SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_WRITE.SA.021(1)          611
            5.0T2   611  SPITBOL.UNSP_WRITE.SA.021          1 LINE     80    4 PAGE UM   UNSP                SEP. 02, 1976  12:35:12
            5.0T5    56                       
0          ASSEMBLE USING UNSP:MACLIB (685/3).
00590/022  *SPITBOL                  UNSP SNOOP      SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SNOOP.SA.022(1)          612
            5.0T2   612  SPITBOL.UNSP_SNOOP.SA.022          1 LINE     80    3 PAGE UM   UNSP                JULY 12, 1976  13:42:24
            5.0T5    57                       
00590/023  *SPITBOL                  UNSP SPITATTN   SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SPITATTN.SA.023(1)       613
            5.0T2   613  SPITBOL.UNSP_SPITATTN.SA.023       1 LINE     80    5 PAGE UM   UNSP                NOV. 30, 1976  14:22:13
            5.0T5    58                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  365
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00590/024  *SPITBOL                  UNSP SGETRC     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SGETRC.SA.024(1)         614
            5.0T2   614  SPITBOL.UNSP_SGETRC.SA.024         1 LINE     80    1 PAGE UM   UNSP                SEP. 02, 1976  12:34:47
            5.0T5    59                       
00590/025  *SPITBOL                  UNSP SPUTRC     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SPUTRC.SA.025(1)         615
            5.0T2   615  SPITBOL.UNSP_SPUTRC.SA.025         1 LINE     80    1 PAGE UM   UNSP                SEP. 02, 1976  12:35:01
            5.0T5    60                       
00590/026  *SPITBOL                  UNSP STI        SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_STI.SA.026(1)            616
            5.0T2   616  SPITBOL.UNSP_STI.SA.026            1 LINE     80    2 PAGE UM   UNSP                SEP. 02, 1976  12:35:09
            5.0T5    61                       
0          "STR" IS AN ALTERNATE ENTRY.  ASSEMBLE USING UNSP:MACLIB (685/3).
00590/027  *SPITBOL                  UNSP ITR        SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_ITR.SA.027(1)            617
            5.0T2   617  SPITBOL.UNSP_ITR.SA.027            1 LINE     80    1 PAGE UM   UNSP                SEP. 02, 1976  12:35:20
            5.0T5    62                       
0          "RTI" IS AN ALTERNATE ENTRY.
00590/028  *SPITBOL                  UNSP ITS        SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_ITS.SA.028(1)            618
            5.0T2   618  SPITBOL.UNSP_ITS.SA.028            1 LINE     80    1 PAGE UM   UNSP                SEP. 02, 1976  12:35:16
            5.0T5    63                       
0          "RTS" IS AN ALTERNATE ENTRY.
00590/029  *SPITBOL                  UNSP SETLIO     SA  G          S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SETLIO.SA.029(1)         619
            5.0T2   619  SPITBOL.UNSP_SETLIO.SA.029         1 LINE     66    1 PAGE UM   UNSP                FEB. 23, 1979  04:51:29
            5.0T5    64                       
0          SPITBOL ROUTINE WHICH CALLS THE MTS SETLIO SUBROUTINE.  OBJECT IS IN
           UNSP:SPITLIB (590/30).
00590/030  *SPITBOL                  UNSP LIBRARY    OL  G          UNSP:SPITLIB                                                    
            5.0T2   620  SPITBOL.UNSP_LIBRARY.OL.030        1 LINE   1382    5 PAGE UM   UNSP                JULY 03, 1981  15:45:25
            5.0T5    65  UNSP:SPITLIB         
0          Referenced by comments of: 590/9, 590/11, 590/29, 590/31, 678/1, 737/15, 798/122, 1070/5 
00590/031  *SPITBOL                  UNSP LIBRARY    WF             S1153 UNSP VLO FSNAME=SPITLIB.FMT                               
            5.0T2   621  SPITBOL.UNSP_LIBRARY.WF.031        1 LINE     85    7 PAGE UM   UNSP                JUNE 27, 1981  22:03:02
            5.0T5    66                       
0          A WRITEUP FOR THE ROUTINES IN UNSP:SPITLIB (590/30).
00590/032  *SPITBOL                  CONVSPIT        SS  G          UNSP:CONVSPIT(1000)                                             
            5.0T2   622  SPITBOL.CONVSPIT.SS.032            1 LINE     53    1 PAGE UM   UNSP                JULY 03, 1981  15:45:42
            5.0T5    67                       
0          AN INTERACTIVE SPITBOL. USES *SPITLIB (NOT DISTRIBUTED) AND *SPITDEBUG
           (590/9).
1                                                                                               SUN SEP 08/96   15:24:55   Page  366
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00590/033  *SPITBOL                  CONVSPIT        OE  G          UNSP:CONVSPIT(1,999)                                            
            5.0T2   623  SPITBOL.CONVSPIT.OE.033            1 LINE  10408    6 PAGE UM   UNSP                JULY 03, 1981  15:45:44
            5.0T5    68  UNSP:CONVSPIT        
00591/001   CFDUB SUBR                               SA  G          S1559 5.0T2 VLO FSNAME=CFDUB_SUBR..SA.001(1)                 624
            5.0T2   624  CFDUB_SUBR..SA.001                 1 LINE     80    2 PAGE UM   MTA                 JULY 28, 1977  03:46:29
            5.0T5    69                       
0          SUBROUTINE TO COMPARE TWO FDUBS TO SEE IF THEY ARE ASSIGNED TO THE SAME THING.  TO USE,
           CALL CFDUB(F1,F2) WHERE F1 AND F2 ARE CHKFDUB THINGS.  RC=0 MEANS THAT THEY'RE THE SAME, RC=4 MEANS THEY'RE
           DIFFERENT, RC=8 MEANS THAT AT LEAST ONE IS INVALID.  FOR EXAMPLE, CALL CFDUB('SPUNCH  ','SPRINT  ',&1,&2).
00591/002   CFDUB SUBR                               OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00592/001A  OPERATORS MANUAL                         WF             W225:OPRML.FMT                                                  
            5.1T1   659  OPERATORS_MANUAL..WF.001           1 LINE    239  179 PAGE UM   DONNELLY            JULY 23, 1983  11:36:08
0          MTS OPERATOR'S MANUAL.
0          Referenced by comments of: 50/3, 387/23, 531/38, 610/1, 615/20, 615/41, 615/46, 634/1, 642/1, 642/3, 642/6, 642/14 
00593/001  *GFINFODSECT                              SA  G          *GFINFODSECT                                                    
            5.0T2   626  GFINFODSECT..SA.001                1 LINE     72    3 PAGE UM   HELFFRICH           JULY 03, 1981  15:46:58
            5.0T5    71  *GFINFODSECT         
0          COPY SECTION FOR DSECTS DEFINING INFORMATION REGIONS USED IN CONJUNCTION WITH THE
           GFINFO SUBROUTINE, PART OF RSF (578).
0          Referenced by comments of: 67/27, 465/1, 502/1, 529/1, 531/8, 548/1, 548/4, 578/1, 630/1, 826/12, 1019/5 
00594/001A *GDINFODSECT                              SA  G          *GDINFODSECT                                                    
            5.1T1   660  GDINFODSECT..SA.001                1 LINE     70    2 PAGE UM   MTS       STERKEN   JULY 23, 1983  11:36:20
                         *GDINFODSECT         
0          COPY SECTION DEFINING THE INFORMATION REGION USED IN CONJUNCTION WITH THE
           GDINFO SUBROUTINE.
            
           **************************************************************************
           D5.0B version:
            
           Some new fields have been added.
           **************************************************************************
0          Referenced by comments of: 57/1, 64/1, 101/1, 278/3, 283/1, 291/1, 314/1, 400/13, 400/14, 410/1, 485/35, 495/1,
                 496/1, 498/98, 506/7, 506/8, 513/1, 529/1, 531/8, 534/3, 540/10, 545/3, 545/4, 545/10, 548/1, 551/1, 553/1,
                 600/34, 627/1, 634/6, 636/1, 638/1, 648/1, 655/1, 655/4, 677/1, 680/1, 682/18, 706/6, 709/1, 721/1, 721/2,
                 721/3, 721/6, 721/9, 721/12, 721/18, 727/1, 737/3, 738/1, 746/1, 749/1, 752/1, 771/1, 813/11, 814/2, 816/2,
                 816/3, 823/51, 823/74, 826/8, 826/11, 862/3, 862/5, 1002/15, 1002/23, 1005/1, 1019/5, 1021/7, 1051/9, 1051/11,
                 1051/13, 1051/15, 1067/1, 3011/3, 3024/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  367
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00595/001   APL - GMRL               *APLGM          OE  G        # *APLGM                                                          
            5.0T2   629  APL_-_GMRL.*APLGM.OE.002           1 SEQ    2436    2 PAGE UM                       JULY 03, 1981  15:47:01
            5.0T5    74  *APLGM               
0          This component has been removed from MTS distributions due to its low
           usage and stable condition.
00596/001   ZAP                                      SA           # (OBSOLETE)                                                      
            D3.1T1  455  ZAP..SA.1                          1 LINE     80   13 PAGE UM                       MAR. 06, 1974  22:30.58
0          Obsoleted by RAMROD (1019)
00597/001   CHKVTOC                                               # (PART OF FILE SYSTEM RECOVERY)                                  
                                                                                    UM                                              
0          Part of File System Recovery (682/21) and (682/23)
00598/001   DASDI                    BASE SOURCE     SA  G          FILE:DASDI(*F,-1)                                               
            5.0T2   721  DASDI.BASE_SOURCE.SA.001           1 LINE     80   45 PAGE UM   HELFFRICH           AUG. 06, 1981  04:00:11
            5.0T5   166  FILE:DASDI           
0          PROGRAM TO VAM2- OR VAMX-FORMAT DASDI 2311, 2314, 3330, 333B, 3340, 3344, AND 3350 DISKS.
           MARKS 3330-11 DISKS AS "333B" IN LABEL ACCORDING TO TSS CONVENTION. ASSEMBLE
           USING COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), AND *SYSMAC.  INPUT
           DESCRIBED IN SOURCE COMMENTS.
0          Referenced by comments of: 598/2, 682/5 
00598/002A  DASDI                    UPDATE          UC  G          FILE:DASDI(1000)                                                
            5.1T1   661  DASDI.UPDATE.UC.002                1 LINE     74    1 PAGE UM   HELFFRICH           JULY 23, 1983  11:36:20
0          UPDATE DECK TO BE APPLIED TO (598/1) TO YIELD CURRENT SOURCE.
00598/003A  DASDI                    OBJECT          OC  G          FILE:DASDI(1,999)                                               
            5.1T1   662  DASDI.OBJECT.OC.003                1 LINE     80   14 PAGE UM   HELFFRICH           JULY 23, 1983  11:36:22
00599/001A  CHONID                                   SA  G  CHON    FILE:CHONID(1,999)                                              
            5.1T1   663  CHONID..SA.001                     1 LINE     80    4 PAGE UM   HELFFRICH           JULY 23, 1983  11:36:22
                         FILE:CHONID          
0          PROGRAM, NOT FOR GENERAL USE, TO CHANGE THE OWNERID IN THE CATALOG OF A
           PUBLIC FILE. USED BY SYSTEM PROGRAMMERS TO ASSIGN APPROPRIATE OWNERS TO
           PUBLIC FILES. IT TAKES INPUT IN THE FORM "*FILENAME USERID" AND STOPS WHEN AN
           END-OF-FILE IS ENTERED. ASSEMBLE USING *SYSMAC AND COPY:FILE.MACROS (482/45).
           SEE COMP (682/6) FOR A WRITEUP.
            
           *********************************************************************
           D5.1 version:
            
           This program was changed to convert its input to uppercase.
           *********************************************************************
0          Referenced by comments of: 682/6 
1                                                                                               SUN SEP 08/96   15:24:55   Page  368
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00599/002A  CHONID                                   OC  G          FILE:CHONID(1000)                                               
            5.1T1   664  CHONID..OC.002                     1 LINE     80    1 PAGE UM   HELFFRICH           JULY 23, 1983  11:36:22
00600/001A  SDS CLS                  CLSSOU          SA  G          W059:SDSCLS.S                                                   
            5.1T1   665  SDS_CLS.CLSSOU.SA.001              1 LINE     79  179 PAGE UM   VALERIO             JULY 23, 1983  11:36:22
0          SDS, the Symbolic Debugging System.
            
           (600/1) is the source for the CLS interface to SDS.  It copies *CNFGINFODSECT
           (654), COPY:GLOBALS (1026/3), SDSCONSTANT (600/16), and SDSPSECT (600/14).
           Assemble using *SYSMAC, SDSMACROS (600/13), and COPY:MTS.MACROS (344/3).
            
           **********************************************************************
           D5.1 version:
            
           Changed to work with (600/11). 
           ***********************************************************************
0          Referenced by comments of: 539/9, 568/1, 600/1, 600/2, 721/18 
00600/002A  SDS CLS                  CLS             OC  G          W059:SDSCLS                                                     
            5.1T1   666  SDS_CLS.CLS.OC.002                 1 LINE     80   59 PAGE UM   VALERIO             JULY 23, 1983  11:36:29
0          Object for (600/1).
00600/003A  SDS CLS                  CLI             SA  G          W059:SDSCLI.S                                                   
            5.1T1   667  SDS_CLS.CLI.SA.003                 1 LINE     80   85 PAGE UM   VALERIO             JULY 23, 1983  11:36:31
0          The SDS command language interpreter.  Copies SDSBT (600/15), SDSCONSTANT (600/16),
           and SDSPSECT (600/14). Assamble using SDSMACROS (600/13), COPY:MTS.MACROS
           (344/3), and *SYSMAC.
            
           ***********************************************************************
           D5.1 version:
            
           Changed to work with (600/11).
           ***********************************************************************
00600/004A  SDS CLS                  CLI             OC  G          W059:SDSCLI                                                     
            5.1T1   668  SDS_CLS.CLI.OC.004                 1 LINE     80   35 PAGE UM   VALERIO             JULY 23, 1983  11:36:35
00600/005   SDS CLS                  IOC             SA  G          W059:SDSIOC.S                                                   
            5.0T2   730  SDS_CLS.IOC.SA.005                 1 LINE     80   18 PAGE UM   VALERIO             JULY 03, 1981  15:48:43
            5.0T5   175                       
0          The SDS I/O control module.  Copies SDSPSECT (600/14), SDSCONSTANT
           (600/16), and SDSBT (600/15).  Assemble using SDSMACROS (600/13),
           COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/006   SDS CLS                  IOC             OC  G          W059:SDSIOC                                                     
            5.0T2   731  SDS_CLS.IOC.OC.006                 1 LINE     80   14 PAGE UM   VALERIO             JULY 03, 1981  15:48:45
            5.0T5   176                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  369
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00600/007   SDS CLS                  SIMULATOR       SA  G          W059:SDSSIML.S                                                  
            5.0T2   732  SDS_CLS.SIMULATOR.SA.007           1 LINE     70   30 PAGE UM   VALERIO             JULY 03, 1981  15:48:46
            5.0T5   177                       
0          The SDS instruction simulator.  Copies SDSPSECT (600/14) and 
           *CNFGINFODSECT (654).  Assemble using SDSMACROS (600/13) and
           COPY:MTS.MACROS (344/3).
00600/008   SDS CLS                  SIMULATOR       OC  G          W059:SDSSIML                                                    
            5.0T2   733  SDS_CLS.SIMULATOR.OC.008           1 LINE     80   18 PAGE UM   VALERIO             JULY 03, 1981  15:48:49
            5.0T5   178                       
00600/009   SDS CLS                  EDITOR          SA  G          W059:SDSEDTR.S                                                  
            5.0T2   734  SDS_CLS.EDITOR.SA.009              1 LINE     72   38 PAGE UM   VALERIO             JULY 03, 1981  15:48:51
            5.0T5   179                       
0          The SDS editor.  Copies SDSBT (600/15), SDSCONSTANT (600/16), and SDSPSECT (600/14).
           Assemble using SDSMACROS (600/13), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/010   SDS CLS                  EDITOR          OC  G          W059:SDSEDTR                                                    
            5.0T2   735  SDS_CLS.EDITOR.OC.010              1 LINE     80   18 PAGE UM   VALERIO             JULY 03, 1981  15:48:54
            5.0T5   180                       
00600/011C  SDS CLS                  TIMETALLY       SA  G          W059:SDSTTALLY.S                                                
            5.1T1   669  SDS_CLS.TIMETALLY.SA.011           1 LINE     72   28 PAGE UM   VALERIO             JULY 23, 1983  11:36:37
0          The SDS timetally support and exit routines. These routines
           handle the initilization of the timetally dsect, the construction
           of the timetally data structure, and the initialization and update
           of timetally timer values.  The exit routine handles updating of the
           timetally data structure when a timer interrupt occurs.  Assemble
           using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), *SYSMAC, and
           (600/14).
0          Referenced by comments of: 600/1, 600/3 
00600/012C  SDS CLS                  TIMETALLY       OC  G          W059:SDSTTALLY                                                  
            5.1T1   670  SDS_CLS.TIMETALLY.OC.012           1 LINE     80   22 PAGE UM   VALERIO             JULY 23, 1983  11:36:38
0          *********************************************************************
           D5.1 version:
            
           Added EQUs for existing variables.
           *********************************************************************
00600/013   SDS CLS                  SDSMACROS       SM  G  SDSM    W059:SDSMACROS                                                  
            5.0T2   736  SDS_CLS.SDSMACROS.SM.011           1 LINE     80   14 PAGE UM   VALERIO             JULY 03, 1981  15:48:56
            5.0T5   181                       
0          SDS macro library.
0          Referenced by comments of: 600/1, 600/3, 600/5, 600/7, 600/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  370
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00600/014A  SDS CLS                  SDSPSECT        SA  G          W059:SDSPSECT                                                   
            5.1T1   671  SDS_CLS.SDSPSECT.SA.014            1 LINE     80   38 PAGE UM   VALERIO             JULY 23, 1983  11:36:39
0          Copy section for SDS dsects.
0          Referenced by comments of: 600/1, 600/3, 600/5, 600/7, 600/9, 600/11 
00600/015   SDS CLS                  SDSBT           SA  G          W059:SDSBT                                                      
            5.0T2   738  SDS_CLS.SDSBT.SA.013               1 LINE     70    3 PAGE UM   VALERIO             JULY 03, 1981  15:49:00
            5.0T5   183                       
0          Copy section for branch tables.
0          Referenced by comments of: 600/3, 600/5, 600/9 
00600/016   SDS CLS                  SDSCONSTANT     SA  G          W059:SDSCONSTANT                                                
            5.0T2   739  SDS_CLS.SDSCONSTANT.SA.014         1 LINE     68    1 PAGE UM   VALERIO             JULY 03, 1981  15:49:01
            5.0T5   184                       
0          Copy section for constants.
0          Referenced by comments of: 600/1, 600/3, 600/5, 600/9 
00600/017A  SDS CLS                  OBJECT          OE  G          *CLSSDS                                                         
            5.1T1   672  SDS_CLS.OBJECT.OE.017              1 LINE     80  162 PAGE UM   VALERIO             JULY 23, 1983  11:36:41
                         *CLSSDS              
0          The SDS object is loaded into shared VM by PISTLE at IPL.
00600/018D  SDS CLS                  TEST NUCLEUS    SA  O          W237:SDSII.S                                                    
            5.1T1   673  SDS_CLS.TEST_NUCLEUS.SA.018        1 LINE     68    6 PAGE UM   VALERIO             JULY 23, 1983  11:36:46
0          Components (600/18) through (600/35) comprise a test version of SDS.
            
           This subcomponent is the nucleus for SDS. It gets entered from MTS,
           interprets the information in the interface dsects and calls the appropriate
           routine. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and
           *SYSMAC.
0          Referenced by comments of: 600/18, 821/30, 1042/1, 1042/42 
00600/019D  SDS CLS                  TEST RESET      SA  O          W237:SDSII.RESET                                                
            5.1T1   674  SDS_CLS.TEST_RESET.SA.019          1 LINE     68    2 PAGE UM   VALERIO             JULY 23, 1983  11:36:48
0          The reset entry point for SDS, gets entered whenever MTS calls SDS
           with the CLSRSTU bit set, cleans up everything and resets some 
           variables in the global dsect. Assemble using SDSII.MACROS (600/34),
           COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/020D  SDS CLS                  TEST EDITOR     SA  O          W237:SDSII.EDIT                                                 
            5.1T1   675  SDS_CLS.TEST_EDITOR.SA.020         1 LINE     68    8 PAGE UM   VALERIO             JULY 23, 1983  11:36:48
0          The nucleus of the SDS Loader record Editor,  contains routines
           for processing END, ESD, LDT, and SYM Record.  Gets entered whenever
1                                                                                               SUN SEP 08/96   15:24:55   Page  371
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          MTS calls SDS with the CLSEDTR bit set.  Assemble using
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/021D  SDS CLS                  TEST SYM ITEM   SA  O          W237:SDSII.RTNS                                                 
            5.1T1   676  SDS_CLS.TEST_SYM_ITEM.SA.021       1 LINE     72   43 PAGE UM   VALERIO             JULY 23, 1983  11:36:48
0          A file of all of the individual SYM record item parsers, one
           for each different type of SYM record item handled by SDS. 
           Assemble using SDSII.MACROS (600/34), and *SYSMAC.
00600/022D  SDS CLS                  TEST UNEDITOR   SA  O          W237:SDSII.UNEDIT                                               
            5.1T1   677  SDS_CLS.TEST_UNEDITOR.SA.022       1 LINE     65    2 PAGE UM   VALERIO             JULY 23, 1983  11:36:50
0          The UNEDIT entry point for SDS, gets entered whenever MTS calls SDS
           with the CLSUNED bit set,  releases the SDS symbol table and any
           link level specific storage in preparation for an unload or reload
           or return to a previous link level.  Assemble using
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/023D  SDS CLS                  TEST RETURN     SA  O          W237:SDSII.RET                                                  
            5.1T1   678  SDS_CLS.TEST_RETURN.SA.023         1 LINE     73   13 PAGE UM   VALERIO             JULY 23, 1983  11:36:50
0          The RETURN entry point for SDS, gets entered whenever MTS calls SDS
           with the CLSENDX or CLSINMSG bit set.  Sorts out the interrupt type
           and takes the appropriate action, possibly printing out a message
           pinpointing the location of the interrupt.  Assemble using 
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/024D  SDS CLS                  TEST CMD PROC   SA  O          W237:SDSII.CMD                                                  
            5.1T1   679  SDS_CLS.TEST_CMD_PROC.SA.024       1 LINE     73   12 PAGE UM   VALERIO             JULY 23, 1983  11:36:51
0          The command processing entry point for SDS, gets entered whenever
           MTS calls SDS with a one-shot command or when MTS calls SDS to go 
           into command mode or from within SDS following a call to SDS with 
           the CLSENDX bit set.  Assemble using SDSII.MACROS (600/34),
           COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/025D  SDS CLS                  TEST COMMANDS   SA  O          W237:SDSII.CMDS                                                 
            5.1T1   680  SDS_CLS.TEST_COMMANDS.SA.025       1 LINE     73   59 PAGE UM   VALERIO             JULY 23, 1983  11:36:52
0          A file of all of the individual command parsers, one for
           each SDS command.  Assemble using SDSII.MACROS (600/34), 
           COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/026D  SDS CLS                  TEST SYM TBL    SA  S          W237:SDSII.SYMTAB                                               
            5.1T1   681  SDS_CLS.TEST_SYM_TBL.SA.026        1 LINE     75   43 PAGE UM   VALERIO             JULY 23, 1983  11:36:54
0          A file of all of the symbol table dependent routines needed by the 
           SDS Editor and the individual command parsers.  Assemble using
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  372
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00600/027D  SDS CLS                  TEST SRE PARSE  SA  S          W237:SDSII.LEXPRS                                               
            5.1T1   682  SDS_CLS.TEST_SRE_PARSE.SA.027      1 LINE     77   22 PAGE UM   VALERIO             JULY 23, 1983  11:36:57
0          The SDS storage reference expression parser.  Parses SDS command
           operands of the form S(i)+j and all of it's variant forms including
           indirection, recursion and block parameters.  Assemble using 
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/028D  SDS CLS                  TEST STD OUT    SA  O          W237:SDSII.STDOUT                                               
            5.1T1   683  SDS_CLS.TEST_STD_OUT.SA.028        1 LINE     72   24 PAGE UM   VALERIO             JULY 23, 1983  11:36:58
0          The SDS standard output module, contains entry points to print 
           output for the ATTRIBUTE, DISPLAY, DUMP, FULLDISPLAY, HEXDISPLAY,
           PARLIST, SYMBOL and TRACE commands.  Does not handle
           anything that resembles an error message.  Assemble using 
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3) and *SYSMAC.
00600/029D  SDS CLS                  TEST INPUT CNV  SA  O          W237:SDSII.INCON                                                
            5.1T1   684  SDS_CLS.TEST_INPUT_CNV.SA.029      1 LINE     72   13 PAGE UM   VALERIO             JULY 23, 1983  11:36:59
0          The SDS input constant conversion routine.  Takes a string
           and returns it's value in internal form.  Assemble using
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/030D  SDS CLS                  TEST UTIL       SA  O          W237:SDSII.UTIL                                                 
            5.1T1   685  SDS_CLS.TEST_UTIL.SA.030           1 LINE     78   47 PAGE UM   VALERIO             JULY 23, 1983  11:37:00
0          A file of grungy little routines to perform tasks for the individual
           command parsers and various and sundry other routines that need 
           things done that should be done in a subroutine.  The home for all
           the routines that don't otherwise have a home.  Assemble using 
           SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/031D  SDS CLS                  TEST SIM        SA  O          W237:SDSII.SIML                                                 
            5.1T1   686  SDS_CLS.TEST_SIM.SA.031            1 LINE     73   33 PAGE UM   VALERIO             JULY 23, 1983  11:37:02
0          The SDS intruction simulaor and support routines.  The support
           routines set up the simulator dsect so that things take off
           properly when control returns to the EXEC cls.  Asseble using
           SDSII.MACROS (600/18, COPY:MTS.MACROS (344/3), and *SYSMAC.
00600/032D  SDS CLS                  TEST TIMETALLY  SA  O          W237:SDSII.TTALLY                                               
            5.1T1   687  SDS_CLS.TEST_TIMETALLY.SA.032      1 LINE     72   26 PAGE UM   VALERIO             JULY 23, 1983  11:37:03
0          The SDS timetally support and exit routines,  these routines
           handle the initilization of the timetally dsect the construction
           of the timetally data structure and the initialization and update
           of timetally timer values.  The exit routine handles updating of the
           timetally data structure when a timer interrupt occurs.  Assemble
           using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  373
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00600/033D  SDS CLS                  TEST ASYNCH     SA  O          W237:SDSII.ASYNCH                                               
            5.1T1   688  SDS_CLS.TEST_ASYNCH.SA.033         1 LINE     72    8 PAGE UM   VALERIO             JULY 23, 1983  11:37:05
0          A file of the asynchronous interrupt routines for attention and
           program interrupt processing.  The attention interrupt processor
           is straight forward, the program interrupt processor dumps the 
           entire sds data structure in a file (etc:sds.dump(*l+1) @um) and
           returns to MTS.  Also in this file is an initial ESD list of all
           of the SDS entry points for program interrupt location processing.
           Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3) and
           *SYSMAC.
00600/034D  SDS CLS                  TEST MACROS     SM  O          W237:SDSII.MACROS                                               
            5.1T1   689  SDS_CLS.TEST_MACROS.SM.034         1 LINE     68   24 PAGE UM   VALERIO             JULY 23, 1983  11:37:05
0          The SDS macro library which contains in addition to lots of helpful
           macros, macros defining all of the dsects used by SDS.  Depending
           on the macro used may copy *CNFGINFODSECT (654/1), *GDINFODSECT or
           *GDINFODSECT (594/1), *LOADINFODSECT, macros from 
           COPY:MTS.MACROS (344/3) and *SYSMAC.
0          Referenced by comments of: 600/11, 600/18, 600/19, 600/20, 600/21, 600/22, 600/23, 600/24, 600/25, 600/26, 600/27,
                 600/28, 600/29, 600/30, 600/32, 600/33 
00600/035D  SDS CLS                  TEST OBJECT     OE  O          *NEWCLSSDS                                                      
            5.1T1   690  SDS_CLS.TEST_OBJECT.OE.035         1 LINE  16365  239 PAGE UM   VALERIO             JULY 23, 1983  11:37:06
                         *NEWCLSSDS           
0          An assembled version of this giant mess although surely not as big 
           a mess as the giant mess this is replacing.
0          Referenced by comments of: 600/18 
00600/036D  SDS CLS                  TEST PRNT EXIT  SA  O          W237:PEXIT                                                      
            5.1T1   691  SDS_CLS.TEST_PRNT_EXIT.SA.036      1 LINE     80    6 PAGE UM   VALERIO             JULY 23, 1983  11:37:15
0          An Assembler H print exit for assembling listings with lots of
           modules. Strips off header and trailer pages.
00600/037D  SDS CLS                  TEST HELP/EXPL  D   O          ETC:SDS.HELP                                                    
            5.1T1   692  SDS_CLS.TEST_HELP/EXPL.D.037       1 LINE     82   63 PAGE UM   VALERIO             JULY 23, 1983  11:37:16
0          An SDS help/explain file, rough draft.
0          Referenced by comments of: 821/30, 1042/1, 1042/42 
00601/001   SLT INSTRUCTION DIAGRAM                  P              S1559 5.0T2 VLO FSNAME=SLT_INSTRUCTION_DIAGRAM..P.001(1)     746
            5.0T2   746  SLT_INSTRUCTION_DIAGRAM..P.001     1 LINE     75    1 PAGE UM                       AUG. 02, 1973  00:33.08
            5.0T5   191                       
0          Printer diagram showing operation of System/360 SLT (search list) instruction.
1                                                                                               SUN SEP 08/96   15:24:55   Page  374
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00602/001   NOT-RESEQUENCER                          SS             S1559 5.0T2 VLO FSNAME=NOT-RESEQUENCER..SS.001(1)            747
            5.0T2   747  NOT-RESEQUENCER..SS.001            1 LINE     63    2 PAGE UM   DWB                 JULY 28, 1977  03:55:16
            5.0T5   192                       
0          PROGRAM TO PUT SEQUENCE ID ON MTS (OR ANYTHING ELSE) FOR A NEW MASTER WITHOUT CHANGING THE ID'S ON EXISTING
           CARDS.  UNLIKE EARLIER VERSIONS, THE SEQUENCE ID DOES NOT HAVE TO BE ALL NUMERIC.
            
           USAGE:  RUN UPDATE DECK AGAINST MASTER TO PRODUCE UPDATED SOURCE.  THEN RUN THIS PROGRAM FEEDING
                   THE UPDATE DECK IN ON UNIT 3 AND THE UPDATED SOURCE ON UNIT 4.
           OUTPUT:  ON UNIT 8, THE NEW SOURCE TAPE WITH NEW ID'S INSERTED, AND
                    ON UNIT 7 (SPUNCH IF *SPITBOL), THE NEW UPDATE DECK WITH THE NEW ID'S ON THE CARDS TO BE INSERTED.
            
           IF THIS PROGRAM CAN'T FIT THE CARDS TO BE INSERTED BETWEEN TWO EXISTING ID'S, IT WILL PRINT AN ERROR COMMENT
           ON UNIT 6 ALONG WITH THE PREVIOUS CARD, THE FOLLOWING CARD, AND THE NUMBER OF CARDS TO BE INSERTED.  IT THEN
           GOES AHEAD, BUT USES "********" FOR THE ID ON THE CARDS FOR THAT INSERTION.
            
           ONE GENERALLY RUNS THIS PROGRAM TWICE-- FIRST TO FIND ALL THE PLACES THAT DON'T FIT, AND THEN FUDGES
           THE UPDATE DECK SLIGHTLY SO AS TO MAKE THEM FIT, THEN THE FINAL RUN.
00603/001   UC3330                                                # (PART OF UNIT CHECK ROUTINES)                                   
                                                                                    UM                                              
0          Part of Unit Check Routines (787/8).
00604/001   PRNTCNTS                                              # (PART OF SYSTEM WATCHERS)                                       
                                                                                    UM                                              
0          Part of System Watchers (540/3).
00605/001   TWAIT SUBR               D5 SOURCE       SA  G          S1561 5.0T4 VLO FSNAME=TWAIT_SUBR.D5_SOURCE.SA.001(1)        386
            5.0T4   386  TWAIT_SUBR.D5_SOURCE.SA.001        1 LINE     80    3 PAGE UM   MTA                 AUG. 09, 1981  23:16:40
            5.0T10  290                       
0          USER CALLABLE SUBROUTINE TO WAIT FOR A SPECIFIED REAL TIME INTERVAL AND THEN RETURN.
0          Referenced by comments of: 606/1 
00605/002   TWAIT SUBR                               OC  G          SEG2:TWAIT                                                      
            5.0T4   388  TWAIT_SUBR..OC.003                 1 LINE     80    1 PAGE UM   MTA                 AUG. 09, 1981  23:16:41
            5.0T10  292  SEG2:TWAIT           
00606/001   TICALL SUBR                              SA  G          S1559 5.0T2 VLO FSNAME=TICALL_SUBR..SA.001(1)                748
            5.0T2   748  TICALL_SUBR..SA.001                1 LINE     80    3 PAGE UM   MTA                 JULY 28, 1977  04:02:05
            5.0T5   193                       
0          SUBROUTINE TO PROVIDE AN INTERFACE TO THE MTS TIMER INTERRUPT SUBROUTINES (605) FROM FORTRAN PROGRAMS.
00606/002   TICALL SUBR                              OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   MTA                                        
0          Object part of *LIBRARY (524/1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  375
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00607/001   STIMER SUBR                              SA  G          S1559 5.0T2 VLO FSNAME=STIMER_SUBR..SA.001(1)                749
            5.0T2   749  STIMER_SUBR..SA.001                1 LINE     80    5 PAGE UM   MTA                 JULY 28, 1977  04:02:07
            5.0T5   194                       
0          SUBROUTINE TO PROVIDE MTS SUPPORT FOR THE OS/ 360 STIMER AND TTIMER MACROS
           WHICH ARE AVAILABLE IN *SYSMAC. SEE (545/31) IN FAKEOS FOR A TEST PROGRAM.
00607/002   STIMER SUBR                              OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   MTA                                        
0          Object part of *LIBRARY (524/1)
00608/001  *MVC                                      SA  G  MVC     W032:MVCSOU4.0                                                  
            5.0T2   750  MVC..SA.001                        1 LINE     80   38 PAGE UM   EMERY               JULY 03, 1981  15:49:21
            5.0T5   195                       
0          RECORD REFORMATTING PROGRAM.
00608/002  *MVC                                      OC  G          *MVC                                                            
            5.0T2   751  MVC..OC.002                        1 LINE     80    4 PAGE UM   EMERY               JULY 03, 1981  15:49:24
            5.0T5   196  *MVC                 
00609/001   7330 CCW SCANNER                                      # (OBSOLETE)                                                      
            D4T2    797  7330_CCW_SCANNER..SA.001           1 LINE     80    5 PAGE UM                       FEB. 14, 1975  00:29:06
0          360/67 PROGRAM TO SCAN ITEL 7330 DISK CHANNEL PROGRAMS TO FIND RESTART ADDRESS FOR SOFTWARE COMMAND RETRY.
00610/001A  FILE SAVE TAPE COPY                      SA             RSTR:FSTAPECOPY(1000)                                           
            5.1T1   693  FILE_SAVE_TAPE_COPY..SA.001        1 LINE     73   17 PAGE UM   HELFFRICH           JULY 23, 1983  11:37:19
                         RSTR:FSTAPECOPY      
0          Program to make copies of filesave tapes, as produced by FILE SAVE.  Will optionally
           make a listing of the files on the tape with or without copying.  Does not
           require that output tape be physically longer than input tape.  See the
           Operators Manual (592) for usage directions.  Copies *CNFGINFODSECT (654).
           Assemble with the FILESAVE macros (067/35).
            
           **************************************************************************
           D5.0B version:
            
           Changed to do I/O on GUSER and SERCOM and to take PAR field input
           for one-shot commands.
           **************************************************************************
0          Referenced by comments of: 67/1 
00610/002A  FILE SAVE TAPE COPY                      OC             RSTR:FSTAPECOPY(1,999)                                          
            5.1T1   694  FILE_SAVE_TAPE_COPY..OC.002        1 LINE     80   16 PAGE UM   HELFFRICH           JULY 23, 1983  11:37:21
00610/003A  FILE SAVE TAPE COPY      *FSC            C              *FSC                                                            
            5.1T1   695  FILE_SAVE_TAPE_COPY.?FSC.C.003     1 LINE     71    1 PAGE UM   HELFFRICH           JULY 23, 1983  11:37:21
                         RSTR:*FSC            
0          COMMAND FILE TO START THE FILESAVE TAPE COPY PROGRAM.  INVOKED BY ENTERING
1                                                                                               SUN SEP 08/96   15:24:55   Page  376
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          "MTS *FSC" ON THE OPERATOR'S CONSOLE.
00611/001   LOCKSTAT                                              # (OBSOLETE)                                                      
            D4T2    802  LOCKSTAT..SA.001                   1 LINE     80    6 PAGE UM                       AUG. 02, 1973  00:36.13
0          PROGRAM TO PRINT LOCK BYTE COUNTS AND TIMES FROM THE SUPERVISOR (045).
00612/001A  LETGO SUBR                               SA  G          S0792 WSGFS FSNAME=LETGO                                        
            5.1T1   696  LETGO_SUBR..SA.001                 1 LINE     80    3 PAGE UM   WSG                 FEB. 09, 1983  11:42:12
0          Subroutine to unlock and relock files at specified intervals of
           real time. See writeup in MTS Volume 3. Source in lines 1,999.
00612/002A  LETGO SUBR                               OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   WSG                                        
0          Object part of *LIBRARY (524/1)
00613/001   LONGREAD                                 SA  S          S1559 5.0T2 VLO FSNAME=LONGREAD..SA.001(1)                   756
            5.0T2   756  LONGREAD..SA.001                   1 LINE     80    1 PAGE UM   WSG                 AUG. 02, 1973  00:36.19
            5.0T5   201                       
0          Program to deblock magnetic tape blocks which are up to 65534
           bytes long using MTS mag tape DSR. Not for general use since it
           requires that the size parameter in the TAPERTN DSECT be patched.
           See comments in listing.
00613/002   LONGREAD                                 OC  S          S1559 5.0T2 VLO FSNAME=LONGREAD..OC.002(1)                   757
            5.0T2   757  LONGREAD..OC.002                   1 LINE     80    1 PAGE UM   WSG                 AUG. 02, 1973  00:36.21
            5.0T5   202                       
00614/001   START JOB                                             # (OBSOLETE)                                                      
            D3T5    184  START_JOB..SA.1                    1 LINE     80    1 PAGE UM                       AUG. 02, 1973  00:36.23
0          Obsoleted by the $SYSTEMSTATUS command.
00615/001   PLOT SYSTEM              MACROS          SM  G          W030:CCMACROS                                                   
            5.0T2   758  PLOT_SYSTEM.MACROS.SM.001          1 LINE     80    3 PAGE UM   LIFT                JULY 03, 1981  15:49:40
            5.0T5   203                       
0          THE UM MTS CALCOMP PLOT ROUTINES.
            
           SEVERAL OF THE SOURCE SUB-COMPONENTS OF THE PLOT SYSTEM CONSIST OF MORE THAN ONE ASSEMBLY, SO ASSEMBLE WITH PAR=B.
            
           (615/1) CONTAINS PLOT SYSTEM MACRO LIBRARY USED TO ASSEMBLE SOME OF THE ROUTINES.
0          Referenced by comments of: 615/1, 615/3 
00615/002   PLOT SYSTEM              PLTBGN          SA  G          W030:PLTBGN                                                     
            5.0T2   759  PLOT_SYSTEM.PLTBGN.SA.002          1 LINE     71   14 PAGE UM   LIFT                JULY 03, 1981  15:49:41
            5.0T5   204                       
0          SUBROUTINE IN *PLOTSYS.  ASSEMBLE USING *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  377
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 615/9 
00615/003A  PLOT SYSTEM              ASM             SA  G          W030:CCASM                                                      
            5.1T1   697  PLOT_SYSTEM.ASM.SA.003             1 LINE     80   41 PAGE UM   LIFT                JULY 23, 1983  11:37:24
0          SUBROUTINES IN *PLOTSYS.  ASSEMBLE USING PLOT MACROS (615/1) AND *SYSMAC.
            
           **************************************************************************
           D5.0B version:
            
           PPOLY and PCIRCL added.
           **************************************************************************
0          Referenced by comments of: 615/9 
00615/004A  PLOT SYSTEM              FORT            SF  G          W030:CCFORT                                                     
            5.1T1   698  PLOT_SYSTEM.FORT.SF.004            1 LINE     76   17 PAGE UM   LIFT                JULY 23, 1983  11:37:26
0          Subroutines in *PLOTSYS.
            
           *************************************************************************
           D5.0B version:
            
           PCIRCL changed.
           *************************************************************************
0          Referenced by comments of: 615/9 
00615/005   PLOT SYSTEM              PSYM            SA  G          W030:PSYM                                                       
            5.0T2   762  PLOT_SYSTEM.PSYM.SA.005            1 LINE     68   14 PAGE UM   LIFT                JULY 03, 1981  15:49:57
            5.0T5   207                       
0          CHARACTER GENERATION ROUTINE WHICH USES 256-CHARACTER ALPHABETS, ALLOWS
           SLANTING OF LETTERS, AND CHANGING PROPORTIONS AND SPACING.  SEE THE
           INSTALLATION INSTRUCTIONS (615/23) FOR AN EXPLANATION OF THE &WHAT ASSEMBLY
           PARAMETER.  COPIES CBDSECT (615/7).
0          Referenced by comments of: 532/1, 615/6, 615/7, 615/9, 615/16, 615/18, 615/21, 615/22, 615/48, 615/51 
00615/006   PLOT SYSTEM              PALPHA          SA  G          W030:PALPHA                                                     
            5.0T2   763  PLOT_SYSTEM.PALPHA.SA.006          1 LINE     68   10 PAGE UM   LIFT                JULY 03, 1981  15:49:59
            5.0T5   208                       
0          THIS ROUTINE IS USED WITH PSYM (615/5).  THE STANDARD ALPHABET ACTUALLY RESIDES
           HERE.  HOWEVER, PALPHA CAN OBTAIN ALTERNATE ALPHABETS FROM ETC:PLOTALPHA (615/8)
           OR FROM A USER FILE.  COPIES CBDSECT (615/7). 
0          Referenced by comments of: 615/7, 615/8, 615/9, 615/16, 615/18, 615/21, 615/22, 615/48, 615/51 
00615/007   PLOT SYSTEM              CBDSECT         SA  G          W030:CBDSECT                                                    
            5.0T2   764  PLOT_SYSTEM.CBDSECT.SA.007         1 LINE     69    1 PAGE UM   LIFT                JULY 03, 1981  15:50:00
            5.0T5   209                       
0          DSECT COPIED BY PSYM (615/5) AND PALPHA (615/6) WHICH DESCRIBES THE STRUCTURE
1                                                                                               SUN SEP 08/96   15:24:55   Page  378
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          OF CHARACTER SETS (ALPHABETS).
0          Referenced by comments of: 615/5, 615/6 
00615/008   PLOT SYSTEM              ETC:PLOTALPHA   D              ETC:PLOTALPHA                                                   
            5.0T2   765  PLOT_SYSTEM.ETC:PLOTALPHA.D.008    1 LINE  22530   53 PAGE UM   LIFT                JULY 03, 1981  15:50:01
            5.0T5   210  ETC.:PLOTALPHA       
0          A DATA FILE FOR STANDARD SYSTEM CHARACTER SETS (ALPHABETS).  THE FORMAT OF THE
           FILE IS DESCRIBED IN THE SOURCE FOR PALPHA (615/6); THE FORMAT OF THE CHARACTER
           SETS IS DESCRIBED IN MTS VOLUME 11 (AUGUST 1978).
0          Referenced by comments of: 615/6, 3018/135 
00615/009A  PLOT SYSTEM              *PLOTSYS        OL  G          *PLOTSYS                                                        
            5.1T1   699  PLOT_SYSTEM.?PLOTSYS.OL.009        1 LINE   5456   23 PAGE UM   LIFT                JULY 23, 1983  11:37:27
                         *PLOTSYS             
0          OBJECT LIBRARY GENERATED FROM (615/2) + (615/3) + (615/4) + (615/5) +
           (615/6).
0          Referenced by comments of: 498/20, 498/67, 615/24, 615/26, 681/5, 824/5, 3018/137 
00615/010A  PLOT SYSTEM              PLOTTER         SA  G          W030:PLOTTER                                                    
            5.1T1   700  PLOT_SYSTEM.PLOTTER.SA.010         1 LINE     72   21 PAGE UM   LIFT                JULY 23, 1983  11:37:27
0          Plotter routine for CalComp 936 and 1051 and ZIGZAG routine for CalComp 936
           only. These routines are used to read and translate PDF's for *CCQUEUE
           (615/16) and SYS:CCP (615/18). See the installation instructions (615/23) for
           an explanation of the &WHAT assembly parameter which controls the production
           of different versions. Assemble using plot system macros (615/14).
            
           ***************************************************************************
           D5.0B version:
            
           Changed to add DELIVERY= keyword.
           ***************************************************************************
0          Referenced by comments of: 615/11, 615/16, 615/18, 615/21, 615/22 
00615/011   PLOT SYSTEM              ZIGZAG 1051     SA  G          W030:ZIGZAG                                                     
            5.0T2   768  PLOT_SYSTEM.ZIGZAG_1051.SA.011     1 LINE     80    8 PAGE UM   LIFT                JULY 03, 1981  15:50:13
            5.0T5   213                       
0          This subroutine replaces the ZIGZAG routine in (615/10) for use with the
           CalComp 1051 plotter.  Assemble using the plot system macros (615/14).
0          Referenced by comments of: 615/22 
00615/012   PLOT SYSTEM              ENDPLOT         SA  G          W030:ENDPLOT                                                    
            5.0T2   769  PLOT_SYSTEM.ENDPLOT.SA.012         1 LINE     80    2 PAGE UM   LIFT                JULY 03, 1981  15:50:15
            5.0T5   214                       
0          SUBROUTINE TO PRINT "END OF PLOTS ....." FOR PLOTCON (615/20).
1                                                                                               SUN SEP 08/96   15:24:55   Page  379
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 615/21, 615/22 
00615/013   PLOT SYSTEM              TEARLINE        SA  G          W030:TEARLINE                                                   
            5.0T2   770  PLOT_SYSTEM.TEARLINE.SA.013        1 LINE     80    3 PAGE UM   LIFT                JULY 03, 1981  15:50:16
            5.0T5   215                       
0          SUBROUTINE TO PUT SPACE AND DASHED LINES (TEAR HERE) BETWEEN PLOTS.  IT HAS 
           BEEN ADDED AS A SEPARATE SUBROUTINE BECAUSE THE OPERATIONS STAFF AT MICHIGAN
           LIKES TO VARY THIS SORT OF THING.
0          Referenced by comments of: 615/21, 615/22, 615/48 
00615/014A  PLOT SYSTEM              MACROS          SM  G          W030:PLOTTER.MAC                                                
            5.1T1   701  PLOT_SYSTEM.MACROS.SM.014          1 LINE     67    3 PAGE UM   LIFT                JULY 23, 1983  11:37:29
0          Macro library used by post-processing routines.
            
           ****************************************************************************
           D5.0B version:
            
             -- QLINE added.
             -- changed to add DELIVERY= keyword. 
           ****************************************************************************
            
0          Referenced by comments of: 615/10, 615/11, 615/15, 615/17, 615/20, 615/29, 615/31, 615/38, 615/44 
00615/015A  PLOT SYSTEM              *CCQUEUE        SA  G          W030:CCQ                                                        
            5.1T1   702  PLOT_SYSTEM.?CCQUEUE.SA.015        1 LINE     70   20 PAGE UM   LIFT                JULY 23, 1983  11:37:29
0          Main program for *CCQUEUE, and subroutines CCQCNCL and PLOTCOST.  Copies
           COPY:RATEVEC (651/3), COPY:GLOBALS (1026/3), and COPY:LLMPSEQU (087).
           Assemble using COPY:MTS.MACROS (344/3), and plot system macros (615/14).
            
           ***************************************************************************
           D5.0B version:
            
           Changed to add DELIVERY= keyword.
           ***************************************************************************
0          Referenced by comments of: 615/16, 615/47 
00615/016A  PLOT SYSTEM              *CCQUEUE        OE  G          *CCQUEUE                                                        
            5.1T1   703  PLOT_SYSTEM.?CCQUEUE.OE.016        1 SEQ    6616    7 PAGE UM   LIFT                JULY 23, 1983  11:37:30
                         *CCQUEUE             
0          Program to queue users plots for post-processing by *CCP. Adds a line to
           *CCPFILE, (615/34), indicating the plot to be processed. Object from
           (615/15) + (615/10) + (615/5) + (615/6).
0          Referenced by comments of: 615/10 
1                                                                                               SUN SEP 08/96   15:24:55   Page  380
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00615/017A  PLOT SYSTEM              CCP             SA  G          W030:CCP                                                        
            5.1T1   704  PLOT_SYSTEM.CCP.SA.017             1 LINE     69   20 PAGE UM   LIFT                JULY 23, 1983  11:37:30
0          Main program for *CCP plus subroutine TAPECON.  Copies COPY:GLOBALS (1026/3).
           Assemble using plot system macros (615/14).
            
           ***************************************************************************
           D5.0B version:
            
           Changed to add DELIVERY= keyword.
           ***************************************************************************
0          Referenced by comments of: 615/18, 615/37, 615/47 
00615/018A  PLOT SYSTEM              CCP             OE  G          SYS:CCP                                                         
            5.1T1   705  PLOT_SYSTEM.CCP.OE.018             1 LINE   5604    5 PAGE UM   LIFT                JULY 23, 1983  11:37:31
                         SYS.:CCP             
0          Post-processor program run by *CCP command file (615/19) used by the system
           operator to generate plot tapes. Consists of object from (615/17) + (615/10)
           + (615/5) + (615/6).
0          Referenced by comments of: 615/10, 615/19, 615/35 
00615/019   PLOT SYSTEM              *CCP            C              *CCP                                                            
            5.0T2   776  PLOT_SYSTEM.*CCP.C.019             1 LINE     25    1 PAGE UM   LIFT                JULY 03, 1981  15:50:27
            5.0T5   221  *CCP                 
0          COMMAND FILE INVOKED BY ENTERING "MTS *CCP" ON OPERATOR'S CONSOLE.  USED BY THE
           SYSTEM OPERATOR TO GENERATE THE PLOT TAPES.  RUNS THE SYS:CCP PROGRAM (615/18).
0          Referenced by comments of: 615/18, 615/31, 615/33, 615/38 
00615/020A  PLOT SYSTEM              PLOTCON         SA  G          W030:PLOTCON                                                    
            5.1T1   706  PLOT_SYSTEM.PLOTCON.SA.020         1 LINE     70   18 PAGE UM   LIFT                JULY 23, 1983  11:37:31
0          Program used by the operator to plot the queued plots on the UM online
           plotter.  See the writeup in the Operators' Manual (592).  Assemble using
           plot system macros (615/14).
            
           ***************************************************************************
           D5.0B version:
            
           Changed to add DELIVERY= keyword.
           ***************************************************************************
0          Referenced by comments of: 615/12, 615/21, 615/22, 615/36 
00615/021A  PLOT SYSTEM              PLOTCON         OE  G          SYS:PLT36                                                       
            5.1T1   707  PLOT_SYSTEM.PLOTCON.OE.021         1 LINE   4420    8 PAGE UM   LIFT                JULY 23, 1983  11:37:32
                         SYS.:PLT36           
0          Object for (615/5), (615/6), PLOTTER (615/10), ZIGZAG (615/12), (615/13), and
           (615/20). This file is for use with the CalComp 936.
1                                                                                               SUN SEP 08/96   15:24:55   Page  381
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00615/022A  PLOT SYSTEM              PLOTCON         OE  G          SYS:PLT51                                                       
            5.1T1   708  PLOT_SYSTEM.PLOTCON.OE.022         1 LINE   4368    8 PAGE UM   LIFT                JULY 23, 1983  11:37:33
                         SYS:PLT51            
0          Object for (615/5), (615/6), PLOTTER only (615/10), (615/11), (615/12),
           (615/13), and (615/20). This file is for use with the CalComp 1051.
00615/023   PLOT SYSTEM              INSTALLATION    P              S0876 CCGHL 'CALCOMP' FSNAME=PLOTINFO                           
            5.0T2   780  PLOT_SYSTEM.INSTALLATION.P.023     1 LINE     71    3 PAGE UM   LIFT                FEB. 20, 1980  19:28:49
            5.0T5   225                       
0          Referenced by comments of: 615/5, 615/10 
00615/024   PLOT SYSTEM              PDSTOMNET       SA  G          S1559 5.0T2 VLO FSNAME=PLOT_SYSTEM.PDSTOMNET.SA.024(1)       781
            5.0T2   781  PLOT_SYSTEM.PDSTOMNET.SA.024       1 LINE     76    8 PAGE UM   EADIE               JUNE 12, 1977  21:56:34
            5.0T5   226                       
0          THIS IS A UTILITY TO CONVERT A PLOT DESCRIPTION SYSTEM, PDS, PLOT FILE TO A
           PLOT FILE IN MERIT NETWORK STANDARD FORM. CONTAINS A $CONTINUE WITH *PLOTSYS
           (615/9) RECORD.
00615/025   PLOT SYSTEM              *PDSTOMNET      OC  G          *PDSTOMNET                                                      
            5.0T2   782  PLOT_SYSTEM.*PDSTOMNET.OC.025      1 LINE     80    3 PAGE UM   EADIE               JULY 03, 1981  16:02:12
            5.0T5   227  *PDSTOMNET           
0          ENDS WITH "$CONTINUE WITH *PLOTSYS"
00615/026   PLOT SYSTEM              MNETTOPDS       SA  G          S1559 5.0T2 VLO FSNAME=PLOT_SYSTEM.MNETTOPDS.SA.026(1)       783
            5.0T2   783  PLOT_SYSTEM.MNETTOPDS.SA.026       1 LINE     89    5 PAGE UM   EADIE               FEB. 15, 1976  18:12:38
            5.0T5   228                       
0          THIS IS A UTILITY TO CONVERT A MERIT NETWORK STANDARD PLOT FILE TO A PLOT
           DESCRIPTION (PDS) PLOT FILE. CONTAINS A $CONTINUE WITH *PLOTSYS (615/9).
00615/027   PLOT SYSTEM              *MNETTOPDS      OC  G          *MNETTOPDS                                                      
            5.0T2   784  PLOT_SYSTEM.*MNETTOPDS.OC.027      1 LINE     80    3 PAGE UM   EADIE               JULY 03, 1981  16:02:30
            5.0T5   229  *MNETTOPDS           
0          ENDS WITH "$CONTINUE WITH *PLOTSYS"
00615/028   PLOT SYSTEM              *CCT            C              *CCT                                                            
            5.0T2   785  PLOT_SYSTEM.*CCT.C.028             1 LINE     23    1 PAGE UM   LIFT                JULY 03, 1981  16:02:30
            5.0T5   230  *CCT                 
0          Command file used to run the CCT program (615/29).  Invoked by entering "MTS
           *CCT" on the operators console.
00615/029   PLOT SYSTEM              CCT PGM         SA  G          S0876 CCGHL 'CALCOMP' FSNAME=CCT                                
            5.0T2   786  PLOT_SYSTEM.CCT_PGM.SA.029         1 LINE     80    3 PAGE UM   LIFT                NOV. 02, 1977  12:28:11
            5.0T5   231                       
0          Program to compute and print the time required to plot the plots currently
           in the plot queue (*CCPFILE).  Assemble using plot system macros (615/14).
1                                                                                               SUN SEP 08/96   15:24:55   Page  382
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 615/28 
00615/030   PLOT SYSTEM              CCT PGM         OC  G          SYS:CCT                                                         
            5.0T2   787  PLOT_SYSTEM.CCT_PGM.OC.030         1 LINE     80    1 PAGE UM   LIFT                JULY 03, 1981  16:03:04
            5.0T5   232  SYS.:CCT             
00615/031   PLOT SYSTEM              PLOTTAPE        SA  G          W030:PLOTTAPE                                                   
            5.0T2   788  PLOT_SYSTEM.PLOTTAPE.SA.031        1 LINE     80    6 PAGE UM   LIFT                JULY 03, 1981  16:03:05
            5.0T5   233                       
0          Program used for two functions:
            
            1.  Initializing plot tapes for use by *CCP (615/19), and
            2.  Constructing plot priority information in the file SYS:CCPPRIO (615/33)
                for use by *CCP.
            
           Assemble using PLOT SYSTEM MACROS (615/14).
00615/032   PLOT SYSTEM              PLOTTAPE        OC  G          W030:PLOTTAPE(1000)                                             
            5.0T2   789  PLOT_SYSTEM.PLOTTAPE.OC.032        1 LINE     80    3 PAGE UM   LIFT                JULY 03, 1981  16:03:07
            5.0T5   234                       
00615/033   PLOT SYSTEM              PRIORITY FILE   D              SYS.:CCPPRIO                                                    
            5.0T2   790  PLOT_SYSTEM.PRIORITY_FILE.D.033    1 LINE     88    1 PAGE UM   LIFT                JULY 03, 1981  16:03:08
            5.0T5   235  SYS.:CCPPRIO         
0          FILE CONTAINING PLOT PRIORITY INFORMATION USED BY *CCP (615/19) 
           AND *CCD (615/43).
0          Referenced by comments of: 615/31, 615/44 
00615/034   PLOT SYSTEM              *CCPFILE        D            # *CCPFILE                                                        
                                                                                    UM   LIFT                                       
                         SYS.:*CCPFILE@E      
0          THIS IS THE SYSTEM PLOT QUEUE FILE.
0          Referenced by comments of: 615/16, 615/35 
00615/035   PLOT SYSTEM              BACKUPQ         D            # SYS:BACKUPQ                                                     
                                                                                    UM   LIFT                                       
                         SYS:BACKUPQ@E        
0          USED BY CCP (615/18) TO BACKUP *CCPFILE (615/34).
00615/036   PLOT SYSTEM              PLOTDIR         D            # SYS:PLOTDIR                                                     
                                                                                    UM   LIFT                                       
                         SYS:PLOTDIR@E        
0          PLOT DIRECTORY FILE USED BY PLOTCON (615/20) TO POINT TO PLOT DATA STORED IN
           OTHER PERMANENT FILES, WHICH IT WILL CREATE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  383
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00615/037   PLOT SYSTEM              PLOTREBAT       D            # SYS:PLOTREBAT                                                   
                                                                                    UM   LIFT                                       
                         SYS:PLOTREBAT@E      
0          DATA WRITTEN INTO THIS FILE BY CCP (615/17) FOR CANCELLED PLOTS IS USED BY
           CCREBATE (632/8) TO GENERATE INPUT RECORDS FOR THE REBATE PROGRAM.
0          Referenced by comments of: 632/8 
00615/038   PLOT SYSTEM              CCPINIT         SA  G          W030:CCPINIT                                                    
            5.0T2   791  PLOT_SYSTEM.CCPINIT.SA.038         1 LINE     80    6 PAGE UM   LIFT                JULY 03, 1981  16:03:09
            5.0T5   236                       
0          PROGRAM USED BY THE SYSTEM OPERATOR TO INITIALIZE (SET VOLUME LABEL AND IDENT 
           FILE) PLOT TAPES FOR USE BY *CCP (615/19).  INSTRUCTIONS WITHIN AND IN
           OPERATOR'S MANUAL.  SOURCE IN LINES 1,999.
            
           ASSEMBLE USING PLOT SYSTEM MACROS (615/14).
00615/039   PLOT SYSTEM              CCPINIT         OC  G          SYS:CCPINIT                                                     
            5.0T2   792  PLOT_SYSTEM.CCPINIT.OC.039         1 LINE     80    3 PAGE UM   LIFT                JULY 03, 1981  16:03:10
            5.0T5   237  SYS.:CCPINIT         
0          Referenced by comments of: 615/40 
00615/040   PLOT SYSTEM              *CCL            C              *CCL                                                            
            5.0T2   793  PLOT_SYSTEM.*CCL.C.040             1 LINE     40    1 PAGE UM   LIFT                JULY 03, 1981  16:03:11
            5.0T5   238  *CCL                 
0          COMMAND FILE INVOKED BY ENTERING "MTS *CCL" ON OPERATOR'S CONSOLE.  USED BY
           THE SYSTEM OPERATOR TO INITIALIZE PLOT TAPES.  RUNS THE SYS:CCPINIT PROGRAM
           (615/39).
00615/041   PLOT SYSTEM              CCPDEFER        SA  G          S0876 CCGHL 'CALCOMP' FSNAME=CCPDEFER                           
            5.0T2   794  PLOT_SYSTEM.CCPDEFER.SA.041        1 LINE     80    5 PAGE UM   LIFT                APR. 28, 1978  20:17:20
            5.0T5   239                       
0          PROGRAM USED BY SYSTEM OPERATOR TO TELL CCP TO PUT PLOTS FOR CERTAIN CCIDS
           ON "DEFERRED" PLOT TAPE.  INSTRUCTIONS AND DESCRIPTIONS WITHIN, AND IN 
           OPERATOR'S MANUAL (592).  SOURCE IN LINES 1,999.
00615/042   PLOT SYSTEM              CCPDEFER        OC  G          SYS:CCPDEFER                                                    
            5.0T2   795  PLOT_SYSTEM.CCPDEFER.OC.042        1 LINE     80    2 PAGE UM   LIFT                JULY 03, 1981  16:03:14
            5.0T5   240  SYS.:CCPDEFER        
0          Referenced by comments of: 615/43 
00615/043   PLOT SYSTEM              *CCD            C              *CCD                                                            
            5.0T2   796  PLOT_SYSTEM.*CCD.C.043             1 LINE     37    1 PAGE UM   LIFT                JULY 03, 1981  16:03:16
            5.0T5   241  *CCD                 
0          COMMAND FILE INVOKED BY ENTERING "MTS *CCD" ON OPERATOR'S CONSOLE.  USED BY
           THE SYSTEM OPERATOR TO PUT PLOTS FOR CERTAIN CCIDS ON "DEFERRED" PLOT TAPE.
           RUNS THE SYS:CCPDEFER PROGRAM (615/42).
1                                                                                               SUN SEP 08/96   15:24:55   Page  384
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 615/33 
00615/044   PLOT SYSTEM              PIDENT          SA  G          S0876 CCGHL 'CALCOMP' FSNAME=PIDENT                             
            5.0T2   797  PLOT_SYSTEM.PIDENT.SA.044          1 LINE     80    4 PAGE UM   LIFT                FEB. 19, 1979  22:09:23
            5.0T5   242                       
0          PROGRAM TO PRINT PLOT TAPE IDENTIFICATION, INCLUDING DATE LAST USED,
           MINIMUM TIME BETWEEN USES, AND THE LINE IN CCPPRIO (615/33) WHICH CONTAINS
           THE PLOT PRIORITY INFORMATION.  SOURCE IN LINES 1,999.  ASSEMBLE USING
           PLOT SYSTEM MACROS (615/14).
0          Referenced by comments of: 615/46 
00615/045   PLOT SYSTEM              PIDENT          OC  G          SYS:PIDENT                                                      
            5.0T2   798  PLOT_SYSTEM.PIDENT.OC.045          1 LINE     80    1 PAGE UM   LIFT                JULY 03, 1981  16:03:37
            5.0T5   243  SYS.:PIDENT          
00615/046   PLOT SYSTEM              *PLB            C              *PLB                                                            
            5.0T2   799  PLOT_SYSTEM.*PLB.C.046             1 LINE     38    1 PAGE UM   LIFT                JULY 03, 1981  16:03:38
            5.0T5   244  *PLB                 
0          COMMANDS TO RUN PIDENT (615/44) FROM OPERATOR'S CONSOLE.  DOCUMENTATION
           IS IN THE OPERATOR'S MANUAL (592).
00615/047C  PLOT SYSTEM              PLOTQUIK        SA  G          W030:PLOTQUIK                                                   
            5.1T1   709  PLOT_SYSTEM.PLOTQUIK.SA.047        1 LINE     71   16 PAGE UM   LIFT                JULY 23, 1983  11:37:34
0          Used for plots for which the user has requested "quick turnaround" (ASAP
           parameter in CCQUEUE (615/15)).  When *PLQ (615/49) is started by the
           operator, it selects ASAP plots, and plots them immediately.  These 
           plots are copied to the plot tape by CCP (615/17).  See also comments
           at the beginning of this file.
0          Referenced by comments of: 615/48, 615/49 
00615/048C  PLOT SYSTEM              PLOTQUIK        OC  G          SYS:PLOTQUIK                                                    
            5.1T1   710  PLOT_SYSTEM.PLOTQUIK.OC.048        1 LINE   5942    4 PAGE UM   LIFT                JULY 23, 1983  11:37:35
                         SYS:PLOTQUIK         
0          Object module for PLOTQUIK (615/47). Also contains a copy of TEARLINE
           (object of (615/13)), and $CONTINUE WITH SYS:PSYM (615/5) and (615/6)
00615/049C  PLOT SYSTEM              PLOTQUIK        C   G          *PLQ                                                            
            5.1T1   711  PLOT_SYSTEM.PLOTQUIK.C.049         1 LINE     54    1 PAGE UM   LIFT                JULY 23, 1983  11:37:35
                         *PLQ                 
0          Operator command file to run PLOTQUIK (615/47).
0          Referenced by comments of: 615/47 
00615/050C  PLOT SYSTEM              PLOTSTACK       SA  G          W030:PLOTSTACK(1,999)                                           
            5.1T1   712  PLOT_SYSTEM.PLOTSTACK.SA.050       1 LINE     72    6 PAGE UM   LIFT                JULY 23, 1983  11:37:36
0          A program, originally from WSU, to stack plots in the "y" direction
1                                                                                               SUN SEP 08/96   15:24:55   Page  385
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          in order to save paper.  
0          Referenced by comments of: 615/51 
00615/051C  PLOT SYSTEM              PLOTSTACK       OE  G          *PLOTSTACK                                                      
            5.1T1   713  PLOT_SYSTEM.PLOTSTACK.OE.051       1 LINE  13314    8 PAGE UM   LIFT                JULY 23, 1983  11:37:36
0          Object of (615/50) plus the objects of PSYM (615/5) and PALPHA (615/6).
00616/001A  TERM USAGE STATISTICS                    SA  G          WSG:DCSTAT.S                                                    
            5.1T1   714  TERM_USAGE_STATISTICS..SA.001      1 LINE     72   22 PAGE UM   WSG                 JULY 23, 1983  11:37:37
0          Program to compute system usage by various terminal types, classes,
           and speeds. It reads *STATISTICS data and prints the elapsed time,
           CPU time, CPU VMI, and wait VMI for each type of terminal access. In
           addition, it also summarizes usage by class of user ID, e.g.,
           student, faculty, research, etc.
            
           The distributed version is set up for the UM terminal/network names
           and UM user ID assignment scheme.
            
           The following commands are available:
            
            MTS
               Return control to MTS temporarily.
            PRINT
               Print the terminal and user ID class summaries for the data
               previously read by STAT and/or RESTORE commands.
            SAVE
               Save the data previously read by STAT and/or RESTORE commands
               on the file assigned to unit 0.
            STAT DATE=mm-dd -yy¬ ...mm-dd -yy¬¬  TIME=hh:mm...hh:mm¬
               Process *STATISTICS type data from tape using the directory
               system (742).
            STAT FDname
               Process *STATISTICS type data from the file specified.
            RESTORE
               Read data from the file assigned to unit 0. This data must
               previously have been written by a SAVE command.
            RESET
               Delete the data previously read by a STAT and/or RESTORE
               command.
            STOP
               Stop execution of the program.
            $MTScommand
               Execute the specified MTS command.
            
            
           Calls the STATIO routine (617/2) and STACNVRT (500/59). Assemble using
           COPY:MTS.MACROS (344/3) and the usage statistics macros (617/3).
0          Referenced by comments of: 616/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  386
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00616/002A  TERM USAGE STATISTICS                    OC  G          WSG:DCSTAT                                                      
            5.1T1   715  TERM_USAGE_STATISTICS..OC.002      1 LINE  10725    8 PAGE UM   WSG                 JULY 23, 1983  11:37:38
0          Object from (616/1) + (617/2). Also contains the following:
               $CONTINUE WITH LIB:STAFF RETURN    (837/1)
               $CONTINUE WITH SYS:DIRLIB RETURN   (742/5)
               $CONTINUE WITH COPY:SYSDEFS        (579/3)
00617/001A  USAGE STATISTICS         STAT PGM        SA  G          WSG:STAT.S                                                      
            5.1T1   716  USAGE_STATISTICS.STAT_PGM.SA.001   1 LINE     72    8 PAGE UM   WSG                 JULY 23, 1983  11:37:39
0          Program to print system usage for specified user id's, answerbacks,
           and master source device names. For each record found, the user id,
           project number, signon and off times, date, answerback, elapsed
           time, and merit connect time are printed on SPRINT and the total
           elapsed time for all jobs found is printed on SERCOM. The following
           commands are accepted:
            
               DATE mm-dd mm-dd    specify date range for subsequent searches.
               TIME hh:mm hh:mm    specify time range for subsequent searches.
               U userid            scan for all runs for this userid.
               D name              scan for all runs from this msource device.
               A answerback        scan for all runs with this answerback code.
               N                   scan for all runs using Merit outbound
                                   connections.
               R rdcid             scan for all runs from the Remote Data
                                   Concentrator with this rdcid.
            
           Note: the character "#" is used as a fill character for the matching
           done by the U, D, and A commands. For example "D LA##" will find all
           jobs on any "LA" Memorex 1270 line. The file from which the input
           statistics data is read may be specified in the PAR field or a tape
           may be specified by giving "PAR=TAPE-vol 'tape id'" where vol is the
           volume name of the tape to be mounted and 'tape id' is the external
           label. "PAR=TAPE" means the tape is unlabeled. Note: if no PAR is
           given, the tapes will be automatically mounted as necessary when the
           DATE command has been given. The TIME command is optional. If no
           DATE command has been given, *STATISTICS is scanned. Calls the
           STATIO routine (617/2) and STACNVRT (500/59). Assemble using
           COPY:MTS.MACROS (344/3) and the usage statistics macros (617/3).
0          Referenced by comments of: 617/4 
00617/002   USAGE STATISTICS         STATIO SUBR     SA  G          W116:STATTAPE.S                                                 
            5.0T2   803  USAGE_STATISTICS.STATIO_S.SA.002   1 LINE     72   16 PAGE UM   YOUNG               JULY 03, 1981  16:03:57
            5.0T5   248                       
0          Routine to do I/O to statistics files. There are three EQU's at the
           front of this assembly for FILETBLN, TAPETBLN, and FDUBTBLN which
           specify the maximum number of statistics files, tapes, and tape
           drives the program can use. The distributed version is set for 100,
           20, and 10 respectively. This routine handles all I/O and mounting
           of all tapes needed to satisfy the specified date/time range.
           Assemble using (617/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  387
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 616/1, 616/2, 617/1, 617/3, 617/4 
00617/003   USAGE STATISTICS         MACROS          SM  G          W116:STATLIB                                                    
            5.0T2   804  USAGE_STATISTICS.MACROS.SM.003     1 LINE     72    3 PAGE UM   YOUNG               JULY 03, 1981  16:04:00
            5.0T5   249                       
0          Macro library for routines calling the STATIO routines (617/2).
0          Referenced by comments of: 616/1, 617/1, 617/2 
00617/004A  USAGE STATISTICS                         OC  G          W108:STAT                                                       
            5.1T1   717  USAGE_STATISTICS..OC.004           1 LINE   4895    5 PAGE UM   WSG                 JULY 23, 1983  11:37:39
0          Object from (617/1) + (617/2). Also contains the following:
               $CONTINUE WITH LIB:STAFF RETURN    (837/1)
               $CONTINUE WITH SYS:DIRLIB RETURN   (742/5)
               $CONTINUE WITH COPY:SYSDEFS        (579/3)
00618/001   BUFSTAT                                               # (PART OF BUFALLOC)                                              
                                                                                    UM                                              
0          Part of BUFALLOC (009/3).
00619/001  *ASMT                     *ASMT           SM  O        # (NO LONGER DISTRIBUTED)                                         
            5.0T2   806  ASMT.*ASMTSYSMAC.SM.001            1 LINE     73   82 PAGE UM                       JULY 03, 1981  16:04:03
            5.0T5   251                       
0          ASMT is no longer distributed.
00620/001   STAT DSECT               COPY:STATDSECT  SA  G        # (PART OF COPY:MTS.MACROS)                                       
            D4T2    872  STAT_DSECT..SA.                    1 LINE     80    3 PAGE UM                       AUG. 14, 1977  22:00:00
0          THE STAT DSECT IS AVAILABLE FROM THE STATFMT MACRO IN COPY:MTS.MACROS (344/3).
00620/002   STAT DSECT               GOM STAT DSECT  SG  G          COPY:STATDSECT.SG                                               
            5.0T2   833  STAT_DSECT.GOM_STAT_DSECT.SG.002   1 LINE     95    3 PAGE UM   MTS       STERKEN   JULY 03, 1981  16:04:59
            5.0T5   278  COPY:STATDSECT.SG    
0          GOM VERSION OF *STATISTICS RECORD DSECT.
            
00621/001   DIRECT ACCESS ERROR LOG  *DLG            C              *DLG                                                            
            5.0T2   834  DIRECT_ACCESS_ERROR_LOG.*.C.001    1 LINE     39    1 PAGE UM   MTA                 JULY 03, 1981  16:05:00
            5.0T5   279  *DLG                 
0          COMMAND FILE, INVOKED AT UM AS PART OF *LAS (154), WHICH RUNS THE READ3330LOG PROGRAM
           (621/2) TO READ THE 3330 AND 2305 BUFFERED ERROR LOGS HOURLY.  THIS FILE COULD ALSO
           BE SETUP TO RUN THE CONSOLE WATCH PROGRAM (621/6) IF 2314 DISKS ARE BEING USED.
0          Referenced by comments of: 621/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  388
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00621/002A  DIRECT ACCESS ERROR LOG  READ3330LOG     SA  G          S1644 5.0BT1 VLO FSNAME=DIRECT_ACCESS_ERROR_LOG.R.SA.002(1)  398
            5.1T1   718  DIRECT_ACCESS_ERROR_LOG.R.SA.002   1 LINE     72    3 PAGE UM   MTA                 NOV. 21, 1982  15:03:54
0          WHEN FIRST RUN AND EVERY HOUR THEREAFTER, THIS PROGRAM READS THE BUFFERED
           HARDWARE ERROR LOG FROM EVERY PUBLIC 3330 VOLUME AND 2305 AND LOGS THE
           RESULTS IN THE FORM OF UC ERROR MESSAGES. COPIES COPY:CMDAREADSECT (531/20),
           COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND *CNFGINFODSECT (654).
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 621/1, 621/4, 621/6 
00621/003A  DIRECT ACCESS ERROR LOG  READ3330LOG     OE  G          ETC.:READ3330LOG                                                
            5.1T1   719  DIRECT_ACCESS_ERROR_LOG.R.OE.003   1 SEQ    1188    1 PAGE UM   MTA                 JULY 23, 1983  11:37:52
                         ETC.:READ3330LOG     
00621/004   DIRECT ACCESS ERROR LOG  PRINT UC 3330   SA  G          MTA:PRINTUC3330(1,999)                                          
            5.0T2   837  DIRECT_ACCESS_ERROR_LOG.P.SA.004   1 LINE     57    1 PAGE UM   MTA                 JULY 03, 1981  16:05:03
            5.0T5   282  MTA.:PRINTUC3330     
0          PROGRAM TO READ UNIT CHECK LOG RECORDS, AS SAVED BY READ3330LOG (621/2), OR THE
           UNIT CHECK ROUTINES (787).  READS FROM SCARDS, PRINTS ON SPRINT.  IT IGNORES
           ALL RECORDS THAT ARE NOT OF TYPE 4 OR 25.  "PAR=ERRORS" MEANS TO PRINT ONLY
           THOSE RECORDS WHICH ARE REALLY ERRORS.  CALLS READBFR ROUTINE (709) AND
           PRUC3330 (621/12).  COPIES COPY:CMDAREADSECT (531/20).
0          Referenced by comments of: 621/12 
00621/005   DIRECT ACCESS ERROR LOG  PRINT UC 3330   OC  G          MTA:PRINTUC3330(1000)                                           
            5.0T2   838  DIRECT_ACCESS_ERROR_LOG.P.OC.005   1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  16:05:05
            5.0T5   283                       
00621/006   DIRECT ACCESS ERROR LOG  CONSOLE WATCH   SA  O          S1559 5.0T2 VLO FSNAME=DIRECT_ACCESS_ERROR_LOG.C.SA.006(1)   839
            5.0T2   839  DIRECT_ACCESS_ERROR_LOG.C.SA.006   1 LINE     80    2 PAGE UM   MTA                 AUG. 02, 1973  00:53.48
            5.0T5   284                       
0          PROGRAM TO KEEP WATCHING OUTPUT PRINTED ON OPERATORS CONSOLE LOOKING FOR 2314
           DISK UNIT CHECK MESSAGES AND WRITES THEM IN A FILE.  READ3330LOG (621/2) IS A
           REPLACEMENT FOR THIS PROGRAM WHEN 3330 AND 2305 HARDWARE IS BEING USED.
0          Referenced by comments of: 621/1 
00621/007   DIRECT ACCESS ERROR LOG  CONSOLE WATCH   OC  O          S1559 5.0T2 VLO FSNAME=DIRECT_ACCESS_ERROR_LOG.C.OC.007(1)   840
            5.0T2   840  DIRECT_ACCESS_ERROR_LOG.C.OC.007   1 LINE     80    1 PAGE UM   MTA                 AUG. 02, 1973  00:53.50
            5.0T5   285                       
00621/008A  DIRECT ACCESS ERROR LOG  SORT AND PRINT  SA  G          MTA:PRINTUC                                                     
            5.1T1   720  DIRECT_ACCESS_ERROR_LOG.S.SA.008   1 LINE     72   13 PAGE UM   MTA                 JULY 23, 1983  11:37:53
                         MTA.:PRINTUC         
0          PROGRAM TO SORT AND SUMMARIZE UNIT CHECK AND BUFFERED LOG DATA FOR 3330 AND 2305.
           ACCEPTS PAR=2305 (TO PRINT 2305 ERRORS ONLY), OR BOTH (FOR BOTH 2305 AND 3330
           ERRORS).  IF NEITHER 2305 NOR BOTH IS GIVEN, IT PROMPTS.  COPIES COPY:CMDAREADSECT
           (531/20).  CALLS PRUC3330 (621/12) AND JVCT (674).  IGNORES TAPE UNIT CHECK
           RECORDS, USE EREP (655) OR PM2 (820) FOR THEM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  389
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 621/12 
00621/009A  DIRECT ACCESS ERROR LOG  SORT AND PRINT  OC  G          MTA:PUC                                                         
            5.1T1   721  DIRECT_ACCESS_ERROR_LOG.S.OC.009   1 LINE   8872    6 PAGE UM   MTA                 JULY 23, 1983  11:37:53
                         MTA.:PUC             
0          Has a "$CONTINUE WITH MTA:PRUC3330(1000) (621/12) +
           MTA:SORTE1.LETGO(1000) (621/1) + MTS:UBCDATEX RETURN" record. The
           reference to MTS:UBCDATEX is for the object for JVCT (674). Calls
           (621/10) to unlock input file periodically.
00621/010C  DIRECT ACCESS ERROR LOG  UNLOCK INPUT    SA  G          MTA:SORTE1.LETGO(1,999)                                         
            5.1T1   722  DIRECT_ACCESS_ERROR_LOG.U.SA.010   1 LINE     70    1 PAGE UM   MTA                 JULY 23, 1983  11:37:54
0          A SORTE1 exit for *SORT that calls LETGO so that the input file will
           be unlocked periodically.
0          Referenced by comments of: 621/9, 655/5 
00621/011C  DIRECT ACCESS ERROR LOG  UNLOCK INPUT    OC  G          MTA:SORTE1.LETGO(1000)                                          
            5.1T1   723  DIRECT_ACCESS_ERROR_LOG.U.OC.011   1 LINE     80    1 PAGE UM   MTA                 JULY 23, 1983  11:37:54
00621/012   DIRECT ACCESS ERROR LOG  PRUC3330        SA  G          MTA:PRUC3330(1,999)                                             
            5.0T2   843  DIRECT_ACCESS_ERROR_LOG.P.SA.010   1 LINE     72    4 PAGE UM   MTA                 JULY 03, 1981  16:05:10
            5.0T5   288  MTA.:PRUC3330        
0          SUBROUTINE CALLED BY (621/4) AND (621/8). COPIES COPY:CMDAREADSECT (531/20).
0          Referenced by comments of: 621/4, 621/8, 621/9 
00621/013   DIRECT ACCESS ERROR LOG  PRUC3330        OC  G          MTA:PRUC3330(1000)                                              
            5.0T2   844  DIRECT_ACCESS_ERROR_LOG.P.OC.011   1 LINE     80    4 PAGE UM   MTA                 JULY 03, 1981  16:05:11
            5.0T5   289                       
00621/014   DIRECT ACCESS ERROR LOG  INIT:UC3330LOG  D            # INIT:UC3330LOG                                                  
                                                                                    UM   MTA                                        
                         INIT:UC3330LOG@E     
0          LOG FILE USED BY THE CMDSTAT PICKUP PROGRAM, *CMD (531/7), TO SAVE TYPE 4
           AND TYPE 25 UNIT CHECK RECORDS.
0          Referenced by comments of: 531/6, 655/3 
00622/001   FCBDSECT                                 SA           # (OBSOLETE)                                                      
            D3.2T2    7  FCBDSECT..SA.                      1 LINE     80    4 PAGE UM                       MAR. 21, 1975  02:15:34
0          In COPY:MTS.MACROS (344/3)
00623/001   FDUBDSECT                                SA           # (OBSOLETE)                                                      
            D3.2T2    8  FDUBDSECT..SA.                     1 LINE     80    3 PAGE UM                       MAR. 21, 1975  02:15:37
0          In COPY:MTS.MACROS (344/3)
1                                                                                               SUN SEP 08/96   15:24:55   Page  390
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00624/001   WOPTRDSECT                               SA           # (OBSOLETE)                                                      
            D3.2T2    9  WOPTRDSECT..SA.                    1 LINE     80    1 PAGE UM                       MAR. 21, 1975  02:15:39
0          In COPY:MTS.MACROS (344/3)
00625/001  *TAPEFIXER                                SA  O          S1237 TAPES 'TAPEFS' FSNAME=TAPEFIXER                           
            5.0T2   845  TAPEFIXER..SA.001                  1 LINE     73   13 PAGE UM   LIFT                SEP. 28, 1977  16:56:00
            5.0T5   290                       
0          PROGRAM TO RECOVER DATA FROM A 9-TRACK LABELED TAPE WHICH HAS BEEN PARTIALLY
           DESTROYED OR CONTAINS UNREADABLE BLOCKS.
00625/002  *TAPEFIXER                                OE  O          *TAPEFIXER                                                      
            5.0T2   846  TAPEFIXER..OE.002                  1 LINE   7503    4 PAGE UM   LIFT                JULY 03, 1981  16:10:53
            5.0T5   291  *TAPEFIXER           
00626/001   ATNTRP SUBR                              SA  G          S1559 5.0T2 VLO FSNAME=ATNTRP_SUBR..SA.001(1)                847
            5.0T2   847  ATNTRP_SUBR..SA.001                1 LINE     80    1 PAGE UM   DWB                 JULY 26, 1974  09:21.43
            5.0T5   292                       
0          SUBROUTINE TO ALLOW FORTRAN USERS TO CALL ATTNTRP.
00626/002   ATNTRP SUBR                              OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00627/001   GDINF SUBR                               SA  G          S1559 5.0T2 VLO FSNAME=GDINF_SUBR..SA.001(1)                 848
            5.0T2   848  GDINF_SUBR..SA.001                 1 LINE     80    3 PAGE UM   DWB                 OCT. 12, 1980  16:04:48
            5.0T5   293                       
0          SUBROUTINE TO ALLOW FORTRAN USERS TO CALL GDINFO. COPIES *GDINFODSECT (594).
00627/002   GDINF SUBR                               OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
00628/001  *3284RTN                  DSR             SA  B          S1559 5.0T2 VLO FSNAME=3284RTN.DSR.SA.001(1)                 849
            5.0T2   849  3284RTN.DSR.SA.001                 1 LINE     69    2 PAGE UM   OGDEN               JUNE 27, 1979  05:08:41
            5.0T5   294                       
0          DSR FOR IBM 3284, 3286, 3287, AND SIMILAR PRINTERS. USES THE TR3270 TABLES
           (629/12).
0          Referenced by comments of: 629/12 
00628/002  *3284RTN                  DSR             OC  B          *3284RTN                                                        
            5.0T2   850  3284RTN.DSR.OC.002                 1 LINE     80    1 PAGE UM   OGDEN               JULY 03, 1981  16:13:01
            5.0T5   295  *3284RTN             
1                                                                                               SUN SEP 08/96   15:24:55   Page  391
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00628/003  *3284RTN                  UNIT CHECK      SA  G          S1559 5.0T2 VLO FSNAME=3284RTN.UNIT_CHECK.SA.003(1)          851
            5.0T2   851  3284RTN.UNIT_CHECK.SA.003          1 LINE     72    3 PAGE UM   OGDEN               JULY 03, 1981  16:13:01
            5.0T5   296                       
0          UNIT CHECK ROUTINES FOR IBM 3284, 3286, 3287, AND SIMILAR PRINTERS.
00628/004  *3284RTN                  UNIT CHECK      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   OGDEN                                      
0          Object part of Resident System (468).
00629/001  *3270RTN                                  SA  G          S1561 5.0T4 VLO FSNAME=3270RTN..SA.001(1)                    389
            5.0T4   389  3270RTN..SA.001                    1 LINE     82  127 PAGE UBC  SAYLE     VALERIO   SEP. 04, 1981  02:59:27
            5.0T10  293                       
0          DSR for IBM 3277 (models 1 and 2), 3278 (models 1, 2, 3, 4 and 5), 3279,
           3066, and 3036 display terminals.  Uses the TR3270 tables (629/12).  Assemble
           using COPY:MTS.MACROS (344/3) and COPY:MISC.MACROS (728).  Copies
           *CNFGINFODSECT (654).
0          Referenced by comments of: 629/2, 629/4, 629/5, 629/12 
00629/002A *3270RTN                  UPDATE          UC  G          W237:3270UPD                                                    
            5.1T1   724  3270RTN.UPDATE.UC.002              1 LINE    123    4 PAGE UBC  SAYLE     VALERIO   JULY 23, 1983  11:37:54
0          UPDATE TO PRODUCE CURRENT *3270RTN SOURCE FROM base SOURCE (629/1).
            
            
           ****************************************************************************
           D5.0A changes:
            
           Includes changes for the Lee Data displays.
           ****************************************************************************
00629/003  *3270RTN                  IO3066          SA  G          S1561 5.0T4 VLO FSNAME=3270RTN.IO3066.SA.003(1)              391
            5.0T4   391  3270RTN.IO3066.SA.003              1 LINE     80   14 PAGE UM   VALERIO             JUNE 27, 1979  05:09:55
            5.0T10  295                       
0          SUBROUTINE TO SIMULATE A 3270 ON A 3066 BY INTERPRETING A 3270 CHANNEL
           PROGRAM.  ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 629/5 
00629/004A *3270RTN                  ACTIVITY SUBR   SA  G          S1568 OGDEN2 FSNAME=ACTIVITY.S                                  
            5.1T1   725  3270RTN.ACTIVITY_SUBR.SA.004       1 LINE    124   14 PAGE UBC  SAYLE     VALERIO   DEC. 07, 1981  03:42:53
0          GENERATES %ACTIVITY DISPLAY. CALLED BY (629/1). COPIES COPY:LLMPSEQU (087)
           AND COPY:GLOBALS (1026/3). ASSEMBLE USING COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 413/1, 629/5, 629/8, 647/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  392
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00629/005A *3270RTN                                  OC  G          *3270RTN                                                        
            5.1T1   726  3270RTN..OC.005                    1 LINE  21244   19 PAGE UBC  SAYLE     VALERIO   JULY 23, 1983  11:39:33
                         *3270RTN             
0          OBJECT FOR (629/1), (629/3), AND (629/4).
00629/006  *3270RTN                  GRAB3270        SA  G          S1561 5.0T4 VLO FSNAME=3270RTN.GRAB3270.SA.006(1)            394
            5.0T4   394  3270RTN.GRAB3270.SA.006            1 LINE     59    1 PAGE UBC  SAYLE     VALERIO   DEC. 03, 1978  04:08:59
            5.0T10  298                       
0          THIS IS THE SHARED TABLE FOR USE WITH THE %GRAB AND %FLIP COMMANDS IN
           THE 3270 DSR.
00629/007  *3270RTN                  GRAB3270        OC  G          SEG2:GRAB3270                                                   
            5.0T4   395  3270RTN.GRAB3270.OC.007            1 LINE     80    1 PAGE UBC  SAYLE     VALERIO   AUG. 09, 1981  23:21:21
            5.0T10  299  SEG2:GRAB3270        
0          THIS OBJECT SHOULD BE LOADED BY PISTLE PRIOR TO LOADING THE 3270 DSR.
00629/008A *3270RTN                  TEST ACTIVITY   SA  G          S0683 OGDEN FSNAME=TACTIVITY.S                                  
            5.1T1   727  3270RTN.TEST_ACTIVITY.SA.008       1 LINE     80    2 PAGE UM   VALERIO             MAR. 28, 1981  01:20:41
0          A MAIN PROGRAM WHICH CALLS THE ACTIVITY SUBROUTINE (629/4) AND PRINTS THE
           RESULTS ON SPRINT.  FOR TESTING PURPOSES ONLY.
00629/009A *3270RTN                  TEST ACTIVITY   OC  G          S0683 OGDEN FSNAME=TA                                           
            5.1T1   728  3270RTN.TEST_ACTIVITY.OC.009       1 LINE    360    1 PAGE UM   VALERIO             MAR. 28, 1981  01:20:46
00629/010  *3270RTN                  *3066RTN        OC  G          *3066RTN                                                        
            5.0T4   398  3270RTN.?3066RTN.OC.010            1 LINE     24    1 PAGE UBC  SAYLE     VALERIO   AUG. 09, 1981  23:21:37
            5.0T10  302  *3066RTN             
0          CONTAINS ONLY A "$CONTINUE WITH *3270RTN" RECORD.
0          Referenced by comments of: 662/1 
00629/011  *3270RTN                  *3036RTN        OC  G          *3036RTN                                                        
            5.0T4   399  3270RTN.?3036RTN.OC.011            1 LINE     24    1 PAGE UBC  SAYLE     VALERIO   AUG. 09, 1981  23:21:37
            5.0T10  303  *3036RTN             
0          CONTAINS ONLY A "$CONTINUE WITH *3270RTN" RECORD.
00629/012A *3270RTN                  TR3270          SA  G          W237:TR3270.S                                                   
            5.1T1   729  3270RTN.TR3270.SA.012              1 LINE     72    4 PAGE UM   VALERIO             JULY 23, 1983  11:45:02
0          Provides the TR and TRT tables used by the 3270 DST (629/1), the 3284 DSR
           (628/1), *APC (496), the Screen Support Routines (811), and the operator job
           (634).
            
           *******************************************************************
           D5.1 version:
            
           Now in the resident system.
           *******************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  393
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 628/1, 629/1 
00629/013A *3270RTN                  TR3270          OC  G        # (PART OF RESIDENT SYSTEM)                                       
            5.0T4   401  3270RTN.TR3270.OC.013              1 LINE     80    4 PAGE UM   VALERIO             AUG. 09, 1981  23:21:40
            5.0T10  305                       
00629/014  *3270RTN                  MEMO 419        WX             S0672 CCMEMO 'CCMEMOS' FSNAME=M419                              
            5.0T4   402  3270RTN.MEMO_419.WX.014            1 LINE    115   10 PAGE UM   HARTMAN   VALERIO   DEC. 04, 1980  09:52:34
            5.0T10  306                       
00630/001   TRUNCATE                                 SA  G  TRUN    S1153 UNSP VLO FSNAME=TRUNCATE.S                                
            5.0T2   852  TRUNCATE..SA.001                   1 LINE     80    7 PAGE UM   UNSP                MAR. 27, 1976  12:24:30
            5.0T5   297                       
0          SCANS FILES ON USERS ACCOUNT AND TRUNCATES THOSE THAT NEED IT. COPIES
           *GFINFODSECT (593).
00630/002   TRUNCATE                                 OE  G          UNSP:TRUNCATE                                                   
            5.0T2   853  TRUNCATE..OE.002                   1 LINE   2693    4 PAGE UM   UNSP                JULY 03, 1981  16:13:17
            5.0T5   298  UNSP:TRUNCATE        
00630/003   TRUNCATE                                 WF             S1153 UNSP VLO FSNAME=TRUNCATE.FMT                              
            5.0T2   854  TRUNCATE..WF.003                   1 LINE     67    1 PAGE UM   UNSP                SEP. 15, 1980  16:44:03
            5.0T5   299                       
00631/001A  ACCOUNTING CLS           CLSTV           SA  G  CLST    S0027 DISTRB FSNAME=CLSTV                                       
            5.1T1   730  ACCOUNTING_CLS.CLSTV.SA.001        1 LINE     80    3 PAGE UM   ENGLE               AUG. 24, 1982  17:43:53
0          PROGRAM TO PRODUCE CLSTRANSVEC WHICH IS A COPY SECTION FOR ACCCLS. 
           COPIES GRDEF (104/83).  ASSEMBLE USING COPY:MTS.MACROS (344/3).
00631/002A  ACCOUNTING CLS           CLSTV           UC  G          S0027 DISTRB FSNAME=CLSTVUPD                                    
            5.1T1   731  ACCOUNTING_CLS.CLSTV.UC.002        1 LINE     66    1 PAGE UM   ENGLE               AUG. 24, 1982  17:43:58
0          Referenced by comments of: 631/4 
00631/003A  ACCOUNTING CLS           CLSTV           OC  G  CLST    S0027 DISTRB FSNAME=CLST                                        
            5.1T1   732  ACCOUNTING_CLS.CLSTV.OC.003        1 LINE     80    3 PAGE UM   ENGLE               AUG. 24, 1982  17:44:02
0          Referenced by comments of: 631/5 
00631/004A  ACCOUNTING CLS           CLSTRANSVEC     SA  G          S0027 DISTRB FSNAME=CLSTRANSVEC                                 
            5.1T1   733  ACCOUNTING_CLS.CLSTRANSVE.SA.004   1 LINE     19    1 PAGE UM   ENGLE               AUG. 24, 1982  17:45:04
0          COPY SECTION FOR ACCCLS PRODUCED BY RUNNING CLSTV (631/2).
00631/005A  ACCOUNTING CLS           ACCCLS          SA  G  ACLS    S0027 DISTRB FSNAME=ACCCLS                                      
            5.1T1   734  ACCOUNTING_CLS.ACCCLS.SA.005       1 LINE     80    9 PAGE UM   ENGLE               MAY  25, 1983  15:50:04
0          INTERFACE BETWEEN ACCOUNTING CLS CALL AND ACCMXMAT.
           COPIES GRDEF (104/83) AND CLSTRANSVEC (631/3).
0          Referenced by comments of: 631/22 
1                                                                                               SUN SEP 08/96   15:24:55   Page  394
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00631/006A  ACCOUNTING CLS           ACCCLS          UC  G          S0027 DISTRB FSNAME=ACCCLSUPD                                   
            5.1T1   735  ACCOUNTING_CLS.ACCCLS.UC.006       1 LINE     72    2 PAGE UM   ENGLE               MAY  25, 1983  15:50:12
00631/007A  ACCOUNTING CLS           ACCCLS          OC  G  ACLS    S0027 DISTRB FSNAME=ACLS                                        
            5.1T1   736  ACCOUNTING_CLS.ACCCLS.OC.007       1 LINE     80    3 PAGE UM   ENGLE               MAY  25, 1983  15:50:19
0          Referenced by comments of: 631/24 
00631/008A  ACCOUNTING CLS           ACCMXMAT        SA  G  AMXM    S0027 DISTRB FSNAME=ACCMXMAT                                    
            5.1T1   737  ACCOUNTING_CLS.ACCMXMAT.SA.008     1 LINE     80   92 PAGE UM   ENGLE               JUNE 10, 1983  16:39:35
0          ACCounting MaXimum MAinTenance (main program for ACCOUNTING CLS). The
           external symbol ACCLOGFL contains the name of a file (ACC:ACCLOG) into
           which a log is written. Copies ACCFORMAT (104/1), ACCPROJFMT (104/3),
           and COPY:RATEVEC (651/3). This program has a GBLB symbol &PW which, if
           set to 1, will cause the instructions for the PASSWORD parameter to be
           assembled. The message "Experimental. See W013:ACCNEWS (3/23/82)."
           should be changed to reflect local conditions or deleted. If &STAPRJ
           is set to 1, the object for ACC:DISPROJECT (104/81) is produced.
0          Referenced by comments of: 104/81, 631/22 
00631/009A  ACCOUNTING CLS           ACCMXMAT        UC  G          S0027 DISTRB FSNAME=ACCMXMATUPD                                 
            5.1T1   738  ACCOUNTING_CLS.ACCMXMAT.UC.009     1 LINE     72    9 PAGE UM   ENGLE               JUNE 10, 1983  16:39:56
0          Updates source from previous regular distribution of NEW ACCMXMAT to
           current distribution.
00631/010A  ACCOUNTING CLS           ACCMXMAT        OC  G          S0027 DISTRB FSNAME=AMXM                                        
            5.1T1   739  ACCOUNTING_CLS.ACCMXMAT.OC.010     1 LINE     80   28 PAGE UM   ENGLE               FEB. 02, 1983  16:27:22
0          Referenced by comments of: 631/24 
00631/011A  ACCOUNTING CLS           ACUSPRNT        SA  G  AUPR    S0027 DISTRB FSNAME=ACUSPRNT                                    
            5.1T1   740  ACCOUNTING_CLS.ACUSPRNT.SA.011     1 LINE     80   17 PAGE UM   ENGLE               FEB. 02, 1983  16:29:43
0          PRINT SUBROUTINE FOR ACCOUNTING CLS.
           COPIES ACCFORMAT (104/1).
           THIS PROGRAM USES A SETC SYMBOL &DC TO CONTROL ASSEMBLY OF DATA CELL INSTRUCTIONS.
           IF IT IS SET TO '0', THE DATA CELL INSTRUCTIONS WILL NOT BE ASSEMBLED.  SEE THE SOURCE
           FOR THE VALUE TO BE USED FOR DATA CELL.
0          Referenced by comments of: 631/22 
00631/012C  ACCOUNTING CLS           ACUSPRNT        UC  G          S0027 DISTRB FSNAME=ACUSPRNTUPD                                 
            5.1T1   741  ACCOUNTING_CLS.ACUSPRNT.UC.012     1 LINE     67    2 PAGE UM   ENGLE               FEB. 02, 1983  16:29:56
0          Updates source from previous regular distribution of NEW ACUSPRNT to
           current one.
00631/013A  ACCOUNTING CLS           ACUSPRNT        OC  G          S0027 DISTRB FSNAME=AUPR                                        
            5.1T1   742  ACCOUNTING_CLS.ACUSPRNT.OC.013     1 LINE     80    4 PAGE UM   ENGLE               FEB. 02, 1983  16:30:16
0          Referenced by comments of: 104/1, 631/24 
1                                                                                               SUN SEP 08/96   15:24:55   Page  395
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00631/014   ACCOUNTING CLS           FASTIOCK        SA  G          S1559 5.0T2 VLO FSNAME=ACCOUNTING_CLS.FASTIOCK.SA.013(1)     867
            5.0T2   867  ACCOUNTING_CLS.FASTIOCK.SA.013     1 LINE     80    3 PAGE UM   ENGLE               DEC. 06, 1974  12:48.35
            5.0T5   312                       
0          SUBROUTINE TO DETERMINE IF AN I/O UNIT IS "FAST."  USED IN ACCOUNTING CLS.  COPIES GRDEF (104/83).
0          Referenced by comments of: 104/1, 631/22 
00631/015   ACCOUNTING CLS           FASTIOCK        OC  G          S1559 5.0T2 VLO FSNAME=ACCOUNTING_CLS.FASTIOCK.OC.014(1)     868
            5.0T2   868  ACCOUNTING_CLS.FASTIOCK.OC.014     1 LINE     80    1 PAGE UM   ENGLE               DEC. 06, 1974  12:48.53
            5.0T5   313                       
0          Referenced by comments of: 631/24 
00631/016C  ACCOUNTING CLS           JOBTOID         SA  G  JBID    S0027 DISTRB FSNAME=JOBTOID                                     
            5.1T1   743  ACCOUNTING_CLS.JOBTOID.SA.016      1 LINE     80    2 PAGE UM   ENGLE               AUG. 26, 1982  17:22:35
0          Subroutine to return the signon ID associated with a given job number.
           Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087).
00631/017C  ACCOUNTING CLS           JOBTOID         UC  G        # S0027 DISTRB FSNAME=JOBTOIDUPD                                  
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current one.
00631/018C  ACCOUNTING CLS           JOBTOID         OC  G          S0027 DISTRB FSNAME=JBID                                        
            5.1T1   744  ACCOUNTING_CLS.JOBTOID.OC.018      1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:22:42
0          Referenced by comments of: 631/22, 631/24 
00631/019C  ACCOUNTING CLS           $ACCDUMP        SA  G  ADMP    S0027 DISTRB FSNAME=$ACCDUMP                                    
            5.1T1   745  ACCOUNTING_CLS.$ACCDUMP.SA.019     1 LINE     80    1 PAGE UM   ENGLE               FEB. 03, 1983  17:03:09
0          Requests a job dump from the operators.  The message to the operators
           should be changed to something appropriate for the installation.
0          Referenced by comments of: 631/22 
00631/020C  ACCOUNTING CLS           $ACCDUMP        UC  G        # S0027 DISTRB FSNAME=$ACCDUMPUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current distribution.
00631/021C  ACCOUNTING CLS           $ACCDUMP        OC  G          S0027 DISTRB FSNAME=ADMP                                        
            5.1T1   746  ACCOUNTING_CLS.$ACCDUMP.OC.021     1 LINE     80    1 PAGE UM   ENGLE               FEB. 03, 1983  17:03:36
0          Referenced by comments of: 104/82, 631/24 
00631/022A  ACCOUNTING CLS           *CLSACC         OE  G          *CLSACC                                                         
            5.1T1   747  ACCOUNTING_CLS.?CLSACC.OE.022      1 SEQ   23224   14 PAGE UM   ENGLE               JULY 23, 1983  11:59:57
                         *CLSACC              
0          ACCOUNTING CLS object. Allows project directors and instructors to
           distribute money, disk space, and terminal and plot time to their user
1                                                                                               SUN SEP 08/96   15:24:55   Page  396
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ID's and to change expiration dates. It consists of ACCCLS (631/5) +
           ACCMXMAT (631/8) + GETFILE (104/130) + DIRECTRY (104/69) + TMZONEXP
           (834/6) + ACCIO (104/29) + LOG (104/173) + OPTFIELD (104/183) + FILENAME
           (104/67) + ACUSPRNT (631/11) + STATUS (104/21) + FASTIOCK (631/14) +
           IOLOKCK (104/140) + TIMEZONE (834/3) + $ACCDUMP (631/19) + JOBTOID
           (631/18) + TIMETRP (104/115) + SYSDEFS.  This file must be permitted
           as follows:  U/N,R PKEY=*SYS.GETIN
00631/023   ACCOUNTING CLS           *PRJACCSTAT     D              MTS:TST.PRJACCST                                                
            5.0T2   870  ACCOUNTING_CLS.*PRJACCSTA.D.016    1 LINE      1    1 PAGE UM   ENGLE               JULY 03, 1981  16:14:57
            5.0T5   315  *PRJACCSTAT          
0          FILE USED TO HOLD ERROR COMMENTS FROM THE ACCOUNTING MAINTENANCE PROGRAM.
           SHOULD BE PERMITTED:  P/N, WE PKEY=*ACC
00631/024A  ACCOUNTING CLS           CLSACCGEN       C   G          S0027 DISTRB FSNAME=CLSACCGEN                                   
            5.1T1   748  ACCOUNTING_CLS.CLSACCGEN.C.024     1 LINE    111    1 PAGE UM   ENGLE               MAY  25, 1983  15:51:44
0          Source commands to generate the Accounting CLS object. The following
           files (and associated components) are referenced: ACLS (631/7), AMXM
           (631/10), GTFL (104/130), DIR (104/69), TZXP (834/6), AIO (104/29),
           LOG (104/173), OFLD (104/183), FLNM (104/67), AUPR (631/13), STATCLS
           (104/21), FIOC (631/15), IOLC (104/140), TZON (834/3), ADMP (631/21),
           JBID (631/18), TTRP (104/115), and SYSDEFS. The resulting object is
           placed in the file -CLSACC.
00632/001C  REBATE                   CREBATE         SA  G          W030:CREBATE                                                    
            5.1T1   749  REBATE.CREBATE.SA.001              1 LINE     71   16 PAGE UM   LIFT                JULY 23, 1983  12:00:02
0          Subroutine, run under SCAN (753), to rebate charges for MTS jobs.
           Copies COPY:CMDAREADSECT (531/2) and COPY:RATEVEC (651/3). Assemble
           with COPY:MTS.MACROS (344/3) and SCAN (753/1). The writeup
           for CREBATE is in the SCAN writeup (753/6).
            
           ***************************************************************************
           D5.0B version:
            
           The old REBATE program has been replaced with this subroutine which
           runs under SCAN (753).
           ***************************************************************************
00632/002C  REBATE                   CREBATE         OC  G          W030:CREBATEX                                                   
            5.1T1   750  REBATE.CREBATE.OC.002              1 LINE     80    7 PAGE UM   LIFT                JULY 23, 1983  12:00:03
0          Referenced by comments of: 632/3 
00632/003A  REBATE                   REBATE          OC  G          ACC:REBATE                                                      
            5.1T1   751  REBATE.REBATE.OC.003               1 LINE     77    1 PAGE UM   LIFT                JULY 23, 1983  12:00:04
                         ACC:REBATE           
0          Contains $CONTINUE WITH W030:SCANX (753/5) + W030:CREBATEX (632/2) +
           ACC:ACCLIB (104/41) record.  Run with PROT=OFF.
1                                                                                               SUN SEP 08/96   15:24:55   Page  397
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00632/004A  REBATE                   RBATACC         SA  G  RBTA    S0027 DISTRB FSNAME=RBATACC                                     
            5.1T1   752  REBATE.RBATACC.SA.004              1 LINE     80    6 PAGE UM   ENGLE               AUG. 26, 1982  12:01:23
0          SUBROUTINE CALLED BY REBATE TO COMPUTE COST OF REBATE AND TO UPDATE USERS 
           ACCOUNTING RECORD. USED IN ACCLIB (104/47).
           COPIES GRDEF (104/83), COPY:RATEVEC (651/3), AND ACCFORMAT (104/1).
00632/005C  REBATE                   RBATACC         UC  G          S0027 DISTRB FSNAME=RBATACCUPD                                  
            5.1T1   753  REBATE.RBATACC.UC.005              1 LINE     72    3 PAGE UM   ENGLE               AUG. 26, 1982  12:01:31
0          Updates source from previous regular distribution to current one.
00632/006A  REBATE                   RBATACC         OC  G          S0027 DISTRB FSNAME=RBTA                                        
            5.1T1   754  REBATE.RBATACC.OC.006              1 LINE     80    3 PAGE UM   ENGLE               AUG. 26, 1982  12:01:41
0          Referenced by comments of: 104/1 
00632/007A  REBATE                   REQUEST FORM                 # (PART OF XEROX 9700 UM FSL -- COMP. 840/2)                      
            5.0T2   886  REBATE.REQUEST_FORM.C.008          1 LINE    108    2 PAGE UM   LIFT                JULY 03, 1981  16:20:08
            5.0T5   331                       
00632/008   REBATE                   CCREBATE        SA  G          S0811 REBATE 'REBATES' FSNAME=CCREBATE                          
            5.0T2   887  REBATE.CCREBATE.SA.009             1 LINE     59    2 PAGE UM   LIFT                AUG. 05, 1977  17:02:57
            5.0T5   332                       
0          PROGRAM TO TAKE QUEUE RECORDS FROM SYS:PLOTREBAT (615/37) AND PRODUCE INPUT TO THE
           REBATE PROGRAM.  THE OUTPUT FROM THIS PROGRAM IS WRITTEN INTO ACC:PLOTREBAT (632/10).
0          Referenced by comments of: 615/37, 632/10 
00632/009   REBATE                   CCREBATE        OC  G          ACC:CCREBATE                                                    
            5.0T2   888  REBATE.CCREBATE.OC.010             1 LINE     80    1 PAGE UM   LIFT                JULY 03, 1981  16:20:10
            5.0T5   333  ACC:CCREBATE         
00632/010   REBATE                   ACC:PLOTREBAT   D            # ACC:PLOTREBAT                                                   
                                                                                    UM   LIFT                                       
                         ACC:PLOTREBAT@E      
0          DATA FILE USED FOR OUTPUT FROM CCREBATE (632/8).
0          Referenced by comments of: 632/8 
00633/001  *PL1SCAN                  IBM SOURCE      SA  G          S0696 OSSRC6 POSN=PL552                                         
            5.0T2   889  PL1SCAN.IBM_SOURCE.SA.001          1 SEQ      80  220 PAGE UM   TIFFANY             JULY 03, 1981  16:24:25
            5.0T5   334                       
0          IBM OS/360 (RELEASE 21.7) SOURCE FOR PL/I SYNTAX SCANNING PROGRAM.
00633/002  *PL1SCAN                  MTS UPDATE      UU  G          S0410 MTSPL1 'PL1LIB' POSN=PL1SCANUP.D4                         
            5.0T2   890  PL1SCAN.MTS_UPDATE.UU.002          1 SEQ      80    5 PAGE UM   TIFFANY             JULY 03, 1981  16:25:29
            5.0T5   335                       
0          *IEBUPDAT DECK FOR MTS CHANGES.  ASSEMBLE OUTPUT OF UPDATE USING IKM (633/3).
           COPIES IKMBASE (633/4).
1                                                                                               SUN SEP 08/96   15:24:55   Page  398
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00633/003  *PL1SCAN                  IKM             SM  G          S0410 MTSPL1 'PL1LIB' POSN=PL1SCNIKM.D4                         
            5.0T2   891  PL1SCAN.IKM.SM.003                 1 SEQ      80   19 PAGE UM   TIFFANY             JULY 03, 1981  16:25:31
            5.0T5   336                       
0          Referenced by comments of: 633/2 
00633/004  *PL1SCAN                  IKMBASE         SA  G          S0410 MTSPL1 'PL1LIB' POSN=PL1SCNIKMBASE.D4                     
            5.0T2   892  PL1SCAN.IKMBASE.SA.004             1 SEQ      80   10 PAGE UM   TIFFANY             JULY 03, 1981  16:25:33
            5.0T5   337                       
0          A SECTION COPIED BY THE IKM002 MODULE.
0          Referenced by comments of: 633/2 
00633/005  *PL1SCAN                  INTERFACE       SA  G          S0410 MTSPL1 'PL1LIB' POSN=PL1SCAN.S.D4                         
            5.0T2   893  PL1SCAN.INTERFACE.SA.005           1 SEQ      80   20 PAGE UM   TIFFANY             JULY 03, 1981  16:25:35
            5.0T5   338                       
0          MTS INTERFACE MODULE.  ASSEMBLE USING MACROLIB (633/6).
00633/006  *PL1SCAN                  MACROLIB        SM  G          S1559 5.0T2 VLO FSNAME=PL1SCAN.MACROLIB.SM.006(1)            894
            5.0T2   894  PL1SCAN.MACROLIB.SM.006            1 LINE     38    1 PAGE UM   TIFFANY             JULY 28, 1977  21:37:37
            5.0T5   339                       
0          Referenced by comments of: 633/5 
00633/007  *PL1SCAN                                  OE  G          *PL1SCAN                                                        
            5.0T2   895  PL1SCAN..OE.007                    1 LINE   4032   11 PAGE UM   TIFFANY             JULY 03, 1981  16:25:39
            5.0T5   340  *PL1SCAN             
0          THIS OBJECT COULD BE LOADED INTO SHARED VM BY PISTLE IF DESIRED.
00634/001A  OPERATOR JOB                             SA  G          W226:OPERATOR                                                   
            5.1T1   755  OPERATOR_JOB..SA.001               1 LINE    125   88 PAGE UM   PICKELMAN           JULY 23, 1983  12:00:27
0          A job program to support IBM 3270 as an operator's console. For a
           complete description, see the section "Using the 3270 Operators'
           Console," in the MTS Operators' Manual (592).
             This subcomponent has the source for several routines, organized  
           as a macro library.  The following are included:
             
               DSOPC   - A macro which generates a description of the DS3270
                         routines.
               DSDECTS - A macro which generates DSECTS describing the areas
                         returned by the DS3270 routines.
               DS3270  - Some routines to help using a 3270.
               UPDATES - CDupdate updates for the operator job.
               BASE    - The base source for the operator job.
            
           Copies COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), COPY:JOBSTA
           (413/9), and *CNFGINFODSECT (654). Assemble using COPY:SETPARM (653)
           and COPY:MISC.MACROS (728).
            
             At UM, the COMPILE macro in (823/24) is used to assemble these,
1                                                                                               SUN SEP 08/96   15:24:55   Page  399
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          after sourcing W226:OPERATOR(0).
            
           *******************************************************************
           D5.0C changes:
            
           The following are changes that have been made to the operator job 
           since it was last distributed (D5.0).
            
           -Now it works with any 3270 and uses the full screen (e.g. 43
            lines on a 3278 Mod4).
            
           -Now the field-mark may be used to indicate that the cursor 
            should not be automatically placed on a response line.  That
            is, when the screen is rewritten the following rules are used
            to determine where to put the cursor: 
            
             1. If the cursor was on a partially finished line it is put 
                back where it was. 
            
             2. If there are any response lines which do not begin with
                the field-mark character, the cursor is placed in the
                first of these. 
            
             3. Otherwise it is placed in the request area. 
            
           -A few bugs have been fixed.
           *******************************************************************
            
           *******************************************************************
           D5.1 version:
            
           Changed the character which inhibits cursor positioning from
           "Field-Mark" to "DUP" or "#".
           *******************************************************************
0          Referenced by comments of: 413/1, 629/12, 634/3, 806/1 
00634/002A  OPERATOR JOB                             OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   PICKELMAN                                  
0          Object part of Resident System (468).
00634/003   OPERATOR JOB             CONSIO          SA  G          S1559 5.0T2 VLO FSNAME=OPERATOR_JOB.CONSIO.SA.004(1)         898
            5.0T2   898  OPERATOR_JOB.CONSIO.SA.004         1 LINE     73   11 PAGE UM   OGDEN               JULY 03, 1981  16:25:50
            5.0T5   343                       
0          SUBROUTINE TO DO STAND-ALONE I/O TO A 3270, 1052, OR 3066.  ALSO PROVIDES
           INTERFACE TO OPERATOR JOB (634) IF USED.  IF OPERATOR JOB IS NOT USED, CONSIO
           MAY BE ASSEMBLED WITH &OPERJOB=0 TO REDUCE ITS SIZE.  COPIES COPY:GLOBALS (1026/3),
           COPY:LLMPSEQU (087), AND COPY:PSA (162).  ASSEMBLE USING COPY:SETPARM (653)
           AND COPY:MISC.MACROS (728).
0          Referenced by comments of: 634/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  400
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00634/004C  OPERATOR JOB             CONSIO          UC  G          W163:CONSIOUPD(1,999)                                           
            5.1T3   341  OPERATOR_JOB.CONSIO.UC.004         1 LINE     68    1 PAGE UM   OGDEN               AUG. 20, 1983  19:47:12
0          CDUPDATE input for the D5.0 base source (634/3).
00634/005A  OPERATOR JOB             CONSIO          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   OGDEN                                      
0          Object part of Resident System (468).
00634/006A  OPERATOR JOB             CONSOLE         SA  G          MTS:CONSOLE(1000)                                               
            5.1T1   756  OPERATOR_JOB.CONSOLE.SA.006        1 LINE     73    4 PAGE UBC  O'REILLY  PICKELMAN JULY 23, 1983  12:19:10
                         MTS:CONSOLE          
0          PROGRAM TO DISPLAY THE OPERATORS' CONSOLE ON A 3270 TYPE TERMINAL. CALLS THE
           SCREEN SUPPORT ROUTINES (811). COPIES *GDINFODSECT (594). ASSEMBLE USING
           COPY:MISC.MACROS (728).
            
           *************************************************************************
           D5.0C version:
            
           Added a call to SSCNTRL to disable the screen support routines
           setting an attention trap on calls to SSWRIT (with the new sceen
           routines this was causing attentions to be ignored and so without
           calling SSREAD there was no way to get out of the program).
           *************************************************************************
            
           *************************************************************************
           D5.1 version:
            
           Fixed bugs and made minor changes.
           *************************************************************************
00634/007A  OPERATOR JOB             CONSOLE         OC  G          MTS:CONSOLE(1,999)                                              
            5.1T1   757  OPERATOR_JOB.CONSOLE.OC.007        1 LINE     80    4 PAGE UBC  O'REILLY  PICKELMAN JULY 23, 1983  12:19:11
00635/001   FSUB                     D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=FSUB                        
            5.0T4   403  FSUB.D5.0_MASTER.SA.001            1 LINE     80   90 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:41:06
            5.0T10  307                       
0          Composed of the FDGET, HOPENIT, GIVEBACK, FILE LOCKING and UNLOCKING, ETC.
           sections. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).  Assemble
           using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM 
           (653/1).
0          Referenced by comments of: 42/2 
00635/002A  FSUB                     UPDATE          UC  G          MTSS:FSUB/UPD                                                   
            5.1T1   758  FSUB.UPDATE.UC.002                 1 LINE    116   25 PAGE UM   MTS       BURLING   JULY 23, 1983  12:19:11
0          *CDUPDATE input to produce current source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  401
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00635/003A  FSUB                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00635/004A  FSUB                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=FSUB.LIST                 
            5.1T1   759  FSUB..L.004                        1 LINE    133  269 PAGE UM   MTS       BURLING   JULY 23, 1983  12:19:45
00635/005A  FSUB                     COMMENTS        D   G          MTSS:FSUB/COM                                                   
            5.1T1   760  FSUB.COMMENTS.D.005                1 LINE     72    1 PAGE UM   MTS       BURLING   JULY 23, 1983  12:19:47
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00636/001   CMDS                     D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=CMDS                        
            5.0T4   406  CMDS.D5.0_MASTER.SA.001            1 LINE     80  191 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:45:28
            5.0T10  310                       
0          MTS command processors. Copies COPY:LLMPSEQU (087), COPY:IT.DSECTS
           (1081/4), *GDINFODSECT (594/1), *SENSEDSECT (3025/1), COPY:GLOBALS
           (1026/3), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS
           (344/3), COPY:SETPARM (653), COPY:IT.MACROS (1081/6) and
           COPY:CC.MACROS (1054/3).
0          Referenced by comments of: 42/2 
00636/002A  CMDS                     UPDATE          UC  G          MTSS:CMDS/UPD                                                   
            5.1T1   761  CMDS.UPDATE.UC.002                 1 LINE     79   93 PAGE UM   MTS       BURLING   JULY 23, 1983  12:19:48
0          *CDUPDATE (1036) input to produce current source.
00636/003A  CMDS                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00636/004A  CMDS                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=CMDS.LIST                 
            5.1T1   762  CMDS..L.004                        1 LINE    133  640 PAGE UM   MTS       BURLING   JULY 23, 1983  12:20:28
00636/005A  CMDS                     COMMENTS        D   G          MTSS:CMDS/COM                                                   
            5.1T1   763  CMDS.COMMENTS.D.005                1 LINE     68    4 PAGE UM   MTS       BURLING   JULY 23, 1983  12:20:34
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00637/001   DSRS                     D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=DSRS                        
            5.0T4   409  DSRS.D5.0_MASTER.SA.001            1 LINE     80   68 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:46:05
            5.0T10  313                       
0          MTS internal DSR's and HASP interface. Copies COPY:LLMPSEQU (087),
           *SENSEDSECT (3025), and COPY:GLOBALS (1026/3). Assemble using
           COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM
           (653/1), and COPY:MISC.MACROS (728/1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  402
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 42/2, 838/1 
00637/002A  DSRS                     UPDATE          UC  G          MTSS:DSRS/UPD                                                   
            5.1T1   764  DSRS.UPDATE.UC.002                 1 LINE    105   43 PAGE UM   MTS       BURLING   JULY 23, 1983  12:20:35
0          *CDUPDATE input to produce current source.
0          Referenced by comments of: 16/1 
00637/003A  DSRS                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00637/004A  DSRS                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=DSRS.LIST                 
            5.1T1   765  DSRS..L.004                        1 LINE    133  259 PAGE UM   MTS       BURLING   JULY 23, 1983  12:20:43
00637/005A  DSRS                     COMMENTS        D   G          MTSS:DSRS/COM                                                   
            5.1T1   766  DSRS.COMMENTS.D.005                1 LINE     69    3 PAGE UM   MTS       BURLING   JULY 23, 1983  12:20:45
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00638/001   USUB                     D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=USUB                        
            5.0T4   413  USUB.D5.0_MASTER.SA.001            1 LINE     80   95 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:46:34
            5.0T10  317                       
0          MTS user subroutines. Copies COPY:LLMPSEQU (087), COPY:GLOBALS
           (1026/3), *SENSEDSECT (3025), *CNFGINFODSECT (654), and *GDINFODSECT
           (594). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS
           (1054/3), and COPY:SETPARM (653/1).
0          Referenced by comments of: 42/2, 680/1 
00638/002A  USUB                     UPDATE          UC  G          MTSS:USUB/UPD                                                   
            5.1T1   767  USUB.UPDATE.UC.002                 1 LINE     86   78 PAGE UM   MTS       BURLING   JULY 23, 1983  12:20:46
0          *CDUPDATE input to produce current source.
0          Referenced by comments of: 821/1 
00638/003A  USUB                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00638/004A  USUB                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=USUB.LIST                 
            5.1T1   768  USUB..L.004                        1 LINE    133  417 PAGE UM   MTS       BURLING   JULY 23, 1983  12:21:12
00638/005A  USUB                     COMMENTS        D   G          MTSS:USUB/COM                                                   
            5.1T1   769  USUB.COMMENTS.D.005                1 LINE     70    3 PAGE UM   MTS       BURLING   JULY 23, 1983  12:21:16
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
1                                                                                               SUN SEP 08/96   15:24:55   Page  403
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00639/001   DSRI                     D5.0 MASTER     SA  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=DSRI                        
            5.0T4   416  DSRI.D5.0_MASTER.SA.001            1 LINE     80   38 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:47:27
            5.0T10  320                       
0          MTS DSR interface. Copies COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), and
           *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3),
           COPY:CC.MACROS (1054/3), and COPY:SETPARM (653/1).
0          Referenced by comments of: 42/2, 539/7 
00639/002A  DSRI                     UPDATE          UC  G          MTSS:DSRI/UPD                                                   
            5.1T1   770  DSRI.UPDATE.UC.002                 1 LINE     89   56 PAGE UM   MTS       BURLING   JULY 23, 1983  12:21:17
0          *CDUPDATE input to produce current source.
00639/003A  DSRI                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00639/004A  DSRI                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=DSRI.LIST                 
            5.1T1   771  DSRI..L.004                        1 LINE    133  245 PAGE UM   MTS       BURLING   JULY 23, 1983  12:21:37
00639/005A  DSRI                     WRITEUP         WF             W163:DSR.F                                                      
            5.1T1   772  DSRI.WRITEUP.WF.005                1 LINE    144   15 PAGE UM   MTS       OGDEN     JULY 23, 1983  12:21:39
0          A description of the Device Support Routine Interface (DSRI/DSR).
00639/006A  DSRI                     TESTIO          SA  G          MTS:TESTIO(1,999)                                               
            5.1T1   773  DSRI.TESTIO.SA.006                 1 LINE     65    4 PAGE UM   MTA       BURLING   JULY 23, 1983  12:21:40
0          TEST PROGRAM FOR DSR INTERFACE.
0          Referenced by comments of: 639/8, 639/9, 639/10, 639/11 
00639/007A  DSRI                     TESTIO          OC  G          MTS:TESTIO(1000)                                                
            5.1T1   774  DSRI.TESTIO.OC.007                 1 LINE     80    3 PAGE UM   MTA       BURLING   JULY 23, 1983  12:21:40
00639/008A  DSRI                     TESTIO DATA     D              MTS:TESTIODATA                                                  
            5.1T1   775  DSRI.TESTIO_DATA.D.008             1 LINE     44    1 PAGE UM   MTA       BURLING   JULY 23, 1983  12:21:41
0          COMMANDS TO TESTIO PROGRAM (639/6), READ ON SCARDS.
0          Referenced by comments of: 639/11 
00639/009A  DSRI                     TESTIO FILE 1   D              MTS:TESTIOFILE                                                  
            5.1T1   776  DSRI.TESTIO_FILE_1.D.009           1 LINE      5    1 PAGE UM   MTA       BURLING   JULY 23, 1983  12:21:41
0          TESTIO (639/6) TEST FILE NUMBER 1.
00639/010A  DSRI                     TESTIO FILE 2   D              MTS:TESTIOFILE2                                                 
            5.1T1   777  DSRI.TESTIO_FILE_2.D.010           1 LINE      5    1 PAGE UM   MTA       BURLING   JULY 23, 1983  12:21:41
0          TESTIO (639/6) TEST FILE NUMBER 2.
1                                                                                               SUN SEP 08/96   15:24:55   Page  404
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00639/011A  DSRI                     TESTIO BASE     D              MTS:TESTIOBASE                                                  
            5.1T1   778  DSRI.TESTIO_BASE.D.011             1 LINE    132    3 PAGE UM   MTA       BURLING   JULY 23, 1983  12:21:42
0          EXPECTED SPRINT OUTPUT WHEN TESTIO (639/6) IS RUN USING TESTIO DATA (639/8) AS INPUT.
00639/012A  DSRI                     COMMENTS        D   G          MTSS:DSRI/COM                                                   
            5.1T1   779  DSRI.COMMENTS.D.012                1 LINE     69    3 PAGE UM   MTS       BURLING   JULY 23, 1983  12:21:42
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00640/001   MTS.TV                                   SA           # (OBSOLETE)                                                      
            D3.2T2   41  MTS.TV..SA.                        1 LINE     56    1 PAGE UM                       MAR. 21, 1975  02:20:51
0          In COPY:MTS.MACROS (344/3)
00642/001   MERIT UTILITIES          *MNS            C              *MNS                                                            
            5.0T2   909  MERIT_UTILITIES.*MNS.C.001         1 LINE      9    1 PAGE UM   WSG                 JULY 03, 1981  16:28:14
            5.0T5   354  *MNS                 
0          Command file used by the operators to start the Merit terminal
           service after IPL. Invoked by entering "MTS *MNS" on the operator's
           console. Described in the Operator's Manual (592).
0          Referenced by comments of: 67/21, 642/2 
00642/002A  MERIT UTILITIES          MNS             C              STRT:MNS                                                        
            5.1T1   780  MERIT_UTILITIES.MNS.C.002          1 LINE     69    2 PAGE UM   WSG                 JULY 23, 1983  12:21:42
                         STRT:MNS             
0          Command file SOURCEd to by *MNS (642/1).
00642/003   MERIT UTILITIES          *MND            C              *MND                                                            
            5.0T2   911  MERIT_UTILITIES.*MND.C.003         1 LINE      9    1 PAGE UM   WSG                 JULY 03, 1981  16:28:15
            5.0T5   356  *MND                 
0          Command file used by the operators to prevent usage of the Merit
           network when it is down. Invoked by entering "MTS *MND" on the
           operator's console. Described in the Operator's Manual (592).
0          Referenced by comments of: 642/4 
00642/004   MERIT UTILITIES          MND             C              STRT:MND                                                        
            5.0T2   912  MERIT_UTILITIES.MND.C.004          1 LINE     28    1 PAGE UM   WSG                 JULY 03, 1981  16:28:16
            5.0T5   357  STRT:MND             
0          Command file SOURCEd to by *MND (642/3) which changes MNET:AUTH
           (642/5) to prevent network access.
00642/005   MERIT UTILITIES          AUTHORIZATION   D              MNET:AUTH                                                       
            5.0T2   913  MERIT_UTILITIES.AUTHORIZA.D.005    1 LINE     32    1 PAGE UM   WSG                 JULY 03, 1981  16:28:17
            5.0T5   358  MNET:AUTH            
0          Data file used to control which users can use the network and at
1                                                                                               SUN SEP 08/96   15:24:55   Page  405
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          what times.
0          Referenced by comments of: 642/4 
00642/006A  MERIT UTILITIES          *MLD            C              *MLD                                                            
            5.1T1   781  MERIT_UTILITIES.?MLD.C.006         1 LINE     17    1 PAGE UM   WSG                 JULY 23, 1983  12:21:43
                         *MLD                 
0          Command file used by the operators to reload the Merit PDP-11.
           Invoked by entering "MTS *MLD" on the operator's console. Described
           in the Operator's Manual (592).
0          Referenced by comments of: 642/7 
00642/007A  MERIT UTILITIES          PCP RELOAD      C              PCP:ANRELOAD                                                    
            5.1T1   782  MERIT_UTILITIES.PCP_RELOA.C.007    1 LINE     93    1 PAGE UM   WSG                 JULY 23, 1983  12:21:43
                         PCP:ANRELOAD         
0          Command file SOURCEd to by *MLD (642/6) to run 11LOAD (642/8).
00642/008A  MERIT UTILITIES          11LOAD          SA  G          MNET:11LOAD(1000)                                               
            5.1T1   783  MERIT_UTILITIES.11LOAD.SA.008      1 LINE     73   28 PAGE UM   KNOPPER             JULY 23, 1983  12:21:44
0          Referenced by comments of: 642/7, 642/10, 715/1 
00642/009   MERIT UTILITIES          11LOAD          OE  G          MNET:11LOAD(1,999)                                              
            5.0T4   420  MERIT_UTILITIES.11LOAD.OE.012      1 LINE     80   13 PAGE UM   KNOPPER             AUG. 09, 1981  23:47:41
            5.0T10  324  MNET:11LOAD          
00642/010   MERIT UTILITIES          11LOAD          WF             S1561 5.0T4 VLO FSNAME=MERIT_UTILITIES.11LOAD.WF.013(1)      421
            5.0T4   421  MERIT_UTILITIES.11LOAD.WF.013      1 LINE    176    3 PAGE UM   KNOPPER             MAR. 25, 1977  11:52:19
            5.0T10  325                       
0          This is Merit Memo ND-77-288, a description of 11LOAD (642/8).
00642/011A  MERIT UTILITIES          PCP SETDATE     SF  G          MNET:SETDATE(1000)                                              
            5.1T1   784  MERIT_UTILITIES.PCP_SETDA.SF.011   1 LINE     71    5 PAGE UM   STARK               JULY 23, 1983  12:21:45
0          MTS program to set the time and date in the Merit PDP-11. Commands
           used to compile may be found at the beginning of the file.
0          Referenced by comments of: 642/13 
00642/012A  MERIT UTILITIES          PCP SETDATE     OE  G          MNET:SETDATE(1,999)                                             
            5.1T1   785  MERIT_UTILITIES.PCP_SETDA.OE.012   1 LINE   6904    4 PAGE UM   STARK               JULY 23, 1983  12:21:46
                         MNET:SETDATE         
00642/013A  MERIT UTILITIES          PCP SETDATE     WF             W542:SETDATE.F(1)                                               
            5.1T1   786  MERIT_UTILITIES.PCP_SETDA.WF.013   1 LINE     70    3 PAGE UM   STARK               JULY 23, 1983  12:21:46
0          A description of the SETDATE program (642/11).
1                                                                                               SUN SEP 08/96   15:24:55   Page  406
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00642/014A  MERIT UTILITIES          *MUP            C              *MUP                                                            
            5.1T1   787  MERIT_UTILITIES.?MUP.C.014         1 LINE     49    1 PAGE UM   WSG                 JULY 23, 1983  12:21:47
                         *MUP                 
0          Command file used by the operators to determine if the Merit PDP-11
           is up by running MUP (642/15). Invoked by entering "MTS *MUP" on the
           operator's console. Described in the Operator's Manual (592).
00642/015A  MERIT UTILITIES          MUP             SG  G          MNET:MUP(1000,1199)                                             
            5.1T1   788  MERIT_UTILITIES.MUP.SG.015         1 LINE    114    3 PAGE UM   STARK               JULY 23, 1983  12:21:47
0          Program to determine the state of the Merit Computer Network.  Calls the CHKDEV
           (734/3), CKMNJOBS (642/16), CKNET (642/17), and CKAUTH (642/18) subroutines.
           Contains commands at the beginning of the file to assemble and compile.
           Requires COPY:MISC.MACROS (728/1) and COPY:SYSDEFS (579/3).
0          Referenced by comments of: 642/14, 642/16, 642/17, 642/18, 642/19, 642/20, 734/3 
00642/016   MERIT UTILITIES          CKMNJOBS SUBR   SA  G          MNET:MUP(1800,1999)                                             
            5.0T2   921  MERIT_UTILITIES.CKMNJOBS.SA.016    1 LINE     72    3 PAGE UM   STARK               JUNE 26, 1980  00:09:43
            5.0T5   366                       
0          Subroutine called by MUP (642/15) to count the number and type of
           UMMPS jobs using Merit network devices. Copies COPY:GLOBALS (1026/3)
           and COPY:LLMPSEQU (087).
0          Referenced by comments of: 642/15, 642/19 
00642/017   MERIT UTILITIES          CKNET SUBR      SG  G          MNET:MUP(1200,1499)                                             
            5.0T2   922  MERIT_UTILITIES.CKNET_SUB.SG.017   1 LINE     99    2 PAGE UM   STARK               JULY 28, 1979  13:36:29
            5.0T5   367                       
0          Subroutine called by MUP (642/15) which attempts to open connections
           across the Merit network and which returns error messages in case of
           failure.
0          Referenced by comments of: 642/15, 642/19 
00642/018   MERIT UTILITIES          CKAUTH SUBR     SA  G          MNET:MUP(1500,1699)                                             
            5.0T2   923  MERIT_UTILITIES.CKAUTH_SU.SA.018   1 LINE     80    5 PAGE UM   STARK               DEC. 04, 1977  23:09:48
            5.0T5   368                       
0          Subroutine called by MUP (642/15) which checks the file MNET:AUTH.
0          Referenced by comments of: 642/15, 642/19 
00642/019A  MERIT UTILITIES          MUP             OC  G          MNET:MUP(1,999)                                                 
            5.1T1   789  MERIT_UTILITIES.MUP.OC.019         1 LINE   2126    4 PAGE UM   STARK               JULY 23, 1983  12:21:48
                         MNET:MUP             
0          Object for (642/15), (642/16), (642/17), (642/18), and (734/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  407
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00642/020   MERIT UTILITIES          MUP             WF             S1559 5.0T2 VLO FSNAME=MERIT_UTILITIES.MUP.WF.020(1)         925
            5.0T2   925  MERIT_UTILITIES.MUP.WF.020         1 LINE     97    3 PAGE UM   STARK               MAY  03, 1981  16:08:29
            5.0T5   370                       
0          A description of the MUP program (642/15).
00642/021C  MERIT UTILITIES          SCPLOAD         SA  G          SCP:SCPLOAD(1000)                                               
            5.1T1   790  MERIT_UTILITIES.SCPLOAD.SA.021     1 LINE     72   10 PAGE UM   WSG                 JULY 23, 1983  12:21:48
0          Program to downline load a Merit/UMnet Secondary Communications
           Processor (SCP). This program is run by the sigfile for userid SCP.
           It reads data from the file SCP:SCPTABLE (642/23) which tells it
           from which files to load the SCP. It also writes the name of the SCP
           into the file SCP:DATELIST (not distributed) for subsequent reading
           by the SCP SETDATE program (642/26). After a successful reload, it
           also starts MTS *SDT (642/24) which will read the SCP name from
           SCP:DATELIST and set the time and date in the SCP after it is up and
           running.
0          Referenced by comments of: 642/23, 642/24 
00642/022C  MERIT UTILITIES          SCPLOAD         OE  G          SCP:SCPLOAD(1,999)                                              
            5.1T1   791  MERIT_UTILITIES.SCPLOAD.OE.022     1 LINE   4978    3 PAGE UM   WSG                 JULY 23, 1983  12:21:50
00642/023C  MERIT UTILITIES          SCP TABLE       D              SCP:SCPTABLE                                                    
            5.1T1   792  MERIT_UTILITIES.SCP_TABLE.D.023    1 LINE     80    3 PAGE UM   WSG                 JULY 23, 1983  12:21:51
0          File containing a list of all UMnet SCPs and the names of the load
           files from which they are to be reloaded by SCPLOAD (642/21).
0          Referenced by comments of: 642/21 
00642/024C  MERIT UTILITIES          *SDT            C              *SDT                                                            
            5.1T1   793  MERIT_UTILITIES.?SDT.C.024         1 LINE     25    1 PAGE UM   WSG                 JULY 23, 1983  12:21:51
0          Command file started by SCPLOAD (642/21) to run the SCP SETDATE
           program (642/26) to set the time and date in an SCP after it has
           been reloaded.
0          Referenced by comments of: 642/21, 642/25 
00642/025C  MERIT UTILITIES          SYS:SDT         C              SYS:SDT                                                         
            5.1T1   794  MERIT_UTILITIES.SYS:SDT.C.025      1 LINE     29    1 PAGE UM   WSG                 JULY 23, 1983  12:21:52
0          Command file sourced to by *SDT (642/24) which runs SCP SETDATE
           (642/26).
00642/026C  MERIT UTILITIES          SCP SETDATE     SG  G          WSG:SETDATE.SG                                                  
            5.1T1   795  MERIT_UTILITIES.SCP_SETDA.SG.026   1 LINE     91    1 PAGE UM   WSG                 JULY 23, 1983  12:21:52
0          GOM program which sets the time and date for SCPs whose names it
           finds in SCP:DATELIST.
0          Referenced by comments of: 642/21, 642/24, 642/25 
1                                                                                               SUN SEP 08/96   15:24:55   Page  408
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00642/027C  MERIT UTILITIES          SCP SETDATE     OE  G          SCP:SETDATE                                                     
            5.1T1   796  MERIT_UTILITIES.SCP_SETDA.OE.027   1 LINE   1450    1 PAGE UM   WSG                 JULY 23, 1983  12:21:52
00642/028   MERIT UTILITIES          TNTH            SA  O          S1559 5.0T2 VLO FSNAME=MERIT_UTILITIES.TNTH.SA.021(1)        926
            5.0T2   926  MERIT_UTILITIES.TNTH.SA.021        1 LINE     80   24 PAGE UM   WSG                 APR. 07, 1977  21:50:14
            5.0T5   371                       
0          Test program and BATCHDSR subroutine to receive network batch jobs.
           Assemble with PAR=B.
00642/029   MERIT UTILITIES          TNTH            OC  O          MNET:TNTH                                                       
            5.0T2   927  MERIT_UTILITIES.TNTH.OC.022        1 LINE     80    4 PAGE UM   WSG                 JULY 03, 1981  16:50:45
            5.0T5   372                       
00642/030   MERIT UTILITIES          THTN            SA  G          S1559 5.0T2 VLO FSNAME=MERIT_UTILITIES.THTN.SA.023(1)        928
            5.0T2   928  MERIT_UTILITIES.THTN.SA.023        1 LINE     80    7 PAGE UM   WSG                 MAR. 03, 1977  12:42:11
            5.0T5   373                       
0          Test program to transmit network batch jobs.
00642/031   MERIT UTILITIES          THTN            OC  G          MNET:THTN                                                       
            5.0T2   929  MERIT_UTILITIES.THTN.OC.024        1 LINE     80    3 PAGE UM   WSG                 JULY 03, 1981  16:50:46
            5.0T5   374                       
00642/032A  MERIT UTILITIES          CONSOLE         SG  G          MNET:CONSOLE(1000)                                              
            5.1T1   797  MERIT_UTILITIES.CONSOLE.SG.032     1 LINE    121   10 PAGE UM   STARK               JULY 23, 1983  12:21:53
0          A program that can be $RUN to send commands to, and receive output
           from, all of the Merit communications computers. Commands used to
           compile may be found at the beginning.
0          Referenced by comments of: 642/34 
00642/033A  MERIT UTILITIES          CONSOLE         OE  G          MNET:CONSOLE(1,999)                                             
            5.1T1   798  MERIT_UTILITIES.CONSOLE.OE.033     1 LINE   7230    6 PAGE UM   STARK               JULY 23, 1983  12:21:53
00642/034C  MERIT UTILITIES          CONSOLE         WF  G          W542:CONSOLE.F(1)                                               
            5.1T1   799  MERIT_UTILITIES.CONSOLE.WF.034     1 LINE     71    3 PAGE UM   STARK               JULY 23, 1983  12:21:53
0          Documentation for (642/32).
00643/001A  PAGLOAD                                  SA  G          MTA:PAGLOAD(1000)                                               
            5.1T1   800  PAGLOAD..SA.001                    1 LINE     70    5 PAGE UM   MTA                 JULY 23, 1983  12:21:54
                         MTA.:PAGLOAD         
0          A VARIABLE PAGING LOAD GENERATOR. ALSO CHECKS FOR CORRECT PAGES. A
           DESCRIPTION OF THE PARAMETERS IS IN THE SOURCE. ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 196/1, 643/3 
00643/002A  PAGLOAD                                  OC  G          MTA:PAGLOAD(1,999)                                              
            5.1T1   801  PAGLOAD..OC.002                    1 LINE     80    3 PAGE UM   MTA                 JULY 23, 1983  12:21:55
1                                                                                               SUN SEP 08/96   15:24:55   Page  409
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00643/003   PAGLOAD                  *PAG            C              *PAG                                                            
            5.0T2   934  PAGLOAD.*PAG.C.003                 1 LINE     70    1 PAGE UM   MTA                 JULY 03, 1981  16:50:51
            5.0T5   379  *PAG                 
0          COMMAND FILE USED TO RUN THE PAGLOAD PROGRAM (643/1) TO GENERATE AN
           ARTIFICIAL PAGE LOAD.  INVOKED BY ENTERING "MTS *PAG" ON THE OPERATORS
           CONSOLE.
00644/001   DISK SPACE                                            # (OBSOLETE)                                                      
            D4T2    978  DISK_SPACE..SA.001                 1 LINE     72    3 PAGE UBC                      JULY 28, 1977  21:47:24
0          Obsoleted by *DSK (073).
00645/001   UBCDSECTS                                SA           # (OBSOLETE)                                                      
            D3.2T2   48  UBCDSECTS..SA.                     1 LINE     71    1 PAGE UBC                      MAR. 21, 1975  02:21:05
0          In COPY:MTS.MACROS (344/3)
0          Referenced by comments of: 821/10 
00646/001   SYSTEM DOCUMENTATION     LECTURE 1       WF             MTS:LECTURE1                                                    
            5.0T2   935  SYSTEM_DOCUMENTATION.LECT.WF.001   1 LINE    153    8 PAGE UM   MTS                 JULY 03, 1981  16:50:52
            5.0T5   380                       
0          FORMAT SOURCE FOR LECTURE 1 OF THE MTS SYSTEMS LECTURES AS UPDATED TO RELECT D4 MTS
           (AT LEAST AS VIEWED BY DON).
00646/002C  SYSTEM DOCUMENTATION     SYS LEC TAPES                # (AVAILABLE UPON REQUEST)                                        
                                                                                    UM   SWEET                                      
0          This is the audio tapes of 33 system lectures given by the UM staff
           during 1973.  Copies of the tapes are available from UM upon request.
00646/003   SYSTEM DOCUMENTATION     VOL 99 PGM      SG  G          S1559 5.0T2 VLO FSNAME=SYSTEM_DOCUMENTATION.VOL.SG.002(1)    936
            5.0T2   936  SYSTEM_DOCUMENTATION.VOL.SG.002    1 LINE     97    9 PAGE UM   MTS                 JULY 03, 1981  16:50:53
            5.0T5   381                       
0          A PROGRAM TO IMPLEMENT THE FINDING AND EXTRACTION OF SYSTEM INTERNAL
           DOCUMENTATION BASED ON THE CLASSIFICATION SCHEME PREVIOUSLY PUBLISHED IN THE
           MTS NEWSLETTER, NO. 37, PP. 113-119. WHEN RUN WITHOUT ANY PARAMETER, IT WILL
           ASK FOUR QUESTIONS VIA SERCOM/GUSER. OUTPUT FROM THE PROGRAM IS WRITTEN ON
           SPRINT. IT MAY ALSO BE RUN WITH A PAR= GIVING THE ANSWERS TO THE QUESTIONS
           SEPARATED BY COMMAS WITH MISSING ITEMS ASSUMED TO BE "ALL". IN EITHER PROMPT
           OR PAR= MODE, ADDITIONAL INFORMATION MAY BE SUPPLIED TO BYPASS THE REMAINING
           QUESTIONS. THE QUESTIONS ARE:
            1.  "PRINT CLASSIFICATION, DOCUMENTS, OR BOTH"
                RESPONSE:  "C" FOR CLASSIFICATION ONLY, "D" FOR DOCUMENTS ONLY, OR
                           "B" FOR BOTH; OR TO CONTROL PRINTING MORE PRECISELY,
                           "C=(C|X)(U)(D)(V)" WHERE, WITH PARENS REPRESENTING OPTIONS,
                              C MEANS PRINT CLASSIFICATION INFO,
                              X IS SAME AS C BUT PRINTS ONLY IF THERE IS DOCUMENT INFO,
                              U MEANS PRINT USAGE INFO,
                              D MEANS PRINT DOCUMENT INFO,
                              V MEANS PRINT VERSION INFO; OR
1                                                                                               SUN SEP 08/96   15:24:55   Page  410
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                          "(D|C)=<ANSWER TO QUESTION2>", OR
                           "(D|C)=<ANSWER TO QUESTION2> <ANSWER TO QUESTION 3>", OR
                           "(D|C)=<ANSWER TO QUESTION4>"
            2.  "GIVE CLASSIFICATION NUMBER"
                RESPONSE:  "ALL" OR A NULL LINE, OR
                           N OR N1-N2, WHERE N IS A CLASSIFICATION NUMBER NNN.(N(N))
            3.  "ENTER USAGE NUMBER"
                RESPONSE:  "ALL" OR A NULL LINE,
                           /N, WHERE N IS A USAGE NUMBER, OR
                           "?" TO GET A DESCRIPTION OF USAGE NUMBERS
            4.  "ENTER OTHER INFO"
                RESPONSE:  ONE OR MORE OF THE FOLLOWING:
                           "ALL" OR A NULL LINE,
                           MM-DD-YY TO GET ENTRIES SINCE THE SPECIFIED DATE,
                           D=NNNN TO GET A SPECIFIC DOCUMENT, OR
                           V=(NNN|LAST) TO GET A SPECIFIC VERSION OR THE MOST RECENT
                THE DEFAULT FOR THE VERSION IS "ALL" IF CLASSIFICATION INFORMATION IS BEING
                OBTAINED, "LAST" IF DOCUMENTS ARE BEING EXTRACTED.
00646/004   SYSTEM DOCUMENTATION     VOL 99 PGM      OC  G          SYS:VOLUME99                                                    
            5.0T2   937  SYSTEM_DOCUMENTATION.VOL.OC.003    1 LINE     80   13 PAGE UM   MTS                 JULY 03, 1981  16:50:59
            5.0T5   382                       
0          HAS EMBEDDED FILE NAMES FOR "SYS:INTCLASS"  (646/5) AND "SYS:INTDOCDATA" (646/6).
00646/005   SYSTEM DOCUMENTATION     VOL 99 CLASS    D              SYS:INTCLASS                                                    
            5.0T2   938  SYSTEM_DOCUMENTATION.VOL.D.004     1 LINE    101    4 PAGE UM   MTS                 JULY 03, 1981  16:51:00
            5.0T5   383                       
0          DATA FILE CONTAINING THE CLASSIFICATION INFORMATION AND INFORMATION ABOUT THE
           DOCUMENTS.  LINES NUMBERS IN THIS FILE ARE IMPORTANT; HAS NEGATIVE LINE NUMBERS.
0          Referenced by comments of: 646/4, 646/6 
00646/006   SYSTEM DOCUMENTATION     VOL 99 DOC      D              SYS:INTDOCDATA                                                  
            5.0T2   939  SYSTEM_DOCUMENTATION.VOL.D.005     1 LINE    190  240 PAGE UM   MTS                 JULY 03, 1981  16:51:01
            5.0T5   384                       
0          THE "STANDARD FILE" FOR CONTAINING DOCUMENTATION; POINTED TO BY (646/5).
           DOCUMENTATION MAY ALSO BE IN OTHER FILES.
            
           NOTE: THIS FILE IS CURRENTLY VERY INCOMPLETE.
0          Referenced by comments of: 646/4 
00646/007   SYSTEM DOCUMENTATION     PROTECTION      WF             S1559 5.0T2 VLO FSNAME=SYSTEM_DOCUMENTATION.PROT.WF.006(1)   940
            5.0T2   940  SYSTEM_DOCUMENTATION.PROT.WF.006   1 LINE    183   14 PAGE UM   MTS                 JULY 28, 1977  21:48:18
            5.0T5   385                       
0          DOCUMENTATION ON MTS PROTECTION OF INFORMATION IN FILES AND VM.  THIS IS A
           PAPER PRESENTED AT THE IEEE SYMPOSIUM ON COMPUTER SECURITY AND INTEGRITY, AT
           THE (U.S.) NATIONAL BUREAU OF STANDARDS, MAY 1977, BY GARY PIRKOLA AND JOHN
           SANGUINETTI.
1                                                                                               SUN SEP 08/96   15:24:55   Page  411
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00647/001A  TASKSTAT SUBR                            SA  G          MTS:TASKSTAT(1000)                                              
            5.1T1   802  TASKSTAT_SUBR..SA.001              1 LINE     73   11 PAGE UM   MTS       STERKEN   JULY 23, 1983  12:21:55
0          Re-entrant subroutine to return state of an active task as follows:
                CALL TASKSTAT,(JOBTABLE,CODE,INFO,PSW,DESC)
             JOBTABLE contains a pointer to guess what.
             CODE will contain a fullword integer describing the state of the task:
                   0 = READY                  10 = DORMANT (NO CPU Q)  20 = SNARKED (MTS/TMTS ONLY)
                   1 = PAGE WAIT              11 = JOBSA WAIT          21 = UNUSED AT UM
                   2 = DASD I/O WAIT          12 = CMDSTA WAIT              GETSEG WAIT AT UBC
                   3 = OTHER I/O WAIT (ÂDASD) 13 = OPER WAIT           22 = WAYTSUBR
                   4 = TIME WAIT              14 = INACTIVE JOB TABLE       SLEEPSUB
                   5 = SVC LOCK WAIT          15 = DASD GTUNIT WAIT         WAYTRTN 
                   6 = GTUNIT WAIT (ÂDASD)    16 = HASP WAYT                SLEEPRTN
                   7 = FILE WAIT              17 = INTERTASK WAIT      23 = UNUSED AT UM
                   8 = UNKNOWN WAYT           18 = INTERTASK BUSY           HASP Q AT UBC
                   9 = IDLE                   19 = UNUSED
             INFO will contain a fullword value depending on code.
                for codes 0 and 1:      INFO = 0 -> NEUTRAL, 1 -> PRIV, 2 -> NON-PRIV
                for codes 2, 3, 6, 15:  INFO = DEVICE LIST POINTER
                for code 5:             INFO = LOCK NUMBER
                for codes 8, 16:        INFO = WAYT FLAG
                for other codes:        INFO = 0
             PSW will contain the right half of the PSW if there is one, otherwise zero.
             DESC will contain a 12-byte ready-to-print description of the current state.
            
           Called by TASKS JOB (019), SSRTN (413/1), LOADCLAS (540/8), THE 3270 DSR %ACTIVITY
           COMMAND (629/4), PWCT PGM (540/26), and GTUNIT (540/17).  The %activity command 
           calls an alternate entry point named PREVSTAT, which requires an additional 
           parameter (SA) which is a save area containing the task's GR0, GR1, and GR2 for 
           the next lower local CPU queue level and uses the fourth parameter (PSW) as an 
           inpur rather than an outpur argument.  Copies COPY:LLMPSEQU (087), *CNFGINFODSECT
           (654), COPY:GLOBALS (1026/3), and COPY:JOBSTA (413/9).  Assemble using 
           COPY:SETPARM (653). 
0          Referenced by comments of: 400/1, 413/1, 540/8, 540/17, 806/1 
00647/002A  TASKSTAT SUBR                            OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       STERKEN                          
0          Object part of Resident System (468).
00648/001A  EDITOR                   PMF PROJ FILE   D   G          EDIT:EDITPROJ                                                   
            5.1T1   803  EDITOR.PMF_PROJ_FILE.D.001         1 LINE    198    6 PAGE UM   D BODWIN            JULY 23, 1983  12:21:56
0          This component is the MTS context Editor with pattern matching and variables.
           The modules in this component must be assembled with *ASMH (737) (*ASMG will
           give warning messages). The following components are required to assemble the
           Editor:
            
                 COPY:ED.MACROS (648/19)
                 *SYSMAC (225/1)
                 COPY:MTS.MACROS (344/3)
                 OLD:CC.MACROS (1054/4)
1                                                                                               SUN SEP 08/96   15:24:55   Page  412
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                *GDINFODSECT (594/1)
                 *CNFGINFODSECT (654/1)
            
           The following components are used for listing enhancements, and are not 
           strictly required, but are referred to by the commands generated by various
           PMF procedures.
            
                 *PEXIT (775)
                 UNSP:VERLAB (812)
            
           The following additional components are required to run the Editor:
            
                 MTS Macro Low-level symbol table routines (802/26)
                 Low level Virtual File routines, now Pistled separately but still 
                   considered part of the Editor.
                 Resident translate and translate and test tables (779/2)
                 Screen Support Routines (811)
            
           ********************************************************************
            
           This subcomponent is the PMF project file for the Editor. It contains
           procedures to assemble the pieces of the Editor, as well as various
           miscellaneous procedures.
0          Referenced by comments of: 812/1 
00648/002A  EDITOR                   CLS             SA  G          EDIT:EDIT/BAS                                                   
            5.1T1   804  EDITOR.CLS.SA.002                  1 LINE     72   47 PAGE UM   D BODWIN            JULY 23, 1983  12:21:59
0          This subcomponent is the Main routine for the Editor. It acquires and
           initializes the global storage, processes attention and program interrupts,
           prints error messages, parses commands and modifiers, and calls the various
           parse and execute routines.
            
           This is the base source as of MTS Workshop 8.
0          Referenced by comments of: 648/27, 648/36 
00648/003A  EDITOR                   CLS             UC  G          EDIT:EDIT/UPD                                                   
            5.1T1   805  EDITOR.CLS.UC.003                  1 LINE     72    6 PAGE UM   D BODWIN            JULY 23, 1983  12:22:01
0          *Cdupdate input to produce the current source.
00648/004A  EDITOR                   CLS             SA  G          EDIT:EDIT/CUR                                                   
            5.1T1   806  EDITOR.CLS.SA.004                  1 LINE     81   52 PAGE UM   D BODWIN            JULY 23, 1983  12:22:01
0          Result of applying updates to base source.
00648/005A  EDITOR                   CMNDS A TO E    SA  G          EDIT:CMDPNE1/BAS                                                
            5.1T1   807  EDITOR.CMNDS_A_TO_E.SA.005         1 LINE     72   38 PAGE UM   D BODWIN            JULY 23, 1983  12:22:04
0          This subcomponent contains the command parse and execute routines for
           Editor commands beginning with A through E.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  413
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This is the base source as of MTS Workshop 8.
00648/006A  EDITOR                   CMNDS A TO E    UC  G          EDIT:CMDPNE1/UPD                                                
            5.1T1   808  EDITOR.CMNDS_A_TO_E.UC.006         1 LINE     69    3 PAGE UM   D BODWIN            JULY 23, 1983  12:22:05
0          *Cdupdate input to produce the current source
00648/007A  EDITOR                   CMNDS A TO E    SA  G          EDIT:CMDPNE1/CUR                                                
            5.1T1   809  EDITOR.CMNDS_A_TO_E.SA.007         1 LINE     80   38 PAGE UM   D BODWIN            JULY 23, 1983  12:22:05
0          Result of applying updates to base source.
00648/008A  EDITOR                   CMNDS F TO M    SA  G          EDIT:CMDPNE2/BAS                                                
            5.1T1   810  EDITOR.CMNDS_F_TO_M.SA.008         1 LINE     72   34 PAGE UM   D BODWIN            JULY 23, 1983  12:22:07
0          This subcomponent contains the command parse and execute routines for
           Editor commands beginning with F through M.
            
           This is the base source as of MTS Workshop 8.
0          Referenced by comments of: 648/30 
00648/009A  EDITOR                   CMNDS F TO M    UC  G          EDIT:CMDPNE2/UPD                                                
            5.1T1   811  EDITOR.CMNDS_F_TO_M.UC.009         1 LINE     68    3 PAGE UM   D BODWIN            JULY 23, 1983  12:22:08
0          *Cdupdate input to produce the current source.
00648/010A  EDITOR                   CMNDS F TO M    SA  G          EDIT:CMDPNE2/CUR                                                
            5.1T1   812  EDITOR.CMNDS_F_TO_M.SA.010         1 LINE     80   35 PAGE UM   D BODWIN            JULY 23, 1983  12:22:09
0          Result of applying updates to base source.
00648/011A  EDITOR                   CMNDS N TO Z    SA  G          EDIT:CMDPNE3/BAS                                                
            5.1T1   813  EDITOR.CMNDS_N_TO_Z.SA.011         1 LINE     72   31 PAGE UM   D BODWIN            JULY 23, 1983  12:22:10
0          This subcomponent contains the command parse and execute routines for
           Editor commands beginning with N through Z, excluding Visual Mode commands.
            
           This is the base source as of MTS Workshop 8.
00648/012A  EDITOR                   CMNDS N TO Z    UC  G          EDIT:CMDPNE3/UPD                                                
            5.1T1   814  EDITOR.CMNDS_N_TO_Z.UC.012         1 LINE     69    3 PAGE UM   D BODWIN            JULY 23, 1983  12:22:12
0          *Cdupdate input to produce the current source.
00648/013A  EDITOR                   CMNDS N TO Z    SA  G          EDIT:CMDPNE3/CUR                                                
            5.1T1   815  EDITOR.CMNDS_N_TO_Z.SA.013         1 LINE     82   32 PAGE UM   D BODWIN            JULY 23, 1983  12:22:12
0          Results of applying updates to base source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  414
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00648/014   EDITOR                   EST SUBR        SA  G          S1559 5.0T2 VLO FSNAME=EDITOR.EST_SUBR.SA.004(1)             944
            5.0T2   944  EDITOR.EST_SUBR.SA.004             1 LINE     80    6 PAGE UM   D BODWIN            JUNE 30, 1977  12:31:56
            5.0T5   389                       
0          This subcomponent contains the line number insertion estimation routine
           used by the Editor, *OBJUTIL, and *MACUTIL.  It is used to calculate the
           largest "nice" increment that may be used to insert a specified number of
           lines between two existing lines.
0          Referenced by comments of: 721/1, 738/1, 738/3 
00648/015A  EDITOR                   EXPRESSIONS     SA  G          EDIT:EXPRTNS/BAS                                                
            5.1T1   816  EDITOR.EXPRESSIONS.SA.015          1 LINE     72   12 PAGE UM   D BODWIN            JULY 23, 1983  12:22:13
0          This subcomponent contains the predefined variable routines and the beginning
           of an expression parser added in anticipation of MTS conditional commands.
            
           This is the base source as of MTS Workshop 8.
00648/016A  EDITOR                   EXPRESSIONS     UC  G          EDIT:EXPRTNS/UPD                                                
            5.1T1   817  EDITOR.EXPRESSIONS.UC.016          1 LINE     68    1 PAGE UM   D BODWIN            JULY 23, 1983  12:22:14
0          *Cdupdate input to produce the current source.
00648/017A  EDITOR                   EXPRESSIONS     SA  G          EDIT:EXPRTNS/CUR                                                
            5.1T1   818  EDITOR.EXPRESSIONS.SA.017          1 LINE     72   12 PAGE UM   D BODWIN            JULY 23, 1983  12:22:14
0          Result of applying updates to base source.
00648/018A  EDITOR                   I/O SUPPORT     SA  G          EDIT:EDIORTNS/BAS                                               
            5.1T1   819  EDITOR.I/O_SUPPORT.SA.018          1 LINE     72   48 PAGE UM   D BODWIN            JULY 23, 1983  12:22:15
0          This subcomponent contains the Editor File Independent I/O routines.
           Aliases for these routines are defined by a COM record in the Editor
           CLS interface.  These routines may be called by user-supplied intermediate
           I/O routines when the Editor is called as a subroutine.
            
           This is the base source as of MTS Workshop 8.
00648/019A  EDITOR                   I/O SUPPORT     UC  G          EDIT:EDIORTNS/UPD                                               
            5.1T1   820  EDITOR.I/O_SUPPORT.UC.019          1 LINE     68    1 PAGE UM   D BODWIN            JULY 23, 1983  12:22:16
0          *Cdupdate input to produce the current source.
0          Referenced by comments of: 648/1 
00648/020A  EDITOR                   I/O SUPPORT     SA  G          EDIT:EDIORTNS/CUR                                               
            5.1T1   821  EDITOR.I/O_SUPPORT.SA.020          1 LINE     72   48 PAGE UM   D BODWIN            JULY 23, 1983  12:22:16
0          Result of applying updates to base source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  415
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00648/021A  EDITOR                   PATTERN         SA  G          EDIT:PATTERN/BAS                                                
            5.1T1   822  EDITOR.PATTERN.SA.021              1 LINE     73   69 PAGE UM   D BODWIN            JULY 23, 1983  12:22:18
0          This subcomponent contains the Editor Pattern Matching routines.
            
           This is the base source as of MTS Workshop 8.
00648/022A  EDITOR                   PATTERN         UC  G          EDIT:PATTERN/UPD                                                
            5.1T1   823  EDITOR.PATTERN.UC.022              1 LINE     68    1 PAGE UM   D BODWIN            JULY 23, 1983  12:22:21
0          *Cdupdate input to produce the current source.
00648/023A  EDITOR                   PATTERN         SA  G          EDIT:PATTERN/CUR                                                
            5.1T1   824  EDITOR.PATTERN.SA.023              1 LINE     73   69 PAGE UM   D BODWIN            JULY 23, 1983  12:22:21
0          Result of applying updates to base source.
00648/024A  EDITOR                   PRIMITIV PARSE  SA  G          EDIT:PRPARSE/BAS                                                
            5.1T1   825  EDITOR.PRIMITIV_PARSE.SA.024       1 LINE     72   46 PAGE UM   D BODWIN            JULY 23, 1983  12:22:23
0          This subcomponent contains the Editor's primitive parsing routines.
            
           This is the base source as of MTS Workshop 8.
00648/025A  EDITOR                   PRIMITIV PARSE  UC  G          EDIT:PRPARSE/UPD                                                
            5.1T1   826  EDITOR.PRIMITIV_PARSE.UC.025       1 LINE     70    1 PAGE UM   D BODWIN            JULY 23, 1983  12:22:25
0          *Cdupdate input to produce the current source.
00648/026A  EDITOR                   PRIMITIV PARSE  SA  G          EDIT:PRPARSE/CUR                                                
            5.1T1   827  EDITOR.PRIMITIV_PARSE.SA.026       1 LINE     78   46 PAGE UM   D BODWIN            JULY 23, 1983  12:22:25
0          Result of applying updates to base source.
00648/027A  EDITOR                   SUBROUTINES     SA  G          EDIT:SUBRTNS/BAS                                                
            5.1T1   828  EDITOR.SUBROUTINES.SA.027          1 LINE     72   55 PAGE UM   D BODWIN            JULY 23, 1983  12:22:27
0          This subcomponent contains the common Editor subroutines.  It was formerly
           a part of the Editor Main (648/2).
            
           This is the base source as of MTS Workshop 8.
00648/028A  EDITOR                   SUBROUTINES     UC  G          EDIT:SUBRTNS/UPD                                                
            5.1T1   829  EDITOR.SUBROUTINES.UC.028          1 LINE     70    1 PAGE UM   D BODWIN            JULY 23, 1983  12:22:29
0          *Cdupdate input to produce the current source.
00648/029A  EDITOR                   SUBROUTINES     SA  G          EDIT:SUBRTNS/CUR                                                
            5.1T1   830  EDITOR.SUBROUTINES.SA.029          1 LINE     80   55 PAGE UM   D BODWIN            JULY 23, 1983  12:22:29
0          Result of applying updates to base source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  416
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00648/030A  EDITOR                   VIRTUAL FILES   SA  G          EDIT:VFRTNS.S                                                   
            5.1T1   831  EDITOR.VIRTUAL_FILES.SA.030        1 LINE     71   15 PAGE UM   D BODWIN            JULY 23, 1983  12:22:31
0          This subcomponent contains the Editor Virtual File routines, a set of routines
           which are used like line files, but use VM for storage. The calling sequences
           are similar to those used within the Editor to access the I/O support (648/8).
            
           Note:  At UM, these routines are separately loaded by Pistle, since they
                  are called by the MTS Macro Processor High-level virtual file routines.
00648/031A  EDITOR                   VIRTUAL FILES   OC  G          SEG2:VFRTNS                                                     
            5.1T1   832  EDITOR.VIRTUAL_FILES.OC.031        1 LINE   2450    4 PAGE UM   D BODWIN            JULY 23, 1983  12:22:32
                         SEG2:VFRTNS          
00648/032A  EDITOR                   VISUAL CMND     SA  G          EDIT:VISUAL/BAS                                                 
            5.1T1   833  EDITOR.VISUAL_CMND.SA.032          1 LINE     72   35 PAGE UM   D BODWIN            JULY 23, 1983  12:22:33
0          This subcomponent contains the command parse and execute routines for the
           Editor's Visual Mode.
            
           This is the base source as of MTS Workshop 8.
00648/033A  EDITOR                   VISUAL CMND     UC  G          EDIT:VISUAL/UPD                                                 
            5.1T1   834  EDITOR.VISUAL_CMND.UC.033          1 LINE     73    9 PAGE UM   D BODWIN            JULY 23, 1983  12:22:34
0          *Cdupdate input to produce the current source.
00648/034A  EDITOR                   VISUAL CMND     SA  G          EDIT:VISUAL/CUR                                                 
            5.1T1   835  EDITOR.VISUAL_CMND.SA.034          1 LINE     82   40 PAGE UM   D BODWIN            JULY 23, 1983  12:22:35
0          Result of applying updates to base source.
00648/035A  EDITOR                   CLS INTERFACE   SA  G          EDIT:EDITCLS.S                                                  
            5.1T3   342  EDITOR.CLS_INTERFACE.SA.035        1 LINE     72    4 PAGE UM   D BODWIN            AUG. 20, 1983  19:47:13
0          This subcomponent is the CLS interface for the MTS $EDIT command. It is called
           using the CLSPLAN calling conventions, and it in turn sets up to call the
           resident EDIT subroutine. It is responsible for parsing off any file name or
           one-shot command.
            
           Note: This subcomponent PUNCHES the COM card needed by PISTLE. However, since
           the assembler can only punch 80 characters, it is punched it two pieces, which
           must be concatenated before the resulting file will load properly.
0          Referenced by comments of: 648/36 
00648/036A  EDITOR                   OBJECT          OC  G          *CLSED                                                          
            5.1T1   836  EDITOR.OBJECT.OC.036               1 LINE  19482  183 PAGE UM   D BODWIN            JULY 23, 1983  12:22:36
                         *CLSED               
0          This subcomponent is the file loaded into shared VM by PISTLE at IPL.  It
           contains the object for subcomponents (648/2) through (648/35), in *OBJUTIL
           format.
1                                                                                               SUN SEP 08/96   15:24:55   Page  417
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 648/44 
00648/037A  EDITOR                   MACROS          SM  G          EDIT:MACROS/BAS                                                 
            5.1T1   837  EDITOR.MACROS.SM.037               1 LINE     72   41 PAGE UM   D BODWIN            JULY 23, 1983  12:22:42
0          This subcomponent contains macros and COPY sections used by the Editor.
            
           This is the base source as of MTS Workshop 8.
00648/038A  EDITOR                   MACROS          UC  G          EDIT:MACROS/UPD                                                 
            5.1T1   838  EDITOR.MACROS.UC.038               1 LINE     83    3 PAGE UM   D BODWIN            JULY 23, 1983  12:22:44
0          *Cdupdate to produce the current macro library.
00648/039A  EDITOR                   MACROS          SM  G          COPY:ED.MACROS                                                  
            5.1T1   839  EDITOR.MACROS.SM.039               1 LINE     79   42 PAGE UM   D BODWIN            JULY 23, 1983  12:22:44
0          Current macro library.
0          Referenced by comments of: 802/29 
00648/040A  EDITOR                   ETC:EDEXPLAIN   M              ETC.:EDEXPLAIN                                                  
            5.1T3   343  EDITOR.ETC:EDEXPLAIN.M.040         1 LINE     72   62 PAGE UM   D BODWIN            AUG. 20, 1983  19:47:15
                         ETC:EDEXPLAIN        
0          This subcomponent contains the text used by the Editor's EXPLAIN command.
            
           This is the version brought to MTS Workshop 8 on the UBC tape.
00648/041   EDITOR                   EXPLAIN GEN     SA  G          EDIT:EXPLAINGEN(1,999)                                          
            5.0T2   956  EDITOR.EXPLAIN_GEN.SA.016          1 LINE     83    3 PAGE UM   D BODWIN            AUG. 06, 1981  04:15:15
            5.0T5   401                       
0          This subcomponent is the source for the program that generates the directory at
           the front of the explain command text file. Works like *MACGEN (293/1) except
           that there is an extra field which contains ending line numbers. EXPLAINGEN
           takes ETC:EDEXPLAIN(1000) (648/42) as SCARDS and produces the directory on
           SPUNCH, which should be assigned to ETC:EDEXPLAIN(1,999).
00648/042   EDITOR                   EXPLAIN GEN     OC  G          EDIT:EXPLAINGEN(1000)                                           
            5.0T2   957  EDITOR.EXPLAIN_GEN.OC.017          1 LINE     80    2 PAGE UM   D BODWIN            AUG. 06, 1981  04:15:16
            5.0T5   402                       
0          Referenced by comments of: 648/41 
00648/043A  EDITOR                   *ED PROGRAM     SA  G          EDIT:EDCALLER.S                                                 
            5.1T3   344  EDITOR.?ED_PROGRAM.SA.043          1 LINE     73    3 PAGE UM   D BODWIN            AUG. 20, 1983  19:47:18
0          This subcomponent is a program that calls the EDIT subroutine.
           It is useful for debugging the Editor.
1                                                                                               SUN SEP 08/96   15:24:55   Page  418
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00648/044A  EDITOR                   *ED PROGRAM     OE  G          EDIT:ED                                                         
            5.1T3   345  EDITOR.?ED_PROGRAM.OE.044          1 LINE    964    2 PAGE UM   D BODWIN            AUG. 20, 1983  19:47:19
0          Contains a "$CONTINUE WITH EDIT:CLSED" the contents of which are used
           to test new versions of *CLSED (648/36).
00648/045A  EDITOR                   CHANGES         WX             EDIT:ED.CHANGES.W                                               
            5.1T1   840  EDITOR.CHANGES.WX.045              1 LINE     82   17 PAGE UM   D BODWIN            JULY 23, 1983  12:22:45
0          This subcomponent contains a list of changes made to the Editor since it
           was last distributed.  Contains commands at the front to generate output
           in -PRINT.
00649/001   SNOBOLTIDY                               SA  G  STID    S1153 UNSP VLO FSNAME=SNOBOLTIDY.S                              
            5.0T2   961  SNOBOLTIDY..SA.001                 1 LINE     80    9 PAGE UM   UNSP                SEP. 30, 1975  11:00:41
            5.0T5   406                       
0          A SNOBOL4 SOURCE TIDYING PROGRAM WHICH ESTABLISHES A CORRESPONDENCE BETWEEN
           MTS LINE NUMBERS AND THE INTERNAL STATEMENT NUMBERS USED BY THE COMPILERS.
00649/002   SNOBOLTIDY                               OE  G          UNSP:SNOBOLTIDY                                                 
            5.0T2   962  SNOBOLTIDY..OE.002                 1 LINE   1382    3 PAGE UM   UNSP                JULY 03, 1981  16:54:06
            5.0T5   407  UNSP:SNOBOLTIDY      
00649/003   SNOBOLTIDY                               WF             S1153 UNSP VLO FSNAME=SNOBOLTIDY.FMT                            
            5.0T2   963  SNOBOLTIDY..WF.003                 1 LINE     82    1 PAGE UM   UNSP                SEP. 15, 1980  16:43:39
            5.0T5   408                       
00650/001A  BJPMOD                                   SA  G          S1568 OGDEN2 FSNAME=BJPMOD.S                                    
            5.1T1   841  BJPMOD..SA.001                     1 LINE     72    4 PAGE UM   OGDEN               DEC. 07, 1981  03:43:02
0          SUBROUTINE CALLED BY SSRTN (413/1) TO DYNAMICALLY ADJUST THE SUPERVISOR PAGING
           PARAMETERS BASED ON THE SYSTEM LOAD.
           COPIES COPY:JOBSTA (413/9), AND COPY:BJPDSCT (650/3).
0          Referenced by comments of: 45/15, 413/1, 540/10 
00650/002A  BJPMOD                                   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   OGDEN                                      
0          Object part of Resident System (468).
00650/003   BJPMOD                   BJP DSECT       SA  G          COPY:BJPDSCT                                                    
            5.0T4   424  BJPMOD.BJP_DSECT.SA.003            1 LINE     69    1 PAGE UM   OGDEN               AUG. 09, 1981  23:50:52
            5.0T10  328  COPY:BJPDSCT         
0          DSECT FOR SUPERVISOR'S BIG JOB PARAMETER VECTOR.
0          Referenced by comments of: 413/1, 540/10, 577/1, 650/1 
00651/001A  RATES                    RATEFILEFMT     SA  G  RTFL    S0027 DISTRB FSNAME=RATEFILEFMT                                 
            5.1T1   842  RATES.RATEFILEFMT.SA.001           1 LINE     80    2 PAGE UM   ENGLE               AUG. 26, 1982  11:40:26
0          DESCRIBES MTS RATE LINES IN *RATEFILE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  419
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 651/5 
00651/002A  RATES                    RATEFILEFMT     UC  G          S0027 DISTRB FSNAME=RATEFILEFMTUPD                              
            5.1T1   843  RATES.RATEFILEFMT.UC.002           1 LINE     72    1 PAGE UM   ENGLE               AUG. 26, 1982  11:40:38
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00651/003A  RATES                    COPY:RATEVEC    SA  G  RATE    COPY:RATEVEC                                                    
            5.1T1   844  RATES.COPY:RATEVEC.SA.003          1 LINE     80    3 PAGE UM   ENGLE               JULY 23, 1983  12:22:49
                         COPY:RATEVEC         
0          DSECT COPIED UNDER THE NAME "COPY:RATEVEC" TO DESCRIBE "RATEVEC" IN SHARED
           VM AND THE INFORMATION RETURNED BY GETRATES (651/11).
0          Referenced by comments of: 71/1, 104/22, 344/1, 615/15, 631/8, 632/1, 632/4, 651/11, 651/17, 708/1 
00651/004C  RATES                    COPY:RATEVEC    UC  G          S0027 DISTRB FSNAME=RATEVECUPD                                  
            5.1T1   845  RATES.COPY:RATEVEC.UC.004          1 LINE     72    1 PAGE UM   ENGLE               AUG. 26, 1982  11:44:48
0          Updates source from previous regular distribution to current one.
00651/005A  RATES                    RATEGEN         SA  G  RGEN    S0027 DISTRB FSNAME=RATEGEN                                     
            5.1T1   846  RATES.RATEGEN.SA.005               1 LINE     80   56 PAGE UM   ENGLE               AUG. 26, 1982  11:46:44
0          PROGRAM TO GENERATE *RATEFILE (651/10).  EACH LINE IN *RATEFILE IS PRODUCED BY A MACRO
           EXPANSION.  CONSEQUENTLY, MACRO CALLS MUST BE CHANGED OR ADDED AND THE PROGRAM
           REASSEMBLED FOR EACH CHANGE IN THE RATES.
           COPIES RATEFILEFMT (651/1).
0          Referenced by comments of: 651/10 
00651/006A  RATES                    RATEGEN         OC  G          S0027 DISTRB FSNAME=RGEN                                        
            5.1T1   847  RATES.RATEGEN.OC.006               1 LINE     80   38 PAGE UM   ENGLE               AUG. 26, 1982  11:47:11
00651/007A  RATES                    RATEPRNT        SA  G  RPRT    S0027 DISTRB FSNAME=RATEPRNT                                    
            5.1T1   848  RATES.RATEPRNT.SA.007              1 LINE     80    4 PAGE UM   ENGLE               AUG. 26, 1982  11:53:25
0          PROGRAM TO PRINT THE CONTENTS OF *RATEFILE.  RATE LINES ARE PRINTED AS IF THEY FORMED
           A COLUMN MAJOR MATRIX CONTAINING 3 ROWS.
00651/008C  RATES                    RATEPRNT        UC  G          S0027 DISTRB FSNAME=RATEPRNTUPD                                 
            5.1T1   849  RATES.RATEPRNT.UC.008              1 LINE     57    1 PAGE UM   ENGLE               AUG. 26, 1982  11:53:32
0          Updates source from previous regular distribution to current one.
00651/009A  RATES                    RATEPRNT        OC  G          S0027 DISTRB FSNAME=RPRT                                        
            5.1T1   850  RATES.RATEPRNT.OC.009              1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  11:53:36
00651/010A  RATES                    *RATEFILE       D   G          MTS:TST.RATEFILE                                                
            5.1T1   851  RATES.?RATEFILE.D.010              1 LINE    199    2 PAGE UM   ENGLE               JULY 23, 1983  12:22:53
                         *RATEFILE            
0          FILE USED BY MTS AND BILLING FOR CHARGE RATES.  DOES NOT AGREE WITH DISTRIBUTED
           VERSION OF RATEGEN (651/5)-- HAS EXTRA CHEAP RATES (FREE).
1                                                                                               SUN SEP 08/96   15:24:55   Page  420
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 326/1, 651/5, 651/11 
00651/011A  RATES                    GETRATES        SA  G          MTSS:GETRATES(1,999)                                            
            5.1T1   852  RATES.GETRATES.SA.011              1 LINE     67    4 PAGE UM   MTS       BURLING   JULY 23, 1983  12:22:54
0          Subroutine to return rates given a rate number. This is the only program
           outside of the ACCOUNTING and BILLING programs which accesses *RATEFILE
           (651/10). Copies COPY:RATEVEC (651/3).
0          Referenced by comments of: 71/1, 651/3 
00651/012A  RATES                    GETRATES        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00651/013   RATES                    RATENBR D5 MAS  SA  G          S1561 5.0T4 VLO FSNAME=RATES.RATENBR_D5_MAS.SA.011(1)        425
            5.0T4   425  RATES.RATENBR_D5_MAS.SA.011        1 LINE     80    8 PAGE UM   MTS       BURLING   AUG. 09, 1981  23:50:55
            5.0T10  329                       
0          Subroutine to compute the appropriate rate number for the current job.
           Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU(100) (087), and
           *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3),
           OLD:CC.MACROS (1054/4), COPY:SETPARM (653/1) and with
           PAR=PEXIT=*PEXIT.
0          Referenced by comments of: 42/2, 651/20, 761/1 
00651/014A  RATES                    RATENBR UPD     UC  G          MTSS:RNBR/UPD                                                   
            5.1T1   853  RATES.RATENBR_UPD.UC.014           1 LINE     80    8 PAGE UM   MTS       BURLING   JULY 23, 1983  12:22:54
0          *CDUPDATE input to produce current source.
00651/015A  RATES                    RATENBR         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00651/016A  RATES                    RATENBR COMM    D   G          MTSS:RNBR/COM                                                   
            5.1T1   854  RATES.RATENBR_COMM.D.016           1 LINE     60    1 PAGE UM   MTS       BURLING   JULY 23, 1983  12:22:55
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00651/017A  RATES                    RATEVEC         SA  G          MTSS:RATEVEC(1,999)                                             
            5.1T1   855  RATES.RATEVEC.SA.017               1 LINE     47    1 PAGE UM   MTS       BURLING   JULY 23, 1983  12:22:55
0          Initial values for rate vector.  Copies COPY:RATEVEC (651/3).
            
           ******************************************************************
           Changes since D5.0:
            
           Changed because of change in accounting record format.
           ******************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  421
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00651/018A  RATES                    RATEVEC         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00651/019   RATES                    DOCUMENTATION   WF             S1559 5.0T2 VLO FSNAME=RATES.DOCUMENTATION.WF.016(1)         974
            5.0T2   974  RATES.DOCUMENTATION.WF.016         1 LINE    126    5 PAGE UM   MTS       BURLING   SEP. 23, 1975  00:16:54
            5.0T5   419                       
0          A writeup describing the MTS variable rates implementation.
00651/020C  RATES                    DUMMY RATENBR   SA  G          MTS:TST.RNBR(1,999)                                             
            5.1T3   346  RATES.DUMMY_RATENBR.SA.020         1 LINE     64    1 PAGE UM   MTS       BURLING   AUG. 20, 1983  19:49:24
0          Dummy version of RNBRSUB (651/13) which is used on the distribution test pack
           to always return rate number zero (for which the rates are zero).
00651/021C  RATES                    DUMMY RATENBR   OC  G        # MTS:TST.RNBR(1000)                                              
                                                                                    UM   MTS       BURLING                          
0          This object deck is the deck called RNBR.DUMMY is the distribution RAMROD
           systems.
00652/001   MTS VOLUME 12            MASTER          WT             S1559 5.0T2 VLO FSNAME=MTS_VOLUME_12.MASTER.WT.001(1)        975
            5.0T2   975  MTS_VOLUME_12.MASTER.WT.001        1 SEQ     132  108 PAGE UM   MANUAL              JULY 28, 1977  21:55:28
            5.0T5   420                       
0          TEXT/360 MASTER FOR VOLUME 12 "PIL/2 IN MTS" OF THE UM MTS MANUALS, DECEMBER 1974.
            
           EDITOR:  RICHARD A. SALISBURY
00652/002   MTS VOLUME 12            PRINT           PT             S1559 5.0T2 VLO FSNAME=MTS_VOLUME_12.PRINT.PT.002(1)         976
            5.0T2   976  MTS_VOLUME_12.PRINT.PT.002         1 SEQ     132  248 PAGE UM   MANUAL              JULY 28, 1977  21:55:38
            5.0T5   421                       
0          TEXT/360 PRINT FILE.
00653/001   SETPARM                                  SM  G          COPY:SETPARM                                                    
            5.0T2   977  SETPARM.ASMG_VERSION.SM.001        1 LINE     72    3 PAGE UM   MTA                 AUG. 06, 1981  04:17:08
            5.0T5   422  COPY:SETPARM         
0          Macro library containing only the SETPARM and SETPARMH macros which generate
           SET statements for the COPY:GLOBALDEFS (1026/1) symbols based on the SYSPARM
           field given to *ASMG or *ASMH.
            
           The ASMH SETPARMH macro scans SYSPARM for NAME=tval where "NAME" is a symbol
           name, "t" is A, B, D, or E for SETA, SETB, SETC, or EQU assignment, and "val"
           is a value, possibly enclosed in quotes or parens. NAME=tval may be repeated
           and must be separated from previous items using a comma.
            
           For *ASMG, if a program has a SETPARM macro (after copying COPY:GLOBALS)
           and is assembled with PAR=SYSPARM=0001100101023UQV then additional SET
           statements will be generated as follows:
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  422
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0              &S370    SETB  0
               &OC3066  SETB  0
               &CRTY    SETB  0
               &SIMPLEX SETB  1
               &OPERJOB SETB  1
               &PROT    SETB  0
               &AMD470  SETB  0
               &BLKMPX  SETB  1
               &IO370   SETB  0
               &NOSLT   SETB  1
               &OMR     SETC  'NO'
               &JTBLPOL SETA  2
               &DTBLPOL SETA  3
               &INSTALL SETC  'UQV'
0          Referenced by comments of: 4/1, 5/1, 7/1, 8/1, 10/1, 42/1, 45/1, 46/1, 79/1, 135/1, 198/1, 399/1, 400/1, 464/1,
                 482/7, 509/1, 513/1, 531/1, 539/1, 540/1, 540/6, 577/1, 577/8, 577/11, 578/1, 634/1, 634/3, 635/1, 636/1,
                 637/1, 638/1, 639/1, 647/1, 651/13, 732/1, 777/1, 829/1, 1021/1, 1021/4, 1081/1, 4000/1 
00654/001A *CNFGINFODSECT                            SA  G          *CNFGINFODSECT                                                  
            5.1T1   856  CNFGINFODSECT..SA.001              1 LINE     72    5 PAGE UM   MTA                 JULY 23, 1983  12:22:55
                         *CNFGINFODSECT       
0          DSECT FOR TABLE DESCRIBING SYSTEM CONFIGURATION (E.G. CPU TYPE AND FEATURES).
0          Referenced by comments of: 1/5, 4/5, 9/1, 42/1, 46/1, 49/1, 67/27, 97/12, 101/1, 104/68, 104/158, 116/1, 135/1,
                 303/1, 303/6, 354/5, 360/1, 400/1, 413/1, 461/1, 482/1, 506/8, 507/2, 509/1, 513/1, 531/1, 534/3, 540/1,
                 540/10, 545/4, 545/15, 558/1, 559/2, 566/11, 566/26, 577/8, 600/1, 600/7, 600/34, 610/1, 621/2, 629/1, 634/1,
                 636/1, 638/1, 639/1, 647/1, 648/1, 651/13, 655/4, 671/3, 682/39, 682/41, 721/1, 721/11, 721/18, 729/2, 738/1,
                 787/5, 787/6, 787/19, 798/69, 814/4, 829/1, 1002/13, 1002/23, 1019/1, 1019/9, 1020/1, 3018/29, 3024/13 
00655/001   EREP/370                 DRIVER PROGRAM  SA  G        # (SEE *VSS DRIVER PROGRAM)                                       
                                                                                    UM   MTA                                        
0          Source for the program to call VSS to RUN EREP.  Requires *GDINFODSECT (594).
            
            
           This program is obtained by assembling VSS.DRIVER (1078/49) with SYSPARM=EREP.
0          Referenced by comments of: 621/8 
00655/002A  EREP/370                 DRIVER PROGRAM  OE  G          SYS:EREP                                                        
            5.1T1   857  EREP/370.DRIVER_PROGRAM.OE.002     1 LINE   2126    3 PAGE UM   MTA                 JULY 23, 1983  12:22:56
                         SYS:EREP             
0          Requires ETC:VSS (1078/48) and ETC:EREPCMDS (655/3).
00655/003A  EREP/370                 COMMANDS        C              ETC:EREPCMDS                                                    
            5.1T1   858  EREP/370.COMMANDS.C.003            1 LINE     67    1 PAGE UM   MTA                 JULY 23, 1983  12:22:56
                         ETC:EREPCMDS         
0          VSS (component 1078) commands to run EREP.  Requires ETC:EREPLIB (655/6),
           INIT:UC3330LOG (621/14), INIT:MCFILE (577/15), ETC:CNVTEREP (655/5), and
           ETC:EREPLIB.580 (655/8).
1                                                                                               SUN SEP 08/96   15:24:55   Page  423
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 655/2 
00655/004A  EREP/370                 CNVTEREP        SA  O          MTA:CNVTEREP(1,999)                                             
            5.1T1   859  EREP/370.CNVTEREP.SA.004           1 LINE     72   18 PAGE UM   MTA                 JULY 23, 1983  12:22:57
0          Program to convert log records generated by MCHCCH (577/1), UCDISK
           (787/5), and UCTAPE (787/19) to a format acceptable to PM2 (820) or
           the IBM EREP program which is run under *VSS in MTS. Calls JVCT (674)
           and may call IGFC60 (589/4), IGFC70 (589/5), IGFC80 (589/6), IGFCIC,
           which is not distributed, or A#VCCH47 (589/8) if very old data is
           processed. Copies COPY:CMDAREADSECT (531/20), *GDINFODSECT (594) and
           *CNFGINFODSECT (654). Assemble using COPY:UC.MACROS (787/1) and MCHMAC
           (577/5).
            
           ********************************************************************************
           D5.0C version:
            
           Changes for version 3.2 of PM2 (820).
           ********************************************************************************
            
           ********************************************************************************
           D5.1 version:
            
           5.1 works with EER1400.
           ********************************************************************************
00655/005A  EREP/370                 CNVTEREP        OE  O          ETC:CNVTEREP                                                    
            5.1T1   860  EREP/370.CNVTEREP.OE.005           1 LINE   8080    9 PAGE UM   MTA                 JULY 23, 1983  12:22:58
                         ETC:CNVTEREP         
0          Contains a $CONTINUE WITH MTA:470CCH+MTS:UBCDATEX+COPY:SYSDEFS record which
           refers to components (589/8), (674/2), and (579/3), respectively.
           Calls (621/10) periodically to unlock input file.
0          Referenced by comments of: 655/3, 820/10 
00655/006A  EREP/370                 LIBRARY         OV             ETC:EREPLIB                                                     
            5.1T1   861  EREP/370.LIBRARY.OV.006            1 LINE  18202  693 PAGE UM   MTA                 JULY 23, 1983  12:22:59
                         ETC:EREPLIB          
0          Object in MVS load module form for EREP, in VSS PDS format.
            
           **********************************************************************
           D5.1 version:
            
           This file contains EER1400 with all the Amdahl stuff from the
           version 3.0 580 RMS tape and from the 8209 CONFLICT tape.  The
           580 stuff still doesn't really work.
           ************************************************************************
0          Referenced by comments of: 655/3, 655/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  424
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00655/007A  EREP/370                 470 RMS SOURCE  SA  G          S1403 DIV507 'RMS 6.3' POSN=MS.UPGRADE.SOURCE                   
            5.1T1   862  EREP/370.470_RMS_SOURCE.SA.007     1 LINE     80  199 PAGE AMD            MTA       JULY 23, 1983  12:25:14
0          Source for the EREP modules to format 470 records.
            
           THIS MATERIAL IS COPYRIGHTED AND MAY NOT BE DISTRIBUTED TO ANY THIRD
           PARTY.
00655/008A  EREP/370                 580 LIBRARY     OV  B          ETC:EREPLIB.580                                                 
            5.1T1   863  EREP/370.580_LIBRARY.OV.008        1 LINE   7920    5 PAGE AMD            MTA       JULY 23, 1983  12:25:16
                         ETC:EREPLIB.580      
0          Load module library for 11/6/82 version of IFCEO580 and IFCEI580.
           The ones in (655/6) don't work, at least not in MTS.
            
           THIS IS COPYRIGHTED AND MUST NOT BE GIVEN TO ANY THIRD PARTY.
0          Referenced by comments of: 655/3 
00655/009   EREP/370                 WRITEUP         P              MTA:EREPINFO                                                    
            5.0T2   989  EREP/370.WRITEUP.P.012             1 LINE     70    1 PAGE UM   MTA                 JULY 03, 1981  17:03:23
            5.0T6    11  MTA:EREPINFO         
0          Description of how to run EREP in MTS.
00656/001   GT40 GRAPHICS SYSTEM     SYST            S   O          S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.SYST.S.001(1)    990
            5.0T2   990  GT40_GRAPHICS_SYSTEM.SYST.S.001    1 LINE     85   33 PAGE UM   EADIE               AUG. 12, 1976  15:57:09
            5.0T6    12                       
0          GRAPHICS OPERATING SYSTEM FOR DEC GT40 DISPLAY.  COPIES GT40 EQUS (656/2).
00656/002   GT40 GRAPHICS SYSTEM     EQUS            S   G          S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.EQUS.S.002(1)    991
            5.0T2   991  GT40_GRAPHICS_SYSTEM.EQUS.S.002    1 LINE     72    1 PAGE UM   EADIE               APR. 03, 1975  17:27:56
            5.0T6    13                       
0          Referenced by comments of: 656/1 
00656/003   GT40 GRAPHICS SYSTEM     SYST            O   O          S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.SYST.O.003(1)    992
            5.0T2   992  GT40_GRAPHICS_SYSTEM.SYST.O.003    1 LINE     55    3 PAGE UM   EADIE               MAY  16, 1977  17:49:15
            5.0T6    14                       
0          HAS A "$CONTINUE WITH SBWB:LOADER RETURN" CARD TO PICK UP THE OBJECT FOR
           (656/4).
00656/004   GT40 GRAPHICS SYSTEM     LOADER          S   G          S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.LOAD.S.004(1)    993
            5.0T2   993  GT40_GRAPHICS_SYSTEM.LOAD.S.004    1 LINE     82    3 PAGE UM   EADIE               AUG. 12, 1976  15:57:22
            5.0T6    15                       
0          PROGRAM TO LOAD A DEC GT40 DISPLAY VIA TELEPHONE LINE.
0          Referenced by comments of: 656/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  425
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00656/005   GT40 GRAPHICS SYSTEM     LOADER          O   G          S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.LOAD.O.005(1)    994
            5.0T2   994  GT40_GRAPHICS_SYSTEM.LOAD.O.005    1 LINE     76    1 PAGE UM   EADIE               MAY  16, 1977  17:49:13
            5.0T6    16                       
00657/001  *ASCEBCD                                  SA  G          S1559 5.0T2 VLO FSNAME=ASCEBCD..SA.001(1)                    995
            5.0T2   995  ASCEBCD..SA.001                    1 LINE     80    3 PAGE UM   WSG                 JAN. 11, 1980  17:35:45
            5.0T6    17                       
0          PROGRAM TO TRANSLATE ARBITRARY LENGTH RECORDS FROM ASCII TO EBCDIC USING
           EITHER THE MTS OR IBM ASCEBC TRANSLATE TABLE.  SOURCE IN LINES 1,999.
00657/002  *ASCEBCD                                  OC  G          *ASCEBCD                                                        
            5.0T2   996  ASCEBCD..OC.002                    1 LINE     80    1 PAGE UM   WSG                 JULY 03, 1981  17:16:47
            5.0T6    18  *ASCEBCD             
00658/001  *EBCDASC                                  SA  G          S1559 5.0T2 VLO FSNAME=EBCDASC..SA.001(1)                    997
            5.0T2   997  EBCDASC..SA.001                    1 LINE     80    5 PAGE UM   WSG                 JAN. 11, 1980  17:37:01
            5.0T6    19                       
0          PROGRAM TO TRANSLATE ARBITRARY LENGTH RECORDS FROM EBCDIC TO ASCII USING
           EITHER THE MTS OR IBM ASCII TRANSLATE TABLE.
           SOURCE IN LINES 1,999.
00658/002  *EBCDASC                                  OC  G          *EBCDASC                                                        
            5.0T2   998  EBCDASC..OC.002                    1 LINE     80    2 PAGE UM   WSG                 JULY 03, 1981  17:16:49
            5.0T6    20  *EBCDASC             
00659/001A  GOM                      COMPILER FTN    SF  G          GOM:GOM.S                                                       
            5.1T1   864  GOM.COMPILER_FTN.SF.001            1 LINE    103  119 PAGE UM   DWB                 JULY 23, 1983  12:25:17
0          Compiler for "good old MAD" -- a language similar to the 7090 MAD language.
            
           This file has 75 FORTRAN modules. Source begins at lines 1000, 2000, ...
           75000. "$CONTINUE WITH" files: GOM.COMMON (659/8), GOM.COMMOND (659/10),
           GOM.CONTAB (659/12), GOM.MATRIX (659/14), and GOM.SYMTAB (659/15). NOTE:
           Compiling these will produce three warning messages from the compilation of
           the STMTYP module, lines 31000,31999.
0          Referenced by comments of: 659/2, 659/5, 659/25, 798/39, 809/1 
00659/002A  GOM                      COMPILER FTN    OC  G          GOM:GOM.O                                                       
            5.1T1   865  GOM.COMPILER_FTN.OC.002            1 LINE  30712  171 PAGE UM   DWB                 JULY 23, 1983  12:25:22
0          Object corresponding to (659/1), plus the object for the module whose source
           is in lines 1000,1999 of (659/3) since this is the only GOM module which is
           required.  This allows checkout to be done using (659/2) + (659/6).
0          Referenced by comments of: 659/2, 659/4 
00659/003A  GOM                      COMPILER GOM    SG  G          GOM:GOM.SG                                                      
            5.1T1   866  GOM.COMPILER_GOM.SG.003            1 LINE    153   22 PAGE UM   DWB                 JULY 23, 1983  12:25:28
0          GOM pieces of the compiler, i.e. portions of the compiler written in itself.
           References CNFGINFO in LCSYMBOL.  "$CONTINUE WITH" files:  GOM.COMMONG (659/9),
1                                                                                               SUN SEP 08/96   15:24:55   Page  426
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          GOM.COMMONDG (659/11), and GOM.CONTABG (659/13).
0          Referenced by comments of: 659/2, 659/4, 659/16 
00659/004A  GOM                      COMPILER GOM    OC  G          GOM:GOM.OG                                                      
            5.1T1   867  GOM.COMPILER_GOM.OC.004            1 LINE     80   36 PAGE UM   DWB                 JULY 23, 1983  12:25:29
0          Object corresponding to (659/3), except for the module whose source is in lines
           1000,1999 of (659/3) which has its object in (659/2).
00659/005A  GOM                      SEQUENCES       SA  G          GOM:GOM.SEQS                                                    
            5.1T1   868  GOM.SEQUENCES.SA.005               1 LINE     94   54 PAGE UM   DWB                 JULY 23, 1983  12:25:31
0          This is not executable. The FORTRAN source pieces (659/1) treat this as a
           common section that is an array of halfwords.
0          Referenced by comments of: 659/6 
00659/006A  GOM                      SEQUENCES       OC  G          GOM:GOM.SEQS.O                                                  
            5.1T1   869  GOM.SEQUENCES.OC.006               1 LINE     80   40 PAGE UM   DWB                 JULY 23, 1983  12:25:33
0          Object corresponding to (659/5).
0          Referenced by comments of: 659/2 
00659/007A  GOM                      OBJECT          OE  G          *GOM                                                            
            5.1T1   870  GOM.OBJECT.OE.007                  1 LINE  32767   99 PAGE UM   DWB                 JULY 23, 1983  12:25:35
                         *GOM                 
0          Result of running *LINKEDIT with the following commands:
             INCLUDE GOM.O
             INCLUDE GOM.SEQS.O
             INCLUDE GOM.SYMOPG(1000)
             UPDATE GOM.OG
             COMBINE@BC
             PURGE
             $EMPTY *GOM
             PUNCH *GOM
            
           NOTE:  The update command in the above sequence will cause *LINKEDIT to emit a
                  warning message to the effect that there are structural differences in the
                  modules defining MTRXPR.  This is OK.
            
           An almost all-FORTRAN version can be produced by the following *LINKEDIT commands:
             INCLUDE GOM.O
             INCLUDE GOM.SEQS.O
             COMBINE@BC
             PURGE
             $EMPTY *GOM
             PUNCH *GOM
1                                                                                               SUN SEP 08/96   15:24:55   Page  427
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/008A  GOM                      COMMON DECLAR   SF  G          GOM:GOM.COMMON                                                  
            5.1T1   871  GOM.COMMON_DECLAR.SF.008           1 LINE     71    1 PAGE UM   DWB                 JULY 23, 1983  12:25:38
0          "$CONTINUE WITH"ed by all FORTRAN modules. Contains common definitions and
           common declarations.
0          Referenced by comments of: 659/1, 659/9, 659/16, 659/20 
00659/009A  GOM                      COMMON DECLAR   SG  G          GOM:GOM.COMMONG                                                 
            5.1T1   872  GOM.COMMON_DECLAR.SG.009           1 LINE     85    3 PAGE UM   DWB                 JULY 23, 1983  12:25:38
0          GOM "copy section" equivalent to (659/8). "$CONTINUE WITH"ed by all GOM
           modules.
0          Referenced by comments of: 659/3, 659/16, 659/20 
00659/010A  GOM                      DEPEND DECLAR   SF  G          GOM:GOM.COMMOND                                                 
            5.1T1   873  GOM.DEPEND_DECLAR.SF.010           1 LINE     71    1 PAGE UM   DWB                 JULY 23, 1983  12:25:38
0          "$CONTINUE WITH"ed by all modules which are character- or machine-dependent.
           Contains common sections and definitions.
0          Referenced by comments of: 659/1, 659/11 
00659/011A  GOM                      DEPEND DECLAR   SG  G          GOM:GOM.COMMONDG                                                
            5.1T1   874  GOM.DEPEND_DECLAR.SG.011           1 LINE     79    1 PAGE UM   DWB                 JULY 23, 1983  12:25:38
0          GOM equivalent of (659/10).
0          Referenced by comments of: 659/3 
00659/012A  GOM                      CON TAB DECLAR  SF  G          GOM:GOM.CONTAB                                                  
            5.1T1   875  GOM.CON_TAB_DECLAR.SF.012          1 LINE     71    1 PAGE UM   DWB                 JULY 23, 1983  12:25:38
0          "$CONTINUE WITH"ed by those modules dealing with the constant table.
           Contains all definitions for constant table.
0          Referenced by comments of: 659/1, 659/13 
00659/013A  GOM                      CON TAB DECLAR  SG  G          GOM:GOM.CONTABG                                                 
            5.1T1   876  GOM.CON_TAB_DECLAR.SG.013          1 LINE     71    1 PAGE UM   DWB                 JULY 23, 1983  12:25:39
0          GOM equivalent of (659/12).
0          Referenced by comments of: 659/3 
00659/014A  GOM                      TRIPLES TABLE   SF  G          GOM:GOM.MATRIX                                                  
            5.1T1   877  GOM.TRIPLES_TABLE.SF.014           1 LINE     38    1 PAGE UM   DWB                 JULY 23, 1983  12:25:39
0          "$CONTINUE WITH"ed by those modules dealing with the triple table.
           Contains all definitions for triple table.
0          Referenced by comments of: 659/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  428
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/015A  GOM                      SYM TAB DECLAR  SF  G          GOM:GOM.SYMTAB                                                  
            5.1T1   878  GOM.SYM_TAB_DECLAR.SF.015          1 LINE     69    1 PAGE UM   DWB                 JULY 23, 1983  12:25:39
0          "$CONTINUE WITH"ed by all modules handling the symbol table.
           Contains all definitions for symbol table.
0          Referenced by comments of: 659/1 
00659/016A  GOM                      SYM TAB OPER    SA  G          GOM:GOM.SYMOPG(1,999)                                           
            5.1T1   879  GOM.SYM_TAB_OPER.SA.016            1 LINE     70    4 PAGE UM   DWB                 JULY 23, 1983  12:25:40
0          Built-in operators for GOM version of the symbol table routines in (659/3).
           This defines data in the common section DECOMP in (659/8) and (659/9).
00659/017A  GOM                      SYM TAB OPER    OC  G          GOM:GOM.SYMOPG(1000)                                            
            5.1T1   880  GOM.SYM_TAB_OPER.OC.017            1 LINE     80   13 PAGE UM   DWB                 JULY 23, 1983  12:25:40
00659/018A  GOM                      DATA INIT RTN   SA  G          GOM:GOM.DIN(1,999)                                              
            5.1T1   881  GOM.DATA_INIT_RTN.SA.018           1 LINE     63    2 PAGE UM   DWB                 JULY 23, 1983  12:25:40
0          The source for the data-initialization subroutine (entry point GOMDIN#) used
           in reentrant and recursive routines.  This used to be generated as part of
           every reentrant or recursive module; it is now a separate piece, to cut the 
           size down in cases where there are many modules, e.g. $MESSAGESYSTEM (798).
00659/019A  GOM                      DATA INIT RTN   OC  G        # (PART OF *LIBRARY)                                              
            4.3T1   686  GOM.DATA_INIT_RTN.OC.019           1 LINE     80    1 PAGE UM   DWB                 APR. 05, 1980  19:35:43
            4.3T3   144                       
0          Object part of *LIBRARY (524/1)
00659/020A  GOM                      COPY SECT CVT   SS  G          GOM:GOM.CONVERT                                                 
            5.1T1   882  GOM.COPY_SECT_CVT.SS.020           1 LINE     70    1 PAGE UM   DWB                 JULY 23, 1983  12:25:41
0          SNOBOL program to convert the FORTRAN copy sections (e.g. GOM.COMMON (659/8))
           into the equivalent GOM copy sections (e.g. GOM.COMMONG (659/9)).
00659/021A  GOM                      NEWS FILE       P            # GOM:GOMNEWS                                                     
            4.3T1   687  GOM.NEWS_FILE.P.021                1 LINE     78   22 PAGE UM   DWB                 APR. 05, 1980  19:35:47
            4.3T3   145                       
0          Contains descriptions of recent additions to the language.
00659/022A  GOM                      USER'S MANUAL   WF             GOM:GOM.MANUAL.S                                                
            5.1T1   883  GOM.USER'S_MANUAL.WF.022           1 LINE     99   59 PAGE UM   MENDAL    DWB       JULY 23, 1983  12:25:41
0          A user's manual for GOM consisting mostly of the old 7090 MAD Manual, Chapter
           II with deletions, additions, and revisions for GOM.
00659/023A  GOM                      DOCUMENTATION   WF             GOM:GOM.PROGWRUP                                                
            5.1T1   884  GOM.DOCUMENTATION.WF.023           1 LINE    108    4 PAGE UM   DWB                 JULY 23, 1983  12:25:43
0          Writeup describing the structure of an object module produced by GOM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  429
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/024A  GOM                      DOCUMENTATION   WF             GOM:GOM.LISTWRUP                                                
            5.1T1   885  GOM.DOCUMENTATION.WF.024           1 LINE    120    6 PAGE UM   DWB                 JULY 23, 1983  12:25:43
0          Writeup describing the internals of the compiler and how to read the
           compiler listings.
0          Referenced by comments of: 659/25 
00659/025A  GOM                      DOCUMENTATION   SS  G          GOM:GOM.PEEL                                                    
            5.1T1   886  GOM.DOCUMENTATION.SS.025           1 LINE     74    1 PAGE UM   DWB                 JULY 23, 1983  12:25:43
0          SNOBOL program to read through the FORTRAN source (659/1) and produce the lists
           of modules and what they copy that is to be attached to the end of the
           GOM.LISTWRUP writeup (659/24).
00659/026A  GOM                      DOCUMENTATION   P              GOM:GOM.COM.DOC                                                 
            5.1T1   887  GOM.DOCUMENTATION.P.026            1 LINE     70    6 PAGE UM   DWB                 JULY 23, 1983  12:25:44
0          Contains explanation of each symbol in the GOM common sections.
00659/027A  GOM                      READ DATA SUBR  SA  G          GOM:GOM.RDATA(1,999)                                            
            5.1T1   888  GOM.READ_DATA_SUBR.SA.027          1 LINE     74    8 PAGE UM   DWB                 JULY 23, 1983  12:25:44
0          Subroutine called by "READ DATA" and "READ AND PRINT DATA" statements.
00659/028A  GOM                      READ DATA SUBR  OC  G        # (PART OF *LIBRARY)                                              
            4.3AT1  367  GOM.READ_DATA_SUBR.OC.028          1 LINE     80    4 PAGE UM   DWB                 OCT. 12, 1980  16:26:53
            4.3AT2   30                       
0          Object part of *LIBRARY (524/1)
00659/029A  GOM                      PRINT RES SUBR  SA  G          GOM:GOM.PRSLT(1,999)                                            
            5.1T1   889  GOM.PRINT_RES_SUBR.SA.029          1 LINE     70    7 PAGE UM   DWB                 JULY 23, 1983  12:25:44
0          Subroutine called by "PRINT RESULTS", "PRINT BCD RESULTS", and "PRINT HEX
           RESULTS" statements.
00659/030A  GOM                      PRINT RES SUBR  OC  G        # (PART OF *LIBRARY)                                              
            4.3AT1  369  GOM.PRINT_RES_SUBR.OC.030          1 LINE     80    3 PAGE UM   DWB                 OCT. 12, 1980  16:26:56
            4.3AT2   32                       
0          Object part of *LIBRARY (524/1)
00659/031A  GOM                      ADAPTOR SUBR    SA  G          GOM:GOM.ADPT                                                    
            5.1T1   890  GOM.ADAPTOR_SUBR.SA.031            1 LINE     81    2 PAGE UM   DWB                 JULY 23, 1983  12:25:45
0          An adaptor routine used with "LINKAGE=CLSMTS" routines to convert to the
           Coding Conventions environment. 
00659/032A  GOM                      ADAPTOR SUBR    OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   DWB                                        
0          Object part of *LIBRARY (524/1)
1                                                                                               SUN SEP 08/96   15:24:55   Page  430
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/033A  GOM                      TEST PROGRAMS   C   G          GOM:GOM.EXAMP                                                   
            5.1T1   891  GOM.TEST_PROGRAMS.C.033            1 LINE     43    1 PAGE UM   DWB                 JULY 23, 1983  12:25:45
00659/034A  GOM                      TEST PROGRAMS   SG  G          DWB:TESTMAD                                                     
            5.1T1   892  GOM.TEST_PROGRAMS.SG.034           1 LINE     85    6 PAGE UM   DWB                 JULY 23, 1983  12:25:46
00659/035A  GOM                      TEST PROGRAMS   SA  G          GOM:GOM.PRSLT.T(1,999)                                          
            5.1T1   893  GOM.TEST_PROGRAMS.SA.035           1 LINE     50    1 PAGE UM   DWB                 JULY 23, 1983  12:25:46
00659/036A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.RDATA.T                                                 
            5.1T1   894  GOM.TEST_PROGRAMS.SG.036           1 LINE     37    1 PAGE UM   DWB                 JULY 23, 1983  12:25:46
00659/037A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST.SDS                                                
            5.1T1   895  GOM.TEST_PROGRAMS.SG.037           1 LINE     32    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/038A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.SIMPLE                                                  
            5.1T1   896  GOM.TEST_PROGRAMS.SG.038           1 LINE     42    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/039A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST.FN                                                 
            5.1T1   897  GOM.TEST_PROGRAMS.SG.039           1 LINE     50    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/040A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST                                                    
            5.1T1   898  GOM.TEST_PROGRAMS.SG.040           1 LINE     53    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/041A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST2                                                   
            5.1T1   899  GOM.TEST_PROGRAMS.SG.041           1 LINE     41    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/042A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST3                                                   
            5.1T1   900  GOM.TEST_PROGRAMS.SG.042           1 LINE     33    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/043A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST4                                                   
            5.1T1   901  GOM.TEST_PROGRAMS.SG.043           1 LINE     45    1 PAGE UM   DWB                 JULY 23, 1983  12:25:47
00659/044A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST5                                                   
            5.1T1   902  GOM.TEST_PROGRAMS.SG.044           1 LINE     34    1 PAGE UM   DWB                 JULY 23, 1983  12:25:48
00659/045A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST6                                                   
            5.1T1   903  GOM.TEST_PROGRAMS.SG.045           1 LINE     30    1 PAGE UM   DWB                 JULY 23, 1983  12:25:48
00659/046A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST7                                                   
            5.1T1   904  GOM.TEST_PROGRAMS.SG.046           1 LINE     41    1 PAGE UM   DWB                 JULY 23, 1983  12:25:48
00659/047A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST8                                                   
            5.1T1   905  GOM.TEST_PROGRAMS.SG.047           1 LINE     30    1 PAGE UM   DWB                 JULY 23, 1983  12:25:48
00659/048A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST9                                                   
            5.1T1   906  GOM.TEST_PROGRAMS.SG.048           1 LINE     51    1 PAGE UM   DWB                 JULY 23, 1983  12:25:48
00659/049A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST10                                                  
            5.1T1   907  GOM.TEST_PROGRAMS.SG.049           1 LINE     24    1 PAGE UM   DWB                 JULY 23, 1983  12:25:48
1                                                                                               SUN SEP 08/96   15:24:55   Page  431
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/050A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST11                                                  
            5.1T1   908  GOM.TEST_PROGRAMS.SG.050           1 LINE     44    1 PAGE UM   DWB                 JULY 23, 1983  12:25:49
00659/051A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST12                                                  
            5.1T1   909  GOM.TEST_PROGRAMS.SG.051           1 LINE     24    1 PAGE UM   DWB                 JULY 23, 1983  12:25:49
00659/052A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST13                                                  
            5.1T1   910  GOM.TEST_PROGRAMS.SG.052           1 LINE     40    1 PAGE UM   DWB                 JULY 23, 1983  12:25:49
00659/053A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST14                                                  
            5.1T1   911  GOM.TEST_PROGRAMS.SG.053           1 LINE     46    1 PAGE UM   DWB                 JULY 23, 1983  12:25:49
00659/054A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST15                                                  
            5.1T1   912  GOM.TEST_PROGRAMS.SG.054           1 LINE     62    1 PAGE UM   DWB                 JULY 23, 1983  12:25:49
00659/055A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST16                                                  
            5.1T1   913  GOM.TEST_PROGRAMS.SG.055           1 LINE     46    1 PAGE UM   DWB                 JULY 23, 1983  12:25:50
00659/056A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST17                                                  
            5.1T1   914  GOM.TEST_PROGRAMS.SG.056           1 LINE     45    1 PAGE UM   DWB                 JULY 23, 1983  12:25:50
00659/057A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST18                                                  
            5.1T1   915  GOM.TEST_PROGRAMS.SG.057           1 LINE     52    1 PAGE UM   DWB                 JULY 23, 1983  12:25:50
00659/058A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST19                                                  
            5.1T1   916  GOM.TEST_PROGRAMS.SG.058           1 LINE     53    1 PAGE UM   DWB                 JULY 23, 1983  12:25:50
00659/059A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST20                                                  
            5.1T1   917  GOM.TEST_PROGRAMS.SG.059           1 LINE     54    1 PAGE UM   DWB                 JULY 23, 1983  12:25:50
00659/060A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST21                                                  
            5.1T1   918  GOM.TEST_PROGRAMS.SG.060           1 LINE     56    1 PAGE UM   DWB                 JULY 23, 1983  12:25:51
00659/061A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST22                                                  
            5.1T1   919  GOM.TEST_PROGRAMS.SG.061           1 LINE     41    1 PAGE UM   DWB                 JULY 23, 1983  12:25:51
00659/062A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST23                                                  
            5.1T1   920  GOM.TEST_PROGRAMS.SG.062           1 LINE     33    1 PAGE UM   DWB                 JULY 23, 1983  12:25:51
00659/063A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST24                                                  
            5.1T1   921  GOM.TEST_PROGRAMS.SG.063           1 LINE     35    1 PAGE UM   DWB                 JULY 23, 1983  12:25:51
00659/064A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST25                                                  
            5.1T1   922  GOM.TEST_PROGRAMS.SG.064           1 LINE     31    1 PAGE UM   DWB                 JULY 23, 1983  12:25:51
00659/065A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST26                                                  
            5.1T1   923  GOM.TEST_PROGRAMS.SG.065           1 LINE     57    1 PAGE UM   DWB                 JULY 23, 1983  12:25:52
00659/066A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST27                                                  
            5.1T1   924  GOM.TEST_PROGRAMS.SG.066           1 LINE     26    1 PAGE UM   DWB                 JULY 23, 1983  12:25:52
1                                                                                               SUN SEP 08/96   15:24:55   Page  432
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/067A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST28                                                  
            5.1T1   925  GOM.TEST_PROGRAMS.SG.067           1 LINE     70    1 PAGE UM   DWB                 JULY 23, 1983  12:25:52
00659/068A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST29                                                  
            5.1T1   926  GOM.TEST_PROGRAMS.SG.068           1 LINE     34    1 PAGE UM   DWB                 JULY 23, 1983  12:25:52
00659/069A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST30                                                  
            5.1T1   927  GOM.TEST_PROGRAMS.SG.069           1 LINE     67    1 PAGE UM   DWB                 JULY 23, 1983  12:25:52
00659/070A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST31                                                  
            5.1T1   928  GOM.TEST_PROGRAMS.SG.070           1 LINE     62    1 PAGE UM   DWB                 JULY 23, 1983  12:25:53
00659/071A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST32                                                  
            5.1T1   929  GOM.TEST_PROGRAMS.SG.071           1 LINE     58    1 PAGE UM   DWB                 JULY 23, 1983  12:25:53
00659/072A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST33                                                  
            5.1T1   930  GOM.TEST_PROGRAMS.SG.072           1 LINE     66    1 PAGE UM   DWB                 JULY 23, 1983  12:25:53
00659/073A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST34                                                  
            5.1T1   931  GOM.TEST_PROGRAMS.SG.073           1 LINE    140    1 PAGE UM   DWB                 JULY 23, 1983  12:25:53
00659/074A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST35                                                  
            5.1T1   932  GOM.TEST_PROGRAMS.SG.074           1 LINE     74    1 PAGE UM   DWB                 JULY 23, 1983  12:25:53
00659/075A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST36                                                  
            5.1T1   933  GOM.TEST_PROGRAMS.SG.075           1 LINE     60    1 PAGE UM   DWB                 JULY 23, 1983  12:25:54
00659/076A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST37                                                  
            5.1T1   934  GOM.TEST_PROGRAMS.SG.076           1 LINE     61    1 PAGE UM   DWB                 JULY 23, 1983  12:25:54
00659/077A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST38                                                  
            5.1T1   935  GOM.TEST_PROGRAMS.SG.077           1 LINE     40    1 PAGE UM   DWB                 JULY 23, 1983  12:25:54
00659/078A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST39                                                  
            5.1T1   936  GOM.TEST_PROGRAMS.SG.078           1 LINE     57    1 PAGE UM   DWB                 JULY 23, 1983  12:25:54
00659/079A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST40                                                  
            5.1T1   937  GOM.TEST_PROGRAMS.SG.079           1 LINE     80    1 PAGE UM   DWB                 JULY 23, 1983  12:25:54
00659/080A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST41                                                  
            5.1T1   938  GOM.TEST_PROGRAMS.SG.080           1 LINE     67    2 PAGE UM   DWB                 JULY 23, 1983  12:25:55
00659/081A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST42                                                  
            5.1T1   939  GOM.TEST_PROGRAMS.SG.081           1 LINE     39    1 PAGE UM   DWB                 JULY 23, 1983  12:25:55
00659/082A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST43                                                  
            5.1T1   940  GOM.TEST_PROGRAMS.SG.082           1 LINE     38    1 PAGE UM   DWB                 JULY 23, 1983  12:25:55
00659/083A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST44                                                  
            5.1T1   941  GOM.TEST_PROGRAMS.SG.083           1 LINE     65    2 PAGE UM   DWB                 JULY 23, 1983  12:25:55
1                                                                                               SUN SEP 08/96   15:24:55   Page  433
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00659/084A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST45                                                  
            5.1T1   942  GOM.TEST_PROGRAMS.SG.084           1 LINE     44    1 PAGE UM   DWB                 JULY 23, 1983  12:25:55
00659/085A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST46                                                  
            5.1T1   943  GOM.TEST_PROGRAMS.SG.085           1 LINE     35    1 PAGE UM   DWB                 JULY 23, 1983  12:25:56
00659/086A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST47                                                  
            5.1T1   944  GOM.TEST_PROGRAMS.SG.086           1 LINE     56    1 PAGE UM   DWB                 JULY 23, 1983  12:25:56
00659/087A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST48                                                  
            5.1T1   945  GOM.TEST_PROGRAMS.SG.087           1 LINE     56    1 PAGE UM   DWB                 JULY 23, 1983  12:25:56
00659/088A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST49                                                  
            5.1T1   946  GOM.TEST_PROGRAMS.SG.088           1 LINE     58    1 PAGE UM   DWB                 JULY 23, 1983  12:25:56
00659/089A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST50                                                  
            5.1T1   947  GOM.TEST_PROGRAMS.SG.089           1 LINE     48    1 PAGE UM   DWB                 JULY 23, 1983  12:25:56
00659/090A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST51                                                  
            5.1T1   948  GOM.TEST_PROGRAMS.SG.090           1 LINE     60    1 PAGE UM   DWB                 JULY 23, 1983  12:25:57
00659/091A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST52                                                  
            5.1T1   949  GOM.TEST_PROGRAMS.SG.091           1 LINE     56    1 PAGE UM   DWB                 JULY 23, 1983  12:25:57
00659/092A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST53                                                  
            5.1T1   950  GOM.TEST_PROGRAMS.SG.092           1 LINE     80    1 PAGE UM   DWB                 JULY 23, 1983  12:25:57
00659/093A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST54                                                  
            5.1T1   951  GOM.TEST_PROGRAMS.SG.093           1 LINE     53    1 PAGE UM   DWB                 JULY 23, 1983  12:25:57
00659/094A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST55                                                  
            5.1T1   952  GOM.TEST_PROGRAMS.SG.094           1 LINE     43    1 PAGE UM   DWB                 JULY 23, 1983  12:25:57
00659/095A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST56                                                  
            5.1T1   953  GOM.TEST_PROGRAMS.SG.095           1 LINE     72    1 PAGE UM   DWB                 JULY 23, 1983  12:25:58
00659/096A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST57                                                  
            5.1T1   954  GOM.TEST_PROGRAMS.SG.096           1 LINE     36    1 PAGE UM   DWB                 JULY 23, 1983  12:25:58
00659/097A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST58                                                  
            5.1T1   955  GOM.TEST_PROGRAMS.SG.097           1 LINE     80    7 PAGE UM   DWB                 JULY 23, 1983  12:25:58
00659/098A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST59                                                  
            5.1T1   956  GOM.TEST_PROGRAMS.SG.098           1 LINE     35    1 PAGE UM   DWB                 JULY 23, 1983  12:25:58
00659/099A  GOM                      TEST PROGRAMS   SG  G          GOM:GOM.TEST60                                                  
            5.1T1   957  GOM.TEST_PROGRAMS.SG.099           1 LINE     59    1 PAGE UM   DWB                 JULY 23, 1983  12:25:58
00660/001   MCS-11                   SUPERVISOR      S   G          FEP:SUPER                                                       
            5.0T2  1093  MCS-11.SUPERVISOR.S.001            1 LINE     84   54 PAGE UM   EADIE               JULY 03, 1981  17:19:17
            5.0T6   115                       
0          This is the supervisor for the Michigan Communications Systems (MCS) for the
           UM PDP-11 Data Concentrator Front End. The MCS components should be assembled
1                                                                                               SUN SEP 08/96   15:24:55   Page  434
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          and link-edited with *PDP11ASR (686/32) and *LINK11 (516).
           The supervisor copies COMMON (660/6).
0          Referenced by comments of: 660/2, 660/3, 660/17 
00660/002   MCS-11                   DEVICES         S   G          FEP:DEVICES                                                     
            5.0T2  1094  MCS-11.DEVICES.S.002               1 LINE     85  137 PAGE UM   EADIE               JULY 03, 1981  17:19:22
            5.0T6   116                       
0          This is the DEVICES csect of MCS.  It contains DSR's for all devices in
           the system.  It should be assembled after the supervisor (660/1).
           Copies COMMON (660/6), SUPEREXTRN (660/7), TASKSEXTRN (660/8), and CC.EBCDIC
           (660/9).
0          Referenced by comments of: 660/3, 660/17 
00660/003   MCS-11                   TASKS           S   G          FEP:TASKS                                                       
            5.0T2  1095  MCS-11.TASKS.S.003                 1 LINE    174  133 PAGE UM   EADIE               JULY 03, 1981  17:19:32
            5.0T6   117                       
0          This is the TASKS csect for MCS.  It contains the tasks for the system.
           It should be assembled after the supervisor (660/1) and DEVICES (660/2).
           Copies COMMON (660/6), SUPEREXTRN (660/7), DEVICESEXTRN (660/10), and 
           CC.EBCDIC (660/9).
0          Referenced by comments of: 660/17 
00660/004   MCS-11                   TABLES          S   G          FEP:TABLES                                                      
            5.0T2  1096  MCS-11.TABLES.S.004                1 LINE     91   50 PAGE UM   EADIE               JULY 03, 1981  17:19:41
            5.0T6   118                       
0          This is the TABLES csect for MCS. It contains the translate tables for the
           DSR's in the system. Copies COMMON (660/6) and CC.EBCDIC (660/9).
0          Referenced by comments of: 660/17 
00660/005   MCS-11                   STORAGE         S   G          FEP:STORAGE                                                     
            5.0T2  1097  MCS-11.STORAGE.S.005               1 LINE     74    1 PAGE UM   EADIE               JULY 03, 1981  17:19:45
            5.0T6   119                       
0          This is the STORAGE csect for MCS. It contains storage definitions for the system.
00660/006   MCS-11                   COMMON          S   G          FEP:COMMON                                                      
            5.0T2  1098  MCS-11.COMMON.S.006                1 LINE     83   23 PAGE UM   EADIE               JULY 03, 1981  17:19:45
            5.0T6   120                       
0          This is the copy section for many components of MCS.  It, in turn, copies
           WHICHCONC (660/17) to set up conditional assembly parameters for Data
           Concentrator B, C, or D or the Remote Data Concentrator.
0          Referenced by comments of: 660/1, 660/2, 660/3, 660/4, 660/17 
1                                                                                               SUN SEP 08/96   15:24:55   Page  435
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00660/007   MCS-11                   SUPEREXTRN      S   G          FEP:SUPEREXTRN                                                  
            5.0T2  1099  MCS-11.SUPEREXTRN.S.007            1 LINE     84    3 PAGE UM   EADIE               JULY 03, 1981  17:19:47
            5.0T6   121                       
0          This is copied by several csects to get external symbols for the supervisor.
0          Referenced by comments of: 660/2, 660/3 
00660/008   MCS-11                   TASKSEXTRN      S   G          FEP:TASKSEXTRN                                                  
            5.0T2  1100  MCS-11.TASKSEXTRN.S.008            1 LINE     82    1 PAGE UM   EADIE               JULY 03, 1981  17:19:48
            5.0T6   122                       
0          This is copied by some csects to get external symbols for TASKS.
0          Referenced by comments of: 660/2 
00660/009   MCS-11                   CC.EBCDIC       S   G          FEP:CC.EBCDIC                                                   
            5.0T2  1101  MCS-11.CC.EBCDIC.S.009             1 LINE     62    1 PAGE UM   EADIE               JULY 03, 1981  17:19:49
            5.0T6   123                       
0          This is copied by some csects to get EQU's for EBCDIC control characters.
0          Referenced by comments of: 660/2, 660/3, 660/4 
00660/010   MCS-11                   DEVICESEXTRN    S   G          FEP:DEVICESEXTRN                                                
            5.0T2  1102  MCS-11.DEVICESEXTRN.S.010          1 LINE     82    3 PAGE UM   EADIE               JULY 03, 1981  17:19:50
            5.0T6   124                       
0          This is copied by csects to get external symbols for DEVICES.
0          Referenced by comments of: 660/3 
00660/011   MCS-11                   CBJOB           C              FEP:CBJOB                                                       
            5.0T2  1103  MCS-11.CBJOB.C.011                 1 LINE     67    1 PAGE UM   EADIE               JULY 03, 1981  17:19:50
            5.0T6   125                       
0          MTS commands to assemble and linkedit MCS for Data Concentrator B.  Also at
           line 1000 and 1001, there are two EQUs for lengths.  When assembling components
           in order of position in memory, this allows listing addresses to match memory
           addresses (i.e. no relocation needed).
00660/012   MCS-11                   CCJOB           C              FEP:CCJOB                                                       
            5.0T2  1104  MCS-11.CCJOB.C.012                 1 LINE     67    1 PAGE UM   EADIE               JULY 03, 1981  17:19:51
            5.0T6   126                       
0          MTS commands to assemble and linkedit MCS for Data Concentrator C.  Also at
           line 1000 and 1001, there are two EQUs for lengths.  When assembling components
           in order of position in memory, this allows listing addresses to match memory
           addresses (i.e. no relocation needed).
1                                                                                               SUN SEP 08/96   15:24:55   Page  436
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00660/013   MCS-11                   CDJOB           C              FEP:CDJOB                                                       
            5.0T2  1105  MCS-11.CDJOB.C.013                 1 LINE     67    1 PAGE UM   EADIE               JULY 03, 1981  17:19:52
            5.0T6   127                       
0          MTS commands to assemble and linkedit MCS for Data Concentrator D.  Also at
           line 1000 and 1001, there are two EQUs for lengths.  When assembling components
           in order of position in memory, this allows listing addresses to match memory
           addresses (i.e. no relocation needed).
00660/014   MCS-11                   LSIJOB          C              FEP:LSIJOB                                                      
            5.0T2  1106  MCS-11.LSIJOB.C.014                1 LINE     71    1 PAGE UM   EADIE               JULY 03, 1981  17:19:52
            5.0T6   128                       
0          MTS commands to assemble and linkedit MCS for Remote Data Concentrator.  Also at
           line 1000 and 1001, there are two EQUs for lengths.  When assembling components
           in order of position in memory, this allows listing addresses to match memory
           addresses (i.e. no relocation needed).
00660/015   MCS-11                   DEBUG/LOAD      S   G          DIAG:HCOR.S                                                     
            5.0T2  1107  MCS-11.DEBUG/LOAD.S.015            1 LINE     81   30 PAGE UM   EADIE               JULY 03, 1981  17:19:53
            5.0T6   129                       
0          "High core" system used in front end processor for debugging and loading.
           description of the program is at the front of the source.  Copies HCORDATA
           (660/16) and "WHICHCONC", which is the same as FEP:WHICHCONC (660/17). 
           Assemble using *11ASR (515).
0          Referenced by comments of: 660/16, 660/17 
00660/016   MCS-11                   HCORDATA        S   G          DIAG:HCORDATA                                                   
            5.0T2  1108  MCS-11.HCORDATA.S.016              1 LINE     80    1 PAGE UM   EADIE               JULY 03, 1981  17:19:57
            5.0T6   130                       
0          Copy section used by (660/15).
0          Referenced by comments of: 660/15 
00660/017   MCS-11                   WHICHCONC       S   G          FEP:WHICHCONC                                                   
            5.0T2  1109  MCS-11.WHICHCONC.S.017             1 LINE     19    1 PAGE UM   EADIE               JULY 03, 1981  17:19:58
            5.0T6   131                       
0          This is copied by DEBUG/LOAD (660/15) and COMMON (660/6), which is copied
           by the supervisor (660/1), DEVICES (660/2), TASKS (660/3), and TABLES (660/4). 
           It contains two lines:
            
              1) a "SPACE 1" for esthetics, and
            
              2) "&CONC SETC '?'", where ? is "CB", "CC", "CD", or "LSI".
0          Referenced by comments of: 660/6, 660/15 
1                                                                                               SUN SEP 08/96   15:24:55   Page  437
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00661/001   RAMP                                                  # (NO LONGER DISTRIBUTED)                                         
            D4T2   1122  RAMP.RAMPINT.S.001                 1 LINE     88   76 PAGE UM                       JUNE 02, 1976  20:33:19
0          RAMP, the operating system for the UM PDP-8 and PDP-8E Data Concentrator
           front ends.  It was distributed for the final time on D4.0, tape 2, files
           1122 through 1135.
00662/001  *3066RTN                                               # (SEE *3270RTN)                                                  
                                                                                    UM                                              
0          Part of *3270RTN (629/10).
00663/001  *SIDEDATE                                 SX  O          S0564 D4T2 VLO FSNAME=SIDEDATE..SX.001(1)                   1138
            5.0T2  1112  SIDEDATE..SX.001                   1 LINE     80   10 PAGE UM   SHERRY              AUG. 27, 1976  20:51:39
            5.0T6   134                       
0          PROGRAM TO COMPARE TWO *UPDATE FILES WHICH UPDATE THE SAME BASE.  IT PRINTS
           A RECORD OF THEIR DIFFERENCES AND MERGES THE TWO TO PRODUCE A SINGLE *UPDATE
           FILE.  IT IS WRITTEN IN EXTENDED XPL AND MUST BE COMPILED USING *EXPL.
00663/002  *SIDEDATE                                 OC  O          *SIDEDATE                                                       
            5.0T2  1113  SIDEDATE..OC.002                   1 LINE    240    8 PAGE UM   SHERRY              JULY 03, 1981  17:20:27
            5.0T6   135  *SIDEDATE            
0          OBJECT ALSO IN *LIBRARY. HAS A "$CONTINUE WITH *EXPLIB" LINE.
           CONTAINS AN INCONSEQUENTIAL REP CARD.
00664/001   PASCAL/GN                COMPILER        SW  S          PASC:99PASOS01(170001,189999)                                   
            5.0T2  1114  PASCAL/GN.COMPILER.SW.001          1 LINE    100  117 PAGE UM                       JULY 03, 1981  17:20:28
            5.0T6   136                       
0          OS/360 VERSION OF PASCAL COMPILER (FROM GRENOBLE) CONVERTED TO MTS.
           THIS COMPILER SUPPORTS A DIALECT OF PASCAL SIMILAR TO DECUS AND MDSI PASCAL. 
            
           THIS SUBCOMPONENT IS THE PASCAL SOURCE FOR THE CURRENT COMPILER.
0          Referenced by comments of: 664/2 
00664/002   PASCAL/GN                OBJECT          OE  S          PASC:PAS.OS                                                     
            5.0T2  1115  PASCAL/GN.OBJECT.OE.002            1 LINE  32767   52 PAGE UM                       JULY 03, 1981  17:21:08
            5.0T6   137                       
0          THIS FILE CONTAINS THE OBJECT FROM (664/1). THE COMPILER REQUIRES AN ERROR
           MESSAGE FILE NAMED PASC:PAS.OS.E, DISTRIBUTED AS (664/5).
0          Referenced by comments of: 664/5 
00664/003   PASCAL/GN                XREF            SW  G          PASC:99PASOS01(100001,109999)                               33  
            5.0T2  1116  PASCAL/GN.XREF.SW.003              1 LINE     73    5 PAGE UM                       JULY 03, 1981  17:21:11
            5.0T6   138                       
0          PASCAL SOURCE FOR A CROSS-REFERENCE PROGRAM.
           SEE THE COMMENTS AT THE BEGINNING OF THE SOURCE FOR USAGE INSTRUCTIONS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  438
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 664/4 
00664/004   PASCAL/GN                XREF            OC  G          PASC:99PASOS01(90001,99999)                                     
            5.0T2  1117  PASCAL/GN.XREF.OC.004              1 LINE     80    5 PAGE UM                       JULY 03, 1981  17:21:39
            5.0T6   139                       
0          THIS FILE CONTAINS THE OBJECT FOR (664/3).
00664/005   PASCAL/GN                ERROR MESSAGES  M              PASC:PAS.OS.E                                                   
            5.0T2  1118  PASCAL/GN.ERROR_MESSAGES.M.005     1 LINE     79    3 PAGE UM                       JULY 03, 1981  17:22:06
            5.0T6   140                       
0          ERROR MESSAGES REFERENCED BY THE COMPILER FROM THE FILE PASC:PAS.OS (664/2).
           LINE NUMBERS IN THIS FILE ARE IMPORTANT.
0          Referenced by comments of: 664/2 
00664/006   PASCAL/GN                USER MANUAL     WF             PASC:99PASOS01(20001,29999)                                     
            5.0T2  1119  PASCAL/GN.USER_MANUAL.WF.006       1 LINE    107    9 PAGE UM                       JULY 03, 1981  17:22:07
            5.0T6   141                       
0          PASCAL/GN USER'S MANUAL CONTAINING "HOW TO USE" INFORMATION PLUS SOME INTERNAL
           IMPLEMENTATION NOTES.
00665/001   MTS VOLUME 14            MASTER          WT             S0951 MTSV14 'MTS MANUALS' POSN=NEWM9.V14                       
            5.0T2  1120  MTS_VOLUME_14.MASTER.WT.001        1 SEQ     132  197 PAGE UM   MANUAL              JULY 03, 1981  17:24:35
            5.0T6   142                       
0          TEXT/360 master for Volume 14 "360/370 Assembler Languages in MTS" of the UM MTS
           manuals, issued May 1983.
            
           Editor:  Richard A. Salisbury
00665/002   MTS VOLUME 14            PRINT           PT             S0951 MTSV14 'MTS MANUALS' POSN=PRINT9.V14                      
            5.0T2  1121  MTS_VOLUME_14.PRINT.PT.002         1 SEQ     132  375 PAGE UM   MANUAL              JULY 03, 1981  17:24:52
            5.0T6   143                       
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which
           is slightly modified from the TEXT/360 print file), which is
           available on request.
00665/003   MTS VOLUME 14            INDEX SOURCE    D              S0951 MTSV14 'MTS MANUALS' POSN=V14INDEXSOU.8                   
            5.0T2  1122  MTS_VOLUME_14.INDEX_SOURC.D.003    1 SEQ     110    4 PAGE UM   MANUAL              APR. 02, 1979  00:32:20
            5.0T6   144                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 14.
00666/001A  AMS SUBR                 OVERDRIVE SOU   SF  G  AMS     S1223 TAXIR8 FSNAME=AMS_OVER.S                                  
            5.1T1   958  AMS_SUBR.OVERDRIVE_SOU.SF.001      1 LINE     80    8 PAGE UM   BRILL               MAY  20, 1983  12:42:00
0          Source for OVERDRIVE portion of AMS subroutine package, providing dynamic 
           array management for FORTRAN programs.  This should be processed by the
           OVERDRIVE preprocessor (667) and then compiled using FORTRAN-H (298).  For
           a user writeup, see MTS Volume 3 or MTS Volume 6.
1                                                                                               SUN SEP 08/96   15:24:55   Page  439
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00666/002C  AMS SUBR                 ASM SOU         SA  G          S1223 TAXIR8 FSNAME=AMS_ASM.S                                   
            5.1T1   959  AMS_SUBR.ASM_SOU.SA.002            1 LINE     72    1 PAGE UM   BRILL               MAY  20, 1983  12:42:03
0          Source for the assembler portion of the AMS subroutine package.
00666/003A  AMS SUBR                 OBJECT          OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   BRILL                                      
0          Object part of *LIBRARY (524/1)
00667/001   OVERDRIVE                                S*  O          S1559 5.0T2 VLO FSNAME=OVERDRIVE..S*.001(1)                 1127
            5.0T2  1127  OVERDRIVE..S*.001                  1 LINE     98   49 PAGE UM   SWARTZ              APR. 05, 1980  20:27:38
            5.0T6   149                       
0          A FORTRAN PREPROCESSOR WHICH IS WRITTEN IN SNOSTORM, SEE (678).
           USES THE SPITBOL LOAD FUNCTION TO LOAD SUBROUTINES FROM UNSP:SPITLIB.
            
           FILE CONTAINS MTS COMMANDS AT BEGINNING FOR ASSEMBLING.
0          Referenced by comments of: 551/1, 666/1, 667/2, 822/1, 822/5, 822/9, 822/13, 822/16, 822/19, 831/1 
00667/002   OVERDRIVE                                SS  O          S1559 5.0T2 VLO FSNAME=OVERDRIVE..SS.002(1)                 1128
            5.0T2  1128  OVERDRIVE..SS.002                  1 LINE     95   53 PAGE UM   SWARTZ              APR. 05, 1980  20:27:47
            5.0T6   150                       
0          INTERMEDIATE SOURCE FOR *OVERDRIVE (667/3).  IN SPITBOL, AS PRODUCED FROM 
           (667/1).
00667/003   OVERDRIVE                                OC  O          *OVERDRIVE                                                      
            5.0T2  1129  OVERDRIVE..OC.003                  1 LINE  32767   50 PAGE UM   SWARTZ              JULY 03, 1981  17:27:32
            5.0T6   151  *OVERDRIVE           
0          HAS A "$CONTINUE WITH *SPITLIB" CARD.
0          Referenced by comments of: 667/2 
00668/001A *TAXIR                    FLECS SOURCE    SF  G  TAX     S1223 TAXIR8 FSNAME=TAXIR10.S                                   
            5.1T1   960  TAXIR.FLECS_SOURCE.SF.001          1 LINE     80  219 PAGE UM   BRILL               MAY  19, 1983  14:36:34
0          Source for the FLECS portion of the Taxir information retrieval system,
           version 10. It should be processed by the FLECS pre-processor (673) and then
           compiled using FTN-H (298) with PAR=XL (to get functions LAND, LOR, LXOR,
           LCOMPL, SHFTR, and SHFTL compiled inline).  See (668/10) for details.
0          Referenced by comments of: 500/18, 500/21, 500/32 
00668/002A *TAXIR                    FLECS OBJECT    O   G          S1223 TAXIR8 FSNAME=TAXIR10.O                                   
            5.1T1   961  TAXIR.FLECS_OBJECT.O.002           1 LINE  15200   60 PAGE UM   BRILL               MAY  19, 1983  14:37:08
0          Object for FLECS portion of Taxir, version 10.
1                                                                                               SUN SEP 08/96   15:24:55   Page  440
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00668/003A *TAXIR                    FLECS LISTING   L   G          S1223 TAXIR8 FSNAME=TAXIR10.LIST                                
            5.1T1   962  TAXIR.FLECS_LISTING.L.003          1 LINE    121  153 PAGE UM   BRILL               MAY  19, 1983  14:37:16
0          FLECS indented listing of Taxir, version 10.  (Output listing produced
           by FLECS.)
00668/004A *TAXIR                    ASM SOURCE      SA  G  TAX     S1223 TAXIR8 FSNAME=TAXIR10.AS                                  
            5.1T1   963  TAXIR.ASM_SOURCE.SA.004            1 LINE     80   26 PAGE UM   BRILL               MAY  19, 1983  14:37:41
0          Source for the assembly language portion of Taxir, version 10.
00668/005A *TAXIR                    ASM OBJECT      O   G          S1223 TAXIR8 FSNAME=TAXIR10.AO                                  
            5.1T1   964  TAXIR.ASM_OBJECT.O.005             1 LINE   1412    3 PAGE UM   BRILL               MAY  19, 1983  14:37:45
0          Object for assembler portion of Taxir, version 10.
00668/006A *TAXIR                    *TAXIR          OE  G          *TAXIR                                                          
            5.1T1   965  TAXIR.?TAXIR.OE.006                1 SEQ   32767   49 PAGE UM   BRILL               JULY 23, 1983  12:29:21
                         *TAXIR               
0          Linkedited object module for version 10 of Taxir.
00668/007A *TAXIR                    ETC:TAXERRORS   M              ETC:TAXERRORS                                                   
            5.1T1   966  TAXIR.ETC:TAXERRORS.M.007          1 LINE     72    3 PAGE UM   BRILL               JULY 23, 1983  12:29:23
                         ETC:TAXERRORS        
0          File of error and broadcast messages used by Taxir, version 10.  This file
           is read @I by Taxir, so line numbers are important.  The first line number
           is -3.  The file should be permitted READ to ALL.
00668/008A *TAXIR                    PRIMER          WF             S1223 TAXIR8 FSNAME=TAXPRIMER4.F                                
            5.1T1   967  TAXIR.PRIMER.WF.008                1 LINE    227   85 PAGE UM   BRILL               MAY  19, 1983  14:37:51
0          This is the Taxir Primer, MTS version, fourth edition, Feb. 1983.  It is
           missing art work and special characters added by hand before publication.
           See (668/10) for details.
00668/009C *TAXIR                    PMF PROJECT     D   G          S1223 TAXIR8 FSNAME=TAXIR10.PMF                                 
            5.1T1   968  TAXIR.PMF_PROJECT.D.009            1 LINE     69    3 PAGE UM   BRILL               MAY  19, 1983  14:39:06
0          PMF (810) project file for Taxir, version 10.
00668/010A *TAXIR                    INSTALL GUIDE   P   G          S1223 TAXIR8 FSNAME=TAXIR10.INST                                
            5.1T1   969  TAXIR.INSTALL_GUIDE.P.010          1 LINE     69    3 PAGE UM   BRILL               MAY  19, 1983  14:57:19
0          Installation and maintenance guide for Taxir, version 10.
0          Referenced by comments of: 668/1, 668/8 
00668/011  *TAXIR                    USE STAT        D            # ETC.:TAXIRMONITOR                                               
                                                                                    UM   BRILL                                      
                         ETC.:TAXIRMONITOR@E  
0          THIS IS A LINE FILE USED BY TAXIR TO RECORD USAGE STATISTICS.  ITS
1                                                                                               SUN SEP 08/96   15:24:55   Page  441
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          CONTENTS ARE NOT DISTRIBUTED SINCE AN EMPTY LINE FILE IS ALL THAT
           IS INITIALLY REQUIRED.  TAXIR MAY BE USED TO ANALYZE THE ACCUMULATED 
           USAGE STATISTICS.  THE FILE SHOULD BE PERMITTED WRITE TO ALL.
00669/001   MTS VOLUME 9             MASTER          WT             S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.MASTER.WT.001(1)        1140
            5.0T2  1140  MTS_VOLUME_9.MASTER.WT.001         1 SEQ     132  114 PAGE UM   MANUAL              APR. 05, 1980  20:31:27
            5.0T6   162                       
0          TEXT/360 MASTER FOR VOLUME 9 "SNOBOL 4 IN MTS" OF THE UM MTS MANUALS,
           SEPTEMBER 1975, UPDATED JUNE 1979.
            
           EDITOR:  RICHARD A. SALISBURY
00669/002   MTS VOLUME 9             PRINT           PT             S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.PRINT.PT.002(1)         1141
            5.0T2  1141  MTS_VOLUME_9.PRINT.PT.002          1 SEQ     132  175 PAGE UM   MANUAL              APR. 05, 1980  20:31:33
            5.0T6   163                       
0          TEXT/360 PRINT FILE.
00669/003   MTS VOLUME 9             INDEX SOURCE    D              S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.INDEX_SOURCE.D.003(1)   1142
            5.0T2  1142  MTS_VOLUME_9.INDEX_SOURCE.D.003    1 SEQ      82    5 PAGE UM   MANUAL              APR. 05, 1980  20:31:36
            5.0T6   164                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 9
00669/004   MTS VOLUME 9             UPDATE 1        P              S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.UPDATE_1.PT.004(1)      1143
            5.0T2  1143  MTS_VOLUME_9.UPDATE_1.PT.004       1 LINE    108   78 PAGE UM   MANUAL              APR. 05, 1980  20:31:41
            5.0T6   165                       
0          THIS IS COMPUTING CENTER MEMO 401 -- UPDATE 1 TO MTS VOLUME 9,"
           JUNE 1979.  $COPY TO A TN PRINTER USING THE @MCC MODIFIER.
00670/001   PL1LINK                                  SA           # (OBSOLETE)                                                      
            D4T2   1168  PL1LINK..SA.001                    1 LINE     80    6 PAGE UM                       JULY 28, 1977  23:01:26
0          AN EXPERIMENTAL PROGRAM TO ALLOW DYNAMIC LINKING TO PL1 SUBROUTINES.
00671/001   FILE RESTORE - FAST      FASTRESTORE     SA  G          RSTR:FASTRESTORE(1000)                                          
            5.0T2  1144  FILE_RESTORE_-_FAST.FASTR.SA.001   1 LINE     72    8 PAGE UM   HELFFRICH           JULY 03, 1981  17:29:27
            5.0T6   166  RSTR:FASTRESTORE     
0          THE FAST FILE RESTORE PROGRAMS ARE USED TO RESTORE THE ENTIRE FILE SYSTEM
           FROM FILE SAVE TAPES, AS QUICKLY AS POSSIBLE, ON A PAGE AT A TIME BASIS, 
           WHEN NEW DISKS ARE BEING INSTALLED OR AFTER A MAJOR DISASTER.  THEY CANNOT 
           BE USED TO CONVERT FILE FORMATS.  SEE THE COMMENTS IN THE SOURCE FOR DETAILS
           ON USAGE.
            
           (671/1) AND (671/3) WORK WITH FILESAVE TAPES WHEN THE ONLINE FILESAVE (067/26) IS
           BEING USED AND THE FILESAVE DIRECTORY "FILEDIR.MAS" IS AVAILABLE TO AID IN
           THE RESTORATION.  (671/1) CALLS THE FASTRSTR SUBROUTINE (671/3); IT TAKES A 
           LIST OF FILES AND AN INDICATION OF WHAT IS TO BE DONE WITH EACH AS PRODUCED
           BY AMALGAMATE (682/40), MOUNTS AND SCANS TAPES, AND CALLS FASTRSTR TO DO THE
           RESTORING. ASSEMBLE WITH THE FILE SAVE MACROS (067/35).
1                                                                                               SUN SEP 08/96   15:24:55   Page  442
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 671/1, 671/3, 682/39 
00671/002   FILE RESTORE - FAST      FASTRESTORE     OC  G          RSTR:FASTRESTORE(1,999)                                         
            5.0T2  1145  FILE_RESTORE_-_FAST.FASTR.OC.002   1 LINE     80    5 PAGE UM   HELFFRICH           JULY 03, 1981  17:29:30
            5.0T6   167                       
0          HAS A $CONTINUE WITH RSTR:FASTRSTR+COPY:SYSDEFS RECORD.
00671/003   FILE RESTORE - FAST      FASTRSTR SUBR   SA  G  FRST    RSTR:FASTRSTR(1000)                                             
            5.0T2  1146  FILE_RESTORE_-_FAST.FASTR.SA.003   1 LINE     80   23 PAGE UM   HELFFRICH           JULY 03, 1981  17:29:32
            5.0T6   168  RSTR:FASTRSTR        
0          Subroutine called by (671/1) to do fast restoring.  Assemble using COPY:FILE.MACROS
           (482/45) and the FILESAVE macros (067/35). Copies *CNFGINFODSECT (654).
0          Referenced by comments of: 671/1 
00671/004   FILE RESTORE - FAST      FASTRSTR SUBR   OC  G          RSTR:FASTRSTR(1,999)                                            
            5.0T2  1147  FILE_RESTORE_-_FAST.FASTR.OC.004   1 LINE     80    6 PAGE UM   HELFFRICH           JULY 03, 1981  17:29:39
            5.0T6   169                       
00672/001  *WATBOL                   INSTALLATION    WF             S1559 5.0T2 VLO FSNAME=WATBOL.INSTALLATION.WF.001(1)        1148
            5.0T2  1148  WATBOL.INSTALLATION.WF.001         1 LINE     78    1 PAGE UM   SWARTZ              NOV. 04, 1976  22:59:17
            5.0T6   170                       
0          UNIVERSITY OF WATERLOO WATBOL V2L0 COBOL.  THE SOURCE AND OBJECT CANNOT BE
           DISTRIBUTED DUE TO WATERLOO RESTRICTIONS.
            
           THIS SUB-COMPONENT DESCRIBES THE WATBOL INSTALLATION PROCEDURE FOR MTS.
0          Referenced by comments of: 672/30 
00672/002  *WATBOL                   START.S         SA  G          S1559 5.0T2 VLO FSNAME=WATBOL.START.S.SA.002(1)             1149
            5.0T2  1149  WATBOL.START.S.SA.002              1 LINE     73    1 PAGE UM   SWARTZ              JULY 15, 1976  03:12:34
            5.0T6   171                       
0          AN INSTALLATION-DEPENDENT PREFIX OF ASSEMBLER GBL'S TO BE PLACED AT THE HEAD
           OF MOST ALL OF THE ASSEMBLER SOURCE GENERATED BY THE FOLLOWING UPDATE DECKS.
00672/003  *WATBOL                   END.S           SA  G          S1559 5.0T2 VLO FSNAME=WATBOL.END.S.SA.003(1)               1150
            5.0T2  1150  WATBOL.END.S.SA.003                1 LINE     12    1 PAGE UM   SWARTZ              JULY 15, 1976  03:14:13
            5.0T6   172                       
0          AN ASSEMBLER END CARD TO SUFFIX ASSEMBLIES OF SOURCE GENERATED BY THE FOLLOWING
           UPDATE DECKS.
00672/004  *WATBOL                   ACCT.U          UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.ACCT.U.UU.004(1)              1151
            5.0T2  1151  WATBOL.ACCT.U.UU.004               1 LINE     83    8 PAGE UM   SWARTZ              FEB. 28, 1976  13:35:59
            5.0T6   173                       
0          Referenced by comments of: 672/24 
1                                                                                               SUN SEP 08/96   15:24:55   Page  443
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00672/005  *WATBOL                   DATFX.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.DATFX.U.UU.005(1)             1152
            5.0T2  1152  WATBOL.DATFX.U.UU.005              1 LINE     72    1 PAGE UM   SWARTZ              FEB. 28, 1976  13:36:08
            5.0T6   174                       
00672/006  *WATBOL                   DEBUG.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.DEBUG.U.UU.006(1)             1153
            5.0T2  1153  WATBOL.DEBUG.U.UU.006              1 LINE     72    1 PAGE UM   SWARTZ              FEB. 28, 1976  13:36:20
            5.0T6   175                       
00672/007  *WATBOL                   EOSTA.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.EOSTA.U.UU.007(1)             1154
            5.0T2  1154  WATBOL.EOSTA.U.UU.007              1 LINE     72    1 PAGE UM   SWARTZ              FEB. 28, 1976  13:36:36
            5.0T6   176                       
00672/008  *WATBOL                   FD.U            UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.FD.U.UU.008(1)                1155
            5.0T2  1155  WATBOL.FD.U.UU.008                 1 LINE     78    3 PAGE UM   SWARTZ              FEB. 28, 1976  13:36:48
            5.0T6   177                       
00672/009  *WATBOL                   JOBJOB.U        UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.JOBJOB.U.UU.009(1)            1156
            5.0T2  1156  WATBOL.JOBJOB.U.UU.009             1 LINE     72    4 PAGE UM   SWARTZ              FEB. 28, 1976  13:37:06
            5.0T6   178                       
00672/010  *WATBOL                   LOADR.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.LOADR.U.UU.010(1)             1157
            5.0T2  1157  WATBOL.LOADR.U.UU.010              1 LINE     72    6 PAGE UM   SWARTZ              FEB. 28, 1976  13:37:23
            5.0T6   179                       
00672/011  *WATBOL                   MAIN.U          UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.MAIN.U.UU.011(1)              1158
            5.0T2  1158  WATBOL.MAIN.U.UU.011               1 LINE     81   17 PAGE UM   SWARTZ              FEB. 28, 1976  13:38:08
            5.0T6   180                       
00672/012  *WATBOL                   OPEN.U          UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.OPEN.U.UU.012(1)              1159
            5.0T2  1159  WATBOL.OPEN.U.UU.012               1 LINE     72    1 PAGE UM   SWARTZ              NOV. 04, 1976  22:58:48
            5.0T6   181                       
00672/013  *WATBOL                   RINIT.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.RINIT.U.UU.013(1)             1160
            5.0T2  1160  WATBOL.RINIT.U.UU.013              1 LINE     72    3 PAGE UM   SWARTZ              FEB. 28, 1976  13:56:43
            5.0T6   182                       
00672/014  *WATBOL                   SD.U            UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.SD.U.UU.014(1)                1161
            5.0T2  1161  WATBOL.SD.U.UU.014                 1 LINE     72    4 PAGE UM   SWARTZ              FEB. 28, 1976  13:42:42
            5.0T6   183                       
00672/015  *WATBOL                   SERVICE.U       UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.SERVICE.U.UU.015(1)           1162
            5.0T2  1162  WATBOL.SERVICE.U.UU.015            1 LINE     72    1 PAGE UM   SWARTZ              FEB. 28, 1976  13:54:31
            5.0T6   184                       
00672/016  *WATBOL                   SYSINT.U        UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.SYSINT.U.UU.016(1)            1163
            5.0T2  1163  WATBOL.SYSINT.U.UU.016             1 LINE     72    1 PAGE UM   SWARTZ              FEB. 28, 1976  13:54:51
            5.0T6   185                       
00672/017  *WATBOL                   DIAC.U          UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.DIAC.U.UU.017(1)              1164
            5.0T2  1164  WATBOL.DIAC.U.UU.017               1 LINE     72    4 PAGE UM   SWARTZ              FEB. 28, 1976  13:55:19
            5.0T6   186                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  444
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00672/018  *WATBOL                   FORMT.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.FORMT.U.UU.018(1)             1165
            5.0T2  1165  WATBOL.FORMT.U.UU.018              1 LINE     72    1 PAGE UM   SWARTZ              FEB. 28, 1976  13:55:51
            5.0T6   187                       
00672/019  *WATBOL                   IOSUP.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.IOSUP.U.UU.019(1)             1166
            5.0T2  1166  WATBOL.IOSUP.U.UU.019              1 LINE     73   18 PAGE UM   SWARTZ              JULY 15, 1976  03:33:59
            5.0T6   188                       
00672/020  *WATBOL                   RUN.U           UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.RUN.U.UU.020(1)               1167
            5.0T2  1167  WATBOL.RUN.U.UU.020                1 LINE     75    3 PAGE UM   SWARTZ              FEB. 28, 1976  13:57:00
            5.0T6   189                       
00672/021  *WATBOL                   SORTR.U         UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.SORTR.U.UU.021(1)             1168
            5.0T2  1168  WATBOL.SORTR.U.UU.021              1 LINE     72    7 PAGE UM   SWARTZ              FEB. 28, 1976  13:57:18
            5.0T6   190                       
00672/022  *WATBOL                   TRAC.U          UU  G          S1559 5.0T2 VLO FSNAME=WATBOL.TRAC.U.UU.022(1)              1169
            5.0T2  1169  WATBOL.TRAC.U.UU.022               1 LINE     72    3 PAGE UM   SWARTZ              FEB. 28, 1976  13:57:33
            5.0T6   191                       
00672/023  *WATBOL                   TIME.S          SA  G          S1559 5.0T2 VLO FSNAME=WATBOL.TIME.S.SA.023(1)              1170
            5.0T2  1170  WATBOL.TIME.S.SA.023               1 LINE     71    3 PAGE UM   SWARTZ              JULY 15, 1976  03:12:51
            5.0T6   192                       
0          Referenced by comments of: 672/24 
00672/024  *WATBOL                   MACROS          SM  G          S1559 5.0T2 VLO FSNAME=WATBOL.MACROS.SM.024(1)              1171
            5.0T2  1171  WATBOL.MACROS.SM.024               1 LINE     80   16 PAGE UM   SWARTZ              JULY 15, 1976  03:16:17
            5.0T6   193                       
0          MACRO LIBRARY NEEDED TO ASSEMBLE SOURCE RESULTING FROM (672/4) THRU (672/23).
00672/025  *WATBOL                   OBJECT          OC  G        # S0924 WATBOL 'WATBOL ARCHIVE' FSNAME=WAT.WATBOL                 
                                                                                    UM   SWARTZ                                     
0          UNLINK-EDITED OBJECT FOR WATBOL.  NOT DISTRIBUTED DUE TO WATERLOO RESTRICTIONS.
00672/026  *WATBOL                   OBJECT          OE  G        # *WATBOL                                                         
                                                                                    UM   SWARTZ                                     
                         *WATBOL@UM           
0          NOT DISTRIBUTED DUE TO WATERLOO RESTRICTIONS.
           *WATBOL REQUIRES THE FILE "ETC:WATPGNTLOG" EXIST FOR LOGGING.
00672/027  *WATBOL                   LIBRARY GEN     SA  G          S1559 5.0T2 VLO FSNAME=WATBOL.LIBRARY_GEN.SA.027(1)         1172
            5.0T2  1172  WATBOL.LIBRARY_GEN.SA.027          1 LINE     80   30 PAGE UM   SWARTZ              JULY 15, 1976  03:15:10
            5.0T6   194                       
0          SOURCE FOR WATBOL LIBRARY GENERATION PROGRAM.  ASSEMBLE USING *SYSMAC.
1                                                                                               SUN SEP 08/96   15:24:55   Page  445
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00672/028  *WATBOL                   LIBRARY GEN     OC  G          *WATBOLLIBGEN                                                   
            5.0T2  1173  WATBOL.LIBRARY_GEN.OC.028          1 SEQ      80    4 PAGE UM   SWARTZ              JULY 03, 1981  17:30:10
            5.0T6   195  *WATBOLLIBGEN        
00672/029  *WATBOL                   LIBRARY         D   G          *WATBOLLIB                                                      
            5.0T2  1174  WATBOL.LIBRARY.D.029               1 LINE     69    4 PAGE UM   SWARTZ              JULY 03, 1981  17:30:11
            5.0T6   196  *WATBOLLIB           
0          DEFAULT UM WATBOL LIBRARY.
00672/030  *WATBOL                   TEST PROGRAMS   S   G          S1559 5.0T2 VLO FSNAME=WATBOL.TEST_PROGRAMS.S.030(1)        1175
            5.0T2  1175  WATBOL.TEST_PROGRAMS.S.030         1 LINE     82   49 PAGE UM   SWARTZ              NOV. 10, 1976  20:22:05
            5.0T6   197                       
0          TEST PROGRAM SERIES FOR WATBOL V2L0 COMPILER.  SEE (672/1) FOR INSTRUCTIONS.
00673/001   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=C.FLX                                     
            5.0T2  1176  FLECS.OREGON_SOURCE.SF.001         1 LINE     80   38 PAGE UM   UNSP                DEC. 16, 1974  20:57.44
            5.0T6   198                       
0          UNIVERSITY OF OREGON'S FORTRAN PREPROCESSOR.
            
           A HARDCOPY WRITEUP AND OTHER DOCUMENTATION WAS INCLUDED WITH D4.
            
           THIS COMPONENT AND THE NEXT 10 ARE THE ORIGINAL FLECS SOURCE FROM THE UNIVERSITY
           OF OREGON.  THEY ARE REFERRED TO AS FILES 1 THROUGH 11 IN THE MTS FLECS INSTALLATION
           GUIDE (673/38).
0          Referenced by comments of: 668/1, 847/1 
00673/002   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=C.F4                                      
            5.0T2  1177  FLECS.OREGON_SOURCE.SF.002         1 LINE     80   42 PAGE UM   UNSP                DEC. 16, 1974  20:59.11
            5.0T6   199                       
0          FILE 2
00673/003   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=SC.FLX                                    
            5.0T2  1178  FLECS.OREGON_SOURCE.SF.003         1 LINE     80   16 PAGE UM   UNSP                DEC. 16, 1974  20:59.41
            5.0T6   200                       
0          FILE 3
00673/004   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=SC.F4                                     
            5.0T2  1179  FLECS.OREGON_SOURCE.SF.004         1 LINE     80    8 PAGE UM   UNSP                DEC. 16, 1974  21:00.25
            5.0T6   201                       
0          FILE 4
00673/005   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=M.FLX                                     
            5.0T2  1180  FLECS.OREGON_SOURCE.SF.005         1 LINE     80   22 PAGE UM   UNSP                DEC. 16, 1974  21:01.13
            5.0T6   202                       
0          FILE 5
1                                                                                               SUN SEP 08/96   15:24:55   Page  446
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00673/006   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=M.F4                                      
            5.0T2  1181  FLECS.OREGON_SOURCE.SF.006         1 LINE     80   24 PAGE UM   UNSP                DEC. 16, 1974  21:02.06
            5.0T6   203                       
0          FILE 6
00673/007   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=A.FLX                                     
            5.0T2  1182  FLECS.OREGON_SOURCE.SF.007         1 LINE     80   14 PAGE UM   UNSP                DEC. 16, 1974  21:03.11
            5.0T6   204                       
0          FILE 7
00673/008   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=A.F4                                      
            5.0T2  1183  FLECS.OREGON_SOURCE.SF.008         1 LINE     80   14 PAGE UM   UNSP                DEC. 16, 1974  21:03.58
            5.0T6   205                       
0          FILE 8
00673/009   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=L.FLX                                     
            5.0T2  1184  FLECS.OREGON_SOURCE.SF.009         1 LINE     80   13 PAGE UM   UNSP                DEC. 16, 1974  21:04.46
            5.0T6   206                       
0          FILE 9
00673/010   FLECS                    OREGON SOURCE   SF  O          S1153 UNSP VLO FSNAME=L.F4                                      
            5.0T2  1185  FLECS.OREGON_SOURCE.SF.010         1 LINE     80   11 PAGE UM   UNSP                DEC. 16, 1974  21:05.45
            5.0T6   207                       
0          FILE 10
00673/011   FLECS                    OREGON SOURCE   SA  O          S1153 UNSP VLO FSNAME=ASMFLX.S                                  
            5.0T2  1186  FLECS.OREGON_SOURCE.SA.011         1 LINE     80   13 PAGE UM   UNSP                DEC. 16, 1974  21:06.34
            5.0T6   208                       
0          FILE 11
00673/012   FLECS                    STANDALONE XLT  S   O  FLE     S1153 UNSP VLO FSNAME=F.FLECS                                   
            5.0T2  1187  FLECS.STANDALONE_XLT.S.012         1 LINE     80   49 PAGE UM   UNSP                AUG. 08, 1975  14:16:20
            5.0T6   209                       
0          FILE 12 -- FLECS SOURCE FOR 3 PART MTS STANDALONE TRANSLATOR.
00673/013   FLECS                    STANDALONE XLT  S   O          S1153 UNSP VLO FSNAME=S.FLECS                                   
            5.0T2  1188  FLECS.STANDALONE_XLT.S.013         1 LINE     80   46 PAGE UM   UNSP                AUG. 08, 1975  14:17:31
            5.0T6   210                       
0          FILE 13 -- ASSEMBLY SOURCE AND FORTRAN TARGET FOR MTS STANDALONE TRANSLATOR.
00673/014   FLECS                    STANDALONE XLT  OC  O          S1153 UNSP VLO FSNAME=O.FLECS                                   
            5.0T2  1189  FLECS.STANDALONE_XLT.OC.014        1 LINE    240    9 PAGE UM   UNSP                AUG. 08, 1975  14:18:07
            5.0T6   211                       
0          FILE 14 -- OBJECT FOR MTS STANDALONE TRANSLATOR.
1                                                                                               SUN SEP 08/96   15:24:55   Page  447
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00673/015   FLECS                    STANDALONE XLT  S   O  FLE1    S1153 UNSP VLO FSNAME=F.FLECS.SC                                
            5.0T2  1190  FLECS.STANDALONE_XLT.S.015         1 LINE     80    8 PAGE UM   UNSP                AUG. 08, 1975  14:19:03
            5.0T6   212                       
0          FILE 15 -- FLECS SOURCE FOR STANDALONE TRANSLATOR SUPPORT ROUTINES.
           Contains many $CONTINUE WITH SN99:FLX RETURN records, which refer to 
           (673/24).
00673/016   FLECS                    STANDALONE XLT  S   O          S1153 UNSP VLO FSNAME=S.FLECS.SC                                
            5.0T2  1191  FLECS.STANDALONE_XLT.S.016         1 LINE     80   11 PAGE UM   UNSP                AUG. 08, 1975  14:20:41
            5.0T6   213                       
0          FILE 16 -- ASSEMBLY SOURCE AND FORTRAN TARGET FOR STANDALONE TRANSLATOR SUPPORT ROUTINES.
00673/017   FLECS                    STANDALONE XLT  OC  O          S1153 UNSP VLO FSNAME=O.FLECS.SC                                
            5.0T2  1192  FLECS.STANDALONE_XLT.OC.017        1 LINE    244    5 PAGE UM   UNSP                AUG. 08, 1975  14:22:01
            5.0T6   214                       
0          FILE 17 -- OBJECT FOR STANDALONE TRANSLATOR SUPPORT ROUTINES.
00673/018   FLECS                    STANDALONE XLT  OE  O          S1153 UNSP VLO FSNAME=FLECS                                     
            5.0T2  1193  FLECS.STANDALONE_XLT.OE.018        1 SEQ   24628    9 PAGE UM   UNSP                AUG. 08, 1975  14:22:37
            5.0T6   215                       
0          FILE 18 -- LINKEDITED OBJECT FOR MTS STANDALONE TRANSLATOR.
00673/019   FLECS                    STANDALONE XLT  SF  O  FLE2    S1153 UNSP VLO FSNAME=COM.FLECS                                 
            5.0T2  1194  FLECS.STANDALONE_XLT.SF.019        1 LINE     80    2 PAGE UM   UNSP                AUG. 08, 1975  14:23:26
            5.0T6   216                       
0          FILE 19 -- COMMON SECTIONS USED BY STANDALONE TRANSLATOR.
00673/020   FLECS                    FLX WRITEUP     WF             S1153 UNSP VLO FSNAME=F.FFIWR                                   
            5.0T2  1195  FLECS.FLX_WRITEUP.WF.020           1 LINE    244   16 PAGE UM   UNSP                OCT. 08, 1978  22:53:11
            5.0T6   217                       
0          FILE 20 -- FORMAT SOURCE FOR THE FLX MTS INTERFACE WRITEUP.
00673/021   FLECS                    NOTES           P              S1153 UNSP VLO FSNAME=FLECS.NOTES                               
            5.0T2  1196  FLECS.NOTES.P.021                  1 LINE     63    1 PAGE UM   UNSP                MAY  22, 1977  17:34:48
            5.0T6   218                       
0          NOTES DESCRIBING THE CHANGES BETWEEN THIS VERSION AND THE PREVIOUS REDISTRIBUTION.
00673/022   FLECS                    USER'S MANUAL   WF             S1153 UNSP VLO FSNAME=FLECS.F                                   
            5.0T2  1197  FLECS.USER'S_MANUAL.WF.022         1 LINE    183   13 PAGE UM   UNSP                SEP. 15, 1980  16:42:54
            5.0T6   219                       
00673/023C  FLECS                    SUPLMENTAL DOC               # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the documentation to supplement the machine readable
           documentation for the FLECS FORTRAN preprocessor. Only hard copies of
           this component are distributed.
1                                                                                               SUN SEP 08/96   15:24:55   Page  448
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00673/024   FLECS                    FLX             SF  O  FLX     S1153 UNSP VLO FSNAME=COM.FLX                                   
            5.0T2  1198  FLECS.FLX.SF.023                   1 LINE     80    3 PAGE UM   UNSP                MAY  22, 1977  17:37:47
            5.0T6   220                       
0          FILE 23 -- FORTRAN COMMON SECTIONS USED BY FLECS/FORTRAN INTERFACE.
0          Referenced by comments of: 673/15, 673/27, 673/33 
00673/025   FLECS                    FLX             S   O  FLX1    S1153 UNSP VLO FSNAME=F.FLX                                     
            5.0T2  1199  FLECS.FLX.S.024                    1 LINE     80   50 PAGE UM   UNSP                MAY  22, 1977  17:40:01
            5.0T6   221                       
0          FILE 24 -- FLECS SOURCE FOR FLXT TRANSLATOR.
0          Referenced by comments of: 673/28 
00673/026   FLECS                    FLX             S   O  FLX2    S1153 UNSP VLO FSNAME=F.FLX.SC                                  
            5.0T2  1200  FLECS.FLX.S.025                    1 LINE     80    8 PAGE UM   UNSP                MAY  22, 1977  17:41:16
            5.0T6   222                       
0          FILE 25 -- FLECS SOURCE FOR FFI/FLXT INTERFACE.
0          Referenced by comments of: 673/29 
00673/027   FLECS                    FLX             SA  O  FLX3    S1153 UNSP VLO FSNAME=S.FLX.AU                                  
            5.0T2  1201  FLECS.FLX.SA.026                   1 LINE     80   26 PAGE UM   UNSP                MAY  22, 1977  17:46:03
            5.0T6   223                       
0          FILE 26 -- ASSEMBLY SOURCE FOR FLXT UTILITY ROUTINES. COPIES FLX FORTRAN
           COMMON SECTIONS (673/24) AND FLX MACROS (673/32).
0          Referenced by comments of: 673/30 
00673/028   FLECS                    FLX             OC  O          S1153 UNSP VLO FSNAME=O.FLX                                     
            5.0T2  1202  FLECS.FLX.OC.027                   1 LINE   9072    8 PAGE UM   UNSP                MAY  22, 1977  17:44:12
            5.0T6   224                       
0          FILE 27 -- OBJECT FOR F.FLX (673/25).
00673/029   FLECS                    FLX             OC  O          S1153 UNSP VLO FSNAME=O.FLX.SC                                  
            5.0T2  1203  FLECS.FLX.OC.028                   1 LINE   1004    4 PAGE UM   UNSP                MAY  22, 1977  17:45:02
            5.0T6   225                       
0          FILE 28 -- OBJECT FOR F.SC (673/26).
00673/030   FLECS                    FLX             OC  O          S1153 UNSP VLO FSNAME=O.FLX.AU                                  
            5.0T2  1204  FLECS.FLX.OC.029                   1 LINE     80    3 PAGE UM   UNSP                MAY  22, 1977  17:43:04
            5.0T6   226                       
0          FILE 29 -- OBJECT FOR S.AU (673/27).
1                                                                                               SUN SEP 08/96   15:24:55   Page  449
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00673/031   FLECS                    FLX             OE  O          UNSP:FLXT                                                       
            5.0T2  1205  FLECS.FLX.OE.030                   1 LINE  11124   11 PAGE UM   UNSP                JULY 03, 1981  17:31:38
            5.0T6   227  UNSP:FLXT            
0          FILE 30 -- LINKEDITED OBJECT FOR FLXT, THE TRANSLATOR THAT RUNS UNDER FFI.
00673/032   FLECS                    FLX             SA  O  FLX2    S1153 UNSP VLO FSNAME=FLXDEF                                    
            5.0T2  1206  FLECS.FLX.SA.031                   1 LINE     80    8 PAGE UM   UNSP                MAY  22, 1977  17:41:57
            5.0T6   228                       
0          FILE 31 -- MACROS AND COPY SECTIONS.
0          Referenced by comments of: 673/27, 673/33 
00673/033   FLECS                    FLX             SA  O  FFI     S1153 UNSP VLO FSNAME=S.FFI                                     
            5.0T2  1207  FLECS.FLX.SA.032                   1 LINE     80   77 PAGE UM   UNSP                OCT. 08, 1978  22:50:10
            5.0T6   229                       
0          FILE 32 -- ASSEMBLY SOURCE FOR FFI.  COPIES FLX FORTRAN COMMON SECTIONS
           (673/24) AND FLX MACROS (673/32).
00673/034   FLECS                    FLX             OC  O          S1153 UNSP VLO FSNAME=O.FFI                                     
            5.0T2  1208  FLECS.FLX.OC.033                   1 LINE   1956   12 PAGE UM   UNSP                OCT. 08, 1978  22:51:01
            5.0T6   230                       
00673/035   FLECS                    FLX             OE  O          UNSP:FLX                                                        
            5.0T2  1209  FLECS.FLX.OE.034                   1 LINE   1956    6 PAGE UM   UNSP                JULY 03, 1981  17:31:45
            5.0T6   231  UNSP:FLX             
0          FILE 34 -- LINKEDITED OBJECT FOR FFI.  LINKS TO FLXT AND *FORTRANG OR *FORTRANH.
00673/036   FLECS                    EXAMPLE 1       S   S  FEX1    S1153 UNSP VLO FSNAME=DRKEXAMPLE                                
            5.0T2  1210  FLECS.EXAMPLE_1.S.035              1 LINE     80   25 PAGE UM   UNSP                DEC. 09, 1976  22:36:39
            5.0T6   232                       
0          FILE 35 -- EXAMPLE FLECS PROGRAMS.
00673/037   FLECS                    EXAMPLE 2       S   S  FEX2    S1153 UNSP VLO FSNAME=HBGEXAMPLE                                
            5.0T2  1211  FLECS.EXAMPLE_2.S.036              1 LINE     80   14 PAGE UM   UNSP                JAN. 21, 1976  15:16:56
            5.0T6   233                       
0          FILE 36 -- EXAMPLE FLECS PROGRAM.
00673/038   FLECS                    INSTALLATION    WF             S1153 UNSP VLO FSNAME=FLECSINSTALL.F                            
            5.0T2  1212  FLECS.INSTALLATION.WF.037          1 LINE    145   12 PAGE UM   UNSP                MAY  22, 1977  17:33:57
            5.0T6   234                       
0          FILE 37 -- FORMAT SOURCE FOR THE MTS FLECS INSTALLATION GUIDE.
0          Referenced by comments of: 673/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  450
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00674/001   JVCT SUBR                                SA  G          S0811 REBATE 'REBATES' FSNAME=UBCDATE                           
            5.0T2  1213  JVCT_SUBR..SA.001                  1 LINE     72   10 PAGE UBC  HOGG      LIFT      NOV. 28, 1977  20:58:00
            5.0T6   235                       
0          SUBROUTINE TO CONVERT FREE FORM TIME AND DATE FROM BCD TO MTS STANDARD
           INTERNAL TIME, I.E. MICROSECONDS SINCE 1 MARCH 1900.  SEE SOURCE FOR
           USAGE DESCRIPTION.
0          Referenced by comments of: 621/8, 621/9, 655/4, 707/3, 753/5, 3024/31 
00674/002   JVCT SUBR                                OC  G          MTS:UBCDATEX                                                    
            5.0T2  1214  JVCT_SUBR..OC.002                  1 LINE     80    3 PAGE UBC  HOGG      LIFT      JULY 03, 1981  17:31:52
            5.0T6   236  MTS.:UBCDATEX        
0          Referenced by comments of: 655/5 
00675/001   MTS VOLUME 6             MASTER          WT             S1559 5.0T2 VLO FSNAME=MTS_VOLUME_6.MASTER.WT.001(1)        1215
            5.0T2  1215  MTS_VOLUME_6.MASTER.WT.001         1 SEQ     132  360 PAGE UM   MANUAL              APR. 02, 1979  00:42:17
            5.0T6   237                       
0          TEXT/360 MASTER FOR VOLUME 6 "FORTRAN IN MTS" OF THE UM MTS MANUALS, DECEMBER
           1978.
            
           EDITOR:  RICHARD A. SALISBURY
00675/002   MTS VOLUME 6             PRINT           PT             S1559 5.0T2 VLO FSNAME=MTS_VOLUME_6.PRINT.PT.002(1)         1216
            5.0T2  1216  MTS_VOLUME_6.PRINT.PT.002          1 SEQ     132  557 PAGE UM   MANUAL              APR. 02, 1979  00:42:31
            5.0T6   238                       
0          TEXT/360 PRINT FILE.
00675/003   MTS VOLUME 6             INDEX SOURCE    D              S1559 5.0T2 VLO FSNAME=MTS_VOLUME_6.INDEX_SOURCE.D.003(1)   1217
            5.0T2  1217  MTS_VOLUME_6.INDEX_SOURCE.D.003    1 SEQ      82    6 PAGE UM   MANUAL              APR. 02, 1979  00:42:38
            5.0T6   239                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 6.
00676/001A  MTS VOLUME 8             MASTER          WT             S0950 MTSV8 'MTS MANUALS' POSN=NEWM3.V8                         
            5.1T1   970  MTS_VOLUME_8.MASTER.WT.001         1 LINE    132   96 PAGE UM   MANUAL              JULY 23, 1983  12:32:15
0          TEXT 360 master for Volume 8 "LISP and SLIP in MTS" of the UM MTS manuals,
           June 1976, updated February 1979 and January 1983.
            
           Editor:  Richard A. Salisbury
00676/002A  MTS VOLUME 8             PRINT           PT             S0950 MTSV8 'MTS MANUALS' POSN=PRINT3.V8                        
            5.1T1   971  MTS_VOLUME_8.PRINT.PT.002          1 LINE    132  169 PAGE UM   MANUAL              JULY 23, 1983  12:32:19
0          TEXT/360 print file.  There is also a Xerox 9700 print file
           (which is slightly modified from the TEXT/360 print file),
           available on request.
1                                                                                               SUN SEP 08/96   15:24:55   Page  451
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00676/003   MTS VOLUME 8             INDEX SOURCE    D              S1559 5.0T2 VLO FSNAME=MTS_VOLUME_8.INDEX_SOURCE.D.003(1)   1220
            5.0T2  1220  MTS_VOLUME_8.INDEX_SOURCE.D.003    1 SEQ      68    5 PAGE UM   MANUAL              APR. 02, 1979  00:43:08
            5.0T6   242                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 8.
00676/004   MTS VOLUME 8             UPDATE 1        P              S1559 5.0T2 VLO FSNAME=MTS_VOLUME_8.UPDATE_1.PT.004(1)      1221
            5.0T2  1221  MTS_VOLUME_8.UPDATE_1.PT.004       1 LINE    106   56 PAGE UM   MANUAL              APR. 02, 1979  00:43:09
            5.0T6   243                       
0          THIS IS COMPUTING CENTER MEMO 399 -- "UPDATE 1 TO MTS VOLUME 8," 
           FEBRUARY 1979.  $COPY TO A TN PRINTER USING THE @MCC MODIFIER.
00676/005C  MTS VOLUME 8             UPDATE 2        P              W073:TNLV8.JAN83                                                
            5.1T1   972  MTS_VOLUME_8.UPDATE_2.P.005        1 LINE     79   19 PAGE UM   MANUAL              JULY 23, 1983  12:32:21
0          This is "Update 2 to Volume 8," January 1983.
00677/001  *ENCRYPT                                  SA  O  ENCR    *ENCRYPT(1000)                                                  
            5.0T2  1222  ENCRYPT..SA.001                    1 LINE     80   19 PAGE UM   OGDEN               AUG. 06, 1981  04:25:02
            5.0T6   244  *ENCRYPT             
0          PROGRAM TO SCRAMBLE AND UNSCRAMBLE FILES BASED ON A SECRET KEY. ASSEMBLE WITH
           PAR=BATCH USING OLD:CC.MACROS (1054/4) AND COPY:MTS.MACROS (344/3). COPIES
           *GDINFODSECT (594). THIS IS ALSO THE SOURCE FOR THE CRYPT AND CRYPTCC
           SUBROUTINES IN THE RESIDENT SYSTEM.
0          Referenced by comments of: 491/1 
00677/002  *ENCRYPT                                  OE  O          *ENCRYPT(1,999)                                                 
            5.0T2  1223  ENCRYPT..OE.002                    1 LINE   5350    3 PAGE UM   OGDEN               AUG. 06, 1981  04:25:05
            5.0T6   245                       
0          OBJECT FOR THE *ENCRYPT MAIN PROGRAM.
00677/003  *ENCRYPT                                  OE  O          SEG2:CRYPT                                                      
            5.0T2  1224  ENCRYPT..OE.003                    1 LINE   1958    1 PAGE UM   OGDEN               AUG. 06, 1981  04:25:06
            5.0T6   246  SEG2:CRYPT           
0          OBJECT FOR THE CRYPT AND CRYPTCC SUBROUTINES. LOADED INTO SHARED VM AT IPL BY
           PISTLE.
00678/001A  SNOSTORM                 PREPROCESSOR    S*  G          W008:SNO.S(9)                                                   
            5.1T1   973  SNOSTORM.PREPROCESSOR.S?.001       1 LINE     99   25 PAGE UM   SWARTZ              JULY 23, 1983  12:32:22
0          SNOSTORM is a preprocessor for the SNOBOL4 language. It augments SNOBOL4
           with the structures IF, LOOP, CASE, and PROC.
            
           This subcomponent is the source for the SNOSTORM preprocessor (678/3), and
           is written in the SNOSTORM language.  For the initial installation of 
           SNOSTORM, this file is run through SNOSTORM and an intermediate source,
           (678/2), which is in SPITBOL, is produced.  This subcomponent uses the LOAD
           function to load subroutines from UNSP:SPITLIB (590/30).
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  452
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          File contains MTS commands at beginning for compiling.
             
           **********************************************************************
           D5.1 version:
            
           Additions since the last release:
            
             (1) Ada style "--" comments.
             (2) Additional loop options.
             (3) Logical expression bug fixed.
           **********************************************************************
0          Referenced by comments of: 667/1, 678/2, 678/3 
00678/002A  SNOSTORM                 PREPROCESSOR    SS  G          W008:SNO.S2                                                     
            5.1T1   974  SNOSTORM.PREPROCESSOR.SS.002       1 LINE     99   18 PAGE UM   SWARTZ              JULY 23, 1983  12:32:25
0          THIS IS THE SOURCE FOR THE SNOSTORM PREPROCESSOR, DERIVED BY RUNNING (678/1)
           THROUGH SNOSTORM. THIS FILE IS IN SPITBOL, AND IS USEFUL FOR "BOOTSTRAPPING"
           FOR THE INITIAL INSTALLATION OF SNOSTORM.
0          Referenced by comments of: 678/1, 678/3 
00678/003A  SNOSTORM                 PREPROCESSOR    OC  G          ETC:SNOSTORM                                                    
            5.1T1   975  SNOSTORM.PREPROCESSOR.OC.003       1 LINE  32767   28 PAGE UM   SWARTZ              JULY 23, 1983  12:32:26
                         ETC:SNOSTORM         
0          This is the object for the SNOSTORM preprocessor (678/1) and (678/2). it
           Contains a "$CONTINUE WITH *SPITLIB" (590/10) record.
0          Referenced by comments of: 678/1, 678/4 
00678/004   SNOSTORM                 MAIN PROGRAM    SA  G          S1559 5.0T2 VLO FSNAME=SNOSTORM.MAIN_PROGRAM.SA.004(1)      1228
            5.0T2  1228  SNOSTORM.MAIN_PROGRAM.SA.004       1 LINE     73    3 PAGE UM   SWARTZ              APR. 05, 1980  20:32:32
            5.0T6   250                       
0          THIS IS A SMALL MAIN PROGRAM WHICH LINKS TO THE SNOSTORM PREPROCESSOR (678/3)
           AND THEN TO *SPITBOL (590).
0          Referenced by comments of: 678/5 
00678/005   SNOSTORM                 *SNOSTORM       OE  G          *SNOSTORM                                                       
            5.0T2  1229  SNOSTORM.*SNOSTORM.OE.005          1 LINE   1221    1 PAGE UM   SWARTZ              JULY 03, 1981  17:32:42
            5.0T6   251  *SNOSTORM            
0          THE OBJECT OF (678/4).
00678/006A  SNOSTORM                 TEST PGM        S*  O          W008:SNO.T                                                      
            5.1T1   976  SNOSTORM.TEST_PGM.S?.006           1 LINE     74    3 PAGE UM   SWARTZ              JULY 23, 1983  12:32:27
00679/001A  INTRO GUIDE: INTRO TO CC                 WF             W599:INTRCC.SOU83                                               
            5.1T2     1  INTRO_GUIDE:_INTRO_TO_CC..WF.001   1 LINE    206   81 PAGE UM   MANUAL              JULY 23, 1983  12:53:42
0          FORMAT SOURCE FOR "INTRODUCTION TO COMPUTING CENTER SERVICES," SEPTEMBER 1983.
1                                                                                               SUN SEP 08/96   15:24:55   Page  453
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00679/002A  INTRO GUIDE: INTRO TO CC                 PF             W599:INTRCC.OUT83                                               
            5.1T2     2  INTRO_GUIDE:_INTRO_TO_CC..PF.002   1 LINE     80  103 PAGE UM   MANUAL              JULY 23, 1983  12:53:47
0          FORMAT PRINT FILE.
00680/001A *CKID                                     SA  G          MTS:CKID.S                                                      
            5.1T2     3  CKID..SA.001                       1 LINE     77    9 PAGE UBC  HOGG      MTA       JULY 23, 1983  12:53:51
0          PROGRAM TO PROVIDE ADDITONAL SIGNON SECURITY FOR ACCOUNTS WHICH ARE SHARED BY
           SEVERAL USERS WITHOUT REQUIRING THAT THE PASSWORD FOR THE SHARED ACCOUNT BE
           CHANGED REGULARLY.  COPIES *GDINFODSECT (594).  REQUIRES COPY:MTS.MACROS (344/3).
           USES THE MTS GETACCRE ROUTINE IN USUB (638) TO READ THE ACCOUNTING FILE.
            
           *************************************************************************
           D5.0B version:
            
           Now has mixed case input in the access file.
           *************************************************************************
0          Referenced by comments of: 814/1 
00680/002A *CKID                                     OE  G          *CKID                                                           
            5.1T2     4  CKID..OE.002                       1 LINE   2457    4 PAGE UBC  HOGG      MTA       JULY 23, 1983  12:53:51
                         *CKID                
0          CONTAINS PRIVATE COPIES OF TIME SUBROUTINE SO THAT THIS PROGRAM CAN BE 
           RUN BEFORE THE POST-IPL SYSTEM IS LOADED SINCE IT USED AT UM FOR THE CCIDS 
           INIT, SYS, STRT, RSTR, ...
00681/001   AUDIO RESP SYS - VOTRAX  INSTALLATION    PT             S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.I.PT.001(1)     5
            5.0T3     5  AUDIO_RESP_SYS_-_VOTRAX.I.PT.001   1 LINE    100    7 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:36
            5.0T6   257                       
0          INSTRUCTIONS FOR THE INSTALLATION OF THE VOTRAX AUDIO RESPONSE SYSTEM
           WHICH USES THE VOTRAX VS-6 SPEECH SYNTHESIZER AND "TOUCH-TONE" TELEPHONE
           COMMUNICATION TO PROVIDE MTS INTERACTIVE FACILITIES IN CONJUNCTION WITH
           THE DATA CONCENTRATOR DEVICE SUPPORT ROUTINES PDP8RTN (116).  COPY TO A
           TN PRINTER @MCC.
0          Referenced by comments of: 116/1 
00681/002   AUDIO RESP SYS - VOTRAX  VTRX            SA  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.V.SA.002(1)     6
            5.0T3     6  AUDIO_RESP_SYS_-_VOTRAX.V.SA.002   1 LINE     81   36 PAGE UM   FRONCZAK            APR. 05, 1980  20:32:46
            5.0T6   258                       
0          SUBROUTINES VTRXINIT, VTRXIN, VTRXOUT, VTRXCTRL, AND VTRXCLOS WHICH ARE
           CALLED BY PDP8RTN (116) TO PROCESS VOTRAX I/O AND CONTROL COMMANDS.
           THESE ROUTINES CALL CVTPB (681/3) AND DICTINIT, DICTADD, AND DICTLOOK
           (681/4) AS WELL AS REFERENCING THE VOTRAX VOCABULARY (681/10).
            
           Object part of *PDP8RTN (116/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  454
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00681/003   AUDIO RESP SYS - VOTRAX  CVTPB           SA  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.C.SA.004(1)     7
            5.0T3     7  AUDIO_RESP_SYS_-_VOTRAX.C.SA.004   1 LINE     71    3 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:47
            5.0T6   259                       
0          SYMBOLIC-TO-BINARY PHONEME CODE CONVERSION ROUTINE.
            
           Object part of *PDP8RTN (116/2).
0          Referenced by comments of: 681/2, 681/5 
00681/004   AUDIO RESP SYS - VOTRAX  DICT            SA  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.D.SA.006(1)     8
            5.0T3     8  AUDIO_RESP_SYS_-_VOTRAX.D.SA.006   1 LINE     81   10 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:48
            5.0T6   260                       
0          MORPH DIRECTORY MANIPULATION ROUTINES.
            
           Object part of *PDP8RTN (116/2).
0          Referenced by comments of: 681/2, 681/5 
00681/005   AUDIO RESP SYS - VOTRAX  RVGN            SA  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.SA.008(1)     9
            5.0T3     9  AUDIO_RESP_SYS_-_VOTRAX.R.SA.008   1 LINE     67    9 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:53
            5.0T6   261                       
0          PROGRAM TO READ A SYMBOLIC VOCABULARY FILE, E.G. *ARUVOC (681/10), AND
           GENERATE ASSEMBLER INPUT WHICH, WHEN ASSEMBLED, PRODUCES AN OBJECT DECK FOR
           THE TREE STRUCTURE VOCABULARY. THIS PROGRAM CALLS CVTPB (681/3), DICT
           (681/4), RVST (681/7) AND REQUIRES *PLOTSYS (615/9).
0          Referenced by comments of: 681/9, 681/10 
00681/006   AUDIO RESP SYS - VOTRAX  RVGN            OC  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.OC.009(1)    10
            5.0T3    10  AUDIO_RESP_SYS_-_VOTRAX.R.OC.009   1 LINE     80    3 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:54
            5.0T6   262                       
00681/007   AUDIO RESP SYS - VOTRAX  RVST            SF  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.SF.010(1)    11
            5.0T3    11  AUDIO_RESP_SYS_-_VOTRAX.R.SF.010   1 LINE     71    4 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:55
            5.0T6   263                       
0          SUBROUTINES TO COMPUTE, PRINT, AND PLOT VOCABULARY STATISTICS.
0          Referenced by comments of: 681/5 
00681/008   AUDIO RESP SYS - VOTRAX  RVST            OC  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.OC.011(1)    12
            5.0T3    12  AUDIO_RESP_SYS_-_VOTRAX.R.OC.011   1 LINE    248    5 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:56
            5.0T6   264                       
00681/009   AUDIO RESP SYS - VOTRAX  TREEDEF         SA  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.T.SA.012(1)    13
            5.0T3    13  AUDIO_RESP_SYS_-_VOTRAX.T.SA.012   1 LINE     65    2 PAGE UM   FRONCZAK            SEP. 18, 1977  22:09:57
            5.0T6   265                       
0          THE OUTPUT (WHICH IS ASSEMBLER SOURCE) FROM RVGN (681/5) STARTS WITH A COPY
           PSEUDO-OP FOR "W070:VTREEDEF" WHICH COPIES THE INITIAL PART OF THE SOURCE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  455
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00681/010   AUDIO RESP SYS - VOTRAX  VOCABULARY      D              *ARUVOC                                                         
            5.0T3    14  AUDIO_RESP_SYS_-_VOTRAX.V.D.013    1 LINE     95   31 PAGE UM   FRONCZAK            JULY 03, 1981  17:51:57
            5.0T6   266  *ARUVOC              
0          MORPH SYMBOLIC DIRECTORY FOR STANDARD VOTRAX VOCABULARY WHICH, WHEN RUN
           THROUGH RVGN (681/5), PRODUCES THE ASSEMBLER INPUT FOR THE VOCABULARY WHICH,
           WHEN ASSEMBLED, YIELDS THE SHARED VM VOCABULARY OBJECT WHICH IS PART OF
           *PDP8RTN (116/2).
0          Referenced by comments of: 681/2, 681/5 
00681/011   AUDIO RESP SYS - VOTRAX  VOCAB EDITOR    SF  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.V.SF.015(1)    15
            5.0T3    15  AUDIO_RESP_SYS_-_VOTRAX.V.SF.015   1 LINE     70    2 PAGE UM   FRONCZAK            SEP. 18, 1977  22:10:01
            5.0T6   267                       
0          VOTRAX VOCABULARY LINE FILE EDITOR WITH AURAL VERIFICATION.  SEE THE SOURCE
           FOR USAGE DIRECTIONS.
00681/012   AUDIO RESP SYS - VOTRAX  VOCAB EDITOR    OC  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.V.OC.016(1)    16
            5.0T3    16  AUDIO_RESP_SYS_-_VOTRAX.V.OC.016   1 LINE    254    3 PAGE UM   FRONCZAK            SEP. 18, 1977  22:10:02
            5.0T6   268                       
0          CONTAINS A "$CONTINUE WITH VOTRX.CVT.O" RECORD. TO USE, EXTRACT THE CSECT
           CVTPB FROM *PDP8RTN (116/2) AND PLACE IT IN A FILE BY THE NAME "VOTRX.CVT.O".
00681/013   AUDIO RESP SYS - VOTRAX  TALK            SF  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.T.SF.017(1)    17
            5.0T3    17  AUDIO_RESP_SYS_-_VOTRAX.T.SF.017   1 LINE     64    1 PAGE UM   FRONCZAK            SEP. 18, 1977  22:10:03
            5.0T6   269                       
0          SYMBOLIC-TO-BINARY PHONEME CODE CONVERSION PROGRAM WITH AURAL VERIFICATION.
           SEE THE SOURCE FOR USAGE DIRECTIONS.
00681/014   AUDIO RESP SYS - VOTRAX  TALK            OC  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.T.OC.018(1)    18
            5.0T3    18  AUDIO_RESP_SYS_-_VOTRAX.T.OC.018   1 SEQ     340    1 PAGE UM   FRONCZAK            SEP. 18, 1977  22:10:04
            5.0T6   270                       
0          CONTAINS A "$CONTINUE WITH VOTRX.CVT.O" RECORD. TO USE, EXTRACT THE CSECT
           CVTPB FROM *PDP8RTN (116/2) AND PLACE IT IN A FILE BY THE NAME "VOTRX.CVT.O".
00681/015   AUDIO RESP SYS - VOTRAX  DSR TEST        SA  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.D.SA.019(1)    19
            5.0T3    19  AUDIO_RESP_SYS_-_VOTRAX.D.SA.019   1 LINE     72    8 PAGE UM   FRONCZAK            APR. 02, 1979  00:45:49
            5.0T6   271                       
0          PROGRAM TO INDEPENDENTLY TEST THE VOTRAX ROUTINES WHICH ARE CALLED BY PDP8RTN (116).
           SEE THE SOURCE FOR USAGE DIRECTIONS.
00681/016   AUDIO RESP SYS - VOTRAX  DSR TEST        OC  G          S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.D.OC.020(1)    20
            5.0T3    20  AUDIO_RESP_SYS_-_VOTRAX.D.OC.020   1 LINE     80    3 PAGE UM   FRONCZAK            APR. 02, 1979  00:45:50
            5.0T6   272                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  456
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00681/017   AUDIO RESP SYS - VOTRAX  *ARUDEF         D              *ARUDEF                                                         
            5.0T3    21  AUDIO_RESP_SYS_-_VOTRAX.*.D.021    1 LINE     10    1 PAGE UM   FRONCZAK            JULY 03, 1981  17:52:05
            5.0T6   273  *ARUDEF              
0          PUBLIC TEXT DEFINITION FILE FOR TEXT INSERTION MODE.
00682/001A  FILE SYSTEM RECOVERY     DOCUMENTATION   WF             FILE:UBC.DISK.W                                                 
            5.1T2     5  FILE_SYSTEM_RECOVERY.DOCU.WF.001   1 LINE     92    7 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:52
                         FILE:UBC.DISK.W      
0          THIS COMPONENT CONTAINS A COLLECTION OF REFERENCE INFORMATION AND PROGRAM
           DESCRIPTIONS WHICH CAN BE USED TO RECOVER FROM HARDWARE AND SOFTWARE DISK DISASTERS.
            
           (682/1) IS A WRITEUP DESCRIBING THE USAGE OF THE SEVERAL PROGRAMS AND A DESCRIPTION
           OF THE DISK ORGANIZATION.  THE FORMAT INCLUDE FUNCTION IS USED TO REFERENCE THE
           VARIOUS PIECES OF THIS WRITEUP (682/2) THROUGH (682/17), (724/4), AND (546/3).
0          Referenced by comments of: 482/54, 546/3, 682/1 
00682/002   FILE SYSTEM RECOVERY     CCATL DESC      WF             FILE:CCATL.W                                                    
            5.0T3    23  FILE_SYSTEM_RECOVERY.CCAT.WF.002   1 LINE     93    2 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:07
            5.0T6   275  FILE:CCATL.W         
0          WRITEUP DESCRIBING THE CCATL PROGRAM (442).
0          Referenced by comments of: 442/1, 682/1 
00682/003   FILE SYSTEM RECOVERY     PM DESC         WF             FILE:PM.W                                                       
            5.0T3    24  FILE_SYSTEM_RECOVERY.PM_D.WF.003   1 LINE     62    2 PAGE UBC  O'REILLY  HELFFRICH JULY 03, 1981  17:52:08
            5.0T6   276  FILE:PM.W            
0          WRITEUP DESCRIBING THE PACK MAP PROGRAM (1030).
0          Referenced by comments of: 1030/1 
00682/004   FILE SYSTEM RECOVERY     DSKMAN DESC     WF             FILE:DSKMAN.W                                                   
            5.0T3    25  FILE_SYSTEM_RECOVERY.DSKM.WF.004   1 LINE     73    1 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:09
            5.0T6   277  FILE:DSKMAN.W        
0          WRITEUP DESCRIBING THE DSKMAN (*DSK) PROGRAM (073).
0          Referenced by comments of: 73/3 
00682/005   FILE SYSTEM RECOVERY     DASDI DESC      WF             FILE:DASDI.W                                                    
            5.0T3    26  FILE_SYSTEM_RECOVERY.DASD.WF.005   1 LINE     80    2 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:10
            5.0T6   278  FILE:DASDI.W         
0          WRITEUP DESCRIBING THE 3330 DASDI PROGRAM (598).
00682/006   FILE SYSTEM RECOVERY     CHONID DESC     WF             FILE:CHONID.W                                                   
            5.0T3    27  FILE_SYSTEM_RECOVERY.CHON.WF.006   1 LINE     76    1 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:10
            5.0T6   279  FILE:CHONID.W        
0          WRITEUP DESCRIBING THE CHONID PROGRAM (599).
1                                                                                               SUN SEP 08/96   15:24:55   Page  457
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 599/1 
00682/007A  FILE SYSTEM RECOVERY     FM DESC         WF             FILE:FM.W                                                       
            5.1T2     6  FILE_SYSTEM_RECOVERY.FM_D.WF.007   1 LINE     70    2 PAGE UBC  HOGG      HELFFRICH JULY 23, 1983  12:53:52
                         FILE:FM.W            
0          WRITEUP DESCRIBING THE FILE MOVE PROGRAM (1020).
0          Referenced by comments of: 1020/1 
00682/008A  FILE SYSTEM RECOVERY     CHKVTOC DESC    WF             FILE:CHKVTOC.W                                                  
            5.1T2     7  FILE_SYSTEM_RECOVERY.CHKV.WF.008   1 LINE     73    1 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:52
                         FILE:CHKVTOC.W       
0          WRITEUP DESCRIBING THE CHKVTOC PROGRAM (682/21).
0          Referenced by comments of: 682/21 
00682/009   FILE SYSTEM RECOVERY     TABLMOD DESC    WF             FILE:TABLMOD.W                                                  
            5.0T3    30  FILE_SYSTEM_RECOVERY.TABL.WF.009   1 LINE     76    1 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:12
            5.0T6   282  FILE:TABLMOD.W       
0          WRITEUP DESCRIBING THE TABLMOD PROGRAM (554).
0          Referenced by comments of: 554/1 
00682/010   FILE SYSTEM RECOVERY     VNTD DESC       WF             FILE:VNTD.W                                                     
            5.0T3    31  FILE_SYSTEM_RECOVERY.VNTD.WF.010   1 LINE     71    1 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:13
            5.0T6   283  FILE:VNTD.W          
0          WRITEUP DESCRIBING THE VNTD PROGRAM (682/18).
0          Referenced by comments of: 682/18 
00682/011A  FILE SYSTEM RECOVERY     FSTEST DESC     WF             FILE:FSTEST.W                                                   
            5.1T2     8  FILE_SYSTEM_RECOVERY.FSTE.WF.011   1 LINE    101    4 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:52
                         FILE:FSTEST.W        
0          WRITEUP DESCRIBING THE FSTEST PROGRAM (482/41).
00682/012A  FILE SYSTEM RECOVERY     VAMREC DESC     WF             FILE:VAMREC.WRUP                                                
            5.1T2     9  FILE_SYSTEM_RECOVERY.VAMR.WF.012   1 LINE    104    5 PAGE SFU  BENET     HELFFRICH JULY 23, 1983  12:53:53
                         FILE:VAMREC.WRUP     
0          WRITEUP DESCRIBING THE VAMREC PROGRAM (682/24).
0          Referenced by comments of: 682/24 
00682/013A  FILE SYSTEM RECOVERY     RECOVERING      WF             FILE:RECOVERING                                                 
            5.1T2    10  FILE_SYSTEM_RECOVERY.RECO.WF.013   1 LINE    182    7 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:53
                         FILE:RECOVERING      
0          DESCRIPTION OF PROCEDURES SUGGESTED FOR RECOVERING FROM DISK DISASTERS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  458
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 682/46 
00682/014   FILE SYSTEM RECOVERY     LINE FILE DESC  WF             FILE:DOC.DESC.LNE                                               
            5.0T3    35  FILE_SYSTEM_RECOVERY.LINE.WF.014   1 LINE    136    4 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:19
            5.0T6   287  FILE:DOC.DESC.LNE    
0          DESCRIPTION OF MTS LINE FILE ORGANIZATION.
00682/015   FILE SYSTEM RECOVERY     SEQ FILE DESC   WF             FILE:DOC.DESC.SEQ                                               
            5.0T3    36  FILE_SYSTEM_RECOVERY.SEQ.WF.015    1 LINE    130    4 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:19
            5.0T6   288  FILE:DOC.DESC.SEQ    
0          DESCRIPTION OF MTS SEQ FILE ORGANIZATION.
00682/016   FILE SYSTEM RECOVERY     CAT DESC        WF             FILE:DOC.DESC.CAT                                               
            5.0T3    37  FILE_SYSTEM_RECOVERY.CAT.WF.016    1 LINE    190    7 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:20
            5.0T6   289  FILE:DOC.DESC.CAT    
0          DESCRIPTION OF MTS FILE CATALOG ORGANIZATION.
00682/017   FILE SYSTEM RECOVERY     TAB DESC        WF             FILE:DOC.DESC.TAB                                               
            5.0T3    38  FILE_SYSTEM_RECOVERY.TAB.WF.017    1 LINE    131    5 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:22
            5.0T6   290  FILE:DOC.DESC.TAB    
0          DESCRIPTION OF MTS SHARED FILE TABLE ORGANIZATION.
0          Referenced by comments of: 682/1 
00682/018   FILE SYSTEM RECOVERY     VNTD            SA  G          S1560 5.0T3 VLO FSNAME=FILE_SYSTEM_RECOVERY.VNTD.SA.018(1)    39
            5.0T3    39  FILE_SYSTEM_RECOVERY.VNTD.SA.018   1 LINE     80   23 PAGE UM   HELFFRICH           AUG. 06, 1981  05:16:40
            5.0T6   291                       
0          PROGRAM TO VERIFY, TRACE, AND/OR DUMP THE FILE SYSTEM CATALOG. IT WILL
           VERIFY, TRACE, AND/OR DUMP THE ENTIRE CATALOG, A PARTICULAR USER CATALOG, OR
           A PARTICULAR USER FILE. SEE COMP (682/10) FOR A WRITEUP. ASSEMBLE USING
           *SYSMAC AND COPY:FILE.MACROS (482/45). COPIES *GDINFODSECT (594).
0          Referenced by comments of: 451/1, 682/10, 682/19, 682/28, 682/30 
00682/019C  FILE SYSTEM RECOVERY     VNTD            UC  G          FILE:VNTD(1000)                                                 
            5.1T2    11  FILE_SYSTEM_RECOVERY.VNTD.UC.019   1 LINE     68    2 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:53
0          Update deck, applied to (682/18), to yield current source.
00682/020A  FILE SYSTEM RECOVERY     VNTD            OC  G          FILE:VNTD(1,998)                                                
            5.1T2    12  FILE_SYSTEM_RECOVERY.VNTD.OC.020   1 LINE     80   10 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:54
                         FILE:VNTD            
00682/021   FILE SYSTEM RECOVERY     CHKVTOC         SA  G          FILE:CHKVTOC(*F,-1)                                             
            5.0T3    41  FILE_SYSTEM_RECOVERY.CHKV.SA.020   1 LINE     72   16 PAGE UM   HELFFRICH           JULY 03, 1981  17:52:30
            5.0T6   293                       
0          Program to check consistency of page assignment table (PAT) with type E's and type F's for
           a particular volume.  Requires symbols in SYSDEFS.  Assemble using COPY:FILE.MACROS (482/45)
1                                                                                               SUN SEP 08/96   15:24:55   Page  459
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          and *SYSMAC.  Calls VTOCREAD subroutine (067/11).  See Comp. (682/8) for a writeup.
0          Referenced by comments of: 597/1, 682/8, 682/22, 682/48 
00682/022C  FILE SYSTEM RECOVERY     CHKVTOC         UC  G          FILE:CHKVTOC(1000)                                              
            5.1T2    13  FILE_SYSTEM_RECOVERY.CHKV.UC.022   1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:55
0          Update deck, applied to (682/21), to yield current source.
00682/023A  FILE SYSTEM RECOVERY     CHKVTOC         OC  G          FILE:CHKVTOC(1,999)                                             
            5.1T2    14  FILE_SYSTEM_RECOVERY.CHKV.OC.023   1 LINE     80    8 PAGE UM   HELFFRICH           JULY 23, 1983  12:53:55
                         FILE:CHKVTOC         
0          CONTAINS A "$CONTINUE WITH RSTR:VTOCREAD+COPY:SYSDEFS" LINE.
0          Referenced by comments of: 597/1 
00682/024A  FILE SYSTEM RECOVERY     VAMREC          SA  G          FILE:VAMREC(1000)                                               
            5.1T2    15  FILE_SYSTEM_RECOVERY.VAMR.SA.024   1 LINE     74   66 PAGE SFU  BENET     HELFFRICH JULY 23, 1983  12:53:56
0          THE VAMREC DISK UTILITY.  COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087).
           ASSEMBLE WITH COPY:FILE.MACROS (482/45), OLD:CC.MACROS (1054/4), COPY:UC.MACROS
           (787/1), AND COPY:MISC.MACROS (728).  SEE COMPONENT (682/12) FOR A WRITEUP.
            
           *********************************************************************************
           D5.0 CHANGES:
            
           This version is considerably changed from D4.0 and has been recoded
           according to coding convention standards.
           *********************************************************************************
            
           **************************************************************************
           D5.0B version:
            
           Fixed bugs in DASDI and FORMAT commands, and added ERRORCHECK HEAD command.
           **************************************************************************
0          Referenced by comments of: 682/12, 3030/1 
00682/025A  FILE SYSTEM RECOVERY     VAMREC          OC  G          FILE:VAMREC(1,999)                                              
            5.1T2    16  FILE_SYSTEM_RECOVERY.VAMR.OC.025   1 LINE  22484   26 PAGE SFU  BENET     HELFFRICH JULY 23, 1983  12:54:01
                         FILE:VAMREC          
0          HAS $CONTINUE WITH COPY:DEFS (579/10) RECORD.
0          Referenced by comments of: 3030/1 
00682/026A  FILE SYSTEM RECOVERY     FIXEH           SA  G          FILE:FIXEH(1000)                                                
            5.1T2    17  FILE_SYSTEM_RECOVERY.FIXE.SA.026   1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:02
0          PROGRAM TO FIX EXTENT HEADERS IN THE CATALOG BY CLEARING THE IN-USE BITS FOR
           ALL SEGMENTS IN A RECORD OF THE CATALOG WHICH IS ALL ZERO.  IT WILL ALSO CHECK
           THAT THE RECORD HEADER OF ANY NON-ZERO RECORD (WITH A SEGMENT FLAGGED AS BEING
           IN-USE) IS CORRECT.  ASSEMBLE USING COPY:FILE.MACROS (482/45).
1                                                                                               SUN SEP 08/96   15:24:55   Page  460
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00682/027A  FILE SYSTEM RECOVERY     FIXEH           OC  G          FILE:FIXEH(1,999)                                               
            5.1T2    18  FILE_SYSTEM_RECOVERY.FIXE.OC.027   1 LINE     80    2 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:02
                         FILE:FIXEH           
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00682/028A  FILE SYSTEM RECOVERY     FIXCAT          SA  G          FILE:FIXCAT(1000)                                               
            5.1T2    19  FILE_SYSTEM_RECOVERY.FIXC.SA.028   1 LINE     72    8 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:02
0          Program to rechain catalog segments back together and add or remove master index
           entries as required.  It takes as input, the output from VNTD (682/18) and produces
           as output a list of userids whose catalogs were affected.  This output is then used
           for input to AMALGAMATE (682/39).  Assemble using COPY:FILE.MACROS (482/45).
00682/029A  FILE SYSTEM RECOVERY     FIXCAT          OC  G          FILE:FIXCAT(1,999)                                              
            5.1T2    20  FILE_SYSTEM_RECOVERY.FIXC.OC.029   1 LINE     80    5 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:03
                         FILE:FIXCAT          
00682/030A  FILE SYSTEM RECOVERY     FIXSD           SA  G          FILE:FIXSD(1000)                                                
            5.1T2    21  FILE_SYSTEM_RECOVERY.FIXS.SA.030   1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:04
0          PROGRAM TO FIX SHARING DESCRIPTORS BY ZEROING ANY SD WHICH IS NOT POINTED TO BY
           A FD OR SD.  IT ALSO WILL ZERO THE PREVIOUS POINTER IN THE FD OR SD FOR ANY LOST SD.
           IT TAKES AS INPUT THE OUTPUT FROM VNTD (682/18) AND PROVIDES AS OUTPUT A LIST OF
           FILES WHICH LOST SHARING INFORMATION.  THIS OUTPUT IS THEN USED FOR INPUT TO
           AMALGAMATE (682/39).  ASSEMBLE USING COPY:FILE.MACROS (482/45).
00682/031A  FILE SYSTEM RECOVERY     FIXSD           OC  G          FILE:FIXSD(1,999)                                               
            5.1T2    22  FILE_SYSTEM_RECOVERY.FIXS.OC.031   1 LINE     80    3 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:04
                         FILE:FIXSD           
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00682/032A  FILE SYSTEM RECOVERY     RECATALOG       SA  G  RCAT    FILE:RECATALOG(1000)                                            
            5.1T2    23  FILE_SYSTEM_RECOVERY.RECA.SA.032   1 LINE     80    4 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:04
0          SUBROUTINE TO RECATALOG A FILE FROM SCRATCH.  IT TAKES AS INPUT, A FILENAME AND
           DSCB ADDRESS.  IT ALSO DETERMINES THE FILE TYPE AND SETS IT ACCORDINGLY.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
00682/033A  FILE SYSTEM RECOVERY     RECATALOG       OC  G          FILE:RECATALOG(1,999)                                           
            5.1T2    24  FILE_SYSTEM_RECOVERY.RECA.OC.033   1 LINE     80    1 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:05
                         FILE:RECATALOG       
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00682/034A  FILE SYSTEM RECOVERY     CALLDR          SA  G          FILE:CALLDR(1000)                                               
            5.1T2    25  FILE_SYSTEM_RECOVERY.CALL.SA.034   1 LINE     69    1 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:05
0          PROGRAM WHICH CALLS DESTRYR TO DESTROY FILES.  SEE THE SOURCE FOR USAGE DETAILS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  461
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00682/035A  FILE SYSTEM RECOVERY     CALLDR          OC  G          FILE:CALLDR(1,999)                                              
            5.1T2    26  FILE_SYSTEM_RECOVERY.CALL.OC.035   1 LINE     80    1 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:05
                         FILE:CALLDR          
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00682/036   FILE SYSTEM RECOVERY     FILES           SA  G          FILE:STARFILES(1,999)                                           
            5.0T3    55  FILE_SYSTEM_RECOVERY.FILE.SA.034   1 LINE     74    4 PAGE UM   HELFFRICH           JULY 03, 1981  17:54:00
            5.0T6   307                       
0          PROGRAM TO PRINT WHICH USERS FILES HAVE BEEN AFFECTED AND HOW BY A DISK CRASH.
           IT TAKES AS INPUT A DESCRIPTION OF THE DISASTER AND OTHER DATA IN FILE:FILELIST.
           SEE THE SOURCE FOR DETAILS ON THE FORMAT OF THIS FILE.  THE OUTPUT FROM
           AMALGAMATE (682/39) IS BASICALLY WHAT IS USED TO GENERATE THIS DATA FILE WITH
           THE HELP OF *MVC, *COMBINE, THE EDITOR, ETC.
00682/037   FILE SYSTEM RECOVERY     FILES           OC  G          FILE:STARFILES(1000)                                            
            5.0T3    56  FILE_SYSTEM_RECOVERY.FILE.OC.035   1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  17:54:01
            5.0T6   308  FILE:STARFILES       
0          PUT THIS IN *FILES AFTER A DISK CRASH.
00682/038   FILE SYSTEM RECOVERY     FILE UPDATE     OC  G          FILE:FILEUPD                                                    
            5.0T3    57  FILE_SYSTEM_RECOVERY.FILE.OC.036   1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  17:54:02
            5.0T6   309  FILE:FILEUPD         
0          OBJECT FOR ACCRDWRT (104/40), ACCUPDAT (104/31), AND A DUMMY PRINT ROUTINE,
           PLUS $CONTINUE WITHS FOR ACATALOG (104/134), ACATSUB (104/135), VTOCREAD (067/11),
           TEST DSACC (482/39), ACCLIB (104/47), AND SYSDEFS (579), WHICH WHEN RUN WITH 
           UNIT ZERO ASSIGNED TO *DUMMY* AND UNIT ONE ASSIGNED TO AN EMPTY FILE WILL
           UPDATE THE FILE SPACE FIELDS IN THE ACCOUNTING RECORDS FOR ALL USERS (QUICKLY).
            
           CONTAINS REP CARD TO INCREASE SPEED BY KEEPING ACCOUNTING FILES LOCKED MORE.
00682/039A  FILE SYSTEM RECOVERY     AMALGAMATE      SA  G          FILE:AMALGAMATE(1000)                                           
            5.1T2    27  FILE_SYSTEM_RECOVERY.AMAL.SA.039   1 LINE     72    6 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:05
0          PROGRAM TO TAKE A LIST OF FILES AND USE "FILEDIR.MAS" TO APPEND TAPE LOCATION
           INFORMATION FOR USE BY FASTRESTORE (671/1).  ALSO COMPARES "FILEDIR.MAS" WITH
           FILE SYSTEM CATALOG TO LOCATE FILES WHOSE DATA IS LOST (NOT ON ANY RESTORE
           TAPES) AND WHOSE SHARING INFORMATION HAS BEEN DAMAGED (ALSO NOT ON ANY RESTORE
           TAPES). CALLS CHKFILE (682/41).  COPIES *CNFGINFODSECT (654). ASSEMBLE WITH THE
           FILE SAVE MACROS (067/35).  NOTE: THE DIRECTORY FILES RSTR:FILEDIR.MAS,
           RSTR:FILEDIR.NEW, AND RSTR:TAPEDIR MUST BE PERMITTED WITH READ ACCESS TO
           FILE&PKEY=DISTASTER.
            
           *********************************************************************
           D5.1 version:
            
           Fixed bug caused by change in user segment assignments.
           **********************************************************************
0          Referenced by comments of: 682/28, 682/30, 682/36, 682/41, 682/46 
1                                                                                               SUN SEP 08/96   15:24:55   Page  462
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00682/040A  FILE SYSTEM RECOVERY     AMALGAMATE      OC  G          FILE:AMALGAMATE(1,999)                                          
            5.1T2    28  FILE_SYSTEM_RECOVERY.AMAL.OC.040   1 LINE     80    4 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:06
                         FILE:AMALGAMATE      
0          HAS A "$CONTINUE WITH MTS:UBCDATEX+FILE:CHKFILE RETURN" LINE.
           THE PKEY OF THIS FILE SHOULD BE "DISASTER".
0          Referenced by comments of: 671/1 
00682/041   FILE SYSTEM RECOVERY     CHKFILE SUBR    SA  G          FILE:CHKFILE(1000)                                              
            5.0T3    60  FILE_SYSTEM_RECOVERY.CHKF.SA.039   1 LINE     71    4 PAGE UM   HELFFRICH           JULY 03, 1981  17:54:06
            5.0T6   312                       
0          ALTERNATE VERSION OF SYSTEM CHKFILE ROUTINE FOR USE BY MERGE (067/27) AND AMALGAMATE
           (682/39).  COPIES *CNFGINFODSECT (654).  ASSEMBLE USING COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 67/27, 682/39 
00682/042   FILE SYSTEM RECOVERY     CHKFILE SUBR    OC  G          FILE:CHKFILE(1,999)                                             
            5.0T3    61  FILE_SYSTEM_RECOVERY.CHKF.OC.040   1 LINE     80    3 PAGE UM   HELFFRICH           JULY 03, 1981  17:54:07
            5.0T6   313  FILE:CHKFILE         
0          CONTAINS A "$CONTINUE WITH COPY:SYSDEFS" (579/3) RECORD.
00682/043A  FILE SYSTEM RECOVERY     CALLRELDSK      SA  G          FILE:CALLRELDSK(1000)                                           
            5.1T2    29  FILE_SYSTEM_RECOVERY.CALL.SA.043   1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:06
0          PROGRAM TO TAKE ACATSUB OUTPUT AND CALL RELDSK TO DESTROY UNCATALOGED FILES.
           ASSEMBLE WITH COPY:FILE.MACROS (482/45).
00682/044A  FILE SYSTEM RECOVERY     CALLRELDSK      OC  G          FILE:CALLRELDSK(1,999)                                          
            5.1T2    30  FILE_SYSTEM_RECOVERY.CALL.OC.044   1 LINE     80    3 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:07
                         FILE:CALLRELDSK      
00682/045   FILE SYSTEM RECOVERY     VAMREC-CHKVTOC  SS  G          FILE:VAMREC->CHKV                                               
            5.0T3    64  FILE_SYSTEM_RECOVERY.VAMR.SS.043   1 LINE     66    1 PAGE UM   HELFFRICH           JULY 03, 1981  17:54:09
            5.0T6   316  FILE:VAMREC->CHKV    
0          SPITBOL PROGRAM TO TAKE DISK I/O ERROR OUTPUT FROM VAMREC AND GENERATE
           CHKVTOC INPUT.  THIS IS TO ALLOW ONE TO LOCATE FILES WHOSE DATA PAGES
           ARE GIVING DATA CHECKS.
00682/046A  FILE SYSTEM RECOVERY     CATDSCBCOMP     SA  G          FILE:CATDSCBCOMP(1000)                                          
            5.1T2    31  FILE_SYSTEM_RECOVERY.CATD.SA.046   1 LINE     72    9 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:07
0          Program to verify CATALOG/DSCB consistency.  It produces lists to be used
           with AMAlGAMATE (682/39).  See (682/13) for complete instructions. Calls
           VTOCREAD (067/11). Copies COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 104/135 
1                                                                                               SUN SEP 08/96   15:24:55   Page  463
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00682/047A  FILE SYSTEM RECOVERY     CATDSCBCOMP     OC  G          FILE:CATDSCBCOMP(1,999)                                         
            5.1T2    32  FILE_SYSTEM_RECOVERY.CATD.OC.047   1 LINE     80    5 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:08
                         FILE:CATDSCBCOMP     
0          CONTAINS $CONTINUE WITH RSTR/VTOCREAD (067/11) AND COPY:SYSDEFS (579/3)
           RECORDS.
00682/048C  FILE SYSTEM RECOVERY     *CTD            C              *CTD                                                            
            5.1T2    33  FILE_SYSTEM_RECOVERY.?CTD.C.048    1 LINE     64    1 PAGE UM   HELFFRICH           JULY 23, 1983  12:54:08
                         *CTD                 
0          Operator file to run CHKVTOC (682/21) on all the disks with output
           to the operator's console. Invoked by entering "MTS *CTD" from
           the operator's console.
00683/001A  MTS VOLUME 15            MASTER          WT             S1062 MTSV15 'MTS MANUALS' POSN=NEWM3.V15                       
            5.1T2    34  MTS_VOLUME_15.MASTER.WT.001        1 LINE    132  156 PAGE UM   MANUAL              JULY 23, 1983  12:56:44
0          TEXT/360 master for Volume 15 "FORMAT and TEXT360" of the UM MTS manuals,
           April 1977, updated February 1979 and January 1983.
            
           Editor:  Richard A. Salisbury
00683/002A  MTS VOLUME 15            PRINT           PT             S1062 MTSV15 'MTS MANUALS' POSN=PRINT3.V15                      
            5.1T2    35  MTS_VOLUME_15.PRINT.PT.002         1 LINE    132  271 PAGE UM   MANUAL              JULY 23, 1983  12:56:54
0          TEXT/360 print file.  There is also a Xerox 9700 print file
           (which is slightly modified from the TEXT/360 print file),
           available on request.
00683/003   MTS VOLUME 15            INDEX SOURCE    D              S1560 5.0T3 VLO FSNAME=MTS_VOLUME_15.INDEX_SOURC.D.003(1)     69
            5.0T3    69  MTS_VOLUME_15.INDEX_SOURC.D.003    1 SEQ     147    5 PAGE UM   MANUAL              APR. 02, 1979  00:47:16
            5.0T6   321                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 15.
00683/004   MTS VOLUME 15            UPDATE 1        P              S1560 5.0T3 VLO FSNAME=MTS_VOLUME_15.UPDATE_1.PT.004(1)       70
            5.0T3    70  MTS_VOLUME_15.UPDATE_1.PT.004      1 LINE    133   59 PAGE UM   MANUAL              APR. 02, 1979  00:47:17
            5.0T6   322                       
0          THIS IS COMPUTING CENTER MEMO 396 -- "UPDATE 1 TO MTS VOLUME 15," 
           FEBRUARY 1979.  $COPY TO A TN PRINTER USING THE @MCC MODIFIER.
00683/005C  MTS VOLUME 15            UPDATE 2        P              W073:TNLV15.JAN83                                               
            5.1T2    36  MTS_VOLUME_15.UPDATE_2.P.005       1 LINE     79   18 PAGE UM   MANUAL              JULY 23, 1983  12:56:59
0          This is "Update 2 to Volume 15," January 1983.
00684/001   OXFORD                                   SA  G          S1560 5.0T3 VLO FSNAME=OXFORD..SA.001(1)                      71
            5.0T3    71  OXFORD..SA.001                     1 LINE     80   24 PAGE UBC  HOGG      DWB       JULY 28, 1977  23:24:13
            5.0T6   323                       
0          IF THIS DECK IS PRESENT IN THE RESIDENT SYSTEM, MTS WILL PRODUCE "FRED WORDS"
           (FOUR LETTER ENGLISH WORDS) IN THE INTERSTICES OF THE EDGELINE FOR BATCH AND
1                                                                                               SUN SEP 08/96   15:24:55   Page  464
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          *PRINT* OUTPUT DESIGNED TO AID SEPARATION OF PRINTED OUTPUT.  MTS HAS A
           WXTRN FOR OXFORD AND TESTS IT FOR ZERO TO SKIP THE CALL IF NOT PRESENT.
00684/002   OXFORD                                   OC  G          S1560 5.0T3 VLO FSNAME=OXFORD..OC.002(1)                      72
            5.0T3    72  OXFORD..OC.002                     1 LINE     80    3 PAGE UBC  HOGG      DWB       JULY 28, 1977  23:24:15
            5.0T6   324                       
00685/001   UNSUPPORTED SOFTWARE     CATALOG         P              UNSP:CATALOG                                                    
            5.0T3    73  UNSUPPORTED_SOFTWARE.CATA.P.001    1 LINE     68    6 PAGE UM   UNSP                JULY 03, 1981  17:54:35
            5.0T6   325  UNSP:CATALOG         
0          LIST OF UNSP FILES AVAILABLE AT UM.  NOTE:  NOT ALL OF THE ITEMS IN THIS LIST ARE
           INCLUDED IN THE DISTRIBUTION.
00685/002   UNSUPPORTED SOFTWARE     SUBR LIBRARY    OL  O          UNSP:LIBRARY                                                    
            5.0T3    74  UNSUPPORTED_SOFTWARE.SUBR.OL.002   1 LINE   1382    3 PAGE UM   UNSP                AUG. 06, 1981  05:18:10
            5.0T6   326  UNSP:LIBRARY         
0          SUBROUTINE LIBRARY -- ROUTINES INCLUDED SEPARATELY.
0          Referenced by comments of: 108/1, 528/64, 685/7, 688/2, 689/2, 695/2, 765/1, 773/3, 774/3, 783/14, 784/3, 785/2,
                 785/3, 796/2, 796/5, 844/27, 844/28, 1052/2 
00685/003A  UNSUPPORTED SOFTWARE     MACRO LIBRARY   SM  G          UNSP:MACLIB                                                     
            5.1T2    37  UNSUPPORTED_SOFTWARE.MACR.SM.003   1 LINE     72    4 PAGE UM   UNSP      MTA       JULY 23, 1983  12:57:00
                         UNSP:MACLIB          
0          MACRO LIBRARY CONTAINING CLCL, MVCL, AND SEXIT MACROS AMONG OTHERS. THESE
           MACROS ARE DESCRIBED IN THE (685/4) WRITEUP.
0          Referenced by comments of: 590/14, 590/15, 590/16, 590/17, 590/18, 590/19, 590/20, 590/21, 590/26, 685/4 
00685/004   UNSUPPORTED SOFTWARE     MACRO LIBRARY   WF             S1153 UNSP VLO FSNAME=MACLIB.F                                  
            5.0T3    76  UNSUPPORTED_SOFTWARE.MACR.WF.004   1 LINE     72    4 PAGE UM   UNSP      MTA       JAN. 15, 1979  15:28:38
            5.0T6   328                       
0          A WRITEUP DESCRIBING THE MACROS THAT ARE AVAILABLE IN UNSP:MACLIB (685/3).
0          Referenced by comments of: 685/3, 728/1 
00685/005   UNSUPPORTED SOFTWARE     MACRO TEST PGM  SA             S1560 5.0T3 VLO FSNAME=UNSUPPORTED_SOFTWARE.MACR.SA.005(1)    77
            5.0T3    77  UNSUPPORTED_SOFTWARE.MACR.SA.005   1 LINE     72    2 PAGE UM   UNSP      MTA       NOV. 02, 1979  23:04:04
            5.0T6   329                       
0          TEST PROGRAM FOR "MIF" MACROS.  COPIES COPY:GLOBALS (1026/3). ASSEMBLE,
           BUT DON'T RUN IT.
00685/006   UNSUPPORTED SOFTWARE     NEWS            P              UNSP:NEWS                                                       
            5.0T3    78  UNSUPPORTED_SOFTWARE.NEWS.P.006    1 LINE     69   14 PAGE UM   UNSP                JULY 03, 1981  17:56:01
            5.0T6   330                       
0          LIST OF MOST CHANGES MADE TO UNSUPPORTED SOFTWARE AT UM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  465
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00685/007   UNSUPPORTED SOFTWARE     SUBR LIBRARY    P              UNSP:LIBRARY.W                                                  
            5.0T3    79  UNSUPPORTED_SOFTWARE.SUBR.P.007    1 LINE     73    1 PAGE UM   UNSP                JULY 03, 1981  17:56:03
            5.0T6   331                       
0          A WRITEUP FOR UNSP:LIBRARY (685/2).
00686/001A  MICRO CROSS-ASSEMBLER    GENCODE         SA  G          MINI:ASM.GENCODE                                                
            5.1T2    38  MICRO_CROSS-ASSEMBLER.GEN.SA.001   1 LINE     72  148 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:01
0          M6800ASR is a cross-assembler for the Motorola M6800 microprocessor.
           MCS650XASR is a cross-assembler for the MOS Technology MCS6500 family of
           microcomputers. I8080ASR is a cross-assembler for the INTEL 8080
           microprocessor. Z80ASR is a cross-assembler for the Zilog Z80 microprocessor.
           M6809ASR is a cross-assembler for the Motorola 6809 microprocessor. PDP11ASR
           is a cross-assembler for the DEC PDP11 minicomputers (models 5, 10, 20,
           3(LSI), 35, and 40) These were originally written by Clark Lubbers at UM. The
           PDP11ASR and I8080ASR are relocatable assemblers; the others are only
           absolute assemblers.
            
           NOTE: All subcomponents of (686) should be assembled using *ASMH (737),
           OLD:CC.MACROS (1054/4), MINI:ASM.MACRO (686/23), and *SYSMAC with
           PAR=PEXIT=*PEXIT (775).
            
           This subcomponent is the general system- and assembler-independent code.
           Copies (686/22).
            
            
           **************************************************************************
           D5.0B version:
            
           All ASM.xxxMTS modules now use the UNSP SNOOP (695/1) subroutine to log
           micro cross-assembler usage into MINI:GENASMUSELOG (686/33). Inserting
           an NCA SNOOP loader record will cause the logging to be skipped.
           **************************************************************************
0          Referenced by comments of: 516/1, 686/1 
00686/002A  MICRO CROSS-ASSEMBLER    KWIC            SA  G          MINI:ASM.RMKWIC                                                 
            5.1T2    39  MICRO_CROSS-ASSEMBLER.KWI.SA.002   1 LINE     72   13 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:07
0          SYSTEM- AND ASSEMBLER-INDEPENDENT KEYWORD SCANNER ROUTINE.
00686/003A  MICRO CROSS-ASSEMBLER    SYMTAB          SA  G          MINI:ASM.RMSYM                                                  
            5.1T2    40  MICRO_CROSS-ASSEMBLER.SYM.SA.003   1 LINE     81   13 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:08
0          SYSTEM- AND ASSEMBLER-INDEPENDENT SYMBOL TABLE ROUTINES.
0          Referenced by comments of: 848/22, 848/28, 848/147 
00686/004A  MICRO CROSS-ASSEMBLER    SYSCODE         SA  G          MINI:ASM.SYSCODE                                                
            5.1T2    41  MICRO_CROSS-ASSEMBLER.SYS.SA.004   1 LINE     72   26 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:09
0          MTS-DEPENDENT, ASSEMBLER-INDEPENDENT CODE. COPIES (686/22).
1                                                                                               SUN SEP 08/96   15:24:55   Page  466
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00686/005A  MICRO CROSS-ASSEMBLER    MACROP          SA  G          MINI:ASM.MACROP                                                 
            5.1T2    42  MICRO_CROSS-ASSEMBLER.MAC.SA.005   1 LINE     78   66 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:11
0          SYSTEM- AND ASSEMBLER-INDEPENDENT MACRO PROCESSOR.
            
0          Referenced by comments of: 686/41 
00686/006A  MICRO CROSS-ASSEMBLER    EVALEXP         SA  G          MINI:ASM.EVALEXP                                                
            5.1T2    43  MICRO_CROSS-ASSEMBLER.EVA.SA.006   1 LINE     71   29 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:13
0          SYSTEM- AND ASSEMBLER-INDEPENDENT, ARITHMETIC/BOOLEAN, TABLE-DRIVEN EXPRESSION
           SCANNER. 
00686/007A  MICRO CROSS-ASSEMBLER    PROCCONS        SA  G          MINI:ASM.PROCCONS                                               
            5.1T2    44  MICRO_CROSS-ASSEMBLER.PRO.SA.007   1 LINE     71   19 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:15
0          System-independent, assembler-independent table-driven, data-typed 
           constant evaluator.
0          Referenced by comments of: 686/40 
00686/008   MICRO CROSS-ASSEMBLER    BLOCK7          SA  G          MINI:ASM.BLOCK7                                                 
            5.0T3    87  MICRO_CROSS-ASSEMBLER.BLO.SA.008   1 LINE     72    5 PAGE UM   FRONCZAK            JULY 03, 1981  17:56:31
            5.0T6   339                       
0          System-independent, assembler-independent BLOCK LETTER support for the 
           BLOCK pseudo-op.
00686/009   MICRO CROSS-ASSEMBLER    M6800I          SA  G          MINI:ASM.M6800I                                                 
            5.0T3    88  MICRO_CROSS-ASSEMBLER.M68.SA.009   1 LINE     72   24 PAGE UM   FRONCZAK            JULY 03, 1981  17:56:32
            5.0T6   340                       
0          M6800 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
00686/010A  MICRO CROSS-ASSEMBLER    M6800MTS        SA  G          MINI:ASM.M6800MTS                                               
            5.1T2    45  MICRO_CROSS-ASSEMBLER.M68.SA.010   1 LINE     72    4 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:16
0          M6800 MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
            
           **************************************************************************
           D5.1 version:
            
           Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler
           usage into MINI:GENASMUSELOG (686/33). The external reference is via
           WXTRN;  hence, the non-presence of SNOOP will cause logging to be skipped.
           **************************************************************************
00686/011   MICRO CROSS-ASSEMBLER    M650XI          SA  G          MINI:ASM.M650XI                                                 
            5.0T3    90  MICRO_CROSS-ASSEMBLER.M65.SA.011   1 LINE     72   21 PAGE UM   FRONCZAK            JULY 03, 1981  17:56:34
            5.0T6   342                       
0          MCS650X SYSTEM-INDEPENDENT, ASSEMBLER-INDEPENDENT CODE. COPIES (686/22).
1                                                                                               SUN SEP 08/96   15:24:55   Page  467
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00686/012A  MICRO CROSS-ASSEMBLER    M650XMTS        SA  G          MINI:ASM.M650XMTS                                               
            5.1T2    46  MICRO_CROSS-ASSEMBLER.M65.SA.012   1 LINE     72    3 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:16
0          MCS650X MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE.  COPIES (686/22).
            
           **************************************************************************
           D5.1 version:
            
           Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler
           usage into MINI:GENASMUSELOG (686/33). The external reference is via
           WXTRN;  hence, the non-presence of SNOOP will cause logging to be skipped.
           **************************************************************************
00686/013A  MICRO CROSS-ASSEMBLER    I8080I          SA  G          MINI:ASM.I8080I                                                 
            5.1T2    47  MICRO_CROSS-ASSEMBLER.I80.SA.013   1 LINE     72   23 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:16
0          I8080 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
00686/014A  MICRO CROSS-ASSEMBLER    I8080MTS        SA  G          MINI:ASM.I8080MTS                                               
            5.1T2    48  MICRO_CROSS-ASSEMBLER.I80.SA.014   1 LINE     72    3 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:17
0          I8080 MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
            
           **************************************************************************
           D5.1 version:
            
           Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler
           usage into MINI:GENASMUSELOG (686/33). The external reference is via
           WXTRN;  hence, the non-presence of SNOOP will cause logging to be skipped.
           **************************************************************************
00686/015A  MICRO CROSS-ASSEMBLER    Z80I            SA  G          MINI:ASM.Z80I                                                   
            5.1T2    49  MICRO_CROSS-ASSEMBLER.Z80.SA.015   1 LINE     72   28 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:17
0          Z80 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
00686/016A  MICRO CROSS-ASSEMBLER    Z80MTS          SA  G          MINI:ASM.Z80MTS                                                 
            5.1T2    50  MICRO_CROSS-ASSEMBLER.Z80.SA.016   1 LINE     72    3 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:20
0          Z80 MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
            
           **************************************************************************
           D5.1 version:
            
           Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler
           usage into MINI:GENASMUSELOG (686/33). The external reference is via
           WXTRN;  hence, the non-presence of SNOOP will cause logging to be skipped.
           **************************************************************************
00686/017A  MICRO CROSS-ASSEMBLER    M6809I          SA  G          MINI:ASM.M6809I                                                 
            5.1T2    51  MICRO_CROSS-ASSEMBLER.M68.SA.017   1 LINE     72   29 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:21
0          M6809 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
1                                                                                               SUN SEP 08/96   15:24:55   Page  468
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00686/018A  MICRO CROSS-ASSEMBLER    M6809MTS        SA  G          MINI:ASM.M6809MTS                                               
            5.1T2    52  MICRO_CROSS-ASSEMBLER.M68.SA.018   1 LINE     72    3 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:22
0          M6809 MTS-DEPENDENT AND ASSEMBLER-DEPENDENT CODE. COPIES (686/22).
            
           **************************************************************************
           D5.1 version:
            
           Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler
           usage into MINI:GENASMUSELOG (686/33). The external reference is via
           WXTRN;  hence, the non-presence of SNOOP will cause logging to be skipped.
           **************************************************************************
00686/019A  MICRO CROSS-ASSEMBLER    PDP11I          SA  G          MINI:ASM.PDP11I                                                 
            5.1T2    53  MICRO_CROSS-ASSEMBLER.PDP.SA.019   1 LINE     72   37 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:22
0          PDP11 MTS-independent, assembler-dependent code.  Copies (686/22).
00686/020A  MICRO CROSS-ASSEMBLER    PDP11MTS        SA  G          MINI:ASM.PDP11MTS                                               
            5.1T2    54  MICRO_CROSS-ASSEMBLER.PDP.SA.020   1 LINE     72    4 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:24
0          PDP11 MTS-dependent, assembler-dependent code.  Copies (686/22).
            
           **************************************************************************
           D5.1 version:
            
           Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler
           usage into MINI:GENASMUSELOG (686/33). The external reference is via
           WXTRN;  hence, the non-presence of SNOOP will cause logging to be skipped.
           **************************************************************************
00686/021A  MICRO CROSS-ASSEMBLER    MESSAGES        M              ETC:GENASMERR                                                   
            5.1T2    55  MICRO_CROSS-ASSEMBLER.MES.M.021    1 LINE     74    4 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:24
                         ETC:GENASMERR        
0          ERROR MESSAGES.
00686/022A  MICRO CROSS-ASSEMBLER    COPY SECTION    SA  G          MINI:ASM.DSECT                                                  
            5.1T2    56  MICRO_CROSS-ASSEMBLER.COP.SA.022   1 LINE     78   13 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:25
0          Referenced by comments of: 686/1, 686/4, 686/9, 686/10, 686/11, 686/12, 686/13, 686/14, 686/15, 686/16, 686/17,
                 686/18, 686/19, 686/20 
00686/023A  MICRO CROSS-ASSEMBLER    MACRO LIB       SM  G          MINI:ASM.MACRO                                                  
            5.1T2    57  MICRO_CROSS-ASSEMBLER.MAC.SM.023   1 LINE     72    4 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:25
0          Referenced by comments of: 686/1 
00686/024A  MICRO CROSS-ASSEMBLER    I8080 MACS      SM  G          COPY:I8080MACS                                                  
            5.1T2    58  MICRO_CROSS-ASSEMBLER.I80.SM.024   1 LINE     80    8 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:26
0          Default macro library for *I8080ASR (686/29) that has structured programming
           macros.  Use the SETIF macro prior to using the others.
1                                                                                               SUN SEP 08/96   15:24:55   Page  469
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 848/22, 848/28, 848/147 
00686/025A  MICRO CROSS-ASSEMBLER    PDP11 MACS      SM  G          COPY:PDP11MACS                                                  
            5.1T2    59  MICRO_CROSS-ASSEMBLER.PDP.SM.025   1 LINE     80    7 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:26
0          Default macro library for *PDP11ASR (686/32) that has structured programming
           macros.  Use the SETIF macro prior to using the others.
00686/026C  MICRO CROSS-ASSEMBLER    M6809 MACS      SM  G          COPY:M6809MACS                                                  
            5.1T2    60  MICRO_CROSS-ASSEMBLER.M68.SM.026   1 LINE     91    8 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:27
0          Default macro library for *M6809ASR (686/30) that has structured
           programming macros. Use the SETIF macro prior to using the others.
00686/027A  MICRO CROSS-ASSEMBLER    M6800ASR        OE  G          *M6800ASR                                                       
            5.1T2    61  MICRO_CROSS-ASSEMBLER.M68.OE.027   1 LINE  32767   23 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:27
                         *M6800ASR            
0          OBJECT FOR MOTOROLA M6800 MICROPROCESSOR CROSS-ASSEMBLER.
0          Referenced by comments of: 686/34 
00686/028A  MICRO CROSS-ASSEMBLER    MCS650ASR       OE  G          *MCS650XASR                                                     
            5.1T2    62  MICRO_CROSS-ASSEMBLER.MCS.OE.028   1 LINE  32767   22 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:29
                         *MCS650XASR          
0          OBJECT FOR MCS TECHNOLOGY 6500 SERIES MICROCOMPUTERS CROSS-ASSEMBLER.
0          Referenced by comments of: 686/35, 848/1, 848/9 
00686/029A  MICRO CROSS-ASSEMBLER    I8080ASR        OE  G          *I8080ASR                                                       
            5.1T2    63  MICRO_CROSS-ASSEMBLER.I80.OE.029   1 LINE  32767   22 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:29
                         *I8080ASR            
0          Object for INTEL 8080 microcomputer cross-assembler (relocatable).
0          Referenced by comments of: 686/24, 686/36, 756/1, 756/3, 848/143 
00686/030A  MICRO CROSS-ASSEMBLER    Z80ASR          OE  G          *Z80ASR                                                         
            5.1T2    64  MICRO_CROSS-ASSEMBLER.Z80.OE.030   1 LINE  32767   23 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:30
                         *Z80ASR              
0          OBJECT FOR ZILOG Z80 MICROPROCESSOR CROSS-ASSEMBLER.
0          Referenced by comments of: 686/26, 686/37, 848/183, 848/184, 848/185, 848/186, 848/187, 848/188, 848/189, 848/190,
                 848/191, 848/192 
00686/031A  MICRO CROSS-ASSEMBLER    M6809ASR        OE  G          *M6809ASR                                                       
            5.1T2    65  MICRO_CROSS-ASSEMBLER.M68.OE.031   1 LINE  32767   23 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:31
                         *M6809ASR            
0          OBJECT FOR MOTOROLA M6809 MICROCOMPUTER CROSS-ASSEMBLER.
0          Referenced by comments of: 686/38, 860/8, 860/9, 861/1, 861/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  470
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00686/032A  MICRO CROSS-ASSEMBLER    PDP11ASR        OE  G          *PDP11ASR                                                       
            5.1T2    66  MICRO_CROSS-ASSEMBLER.PDP.OE.032   1 LINE  32767   24 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:32
                         *PDP11ASR            
0          Object for DEC PDP11 series minicomputers cross-assemblers (relocatable).
           (686/43) is a writeup explaining the differences between *11ASR (515) and
           *PDP11ASR.
0          Referenced by comments of: 660/1, 686/25, 686/39, 686/43, 715/1, 715/5, 715/7, 715/10, 715/11, 715/12, 715/13,
                 715/14, 715/15, 715/16, 715/17, 715/18, 715/19, 715/20, 715/21, 715/22, 715/23, 715/24, 715/25, 715/26,
                 715/28, 715/29, 715/30, 715/31, 715/32, 715/33, 715/34, 715/35, 715/36, 715/37, 715/38, 715/39, 715/40,
                 715/41, 715/42, 715/46, 715/47, 715/48, 715/49, 715/50, 715/51, 715/52, 715/53, 715/54, 715/55, 715/56,
                 715/57, 715/58, 715/59, 715/60, 860/1, 860/2, 860/3, 860/4, 860/6, 860/7, 861/11, 861/14, 861/16, 861/20 
00686/033C  MICRO CROSS-ASSEMBLER    LOG FILE        D            # MINI:GENASMUSELOG                                               
                                                                                    UM   FRONCZAK                                   
                         MINI:GENASMUSELOG@E  
0          Log file required by the micro cross-assemblers.  If no 
           logging is desired, an NCA SNOOP loader record may be 
           inserted.
0          Referenced by comments of: 686/1, 686/10, 686/12, 686/14, 686/16, 686/18, 686/20 
00686/034   MICRO CROSS-ASSEMBLER    M6800TEST       S   G          MINI:M6801ASRTEST                                               
            5.0T3   106  MICRO_CROSS-ASSEMBLER.M68.S.027    1 LINE     68    7 PAGE UM   FRONCZAK            JULY 03, 1981  17:56:58
            5.0T6   358                       
0          Test program for *M6800ASR (686/27).  To test the M6800 operation, nothing
           special is required.  To test the M6801 operation, *M6800ASR must be run
           with PAR=6801.
00686/035   MICRO CROSS-ASSEMBLER    MCS650XTEST     S   G          MINI:M650XASRTEST                                               
            5.0T3   107  MICRO_CROSS-ASSEMBLER.MCS.S.028    1 LINE     68    7 PAGE UM   FRONCZAK            JULY 03, 1981  17:56:59
            5.0T6   359                       
0          Test program for *MCS650XASR (686/28).
00686/036   MICRO CROSS-ASSEMBLER    I8080TEST       S   G          MINI:I8080ASRTEST                                               
            5.0T3   108  MICRO_CROSS-ASSEMBLER.I80.S.029    1 LINE     68    6 PAGE UM   FRONCZAK            JULY 03, 1981  17:57:00
            5.0T6   360                       
0          Test program for *I8080ASR (686/29).
00686/037   MICRO CROSS-ASSEMBLER    Z80TEST         S   G          MINI:Z80ASRTEST                                                 
            5.0T3   109  MICRO_CROSS-ASSEMBLER.Z80.S.030    1 LINE     72   24 PAGE UM   FRONCZAK            JULY 03, 1981  17:57:01
            5.0T6   361                       
0          Test program for *Z80ASR (686/30).
1                                                                                               SUN SEP 08/96   15:24:55   Page  471
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00686/038   MICRO CROSS-ASSEMBLER    M6809TEST       S   G          MINI:M6809ASRTEST                                               
            5.0T3   110  MICRO_CROSS-ASSEMBLER.M68.S.031    1 LINE     71    9 PAGE UM   FRONCZAK            JULY 03, 1981  17:57:04
            5.0T6   362                       
0          Test program for *M6809ASR (686/31).
00686/039C  MICRO CROSS-ASSEMBLER    PDP11TEST       S   G          MINI:PDP11TEST                                                  
            5.1T2    67  MICRO_CROSS-ASSEMBLER.PDP.S.039    1 LINE     71   10 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:33
0          Test program for *PDP11ASR (686/32).
00686/040A  MICRO CROSS-ASSEMBLER    CON-TEST        SA  G          MINI:DCSTEST                                                    
            5.1T2    68  MICRO_CROSS-ASSEMBLER.CON.SA.040   1 LINE     73    6 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:34
0          Assembler-independent test program for the constant processor, PROCCONS
           (686/7).
00686/041   MICRO CROSS-ASSEMBLER    MACROTEST       SA  G          MINI:MACTEST                                                    
            5.0T3   112  MICRO_CROSS-ASSEMBLER.MAC.SA.033   1 LINE     68    7 PAGE UM   FRONCZAK            JULY 03, 1981  17:57:06
            5.0T6   364                       
0          *M6809ASR-dependent test program for the macro processor (686/5).
00686/042A  MICRO CROSS-ASSEMBLER    MANUAL          WF             MINI:ASM.MAN                                                    
            5.1T2    69  MICRO_CROSS-ASSEMBLER.MAN.WF.042   1 LINE    117   42 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:34
0          Manual for usage of micro processor cross-assemblers.
0          Referenced by comments of: 686/43, 686/44 
00686/043C  MICRO CROSS-ASSEMBLER    PDP11ASR DIFFS  WF             MINI:PDP11DIFS                                                  
            5.1T2    70  MICRO_CROSS-ASSEMBLER.PDP.WF.043   1 LINE     88    6 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:37
0          Writeup explaining the differences between *11ASR (515) and *PDP11ASR (686/32).
           This information will be included in the next verson of the Cross-Assemblers
           Users Manual (686/42).
0          Referenced by comments of: 686/32 
00686/044   MICRO CROSS-ASSEMBLER    MEMO 422        WF             W098:M422SOURCE                                                 
            5.0T3   114  MICRO_CROSS-ASSEMBLER.MEM.WF.035   1 LINE     97   37 PAGE UM   FRONCZAK            JULY 03, 1981  18:06:51
            5.0T6   366                       
0          This is Computing Center Memo 422 -- "MTS Microprocessor Cross-Assemblers
           User's Guide." It does not reflect all features documented in (686/42).
00686/045   MICRO CROSS-ASSEMBLER    MEMO 423        PF             W098:M423OUTPUT                                                 
            5.0T3   115  MICRO_CROSS-ASSEMBLER.MEM.PF.036   1 LINE     71   50 PAGE UM   FRONCZAK            JULY 03, 1981  18:06:55
            5.0T6   367                       
0          This is Computing Center Memo 423 -- "Zilog Z-80 and TDL Mnemonics."
1                                                                                               SUN SEP 08/96   15:24:55   Page  472
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00686/046A  MICRO CROSS-ASSEMBLER    PMF PROJ FILE   D   G          MINI:PMF_XASM                                                   
            5.1T2    71  MICRO_CROSS-ASSEMBLER.PMF.D.046    1 LINE    192    4 PAGE UM   FRONCZAK            JULY 23, 1983  12:57:37
0          PMF (810) project file which facilitates management of all the
           cross-assemblers.  The PMF command "DESCRIBE PROJECT FULLY IN DEPTH" will
           explain the organization.
00687/001   PAR SUBR                                 SA  O          S1560 5.0T3 VLO FSNAME=PAR_SUBR..SA.001(1)                   117
            5.0T3   117  PAR_SUBR..SA.001                   1 LINE     72    1 PAGE UM   OGDEN               MAR. 23, 1978  15:53:44
            5.0T6   369                       
0          SUBROUTINE TO GIVE FORTRAN USERS ACCESS TO THE $RUN PAR STRING.
0          Referenced by comments of: 540/16, 3024/31 
00687/002   PAR SUBR                                 OC  O        # (PART OF *LIBRARY)                                              
                                                                                    UM   OGDEN                                      
0          Object part of *LIBRARY (524/1)
00688/001   TRAP SUBR                                SA  O  TRAP    S1153 UNSP VLO FSNAME=TRAP.S                                    
            5.0T3   118  TRAP_SUBR..SA.001                  1 LINE     80    6 PAGE UM   UNSP                OCT. 28, 1975  23:42:21
            5.0T6   370                       
0          EXPANDED VERSION OF UBC'S TRAP ROUTINE WHICH ALLOWS FORTRAN USERS TO FIELD
           PROGRAM INTERRUPTS.
0          Referenced by comments of: 689/1 
00688/002   TRAP SUBR                                OC  O        # (PART OF UNSP:LIBRARY)                                          
                                                                                    UM   UNSP                                       
0          Part of UNSP:LIBRARY (685/2).
00688/003   TRAP SUBR                                WF             S1153 UNSP VLO FSNAME=PROGTRAP.FMT                              
            5.0T3   119  TRAP_SUBR..WF.003                  1 LINE     71    3 PAGE UM   UNSP                SEP. 15, 1980  16:43:37
            5.0T6   371                       
00689/001   ATRAP SUBR                               SA  O  ATRA    S1153 UNSP VLO FSNAME=ATRAP.S                                   
            5.0T3   120  ATRAP_SUBR..SA.001                 1 LINE     80    5 PAGE UM   UNSP                MAR. 23, 1976  12:19:34
            5.0T6   372                       
0          SIMILAR TO THE TRAP SUBROUTINE (688), BUT ALLOWS FORTRAN USERS TO FIELD
           ATTENTION INTERRUPTS.
0          Referenced by comments of: 540/16 
00689/002   ATRAP SUBR                               OC  O        # (PART OF UNSP:LIBRARY)                                          
                                                                                    UM   UNSP                                       
0          Part of UNSP:LIBRARY (685/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  473
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00689/003   ATRAP SUBR                               WF             S1153 UNSP VLO FSNAME=ATTNTRAP.FMT                              
            5.0T3   121  ATRAP_SUBR..WF.003                 1 LINE     71    3 PAGE UM   UNSP                SEP. 15, 1980  16:23:39
            5.0T6   373                       
00690/001   DISASM                                   SA  S  DASM    S1153 UNSP VLO FSNAME=DISASM.S                                  
            5.0T3   122  DISASM..SA.001                     1 LINE     80  147 PAGE UM   UNSP                APR. 15, 1976  01:14:16
            5.0T6   374                       
0          A DISASSEMBLER FROM THE IBM/SHARE CONTRIBUTED PROGRAM LIBRARY (360D-05.3.001)
           VIA UQV.  MODIFIED BY UM.  ASSEMBLE USING *SYSMAC.
00690/002   DISASM                                   OE  S          UNSP:DISASM                                                     
            5.0T3   123  DISASM..OE.002                     1 LINE   3364   16 PAGE UM   UNSP                JULY 03, 1981  18:10:51
            5.0T6   375  UNSP:DISASM          
00690/003   DISASM                                   P              UNSP:DISASM.W                                                   
            5.0T3   124  DISASM..P.003                      1 LINE     67    1 PAGE UM   UNSP                JULY 03, 1981  18:10:52
            5.0T6   376                       
0          VOLUME 3-TYPE USER WRITEUP.
00690/004   DISASM                                   P              S1560 5.0T3 VLO FSNAME=DISASM..P.004(1)                      125
            5.0T3   125  DISASM..P.004                      1 LINE     61    1 PAGE UM   UNSP                JULY 09, 1976  12:03:21
            5.0T6   377                       
0          NOTES ON THE INTERNALS OF DISASM.
00691/001   PFILES                                                # (OBSOLETE)                                                      
            D4T3    141                                                             UM                                              
0          Obsoleted by $FILESTATUS command.
00692/001   SPELER SUBR                                           # (OBSOLETE)                                                      
            D4T3    143  SPELER_SUBR..SA.001                1 LINE     80    5 PAGE UBC                      OCT. 28, 1975  23:42:33
0          SUBROUTINE TO TEST TWO STRINGS AND DETERMINE IF THE SECOND IS A LIKELY MISSPELLING
           OF THE FIRST; SEE CACM, VOL 13, NO 2, FEB 1970.
00693/001   TAPEDRIVES                               SA  G  TDRI    S1153 UNSP VLO FSNAME=TAPEDRIVES.S                              
            5.0T3   126  TAPEDRIVES..SA.001                 1 LINE     80    6 PAGE UBC            UNSP      JAN. 21, 1981  18:53:43
            5.0T6   378                       
0          Program to print the number of free 7- and 9-track tape drives, and the
           number of jobs in the tape queue. Copies COPY:GLOBALS+COPY:LLMPSEQU,
           components (1026/3) and (087), respectively.
0          Referenced by comments of: 806/1 
00693/002   TAPEDRIVES                               OE  G          UNSP:TAPEDRIVES                                                 
            5.0T3   127  TAPEDRIVES..OE.002                 1 LINE    915    1 PAGE UBC            UNSP      JULY 03, 1981  18:11:34
            5.0T6   379  UNSP:TAPEDRIVES      
1                                                                                               SUN SEP 08/96   15:24:55   Page  474
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00693/003   TAPEDRIVES               *TPS            C              *TPS                                                            
            5.0T3   128  TAPEDRIVES.*TPS.C.003              1 LINE     33    1 PAGE UBC            UNSP      JULY 03, 1981  18:11:35
            5.0T6   380  *TPS                 
0          OPERATOR FILE TO RUN UNSP:TAPEDRIVES.  INVOKED BY ENTERING "MTS *TPS"
           ON OPERATORS CONSOLE.
00693/004   TAPEDRIVES                               P              UNSP:TAPEDRIVES.W                                               
            5.0T3   129  TAPEDRIVES..P.004                  1 LINE     67    1 PAGE UBC            UNSP      JULY 03, 1981  18:11:35
            5.0T6   381                       
00694/001   DOC                                      SF  O  DOC     S1153 UNSP VLO FSNAME=DOC.S                                     
            5.0T3   130  DOC..SF.001                        1 LINE     80    5 PAGE UM   UNSP                OCT. 03, 1975  16:46:13
            5.0T6   382                       
0          A PROGRAM TO HELP PRODUCE PROGRAM AND SUBROUTINE DOCUMENTATION.
0          Referenced by comments of: 694/3, 694/4, 694/5 
00694/002   DOC                                      OE  O          UNSP:DOC                                                        
            5.0T3   131  DOC..OE.002                        1 LINE   2002    3 PAGE UM   UNSP                JULY 03, 1981  18:11:53
            5.0T6   383  UNSP:DOC             
00694/003   DOC                      DOCCOM          D              UNSP:DOCCOM                                                     
            5.0T3   132  DOC.DOCCOM.D.003                   1 LINE     35    1 PAGE UM   UNSP                JULY 03, 1981  18:11:53
            5.0T6   384  UNSP:DOCCOM          
0          A DATA FILE REFERENCED BY (694/1).
00694/004   DOC                      DOCCOM2         D              UNSP:DOCCOM2                                                    
            5.0T3   133  DOC.DOCCOM2.D.004                  1 LINE     31    1 PAGE UM   UNSP                JULY 03, 1981  18:11:54
            5.0T6   385  UNSP:DOCCOM2         
0          A DATA FILE WHICH CAN BE USED WITH (694/1).
00694/005   DOC                      DOCCOM3         D              UNSP:DOCCOM3                                                    
            5.0T3   134  DOC.DOCCOM3.D.005                  1 LINE     31    1 PAGE UM   UNSP                JULY 03, 1981  18:11:55
            5.0T6   386  UNSP:DOCCOM3         
0          A DATA FILE WHICH CAN BE USED WITH (694/1).
00694/006   DOC                                      WF             S1153 UNSP VLO FSNAME=DOC.FMT                                   
            5.0T3   135  DOC..WF.006                        1 LINE     90    3 PAGE UM   UNSP                SEP. 15, 1980  16:42:49
            5.0T6   387                       
00695/001   SNOOP                    SUBR            SF  G  SNOO    S1153 UNSP VLO FSNAME=SNOOP.S                                   
            5.0T3   136  SNOOP.SUBR.SF.001                  1 LINE     80    3 PAGE UM   UNSP                JAN. 13, 1976  11:28:21
            5.0T7     1                       
0          THIS SUBROUTINE IS CALLED (EITHER DIRECTLY OR VIA CSNOOP) BY MOST OF THE UM
           "UNSUPPORTED" SOFTWARE COMPONENTS TO RECORD PROGRAM USAGE STATISTICS.
0          Referenced by comments of: 686/1, 686/10, 686/12, 686/14, 686/16, 686/18, 686/20 
1                                                                                               SUN SEP 08/96   15:24:55   Page  475
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00695/002   SNOOP                    SUBR            OC  G        # (PART OF UNSP:LIBRARY)                                          
                                                                                    UM   UNSP                                       
0          Part of UNSP:LIBRARY (685/2).
00695/003   SNOOP                    WRITEUP         WF  G          S1153 UNSP VLO FSNAME=SNOOP.FMT                                 
            5.0T3   137  SNOOP.WRITEUP.WF.003               1 LINE     66    1 PAGE UM   UNSP                SEP. 15, 1980  16:43:41
            5.0T7     2                       
00695/004   SNOOP                    CSNOOP          SA  O  CSNO    S1153 UNSP VLO FSNAME=CSNOOP.S                                  
            5.0T3   138  SNOOP.CSNOOP.SA.004                1 LINE     80    1 PAGE UM   UNSP                JUNE 21, 1976  13:03:43
            5.0T7     3                       
0          A "MAIN" PROGRAM WHICH CALLS THE SNOOP SUBROUTINE AND THEN CALLS THE REAL
           MAIN PROGRAM.
00695/005   SNOOP                    CSNOOP          OC  O          UNSP:CSNOOP.O                                                   
            5.0T3   139  SNOOP.CSNOOP.OC.005                1 LINE     80    1 PAGE UM   UNSP                JULY 03, 1981  18:13:09
            5.0T7     4  UNSP:CSNOOP.O        
0          Referenced by comments of: 772/2, 773/3 
00696/001   CDCEBCD                                  SA  O  CDCE    S1153 UNSP VLO FSNAME=CDCEBCD.S                                 
            5.0T3   140  CDCEBCD..SA.001                    1 LINE     80    5 PAGE UM   UNSP                JULY 14, 1977  21:18:49
            5.0T7     5                       
0          PROGRAM TO DEBLOCK CDC 6000 SERIES 7-TRACK SCOPE CODED TAPES AND CONVERT THE
           DATA FROM CDC "CONSOLE DISPLAY CODE" INTO EBCDIC. COPIES *SENSEDSECT (3025).
00696/002   CDCEBCD                                  OC  O          UNSP:CDCEBCD                                                    
            5.0T3   141  CDCEBCD..OC.002                    1 LINE     80    3 PAGE UM   UNSP                JULY 03, 1981  18:13:11
            5.0T7     6  UNSP:CDCEBCD         
00696/003   CDCEBCD                                  WF             S1153 UNSP VLO FSNAME=CDCEBCD.FMT                               
            5.0T3   142  CDCEBCD..WF.003                    1 LINE     68    1 PAGE UM   UNSP                SEP. 15, 1980  16:42:42
            5.0T7     7                       
00697/001   SIGFILE                                  SF  G  SIGF    S1153 UNSP VLO FSNAME=SIGFILE.S                                 
            5.0T3   143  SIGFILE..SF.001                    1 LINE     80    4 PAGE UM   UNSP                JULY 14, 1977  21:18:46
            5.0T7     8                       
0          A PROGRAM, SOMEWHAT LIKE UBC'S PROFILE PROGRAM, WHICH IS DESIGNED TO BE RUN
           FROM SIGFILES.
00697/002   SIGFILE                                  OE  G          UNSP:SIGFILE                                                    
            5.0T3   144  SIGFILE..OE.002                    1 LINE   4632    3 PAGE UM   UNSP                JULY 03, 1981  18:13:47
            5.0T7     9  UNSP:SIGFILE         
00698/001   LIST                                                  # (OBSOLETE)                                                      
            D4T3    158  LIST..SF.001                       1 LINE     80    3 PAGE UM                       JULY 02, 1977  12:29:01
            D4T7    158                       
0          Obsoleted by LISTER (774).
1                                                                                               SUN SEP 08/96   15:24:55   Page  476
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00699/001   FTNREP                                   SA  O  FTNR    S1153 UNSP VLO FSNAME=FTNREP.S                                  
            5.0T3   145  FTNREP..SA.001                     1 LINE     80    4 PAGE UM   UNSP                DEC. 01, 1976  22:00:25
            5.0T7    10                       
0          A PROGRAM WHICH COMPILES FORTRAN SOURCE BY LINKING TO *FTN (551) AND THEN
           EDITS THE OBJECT INTO EXISTING OBJECT FILES BY LINKING TO OBJREP (700).
0          Referenced by comments of: 700/1 
00699/002   FTNREP                                   OE  O          UNSP:FTNREP                                                     
            5.0T3   146  FTNREP..OE.002                     1 LINE   1382    3 PAGE UM   UNSP                JULY 03, 1981  18:13:49
            5.0T7    11  UNSP:FTNREP          
00699/003   FTNREP                                   WF             S1153 UNSP VLO FSNAME=FTNREP.FMT                                
            5.0T3   147  FTNREP..WF.003                     1 LINE     82    2 PAGE UM   UNSP                SEP. 15, 1980  16:43:01
            5.0T7    12                       
00700/001   OBJREP                                   SA  O  OBJR    S1153 UNSP VLO FSNAME=OBJREP.S                                  
            5.0T3   148  OBJREP..SA.001                     1 LINE     80   16 PAGE UM   UNSP                OCT. 03, 1975  16:46:40
            5.0T7    13                       
0          AN OBJECT FILE EDITOR/UPDATER WHICH IS LINKED TO BY FTNREP (699) OR CAN BE RUN
           DIRECTLY.  NO WRITEUP IS AVAILABLE.
0          Referenced by comments of: 699/1 
00700/002   OBJREP                                   OE  O          UNSP:FTNRE*                                                     
            5.0T3   149  OBJREP..OE.002                     1 LINE   4358    3 PAGE UM   UNSP                JULY 03, 1981  18:14:29
            5.0T7    14  UNSP:FTNRE*          
00701/001A  ECMD                                     SF  O          S1153 UNSP VLO FSNAME=ECMD.S                                    
            5.1T2    72  ECMD..SF.001                       1 LINE     94   17 PAGE UM   UNSP                SEP. 22, 1982  09:07:08
0          A SIMPLE COMMAND EXPANDER WHICH ALLOWS ALL MTS COMMANDS TO MAKE USE OF THE
           NOTATION ACCEPTED BY $FILESTATUS.  CALLS THE FSTARTNS SUBROUTINE (701/2).
            
           ***********************************************************************************
           D5.1 changes:
            
           Now calls COMMAND instead of CMD and checks if an attention occured
           rather than waiting 3 seconds between commands.
           ***********************************************************************************
00701/002   ECMD                     FSTARTNS SUBR   SA  O          S1153 UNSP VLO FSNAME=FSTARTN.S                                 
            5.0T3   151  ECMD.FSTARTNS_SUBR.SA.002          1 LINE     80   18 PAGE UM   UNSP                JULY 10, 1976  17:44:16
            5.0T7    16                       
0          ROUTINES TAKEN FROM $FILESTATUS TO SCAN FILE CATALOG FOR PARTIAL FILENAMES.
0          Referenced by comments of: 701/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  477
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00701/003A  ECMD                                     OE  O          UNSP:ECMD                                                       
            5.1T2    73  ECMD..OE.003                       1 LINE  13064    7 PAGE UM   UNSP                JULY 23, 1983  12:59:40
                         UNSP:ECMD            
00701/004   ECMD                                     WF             S1153 UNSP VLO FSNAME=ECMD.FMT                                  
            5.0T3   153  ECMD..WF.004                       1 LINE    135    3 PAGE UM   UNSP                SEP. 15, 1980  16:42:51
            5.0T7    18                       
00702/001   MCCTOCC                                  SA  G  MCCT    S1153 UNSP VLO FSNAME=MCCTOCC.S                                 
            5.0T3   154  MCCTOCC..SA.001                    1 LINE     80    3 PAGE UM   UNSP                SEP. 30, 1975  11:00:22
            5.0T7    19                       
0          PROGRAM TO CONVERT MACHINE CARRIAGE CONTROL TO LOGICAL CARRIAGE CONTROL.
00702/002   MCCTOCC                                  OE  G          UNSP:MCCTOCC                                                    
            5.0T3   155  MCCTOCC..OE.002                    1 LINE   1382    3 PAGE UM   UNSP                JULY 03, 1981  18:15:10
            5.0T7    20  UNSP:MCCTOCC         
00702/003   MCCTOCC                                  WF             S1153 UNSP VLO FSNAME=MCCTOCC.FMT                               
            5.0T3   156  MCCTOCC..WF.003                    1 LINE     72    1 PAGE UM   UNSP                SEP. 15, 1980  16:43:30
            5.0T7    21                       
00703/001   DIGLIB                   PERSYS          SF  G  PERS    S1153 UNSP VLO FSNAME=PERSYS.S                                  
            5.0T3   157  DIGLIB.PERSYS.SF.001               1 LINE     80   16 PAGE UM   UNSP                AUG. 30, 1976  15:52:15
            5.0T7    22                       
0          DIGLIB IS A LIBRARY OF DEVICE INDEPENDENT GRAPHICS (DIG) SUBROUTINES. 
            
           THE PERSYS ROUTINES PRODUCE COORDINATE PAIRS FOR THE STRAIGHT-LINE VECTORS FORMING
           A TWO-DIMENSIONAL VIEW OF A THREE-DIMENSIONAL SURFACE.
00703/002   DIGLIB                   PERSYS WRITEUP  WF  G          S1153 UNSP VLO FSNAME=PERSYS.F                                  
            5.0T3   158  DIGLIB.PERSYS_WRITEUP.WF.002       1 LINE    195   15 PAGE UM   UNSP                AUG. 30, 1976  15:52:33
            5.0T7    23                       
0          CONTAINS A "$CONTINUE WITH PERSYS.S(---)" RECORD.
00703/003   DIGLIB                   CONSYS          SF  G  CONS    S1153 UNSP VLO FSNAME=CONSYS.S                                  
            5.0T3   159  DIGLIB.CONSYS.SF.003               1 LINE     80   18 PAGE UM   UNSP                AUG. 30, 1976  15:51:52
            5.0T7    24                       
0          THE CONSYS ROUTINES PRODUCE COORDINATE PAIRS FOR THE STRAIGHT-LINE VECTORS FORMING
           A CONTOUR MAP.
00703/004   DIGLIB                   CONSYS WRITEUP  WF  G          S1153 UNSP VLO FSNAME=CONSYS.F                                  
            5.0T3   160  DIGLIB.CONSYS_WRITEUP.WF.004       1 LINE    221   17 PAGE UM   UNSP                AUG. 30, 1976  23:21:01
            5.0T7    25                       
0          CONTAINS A "$CONTINUE WITH CONSYS.S(---)" RECORD.
1                                                                                               SUN SEP 08/96   15:24:55   Page  478
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00703/005   DIGLIB                   OBJECT LIB      OL  G          UNSP:DIGLIB                                                     
            5.0T3   161  DIGLIB.OBJECT_LIB.OL.005           1 LINE   5024    7 PAGE UM   UNSP                JULY 03, 1981  18:16:07
            5.0T7    26  UNSP:DIGLIB          
00703/006   DIGLIB                                   WF             S1153 UNSP VLO FSNAME=DIGLIB.FMT                                
            5.0T3   162  DIGLIB..WF.006                     1 LINE     67    1 PAGE UM   UNSP                SEP. 15, 1980  16:42:45
            5.0T7    27                       
00704/001   11PAL                    SIMULATOR       SA     SIMU    S1153 UNSP VLO FSNAME=11SIMULATOR.S                             
            5.0T3   163  11PAL.SIMULATOR.SA.001             1 LINE     80   35 PAGE UNE            UNSP      MAY  17, 1977  21:55:21
            5.0T7    28                       
0          A PDP-11 ASSEMBLER AND SIMULATOR WHICH ORIGINALLY CAME FROM THE POLYTECHNIC
           INSTITUTE OF BROOKLYN (NEW YORK) -- ADAPTED FOR MTS BY UNE.
00704/002   11PAL                    ASSEMBLER       SA     ASSE    S1153 UNSP VLO FSNAME=11ASSEMBLER.S                             
            5.0T3   164  11PAL.ASSEMBLER.SA.002             1 LINE     80   63 PAGE UNE            UNSP      MAY  17, 1977  21:55:33
            5.0T7    29                       
00704/003   11PAL                    MONITOR         SA     MONI    S1153 UNSP VLO FSNAME=11MONITOR.S                               
            5.0T3   165  11PAL.MONITOR.SA.003               1 LINE     80   14 PAGE UNE            UNSP      OCT. 22, 1976  12:34:15
            5.0T7    30                       
00704/004   11PAL                    OBJECT          OE             UNSP:11PAL                                                      
            5.0T3   166  11PAL.OBJECT.OE.004                1 LINE  14130    9 PAGE UNE            UNSP      JULY 03, 1981  18:17:02
            5.0T7    31  UNSP:11PAL           
00704/005   11PAL                    WRITEUP         WF             S1153 UNSP VLO FSNAME=11PAL.F                                   
            5.0T3   167  11PAL.WRITEUP.WF.005               1 LINE     95   15 PAGE UNE            UNSP      OCT. 22, 1976  12:33:13
            5.0T7    32                       
00706/001   SIMSCRIPT                SIM25 INSTALL   WF             S1153 UNSP VLO FSNAME=S25INSTALL.F                              
            5.0T3   168  SIMSCRIPT.SIM25_INSTALL.WF.001     1 LINE     71    3 PAGE UM   UNSP                FEB. 26, 1981  09:32:03
            5.0T7    33                       
0          Installation instructions for the CACI Inc. SIMSCRIPT II.5 compiler, Release
           8G, as modified for use in MTS. Due to restrictions, this compiler cannot be
           distributed, but should be available "free" to universities once an agreement
           with CACI Inc. is signed. Some of the following components are versions of
           copyrighted CACI software converted for use with MTS. Without permission from
           CACI Inc., redistribution should be limited to installations receiving
           distributions of MTS.
00706/002   SIMSCRIPT                SIM25 SPCOMP    SA  G          S1153 UNSP VLO FSNAME=S25SPCOMP.S                               
            5.0T3   169  SIMSCRIPT.SIM25_SPCOMP.SA.002      1 LINE     80   12 PAGE UM   UNSP                JAN. 04, 1979  05:19:17
            5.0T7    34                       
0          MTS REPLACEMENTS FOR THE STANDARD CACI COMPILER ROUTINES ROPN AND RSET$R.
           ASSEMBLE WITH PAR=BATCH.
1                                                                                               SUN SEP 08/96   15:24:55   Page  479
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00706/003   SIMSCRIPT                SIM25 SPCOMP    OC  G          S1153 UNSP VLO FSNAME=S25SPCOMP                                 
            5.0T3   170  SIMSCRIPT.SIM25_SPCOMP.OC.003      1 LINE     80    5 PAGE UM   UNSP                JAN. 04, 1979  05:19:20
            5.0T7    35                       
00706/004   SIMSCRIPT                SIM25 SPLIB     SA  G          S1153 UNSP VLO FSNAME=S25SPLIB.S                                
            5.0T3   171  SIMSCRIPT.SIM25_SPLIB.SA.004       1 LINE     80   40 PAGE UM   UNSP                JAN. 04, 1979  05:19:22
            5.0T7    36                       
0          MTS REPLACEMENTS FOR THE STANDARD CACI RUN-TIME LIBRARY AND COMPILER ROUTINES
           RCRE, RDATE, RPUT, RRDR, RRWD, RSTP, LKAH, LERR, AND THE RUN-TIME LIBRARY
           ROUTINES ROPN AND RSET$R.  ASSEMBLE WITH PAR=BATCH.
00706/005   SIMSCRIPT                SIM25 SPLIB     OC  G          S1153 UNSP VLO FSNAME=S25SPLIB                                  
            5.0T3   172  SIMSCRIPT.SIM25_SPLIB.OC.005       1 LINE     80    9 PAGE UM   UNSP                JAN. 04, 1979  05:20:34
            5.0T7    37                       
00706/006   SIMSCRIPT                SIM25 INTERFAC  SA  G  S25I    S1153 UNSP VLO FSNAME=S25INTER.S                                
            5.0T3   173  SIMSCRIPT.SIM25_INTERFAC.SA.006    1 LINE     80   10 PAGE UM   UNSP                JAN. 04, 1979  05:20:57
            5.0T7    38                       
0          THE MTS TO OS INTERFACE ROUTINES THAT ARE ADDED TO THE STANDARD CACI RUN-TIME
           LIBRARY AND COMPILER ROUTINES.  ASSEMBLE WITH PAR=BATCH.  COPIES *GDINFODSECT 
           (594).
00706/007   SIMSCRIPT                SIM25 INTERFAC  OC  G          S1153 UNSP VLO FSNAME=S25INTER                                  
            5.0T3   174  SIMSCRIPT.SIM25_INTERFAC.OC.007    1 LINE     80    6 PAGE UM   UNSP                JAN. 04, 1979  05:21:07
            5.0T7    39                       
00706/008   SIMSCRIPT                SIM25 MAC       SM  G          S1153 UNSP VLO FSNAME=S25MAC                                    
            5.0T3   175  SIMSCRIPT.SIM25_MAC.SM.008         1 LINE     80   12 PAGE UM   UNSP                JAN. 04, 1979  05:21:19
            5.0T7    40                       
00706/009   SIMSCRIPT                SIM25 CACI COM  OC  G        # S1153 UNSP VLO FSNAME=S25CACICOMP                               
                                                                                    UM   UNSP                                       
0          OS OBJECT AND LINKAGE EDITOR CONTROL CARDS FOR THE RELEASE 8G COMPILER AS
           DISTRIBUTED BY CACI.
0          Referenced by comments of: 706/10 
00706/010   SIMSCRIPT                LIB PATCH       S   G          S1153 UNSP VLO FSNAME=S25UPLIB.S25                              
            5.0T3   176  SIMSCRIPT.LIB_PATCH.S.010          1 LINE     49    1 PAGE UM   UNSP                FEB. 26, 1981  09:49:00
            5.0T7    41                       
0          A replacement for the CACI subroutine RX$EV$S (a.k.a. X.EV.S) in (706/9).
           Note that the source will generate two object modules. One of these should be
           deleted.
00706/011   SIMSCRIPT                LIB PATCH       O   G          S1153 UNSP VLO FSNAME=S25UPLIB.OBJ                              
            5.0T3   177  SIMSCRIPT.LIB_PATCH.O.011          1 LINE    272    1 PAGE UM   UNSP                FEB. 26, 1981  09:50:01
            5.0T7    42                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  480
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00706/012   SIMSCRIPT                SIM25 COMP      OE  G        # UNSP:SIM25                                                      
                                                                                    UM   UNSP                                       
0          LINKEDITED OBJECT FOR THE MTS VERSION OF THE RELEASE 8G COMPILER.
0          Referenced by comments of: 706/13 
00706/013   SIMSCRIPT                SIM25 MAP       P   G        # S1153 UNSP VLO FSNAME=S25MAP                                    
                                                                                    UM   UNSP                                       
0          MAP OUTPUT FROM *LINKEDIT (297) FOR (706/12).
00706/014   SIMSCRIPT                SIM25 CACI LIB  OC  G        # S1153 UNSP VLO FSNAME=S25CACILIB                                
                                                                                    UM   UNSP                                       
0          OS OBJECT AND LINKAGE EDITOR CONTROL CARDS FOR THE RELEASE 8G RUN-TIME LIBRARY
           AS DISTRIBUTED BY CACI.
00706/015   SIMSCRIPT                SIM25 LIB       OL  G        # UNSP:SIM25LIB                                                   
                                                                                    UM   UNSP                                       
0          MTS VERSION OF THE RELEASE 8G RUN-TIME LIBRARY.
00706/016   SIMSCRIPT                SIM25 ERRMSGS   M              UNSP:SIM25ERR                                                   
            5.0T3   178  SIMSCRIPT.SIM25_ERRMSGS.M.016      1 LINE     79    4 PAGE UM   UNSP                JULY 03, 1981  18:18:42
            5.0T7    43  UNSP:SIM25ERR        
0          ERROR MESSAGE FILE FOR RELEASE 8G.
00706/017   SIMSCRIPT                SIM25 WRITEUP   WF             S1153 UNSP VLO FSNAME=SIM25.F                                   
            5.0T3   179  SIMSCRIPT.SIM25_WRITEUP.WF.017     1 LINE     69    3 PAGE UM   UNSP                JAN. 04, 1979  06:08:16
            5.0T7    44                       
00706/018   SIMSCRIPT                SIM25 TEST 1    S   G          S1153 UNSP VLO FSNAME=S2TEST1                                   
            5.0T3   180  SIMSCRIPT.SIM25_TEST_1.S.018       1 LINE     78    1 PAGE UM   UNSP                JAN. 09, 1979  12:28:22
            5.0T7    45                       
0          FIRST OF THREE SIMSCRIPT SOURCE TEST PROGRAMS. 
00706/019   SIMSCRIPT                SIM25 TEST 2    S   G          S1153 UNSP VLO FSNAME=S2TEST2                                   
            5.0T3   181  SIMSCRIPT.SIM25_TEST_2.S.019       1 LINE     68    1 PAGE UM   UNSP                JAN. 09, 1979  12:28:28
            5.0T7    46                       
00706/020   SIMSCRIPT                SIM25 TEST 3    S   G          S1153 UNSP VLO FSNAME=S2TEST3                                   
            5.0T3   182  SIMSCRIPT.SIM25_TEST_3.S.020       1 LINE     68    1 PAGE UM   UNSP                JAN. 09, 1979  12:28:33
            5.0T7    47                       
0          COMPILE WITH PAR=NEWIF.
00706/021   SIMSCRIPT                SAMPLES         S   G          S1153 UNSP VLO FSNAME=S25SAMPLES1                               
            5.0T3   183  SIMSCRIPT.SAMPLES.S.021            1 LINE     80   22 PAGE UM   UNSP                FEB. 26, 1981  09:33:56
            5.0T7    48                       
0          This and the following two subcomponents contain many sample SIMSCRIPT
1                                                                                               SUN SEP 08/96   15:24:55   Page  481
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          programs. The documentation for these is in (706/24).
00706/022   SIMSCRIPT                SAMPLES         S   G          S1153 UNSP VLO FSNAME=S25SAMPLES2                               
            5.0T3   184  SIMSCRIPT.SAMPLES.S.022            1 LINE     80    5 PAGE UM   UNSP                FEB. 26, 1981  09:34:11
            5.0T7    49                       
00706/023   SIMSCRIPT                SAMPLES         S   G          S1153 UNSP VLO FSNAME=S25SAMPLES3                               
            5.0T3   185  SIMSCRIPT.SAMPLES.S.023            1 LINE     80   10 PAGE UM   UNSP                FEB. 26, 1981  09:34:18
            5.0T7    50                       
00706/024   SIMSCRIPT                SAMPLES         P              S1153 UNSP VLO FSNAME=S25SAMPLES                                
            5.0T3   186  SIMSCRIPT.SAMPLES.P.024            1 LINE     82    3 PAGE UM   UNSP                FEB. 26, 1981  09:33:03
            5.0T7    51                       
0          Referenced by comments of: 706/21 
00707/001   RSCAN                                    SA  O          W030:RSCAN                                                      
            5.0T3   187  RSCAN..SA.001                      1 LINE     69   12 PAGE UM   LIFT                JULY 03, 1981  18:19:38
            5.0T7    52                       
0          PROGRAM TO PRINT MTS COMMANDS FOR JOBS BASED ON USER ID, JOB NUMBER, OR MTS
           COMMAND NAME FOR A SET OF TIME/DATE RANGES.
           COPIES COPY:CMDAREADSECT (531/20). ASSEMBLE USING COPY:MTS.MACROS (344/3). 
           RSCAN IS SLOWLY BEING REPLACE BY SCAN (753).
0          Referenced by comments of: 707/3 
00707/002   RSCAN                    LISTCMD SUBR    SA  G          S0811 REBATE 'REBATES' FSNAME=LISTCMD                           
            5.0T3   188  RSCAN.LISTCMD_SUBR.SA.002          1 LINE     66    1 PAGE UM   LIFT                NOV. 28, 1977  20:57:17
            5.0T7    53                       
0          SUBROUTINE TO LIST CMDSTAT TYPE 1 (MTS COMMAND) RECORDS.
           COPIES COPY:CMDAREADSECT (531/20).
0          Referenced by comments of: 707/3 
00707/003   RSCAN                                    OC  O          W030:RSCANX                                                     
            5.0T3   189  RSCAN..OC.003                      1 LINE     80   10 PAGE UM   LIFT                JULY 03, 1981  18:19:43
            5.0T7    54                       
0          OBJECT FROM RSCAN (707/1), LISTCMD (707/2), LISTSTAT (071), AND JVCT (674).
           RUN WITH PROT=OFF.
00707/004   RSCAN                    WRITEUP         WF             S0811 REBATE 'REBATES' FSNAME=RSCAN.WF                          
            5.0T3   190  RSCAN.WRITEUP.WF.004               1 LINE     94    3 PAGE UM   LIFT                JAN. 13, 1977  16:33:14
            5.0T7    55                       
0          PRELIMINARY WRITEUP DESCRIBING THE USE OF RSCAN.
00708/001A  CHARGE SUBR                              SA  G  CHRG    S0027 DISTRB FSNAME=CHARGE                                      
            5.1T2    74  CHARGE_SUBR..SA.001                1 LINE     80    8 PAGE UM   ENGLE               AUG. 26, 1982  10:34:40
0          SUBROUTINE TO COMPUTE THE CHARGE FOR SPECIFIED QUANTITIES OF RESOURCES USING THE
           CURRENT RATES.  CHARGERN IS A PRIVATE ENTRY POINT WHICH ALLOWS A SPECIFIC RATE
1                                                                                               SUN SEP 08/96   15:24:55   Page  482
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          NUMBER TO BE SPECIFIED.  COPIES GRDEF (104/83) AND COPY:RATEVEC (651/3).
00708/002C  CHARGE SUBR                              UC  G          S0027 DISTRB FSNAME=CHARGEUPD                                   
            5.1T2    75  CHARGE_SUBR..UC.002                1 LINE     74    1 PAGE UM   ENGLE               AUG. 26, 1982  10:34:50
0          Updates source from previous regular distribution to current one.
00708/003A  CHARGE SUBR                              OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   ENGLE                                      
0          Object part of Resident System (468).
00709/001   READBFR SUBR                             SA  G          S1560 5.0T3 VLO FSNAME=READBFR_SUBR..SA.001(1)               192
            5.0T3   192  READBFR_SUBR..SA.001               1 LINE     80    3 PAGE UM   MTA                 JULY 28, 1977  23:52:05
            5.0T7    57                       
0          SUBROUTINE TO PROVIDE "LOCATE MODE" INPUT WHEN INPUT RECORD LENGTH IS UNKNOWN.
           USES GDINFO AND @NOTIFY TO ALLOCATE INPUT BUFFER.  CALLED BY SELECTCMD (531/34).
           COPIES *GDINFODSECT (594).
0          Referenced by comments of: 531/34, 621/4, 718/2 
00709/002   READBFR SUBR                             OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   MTA                                        
0          Object part of *LIBRARY (524/1)
00710/001   SQUASH                                                # (OBSOLETE)                                                      
            D4T3    209  SQUASH..SA.001                     1 LINE     80    6 PAGE UM                       JULY 28, 1977  23:52:07
0          Obsoleted by *OBJUTIL (721).
00711/001A  COMP CNTR PUBLICATIONS   MEMO LIST       P              *CCMEMOS                                                        
            5.1T2    76  COMP_CNTR_PUBLICATIONS.ME.P.001    1 LINE     70    3 PAGE UM   WOLFSON             JULY 23, 1983  13:01:49
                         *CCMEMOS             
0          This is the list of current Computing Center Memos.
00711/002A  COMP CNTR PUBLICATIONS   COMP CNTR PUBS  P              *CCPUBLICATIONS                                                 
            5.1T2    77  COMP_CNTR_PUBLICATIONS.CO.P.002    1 LINE     70    1 PAGE UM   WOLFSON             JULY 23, 1983  13:01:50
                         *CCPUBLICATIONS      
0          This is the list of current Computing Center publications.
00711/003C  COMP CNTR PUBLICATIONS   MEMO 428        WF             S0672 CCMEMO 'CCMEMOS' FSNAME=M428                              
            5.1T2    78  COMP_CNTR_PUBLICATIONS.ME.WF.003   1 LINE    221    6 PAGE UM   WOLFSON             JULY 09, 1982  09:33:51
0          This is Computing Center Memo 428 -- "Basic Use of the Keypunch and
           Cardreader."
0          Referenced by comments of: 711/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  483
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00711/004C  COMP CNTR PUBLICATIONS   MEMO 428        PF             S0672 CCMEMO 'CCMEMOS' FSNAME=M428.OUTPUT                       
            5.1T2    79  COMP_CNTR_PUBLICATIONS.ME.PF.004   1 LINE    135    8 PAGE UM   WOLFSON             JULY 09, 1982  09:34:06
0          Printer-ready version of (711/3).
00711/005   COMP CNTR PUBLICATIONS   INDEX FUNC      SA  O          S0791 FMTJNK 'FORMAT' FSNAME=INDEX                              
            5.0T3   195  COMP_CNTR_PUBLICATIONS.IN.SA.003   1 LINE     80    7 PAGE UM   LIFT                OCT. 10, 1977  11:14:23
            5.0T7    60                       
0          *FORMAT INDEX AND INDEXOUT FUNCTIONS USED IN UM PUBLICATIONS.  THESE ARE CALLED
           BY THE IND AND INDOUT FUNCTIONS (711/6) TO CONSTRUCT AN INDEX.  THE CALLING
           SEQUENCE IS DESCRIBED IN THE SOURCE.
0          Referenced by comments of: 711/6, 711/8 
00711/006   COMP CNTR PUBLICATIONS   IND FUNC        SG  O          S0791 FMTJNK 'FORMAT' FSNAME=IND                                
            5.0T3   196  COMP_CNTR_PUBLICATIONS.IN.SG.004   1 LINE     80    4 PAGE UM   LIFT                OCT. 10, 1977  11:14:19
            5.0T7    61                       
0          *FORMAT IND AND INDOUT "USER-DEFINED FUNCTIONS" USED IN UM PUBLICATIONS TO
           CONSTRUCT AN INDEX.  THESE DIFFER FROM THE *FORMAT INDEX FUNCTION IN THAT PAGE
           NUMBERS ARE EXPLICITLY GIVEN AND TREATED AS CHARACTER STRINGS, AND ENTRIES ARE
           ALPHABETIZED WITHOUT REGARD TO UPPER OR LOWER CASE.  THESE FUNCTIONS CALL INDEX
           AND INDEXOUT (711/5).
0          Referenced by comments of: 711/5, 711/8 
00711/007   COMP CNTR PUBLICATIONS   NRIGHT FUNC     SF  G          S0791 FMTJNK 'FORMAT' FSNAME=NRIGHT                             
            5.0T3   197  COMP_CNTR_PUBLICATIONS.NR.SF.005   1 LINE     53    1 PAGE UM   LIFT                MAY  16, 1977  12:33:05
            5.0T7    62                       
0          *FORMAT NRIGHT "USER-DEFINED FUNCTION" USED IN UM PUBLICATIONS TO GO TO A RIGHT
           HAND PAGE, LEAVING A BLANK PAGE IF NECESSARY.
0          Referenced by comments of: 711/8 
00711/008   COMP CNTR PUBLICATIONS   FUNC LIB        OL  O          ETC:FORMFUN                                                     
            5.0T3   198  COMP_CNTR_PUBLICATIONS.FU.OL.006   1 LINE   1762    3 PAGE UM   LIFT                JULY 03, 1981  18:21:55
            5.0T7    63  ETC.:FORMFUN         
0          OBJECT LIBRARY OF *FORMAT "USER-DEFINED FUNCTIONS" (711/5), (711/6), AND
           (711/7).
0          Referenced by comments of: 461/22 
00711/009   COMP CNTR PUBLICATIONS   TXTF MACROS     WX             W278:MEMO.LAYOUT                                                
            5.0T3   199  COMP_CNTR_PUBLICATIONS.TX.WX.007   1 LINE    115    1 PAGE UM   LIFT                JULY 03, 1981  18:21:56
            5.0T7    64                       
0          Referenced by comments of: 756/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  484
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00711/010C  COMP CNTR PUBLICATIONS   WKSP TXTF MACS  WX             WKSP:TXTFMAC                                                    
            5.1T2    80  COMP_CNTR_PUBLICATIONS.WK.WX.010   1 LINE     66    1 PAGE UM   LIFT                JULY 23, 1983  13:05:13
0          Textform macros for workshop papers.
00711/011C  COMP CNTR PUBLICATIONS   WKSP FMT MACS   WF             WKSP:FMTMAC                                                     
            5.1T2    81  COMP_CNTR_PUBLICATIONS.WK.WF.011   1 LINE     64    1 PAGE UM   LIFT                JULY 23, 1983  13:05:14
0          FMT macros for workshop papers.
00711/012C  COMP CNTR PUBLICATIONS   COMP CNTR NEWS               # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the Computing Center Newsletters associated with D5.1 (Vol.11,
           n. 15, through Vol. 13, n. 12). Only hard copies of this component are
           distributed.
00711/013C  COMP CNTR PUBLICATIONS   COPYRIGHT OK                 # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the Permission to Reproduce Computing Center Publications. Only
           hard copies of this component are distributed.
00711/014C  COMP CNTR PUBLICATIONS   MTS REF SUMM                 # (HARD COPY ONLY DISTRIBUTED)                                    
                                                                                    UM   SWEET                                      
0          This is the MTS Reference Summary.  Only hard copies of this component
           are distributed.
00712/001  *RESTORE                  MAIN PGM        SA  G          RSTR:RESTORE(-10000,-1)                                         
            5.0T3   200  RESTORE.MAIN_PGM.SA.001            1 LINE     72   13 PAGE UM   HELFFRICH           AUG. 06, 1981  05:24:44
            5.0T7    65  RSTR:RESTORE         
0          User runnable program to restore files saved by the system online FILESAVE
           program.  Calls AUTOREST (712/3), and RSTFMT2 (092/3).  Assemble using
           the FILESAVE macros (067/35).  NOTE:  The directory files RSTR:FILEDIR.MAC,
           RSTR:FILEDIR.NEW, and RSTR:TAPEDIR accessed by this program must be 
           permitted READ to PKEY=*RESTORE, UNLIM to RSTR, and RW to PKEY=DEADUCATDES.
0          Referenced by comments of: 67/23, 92/3, 712/2, 712/3, 712/4 
00712/002C *RESTORE                  MAIN PGM        UC  G          RSTR:RESTORE(1000)                                              
            5.1T2    82  RESTORE.MAIN_PGM.UC.002            1 LINE     72    5 PAGE UM   HELFFRICH           JULY 23, 1983  13:05:14
0          Update deck to be applied to (712/1) to yield current source.
            
           ********************************************************************
           D5.1 version:
            
           Checks for validity of new file name and only allows
           user IDs RSTR and MTS to restore files across accounts.
           ********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  485
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00712/003  *RESTORE                  AUTOREST SUBR   SA  G          RSTR:AUTOREST(1000)                                             
            5.0T3   201  RESTORE.AUTOREST_SUBR.SA.002       1 LINE     72    6 PAGE UM   HELFFRICH           AUG. 06, 1981  05:25:04
            5.0T7    66  RSTR:AUTOREST        
0          Subroutine which takes a list of files from the main program (712/1) and mounts
           and scans tapes calling RSTFMT2 (092/3) to restore files. Assemble with the
           FILESAVE macros (067/35).
0          Referenced by comments of: 712/1, 712/4 
00712/004A *RESTORE                  OBJECT          OE  G          *RESTORE                                                        
            5.1T2    83  RESTORE.OBJECT.OE.004              1 LINE   7068    7 PAGE UM   HELFFRICH           JULY 23, 1983  13:05:15
                         RSTR:*RESTORE        
0          OBJECT FOR (712/1), (712/3), AND RSTFMT2 (092/3).  NOTE: THE PKEY FOR THIS FILE
           MUST BE *RESTORE.
0          Referenced by comments of: 712/5 
00712/005  *RESTORE                  *RES            C              *RES                                                            
            5.0T3   203  RESTORE.?RES.C.004                 1 LINE     64    1 PAGE UM   HELFFRICH           AUG. 06, 1981  05:25:08
            5.0T7    68  RSTR:*RES            
0          COMMAND FILE TO RUN *RESTORE (712/4) FOR THE OPERATORS.  INVOKED BY ENTERING
           "MTS *RES" ON THE OPERATOR'S CONSOLE.
00713/001   UPTIME                                                # (PART OF SYSTEM WATCHERS)                                       
                                                                                    UM                                              
0          Part of System Watchers (540/23) and (540/24)
00714/001   INTRO GUIDE: FORMAT                      WF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=FMT80.SOU                 
            5.0T3   204  INTRO_GUIDE:_FORMAT..WF.001        1 LINE    173   38 PAGE UM   MANUAL              SEP. 30, 1980  13:58:08
            5.0T7    69                       
0          FORMAT SOURCE FOR "INTRODUCTION TO FORMAT," OCT. 1980, THE SECOND IN A SERIES
           OF MTS INTRODUCTORY GUIDES.
00714/002   INTRO GUIDE: FORMAT                      PF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=FMT80.OUT                 
            5.0T3   205  INTRO_GUIDE:_FORMAT..PF.002        1 LINE     83   66 PAGE UM   MANUAL              SEP. 30, 1980  13:58:16
            5.0T7    70                       
0          FORMAT PRINT FILE.
00715/001C  MERIT CC SUPPORT         MINOS           D   G          K1Y9:MINOS.AN                                                   
            5.1T2    84  MERIT_CC_SUPPORT.MINOS.D.001       1 LINE  32767   15 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:16
0          --------------------------------------------------------------------
           This component is the *PDP11ASR (686/32) source for the MINOS, the
           Merit Network Operating System, related utility programs and command
           files. Included is the necessary PDP-11 code for MTS (IBM/Amdahl).
           Anyone considering assembling these components ought to use the ID
           K1Y9 (it will make life a great deal easier)!
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  486
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This system runs in all Merit Communications Computers (CC), both
           Primary Communications Processors (PCP) and Secondary Communications
           Processors (SCP).
           --------------------------------------------------------------------
            
           (715/1) is a core image, suitable for loading with MNET:11LOAD (642/8).
0          Referenced by comments of: 715/1, 861/13, 861/14 
00715/002C  MERIT CC SUPPORT         MAP             D   G          K1Y9:MAP.AN                                                     
            5.1T2    85  MERIT_CC_SUPPORT.MAP.D.002         1 LINE    131   25 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:17
0          Map output from *LINK11 (516) both by name and by value.
00715/003C  MERIT CC SUPPORT         TAPE            D   G          K1Y9:TAPES.AN                                                   
            5.1T2    86  MERIT_CC_SUPPORT.TAPE.D.003        1 LINE    247   14 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:18
0          Tape image from *LINK11 (516) with first X'00' changed to X'0C' to
           signal high core ROM.
00715/004C  MERIT CC SUPPORT         TRACE OFF           G          K1Y9:TRACEOFF.S                                                 
            5.1T2    87  MERIT_CC_SUPPORT.TRACE_OF..004     1 LINE     55    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:18
0          Dummy module to set RTSPC tracing off.  See RTRACE (715/26).
00715/005C  MERIT CC SUPPORT         MINOS MACROS    SM  G          K1Y9:MINOSMACS                                                  
            5.1T2    88  MERIT_CC_SUPPORT.MINOS_MA.SM.005   1 LINE    100   49 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:19
0          Macro library with copy sections, dsects and software macros for use
           with *PDP11ASR (686/32).  Contains a $CONTINUE WITH *SPITDEBUG (590/9)
           record.
0          Referenced by comments of: 715/10, 715/11, 715/12, 715/13, 715/14, 715/15, 715/16, 715/17, 715/18, 715/19, 715/20,
                 715/21, 715/26, 715/27, 715/28, 715/29, 715/30, 715/31, 715/32, 715/33, 715/34, 715/35, 715/36, 715/37,
                 715/39, 715/40, 715/41, 715/42, 715/46, 715/47, 715/48, 715/49, 715/50, 715/51, 715/52, 715/53, 715/54,
                 715/55, 715/56, 715/57, 715/58, 715/59, 715/60, 860/1, 860/2, 860/3, 860/4, 860/5, 860/6, 860/7, 861/11,
                 861/14, 861/20 
00715/006C  MERIT CC SUPPORT         ASMTIDY         C   O          K1Y9:ASMTIDY(0,.999)                                            
            5.1T2    89  MERIT_CC_SUPPORT.ASMTIDY.C.006     1 LINE     73    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:21
0          Commands to assemble (715/7), the PDP11ASR tidier.
00715/007C  MERIT CC SUPPORT         ASMTIDY         S*  O          K1Y9:ASMTIDY(1000)                                              
            5.1T2    90  MERIT_CC_SUPPORT.ASMTIDY.S?.007    1 LINE    125   11 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:22
0          SNOSTORM source for *PDP11ASR (686/32) source code tidier.  ASMTIDY
           tidies *PDP11ASR source code, converts syntax of some macros from old 
           to new.  Not a public file because it changes too fast and is too
           specialized, but possibly a good place to start for your own tidier.
0          Referenced by comments of: 715/6, 715/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  487
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00715/008C  MERIT CC SUPPORT         ASMTIDY         OC  O          K1Y9:ASMTIDY(0,999)                                             
            5.1T2    91  MERIT_CC_SUPPORT.ASMTIDY.OC.008    1 LINE  32767   29 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:22
0          Object of (715/7).
00715/009C  MERIT CC SUPPORT         HDWARE EQUS     SM  G          K1Y9:HDWEQUS                                                    
            5.1T2    92  MERIT_CC_SUPPORT.HDWARE_E.SM.009   1 LINE     89   26 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:23
0          Hardware related dsects and copy sections. Contains descriptions of
           hardware registers for all peripherals used by Merit PDP-11's.
0          Referenced by comments of: 715/10, 715/11, 715/12, 715/13, 715/14, 715/15, 715/16, 715/17, 715/18, 715/19, 715/20,
                 715/21, 715/26, 715/27, 715/28, 715/29, 715/30, 715/31, 715/32, 715/33, 715/34, 715/35, 715/36, 715/37,
                 715/39, 715/40, 715/41, 715/42, 715/46, 715/47, 715/48, 715/49, 715/50, 715/51, 715/52, 715/53, 715/54,
                 715/55, 715/56, 715/57, 715/58, 715/59, 715/60, 860/1, 860/2, 860/3, 860/4, 860/5, 860/6, 860/7, 861/11,
                 861/14, 861/20 
00715/010C  MERIT CC SUPPORT         DSECTS          S   G          K1Y9:DSECTS.S                                                   
            5.1T2    93  MERIT_CC_SUPPORT.DSECTS.S.010      1 LINE     54    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:24
0          *PDP11ASR (686/32) source that presents all the dsects, macros, and
           copy sections in (715/5) and (715/9).
00715/011C  MERIT CC SUPPORT         SCP SOU         S   G          K1Y9:SCP.S                                                      
            5.1T2    94  MERIT_CC_SUPPORT.SCP_SOU.S.011     1 LINE     83    4 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:24
0          *PDP11ASR (686/32) source for Secondary Communications Processor (SCP)
           specific parameters. This module is included in all SCP systems.
           Copies (715/5) and (715/9).
00715/012C  MERIT CC SUPPORT         SYS INIT        S   G          K1Y9:INIT.S                                                     
            5.1T2    95  MERIT_CC_SUPPORT.SYS_INIT.S.012    1 LINE     88    5 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:25
0          *PDP11ASR (686/32) source for the system initialization routines.
           Copies (715/5) and (715/9).
00715/013C  MERIT CC SUPPORT         KH V¬11 MOD     S   G          K1Y9:KH11.S                                                     
            5.1T2    96  MERIT_CC_SUPPORT.KH V¬11.S.013     1 LINE     74    5 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:25
0          *PDP11ASR (686/32) source for the KH V¬11 device specific module, the
           synchronous line peripheral (developed by UNE) driver. Copies (715/5)
           and (715/9).
00715/014C  MERIT CC SUPPORT         MM16 SOU        S   G          K1Y9:MM16.S                                                     
            5.1T2    97  MERIT_CC_SUPPORT.MM16_SOU.S.014    1 LINE     82    8 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:26
0          *PDP11ASR (686/32) source for the MM16 device specific module. Drives
           6809 modules with HDLC perpherals. Copies (715/5) and (715/9).
00715/015C  MERIT CC SUPPORT         DL11 SOU        S   G          K1Y9:DL11.S                                                     
            5.1T2    98  MERIT_CC_SUPPORT.DL11_SOU.S.015    1 LINE     81    3 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:26
0          *PDP11ASR (686/32) source for the DL11 device specific module. Drives
           the operator console and DL-11 Hermes ports. Copies (715/5) and
1                                                                                               SUN SEP 08/96   15:24:55   Page  488
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (715/9).
00715/016C  MERIT CC SUPPORT         DZ11 SOU        S   G          K1Y9:DZ11.S                                                     
            5.1T2    99  MERIT_CC_SUPPORT.DZ11_SOU.S.016    1 LINE     84    4 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:26
0          *PDP11ASR (686/32) source for the DZ11 device specific module. Drives
           DZ-11 Hermes ports. Copies (715/5) and (715/9).
00715/017C  MERIT CC SUPPORT         LA32 SOU        S   G          K1Y9:LA32.S                                                     
            5.1T2   100  MERIT_CC_SUPPORT.LA32_SOU.S.017    1 LINE     79    4 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:27
0          *PDP11ASR (686/32) source for the LA32 (asynchronous line adaptor)
           device specific module. Copies (715/5) and (715/9).
00715/018C  MERIT CC SUPPORT         UMUCB           S   G          K1Y9:UMUCB.S                                                    
            5.1T2   101  MERIT_CC_SUPPORT.UMUCB.S.018       1 LINE     83    3 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:27
0          *PDP11ASR (686/32) source for the UM-MTS host Unit Control Block.
           Copies (715/5) and (715/9).
00715/019C  MERIT CC SUPPORT         NETWORK         S   G          K1Y9:NETWORK.S                                                  
            5.1T2   102  MERIT_CC_SUPPORT.NETWORK.S.019     1 LINE     84    6 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:27
0          *PDP11ASR (686/32) source for the network configuration tables.
           Contains locations (addresses) of hosts, along iwth all host and node
           names. Copies (715/5) and (715/9).
00715/020C  MERIT CC SUPPORT         ROUTE           S   G          K1Y9:ROUTE.S                                                    
            5.1T2   103  MERIT_CC_SUPPORT.ROUTE.S.020       1 LINE     84   17 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:28
0          *PDP11ASR (686/32) source for the internodal routing module. Contains
           conditional assemblies for SCP. Copies (715/5) and (715/9).
00715/021C  MERIT CC SUPPORT         SSLC            S   G          K1Y9:SSLC.S                                                     
            5.1T2   104  MERIT_CC_SUPPORT.SSLC.S.021        1 LINE    104   16 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:29
0          *PDP11ASR (686/32) source for the front-end routines for Devices
           (715/37). This part remains in unmapped memory. Contains conditional
           assembly for VM. Copies (715/5) and (715/9).
00715/022C  MERIT CC SUPPORT         END             S   G          K1Y9:END.S                                                      
            5.1T2   105  MERIT_CC_SUPPORT.END.S.022         1 LINE     64    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:29
0          *PDP11ASR (686/32) source. Sets parameters for VM or non-VM by
           conditional assembly.
00715/023C  MERIT CC SUPPORT         VMEND           S   G          K1Y9:VMEND.S                                                    
            5.1T2   106  MERIT_CC_SUPPORT.VMEND.S.023       1 LINE     77    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:30
0          *PDP11ASR (686/32) source. Defines the last VM segment and alternate
           start.
1                                                                                               SUN SEP 08/96   15:24:55   Page  489
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00715/024C  MERIT CC SUPPORT         PDP             S   G          K1Y9:PDP.S                                                      
            5.1T2   107  MERIT_CC_SUPPORT.PDP.S.024         1 LINE     73    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:30
0          *PDP11ASR (686/32) source. Establishes PS handling for PDP11s.
00715/025C  MERIT CC SUPPORT         LSI             S   G          K1Y9:LSI.S                                                      
            5.1T2   108  MERIT_CC_SUPPORT.LSI.S.025         1 LINE     81    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:30
0          *PDP11ASR (686/32) source. Establishes PS handling for LSI11s.
00715/026C  MERIT CC SUPPORT         RTRACE          S   G          K1Y9:RTRACE.S                                                   
            5.1T2   109  MERIT_CC_SUPPORT.RTRACE.S.026      1 LINE     63    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:30
0          *PDP11ASR (686/32) source. Logs R0 - R5, caller's address and callee's
           address. RTSPC tracing handler. Copies (715/5) and (715/9).
0          Referenced by comments of: 715/4 
00715/027C  MERIT CC SUPPORT         SSTRACE         S   G          K1Y9:SSTRACE.S                                                  
            5.1T2   110  MERIT_CC_SUPPORT.SSTRACE.S.027     1 LINE     66    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:30
0          DEVICES Continue Interrupt (CI) tracing handler. Copies (715/5) and
           (715/9).
00715/028A  MERIT CC SUPPORT         VECTORS         S   G          K1Y9:VECTORS.S                                                  
            5.1T2   111  MERIT_CC_SUPPORT.VECTORS.S.028     1 LINE     93    5 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:30
0          *PDP11ASR (686/32) source for the low-core system vectors and
           parameters for the Merit PDP-11 operating system (MINOS). Copies
           (715/5) and (715/9).
00715/029A  MERIT CC SUPPORT         SYSTEM          S   G          K1Y9:SYSTEM.S                                                   
            5.1T2   112  MERIT_CC_SUPPORT.SYSTEM.S.029      1 LINE    105   60 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:31
0          *PDP11ASR (686/32) source for the MINOS multitasking operating system
           and Packet Switching Network support. Copies (715/5) and (715/9).
00715/030A  MERIT CC SUPPORT         TAPE            S   G          K1Y9:TAPE.S                                                     
            5.1T2   113  MERIT_CC_SUPPORT.TAPE.S.030        1 LINE     75    4 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:33
0          *PDP11ASR (686/32) source for the paper tape and communications
           computer (CC) hosts. Copies (715/5) and (715/9).
00715/031A  MERIT CC SUPPORT         TIMER           S   G          K1Y9:TIMER.S                                                    
            5.1T2   114  MERIT_CC_SUPPORT.TIMER.S.031       1 LINE     83    7 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:33
0          *PDP11ASR (686/32) source for the MINOS interval timer support
           routines. Copies (715/5) and (715/9).
00715/032A  MERIT CC SUPPORT         PARSE           S   G          K1Y9:PARSE.S                                                    
            5.1T2   115  MERIT_CC_SUPPORT.PARSE.S.032       1 LINE     84   18 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:34
0          *PDP11ASR (686/32) source for the MINOS CLI parser. Copies (715/5) and
           (715/9).
1                                                                                               SUN SEP 08/96   15:24:55   Page  490
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00715/033A  MERIT CC SUPPORT         CMNDS           S   G          K1Y9:CMNDS.S                                                    
            5.1T2   116  MERIT_CC_SUPPORT.CMNDS.S.033       1 LINE    101   47 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:34
0          *PDP11ASR (686/32) source for the MINOS command definitions and
           execution routines. Copies (715/5) and (715/9).
00715/034A  MERIT CC SUPPORT         NIM             S   G          K1Y9:NIM.S                                                      
            5.1T2   117  MERIT_CC_SUPPORT.NIM.S.034         1 LINE    102   51 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:37
0          *PDP11ASR (686/32) source for the task time routines for terminal
           support (NIM: network interface module). Copies (715/5) and (715/9).
00715/035A  MERIT CC SUPPORT         NIBBLE          S   G          K1Y9:NIBBLE.S                                                   
            5.1T2   118  MERIT_CC_SUPPORT.NIBBLE.S.035      1 LINE     75    7 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:39
0          *PDP11ASR (686/32) source for the nibble buffer management for
           terminal support. Copies (715/5) and (715/9).
00715/036A  MERIT CC SUPPORT         SSDST           S   G          K1Y9:SSDST.S                                                    
            5.1T2   119  MERIT_CC_SUPPORT.SSDST.S.036       1 LINE     89    6 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:39
0          *PD11ASR (686/32) source for the start/stop (asynchronous) device
           support task (ring sniffer and hang-up detector). Copies (715/5) and
           (715/9).
00715/037A  MERIT CC SUPPORT         DEVICES         S   G          K1Y9:DEVICES.S                                                  
            5.1T2   120  MERIT_CC_SUPPORT.DEVICES.S.037     1 LINE     92   49 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:39
0          *PDP11ASR (686/32) source for the interrupt routines for the terminal
           support. Copies (715/5) and (715/9).
0          Referenced by comments of: 715/21 
00715/038A  MERIT CC SUPPORT         VERSNO          S   G          K1Y9:VERSNO                                                     
            5.1T2   121  MERIT_CC_SUPPORT.VERSNO.S.038      1 LINE     56    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:41
0          *PDP11ASR (686/32) source for the code to generate the system version number.
00715/039A  MERIT CC SUPPORT         MTS RARE        S   G          K1Y9:MTSRARE.S                                                  
            5.1T2   122  MERIT_CC_SUPPORT.MTS_RARE.S.039    1 LINE     89   20 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:41
0          *PDP11ASR (686/32) source for the MTS-dependent host interface
           support. Copies (715/5) and (715/9).
00715/040A  MERIT CC SUPPORT         CDC RARE        S   G          K1Y9:CDCRARE.S                                                  
            5.1T2   123  MERIT_CC_SUPPORT.CDC_RARE.S.040    1 LINE     80   12 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:42
0          *PDP11ASR (686/32) source for the CDC-dependent host interface
           support. Copies (715/5) and (715/9).
00715/041A  MERIT CC SUPPORT         INP             S   G          K1Y9:INP.S                                                      
            5.1T2   124  MERIT_CC_SUPPORT.INP.S.041         1 LINE    100   23 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:43
0          *PDP11ASR (686/32) source for the Merit internodal protocol support.
1                                                                                               SUN SEP 08/96   15:24:55   Page  491
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Contains conditional assembly for SCP. Copies (715/5) and (715/9).
00715/042A  MERIT CC SUPPORT         SDA             S   G          K1Y9:SDA.S                                                      
            5.1T2   125  MERIT_CC_SUPPORT.SDA.S.042         1 LINE     89    9 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:44
0          *PDP11ASR (686/32) source for the Merit Synchronous Data Adapter
           support. Copies (715/5) and (715/9).
00715/043A  MERIT CC SUPPORT         LINKFILE        C   G          K1Y9:LINK.AN                                                    
            5.1T2   126  MERIT_CC_SUPPORT.LINKFILE.C.043    1 LINE     63    1 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:45
0          MTS and *LINK11 commands to build a MINOS system for Ann Arbor node.
00715/044A  MERIT CC SUPPORT         EVANS           SP  G          MNET:EVANS(1000)                                                
            5.1T2   127  MERIT_CC_SUPPORT.EVANS.SP.044      1 LINE     90   18 PAGE UM   STARK               JULY 23, 1983  13:05:45
0          Merit PDP-11 dump analysis program (named after Sir Arthur John Evans,
           1851-1941, English archaeologist who excavated the palace of Minos).
           Commands used to compile may be found at the beginning of the file.
           Contains a $CONTINUE WITH *PL1OPTLIB (827/5).
0          Referenced by comments of: 715/45 
00715/045C  MERIT CC SUPPORT         EVANS           OC  G          MNET:EVANS(1,999)                                               
            5.1T2   128  MERIT_CC_SUPPORT.EVANS.OC.045      1 LINE     80   23 PAGE UM   STARK               JULY 23, 1983  13:05:47
0          Object for the Evans dump analyzer program (715/44).
00715/046A  MERIT CC SUPPORT         X25             S   G          K1Y9:X25.S                                                      
            5.1T2   129  MERIT_CC_SUPPORT.X25.S.046         1 LINE     83   30 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:47
0          *PDP11ASR (686/32) source for the X.25 support. Copies (715/5) and
           (715/9).
00715/047A  MERIT CC SUPPORT         AN              S   G          K1Y9:AN.S                                                       
            5.1T2   130  MERIT_CC_SUPPORT.AN.S.047          1 LINE     86    4 PAGE UM   ROTHWELL            JULY 23, 1983  13:05:49
0          *PDP11ASR (686/32) source for the "AN" node configuration. Copies
           (715/5) and (715/9).
00715/048C  MERIT CC SUPPORT         WSWUUCB         S   G          K1Y9:WSWUUCB.S                                                  
            5.1T2   131  MERIT_CC_SUPPORT.WSWUUCB.S.048     1 LINE     83    3 PAGE UM   KNOPPER             JULY 23, 1983  13:05:50
0          *PDP11ASR (686/32) source for host UCBs for two Amdahl hosts at Wayne
           State. Requires (715/5) and (715/9). Copies (715/5) and (715/9).
00715/049C  MERIT CC SUPPORT         WMURARE         S   G          K1Y9:WMURARE.S                                                  
            5.1T2   132  MERIT_CC_SUPPORT.WMURARE.S.049     1 LINE     81   37 PAGE UM   KNOPPER             JULY 23, 1983  13:05:50
0          *PDP11ASR (686/32) source for rare code for TOPS10 to Merit DTE-20
           interface. Requires (715/5) and (715/9).
1                                                                                               SUN SEP 08/96   15:24:55   Page  492
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00715/050C  MERIT CC SUPPORT         VAXRARE         S   G          K1Y9:VAXRARE.S                                                  
            5.1T2   133  MERIT_CC_SUPPORT.VAXRARE.S.050     1 LINE     87   11 PAGE UM   KNOPPER             JULY 23, 1983  13:05:52
0          *PDP11ASR (686/32) source for rare code for Unix Vax to Merit DA-11
           interface.  Requires (715/5) and (715/9).
00715/051C  MERIT CC SUPPORT         TTUCB           S   G          K1Y9:TTUCB.S                                                    
            5.1T2   134  MERIT_CC_SUPPORT.TTUCB.S.051       1 LINE     83    3 PAGE UM   KNOPPER             JULY 23, 1983  13:05:52
0          *PDP11ASR (686/32) source for host UCB for MTS channel interface on
           the "TT" node (the UM test node used for developmental purposes).
           Requires (715/5) and (715/9).
00715/052C  MERIT CC SUPPORT         TT              S   G          K1Y9:TT.S                                                       
            5.1T2   135  MERIT_CC_SUPPORT.TT.S.052          1 LINE     86    4 PAGE UM   KNOPPER             JULY 23, 1983  13:05:53
0          *PDP11ASR (686/32) source for the node-specific parameters for the 
           TT node.  Requires (715/5) and (715/9).
00715/053C  MERIT CC SUPPORT         KZ              S   G          K1Y9:KZ.S                                                       
            5.1T2   136  MERIT_CC_SUPPORT.KZ.S.053          1 LINE     86    4 PAGE UM   KNOPPER             JULY 23, 1983  13:05:53
0          *PDP11ASR (686/32) source for node-specific parameters for KZ
           (Western Michigan University) PCP.  Requires (715/5) and (715/9).
00715/054C  MERIT CC SUPPORT         KH              S   G          K1Y9:KH.S                                                       
            5.1T2   137  MERIT_CC_SUPPORT.KH.S.054          1 LINE     86    3 PAGE UM   KNOPPER             JULY 23, 1983  13:05:53
0          *PDP11ASR (686/32) source for node-specific parameters for MINOS 
           (the Merit operating system) running as the KH-11 diagnostic.  
           Reuqires (715/5) and (715/9).
00715/055C  MERIT CC SUPPORT         EL              S   G          K1Y9:EL.S                                                       
            5.1T2   138  MERIT_CC_SUPPORT.EL.S.055          1 LINE     86    4 PAGE UM   KNOPPER             JULY 23, 1983  13:05:53
0          *PDP11ASR (686/32) source for node-specific parameters for EL
           (Michigan State University) PCP.  Requires (715/5) and (715/9).
00715/056C  MERIT CC SUPPORT         DT              S   G          K1Y9:DT.S                                                       
            5.1T2   139  MERIT_CC_SUPPORT.DT.S.056          1 LINE     86    4 PAGE UM   KNOPPER             JULY 23, 1983  13:05:54
0          *PDP11ASR (686/32) source for node-specific parameters for DT
           (Wayne State University) PCP.  Requires (715/5) and (715/9).
00715/057C  MERIT CC SUPPORT         CVUCB           S   G          K1Y9:CVUCB.S                                                    
            5.1T2   140  MERIT_CC_SUPPORT.CVUCB.S.057       1 LINE     78    2 PAGE UM   KNOPPER             JULY 23, 1983  13:05:54
0          *PDP11ASR (686/32) source for host unit control block for CIPRNET
           VAX host.  Requires (715/5) and (715/9).
00715/058C  MERIT CC SUPPORT         CN              S   G          K1Y9:CN.S                                                       
            5.1T2   141  MERIT_CC_SUPPORT.CN.S.058          1 LINE     86    4 PAGE UM   KNOPPER             JULY 23, 1983  13:05:54
0          *PDP11ASR (686/32) source for node-specific parameters for CN
1                                                                                               SUN SEP 08/96   15:24:55   Page  493
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (CIPRNET) PCP.  Requires (715/5) and (715/9).
00715/059C  MERIT CC SUPPORT         CEWPUCB         S   G          K1Y9:CEWPUCB.S                                                  
            5.1T2   142  MERIT_CC_SUPPORT.CEWPUCB.S.059     1 LINE     83    3 PAGE UM   KNOPPER             JULY 23, 1983  13:05:55
0          *PDP11ASR (686/32) source for host UCB for 370/470/580 channel
           interfaces on CE.  Requires (715/5) and (715/9).
00715/060C  MERIT CC SUPPORT         CE              S   G          K1Y9:CE.S                                                       
            5.1T2   143  MERIT_CC_SUPPORT.CE.S.060          1 LINE     86    4 PAGE UM   KNOPPER             JULY 23, 1983  13:05:55
0          *PDP11ASR (686/32) source for node-specific parameters for 
           CE/AE/TN node.  Requires (715/5) and (715/9).
00716/001   FILE SAVE - ONLINE                                    # (PART OF FILE SAVE)                                             
                                                                                    UM                                              
0          Part of FILE SAVE.
00717/001A  MTS VOLUME 7             MASTER          WT             S0562 MTSV7 'MTS MANUALS' POSN=NEWM4.V7                         
            5.1T2   144  MTS_VOLUME_7.MASTER.WT.001         1 LINE    132  234 PAGE UM   MANUAL              JULY 23, 1983  13:07:23
0          TEXT/360 master for Volume 7 "PL/I in MTS" of the UM MTS manuals, September
           1982.
            
           Editor:  Richard A. Salisbury
00717/002A  MTS VOLUME 7             PRINT           PT             S0562 MTSV7 'MTS MANUALS' POSN=PRINT4.V7                        
            5.1T2   145  MTS_VOLUME_7.PRINT.PT.002          1 LINE    132  332 PAGE UM   MANUAL              JULY 23, 1983  13:07:30
0          TEXT/360 print file.  There is also a Xerox 9700 print file
           (which is slightly modified from the TEXT/360 print file),
           available on request.
00717/003A  MTS VOLUME 7             INDEX SOURCE    D              S0562 MTSV7 'MTS MANUALS' POSN=V7INDEXSOU.3                     
            5.1T2   146  MTS_VOLUME_7.INDEX_SOURCE.D.003    1 LINE     66    5 PAGE UM   MANUAL              JULY 23, 1983  13:07:54
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 7.
00718/001   TURNAROUND                               SA  O          S1560 5.0T3 VLO FSNAME=TURNAROUND..SA.001(1)                 256
            5.0T3   256  TURNAROUND..SA.001                 1 LINE     80   13 PAGE UM   MTA                 JULY 28, 1977  23:57:58
            5.0T7   121                       
0          PROGRAM TO PRINT HISTOGRAMS OF BATCH TURNAROUND TIMES FROM CMDSTAT DATA.
           CONTAINS THE HASP TABLES WHICH ARE USED TO COMPUTE JOB PRIORITIES FROM TIME
           ESTIMATES AND PAGES PRINTED.  THESE TABLES MAY NEED TO BE CHANGED SO AS TO
           AGREE WITH THE HASP TABLES USED AT EACH INSTALLATION.  THE PROGRAM ALSO GIVES
           SPECIAL TREATMENT TO HASP REMOTE 18 (NUBS AT UM).  COPIES COPY:CMDAREADSECT
           (531/20).
1                                                                                               SUN SEP 08/96   15:24:55   Page  494
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00718/002   TURNAROUND                               OC  O          S1560 5.0T3 VLO FSNAME=TURNAROUND..OC.002(1)                 257
            5.0T3   257  TURNAROUND..OC.002                 1 LINE     80    4 PAGE UM   MTA                 JULY 28, 1977  23:57:59
            5.0T7   122                       
0          HAS A "$CONTINUE WITH MTA:READBFR(1000)+*ANALYSIS(-600,-401) RETURN" CARD
           WHICH REFERS TO COMPS (709) AND (140/7).
00719/001   IEBUPDTE SIMULATOR                       SA  G          S1560 5.0T3 VLO FSNAME=IEBUPDTE_SIMULATOR..SA.001(1)         258
            5.0T3   258  IEBUPDTE_SIMULATOR..SA.001         1 LINE     80   16 PAGE UM   MTA                 JULY 28, 1977  23:58:01
            5.0T7   123                       
0          PROGRAM TO APPLY UPDATES INTENDED FOR THE OS IEBUPDTE PROGRAM.  UNIT 0 MUST BE
           ASSIGNED TO A LABELED INPUT TAPE, UNIT 1 TO A LABELED OUTPUT TAPE, BOTH OF WHICH
           MUST BE FORMAT FB WITH A LRECL OF 80.  THE PROGRAM USES THE INPUT TAPE DSNAMES
           AS MODULE NAMES.  CONTROL CARDS ARE READ FROM SCARDS; A RECORD OF WHAT WAS UPDATED
           IN PRODUCED ON SPRINT.  ON ANY ERROR, THE PROGRAM PRINTS THE INPUT, OLD MASTER
           POSITION, AND NEW MASTER POSITION ON SERCOM AND THEN CALLS MTS.  IF RESTARTED,
           IT ATTEMPTS TO IGNORE THE ERROR AND CONTINUE PROCESSING.
            
           FOR INPUT (FROM SCARDS), IF COLUMNS 1 AND 2 ARE NOT "./" THEN THE INPUT RECORD
           IS A DATA CARDS AND IS ADDED TO THE TAPE ON UNIT 1 IN SEQUENCE USING COLUMNS
           73-80.  IF COLUMNS 1 AND 2 ARE "./" THEN THE INPUT RECORD IS A CONTROL CARD
           AS FOLLOWS:
            
           ./ ADD NAME=X
              ADDS A NEW MODULE AFTER THE CURRENT ONE ON UNIT 1.
           ./ CHANGE NAME=X
              UPDATES X FROM UNIT 0 TO UNIT 1 COPYING ALL MODULES BEFORE IT.
           ./ REPL NAME=X
              REPLACE X.  POSITION UNIT 0 AFTER IT, COPYING ALL MODULES BEFORE IT.
           ./ DELETE SEQ1=S1 SEQ2=S2
              S1 AND S2 MUST BE ALL NUMERIC.  THE SEQ2 PARAMETER IS OPTIONAL.
           ./ ENDUP
00719/002   IEBUPDTE SIMULATOR                       OC  G          S1560 5.0T3 VLO FSNAME=IEBUPDTE_SIMULATOR..OC.002(1)         259
            5.0T3   259  IEBUPDTE_SIMULATOR..OC.002         1 LINE     80    5 PAGE UM   MTA                 JULY 28, 1977  23:58:03
            5.0T7   124                       
00720/001   LKEDCONV                                 SA  O          S1560 5.0T3 VLO FSNAME=LKEDCONV..SA.001(1)                   260
            5.0T3   260  LKEDCONV..SA.001                   1 LINE     80   60 PAGE SFU  BENET     MTA       JULY 28, 1977  23:58:06
            5.0T7   125                       
0          A LARGE PROGRAM TO AID IN CONVERTING OS/VS OBJECT LIBRARIES (EITHER FROM *UNLINKER
           OR AS OS LINK EDITOR INPUT) FOR USE IN MTS.  COMMENTS IN THE SOURCE DESCRIBE HOW
           TO USE IT.
00720/002   LKEDCONV                                 OC  O          S1560 5.0T3 VLO FSNAME=LKEDCONV..OC.002(1)                   261
            5.0T3   261  LKEDCONV..OC.002                   1 LINE     80   12 PAGE SFU  BENET     MTA       JULY 28, 1977  23:58:18
            5.0T7   126                       
00721/001A *OBJUTIL                  MAIN            SA  G          W067:OBJUTIL.S                                                  
            5.1T2   147  OBJUTIL.MAIN.SA.001                1 LINE     78   23 PAGE UM   SHERRY              JULY 23, 1983  13:07:54
0          OBJECT FILE EDITOR MAIN PROGRAM.  CALLS THE EDITOR EST SUBROUTINE (648/14).
1                                                                                               SUN SEP 08/96   15:24:55   Page  495
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          THE NEGATIVE LINES CONTAIN COMMANDS TO ASSEMBLE IT.  COPIES *GDINFODSECT
           (594), *LOADINFODSECT (001/4), AND *CNFGINFODSECT (654).  ASSEMBLE WITH
           *ASMH (737) USING THE OBJUTIL MACROS (721/14) AND (721/15) AND
           *SYSMAC. THE SYSPARM ASSEMBLY PARAMETER MAY BE USED TO SET THE VALUES OF
           THE GLOBAL SET SYMBOLS, FOR EXAMPLE,
                  SYSPARM='SNOOP=0,LOGERR=1,SHARE=UM'
           IF SNOOP=1, STATISTICS RECORDS ARE WRITTEN TO A FILE NAMED ETC:OBJUTIL.STAT.
           IF LOGERR=1, PGNTS ARE LOGGED TO A FILE NAMED ETC:OBJUTIL.ERR.
           IF SHARE=UQV, ALBERTA'S UPDATES WILL BE INCLUDED.
            
           ALL OBJUTIL ROUTINES ARE ASSEMBLED USING THE ASMH LISTING POSTPROCESSOR
           PEXIT (775/1), WHICH REQUIRES THE ASSEMBLY PARAMETER
           PAR=PEXIT=*PEXIT (775).  EACH SOURCE FILE CONTAINS AN "ASMEDIT"
           MACRO CALL TO SUPPORT THIS POSTPROCESSOR.
            
           ********************************************************************************
           D5.0B version:
            
             - A couple of bugs with the DISPLAY command fixed.
             - Object module naming convention changed to support
               PL/I Optimizing Compiler (813) object decks.
           ********************************************************************************
0          Referenced by comments of: 98/1, 316/1, 389/1, 495/2, 496/23, 528/39, 710/1, 721/14, 721/16, 821/7, 821/8, 821/9,
                 821/10, 821/11, 821/26 
00721/002  *OBJUTIL                  COMMANDS        SA  G          W067:OBJU.CMD.S                                                 
            5.0T3   263  OBJUTIL.COMMANDS.SA.002            1 LINE     84   40 PAGE UM   SHERRY              JULY 03, 1981  18:42:16
            5.0T7   128                       
0          COMMAND PROCESSOR ROUTINES.  NEGATIVE LINE NUMBER RANGE CONTAINS $RUN COMMAND
           TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15),
           *GDINFODSECT (594), AND *SYSMAC.
00721/003A *OBJUTIL                  PARSE           SA  G          W067:OBJU.PARSE.S                                               
            5.1T2   148  OBJUTIL.PARSE.SA.003               1 LINE     78   11 PAGE UM   SHERRY              JULY 23, 1983  13:07:56
0          ROUTINES FOR PARSING COMMAND LINES.  NEGATIVE LINE NUMBER RANGE CONTAINS
           COMMANDS TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15)
            *GDINFODSECT (594), AND *SYSMAC.
00721/004  *OBJUTIL                  PATCH           SA  G          W067:OBJU.PATCH.S                                               
            5.0T3   265  OBJUTIL.PATCH.SA.004               1 LINE     69    4 PAGE UM   SHERRY              JULY 03, 1981  18:42:23
            5.0T7   130                       
0          ROUTINES TO GENERATE REP CARDS. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS
           TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15), AND
           *SYSMAC.
00721/005  *OBJUTIL                  PRINTER         SA  G          W067:OBJU.PRINT.S                                               
            5.0T3   266  OBJUTIL.PRINTER.SA.005             1 LINE     68    6 PAGE UM   SHERRY              JULY 03, 1981  18:42:24
            5.0T7   131                       
0          ROUTINES TO FORMAT AND PRINT OUTPUT LINES. NEGATIVE LINE NUMBER RANGE
1                                                                                               SUN SEP 08/96   15:24:55   Page  496
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACRO LIBRARIES (721/14)
           AND (721/15) AND *SYSMAC.
00721/006A *OBJUTIL                  READSUBR        SA  G          W067:OBJU.READ.S                                                
            5.1T2   149  OBJUTIL.READSUBR.SA.006            1 LINE     83   23 PAGE UM   SHERRY              JULY 23, 1983  13:07:57
0          ROUTINES THAT READ OBJECT FILES.  NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS
           TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT
           (594), AND *SYSMAC.
00721/007  *OBJUTIL                  STORAGE         SA  G          W067:OBJU.STOR.S                                                
            5.0T3   268  OBJUTIL.STORAGE.SA.007             1 LINE     72    5 PAGE UM   SHERRY              JULY 03, 1981  18:42:32
            5.0T7   133                       
0          STORAGE ALLOCATION ROUTINES.  NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS
           TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15) AND *SYSMAC.
00721/008  *OBJUTIL                  SYMTABLE        SA  G          W067:OBJU.SYMT.S                                                
            5.0T3   269  OBJUTIL.SYMTABLE.SA.008            1 LINE     72    8 PAGE UM   SHERRY              JULY 03, 1981  18:42:33
            5.0T7   134                       
0          SYMBOL TABLE MANAGEMENT ROUTINES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS
           TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15) AND *SYSMAC.
00721/009  *OBJUTIL                  WRITING         SA  G          W067:OBJU.WRIT.S                                                
            5.0T3   270  OBJUTIL.WRITING.SA.009             1 LINE     83   19 PAGE UM   SHERRY              JULY 03, 1981  18:42:35
            5.0T7   135                       
0          ROUTINES TO WRITE OBJECT FILES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS
           TO ASSEMBLE IT.  USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT
           (594), AND *SYSMAC.
00721/010  *OBJUTIL                  IOCVT SUBR      SA  G          W067:OBJU.IOCVT.S                                               
            5.0T3   271  OBJUTIL.IOCVT_SUBR.SA.010          1 LINE     77   16 PAGE UM   SHERRY              JULY 03, 1981  18:42:40
            5.0T7   136                       
0          I/O CONVERSION ROUTINES FOR THE DISPLAY, MODIFY, AND SCAN COMMANDS.
           SHOULD BE ASSEMBLED WITH *SYSMAC.
00721/011  *OBJUTIL                  OPTIMIZE SUBR   SA  G          W067:OPTIMIZE.S                                                 
            5.0T3   272  OBJUTIL.OPTIMIZE_SUBR.SA.011       1 LINE    101   15 PAGE UM   SHERRY              JULY 03, 1981  18:42:43
            5.0T7   137                       
0          A RE-ENTRANT ROUTINE TO OPTIMIZE OBJECT MODULES FOR OBJUTIL.  THIS IS A NEW
           VERSION WITH A SLIGHTLY CHANGED CALLING SEQUENCE.  SEE THE SOURCE COMMENTS
           FOR DETAILS.  ASSEMBLE WITH OBJUTIL MISC MACROS (721/15). COPIES *CNFGINFODSECT
           (654).
00721/012  *OBJUTIL                  MISC RTNS       SA  G          W067:OBJU.RTN.S                                                 
            5.0T3   273  OBJUTIL.MISC_RTNS.SA.012           1 LINE     72   11 PAGE UM   SHERRY              JULY 03, 1981  18:42:45
            5.0T7   138                       
0          MISCELLANEOUS SUBROUTINES.  THE NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS
           TO ASSEMBLE.  USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT
1                                                                                               SUN SEP 08/96   15:24:55   Page  497
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (594), AND *SYSMAC. 
00721/013  *OBJUTIL                  EOBJUTIL        SA  G          W067:OBJU.END.S                                                 
            5.0T3   274  OBJUTIL.EOBJUTIL.SA.013            1 LINE     70    1 PAGE UM   SHERRY              JULY 03, 1981  18:42:47
            5.0T7   139                       
0          This file contains the source for a null csect called "EOBJUTIL" that is
           loaded as the last control section of OBJUTIL in shared VM.  It is used to
           mark the end of OBJUTIL for computing symbolic addresses within the program
           in the event of a fatal termination.
00721/014  *OBJUTIL                  OBJUTIL MACROS  SM  G          W067:OBJU.MAC                                                   
            5.0T3   275  OBJUTIL.OBJUTIL_MACROS.SM.014      1 LINE     72   25 PAGE UM   SHERRY              JULY 03, 1981  18:42:48
            5.0T7   140                       
0          OBJECT FILE EDITOR MACROS.  CONTAINS ROUTINE LINKAGE MACROS, MACROS THAT WERE
           FORMERLY IN THE SOURCE OF OBJUTIL (721/1), AND SEVERAL COPY SECTIONS
           INCLUDING THE PSECT DEFINITION, AND DATA STRUCTURE DSECTS.
0          Referenced by comments of: 1/9, 721/1, 721/2, 721/3, 721/4, 721/5, 721/6, 721/7, 721/8, 721/9, 721/12, 721/18,
                 722/1, 757/1 
00721/015  *OBJUTIL                  MISC MACROS     SM  G          W067:MAC                                                        
            5.0T3   276  OBJUTIL.MISC_MACROS.SM.015         1 LINE     72   12 PAGE UM   SHERRY              JULY 03, 1981  18:42:53
            5.0T7   141                       
0          MISCELLANEOUS MACROS.
0          Referenced by comments of: 1/5, 354/5, 721/1, 721/2, 721/3, 721/4, 721/5, 721/6, 721/7, 721/8, 721/9, 721/11,
                 721/12, 721/18, 722/1, 746/1, 747/4, 749/1, 757/1, 775/1 
00721/016A *OBJUTIL                  SHARED OBJECT   OE  G          SEG2:OBJUTIL                                                    
            5.1T2   150  OBJUTIL.SHARED_OBJECT.OE.016       1 LINE  20107   76 PAGE UM   SHERRY              JULY 23, 1983  13:07:58
                         SEG2:OBJUTIL         
0          OBJECT FOR THE OBJECT FILE EDITOR. LOADED INTO SHARED VM BY PISTLE. DO NOT
           CHANGE THE ORDER OF THE OBJECT MODULES IN THIS FILE. A TABLE USED BY LOGERR
           IN (721/1) DEPENDS ON IT.
00721/017  *OBJUTIL                  *OBJUTIL        OC  G          *OBJUTIL                                                        
            5.0T3   278  OBJUTIL.*OBJUTIL.OC.017            1 LINE     24    1 PAGE UM   SHERRY              JULY 03, 1981  18:43:00
            5.0T7   143  *OBJUTIL             
0          CONTAINS THE APPROPRIATE LOADER CARDS TO FORCE A REFERENCE TO THE SHARED VM
           OBJUTIL.
0          Referenced by comments of: 721/18 
00721/018  *OBJUTIL                  OBJDUMP         SA  O          W067:OBJU.DUMP.S(1,999)                                         
            5.0T3   279  OBJUTIL.OBJDUMP.SA.018             1 LINE     72    8 PAGE UM   SHERRY              JULY 03, 1981  18:43:01
            5.0T7   144                       
0          STAND-ALONE PROGRAM USED WITH SDS (600) TO PRODUCE A SYMBOLIC DUMP FROM
           INFORMATION LOGGED BY *OBJUTIL (721/17) UPON FATAL TERMINATION.  COMMENTS
1                                                                                               SUN SEP 08/96   15:24:55   Page  498
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          IN THE SOURCE FILE DESCRIBE THE USE OF THIS PROGRAM.  THE NEGATIVE LINE
           NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE.  USES THE OBJUTIL MACROS
           (721/14) AND (721/15), OLD:CC.MACROS (1054/4), *CNFGINFODSECT (654),
           *GDINFODSECT (594), AND *SYSMAC.  ASSEMBLE WITH PAR=TEST.
            
           THE OBJECT FOR THIS ROUTINE CAN BE USED VIA $DEBUG DIRECTLY OR XCTL'D TO 
           BY THE PROGRAM DUMPLOAD (721/19).
0          Referenced by comments of: 721/22 
00721/019  *OBJUTIL                  DUMPLOAD        SA  O          W067:OBJU.DUMP.S(1000,1999)                                     
            5.0T3   280  OBJUTIL.DUMPLOAD.SA.019            1 LINE     69    1 PAGE UM   SHERRY              JULY 03, 1981  18:43:09
            5.0T7   145                       
0          Driver program that loads GTSP (721/20) and XCTL's to OBJDUMP in OBJU.DUMPLIB
           (721/22).  Requires *SYSMAC.  Assemble with PAR=TEST.
0          Referenced by comments of: 721/18, 721/21 
00721/020  *OBJUTIL                  GTSP            SA  O          W067:OBJU.DUMP.S(2000,2999)                                     
            5.0T3   281  OBJUTIL.GTSP.SA.020                1 LINE     68    1 PAGE UM   SHERRY              JULY 03, 1981  18:43:12
            5.0T7   146                       
0          GETSPACE intercept used by (721/21) in XCTLing to OBJU.DUMPLIB (721/22).
           Requires *SYSMAC. Assemble with PAR=TEST.
0          Referenced by comments of: 721/19 
00721/021  *OBJUTIL                  OBJDUMP         OE  O          W067:OBJU.DUMP                                                  
            5.0T3   282  OBJUTIL.OBJDUMP.OE.021             1 LINE    428    1 PAGE UM   SHERRY              JULY 03, 1981  18:43:15
            5.0T7   147                       
0          OBJECT FOR DUMPLOAD (721/19).
            
           THIS PROGRAM MUST BE RUN FROM SDS AS:
            
                 $DEB OBJU.DUMP  0=ETC:OBJUTIL.ERR  SPRINT=*PRINT*
                 SET ECHO=OFF  OUTPUT=*PRINT*
                 RUN
            
           THE FILE ETC:OBJUTIL.ERR, IF IT EXISTS, IS USED TO COLLECT ERRORS. 
           THIS PROGRAM DOES AN XCTL TO THE ROUTINE OBJDUMP IN (721/22).
0          Referenced by comments of: 721/20 
00721/022  *OBJUTIL                  OBJU.DUMPLIB    OL  O          W067:OBJU.DUMPLIB                                               
            5.0T3   283  OBJUTIL.OBJU.DUMPLIB.OL.022        1 LINE   3088    8 PAGE UM   SHERRY              JULY 03, 1981  18:43:16
            5.0T7   148                       
0          Object library containing OBJDUMP and GTSP which is XCTL'd to by (721/18).
0          Referenced by comments of: 721/19, 721/20, 721/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  499
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00721/023  *OBJUTIL                  EXPLAIN FILE    M              ETC:OBJUTILEXP                                                  
            5.0T3   284  OBJUTIL.EXPLAIN_FILE.M.023         1 LINE     74   22 PAGE UM   SHERRY              JULY 03, 1981  18:43:17
            5.0T7   149  ETC.:OBJUTILEXP      
0          EXPLAIN COMMAND MESSAGES.  LINE NUMBERS IN THIS FILE ARE IMPORTANT.
00721/024  *OBJUTIL                  TEST DECK       D              W067:OBJUTIL.T                                                  
            5.0T3   285  OBJUTIL.TEST_DECK.D.024            1 LINE     57    3 PAGE UM   SHERRY              JULY 03, 1981  18:43:19
            5.0T7   150                       
0          THIS FILE CONTAINS SEVERAL TEST STREAMS FOR CHECKING THE OBJECT FILE EDITOR.
           IT IS USED AS FOLLOWS:
            
                  $RUN *OBJUTIL SCARDS=OBJUTIL.T
            
           THE RESULTING OUTPUT IS INSPECTED TO VERIFY THE PROGRAM'S CORRECTNESS.
00721/025  *OBJUTIL                  CHANGES         WX             W067:OBJUTIL.CX                                                 
            5.0T3   286  OBJUTIL.CHANGES.WX.025             1 LINE     76    6 PAGE UM   SHERRY              JULY 03, 1981  18:43:20
            5.0T7   151                       
0          *TEXTFORM WRITEUP DESCRIBING THE LATEST VERSION OF THE OBJECT FILE EDITOR, INCLUDING
           BUG FIXES AND NEW FEATURES.
00722/001   BLOCKHEADER                              SA  O          W009:BLKHDR.S                                                   
            5.0T3   287  BLOCKHEADER..SA.001                1 LINE    116    5 PAGE UM   SHERRY              JULY 03, 1981  18:43:22
            5.0T7   152                       
0          PROGRAM TO PRODUCE BLOCKLETTER HEADERS FOR PRINTED LISTINGS.  WRITES ON 
           SPRINT (DEFAULTING TO *PRINT*).  ACCEPTS THE FOLLOWING PARAMETERS IN THE
           PAR FIELD:  HEADER=STRING, CENTER=STRING, FOOTER=STRING, MCC|LCC (MACHINE
           LOGICAL CARRIAGE CONTROL), AND EJECT (WHICH PRODUCES A PAGE EJECT AFTER
           THE LAST HEADING).  STRING MUST BE < 10 CHARACTERS AND MAY BE ONE OF THE 
           FOLLOWING SPECIAL CODES WHICH CAUSE AN APPROPRIATE TEXT SUBSTITUTION:
            
            <V>  =  MTS VERSION CODE
            <D>  =  CURRENT DATE AS "MM/DD/YY"
            <M>  =  CURRENT MONTH SPELLED OUT
            <Y>  =  CURRENT YEAR SPELLED OUT
            <T>  =  CURRENT TIME SPELLED OUT
           <MDY> =  CURRENT DATE AS "MMMDDYY"
            
           ASSEMBLE USING THE *OBJUTIL MACROS (721/14) AND (721/15) WITH
           PAR=PEXIT=*PEXIT.
0          Referenced by comments of: 531/16 
00722/002   BLOCKHEADER                              OE  O          W009:BLKHDR                                                     
            5.0T3   288  BLOCKHEADER..OE.002                1 LINE   1982    3 PAGE UM   SHERRY              JULY 03, 1981  18:43:23
            5.0T7   153  W009:BLKHDR          
1                                                                                               SUN SEP 08/96   15:24:55   Page  500
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00723/001A  FNAMETRT                                 SA  G          MTSS:FNAMETRT(1000)                                             
            5.1T2   151  FNAMETRT..SA.001                   1 LINE     72    1 PAGE UM   MTS       BURLING   JULY 23, 1983  13:08:02
0          Translate table used by FName to decide what characters are legal in file names.
00723/002A  FNAMETRT                                 OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
00724/001   DISKCOPY                                 SA  G          S1560 5.0T3 VLO FSNAME=DISKCOPY..SA.001(1)                   290
            5.0T3   290  DISKCOPY..SA.001                   1 LINE     78   31 PAGE UM   HELFFRICH           AUG. 06, 1981  05:26:32
            5.0T7   155                       
0          Program to copy the contents of page-formatted disks to disk or tape.
           instructions appear as comments at the beginning of the program.
           Assemble using COPY:FILE.MACROS (482/45), OLD:CC.MACROS (1054/4),
           COPY:UC.MACROS (787/1), and *SYSMAC.
           The program will not work with 2311 and 2314 disks because a unit 
           check routine interface for them has not been developed.  It will
           not work for 3370-type disks either because the type of channel
           program is different.
0          Referenced by comments of: 724/3 
00724/002A  DISKCOPY                                 UC  G          FILE:DISKCOPY(1000)                                             
            5.1T2   152  DISKCOPY..UC.002                   1 LINE     68    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:04
0          Update to be applied to previously distributed source to yield current
           source.
            
           **********************************************************************
           D5.1 version:
            
           Now asks for confirmation before a volume swap is done.  This is to
           give you a chance to abort if the copy goes badly due to equipment
           problems.
           **********************************************************************
00724/003A  DISKCOPY                                 OC  G          FILE:DISKCOPY(1,999)                                            
            5.1T2   153  DISKCOPY..OC.003                   1 LINE  32732   30 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:06
                         FILE:DISKCOPY        
0          Object for (724/1). Uses the UBC subtasking monitor (1058) and references
           symbols in COPY:DEFS (579/10).
00724/004C  DISKCOPY                 WRITEUP         WF  G          FILE:DISKCOPY.W                                                 
            5.1T2   154  DISKCOPY.WRITEUP.WF.004            1 LINE     78    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:07
0          DISKCOPY writeup, based on UBC DISK.
0          Referenced by comments of: 482/28, 682/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  501
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00725/001   ACCFORMAT                                SA           # (OBSOLETE)                                                      
            RD16T1  217  ACCFORMAT..SA.                     1 LINE     80    4 PAGE UM                       JULY 12, 1979  23:16:57
0          Now part of COPY:MTS.MACROS (344/3).
00726/001   CNFGSOU                                  SA           # (OBSOLETE)                                                      
            D4T3   315   CNFGSOU..SA.001                    1 LINE     80    3 PAGE UM                       JULY 28, 1977  23:59:24
00727/001A *FTNTIDY                  MAIN            SA  G          W062:FTNTIDY.S(1000,4999)                                       
            5.1T2   155  FTNTIDY.MAIN.SA.001                1 LINE     76   49 PAGE UM   TIFFANY             JULY 23, 1983  13:08:07
0          Replacement program for *TIDY (229) and *FRISK (533).
            
           Assemble using the FTNTIDY MACLIB (727/8).  Copies  *GDINFODSECT (594).
            
           >>> NOTE:  *FTNTIDY currently understands FORTRAN 77 (subject to changes);
                      e.g., it properly indents if ... elseif ... endif.  No attempt
                      is made to process input for preprocessors such as OVERDRIVE,
                      FLECS, RATFOR, and structured WATFIV.
            
           ********************************************************************************
           D5.0A version:
            
           Implements new parameter CONTCHAR='c' which specifies the continuation
           character in column 6.
           ********************************************************************************
            
           ********************************************************************************
           D5.0B version:
            
           Changed to convert mixed case input.
           ********************************************************************************
            
           ********************************************************************************
           D5.1 version: 
            
           Modified so variables beginning with "H" are not treated as Holleriths.
           ********************************************************************************
0          Referenced by comments of: 229/1, 533/1 
00727/002  *FTNTIDY                  LBLGEN          SA  G          W062:FTNTIDY.S(5000,5999)                                       
            5.0T3   293  FTNTIDY.LBLGEN.SA.002              1 LINE     72    4 PAGE UM   TIFFANY             JULY 03, 1981  18:44:15
            5.0T7   158                       
0          SUBROUTINE TO GENERATE OR RETRIEVE LABELS. ASSEMBLE USING THE FTNTIDY MACLIB
           (727/8).
00727/003  *FTNTIDY                  STMTVM          SA  G          W062:FTNTIDY.S(6000,6999)                                       
            5.0T3   294  FTNTIDY.STMTVM.SA.003              1 LINE     72    4 PAGE UM   TIFFANY             JULY 03, 1981  18:44:36
            5.0T7   159                       
0          SUBROUTINE TO INITIALIZE, READ, AND WRITE A VIRTUAL MEMORY I/O FILE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  502
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00727/004A *FTNTIDY                  SWAPLBL         SA  G          W062:FTNTIDY.S(7000,8999)                                       
            5.1T2   156  FTNTIDY.SWAPLBL.SA.004             1 LINE     72   15 PAGE UM   TIFFANY             JULY 23, 1983  13:08:12
0          SUBROUTINE TO SWAP LABELS AND TIDY FORTRAN STATEMENTS. ASSEMBLE USING THE
           FTNTIDY MACLIB (727/8).
            
           *********************************************************************
           D5.1 version:
            
           Changed since D5.0A.
           *********************************************************************
00727/005  *FTNTIDY                  FCNTABLE        SA  G          W062:FTNTIDY.S(9000,9999)                                       
            5.0T3   296  FTNTIDY.FCNTABLE.SA.005            1 LINE     72    4 PAGE UM   TIFFANY             JULY 03, 1981  18:45:27
            5.0T7   161                       
0          A TABLE OF FORTRAN FUNCTIONS. ASSEMBLE USING THE FTNTIDY MACLIB (727/8).
00727/006  *FTNTIDY                  SPRINT          SA  G          W062:FTNTIDY.S(10000,10999)                                     
            5.0T3   297  FTNTIDY.SPRINT.SA.006              1 LINE     72    4 PAGE UM   TIFFANY             JULY 03, 1981  18:45:47
            5.0T7   162                       
0          FTNTIDY'S OWN SUBROUTINE SPRINT.  CALLS SPRINT#.
00727/007A *FTNTIDY                  FTNREAD         SA  G          W062:FTNTIDY.S(11000,11999)                                     
            5.1T2   157  FTNTIDY.FTNREAD.SA.007             1 LINE     72    9 PAGE UM   TIFFANY             JULY 23, 1983  13:08:14
0          AN INPUT ROUTINE THAT EDITS SOURCE ACCORDING TO LINE, EDITED, IBM, OR LONG
           FORMAT. ASSEMBLE USING THE FTNTIDY MACLIB (727/8).
            
           ********************************************************************************
           D5.0B version:
            
           Changed to convert mixed case input.
           ********************************************************************************
00727/008A *FTNTIDY                  MACLIB          SM  G          W062:FTNTIDYMAC                                                 
            5.1T2   158  FTNTIDY.MACLIB.SM.008              1 LINE     72    6 PAGE UM   TIFFANY             JULY 23, 1983  13:08:15
0          Referenced by comments of: 727/1, 727/2, 727/4, 727/5, 727/7 
00727/009A *FTNTIDY                                  OE  G          *FTNTIDY                                                        
            5.1T2   159  FTNTIDY..OE.009                    1 LINE  10756   10 PAGE UM   TIFFANY             JULY 23, 1983  13:08:15
                         *FTNTIDY             
00728/001A  MISC.MACROS                              SM  G          COPY:MISC.MACROS                                                
            5.1T2   160  MISC.MACROS..SM.001                1 LINE     72    7 PAGE UM   MTA                 JULY 23, 1983  13:08:16
                         COPY:MISC.MACROS     
0          Contains various miscellaneous system macros including CONSDSCT (the CONSIO
           dsect used by the OPERATOR job, CONSIO subroutine, and CONFIG job), IPLTVDCT
           used by IPLREAD and CONFIG, the MIF macros, the SVCEQU, LOCKSVC, and UNLKSVC
           macros. Documentation for the MIF macros is available in (685/4).
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  503
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 4/5, 8/1, 21/1, 45/1, 46/1, 67/10, 79/1, 354/5, 400/1, 509/1, 515/1, 540/8, 577/1,
                 598/1, 629/1, 634/1, 634/3, 634/6, 637/1, 642/15, 682/24, 732/1, 769/1, 769/4, 769/7, 769/13, 769/16, 769/19,
                 769/22, 769/30, 770/1, 777/1, 787/15, 787/17, 787/19, 790/2, 790/4, 806/1, 811/2, 818/1, 838/1, 864/2, 866/1,
                 1051/31, 1051/37, 1058/15, 3024/1, 4000/1 
00729/001   FIND LABEL               *FLB            C              *FLB                                                            
            5.0T3   302  FIND_LABEL.*FLB.C.001              1 LINE     47    1 PAGE UM   WSG                 JULY 03, 1981  18:46:35
            5.0T7   167  *FLB                 
0          Command file used by the operators to run the FNDLBL program (729/2).
           Invoked by entering MTS *FLB on the operator's console.
0          Referenced by comments of: 135/1 
00729/002   FIND LABEL               FNDLBL PGM      SA  G          S1560 5.0T3 VLO FSNAME=FIND_LABEL.FNDLBL_PGM.SA.002(1)       303
            5.0T3   303  FIND_LABEL.FNDLBL_PGM.SA.002       1 LINE     72    4 PAGE UM   WSG                 JULY 03, 1981  18:46:35
            5.0T7   168                       
0          Program to read a tape, printing out the volume label and density. Source in
           lines 1,999. Assemble using the PRINTDUMP macros (400/16). Copies
           *CNFGINFODSECT (654).
            
0          Referenced by comments of: 729/1 
00729/003   FIND LABEL               FNDLBL PGM      OC  G          SYS:FNDLBL                                                      
            5.0T3   304  FIND_LABEL.FNDLBL_PGM.OC.003       1 LINE     80    3 PAGE UM   WSG                 JULY 03, 1981  18:46:37
            5.0T7   169  SYS.:FNDLBL          
00730/001   TSS UTILITIES                            OC  G          MTS:TSS/REL3.UTL                                                
            5.0T3   305  TSS_UTILITIES..OC.001              1 LINE     80   34 PAGE UM   MTA                 JULY 03, 1981  18:46:37
            5.0T7   170                       
0          IPL-able decks for TSS Release 3 utilities (DASDI, DUMP/RESTORE, and VAM2
           utilities). Modified IBM object to allow all 16 channels.
00731/001   CHECKFE SUBR                             SA  G          S1560 5.0T3 VLO FSNAME=CHECKFE_SUBR..SA.001(1)               306
            5.0T3   306  CHECKFE_SUBR..SA.001               1 LINE     80    4 PAGE UM   OGDEN               MAY  22, 1979  07:40:40
            5.0T7   171                       
0          SUBROUTINE CALLED BY SSRTN (413/1) TO CHECK THE STATUS OF THE DATA
           CONCENTRATORS AND THE MERIT PDP-11, STORE THE STATUS CODE IN THE JOBSTA
           VECTOR, AND, OPTIONALLY, START AN MTS JOB IF "BAD" STATUS IS RETURNED.
           CALLS THE FESNIFF SUBROUTINE (731/3).  COPIES COPY:JOBSTA (413/9).
0          Referenced by comments of: 413/1, 731/3 
00731/002   CHECKFE SUBR                             OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   OGDEN                                      
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  504
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00731/003   CHECKFE SUBR             FESNIFF SUBR    SA  G          S1560 5.0T3 VLO FSNAME=CHECKFE_SUBR.FESNIFF_SUBR.SA.003(1)   307
            5.0T3   307  CHECKFE_SUBR.FESNIFF_SUBR.SA.003   1 LINE     72    3 PAGE UM   OGDEN               OCT. 02, 1980  00:42:28
            5.0T7   172                       
0          Subroutine called by CHECKFE (731/1) and CHKDEV (734/3) to actually determine
           the status of one of the Data Concentrators or the Merit PDP-11.  Copies
           COPY:GLOBALS (1026/3) and COPY:LLMPSEQU(100) (087).
0          Referenced by comments of: 731/1, 734/3 
00731/004   CHECKFE SUBR             FESNIFF SUBR    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   OGDEN                                      
0          Object part of Resident System (468).
00731/005   CHECKFE SUBR             *FIXFEP         C              *FIXFEP                                                         
            5.0T3   308  CHECKFE_SUBR.*FIXFEP.C.005         1 LINE     20    1 PAGE UM   OGDEN               JULY 03, 1981  18:48:02
            5.0T7   173  *FIXFEP              
0          OPERATOR FILE STARTED AUTOMATICALLY BY CHECKFE WHEN IT DETECTS SOMETHING 
           ABNORMAL WITH ONE OF THE FRONT END PROCESSORS. $SOURCES TO SYS:FIXFEP (731/6).
0          Referenced by comments of: 731/6 
00731/006   CHECKFE SUBR             SYS:FIXFEP      C              SYS:FIXFEP                                                      
            5.0T3   309  CHECKFE_SUBR.SYS:FIXFEP.C.006      1 LINE     84    1 PAGE UM   OGDEN               JULY 03, 1981  18:48:03
            5.0T7   174  SYS:FIXFEP           
0          COMMAND FILE $SOURCED TO BY (731/5). $RUNS SYS:HUH (734/4).
0          Referenced by comments of: 731/5 
00731/007   CHECKFE SUBR             SYS:FIXLOG      D            # SYS:FIXLOG                                                      
                                                                                    UM   OGDEN                                      
                         SYS:FIXLOG@E         
0          LOG FILE USED BY SYS:FIXFEP.
00732/001A  STOR                                     SA  G          W170:STOR(*F,-1)                                                
            5.1T2   161  STOR..SA.001                       1 LINE     73   23 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:17
                         W170:STOR            
0          STORAGE ALLOCATION ROUTINES (WHICH ARE INDEPENDENT OF MTS).  COPIES COPY:GLOBALS
           (1026/3) AND COPY:LLMPSEQU(100) (087).  ASSEMBLE USING COPY:MTS.MACROS (344/3),
           OLD:CC.MACROS (1054/4), COPY:MISC.MACROS (728), AND COPY:SETPARM (653).
0          Referenced by comments of: 41/1, 732/2 
00732/002C  STOR                     UPDATE          UC  G          W170:STOR(10000)                                                
            5.1T2   162  STOR.UPDATE.UC.002                 1 LINE     70    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:19
0          Update deck to be applied to (732/1) to yield current source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  505
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00732/003A  STOR                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
0          Referenced by comments of: 732/4 
00732/004A  STOR                     TEST PROGRAM    SA  G          W170:STOR.DUMP(1000)                                            
            5.1T2   163  STOR.TEST_PROGRAM.SA.004           1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:20
                         W170:STOR.DUMP       
0          TEST PROGRAM TO BE $DEBUGGED WITH (732/3) TO TEST IT.  STORAGE REQUESTS CAN BE
           SIMULATED BY CHANGING REGISTER CONTENTS AND GOING TO THE ROUTINE ENTRY POINT.
           A CALL TO ROUTINE STORDUMP CAN BE SET UP TO DUMP THE RESULTANT CONTROL BLOCK
           STRUCTURE.  SEE COMMENTS IN LISTING.
00732/005A  STOR                     TEST PROGRAM    OC  G          W170:STOR.DUMP(1,999)                                           
            5.1T2   164  STOR.TEST_PROGRAM.OC.005           1 LINE     80    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:20
00732/006A  STOR                     DUMP PROGRAM    SA  O          W170:STOR.VERIFY(1005)                                          
            5.1T2   165  STOR.DUMP_PROGRAM.SA.006           1 LINE     72    5 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:20
0          This program will read a dump tape and check storage control blocks for
           consistency.
00732/007A  STOR                     DUMP PROGRAM    OC  O          W170:STOR.VERIFY(1,999)                                         
            5.1T2   166  STOR.DUMP_PROGRAM.OC.007           1 LINE     80    4 PAGE UM   HELFFRICH           JULY 23, 1983  13:08:21
0          Contains a "$CONTINUE WITH MTS:PRINTDUMP" (400/17) record.
00733/001   INTRO GUIDE: TERMINALS                   WF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TERM81.SOU                
            5.0T3   315  INTRO_GUIDE:_TERMINALS..WF.001     1 LINE    102   44 PAGE UM   MANUAL              APR. 28, 1981  15:22:57
            5.0T7   180                       
0          FORMAT SOURCE FOR "INTRODUCTION TO TERMINALS," FEB. 1981.
00733/002   INTRO GUIDE: TERMINALS                   PF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TERM81.OUT                
            5.0T3   316  INTRO_GUIDE:_TERMINALS..PF.002     1 LINE     97   96 PAGE UM   MANUAL              APR. 28, 1981  15:24:27
            5.0T7   181                       
0          FORMAT PRINT FILE.
00733/003   INTRO GUIDE: TERMINALS   INDEX           D              S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TERM81.INDEX              
            5.0T3   317  INTRO_GUIDE:_TERMINALS.IN.D.003    1 LINE    100    4 PAGE UM   MANUAL              APR. 28, 1981  15:25:37
            5.0T7   182                       
0          INPUT TO *INDEX (580) FOR THE INDEX.
00734/001A  HUH                      *HUH            C              *HUH                                                            
            5.1T2   167  HUH.?HUH.C.001                     1 LINE     63    1 PAGE UM   OGDEN               JULY 23, 1983  13:08:21
                         *HUH                 
0          COMMAND FILE USED BY THE OPERATORS TO RUN THE HUH PROGRAM (734/2).  INVOKED BY
           ENTERING "MTS *HUH" ON THE OPERATORS CONSOLE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  506
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00734/002   HUH                      HUH PGM         SG  G          S1560 5.0T3 VLO FSNAME=HUH.HUH_PGM.SG.002(1)                 319
            5.0T3   319  HUH.HUH_PGM.SG.002                 1 LINE    106    1 PAGE UM   OGDEN               MAY  22, 1979  07:40:38
            5.0T7   184                       
0          PROGRAM WHICH CALLS THE CHKDEV SUBROUTINE (734/3) TO DETERMINE THE STATUS OF
           THE THREE DATA CONCENTRATORS AND THE MERIT PDP-11.
0          Referenced by comments of: 734/1, 734/3, 734/4 
00734/003   HUH                      CHKDEV SUBR     SA  G          MNET:MUP(1700,1799)                                             
            5.0T3   320  HUH.CHKDEV_SUBR.SA.003             1 LINE     80    3 PAGE UM   OGDEN               MAY  22, 1979  07:40:42
            5.0T7   185                       
0          SUBROUTINE CALLED BY MUP (642/15) AND HUH (734/2) TO DETERMINE THE STATE OF
           THE MERIT PDP-11 OR ONE OF THE DATA CONCENTRATORS AND TO RETURN THE STATE
           AND AN ASSOCIATED TEXT STRING.  CALLS FESNIFF (731/3).
0          Referenced by comments of: 642/15, 642/19, 731/3, 734/2, 734/4 
00734/004   HUH                      SYS.:HUH        OC  G          SYS:HUH                                                         
            5.0T3   321  HUH.SYS.:HUH.OC.004                1 LINE   1182    3 PAGE UM   OGDEN               APR. 06, 1980  12:37:27
            5.0T7   186  SYS:HUH              
0          OBJECT FOR HUH (734/2) AND CHKDEV (734/3).
0          Referenced by comments of: 731/6 
00735/001   RESOURCES                FILEDEF         D              DBME:RES.FD                                                     
            5.0T3   322  RESOURCES.FILEDEF.D.001            1 LINE     84    9 PAGE UM   MERIT               JULY 03, 1981  18:48:49
            5.0T7   187                       
0          THE FILE DEFINITION FOR THE SPIRES FILE DBME.RESOURCES,
           A CATALOG OF PROGRAMS, SUBROUTINES, AND DATA FILES AVAILABLE AT
           MICHIGAN COLLEGES AND UNIVERSITIES (UM, WSU, MSU, AND WMU).
           THIS FILE SHOULD BE USED WITH SPIRES 5.0 OR LATER VERSIONS
           ONLY AND SHOULD NOT BE RENUMBERED. ALWAYS COPY @-IC.
00735/002   RESOURCES                NOTES           WF             S1560 5.0T3 VLO FSNAME=RESOURCES.NOTES.WF.002(1)             323
            5.0T3   323  RESOURCES.NOTES.WF.002             1 LINE     69    2 PAGE UM   MERIT               MAY  03, 1981  16:09:04
            5.0T7   188                       
0          NOTES ON INSTALLING DBME.RESOURCES.
00735/003   RESOURCES                /A FILE         D              DBME:RESOURCES/A                                                
            5.0T3   324  RESOURCES./A_FILE.D.003            1 LINE   2048 1104 PAGE UM   MERIT               JULY 03, 1981  18:49:16
            5.0T7   189                       
0          THE /A FILE FOR DBME.RESOURCES. 
00735/004   RESOURCES                /Q FILE         D              DBME:RESOURCES/Q                                                
            5.0T3   325  RESOURCES./Q_FILE.D.004            1 LINE   2048    3 PAGE UM   MERIT               JULY 03, 1981  18:50:23
            5.0T7   190                       
0          THE /Q FILE FOR DBME.RESOURCES.
1                                                                                               SUN SEP 08/96   15:24:55   Page  507
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00735/005   RESOURCES                FORMATS         D              DBME:RES.FORMATS                                                
            5.0T3   326  RESOURCES.FORMATS.D.005            1 LINE    126   16 PAGE UM   MERIT               JULY 03, 1981  18:50:23
            5.0T7   191                       
0          THE FORMATS ASSOCIATED WITH DBME.RESOURCES.
           THIS FILE IS ORGANIZED BY 1000S.
00735/006   RESOURCES                THESAURUS       D              DBME:RES.THE                                                    
            5.0T3   327  RESOURCES.THESAURUS.D.006          1 LINE     87    8 PAGE UM   MERIT               JULY 03, 1981  18:50:25
            5.0T7   192                       
0          BATCH INPUT USED TO BUILD THE THESAURUS ASSOCIATED WITH
           THE SPIRES SUBFILE RES-SUBJECTS.
00735/007   RESOURCES                RES-SUBCHK      D              DBME:RES.SUBCHK                                                 
            5.0T3   328  RESOURCES.RES-SUBCHK.D.007         1 LINE    113   11 PAGE UM   MERIT               JULY 03, 1981  18:50:26
            5.0T7   193                       
0          BATCH INPUT USED TO BUILD THE SPIRES SUBFILE RES-SUBCHK.
00735/008   RESOURCES                JUG SUB. CODES  P              DBME:RES.SUBJECT                                                
            5.0T3   329  RESOURCES.JUG_SUB._CODES.P.008     1 LINE     72    6 PAGE UM   MERIT               JULY 03, 1981  18:50:29
            5.0T7   194                       
0          A "READABLE" LIST OF THE MODIFIED JOINT USERS GROUP (JUG)
           SUBJECT CODES.
00736/001   PLM                      PASS 0          SF  O  PLMO    S1153 UNSP VLO FSNAME=PLM80.S                                   
            5.0T3   330  PLM.PASS_0.SF.001                  1 LINE     80    1 PAGE UM   UNSP                DEC. 19, 1977  11:41:29
            5.0T7   195                       
0          THE INTEL PL/M CROSS COMPILER (VERSION 2) FOR THE 8080 MICROPROCESSOR.
           THIS IS A SHORT FORTRAN PROGRAM THAT SETS UP SOME DEFAULT I/O UNIT
           ASSIGNMENTS BY CALLING FTNCMD AND THEN LINKS TO PASS1 (736/3) AND 
           PASS2 (736/5) OF THE COMPILER.
00736/002   PLM                      PASS 0          OE  O          UNSP:PLM                                                        
            5.0T3   331  PLM.PASS_0.OE.002                  1 LINE   1162    1 PAGE UM   UNSP                JULY 03, 1981  18:50:54
            5.0T7   196                       
00736/003   PLM                      PASS 1          SF  O        # S1153 UNSP VLO FSNAME=PLM81.S                                   
                                                                                    UM   UNSP                                       
0          PASS 1 OF VERSION 2 OF INTEL'S PL/M CROSS COMPILER.
            
           NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
0          Referenced by comments of: 736/1 
00736/004   PLM                      PASS 1          OE  O        # UNSP:PLM81                                                      
                                                                                    UM   UNSP                                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  508
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00736/005   PLM                      PASS 2          SF  O        # S1153 UNSP VLO FSNAME=PLM82.S                                   
                                                                                    UM   UNSP                                       
0          PASS 2 OF VERSION 2 OF INTEL'S PL/M CROSS COMPILER.
            
           NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
0          Referenced by comments of: 736/1 
00736/006   PLM                      PASS 2          OE  O        # UNSP:PLM82                                                      
                                                                                    UM   UNSP                                       
00736/007   PLM                      SAMPLE PGM      S   G          UNSP:PLM.SAMPLE                                                 
            5.0T3   332  PLM.SAMPLE_PGM.S.007               1 LINE     72    1 PAGE UM   UNSP                JULY 03, 1981  18:51:08
            5.0T7   197                       
0          A SAMPLE PLM PROGRAM.
00736/008   PLM                                      WF             S1153 UNSP VLO FSNAME=PLM.FMT                                   
            5.0T3   333  PLM..WF.008                        1 LINE     69    3 PAGE UM   UNSP                SEP. 15, 1980  16:43:33
            5.0T7   198                       
00737/001  *ASMH                     BASIC MATERIAL  O   O        # S0858 'ASMH PTF 21' FMT=FB(3440,80)                         1   
                                                                                    UM   J BODWIN                                   
0          IBM ASMH PROGRAM PRODUCT ASSEMBLER, WHICH CANNOT BE DISTRIBUTED, BUT MUST BE
           OBTAINED DIRECTLY FROM IBM. THE MTS DISTRIBUTION CONSISTS ONLY OF
           DOCUMENTATION AND COMMANDS, PROGRAMS, AND UPDATES TO THE IBM SOURCE TO
           INSTALL ASMH IN MTS. COMPONENTS (737/1) - (737/9) ARE THE OS VERSION WHICH IS
           INTENDED TO BE USED UNDER *FAKEOS TO ASSEMBLE THE MTS VERSION, WHICH BEGINS
           WITH COMPONENT (737/10).
            
           (737/1), THE BASIC MATERIAL, IS THE IBM SUPPLIED TAPE FOR PTF 21 ASMH. THE
           PAPER LABEL ON THE IBM TAPE HAS THE FOLLOWING FORM:
            
                           ***************************
                       ****        5734-AS1           ****
                    ***                                   ***
                  **        LICEN-PROGRAM IBM PROPERTY       **
                 *       COPYRIGHT 1970 IBM CORP.              *
                *                                               *
                *       F0021    PF02                           *
                *     987-G3-30       *****         V05 M00     *
                *   5806171        ***     ***        9TR/1600  *
                *  #0535         **           **         B0064  *
                *****************               *****************
            
           ***************************************************************************
            
             ASMH is written in ASMH.  The update decks, together with the ASMH
           source from IBM, produce an ASMH source program.  This program
           provides many extensions to the standard IBM ASMH.  Unfortunately,
           the source program itself depends on some of these extensions (or,
           more correctly, the source program uses *SYSMAC which requires some
1                                                                                               SUN SEP 08/96   15:24:55   Page  509
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          of the extensions).  This means that it is NOT possible to assemble
           the extended ASMH unless you already have the extended ASMH.  This
           only poses a problem for NEW MTS installations (old MTS
           installations should already have a working version of *ASMH that
           will assemble itself).  This problem is apparently several years old
           and there are no plans to fix it before Release 2 of ASMH is
           distributed.  Anyone who runs into this problem should contact UM
           for assistance.
            
           ***************************************************************************
0          Referenced by comments of: 511/1, 648/1, 686/1, 721/1, 737/1, 810/13, 822/2, 822/6, 822/11, 822/20 
00737/002  *ASMH                     OS INFO         WF             S1560 5.0T3 VLO FSNAME=ASMH.OS_INFO.WF.002(1)                334
            5.0T3   334  ASMH.OS_INFO.WF.002                1 LINE     98    2 PAGE UM   J BODWIN            MAY  13, 1978  18:24:21
            5.0T7   199                       
0          COMPUTING CENTER INTERNAL STAFF MEMO DESCRIBING THE USE OF ASMH UNDER *FAKEOS.
00737/003  *ASMH                     INVOKER         SA  G          S1560 5.0T3 VLO FSNAME=ASMH.INVOKER.SA.003(1)                335
            5.0T3   335  ASMH.INVOKER.SA.003                1 LINE     71    3 PAGE UM   J BODWIN            MAY  13, 1978  18:24:22
            5.0T7   200                       
0          PROGRAM TO INVOKE *FAKEOS TO RUN THE OS VERSION OF ASMH. CONTAINS $CONTINUE
           WITH FAKEOS.GBLS (545/20) AND *GDINFODSECT (594) RECORDS. THE OBJECT PROGRAM
           USES NEW:ASMHSYSMAC (737/9), -ASMH#UT1, &ASMHID:ASMHLIB (737/7), AND
           &ASMHID:ASMHBLDL (737/6).
0          Referenced by comments of: 737/6, 737/7 
00737/004  *ASMH                     INVOKER         OE  G          S1560 5.0T3 VLO FSNAME=ASMH.INVOKER.OE.004(1)                336
            5.0T3   336  ASMH.INVOKER.OE.004                1 SEQ     853    1 PAGE UM   J BODWIN            MAY  13, 1978  18:24:23
            5.0T7   201                       
00737/005  *ASMH                     BLDL INPUT      D              S1560 5.0T3 VLO FSNAME=ASMH.BLDL_INPUT.D.005(1)              337
            5.0T3   337  ASMH.BLDL_INPUT.D.005              1 LINE     60    1 PAGE UM   J BODWIN            MAY  13, 1978  18:24:24
            5.0T7   202                       
0          INPUT TO *FAKEOSCREBLDL (545/43) FOR ASMH OS OBJECT DECKS.
00737/006  *ASMH                     BLDL            D              S1560 5.0T3 VLO FSNAME=ASMH.BLDL.D.006(1)                    338
            5.0T3   338  ASMH.BLDL.D.006                    1 SEQ     250    1 PAGE UM   J BODWIN            MAY  13, 1978  18:24:25
            5.0T7   203                       
0          OUTPUT FROM *FAKEOSCREBLDL (545/43) FOR OS VERSION OF ASMH. USED BY ASMHINVK
           (737/3).
0          Referenced by comments of: 737/3 
00737/007  *ASMH                     OS LIBRARY      OL  O        # ETC:ASMHLIB                                                     
                                                                                    UM   J BODWIN                                   
0          OBJECT LIBRARY VERSION OF OS ASMH.  USED BY ASMHINVK (737/3).  THIS FILE
           CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  510
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 737/3 
00737/008  *ASMH                     BLOCK MACROS    SS  O          S1560 5.0T3 VLO FSNAME=ASMH.BLOCK_MACROS.SS.008(1)           339
            5.0T3   339  ASMH.BLOCK_MACROS.SS.008           1 LINE     70    1 PAGE UM   J BODWIN            MAR. 09, 1978  22:41:24
            5.0T7   204                       
0          PROGRAM TO BLOCK A MACRO LIBRARY FOR THE OS VERSION OF ASMH.  THIS MAKES IT RUN
           FASTER AND ALLOWS LARGER LIBRARIES BY USING FEWER LINE NUMBERS.  USES UNSP:SPITLIB.
00737/009  *ASMH                     SYSMAC          SM  G          S1560 5.0T3 VLO FSNAME=ASMH.SYSMAC.SM.009(1)                 340
            5.0T3   340  ASMH.SYSMAC.SM.009                 1 LINE   4000   98 PAGE UM   J BODWIN            MAY  13, 1978  18:26:10
            5.0T7   205                       
0          VERSION OF *SYSMAC FOR OS ASMH.  THIS AGREED WITH *SYSMAC WHEN IT WAS PRODUCED
           EXCEPT FOR A FEW CHANGES WHICH WORK ONLY IN THE MTS VERSION OF ASMH.
0          Referenced by comments of: 737/1, 737/3, 737/20 
00737/010  *ASMH                     OPTNL MATERIAL  SM  O        # S0991 'ASMH SOURCE' FMT=FB(3440,80)                         1   
                                                                                    UM   J BODWIN                                   
0          SOURCE FOR THE ASMH MACRO LIBRARY.  THIS DOES NOT QUITE AGREE WITH THE OBJECT
           IN THE BASIC MATERIAL.  THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT
           RESTRICTIONS.  THE PAPER LABEL ON THE IBM TAPE HAS THE FOLLOWING FORM:
            
                           ***************************
                       ****        5734-AS1           ****
                    ***                                   ***
                  **        LICEN-PROGRAM IBM PROPERTY       **
                 *       COPYRIGHT 1970 IBM CORP.              *
                *                                               *
                *       7029 OPTIONAL                           *
                *     043-G4-46       *****         V05 M00     *
                *   5806171        ***     ***        9TR/1600  *
                *  #0694         **           **         B0634  *
                *****************               *****************
0          Referenced by comments of: 737/1, 737/23 
00737/011  *ASMH                     OPTNL MATERIAL  SA  O        # S0991 'ASMH SOURCE' FMT=FB(3440,80)                         2   
                                                                                    UM   J BODWIN                                   
0          SOURCE FOR THE OS VERSION OF ASMH.  THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM
           COPYRIGHT RESTRICTIONS.
0          Referenced by comments of: 737/15 
00737/012  *ASMH                     INFO            WF             S1560 5.0T3 VLO FSNAME=ASMH.INFO.WF.012(1)                   341
            5.0T3   341  ASMH.INFO.WF.012                   1 LINE    140    4 PAGE UM   J BODWIN            MAY  13, 1978  18:26:16
            5.0T7   206                       
0          MEMO TO COMPUTING CENTER STAFF DESCRIBING THE MTS (NOT *FAKEOS) VERSION OF *ASMH.
0          Referenced by comments of: 737/13 
1                                                                                               SUN SEP 08/96   15:24:55   Page  511
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/013  *ASMH                     INFO2           WF             S1560 5.0T3 VLO FSNAME=ASMH.INFO2.WF.013(1)                  342
            5.0T3   342  ASMH.INFO2.WF.013                  1 LINE     80    2 PAGE UM   J BODWIN            NOV. 01, 1978  02:17:47
            5.0T7   207                       
0          ADDENDUM TO (737/12).
00737/014  *ASMH                     INFO3           WX             S1560 5.0T3 VLO FSNAME=ASMH.INFO3.WX.014(1)                  343
            5.0T3   343  ASMH.INFO3.WX.014                  1 LINE    106    5 PAGE UM   J BODWIN            NOV. 02, 1979  22:27:02
            5.0T7   208                       
0          A MEMO GIVING DETAILS ABOUT RECENT CHANGES TO *ASMH.
00737/015  *ASMH                     UTILITY         SS  O          ASMH:UTIL                                                       
            5.0T3   344  ASMH.UTILITY.SS.015                1 LINE    117    4 PAGE UM   J BODWIN            JULY 03, 1981  18:53:42
            5.0T7   209  ASMH:UTIL            
0          SPITBOL PROGRAM AND MTS COMMANDS TO MAKE ASSEMBLING LESS THAN ALL OF *ASMH POSSIBLE.
           $SOURCE TO IT AND SAY HELP FOR EXPLANATION.  IT KEEPS A LOG OF CHANGES IN ASMHLOG.
           IT ASSUMES THE MACRO UPDATE HAS BEEN DONE.  THE FOLLOWING FILES ARE REFERENCED:
           SYS:ASMHMASTER (737/11), WATF:ASMHMACLIB (737/25), ASMHDIR (737/16), ASMHUPD
           (737/18), ASMHUPDBUGS (737/19), ASMHUPDMTS (737/20), ASMHUPDNUM (737/21), ASMHUPDEXTEN
           (737/22), ASMHOBJ (737/29), VARIOUS SCRATCH FILES, UNSP:SPITLIB (590/30), ASMHLOG, AND
           *CDUPDATE (1036/2).
0          Referenced by comments of: 737/16 
00737/016A *ASMH                     DIR             D              ASMH:DIR                                                        
            5.1T2   168  ASMH.DIR.D.016                     1 LINE    315    3 PAGE UM   J BODWIN            JULY 23, 1983  13:08:22
                         ASMH:DIR             
0          DIRECTORY OF LOCATION OF *ASMH COMPONENTS USED BY ASMHUTIL (737/15).
0          Referenced by comments of: 737/15 
00737/017  *ASMH                     INSTALL         C              ASMH:INSTALL                                                    
            5.0T3   346  ASMH.INSTALL.C.017                 1 LINE     50    1 PAGE UM   J BODWIN            JULY 03, 1981  18:53:45
            5.0T7   211  ASMH:INSTALL         
0          COMMANDS TO CREATE A NEW VERSION OF SEG2:ASMH IN -SEG2.
00737/018  *ASMH                     FIRST UPDATE    UC  G          ASMH:UPD                                                        
            5.0T3   347  ASMH.FIRST_UPDATE.UC.018           1 LINE     51    3 PAGE UM   J BODWIN            JULY 03, 1981  18:53:46
            5.0T7   212  ASMH:UPD             
0          Update to get rid of the ./ cards and irrelevant components in the source on the
           IBM tape.  Must be the first update applied.  The others should work in any order,
           but may not.  The order used here is BUGS, MTS, NUM, and EXTEN.  Has $CONTINUE
           WITHs to ASMHUPDBUGS (737/19), ASMHUPDMTS (737/20), ASMHUPDNUM (737/21), and
           ASMHUPDEXTEN (737/22).
0          Referenced by comments of: 737/15 
1                                                                                               SUN SEP 08/96   15:24:55   Page  512
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/019  *ASMH                     BUGS UPDATE     UC  G          ASMH:UPDBUGS                                                    
            5.0T3   348  ASMH.BUGS_UPDATE.UC.019            1 LINE     71   21 PAGE UM   J BODWIN            JULY 03, 1981  18:53:47
            5.0T7   213  ASMH:UPDBUGS         
0          Update to fix bugs and clean up ASMH, including several speed improvements.
0          Referenced by comments of: 737/15, 737/18 
00737/020  *ASMH                     MTS UPDATE      UC  G          ASMH:UPDMTS                                                     
            5.0T3   349  ASMH.MTS_UPDATE.UC.020             1 LINE     73   29 PAGE UM   J BODWIN            JULY 03, 1981  18:53:50
            5.0T7   214  ASMH:UPDMTS          
0          Update to make ASMH work in MTS. Three " COPY *GDINFODSECT" statements in
           this file must be changed to " COPY GDDSECT" for the first assembly of ASMH
           (under *FAKEOS) since the OS version restricts copy section names to
           eight-character identifiers. Also, a macro library containing ASMHSYSMAC
           (737/9), ASMHMACLIB (737/25), and GDDSECT, must be built, since only one
           macro library is allowed by the OS version.
0          Referenced by comments of: 737/15, 737/18 
00737/021  *ASMH                     NUM UPDATE      UC  G          ASMH:UPDNUM                                                     
            5.0T3   350  ASMH.NUM_UPDATE.UC.021             1 LINE     70    6 PAGE UM   J BODWIN            JULY 03, 1981  18:53:54
            5.0T7   215  ASMH:UPDNUM          
0          Update to add NUM option.
0          Referenced by comments of: 737/15, 737/18 
00737/022  *ASMH                     EXTEN OPTION    UC  G          ASMH:UPDEXTEN                                                   
            5.0T3   351  ASMH.EXTEN_OPTION.UC.022           1 LINE     72   12 PAGE UM   J BODWIN            JULY 03, 1981  18:53:56
            5.0T7   216  ASMH:UPDEXTEN        
0          Update to add features controlled by EXTEN option.
0          Referenced by comments of: 737/15, 737/18 
00737/023  *ASMH                     MACRO UPDATE    UC  G          ASMH:MACUPD                                                     
            5.0T3   352  ASMH.MACRO_UPDATE.UC.023           1 LINE     78   25 PAGE UM   J BODWIN            JULY 03, 1981  18:53:58
            5.0T7   217  ASMH:MACUPD          
0          Update to produce the MTS macro library from the IBM source (737/10).
0          Referenced by comments of: 737/25 
00737/024A *ASMH                     NEW UPDATES     UC  G          ASMH:UPDNEW                                                     
            5.1T2   169  ASMH.NEW_UPDATES.UC.024            1 LINE     78   90 PAGE UM   J BODWIN            JULY 23, 1983  13:08:23
                         ASMH:UPDNEW          
0          Post D4.1 updates, in chronological order, to ASMH.
            
           ***************************************************************************
            
             ASMH is written in ASMH.  The update decks, together with the ASMH
1                                                                                               SUN SEP 08/96   15:24:55   Page  513
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          source from IBM, produce an ASMH source program.  This program
           provides many extensions to the standard IBM ASMH.  Unfortunately,
           the source program itself depends on some of these extensions (or,
           more correctly, the source program uses *SYSMAC which requires some
           of the extensions).  This means that it is NOT possible to assemble
           the extended ASMH unless you already have the extended ASMH.  This
           only poses a problem for NEW MTS installations (old MTS
           installations should already have a working version of *ASMH that
           will assemble itself).  This problem is apparently several years old
           and there are no plans to fix it before Release 2 of ASMH is
           distributed.  Anyone who runs into this problem should contact UM
           for assistance.
            
           ***************************************************************************
00737/025  *ASMH                     MACRO LIBRARY   SM  G        # ASMH:MACLIB                                                     
                                                                                    UM   J BODWIN                                   
0          OUTPUT FROM (737/23) UPDATE.
0          Referenced by comments of: 737/15, 737/20, 737/28 
00737/026  *ASMH                     MAIN PGM        SA  G          ASMH:MAIN(1,999)                                                
            5.0T3   354  ASMH.MAIN_PGM.SA.026               1 LINE     38    1 PAGE UM   J BODWIN            JULY 03, 1981  18:54:09
            5.0T7   219  ASMH:MAIN            
0          MAIN PROGRAM TO CALL IEV90.  THIS PLUS IEV60 AND IEV61 ARE IN *ASMH.  THE REST
           MAY BE EITHER THERE OR IN SHARED VM.  ASSEMBLE USING *SYSMAC.
0          Referenced by comments of: 737/30 
00737/027  *ASMH                     MAIN PGM        OC  G          ASMH:MAIN(1000)                                                 
            5.0T3   355  ASMH.MAIN_PGM.OC.027               1 LINE     80    1 PAGE UM   J BODWIN            JULY 03, 1981  18:54:10
            5.0T7   220                       
0          ENDS WITH A "$CONTINUE WITH MTA:ASMHOBJ" RECORD.
00737/028  *ASMH                     OPTIONS ASMBLY  SA  G          S1560 5.0T3 VLO FSNAME=ASMH.OPTIONS_ASMBLY.SA.028(1)         356
            5.0T3   356  ASMH.OPTIONS_ASMBLY.SA.028         1 LINE     49    1 PAGE UM   J BODWIN            MAY  13, 1978  18:27:02
            5.0T7   221                       
0          SOURCE FOR THE "SYSGEN OPTIONS" ASSEMBLY WHICH PRODUCES IEV61 WITH LOCAL OPTIONS.
           ASSEMBLE USING ASMHMACLIB (737/25).
00737/029  *ASMH                     OBJECT          OC  G        # ASMH:OBJ                                                        
                                                                                    UM   J BODWIN                                   
0          FULL OBJECT WITH SYM CARDS.  THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT
           RESTRICTIONS.
0          Referenced by comments of: 737/15 
1                                                                                               SUN SEP 08/96   15:24:55   Page  514
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/030  *ASMH                     *ASMH           OE  G        # *ASMH                                                           
                                                                                    UM   J BODWIN                                   
                         *ASMH@UM             
0          COMBINED AND PURGED OBJECT OF ASMHMAIN (737/26), IEV60, AND IEV61.  THIS FILE CANNOT
           BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS.
0          Referenced by comments of: 163/13, 775/1, 775/2 
00737/031A *ASMH                     SHARED VM OBJ   OE  G        # SEG2:ASMH                                                       
                                                                                    UM   J BODWIN                                   
                         SEG2:ASMH@UM         
0          OBJECT WITHOUT SYM CARDS FOR THE SHARED VM PART OF ASMH.  IT INCLUDES ALL MODULES
           EXCEPT IEV60 AND IEV61.  THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT
           RESTRICTIONS.
00737/032  *ASMH                     TEST PGM #1     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#1.SA.032(1)            357
            5.0T3   357  ASMH.TEST_PGM_#1.SA.032            1 LINE     54    1 PAGE UM   J BODWIN            APR. 17, 1981  16:57:28
            5.0T7   222                       
0          PROGRAM TO TEST SS INSTRUCTIONS.
00737/033  *ASMH                     TEST PGM #2     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#2.SA.033(1)            358
            5.0T3   358  ASMH.TEST_PGM_#2.SA.033            1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  16:58:57
            5.0T7   223                       
0          PROGRAM TO TEST NEW SYSTEM SET SYMBOLS.  START AT LINE *F.
00737/034  *ASMH                     TEST PGM #3     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#3.SA.034(1)            359
            5.0T3   359  ASMH.TEST_PGM_#3.SA.034            1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  16:59:13
            5.0T7   224                       
0          PROGRAM TO TEST LITERALS IN EQU STATEMENTS AND EXPRESSIONS.
00737/035  *ASMH                     TEST PGM #4     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#4.SA.035(1)            360
            5.0T3   360  ASMH.TEST_PGM_#4.SA.035            1 LINE     76    1 PAGE UM   J BODWIN            APR. 17, 1981  16:59:26
            5.0T7   225                       
0          PROGRAM TO TEST LINE NUMBER PRINTING.  START AT LINE *F.
00737/036  *ASMH                     TEST PGM #5     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#5.SA.036(1)            361
            5.0T3   361  ASMH.TEST_PGM_#5.SA.036            1 LINE     77    1 PAGE UM   J BODWIN            APR. 17, 1981  17:26:11
            5.0T7   226                       
0          PROGRAM TO TEST COPY AND LIBRARY MACROS.  START AT LINE 10 AND ASSIGN 0 TO THIS FILE TOO.
00737/037  *ASMH                     TEST PGM #6     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#6.SA.037(1)            362
            5.0T3   362  ASMH.TEST_PGM_#6.SA.037            1 LINE     70    1 PAGE UM   J BODWIN            APR. 17, 1981  17:27:02
            5.0T7   227                       
0          PROGRAM TO TEST OPDEF, INSTSET, AND 360/67 INSTRUCTIONS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  515
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/038  *ASMH                     TEST PGM #7     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#7.SA.038(1)            363
            5.0T3   363  ASMH.TEST_PGM_#7.SA.038            1 LINE     58    1 PAGE UM   J BODWIN            APR. 17, 1981  17:27:21
            5.0T7   228                       
0          PROGRAM TO TEST NULL TYPE C CONSTANTS IN DC OR DS STATEMENTS.
00737/039  *ASMH                     TEST PGM #8     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#8.SA.039(1)            364
            5.0T3   364  ASMH.TEST_PGM_#8.SA.039            1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:27:42
            5.0T7   229                       
0          PROGRAM TO TEST "*NNN" ON LCLC OR GBLC DECLARATIONS.
00737/040  *ASMH                     TEST PGM #9     SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#9.SA.040(1)            365
            5.0T3   365  ASMH.TEST_PGM_#9.SA.040            1 LINE     63    1 PAGE UM   J BODWIN            APR. 17, 1981  17:27:56
            5.0T7   230                       
0          PROGRAM TO TEST ILLEGAL USE OF & THAT BLOWS THE OS VERSION.  START AT LINE
           10 AND ASSIGN 0 TO THIS FILE. 
00737/041  *ASMH                     TEST PGM #10    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#10.SA.041(1)           366
            5.0T3   366  ASMH.TEST_PGM_#10.SA.041           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:28:15
            5.0T7   231                       
0          PROGRAM TO TEST INNER MACRO DEFINITION.
00737/042  *ASMH                     TEST PGM #11    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#11.SA.042(1)           367
            5.0T3   367  ASMH.TEST_PGM_#11.SA.042           1 LINE     72    3 PAGE UM   J BODWIN            APR. 17, 1981  17:28:24
            5.0T7   232                       
0          PROGRAM TO TEST ORDINARY SYMBOLS IN CONDITIONAL ASSEMBLY.
00737/043  *ASMH                     TEST PGM #12    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#12.SA.043(1)           368
            5.0T3   368  ASMH.TEST_PGM_#12.SA.043           1 LINE     59    1 PAGE UM   J BODWIN            APR. 17, 1981  17:28:49
            5.0T7   233                       
0          PROGRAM TO TEST SYM CARDS.
00737/044  *ASMH                     TEST PGM #13    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#13.SA.044(1)           369
            5.0T3   369  ASMH.TEST_PGM_#13.SA.044           1 LINE     72    3 PAGE UM   J BODWIN            APR. 17, 1981  17:29:01
            5.0T7   234                       
0          PROGRAM TO TEST MACRO PARAMETER SCANNING.
00737/045  *ASMH                     TEST PGM #14    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#14.SA.045(1)           370
            5.0T3   370  ASMH.TEST_PGM_#14.SA.045           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:29:15
            5.0T7   235                       
0          PROGRAM TO TEST SERCOM OUTPUT.
00737/046  *ASMH                     TEST PGM #15    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#15.SA.046(1)           371
            5.0T3   371  ASMH.TEST_PGM_#15.SA.046           1 LINE     28    1 PAGE UM   J BODWIN            APR. 17, 1981  17:30:47
            5.0T7   236                       
0          PROGRAM TO TEST INTERMEDIATE TEXT FILE AND PRINT ONLY TEXT.
1                                                                                               SUN SEP 08/96   15:24:55   Page  516
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/047  *ASMH                     TEST PGM #16    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#16.SA.047(1)           372
            5.0T3   372  ASMH.TEST_PGM_#16.SA.047           1 LINE     45    1 PAGE UM   J BODWIN            APR. 17, 1981  17:29:45
            5.0T7   237                       
0          PROGRAM TO TEST REDEFINITION OF MACROS.
00737/048  *ASMH                     TEST PGM #17    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#17.SA.048(1)           373
            5.0T3   373  ASMH.TEST_PGM_#17.SA.048           1 LINE     61    1 PAGE UM   J BODWIN            APR. 17, 1981  17:30:00
            5.0T7   238                       
0          PROGRAM TO TEST AREAD.
00737/049  *ASMH                     TEST PGM #18    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#18.SA.049(1)           374
            5.0T3   374  ASMH.TEST_PGM_#18.SA.049           1 LINE     53    1 PAGE UM   J BODWIN            APR. 17, 1981  17:30:11
            5.0T7   239                       
0          PROGRAM TO TEST MSGLEVEL PARAMETER AND SERCOM OUTPUT.  RUN WITH MSGLEVEL=9.
00737/050  *ASMH                     TEST PGM #19    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#19.SA.050(1)           375
            5.0T3   375  ASMH.TEST_PGM_#19.SA.050           1 LINE     75    1 PAGE UM   J BODWIN            APR. 17, 1981  17:30:24
            5.0T7   240                       
0          PROGRAM TO TEST CONTINUATION AT FUNNY PLACES WHICH DON'T WORK IN OS VERSION.
00737/051  *ASMH                     TEST PGM #20    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#20.SA.051(1)           376
            5.0T3   376  ASMH.TEST_PGM_#20.SA.051           1 LINE     28    1 PAGE UM   J BODWIN            APR. 17, 1981  17:30:47
            5.0T7   241                       
0          PROGRAM TO TEST REPRO.
00737/052  *ASMH                     TEST PGM #21    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#21.SA.052(1)           377
            5.0T3   377  ASMH.TEST_PGM_#21.SA.052           1 LINE     74    2 PAGE UM   J BODWIN            APR. 17, 1981  17:31:02
            5.0T7   242                       
0          PROGRAM TO TEST MNOTE AND PUNCH.
00737/053  *ASMH                     TEST PGM #22    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#22.SA.053(1)           378
            5.0T3   378  ASMH.TEST_PGM_#22.SA.053           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:31:17
            5.0T7   243                       
0          PROGRAM TO TEST TITLE, EJECT, SPACE, AND PRINT.
00737/054  *ASMH                     TEST PGM #23    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#23.SA.054(1)           379
            5.0T3   379  ASMH.TEST_PGM_#23.SA.054           1 LINE     39    1 PAGE UM   J BODWIN            APR. 17, 1981  17:31:32
            5.0T7   244                       
0          PROGRAM TO TEST RS AND SI INSTRUCTIONS.
00737/055  *ASMH                     TEST PGM #24    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#24.SA.055(1)           380
            5.0T3   380  ASMH.TEST_PGM_#24.SA.055           1 LINE     61    1 PAGE UM   J BODWIN            APR. 17, 1981  17:31:45
            5.0T7   245                       
0          PROGRAM TO TEST ADCONS IN DSECTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  517
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/056  *ASMH                     TEST PGM #25    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#25.SA.056(1)           381
            5.0T3   381  ASMH.TEST_PGM_#25.SA.056           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:32:06
            5.0T7   246                       
0          PROGRAM TO TEST TYPE X, B, AND C CONSTANTS.
00737/057  *ASMH                     TEST PGM #26    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#26.SA.057(1)           382
            5.0T3   382  ASMH.TEST_PGM_#26.SA.057           1 LINE     37    1 PAGE UM   J BODWIN            APR. 17, 1981  17:32:21
            5.0T7   247                       
0          PROGRAM TO TEST EJECT AT BOTTOM OF PAGE WHICH GIVES A BLANK PAGE IN OS VERSION.
00737/058  *ASMH                     TEST PGM #27    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#27.SA.058(1)           383
            5.0T3   383  ASMH.TEST_PGM_#27.SA.058           1 LINE     64    1 PAGE UM   J BODWIN            APR. 17, 1981  17:32:45
            5.0T7   248                       
0          PROGRAM TO TEST TRUNCATED SETC EXPRESSIONS.
00737/059  *ASMH                     TEST PGM #28    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#28.SA.059(1)           384
            5.0T3   384  ASMH.TEST_PGM_#28.SA.059           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:33:01
            5.0T7   249                       
0          PROGRAM TO TEST BLANK CARDS WITH AND WITHOUT LABELS.
00737/060  *ASMH                     TEST PGM #29    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#29.SA.060(1)           385
            5.0T3   385  ASMH.TEST_PGM_#29.SA.060           1 LINE     55    1 PAGE UM   J BODWIN            APR. 17, 1981  17:33:10
            5.0T7   250                       
0          PROGRAM TO TEST LENGTH ATTRIBUTE WITH LITERALS, SET SYMBOLS, AND PARAMETERS.
00737/061  *ASMH                     TEST PGM #30    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#30.SA.061(1)           386
            5.0T3   386  ASMH.TEST_PGM_#30.SA.061           1 LINE     54    1 PAGE UM   J BODWIN            APR. 17, 1981  17:33:24
            5.0T7   251                       
0          PROGRAM TO TEST TITLES WITH SET SYMBOLS AND IN MACROS.
00737/062  *ASMH                     TEST PGM #31    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#31.SA.062(1)           387
            5.0T3   387  ASMH.TEST_PGM_#31.SA.062           1 LINE     67    1 PAGE UM   J BODWIN            APR. 17, 1981  17:33:45
            5.0T7   252                       
0          PROGRAM TO TEST MHELP 8 OUTPUT.
00737/063  *ASMH                     TEST PGM #32    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#32.SA.063(1)           388
            5.0T3   388  ASMH.TEST_PGM_#32.SA.063           1 LINE     65    1 PAGE UM   J BODWIN            APR. 17, 1981  17:34:03
            5.0T7   253                       
0          PROGRAM TO TEST UNREFERENCED DXD'S.
00737/064  *ASMH                     TEST PGM #33    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#33.SA.064(1)           389
            5.0T3   389  ASMH.TEST_PGM_#33.SA.064           1 LINE     66    1 PAGE UM   J BODWIN            APR. 17, 1981  17:34:18
            5.0T7   254                       
0          PROGRAM TO TEST EXPRESSIONS IN Q TYPE CONSTANTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  518
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/065  *ASMH                     TEST PGM #34    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#34.SA.065(1)           390
            5.0T3   390  ASMH.TEST_PGM_#34.SA.065           1 LINE     72    4 PAGE UM   J BODWIN            APR. 17, 1981  17:34:33
            5.0T7   255                       
0          PROGRAM TO TEST ORG AND LOCTR.  CONTAINS SEVERAL ASSEMBLIES.
00737/066  *ASMH                     TEST PGM #35    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#35.SA.066(1)           391
            5.0T3   391  ASMH.TEST_PGM_#35.SA.066           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:34:46
            5.0T7   256                       
0          PROGRAM TO TEST TRAILING COMMAS ON VARIOUS ASSEMBLER STATEMENTS.
00737/067  *ASMH                     TEST PGM #36    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#36.SA.067(1)           392
            5.0T3   392  ASMH.TEST_PGM_#36.SA.067           1 LINE     58    1 PAGE UM   J BODWIN            APR. 17, 1981  17:35:16
            5.0T7   257                       
0          TEST PROGRAM FOR PEXIT SUBROUTINE AND PARAMETER AND OCTL. INTENDED TO BE USED
           WITH (737/68).
00737/068  *ASMH                     PEXIT TEST      SA  G          S1560 5.0T3 VLO FSNAME=ASMH.PEXIT_TEST.SA.068(1)             393
            5.0T3   393  ASMH.PEXIT_TEST.SA.068             1 LINE     80    1 PAGE UM   J BODWIN            APR. 17, 1981  17:37:23
            5.0T7   258                       
0          SAMPLE PEXIT SUBROUTINE WHICH WRITES ITS PARAMETERS AND LINE AS UNIT 19.
            
           FILE CONTAINS BOTH SOURCE AND OBJECT.
0          Referenced by comments of: 737/67 
00737/069  *ASMH                     TEST PGM #37    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#37.SA.070(1)           394
            5.0T3   394  ASMH.TEST_PGM_#37.SA.070           1 LINE     47    1 PAGE UM   J BODWIN            APR. 17, 1981  17:35:44
            5.0T7   259                       
0          TEST "_" AS AN ALPHEBETIC CHARACTER
00737/070  *ASMH                     TEST PGM #38    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#38.SA.071(1)           395
            5.0T3   395  ASMH.TEST_PGM_#38.SA.071           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:36:09
            5.0T7   260                       
0          TEST CHANGES TO PASS 2 UNDEFINED SYMBOL PROCESSING
00737/071  *ASMH                     TEST PGM #39    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#39.SA.072(1)           396
            5.0T3   396  ASMH.TEST_PGM_#39.SA.072           1 LINE     71    3 PAGE UM   J BODWIN            APR. 17, 1981  17:36:34
            5.0T7   261                       
0          TEST RELOCATABLE AND QUALIFIED USINGS
00737/072  *ASMH                     TEST PGM #40    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#40.SA.073(1)           397
            5.0T3   397  ASMH.TEST_PGM_#40.SA.073           1 LINE     64    2 PAGE UM   J BODWIN            APR. 17, 1981  17:36:47
            5.0T7   262                       
0          TEST PASS2 ERRORS
1                                                                                               SUN SEP 08/96   15:24:55   Page  519
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00737/073  *ASMH                     TEST PGM #41    SA  G          S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#41.SA.074(1)           398
            5.0T3   398  ASMH.TEST_PGM_#41.SA.074           1 LINE     72    1 PAGE UM   J BODWIN            APR. 17, 1981  17:37:04
            5.0T7   263                       
0          TEST ERROR MESSAGES DURING LOOK AHEAD.
00737/074  *ASMH                     CALLER          SA  G          S1560 5.0T3 VLO FSNAME=ASMH.CALLER.SA.075(1)                 399
            5.0T3   399  ASMH.CALLER.SA.075                 1 LINE     67    1 PAGE UM   J BODWIN            MAY  13, 1978  18:27:36
            5.0T7   264                       
0          PROGRAM TO TEST DYNAMIC INVOCATION OF ASMH.  ASSEMBLE USING *SYSMAC.
00737/075  *ASMH                     CALLER          OC  G          S1560 5.0T3 VLO FSNAME=ASMH.CALLER.OC.076(1)                 400
            5.0T3   400  ASMH.CALLER.OC.076                 1 LINE     80    1 PAGE UM   J BODWIN            MAY  13, 1978  18:27:37
            5.0T7   265                       
00738/001A *MACUTIL                  SOURCE          SA  G          W062:MACUTIL.S                                                  
            5.1T2   170  MACUTIL.SOURCE.SA.001              1 LINE     72   38 PAGE UM   TIFFANY             JULY 23, 1983  13:08:27
0          *MACUTIL was adapted from *OBJUTIL with many modifications for macros instead
           of object modules; the command language is similar to that of *OBJUTIL. The
           program is reentrant and may be loaded into shared VM. *MACUTIL calls the
           Editor EST subroutine (648/14). Commands to assemble are at negative line
           numbers. Assemble using the MACUTIL macros (738/8) and *SYSMAC. Copies
           *LOADINFODSECT (001/4), *GDINFODSECT (594) and *CNFGINFODSECT (654). The
           system parameters may be specified in the assembly parameter SYSPARM, e.g.,
           SYSPARM='SNOOP=YES,CCID=ETC.'
            
           The system parameters are:
            
                SNOOP=<yes|no>    gather statistics in the file MACUTIL.STAT
                                  under user ID ccid.  The default is yes.
                LOGERR=<yes|no>   log fatal errors in the file MACUTIL.ERR
                                  under user ID ccid.  The default is yes. 
                CCID=xxxx         user ID for the explain file MACULILEXP, the 
                                  statistics file MACUTIL.STAT, and the logerr
                                  file MACUTIL.ERR.  The default for ccid is 
                                  ETC.
0          Referenced by comments of: 344/3, 738/2, 1051/3, 1079/21 
00738/002C *MACUTIL                  SUBRS           SA  G          W062:MAC.SUBR.S                                                 
            5.1T2   171  MACUTIL.SUBRS.SA.002               1 LINE     74   56 PAGE UM   TIFFANY             JULY 23, 1983  13:08:29
0          Subroutines used by *MACUTIL.  Requires MACLIB (738/8).
            
           ***********************************************************************
           D5.0B version:
            
           The source for *MACUTIL has been divided into two parts: (738/1) and 
           (738/2). 
           ***********************************************************************
0          Referenced by comments of: 738/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  520
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00738/003A *MACUTIL                  OBJECT          OE  G          *MACUTIL                                                        
            5.1T2   172  MACUTIL.OBJECT.OE.003              1 LINE  24917   15 PAGE UM   TIFFANY             JULY 23, 1983  13:08:32
                         *MACUTIL             
0          CONTAINS EDITOR EST SUBROUTINE (648/14). 
00738/004  *MACUTIL                  WRITEUP         WT             W062:MACUTIL.W                                                  
            5.0T3   403  MACUTIL.WRITEUP.WT.003             1 LINE    124   13 PAGE UM   TIFFANY             JULY 03, 1981  19:02:42
            5.0T7   268                       
00738/005  *MACUTIL                  GENEXPLAIN      SS  G          W062:GENEXPLAIN.S                                               
            5.0T3   404  MACUTIL.GENEXPLAIN.SS.004          1 LINE     90    3 PAGE UM   TIFFANY             JULY 03, 1981  19:02:46
            5.0T7   269                       
0          SPITBOL SOURCE FOR PROGRAM TO GENERATE EXPLAIN MESSAGE FILE (738/7) FROM 
           TEXT360 PRINT FILE.
0          Referenced by comments of: 738/7 
00738/006  *MACUTIL                  GENEXPLAIN      OE  G          W062:GENEXPLAIN                                                 
            5.0T3   405  MACUTIL.GENEXPLAIN.OE.005          1 LINE  18216    9 PAGE UM   TIFFANY             JULY 03, 1981  19:02:47
            5.0T7   270                       
0          SPITBOL OBJECT FOR GENEXPLAIN.
00738/007  *MACUTIL                  EXPLAIN         M              ETC:MACUTILEXP                                                  
            5.0T3   406  MACUTIL.EXPLAIN.M.006              1 LINE     75   15 PAGE UM   TIFFANY             JULY 03, 1981  19:02:48
            5.0T7   271  ETC.:MACUTILEXP      
0          EXPLAIN MESSAGE FILE GENERATED BY GENEXPLAIN (738/5).
0          Referenced by comments of: 738/5 
00738/008A *MACUTIL                  MACLIB          SM  G          W062:MACU.MAC                                                   
            5.1T2   173  MACUTIL.MACLIB.SM.008              1 LINE     73   24 PAGE UM   TIFFANY             JULY 23, 1983  13:08:33
0          MACRO LIBRARY FOR *MACUTIL.
0          Referenced by comments of: 738/1, 738/2 
00739/001  *LOGPURGE                                 SG  G          S1560 5.0T3 VLO FSNAME=LOGPURGE..SG.001(1)                   408
            5.0T3   408  LOGPURGE..SG.001                   1 LINE    118    3 PAGE UM   ENGLE               APR. 20, 1981  13:07:26
            5.0T7   273                       
0          PROGRAM TO PURGE LINES FROM A LOG FILE AFTER A SPECIFIED RETENTION PERIOD.
           REQUIRES THE DATE OF THE RECORD, WHICH MAY BE MM/DD/YY, OR DAYS, MINUTES,
           SECONDS, OR MICROSECONDS SINCE 1 MARCH 1900, TO BE IN A FIXED POSITION IN
           EACH RECORD. SEE SOURCE FOR RUN INSTRUCTIONS.
0          Referenced by comments of: 104/196, 739/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  521
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00739/002  *LOGPURGE                                 UC  G        # S0027 DISTRB FSNAME=LOGPURGEUPD                                 
            5.0T3   409  LOGPURGE..UC.002                   1 LINE    118    1 PAGE UM   ENGLE               APR. 20, 1981  13:08:06
            5.0T7   274                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00739/003  *LOGPURGE                                 OC  G          S1560 5.0T3 VLO FSNAME=LOGPURGE..OC.003(1)                   410
            5.0T3   410  LOGPURGE..OC.003                   1 LINE     80    4 PAGE UM   ENGLE               APR. 20, 1981  13:08:11
            5.0T7   275                       
00739/004  *LOGPURGE                                 OE  G          *LOGPURGE                                                       
            5.0T3   411  LOGPURGE..OE.004                   1 LINE   2086    2 PAGE UM   ENGLE               JULY 03, 1981  19:03:08
            5.0T7   276  *LOGPURGE            
0          LINKEDITED COMBINATION OF (739/1) AND *LCS (164).
00739/005  *LOGPURGE                 SYS:PURGE       OC             SYS:PURGE                                                       
            5.0T3   412  LOGPURGE.SYS:PURGE.OC.005          1 LINE     31    1 PAGE UM   OGDEN               JULY 03, 1981  19:03:09
            5.0T7   277  SYS:PURGE            
0          This contains a $CONTINUE with *LOGPURGE record and $CONTINUE WITH SEG2:CFE
           and $CONTINUE WITH SEG2:TIME records. These two time routines are normally
           post-IPL loaded. This file allows them work during IPL. Used by *CLN (531/6).
0          Referenced by comments of: 531/6 
00740/001  *CKSIG                                    SG  G          S1560 5.0T3 VLO FSNAME=CKSIG..SG.001(1)                      413
            5.0T3   413  CKSIG..SG.001                      1 LINE     78    9 PAGE UM   ENGLE               FEB. 04, 1981  13:58:25
            5.0T7   278                       
0          PROGRAM TO AUTHENTICATE A SIGNON BY CHECKING ANY OF THE FOLLOWING:  TIME OF
           SIGNON, DAY OF THE WEEK, GUINFO ITEMS, OR SNS DATA FOR *MSOURCE*.  RECORDING
           THE SIGNON IN A LOG FILE AND, FOR PROJECT NUMBERS STARTING WITH "W", 
           REQUESTING VERIFICATION FROM OPER IF THE SIGNON WOULD OTHERWISE FAIL ARE
           OPTIONAL.  SEE SOURCE FOR RUN INSTRUCTIONS.
0          Referenced by comments of: 740/4 
00740/002  *CKSIG                                    UC  G        # S1560 5.0T3 VLO FSNAME=CKSIG..UC.002(1)                      414
            5.0T3   414  CKSIG..UC.002                      1 LINE     70    1 PAGE UM   ENGLE               FEB. 04, 1981  13:58:40
            5.0T7   279                       
0          UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION.
00740/003  *CKSIG                                    OC  G          S1560 5.0T3 VLO FSNAME=CKSIG..OC.003(1)                      415
            5.0T3   415  CKSIG..OC.003                      1 LINE     80   14 PAGE UM   ENGLE               FEB. 04, 1981  13:59:29
            5.0T7   280                       
00740/004  *CKSIG                                    OE  G          *CKSIG                                                          
            5.0T3   416  CKSIG..OE.004                      1 LINE   8804    6 PAGE UM   ENGLE               JULY 03, 1981  19:03:30
            5.0T7   281  *CKSIG               
0          LINKEDITED COMBINATION OF (740/1) AND *LCS (164).
1                                                                                               SUN SEP 08/96   15:24:55   Page  522
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00741/001   MTS VOLUME 16            MASTER          WT             S1163 MTSV16 'MTS MANUALS' POSN=NEWM3.V16                       
            5.0T3   417  MTS_VOLUME_16.MASTER.WT.001        1 SEQ     132  285 PAGE UM   MANUAL              JULY 03, 1981  19:06:39
            5.0T7   282                       
0          TEXT/360 MASTER FOR VOLUME 16 "ALGOL W IN MTS" OF THE UM MTS 
           MANUALS, SEPT. 1980.
0          Referenced by comments of: 528/1 
00741/002   MTS VOLUME 16            PRINT           PT             S1163 MTSV16 'MTS MANUALS' POSN=PRINT3.V16                      
            5.0T3   418  MTS_VOLUME_16.PRINT.PT.002         1 SEQ     132  536 PAGE UM   MANUAL              JULY 03, 1981  19:07:01
            5.0T7   283                       
0          TEXT/360 PRINT FILE.
00741/003   MTS VOLUME 16            INDEX SOURCE    D              S1163 MTSV16 'MTS MANUALS' POSN=V16INDEXSOU.2                   
            5.0T3   419  MTS_VOLUME_16.INDEX_SOURC.D.003    1 SEQ      51   16 PAGE UM   MANUAL              JULY 03, 1981  19:07:49
            5.0T7   284                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 16.
00742/001   TAPE DIRECTORY           MAIN PGM        SG  G          W044:TAPEDIR.S                                                  
            5.0T3   420  TAPE_DIRECTORY.MAIN_PGM.SG.001     1 LINE    130   15 PAGE UM   SALISBURY           JULY 03, 1981  19:07:51
            5.0T7   285                       
0          CONVERSATIONAL PROGRAM TO CREATE AND MAINTAIN A TAPE DIRECTORY. THE USE OF
           THIS PROGRAM IS DESCRIBED BY COMPONENT (742/6).
0          Referenced by comments of: 50/6, 616/1, 742/3, 742/4 
00742/002   TAPE DIRECTORY           KWFCN FUNCTION  SG  G          W044:TAPEDIR.SF                                                 
            5.0T3   421  TAPE_DIRECTORY.KWFCN_FUNC.SG.002   1 LINE     90    3 PAGE UM   SALISBURY           JULY 03, 1981  19:08:03
            5.0T7   286                       
0          SOURCE FOR THE KWSCAN FUNCTION, "KWFCN".
0          Referenced by comments of: 742/4 
00742/003   TAPE DIRECTORY           DIRECTORY FUNC  SG  G          W044:DIRLIB.S                                                   
            5.0T3   422  TAPE_DIRECTORY.DIRECTORY.SG.003    1 LINE    126   14 PAGE UM   SALISBURY           JULY 03, 1981  19:08:04
            5.0T7   287                       
0          SUBROUTINE LIBRARY USED TO ACCESS A TAPE DIRECTORY.  MAY BE USED AS A 
           STAND-ALONE SUBROUTINE LIBRARY (THERE ARE MANY ENTRY POINTS) OR IN 
           CONJUNCTION WITH THE TAPE DIRECTORY PROGRAM (742/1).
0          Referenced by comments of: 742/4, 742/5 
00742/004   TAPE DIRECTORY           OBJECT          OC  G          SYS:DIRPROGRAM                                                  
            5.0T3   423  TAPE_DIRECTORY.OBJECT.OC.004       1 LINE     80   28 PAGE UM   SALISBURY           JULY 03, 1981  19:08:18
            5.0T7   288  SYS.:DIRPROGRAM      
0          OBJECT OF (742/1), (742/2), AND (742/3). CONTAINS A $CONTINUE WITH SYS:DIRLIB
           (742/5) RECORD.
1                                                                                               SUN SEP 08/96   15:24:55   Page  523
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00742/005   TAPE DIRECTORY           DIRECTORY FUNC  OC  G          SYS:DIRLIB                                                      
            5.0T3   424  TAPE_DIRECTORY.DIRECTORY.OC.005    1 LINE     80   18 PAGE UM   SALISBURY           JULY 03, 1981  19:08:20
            5.0T7   289  SYS.:DIRLIB          
0          OBJECT OF (742/3), WHICH MAY BE USED SEPARATELY FOR EASY REFERENCE BY OTHER
           SYSTEM COMPONENTS. THE USE OF THIS PROGRAM IS DESCRIBED BY (742/6).
0          Referenced by comments of: 50/4, 616/2, 617/4, 742/4, 753/5 
00742/006   TAPE DIRECTORY           WRITEUP         WT             W044:DIR.WRITEUP                                                
            5.0T3   425  TAPE_DIRECTORY.WRITEUP.WT.006      1 LINE     93   15 PAGE UM   SALISBURY           JULY 03, 1981  19:08:22
            5.0T7   290                       
0          DESCRIPTION OF THE TAPE DIRECTORY PROGRAM AND FUNCTIONS.
0          Referenced by comments of: 742/1, 742/5, 742/7 
00742/007   TAPE DIRECTORY           WRITEUP         PT             W044:DIR.PRINT                                                  
            5.0T3   426  TAPE_DIRECTORY.WRITEUP.PT.007      1 LINE    132   31 PAGE UM   SALISBURY           JULY 03, 1981  19:08:24
            5.0T7   291                       
0          LINE PRINTER OUTPUT FOR (742/6). COPY TO A TN PRINTER @MCC.
00743/001   HARDWARE CONFIG PLOT                     SF  G  CNFG    W032:CONFIGPLOT                                                 
            5.0T3   427  HARDWARE_CONFIG_PLOT..SF.001       1 LINE     80   49 PAGE UM   EMERY               JULY 03, 1981  19:08:27
            5.0T7   292                       
0          THIS IS THE FORTRAN SOURCE FOR THE MACHINE CONFIGURATION PLOT GENERATION 
           PROGRAM.  IT CONSISTS OF A MAIN PROGRAM, WHICH IS STRONGLY INSTALLATION 
           DEPENDENT, AND VARIOUS SUBROUTINES THAT ARE INSTALLATION INDEPENDENT.  NO 
           ATTEMPT IS MADE TO ISOLATE THE INSTALLATION DEPENDENCIES FROM THE PROGRAM BY 
           PUTTING THEM IN AN AUXILIARY INPUT FILE.  CONSEQUENTLY, ANY INSTALLATION 
           WISHING TO USE THIS PROGRAM WILL HAVE TO MODIFY AND RECOMPILE IT TO SUIT THE 
           LOCAL CONFIGURATION.
00744/001   DAVE.GENLIB              MAIN            S*  O          S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.MAIN.S*.001(1)            428
            5.0T3   428  DAVE.GENLIB.MAIN.S*.001            1 LINE     93    5 PAGE UM   BRILL               APR. 06, 1980  13:09:43
            5.0T7   293                       
0          MAIN PROGRAM, WRITTEN IN *SNOSTORM, TO ANALYZE FORTRAN SUBROUTINES,
           E. G., THOSE IN *LIBRARY (524/1), CALLED BY PROGRAMS FREQUENTLY
           ANALYZED THROUGH *DAVE (765).  THIS FILE ALSO CONTAINS COMMANDS TO 
           COMPILE IT.
0          Referenced by comments of: 744/5 
00744/002   DAVE.GENLIB              ASM SUBRS       SA  O          S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.ASM_SUBRS.SA.002(1)       429
            5.0T3   429  DAVE.GENLIB.ASM_SUBRS.SA.002       1 LINE     67    1 PAGE UM   BRILL               APR. 06, 1980  13:09:46
            5.0T7   294                       
0          ASSEMBLY LANGUAGE SUBROUTINES.  THIS FILE ALSO CONTAINS COMMANDS TO 
           ASSEMBLE IT.
0          Referenced by comments of: 744/4, 744/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  524
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00744/003   DAVE.GENLIB              FTN SUBRS       SF  O          S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.FTN_SUBRS.SF.003(1)       430
            5.0T3   430  DAVE.GENLIB.FTN_SUBRS.SF.003       1 LINE     81    3 PAGE UM   BRILL               APR. 06, 1980  13:09:48
            5.0T7   295                       
0          FORTRAN LANGUAGE SUBROUTINES.  THIS FILE ALSO CONTAINS THE COMMANDS TO
           COMPILE IT.
0          Referenced by comments of: 744/4, 744/5 
00744/004   DAVE.GENLIB              SUBR LIB        OL  O          S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.SUBR_LIB.OL.004(1)        431
            5.0T3   431  DAVE.GENLIB.SUBR_LIB.OL.004        1 LINE   1424    4 PAGE UM   BRILL               APR. 06, 1980  13:09:51
            5.0T7   296                       
0          OBJECT OF (744/2) AND (744/3).
00744/005   DAVE.GENLIB              *DAVE.GENLIB    OE  O          *DAVE.GENLIB                                                    
            5.0T3   432  DAVE.GENLIB.*DAVE.GENLIB.OE.005    1 LINE     80   16 PAGE UM   BRILL               JULY 03, 1981  19:09:02
            5.0T7   297  *DAVE.GENLIB         
0          OBJECT OF (744/1), (744/2), AND (744/3). HAS A $CONTINUE WITH *SPITLIB
           RECORD.
0          Referenced by comments of: 744/6, 744/7 
00744/006   DAVE.GENLIB              *LIBRARY DESCR  D              S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.*LIBRARY_DESC.D.006(1)    433
            5.0T3   433  DAVE.GENLIB.*LIBRARY_DESC.D.006    1 LINE     74   12 PAGE UM   BRILL               APR. 06, 1980  13:09:56
            5.0T7   298                       
0          DATA USED BY *DAVE.GENLIB (744/5) FOR CREATING DAVE.EXT (744/7).  THE DATA
           CONSISTS OF DESCRIPTIONS, IN FORMAT SUITABLE FOR INPUT TO *DAVE.GENLIB, OF
           ALL OF THE FORTRAN-CALLABLE SUBROUTINES IN *LIBRARY (524/1).
0          Referenced by comments of: 744/7 
00744/007   DAVE.GENLIB              DAVE.EXT        D              ETC:DAVE.EXT                                                    
            5.0T3   434  DAVE.GENLIB.DAVE.EXT.D.007         1 LINE   2660    7 PAGE UM   BRILL               JULY 03, 1981  19:11:28
            5.0T7   299  ETC:DAVE.EXT         
0          EXTERNAL SUBROUTINE LIBRARY REQUIRED BY *DAVE (765/2). DAVE.EXT IS CREATED BY
           *DAVE.GENLIB (744/5) USING THE (744/6) DATA.
0          Referenced by comments of: 744/6, 765/2 
00744/008   DAVE.GENLIB              MEMO 402        WF             S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.MEMO_402.WF.008(1)        435
            5.0T3   435  DAVE.GENLIB.MEMO_402.WF.008        1 LINE     70    3 PAGE UM   BRILL               JULY 13, 1979  11:27:39
            5.0T7   300                       
0          THIS IS COMPUTING CENTER MEMO 402 -- "*DAVE.GENLIB".
00745/001  *LALRGEN                                  SP  G          ALWB:LALRGEN.S                                                  
            5.0T3   436  LALRGEN..SP.001                    1 LINE     85   32 PAGE UM   J BODWIN            JULY 03, 1981  19:11:30
            5.0T7   301                       
0          SOURCE FOR AN LALR(1) PARSE TABLE GENERATOR. COMPILE WITH 
1                                                                                               SUN SEP 08/96   15:24:55   Page  525
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          PAR=SORMGIN=(2,72,1),MACRO.
0          Referenced by comments of: 1080/1 
00745/002  *LALRGEN                                  OE  G          *LALRGEN                                                        
            5.0T3   437  LALRGEN..OE.002                    1 LINE  32767   20 PAGE UM   J BODWIN            JULY 03, 1981  19:11:34
            5.0T7   302  *LALRGEN             
0          THIS FILE IS OBTAINED FROM THE PL/1 OBJECT AS FOLLOWS:
            
              $RUN *LINKEDIT
              INCLUDE LALRGEN.O
              RENAME IHESAPC IHESAPE
              INCLUDE@SLI *PL1LIB
              INCLUDE@SLI *LIBRARY
              INCLUDE *LCS
              COMBINE
              PUNCH LALRGEN.L
              STOP
00746/001A  COMPARE                                  SA  G          W062:COMPARE.S                                                  
            5.1T2   174  COMPARE..SA.001                    1 LINE    103   45 PAGE UM   TIFFANY             JULY 23, 1983  13:08:34
0          A fast comparison program. Assemble using macros in order: the COMPARE macros
           (746/3), OBJUTIL miscellaneous macros (721/15), and *SYSMAC with PEXIT=*PEXIT
           (775). Copies *GDINFODSECT (594).
00746/002A  COMPARE                                  OE  G          *COMPARE                                                        
            5.1T2   175  COMPARE..OE.002                    1 LINE  16828    6 PAGE UM   TIFFANY             JULY 23, 1983  13:08:36
                         *COMPARE             
00746/003A  COMPARE                  PROC.MAC        SM  G          W062:PROC.MAC                                                   
            5.1T2   176  COMPARE.PROC.MAC.SM.003            1 LINE     73   14 PAGE UM   TIFFANY             JULY 23, 1983  13:08:36
0          Contains macros PROC, ENDPROC, RETURN, INVOKE, etc., used by the assembly of
           compare program.
            
           **********************************************************************
           D5.1 version:
            
           New macro, SETBIT, added.
           **********************************************************************
0          Referenced by comments of: 746/1, 749/1 
00746/004   COMPARE                  WRITEUP         WF             W062:COMPARE.ITEM                                               
            5.0T3   441  COMPARE.WRITEUP.WF.004             1 LINE     71    1 PAGE UM   TIFFANY             JULY 03, 1981  19:11:54
            5.0T7   306                       
0          This is a writeup describing the feature which allows *COMPARE to 
           produces CDUPDATE control commands. This feature is not documented
           in the MTS Volume 2 *COMPARE writeup.
1                                                                                               SUN SEP 08/96   15:24:55   Page  526
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00747/001   SIDELABEL                                S   G          S1560 5.0T3 VLO FSNAME=SIDELABEL..S.001(1)                   442
            5.0T3   442  SIDELABEL..S.001                   1 LINE     88    3 PAGE UM   J BODWIN            JULY 12, 1979  23:17:44
            5.0T7   307                       
0          OVERDRIVE source for SIDELABEL, a program to label the edge of printouts.
0          Referenced by comments of: 747/3, 811/2, 811/4, 811/6, 811/8 
00747/002   SIDELABEL                                SF  G          S1560 5.0T3 VLO FSNAME=SIDELABEL..SF.002(1)                  443
            5.0T3   443  SIDELABEL..SF.002                  1 LINE     72    3 PAGE UM   J BODWIN            JULY 12, 1979  23:17:46
            5.0T7   308                       
0          FORTRAN source for SIDELABEL.
0          Referenced by comments of: 747/3 
00747/003   SIDELABEL                                OE  G          S1560 5.0T3 VLO FSNAME=SIDELABEL..OE.003(1)                  444
            5.0T3   444  SIDELABEL..OE.003                  1 LINE   2290    2 PAGE UM   J BODWIN            JULY 12, 1979  23:17:46
            5.0T7   309                       
0          Object of (747/1) and (747/2).
0          Referenced by comments of: 498/1, 747/4, 747/5 
00747/004   SIDELABEL                EDGER           SA  G          W067:EDGER(1000)                                                
            5.0T3   445  SIDELABEL.EDGER.SA.004             1 LINE     72    4 PAGE UM   SHERRY              JULY 03, 1981  19:11:56
            5.0T7   310                       
0          An interface to ALWB:SIDELABEL (747/3) to bypass the extra scan SIDELABEL
           must make to count the number of pages in a listing. Assemble with the
           (721/15) macros with PAR=BATCH,PEXIT=*PEXIT. When $RUN, a page estimate must
           be specified in the PAR field, e.g., PAR=PAGES=120. Program is documented in
           the source comments beginning at line 1022.
00747/005   SIDELABEL                EDGER           OC  G          W067:EDGER(1,999)                                               
            5.0T3   446  SIDELABEL.EDGER.OC.005             1 LINE   1160    2 PAGE UM   SHERRY              JULY 03, 1981  19:11:58
            5.0T7   311                       
0          Contains a $CONTINUE WITH ALWB:SIDELABEL (747/3) record.
0          Referenced by comments of: 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 
00748/001   INTRO GUIDE: MTS                         WF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=MTS.SOU(2)                
            5.0T3   447  INTRO_GUIDE:_MTS..WF.001           1 LINE    154  119 PAGE UM   MANUAL              AUG. 18, 1980  15:44:18
            5.0T7   312                       
0          FORMAT SOURCE FOR "INTRODUCTION TO MTS," SEPTEMBER 1980.
00748/002   INTRO GUIDE: MTS                         PF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=MTS.OUT(2)                
            5.0T3   448  INTRO_GUIDE:_MTS..PF.002           1 LINE     81  165 PAGE UM   MANUAL              AUG. 18, 1980  15:46:28
            5.0T7   313                       
0          FORMAT PRINT FILE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  527
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00748/003   INTRO GUIDE: MTS         INDEX           D              S0702 MTS.UG 'MTS USER GUIDES' FSNAME=MTS.INDEX80               
            5.0T3   449  INTRO_GUIDE:_MTS.INDEX.D.003       1 LINE    140   11 PAGE UM   MANUAL              AUG. 18, 1980  15:58:57
            5.0T7   314                       
0          INPUT TO *INDEX (580) FOR THE INDEX TO "INTRODUCTION TO MTS."
00749/001   MACSCAN                                  SA  G          W062:MACSCAN.S                                                  
            5.0T3   450  MACSCAN..SA.001                    1 LINE     74   17 PAGE UM   UNSP      TIFFANY   JULY 03, 1981  19:12:42
            5.0T7   315                       
0          Program to scan assembly language programs and list macros and copy
           sections used. Assemble with the following macro libraries: 2=W062:PROC.MAC
           (746/3), the (721/15) *OBJUTIL macros, and *SYSMAC, with PEXIT=*PEXIT.
           Copies *GDINFODSECT (594).
00749/002   MACSCAN                                  OE  G          UNSP:MACSCAN                                                    
            5.0T3   451  MACSCAN..OE.002                    1 LINE   5698    6 PAGE UM   UNSP      TIFFANY   JULY 03, 1981  19:12:55
            5.0T7   316  UNSP:MACSCAN         
00749/003   MACSCAN                  360 INSTS       D              UNSP:MACSCAN.360                                                
            5.0T3   452  MACSCAN.360_INSTS.D.003            1 LINE     74    1 PAGE UM   UNSP      TIFFANY   JULY 03, 1981  19:12:56
            5.0T7   317  UNSP:MACSCAN.360     
0          A LIST OF 360 INSTRUCTIONS READ BY MACSCAN AT EXECUTION TIME.
00749/004   MACSCAN                  370 INSTS       D              UNSP:MACSCAN.370                                                
            5.0T3   453  MACSCAN.370_INSTS.D.004            1 LINE     74    1 PAGE UM   UNSP      TIFFANY   JULY 03, 1981  19:12:57
            5.0T7   318  UNSP:MACSCAN.370     
0          A LIST OF 370 INSTRUCTIONS READ BY MACSCAN AT EXECUTION TIME.
00749/005   MACSCAN                  WRITEUP         WF             W062:MACSCAN.W                                                  
            5.0T3   454  MACSCAN.WRITEUP.WF.005             1 LINE     81    1 PAGE UM   UNSP      TIFFANY   JULY 03, 1981  19:12:58
            5.0T7   319                       
0          FORMAT SOURCE FOR MACSCAN WRITEUP.
00750/001   XREF                                     SS  O          S1153 UNSP VLO FSNAME=XREF.S                                    
            5.0T3   455  XREF..SS.001                       1 LINE    101    3 PAGE UBC  BALLARD   UNSP      DEC. 20, 1978  23:16:56
            5.0T7   320                       
0          A GENERAL CROSS REFERENCE PROGRAM WRITTEN AT UBC.  AT UM, THIS PROGRAM IS
           CLASSIFIED AS UNSUPPORTED SOFTWARE.
00750/002   XREF                                     OC  O          UNSP:XREF                                                       
            5.0T3   456  XREF..OC.002                       1 LINE     80    7 PAGE UBC  BALLARD   UNSP      JULY 03, 1981  19:13:12
            5.0T7   321  UNSP:XREF            
0          HAS A $CONTINUE WITH *SPITLIB CARD.
1                                                                                               SUN SEP 08/96   15:24:55   Page  528
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00751/001   ILLBEBACK                                SG  G          S1153 UNSP VLO FSNAME=ILLBEBACK.S                               
            5.0T3   457  ILLBEBACK..SG.001                  1 LINE     76    1 PAGE UM   UNSP                JAN. 02, 1979  17:18:11
            5.0T7   322                       
0          PROGRAM TO LOCK A TERMINAL SESSION.
00751/002   ILLBEBACK                                OC  G          UNSP:ILLBEBACK                                                  
            5.0T3   458  ILLBEBACK..OC.002                  1 LINE     80    1 PAGE UM   UNSP                JULY 03, 1981  19:13:14
            5.0T7   323  UNSP:ILLBEBACK       
00751/003   ILLBEBACK                WRITEUP         WF             S1153 UNSP VLO FSNAME=ILLBEBACK.F                               
            5.0T3   459  ILLBEBACK.WRITEUP.WF.003           1 LINE     67    1 PAGE UM   UNSP                JAN. 09, 1979  16:52:07
            5.0T7   324                       
00752/001A  HASP LOG                 COLLECTION PGM  SA  O          W116:HSP.COLLCT.S                                               
            5.1T2   177  HASP_LOG.COLLECTION_PGM.SA.001     1 LINE     75   42 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:37
0          At UM, this program is started after a system reload to examine files created
           by CMDSTAT (531/1) with names of the form HASPLOGxxxxx.  These files contain
           all information currently outputted to the HASP log printer.  The program 
           condenses the information and places it into files having names of the form
           HSyymmddhh where yymmddhh is the time the file is created.  Normally there is
           only one HSyymmdhh file for each day.  The program destroys the HASPLOGxxxxx
           files as they are processed.  The HSyymmddhh files are kept for 7 days and
           then destroyed. 
            
           In addition to the above files, the program also maintains the following
           files: 
            
              UNKHSPMSGS -- all hasp messages that can not currently be handled
                            by the collection program are recorded here.
            
              HSDEVTBLES -- used for internal bookkeeping and to let the
                            retrieval program know which HSyymmddhh files
                            are available.  The program also requires that
                            this file exist so that it can keep track of 
                            the next job on the printer, the punch, etc.
            
              HLOGPRV    -- the HASPLOG collection program calls the MTS CHKFILE
                            subroutine (part of the resident system) to get  
                            sharing descriptors that the ID which is running
                            the program has to this file.  A user's access 
                            determines the amount and type of information
                            he can have returned by HASPLOG.
            
           The collection program assumes it is being run under the same IC as the
           CMDSTAT program.  To start the program some HASPLOGxxxxx files must be 
           available as well as empty files of the following names:  HS78010100,
           UNKHSPMSGS, and HSDEVTBLES.
            
           Assemble with PAR=BATCH. Uses HSP.MACLIB (752/7).
           Copies *GFINFODSECT (594).
            
           ********************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  529
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          D5.0A version:
            
           Note:  This is a new version of HASPLOG and is incompatible with the old
           version's HSyymmddhh files.  A conversion program (752/9) is supplied to 
           convert these files to the new format.
           ********************************************************************************
0          Referenced by comments of: 387/19, 752/3, 752/4, 752/7 
00752/002A  HASP LOG                 COLLECTION PGM  OC  O          SYS:HLOG                                                        
            5.1T2   178  HASP_LOG.COLLECTION_PGM.OC.002     1 LINE  17412    6 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:39
00752/003   HASP LOG                 *HLG            C              *HLG                                                            
            5.0T3   462  HASP_LOG.*HLG.C.003                1 LINE     36    1 PAGE UM   UNSP      YOUNG     JULY 03, 1981  19:13:23
            5.0T7   327  *HLG                 
0          COMMAND FILE TO RUN THE HASP LOG COLLECTION PROGRAM (752/1).  INVOKED BY
           ENTERING "MTS *HLG" ON THE OPERATOR'S CONSOLE.
0          Referenced by comments of: 531/8 
00752/004A  HASP LOG                 RETRIEVAL PGM   SA  O          W116:HSP.RETRIV.S                                               
            5.1T2   179  HASP_LOG.RETRIEVAL_PGM.SA.004      1 LINE     73   29 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:40
0          PROVIDES INTERACTIVE RETRIEVAL OF INFORMATION ABOUT HASP JOBS.  USES
           FILES WITH NAMES OF THE FORM HSYYMMDDHH AS BUILT BY THE COLLECTION PROGRAM
           (752/1) AND USES THE FILE HSDEVTBLES AS MAINTAINED BY THE COLLECTION 
           PROGRAM TO DETERMINE WHICH HSYYMMDDHH FILES ARE AVAILABLE.  THIS PROGRAM
           ASSUMES THAT THE COLLECTION PROGRAM IS BEING RUN UNDER THE USER ID SYS.
           IF IT IS TO RUN UNDER AN ID OTHER THAN SYS, ALL REFERENCES OF THE FORM "SYS:FDNAME" 
           MUST BE REPLACED WITH ONE OF THE FORM "USERID:FDNAME" WHERE "USERID" IS THE
           USER ID OF THE TASK RUNNING THE COLLECTION PROGRAM. 
            
           ASSEMBLE WITH PAR=BATCH.  USES HSP.MACLIB (752/7). 
0          Referenced by comments of: 752/7 
00752/005A  HASP LOG                 RETRIEVAL PGM   OC  O          UNSP:HASPLOG                                                    
            5.1T2   180  HASP_LOG.RETRIEVAL_PGM.OC.005      1 LINE  10595    6 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:41
0          REFERENCES IN COPY:SYSDEFS (579/3) MUST BE APPENDED TO THE END.
00752/006   HASP LOG                 RETRIEVAL DOC   P              UNSP:HASPLOG.W                                                  
            5.0T3   465  HASP_LOG.RETRIEVAL_DOC.P.006       1 LINE     84    3 PAGE UM   UNSP      YOUNG     JULY 03, 1981  19:13:28
            5.0T7   330                       
0          WRITEUP DESCRIBING THE USE OF THE RETRIEVAL PROGRAM.
00752/007A  HASP LOG                 MACRO LIB       SM  G          W116:HSP.MACLIB                                                 
            5.1T2   181  HASP_LOG.MACRO_LIB.SM.007          1 LINE     72   13 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:42
0          MACRO LIBRARY USED BY (752/1) AND (752/4).
0          Referenced by comments of: 752/1, 752/4, 752/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  530
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00752/008C  HASP LOG                                 P   G          W116:HSP.SECURITY                                               
            5.1T2   182  HASP_LOG..P.008                    1 LINE     67    1 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:42
0          Description of the HASPLOG security feature.
00752/009C  HASP LOG                 CONVERSION PGM  SA  G          W116:HSP.UPDATE(-1000,-1)                                       
            5.1T2   183  HASP_LOG.CONVERSION_PGM.SA.009     1 LINE     72    3 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:43
0          This program is used to update the HSyymmddhh files to a new format.  To
           run this program issue $RUN HSP.UPDATE 0=xxxx@ÂTRIM 1=yyyy@ÂTRIM where
           "xxxx" is the old HSyymmddhh file and "yyyy" is the new HSyymmddhh file.
           Refers to (752/7).
0          Referenced by comments of: 752/1 
00752/010C  HASP LOG                 CONVERSION PGM  OC  G          W116:HSP.UPDATE(1)                                              
            5.1T2   184  HASP_LOG.CONVERSION_PGM.OC.010     1 LINE     80    1 PAGE UM   UNSP      YOUNG     JULY 23, 1983  13:08:43
00753/001A  SCAN                     MAIN PGM        SA  O          W030:SCAN                                                       
            5.1T2   185  SCAN.MAIN_PGM.SA.001               1 LINE     71   14 PAGE UM   LIFT                JULY 23, 1983  13:08:43
0          MAIN CSECT OF PROGRAM TO SEARCH STATISTICS TAPES FOR RECORDS. SEARCH CRITERIA
           MAY BE SPECIFIED IN COMMANDS OR BY WRITING SUBROUTINES SCAN WILL USE.
            
           COPIES COPY:CMDAREADSECT (531/20). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           SCAN MACROS (753/4).
            
           *******************************************************************************
           D5.0B version:
            
           Commands REBATE, SET added.
            
           Implementation is still far from complete (e. g., searching for CMDSTAT
           records needs to be added), but what is implemented works.
           *******************************************************************************
0          Referenced by comments of: 71/1, 632/1, 707/1, 753/4, 753/5 
00753/002   SCAN                     CSTAT SUBR      SA  O          W030:CSTAT(1,999)                                               
            5.0T3   468  SCAN.CSTAT_SUBR.SA.002             1 LINE     67    4 PAGE UM   LIFT                JULY 03, 1981  19:13:38
            5.0T7   333                       
0          SUBROUTINE FOR SCAN TO HANDLE THE STA COMMAND.  ASSEMBLE USING
           SCAN MACROS (753/4).
0          Referenced by comments of: 753/4, 753/5 
00753/003   SCAN                     CCOPY SUBR      SA  O          W030:CCOPY(1,999)                                               
            5.0T3   469  SCAN.CCOPY_SUBR.SA.003             1 LINE     69    5 PAGE UM   LIFT                JULY 03, 1981  19:13:39
            5.0T7   334                       
0          SUBROUTINE FOR SCAN TO HANDLE COPY AND LIST COMMANDS.
            
           ASSEMBLE USING COPY:MTS.MACROS (344/3) AND SCAN MACROS (753/4).
1                                                                                               SUN SEP 08/96   15:24:55   Page  531
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          COPIES COPY:CMDAREADSECT (531/20).
0          Referenced by comments of: 753/4, 753/5 
00753/004A  SCAN                     MACRO LIBRARY   SM  O          W030:SCANDS                                                     
            5.1T2   186  SCAN.MACRO_LIBRARY.SM.004          1 LINE     79    3 PAGE UM   LIFT                JULY 23, 1983  13:08:44
0          MACRO LIBRARY USED BY (753/1), (753/2), AND (753/3).
0          Referenced by comments of: 753/1, 753/2, 753/3 
00753/005A  SCAN                     OBJECT          OC  O          W030:SCANX                                                      
            5.1T2   187  SCAN.OBJECT.OC.005                 1 LINE     80   16 PAGE UM   LIFT                JULY 23, 1983  13:08:45
0          Object of SCAN main program (753/1), CSTAT subroutine (753/2),
           LISTSTAT (071), CCOPY subroutine (753/3), and JVCT subroutine (674).
           Has $CONTINUE WITH SYS:DIRLIB (742/5) and LIB:STAFF (837) records.
0          Referenced by comments of: 632/3 
00753/006A  SCAN                     WRITEUP         WX             W030:SCAN.W(1,999)                                              
            5.1T2   188  SCAN.WRITEUP.WX.006                1 LINE     80    4 PAGE UM   LIFT                JULY 23, 1983  13:08:45
0          WRITEUP FOR SCAN.  DESCRIBES ONLY WHAT'S ACTUALLY IMPLEMENTED.
0          Referenced by comments of: 632/1 
00753/007A  SCAN                     WRITEUP         PX             W030:SCAN.W(1000)                                               
            5.1T2   189  SCAN.WRITEUP.PX.007                1 LINE     76    1 PAGE UM   LIFT                JULY 23, 1983  13:08:46
00754/001   F8ASR                                    SF  O          S1153 UNSP VLO FSNAME=F8ASR.S                                   
            5.0T3   474  F8ASR..SF.001                      1 LINE     79   25 PAGE UM   UNSP                JUNE 23, 1978  20:42:24
            5.0T7   339                       
0          FORTRAN SOURCE FOR A MOSTEK F8 CROSS-ASSEMBLER.
            
           COPIES OF THE "MOSTEK F8 MICROPROCESSOR SOFTWARE SUPPORT
           OPERATIONS MANUAL: FORTRAN IV CROSS ASSEMBLER" (10 PAGES)
           ARE AVAILABLE UPON REQUEST.
00754/002   F8ASR                                    OE  O          UNSP:F8ASR                                                      
            5.0T3   475  F8ASR..OE.002                      1 LINE  11980    7 PAGE UM   UNSP                JULY 03, 1981  19:13:50
            5.0T7   340  UNSP:F8ASR           
00754/003   F8ASR                                    WF             S1560 5.0T3 VLO FSNAME=F8ASR..WF.003(1)                      476
            5.0T3   476  F8ASR..WF.003                      1 LINE    143   10 PAGE UM   UNSP                APR. 02, 1979  01:10:36
            5.0T7   341                       
0          THIS IS THE "MOSTEK F8 MICROPROCESSOR SOFTWARE SUPPORT
           OPERATIONS MANUAL: FORTRAN IV CROSS ASSEMBLER" (10 PAGES).
1                                                                                               SUN SEP 08/96   15:24:55   Page  532
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00755/001   UM FEP HARDWARE          LAM PGM         S   G          FEP.:LAM                                                        
            5.0T3   477  UM_FEP_HARDWARE.LAM_PGM.S.001      1 LINE     81   24 PAGE UM   TOKARSKI            JULY 03, 1981  19:14:30
            5.0T7   342                       
0          THIS COMPONENT CONTAINS SOFTWARE RELATED TO THE UM DATA CONCENTRATORS (FRONT
           END PROCESSORS).
            
           SOURCE FOR LINE ADAPTER MICROPROCESSOR PROGRAM.  ASSEMBLE USING *11ASR (515).
00755/002   UM FEP HARDWARE          LAM DESC        WF             S0767 'SAVETAPE' FSNAME=LAMMAN.S                                
            5.0T3   478  UM_FEP_HARDWARE.LAM_DESC.WF.002    1 LINE    120   36 PAGE UM   TOKARSKI            JAN. 17, 1979  10:02:27
            5.0T7   343                       
0          MANUAL DESCRIBING LAM HARDWARE AND PROGRAM.
00755/003A  UM FEP HARDWARE          CHAN XFACE PGM  S   G          DIAG:IF360PGM                                                   
            5.1T2   190  UM_FEP_HARDWARE.CHAN_XFAC.S.003    1 LINE     87   11 PAGE UM   HUSAK               JULY 23, 1983  13:08:46
0          MICROPROGRAM FOR 360-CHANNEL-TO-PDP-11-INTERFACE.  ASSEMBLE USING *11ASR (515).
00755/004A  UM FEP HARDWARE          CHAN XFACE MAN  WF             S0767 'SAVETAPE' FSNAME=360MANUAL                               
            5.1T2   191  UM_FEP_HARDWARE.CHAN_XFAC.WF.004   1 LINE    156   64 PAGE UM   HUSAK               MAR. 07, 1974  08:55.40
0          MANUAL DESCRIBING CHANNEL INTERFACE PROGRAM.
00756/001   ONTEL SOFTWARE           OP/MCP          S   G          CRT:OPSOU                                                       
            5.0T3   481  ONTEL_SOFTWARE.OP/MCP.S.001        1 LINE    170   72 PAGE UM   CASHMAN             JULY 03, 1981  19:18:42
            5.0T7   346                       
0          SOURCE FOR THE UM ONTEL TERMINAL MICROPROCESS SOFTWARE.  THIS
           SOFTWARE IS COPYRIGHTED, BUT USE BY ANY INSTALLATION RECEIVING
           DISTRIBUTIONS OF MTS IS ALLOWED SUBJECT TO THE FOLLOWING CONDITIONS:
              1) THE COPYRIGHT NOTICE MUST BE INCLUDED IN ALL COPIES. 
              2) USE MUST BE NOT BE FOR PROFIT.
              3) REDISTRIBUTION OF THE SOFTWARE OUTSIDE OF THE MTS COMMUNITY
                 REQUIRES WRITTEN PERMISSION FROM THE UOFM COMPUTING CENTER. 
            
           THERE ARE VARIOUS CONDITIONAL ASSEMBLY PARAMETERS:
            
              1) OPTION='ROM' -- TO RUN IN ROM MEMORY
                 OPTION='RAM' -- TO RUN IN RAM MEMORY
                 OPTION='DOS' -- TO RUN IN RAM UNDER ONTEL'S DISK SYSTEM
            
              2) MACHIN='OP1' -- TO RUN IN OP-1 MACHINE
                 MACHIN='OPR'  -- TO RUN IN OP-1R MACHINE
            
              3) MCP=0 -- USES THE STANDARD DATA CONCENTRATOR PROTOCOL
                 MCP=1 -- USES THE MICHIGAN COMMUNICATIONS PROTOCOL
            
              4) KEY='ONT' -- THE STANDARD ONTEL KEYBOARD LAYOUT
                 KEY='327' -- COURIER-TYPE KEYBOARD LAYOUT
            
              5) SIZE=N -- WHERE N IS THE SIZE OF MEMORY FOR DOS VERSION
                 SIZE=4 -- FOR ROM VERSION WHICH FITS IN 4K OF ROM MEMORY
1                                                                                               SUN SEP 08/96   15:24:55   Page  533
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
              6) STARPR=0 -- NO EXTRA CODE
                 STARPR=1 -- GENERATE CODE TO DUMP BUFFER TO MTS (%DUMP)
            
              7) DEBUG=ON -- LINK TO RESIDENT KENOBI MONITOR (756/2)
                 DEBUG=OFF -- NO LINK TO MONITOR
            
           ASSEMBLE USING I8080ASR (686/29).  COPIES OP/COMMENTS (756/3).
0          Referenced by comments of: 756/3 
00756/002   ONTEL SOFTWARE           KENOBI          S   G          CRT:KENOBI                                                      
            5.0T3   482  ONTEL_SOFTWARE.KENOBI.S.002        1 LINE    118   31 PAGE UM   CASHMAN             JULY 03, 1981  19:18:48
            5.0T7   347                       
0          SOURCE FOR THE ONTEL DEBUGGING MONITOR.  THE FOLLOWING ARE CONDITIONAL
           ASSEMBLY PARAMETERS:
            
              1) OPTION='ROM' -- TO RUN IN ROM MEMORY
                 OPTION='RAM' -- TO RUN IN RAM MEMORY
            
              2) DEBUG=ON -- KENOBI IS ENTERED FROM 3270 EMULATOR
                 DEBUG=OFF -- MONITOR IS STAND-ALONE
0          Referenced by comments of: 756/1 
00756/003   ONTEL SOFTWARE           COMMENTS        S   G          CRT:OP/COMMENTS                                                 
            5.0T3   483  ONTEL_SOFTWARE.COMMENTS.S.003      1 LINE     61    1 PAGE UM   CASHMAN             JULY 03, 1981  19:18:52
            5.0T7   348                       
0          Used to print a short comment describing an option of the ONTEL program in
           OPSOU (756/1).  COPY'ed by *I8080ASR (686/29).
0          Referenced by comments of: 756/1 
00756/004   ONTEL SOFTWARE           MEMO 415        WX             S1560 5.0T3 VLO FSNAME=ONTEL_SOFTWARE.MEMO_415.WX.004(1)     484
            5.0T3   484  ONTEL_SOFTWARE.MEMO_415.WX.004     1 LINE     92   10 PAGE UM   HARTMAN             MAR. 26, 1980  09:41:24
            5.0T7   349                       
0          THIS IS COMPUTING CENTER MEMO 415 -- "INTRODUCTION TO THE ONTEL TERMINAL."
           REQUIRES THE (711/9) TEXTFORM MACROS. COMPONENT (756/5) CONTAINS TABLES TO BE
           INSERTED ON PAGE 15 FF. REQUIRES OTHER HAND INSERTED DIAGRAMS, WHICH MAY BE
           OBTAINED FROM THE COMPUTING CENTER PUBLICATIONS OFFICE.
0          Referenced by comments of: 756/5 
00756/005   ONTEL SOFTWARE           MEMO 415        P              S1560 5.0T3 VLO FSNAME=ONTEL_SOFTWARE.MEMO_415.P.005(1)      485
            5.0T3   485  ONTEL_SOFTWARE.MEMO_415.P.005      1 LINE     81    5 PAGE UM   HARTMAN             MAR. 26, 1980  09:47:11
            5.0T7   350                       
0          CONTAINS DIAGRAM TO BE INSERTED ON PAGE 15 FF. OF (756/4).
0          Referenced by comments of: 756/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  534
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00756/006C  ONTEL SOFTWARE           MEMO 441        WF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO441.1.SO                  272 
            5.1T2   192  ONTEL_SOFTWARE.MEMO_441.WF.006     1 LINE     75    3 PAGE UM   HARTMAN             MAY  04, 1983  16:57:14
0          This is Computing Center Memo 441 -- " Ontel Terminal Program-Function
           Key Reference Sheet."
0          Referenced by comments of: 756/7 
00756/007C  ONTEL SOFTWARE           MEMO 441        PF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO441.2.OU                  273 
            5.1T2   193  ONTEL_SOFTWARE.MEMO_441.PF.007     1 LINE    140    3 PAGE UM   HARTMAN             MAY  04, 1983  16:57:40
0          This is the printer-ready version of (756/6).
00757/001   SPITPAR                                  SA  G          S1560 5.0T3 VLO FSNAME=SPITPAR..SA.001(1)                    486
            5.0T3   486  SPITPAR..SA.001                    1 LINE     72    1 PAGE UM   UNSP      SHERRY    JAN. 19, 1979  00:39:56
            5.0T7   351                       
0          A MAIN PROGRAM FOR USE WITH SPITBOL PROGRAMS WHICH ALLOWS THEM TO BE RUN 
           WITH OR WITHOUT THE SEMICOLON IN THE PAR FIELD.  ASSEMBLE USING *OBJUTIL
           MACROS (721/14) AND (721/15).
00757/002   SPITPAR                                  OC  G          UNSP:SPITPAR                                                    
            5.0T3   487  SPITPAR..OC.002                    1 LINE     96    1 PAGE UM   UNSP      SHERRY    JULY 03, 1981  19:18:57
            5.0T7   352  UNSP:SPITPAR         
0          Has a $CONTINUE WITH *SPITLIB (590/10) card.
00758/001   SOFTCHK                                  SA  G          S1560 5.0T3 VLO FSNAME=SOFTCHK..SA.001(1)                    488
            5.0T3   488  SOFTCHK..SA.001                    1 LINE     72    3 PAGE UM   MTA                 JULY 03, 1981  19:18:58
            5.0T7   353                       
0          SOFTCHK JOB PROGRAM TO ENABLE OR DISABLE SOFT MACHINE CHECKS.
00758/002   SOFTCHK                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00759/001   G11 JOB                                  SA  G          S1560 5.0T3 VLO FSNAME=G11_JOB..SA.001(1)                    489
            5.0T3   489  G11_JOB..SA.001                    1 LINE     70    2 PAGE UM   MTA                 JAN. 19, 1981  22:18:16
            5.0T7   354                       
0          LOADS THE CHARACTER AND FORMS CONTROL BUFFERS OF A 3211 PRINTER FOR THE G11
           PRINT TRAIN. ASSUMES 6 LINES PER INCH ON 11 INCH PAPER UNLESS THE "8LPI"
           PARAMETER IS GIVEN, IN WHICH CASE IT ASSUMES 8 LINES PER INCH ON 8.5 INCH
           PAPER.
00759/002   G11 JOB                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  535
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/001   BENCHMARK - BATCH        SCR             C              BNCH:BATCH.SCR                                                  
            5.0T3   490  BENCHMARK_-_BATCH.SCR.C.001        1 LINE     76    1 PAGE UQV            OGDEN     JULY 03, 1981  19:19:58
            5.0T7   355  BNCH:BATCH.SCR       
0          MTS COMMAND FILE TO RUN A BATCH BENCHMARK.
00760/002   BENCHMARK - BATCH        BATCH SUBMIT    SF  O          BNCH:SUBMIT.S                                                   
            5.0T3   491  BENCHMARK_-_BATCH.BATCH_S.SF.002   1 LINE     80    4 PAGE UQV            OGDEN     JULY 03, 1981  19:19:59
            5.0T7   356  BNCH:SUBMIT.S        
0          PROGRAM TO SUBMIT JOBS TO *BATCH* OR SOME OTHER FDNAME ADDING SIGNON COMMANDS
           AND PASSWORDS. READS A DRIVER FILE. SEE (760/4) FOR AN EXAMPLE. SEE THE
           SOURCE CODE FOR COMMENTS EXPLAINING THE FORMAT.
0          Referenced by comments of: 760/4, 760/5, 760/20 
00760/003   BENCHMARK - BATCH        SUBMIT          OC  O          BNCH:SUBMIT                                                     
            5.0T3   492  BENCHMARK_-_BATCH.SUBMIT.OC.003    1 LINE   2956    4 PAGE UQV            OGDEN     JULY 03, 1981  19:20:00
            5.0T7   357  BNCH:SUBMIT          
00760/004   BENCHMARK - BATCH        BATCH DRIVER    D              BNCH:DRIVER                                                     
            5.0T3   493  BENCHMARK_-_BATCH.BATCH_D.D.004    1 LINE     60    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:01
            5.0T7   358  BNCH:DRIVER          
0          SAMPLE DRIVER FILE FOR BATCH SUBMIT PROGRAM (760/2).
0          Referenced by comments of: 760/2 
00760/005   BENCHMARK - BATCH        BM00 JOB        C              BNCH:BM00                                                       
            5.0T3   494  BENCHMARK_-_BATCH.BM00_JO.C.005    1 LINE     78    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:02
            5.0T7   359  BNCH:BM00            
0          BATCH JOB THAT CAN BE SUBMITTED USING SUBMIT (760/2).  ONCE KNOWN AS SUN OR SUP.
00760/006   BENCHMARK - BATCH        BM00 DATA       SF  O          BNCH:ADEPT.F                                                    
            5.0T3   495  BENCHMARK_-_BATCH.BM00_DA.SF.006   1 LINE     77   19 PAGE UQV            OGDEN     JULY 03, 1981  19:20:02
            5.0T7   360  BNCH:ADEPT.F         
0          DATA FILE USED BY BM00 JOB.
00760/007   BENCHMARK - BATCH        BM00 DATA       OC  O          BNCH:AX                                                         
            5.0T3   496  BENCHMARK_-_BATCH.BM00_DA.OC.007   1 LINE    240    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:04
            5.0T7   361  BNCH:AX              
0          DATA FILE USED BY BM00 JOB.
00760/008   BENCHMARK - BATCH        BM00 DATA       OC  O          BNCH:CHOLX                                                      
            5.0T3   497  BENCHMARK_-_BATCH.BM00_DA.OC.008   1 LINE     80    9 PAGE UQV            OGDEN     JULY 03, 1981  19:20:05
            5.0T7   362  BNCH:CHOLX           
0          DATA FILE USED BY BM00 JOB.
1                                                                                               SUN SEP 08/96   15:24:55   Page  536
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/009   BENCHMARK - BATCH        BM00 DATA       OC  O          BNCH:CX                                                         
            5.0T3   498  BENCHMARK_-_BATCH.BM00_DA.OC.009   1 SEQ      80    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:06
            5.0T7   363  BNCH:CX              
0          DATA FILE USED BY BM00 JOB.
00760/010   BENCHMARK - BATCH        BM00 DATA       D   O          BNCH:ELASTODATA                                                 
            5.0T3   499  BENCHMARK_-_BATCH.BM00_DA.D.010    1 LINE     80    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:08
            5.0T7   364  BNCH:ELASTODATA      
0          DATA FILE USED BY BM00 JOB.
00760/011   BENCHMARK - BATCH        BM00 DATA       OC  O          BNCH:ELASTOPLAST                                                
            5.0T3   500  BENCHMARK_-_BATCH.BM00_DA.OC.011   1 SEQ   28240   39 PAGE UQV            OGDEN     JULY 03, 1981  19:20:09
            5.0T7   365  BNCH:ELASTOPLAST     
0          DATA FILE USED BY BM00 JOB.
00760/012   BENCHMARK - BATCH        BM00 DATA       SP  O          BNCH:GOMOKU.P                                                   
            5.0T3   501  BENCHMARK_-_BATCH.BM00_DA.SP.012   1 LINE     80    4 PAGE UQV            OGDEN     JULY 03, 1981  19:20:12
            5.0T7   366  BNCH:GOMOKU.P        
0          DATA FILE USED BY BM00 JOB.
00760/013   BENCHMARK - BATCH        BM00 SUBR LIB   OL  O          BNCH:LIBRARY                                                    
            5.0T3   502  BENCHMARK_-_BATCH.BM00_SU.OL.013   1 SEQ   13728  187 PAGE UQV            OGDEN     JULY 03, 1981  19:20:13
            5.0T7   367  BNCH:LIBRARY         
0          SUBROUTINE LIBRARY USED BY BM00 JOB.
00760/014   BENCHMARK - BATCH        BM00 DATA       OC  O          BNCH:PLOT                                                       
            5.0T3   503  BENCHMARK_-_BATCH.BM00_DA.OC.014   1 SEQ     240    7 PAGE UQV            OGDEN     JULY 03, 1981  19:20:18
            5.0T7   368  BNCH:PLOT            
0          DATA FILE USED BY BM00 JOB.
00760/015   BENCHMARK - BATCH        BM00 DATA       D   O          BNCH:PLOTDATA                                                   
            5.0T3   504  BENCHMARK_-_BATCH.BM00_DA.D.015    1 LINE     40    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:19
            5.0T7   369  BNCH:PLOTDATA        
0          DATA FILE USED BY BM00 JOB.
00760/016   BENCHMARK - BATCH        BM00 DATA       OC  O          BNCH:PRPLOT                                                     
            5.0T3   505  BENCHMARK_-_BATCH.BM00_DA.OC.016   1 SEQ    4554    9 PAGE UQV            OGDEN     JULY 03, 1981  19:20:20
            5.0T7   370  BNCH:PRPLOT          
0          DATA FILE USED BY BM00 JOB.
00760/017   BENCHMARK - BATCH        BM00 DATA       SP  O          BNCH:STAT.P                                                     
            5.0T3   506  BENCHMARK_-_BATCH.BM00_DA.SP.017   1 LINE     85   10 PAGE UQV            OGDEN     JULY 03, 1981  19:20:21
            5.0T7   371  BNCH:STAT.P          
0          DATA FILE USED BY BM00 JOB.
1                                                                                               SUN SEP 08/96   15:24:55   Page  537
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/018   BENCHMARK - BATCH        BM00 DATA       SC  O          BNCH:WATBOL.C                                                   
            5.0T3   507  BENCHMARK_-_BATCH.BM00_DA.SC.018   1 LINE     81   14 PAGE UQV            OGDEN     JULY 03, 1981  19:20:23
            5.0T7   372  BNCH:WATBOL.C        
0          DATA FILE USED BY BM00 JOB.
00760/019   BENCHMARK - BATCH        BM00 DATA       SA  O          BNCH:3270.BENCH.S                                               
            5.0T3   508  BENCHMARK_-_BATCH.BM00_DA.SA.019   1 LINE     80   92 PAGE UQV            OGDEN     JULY 03, 1981  19:20:24
            5.0T7   373  BNCH:3270.BENCH.S    
0          DATA FILE USED BY BM00 JOB.
00760/020   BENCHMARK - BATCH        BM01 JOB        SF  O          BNCH:BM01                                                       
            5.0T3   509  BENCHMARK_-_BATCH.BM01_JO.SF.020   1 LINE     80   17 PAGE UQV            OGDEN     JULY 03, 1981  19:20:30
            5.0T7   374  BNCH:BM01            
0          THE FOLLOWING 49 FILES, BM01-BM26 AND BN01-BN51, ARE BATCH JOBS THAT CAN
           BE SUBMITTED USING SUBMIT (760/2).  ONCE KNOWN AS SAN OR SAP.
00760/021   BENCHMARK - BATCH        BM04 JOB        SF  O          BNCH:BM04                                                       
            5.0T3   510  BENCHMARK_-_BATCH.BM04_JO.SF.021   1 LINE     74    7 PAGE UQV            OGDEN     JULY 03, 1981  19:20:33
            5.0T7   375  BNCH:BM04            
00760/022   BENCHMARK - BATCH        BM05 JOB        SF  O          BNCH:BM05                                                       
            5.0T3   511  BENCHMARK_-_BATCH.BM05_JO.SF.022   1 LINE     80   17 PAGE UQV            OGDEN     JULY 03, 1981  19:20:34
            5.0T7   376  BNCH:BM05            
00760/023   BENCHMARK - BATCH        BM06 JOB        SF  O          BNCH:BM06                                                       
            5.0T3   512  BENCHMARK_-_BATCH.BM06_JO.SF.023   1 LINE     71    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:36
            5.0T7   377  BNCH:BM06            
00760/024   BENCHMARK - BATCH        BM08 JOB        SF  O          BNCH:BM08                                                       
            5.0T3   513  BENCHMARK_-_BATCH.BM08_JO.SF.024   1 LINE     73    6 PAGE UQV            OGDEN     JULY 03, 1981  19:20:37
            5.0T7   378  BNCH:BM08            
00760/025   BENCHMARK - BATCH        BM09 JOB        SF  O          BNCH:BM09                                                       
            5.0T3   514  BENCHMARK_-_BATCH.BM09_JO.SF.025   1 LINE     77    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:38
            5.0T7   379  BNCH:BM09            
00760/026   BENCHMARK - BATCH        BM11 JOB        SF  O          BNCH:BM11                                                       
            5.0T3   515  BENCHMARK_-_BATCH.BM11_JO.SF.026   1 LINE     73    7 PAGE UQV            OGDEN     JULY 03, 1981  19:20:38
            5.0T7   380  BNCH:BM11            
00760/027   BENCHMARK - BATCH        BM12 JOB        SF  O          BNCH:BM12                                                       
            5.0T3   516  BENCHMARK_-_BATCH.BM12_JO.SF.027   1 LINE     69    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:40
            5.0T7   381  BNCH:BM12            
00760/028   BENCHMARK - BATCH        BM13 JOB        SF  O          BNCH:BM13                                                       
            5.0T3   517  BENCHMARK_-_BATCH.BM13_JO.SF.028   1 LINE     72    3 PAGE UQV            OGDEN     JULY 03, 1981  19:20:40
            5.0T7   382  BNCH:BM13            
1                                                                                               SUN SEP 08/96   15:24:55   Page  538
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/029   BENCHMARK - BATCH        BM14 JOB        SP  O          BNCH:BM14                                                       
            5.0T3   518  BENCHMARK_-_BATCH.BM14_JO.SP.029   1 LINE     74    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:41
            5.0T7   383  BNCH:BM14            
00760/030   BENCHMARK - BATCH        BM18 JOB        SF  O          BNCH:BM18                                                       
            5.0T3   519  BENCHMARK_-_BATCH.BM18_JO.SF.030   1 LINE     71    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:42
            5.0T7   384  BNCH:BM18            
00760/031   BENCHMARK - BATCH        BM19 JOB        SF  O          BNCH:BM19                                                       
            5.0T3   520  BENCHMARK_-_BATCH.BM19_JO.SF.031   1 LINE     69    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:43
            5.0T7   385  BNCH:BM19            
00760/032   BENCHMARK - BATCH        BM20 JOB        SF  O          BNCH:BM20                                                       
            5.0T3   521  BENCHMARK_-_BATCH.BM20_JO.SF.032   1 LINE     72    3 PAGE UQV            OGDEN     JULY 03, 1981  19:20:44
            5.0T7   386  BNCH:BM20            
00760/033   BENCHMARK - BATCH        BM21 JOB        SC  O          BNCH:BM21                                                       
            5.0T3   522  BENCHMARK_-_BATCH.BM21_JO.SC.033   1 LINE     80    4 PAGE UQV            OGDEN     JULY 03, 1981  19:20:45
            5.0T7   387  BNCH:BM21            
00760/034   BENCHMARK - BATCH        BM23 JOB        SP  O          BNCH:BM23                                                       
            5.0T3   523  BENCHMARK_-_BATCH.BM23_JO.SP.034   1 LINE     73   17 PAGE UQV            OGDEN     JULY 03, 1981  19:20:45
            5.0T7   388  BNCH:BM23            
00760/035   BENCHMARK - BATCH        BM26 JOB        SP  O          BNCH:BM26                                                       
            5.0T3   524  BENCHMARK_-_BATCH.BM26_JO.SP.035   1 LINE     73   11 PAGE UQV            OGDEN     JULY 03, 1981  19:20:47
            5.0T7   389  BNCH:BM26            
00760/036   BENCHMARK - BATCH        BN01 JOB        SF  O          BNCH:BN01                                                       
            5.0T3   525  BENCHMARK_-_BATCH.BN01_JO.SF.036   1 LINE     80   58 PAGE UQV            OGDEN     JULY 03, 1981  19:20:49
            5.0T7   390  BNCH:BN01            
00760/037   BENCHMARK - BATCH        BN02 JOB        SF  O          BNCH:BN02                                                       
            5.0T3   526  BENCHMARK_-_BATCH.BN02_JO.SF.037   1 LINE     80    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:53
            5.0T7   391  BNCH:BN02            
00760/038   BENCHMARK - BATCH        BN03 JOB        SF  O          BNCH:BN03                                                       
            5.0T3   527  BENCHMARK_-_BATCH.BN03_JO.SF.038   1 LINE     76    9 PAGE UQV            OGDEN     JULY 03, 1981  19:20:54
            5.0T7   392  BNCH:BN03            
00760/039   BENCHMARK - BATCH        BN04 JOB        SF  O          BNCH:BN04                                                       
            5.0T3   528  BENCHMARK_-_BATCH.BN04_JO.SF.039   1 LINE     73    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:56
            5.0T7   393  BNCH:BN04            
00760/040   BENCHMARK - BATCH        BN05 JOB        SF  O          BNCH:BN05                                                       
            5.0T3   529  BENCHMARK_-_BATCH.BN05_JO.SF.040   1 LINE     80    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:57
            5.0T7   394  BNCH:BN05            
00760/041   BENCHMARK - BATCH        BN06 JOB        SF  O          BNCH:BN06                                                       
            5.0T3   530  BENCHMARK_-_BATCH.BN06_JO.SF.041   1 LINE     73    7 PAGE UQV            OGDEN     JULY 03, 1981  19:20:57
            5.0T7   395  BNCH:BN06            
1                                                                                               SUN SEP 08/96   15:24:55   Page  539
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/042   BENCHMARK - BATCH        BN07 JOB        SF  O          BNCH:BN07                                                       
            5.0T3   531  BENCHMARK_-_BATCH.BN07_JO.SF.042   1 LINE     73    2 PAGE UQV            OGDEN     JULY 03, 1981  19:20:58
            5.0T7   396  BNCH:BN07            
00760/043   BENCHMARK - BATCH        BN08 JOB        SF  O          BNCH:BN08                                                       
            5.0T3   532  BENCHMARK_-_BATCH.BN08_JO.SF.043   1 LINE     59    1 PAGE UQV            OGDEN     JULY 03, 1981  19:20:59
            5.0T7   397  BNCH:BN08            
00760/044   BENCHMARK - BATCH        BN09 JOB        SF  O          BNCH:BN09                                                       
            5.0T3   533  BENCHMARK_-_BATCH.BN09_JO.SF.044   1 LINE     80    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:00
            5.0T7   398  BNCH:BN09            
00760/045   BENCHMARK - BATCH        BN10 JOB        SF  O          BNCH:BN10                                                       
            5.0T3   534  BENCHMARK_-_BATCH.BN10_JO.SF.045   1 LINE     80    3 PAGE UQV            OGDEN     JULY 03, 1981  19:21:01
            5.0T7   399  BNCH:BN10            
00760/046   BENCHMARK - BATCH        BN11 JOB        SF  O          BNCH:BN11                                                       
            5.0T3   535  BENCHMARK_-_BATCH.BN11_JO.SF.046   1 LINE     78    6 PAGE UQV            OGDEN     JULY 03, 1981  19:21:01
            5.0T7   400  BNCH:BN11            
00760/047   BENCHMARK - BATCH        BN12 JOB        SF  O          BNCH:BN12                                                       
            5.0T3   536  BENCHMARK_-_BATCH.BN12_JO.SF.047   1 LINE     69    2 PAGE UQV            OGDEN     JULY 03, 1981  19:21:02
            5.0T7   401  BNCH:BN12            
00760/048   BENCHMARK - BATCH        BN13 JOB        SF  O          BNCH:BN13                                                       
            5.0T3   537  BENCHMARK_-_BATCH.BN13_JO.SF.048   1 LINE     73    3 PAGE UQV            OGDEN     JULY 03, 1981  19:21:03
            5.0T7   402  BNCH:BN13            
00760/049   BENCHMARK - BATCH        BN15 JOB        SF  O          BNCH:BN15                                                       
            5.0T3   538  BENCHMARK_-_BATCH.BN15_JO.SF.049   1 LINE     59    1 PAGE UQV            OGDEN     JULY 03, 1981  19:21:04
            5.0T7   403  BNCH:BN15            
00760/050   BENCHMARK - BATCH        BN16 JOB        SF  O          BNCH:BN16                                                       
            5.0T3   539  BENCHMARK_-_BATCH.BN16_JO.SF.050   1 LINE     75    3 PAGE UQV            OGDEN     JULY 03, 1981  19:21:05
            5.0T7   404  BNCH:BN16            
00760/051   BENCHMARK - BATCH        BN17 JOB        SF  O          BNCH:BN17                                                       
            5.0T3   540  BENCHMARK_-_BATCH.BN17_JO.SF.051   1 LINE     80    2 PAGE UQV            OGDEN     JULY 03, 1981  19:21:06
            5.0T7   405  BNCH:BN17            
00760/052   BENCHMARK - BATCH        BN30 JOB        SF  O          BNCH:BN30                                                       
            5.0T3   541  BENCHMARK_-_BATCH.BN30_JO.SF.052   1 LINE     80    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:06
            5.0T7   406  BNCH:BN30            
00760/053   BENCHMARK - BATCH        BN31 JOB        SF  O          BNCH:BN31                                                       
            5.0T3   542  BENCHMARK_-_BATCH.BN31_JO.SF.053   1 LINE     71    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:07
            5.0T7   407  BNCH:BN31            
00760/054   BENCHMARK - BATCH        BN32 JOB        SF  O          BNCH:BN32                                                       
            5.0T3   543  BENCHMARK_-_BATCH.BN32_JO.SF.054   1 LINE     80    6 PAGE UQV            OGDEN     JULY 03, 1981  19:21:08
            5.0T7   408  BNCH:BN32            
1                                                                                               SUN SEP 08/96   15:24:55   Page  540
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/055   BENCHMARK - BATCH        BN33 JOB        SF  O          BNCH:BN33                                                       
            5.0T3   544  BENCHMARK_-_BATCH.BN33_JO.SF.055   1 LINE     72    3 PAGE UQV            OGDEN     JULY 03, 1981  19:21:09
            5.0T7   409  BNCH:BN33            
00760/056   BENCHMARK - BATCH        BN34 JOB        SF  O          BNCH:BN34                                                       
            5.0T3   545  BENCHMARK_-_BATCH.BN34_JO.SF.056   1 LINE     72    3 PAGE UQV            OGDEN     JULY 03, 1981  19:21:10
            5.0T7   410  BNCH:BN34            
00760/057   BENCHMARK - BATCH        BN35 JOB        SF  O          BNCH:BN35                                                       
            5.0T3   546  BENCHMARK_-_BATCH.BN35_JO.SF.057   1 LINE     72    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:11
            5.0T7   411  BNCH:BN35            
00760/058   BENCHMARK - BATCH        BN36 JOB        SF  O          BNCH:BN36                                                       
            5.0T3   547  BENCHMARK_-_BATCH.BN36_JO.SF.058   1 LINE     72    2 PAGE UQV            OGDEN     JULY 03, 1981  19:21:12
            5.0T7   412  BNCH:BN36            
00760/059   BENCHMARK - BATCH        BN37 JOB        SF  O          BNCH:BN37                                                       
            5.0T3   548  BENCHMARK_-_BATCH.BN37_JO.SF.059   1 LINE     80    9 PAGE UQV            OGDEN     JULY 03, 1981  19:21:12
            5.0T7   413  BNCH:BN37            
00760/060   BENCHMARK - BATCH        BN38 JOB        SF  O          BNCH:BN38                                                       
            5.0T3   549  BENCHMARK_-_BATCH.BN38_JO.SF.060   1 LINE     80   25 PAGE UQV            OGDEN     JULY 03, 1981  19:21:13
            5.0T7   414  BNCH:BN38            
00760/061   BENCHMARK - BATCH        BN39 JOB        SF  O          BNCH:BN39                                                       
            5.0T3   550  BENCHMARK_-_BATCH.BN39_JO.SF.061   1 LINE     80   15 PAGE UQV            OGDEN     JULY 03, 1981  19:21:15
            5.0T7   415  BNCH:BN39            
00760/062   BENCHMARK - BATCH        BN40 JOB        SF  O          BNCH:BN40                                                       
            5.0T3   551  BENCHMARK_-_BATCH.BN40_JO.SF.062   1 LINE     80   14 PAGE UQV            OGDEN     JULY 03, 1981  19:21:17
            5.0T7   416  BNCH:BN40            
00760/063   BENCHMARK - BATCH        BN41 JOB        SF  O          BNCH:BN41                                                       
            5.0T3   552  BENCHMARK_-_BATCH.BN41_JO.SF.063   1 LINE     80    5 PAGE UQV            OGDEN     JULY 03, 1981  19:21:18
            5.0T7   417  BNCH:BN41            
00760/064   BENCHMARK - BATCH        BN42 JOB        SF  O          BNCH:BN42                                                       
            5.0T3   553  BENCHMARK_-_BATCH.BN42_JO.SF.064   1 LINE     72    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:19
            5.0T7   418  BNCH:BN42            
00760/065   BENCHMARK - BATCH        BN43 JOB        SF  O          BNCH:BN43                                                       
            5.0T3   554  BENCHMARK_-_BATCH.BN43_JO.SF.065   1 LINE     72    3 PAGE UQV            OGDEN     JULY 03, 1981  19:21:20
            5.0T7   419  BNCH:BN43            
00760/066   BENCHMARK - BATCH        BN44 JOB        SF  O          BNCH:BN44                                                       
            5.0T3   555  BENCHMARK_-_BATCH.BN44_JO.SF.066   1 LINE     72    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:21
            5.0T7   420  BNCH:BN44            
00760/067   BENCHMARK - BATCH        BN50 JOB        SC  O          BNCH:BN50                                                       
            5.0T3   556  BENCHMARK_-_BATCH.BN50_JO.SC.067   1 LINE     73   21 PAGE UQV            OGDEN     JULY 03, 1981  19:21:22
            5.0T7   421  BNCH:BN50            
1                                                                                               SUN SEP 08/96   15:24:55   Page  541
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00760/068   BENCHMARK - BATCH        BN51 JOB        WF  O          BNCH:BN51                                                       
            5.0T3   557  BENCHMARK_-_BATCH.BN51_JO.WF.068   1 LINE     80    4 PAGE UQV            OGDEN     JULY 03, 1981  19:21:24
            5.0T7   422  BNCH:BN51            
00761/001   HARDWIRED TERMINALS      *HWTERM         SA  G          S1560 5.0T3 VLO FSNAME=HARDWIRED_TERMINALS.*HWTE.SA.001(1)   558
            5.0T3   558  HARDWIRED_TERMINALS.*HWTE.SA.001   1 LINE     65    1 PAGE UM   OGDEN               NOV. 16, 1979  14:21:13
            5.0T7   423                       
0          SOURCE FOR CSECT WHICH DEFINES THE LOCATION AND DEFAULT *...* ROUTING
           FOR HARDWIRED TERMINALS.  IN THIS WAY, HARDWIRED TERMINALS LOCATED IN THE
           VICINITY OF RJE STATIONS CAN HAVE *...* OUTPUT ROUTED APPROPRIATELY BY
           DEFAULT.  IN ADDITION, HARDWIRED "EXPRESS" TERMINALS CAN BE IDENTIFIED
           SO THAT USERS OF SUCH TERMINALS CAN BE AUTOMATICALLY REMINDED BY MTS
           AFTER 5 MINUTES THAT THE TERMINAL IS RESERVED FOR EXPRESS USE.
           AS DISTRIBUTED, THIS CSECT CONTAINS NO IDENTIFIED HARDWIRED TERMINALS;
           EACH INSTALLATION HAVING TERMINALS WHICH SHOULD BE IDENTIFIED FOR THESE
           PURPOSES SHOULD REASSEMBLE.
            
           AT MICHIGAN, INFORMATION FROM THIS TABLE IS ALSO USED TO IDENTIFY "HIGH-SPEED
           LINES" IN RATENUMBER (651/13).
            
           ASSEMBLE USING COPY:MTS.MACROS (344/3).
0          Referenced by comments of: 761/3 
00761/002   HARDWIRED TERMINALS      *HWTERM         OC  G          MTS:TST.HWTERM                                                  
            5.0T3   559  HARDWIRED_TERMINALS.*HWTE.OC.002   1 LINE     80    1 PAGE UM   OGDEN               JULY 03, 1981  19:21:25
            5.0T7   424  *HWTERM              
0          THIS FILE IS NORMALLY LOADED INTO SHARED VM AFTER IPL BY PISTLE.
00761/003   HARDWIRED TERMINALS      HWTPRINT        SA  G          S1560 5.0T3 VLO FSNAME=HARDWIRED_TERMINALS.HWTPR.SA.003(1)   560
            5.0T3   560  HARDWIRED_TERMINALS.HWTPR.SA.003   1 LINE     72    1 PAGE UM   OGDEN               APR. 06, 1980  13:22:56
            5.0T7   425                       
0          PROGRAM TO PRINT THE CONTENTS OF THE HARDWIRED TERMINAL TABLE (761/1) CURRENTLY
           IN USE.  CALLS RJECHECK SUBROUTINE (IN HASP).
            
           ASSEMBLE USING COPY:MTS.MACROS (344/3).
00761/004   HARDWIRED TERMINALS      HWTPRINT        OC  G          S1560 5.0T3 VLO FSNAME=HARDWIRED_TERMINALS.HWTPR.OC.004(1)   561
            5.0T3   561  HARDWIRED_TERMINALS.HWTPR.OC.004   1 LINE     80    1 PAGE UM   OGDEN               APR. 06, 1980  13:22:59
            5.0T7   426                       
00762/001A  FIDS                     COMMAND FILE    C              MTA:FIDSCMD                                                     
            5.1T2   194  FIDS.COMMAND_FILE.C.001            1 LINE     95    1 PAGE UM   MTA                 JULY 23, 1983  13:14:13
                         MTA:FIDSCMD@UM       
0          COMMANDS TO RUN THE MEMOREX FAULT ISOLATION DIAGNOSTIC SYSTEM, FIDS, IN MTS.
           IT WILL READ INITIALIZATION STATEMENTS, INCLUDING AT LEAST ONE CONFIG
           STATEMENT, FOLLOWED BY ENDC, AND THEN WAIT FOR INPUT. SEE THE (762/8)
           WRITEUP.
1                                                                                               SUN SEP 08/96   15:24:55   Page  542
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00762/002A  FIDS                     MAIN PROGRAM    OE           # ETC:FIDS.MAIN                                                   
                                                                                    UM   MTA                                        
0          THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
           IT IS THE MAIN PROGRAM OF FIDS.
00762/003A  FIDS                     LIBRARY         OL           # ETC:FIDS.LIB                                                    
                                                                                    UM   MTA                                        
0          THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT IS A
           LIBRARY OF FIDS MODULES SET UP TO RUN IN MTS. CORRESPONDS TO (762/4).
           CONTAINS REP CARDS TO MAKE FIDS WORK IN *FAKEOS (545):
            
           REP  00078E  019003D004,4100B7C0,41100040,5000B7C0,D201B7E2C124,9200B7DF
           REP  0007A8  010A3B,D203C160B7C8,9803D004,95FFB7DF,0787,47F07004
           REP  0007C0  0100000000,00000001
            
           REPLACES UCB SEARCH WITH A CALL TO SVC 59.  EQUIVALENT TO
            
                   STM    R0,R3,4(RD)
                   LA     R0,PARS
                   LA     R1,X'40'                "GET DEVICE" CODE FOR SVC 59
                   ST     R0,PARS
                   MVC    PARS+34(2),X'124'(RC)   BUILD A FAKE OLTEP DEVTAB ENTRY
                   MVI    PARS+31,0
                   SVC    59
                   MVC    X'160'(4,RC),PARS+8     THE UCB ADDRESS
                   LM     R0,R3,4(RD)
                   CLI    PARS+31,255
                   BER    R7                      GOT IT
                   B      4(0,R7)                 NOT AVAILABLE
             PARS  DC     F'0,1'
00762/004A  FIDS                     OS OBJECT       OC           # S0938 FSAVE2 VLO FSNAME=FIDS.FILE2(4)                       758 
                                                                                    UM   MTA                                        
0          THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT
           IS OS LINKEDIT INPUT FOR FIDS, COPIED FROM FILE 2 OF THE MEMOREX TAPE.
           THIS IS VERSION 2.7 OF FIDS.
0          Referenced by comments of: 762/3 
00762/005A  FIDS                     EXIT ROUTINE    OC           # S0938 FSAVE2 VLO FSNAME=FIDS.FILE3(4)                       759 
                                                                                    UM   MTA                                        
0          THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT IS THE
           OBJECT FOR AN EXIT ROUTINE USED BY OS FIDS TO GET CONTROL IN SUPERVISOR
           STATE. IT IS NOT USED IN MTS OR MVS.
00762/006A  FIDS                     BLDL            D              ETC:FIDS.BLDL                                                   
            5.1T2   195  FIDS.BLDL.D.006                    1 SEQ     250    1 PAGE UM   MTA                 JULY 23, 1983  13:14:14
                         ETC:FIDS.BLDL        
0          BLDL FILE FOR FIDS.  OUTPUT FROM *FAKEOSCREBLDL (545/43).
1                                                                                               SUN SEP 08/96   15:24:55   Page  543
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 762/7 
00762/007A  FIDS                     BLDL INPUT      D              S0938 FSAVE2 VLO FSNAME=FIDS.BLDLIN(2)                      760 
            5.1T2   196  FIDS.BLDL_INPUT.D.007              1 LINE     60    2 PAGE UM   MTA                 MAY  21, 1982  22:12:34
0          INPUT TO *FAKEOSCREBLDL (545/43) TO CREATE (762/6).
00762/008   FIDS                     WRITEUP         WF             S1560 5.0T3 VLO FSNAME=FIDS.WRITEUP.WF.009(1)                565
            5.0T3   565  FIDS.WRITEUP.WF.009                1 LINE     67    1 PAGE UM   MTA                 APR. 02, 1979  01:26:59
            5.0T7   430                       
0          INSTRUCTIONS FOR RUNNING FIDS IN MTS.
0          Referenced by comments of: 762/1 
00763/001   BLDGPLOT                 SOURCE          SF  G          S0409 'BLDGPLOT' FSNAME=BPRGM                                   
            5.0T3   566  BLDGPLOT.SOURCE.SF.001             1 LINE     77   22 PAGE UM   EMERY               JAN. 03, 1980  13:11:10
            5.0T7   431                       
0          THIS IS THE FORTRAN SOURCE PROGRAM FOR THE UM COMPUTING CENTER BUILDING
           PLOT.  EXECUTION OF THE OBJECT VERSION (763/2) UTILIZES 3 INPUT FILES THAT
           ARE ASSIGNED TO LOGICAL I/O UNITS 2, 3, AND 4.  THE PLOT DESCRIPTION IS
           DIRECTED TO LOGICAL I/O UNIT 9.  THE FIRST INPUT FILE CONTAINS STRUCTURAL
           INFORMATION ABOUT THE BUILDING, THE SECOND CONTAINS PHYSICAL DESCRIPTIONS
           OF THE SIZE OF VARIOUS COMPUTER COMPONENTS AND FURNITURE ITEMS, AND THE
           THIRD CONTAINS INFORMATION ON WHICH COMPONENT IS INSTALLED AT A GIVEN
           BUILDING LOCATION FOR A SPECIFIED TIME PERIOD.
0          Referenced by comments of: 763/2 
00763/002   BLDGPLOT                 OBJECT          OC  G          S0409 'BLDGPLOT' FSNAME=BOBJ                                    
            5.0T3   567  BLDGPLOT.OBJECT.OC.002             1 LINE   9522   22 PAGE UM   EMERY               MAR. 12, 1979  12:39:46
            5.0T7   432                       
0          OBJECT FOR BLDGPLOT PROGRAM (763/1).
0          Referenced by comments of: 763/1 
00763/003   BLDGPLOT                 WALLS           D              S0409 'BLDGPLOT' FSNAME=BWALLS                                  
            5.0T3   568  BLDGPLOT.WALLS.D.003               1 LINE     81   24 PAGE UM   EMERY               JAN. 03, 1980  13:15:27
            5.0T7   433                       
0          THIS IS THE DATA FILE ASSIGNED TO LOGICAL I/O UNIT 2 WHEN PRODUCING A PLOT OF
           THE UM COMPUTING CENTER BUILDING.  IT CONTAINS STRUCTURAL INFORMATION ON THE
           WALLS, WINDOWS, ELECTRICAL SERVICE OUTLETS, TELEPHONE SERVICE OUTLETS, ETC.
00763/004   BLDGPLOT                 DEVICES         D              S0409 'BLDGPLOT' FSNAME=BDEV                                    
            5.0T3   569  BLDGPLOT.DEVICES.D.004             1 LINE     94    5 PAGE UM   EMERY               JAN. 03, 1980  13:17:52
            5.0T7   434                       
0          THIS IS THE DATA FILE ASSIGNED TO LOGICAL I/O UNIT 3 WHEN PRODUCING A PLOT OF
           THE UM COMPUTING CENTER BUILDING.  IT CONTAINS INFORMATION ABOUT THE SIZE OF
           VARIOUS COMPUTER COMPONENTS, TERMINALS, FURNITURE ITEMS, ETC.  WHEN APPROPRIATE
           IT ALSO CONTAINS INFORMATION ABOUT THE LOCATION OF CABLE CUTOUTS IN COMPUTER
1                                                                                               SUN SEP 08/96   15:24:55   Page  544
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          COMPONENTS.
00763/005   BLDGPLOT                 DATA            D              S0409 'BLDGPLOT' FSNAME=BDATA                                   
            5.0T3   570  BLDGPLOT.DATA.D.005                1 LINE     79   33 PAGE UM   EMERY               MAR. 09, 1979  12:13:34
            5.0T7   435                       
0          THIS IS THE DATA FILE ASSIGNED TO LOGICAL I/O UNIT 4 WHEN PRODUCING A PLOT OF
           THE UM COMPUTING CENTER BUILDING.  IT CONTAINS INFORMATION ON WHICH COMPUTER
           COMPONENT, DESK, TERMINAL, BOOKCASE, ETC. WAS "INSTALLED" AT A PARTICULAR
           LOCATION IN THE BUILDING FOR A SPECIFIED TIME PERIOD.
0          Referenced by comments of: 763/6 
00763/006   BLDGPLOT                 LABELS          D              S0409 'BLDGPLOT' FSNAME=BLABEL                                  
            5.0T3   571  BLDGPLOT.LABELS.D.006              1 LINE     80    3 PAGE UM   EMERY               JAN. 03, 1980  13:22:05
            5.0T7   436                       
0          THIS FILE MAY BE ASSIGNED TO LOGICAL I/O UNIT 4 WHEN PRODUCING A PLOT OF THE
           UM COMPUTING CENTER BUILDING.  THE FILE CONTAINS INFORMATION DESCRIBING THE
           CONTENT AND LOCATION OF LABELS THAT SHOULD APPEAR IN THE PLOT.  WHEN APPROPRIATE
           IT MAY BE CONCATENATED TO THE DATA FILE (763/5).
00764/001   APPEND                                                # (OBSOLETE)                                                      
            4.3T2    70  APPEND..SS.001                     1 LINE     80    1 PAGE UM                       JAN. 03, 1979  14:01:22
0          Obsoleted by *COMBINE (771).
00765/001A  DAVE/M                   MAIN            SF  G          W169:DAVE.MAIN.S                                                
            5.1T2   197  DAVE/M.MAIN.SF.001                 1 LINE     72   12 PAGE UM   BRILL               JULY 23, 1983  13:19:02
0          DAVE/M is the University of Michigan's version of DAVE, a software
           tool for gathering information about global data flow in FORTRAN
           programs, and for identifying the anomalous use of data in these
           programs. A test version can be loaded by a secret PAR field command.
           See listing for details. DAVE was developed by the University of
           Colorado.
            
           This is the main program for DAVE/M.  Copies UNSP:LIBRARY (685/2).
            
           *********************************************************************
           D5.1 version:
            
           Changed to change reference from W234:DAVE.STAT to ETC:DAVE.STAT 
           (765/21) and to remove reference to W234:MAILBOX.
           **********************************************************************
0          Referenced by comments of: 744/1, 765/2, 765/3, 765/5, 765/7, 765/9, 765/13 
00765/002A  DAVE/M                   *DAVE           OE  G          *DAVE                                                           
            5.1T2   198  DAVE/M.?DAVE.OE.002                1 LINE  19309    9 PAGE UM   BRILL               JULY 23, 1983  13:19:03
                         *DAVE                
0          OBJECT OF (765/1). DYNAMICALLY LOADS PHASE0 (765/3), PHASE1 (765/5), PHASE2
           (765/7), PHASE3 (765/9) AND DAVE.SUB (765/13). CALLS DAVE.EXT (744/7).
1                                                                                               SUN SEP 08/96   15:24:55   Page  545
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 744/7 
00765/003   DAVE/M                   PHASE0          SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE0.SF.003(1)               574
            5.0T3   574  DAVE/M.PHASE0.SF.003               1 LINE     73   28 PAGE UM   BRILL               APR. 06, 1980  13:28:06
            5.0T7   439                       
0          SOURCE CODE FOR PHASE 0, WHICH CHECKS FOR PROPER SYNTAX.
           DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1).
0          Referenced by comments of: 765/2 
00765/004   DAVE/M                   PHASE0          OE  G          ETC:DAVE.0                                                      
            5.0T3   575  DAVE/M.PHASE0.OE.004               1 LINE  22894    8 PAGE UM   BRILL               JULY 03, 1981  19:24:36
            5.0T7   440  ETC:DAVE.0           
00765/005   DAVE/M                   PHASE1          SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE1.SF.005(1)               576
            5.0T3   576  DAVE/M.PHASE1.SF.005               1 LINE     73   93 PAGE UM   BRILL               APR. 06, 1980  13:28:11
            5.0T7   441                       
0          SOURCE CODE FOR PHASE 1, THE PARSER.
           DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1).
0          Referenced by comments of: 765/2 
00765/006   DAVE/M                   PHASE1          OE  G          ETC:DAVE.1                                                      
            5.0T3   577  DAVE/M.PHASE1.OE.006               1 LINE  32767   22 PAGE UM   BRILL               JULY 03, 1981  19:24:41
            5.0T7   442  ETC:DAVE.1           
00765/007   DAVE/M                   PHASE2          SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE2.SF.007(1)               578
            5.0T3   578  DAVE/M.PHASE2.SF.007               1 LINE     73  100 PAGE UM   BRILL               APR. 06, 1980  13:28:43
            5.0T7   443                       
0          SOURCE CODE FOR PHASE 2, THE ANALYZER.
           DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1).
0          Referenced by comments of: 765/2 
00765/008   DAVE/M                   PHASE2          OE  G          ETC:DAVE.2                                                      
            5.0T3   579  DAVE/M.PHASE2.OE.008               1 LINE  32767   32 PAGE UM   BRILL               JULY 03, 1981  19:24:47
            5.0T7   444  ETC:DAVE.2           
00765/009   DAVE/M                   PHASE3          SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE3.SF.009(1)               580
            5.0T3   580  DAVE/M.PHASE3.SF.009               1 LINE     75   29 PAGE UM   BRILL               APR. 06, 1980  13:29:05
            5.0T7   445                       
0          SOURCE CODE FOR PHASE 3, THE OUTPUT PHASE.
           DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1).
0          Referenced by comments of: 765/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  546
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00765/010   DAVE/M                   PHASE3          OE  G          ETC:DAVE.3                                                      
            5.0T3   581  DAVE/M.PHASE3.OE.010               1 LINE  32767   16 PAGE UM   BRILL               JULY 03, 1981  19:24:50
            5.0T7   446  ETC:DAVE.3           
00765/011   DAVE/M                   ASM SUBRS       SA  G          S1560 5.0T3 VLO FSNAME=DAVE/M.ASM_SUBRS.SA.011(1)            582
            5.0T3   582  DAVE/M.ASM_SUBRS.SA.011            1 LINE     72    5 PAGE UM   BRILL               APR. 06, 1980  13:29:15
            5.0T7   447                       
0          DAVE ASSEMBLER LANGUAGE SUBROUTINES.
0          Referenced by comments of: 765/13 
00765/012   DAVE/M                   FTN SUBRS       SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.FTN_SUBRS.SF.012(1)            583
            5.0T3   583  DAVE/M.FTN_SUBRS.SF.012            1 LINE     73   46 PAGE UM   BRILL               APR. 06, 1980  13:29:17
            5.0T7   448                       
0          DAVE FORTRAN LANGUAGE SUBROUTINES.
0          Referenced by comments of: 765/13 
00765/013   DAVE/M                   SUBR LIB        OL  G          ETC:DAVESUB                                                     
            5.0T3   584  DAVE/M.SUBR_LIB.OL.013             1 LINE  32767   17 PAGE UM   BRILL               JULY 03, 1981  19:24:54
            5.0T7   449  ETC:DAVESUB          
0          OBJECT OF (765/11) AND (765/12). DYMANICALLY LOADED BY THE MAIN PROGRAM
           (765/1).
0          Referenced by comments of: 765/2 
00765/014   DAVE/M                   DAVE.CMD        C              S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE.CMD.C.014(1)              585
            5.0T3   585  DAVE/M.DAVE.CMD.C.014              1 LINE     64    1 PAGE UM   BRILL               APR. 06, 1980  13:29:26
            5.0T7   450                       
0          COMMANDS TO CONSTRUCT A DAVE/M SYSTEM.  WHEN THIS FILE IS SOURCED TO, THE
           FORTRAN COMPILER PRODUCES ERROR MESSAGES WHICH SHOULD BE IGNORED.
           DAVE.CMD.LIST (765/15) IS THE OUTPUT GENERATED BY SOURCING TO THIS FILE.
0          Referenced by comments of: 765/15 
00765/015   DAVE/M                   DAVE.CMD.LIST   L              S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE.CMD.LIST.L.015(1)         586
            5.0T3   586  DAVE/M.DAVE.CMD.LIST.L.015         1 LINE     96    9 PAGE UM   BRILL               APR. 06, 1980  13:29:28
            5.0T7   451                       
0          OUTPUT GENERATED WHEN (765/14) IS SOURCED TO.
0          Referenced by comments of: 765/14 
00765/016   DAVE/M                   DATA BASE       SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.DATA_BASE.SF.016(1)            587
            5.0T3   587  DAVE/M.DATA_BASE.SF.016            1 LINE     73   22 PAGE UM   BRILL               APR. 06, 1980  13:29:30
            5.0T7   452                       
0          SOURCE FOR THE PROGRAM USED TO GENERATE DAVE.INIT (765/19), AN INTERNAL
           DATA BASE USED BY DAVE/M.
1                                                                                               SUN SEP 08/96   15:24:55   Page  547
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 765/17, 765/19 
00765/017   DAVE/M                   DATA BASE       OE  G          S1560 5.0T3 VLO FSNAME=DAVE/M.DATA_BASE.OE.017(1)            588
            5.0T3   588  DAVE/M.DATA_BASE.OE.017            1 LINE   3160   14 PAGE UM   BRILL               APR. 06, 1980  13:29:33
            5.0T7   453                       
0          OBJECT OF (765/16).
0          Referenced by comments of: 765/18 
00765/018   DAVE/M                   DATA BASE       D              S1560 5.0T3 VLO FSNAME=DAVE/M.DATA_BASE.D.018(1)             589
            5.0T3   589  DAVE/M.DATA_BASE.D.018             1 LINE     67    4 PAGE UM   BRILL               APR. 06, 1980  13:29:35
            5.0T7   454                       
0          INPUT DATA TO BE FED TO (765/17) TO CREATE (765/19).
0          Referenced by comments of: 765/19 
00765/019   DAVE/M                   DATA BASE       D              ETC:DAVE.INIT                                                   
            5.0T3   590  DAVE/M.DATA_BASE.D.019             1 LINE   3256    2 PAGE UM   BRILL               JULY 03, 1981  19:25:00
            5.0T7   455  ETC:DAVE.INIT        
0          THIS IS THE DATA BASE PRODUCED BY THE DAVE/M DATA BASE PROGRAM (765/16), FROM
           DATA IN (765/18).  DAVE.INIT IS USED TO INITIALIZE DAVE/M.
0          Referenced by comments of: 765/16, 765/18 
00765/020   DAVE/M                   TEST PROG       SF  G          S1560 5.0T3 VLO FSNAME=DAVE/M.TEST_PROG.SF.020(1)            591
            5.0T3   591  DAVE/M.TEST_PROG.SF.020            1 LINE     72    3 PAGE UM   BRILL               APR. 06, 1980  13:29:40
            5.0T7   456                       
0          THIS IS A TEST PROGRAM FOR THE DAVE/M SYSTEM.
00765/021   DAVE/M                   DAVE.STAT       D            # ETC:DAVE.STAT                                                   
                                                                                    UM   BRILL                                      
                         ETC:DAVE.STAT        
0          THIS IS THE LOG FILE WHICH IS REQUIRED BY DAVE/M.  AT MICHIGAN, IT IS CALLED 
           ETC:DAVE.STAT.  THIS NAME MAY BE CHANGED BY OTHER INSTALLATIONS.
0          Referenced by comments of: 765/1 
00765/022   DAVE/M                   MEMO 394        WF             S1560 5.0T3 VLO FSNAME=DAVE/M.MEMO_394.WF.022(1)             592
            5.0T3   592  DAVE/M.MEMO_394.WF.022             1 LINE     84   12 PAGE UM   BRILL               MAY  09, 1979  16:33:53
            5.0T7   457                       
0          THIS IS COMPUTING CENTER MEMO 394 -- "*DAVE".
00765/023   DAVE/M                   KNOWN BUGS      P              S1560 5.0T3 VLO FSNAME=DAVE/M.KNOWN_BUGS.P.023(1)            593
            5.0T3   593  DAVE/M.KNOWN_BUGS.P.023            1 LINE     67    1 PAGE UM   BRILL               APR. 06, 1980  13:30:17
            5.0T7   458                       
0          DESCRIPTION OF THE TWO KNOWN BUGS IN DAVE/M. REFERENCES (765/24) AS AN
           EXAMPLE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  548
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00765/024   DAVE/M                   DAVE_BUG1       SF             S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE_BUG1.SF.024(1)            594
            5.0T3   594  DAVE/M.DAVE_BUG1.SF.024            1 LINE     26    1 PAGE UM   BRILL               APR. 06, 1980  13:30:20
            5.0T7   459                       
0          A PROGRAM WHICH CAUSES DAVE/M TO FAIL.
0          Referenced by comments of: 765/23 
00765/025   DAVE/M                   DAVE.INTERNAL   P              S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE.INTERNAL.P.025(1)         595
            5.0T3   595  DAVE/M.DAVE.INTERNAL.P.025         1 LINE     61    3 PAGE UM   BRILL               APR. 06, 1980  13:30:22
            5.0T7   460                       
0          A BRIEF INSTALLATION GUIDE FOR DAVE/M.
00766/001A  INTRO GUIDE: MAG TAPES                   WF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.SOU                
            5.1T2   199  INTRO_GUIDE:_MAG_TAPES..WF.001     1 LINE    148   61 PAGE UM   MANUAL              AUG. 31, 1982  21:32:17
0          FORMAT source for "Introduction to Magnetic Tapes," January 1982.
00766/002A  INTRO GUIDE: MAG TAPES                   PF             S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.OUT                
            5.1T2   200  INTRO_GUIDE:_MAG_TAPES..PF.002     1 LINE    137   86 PAGE UM   MANUAL              AUG. 31, 1982  21:32:33
0          FORMAT PRINT FILE.
00766/003A  INTRO GUIDE: MAG TAPES                   D              S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.IDX                
            5.1T2   201  INTRO_GUIDE:_MAG_TAPES..D.003      1 LINE     60    6 PAGE UM   MANUAL              AUG. 31, 1982  21:32:27
0          INPUT TO *INDEX (580) FOR THE INDEX TO "INTRODUCTION TO MAGNETIC TAPES."
00766/004C  INTRO GUIDE: MAG TAPES                   P              S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.FIG11              
            5.1T2   202  INTRO_GUIDE:_MAG_TAPES..P.004      1 LINE    130    1 PAGE UM   MANUAL              AUG. 31, 1982  21:32:43
0          Output file for Figure 11 of "Introduction to Magnetic Tapes."
00767/001   SIGLOG                                   SA  O          S1153 UNSP VLO FSNAME=SIGLOG.S                                  
            5.0T3   599  SIGLOG..SA.001                     1 LINE     72    4 PAGE UM   UNSP                AUG. 31, 1979  01:00:49
            5.0T7   464                       
0          SIGLOG IS A PROGRAM INTENDED TO BE RUN FROM A SIGFILE, WHICH RECORDS
           INFORMATION (DATE, TIME, CCID, ETC.) IN A FILE EACH TIME IT IS RUN, OR
           WHICH PRINTS A SORTED COPY OF SUCH A FILE.
00767/002   SIGLOG                                   OE  O          UNSP:SIGLOG                                                     
            5.0T3   600  SIGLOG..OE.002                     1 LINE   2819    2 PAGE UM   UNSP                JULY 03, 1981  19:25:15
            5.0T7   465  UNSP:SIGLOG          
00767/003   SIGLOG                                   P              UNSP:SIGLOG.W                                                   
            5.0T3   601  SIGLOG..P.003                      1 LINE     76    3 PAGE UM   UNSP                JULY 03, 1981  19:25:16
            5.0T7   466                       
0          A PRINT FILE CONTAINING A DESCRIPTION OF THE SIGLOG PROGRAM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  549
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00768/001   SIGCHECK$                                SA  O          S1153 UNSP VLO FSNAME=SIGCHECK$.S                               
            5.0T3   602  SIGCHECK$..SA.001                  1 LINE     72    4 PAGE UM   UNSP                AUG. 31, 1979  00:59:45
            5.0T7   467                       
0          A PROGRAM DESIGNED TO BE RUN FROM A SIGFILE, WHICH PUTS A MESSAGE IN A FILE 
           IF THE ACCOUNT BALANCE IS BELOW A SPECIFIED LEVEL.
00768/002   SIGCHECK$                                OE  O          UNSP:SIGCHECK$                                                  
            5.0T3   603  SIGCHECK$..OE.002                  1 LINE   2318    1 PAGE UM   UNSP                JULY 03, 1981  19:25:18
            5.0T7   468  UNSP:SIGCHECK$       
00768/003   SIGCHECK$                                P              UNSP:SIGCHECK$.W                                                
            5.0T3   604  SIGCHECK$..P.003                   1 LINE     77    3 PAGE UM   UNSP                JULY 03, 1981  19:25:20
            5.0T7   469                       
0          A PRINT FILE CONTAINING A DESCRIPTION OF THE SIGCHECK$ PROGRAM.
00769/001A  DISK MANAGER             MAIN            SA  G          DMGR:DM.MAIN(-10000,-1)                                         
            5.1T2   203  DISK_MANAGER.MAIN.SA.001           1 LINE     72    5 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:01
0          This is the Disk Manager as run at UM.  The Disk Manager is a central task
           providing disk I/O and locking services for tasks run under UMMPS (045).
           It is similiar in nature to the PDP, the Paging Drum Processor (044), except
           that the Disk Manager provides disk I/O services as opposed to paging services.
            
           This subcomponent is the main program of the MTS Disk Manager for use as an
           absolute task. Requires COPY:DM.MACROS (769/29), OLD:CC.MACROS (1054/4),
           COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), and COPY:MNTR.MACROS
           (1058/30).
0          Referenced by comments of: 80/1, 482/7, 812/1, 818/1 
00769/002A  DISK MANAGER             MAIN            UC  G          DMGR:DM.MAIN(1000)                                              
            5.1T2   204  DISK_MANAGER.MAIN.UC.002           1 LINE     68    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:02
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/003A  DISK MANAGER             MAIN            OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00769/004A  DISK MANAGER             DISPATCH        SA  G          DMGR:DM.DISPATCH(-10000,-1)                                     
            5.1T2   205  DISK_MANAGER.DISPATCH.SA.004       1 LINE     72   15 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:02
0          This is the dispatch module of the Disk Manager, which does the following
           things:
            
                  1) adds and deletes disk drives
                  2) sends requests to LOCKMNGR (769/10) for lock and unlock processing
                  3) sorts requests from the supervisor and those received back from
                     the LOCKMNGR to the appropriate DISKLING subtask (769/7)
                  4) requests page-in operations of supervisor (045) for DISKLINGS 
1                                                                                               SUN SEP 08/96   15:24:55   Page  550
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                 5) posts finished requests to supervisor (045).
            
           Requires COPY:DM.MACROS (769/22), OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30),
           COPY:MISC.MACROS (728), COPY:UC.MACROS (787/1), and COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 769/7 
00769/005A  DISK MANAGER             DISPATCH        UC  G          DMGR:DM.DISPATCH(1000)                                          
            5.1T2   206  DISK_MANAGER.DISPATCH.UC.005       1 LINE     91   27 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:04
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/006A  DISK MANAGER             DISPATCH        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00769/007A  DISK MANAGER             DISK INTERFACE  SA  G          DMGR:DM.DISKXF(-10000,-1)                                       
            5.1T2   207  DISK_MANAGER.DISK_INTERFA.SA.007   1 LINE     72   26 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:05
0          This is the disk interface of the Disk Manager. It contains the DISKLING,
           IOMNGR, LOGMNGR and DUCKMNGR subtasks.  These subtasks perform the functions listed below.
            
           DISKLING:
                 1) schedules I/O operations to be done from requests for the disk
                    drive.  It services and gives them to IOMNGR subtask (see below) 
                 2) asks for page-in operations of DISPATCH (769/4)
                 3) posts completed requests to DISPATCH
            
           IOMNGR:
                    performs actual I/O and waits for device end for its disk drive
                    (there is one such subtask for each disk drive) 
            
           LOGMNGR:
                    performs read buffered logs for all paths to disks once an hour
            
           DUCKMNGR:
                    performs disk unit check error recovery
            
           Requires COPY:DM.MACROS (769/26), OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS
           (1058/30), COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), and
           COPY:UC.MACROS (787/1).
0          Referenced by comments of: 769/4 
00769/008A  DISK MANAGER             DISK INTERFACE  UC  G          DMGR:DM.DISKXF(1000)                                            
            5.1T2   208  DISK_MANAGER.DISK_INTERFA.UC.008   1 LINE     91    6 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:06
0          Update deck to be applied to previously distributed source to yield current
           source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  551
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00769/009A  DISK MANAGER             DISK INTERFACE  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00769/010A  DISK MANAGER             LOCKING         SA  G          DMGR:DM.LOCK(-10000,-1)                                         
            5.1T2   209  DISK_MANAGER.LOCKING.SA.010        1 LINE     72   26 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:07
0          These are the locking routines and the LOCKMNGR subtask, which locks and
           unlocks pages and volumes for requests. Requires COPY:DM.MACROS (769/21),
           OLD:CC.MACROS (1054/4), and COPY:MNTR.MACORS (1058/30), COPY:FILE.MACROS
           (482/45).
0          Referenced by comments of: 769/4 
00769/011A  DISK MANAGER             LOCKING         UC  G          DMGR:DM.LOCK(1000)                                              
            5.1T2   210  DISK_MANAGER.LOCKING.UC.011        1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:10
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/012A  DISK MANAGER             LOCKING         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00769/013A  DISK MANAGER             INTERTASK XFAC  SA  G          DMGR:DM.ITSKXF(-10000,-1)                                       
            5.1T2   211  DISK_MANAGER.INTERTASK_XF.SA.013   1 LINE     72   23 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:10
0          This is the Intertask (1081) Interface.  It waits for messages on the
           intertask network for "Disk Manager Control" and processes the requests
           in those messages. Requires COPY:DM.MACROS (769/25), OLD:CC.MACROS (1054/4),
           COPY:MNTR.MACROS (1058/30), COPY:FILE.MACROS (482/45), and COPY:MISC.MACROS
           (728).
00769/014A  DISK MANAGER             INTERTASK XFAC  UC  G          DMGR:DM.ITSKXF(1000)                                            
            5.1T2   212  DISK_MANAGER.INTERTASK_XF.UC.014   1 LINE     82    5 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:11
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/015A  DISK MANAGER             INTERTASK XFAC  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00769/016A  DISK MANAGER             MISCELLANEOUS   SA  G          DMGR:DM.MISC(-10000,-1)                                         
            5.1T2   213  DISK_MANAGER.MISCELLANEOU.SA.016   1 LINE     72    4 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:12
0          This subcomponent consists of miscellaneous subtasks and routines, including
           the EXITMNGR which waits for task exits from the supervisor (045) and creates
           other static tasks. Requires COPY:FILE.MACROS (482/45), COPY:MISC.MACROS
           (728), COPY:MNTR.MACROS (1058/30), COPY:DM.MACROS (769/22), and
           OLD:CC.MACROS (1054/4).
1                                                                                               SUN SEP 08/96   15:24:55   Page  552
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00769/017A  DISK MANAGER             MISCELLANEOUS   UC  G          DMGR:DM.MISC(1000)                                              
            5.1T2   214  DISK_MANAGER.MISCELLANEOU.UC.017   1 LINE     91    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:12
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/018A  DISK MANAGER             MISCELLANEOUS   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00769/019A  DISK MANAGER             MONITOR RTNS    SA  O          DMGR:DM.MNTR(-10000,-1)                                         
            5.1T2   215  DISK_MANAGER.MONITOR_RTNS.SA.019   1 LINE     72   10 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:12
0          Disk Manager-specific code to provide the Subtasking Monitor (1058) function
           of allocating and deallocating disk drives. Assemble using OLD:CC.MACROS
           (1054/4), COPY:MNTR.MACROS (1058/30), COPY:MISC.MACROS (728),
           COPY:FILE.MACROS (482/45), and COPY:DM.MACROS (769/24).
00769/020A  DISK MANAGER             MONITOR RTNS    UC  O          DMGR:DM.MNTR(1000)                                              
            5.1T2   216  DISK_MANAGER.MONITOR_RTNS.UC.020   1 LINE     71    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:13
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/021A  DISK MANAGER             MONITOR RTNS    OC  O        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
0          Referenced by comments of: 769/10, 769/30 
00769/022A  DISK MANAGER             DMGRSTAT JOB    SA  G          DMGR:DM.STATJOB(-10000,-1)                                      
            5.1T2   217  DISK_MANAGER.DMGRSTAT_JOB.SA.022   1 LINE     72   29 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:13
0          This is the job program used to communicate with the Disk Manager. It
           provides for status and control of the Disk Manager via Intertask (1081). It
           also may be run as an MTS program. The entry is DMMTSPGM and should be listed
           in COPY:SYSDEFS (579/3). Assemble with COPY:IT.MACROS (1081/6),
           OLD:CC.MACROS (1054/4), COPY:MISC.MACROS (728), COPY:FILE.MACROS (482/45),
           and COPY:DM.MACROS (769/22). Copies COPY:IT.DSECTS (1081/4).
0          Referenced by comments of: 769/4, 769/16, 769/22 
00769/023A  DISK MANAGER             DMGRSTAT JOB    UC  G          DMGR:DM.STATJOB(1000)                                           
            5.1T2   218  DISK_MANAGER.DMGRSTAT_JOB.UC.023   1 LINE     80    6 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:15
0          Update deck to be applied to previously distributed source to yield current
           source.
00769/024A  DISK MANAGER             DMGRSTAT JOB    OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  553
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 769/19 
00769/025A  DISK MANAGER             DMGRSTAT JOB    WF  G          DMGR:DM.STATJOB.W                                               
            5.1T2   219  DISK_MANAGER.DMGRSTAT_JOB.WF.025   1 LINE     68    5 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:16
0          This is the writeup for the Disk Manager Stat Job.  The file contains lines at
           the front to run *FORMAT (308) on it. 
0          Referenced by comments of: 769/13 
00769/026   DISK MANAGER             DMGRSTAT JOB    OC  G          DMGR:STAT                                                       
            5.0T3   614  DISK_MANAGER.DMGRSTAT_JOB.OC.018   1 LINE     24    1 PAGE UM   HELFFRICH           JULY 03, 1981  19:25:40
            5.0T7   479  DMGR:STAT            
0          RIP and LCS cards required to load the MTS version of the stat program
           from shared memory.
0          Referenced by comments of: 769/7 
00769/027A  DISK MANAGER             MACROS          SM  G          DMGR:DM.MACROS(-10000,-1)                                       
            5.1T2   220  DISK_MANAGER.MACROS.SM.027         1 LINE     72   29 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:16
0          Base source for macro library for the Disk Manager.
00769/028A  DISK MANAGER             MACROS          UC  G          DMGR:DM.MACROS(1000)                                            
            5.1T2   221  DISK_MANAGER.MACROS.UC.028         1 LINE     72    6 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:18
0          Update deck to be applied to the previously distributed source to yield
           current source.
00769/029A  DISK MANAGER             MACROS          SM  G          COPY:DM.MACROS                                                  
            5.1T2   222  DISK_MANAGER.MACROS.SM.029         1 LINE     72   32 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:18
                         COPY:DM.MACROS       
0          Disk Manager macro library.
0          Referenced by comments of: 10/1, 42/1, 45/1, 400/1, 482/4, 482/7, 769/1, 818/1, 829/1 
00769/030   DISK MANAGER             FAKE DMGR       SA  G          DMGR:FAKEDMGR(1,999)                                            
            5.0T3   621  DISK_MANAGER.FAKE_DMGR.SA.025      1 LINE     72    3 PAGE UM   HELFFRICH           JULY 03, 1981  19:26:02
            5.0T7   486                       
0          Fake version of the Disk Manager which should be run if the real Disk Manager
           dies in a way that is non-restartable.  This job program accepts incoming
           disk I/O requests and posts them as imcomplete back to the issuing task. 
           Requires COPY:DM.MACROS (769/21), COPY:FILE.MACROS (482/45) and COPY:MISC:MACROS
           (728).
00769/031   DISK MANAGER             FAKE DMGR       OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  554
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00770/001   DTYPE                                    SA  S  DTYP    MTS:DTYPE(2000)                                                 
            5.0T3   622  DTYPE..SA.001                      1 LINE     80    3 PAGE UM   MTA                 JULY 03, 1981  19:26:03
            5.0T8     1  MTS:DTYPE            
0          A GLP THAT ALLOWS YOU TO CHANGE THE TYPE OF A GIVEN DEVICE (USUALLY TO OR
           FROM TYPE "TEST").   COPIES COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3).
           REQUIRES COPY:MTS.MACROS (344/3) AND COPY:MISC.MACROS (728). 
00770/002   DTYPE                                    OC  S          MTS:DTYPE(1000,1999)                                            
            5.0T3   623  DTYPE..OC.002                      1 LINE     80    1 PAGE UM   MTA                 JULY 03, 1981  19:26:04
            5.0T8     2                       
00771/001A *COMBINE                                  SA  G          W226:COMBINE.ASM                                                
            5.1T2   223  COMBINE..SA.001                    1 LINE     78   34 PAGE UM   PICKELMAN           JULY 23, 1983  13:22:20
0          PROGRAM TO COMBINE RECORDS OR PORTIONS OF RECORDS FROM SEVERAL FILES. 
           COPIES *GDINFODSECT (594). ORIGINALLY WRITTEN BY JASON HALM AT UBC. 
            
           **********************************************************************
           D5.1 version:
            
           1) Full command name is COMMANDS not COMMAND.
           2) Pattern elements are translated to upper case.
           3) The lowercase version of PAR field is used, but not when called
              as a subroutine.
           4) Settings are not reset when called as a subroutine.
           5) Callers attention exit is restored before return.
           **********************************************************************
0          Referenced by comments of: 764/1 
00771/002A *COMBINE                                  OE  G          *COMBINE                                                        
            5.1T2   224  COMBINE..OE.002                    1 LINE  11328    8 PAGE UM   PICKELMAN           JULY 23, 1983  13:22:21
                         *COMBINE             
00772/001   COUNTW                                   SF  O          S1153 UNSP VLO FSNAME=COUNTW.FTN                                
            5.0T3   627  COUNTW..SF.001                     1 LINE     77    8 PAGE UM   UNSP                OCT. 06, 1979  04:41:28
            5.0T8     6                       
0          A PROGRAM TO SCAN A FILE AND PRINT SOME STATISTICS AND A LIST OF ALL THE WORDS
           FOUND.  WRITTEN BY JOHN COULTHARD AND ALAN MILLER AT UBC. USES 
           UBC LIBRARY ( NOT DISTRIBUTED ).
00772/002   COUNTW                                   OE  O          UNSP:COUNTW                                                     
            5.0T3   628  COUNTW..OE.002                     1 LINE  20832    8 PAGE UM   UNSP                JULY 03, 1981  19:31:43
            5.0T8     7  UNSP:COUNTW          
0          MODIFIED CSNOOP.O (695/5). LINKEDITED OBJECT OF COUNTW, ROUTINES FROM UBC
           LIBRARY, AND A
1                                                                                               SUN SEP 08/96   15:24:55   Page  555
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00772/003   COUNTW                                   WF             S1153 UNSP VLO FSNAME=COUNTW.F                                  
            5.0T3   629  COUNTW..WF.003                     1 LINE    106    8 PAGE UM   UNSP                OCT. 15, 1979  18:41:10
            5.0T8     8                       
00773/001   CONCORD                  FORTRAN SOU     SF  O          S1153 UNSP VLO FSNAME=CONCORD.FTN                               
            5.0T3   630  CONCORD.FORTRAN_SOU.SF.001         1 LINE     68    4 PAGE UM   UNSP                OCT. 06, 1979  04:44:29
            5.0T8     9                       
0          A PROGRAM TO PRINT CONCORDANCES OF MTS FILE.  USES THE CONCORD ASSEMBLER
           ROUTINES (773/2), SOME OF WHICH HAVE THE SAME NAMES AS SOME CHARACTER 
           MANIPULATION ROUTINES IN *LIBRARY (524/1), BUT DIFFERENT FUNCTIONS.
           ORIGINALLY WRITTEN BY JOHN COULTHARD AT UBC.  MODIFIED AT UM SO THAT
           IT DOESN'T USE ROUTINES NOT AVAILABLE HERE.
0          Referenced by comments of: 773/3 
00773/002   CONCORD                  ASSEMBLY SOU    SA  O          S1153 UNSP VLO FSNAME=CONCORD.ASM                               
            5.0T3   631  CONCORD.ASSEMBLY_SOU.SA.002        1 LINE     72    3 PAGE UM   UNSP                OCT. 06, 1979  04:43:32
            5.0T8    10                       
0          Referenced by comments of: 773/1, 773/3 
00773/003   CONCORD                                  OE  O          UNSP:CONCORD                                                    
            5.0T3   632  CONCORD..OE.003                    1 LINE   3264    3 PAGE UM   UNSP                JULY 03, 1981  19:31:48
            5.0T8    11  UNSP:CONCORD         
0          LINKEDITED OBJECT OF FORTRAN AND ASSEMBLER SOURCE, (773/1) AND (773/2), AND A
           MODIFIED VERSION OF CSNOOP.O (695/5). USES UNSP:LIBRARY (685/2).
00773/004   CONCORD                                  WF  O          S1153 UNSP VLO FSNAME=CONCORD.F                                 
            5.0T3   633  CONCORD..WF.004                    1 LINE     67    3 PAGE UM   UNSP                OCT. 06, 1979  04:44:46
            5.0T8    12                       
00774/001   LISTER                   PLUS SOURCE     SQ  O          S1560 5.0T3 VLO FSNAME=LISTER.PLUS_SOURCE.SQ.001(1)          634
            5.0T3   634  LISTER.PLUS_SOURCE.SQ.001          1 LINE     82   26 PAGE UBC  HAYWARD   UNSP      MAY  06, 1980  14:40:01
            5.0T8    13                       
0          This program provides facilities for multicolumn listing, titles, etc.,
           and user-callable subroutines.
            
           For details, see the writeup (774/7).  Requires (774/5) for assembly.
0          Referenced by comments of: 698/1, 774/5 
00774/002   LISTER                   ASM SOURCE      SA  O          S1560 5.0T3 VLO FSNAME=LISTER.ASM_SOURCE.SA.002(1)           635
            5.0T3   635  LISTER.ASM_SOURCE.SA.002           1 LINE     68    9 PAGE UBC  HAYWARD   UNSP      MAY  06, 1980  14:40:06
            5.0T8    14                       
0          ASSEMBLER SOURCE FOR VARIOUS INTERFACING ROUTINES.
1                                                                                               SUN SEP 08/96   15:24:55   Page  556
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00774/003   LISTER                                   OE  O          S1560 5.0T3 VLO FSNAME=LISTER..OE.003(1)                     636
            5.0T3   636  LISTER..OE.003                     1 LINE  32767   14 PAGE UBC  HAYWARD   UNSP      JULY 03, 1981  19:34:06
            5.0T8    15  UNSP:LISTER          
0          Contains a $CONTINUE WITH UNSP:LIBRARY (685/2) record.
0          Referenced by comments of: 774/6 
00774/004   LISTER                   GRAMMAR         D   O          S1560 5.0T3 VLO FSNAME=LISTER.GRAMMAR.D.004(1)               637
            5.0T3   637  LISTER.GRAMMAR.D.004               1 LINE     73    5 PAGE UBC  HAYWARD   UNSP      MAY  06, 1980  14:40:07
            5.0T8    16                       
0          GRAMMAR, INPUT TO THE *CLPARSER (1076), FOR LISTER OPTIONS
           SPECIFICATION.
00774/005   LISTER                   SOU LIB         SQ  O          S1560 5.0T3 VLO FSNAME=LISTER.SOU_LIB.SQ.005(1)              638
            5.0T3   638  LISTER.SOU_LIB.SQ.005              1 LINE    139    5 PAGE UBC  HAYWARD   UNSP      MAY  06, 1980  14:40:09
            5.0T8    17                       
0          PLUS SOURCE LIBRARY REQUIRED TO COMPILE (774/1).
0          Referenced by comments of: 774/1 
00774/006   LISTER                   CMDS            C   O          S1560 5.0T3 VLO FSNAME=LISTER.CMDS.C.006(1)                  639
            5.0T3   639  LISTER.CMDS.C.006                  1 LINE    134    4 PAGE UBC  HAYWARD   UNSP      MAY  06, 1980  14:40:11
            5.0T8    18                       
0          COMMAND FILE TO PRODUCE (774/3) BY COMPILING/ASSEMBLING ITS VARIOUS PARTS.
00774/007   LISTER                                   WF             S1560 5.0T3 VLO FSNAME=LISTER..WF.007(1)                     640
            5.0T3   640  LISTER..WF.007                     1 LINE     85   15 PAGE UBC  HAYWARD   UNSP      JULY 17, 1980  02:03:40
            5.0T8    19                       
0          FMT SOURCE FOR UBC WRITEUP DESCRIBING THIS VERSION OF LISTER.  REQUIRES
           COPY:JONMACLIBFMT (308/18).
            
           THIS IS A PRELIMINARY VERSION AND HAS NOT YET BEEN RELEASED AT UBC.
0          Referenced by comments of: 774/1 
00775/001A  PEXIT                                    SA  G          W067:PEXIT.S                                                    
            5.1T2   225  PEXIT..SA.001                      1 LINE    114   27 PAGE UM   SHERRY              JULY 23, 1983  13:22:22
0          This is a print exit routine to be used with Assembler H (737/30). It
           post-processes the listings produced by Assembler H to insert level numbers
           for the structured programming macros in *SYSMAC among other things. See the
           writeup in (775/3) for a description of what it does and how to use it. Uses
           the OBJUTIL MISC macros (721/15) and *SYSMAC. Assemble with *ASMH with
           PAR=PEXIT=*PEXIT, using COPY:CC.MACROS (1054/3).
            
           ********************************************************************************
           D5.0A version:
            
           A couple of bugs fixed.
1                                                                                               SUN SEP 08/96   15:24:55   Page  557
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ********************************************************************************
0          Referenced by comments of: 135/1, 291/1, 314/1, 498/1, 570/1, 648/1, 686/1, 721/1, 746/1, 813/11 
00775/002A  PEXIT                                    OE  G          *PEXIT                                                          
            5.1T2   226  PEXIT..OE.002                      1 LINE  10078    4 PAGE UM   SHERRY              JULY 23, 1983  13:22:24
                         *PEXIT               
0          OBJECT LOADED BY *ASMH (737/30) IF PAR=PEXIT=*PEXIT IS SPECIFIED.
00775/003   PEXIT                                    WX             W067:PEXIT.WX                                                   
            5.0T3   643  PEXIT..WX.003                      1 LINE     77    3 PAGE UM   SHERRY              JULY 03, 1981  19:34:24
            5.0T8    22                       
0          TEXTFORM WRITEUP DESCRIBING THE ASSEMBLER H PRINT EXIT PEXIT.
0          Referenced by comments of: 775/1, 775/4 
00775/004   PEXIT                                    PX             W067:PEXIT.DOC                                                  
            5.0T3   644  PEXIT..PX.004                      1 LINE     76    4 PAGE UM   SHERRY              JULY 03, 1981  19:34:24
            5.0T8    23                       
0          Print file corresponding to (775/3).
00776/001  *PFORT                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UM   BRILL                                      
0          THE PFORT VERIFIER, DEVELOPED BY BELL LABORATORIES, CHECKS FORTRAN PROGRAMS
           FOR ADHERENCE TO PFORT, A PORTABLE SUBSET OF THE 1966 VERSION OF AMERICAN
           NATIONAL STANDARD FORTRAN.
            
           UM ACQUIRED PFORT FROM BELL LABS AND MODIFIED IT TO RUN IN MTS.  PFORT IS A
           PROPRIETARY PROGRAM AND HENCE, MAY NOT BE DISTRIBUTED.  ANY INSTALLATION
           DESIRING PFORT MUST REQUEST IT FROM BELL LABS AND PAY THEIR FEE.  THE PFORT
           YOU GET WILL BE A MORE RECENT VERSION THAN THE ONE WE HAVE.  IF YOU SHOULD
           WISH TO SEE THE CHANGES WE MADE, WE WILL SEND YOU A COPY OF THEM, BUT BE 
           WARNED THAT THEY CANNOT BE APPLIED TO THE VERSION OF PFORT YOU'LL GET FROM
           BELL LABS.  AT BEST, OUR CHANGES CAN GIVE YOU A ROUGH IDEA OF THE MODIFICATIONS
           WE MADE.
            
           WE WILL ALSO SEND YOU A COPY OF COMPUTING CENTER MEMO 406, "*PFORT," SHOULD
           YOU REQUEST ONE.  WE DO NOT DISTRIBUTE THIS MEMO BECAUSE IT IS BASED LARGELY
           ON BELL LABS' COPYRIGHTED DOCUMENT.
00777/001   STARTUP/SHUTDOWN                         SA  G          S1560 5.0T3 VLO FSNAME=STARTUP/SHUTDOWN..SA.001(1)           645
            5.0T3   645  STARTUP/SHUTDOWN..SA.001           1 LINE     71    3 PAGE UM   MTS       OGDEN     OCT. 12, 1980  16:50:22
            5.0T8    24                       
0          THE STARTUP AND SHUTDOWN JOB PROGRAMS.
            
           ASSEMBLE USING COPY:MISC.MACROS (728), COPY:SETPARM (653), COPY:MTS.MACROS
           (344/3).  COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087).
1                                                                                               SUN SEP 08/96   15:24:55   Page  558
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00777/002   STARTUP/SHUTDOWN                         OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       OGDEN                            
0          Object part of Resident System (468).
00778/001   SIGNONM                                  SA  G          S1560 5.0T3 VLO FSNAME=SIGNONM..SA.001(1)                    646
            5.0T3   646  SIGNONM..SA.001                    1 LINE     71    1 PAGE UM   MTS       OGDEN     APR. 06, 1980  13:37:14
            5.0T8    25                       
0          THE SIGNONM (SIGNON MESSAGE) JOB PROGRAM, RECENTLY MOVED OUT OF CMDS AND
           INTO AN ASSEMBLY OF ITS OWN.
           ASSEMBLE USING COPY:MISC.MACROS.
00778/002   SIGNONM                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       OGDEN                            
0          Object part of Resident System (468).
00779/001C  TRANSLATE TABLES         RESIDENT        SA  G          MTSS:TRTABLS.RES(1000)                                          
            5.1T2   227  TRANSLATE_TABLES.RESIDENT.SA.001   1 LINE     68    2 PAGE UM   MTS       BURLING   JULY 23, 1983  13:22:24
0          TRANSLATE TABLES USED BY MANY PARTS OF THE SYSTEM.  THIS PORTION IS IN THE 
           RESIDENT SYSTEM.
00779/002C  TRANSLATE TABLES         RESIDENT        OE  G        # (PART OF THE RESIDENT SYSTEM)                                   
            5.0T3   648  TRANSLATE_TABLES..O.002            1 LINE   2560    3 PAGE UM   MTS       BURLING   JULY 03, 1981  19:35:00
            5.0T8    27                       
0          OBJECT FOR THE TRANSLATE AND TRANSLATE AND TEST TABLES LOADED BY THE SEGMENT
           2 LOADER.
0          Referenced by comments of: 648/1 
00779/003A  TRANSLATE TABLES         SEG2            SA  G          MTSS:TRTABLS.SEG2(1000)                                         
            5.1T2   228  TRANSLATE_TABLES.SEG2.SA.003       1 LINE     69    4 PAGE UM   MTS       BURLING   JULY 23, 1983  13:22:26
0          Translate tables used by many parts of the system.  This portion is
           loaded by PISTLE.
00779/004A  TRANSLATE TABLES         SEG2            OC  G          SEG2:TRTABLES                                                   
            5.1T2   229  TRANSLATE_TABLES.SEG2.OC.004       1 LINE   1280    1 PAGE UM   MTS       BURLING   JULY 23, 1983  13:22:26
                         SEG2:TRTABLES        
00780/001   MESS                     STUDENT VERS    SF  O          S1073 UNSP FSNAME=MESS3SBSOR                                    
            5.0T3   649  MESS.STUDENT_VERS.SF.001           1 LINE     72   10 PAGE UM   UNSP                DEC. 21, 1974  14:06.40
            5.0T8    28                       
0          THIS COMPONENT IS THE MICHIGAN EXPERIMENTAL SIMULATION SUPERVISOR, MESS, A
           GENERAL SUPERVISOR FOR COMPUTER-SIMULATED EXPERIMENTS. MESS WAS DEVELOPED AT
           THE UNIVERSITY OF MICHIGAN HIGHWAY SAFETY RESEARCH INSTITUTE BY RICHARD
           HALSTEAD-NUSSLOCH, ALONG WITH DANA MAIN AND ROBERT L STOUT. IT IS USED BY THE
           MESS EXPR-SIM EXPERIMENTS (780/13) - (780/33), A COLLECTION OF EXPERIMENTS
           WHICH SIMULATE VARIOUS PSYCHOLOGICAL EXPERIMENTS. IT IS VERY GENERAL AND
           COULD BE USED FOR OTHER TYPES OF EXPERIMENTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  559
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           THIS SUBCOMPONENT CONTAINS THE SOURCE FOR THE "STUDENT" VERSION OF MESS. USES
           THE MESS LIBRARY (780/10).
00780/002   MESS                     STUDENT VERS    OE  O          UNSP:EXPR_MESS3SB                                               
            5.0T3   650  MESS.STUDENT_VERS.OE.002           1 LINE  10454    6 PAGE UM   UNSP                JULY 03, 1981  19:43:03
            5.0T8    29  UNSP:EXPR_MESS3SB    
00780/003   MESS                     INSTRUCT VERS   SF  O          S1073 UNSP FSNAME=MESS3PSOR                                     
            5.0T3   651  MESS.INSTRUCT_VERS.SF.003          1 LINE     72   16 PAGE UM   UNSP                MAY  31, 1975  17:51:05
            5.0T8    30                       
0          THIS IS THE SOURCE FOR THE "INSTRUCTORS'" VERSION OF MESS.  USES THE MESS
           LIBRARY (780/10).
0          Referenced by comments of: 780/13, 780/16, 780/19, 780/22, 780/25, 780/28, 780/31 
00780/004   MESS                     INSTRUCT VERS   OE  O          UNSP:EXPR_MESS3P                                                
            5.0T3   652  MESS.INSTRUCT_VERS.OE.004          1 LINE  18282    9 PAGE UM   UNSP                JULY 03, 1981  19:43:07
            5.0T8    31  UNSP:EXPR_MESS3P     
00780/005   MESS                     CARD VERSION    SF  O          S1073 UNSP FSNAME=MESS3SCSOR                                    
            5.0T3   653  MESS.CARD_VERSION.SF.005           1 LINE     72   10 PAGE UM   UNSP                DEC. 21, 1974  13:58.50
            5.0T8    32                       
0          THIS IS THE SOURCE FOR THE "CARD" VERSION OF MESS.  IT USES ONLY FORMATTED
           READS OF RECORDS UP TO 80 CHARACTER IN LENGTH.  NOT NEEDED ON MTS.
00780/006   MESS                     CARD VERSION    OC  O          S1153 UNSP VLO FSNAME=MESS3SCOBJ                                
            5.0T3   654  MESS.CARD_VERSION.OC.006           1 LINE  14220    7 PAGE UM   UNSP                FEB. 20, 1980  05:40:11
            5.0T8    33                       
00780/007   MESS                     FORMAT RTNS     SF  O          S1073 UNSP FSNAME=FPOUTSOR                                      
            5.0T3   655  MESS.FORMAT_RTNS.SF.007            1 LINE     72    5 PAGE UM   UNSP                MAY  31, 1975  17:52:58
            5.0T8    34                       
0          GENERAL FORMATTING ROUTINES USED BY MESS.
0          Referenced by comments of: 780/10 
00780/008   MESS                     NUM & STAT RTN  SF  O          S1073 UNSP FSNAME=LIBSOR                                        
            5.0T3   656  MESS.NUM_&_STAT_RTN.SF.008         1 LINE     74    8 PAGE UM   UNSP                MAY  31, 1975  17:50:48
            5.0T8    35                       
0          NUMERICAL AND STATISTICAL ROUTINES USED BY MESS.
0          Referenced by comments of: 780/10 
00780/009   MESS                     AUX RTNS        SF  O          S1073 UNSP FSNAME=AUXSOR                                        
            5.0T3   657  MESS.AUX_RTNS.SF.009               1 LINE     75   13 PAGE UM   UNSP                MAY  31, 1975  17:46:53
            5.0T8    36                       
0          MISCELLANEOUS AUXILIARY ROUTINES USED BY MESS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  560
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 780/10 
00780/010   MESS                     LIBRARY         OL  O          UNSP:EXPR_MESSLIB                                               
            5.0T3   658  MESS.LIBRARY.OL.010                1 LINE   5912   13 PAGE UM   UNSP                JULY 03, 1981  19:43:17
            5.0T8    37  UNSP:EXPR_MESSLIB    
0          THE MESS LIBRARY.  CONTAINS THE OBJECT OF (780/7), (780/8), AND (780/9).
0          Referenced by comments of: 780/1, 780/3 
00780/011   MESS                     INSTALL         P              S1153 UNSP VLO FSNAME=EXPR.COMMENTS                             
            5.0T3   659  MESS.INSTALL.P.011                 1 LINE     67    1 PAGE UM   UNSP                DEC. 13, 1979  02:26:07
            5.0T8    38                       
0          A BRIEF INTRODUCTION TO MESS AND THE EXPR-SIM EXPERIMENTS (780/13) - (780/33),
           INTENDED FOR INSTALLATIONS RECEIVING THIS DISTRIBUTION.
            
           THE FOLLOWING DOCUMENTATION IS AVAILABLE FOR MESS AND EXPER-SIM:
            
                        PROGRAMMER'S GUIDE TO MESS
                        VERSION 3-P, 3-SB, AND 3-SC,
                        BY ROBERT L. STOUT
            
                        EXPR-SIM ON MICHIGAN EXPERIMENTAL 
                        SIMULATION SUPERVISOR (MESS),
                        REVISED EDITION, BY DANA B. MAIN
                        AND RICHARD HALSTEAD-NUSSLOCH
            
           IF YOU ARE INTERESTED IN RECEIVING XEROX COPIES OF THESE DOCUMENTS, 
           SEND YOUR REQUEST TO:
            
                        ELIZABETH SWEET
                        COMPUTING CENTER
                        UNIVERSITY OF MICHIGAN
                        1075 BEAL AVE.
                        ANN ARBOR, MI  48109
00780/012   MESS                     WRITEUP         P              UNSP:EXPR.W                                                     
            5.0T3   660  MESS.WRITEUP.P.012                 1 LINE     70    1 PAGE UM   UNSP                JULY 03, 1981  19:43:25
            5.0T8    39                       
0          CONTAINS A DIRECTORY TO THE MESS AND EXPR-SIM (780/13) - (780/33) FILES AT
           UM.
00780/013   MESS                     EXPR-SIM DEMO   O   O          UNSP:EXPR.DEMO                                                  
            5.0T3   661  MESS.EXPR-SIM_DEMO.O.013           1 LINE  15804   21 PAGE UM   UNSP                JULY 03, 1981  19:43:26
            5.0T8    40  UNSP:EXPR.DEMO       
0          A DEMONSTRATION GENERATED USING (780/14) AND (780/15). THIS FILE CONTAINS A
           VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE
           SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/15) THROUGH THE
           INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL
           PROGRAM (780/14).
1                                                                                               SUN SEP 08/96   15:24:55   Page  561
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 780/1, 780/11, 780/12, 780/15 
00780/014   MESS                     EXPR-SIM DEMO   SF  O          S1073 UNSP FSNAME=DEMO2SOR                                      
            5.0T3   662  MESS.EXPR-SIM_DEMO.SF.014          1 LINE     72    4 PAGE UM   UNSP                DEC. 21, 1974  14:26.35
            5.0T8    41                       
0          THIS IS THE MODEL PROGRAM FOR A DEMONSTRATION EXPERIMENT.
0          Referenced by comments of: 780/13 
00780/015   MESS                     EXPR-SIM DEMO   D              S1073 UNSP FSNAME=DEMO2DAT1                                     
            5.0T3   663  MESS.EXPR-SIM_DEMO.D.015           1 LINE     64    1 PAGE UM   UNSP                DEC. 21, 1974  14:27.08
            5.0T8    42                       
0          THIS IS THE DATA FOR (780/13).
0          Referenced by comments of: 780/13 
00780/016   MESS                     EXPR-SIM DOPE   O   O          UNSP:EXPR.DOPE                                                  
            5.0T3   664  MESS.EXPR-SIM_DOPE.O.016           1 LINE  15800   20 PAGE UM   UNSP                JULY 03, 1981  19:43:33
            5.0T8    43  UNSP:EXPR.DOPE       
0          THIS IS AN EXPERIMENT ENTITLED "DRUG OBSERVATIONS: PROGRAM FOR EXPERIMENTS."
           IT WAS GENERATED USING (780/17) AND (780/18). THIS FILE CONTAINS A VARIETY OF
           THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION
           DATA, THE RESULT OF RUNNING THE DATA FILE (780/18) THROUGH THE INSTRUCTOR'S
           VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM
           (780/17).
00780/017   MESS                     EXPR-SIM DOPE   SF  O          S1073 UNSP FSNAME=DOPESOR                                       
            5.0T3   665  MESS.EXPR-SIM_DOPE.SF.017          1 LINE     79    5 PAGE UM   UNSP                MAY  31, 1975  17:47:55
            5.0T8    44                       
0          Referenced by comments of: 780/16 
00780/018   MESS                     EXPR-SIM DOPE   D              S1073 UNSP FSNAME=DOPEDAT1                                      
            5.0T3   666  MESS.EXPR-SIM_DOPE.D.018           1 LINE     54    1 PAGE UM   UNSP                DEC. 21, 1974  14:23.37
            5.0T8    45                       
0          Referenced by comments of: 780/16 
00780/019   MESS                     EXPR IMPRINT    O   O          UNSP:EXPR.IMPRINT                                               
            5.0T3   667  MESS.EXPR_IMPRINT.O.019            1 LINE  15800   18 PAGE UM   UNSP                JULY 03, 1981  19:43:40
            5.0T8    46  UNSP:EXPR.IMPRINT    
0          AN EXPERIMENT ON IMPRINTING GENERATED USING (780/20) AND (780/21). THIS FILE
           CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE
           $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE
           (780/21) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF
           THE FORTRAN MODEL PROGRAM (780/20).
1                                                                                               SUN SEP 08/96   15:24:55   Page  562
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00780/020   MESS                     EXPR IMPRINT    SF  O          S1073 UNSP FSNAME=IMPSOR                                        
            5.0T3   668  MESS.EXPR_IMPRINT.SF.020           1 LINE     72    3 PAGE UM   UNSP                DEC. 21, 1974  14:06.06
            5.0T8    47                       
0          Referenced by comments of: 780/19 
00780/021   MESS                     EXPR IMPRINT    D              S1073 UNSP FSNAME=IMPDAT1                                       
            5.0T3   669  MESS.EXPR_IMPRINT.D.021            1 LINE     63    1 PAGE UM   UNSP                DEC. 21, 1974  14:22.37
            5.0T8    48                       
0          Referenced by comments of: 780/19 
00780/022   MESS                     EXPR MOTIV      O   O          UNSP:EXPR.MOTIVE                                                
            5.0T3   670  MESS.EXPR_MOTIV.O.022              1 LINE  15800   19 PAGE UM   UNSP                JULY 03, 1981  19:43:49
            5.0T8    49  UNSP:EXPR.MOTIVE     
0          AN EXPERIMENT ON MOTIVATION IN ROUTINE TASKS, GENERATED USING (780/23) AND
           (780/24). CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY
           BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE
           (780/24) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF
           THE FORTRAN MODEL PROGRAM (780/23).
00780/023   MESS                     EXPR MOTIV      SF  O          S1073 UNSP FSNAME=MOTSOR                                        
            5.0T3   671  MESS.EXPR_MOTIV.SF.023             1 LINE     71    3 PAGE UM   UNSP                DEC. 21, 1974  14:09.42
            5.0T8    50                       
0          Referenced by comments of: 780/22 
00780/024   MESS                     EXPR MOTIV      D              S1073 UNSP FSNAME=MOTDAT1                                       
            5.0T3   672  MESS.EXPR_MOTIV.D.024              1 LINE     71    1 PAGE UM   UNSP                DEC. 21, 1974  14:08.33
            5.0T8    51                       
0          Referenced by comments of: 780/22 
00780/025   MESS                     EXPR-SIM RATS   O   O          UNSP:EXPR.RATS                                                  
            5.0T3   673  MESS.EXPR-SIM_RATS.O.025           1 LINE  15804   21 PAGE UM   UNSP                JULY 03, 1981  19:43:56
            5.0T8    52  UNSP:EXPR.RATS       
0          AN EXPERIMENT ENTITLED "RATS: SELF-STIMULATION SIMULATION", GENERATED BY
           (780/26) AND (780/27). THIS FILE CONTAINS A VARIETY OF THINGS, INCLUDING MTS
           COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF
           RUNNING THE DATA FILE (780/27) THROUGH THE INSTRUCTOR'S VERSION OF MESS
           (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/26).
00780/026   MESS                     EXPR-SIM RATS   SF  O          S1073 UNSP FSNAME=RATSSOR                                       
            5.0T3   674  MESS.EXPR-SIM_RATS.SF.026          1 LINE     75    5 PAGE UM   UNSP                MAY  31, 1975  17:48:33
            5.0T8    53                       
0          Referenced by comments of: 780/25 
1                                                                                               SUN SEP 08/96   15:24:55   Page  563
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00780/027   MESS                     EXPR-SIM RATS   D              S1073 UNSP FSNAME=RATSDAT1                                      
            5.0T3   675  MESS.EXPR-SIM_RATS.D.027           1 LINE     52    1 PAGE UM   UNSP                DEC. 21, 1974  14:16.50
            5.0T8    54                       
0          Referenced by comments of: 780/25 
00780/028   MESS                     EXPR-SIM SCHIZ  O   O          UNSP:EXPR.SCHIZ                                                 
            5.0T3   676  MESS.EXPR-SIM_SCHIZ.O.028          1 LINE  15800   16 PAGE UM   UNSP                JULY 03, 1981  19:44:02
            5.0T8    55  UNSP:EXPR.SCHIZ      
0          AN EXPERIMENT ENTITLED "THE ETIOLOGY OF SCHIZOPHRENIA", GENERATED USING
           (780/29) AND (780/30). THIS FILE CONTAINS A VARIETY OF THINGS, INCLUDING MTS
           COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF
           RUNNING THE DATA FILE (780/30) THROUGH THE INSTRUCTOR'S VERSION OF MESS
           (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/29).
00780/029   MESS                     EXPR-SIM SCHIZ  SF  O          S1073 UNSP FSNAME=SCHIZSOR                                      
            5.0T3   677  MESS.EXPR-SIM_SCHIZ.SF.029         1 LINE     72    1 PAGE UM   UNSP                DEC. 21, 1974  14:10.48
            5.0T8    56                       
0          Referenced by comments of: 780/28 
00780/030   MESS                     EXPR-SIM SCHIZ  D              S1073 UNSP FSNAME=SCHIZDAT1                                     
            5.0T3   678  MESS.EXPR-SIM_SCHIZ.D.030          1 LINE     67    1 PAGE UM   UNSP                DEC. 21, 1974  14:10.18
            5.0T8    57                       
0          Referenced by comments of: 780/28 
00780/031   MESS                     EXPR SOC FAC    O   O          UNSP:EXPR.SOCFAC                                                
            5.0T3   679  MESS.EXPR_SOC_FAC.O.031            1 LINE  15800   19 PAGE UM   UNSP                JULY 03, 1981  19:44:09
            5.0T8    58  UNSP:EXPR.SOCFAC     
0          AN EXPERIMENT IN SOCIAL FACILITATION, GENERATED USING (780/32) AND (780/33).
           CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE
           $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE
           (780/33) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF
           THE FORTRAN MODEL PROGRAM (780/32).
00780/032   MESS                     EXPR SOC FAC    SF  O          S1073 UNSP FSNAME=SFACSOR                                       
            5.0T3   680  MESS.EXPR_SOC_FAC.SF.032           1 LINE     69    4 PAGE UM   UNSP                SEP. 07, 1973  14:40.51
            5.0T8    59                       
0          Referenced by comments of: 780/31 
00780/033   MESS                     EXPR SOC FAC    D              S1073 UNSP FSNAME=SFACDAT1                                      
            5.0T3   681  MESS.EXPR_SOC_FAC.D.033            1 LINE     76    1 PAGE UM   UNSP                SEP. 07, 1973  14:42.30
            5.0T8    60                       
0          Referenced by comments of: 780/1, 780/11, 780/12, 780/31 
00781/001A  PASCAL VALIDATION SUITE  TAPE DESC       P            # S0759 PVSFS VLO FSNAME=SUITE.CHARSET                            
                                                                                    UM   PICKELMAN                                  
0          THE PASCAL VALIDATION SUITE IS A SET OF OVER 300 PASCAL PROGRAMS DESIGNED TO
1                                                                                               SUN SEP 08/96   15:24:55   Page  564
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          TEST A COMPILER'S COMPLIANCE WITH THE DRAFT PASCAL STANDARD (SEE THE PASCAL
           NEWS, NO. 16, OCT. 1979).  THE SUITE ITSELF CANNOT BE DISTRIBUTED, BUT MAY BE
           OBTAINED FROM THE FOLLOWING DISTRIBUTORS:
            
             NORTH AMERICA:                    EUROPE:
            
               RICHARD J. CICHELLI               DR. B. WICHMANN 
               ANPA RESEARCH INSTITUTE           NATIONAL PHYSICS LABORATORY 
               BOX 598                           TEDDINGTON, TW11 0LW
               EASTON, PA 18042                  MIDDLESEX
               U.S.A.                            ENGLAND
            
            
           THIS SUBCOMPONENT CONTAINS A DESCRIPTION OF THE PASCAL VALIDATION SUITE 
           DISTRIBUTION TAPE.
            
           ********************************************************************
           D5.0B version:
            
           This is version 3.0 of the Pascal Validation Suite.
           ********************************************************************
0          Referenced by comments of: 792/1 
00781/002A  PASCAL VALIDATION SUITE  SKELETON        SW  G        # S0759 PVSFS VLO FSNAME=SUITE.SKELETON                           
                                                                                    UM   PICKELMAN                                  
0          A PROGRAM TO LIST, SELECT, OR ADD COMMANDS TO RUN THE TEST PROGRAMS.
00781/003A  PASCAL VALIDATION SUITE  DOCUMENTATION   P            # S0759 PVSFS VLO FSNAME=SUITE.DOCUMENTATION                      
                                                                                    UM   PICKELMAN                                  
0          A DESCRIPTION OF THE PASCAL VALIDATION SUITE.
0          Referenced by comments of: 781/5 
00781/004A  PASCAL VALIDATION SUITE  STANDARD        P            # S0759 PVSFS VLO FSNAME=SUITE.STANDARD                           
                                                                                    UM   PICKELMAN                                  
0          THE VERSION OF THE DRAFT PASCAL STANDARD TO WHICH THE PASCAL VALIDATION
           SUITE CORRESPONDS.
00781/005C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.QUALITY                            
                                                                                    UM   PICKELMAN                                  
0          Component (781/5) throught (781/11) are the Pascal Validation
           Suite test programs.  Each subcomponent has one class of tests,
           as explained in the documentation (781/3).
0          Referenced by comments of: 781/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  565
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00781/006C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.LEVEL 1                            
                                                                                    UM   PICKELMAN                                  
00781/007C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.IMPDEF                             
                                                                                    UM   PICKELMAN                                  
00781/008C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.EXTEN                              
                                                                                    UM   PICKELMAN                                  
00781/009C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.ERROR                              
                                                                                    UM   PICKELMAN                                  
00781/010C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.DEVIANCE                           
                                                                                    UM   PICKELMAN                                  
00781/011C  PASCAL VALIDATION SUITE  SUITE           SW  G        # S0759 PVSFS VLO FSNAME=SUITE.CONFORM                            
                                                                                    UM   PICKELMAN                                  
0          Referenced by comments of: 781/5 
00782/001   PASCAL/SB                OS/COMMENTS     P   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/COMMENTS.P.001(1)        685
            5.0T3   685  PASCAL/SB.OS/COMMENTS.P.001        1 LINE     91   16 PAGE UM   UNSP                OCT. 20, 1979  19:26:23
            5.0T8    64                       
0          THIS IS THE STONY BROOK PASCAL COMPILER, RELEASE 3.1. COMPONENTS INCLUDE
           MODULES OF THE OS VERSION AS RECEIVED FROM STONY BROOK (782/1) - (782/35) AND
           THOSE MODIFIED FOR THE MTS VERSION (782/36) - (782/64).
            
           (782/1) IS THE DESCRIPTION, FROM STONY BROOK, OF THE OS VERSION. OTHER
           COMPONENTS WHICH MAY BE HELPFUL IN INSTALLING PASCAL/SB ARE (782/36) AND
           (782/37). TO INSTALL THE SYSTEM AS RUN AT MICHIGAN, RESTORE COMPONENTS
           (782/52), (782/55), AND (782/58); ALONG WITH (782/38) AND (782/39) WHICH ARE
           WRITEUPS; AND (792/3), (792/4), AND (792/5) WHICH ARE TEST PROGRAMS.
            
           THE STONY BROOK PASCAL COMPILER IS COPYRIGHTED, HOWEVER THERE ARE
           NO RESTRICTIONS UPON ITS USE. IF THE COMPILER IS REDISTRIBUTED
           THERE CAN BE NO FEE FOR ANY OF THE SOFTWARE OR DOCUMENTATION
           FURNISHED BY STONY BROOK. 
0          Referenced by comments of: 782/1, 792/1 
00782/002   PASCAL/SB                OS/OMONITOR     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OMONITOR.SA.002(1)       686
            5.0T3   686  PASCAL/SB.OS/OMONITOR.SA.002       1 LINE     80   41 PAGE UM   UNSP                OCT. 20, 1979  19:26:26
            5.0T8    65                       
0          THIS IS THE PASCAL/SB OVERLAY MONITOR, A MUTATION OF XPLSM WHICH SUPPORTS
           THE MULTIPASS ARCHITECTURE OF THE STONY BROOK PASCAL 360 COMPILER.
0          Referenced by comments of: 782/3, 782/4, 782/12, 782/15, 782/17, 782/19, 782/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  566
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/003   PASCAL/SB                OS/OMONITOR     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OMONITOR.SA.003(1)       687
            5.0T3   687  PASCAL/SB.OS/OMONITOR.SA.003       1 LINE     80   37 PAGE UM   UNSP                OCT. 20, 1979  19:28:22
            5.0T8    66                       
0          A VERSION OF THE OVERLAY MONITOR (782/2) THAT USES COREFILES AND A "STEP LIB".
00782/004   PASCAL/SB                OS/OMONITOR     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OMONITOR.SA.004(1)       688
            5.0T3   688  PASCAL/SB.OS/OMONITOR.SA.004       1 LINE     80   39 PAGE UM   UNSP                OCT. 20, 1979  19:26:39
            5.0T8    67                       
0          THIS FILE CONTAINS A SMALL VERSION OF (782/2). IT IS LOADED IN CONJUNCTION
           WITH OBJECT MODULES PRODUCED BY THE PASCAL LINKER (782/20) AND PROVIDES THE
           RUNTIME ENVIRONMENT NEEDED BY THE DIAGNOSTICS PACKAGE, PMD.
0          Referenced by comments of: 782/7 
00782/005   PASCAL/SB                OS/CORE FILE    SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/CORE_FILE.SA.005(1)      689
            5.0T3   689  PASCAL/SB.OS/CORE_FILE.SA.005      1 LINE     72    5 PAGE UM   UNSP                OCT. 20, 1979  19:26:31
            5.0T8    68                       
0          THIS FILE CONTAINS THE ASSEMBLER SOURCE ROUTINE THAT SIMULATES OS/360 QSAM
           FILES BY USING LINKED, IN-CORE STORAGE BLOCKS.
00782/006   PASCAL/SB                OS/RMONITOR     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/RMONITOR.SA.006(1)       690
            5.0T3   690  PASCAL/SB.OS/RMONITOR.SA.006       1 LINE     80   41 PAGE UM   UNSP                OCT. 20, 1979  19:26:33
            5.0T8    69                       
0          THIS FILE CONTAINS THE SOURCE CODE FOR THE PASCAL RUN MONITOR, WHICH LOADS
           PASCAL PROGRAMS AND PROVIDES THE RUN-TIME ENVIRONMENT NEEDED FOR THEIR
           EXECUTION.
0          Referenced by comments of: 782/7, 782/8 
00782/007   PASCAL/SB                OS/RMONITOR     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/RMONITOR.SA.007(1)       691
            5.0T3   691  PASCAL/SB.OS/RMONITOR.SA.007       1 LINE     80   36 PAGE UM   UNSP                OCT. 20, 1979  19:28:29
            5.0T8    70                       
0          THE RELEASE 2 VERSION OF THE RUN MONITOR (782/6). THIS IS USED BY THE (782/4)
           VERSION OF THE OVERLAY MONITOR. IT SHOULD BE POSSIBLE TO GET AN EQUIVALENT
           VERSION BY SETTING &INCORE TO 1 AND &ISEXT TO 0, BUT THIS HASN'T BEEN
           CHECKED.
00782/008   PASCAL/SB                OS/RMONITOR     U   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/RMONITOR.U.008(1)        692
            5.0T3   692  PASCAL/SB.OS/RMONITOR.U.008        1 LINE     63    1 PAGE UM   UNSP                JAN. 22, 1980  14:49:27
            5.0T8    71                       
0          AN EDIT XPL (782/32) UPDATE TO THE RUN MONITOR (782/6).
00782/009   PASCAL/SB                OS/OBJECT       OL  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OBJECT.OL.009(1)         693
            5.0T3   693  PASCAL/SB.OS/OBJECT.OL.009         1 LINE     80   17 PAGE UM   UNSP                OCT. 20, 1979  19:26:43
            5.0T8    72                       
0          THIS FILE CONTAINS LOAD MODULES TO PROVIDE THE EXECUTION ENVIRONMENTS
           FOR THE STONY BROOK PASCAL COMPILER AND FOR COMPILED PASCAL PROGRAMS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  567
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/010   PASCAL/SB                OS/PASS1        SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1.SX.010(1)          694
            5.0T3   694  PASCAL/SB.OS/PASS1.SX.010          1 LINE     80   68 PAGE UM   UNSP                OCT. 20, 1979  19:26:46
            5.0T8    73                       
0          THIS FILE CONTAINS THE SOURCE CODE FOR PASS 1 OF THE STONY BROOK PASCAL 360
           COMPILER.  PASS 1 IS RESPONSIBLE FOR LEXICAL AND SYNTACTIC ANALYSIS OF 
           PASCAL PROGRAMS AND PRODUCES ABSTRACT SYTAX TREES AS OUTPUT.
0          Referenced by comments of: 782/11, 782/12, 782/22, 782/23, 782/40 
00782/011   PASCAL/SB                OS/PASS1        U   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1.U.011(1)           695
            5.0T3   695  PASCAL/SB.OS/PASS1.U.011           1 LINE     80    1 PAGE UM   UNSP                OCT. 20, 1979  19:28:34
            5.0T8    74                       
0          AN EDITXPL (782/32) UPDATE TO PASS 1 (782/10).
00782/012   PASCAL/SB                OS/PASS1        O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1.O.012(1)           696
            5.0T3   696  PASCAL/SB.OS/PASS1.O.012           1 LINE   7200   32 PAGE UM   UNSP                OCT. 20, 1979  19:26:52
            5.0T8    75                       
0          THIS IS THE OBJECT OF (782/10) WHICH CAN BE USED BY (782/2) AND OTHER
           VERSIONS OF THE XPL SUBMONITOR.
00782/013   PASCAL/SB                OS/PASS2        SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2.SX.013(1)          697
            5.0T3   697  PASCAL/SB.OS/PASS2.SX.013          1 LINE     80   97 PAGE UM   UNSP                OCT. 20, 1979  19:26:55
            5.0T8    76                       
0          THIS FILE CONTAINS THE SOURCE CODE FOR PASS 2 OF THE STONY BROOK PASCAL 360
           COMPILER.  PASS 2 IS RESPONSIBLE FOR TYPE CHECKING, AND GENERATING SYMBOLIC
           TRIPLES SUITABLE FOR INTERPRTATION OR FURTHER PROCESSING BY A CODE GENERATOR.
0          Referenced by comments of: 782/14, 782/15, 782/24, 782/25, 782/41 
00782/014   PASCAL/SB                OS/PASS2        U   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2.U.014(1)           698
            5.0T3   698  PASCAL/SB.OS/PASS2.U.014           1 LINE     80    4 PAGE UM   UNSP                OCT. 20, 1979  19:28:27
            5.0T8    77                       
0          AN EDITXPL (782/32) UPDATE TO PASS 2 (782/13).
00782/015   PASCAL/SB                OS/PASS2        O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2.O.015(1)           699
            5.0T3   699  PASCAL/SB.OS/PASS2.O.015           1 LINE   7200   40 PAGE UM   UNSP                OCT. 20, 1979  19:27:07
            5.0T8    78                       
0          THIS IS THE OBJECT OF (782/13), WHICH CAN BE USED BY (782/2) AND OTHER
           VERSIONS OF THE XPL SUBMONITOR.
00782/016   PASCAL/SB                OS/PASS3        SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS3.SX.016(1)          700
            5.0T3   700  PASCAL/SB.OS/PASS3.SX.016          1 LINE     80   55 PAGE UM   UNSP                OCT. 20, 1979  19:27:12
            5.0T8    79                       
0          THIS FILE CONTAINS THE SOURCE CODE FOR PASS 3 OF THE STONY BROOK PASCAL 360
           COMPILER.  IT TAKES AS INPUT THE SYMBOLIC TRIPLES GENERATED BY PASS 2 AND
           GENERATES MACHINE CODE FOR IBM 360/370 COMPUTERS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  568
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 782/17, 782/42 
00782/017   PASCAL/SB                OS/PASS3        O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS3.O.017(1)           701
            5.0T3   701  PASCAL/SB.OS/PASS3.O.017           1 LINE   7200   32 PAGE UM   UNSP                OCT. 20, 1979  19:27:18
            5.0T8    80                       
0          THIS IS THE OBJECT OF (782/16), WHICH CAN BE USED BY (782/2) AND OTHER
           VERSIONS OF THE XPL SUBMONITOR.
00782/018   PASCAL/SB                OS/PMD          SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PMD.SX.018(1)            702
            5.0T3   702  PASCAL/SB.OS/PMD.SX.018            1 LINE     80   15 PAGE UM   UNSP                OCT. 20, 1979  19:27:22
            5.0T8    81                       
0          THIS FILE CONTAINS THE SOURCE CODE FOR THE POST-MORTEM ANALYSIS ROUTINES,
           PMD.
0          Referenced by comments of: 782/19, 782/43 
00782/019   PASCAL/SB                OS/PMD          O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PMD.O.019(1)             703
            5.0T3   703  PASCAL/SB.OS/PMD.O.019             1 LINE   7200   12 PAGE UM   UNSP                OCT. 20, 1979  19:27:25
            5.0T8    82                       
0          THIS IS THE OBJECT OF (782/18), WHICH CAN BE USED BY (782/2) AND OTHER 
           VERSIONS OF THE XPL SUBMONITOR.
00782/020   PASCAL/SB                OS/LINKER       SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/LINKER.SX.020(1)         704
            5.0T3   704  PASCAL/SB.OS/LINKER.SX.020         1 LINE     80   20 PAGE UM   UNSP                OCT. 20, 1979  19:27:28
            5.0T8    83                       
0          THIS FILE CONTAINS THE SOURCE CODE FOR THE STONY BROOK PASCAL LINKER.
0          Referenced by comments of: 782/4, 782/21, 782/44 
00782/021   PASCAL/SB                OS/LINKER       O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/LINKER.O.021(1)          705
            5.0T3   705  PASCAL/SB.OS/LINKER.O.021          1 LINE   7200   21 PAGE UM   UNSP                OCT. 20, 1979  19:27:34
            5.0T8    84                       
0          THIS IS THE OBJECT OF (782/20), WHICH CAN BE USED BY (782/2) AND OTHER 
           VERSIONS OF THE XPL SUBMONITOR.
00782/022   PASCAL/SB                OS/PASS1S       U   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1S.U.022(1)          706
            5.0T3   706  PASCAL/SB.OS/PASS1S.U.022          1 LINE     80    3 PAGE UM   UNSP                OCT. 20, 1979  19:27:37
            5.0T8    85                       
0          THIS FILE CONTAINS AN UPDATE TO (782/10) TO PRODUCE PASS1S, THE "STUDENT"
           VERSION OF THE COMPILER, IMPLEMENTING ONLY STANDARD PASCAL. THE UPDATE SHOULD
           BE APPLIED USING OS/EDITXPL (782/32).
0          Referenced by comments of: 782/23 
1                                                                                               SUN SEP 08/96   15:24:55   Page  569
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/023   PASCAL/SB                OS/PASS1S       O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1S.O.023(1)          707
            5.0T3   707  PASCAL/SB.OS/PASS1S.O.023          1 LINE   7200   30 PAGE UM   UNSP                OCT. 20, 1979  19:27:39
            5.0T8    86                       
0          THIS FILE CONTAINS THE XPL OBJECT OF PASS1 (782/10), AS UPDATED BY (782/22).
00782/024   PASCAL/SB                OS/PASS2S       U   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2S.U.024(1)          708
            5.0T3   708  PASCAL/SB.OS/PASS2S.U.024          1 LINE     80    3 PAGE UM   UNSP                OCT. 20, 1979  19:27:43
            5.0T8    87                       
0          THIS FILE CONTAINS AN UPDATE TO (782/13) TO PRODUCE PASS2S, IMPLEMENTING ONLY
           STANDARD PASCAL. THIS UPDATE SHOULD BE APPLIED USING OS/EDITXPL (782/32).
0          Referenced by comments of: 782/25 
00782/025   PASCAL/SB                OS/PASS2S       O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2S.O.025(1)          709
            5.0T3   709  PASCAL/SB.OS/PASS2S.O.025          1 LINE   7200   35 PAGE UM   UNSP                OCT. 20, 1979  19:27:45
            5.0T8    88                       
0          THIS FILE CONTAINS THE XPL OBJECT OF PASS2 (782/13), AS UPDATED BY (782/24).
00782/026   PASCAL/SB                OS/BNCHMARK     SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/BNCHMARK.SW.026(1)       710
            5.0T3   710  PASCAL/SB.OS/BNCHMARK.SW.026       1 LINE     80   12 PAGE UM   UNSP                OCT. 20, 1979  19:27:49
            5.0T8    89                       
0          A SET OF TEST PROGRAMS AND JCL TO TEST PASCAL/SB.
00782/027   PASCAL/SB                OS/XPLSM        SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XPLSM.SA.027(1)          711
            5.0T3   711  PASCAL/SB.OS/XPLSM.SA.027          1 LINE     80   38 PAGE UM   UNSP                OCT. 20, 1979  19:27:52
            5.0T8    90                       
0          THIS FILE CONTAINS AN ASSEMBLY LANGUAGE VERSION OF THE XPL SUBMONITOR, XPLSM
           FOR USE WITH (782/29).
00782/028   PASCAL/SB                OS/XCOM4        SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XCOM4.SX.028(1)          712
            5.0T3   712  PASCAL/SB.OS/XCOM4.SX.028          1 LINE     80   51 PAGE UM   UNSP                OCT. 20, 1979  19:28:01
            5.0T8    91                       
0          THIS FILE CONTAINS THE SOURCE FOR XCOM4, SEE (782/29).
0          Referenced by comments of: 782/29 
00782/029   PASCAL/SB                OS/XCOM4        O   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XCOM4.O.029(1)           713
            5.0T3   713  PASCAL/SB.OS/XCOM4.O.029           1 LINE   7200   30 PAGE UM   UNSP                OCT. 20, 1979  19:27:58
            5.0T8    92                       
0          THIS IS THE OBJECT OF XPL (782/28) THAT HAS BEEN USED TO COMPILE
           THE STONY BROOK PASCAL COMPILER.
0          Referenced by comments of: 782/27, 782/28 
1                                                                                               SUN SEP 08/96   15:24:55   Page  570
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/030   PASCAL/SB                OS/XPLIB        SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XPLIB.SX.030(1)          714
            5.0T3   714  PASCAL/SB.OS/XPLIB.SX.030          1 LINE     80    1 PAGE UM   UNSP                OCT. 20, 1979  19:28:07
            5.0T8    93                       
0          THIS FILE CONTAINS THE SOURCE FOR COMPACTIFY, THE XPL PROCEDURE WHICH IS
           AUTOMATICALLY CONCATENATED ON TO THE FRONT OF EVERY XPL PROGRAM. 
00782/031   PASCAL/SB                OS/XPLXREF      SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XPLXREF.SX.031(1)        715
            5.0T3   715  PASCAL/SB.OS/XPLXREF.SX.031        1 LINE     80    9 PAGE UM   UNSP                OCT. 20, 1979  19:28:09
            5.0T8    94                       
0          THIS FILE CONTAINS THE XPL SOURCE FOR A CROSS-REFERENCE LISTINGS PROGRAM FOR
           XPL SOURCE.
00782/032   PASCAL/SB                OS/EDITXPL      SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/EDITXPL.SX.032(1)        716
            5.0T3   716  PASCAL/SB.OS/EDITXPL.SX.032        1 LINE     80    3 PAGE UM   UNSP                OCT. 20, 1979  19:28:13
            5.0T8    95                       
0          THIS FILE CONTAINS THE XPL SOURCE FOR A CARD-IMAGE EDITOR, TO BE USED TO
           EDIT UPDATE PATCHES INTO THE PASCAL COMPILER SOURCE FILES.
0          Referenced by comments of: 782/8, 782/11, 782/14, 782/22, 782/24, 782/59 
00782/033   PASCAL/SB                OS/EDITXPL      OC  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/EDITXPL.OC.033(1)        717
            5.0T3   717  PASCAL/SB.OS/EDITXPL.OC.033        1 LINE   7200    5 PAGE UM   UNSP                OCT. 20, 1979  19:28:15
            5.0T8    96                       
00782/034   PASCAL/SB                OS/REFORMAT     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/REFORMAT.SA.034(1)       718
            5.0T3   718  PASCAL/SB.OS/REFORMAT.SA.034       1 LINE     80   10 PAGE UM   UNSP                OCT. 20, 1979  19:28:17
            5.0T8    97                       
0          THIS FILE CONTAINS THE SOURCE OF A UTILITY PROGRAM THAT CAN BE USED TO 
           REFORMAT XPL OBJECT MODULES ONTO A DISK.
00782/035   PASCAL/SB                OS/PREFIX       SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PREFIX.SX.035(1)         719
            5.0T3   719  PASCAL/SB.OS/PREFIX.SX.035         1 LINE     80   11 PAGE UM   UNSP                OCT. 20, 1979  19:28:20
            5.0T8    98                       
0          THIS FILE CONTAINS A COMMON PREFIX EDITOR, A UTILITY PROGRAM DESIGNED TO
           BE USED IN CONJUNCTION WITH THE SEPARATE COMPILATION OF PASCAL PROGRAM 
           MODULES.
0          Referenced by comments of: 782/1 
00782/036   PASCAL/SB                NOTES           P   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.NOTES.P.036(1)              720
            5.0T3   720  PASCAL/SB.NOTES.P.036              1 LINE     67    3 PAGE UM   UNSP                AUG. 12, 1980  17:59:11
            5.0T8    99                       
0          INTERNAL DOCUMENTATION, WITH REFERENCES, FOR PASCAL/SB.
           NOT YET VERY COMPLETE.
0          Referenced by comments of: 782/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  571
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/037   PASCAL/SB                INSTALL         C   O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.INSTALL.C.037(1)            721
            5.0T3   721  PASCAL/SB.INSTALL.C.037            1 LINE    235    3 PAGE UM   UNSP                SEP. 22, 1980  15:05:22
            5.0T8   100                       
0          A SOURCE FILE WHICH WILL LINK THE VARIOUS FILES TO FORM SHARED VM AND
           PRIVATE VM VERSIONS OF THE COMPILER, LINKER, AND RUNTIME SUPPORT.  THE
           OBJECT FILES ARE CREATED BY SOURCING TO THE SOURCE FILES DIRECTLY.
0          Referenced by comments of: 782/1 
00782/038   PASCAL/SB                USERS MANUAL    WF  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.USERS_MANUAL.WF.038(1)      722
            5.0T3   722  PASCAL/SB.USERS_MANUAL.WF.038      1 LINE    127   35 PAGE UM   UNSP                NOV. 22, 1979  05:15:49
            5.0T8   101                       
0          USER-LEVEL DOCUMENTATION FOR PASCAL/SB.  NOT YET MODIFIED FOR MTS.
0          Referenced by comments of: 782/1, 782/39 
00782/039   PASCAL/SB                USERS MANUAL    P              S1560 5.0T3 VLO FSNAME=PASCAL/SB.USERS_MANUAL.P.039(1)       723
            5.0T3   723  PASCAL/SB.USERS_MANUAL.P.039       1 LINE     85    8 PAGE UM   UNSP                JULY 03, 1981  19:48:52
            5.0T8   102                       
0          MTS UPDATES TO THE PASCAL/SB USER'S MANUAL (782/38).
0          Referenced by comments of: 782/1 
00782/040   PASCAL/SB                PASS 1          SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASS_1.SX.040(1)            724
            5.0T3   724  PASCAL/SB.PASS_1.SX.040            1 LINE    105   67 PAGE UM   UNSP                AUG. 16, 1980  08:32:09
            5.0T8   103                       
0          THIS IS COMPONENT (782/10), AS MODIFIED FOR MTS.
00782/041   PASCAL/SB                PASS 2          SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASS_2.SX.041(1)            725
            5.0T3   725  PASCAL/SB.PASS_2.SX.041            1 LINE    113   98 PAGE UM   UNSP                MAR. 18, 1981  12:15:46
            5.0T8   104                       
0          THIS IS COMPONENT (782/13), AS MODIFIED FOR MTS.
00782/042   PASCAL/SB                PASS 3          SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASS_3.SX.042(1)            726
            5.0T3   726  PASCAL/SB.PASS_3.SX.042            1 LINE     88   56 PAGE UM   UNSP                MAR. 15, 1981  12:18:07
            5.0T8   105                       
0          THIS IS COMPONENT (782/16), AS MODIFIED FOR MTS.
00782/043   PASCAL/SB                PMD             SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.PMD.SX.043(1)               727
            5.0T3   727  PASCAL/SB.PMD.SX.043               1 LINE     80   13 PAGE UM   UNSP                SEP. 22, 1980  15:02:45
            5.0T8   106                       
0          THIS IS COMPONENT (782/18), AS MODIFIED FOR MTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  572
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/044   PASCAL/SB                LINKER          SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.LINKER.SX.044(1)            728
            5.0T3   728  PASCAL/SB.LINKER.SX.044            1 LINE     91   22 PAGE UM   UNSP                MAR. 12, 1981  02:27:52
            5.0T8   107                       
0          THIS IS COMPONENT (782/20), AS MODIFIED FOR MTS.
00782/045   PASCAL/SB                XPL             SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.XPL.SX.045(1)               729
            5.0T3   729  PASCAL/SB.XPL.SX.045               1 LINE     68    6 PAGE UM   UNSP                AUG. 12, 1980  17:40:15
            5.0T8   108                       
0          XPL subroutines used by PASCAL/SB including miscellaneous subroutines
           useful when programming in XPL. 
00782/046   PASCAL/SB                ASM             SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.ASM.SA.046(1)               730
            5.0T3   730  PASCAL/SB.ASM.SA.046               1 LINE    102   10 PAGE UM   UNSP                AUG. 12, 1980  17:35:37
            5.0T8   109                       
0          ASSEMBLY LANGUAGE SUBROUTINES USED BY PASCAL/SB.  USES THE (782/48) PASCAL
           MACRO LIBRARY.
0          Referenced by comments of: 782/48, 782/61 
00782/047   PASCAL/SB                PASTIME         SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASTIME.SA.047(1)           731
            5.0T3   731  PASCAL/SB.PASTIME.SA.047           1 LINE     86   21 PAGE UM   UNSP                MAR. 07, 1981  17:13:42
            5.0T8   110                       
0          THE RUNTIME SUPPORT FOR PASCAL/SB PROGRAMS. USES THE (782/48) PASCAL MACRO
           LIBRARY.
00782/048   PASCAL/SB                MACRO LIB       SM  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.MACRO_LIB.SM.048(1)         732
            5.0T3   732  PASCAL/SB.MACRO_LIB.SM.048         1 LINE     62    1 PAGE UM   UNSP                AUG. 12, 1980  17:37:07
            5.0T8   111                       
0          A MACRO LIBRARY FOR USE BY THE ASSEMBLER ROUTINES (782/46). 
0          Referenced by comments of: 782/46, 782/47 
00782/049   PASCAL/SB                LIBRARY         OL  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.LIBRARY.OL.049(1)           733
            5.0T3   733  PASCAL/SB.LIBRARY.OL.049           1 LINE  32767  117 PAGE UM   UNSP                MAR. 18, 1981  12:25:03
            5.0T8   112                       
0          AN OBJECT LIBRARY WITH MODULES FOR EVERYTHING EXCEPT THE 3 EXPL MAIN PROGRAMS
           (782/50), (782/53), AND (782/56), WHICH ALL HAVE TO HAVE THE SAME NAME.
00782/050   PASCAL/SB                MAIN PROGRAM    SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.MAIN_PROGRAM.SX.050(1)      734
            5.0T3   734  PASCAL/SB.MAIN_PROGRAM.SX.050      1 LINE     91    3 PAGE UM   UNSP                AUG. 12, 1980  17:41:59
            5.0T8   113                       
0          XPL MAIN PROGRAM FOR THE COMPILER.
0          Referenced by comments of: 782/49, 782/51 
1                                                                                               SUN SEP 08/96   15:24:55   Page  573
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00782/051   PASCAL/SB                MAIN PROGRAM    OC  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.MAIN_PROGRAM.OC.051(1)      735
            5.0T3   735  PASCAL/SB.MAIN_PROGRAM.OC.051      1 LINE  32767   21 PAGE UM   UNSP                AUG. 12, 1980  17:42:22
            5.0T8   114                       
0          OBJECT OF (782/50).
00782/052   PASCAL/SB                PASCAL OBJECT   OE  O          UNSP:PAS.SB                                                     
            5.0T3   736  PASCAL/SB.PASCAL_OBJECT.OE.052     1 LINE  32767  127 PAGE UM   UNSP                JULY 03, 1981  19:51:11
            5.0T8   115  UNSP:PAS.SB          
0          LINKEDITED PASCAL COMPILER, READY TO BE $RUN. LOGS USAGE STATISTICS IN
           UNSP:STATS, IF PRESENT, AND INTERRUPTS IN UNSP:PAS.SB.LOG (782/61).
0          Referenced by comments of: 782/1 
00782/053   PASCAL/SB                RUN             SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.RUN.SX.053(1)               737
            5.0T3   737  PASCAL/SB.RUN.SX.053               1 LINE     64    1 PAGE UM   UNSP                JUNE 16, 1980  13:22:55
            5.0T8   116                       
0          XPL MAIN PROGRAM FOR RUNTIME SUPPORT, PMD.
0          Referenced by comments of: 782/49 
00782/054   PASCAL/SB                RUN             OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.RUN.OE.054(1)               738
            5.0T3   738  PASCAL/SB.RUN.OE.054               1 LINE  11060    5 PAGE UM   UNSP                JUNE 16, 1980  13:23:05
            5.0T8   117                       
00782/055   PASCAL/SB                RUN             OE  O          UNSP:PAS.SB.RUN                                                 
            5.0T3   739  PASCAL/SB.RUN.OE.055               1 LINE  22816   14 PAGE UM   UNSP                JULY 03, 1981  19:51:27
            5.0T8   118  UNSP:PAS.SB.RUN      
0          LINKEDITED VERSION OF RUNTIME SUPPORT, READY TO BE RUN WITH A PASCAL OBJECT
           MODULE.
0          Referenced by comments of: 782/1, 784/3 
00782/056   PASCAL/SB                LINK            SX  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.LINK.SX.056(1)              740
            5.0T3   740  PASCAL/SB.LINK.SX.056              1 LINE     63    1 PAGE UM   UNSP                FEB. 10, 1980  17:27:59
            5.0T8   119                       
0          XPL MAIN PROGRAM FOR THE LINKER.
0          Referenced by comments of: 782/49 
00782/057   PASCAL/SB                LINK            OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.LINK.OE.057(1)              741
            5.0T3   741  PASCAL/SB.LINK.OE.057              1 LINE    440    1 PAGE UM   UNSP                FEB. 10, 1980  17:27:25
            5.0T8   120                       
00782/058   PASCAL/SB                LINK            OE  O          UNSP:PAS.SB.LINK                                                
            5.0T3   742  PASCAL/SB.LINK.OE.058              1 LINE  32767   24 PAGE UM   UNSP                JULY 03, 1981  19:51:57
            5.0T8   121  UNSP:PAS.SB.LINK     
0          LINKEDITED VERSION OF THE LINKER.  $RUN THIS TO COMBINE NON-STANDARD MODULES,
           FORMING STANDARD ONES.
1                                                                                               SUN SEP 08/96   15:24:55   Page  574
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 782/1 
00782/059   PASCAL/SB                EDITXPL         UC  G          S1560 5.0T3 VLO FSNAME=PASCAL/SB.EDITXPL.UC.059(1)           743
            5.0T3   743  PASCAL/SB.EDITXPL.UC.059           1 LINE     84    1 PAGE UM   UNSP                FEB. 25, 1980  09:57:47
            5.0T8   122                       
0          A CDUPDATE TO THE STONY BROOK UPDATE PROGRAM EDITXPL (782/32), WHICH CONVERTS
           IT TO EXPL AND MTS. OBJECT IS IN (782/60).
00782/060   PASCAL/SB                EDITXPL         OC  O          S1560 5.0T3 VLO FSNAME=PASCAL/SB.EDITXPL.OC.060(1)           744
            5.0T3   744  PASCAL/SB.EDITXPL.OC.060           1 LINE   2540    3 PAGE UM   UNSP                FEB. 25, 1980  09:55:17
            5.0T8   123                       
0          HAS A $CONTINUE WITH *EXPLIB (495/2) RECORD.
0          Referenced by comments of: 782/59 
00782/061   PASCAL/SB                LOG             D            # UNSP:PAS.SB.LOG                                                 
                                                                                    UM   UNSP                                       
                         UNSP:PAS.SB.LOG      
0          THIS IS THE LOG FILE FOR PASCAL/SB. IN THE DISTRIBUTED VERSION OF PASCAL/SB,
           THE LOG FILE, NAMED UNSP:PAS.SB.LOG, MUST BE CREATED. TO CHANGE THIS,
           USERRLOG IN (782/46) MUST BE ALTERED.
0          Referenced by comments of: 782/52 
00782/062   PASCAL/SB                TM1.1           WF             S1560 5.0T3 VLO FSNAME=PASCAL/SB.TM1.1.WF.062(1)             745
            5.0T3   745  PASCAL/SB.TM1.1.WF.062             1 LINE     73    5 PAGE UM   UNSP                SEP. 13, 1979  01:59:59
            5.0T8   124                       
0          THIS IS PASCAL TECHNICAL MEMO 1.1:  "THE STONY BROOK PASCAL/360 COMPILER,"
           A 7-PAGE OVERVIEW OF THE COMPILER.
00782/063   PASCAL/SB                TM5.1           WF             S1560 5.0T3 VLO FSNAME=PASCAL/SB.TM5.1.WF.063(1)             746
            5.0T3   746  PASCAL/SB.TM5.1.WF.063             1 LINE    136   12 PAGE UM   UNSP                SEP. 13, 1979  02:00:11
            5.0T8   125                       
0          THIS IS PASCAL TECHNICAL MEMO 5.1: "DOCUMENTATION OF INTERNAL STRUCTURE,"
           A 16-PAGE DESCRIPTION OF PASS 1.
00782/064   PASCAL/SB                TM5.2           WF             S1560 5.0T3 VLO FSNAME=PASCAL/SB.TM5.2.WF.064(1)             747
            5.0T3   747  PASCAL/SB.TM5.2.WF.064             1 LINE     84   31 PAGE UM   UNSP                SEP. 13, 1979  02:00:26
            5.0T8   126                       
0          THIS IS PASCAL TECHNICAL MEMO 5.2:  "PASS 2 - SEMANTIC ANALYSIS AND
           GENERATION OF SYMBOLIC TRIPLES," A 50-PAGE DESCRIPTION OF PASS 2 AND THE
           TRIPLES USED BY PASS 3.
0          Referenced by comments of: 782/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  575
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00783/001   PASCAL/8000              OS/JCL              O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/JCL..001(1)            748
            5.0T3   748  PASCAL/8000.OS/JCL..001            1 LINE     80   10 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:12:25
            5.0T8   127                       
0          THIS IS THE AUSTRIALIAN ATOMIC ENERGY COMMISSION PASCAL/8000 COMPILER, WHICH
           HAS BEEN MODIFIED TO RUN IN MTS. COMPONENTS (783/1) THROUGH (783/10) ARE THE
           COMPONENTS OF THE OS VERSION; (783/11) THROUGH (783/22) ARE COMPONENTS OF THE
           MTS VERSION.
            
           THIS COMPONENT CONTAINS OS JCL AND COMMENTS.
0          Referenced by comments of: 783/1, 792/1 
00783/002   PASCAL/8000              OS/LINK         SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/LINK.SW.002(1)         749
            5.0T3   749  PASCAL/8000.OS/LINK.SW.002         1 LINE    111   85 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:17:04
            5.0T8   128                       
0          OS OBJECT-MODULE-PRODUCING COMPILER.
0          Referenced by comments of: 783/8 
00783/003   PASCAL/8000              OS/ASM          SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/ASM.SA.003(1)          750
            5.0T3   750  PASCAL/8000.OS/ASM.SA.003          1 LINE     80  172 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:15:18
            5.0T8   129                       
0          OS RUNTIME SUPPORT.
00783/004   PASCAL/8000              OS/OBJECT       OL  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/OBJECT.OL.004(1)       751
            5.0T3   751  PASCAL/8000.OS/OBJECT.OL.004       1 LINE     80   52 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:13:01
            5.0T8   130                       
0          OS LIBRARY WITH OBJECT FOR THE STANDARD COMPILER AND RUNTIME SUPPORT.
00783/005   PASCAL/8000              OS/CMPGO        SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/CMPGO.SW.005(1)        752
            5.0T3   752  PASCAL/8000.OS/CMPGO.SW.005        1 LINE    111   80 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:15:56
            5.0T8   131                       
0          OS COMPILE-AND-GO COMPILER AND NONSTANDARD OBJECT MODULE.
0          Referenced by comments of: 783/8 
00783/006   PASCAL/8000              OS/CMP1         OC  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/CMP1.OC.006(1)         753
            5.0T3   753  PASCAL/8000.OS/CMP1.OC.006         1 LINE   1024   24 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:13:30
            5.0T8   132                       
0          FILE 1, NONSTANDARD OBJECT, FOR COMPILE AND GO COMPILER.
00783/007   PASCAL/8000              OS/CMP2         OC  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/CMP2.OC.007(1)         754
            5.0T3   754  PASCAL/8000.OS/CMP2.OC.007         1 LINE     80    1 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:14:09
            5.0T8   133                       
0          FILE 2 FOR COMPILE AND GO COMPILER.
1                                                                                               SUN SEP 08/96   15:24:55   Page  576
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00783/008   PASCAL/8000              OS/ERRORS       M              S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/ERRORS.M.008(1)        755
            5.0T3   755  PASCAL/8000.OS/ERRORS.M.008        1 LINE     75    3 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:14:30
            5.0T8   134                       
0          ERROR MESSAGE FILE USED BY BOTH PASCAL/8000 OS COMPILERS (783/2) AND (783/5).
00783/009   PASCAL/8000              EDITOR          SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.EDITOR.SW.009(1)          756
            5.0T3   756  PASCAL/8000.EDITOR.SW.009          1 LINE     72    4 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:17:43
            5.0T8   135                       
0          AN UPDATING PROGRAM.
00783/010   PASCAL/8000              OS/MANUAL       P              S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/MANUAL.P.010(1)        757
            5.0T3   757  PASCAL/8000.OS/MANUAL.P.010        1 LINE     74   44 PAGE RPI  ABDALI    UNSP      JUNE 08, 1979  00:18:01
            5.0T8   136                       
0          A WRITEUP FOR THE OS VERSION OF PASCAL/8000.
0          Referenced by comments of: 783/1 
00783/011   PASCAL/8000              COMMENTS        P              S1560 5.0T3 VLO FSNAME=PASCAL/8000.COMMENTS.P.011(1)         758
            5.0T3   758  PASCAL/8000.COMMENTS.P.011         1 LINE     68    1 PAGE RPI  ABDALI    UNSP      FEB. 10, 1980  17:48:32
            5.0T8   137                       
0          THIS IS A VERY BRIEF DESCRIPTION OF THE AUSTRALIAN ATOMIC ENERGY COMMISSION
           PASCAL/8000 COMPILER, AND THE MTS VERSION THEREOF. SEE ALSO COMP (783/12).
0          Referenced by comments of: 783/1 
00783/012   PASCAL/8000              INSTALL.INFO    P              S1560 5.0T3 VLO FSNAME=PASCAL/8000.INSTALL.INFO.P.012(1)     759
            5.0T3   759  PASCAL/8000.INSTALL.INFO.P.012     1 LINE     74    5 PAGE RPI  ABDALI    UNSP      JUNE 17, 1980  16:00:35
            5.0T8   138                       
0          A DESCRIPTION AND INSTALLATION INSTRUCTIONS FOR THE MTS VERSION OF PASCAL/8000.
0          Referenced by comments of: 783/11 
00783/013   PASCAL/8000              COMPILER        SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.COMPILER.SW.013(1)        760
            5.0T3   760  PASCAL/8000.COMPILER.SW.013        1 LINE     80   87 PAGE RPI  ABDALI    UNSP      JUNE 17, 1980  16:01:50
            5.0T8   139                       
0          MTS VERSION OF THE PASCAL/8000 COMPILER.
00783/014   PASCAL/8000              COMPILER        UC  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.COMPILER.UC.014(1)        761
            5.0T3   761  PASCAL/8000.COMPILER.UC.014        1 LINE     66    3 PAGE RPI  ABDALI    UNSP      JUNE 17, 1980  16:17:30
            5.0T8   140                       
0          AN UPDATE DECK FOR LOCAL CHANGES. ADDS A CALL TO SNOOP IN UNSP:LIBRARY
           (685/2) TO RECORD USAGE STATISTICS IN THE FILE UNSP:STATS, IF IT EXISTS.
           COMPILE WITH PAR=;C=1024 AND T=15 ON AN AMDAHL V/7.
0          Referenced by comments of: 783/20 
1                                                                                               SUN SEP 08/96   15:24:55   Page  577
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00783/015   PASCAL/8000              COMPILER        OE  O          UNSP:PAS.8000                                                   
            5.0T3   762  PASCAL/8000.COMPILER.OE.015        1 LINE  32767   34 PAGE RPI  ABDALI    UNSP      JULY 03, 1981  19:54:02
            5.0T8   141  UNSP:PAS.8000        
0          CONTAINS A $CONTINUE WITH UNSP:PAS.8000.RUN (783/19) RECORD.
00783/016   PASCAL/8000              RUNMACLIB       SM  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.RUNMACLIB.SM.016(1)       763
            5.0T3   763  PASCAL/8000.RUNMACLIB.SM.016       1 LINE     73    3 PAGE RPI  ABDALI    UNSP      MAR. 09, 1979  22:10:53
            5.0T8   142                       
0          Referenced by comments of: 783/17 
00783/017   PASCAL/8000              RUNTIME         SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.RUNTIME.SA.017(1)         764
            5.0T3   764  PASCAL/8000.RUNTIME.SA.017         1 LINE     73   47 PAGE RPI  ABDALI    UNSP      JUNE 17, 1980  16:14:37
            5.0T8   143                       
0          THE RUNTIME SUPPORT. ASSEMBLE WITH PAR=BATCH. USES THE (783/16) MACRO
           LIBRARY.
00783/018   PASCAL/8000              RUNTIME         UC  G          S1560 5.0T3 VLO FSNAME=PASCAL/8000.RUNTIME.UC.018(1)         765
            5.0T3   765  PASCAL/8000.RUNTIME.UC.018         1 LINE     68    1 PAGE RPI  ABDALI    UNSP      JUNE 17, 1980  16:17:50
            5.0T8   144                       
00783/019   PASCAL/8000              RUNTIME         OE  O          UNSP:PAS.8000.RUN                                               
            5.0T3   766  PASCAL/8000.RUNTIME.OE.019         1 LINE  14284    6 PAGE RPI  ABDALI    UNSP      JULY 03, 1981  19:55:20
            5.0T8   145  UNSP:PAS.8000.RUN    
0          Referenced by comments of: 783/15 
00783/020   PASCAL/8000              ERROR MSGS      M   O          UNSP:PAS.8000.ERR                                               
            5.0T3   767  PASCAL/8000.ERROR_MSGS.M.020       1 LINE     75    3 PAGE RPI  ABDALI    UNSP      JULY 03, 1981  19:55:22
            5.0T8   146  UNSP:PAS.8000.ERR    
0          ERROR MESSAGES USED BY THE (783/14) COMPILER.
00783/021   PASCAL/8000              MANUAL          P   O          S1560 5.0T3 VLO FSNAME=PASCAL/8000.MANUAL.P.021(1)           768
            5.0T3   768  PASCAL/8000.MANUAL.P.021           1 LINE     78   51 PAGE RPI  ABDALI    UNSP      JUNE 17, 1980  16:16:23
            5.0T8   147                       
0          USER LEVEL DESCRIPTION OF THE PASCAL/8000 SYSTEM AND HOW TO USE IT.
00783/022   PASCAL/8000              TEST            SW  G          S1560 5.0T3 VLO FSNAME=PASCAL/8000.TEST.SW.022(1)            769
            5.0T3   769  PASCAL/8000.TEST.SW.022            1 LINE     89    9 PAGE RPI  ABDALI    UNSP      SEP. 08, 1979  20:06:13
            5.0T8   148                       
0          SOURCE FILE CONTAINING PASCAL PROGRAMS AND MTS COMMANDS TO TEST THE COMPILER.
0          Referenced by comments of: 783/1 
00784/001   CRLFASCEBC                               SW  G          S1153 UNSP VLO FSNAME=CRLFASCEBC.PAS                            
            5.0T3   770  CRLFASCEBC..SW.001                 1 LINE     64    1 PAGE UM   UNSP                FEB. 14, 1980  16:04:59
            5.0T8   149                       
0          THIS PROGRAM CONVERTS STREAM-ORIENTED ASCII FILES WITH EMBEDDED CARRIAGE
1                                                                                               SUN SEP 08/96   15:24:55   Page  578
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          CONTROL TO RECORD-ORIENTED EBCDIC FILES WITH CARRIAGE CONTROL CHARACTERS IN
           COLUMN 1. THE ASCII CHARACTERS <CR>, <LF>, AND <FF> ARE DELETED AND
           APPROPRIATE CARRIAGE CONTROL CHARACTERS ARE ADDED. COMPONENT (784/4) CONTAINS
           A WRITEUP.
0          Referenced by comments of: 784/2, 784/3 
00784/002   CRLFASCEBC               SUBROUTINE      SA  G          S1153 UNSP VLO FSNAME=CRLFASCEBC.ASM                            
            5.0T3   771  CRLFASCEBC.SUBROUTINE.SA.002       1 LINE     62    1 PAGE UM   UNSP                FEB. 14, 1980  16:05:51
            5.0T8   150                       
0          SUBROUTINE CALLED FROM (784/1) TO DO THE ACTUAL TRANSLATION.
0          Referenced by comments of: 784/3 
00784/003   CRLFASCEBC                               OC  G          UNSP:CRLFASCEBC                                                 
            5.0T3   772  CRLFASCEBC..OC.003                 1 LINE   1358    2 PAGE UM   UNSP                JULY 03, 1981  19:55:52
            5.0T8   151  UNSP:CRLFASCEBC      
0          OBJECT OF (784/1) AND (784/2). CONTAINS A $CONTINUE WITH UNSP:LIBRARY (685/2)
           AND A $CONTINUE WITH UNSP:PAS.SB.RUN (782/55) RECORD.
00784/004   CRLFASCEBC               WRITEUP         P              UNSP:CRLFASCEBC.W                                               
            5.0T3   773  CRLFASCEBC.WRITEUP.P.004           1 LINE     71    1 PAGE UM   UNSP                JULY 03, 1981  19:55:53
            5.0T8   152                       
0          Referenced by comments of: 784/1 
00785/001   SOUNDEX                                  SF  G          S1153 UNSP VLO FSNAME=SOUNDEX.FTN                               
            5.0T3   774  SOUNDEX..SF.001                    1 LINE     68    1 PAGE UM   UNSP                FEB. 14, 1980  16:03:28
            5.0T8   153                       
0          THE SOUNDEX SYSTEM IS BASED ON AN ALGORITHM WHICH ENCODES NAMES INTO A 
           FOUR-CHARACTER CODE SO THAT SIMILAR SOUNDING NAMES ARE ENCODED INTO 
           SIMILAR CODES. IT IS USEFUL WHEN EXACT SPELLING OF NAMES IS NOT KNOWN,
           FOR EXAMPLE, IN AIRLINE RESERVATION SYSTEMS.
            
           THIS SUBCOMPONENT CONTAINS A PROGRAM TO READ A LIST OF NAMES AND ENCODE
           THEM.
0          Referenced by comments of: 785/2 
00785/002   SOUNDEX                                  OE  G          UNSP:SOUNDEX                                                    
            5.0T3   775  SOUNDEX..OE.002                    1 LINE    730    1 PAGE UM   UNSP                JULY 03, 1981  19:55:54
            5.0T8   154  UNSP:SOUNDEX         
0          OBJECT OF (785/1). CONTAINS A $CONTINUE WITH UNSP:LIBRARY (685/2) RECORD.
00785/003   SOUNDEX                  SUBROUTINE      SA  G          S1153 UNSP VLO FSNAME=SOUNDEX.ASM                               
            5.0T3   776  SOUNDEX.SUBROUTINE.SA.003          1 LINE     72    2 PAGE UM   UNSP                FEB. 14, 1980  16:02:39
            5.0T8   155                       
0          SUBROUTINE TO ENCODE NAMES USING THE SOUNDEX ALGORITHM.  OBJECT IS IN
           UNSP:LIBRARY (685/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  579
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00785/004   SOUNDEX                  WRITEUP         P              UNSP:SOUNDEX.W                                                  
            5.0T3   777  SOUNDEX.WRITEUP.P.004              1 LINE     70    1 PAGE UM   UNSP                JULY 03, 1981  19:55:56
            5.0T8   156                       
00786/001   CONSTANTS                                D              UNSP:CONSTANTS                                                  
            5.0T3   778  CONSTANTS..D.001                   1 LINE    126    2 PAGE UM   UNSP                JULY 03, 1981  19:55:57
            5.0T8   157                       
0          A LIST OF COMMONLY SEEN CONSTANTS, EACH CONVERTED IN VARIOUS WAYS. 
00787/001A  UNIT CHECK ROUTINES      MACROS          SM  G          COPY:UC.MACROS                                                  
            5.1T2   230  UNIT_CHECK_ROUTINES.MACRO.SM.001   1 LINE     72    4 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:28
                         COPY:UC.MACROS       
0          This subcomponent is the Unit Check Routines macro library.
0          Referenced by comments of: 23/1, 79/1, 135/1, 621/4, 655/4, 682/24, 724/1, 769/4, 769/7, 787/3, 787/5, 787/6,
                 787/8, 787/9, 787/19, 787/21, 1058/3, 1058/5, 1058/7, 1058/9, 1079/18 
00787/002C  UNIT CHECK ROUTINES      MACROS          SM  G          FILE:UCMACROS(-10000,-1)                                        
            5.1T2   231  UNIT_CHECK_ROUTINES.MACRO.SM.002   1 LINE     72    4 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:28
0          Base source for unit check macros.
0          Referenced by comments of: 787/3 
00787/003C  UNIT CHECK ROUTINES      MACROS          UC  G          FILE:UCMACROS(1000)                                             
            5.1T2   232  UNIT_CHECK_ROUTINES.MACRO.UC.003   1 LINE     69    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:28
0          Update deck to be applied to (787/2) to produce input to *MACUTIL
           to yield (787/1).
00787/004A  UNIT CHECK ROUTINES      DESIGN PAPER    WT             W170:UC.DESIGNPAPER                                             
            5.1T2   233  UNIT_CHECK_ROUTINES.DESIG.WT.004   1 LINE    140    7 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:28
0          ARCHITECTURAL DESCRIPTION OF UNIT CHECK ROUTINE INTERFACE AND CHARACTERISTICS.
00787/005A  UNIT CHECK ROUTINES      UCDISK          SM  G          FILE:UCDISK(-10000,-1)                                          
            5.1T2   234  UNIT_CHECK_ROUTINES.UCDIS.SM.005   1 LINE     72   20 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:29
                         FILE:UCDISK          
0          Base source for subtasking monitor (1058) compatible unit check
           routines for 3330, 3350, 2301, and 2305 devices. Assemble using
           COPY:UC.MACROS (787/1). Copies COPY:CMDAREADSECT (531/20) and
           *CNFGINFODSECT (654).
0          Referenced by comments of: 655/4, 787/6, 787/8 
00787/006C  UNIT CHECK ROUTINES      UCDISK          UC  G          FILE:UCDISK(1000)                                               
            5.1T2   235  UNIT_CHECK_ROUTINES.UCDIS.UC.006   1 LINE     72    6 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:30
0          Update deck, to be applied to (787/5) to produce current source.
           Assemble with COPY:UC.MACROS (787/1).  Copies COPY:CMDAREADSECT
           (531/19) and *CNFGINFODSECT (654).
1                                                                                               SUN SEP 08/96   15:24:55   Page  580
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00787/007A  UNIT CHECK ROUTINES      UCDISK          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00787/008A  UNIT CHECK ROUTINES      UC3330          SA  G          FILE:UC3330(-10000,-1)                                          
            5.1T2   236  UNIT_CHECK_ROUTINES.UC333.SA.008   1 LINE     72    4 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:31
                         FILE:UC3330          
0          Base source for front-end to the UCDIST routines (787/5) to make them
           compatible with the old style routines in DISKUC (787/11). Copies
           COPY:UC.MACROS (787/1).
0          Referenced by comments of: 603/1, 787/9 
00787/009C  UNIT CHECK ROUTINES      UC3330          UC  G          FILE:UC3330(1000)                                               
            5.1T2   237  UNIT_CHECK_ROUTINES.UC333.UC.009   1 LINE     70    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:31
0          Update deck to be applied to (787/8) to yield current source.  Uses
           COPY:UC.MACROS (787/1).
00787/010A  UNIT CHECK ROUTINES      UC3330          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00787/011   UNIT CHECK ROUTINES      DISKUC          SA  G          FILE:DASDUC(1000)                                               
            5.0T3   783  UNIT_CHECK_ROUTINES.DASDU.SA.007   1 LINE     72    9 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:07
            5.0T8   162                       
0          "OLD-STYLE" 2311/2314/2321/2301 UNIT CHECK ROUTINES.
0          Referenced by comments of: 787/8 
00787/012   UNIT CHECK ROUTINES      DISKUC          OC  G          FILE:DASDUC(1,999)                                              
            5.0T3   784  UNIT_CHECK_ROUTINES.DASDU.OC.008   1 LINE     80    3 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:08
            5.0T8   163  FILE:DASDUC          
00787/013A  UNIT CHECK ROUTINES      3330 TESTER     SA  O          FILE:UCDISK.TEST(1000)                                          
            5.1T2   238  UNIT_CHECK_ROUTINES.3330.SA.013    1 LINE     72    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:31
0          TEST PROGRAM TO DEBUG NEW VERSIONS OF 3330 COMPATIBLE UNIT CHECK ROUTINES.
           ASSEMBLE USING OLD:CC.MACROS (1054/4).  COPIES COPY:CMDAREADSECT (531/20).
00787/014A  UNIT CHECK ROUTINES      3330 TESTER     OC  O          FILE:UCDISK.TEST(1,998)                                         
            5.1T2   239  UNIT_CHECK_ROUTINES.3330.OC.014    1 LINE     80    6 PAGE UM   HELFFRICH           JULY 23, 1983  13:22:32
00787/015   UNIT CHECK ROUTINES      UC3330 TESTER   SA  O          FILE:UC3330.TEST(1000)                                          
            5.0T3   787  UNIT_CHECK_ROUTINES.UC333.SA.011   1 LINE     72    3 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:11
            5.0T8   166                       
0          TEST PROGRAM TO DEBUG NEW VERSIONS OF UC3330.  ASSEMBLE USING OLD:CC.MACROS
           (1054/4) AND COPY:MISC.MACROS (728). COPIES COPY:CMDAREADSECT (531/20).
1                                                                                               SUN SEP 08/96   15:24:55   Page  581
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00787/016   UNIT CHECK ROUTINES      UC3330 TESTER   OC  O          FILE:UC3330.TEST(1,998)                                         
            5.0T3   788  UNIT_CHECK_ROUTINES.UC333.OC.012   1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:12
            5.0T8   167                       
00787/017   UNIT CHECK ROUTINES      SYNCH TV RTNS   SA  G          W170:UCSYNC(1000)                                               
            5.0T3   789  UNIT_CHECK_ROUTINES.SYNCH.SA.013   1 LINE     70    3 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:13
            5.0T8   168  W170:UCSYNC          
0          Synchronous, i.e., non-Subtasking Monitor (1058), unit check transfer vector
           routines.  Requires COPY:MISC.MACROS (728).
00787/018   UNIT CHECK ROUTINES      SYNCH TV RTNS   OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00787/019   UNIT CHECK ROUTINES      TAPE UNIT CHCK  SA  G          TAPE:UCTAPE(1000)                                               
            5.0T3   790  UNIT_CHECK_ROUTINES.TAPE.SA.015    1 LINE     72   22 PAGE UM   HELFFRICH           AUG. 06, 1981  05:35:55
            5.0T8   169  TAPE:UCTAPE          
0          2400 and 3400 series tape unit check routines. Assemble with COPY:UC.MACROS
           (787/1), OLD:CC.MACROS (1054/4), and COPY:MISC.MACROS (728). Copies
           COPY:GLOBALS (1026/3), COPY:CMDAREADSECT (531/20) and *CNFGINFODSECT (654/1).
0          Referenced by comments of: 12/1, 23/1, 388/1, 655/4, 787/21 
00787/020   UNIT CHECK ROUTINES      TAPE UNIT CHCK  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          D5.0 versions of HASPLING (388), TPMOVE (023), STAT JOB (079) and 
           TAPERTN (135) require these unit check routines.
           Object part of Resident System (468).
00787/021   UNIT CHECK ROUTINES      UCTAPE TESTER   SA  G          TAPE:UCTAPE.TEST(1000)                                          
            5.0T3   791  UNIT_CHECK_ROUTINES.UCTAP.SA.017   1 LINE     72    3 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:45
            5.0T8   170                       
0          Test program to debug new versions of (787/19). Assemble with OLD:CC.MACROS
           (1054/4) and COPY:UC.MACROS (787/1). Copies COPY:CMDAREADSECT (531/20).
00787/022   UNIT CHECK ROUTINES      UCTAPE TESTER   OC  G          TAPE:UCTAPE.TEST(1,999)                                         
            5.0T3   792  UNIT_CHECK_ROUTINES.UCTAP.OC.018   1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  19:56:46
            5.0T8   171                       
00788/001   DUMMY CLS                SOURCE          SA  G          S1560 5.0T3 VLO FSNAME=DUMMY_CLS.SOURCE.SA.001(1)            793
            5.0T3   793  DUMMY_CLS.SOURCE.SA.001            1 LINE     55    1 PAGE UM   MTS       OGDEN     APR. 06, 1980  13:58:32
            5.0T8   172                       
0          THIS IS A SIMPLE CLS TO PRINT THE FOLLOWING MESSAGE FOR UNIMPLEMENTED
           COMMANDS:
            
             "THIS COMMAND IS NOT YET IMPLEMENTED"
1                                                                                               SUN SEP 08/96   15:24:55   Page  582
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00788/002   DUMMY CLS                *CLSNEW         OC  G        # MTS:TST.CLSDUMMY                                                
                                                                                    UM   MTS       OGDEN                            
                         *CLSNEW              
0          FOR TESTING NEW CLS'S.
00788/003   DUMMY CLS                *CLSNEW2        OC  G        # MTS:TST.CLSDUMMY                                                
                                                                                    UM   MTS       OGDEN                            
                         *CLSNEW2             
0          FOR TESTING NEW CLS'S.
00788/004   DUMMY CLS                *CLSNEW3        OC  G        # MTS:TST.CLSDUMMY                                                
                                                                                    UM   MTS       OGDEN                            
                         *CLSNEW3             
0          FOR TESTING NEW CLS'S.
00789/001   SHUTDOWN MESSAGE         *SDM            C              *SDM                                                            
            5.0T3   794  SHUTDOWN_MESSAGE.*SDM.C.001        1 LINE     63    1 PAGE UM   MTS       WSG       JULY 03, 1981  19:57:12
            5.0T8   173  *SDM                 
0          Operator file to put in shutdown message for UM Data Concentrators and
           Merit computer network.
00789/002A  SHUTDOWN MESSAGE         SYS:SDM         SG  G          S1644 5.0BT1 VLO FSNAME=SHUTDOWN_MESSAGE.SYS:SDM.SG.002(1)   573
            5.1T2   240  SHUTDOWN_MESSAGE.SYS:SDM.SG.002    1 LINE     77    1 PAGE UM   MTS       WSG       NOV. 21, 1982  19:07:41
0          Program to read a shutdown message from the operators' console and
           place it in the Data Concentrators.
00789/003A  SHUTDOWN MESSAGE         SYS:SDM         OC  G          SYS:SDM                                                         
            5.1T2   241  SHUTDOWN_MESSAGE.SYS:SDM.OC.003    1 LINE   1516    1 PAGE UM   MTS       WSG       JULY 23, 1983  13:28:04
                         SYS:SDM              
00789/004   SHUTDOWN MESSAGE         SYS:MSDM        SG  G          S1560 5.0T3 VLO FSNAME=SHUTDOWN_MESSAGE.SYS:MSDM.SG.004(1)   797
            5.0T3   797  SHUTDOWN_MESSAGE.SYS:MSDM.SG.004   1 LINE     77    1 PAGE UM   MTS       WSG       OCT. 13, 1980  08:27:47
            5.0T8   176                       
0          Program to read a shutdown message from the operators' console and to
           place it in the Merit computer network PCPs.
00789/005   SHUTDOWN MESSAGE         SYS:MSDM        OC  G          SYS:MSDM                                                        
            5.0T3   798  SHUTDOWN_MESSAGE.SYS:MSDM.OC.005   1 LINE   1082    1 PAGE UM   MTS       WSG       JULY 03, 1981  19:57:47
            5.0T8   177                       
00790/001   VAMX CONVERSION          DESCRIPTION     WF             S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.DESCRIPTI.WF.001(1)   799
            5.0T3   799  VAMX_CONVERSION.DESCRIPTI.WF.001   1 LINE     76    3 PAGE UM   HELFFRICH           JULY 03, 1981  19:57:48
            5.0T8   178                       
0          WRITEUP DESCRIBING PROCEDURE TO BE FOLLOWED TO CONVERT VAM2 OR OLD-STYLE VAMX
           PACKS TO THE NEW VAMX FORMAT.  THIS SHOULD BE LOOKED AT BEFORE ATTEMPTING TO
           USE THE CONVERSION PROGRAMS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  583
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 790/2, 790/4, 790/5, 790/7 
00790/002   VAMX CONVERSION          PAT/DSCB CONV   SA  O          S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.PAT/DSCB.SA.002(1)    800
            5.0T3   800  VAMX_CONVERSION.PAT/DSCB.SA.002    1 LINE     79    6 PAGE UM   HELFFRICH           JULY 03, 1981  19:57:48
            5.0T8   179                       
0          THIS IS THE SOURCE, ADAPTED FROM (790/4), TO CONVERT OLD-STYLE VAMX OR VAM2
           TO NEW STYLE VAMX FORMAT. ASSEMBLE USING COPY:FILE.MACROS (482/45) AND
           COPY:MISC.MACROS (728).
            
           WARNING: THIS PROGRAM HAS NEVER BEEN USED TO COMPLETELY CONVERT AN OLD-STYLE
           VAMX PACK OR A VAM2 PACK TO A NEW-STYLE PACK. SEE (790/1).
0          Referenced by comments of: 790/4 
00790/003   VAMX CONVERSION          PAT/DSCB CONV   OC  O          S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.PAT/DSCB.OC.003(1)    801
            5.0T3   801  VAMX_CONVERSION.PAT/DSCB.OC.003    1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  19:57:49
            5.0T8   180                       
00790/004   VAMX CONVERSION          PAT/DSCB CONV   SA  G          S1431 4.3T2 VLO FSNAME=VAMX_CONVERSION.PAT/DSCB.SA.004(1)    281
            5.0T3   802  VAMX_CONVERSION.PAT/DSCB.SA.004    1 LINE     79    5 PAGE UM   HELFFRICH           APR. 06, 1980  13:58:57
            5.0T8   181                       
0          SOURCE FOR THE VERSION OF THE PROGRAM USED BY UM TO CONVERT FROM V2 TO VX 
           FORMAT.  (790/2) WAS ADAPTED FROM THIS PROGRAM.  SEE (790/1) FOR DETAILS.
           ASSEMBLE USING COPY:FILE.MACROS (482/45) AND COPY:MISC.MACROS (728).
0          Referenced by comments of: 790/2 
00790/005   VAMX CONVERSION          CATALOG CONV    SA  O          S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.CATALOG_C.SA.005(1)   803
            5.0T3   803  VAMX_CONVERSION.CATALOG_C.SA.005   1 LINE     72   10 PAGE UM   HELFFRICH           JULY 03, 1981  19:57:51
            5.0T8   182                       
0          THIS IS THE SOURCE, ADAPTED FROM (790/7) TO CONVERT OLD-STYLE VAMX OR VAM2 TO
           NEW STYLE VAMX FORMAT. SEE (790/1) FOR FURTHER DETAILS.  ASSEMBLE USING
           COPY:FILE.MACROS (482/45).
            
           WARNING:  THIS PROGRAM HAS NEVER BEEN USED TO COMPLETELY CONVERT AN OLD-STYLE
           VAMX PACK OR A VAM2 PACK TO A NEW-STYLE PACK.  SEE (790/1).
0          Referenced by comments of: 790/7 
00790/006   VAMX CONVERSION          CATALOG CONV    OC  O          S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.CATALOG_C.OC.006(1)   804
            5.0T3   804  VAMX_CONVERSION.CATALOG_C.OC.006   1 LINE     80    4 PAGE UM   HELFFRICH           JULY 03, 1981  19:57:53
            5.0T8   183                       
00790/007   VAMX CONVERSION          CATALOG CONV    SA  G          S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.CATALOG_C.SA.007(1)   805
            5.0T3   805  VAMX_CONVERSION.CATALOG_C.SA.007   1 LINE     72   10 PAGE UM   HELFFRICH           APR. 06, 1980  13:59:05
            5.0T8   184                       
0          SOURCE FOR THE VERSION OF THE PROGRAM USED BY UM TO CONVERT FROM V2 TO VX 
           FORMAT.  (790/5) WAS ADAPTED FROM THIS PROGRAM.  SEE (790/1) FOR DETAILS.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
1                                                                                               SUN SEP 08/96   15:24:55   Page  584
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 790/5 
00791/001A  DEFAULT                                  SA  G          S1527 ALGOLW 'ARCHIVE                                       37  
            5.1T2   242  DEFAULT..SA.001                    1 LINE     96    3 PAGE UM   J BODWIN            JUNE 11, 1982  15:39:33
0          ROUTINES PAGSLFT AND TIMELFT WHICH RETURN THE MTS PAGE AND TIME LIMITS, THE
           MINIMUM OF LOCAL AND GLOBAL, OR 0 IF NO LIMIT IS IN EFFECT. ASSEMBLE USING
           *SYSMAC.
0          Referenced by comments of: 528/2 
00791/002A  DEFAULT                                  OC  G          S1527 ALGOLW 'ARCHIVE'                                      60  
            5.1T2   243  DEFAULT..OC.002                    1 LINE     80    2 PAGE UM   J BODWIN            JUNE 11, 1982  15:47:55
00792/001   PASCAL FILES             ERRORS          SW  G          S1560 5.0T3 VLO FSNAME=PASCAL_FILES.ERRORS.SW.001(1)         808
            5.0T3   808  PASCAL_FILES.ERRORS.SW.001         1 LINE     81   17 PAGE UM   PICKELMAN           APR. 24, 1980  03:15:05
            5.0T8   187                       
0          THIS COMPONENT CONTAINS FILES FOR USE WITH THE VARIOUS PASCAL COMPILERS
           DISTRIBUTED BY MICHIGAN. SEE ALSO THE PASCAL VALIDATION SUITE (781) AND THE
           PASCAL COMPILERS: PASCAL/SB (782), PASCAL/UBC (1052), PASCAL/8000 (783), AND
           PASCAL/SLAC (793).
            
           THIS SUBCOMPONENT CONTAINS SEVERAL PROGRAMS TO TEST A PASCAL COMPILER'S ERROR
           RECOVERY. SEE "PASCAL SYNTAX ERRORS DATA BASE" BY G. DAVID RIPLEY, APRIL 19,
           1979, AVAILABLE FROM:
            
                   PAUL PICKELMANN
                   COMPUTING CENTER
                   UNIVERSITY OF MICHIGAN
                   1075 BEAL AVE.
                   ANN ARBOR, MI 48109
00792/002   PASCAL FILES             ERRORS          SW  O          S1560 5.0T3 VLO FSNAME=PASCAL_FILES.ERRORS.SW.002(1)         809
            5.0T3   809  PASCAL_FILES.ERRORS.SW.002         1 LINE     64    1 PAGE UM   PICKELMAN           JULY 03, 1981  19:58:34
            5.0T8   188                       
0          MORE PROGRAMS TO TEST A PASCAL COMPILER'S ERROR RECOVERY. 
00792/003   PASCAL FILES             TEST            SW  O          S1560 5.0T3 VLO FSNAME=PASCAL_FILES.TEST.SW.003(1)           810
            5.0T3   810  PASCAL_FILES.TEST.SW.003           1 LINE     90   48 PAGE UM   PICKELMAN           NOV. 22, 1979  05:40:15
            5.0T8   189                       
0          SEVERAL PASCAL PROGRAMS TO TEST PASCAL/SB.
0          Referenced by comments of: 782/1, 792/4, 792/5 
00792/004   PASCAL FILES             TEST            D   O          S1560 5.0T3 VLO FSNAME=PASCAL_FILES.TEST.D.004(1)            811
            5.0T3   811  PASCAL_FILES.TEST.D.004            1 LINE     68    1 PAGE UM   PICKELMAN           SEP. 13, 1979  01:58:42
            5.0T8   190                       
0          DATA FOR USE WITH (792/3).
0          Referenced by comments of: 782/1, 792/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  585
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00792/005   PASCAL FILES             TEST            C   O          S1560 5.0T3 VLO FSNAME=PASCAL_FILES.TEST.C.005(1)            812
            5.0T3   812  PASCAL_FILES.TEST.C.005            1 LINE     48    3 PAGE UM   PICKELMAN           FEB. 10, 1980  17:29:45
            5.0T8   191                       
0          SOURCE FILE TO TEST THE COMPILER. $CONTINUES WITH (792/3) AND (792/4).
0          Referenced by comments of: 782/1 
00793/001   PASCAL/SLAC              WRITEUP         P              S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.WRITEUP.P.001(1)          814
            5.0T3   814  PASCAL/SLAC.WRITEUP.P.001          1 LINE     79   35 PAGE UM   UNSP                FEB. 10, 1980  18:09:49
            5.0T8   193                       
0          This is the Stanford Pascal compiler. Pascal/UBC (1052) was based on
           an earlier version of this, but they are totally different. The
           compiler is basically the P4 compiler. An assembler is provided
           which transforms Pcode into 360/370 assembler or object modules. The
           Pascal/SLAC system runs under *FAKEOS (545), but is not currently
           installed at UM. It came to UM by way of Curt Hill at the University
           of Nebraska.
            
           This compiler is copyrighted, but nonprofit use, modification and
           redistribution are spcifically allowed so long as the copyright
           notice is included and no fees are charged. S. Hazeghi of the
           Computation Research Group at the Stanford Linear Accelerator
           Center, Stanford, CA 94305 would like to be kept informed of any
           modifications to the compiler.
            
           This subcomponent is a writeup describing the installation and use
           of the Stanford Pascal compiler and associated programs.
0          Referenced by comments of: 792/1 
00793/002   PASCAL/SLAC              COMPILER        SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.COMPILER.SW.002(1)        815
            5.0T3   815  PASCAL/SLAC.COMPILER.SW.002        1 LINE     80   71 PAGE UM   UNSP                FEB. 10, 1980  18:01:17
            5.0T8   194                       
0          THIS IS THE SOURCE FOR THE STANFORD PASCAL COMPILER.  IT PRODUCES PCODE
           WHICH IS ASSEMBLED WITH THE PCODE ASSEMBLER (793/5).
00793/003   PASCAL/SLAC              COMPILER        OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.COMPILER.OE.003(1)        816
            5.0T3   816  PASCAL/SLAC.COMPILER.OE.003        1 LINE  32767   21 PAGE UM   UNSP                FEB. 10, 1980  18:01:37
            5.0T8   195                       
00793/004   PASCAL/SLAC              MESSAGES        M   O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MESSAGES.M.004(1)         817
            5.0T3   817  PASCAL/SLAC.MESSAGES.M.004         1 LINE     67    3 PAGE UM   UNSP                FEB. 10, 1980  18:30:34
            5.0T8   196                       
0          THE TEXT OF THE SYSTEM ERROR MESSAGES USED BY THE COMPILER AND POSSIBLY BY
           OTHER PARTS OF THE SYSTEM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  586
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00793/005   PASCAL/SLAC              PCODE ASSMBLER  SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PCODE_ASSMBLE.SW.005(1)   818
            5.0T3   818  PASCAL/SLAC.PCODE_ASSMBLE.SW.005   1 LINE     80   49 PAGE UM   UNSP                FEB. 10, 1980  18:06:54
            5.0T8   197                       
0          THE PCODE ASSEMBLER.  HAS AN OPTION TO PRODUCE OBJECT MODULES OR 360/370 
           ASSEMBLER.
0          Referenced by comments of: 793/2, 793/7, 793/9, 793/10 
00793/006   PASCAL/SLAC              PCODE ASSMBLER  OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PCODE_ASSMBLE.OE.006(1)   819
            5.0T3   819  PASCAL/SLAC.PCODE_ASSMBLE.OE.006   1 LINE  32767   16 PAGE UM   UNSP                FEB. 10, 1980  18:07:24
            5.0T8   198                       
00793/007   PASCAL/SLAC              MACLIB          SM  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MACLIB.SM.007(1)          820
            5.0T3   820  PASCAL/SLAC.MACLIB.SM.007          1 LINE     65    1 PAGE UM   UNSP                FEB. 10, 1980  18:21:10
            5.0T8   199                       
0          MACROS NEEDED TO ASSEMBLE THE CODE PRODUCED BY THE PCODE ASSEMBLER
           (793/5).
00793/008   PASCAL/SLAC              MONITOR         SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MONITOR.SA.008(1)         821
            5.0T3   821  PASCAL/SLAC.MONITOR.SA.008         1 LINE     73   36 PAGE UM   UNSP                FEB. 10, 1980  18:04:06
            5.0T8   200                       
0          THE RUNTIME SUPPORT.  HAS A CONDITIONAL ASSEMBLY OPTION, &SYSTEM, WHICH
           PRODUCES A SMALLER VERSION USED WITH "SYSTEM" PROGRAMS (COMPILER, PROFILER,
           ETC.) BY ELIMINATING ERROR CHECKING, ETC.
            
           HAS A WEAK REFERENCE TO SNAPSHOT DUMP (793/11).
00793/009   PASCAL/SLAC              MONITOR         OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MONITOR.OE.009(1)         822
            5.0T3   822  PASCAL/SLAC.MONITOR.OE.009         1 LINE     80    5 PAGE UM   UNSP                FEB. 10, 1980  18:04:34
            5.0T8   201                       
0          OBJECT OF THE MONITOR (793/5), &SYSTEM=0.
00793/010   PASCAL/SLAC              MONITOR         OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MONITOR.OE.010(1)         823
            5.0T3   823  PASCAL/SLAC.MONITOR.OE.010         1 LINE     80    5 PAGE UM   UNSP                FEB. 10, 1980  18:04:58
            5.0T8   202                       
0          SYSTEM OBJECT OF THE MONITOR (793/5), &SYSTEM=1.
00793/011   PASCAL/SLAC              SNAPSHOT        SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.SNAPSHOT.SW.011(1)        824
            5.0T3   824  PASCAL/SLAC.SNAPSHOT.SW.011        1 LINE     80   10 PAGE UM   UNSP                FEB. 10, 1980  18:15:22
            5.0T8   203                       
0          THE SYMBOLIC DUMP PACKAGE.  IT MAY BE CALLED BY USER PROGRAMS, OR THE SYSTEM
           IN CASE OF A RUN ERROR.
0          Referenced by comments of: 793/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  587
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00793/012   PASCAL/SLAC              SNAPSHOT        OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.SNAPSHOT.OE.012(1)        825
            5.0T3   825  PASCAL/SLAC.SNAPSHOT.OE.012        1 LINE     73    7 PAGE UM   UNSP                FEB. 10, 1980  18:15:39
            5.0T8   204                       
00793/013   PASCAL/SLAC              PROFILE         SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PROFILE.SW.013(1)         826
            5.0T3   826  PASCAL/SLAC.PROFILE.SW.013         1 LINE     80    5 PAGE UM   UNSP                FEB. 10, 1980  18:14:30
            5.0T8   205                       
0          THE PROFILER, WHEN USED WITH THE $F+ COMPILER OPTION, PRODUCES A LISTING
           OF THE PROGRAM WITH EXECUTION COUNTS FOR EACH STATEMENT.
00793/014   PASCAL/SLAC              PROFILE         OE  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PROFILE.OE.014(1)         827
            5.0T3   827  PASCAL/SLAC.PROFILE.OE.014         1 LINE  13836    5 PAGE UM   UNSP                FEB. 10, 1980  18:14:59
            5.0T8   206                       
00793/015   PASCAL/SLAC              TESTLIB         SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.TESTLIB.SW.015(1)         828
            5.0T3   828  PASCAL/SLAC.TESTLIB.SW.015         1 LINE     80  351 PAGE UM   UNSP                FEB. 10, 1980  18:45:20
            5.0T8   207                       
0          SEVERAL TEST AND UTILITY PROGRAMS WHICH COME WITH THE STANFORD PASCAL
           COMPILER.  SEVERAL OF THESE MAY BE USEFUL WITH OTHER PASCAL COMPILERS
           OR PERHAPS BY THEMSELVES.
00794/001A *SDL                      COMPILER        SS  G          WSG:SDL.COMP.SS                                                 
            5.1T2   244  SDL.COMPILER.SS.001                1 LINE    124    9 PAGE UM   WSG                 JULY 23, 1983  13:29:48
0          The survey definition language (SDL) consists of a compiler, written
           in SPITBOL, which will compile a survey definition, written in SDL,
           producing an object deck which, when run with a run-time interpreter,
           will conduct the specified survey interactively for a terminal user.
            
           The compiler reads the survey definition on SCARDS and produces an
           object deck on SPUNCH followed by a "$CONTINUE WITH *SDLLIB" line.
            
           The compiler dynamically loads three external routines (794/4) from
           the file *SDLLIB (794/6).
            
           **********************************************************************
           Changes since D5.0:
            1. Added the READ statement to allow manipulation of existing data
               records. 
            2. Added the WRITE statement as a synonym for OUTPUT which has been
               removed from the documentation.
            3. Changed the compiler so that it links to ASMH directly to produce
               an object deck, rather than requiring the user to assemble the
               compiler output.
            4. Compiler error messages now give the MTS line number of the
               statement in error.
            5. Added IF/ELSEIF/ESLE/ENDIF constructs.
            6. READ statement modified to use the field value as a binary line
               number if the field is exactly four characters long and if its
               character value does not constitute a valid MTS line number.
            7. Released for general use with the addition of user documentation 
               (794/7).
1                                                                                               SUN SEP 08/96   15:24:55   Page  588
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          **********************************************************************
0          Referenced by comments of: 794/3, 794/9 
00794/002  *SDL                      SIZE150         SA  G          S0792 WSGFS FSNAME=SIZE150                                      
            5.0T3   830  SURVEY_GENERATOR.SIZE150.SA.002    1 LINE     80    1 PAGE UM   WSG                 AUG. 29, 1980  12:06:01
            5.0T8   209                       
0          Program to call a SPITBOL object module with PAR=SIZE=150. It avoids
           having to require the user of *SDL to specify PAR=SIZE=150 when
           running the compiler. Source at lines 1,999; object at 1000.
0          Referenced by comments of: 461/12, 794/3 
00794/003A *SDL                      COMPILER        OE  G          *SDL                                                            
            5.1T2   245  SDL.COMPILER.OE.003                1 LINE  21444   10 PAGE UM   WSG                 JULY 23, 1983  13:29:49
                         *SDL                 
0          Object for (794/2) and (794/1). Ends with a "$CONTINUE WITH *SPITLIB" line.
00794/004C *SDL                      COMPILER RTNS   SA  G          WSG:SDL.LIB.SA                                                  
            5.1T2   246  SDL.COMPILER_RTNS.SA.004           1 LINE     69    2 PAGE UM   WSG                 JULY 23, 1983  13:29:50
0          Source for three external routines used by the compiler:
            
            (1) SDLCRE makes sure that file -SDL.I.SA is empty. This file
                is used by the compiler to store the assembly language
                code it produces.
            
            (2) SDLINP reads input from SCARDS and returns it to the
                compiler with the line number (in external form) prefixed
                to the beginning of each record.
            
            (3) SDLASM links to ASMH to assemble the generated program.
            
           The object for these routines is in *SDLLIB (794/6).
0          Referenced by comments of: 794/1, 794/6 
00794/005A *SDL                      INTERPRETER     SG  G          WSG:SDL.LIB.SG                                                  
            5.1T2   247  SDL.INTERPRETER.SG.005             1 LINE     96    8 PAGE UM   WSG                 JULY 23, 1983  13:29:50
0          GOM source for the SDL interpreter. The object for the interpreter
           is in *SDLLIB (794/6).
0          Referenced by comments of: 794/6 
00794/006A *SDL                      LIBRARY         OE  G          *SDLLIB                                                         
            5.1T2   248  SDL.LIBRARY.OE.006                 1 LINE  16288    7 PAGE UM   WSG                 JULY 23, 1983  13:29:51
                         *SDLLIB              
0          *SDL library consisting of object from the compiler external routines
           (794/4) and the run-time interpreter (794/5).
1                                                                                               SUN SEP 08/96   15:24:55   Page  589
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 794/1, 794/4, 794/5 
00794/007C *SDL                      MEMO 452        WF             S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO452.SOU                       
            5.1T2   249  SDL.MEMO_452.WF.007                1 LINE     78   10 PAGE UM   WSG                 JUNE 06, 1983  15:28:26
0          This is Computing Center Memo 452 -- "Survey Definition Language: SDL."
0          Referenced by comments of: 794/1, 794/8 
00794/008C *SDL                      MEMO 452        PF             S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO452.OUT                       
            5.1T2   250  SDL.MEMO_452.PF.008                1 LINE     71   12 PAGE UM   WSG                 JUNE 06, 1983  15:28:39
0          Printer-ready version of (794/7).
00794/009  *SDL                      UM SURV DES #1  S   G          S0792 WSGFS FSNAME=SURV80.S1                                    
            5.0T3   834  SURVEY_GENERATOR.UM_SURV.S.006     1 LINE     94    9 PAGE UM   WSG                 AUG. 29, 1980  12:36:16
            5.0T8   213                       
0          This file is an example of a fairly large survey description; it is
           the February 1980 General User Survey taken at UM. If you wish to try
           this survey, you should first change the file name on the OUTPUT
           statement which appears near the end of the survey description to the
           name of an appropriate file where the data record produced by running
           the survey may be written. You should then compile the description
           using (794/1) and run the resulting object deck.
0          Referenced by comments of: 794/10, 794/11 
00794/010  *SDL                      UM SURV DES #2  S   G          S0792 WSGFS FSNAME=SURV80.S2                                    
            5.0T3   835  SURVEY_GENERATOR.UM_SURV.S.007     1 LINE     94    5 PAGE UM   WSG                 AUG. 29, 1980  12:37:01
            5.0T8   214                       
0          This survey description is for the same survey as (794/9), but it has much of
           the verbosity removed so that it can be easily used to enter responses from
           printed copies of the survey. To retain a unique identity to each written
           survey response, they were numbered as received and the number placed in the
           data record in the field used for the MTS user id in the online version. In
           this way, it was possible to go back to the written response later to verify
           that the data was entered correctly and to ensure that the same survey was
           not tabulated more than once. The responses to the printed surveys were
           entered by members of the secretarial staff.
00794/011  *SDL                      UM SURV PRINT   WF             S0792 WSGFS FSNAME=SURV80.WF                                    
            5.0T3   836  SURVEY_GENERATOR.UM_SURV.WF.008    1 LINE     76    7 PAGE UM   WSG                 AUG. 29, 1980  12:37:28
            5.0T8   215                       
0          FORMAT source for the printed version of the same survey as (794/9).
00794/012  *SDL                      UM SURV MIDAS   C              S0792 WSGFS FSNAME=SURV80.MIDAS                                 
            5.0T3   837  SURVEY_GENERATOR.UM_SURV.C.009     1 LINE     68    1 PAGE UM   WSG                 AUG. 29, 1980  12:38:19
            5.0T8   216                       
0          MTS and MIDAS commands to analyze the data from the 1980 UM General User
           Survey. It also runs the SURVEY.CVT program (794/13) to extract the MIDAS
1                                                                                               SUN SEP 08/96   15:24:55   Page  590
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          results and convert them to a FORMAT macro suitable for inclusion in a
           writeup describing the results of the survey.
00794/013  *SDL                      SURVEY.CVT PGM  SS             S0792 WSGFS FSNAME=SURVEY.CVT                                   
            5.0T3   838  SURVEY_GENERATOR.SURVEY.C.SS.010   1 LINE    128    1 PAGE UM   WSG                 AUG. 29, 1980  12:33:00
            5.0T8   217                       
0          SPITBOL program to scan through MIDAS output looking for specific numerical
           results and converting them into a FORMAT macro which can be included in
           a writeup describing the results of the analysis.
0          Referenced by comments of: 794/12 
00794/014  *SDL                      UM SURV RESULT  WF             S0792 WSGFS FSNAME=SURV80.RESULTS.WF                            
            5.0T3   839  SURVEY_GENERATOR.UM_SURV.WF.011    1 LINE    109   10 PAGE UM   WSG                 AUG. 29, 1980  12:41:13
            5.0T8   218                       
0          FORMAT source for the results of the analysis of the UM 1980 General User
           Survey.
00795/001   CANREPLY DUMMY                           SA  G          UNSP:CANREPLY(*F,0)                                             
            5.0T3   840  CANREPLY_DUMMY..SA.001             1 LINE     22    1 PAGE UM   UNSP                JULY 03, 1981  20:01:19
            5.0T8   219                       
0          THIS IS A DUMMY VERSION OF CANREPLY, DISTRIBUTED AS A PART OF MTS, THAT
           ALWAYS RETURNS FALSE. IT IS INTENDED FOR TESTING PROGRAMS WITH BATCH OPTIONS
           FROM A TERMINAL.
00795/002   CANREPLY DUMMY                           O   G          UNSP:CANREPLY(1)                                                
            5.0T3   841  CANREPLY_DUMMY..O.002              1 LINE     80    1 PAGE UM   UNSP                JULY 03, 1981  20:01:20
            5.0T8   220                       
00795/003   CANREPLY DUMMY                           WF             S1153 UNSP VLO FSNAME=CANREPLY.FMT                              
            5.0T3   842  CANREPLY_DUMMY..WF.003             1 LINE     67    1 PAGE UM   UNSP                SEP. 15, 1980  16:24:26
            5.0T8   221                       
00796/001   ENCODE/DECODE            ENCODE          SA  G          S1153 UNSP VLO FSNAME=ENCODE.ASM                                
            5.0T3   843  ENCODE/DECODE.ENCODE.SA.001        1 LINE     70    4 PAGE UM   UNSP                SEP. 15, 1980  16:42:53
            5.0T8   222                       
0          THIS COMPONENT CONTAINS MODIFIED VERSIONS OF *ENCODE (543) AND *DECODE
           (541) FOR USE WITH REMOTE MINICOMPUTERS.
            
           THIS SUBCOMPONENT CONTAINS THE SOURCE FOR THE MODIFIED *ENCODE.
00796/002   ENCODE/DECODE            ENCODE          OC  G          UNSP:ENCODE                                                     
            5.0T3   844  ENCODE/DECODE.ENCODE.OC.002        1 LINE   1040    1 PAGE UM   UNSP                JULY 03, 1981  20:01:28
            5.0T8   223                       
0          Contains a $CONTINUE WITH UNSP:LIBRARY (685/2) record.
0          Referenced by comments of: 796/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  591
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00796/003   ENCODE/DECODE            ENCODE          P              UNSP:ENCODE.W                                                   
            5.0T3   845  ENCODE/DECODE.ENCODE.P.003         1 LINE     75    1 PAGE UM   UNSP                JULY 03, 1981  20:01:29
            5.0T8   224                       
0          A DESCRIPTION OF THE USE OF UNSP:ENCODE (796/2).
00796/004   ENCODE/DECODE            DECODE          SA  G          S1153 UNSP VLO FSNAME=DECODE.ASM                                
            5.0T3   846  ENCODE/DECODE.DECODE.SA.004        1 LINE     77    3 PAGE UM   UNSP                SEP. 15, 1980  16:42:44
            5.0T8   225                       
0          THIS SUBCOMPONENT CONTAINS THE SOURCE FOR THE MODIFIED *DECODE (541).
00796/005   ENCODE/DECODE            DECODE          OC  G          UNSP:DECODE                                                     
            5.0T3   847  ENCODE/DECODE.DECODE.OC.005        1 LINE    664    1 PAGE UM   UNSP                JULY 03, 1981  20:01:30
            5.0T8   226                       
0          Contains a $CONTINUE WITH UNSP:LIBRARY (685/2) record.
0          Referenced by comments of: 796/6 
00796/006   ENCODE/DECODE            DECODE          P   G          UNSP:DECODE.W                                                   
            5.0T3   848  ENCODE/DECODE.DECODE.P.006         1 LINE     75    1 PAGE UM   UNSP                JULY 03, 1981  20:01:31
            5.0T8   227                       
0          A DESCRIPTION OF THE USE OF UNSP:DECODE (796/5).
00796/007   ENCODE/DECODE            NOTE            P   G          UNSP:ENCODE/DE.W                                                
            5.0T3   849  ENCODE/DECODE.NOTE.P.007           1 LINE     71    3 PAGE UM   UNSP                JULY 03, 1981  20:01:32
            5.0T8   228                       
0          A NOTE DESCRIBING THE USE OF ENCODE AND DECODE AT UM'S SPACE PHYSICS
           RESEARCH LAB.
00797/001   TRANSLATION ROUTINES                                  # (NOW IN SEG2:TRTABLES -- COMP. 779/4)                           
            5.0T3   850  TRANSLATION_ROUTINES..SA.001       1 LINE     68    1 PAGE UM                       MAY  22, 1981  07:53:37
            5.0T8   229                       
0          SUBROUTINES FOR USE FROM FORTRAN AND PASCAL WHICH TRANSLATE BUFFERS USING THE
           STANDARD TRANSLATION TABLES CASECONV, ASCEBC, AND EBCASC.
00798/001A  MESSAGE SYSTEM           INSTALL NOTES   WF  G          MAIL:DIST.NOTES                                                 
            5.1T2   251  MESSAGE_SYSTEM.INSTALL_NO.WF.001   1 LINE     84    5 PAGE UM   STERKEN             JULY 23, 1983  13:29:59
0          This is the official version of $MESSAGESYSTEM. It is now fully supported and
           may be released to users. The MESSAGESYSTEM requires *USERDIRECTORY.
            
           It will make it much easier to install the MESSAGESYSTEM if the CCID "MAIL"
           is created. Subcomponents of the MESSAGESYSTEM should be restored to the file
           names used on this distribution.
            
           Documentation for the MESSAGESYSTEM may be found in Memo 444 (798/119) and
           MTS Volume 1 (504).
            
           This subcomponent contains installation notes for $MESSAGESYSTEM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  592
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           *****************************************************************************
           D5.0C version:
            
           This subcomponent contains the instructions for the installing the D5.0C
           version of $MESSAGESYSTEM.
           *****************************************************************************
0          Referenced by comments of: 559/1, 659/18, 798/9 
00798/002A  MESSAGE SYSTEM           CHANGES         WF  G          MAIL:DIST.CHANGES                                               
            5.1T2   252  MESSAGE_SYSTEM.CHANGES.WF.002      1 LINE     72    4 PAGE UM   STERKEN             JULY 23, 1983  13:30:00
0          Log of $MESSAGESYSTEM changes since the last distribution.
00798/003A  MESSAGE SYSTEM           *CLSMESSAGESYS  OE  G          *CLSMESSAGESYS                                                  
            5.1T2   253  MESSAGE_SYSTEM.?CLSMESSAG.OE.003   1 LINE  12219   38 PAGE UM   STERKEN             JULY 23, 1983  13:30:00
                         *CLSMESSAGESYS       
0          The MESSAGESYSTEM CLS object module. This file is loaded into shared VM by
           PISTLE (559). Should be permitted U/R, U MAIL. Contains $CONTINUE WITHS to
           *MESSSUBS (798/4) and SEG2:TIME (360).
0          Referenced by comments of: 798/4, 798/16, 798/21, 798/43 
00798/004A  MESSAGE SYSTEM           *MESSSUBS       OE  G          *MESSSUBS                                                       
            5.1T2   254  MESSAGE_SYSTEM.?MESSSUBS.OE.004    1 LINE  32767   44 PAGE UM   STERKEN             JULY 23, 1983  13:30:02
                         *MESSSUBS            
0          MESSAGESYSTEM Subroutine Interface object module. This file is loaded into
           shared VM by PISTLE (559). Should be permitted U/R, U MAIL. *MESSSUBS should
           be loaded before *CLSMESSAGESYS (798/3) by PISTLE (559). Contains a $CONTINUE
           WITH *LIBRARY (524/1) record.
0          Referenced by comments of: 798/3, 798/16, 798/21, 798/41, 798/43 
00798/005A  MESSAGE SYSTEM           MSG CLS         OE  G          MAIL:MESSCLS                                                    
            5.1T2   255  MESSAGE_SYSTEM.MSG_CLS.OE.005      1 LINE  12219   38 PAGE UM   STERKEN             JULY 23, 1983  13:30:03
0          A complete set of $MESSAGESYSTEM CLS object modules. (798/10) and (798/11)
           are command files which may be used to compile this component. (798/17) is a
           command file for linkediting it.
0          Referenced by comments of: 798/16, 798/17 
00798/006A  MESSAGE SYSTEM           SUBR INTERFACE  OE  G          MAIL:MESSSUB                                                    
            5.1T2   256  MESSAGE_SYSTEM.SUBR_INTER.OE.006   1 LINE  10343   53 PAGE UM   STERKEN             JULY 23, 1983  13:30:04
0          A complete set of $MESSAGESYSTEM subroutine interface object modules.
           (798/12) and (798/13) are command files which may be used to compile this
           subcomponent. (798/18) is a command file for linkediting it.
0          Referenced by comments of: 798/16, 798/18 
1                                                                                               SUN SEP 08/96   15:24:55   Page  593
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/007A  MESSAGE SYSTEM           *MSGUTIL        OE  G          *MSGUTIL                                                        
            5.1T2   257  MESSAGE_SYSTEM.?MSGUTIL.OE.007     1 LINE  32767   56 PAGE UM   STERKEN             JULY 23, 1983  13:30:06
                         *MSGUTIL             
0          Public file version of MSGUTIL (798/8). Loaded by (798/19). This file should
           be permitted U/N, R (PKEY=*MTS.RUN, PKEY=*MTS.FILESTA), with PKEY=*MSGUTIL.
0          Referenced by comments of: 798/14, 798/15, 798/19, 798/20, 798/23, 798/77, 798/79, 798/81, 798/83, 798/98 
00798/008A  MESSAGE SYSTEM           MSGUTIL         OE  G          MAIL:MSGUTIL                                                    
            5.1T2   258  MESSAGE_SYSTEM.MSGUTIL.OE.008      1 LINE  16715   67 PAGE UM   STERKEN             JULY 23, 1983  13:30:08
                         MAIL:MSGUTIL         
0          Linkedited object of the $MESSAGESYSTEM utilities. (798/14) and (798/15) are
           command files which may be used to compile/assemble these components.
           (798/20) is a command file for linkeditting it.
0          Referenced by comments of: 798/7 
00798/009A  MESSAGE SYSTEM           *MESSAGES       D   G        # MTS.:TST.MESSAGES                                               
                                                                                    UM   STERKEN                                    
                         MAIL:*MESSAGES       
0          This is the default system message file, which is not distributed.  The 
           distribution notes (798/1) contain instructions for setting up this
           message file.  It should be permitted U/N, RW (PKEY=*SYS.MESSAGE).
0          Referenced by comments of: 798/110 
00798/010A  MESSAGE SYSTEM           CLS COMPILE     C   G          MAIL:CLS.COMPILE                                                
            5.1T2   259  MESSAGE_SYSTEM.CLS_COMPIL.C.010    1 LINE    118    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:10
0          A command file to be $SOURCEd to for compiling all the CLS components.
           Listings are sent to *PRINT*.
0          Referenced by comments of: 798/5 
00798/011A  MESSAGE SYSTEM           CLS COMPILE     C   G          MAIL:CLS.XCOMPILE                                               
            5.1T2   260  MESSAGE_SYSTEM.CLS_COMPIL.C.011    1 LINE    118    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:11
0          A command file to be $SOURCEd to for compiling all the CLS components.
           No listings are sent to *PRINT*.
0          Referenced by comments of: 798/5 
00798/012A  MESSAGE SYSTEM           SUBR COMPILE    C   G          MAIL:SUB.COMPILE                                                
            5.1T2   261  MESSAGE_SYSTEM.SUBR_COMPI.C.012    1 LINE    118    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:11
0          A command file to be $SOURCEd to for compiling all the MSG subroutine 
           components. Listings are sent to *PRINT*.
0          Referenced by comments of: 798/6 
1                                                                                               SUN SEP 08/96   15:24:55   Page  594
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/013A  MESSAGE SYSTEM           SUBR COMPILE    C   G          MAIL:SUB.XCOMPILE                                               
            5.1T2   262  MESSAGE_SYSTEM.SUBR_COMPI.C.013    1 LINE    118    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:11
0          A command file to be $SOURCEd to for compiling all the MSG subroutine 
           components. No listings are sent to *PRINT*.
0          Referenced by comments of: 798/6 
00798/014A  MESSAGE SYSTEM           UTIL COMPILE    C   G          MAIL:UTIL.COMPILE                                               
            5.1T2   263  MESSAGE_SYSTEM.UTIL_COMPI.C.014    1 LINE    122    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:11
0          A command file to be $SOURCEd to for compiling all the *MSGUTIL (798/7) components.
           Listings are sent to *PRINT*.
0          Referenced by comments of: 798/8 
00798/015A  MESSAGE SYSTEM           UTIL COMPILE    C   G          MAIL:UTIL.XCOMPILE                                              
            5.1T2   264  MESSAGE_SYSTEM.UTIL_COMPI.C.015    1 LINE    122    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:12
0          A command file to be $SOURCEd to for compiling all the *MSGUTIL (798/7) components.
           No listings are sent to *PRINT*.
0          Referenced by comments of: 798/8 
00798/016A  MESSAGE SYSTEM           LOAD SEG2       C   G          MAIL:SO.LOADSEG2                                                
            5.1T2   265  MESSAGE_SYSTEM.LOAD_SEG2.C.016     1 LINE     66    2 PAGE UM   STERKEN             JULY 23, 1983  13:30:12
0          A command file to be $SOURCEd to for loading a new $MESSAGESYSTEM in shared
           memory. (798/3) and (798/4) are updated. It is assumed that (798/5) and
           (798/6) are already set up.
0          Referenced by comments of: 798/41 
00798/017A  MESSAGE SYSTEM           LINK CLS        C   G          MAIL:SO.LINKCLS                                                 
            5.1T2   266  MESSAGE_SYSTEM.LINK_CLS.C.017      1 LINE     91    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:12
0          A command file to be $SOURCEd to for linkediting all the CLS components. The
           linkedited deck is placed in (798/5).
0          Referenced by comments of: 798/5 
00798/018A  MESSAGE SYSTEM           LINK SUBR       C   G          MAIL:SO.LINKSUB                                                 
            5.1T2   267  MESSAGE_SYSTEM.LINK_SUBR.C.018     1 LINE    104    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:12
0          A command file to be $SOURCEd to for linkediting all the MSG subroutine
           subcomponents. The linkedited deck is placed in (798/6).
0          Referenced by comments of: 798/6 
00798/019A  MESSAGE SYSTEM           LOAD SUBR       C   G          MAIL:SO.LOADUTIL                                                
            5.1T2   268  MESSAGE_SYSTEM.LOAD_SUBR.C.019     1 LINE     55    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:12
0          A command file to be $SOURCEd to for installing a new version of 
           *MSGUTIL (798/7) in the file *MSGUTIL.
1                                                                                               SUN SEP 08/96   15:24:55   Page  595
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 798/7 
00798/020A  MESSAGE SYSTEM           LINK UTIL       C   G          MAIL:SO.LINKUTIL                                                
            5.1T2   269  MESSAGE_SYSTEM.LINK_UTIL.C.020     1 LINE    129    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:13
0          A command file to be $SOURCEd to for linkediting all the *MSGUTIL components.
           The linkedited deck is placed in *MSGUTIL (798/7).
0          Referenced by comments of: 798/8 
00798/021A  MESSAGE SYSTEM           TEST CLS        C   G          MAIL:SO.CLSTEST                                                 
            5.1T2   270  MESSAGE_SYSTEM.TEST_CLS.C.021      1 LINE     68    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:13
0          This is a command file to be $SOURCEd to for $DEBUGging a test version of the
           complete MESSAGESYSTEM: CLS, *CLSMESSAGESYS (798/3), and subroutines,
           *MESSSUBS (798/4).  Contains a $CONTINUE WITH MAIL:STDTV.0 (798/25) record.
0          Referenced by comments of: 798/24 
00798/022A  MESSAGE SYSTEM           TEST CLS        C   G          MAIL:SO.CLSTEST2                                                
            5.1T2   271  MESSAGE_SYSTEM.TEST_CLS.C.022      1 LINE     42    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:13
0          A command file to be $SOURCEd to for $DEBUGging just the CLS (using the 
           resident message subroutines).  Contains a $CONTINUE WITH MAIL:STDTV.O
           (798/25) record.
00798/023A  MESSAGE SYSTEM           TEST UTIL       C   G          MAIL:SO.UTILTEST                                                
            5.1T2   272  MESSAGE_SYSTEM.TEST_UTIL.C.023     1 LINE    133    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:13
0          A command file to be $SOURCEd to for $DEBUGging a test version of *MSGUTIL
           (798/7).  Contains a $CONTINUE WITH MAIL:STDTV.O (798/25) record.
0          Referenced by comments of: 798/122 
00798/024C  MESSAGE SYSTEM           STDTV           SA  G          MAIL:STDTV.S                                                    
            5.1T2   273  MESSAGE_SYSTEM.STDTV.SA.024        1 LINE    123    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:14
0          Alternate version of CLS Tranfer Vector used for debugging $MESSAGE
           under SDS as a user program.  See (798/21). Assemble with (798/108),
           COPY:MTS.MACROS (344/3), *SYSMAC and with PAR=PEXIT=*PEXIT,BATCH,TEST.
00798/025C  MESSAGE SYSTEM           STDTV           OC  G          MAIL:STDTV.O                                                    
            5.1T2   274  MESSAGE_SYSTEM.STDTV.OC.025        1 LINE     80    3 PAGE UM   STERKEN             JULY 23, 1983  13:30:14
0          Referenced by comments of: 798/21, 798/22, 798/23 
00798/026A  MESSAGE SYSTEM           LIST            C   G          MAIL:SO.FILELIST                                                
            5.1T2   275  MESSAGE_SYSTEM.LIST.C.026          1 LINE    140    3 PAGE UM   STERKEN             JULY 23, 1983  13:30:14
0          A command file to be $SOURCEd to for printing source listings of 
           all of the source components of the MESSAGESYSTEM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  596
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/027A  MESSAGE SYSTEM           MAIN            SG  G          MAIL:CLS.MAIN.S                                                 
            5.1T2   276  MESSAGE_SYSTEM.MAIN.SG.027         1 LINE    111   17 PAGE UM   STERKEN             JULY 23, 1983  13:30:14
0          This is the main program for the $MESSAGESYSTEM CLS.
00798/028A  MESSAGE SYSTEM           MAIN            OC  G          MAIL:CLS.MAIN.O                                                 
            5.1T2   277  MESSAGE_SYSTEM.MAIN.OC.028         1 LINE   3731   26 PAGE UM   STERKEN             JULY 23, 1983  13:30:16
00798/029A  MESSAGE SYSTEM           CLS CMDS        SG  G          MAIL:CLS.CMDS.S                                                 
            5.1T2   278  MESSAGE_SYSTEM.CLS_CMDS.SG.029     1 LINE    147   37 PAGE UM   STERKEN             JULY 23, 1983  13:30:17
0          The CLS commands.
00798/030A  MESSAGE SYSTEM           CLS CMDS        OC  G          MAIL:CLS.CMDS.O                                                 
            5.1T2   279  MESSAGE_SYSTEM.CLS_CMDS.OC.030     1 LINE  10760   55 PAGE UM   STERKEN             JULY 23, 1983  13:30:21
00798/031A  MESSAGE SYSTEM           CLS UTIL        SG  G          MAIL:CLS.UTIL.S                                                 
            5.1T2   280  MESSAGE_SYSTEM.CLS_UTIL.SG.031     1 LINE    217   60 PAGE UM   STERKEN             JULY 23, 1983  13:30:24
0          Miscellaneous utility routines used throughout the CLS.
00798/032A  MESSAGE SYSTEM           CLS UTIL        OC  G          MAIL:CLS.UTIL.O                                                 
            5.1T2   281  MESSAGE_SYSTEM.CLS_UTIL.OC.032     1 LINE  11667  120 PAGE UM   STERKEN             JULY 23, 1983  13:30:28
00798/033A  MESSAGE SYSTEM           CLS KWS XFACE   SA  G          MAIL:CLS.KWS.S                                                  
            5.1T2   282  MESSAGE_SYSTEM.CLS_KWS_XF.SA.033   1 LINE    127   36 PAGE UM   STERKEN             JULY 23, 1983  13:30:32
0          Interface to KWSCAN (040) for CLS commands. Assemble with the MESSAGESYSTEM
           macros (798/108) and COPY:MTS.MACROS (344/3), with
           PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for
           assembly.
00798/034A  MESSAGE SYSTEM           CLS KWS XFACE   OC  G          MAIL:CLS.KWS.O                                                  
            5.1T2   283  MESSAGE_SYSTEM.CLS_KWS_XF.OC.034   1 LINE   4315   21 PAGE UM   STERKEN             JULY 23, 1983  13:30:35
00798/035A  MESSAGE SYSTEM           CLS ASMB RTNS   SA  G          MAIL:CLS.ASM.S                                                  
            5.1T2   284  MESSAGE_SYSTEM.CLS_ASMB_R.SA.035   1 LINE    127    6 PAGE UM   STERKEN             JULY 23, 1983  13:30:36
0          Miscellaneous assembly routines used by the CLS. Assemble with the
           MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with
           PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for
           assembly.
00798/036A  MESSAGE SYSTEM           CLS ASMB RTNS   OC  G          MAIL:CLS.ASM.O                                                  
            5.1T2   285  MESSAGE_SYSTEM.CLS_ASMB_R.OC.036   1 LINE     80    5 PAGE UM   STERKEN             JULY 23, 1983  13:30:36
00798/037A  MESSAGE SYSTEM           CLS DRIVER      SG  G          MAIL:CLSDRIVER.S                                                
            5.1T2   286  MESSAGE_SYSTEM.CLS_DRIVER.SG.037   1 LINE    102    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:36
0          Used for $DEBUGging $MESSAGESYSTEM.  Fakes CLS environment.
1                                                                                               SUN SEP 08/96   15:24:55   Page  597
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/038A  MESSAGE SYSTEM           CLS DRIVER      OC  G          MAIL:CLSDRIVER.O                                                
            5.1T2   287  MESSAGE_SYSTEM.CLS_DRIVER.OC.038   1 LINE     80    2 PAGE UM   STERKEN             JULY 23, 1983  13:30:37
00798/039A  MESSAGE SYSTEM           ENTRY           SA  G          MAIL:CLSINTF.S                                                  
            5.1T2   288  MESSAGE_SYSTEM.ENTRY.SA.039        1 LINE     98    3 PAGE UM   STERKEN             JULY 23, 1983  13:30:37
0          The "real" entry point to $MESSAGESYSTEM. Sets up the stack environment 
           for GOM (659).
00798/040A  MESSAGE SYSTEM           ENTRY           OC  G          MAIL:CLSINTF.O                                                  
            5.1T2   289  MESSAGE_SYSTEM.ENTRY.OC.040        1 LINE     80    3 PAGE UM   STERKEN             JULY 23, 1983  13:30:37
00798/041A  MESSAGE SYSTEM           MSGSUB TV       SA  G          MAIL:MESSSUBS.S                                                 
            5.1T2   290  MESSAGE_SYSTEM.MSGSUB_TV.SA.041    1 LINE     75    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:37
0          Transfer vector placed at the front of *MESSSUBS (798/4) by (798/16). This is
           the entry point to *MESSSUBS. It allows MTS to find all of the subroutines
           with one call during $SIGNON processing.
00798/042A  MESSAGE SYSTEM           MSGSUB TV       OC  G          MAIL:MESSSUBS.O                                                 
            5.1T2   291  MESSAGE_SYSTEM.MSGSUB_TV.OC.042    1 LINE     80    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:38
00798/043A  MESSAGE SYSTEM           MSGLCS          SA  G          MAIL:MESSLCS.S                                                  
            5.1T2   292  MESSAGE_SYSTEM.MSGLCS.SA.043       1 LINE     60    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:38
0          Low-core symbol table included in *MESSSUBS (798/4). Contains entries to
           locate common subroutines needed by both the CLS, *CLSMESSAGESYS (798/3), and
           the subroutines, *MESSSUBS (798/4).
00798/044A  MESSAGE SYSTEM           MSGLCS          OC  G          MAIL:MESSLCS.O                                                  
            5.1T2   293  MESSAGE_SYSTEM.MSGLCS.OC.044       1 LINE     80    2 PAGE UM   STERKEN             JULY 23, 1983  13:30:38
00798/045A  MESSAGE SYSTEM           MSGOPEN         SG  G          MAIL:MSGOPEN.S                                                  
            5.1T2   294  MESSAGE_SYSTEM.MSGOPEN.SG.045      1 LINE    101    2 PAGE UM   STERKEN             JULY 23, 1983  13:30:38
0          The MSGOPEN subroutine.
00798/046A  MESSAGE SYSTEM           MSGOPEN         OC  G          MAIL:MSGOPEN.O                                                  
            5.1T2   295  MESSAGE_SYSTEM.MSGOPEN.OC.046      1 LINE    612    4 PAGE UM   STERKEN             JULY 23, 1983  13:30:38
00798/047A  MESSAGE SYSTEM           MSGCTL          SG  G          MAIL:MSGCTL.S                                                   
            5.1T2   296  MESSAGE_SYSTEM.MSGCTL.SG.047       1 LINE    130   49 PAGE UM   STERKEN             JULY 23, 1983  13:30:39
0          The MSGCTL subroutine.
00798/048A  MESSAGE SYSTEM           MSGCTL          OC  G          MAIL:MSGCTL.O                                                   
            5.1T2   297  MESSAGE_SYSTEM.MSGCTL.OC.048       1 LINE  10343   87 PAGE UM   STERKEN             JULY 23, 1983  13:30:43
00798/049A  MESSAGE SYSTEM           MSGINF          SG  G          MAIL:MSGINF.S                                                   
            5.1T2   298  MESSAGE_SYSTEM.MSGINF.SG.049       1 LINE    114   14 PAGE UM   STERKEN             JULY 23, 1983  13:30:46
0          The MSGINF subroutine.
0          Referenced by comments of: 798/109 
1                                                                                               SUN SEP 08/96   15:24:55   Page  598
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/050A  MESSAGE SYSTEM           MSGINF          OC  G          MAIL:MSGINF.O                                                   
            5.1T2   299  MESSAGE_SYSTEM.MSGINF.OC.050       1 LINE   9563    9 PAGE UM   STERKEN             JULY 23, 1983  13:30:47
00798/051A  MESSAGE SYSTEM           MSGGET          SG  G          MAIL:MSGGET.S                                                   
            5.1T2   300  MESSAGE_SYSTEM.MSGGET.SG.051       1 LINE    107    3 PAGE UM   STERKEN             JULY 23, 1983  13:30:48
0          The MSGGET subroutine.
00798/052A  MESSAGE SYSTEM           MSGGET          OC  G          MAIL:MSGGET.O                                                   
            5.1T2   301  MESSAGE_SYSTEM.MSGGET.OC.052       1 LINE     80    6 PAGE UM   STERKEN             JULY 23, 1983  13:30:48
00798/053A  MESSAGE SYSTEM           MSGPUT          SG  G          MAIL:MSGPUT.S                                                   
            5.1T2   302  MESSAGE_SYSTEM.MSGPUT.SG.053       1 LINE    107    3 PAGE UM   STERKEN             JULY 23, 1983  13:30:48
0          The MSGPUT subroutine.
00798/054A  MESSAGE SYSTEM           MSGPUT          OC  G          MAIL:MSGPUT.O                                                   
            5.1T2   303  MESSAGE_SYSTEM.MSGPUT.OC.054       1 LINE     80    7 PAGE UM   STERKEN             JULY 23, 1983  13:30:48
00798/055A  MESSAGE SYSTEM           MSGGUI          SG  G          MAIL:MSGGUI.S                                                   
            5.1T2   304  MESSAGE_SYSTEM.MSGGUI.SG.055       1 LINE     97    2 PAGE UM   STERKEN             JULY 23, 1983  13:30:49
0          The MSGGUI subroutine.
00798/056A  MESSAGE SYSTEM           MSGGUI          OC  G          MAIL:MSGGUI.O                                                   
            5.1T2   305  MESSAGE_SYSTEM.MSGGUI.OC.056       1 LINE     80    5 PAGE UM   STERKEN             JULY 23, 1983  13:30:49
00798/057A  MESSAGE SYSTEM           MSGCUI          SG  G          MAIL:MSGCUI.S                                                   
            5.1T2   306  MESSAGE_SYSTEM.MSGCUI.SG.057       1 LINE     97    2 PAGE UM   STERKEN             JULY 23, 1983  13:30:49
0          The MSGCUI subroutine.
00798/058A  MESSAGE SYSTEM           MSGCUI          OC  G          MAIL:MSGCUI.O                                                   
            5.1T2   307  MESSAGE_SYSTEM.MSGCUI.OC.058       1 LINE     80    5 PAGE UM   STERKEN             JULY 23, 1983  13:30:50
00798/059A  MESSAGE SYSTEM           MSGRCV          SG  G          MAIL:MSGRCV.S                                                   
            5.1T2   308  MESSAGE_SYSTEM.MSGRCV.SG.059       1 LINE     34    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:50
0          The MSGRCV subroutine (not written yet).
00798/060A  MESSAGE SYSTEM           MSGRCV          OC  G          MAIL:MSGRCV.O                                                   
            5.1T2   309  MESSAGE_SYSTEM.MSGRCV.OC.060       1 LINE     34    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:50
00798/061A  MESSAGE SYSTEM           MSGSND          SG  G          MAIL:MSGSND.S                                                   
            5.1T2   310  MESSAGE_SYSTEM.MSGSND.SG.061       1 LINE     34    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:50
0          The MSGSND subroutine (not written yet).
00798/062A  MESSAGE SYSTEM           MSGSND          OC  G          MAIL:MSGSND.O                                                   
            5.1T2   311  MESSAGE_SYSTEM.MSGSND.OC.062       1 LINE     34    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:50
1                                                                                               SUN SEP 08/96   15:24:55   Page  599
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/063A  MESSAGE SYSTEM           MSGDSP          SG  G          MAIL:MSGDSP.S                                                   
            5.1T2   312  MESSAGE_SYSTEM.MSGDSP.SG.063       1 LINE     34    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:50
0          The MSGDSP subroutine (not written yet).
00798/064A  MESSAGE SYSTEM           MSGDSP          OC  G          MAIL:MSGDSP.O                                                   
            5.1T2   313  MESSAGE_SYSTEM.MSGDSP.OC.064       1 LINE     34    1 PAGE UM   STERKEN             JULY 23, 1983  13:30:51
00798/065A  MESSAGE SYSTEM           SUBR UTILS      SG  G          MAIL:SUB.UTIL.S                                                 
            5.1T2   314  MESSAGE_SYSTEM.SUBR_UTILS.SG.065   1 LINE    202   62 PAGE UM   STERKEN             JULY 23, 1983  13:30:51
0          Miscellaneous utility routines used by the MSG subroutines.
00798/066A  MESSAGE SYSTEM           SUBR UTILS      OC  G          MAIL:SUB.UTIL.O                                                 
            5.1T2   315  MESSAGE_SYSTEM.SUBR_UTILS.OC.066   1 LINE   4196  167 PAGE UM   STERKEN             JULY 23, 1983  13:30:55
00798/067A  MESSAGE SYSTEM           SUB KWS XFACE   SA  G          MAIL:SUB.KWS.S                                                  
            5.1T2   316  MESSAGE_SYSTEM.SUB_KWS_XF.SA.067   1 LINE    127   24 PAGE UM   STERKEN             JULY 23, 1983  13:31:01
0          Interface to KWSCAN (040) for the MSG subroutines. Assemble with the
           MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with
           PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for
           assembly.
00798/068A  MESSAGE SYSTEM           SUB KWS XFACE   OC  G          MAIL:SUB.KWS.O                                                  
            5.1T2   317  MESSAGE_SYSTEM.SUB_KWS_XF.OC.068   1 LINE   6772   11 PAGE UM   STERKEN             JULY 23, 1983  13:31:03
00798/069A  MESSAGE SYSTEM           SUB ASMB RTNS   SA  G          MAIL:SUB.ASM.S                                                  
            5.1T2   318  MESSAGE_SYSTEM.SUB_ASMB_R.SA.069   1 LINE    127   16 PAGE UM   STERKEN             JULY 23, 1983  13:31:03
0          Miscellaneous assembly routines used by the MSG subroutines. The "real" entry
           points for all the MSG subroutines, little adaptor routines that set up the
           stack environment, are in the file. Assemble with the MESSAGESYSTEM macros
           (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST.
           Contains commands beginning at line 0 for assembly. Copies *CNFGINFODSECT
           (654/1).
00798/070A  MESSAGE SYSTEM           SUB ASMB RTNS   OC  G          MAIL:SUB.ASM.O                                                  
            5.1T2   319  MESSAGE_SYSTEM.SUB_ASMB_R.OC.070   1 LINE     80    9 PAGE UM   STERKEN             JULY 23, 1983  13:31:04
00798/071A  MESSAGE SYSTEM           LIST MNGMNT     SG  G          MAIL:LISTMNGMNT.S                                               
            5.1T2   320  MESSAGE_SYSTEM.LIST_MNGMN.SG.071   1 LINE    125   13 PAGE UM   STERKEN             JULY 23, 1983  13:31:05
0          Miscellaneous list management routines used by the MSG subroutines.
00798/072A  MESSAGE SYSTEM           LIST MNGMNT     O   G          MAIL:LISTMNGMNT.O                                               
            5.1T2   321  MESSAGE_SYSTEM.LIST_MNGMN.O.072    1 LINE     80   28 PAGE UM   STERKEN             JULY 23, 1983  13:31:06
00798/073A  MESSAGE SYSTEM           COMMON UTIL     SG  G          MAIL:COM.UTIL.S                                                 
            5.1T2   322  MESSAGE_SYSTEM.COMMON_UTI.SG.073   1 LINE    208   25 PAGE UM   STERKEN             JULY 23, 1983  13:31:07
0          Miscellaneous utility routines used by both the CLS and the MSG subroutines.
1                                                                                               SUN SEP 08/96   15:24:55   Page  600
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/074A  MESSAGE SYSTEM           COMMON UTIL     OC  G          MAIL:COM.UTIL.O                                                 
            5.1T2   323  MESSAGE_SYSTEM.COMMON_UTI.OC.074   1 LINE   4808   44 PAGE UM   STERKEN             JULY 23, 1983  13:31:08
00798/075A  MESSAGE SYSTEM           COMMON ASMB     SA  G          MAIL:COM.ASM.S                                                  
            5.1T2   324  MESSAGE_SYSTEM.COMMON_ASM.SA.075   1 LINE    127   12 PAGE UM   STERKEN             JULY 23, 1983  13:31:10
0          Miscellaneous assembly routines used by both the CLS and the MSG subroutines.
           Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3),
           with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for
           assembly.  Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087/1).
0          Referenced by comments of: 19/1 
00798/076A  MESSAGE SYSTEM           COMMON ASMB     OC  G          MAIL:COM.ASM.O                                                  
            5.1T2   325  MESSAGE_SYSTEM.COMMON_ASM.OC.076   1 LINE    363    8 PAGE UM   STERKEN             JULY 23, 1983  13:31:11
00798/077A  MESSAGE SYSTEM           MSGUTIL MAIN    SG  G          MAIL:MUTIL.MAIN.S                                               
            5.1T2   326  MESSAGE_SYSTEM.MSGUTIL_MA.SG.077   1 LINE    104    4 PAGE UM   STERKEN             JULY 23, 1983  13:31:12
0          "Main program" for *MSGUTIL (798/7).
00798/078A  MESSAGE SYSTEM           MSGUTIL MAIN    OC  G          MAIL:MUTIL.MAIN.O                                               
            5.1T2   327  MESSAGE_SYSTEM.MSGUTIL_MA.OC.078   1 LINE     80   11 PAGE UM   STERKEN             JULY 23, 1983  13:31:12
00798/079A  MESSAGE SYSTEM           MSGUTIL UTIL    SG  G          MAIL:MUTIL.UTIL.S                                               
            5.1T2   328  MESSAGE_SYSTEM.MSGUTIL_UT.SG.079   1 LINE    212   53 PAGE UM   STERKEN             JULY 23, 1983  13:31:13
0          Command processors and miscellaneous utility routines for *MSGUTIL (798/7).
00798/080A  MESSAGE SYSTEM           MSGUTIL UTIL    OC  G          MAIL:MUTIL.UTIL.O                                               
            5.1T2   329  MESSAGE_SYSTEM.MSGUTIL_UT.OC.080   1 LINE     80  127 PAGE UM   STERKEN             JULY 23, 1983  13:31:17
00798/081A  MESSAGE SYSTEM           MSGUTIL KWS     SA  G          MAIL:MUTIL.KWS.S                                                
            5.1T2   330  MESSAGE_SYSTEM.MSGUTIL_KW.SA.081   1 LINE    131    9 PAGE UM   STERKEN             JULY 23, 1983  13:31:22
0          Miscellaneous KWSCAN (040) interface routines for *MSGUTIL (798/7).
           Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3),
           with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for
           assembly.
00798/082A  MESSAGE SYSTEM           MSGUTIL KWS     OC  G          MAIL:MUTIL.KWS.O                                                
            5.1T2   331  MESSAGE_SYSTEM.MSGUTIL_KW.OC.082   1 LINE     80    6 PAGE UM   STERKEN             JULY 23, 1983  13:31:22
00798/083A  MESSAGE SYSTEM           MSGUTIL ASMB    SA  G          MAIL:MUTIL.ASM.S                                                
            5.1T2   332  MESSAGE_SYSTEM.MSGUTIL_AS.SA.083   1 LINE    152    7 PAGE UM   STERKEN             JULY 23, 1983  13:31:23
0          Miscellaneous assembly routines for *MSGUTIL (798/7). Assemble with the
           MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with
           PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for
           assembly.
1                                                                                               SUN SEP 08/96   15:24:55   Page  601
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/084A  MESSAGE SYSTEM           MSGUTIL ASMB    OC  G          MAIL:MUTIL.ASM.O                                                
            5.1T2   333  MESSAGE_SYSTEM.MSGUTIL_AS.OC.084   1 LINE     80    5 PAGE UM   STERKEN             JULY 23, 1983  13:31:23
00798/085A  MESSAGE SYSTEM           CLS DECLARE     SG  G          MAIL:CLS.DECLS                                                  
            5.1T2   334  MESSAGE_SYSTEM.CLS_DECLAR.SG.085   1 LINE     59    1 PAGE UM   STERKEN             JULY 23, 1983  13:31:23
0          "$CONTINUE WITH" file used to include all the standard declarations needed
           by the CLS subcomponents.
00798/086A  MESSAGE SYSTEM           CLS GLOBALS     SG  G          MAIL:CLS.GLOBAL                                                 
            5.1T2   335  MESSAGE_SYSTEM.CLS_GLOBAL.SG.086   1 LINE     74    5 PAGE UM   STERKEN             JULY 23, 1983  13:31:24
0          DECLARATION OF GLOBAL AREA MCLS.
00798/087A  MESSAGE SYSTEM           CLS LOCAL       SG  G          MAIL:CLS.LOCAL                                                  
            5.1T2   336  MESSAGE_SYSTEM.CLS_LOCAL.SG.087    1 LINE     86    5 PAGE UM   STERKEN             JULY 23, 1983  13:31:24
0          Miscellaneous declarations needed by various CLS commands. This file should
           not be renumbered.
00798/088A  MESSAGE SYSTEM           CLS MISC        SG  G          MAIL:CLS.MISC                                                   
            5.1T2   337  MESSAGE_SYSTEM.CLS_MISC.SG.088     1 LINE     71    1 PAGE UM   STERKEN             JULY 23, 1983  13:31:24
0          Miscellaneous dynamic record definitions needed by the CLS.
00798/089A  MESSAGE SYSTEM           CLS CONSTANT    SG  G          MAIL:CLS.CONSTANT                                               
            5.1T2   338  MESSAGE_SYSTEM.CLS_CONSTA.SG.089   1 LINE     91    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:24
0          Miscellaneous constant declarations needed by the CLS.
00798/090A  MESSAGE SYSTEM           SUBR DECLARE    SG  G          MAIL:SUB.DECLS                                                  
            5.1T2   339  MESSAGE_SYSTEM.SUBR_DECLA.SG.090   1 LINE     59    1 PAGE UM   STERKEN             JULY 23, 1983  13:31:25
0          "$CONTINUE WITH" file used to include all the standard declarations needed
           by the MSG subroutine components.
00798/091A  MESSAGE SYSTEM           SUBR GLOBAL     SG  G          MAIL:SUB.GLOBAL                                                 
            5.1T2   340  MESSAGE_SYSTEM.SUBR_GLOBA.SG.091   1 LINE     73    5 PAGE UM   STERKEN             JULY 23, 1983  13:31:25
0          Declaration of global area MSUB (for the MSG subroutines).
00798/092A  MESSAGE SYSTEM           SUBR MISC       SG  G          MAIL:SUB.MISC                                                   
            5.1T2   341  MESSAGE_SYSTEM.SUBR_MISC.SG.092    1 LINE     87    6 PAGE UM   STERKEN             JULY 23, 1983  13:31:25
0          Miscellaneous dynamic record definitions needed by MSG subroutines.
00798/093A  MESSAGE SYSTEM           SUBR CNSTNT     SG  G          MAIL:SUB.CONSTANT                                               
            5.1T2   342  MESSAGE_SYSTEM.SUBR_CNSTN.SG.093   1 LINE     86    2 PAGE UM   STERKEN             JULY 23, 1983  13:31:25
0          Miscellaneous constant declarations needed by the MSG subroutines.
1                                                                                               SUN SEP 08/96   15:24:55   Page  602
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/094A  MESSAGE SYSTEM           COMMON MISC     SG  G          MAIL:COM.MISC                                                   
            5.1T2   343  MESSAGE_SYSTEM.COMMON_MIS.SG.094   1 LINE     92    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:26
0          Miscellaneous dynamic record definitions needed by both the CLS and the
           MSG subroutines.
00798/095A  MESSAGE SYSTEM           COMMON GLOBAL   SG  G          MAIL:COM.GLOBAL                                                 
            5.1T2   344  MESSAGE_SYSTEM.COMMON_GLO.SG.095   1 LINE     77    1 PAGE UM   STERKEN             JULY 23, 1983  13:31:26
0          Global area definitions for the common subroutines used by both the
           CLS and the MSG subroutines.
00798/096A  MESSAGE SYSTEM           MISC CONSTANT   SG  G          MAIL:COM.CONSTANT                                               
            5.1T2   345  MESSAGE_SYSTEM.MISC_CONST.SG.096   1 LINE     92    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:26
0          Miscellaneous constant declarations needed by both the CLS and the 
           MSG subroutines.
00798/097A  MESSAGE SYSTEM           GOM DECLARE     SG  G          MAIL:GOM.DECLS                                                  
            5.1T2   346  MESSAGE_SYSTEM.GOM_DECLAR.SG.097   1 LINE     96    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:27
0          Miscellaneous declarations (e.g. for the CLS transfer vector) needed for
           every GOM procedure.
00798/098A  MESSAGE SYSTEM           *MSGUTIL DOC    WF             MAIL:FMT.MESSNOTES                                              
            5.1T2   347  MESSAGE_SYSTEM.?MSGUTIL_D.WF.098   1 LINE     94   16 PAGE UM   STERKEN             JULY 23, 1983  13:31:27
0          *FORMAT (308) source for the *MSGUTIL (798/7) documentation.
           Also contains notes for $MESSAGESYSTEM installers at other
           MTS sites.
            
           *****************************************************************************
           D5.0C version:
            
           This is not quite up-to-date. 
           *****************************************************************************
00798/099A  MESSAGE SYSTEM           SUBR DOC        WF  G          MAIL:FMT.MSGSUBS                                                
            5.1T2   348  MESSAGE_SYSTEM.SUBR_DOC.WF.099     1 LINE    178   25 PAGE UM   STERKEN             JULY 23, 1983  13:31:28
0          *FORMAT (308) source for the current MSG subroutine documentation.
00798/100A  MESSAGE SYSTEM           EXPLAIN FILE    D   G          MAIL:EXPLAINFILE                                                
            5.1T2   349  MESSAGE_SYSTEM.EXPLAIN_FI.D.100    1 LINE     74   18 PAGE UM   STERKEN             JULY 23, 1983  13:31:30
                         MAIL:EXPLAINFILE     
0          Text used by the EXPLAIN command.  Should be permitted as follows:
           U/N, R (PKEY=*SYS.MESSAGE, PKEY=*MESSAGESYST).
00798/101A  MESSAGE SYSTEM           CLS MSG SKEL    D   G          MAIL:MCLS.SKELS                                                 
            5.1T2   350  MESSAGE_SYSTEM.CLS_MSG_SK.D.101    1 LINE    185    4 PAGE UM   STERKEN             JULY 23, 1983  13:31:30
                         MAIL:MCLS.SKELS      
0          Message "skeletons" for generating CLS messages. Should be permitted U/R.
1                                                                                               SUN SEP 08/96   15:24:55   Page  603
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/102A  MESSAGE SYSTEM           MSG SUBR SKEL   D   G          MAIL:MSUB.SKELS                                                 
            5.1T2   351  MESSAGE_SYSTEM.MSG_SUBR_S.D.102    1 LINE    136    4 PAGE UM   STERKEN             JULY 23, 1983  13:31:31
                         MAIL:MSUB.SKELS      
0          Message "skeletons" for generating MSG subroutine messages.  Should be permitted U/R.
00798/103A  MESSAGE SYSTEM           CLS DUMPS       D   G        # MAIL:MCLS.DUMPS                                                 
                                                                                    UM   STERKEN                                    
                         MAIL:MCLS.DUMPS@E    
0          File to which dumps for the CLS are written.
           Should be permitted as follows:  U/N, WE PKEY=*MESSAGESYST.
00798/104A  MESSAGE SYSTEM           SUBR DUMPS      D   G        # MAIL:MSUB.DUMPS                                                 
                                                                                    UM   STERKEN                                    
                         MAIL:MSUB.DUMPS@E    
0          File to which dumps for the MSG subroutine are written.
           Should be permitted as follows: U/N, WE PKEY=*SYS.MESSAGE.
00798/105A  MESSAGE SYSTEM           GEN VM SKEL     S*  G          MAIL:GENVMSKEL                                                  
            5.1T2   352  MESSAGE_SYSTEM.GEN_VM_SKE.S?.105   1 LINE     80   14 PAGE UM   STERKEN             JULY 23, 1983  13:31:31
0          GLP to generate an "in-core" list of frequently used messages.  To run
           the program:
            
                     $SOURCE MCLS.SKEL(0)        see (798/106)
                     $SOURCE MSUB.SKEL(0)        see (798/107)
            
           Contains a $CONTINUE WITH *SPITLIB (590/1).
0          Referenced by comments of: 798/106, 798/107 
00798/106A  MESSAGE SYSTEM           MCLSSKEL        OC  G          MAIL:MCLSSKEL                                                   
            5.1T2   353  MESSAGE_SYSTEM.MCLSSKEL.OC.106     1 LINE     80    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:32
0          Generated by (798/105).
0          Referenced by comments of: 798/105 
00798/107A  MESSAGE SYSTEM           MSUBSKEL        OC  G          MAIL:MSUBSKEL                                                   
            5.1T2   354  MESSAGE_SYSTEM.MSUBSKEL.OC.107     1 LINE     80    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:32
0          Generated by (798/105).
0          Referenced by comments of: 798/105 
00798/108A  MESSAGE SYSTEM           MACLIB          SM  G          MAIL:MSG.MACLIB                                                 
            5.1T2   355  MESSAGE_SYSTEM.MACLIB.SM.108       1 LINE     72    6 PAGE UM   STERKEN             JULY 23, 1983  13:31:32
0          Macro library used by the CLS and MSG subroutine assembly routines.
0          Referenced by comments of: 798/24, 798/33, 798/35, 798/67, 798/69, 798/75, 798/81, 798/83 
1                                                                                               SUN SEP 08/96   15:24:55   Page  604
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/109A  MESSAGE SYSTEM           *MSGINFDSECT    SA  G          *MSGINFDSECT                                                    
            5.1T2   356  MESSAGE_SYSTEM.?MSGINFDSE.SA.109   1 LINE     67    2 PAGE UM   STERKEN             JULY 23, 1983  13:31:33
                         *MSGINFDSECT         
0          An assembly DSECT describing the information in the "msginfo" parameter
           of the MSGINF subroutine (798/49).
00798/110A  MESSAGE SYSTEM           *MSG            C   G          *MSG                                                            
            5.1T2   357  MESSAGE_SYSTEM.?MSG.C.110          1 LINE     88    1 PAGE UM   STERKEN             JULY 23, 1983  13:31:33
                         *MSG                 
0          Operator file run every night at 2 am by the Clock Watcher (816) to purge
           old messages from *MESSAGES (798/9).  Keeps a log in the file MAIL:MSG.LOG
           (798/111).  *MSG must be permitted U/R, R PKEY=*JUNK (the *JUNK is necessary).
0          Referenced by comments of: 798/111 
00798/111A  MESSAGE SYSTEM           *MSG LOG        D   G        # MAIL:MSG.LOG                                                    
                                                                                    UM   STERKEN                                    
                         MAIL:MSG.LOG@E       
0          Log file written to by *MSG (798/110).
0          Referenced by comments of: 798/110, 798/112 
00798/112C  MESSAGE SYSTEM           MSGLOG          OC  G          MAIL:MSGLOG                                                     
            5.1T2   358  MESSAGE_SYSTEM.MSGLOG.OC.112       1 LINE    866    4 PAGE RPI  SCHWARTZ  STERKEN   JULY 23, 1983  13:31:34
0          MSGLOG is a GLP used to print statistics gleaned from MAIL:MSG.LOG
           (798/111), the log file produced by *MSG. It was written by Gary
           Schwartz at RPI. To use: $RUN MSGLOG SCARDS=MSG.LOG
00798/113C  MESSAGE SYSTEM           MSGLOG          SQ  G          MAIL:MSGLOG.SQ                                                  
            5.1T2   359  MESSAGE_SYSTEM.MSGLOG.SQ.113       1 LINE    140    4 PAGE RPI  SCHWARTZ  STERKEN   JULY 23, 1983  13:31:34
0          Plus source for MSGLOG program.
00798/114C  MESSAGE SYSTEM           MSGLOG          S   G          MAIL:MSGLOG.GRM                                                 
            5.1T2   360  MESSAGE_SYSTEM.MSGLOG.S.114        1 LINE     87    1 PAGE RPI  SCHWARTZ  STERKEN   JULY 23, 1983  13:31:34
0          MSGLOG grammar for CLPARSER.
00798/115C  MESSAGE SYSTEM           MSGLOG          C   G          MAIL:MSGLOG.MAKE                                                
            5.1T2   361  MESSAGE_SYSTEM.MSGLOG.C.115        1 LINE     87    1 PAGE RPI  SCHWARTZ  STERKEN   JULY 23, 1983  13:31:34
0          $SOURCE file which can be used to compile and install a new version
           of MSGLOG.
00798/116A  MESSAGE SYSTEM           REMOTE.DIR      D   G          MAIL:REMOTE.DIR                                                 
            5.1T2   362  MESSAGE_SYSTEM.REMOTE.DIR.D.116    1 LINE     81    3 PAGE UM   STERKEN             JULY 23, 1983  13:31:35
0          This file is a directory of remote site mailbox names. The name
           assignments used here should be uniform for all MTS sites.  Check
           with Jim Sterken or Gavin Eadie before making changes.
1                                                                                               SUN SEP 08/96   15:24:55   Page  605
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/117A  MESSAGE SYSTEM           MSGOFDAY        D   G          MAIL:MSGOFDAY                                                   
            5.1T2   363  MESSAGE_SYSTEM.MSGOFDAY.D.117      1 LINE     65    1 PAGE UM   STERKEN             JULY 23, 1983  13:31:35
0          This file contains, at line 100, the "message of the day" for
           $MESSAGESYSTEM to print on entry.  If this file doesn't exist,
           or if line 100 is null, no message is printed.
00798/118A  MESSAGE SYSTEM           CHANGE LOG      P   G          MAIL:CHANGES.LOG                                                
            5.1T2   364  MESSAGE_SYSTEM.CHANGE_LOG.P.118    1 LINE     69    5 PAGE UM   STERKEN             JULY 23, 1983  13:31:35
0          Contains a list of recent changes to $MESSAGE in reverse chronological
           order.
00798/119A  MESSAGE SYSTEM           MEMO 444        WF             W073:MEMO444.SOU                                                
            5.1T2   365  MESSAGE_SYSTEM.MEMO_444.WF.119     1 LINE     68   14 PAGE UM   MANUAL              JULY 23, 1983  13:31:35
0          This is CCMemo 444, "Introduction to the MTS Message System."
0          Referenced by comments of: 798/1, 798/120 
00798/120C  MESSAGE SYSTEM           MEMO 444        PF             W073:MEMO444.OUT                                                
            5.1T2   366  MESSAGE_SYSTEM.MEMO_444.PF.120     1 LINE     70   14 PAGE UM   MANUAL              JULY 23, 1983  13:31:36
0          Printer-ready version of (798/119).
00798/121C  MESSAGE SYSTEM           ARCHIVE CLEAN   S*  G          MTA:CLEAN.MSG(1000)                                             
            5.1T2   367  MESSAGE_SYSTEM.ARCHIVE_CL.S?.121   1 LINE    122    9 PAGE UM   MTA                 JULY 23, 1983  13:31:37
0          Source for a program that reads a $MESS archive file on SCARDS and
           writes a cleaned up version on SPUNCH.  If PAR=LINE=n is given then
           "n" is an MTS line number in internal form and the program writes each
           message group starting at an integral line number greater than or
           equal to "n".
0          Referenced by comments of: 798/122, 798/123, 798/124 
00798/122C  MESSAGE SYSTEM           ARCHIVE CLEAN   OC  G          MTA:CLEAN.MSG(1,999)                                            
            5.1T2   368  MESSAGE_SYSTEM.ARCHIVE_CL.OC.122   1 LINE     80   21 PAGE UM   MTA                 JULY 23, 1983  13:31:39
                         MTA:CLEAN.MSG@UM     
0          Object of (798/121).  Requires MTA:SPITTIME(1000) (798/23), UNSP:SPITLIB
           (590/30), and *SPITLIB (590/10).
00798/123C  MESSAGE SYSTEM           ARCHIVE CLEAN   C   G          MTA:CLEAN.MSG(0,.999)                                           
            5.1T2   369  MESSAGE_SYSTEM.ARCHIVE_CL.C.123    1 LINE     79    1 PAGE UM   MTA                 JULY 23, 1983  13:31:39
0          Commands to compile (798/121).
00798/124C  MESSAGE SYSTEM           SPITTIME        SA  O          MTA:SPITTIME(1,999)                                             
            5.1T2   370  MESSAGE_SYSTEM.SPITTIME.SA.124     1 LINE     72    1 PAGE UM   MTA                 JULY 23, 1983  13:31:39
0          Assembly language interface between CLEAN.MSG (798/121) and 
           the (808) time routines.
1                                                                                               SUN SEP 08/96   15:24:55   Page  606
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00798/125C  MESSAGE SYSTEM           SPITTIME        OC  O          MTA:SPITTIME(1000)                                              
            5.1T2   371  MESSAGE_SYSTEM.SPITTIME.OC.125     1 LINE     80    2 PAGE UM   MTA                 JULY 23, 1983  13:31:40
                         MTA:SPITTIME@UM      
00799/001A  PAGESTAT                                 SW  G          W034:PAGESTAT.S                                                 
            5.1T3   347  PAGESTAT..SW.001                   1 LINE     81   14 PAGE UM   OGDEN               AUG. 20, 1983  19:49:25
0          PASCAL/VS (823) source for a statistics analyzing program.  The PAGESTAT
           program should be $RUN concatenated with the READSTAT subroutine (799/3).
           Uses stat item 19 in the Supervisor (045).  Requires the *ANALYSIS histogram
           subroutine (140/7).
0          Referenced by comments of: 799/3 
00799/002A  PAGESTAT                                 OC  G          W034:PAGESTAT                                                   
            5.1T3   348  PAGESTAT..OC.002                   1 LINE     80   10 PAGE UM   OGDEN               AUG. 20, 1983  19:49:26
0          Contains a $CONTINUE WITH UNSP:PAS.BC.LIB (1052/8) record.
00799/003   PAGESTAT                 READSTAT SUBR   SA  G          S1560 5.0T3 VLO FSNAME=PAGESTAT.READSTAT_SUBR.SA.003(1)      854
            5.0T3   854  PAGESTAT.READSTAT_SUBR.SA.003      1 LINE     70    3 PAGE UM   OGDEN               JULY 03, 1981  20:10:40
            5.0T8   233                       
0          Subroutine required by (799/1).
0          Referenced by comments of: 799/1 
00799/004   PAGESTAT                 READSTAT SUBR   OC  G          S1560 5.0T3 VLO FSNAME=PAGESTAT.READSTAT_SUBR.OC.004(1)      855
            5.0T3   855  PAGESTAT.READSTAT_SUBR.OC.004      1 LINE     80    1 PAGE UM   OGDEN               JULY 03, 1981  20:10:40
            5.0T8   234                       
00800/001   CHKPAR                   CHKPAR SUBR     SA  G          S1560 5.0T3 VLO FSNAME=CHKPAR.CHKPAR_SUBR.SA.001(1)          856
            5.0T3   856  CHKPAR.CHKPAR_SUBR.SA.001          1 LINE     68    4 PAGE UBC  MEIR      OGDEN     JAN. 28, 1981  20:39:43
            5.0T8   235                       
0          This is the source for the CHKPAR subroutine which was written at UBC.
           It has been modified at UM to add some more BPI instructions to allow it
           to cope with calls that don't follow OS-type-I(S) calling sequences
           completely (e.g., don't set the VL bit).
00800/002   CHKPAR                   CHKPAR SUBR     OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UBC  MEIR      OGDEN                            
0          Object part of *LIBRARY (524/1)
00800/003   CHKPAR                   ERRSUB SUBR     SA  G          S1560 5.0T3 VLO FSNAME=CHKPAR.ERRSUB_SUBR.SA.003(1)          857
            5.0T3   857  CHKPAR.ERRSUB_SUBR.SA.003          1 LINE     72    2 PAGE UBC  MEIR      OGDEN     JAN. 28, 1981  20:39:54
            5.0T8   236                       
0          ERRSUB is a replacement for a FORTRAN routine written at UBC.  It was 
           written to avoid using FTNCMD to EQUATE 99=SERCOM and to deal with 
           routine names greater that 6 characters.
1                                                                                               SUN SEP 08/96   15:24:55   Page  607
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00800/004   CHKPAR                   ERRSUB SUBR     OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UBC  MEIR      OGDEN                            
0          Object part of *LIBRARY (524/1)
00801/001   NPAR                                     SA  G          S1560 5.0T3 VLO FSNAME=NPAR..SA.001(1)                       858
            5.0T3   858  NPAR..SA.001                       1 LINE     68    2 PAGE UBC  MEIR      OGDEN     JAN. 28, 1981  20:40:25
            5.0T8   237                       
0          The NPAR subroutine was written at UBC.  It has been modified at UM
           to add some BPI instructions to allow the routines to cope with calls
           that don't follow OS-type-I(S) calling sequences completely (e.g., don't
           set the VL bit).
00801/002   NPAR                                     OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UBC  MEIR      OGDEN                            
0          Object part of *LIBRARY (524/1)
00802/001C  COMMAND MACROS           PLUS SOURCE     SQ  G          DWB:MACRO.S                                                     
            5.1T2   372  COMMAND_MACROS.PLUS_SOURC.SQ.001   1 LINE    248  134 PAGE UM   DWB                 JULY 23, 1983  13:31:40
0          This file contains all of the PLUS source definitions for the command
           language extensions (the declarations are in (802/2)). Lines 0 to .999
           contain commands to run the test facility (802/18) and the Storage Monitor
           (833/2). Lines 1 to 2 of this file contain the commands to recompile all
           the modules in the file at once. The source itself starts at line 10.
            
           Uses the Plus source library in DWB:MACRO.SQL (802/2) and COPY:MTS*SQL
           (344/4).
            
           **********************************************************************
           D5.1 version:
            
           To avoid occasional Freespace Mousetrap dumps which occur in the
           case that that last operation processed in an expession is 
           subscription (e.g., DISPLAY VALUE(ARRAY(1)) ), delete lines 
           26015 and 26016 (which both contain FREE_DESCRIPTOR (...); ),
           recompile the module in lines 26000,26999 and replace in file 
           MACRO.O (802/3).  Then rebuild *MACRTNS (802/7) using this.
           **********************************************************************
0          Referenced by comments of: 802/3, 823/21 
00802/002C  COMMAND MACROS           PLUS SOU LIB    SQ  G          DWB:MACRO.SQL                                                   
            5.1T2   373  COMMAND_MACROS.PLUS_SOU_L.SQ.002   1 LINE    163   32 PAGE UM   DWB                 JULY 23, 1983  13:31:50
0          This is the source library containing global and routine declarations.
0          Referenced by comments of: 802/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  608
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00802/003C  COMMAND MACROS           PLUS OBJECT     OC  G          DWB:MACRO.O                                                     
            5.1T2   374  COMMAND_MACROS.PLUS_OBJEC.OC.003   1 LINE   9960  110 PAGE UM   DWB                 JULY 23, 1983  13:31:52
0          Object code resulting from compiling (802/1).
0          Referenced by comments of: 802/1, 802/6 
00802/004C  COMMAND MACROS           ASSEMBLER SOU   SA  G          DWB:MACRO.SA(0,999)                                             
            5.1T2   375  COMMAND_MACROS.ASSEMBLER.SA.004    1 LINE    107   11 PAGE UM   DWB                 JULY 23, 1983  13:31:56
0          Lines 0-.999 contain commands to assemble.  Lines 1-999 contain 
           source for three separate modules for 1) BREAKD, 2) FILESSET and
           FILESGET, and 3) LMULT.  
            
           Requires OLD:CC.MACROS (1054/4).  Must be assembled with 
           PAR=BATCH.
0          Referenced by comments of: 802/5 
00802/005C  COMMAND MACROS           ASSEMBLER OBJ   OC  G          DWB:MACRO.SA(1000)                                              
            5.1T2   376  COMMAND_MACROS.ASSEMBLER.OC.005    1 LINE     80    3 PAGE UM   DWB                 JULY 23, 1983  13:31:57
0          Object of (802/4).
0          Referenced by comments of: 802/6 
00802/006C  COMMAND MACROS           BUILD               G          DWB:MACRTNS                                                     
            5.1T2   377  COMMAND_MACROS.BUILD..006          1 LINE    104    1 PAGE UM   DWB                 JULY 23, 1983  13:31:58
0          Source to line 0 to build *MACRTNS (802/7), which is where MTS
           loads the macro processor from.  Lines 1-999 contains the source and
           line 1000 et seq. the object for a small module that must be first. 
            
           The files copied into *MACRTNS are MACRTN(1000) (must be first),
           MACRO.O (802/3), MACRO.SA(1000) (802/5), and EXPLAIN.O (802/9).
            
           Refers to the symbol table routines (802/25) and (802/26), and 
           virtual file routines (802/29) to (802/32) via COPY:CCDEFS (579/6)
           and COPY:CCSYMBOL (579/9).
00802/007C  COMMAND MACROS           *MACRTNS        OC  G          *MACRTNS                                                        
            5.1T2   378  COMMAND_MACROS.?MACRTNS.OC.007     1 LINE   9960  116 PAGE UM   DWB                 JULY 23, 1983  13:31:58
                         *MACRTNS             
0          Object file that MTS loads for the macro processor.
0          Referenced by comments of: 802/1, 802/6 
00802/008C  COMMAND MACROS           EXPLAIN         SA  G          DWB:EXPLAIN.S                                                   
            5.1T2   379  COMMAND_MACROS.EXPLAIN.SA.008      1 LINE     68   15 PAGE UM   DWB                 JULY 23, 1983  13:32:02
0          Very butchered version of UBC HELP used for the EXPLAIN 
           metacommand.  The data file is ETC:MACRO.H (802/10).
1                                                                                               SUN SEP 08/96   15:24:55   Page  609
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 802/9 
00802/009C  COMMAND MACROS           EXPLAIN         OC  G          DWB:EXPLAIN.O                                                   
            5.1T2   380  COMMAND_MACROS.EXPLAIN.OC.009      1 LINE     80    4 PAGE UM   DWB                 JULY 23, 1983  13:32:03
0          Object from assembly EXPLAIN.S (802/8).
0          Referenced by comments of: 802/6 
00802/010C  COMMAND MACROS           EXPLAIN         D   G          ETC:MACRO.H                                                     
            5.1T2   381  COMMAND_MACROS.EXPLAIN.D.010       1 LINE     78   23 PAGE UM   DWB                 JULY 23, 1983  13:32:03
0          Explain data file in UBC HELP format for use by the macro
           processor's EXPLAIN metacommand.
0          Referenced by comments of: 802/8 
00802/011C  COMMAND MACROS           TEST PGM            G          DWB:MACRO.TEST                                                  
            5.1T2   382  COMMAND_MACROS.TEST_PGM..011       1 LINE    151    3 PAGE UM   DWB                 JULY 23, 1983  13:32:05
0          Simple test program for single (bug fixing) use with Command Macro
           Processor running as routine under SDS and with storage allocation
           traced by the storage monitor routines (833/2). Testing via a
           prebuilt set of test sequences is done with the Command Macro
           Processor test facility, (802/18). Lines 0 to .999 contain commands
           to source to for starting the thing off; source of driver is in
           lines 1 t0 999; object of driver is in lines 1000 et seq.; assorted
           historical test data is in the negative line number range. Usually
           used by copying the DEBUG command at line 0 and deleting the SCARDS=
           specification before entering it as a command.
00802/012C  COMMAND MACROS           DOCUMENTATION   WF  G          DWB:CMDMACDOCU                                                  
            5.1T2   383  COMMAND_MACROS.DOCUMENTAT.WF.012   1 LINE    119   26 PAGE UM   DWB                 JULY 23, 1983  13:32:05
0          *FORMAT source for the reference document, an earlier version
           of which appeared as paper I-1 in the 1982 (UM) Workshop VII
           Proceedings.
0          Referenced by comments of: 802/13 
00802/013C  COMMAND MACROS           DOCUMENTATION   PF  G          DWB:CMDMACDOCU.P                                                
            5.1T2   384  COMMAND_MACROS.DOCUMENTAT.PF.013   1 LINE     64   29 PAGE UM   DWB                 JULY 23, 1983  13:32:06
0          Printer-ready output file from *FORMAT for (802/12) documentation.
00802/014C  COMMAND MACROS           DOCUMENTATION   D   G          DWB:MACRO.SYSSYM                                                
            5.1T2   385  COMMAND_MACROS.DOCUMENTAT.D.014    1 LINE     46    3 PAGE UM   DWB                 JULY 23, 1983  13:32:08
0          Alphabetical list of predefined system symbols and their
           category of use (operator, command, built-in function,...).
1                                                                                               SUN SEP 08/96   15:24:55   Page  610
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00802/015C  COMMAND MACROS           CHECK FILE      D   G          MTS:CMD_MAC_OK                                                  
            5.1T2   386  COMMAND_MACROS.CHECK_FILE.D.015    1 LINE     70    1 PAGE UM   STERKEN             JULY 23, 1983  13:32:08
                         MTS:CMD_MAC_OK       
0          This file is checked by the $SET MACROS=ON command.  If the 
           user had READ access, s/he is allowed to use the command macros.
00802/016C  COMMAND MACROS           TEST FACILITY   SW  O          MAC:TESTER.S(1,999)                                             
            5.1T2   387  COMMAND_MACROS.TEST_FACIL.SW.016   1 LINE     13    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:09
0          Subcomponents (802/16) through (802/23) are the Command Macro
           Processor test facility. This facility uses the file MAC:TESTS
           (802/19)) which has the test data, and which in turn uses subcomponents
           (802/20) through (802/23). If these files are moved to another CCID,
           several file names will have to be changed.
            
           The program could use several imporovements, but it does work.  The
           source contains a short (and out-of-date) description.
0          Referenced by comments of: 802/16 
00802/017C  COMMAND MACROS           TEST FACILITY   SA  O          MAC:TESTER.S(2000)                                              
            5.1T2   388  COMMAND_MACROS.TEST_FACIL.SA.017   1 LINE     68    2 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:10
0          This is the assembler portion of the source for the Command Macro
           Processor test facility.
00802/018C  COMMAND MACROS           TEST FACILITY   O   O          MAC:TESTER                                                      
            5.1T2   389  COMMAND_MACROS.TEST_FACIL.O.018    1 LINE   7716    4 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:10
0          Requires *PASCALVSLIB (823/7).
0          Referenced by comments of: 802/1, 802/11 
00802/019C  COMMAND MACROS           TEST FACILITY   D              MAC:TESTS                                                       
            5.1T2   390  COMMAND_MACROS.TEST_FACIL.D.019    1 LINE    311   81 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:10
0          Test data for the Command Macro Processor test facility.
            
           *****************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           *****************************************************************************
0          Referenced by comments of: 802/16 
00802/020C  COMMAND MACROS           TEST FACILITY   D              MAC:TESTFILES1                                                  
            5.1T2   391  COMMAND_MACROS.TEST_FACIL.D.020    1 LINE     66    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:14
0          Referenced by comments of: 802/16 
1                                                                                               SUN SEP 08/96   15:24:55   Page  611
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00802/021C  COMMAND MACROS           TEST FACILITY   D              MAC:TESTFILES2                                                  
            5.1T2   392  COMMAND_MACROS.TEST_FACIL.D.021    1 LINE     65    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:14
00802/022C  COMMAND MACROS           TEST FACILITY   D              MAC:TESTLIB1                                                    
            5.1T2   393  COMMAND_MACROS.TEST_FACIL.D.022    1 LINE     44    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:14
00802/023C  COMMAND MACROS           TEST FACILITY   D              MAC:TESTLIB2                                                    
            5.1T2   394  COMMAND_MACROS.TEST_FACIL.D.023    1 LINE     13    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:14
0          Referenced by comments of: 802/16 
00802/024C  COMMAND MACROS           LIBRARY         C   G          MAC:LIB                                                         
            5.1T2   395  COMMAND_MACROS.LIBRARY.C.024       1 LINE     67    3 PAGE UM   PICKELMAN           JULY 23, 1983  13:32:14
0          A library of generally useful command macros. "EXPLAIN MAC:LIB" and
           ">SET CMDMACLIB=MAC:LIB" and for more information. Some of these use
           the program MAC:HELPER to do things which are difficult, impossible,
           and/or inefficient with macros.
00802/025A  COMMAND MACROS           LOW LEVEL SYM   SQ  G          EDIT:LOWSYM*SQ                                                  
            5.1T2   396  COMMAND_MACROS.LOW_LEVEL.SQ.025    1 LINE     70    7 PAGE UM   BURLING             JULY 23, 1983  13:32:15
0          This is a preliminary version of the MTS Command Macro facility symbol table
           routines. Uses COPY:MTS*SQL (344/4) and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 802/6 
00802/026A  COMMAND MACROS           LOW LEVEL SYM   OC  G          SEG2:MM.LOWSYM                                                  
            5.1T2   397  COMMAND_MACROS.LOW_LEVEL.OC.026    1 LINE    386    5 PAGE UM   BURLING             JULY 23, 1983  13:32:17
                         SEG2:MM.LOWSYM       
0          Referenced by comments of: 648/1, 802/6 
00802/027C  COMMAND MACROS           LOW LEVEL SYM   WF  G          EDIT:LOWSYM*WF                                                  
            5.1T2   398  COMMAND_MACROS.LOW_LEVEL.WF.027    1 LINE     71    5 PAGE UM   BURLING             JULY 23, 1983  13:32:17
0          *FORMAT input for a writeup describing the low-level symbol table
           routines.
0          Referenced by comments of: 802/28 
00802/028C  COMMAND MACROS           LOW LEVEL SYM   PF  G          EDIT:LOWSYM*W                                                   
            5.1T2   399  COMMAND_MACROS.LOW_LEVEL.PF.028    1 LINE     71    6 PAGE UM   BURLING             JULY 23, 1983  13:32:18
0          Printer-ready version of (802/27).
00802/029C  COMMAND MACROS           VIRTFILE        SA  G          EDIT:MM.VF.S                                                    
            5.1T2   400  COMMAND_MACROS.VIRTFILE.SA.029     1 LINE     72    9 PAGE UM   BURLING             JULY 23, 1983  13:32:18
0          This is the high-level interface to the low-level virtual file
           routines used by the editor. Uses OLD:CC.MACROS (1054/4) and the
           editor macro library (648/39).
0          Referenced by comments of: 802/6 
1                                                                                               SUN SEP 08/96   15:24:55   Page  612
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00802/030C  COMMAND MACROS           VIRTFILE        OC  G          SEG2:VIRTFILE                                                   
            5.1T2   401  COMMAND_MACROS.VIRTFILE.OC.030     1 LINE    788    3 PAGE UM   BURLING             JULY 23, 1983  13:32:19
                         SEG2:VIRTFILE        
00802/031C  COMMAND MACROS           VIRTFILE        WF  G          EDIT:MM.VF.WF                                                   
            5.1T2   402  COMMAND_MACROS.VIRTFILE.WF.031     1 LINE     76    5 PAGE UM   BURLING             JULY 23, 1983  13:32:19
0          *FORMAT  (308) source for writeup describing high-level virtual file
           routines.
00802/032C  COMMAND MACROS           VIRTFILE        PF  G          EDIT:MM.VF.W                                                    
            5.1T2   403  COMMAND_MACROS.VIRTFILE.PF.032     1 LINE     72    8 PAGE UM   BURLING             JULY 23, 1983  13:32:19
0          Print file.
0          Referenced by comments of: 802/6 
00803/001A  INDIRECT COST TABLE                      SA  G          MTS:ICOSTTAB(1,999)                                             
            5.1T2   404  INDIRECT_COST_TABLE..SA.001        1 LINE     73    1 PAGE UM   MTS       OGDEN     JULY 23, 1983  13:32:20
0          Contains the source for the Indirect Cost Table used by  TSA.  It is optional
           and if omitted it is assumed there are no indirect costs.
00803/002A  INDIRECT COST TABLE                      OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       OGDEN                            
0          Object part of Resident System (468).
00804/001   EXITDUMP                                 SA  G          MTS:EXITDUMP(1000)                                              
            5.0T3   863  EXITDUMP..SA.001                   1 LINE     71    4 PAGE UM   MTS       OGDEN     JULY 03, 1981  20:10:55
            5.0T8   242                       
0          A program to enable and disable the MTS debugging jobdump in ERRRTN. Copies
           *LOADINFODSECT (001/4).
00804/002   EXITDUMP                                 OC  G          MTS:EXITDUMP(1,999)                                             
            5.0T3   864  EXITDUMP..OC.002                   1 LINE     80    5 PAGE UM   MTS       OGDEN     JULY 03, 1981  20:10:56
            5.0T8   243                       
0          Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record.
00805/001A  MTS VOLUME 17            MASTER          WT             S1497 MTSV17 'MTS MANUALS' POSN=NEWM2.V17                       
            5.1T2   405  MTS_VOLUME_17.MASTER.WT.001        1 LINE    132  132 PAGE UM   MANUAL              JULY 23, 1983  13:33:15
0          TEXT/360 MASTER FOR VOLUME 17, "INTEGRATED GRAPHICS SYSTEM," OF THE UM
           MTS MANUALS, DECEMBER 1980, UPDATED MARCH 1983.
            
           EDITOR:  RICHARD A. SALISBURY
00805/002A  MTS VOLUME 17            PRINT           PT             S1497 MTSV17 'MTS MANUALS' POSN=PRINT2.V17                      
            5.1T2   406  MTS_VOLUME_17.PRINT.PT.002         1 LINE    132  249 PAGE UM   MANUAL              JULY 23, 1983  13:33:20
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which is 
           slightly modified from the TEXT/360 print file), available on request.
1                                                                                               SUN SEP 08/96   15:24:55   Page  613
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00805/003   MTS VOLUME 17            INDEX SOURCE    D              S1497 MTSV17 'MTS MANUALS' POSN=V17INDEXSOU                     
            5.0T3   867  MTS_VOLUME_17.INDEX_SOURC.D.003    1 SEQ      58    7 PAGE UM   MANUAL              JULY 03, 1981  20:11:46
            5.0T8   246                       
0          INPUT TO *INDEX (580) FOR INDEX TO VOLUME 17.
00805/004   MTS VOLUME 17            FIGURES         D              S1497 MTSV17 'MTS MANUALS' POSN=V17FIGS                         
            5.0T3   868  MTS_VOLUME_17.FIGURES.D.004        1 SEQ     154    6 PAGE UM   MANUAL              JULY 03, 1981  20:11:49
            5.0T8   247                       
0          PLOT DESCRIPTION FILE (PDS) FOR FIGURES FOR MTS VOLUME 17.
00805/005C  MTS VOLUME 17            FIGURES         D              S1497 MTSV17 'MTS MANUALS' POSN=V17FIGS.UPD1                    
            5.1T2   407  MTS_VOLUME_17.FIGURES.D.005        1 LINE    154    1 PAGE UM   MANUAL              JULY 23, 1983  13:33:33
0          Plot Description file (PDS) for figures for Update 1 of MTS Volume 17.
00805/006C  MTS VOLUME 17            UPDATE 1        D              W073:TNLV17.MAR83                                               
            5.1T2   408  MTS_VOLUME_17.UPDATE_1.D.006       1 LINE     77   26 PAGE UM   MANUAL              JULY 23, 1983  13:33:33
0          This is "Update 1 to MTS Volume 17," March 1983.
00806/001   TAPE QUEUE                               SA  G          TAPE:TAPEQ.S                                                    
            5.0T3   869  TAPE_QUEUE..SA.001                 1 LINE    144   17 PAGE UM   SHERRY              JULY 03, 1981  20:11:50
            5.0T8   248                       
0          Routine called by the MOUNT CLS (101/1) to queue 9TP tape mount requests.
           Requires D5.0 versions of MOUNT (101), *TAPERTN (135), TASKSTAT (647), SSRTN
           (413/1), SYSTEM STATUS CLS (413/5), SUPERVISOR (045), OPERATOR JOB (634),
           UNSP:TAPEDRIVES (693), and SYSDEFS (579). Uses SVC lock number 6 to update
           shared VM data structure. Defines the entry points MNTQUEUE, MNTQREL,
           MNTQSTAT, MNTQINFO. The comments in the source file describe the calling
           sequences and usage.
            
           Assemble using OLD:CC.MACROS (1054/4), COPY:MISC.MACROS (728), and
           COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT. Copies COPY:GLOBALSETS
           (1026/2), COPY:LLMPSEQU (087), COPY:JOBSTA (413/9), and COPY:MNTQINFDSECT
           (806/3).
0          Referenced by comments of: 806/3 
00806/002   TAPE QUEUE                               OE  G          SEG2:TAPEQ                                                      
            5.0T3   870  TAPE_QUEUE..OE.002                 1 LINE   3396    2 PAGE UM   SHERRY              JULY 03, 1981  20:12:15
            5.0T8   249  SEG2:TAPEQ           
0          Object for the tape queueing routines.  Loaded into shared VM after IPL by
           PISTLE, using the IPLCS modifier to resolve WX references by SSRTN (413/1).
00806/003   TAPE QUEUE               DSECTS          SA  G          COPY:MNTQINFDSECT                                               
            5.0T3   871  TAPE_QUEUE.DSECTS.SA.003           1 LINE     72    1 PAGE UM   SHERRY              JULY 03, 1981  20:12:16
            5.0T8   250                       
0          Dsects describing information returned by the MNTQSTAT and MNTQINFO entry
           points of TAPEQ.  Copied by TAPEQ (806/1), MOUNT CLS (101/1), and SSRTN
1                                                                                               SUN SEP 08/96   15:24:55   Page  614
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (413/1).
0          Referenced by comments of: 101/1, 413/1, 806/1 
00807/001A  PGFCONVERT                               SW  G          PAGE:FONTCONV.S                                                 
            5.1T2   409  PGFCONVERT..SW.001                 1 LINE     88    6 PAGE UM   SHERRY              JULY 23, 1983  13:33:35
0          A program to convert files for use with the Xerox 9700.  Emits $**$
           PAGEPR commands unchanged.  Documentation for this program is in
           CCMemo 429 (839/18).
            
           ********************************************************************************
           D5.0B version:
            
           Converted to use *PASCAL/VS compiler (823).
           ********************************************************************************
00807/002A  PGFCONVERT                               OE  G          *PAGEFONTCONVERT                                                
            5.1T2   410  PGFCONVERT..OE.002                 1 LINE  10194    4 PAGE UM   SHERRY              JULY 23, 1983  13:33:36
0          Contains a $CONTINUE WITH *PASCALVS.LIB (823/7) record.
00808/001A  TIME ROUTINES                            SA  S          W116:TIM.REL.2                                                  
            5.1T2   411  TIME_ROUTINES..SA.001              1 LINE     78  114 PAGE UM   YOUNG               JULY 23, 1983  13:33:37
0          This is the source for Howard Young's general-purpose time/date routines,
           described in the MTS Development Workshop V Proceedings.
            
           Assemble with PAR=BATCH and 2=TIM.MACRO (808/3).  Should be edited to
           change the name of the message file (set to W116:TIM.MSG).
0          Referenced by comments of: 798/124, 809/3, 809/7, 816/4, 816/5 
00808/002A  TIME ROUTINES                            OC  S          SEG2:TIM.RTNS                                                   
            5.1T2   412  TIME_ROUTINES..OC.002              1 LINE  32767   14 PAGE UM   YOUNG               JULY 23, 1983  13:33:42
                         SEG2:TIM.RTNS        
00808/003A  TIME ROUTINES            MACROS          SM  S          W116:TIM.MACRO                                                  
            5.1T2   413  TIME_ROUTINES.MACROS.SM.003        1 LINE     73    5 PAGE UM   YOUNG               JULY 23, 1983  13:33:43
0          Referenced by comments of: 808/1 
00808/004C  TIME ROUTINES            WRITEUP         P   S          W116:TIM.WRIT.C                                                 
            5.1T2   414  TIME_ROUTINES.WRITEUP.P.004        1 LINE     69   21 PAGE UM   YOUNG               JULY 23, 1983  13:33:43
00808/005A  TIME ROUTINES            MESSAGES        M   S          W116:TIM.MSG                                                    
            5.1T2   415  TIME_ROUTINES.MESSAGES.M.005       1 LINE     80    3 PAGE UM   YOUNG               JULY 23, 1983  13:33:44
00809/001A  CREP                     MAIN PGM        SG  G          CREP:CREP.S                                                     
            5.1T2   416  CREP.MAIN_PGM.SG.001               1 LINE    131   33 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:44
0          CREP, the Controlled File Replacement and Annotation Facility, monitors and
           controls the replacement of public, SEG2:, NEW:, COPY:, etc., object and data
           files as well as resident, post-IPL system components. (809/16) is a writeup
1                                                                                               SUN SEP 08/96   15:24:55   Page  615
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          describing the organization and file access requirements.
            
           This subcomponent is a GOM main program, which INCLUDEs program common and
           various dynamic record definitions, subcomponents (809/8) through (809/12).
            
           ********************************************************************************
           D5.0A version:
            
           Requires the D5.0A version of *GOM (659).
           ********************************************************************************
0          Referenced by comments of: 809/7 
00809/002A  CREP                     SUBRS           SG  G          CREP:CREPEXSUBS.S                                               
            5.1T2   417  CREP.SUBRS.SG.002                  1 LINE    111   35 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:46
0          These are the CREP GOM subroutines. INCLUDEs program common and various
           dynamic record definitions, subcomponents (809/8) through (809/12).
0          Referenced by comments of: 809/7 
00809/003A  CREP                     KWS SUBR        SA  G          CREP:CREPKWS.S                                                  
            5.1T2   418  CREP.KWS_SUBR.SA.003               1 LINE     99   26 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:47
0          CREP's keyword scan interface for CREP command processing.  Assemble
           using COPY:MTS.MACROS (344/3).
            
           ********************************************************************
           D5.0C version:
            
           Now uses the TIME/DATE subroutines in shared VM - component (808) -
           and has been updated to accept the TIME/DATE extended exploded
           format to handle time zones.
           ********************************************************************
0          Referenced by comments of: 809/7 
00809/004A  CREP                     RWCK SUBRS      SA  G          CREP:CREPRWCKSM.S                                               
            5.1T2   419  CREP.RWCK_SUBRS.SA.004             1 LINE    111    1 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:49
0          Subroutines to support REWIND# calls and compute backup file checksums.
           Assemble using COPY:MTS.MACROS (344/3).
0          Referenced by comments of: 809/7 
00809/005A  CREP                     SPANBREAK SUBR  SA  G          CREP:SPANBREAK.S                                                
            5.1T2   420  CREP.SPANBREAK_SUBR.SA.005         1 LINE     76    4 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:49
0          SPAN and BREAK functions to assist CREP command processing.
0          Referenced by comments of: 809/7 
1                                                                                               SUN SEP 08/96   15:24:55   Page  616
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00809/006A  CREP                     MCHPAT SUBR     SA  G          CREP:BLDMCHPAT.S                                                
            5.1T2   421  CREP.MCHPAT_SUBR.SA.006            1 LINE    103   18 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:50
0          Extended version of $FILESTATUS "?" pattern support.  Used for the CREP 
           STATUS command file name pattern processing.  Assemble using COPY:MTS.MACROS
           (344/3).
0          Referenced by comments of: 809/7 
00809/007A  CREP                     OBJECT          OE  G          MTS:CREP                                                        
            5.1T2   422  CREP.OBJECT.OE.007                 1 LINE  32767   34 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:51
                         MTS:CREP             
0          This is the object of (809/1), (809/2), (809/3), (809/4), (809/5), (809/6),
           and (808/1). SEG2:S2L (559/3) is dynamically loaded when post-IPL components
           are being processed. CREP references SEG2:S2FILES (559/5), SEG2:S2MAP
           (559/12), ETC:CREPHELP (809/13), MTS:CREPDIR (809/14), and MTS:CREPLOG
           (809/15).
0          Referenced by comments of: 809/14, 809/15 
00809/008A  CREP                     COMMON          SG  G          CREP:MAINCOMM.S                                                 
            5.1T2   423  CREP.COMMON.SG.008                 1 LINE     92    3 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:53
0          GOM COMMON definitions.  "INCLUDEd" in various CREP routines.
0          Referenced by comments of: 809/1, 809/2 
00809/009A  CREP                     CMD DRC         SG  G          CREP:CMDDRC.S                                                   
            5.1T2   424  CREP.CMD_DRC.SG.009                1 LINE     78    4 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:53
0          GOM dynamic record definitions for CREP's commands.  "INCLUDEd" in various
           CREP routines.
00809/010A  CREP                     FILE STRUC DRC  SG  G          CREP:CFNDRC.S                                                   
            5.1T2   425  CREP.FILE_STRUC_DRC.SG.010         1 LINE     74    1 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:53
0          GOM dynamic record definitions for CREP's internal file information
           structure.  "INCLUDEd" in various CREP routines.
00809/011A  CREP                     DIRLOG DRC      SG  G          CREP:DIRLOGDRC.S                                                
            5.1T2   426  CREP.DIRLOG_DRC.SG.011             1 LINE     78    3 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:53
0          GOM dynamic record definitions for the CREP directory and log files.
           "INCLUDEd" in various CREP routines.
00809/012A  CREP                     GD/GFINFO DRC   SG  G          CREP:INFDRC.S                                                   
            5.1T2   427  CREP.GD/GFINFO_DRC.SG.012          1 LINE     71    3 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:54
0          GOM dynamic record definitions of GDINFO/GFINFO information.  "INCLUDEd"
           in various CREP routines.
0          Referenced by comments of: 809/1, 809/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  617
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00809/013A  CREP                     HELP FILE       D   G          ETC:CREPHELP                                                    
            5.1T2   428  CREP.HELP_FILE.D.013               1 LINE     78    5 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:54
                         ETC:CREPHELP         
0          The CREP help file.  Line numbers in this file are important.
0          Referenced by comments of: 809/7 
00809/014   CREP                     DIRECTORY FILE  D   G        # MTS:CREPDIR                                                     
                                                                                    UM   FRONCZAK                                   
                         MTS:CREPDIR@E        
0          This is the directory file required by CREP (809/7).
0          Referenced by comments of: 809/7 
00809/015   CREP                     LOG FILE        D   G        # MTS:CREPLOG                                                     
                                                                                    UM   FRONCZAK                                   
                         MTS:CREPLOG@E        
0          This is the log file required by CREP (809/7).
0          Referenced by comments of: 809/7 
00809/016   CREP                     SYS WRUP        P   G          CREP:CREPSYSORG                                                 
            5.0T3   891  CREP.SYS_WRUP.P.016                1 LINE    107    3 PAGE UM   FRONCZAK            JULY 03, 1981  20:12:57
            5.0T8   270                       
0          System programmer writeup describing the CREP system organization and file
           access requirements.
0          Referenced by comments of: 809/1 
00809/017A  CREP                     USER WRUP       WT  G          CREP:PAPER.CREP                                                 
            5.1T2   429  CREP.USER_WRUP.WT.017              1 LINE    140   10 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:55
0          TEXT360 source for the CREP user writeup.
0          Referenced by comments of: 809/18 
00809/018A  CREP                     WRUP GEN        C   G          CREP:T360CREP                                                   
            5.1T2   430  CREP.WRUP_GEN.C.018                1 LINE    104    1 PAGE UM   FRONCZAK            JULY 23, 1983  13:33:56
0          TEXT360 procedure to produce the CREP user writeup from (809/17).
00810/001A  PMF                      INSTALLATION    P              PMF:INSTAL.NOTES                                                
            5.1T2   431  PMF.INSTALLATION.P.001             1 LINE     69    3 PAGE UM   HANSEN              JULY 23, 1983  13:33:56
0          The Project Management Facility (PMF) is a software tool to help users
           organize and document the components (source, object, listings, data,
           etc.) and procedures (commands) used in the development and installation
           of large scale software packages. 
            
           This subcomponent contains the directions for installing and maintaining
1                                                                                               SUN SEP 08/96   15:24:55   Page  618
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          the PMF.
0          Referenced by comments of: 387/40, 668/9, 686/46, 810/4, 821/1, 821/3, 821/6, 828/1, 847/11 
00810/002A  PMF                      WRITEUP         WF             PMF:WRITEUP.S                                                   
            5.1T2   432  PMF.WRITEUP.WF.002                 1 LINE     82   18 PAGE UM   HANSEN              JULY 23, 1983  13:33:57
0          *FORMAT (308) source for the PMF writeup.
00810/003A  PMF                      WRITEUP         PF             PMF:WRITEUP                                                     
            5.1T2   433  PMF.WRITEUP.PF.003                 1 LINE     69   20 PAGE UM   HANSEN              JULY 23, 1983  13:33:58
0          Printer-ready copy of the PMF writeup.  Allow 30 pages to print.
00810/004A  PMF                      CLS             OE  O          *CLSPMF                                                         
            5.1T2   434  PMF.CLS.OE.004                     1 LINE  32767   35 PAGE UM   HANSEN              JULY 23, 1983  13:34:00
                         *CLSPMF              
0          The complete, linkeditted object for the PMF.  This component may reference
           several other files during execution.  See the installation notes (810/1)
           for details.
0          Referenced by comments of: 810/5, 810/8 
00810/005A  PMF                      RUN             OC  O          PMF:RUN.CURRENT                                                 
            5.1T2   435  PMF.RUN.OC.005                     1 LINE  11274   97 PAGE UM   HANSEN              JULY 23, 1983  13:34:01
0          $RUNable version of the PMF.  This component, with selected csects from
           the libraries referenced, was linkeditted to create *CLSPMF (810/4).
           Refers to the Full Screen Help facility (845/6).
00810/006A  PMF                      ETC:PMF.HELP    M   G          ETC:PMF.HELP                                                    
            5.1T2   436  PMF.ETC:PMF.HELP.M.006             1 LINE    109   19 PAGE UM   HANSEN              JULY 23, 1983  13:34:05
                         ETC:PMF.HELP         
0          The primary HELP file referenced by the PMF CLS.
            
           This file has $CONTINUE WITHs to itself, so it should be restored to the
           same name.
00810/007A  PMF                      ETC:PMF.LOG     D            # ETC:PMF.LOG                                                     
                                                                                    UM   HANSEN                                     
                         ETC:PMF.LOG@E        
0          A place to put PMF usage statistics.  This file must be a line file,
           permitted WE (PKEY=*#PMF, PKEY=*#CLS), but it is not necessary for PMF
           execution.
00810/008A  PMF                      MAP             D              PMF:MAP.CURRENT                                                 
            5.1T2   437  PMF.MAP.D.008                      1 LINE    101    3 PAGE UM   HANSEN              JULY 23, 1983  13:34:06
0          The map produced by linkeditting the test version (810/15) to produce
           the CLS (810/4).
1                                                                                               SUN SEP 08/96   15:24:55   Page  619
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00810/009A  PMF                      SOURCE LIB      SQ  G          PMF:SOURCELIB                                                   
            5.1T2   438  PMF.SOURCE_LIB.SQ.009              1 LINE     97   16 PAGE UM   HANSEN              JULY 23, 1983  13:34:06
0          The PLUS source library used for compiling the PLUS procedures for 
           the PMF.
00810/010A  PMF                      SOURCE          SQ  O          PMF:PMF.SQ                                                      
            5.1T2   439  PMF.SOURCE.SQ.010                  1 LINE    136   51 PAGE UM   HANSEN              JULY 23, 1983  13:34:07
0          PLUS source for most of the PMF, excluding command processing,
           subtasking, and storage management.  References Full Screen 
           Help Facility (845/5).
00810/011A  PMF                      CORE            SQ  O          PMF:PMF.CORE                                                    
            5.1T2   440  PMF.CORE.SQ.011                    1 LINE    106   12 PAGE UM   HANSEN              JULY 23, 1983  13:34:09
0          PLUS source for the PMF procedure dealing with subtasking and storage
           management.
00810/012A  PMF                      CMD             SQ  O          PMF:PMF.CMD                                                     
            5.1T2   441  PMF.CMD.SQ.012                     1 LINE    118   37 PAGE UM   HANSEN              JULY 23, 1983  13:34:10
0          PLUS source for the PMF command processor.
00810/013A  PMF                      ASM CODE        SA  O          PMF:PMF.ASM                                                     
            5.1T2   442  PMF.ASM_CODE.SA.013                1 LINE     72    9 PAGE UM   HANSEN              JULY 23, 1983  13:34:12
0          Source for the ASMH (737) parts of the PMF.
00810/014A  PMF                      GRAMMAR         D   O          PMF:GRAMMAR                                                     
            5.1T2   443  PMF.GRAMMAR.D.014                  1 LINE     91    9 PAGE UM   HANSEN              JULY 23, 1983  13:34:13
0          The grammar for use with *CLPARSER.
00810/015A  PMF                      CLSTEST         SA  O          PMF:CLSTEST.SA                                                  
            5.1T2   444  PMF.CLSTEST.SA.015                 1 LINE     66    1 PAGE UM   HANSEN              JULY 23, 1983  13:34:13
0          Source for yet another CLS test driver.
0          Referenced by comments of: 810/8 
00810/016A  PMF                      CLSTEST         OC  O          PMF:CLSTEST.OA                                                  
            5.1T2   445  PMF.CLSTEST.OC.016                 1 LINE     80    4 PAGE UM   HANSEN              JULY 23, 1983  13:34:14
0          Object for yet another CLS test driver.
0          Referenced by comments of: 810/18 
00810/017A  PMF                      PROJECT FILE    D              PMF:PMFX                                                        
            5.1T2   446  PMF.PROJECT_FILE.D.017             1 LINE    164    9 PAGE UM   HANSEN              JULY 23, 1983  13:34:14
0          The PMF project file describing the PMF itself.
0          Referenced by comments of: 810/18 
1                                                                                               SUN SEP 08/96   15:24:55   Page  620
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00810/018A  PMF                      MISC            D              PMF:MISC                                                        
            5.1T2   447  PMF.MISC.D.018                     1 LINE     34    1 PAGE UM   HANSEN              JULY 23, 1983  13:34:14
0          This file is used by the PMF when using the PMF project file (810/17). It
           contains miscellaneous data used by PMF procedures. Also contains $CONTINUE
           WITH PMF:CLSTEST.OA (810/16) record.
00811/001A  SCREEN SUPPORT ROUTINES  SOURCE LIB      SQ  S          CRT:SS.SOURCELIB                                                
            5.1T2   448  SCREEN_SUPPORT_ROUTINES.S.SQ.001   1 LINE    137   11 PAGE UM   CASHMAN             JULY 23, 1983  13:34:15
0          The screen support routines provide device independent support for
           3270 type displays, and Ontels running the OP/VIS software. Support
           for other terminals can be added. The screen support routines are
           often called the "9112" routines because their design followed
           proposals taken from papers 12 and 91 at the RPI MTS workshop in
           1980.
            
           These routines are still under active development at UM. They have
           not been released to the public, but are used by the MTS editor and
           several internal programs. Before making extensive changes to these
           routines or attempting to add support for new devices please check
           with Brian Cashman at UM.
            
           This subcomponent is the PLUS source library for all screen
           support routines. Provides all necessary global variable, data
           structure, and subroutine declarations.
0          Referenced by comments of: 461/2, 496/4, 496/7, 629/12, 634/6, 648/1, 811/4, 811/6, 811/8, 812/1 
00811/002A  SCREEN SUPPORT ROUTINES  ASM ROUTINES    SA  S          CRT:SS.ASMRTNS.S                                                
            5.1T2   449  SCREEN_SUPPORT_ROUTINES.A.SA.002   1 LINE    142    8 PAGE UM   CASHMAN             JULY 23, 1983  13:34:17
0          Assembler source to interface device-independent screen support routines to
           the real world.  Uses the Version Labeler (812) and SIDELABEL (747) for listing
           enhancements.  $SOURCE to assemble.  Requires COPY:MTS.MACROS (344/3), 
           OLD:CC.MACROS (1054/4), and COPY:MISC.MACROS (728).
            
           **********************************************************************
           D5.1 version:
            
           Assembly commands contains reference to COPY:CC.MACROS, which should
           be changed to OLD:CC.MACROS.
           **********************************************************************
0          Referenced by comments of: 811/3 
00811/003A  SCREEN SUPPORT ROUTINES  ASM ROUTINES    OC  S          CRT:SS.ASM.O                                                    
            5.1T2   450  SCREEN_SUPPORT_ROUTINES.A.OC.003   1 LINE     80    5 PAGE UM   CASHMAN             JULY 23, 1983  13:34:17
0          Object produced by assembling (811/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  621
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00811/004A  SCREEN SUPPORT ROUTINES  DI ROUTINES     SQ  S          CRT:SS.DIRTNS.S                                                 
            5.1T2   451  SCREEN_SUPPORT_ROUTINES.D.SQ.004   1 LINE    173   44 PAGE UM   CASHMAN             JULY 23, 1983  13:34:18
0          PLUS source for screen support device-independent routines. Uses the
           Version Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE
           to compile. Requires (811/1) and (1042/7).
0          Referenced by comments of: 811/5 
00811/005A  SCREEN SUPPORT ROUTINES  DI ROUTINES     OC  S          CRT:SS.DI.O                                                     
            5.1T2   452  SCREEN_SUPPORT_ROUTINES.D.OC.005   1 LINE   2840   17 PAGE UM   CASHMAN             JULY 23, 1983  13:34:22
0          Object produced by compiling (811/4).
00811/006A  SCREEN SUPPORT ROUTINES  EURONET DDR     SQ  S          CRT:SS.EURONET.S                                                
            5.1T2   453  SCREEN_SUPPORT_ROUTINES.E.SQ.006   1 LINE    107   22 PAGE UM   CASHMAN             JULY 23, 1983  13:34:23
0          PLUS source for Euronet (ONTEL) device-dependent routines. Uses the
           Version Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE
           to compile. Requires (811/1) and (1042/7).
0          Referenced by comments of: 811/7, 811/9 
00811/007A  SCREEN SUPPORT ROUTINES  EURONET DDR     OC  S          CRT:SS.EURONET.O                                                
            5.1T2   454  SCREEN_SUPPORT_ROUTINES.E.OC.007   1 LINE   2716   10 PAGE UM   CASHMAN             JULY 23, 1983  13:34:24
0          Object produced by compiling (811/6). Due to external name conflicts with the
           IBM 3270 DDR (811/8), this should be linkeditted to remove all entry points
           except DDRONTEL.
00811/008A  SCREEN SUPPORT ROUTINES  3270 DDR        SQ  S          CRT:SS.3270.S                                                   
            5.1T2   455  SCREEN_SUPPORT_ROUTINES.3.SQ.008   1 LINE    232   11 PAGE UM   CASHMAN             JULY 23, 1983  13:34:24
0          PLUS source for IBM 3270 device-dependent routines. Uses the Version
           Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE to
           compile. Requires (811/1) and (1042/7).
0          Referenced by comments of: 811/7, 811/9 
00811/009A  SCREEN SUPPORT ROUTINES  3270 DDR        OC  S          CRT:SS.3270.O                                                   
            5.1T2   456  SCREEN_SUPPORT_ROUTINES.3.OC.009   1 LINE    992    7 PAGE UM   CASHMAN             JULY 23, 1983  13:34:25
0          Object produced by compiling (811/8). Due to external name conflicts with the
           EURONET DDR (811/6), this should be linkeditted to remove all entry points
           except DDR3270.
00811/010A  SCREEN SUPPORT ROUTINES  OBJECT          OE  S          SEG2:SCREENRTNS                                                 
            5.1T2   457  SCREEN_SUPPORT_ROUTINES.O.OE.010   1 LINE  10692   24 PAGE UM   CASHMAN             JULY 23, 1983  13:34:25
                         SEG2:SCREENRTNS      
0          This is the object for the screen support routines.  It contains all the
           device-independent components and DDRs.  The DDRs should have their internal
           subroutine names purged to prevent loader conflicts.
1                                                                                               SUN SEP 08/96   15:24:55   Page  622
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00811/011A  SCREEN SUPPORT ROUTINES  WRITEUP         WF  S          CRT:SS.WRITEUP.W                                                
            5.1T2   458  SCREEN_SUPPORT_ROUTINES.W.WF.011   1 LINE    135    5 PAGE UM   CASHMAN             JULY 23, 1983  13:34:26
0          *FORMAT input used to generate Screen Support Routines writeup.  $SOURCE to
           produce a writeup.
00811/012C  SCREEN SUPPORT ROUTINES  MEMO 451        WF             W599:SCREENDOC                                                  
            5.1T2   459  SCREEN_SUPPORT_ROUTINES.M.WF.012   1 LINE     70   12 PAGE UM   GLUSKI              JULY 23, 1983  13:34:27
0          This is Computing Center Memo 451 -- "Screen Support Routines."
            
           **************************************************************
           D5.1 version:
            
           This is a draft copy and is STILL BEING REVISED.
           **************************************************************
00811/013C  SCREEN SUPPORT ROUTINES  MEMO 451        PF             W599:OUTPUT                                                     
            5.1T2   460  SCREEN_SUPPORT_ROUTINES.M.PF.013   1 LINE     70   18 PAGE UM   GLUSKI              JULY 23, 1983  13:34:28
00812/001   VERSION LABELER                          SG  G          UNSP:ÂVERLAB.S                                                  
            5.0T3   923  VERSION_LABELER..SG.001            1 LINE    161    3 PAGE UM   UNSP      BURLING   JULY 03, 1981  20:16:11
            5.0T8   302                       
0          This program provides listing enhancements;  it was formerly distributed,
           on D4.0, as a part of *IG (498).
            
           It is used by the Disk Manager (769), *IG (498), the editor (648) and the
           Screen Support Routines (811).
0          Referenced by comments of: 498/1, 648/1, 811/2, 811/4, 811/6, 811/8, 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 
00812/002   VERSION LABELER                          OC  G          UNSP:VERLAB                                                     
            5.0T3   924  VERSION_LABELER..OC.002            1 LINE   1904    3 PAGE UM   UNSP      BURLING   JULY 03, 1981  20:16:12
            5.0T8   303                       
00812/003   VERSION LABELER          WRITEUP         P              UNSP:VERLAB.W                                                   
            5.0T3   925  VERSION_LABELER.WRITEUP.P.003      1 LINE     69    1 PAGE UM   UNSP      BURLING   JULY 03, 1981  20:16:14
            5.0T8   304                       
00813/001A  PL1 OPTIMIZING COMPILER  INSTALL NOTES   WF             PL1:OPTINSTALL                                                  
            5.1T2   461  PL1_OPTIMIZING_COMPILER.I.WF.001   1 LINE     68    6 PAGE UM   TIFFANY             JULY 23, 1983  13:34:29
0          Writeup describing how to install the PL1 Optimizing Compiler.
0          Referenced by comments of: 233/1, 496/4, 496/5, 721/1 
00813/002A  PL1 OPTIMIZING COMPILER  OBJECT          OE  G        # *PL1OPT                                                         
                                                                                    UM   TIFFANY                                    
0          Object of the PL1 Optimizing Compiler.  Due to IBM copyrights restrictions,
           the object cannot be distributed.
            
           *******************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  623
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          D5.0B version:
            
           Now includes VSLOAD (813/10).
           *******************************************************************
0          Referenced by comments of: 813/10, 813/12, 813/14 
00813/003A  PL1 OPTIMIZING COMPILER  ETC:OPTPL1LINK  OL  G        # ETC:PL1OPTLINK                                                  
                                                                                    UM   TIFFANY                                    
0          Link library for the PL1 Optimizing Compiler.  Due to IBM copyright
           restrictions, this cannot be distributed.
            
           *******************************************************************
           D5.0B version:
            
           Now a *VSS PDS load library.
           *******************************************************************
0          Referenced by comments of: 813/9, 813/13, 813/15, 813/16, 813/17, 813/18, 813/19, 813/20, 813/21, 813/22, 813/23,
                 813/24, 813/25, 813/26, 813/27, 813/28, 813/29, 813/30, 813/31, 813/38, 813/40, 813/41, 813/43, 813/44,
                 813/45, 813/46, 813/47, 813/48, 813/49, 813/53, 813/54, 813/55, 813/56 
00813/004C  PL1 OPTIMIZING COMPILER  ETC:PL1OPTLOG   D   G        # ETC:PL1OPTLOG                                                   
                                                                                    UM   TIFFANY                                    
0          A file on which the PL/I Optimizing Compiler logs all program interrupts.
0          Referenced by comments of: 506/12 
00813/005   PL1 OPTIMIZING COMPILER  PPOPTIONS       SM  G        # PL1:PPOPTIONS                                                   
                                                                                    UM   TIFFANY                                    
0          Macro library to assemble (813/17) and (813/18). Due to IBM copyright
           restrictions, this cannot be distributed. This comes from options macros,
           file 2 on either the installation tape or the PTF tape, with copy sections
           PLIX1 and PLIX2 renamed as PLIXOPB and PLIXOPC respectively.
0          Referenced by comments of: 813/17, 813/18 
00813/006A  PL1 OPTIMIZING COMPILER  MACLIB          SM  G        # PL1:PL1OPTMAC                                                   
                                                                                    UM   TIFFANY                                    
0          Main macro library for PL1 Optimizing Compiler. Due to IBM copyright
           restrictions, this cannot be distributed. See (813/7) for the MTS update to
           the IBM version.
0          Referenced by comments of: 813/7, 813/14, 813/15, 813/16, 813/19, 813/20, 813/21, 813/22, 813/23, 813/24, 813/25,
                 813/26, 813/27, 813/28, 813/29, 813/30, 813/31, 813/32, 813/33, 813/34, 813/35, 813/36, 813/37, 813/38,
                 813/39, 813/40, 813/41, 813/42, 813/43, 813/44, 813/45, 813/46, 813/47, 813/48, 813/49, 813/50, 813/51,
                 813/52, 813/53, 813/54, 813/55, 813/56 
1                                                                                               SUN SEP 08/96   15:24:55   Page  624
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00813/007A  PL1 OPTIMIZING COMPILER  MACLIB UPD      UC  G          PL1:PL1OPTMAC.UP                                                
            5.1T2   462  PL1_OPTIMIZING_COMPILER.M.UC.007   1 LINE     64    4 PAGE UM   TIFFANY             JULY 23, 1983  13:34:31
0          *CDUPDATE (1036) input to IBM's version of the compiler macros (813/6). Run
           (506/8) on *CDUPDATE output with SPUNCH=PL1OPTMAC (813/6) to get the macro
           library.
            
           *******************************************************************
           D5.0B version:
            
           Changed from D5.0A.
           *******************************************************************
0          Referenced by comments of: 813/6 
00813/008   PL1 OPTIMIZING COMPILER  LOADMAC         SM  G          S1516 'PL1 OPTIMIZER' FSNAME=LOADMAC                            
            5.0T3   929  PL1_OPTIMIZING_COMPILER.L.SM.008   1 LINE     33    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:49:55
            5.0T8   308                       
0          Macros to simulate LOAD, DELETE, LINK, and XCTL.
0          Referenced by comments of: 813/14, 813/15, 813/27, 813/28, 813/45, 813/55 
00813/009C  PL1 OPTIMIZING COMPILER  VSLOAD          SA  G          PL1:VSLOAD.S                                                    
            5.1T2   463  PL1_OPTIMIZING_COMPILER.V.SA.009   1 LINE     80   10 PAGE UM   TIFFANY             JULY 23, 1983  13:34:31
0          Loading routines for *VSS PDS load library like ETC:PL1OPTLINK (813/3).
            
           *********************************************************************
           D5.1 version:
            
           Changed because in OS/VS macros LOAD and DELETE do not requre R13.
           **********************************************************************
00813/010C  PL1 OPTIMIZING COMPILER  VSLOAD          OC  G          PL1:VSLOAD                                                      
            5.1T2   464  PL1_OPTIMIZING_COMPILER.V.OC.010   1 LINE   2873    4 PAGE UM   TIFFANY             JULY 23, 1983  13:34:32
0          Object of (813/13), part of *PL1OPT (813/2).
0          Referenced by comments of: 813/2 
00813/011   PL1 OPTIMIZING COMPILER  FIND            SA  G          S1516 'PL1 OPTIMIZER' FSNAME=FIND.S                             
            5.0T3   934  PL1_OPTIMIZING_COMPILER.F.SA.013   1 LINE     68    5 PAGE UM   TIFFANY             MAR. 30, 1981  20:50:52
            5.0T8   313                       
0          Module to find the source for the corresponding %INCLUDE statements. Assemble
           with PEXIT=*PEXIT (775). Copies *GDINFODSECT (594).
00813/012   PL1 OPTIMIZING COMPILER  FIND            OC  G          S1516 'PL1 OPTIMIZER' FSNAME=FIND                               
            5.0T3   935  PL1_OPTIMIZING_COMPILER.F.OC.014   1 LINE   2045    3 PAGE UM   TIFFANY             MAR. 30, 1981  20:50:46
            5.0T8   314                       
0          Install this into PL1:OPTIMIZER (813/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  625
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00813/013   PL1 OPTIMIZING COMPILER  IEL0UA LKED     D   G          S1516 'PL1 OPTIMIZER' FSNAME=UA.LKED                            
            5.0T3   936  PL1_OPTIMIZING_COMPILER.I.D.015    1 LINE     66    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:13:40
            5.0T8   315                       
0          This is the *LINKEDIT (297) input to produce from the assembled sources
           IEL0UA1 and IEL0UA2 the compiler phases IEL0UA, IEL0UAY, IEL0UAC,
           IEL0UAE, and IEL0UAT in ETC:OPTPL1LINK (813/3).
0          Referenced by comments of: 813/10, 813/55 
00813/014A  PL1 OPTIMIZING COMPILER  IEL0AA          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=AA.UP                              
            5.1T2   465  PL1_OPTIMIZING_COMPILER.I.UC.014   1 LINE     70    4 PAGE UM   TIFFANY             MAY  02, 1983  11:26:30
0          *CDUPDATE (1036) input for the source IEL0AA. Assemble with (813/6) and
           (813/8). Install into *PL1OPT (813/2).
00813/015A  PL1 OPTIMIZING COMPILER  IEL0AE          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=AE.UP                              
            5.1T2   466  PL1_OPTIMIZING_COMPILER.I.UC.015   1 LINE     67    5 PAGE UM   TIFFANY             MAY  02, 1983  11:26:31
0          *CDUPDATE (1036) input for the source IEL0AE. Assemble with (813/6) and
           (813/8). Install into phase IEL0AE in ETC:PL1OPTLINK (813/3).
00813/016   PL1 OPTIMIZING COMPILER  IEL0AI          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0AI must be assembled with (813/6) due to change in (813/6).
           Install into phase IEL0AI in ETC:PL1OPTLINK (813/3).
            
           This subcomponent is included only as a reminder that IEL0AI must be
           assembled. There is no MTS update required.
00813/017   PL1 OPTIMIZING COMPILER  IEL0AS          SA  G          S1516 'PL1 OPTIMIZER' FSNAME=AS.S                               
            5.0T3   939  PL1_OPTIMIZING_COMPILER.I.SA.019   1 LINE     72    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:51:24
            5.0T8   318                       
0          Assemble with (813/5). Install into phase IEL0AS in ETC:PL1OPTLINK (813/3).
0          Referenced by comments of: 813/5 
00813/018   PL1 OPTIMIZING COMPILER  IEL0AT          SA  G          S1516 'PL1 OPTIMIZER' FSNAME=AT.S                               
            5.0T3   940  PL1_OPTIMIZING_COMPILER.I.SA.020   1 LINE     72    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:51:31
            5.0T8   319                       
0          Assemble with (813/5). Install into phase IEL0AT in ETC:PL1OPTLINK (813/3).
0          Referenced by comments of: 813/5 
00813/019A  PL1 OPTIMIZING COMPILER  IEL0BA          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=BA.UP                              
            5.1T2   467  PL1_OPTIMIZING_COMPILER.I.UC.019   1 LINE     68    3 PAGE UM   TIFFANY             MAY  02, 1983  11:26:34
0          *CDUPDATE (1036) input for source IEL0BA. Assemble with (813/6). Install
           object into phase IEL0BA in ETC:PL1OPTLINK (813/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  626
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00813/020A  PL1 OPTIMIZING COMPILER  IEL0CA          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CA.UP                              
            5.1T2   468  PL1_OPTIMIZING_COMPILER.I.UC.020   1 LINE     63    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:35
0          *CDUPDATE (1036) input for source IEL0CA. Assemble with (813/6). Install
           object into phases IEL0CA1, IEL0CB, IEL0CC in ETC:PL1OPTLINK (813/3). Do not
           install in IEL0CA.
00813/021   PL1 OPTIMIZING COMPILER  IEL0CA1         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CA1.UP                             
            5.0T3   943  PL1_OPTIMIZING_COMPILER.I.UC.023   1 LINE     59    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:51:58
            5.0T8   322                       
0          *CDUPDATE (1036) input for source IEL0CA1. Assemble with (813/6). Install
           into phase IEL0CA1 in ETC:PL1OPTLINK (813/3).
00813/022A  PL1 OPTIMIZING COMPILER  IEL0CB          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CB.UP                              
            5.1T2   469  PL1_OPTIMIZING_COMPILER.I.UC.022   1 LINE     54    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:37
0          *CDUPDATE (1036) input for source IEL0CB. Assemble with (813/6). Install into
           phase IEL0CB in ETC:PL1OPTLINK (813/3).
00813/023   PL1 OPTIMIZING COMPILER  IEL0CB2         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CB2.UP                             
            5.0T3   945  PL1_OPTIMIZING_COMPILER.I.UC.025   1 LINE     43    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:52:17
            5.0T8   324                       
0          *CDUPDATE (1036) input for source IEL0CB2. Assemble with (813/6). Install
           into phase IEL0CB in ETC:PL1OPTLINK (813/3).
00813/024   PL1 OPTIMIZING COMPILER  IEL0CC          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CC.UP                              
            5.0T3   946  PL1_OPTIMIZING_COMPILER.I.UC.026   1 LINE     56    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:52:22
            5.0T8   325                       
0          *CDUPDATE (1036) input for source IEL0CC. Assemble with (813/6). Install into
           phase IEL0CC in ETC:PL1OPTLINK (813/3).
00813/025   PL1 OPTIMIZING COMPILER  IEL0CC2         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CC2.UP                             
            5.0T3   947  PL1_OPTIMIZING_COMPILER.I.UC.027   1 LINE     44    1 PAGE UM   TIFFANY             MAR. 30, 1981  20:52:32
            5.0T8   326                       
0          *CDUPDATE (1036) input for source IEL0CC2. Assemble with (813/6). Install
           into phase IEL0CC in ETC:PL1OPTLINK (813/3).
00813/026   PL1 OPTIMIZING COMPILER  IEL0CE1         SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0CE1 must be assembled with (813/6). Install into phase IEL0CE in
           ETC:PL1OPTLINK (813/3). Required due to change in (813/6).
            
           This subcomponent is included only as a reminder that IEL0CE1 must be
           assembled. There is no MTS update required.
00813/027   PL1 OPTIMIZING COMPILER  IEL0CI1         SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0CI1 must be assembled with LOADMAC (813/8) and (813/6). Install
1                                                                                               SUN SEP 08/96   15:24:55   Page  627
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          into phase IEL0CI in ETC:PL1OPTLINK (813/3). Assembly required due to change
           in (813/6).
            
           This subcomponent is included only as a reminder that IEL0CI1 must be
           assembled. There is no MTS update required.
00813/028   PL1 OPTIMIZING COMPILER  IEL0CR          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=CR.UP                              
            5.0T3   948  PL1_OPTIMIZING_COMPILER.I.UC.030   1 LINE     36    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:16:53
            5.0T8   327                       
0          *CDUPDATE (1036) input for source IEL0CR. Assemble with (813/6) and (813/8).
           Install into phase IEL0CA in ETC:PL1OPTLINK (813/3).
00813/029A  PL1 OPTIMIZING COMPILER  IEL0EA1         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=EA1.UP                             
            5.1T2   470  PL1_OPTIMIZING_COMPILER.I.UC.029   1 LINE     63    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:42
0          *CDUPDATE (1036) input for source IEL0EA1. Assemble with (813/6). Install
           into phase IEL0EA in ETC:PL1OPTLINK (813/3).
00813/030A  PL1 OPTIMIZING COMPILER  IEL0EA2         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=EA2.UP                             
            5.1T2   471  PL1_OPTIMIZING_COMPILER.I.UC.030   1 LINE     68    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:43
0          *CDUPDATE (1036) input for source IEL0EA2. Assemble with (813/6). Install
           into phase IEL0EA in ETC:PL1OPTLINK (813/3).
00813/031A  PL1 OPTIMIZING COMPILER  IEL0EA3         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=EA3.UP                             
            5.1T2   472  PL1_OPTIMIZING_COMPILER.I.UC.031   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:44
0          *CDUPDATE (1036) input for source IEL0EA3. Assemble with (813/6). Install
           into phase IEL0EA in ETC:PL1OPTLINK (813/3).
00813/032C  PL1 OPTIMIZING COMPILER  IEL0EE1         SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0EE1 needs to be assembled to kill a fetch protect in XBRIC
           routines. Install into phase IEL0EE. Requires the (813/6) macro library.
00813/033C  PL1 OPTIMIZING COMPILER  IEL0EI          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0EI needs to be assembled to kill a fetch protect in XBRIC
           routines. Install into phase IEL0EI. Requires the (813/6) macro library.
00813/034C  PL1 OPTIMIZING COMPILER  IEL0IA          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0IA needs to be assembled to kill a fetch protect in XBRIC
           routines. Install into phase IEL0IA. Requires the (813/6) macro library.
00813/035C  PL1 OPTIMIZING COMPILER  IEL0ID          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0ID needs to be assembled to kill a fetch protect in XBRIC
           routines. Install into phase IEL0ID. Requires the (813/6) macro library.
1                                                                                               SUN SEP 08/96   15:24:55   Page  628
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00813/036C  PL1 OPTIMIZING COMPILER  IEL0IE1         SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0IE1 needs to be assembled to kill a fetch protect in XBRIC
           routines. Install into phase IEL0IE. Requires the (813/6) macro library.
00813/037C  PL1 OPTIMIZING COMPILER  IEL0II1         SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0II1 needs to be assembled to kill a fetch protect in XBRIC
           routines. Install into phase IEL0II. Requires the (813/6) macro library.
00813/038   PL1 OPTIMIZING COMPILER  IEL0IK          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0IK must be assembled with (813/6). Install into phase IEL0IK in
           ETC:PL1OPTLINK (813/3). Assembly required due to change in (813/6).
            
           This subcomponent is included only as a reminder that IEL0IK must be
           assembled. There is no MTS update required.
00813/039C  PL1 OPTIMIZING COMPILER  IEL0IM          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Assemble the source.  The object for PTF070 was no good.  Requires the
           (813/6) macro library.
00813/040C  PL1 OPTIMIZING COMPILER  KQ.UP           UC  G          S1516 'PL1 OPTIMIZER' FSNAME=KQ.UP                              
            5.1T2   473  PL1_OPTIMIZING_COMPILER.K.UC.040   1 LINE     65    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:45
0          *CDUPDATE (1036) input for source IEL0KQ.  Assemble with (813/6).  Install
           into phase IEL0KQ in ETC:PL1OPTLINK (813/3).
00813/041   PL1 OPTIMIZING COMPILER  IEL0KV          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=KV.UP                              
            5.0T3   952  PL1_OPTIMIZING_COMPILER.I.UC.035   1 LINE     42    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:15
            5.0T8   331                       
0          *CDUPDATE (1036) input for source IEL0KV. Assemble with (813/6). Install into
           phase IEL0KV in ETC:PL1OPTLINK (813/3).
00813/042C  PL1 OPTIMIZING COMPILER  IEL0PI          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0PI needs to be assembled to kill a fetch protect in XBRIC
           routines.  Install into phase IEL0PI.  Requires the (813/6) macro library.
00813/043   PL1 OPTIMIZING COMPILER  IEL0OE          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=OE.UP                              
            5.0T3   953  PL1_OPTIMIZING_COMPILER.I.UC.036   1 LINE     66    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:21
            5.0T8   332                       
0          *CDUPDATE (1036) input for source IEL0OE. Assemble with (813/6). Install into
           phase IEL0OE in ETC:PL1OPTLINK (813/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  629
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00813/044C  PL1 OPTIMIZING COMPILER  IEL0OI          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=OI.UP                              
            5.1T2   474  PL1_OPTIMIZING_COMPILER.I.UC.044   1 LINE     61    1 PAGE UM   TIFFANY             MAY  02, 1983  11:26:48
0          *CDUPDATE (1036) input for source IEL0OI.  Assemble with (813/6).
           Install into phase IEL0OI in ETC:PL1OPTLINK (813/3).
00813/045   PL1 OPTIMIZING COMPILER  IEL0PA          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=PA.UP                              
            5.0T3   954  PL1_OPTIMIZING_COMPILER.I.UC.037   1 LINE     60    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:28
            5.0T8   333                       
0          *CDUPDATE (1036) input for source IEL0PA. Assemble with (813/6) and (813/8).
           Install into phase IEL0PA in ETC:PL1OPTLINK (813/3).
00813/046   PL1 OPTIMIZING COMPILER  IEL0PAL2        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=PAL2.UP                            
            5.0T3   955  PL1_OPTIMIZING_COMPILER.I.UC.038   1 LINE     60    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:36
            5.0T8   334                       
0          *CDUPDATE (1036) input for source IEL0PAL2. Assemble with (813/6). Install
           into phase IEL0PAL2 in ETC:PL1OPTLINK (813/3). This deletes a reference to
           IEAXPALL, an extended precision simulator.
00813/047   PL1 OPTIMIZING COMPILER  IEL0PAL3        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=PAL3.UP                            
            5.0T3   956  PL1_OPTIMIZING_COMPILER.I.UC.039   1 LINE     60    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:43
            5.0T8   335                       
0          *CDUPDATE (1036) input for source IEL0PAL3. Assemble with (813/6). Install
           into phase IEL0PAL3 in ETC:PL1OPTLINK (813/3). This deletes a reference to
           IEAXPALL, an extended precision simulator.
00813/048   PL1 OPTIMIZING COMPILER  IEL0PAL5        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=PAL5.UP                            
            5.0T3   957  PL1_OPTIMIZING_COMPILER.I.UC.040   1 LINE     60    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:50
            5.0T8   336                       
0          *CDUPDATE (1036) input for source IEL0PAL5. Assemble with (813/6). Install
           into phase IEL0PAL5 in ETC:PL1OPTLINK (813/3). This deletes a reference to
           IEAXPALL, an extended precision simulator.
00813/049C  PL1 OPTIMIZING COMPILER  QA.UP           UC  G          S1516 'PL1 OPTIMIZER' FSNAME=QA.UP                              
            5.1T2   475  PL1_OPTIMIZING_COMPILER.Q.UC.049   1 LINE     64    1 PAGE UM   TIFFANY             MAY  02, 1983  11:27:12
0          *CDUPDATE (1036) input for the source IEL0QA. Assemble with (813/6).  Install
           into phase IEL0QA in ETC:PL1OPTLINK (813/3).
00813/050C  PL1 OPTIMIZING COMPILER  IEL0QE          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IELOQE needs to be assembled to kill a fetch protect in XBRIC
           routines.  Install into phase IEL0QE.  Requires the (813/6) macro library.
00813/051C  PL1 OPTIMIZING COMPILER  IEL0QI          SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0QI needs to be assembled to kill a fetch protect in XBRIC
           routines.  Install into phase IEL0QI.  Requires the (813/6) macros for
1                                                                                               SUN SEP 08/96   15:24:55   Page  630
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          assembly.
00813/052C  PL1 OPTIMIZING COMPILER  S.UP            UC  G          S1516 'PL1 OPTIMIZER' FSNAME=S.UP                               
            5.1T2   476  PL1_OPTIMIZING_COMPILER.S.UC.052   1 LINE     60    1 PAGE UM   TIFFANY             MAY  02, 1983  11:27:13
0          *CDUPDATE (1036) input for source IEL0S.  Assemble into phases IEL0SA,
           IEL0SC, IEL0SD, IEL0SQ.  Assemble using the (813/6) macros.
00813/053A  PL1 OPTIMIZING COMPILER  IEL0SI          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=SI.UP                              
            5.1T2   477  PL1_OPTIMIZING_COMPILER.I.UC.053   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:27:14
0          *CDUPDATE (1036) input for source IEL0SI. Assemble with (813/6). Install into
           phase IEL0SI in ETC:PL1OPTLINK (813/3).
00813/054   PL1 OPTIMIZING COMPILER  IEL0SM          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=SM.UP                              
            5.0T3   959  PL1_OPTIMIZING_COMPILER.I.UC.042   1 LINE     56    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:17:56
            5.0T8   338                       
0          *CDUPDATE (1036) input for source IEL0SM. Assemble with (813/6). Install into
           phase IE0SM in ETC:PL1OPTLINK (813/3).
00813/055   PL1 OPTIMIZING COMPILER  IEL0UA1         UC  G          S1516 'PL1 OPTIMIZER' FSNAME=UA1.UP                             
            5.0T3   960  PL1_OPTIMIZING_COMPILER.I.UC.043   1 LINE     34    1 PAGE UM   TIFFANY             MAR. 13, 1981  14:18:05
            5.0T8   339                       
0          *CDUPDATE (1036) input for source IEL0UA1. Assemble with (813/6) and (813/8).
           Use (813/13) to generate various compiler phases and then install them into
           ETC:PL1OPTLINK (813/3).
00813/056   PL1 OPTIMIZING COMPILER  IEL0UE1         SA  G        # (NOT DISTRIBUTED)                                               
                                                                                    UM   TIFFANY                                    
0          Source IEL0UE1 must be assembled with (813/6) due to a change in (813/6).
           Install into phase IEL0UE in ETC:PL1OPTLINK (813/3).
            
           This subcomponent is included only as a reminder that IEL0UE1 must be
           assembled. There is no MTS update required.
00813/057C  PL1 OPTIMIZING COMPILER  OPTSYM          SP  G          PL1:OPTSYM.S                                                    
            5.1T2   478  PL1_OPTIMIZING_COMPILER.O.SP.057   1 LINE     76   36 PAGE UM   TIFFANY             JULY 23, 1983  13:36:42
0          A program -- which isn't a part of the compiler -- that reads the
           compiler output listing and produces ASMH-like SYM records for
           debugging.
00813/058C  PL1 OPTIMIZING COMPILER  OPTSYM          O   G          PL1:OPTSYM                                                      
            5.1T2   479  PL1_OPTIMIZING_COMPILER.O.O.058    1 LINE  32767   23 PAGE UM   TIFFANY             JULY 23, 1983  13:36:46
0          Contains a $CONTINUE WITH *PL1OPTLIB (827/5) record.
00814/001A  DUMP TAPE PROCESSING     WRITEUP         P              DUMP:DUMP.DOC                                                   
            5.1T2   480  DUMP_TAPE_PROCESSING.WRIT.P.001    1 LINE     68    4 PAGE UM   STERKEN             JULY 23, 1983  13:36:46
0              At UM, we have a rotating crew of "fire fighters" who 
1                                                                                               SUN SEP 08/96   15:24:55   Page  631
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          are charged with keeping MTS up and running. 
            
               One of the jobs fire-fighters must do is process job-dumps.
           This involves printing job-dump listings, routing them to
           the appropriate person, and releasing dump tapes.  In an attempt
           to organize this work, we've set up user ID "DUMP" as a place
           to keep track of all of this.
            
               User ID "DUMP" has a "known" password: "DUMP".  Its sigfile
           uses *CKID (680) to screen interactive users, and in batch mode
           it always runs DUMP:DUMP.BATCH (814/10) which prints listings
           of all recent job-dumps.
            
               Whenever a job-dump has occurred, the operators use operator
           job *DMP (814/8) to log the dump.  *DMP runs DUMP:DUMPER (814/3),
           which logs the dump and submits a *BATCH* job to print the listing.
           The receipt number is placed in file DUMP:TAPES (814/7). 
            
               This subcomponent contains further details on the processing of
           dump tapes and fire-fighting duties in general.
            
0          Referenced by comments of: 814/2, 814/9 
00814/002A  DUMP TAPE PROCESSING     DUMPER          SA  G          DUMP:DUMPER.S                                                   
            5.1T2   481  DUMP_TAPE_PROCESSING.DUMP.SA.002   1 LINE     72    4 PAGE UM   STERKEN             JULY 23, 1983  13:36:48
0          Program used to print jobdumps via MTS:PRINTDUMP (400/17). See (814/1) for
           details. Copies *SENSEDSECT (3025) and *GDINFODSECT (594).
0          Referenced by comments of: 814/3 
00814/003A  DUMP TAPE PROCESSING     DUMPER          OC  G          DUMP:DUMPER                                                     
            5.1T2   482  DUMP_TAPE_PROCESSING.DUMP.OC.003   1 LINE   3332    4 PAGE UM   STERKEN             JULY 23, 1983  13:36:49
                         DUMP:DUMPER          
0          Object of (814/2). Has a $CONTINUE WITH DUMP:DMPMSG (814/5) record.
0          Referenced by comments of: 814/1, 814/4, 814/6, 814/7, 814/8 
00814/004A  DUMP TAPE PROCESSING     DMPMSG          SA  G          DUMP:DMPMSG.S                                                   
            5.1T2   483  DUMP_TAPE_PROCESSING.DMPM.SA.004   1 LINE     85    3 PAGE UM   STERKEN             JULY 23, 1983  13:36:49
0          A subroutine used by (814/3) to read job-dump tape headers. Copies
           *CNFGINFODSECT (654). Assemble using the PRINTDUMP macros (400/16).
00814/005A  DUMP TAPE PROCESSING     DMPMSG          OC  G          DUMP:DMPMSG                                                     
            5.1T2   484  DUMP_TAPE_PROCESSING.DMPM.OC.005   1 LINE     80    2 PAGE UM   STERKEN             JULY 23, 1983  13:36:49
                         DUMP:DMPMSG          
0          Referenced by comments of: 814/3, 814/10 
1                                                                                               SUN SEP 08/96   15:24:55   Page  632
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00814/006   DUMP TAPE PROCESSING     LOG             D            # DUMP:LOG                                                        
                                                                                    UM   STERKEN                                    
                         DUMP:LOG@E           
0          All dumps are logged in this file by (814/3).
00814/007   DUMP TAPE PROCESSING     LOG             D            # DUMP:TAPES                                                      
                                                                                    UM   STERKEN                                    
                         DUMP:TAPES@E         
0          File used by (814/3) to log a line for each active, unreleased dump tape.
0          Referenced by comments of: 814/1 
00814/008   DUMP TAPE PROCESSING     *DMP            C   G          *DMP                                                            
            5.0T3   966  DUMP_TAPE_PROCESSING.*DMP.C.008    1 LINE     51    1 PAGE UM   STERKEN             JULY 03, 1981  20:19:31
            5.0T8   345  *DMP                 
0          Operator job which runs (814/3) to log job dumps.
0          Referenced by comments of: 814/1 
00814/009A  DUMP TAPE PROCESSING     BATCH DUMP      SA  G          DUMP:DUMP.BATCH.S                                               
            5.1T2   485  DUMP_TAPE_PROCESSING.BATC.SA.009   1 LINE    144    4 PAGE UM   STERKEN             JULY 23, 1983  13:36:50
0          Program to print job dumps via MTS:PRINTDUMP (400/17).  It is run from
           the sigfile (814/12) of the user ID "DUMP" in batch mode.  See (814/1)
           for details.
00814/010A  DUMP TAPE PROCESSING     BATCH DUMP      OC  G          DUMP:DUMP.BATCH                                                 
            5.1T2   486  DUMP_TAPE_PROCESSING.BATC.OC.010   1 LINE     80    5 PAGE UM   STERKEN             JULY 23, 1983  13:36:50
                         DUMP:DUMP.BATCH      
0          Contains a $CONTINUE WITH DUMP:DMPMSG (814/5) record.
0          Referenced by comments of: 814/1, 814/11 
00814/011A  DUMP TAPE PROCESSING     BATCH DUMP      D              DUMP:DUMP.CMDS                                                  
            5.1T2   487  DUMP_TAPE_PROCESSING.BATC.D.011    1 LINE     68    1 PAGE UM   STERKEN             JULY 23, 1983  13:36:50
                         DUMP:DUMP.CMDS       
0          Contains commands for MTS:PRINTDUMP (400/17) used by (814/10). This file
           should not be renumbered.
00814/012A  DUMP TAPE PROCESSING     SIGFILE         C              DUMP:SIGFILE                                                    
            5.1T2   488  DUMP_TAPE_PROCESSING.SIGF.C.012    1 LINE     29    1 PAGE UM   STERKEN             JULY 23, 1983  13:36:50
                         DUMP:SIGFILE         
0          Sigfile for user ID "DUMP".
0          Referenced by comments of: 814/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  633
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00815/001A  SIDEBYSIDE               SBSPROG         SG  G          S0027 DISTRB FSNAME=SBSPROG                                     
            5.1T2   489  SIDEBYSIDE.SBSPROG.SG.001          1 LINE    117    3 PAGE UM   ENGLE     ENGLE     FEB. 07, 1983  16:44:46
0          Program to place consecutive print pages in a side-by-side format, taking
           logical carriage control into account.
0          Referenced by comments of: 815/4, 815/7 
00815/002A  SIDEBYSIDE               SBSPROG         UC             S0027 DISTRB FSNAME=SBSPROGUPD                                  
            5.1T2   490  SIDEBYSIDE.SBSPROG.UC.002          1 LINE    117    1 PAGE UM   ENGLE     ENGLE     FEB. 07, 1983  16:44:52
0          Updates source from previous regular distribution to current distribution.
0          Referenced by comments of: 815/7 
00815/003A  SIDEBYSIDE               SBSPROG         OC  G          S0027 DISTRB FSNAME=SBSP                                        
            5.1T2   491  SIDEBYSIDE.SBSPROG.OC.003          1 LINE     80    4 PAGE UM   ENGLE     ENGLE     FEB. 07, 1983  16:45:14
00815/004A  SIDEBYSIDE               SIDBYSID        SG  G          S0027 DISTRB FSNAME=SIDBYSID                                    
            5.1T2   492  SIDEBYSIDE.SIDBYSID.SG.004         1 LINE    114    5 PAGE UM   ENGLE     ENGLE     AUG. 26, 1982  12:14:36
0          Subroutine called by SBSPROG (815/1) to do most of the work.
00815/005A  SIDEBYSIDE               SIDBYSID        UC  G          S0027 DISTRB FSNAME=SIDBYSIDUPD                                 
            5.1T2   493  SIDEBYSIDE.SIDBYSID.UC.005         1 LINE     68    1 PAGE UM   ENGLE     ENGLE     AUG. 26, 1982  12:14:43
0          Updates source from previous regular distribution to current distribution.
00815/006A  SIDEBYSIDE               SIDBYSID        OC  G          S0027 DISTRB FSNAME=SBS                                         
            5.1T2   494  SIDEBYSIDE.SIDBYSID.OC.006         1 LINE     80    6 PAGE UM   ENGLE     ENGLE     AUG. 26, 1982  12:16:47
00815/007A  SIDEBYSIDE                               OE  G          *SIDEBYSIDE                                                     
            5.1T2   495  SIDEBYSIDE..OE.007                 1 LINE   9588    4 PAGE UM   ENGLE               JULY 23, 1983  13:37:33
                         *SIDEBYSIDE          
0          Linkeditted version of SBSPROG (815/1) and SIDBYSID (815/2).
00816/001A  CLOCKWATCHER             MASTER TASK     SA  O          W116:CLK.REL.2                                                  
            5.1T2   496  CLOCKWATCHER.MASTER_TASK.SA.001    1 LINE     95   20 PAGE UM   YOUNG               JULY 23, 1983  13:37:33
0          This is the Clockwatcher task. It is used to start up specific tasks
           at specific times.
            
           Requires the (816/15) macro library and SYS:CLK.MASTER (816/7),
           SYS:CLK.DAILY (816/8), SYS:CLK.UNATTEND (816/9), SYS:CLK.AUDIT
           (816/10) and SYS:CLK.PGNT (816/11).
0          Referenced by comments of: 798/110, 816/2, 816/3 
00816/002A  CLOCKWATCHER             AUTOSTART       SA  O          W116:AUTO.REL.2                                                 
            5.1T2   497  CLOCKWATCHER.AUTOSTART.SA.002      1 LINE     73   77 PAGE UM   YOUNG               JULY 23, 1983  13:37:34
0          This is the submission program for the Clockwatcher. Besides the files
           CLK.MASTER, CLK.DAILY, CLK.UNATTEND, CLK.AUDIT, and CLK:PGNT, which
1                                                                                               SUN SEP 08/96   15:24:55   Page  634
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          are required for the master task (816/1), AUTOSTART requires:
            
                 CLK.HELP - (816/6)
                 CLK.PRIV - (816/12)
                 W116:AUTO.DOC.C - (816/17)
            
           This file does not need to be permitted in any special way, but it
           should belong to the same ID (at UM, we use SYS.) as the files
           required by the master task. When the system first comes up, only the
           owner of CLK.PRIV will have full AUTOSTART capabilities.
            
           Requires the (816/15) macro library and *GDINFODSECT (594).
0          Referenced by comments of: 816/3, 816/16, 816/17 
00816/003A  CLOCKWATCHER             COMMON RTNS     SA  O          W116:AC.REL.2                                                   
            5.1T2   498  CLOCKWATCHER.COMMON_RTNS.SA.003    1 LINE     73   37 PAGE UM   YOUNG               JULY 23, 1983  13:37:38
0          Source for routines common to autostart (816/2) and Clockwatcher (816/1).
           Requires the (816/15) macro library, *GDINFODSECT (594/1), and *SENSEDSECT
           (3025).
00816/004A  CLOCKWATCHER             MASTER TASK     OE  O          SYS:CLOCKWATCHER                                                
            5.1T2   499  CLOCKWATCHER.MASTER_TASK.OE.004    1 LINE  32767   23 PAGE UM   YOUNG               JULY 23, 1983  13:37:40
                         SYS:CLOCKWATCHER     
0          Contains a linkedited version of the UM time routines (808).  Should have a 
           PKEY=*AUTOSTART.
0          Referenced by comments of: 816/13, 816/14 
00816/005A  CLOCKWATCHER             AUTOSTART       OE  O          *AUTOSTART                                                      
            5.1T2   500  CLOCKWATCHER.AUTOSTART.OE.005      1 LINE  32767   32 PAGE UM   YOUNG               JULY 23, 1983  13:37:41
                         *AUTOSTART           
0          Contains a linkedited version of the UM time routines (808).  Should have a 
           PKEY=*AUTOSTART.
0          Referenced by comments of: 816/12, 844/29, 844/30, 864/1, 865/1 
00816/006A  CLOCKWATCHER             AUTOSTART       M              SYS:CLK.HELP                                                    
            5.1T2   501  CLOCKWATCHER.AUTOSTART.M.006       1 LINE     71   12 PAGE UM   YOUNG               JULY 23, 1983  13:37:42
                         SYS:CLK.HELP         
0          File containing messages used by *AUTOSTART's HELP facility. Should be
           permitted READ to PKEY=*AUTOSTART. References files "W116:AUTO.DOC.C"
           (816/17) and "W116:CCMEMO.444.C" (816/16). These names should be
           edited when they are changed locally.
0          Referenced by comments of: 816/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  635
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00816/007C  CLOCKWATCHER             SYS:CLK.MASTER  D   O        # SYS:CLK.MASTER                                                  
                                                                                    UM   YOUNG                                      
                         SYS:CLK.MASTER@E     
0          Holds run information for jobs controlled by the clockwatcher.
0          Referenced by comments of: 816/1 
00816/008C  CLOCKWATCHER             SYS:CLK.DAILY   D   O        # SYS:CLK.DAILY                                                   
                                                                                    UM   YOUNG                                      
                         SYS:CLK.DAILY@E      
0          Holds run schedules for the current day.
0          Referenced by comments of: 816/1 
00816/009C  CLOCKWATCHER             CLK.UNATTEND    D   O        # SYS:CLK.UNATTEND                                                
                                                                                    UM   YOUNG                                      
                         SYS:CLK.UNATTEND@E   
0          Holds run schedules for jobs delayed due to anattended mode.
0          Referenced by comments of: 816/1 
00816/010C  CLOCKWATCHER             SYS:CLK.AUDIT   D   O        # SYS:CLK.AUDIT                                                   
                                                                                    UM   YOUNG                                      
                         SYS:CLK.AUDIT@E      
0          Traces the clockwatcher's actions.
0          Referenced by comments of: 816/1 
00816/011C  CLOCKWATCHER             SYS:CLK.PGNT    D   O        # SYS:CLK.PGNT                                                    
                                                                                    UM   YOUNG                                      
                         SYS:CLK.PGNT@E       
0          Dump file used in case of Clockwatcher PGNT.
0          Referenced by comments of: 816/1 
00816/012C  CLOCKWATCHER             SYS:CLK.PRIV    D   O        # SYS:CLK.PRIV                                                    
                                                                                    UM   YOUNG                                      
                         SYS:CLK.PRIV@E       
0          Used to give users access to special features of the AUTOSTART program
           (816/5). When the system first comes up, only the owner of CLK.PRIV
           will have full AUTOSTART capabilities.  Version on the test pack will
           be permitted like it is at UM.
0          Referenced by comments of: 816/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  636
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00816/013A  CLOCKWATCHER             *CLK            C              *CLK                                                            
            5.1T2   502  CLOCKWATCHER.?CLK.C.013            1 LINE     51    1 PAGE UM   YOUNG               JULY 23, 1983  13:37:43
                         *CLK                 
0          Operator file containing commands used to start up the Clockwatcher (816/4).
00816/014A  CLOCKWATCHER             *CLR            C              *CLR                                                            
            5.1T2   503  CLOCKWATCHER.?CLR.C.014            1 LINE     35    1 PAGE UM   YOUNG               JULY 23, 1983  13:37:43
                         *CLR                 
0          Operator file containing commands used to restart the Clockwatcher (816/4).
00816/015A  CLOCKWATCHER             MACLIB          SM  O          W116:AC.MACRO                                                   
            5.1T2   504  CLOCKWATCHER.MACLIB.SM.015         1 LINE     72    7 PAGE UM   YOUNG               JULY 23, 1983  13:37:43
0          Copy section globals contain some set symbols you may wish to change:
            
              &SYSID   - Owner of Clockwatcher
              &SYSPROJ - Project ID of Clockwatcher's owner
              &CLKID   - Person who gets informed of *PRINT* number of
                         audit file when it's dumped
              &DOCFILE - Online documentation file for special features
              &FIGHTER - Controls whether or not special persons get
                         informed of Clockwatcher problems
              &MONITOR - Name of file that contains, on line 1, persons'
                         names, separated by commas, who get informed if
                         clockwatcher encounters certain problems.
0          Referenced by comments of: 816/1, 816/2, 816/3 
00816/016A  CLOCKWATCHER             AUTOSTART       P              W116:CCMEMO.444.C                                               
            5.1T2   505  CLOCKWATCHER.AUTOSTART.P.016       1 LINE     69    8 PAGE UM   YOUNG               JULY 23, 1983  13:37:44
0          Documentation for the AUTOSTART (816/2) program.  Should be permitted
           READ OTHERS.
            
           NOTE:  This is not CCMemo 444.
0          Referenced by comments of: 816/6 
00816/017A  CLOCKWATCHER             AUTOSTART       P              W116:AUTO.DOC.C                                                 
            5.1T2   506  CLOCKWATCHER.AUTOSTART.P.017       1 LINE     69   11 PAGE UM   YOUNG               JULY 23, 1983  13:37:45
0          Additional documentation for the AUTOSTART (816/2) program.
           Should be permitted UNLIM SYS&PKEY=*AUTOSTART.
0          Referenced by comments of: 816/2, 816/6 
00817/001   PAGE PRINTER                                          # (OBSOLETE)                                                      
            5.0T3   984  PAGE_PRINTER..SQ.001               1 LINE    221    7 PAGE UM                       JULY 03, 1981  20:20:13
            5.0T8   363                       
0          Obsolete program to send copy via the Merit Network to Wayne State for
           printing on the Xerox 9700 Page Printer.
1                                                                                               SUN SEP 08/96   15:24:55   Page  637
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00818/001A  PATHDEVICE                               SA  G          DMGR:PATHDEV(-10000,-1)                                         
            5.1T2   507  PATHDEVICE..SA.001                 1 LINE     71    3 PAGE UM   HELFFRICH           JULY 23, 1983  13:37:45
0          Subroutine which will successively return all paths to a device, and
           whether each path is online or not. Used by the Disk Manager (769) and
           SSRTN (413/1). Contains commands which may be $SOURCEd to for
           assembly. Requires COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3).
           Assemble using COPY:DM.MACROS (769/29), COPY:CC.MACROS (1054/3),
           COPY:FILE.MACROS (482/45), COPY:MNTR.MACROS (1058/30), and
           COPY:MISC.MACROS (728/1).
0          Referenced by comments of: 413/1 
00818/002A  PATHDEVICE                               UC  G          DMGR:PATHDEV(1000)                                              
            5.1T2   508  PATHDEVICE..UC.002                 1 LINE     68    1 PAGE UM   HELFFRICH           JULY 23, 1983  13:37:46
0          Update to be applied to previously distributed source to yield current
           source.
00818/003A  PATHDEVICE                               OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   HELFFRICH                                  
0          Object part of Resident System (468).
00819/001   T11 JOB                                  SA  G          S1560 5.0T3 VLO FSNAME=T11_JOB..SA.001(1)                    990
            5.0T3   990  T11_JOB..SA.001                    1 LINE     70    3 PAGE UM   MTA                 APR. 25, 1981  01:23:41
            5.0T8   369                       
0          Job program to load a 3211 character set and FCB for a T11 print train. 
           Accepts same parameters as P11 (1027).
00819/002   T11 JOB                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTA                                        
0          Object part of Resident System (468).
00820/001A  PM2                      MACROS          CM  G          ETC:PM2.MAC                                                     
            5.1T2   509  PM2.MACROS.OE.001                  1 LINE    201    4 PAGE UM   MTA                 JULY 23, 1983  13:37:46
                         ETC:PM2.MAC          
0          PM2 is STC's program to format and print disk, tape, and 4305 errors.  It is
           copyrighted and therefore cannot be distributed.  These components have been
           used with version 3.2 of PM2. 
0          Referenced by comments of: 621/8, 655/4 
00820/002A  PM2                      LIBRARY         OL  G        # ETC:PM2.LIB.3.2                                                 
                                                                                    UM   MTA                                        
0          Load module for version 3.2 of PM2. Produced by MTS link editor. Not
           distributed due to copyright restrictions.
1                                                                                               SUN SEP 08/96   15:24:55   Page  638
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00820/003A  PM2                      HISTORY FILE    D            # ETC:PM2.H.3.2                                                   
                                                                                    UM   MTA                                        
                         ETC:PM2.H.3.2@E      
0          VSS simulated BDAM file that is used to contain a historical record of the
           last 3 months of errors for each device known to PM2.  Built by STCPM2FE
           using information about the local installation's configuration.
00820/004A  PM2                      HISTORY FILE    D            # ETC:PM2.H.3.2.O                                                 
                                                                                    UM   MTA                                        
                         ETC:PM2.H.3.2.O@E    
0          Previous history file.  PM2 maintains a three-level push-down
           of history files.  This is level 2.
00820/005A  PM2                      HISTORY FILE    D            # ETC:PM2.H.3.2.VO                                                
                                                                                    UM   MTA                                        
                         ETC:PM2.H.3.2.VO@E   
0          Level 3 of the history file push-down.
00820/006A  PM2                      VOLUME HISTORY  D            # ETC:PM2.V.3.2                                                   
                                                                                    UM   MTA                                        
                         ETC:PM2.V.3.2@E      
0          File containing a record of tape errors by tape volume.  Top
           level of a three-level push-down.
00820/007A  PM2                      VOLUME HISTORY  D            # ETC:PM2.V.3.2.O                                                 
                                                                                    UM   MTA                                        
                         ETC:PM2.V.3.2.O@E    
0          Level 2 of the push-down.
00820/008A  PM2                      VOLUME HISTORY  D            # ETC:PM2.V.3.2.VO                                                
                                                                                    UM   MTA                                        
                         ETC:PM2.V.3.2.VO@E   
0          Level 3 of the push-down.
00820/009A  PM2                      UM CONFIG       D              MTA:PM2.CONFIG                                                  
            5.1T2   510  PM2.UM_CONFIG.D.009                1 LINE     48    1 PAGE UM   MTA                 JULY 23, 1983  13:37:47
0          Input to STCPM2FE to produce the PM2 history file for the UM configuration.
00820/010A  PM2                      CNVTEREP CTL    D              ETC:PM2.CTL                                                     
            5.1T2   511  PM2.CNVTEREP_CTL.D.010             1 LINE     88    1 PAGE UM   MTA                 JULY 23, 1983  13:37:47
                         ETC:PM2.CTL          
0          Contains 3 lines read by CNVTEREP (655/5) to tell it how and what to convert
           to LOGREC format for PM2.
1                                                                                               SUN SEP 08/96   15:24:55   Page  639
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00820/011A  PM2                      OBJECT          OC           # S1657 'PM2 3.2' FMT=FS(3200,80) POSN=*4*                        
                                                                                    UM   MTA                                        
0          Object for PM2.  Not distributed due to copyright restrictions.
00820/012A  PM2                      OS JCL                       # S1657 'PM2 3.2' FMT=FS(3200,80) POSN=*5*                        
                                                                                    UM   MTA                                        
0          OS JCL for running PM2 in OS/VS.  Not distributed due to copyright restrictions.
00820/013A  PM2                      WRITEUP         WF             MTA:PM2.W                                                       
            5.1T2   512  PM2.WRITEUP.WF.013                 1 LINE     69    3 PAGE UM   MTA                 JULY 23, 1983  13:37:48
0          Instructions for running PM2 in MTS.
00821/001A  USERDIRECTORY            PLUS SOURCE     SQ  O          W494:UD.SQ                                                      
            5.1T2   513  USERDIRECTORY.PLUS_SOURCE.SQ.001   1 LINE     86   93 PAGE UM   TIFFANY             JULY 23, 1983  13:37:48
0          This file is all of the PLUS sources for the *USERDIRECTORY
           program (821/15) and the search subroutines (821/17).  It is 
           recommended that it be manipulated with the Program Management 
           Facility, or PMF (810), using the project file in (821/25).
            
           To compile, simply issue the following PMF command:
                    COMPILE PLUSROUTINES
           The PLUS macro libraries needed are:
                    UD.SQL (821/3)
                    COPY:MTS*SQL (344/4)
                    COPY:FILE*SQL (482/65)
                    *PLUS.SOURCELIB (1042/5)
                    *CLPARSELIB (1076/11)
            
           This list of PMF modules in this file is described in lines 1001 through 
           1999.  These lines can be referenced as a PMF module S/INDEX_NOTES.
            
           *************************************************************************
           D5.0C version:
            
           A new PMF module has been added to this file: S/DATE_CONVERSION (in lines
           65001 through 65999).  The purpose is to convert dates of the form
           "02-11-83" to readable dates "Feb11/83" and vice versa.
            
           This requires a change to the MTS subroutine CHECKPW with an optional
           parameter, expiration date.  Changes are indicated in an update to
           MTSS:USUB/UPD (638/2) and to a macro Checkpw_Procedure_Type in the file
           COPY:MTS*SQL (344/4).
            
           Here is a list of changes already made to the program and the routines:
            
           (1)  Dates for CREATEDATE, LASTMODDATE, and LASTSETDATE are now
                shown as mmmdd/yy", e.g., Feb11/83.
           (2)  New versions of *USERDIRECTORY and *UDROUTINES no longer read the 
                accounting records just to check if a signon ID exists.  Another
                routine CHECKPW is called instead.
1                                                                                               SUN SEP 08/96   15:24:55   Page  640
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (3)  Master directory managers can display name entries showing owner
                IDs that are either expired or missing.
           (4)  MURDER command no longer exists.  It has been renamed PURGE.
           (5)  When an owner ID of a name entry is changed, the owner in the
                access line is also updated.
           (6)  A couple of commands such as HIGH_WATER have been eliminated.
           (7)  When issuing $SET NAME=..., LASTMODDATE is no longer updated.
           (8)  PURGE command (formerly MURDER) now really eliminates the name
                IDs.  Previously, some name information lines were shortenend
                rather than deleted.
           (9)  Various typos on output lines were corrected.
           (10) Demand_perfection control bit renamed Verify_Name.  Two new control 
                bits, Exact_Match and Only_One_Nameid, have been added.
           (11) New UDGET item COMPLETENAME, which returns the full names as well
                as all nicknames has been added.
           (12) An UDSRCH bug that returned a group belonging to an owner ID
                even if Required_Individual bit is on has been fixed.
           (13) A group can now have just one name.  Previously, at least two names
                were required.
           (14) A bug in READ_VAR macro that caused some phonetics or IDs to be
                replaced by new phonetics or IDs has been fixed.  Previously, due
                to missing phonetics, users were able to add duplicate names.
           (15) A new entry PHCODE has been added to PHONCODE for the sake of
                non-PLUS programs.
           (16) There were some addressing interrupts in the $MESSAGESYSTEM 
                invoking UD routines after $UNLOAD or $RUN command.  Thanks 
                especially to impertinent PLUS statements "%INCLUDE (GETSPACE):",
                which should be removed from both the source and the source 
                library.
           (17) A new program CHKDIR, which can check both master directory and
                name libraries, has been added.
           (18) A new subroutine UDSCAN, written in assembly language, is available
                for the dead file stuff.
            
           Some forthcoming changes which we'd like to add but still don't have
           time:
            
           (1)  Add "DISPLAY EACH GROUP", to show all groups.  Currently, one
                must use "DISPLAY EACH NAMEID=$?" for the master directory or
                "DISPLAY EACH NAMEID=_?" for the name libraries.
           (2)  Convert all the local times to GMT times.  To my knowledge,
                subroutine TIMEZONM isn't satisfactory.
           (3)  Add a subcommand mode for
                      Do you mean "John Doe"?
                indicating the complete name, business phone, business address,
                and owner ID.
           (4)  Scrap the abbreviation scheme.  *USERDIRECTORY considers
                abbreviations as single letters optionally followed by a period.
                "Mr.", "Dr.", etc. don't qualify as abbreviations.  In addition,
                it is also possible two duplicate names can be entered in the
                *USERDIRECTORY database:  "John A. Doe" and "John A Doe".
           (5)* Allow a user to change the owner when the old owner ID is either
                expired or missing.  (* - Done as of D5.1)
           (6)  Incorporate remote names as "foreigners".
1                                                                                               SUN SEP 08/96   15:24:55   Page  641
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          (7)  P=W? is printed as P=W?$. thanks to the parser *ccid*.
           (8)  Allow relative operators for CREATEDATE, LASTMODDATE, LASTSETDATE,
                etc.  Someday, the deadfile owner may issue:
                   PURGE DESTROYED LASTSETDATE<=Jan01/82
            
           ************************************************************************
           D5.1 version:
            
           (1) A new PMF module has been added to this file:
                   S/CMD_CLAIM (lines 66001 - 66999)
               It is useful for users to claim ownership of name entries
               belonging to expired signon IDs.
           (2) An alias can now point to a group in the master directory.
           (3) The FIND command is now a synonym for DISPLAY.
           (4) Two more help texts, CLAIM and DUPLICATES have been added.
           (5) All known bugs have been fixed.
           ************************************************************************
0          Referenced by comments of: 821/3, 821/19, 846/15 
00821/002C  USERDIRECTORY            INSTALL WRUP    WF  G          W494:INSTALL.WF                                                 
            5.1T2   514  USERDIRECTORY.INSTALL_WRU.WF.002   1 LINE     70   10 PAGE UM   TIFFANY             JULY 23, 1983  13:37:52
0          Contains instructions for installing and maintaining *USERDIRECTORY
           as well as *UDROUTINES.
00821/003A  USERDIRECTORY            DECLARATIONS    SQ  O          W494:UD.SQL                                                     
            5.1T2   515  USERDIRECTORY.DECLARATION.SQ.003   1 LINE     71   22 PAGE UM   TIFFANY             JULY 23, 1983  13:37:53
0          This contains the PLUS source library for the PLUS routines 
           in (821/1).  It can be manipulated using the PMF (810) and the 
           project file (821/25).
            
           Contains a "$CONTINUE WITH PARSETYPES RETURN" (821/4).
            
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/1, 821/4 
00821/004A  USERDIRECTORY            PARSER TYPES    SQ  O          W494:PARSETYPES                                                 
            5.1T2   516  USERDIRECTORY.PARSER_TYPE.SQ.004   1 LINE     70    3 PAGE UM   TIFFANY             JULY 23, 1983  13:37:54
0          This file contains the declarations produced by putting PMF modules 
           CMD_SYNTAX (821/7) and NAME_SYNTAX (821/8) through the Parser 
           (1076).  This file is referenced by subcomponent (821/3).  It 
           contains the declarations for the semantic actions performed in the 
           name-lookup routines and the command language parsers.
            
           Lines 1,999 refer to CMD_SYNTAX and lines 1001,1999 refer to
           NAME_SYNTAX.
1                                                                                               SUN SEP 08/96   15:24:55   Page  642
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/3, 821/7, 821/8 
00821/005C  USERDIRECTORY            UD PLUS SOULIB  SQ  G          W494:PLUS.SQL                                                   
            5.1T2   517  USERDIRECTORY.UD_PLUS_SOU.SQ.005   1 LINE     68    3 PAGE UM   TIFFANY             JULY 23, 1983  13:37:54
0          Several macros and definitions are copied from *PLUS.SOURCELIB (1042/5)
           with various %INCLUDE statements removed so that instead of external
           references, system subroutines are referenced from either STDTV or
           CLSTV.
00821/006A  USERDIRECTORY            PHONCODE        SA  O          W494:PHONCODE.S                                                 
            5.1T2   518  USERDIRECTORY.PHONCODE.SA.006      1 LINE     72    6 PAGE UM   TIFFANY             JULY 23, 1983  13:37:54
0          This is the source for the string-to-phonetic-code conversion 
           routine. Accessible through the PMF (810) as the module 
           PHONCODE/CURR.
            
           To assemble, simply issue the PMF command:
                 ASSEMBLE PHONCODE
            
           The object is in file UD.LIB (821/13).
0          Referenced by comments of: 821/39 
00821/007A  USERDIRECTORY            COMMAND SYNTAX  S   O          W494:CMDSYN.S                                                   
            5.1T2   519  USERDIRECTORY.COMMAND_SYN.S.007    1 LINE     68   12 PAGE UM   TIFFANY             JULY 23, 1983  13:37:54
0          This is the *CLPARSER (1076) source for the command language
           of *USERDIRECTORY (821/15).  It is the PMF module 
           CMD_SYNTAX/CURR.
            
           Issue the PMF command:
                 PARSEGEN CMD_SYNTAX
            
           This will invoke *CLPARSEGEN with input in CMD_SYN.S (821/7)
           with two outputs, an object in file -LOAD and PLUS declarations
           in file PARSERTYPES (821/4).  The object is then put into file
           UD.LIB (821/13) by *OBJUTIL (721).
            
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/4, 821/7 
1                                                                                               SUN SEP 08/96   15:24:55   Page  643
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00821/008A  USERDIRECTORY            NAME SYNTAX     S   O          W494:NAMESYN.S                                                  
            5.1T2   520  USERDIRECTORY.NAME_SYNTAX.S.008    1 LINE     71    2 PAGE UM   TIFFANY             JULY 23, 1983  13:37:55
0          This is the *CLPARSER (1076) source for the routine which parses 
           names in *USERDIRECTORY (821/15) and for the CLS/user-callable 
           routines (821/17).  This is the PMF module NAME_SYNTAX.
            
           Issue the following PMF command:
                PARSEGEN NAME_SYNTAX
            
           This will invoke *CLPARSEGEN with input as this subcomponent and 
           two outputs, an object in file -LOAD and PLUS declarations in
           file PARSERTYPES (821/4).  The object is placed in file UD.LIB
           (821/13) by *OBJUTIL (721).
0          Referenced by comments of: 821/4 
00821/009A  USERDIRECTORY            CHROFFCT        SA  O          W494:CHROFFCT.S                                                 
            5.1T2   521  USERDIRECTORY.CHROFFCT.SA.009      1 LINE     68    2 PAGE UM   TIFFANY             JULY 23, 1983  13:37:55
0          This routine counts the number of different characters given
           two name strings.
            
           To assemble, just issue the PMF command:
                 ASSEMBLE CHROFFCT
            
           The object is placed in the file UD.LIB (821/13) by the program
           *OBJUTIL (721).
00821/010A  USERDIRECTORY            UDSYMS          SA  O          W494:UDSYMS.S                                                   
            5.1T2   522  USERDIRECTORY.UDSYMS.SA.010        1 LINE     80    4 PAGE UM   TIFFANY             JULY 23, 1983  13:37:56
0          Contains the UDSYMS transfer vector and interface code for each of 
           the name-search subroutines.  This is the PMF module UDSYMS/CURR.
            
           To assemble, just issue the following command:
                  ASSEMBLE UDSYMS
            
           The object is placed by the program *OBJUTIL (721) in the file
           UD.LIB (821/13). 
            
           Requires *CNFGINFODSECT (645/1).
            
           **********************************************************************
           D5.1 version:
            
           Changed to do the actual unlinking of UD stuff and add the code to 
           call FPSECTX.
           **********************************************************************
00821/011A  USERDIRECTORY            SETATTN         SA  O          W494:SETATTN.S                                                  
            5.1T2   523  USERDIRECTORY.SETATTN.SA.011       1 LINE     68    1 PAGE UM   TIFFANY             JULY 23, 1983  13:37:56
0          This contains an attention-interrupt handling routine for use by 
1                                                                                               SUN SEP 08/96   15:24:55   Page  644
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          both the command processor for *USERDIRECTORY (821/15) and the 
           name-search subroutines (821/17).  This is the PMF module
           SETATTN.
            
           To assemble, just issue the following PMF command:
                 ASSEMBLE SETATTN
            
           The object is placed by the program *OBJUTIL (721) in the file
           UD.LIB (821/13).
00821/012A  USERDIRECTORY            STORDUMP        SA  O          W494:STORDUMP.S                                                 
            5.1T2   524  USERDIRECTORY.STORDUMP.SA.012      1 LINE     68    4 PAGE UM   TIFFANY             JULY 23, 1983  13:37:56
0          This routine is not currently used in the production version of
           *USERDIRECTORY.  It is sometimes used as an aid in debugging it.
           Calls the system routine SCANSTOR to dump the entire storage of
           the program.
00821/013A  USERDIRECTORY            OBJECT          OL  O          W494:UD.LIB                                                     
            5.1T2   525  USERDIRECTORY.OBJECT.OL.013        1 LINE  17386   81 PAGE UM   TIFFANY             JULY 23, 1983  13:37:56
0          This file contains an object library of all the routines used in 
           *USERDIRECTORY (821/15) and *UDROUTINES (821/17). 
            
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/6, 821/7, 821/8, 821/9, 821/10, 821/11, 821/15, 821/17, 821/30, 821/33 
00821/014A  USERDIRECTORY            PROGRAM         OL  O          W494:PROGRAM                                                    
            5.1T2   526  USERDIRECTORY.PROGRAM.OL.014       1 LINE  17386   61 PAGE UM   TIFFANY             JULY 23, 1983  13:37:59
0          This is the *USERDIRECTORY program that has all relevant modules
           including SYM records.  To debug, issue from a privileged CCID:
                  $DEBUG PROGRAM PKEY=*USERDIRECTO 
           To generate the program, just issue the following PMF command:
                  INSTALL COMBINE=NO
            
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/31 
00821/015A  USERDIRECTORY            *USERDIRECTORY  OE  O          *USERDIRECTORY                                                  
            5.1T2   527  USERDIRECTORY.?USERDIRECT.OE.015   1 LINE  32767   25 PAGE UM   TIFFANY             JULY 23, 1983  13:38:02
                         *USERDIRECTORY       
0          This is the object for the *USERDIRECTORY program.  It is built 
1                                                                                               SUN SEP 08/96   15:24:55   Page  645
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          from the object library (821/13) with the PMF command "INSTALL". 
           *UDROUTINES must be pistle-loaded for it to work. 
            
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/1, 821/7, 821/8, 821/11, 821/13, 821/16, 821/20, 821/21, 821/24 
00821/016A  USERDIRECTORY            UD.MAP          D   O          W494:UD.MAP                                                     
            5.1T2   528  USERDIRECTORY.UD.MAP.D.016         1 LINE    105    4 PAGE UM   TIFFANY             JULY 23, 1983  13:38:03
0          This is a map produced by *LINKEDIT (297) for (821/15).
00821/017A  USERDIRECTORY            *UDROUTINES     OE  O          *UDROUTINES                                                     
            5.1T2   529  USERDIRECTORY.?UDROUTINES.OE.017   1 LINE  32767   17 PAGE UM   TIFFANY             JULY 23, 1983  13:38:03
                         *UDROUTINES          
0          This is the object for the name-search routines and should be loaded 
           into shared VM at IPL by PISTLE (559).  It contains the entry point 
           UDSYMS, which is a transfer vector for the name-search routines. 
           This is formed from the object file UD.LIB (821/13) using the PMF
           command "UD.INSTALL".
            
           **********************************************************************
           D5.1 version:
            
           Revised since D5.0C.
           **********************************************************************
0          Referenced by comments of: 821/1, 821/8, 821/11, 821/13, 821/18, 821/27 
00821/018A  USERDIRECTORY            UDRTNS.MAP      D   O          W494:UDRTNS.MAP                                                 
            5.1T2   530  USERDIRECTORY.UDRTNS.MAP.D.018     1 LINE    105    3 PAGE UM   TIFFANY             JULY 23, 1983  13:38:04
0          This is a map produced by *LINKEDIT for *UDROUTINES (821/17).
00821/019A  USERDIRECTORY            INSTALLER       C   O          W494:UD.INSTALL                                                 
            5.1T2   531  USERDIRECTORY.INSTALLER.C.019      1 LINE     69    1 PAGE UM   TIFFANY             JULY 23, 1983  13:38:04
0          This source file is used to copy *USERDIRECTORY from 
           *NEWUSERDIRECTORY, copy *UDROUTINES from *NEWUDROUTINES, and save 
           the current sources onto a tape.  It uses all relevant files 
           in the component (821). 
00821/020A  USERDIRECTORY            MASTER FILE     D   O        # *USERDIR.MASTER                                                 
                                                                                    UM   TIFFANY                                    
                         *USERDIR.MASTER@E    
0          This file is the master data base for the system user-directory.
           It is constructed by *USERDIRECTORY (821/15).  To initialize this
           file, $EMPTY it.
1                                                                                               SUN SEP 08/96   15:24:55   Page  646
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           It should be permitted as follows:
                  $Permit *USERDIR.MASTER none others, 
                          rw (others&pkey=*sys.ud?,ccid&pkey=*userdirecto)
           where "ccid" is the user id allowed to manage the master directory.
            
           If your installation still contains *MTSUSERS files et al., these
           files must be converted by a $SOURCE file (821/36) with both old
           and new versions of the *USERDIRECTORY program.
0          Referenced by comments of: 821/36 
00821/021A  USERDIRECTORY            HELP FILE       D   O          ETC:UD.HELP                                                     
            5.1T2   532  USERDIRECTORY.HELP_FILE.D.021      1 LINE     70   18 PAGE UM   TIFFANY             JULY 23, 1983  13:38:05
                         ETC:UD.HELP          
0          This file contains the help library for *USERDIRECTORY (821/15).
            
           **********************************************************************
           D5.1 version:
            
           Has two new entries:  DUPLICATES and CLAIM.
           **********************************************************************
00821/022C  USERDIRECTORY            SCANLOG         SA  G          W494:SCANLOG.S                                                  
            5.1T2   533  USERDIRECTORY.SCANLOG.SA.022       1 LINE     74   11 PAGE UM   TIFFANY             JULY 23, 1983  13:38:06
0          A program to scan the log file (821/24) produced by *USERDIRECTORY.
00821/023C  USERDIRECTORY            SCANLOG         O   G          W494:SCANLOG                                                    
            5.1T2   534  USERDIRECTORY.SCANLOG.O.023        1 LINE   4476    6 PAGE UM   TIFFANY             JULY 23, 1983  13:38:07
00821/024A  USERDIRECTORY            LOG FILE        D   O        # ETC:UD.LOG                                                      
                                                                                    UM   TIFFANY                                    
                         ETC:UD.LOG@E         
0          This file logs all the lines entered by any user to *USERDIRECTORY
           (821/15).  It must be periodically copied into another file or onto 
           a tape and emptied, since otherwise it will fill up and prevent 
           *USERDIRECTORY from working.  See LOG.COPY (821/37) for this process. 
0          Referenced by comments of: 821/22, 821/37 
00821/025A  USERDIRECTORY            PROJECT FILE    D   O          W494:UD                                                         
            5.1T2   535  USERDIRECTORY.PROJECT_FIL.D.025    1 LINE    133    8 PAGE UM   TIFFANY             JULY 23, 1983  13:38:07
0          This is the PMF project file for the UserDirectory routines. 
           Documentation for the PMF modules and procedures is available in 
           the project.
            
           **********************************************************************
           D5.1 version:
            
           A new PMF module, S/CMD_CLAIM has been added.
1                                                                                               SUN SEP 08/96   15:24:55   Page  647
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          **********************************************************************
0          Referenced by comments of: 821/1, 821/3 
00821/026A  USERDIRECTORY            LKED SOURCE     D   O          W494:LINKCMDS                                                   
            5.1T2   536  USERDIRECTORY.LKED_SOURCE.D.026    1 LINE     41    1 PAGE UM   TIFFANY             JULY 23, 1983  13:38:08
0          *LINKEDIT (297) and *OBJUTIL (721) commands used by the PMF 
           INSTALL and UD.INSTALL commands. 
            
           The PMF modules referenced in this file are:
               lines 1,99      LINKCMDS/INSTALL
                                  *LINKEDIT commands for installation of
                                  *USERDIRECTORY.
               lines 101,199   LINKCMDS/PISTLE 
                                  Loader records to be placed at start of
                                  new *UDROUTINES.
               lines 201,299   LINKCMDS/UD.INSTALL
                                  *LINKEDIT commands for installation of
                                  new *UDROUTINES.
               lines 301,399   LINKCMDS/ENDJUNK
                                  Loader records to be placed at end of 
                                  new *UDROUTINES.
               lines 401,499   LINKCMDS/INSTALL.OBJUTIL 
                                  This is used by the PMF INSTALL procedure.
                                  UD.LIB is simply copied over to a loader
                                  library with UDSYMS deleted.
               lines 501,599   LINKCMDS/NOCOMBINE
                                  This is essentially same as LINKCMDS/INSTALL
                                  except no COMBINING is performed.  This
                                  allows $DEBUGING *USERDIRECTORY.
00821/027A  USERDIRECTORY            ROUTINES DOC    WF  O          W494:UDRTNS.DOC                                                 
            5.1T2   537  USERDIRECTORY.ROUTINES_DO.WF.027   1 LINE     73    8 PAGE UM   TIFFANY             JULY 23, 1983  13:38:08
0          This is a draft writeup for the *UDROUTINES (821/17).
00821/028A  USERDIRECTORY            NEW PROGRAM     OE  G        # *NEWUSERDIRECTORY                                               
                                                                                    UM   TIFFANY                                    
0          This contains the test version of *USERDIRECTORY as generated by 
           the PMF INSTALL command.
00821/029A  USERDIRECTORY            NEW ROUTINES    OE  G        # *NEWUDROUTINES                                                  
                                                                                    UM   TIFFANY                                    
0          This file contains the test version of the UserDirectory search 
           routines.  To use this file instead of the pistle-loaded version 
           of the search routines, use $SET VERSION(UDSYMS)=NEW. 
00821/030A  USERDIRECTORY            FULLDEBUGGER    C   O          W494:FULLDEBUG                                                  
            5.1T2   538  USERDIRECTORY.FULLDEBUGGE.C.030    1 LINE     66    1 PAGE UM   TIFFANY             JULY 23, 1983  13:38:08
0          This is a source file that runs SDS with the object contained in 
1                                                                                               SUN SEP 08/96   15:24:55   Page  648
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          UD.LIB (821/13).  Requires PROT=OFF so that the user directory
           routines will run.  Contains a $CONTINUE WITH COPY:SYSDEFS
           (579/3) record.
            
           Change "W494" in the file to your CCID.
            
           *******************************************************************
           D5.1 version:
            
           Requires the new version of SDS (600/18) through (600/37).
           *******************************************************************
00821/031A  USERDIRECTORY            DEBUGGER        C   O          W494:DEBUG                                                      
            5.1T2   539  USERDIRECTORY.DEBUGGER.C.031       1 LINE     38    1 PAGE UM   TIFFANY             JULY 23, 1983  13:38:09
0          This is a source file that runs SDS with the program (821/14).
           PROT=OFF is not required.
            
           Change in the file all occurrences of "W494" to your CCID.
00821/032A  USERDIRECTORY            SETNAME SOURCE  SQ  G          W494:UD.SETNAME.S                                               
            5.1T2   540  USERDIRECTORY.SETNAME_SOU.SQ.032   1 LINE    100    2 PAGE UM   TIFFANY             JULY 23, 1983  13:38:09
0          This contains the PLUS source for a simple driver that tests the
           $SET NAME subroutine, UDSETNAM.  To compile, issue $SOURCE
           UD.SETNAME.S(0). 
00821/033A  USERDIRECTORY            SETNAME OBJECT  O   G          W494:UD.SETNAME.O                                               
            5.1T2   541  USERDIRECTORY.SETNAME_OBJ.O.033    1 LINE   2288    3 PAGE UM   TIFFANY             JULY 23, 1983  13:38:09
0          This contains the object for the UDSETNAM subroutines.  Requires 
           the object library UD.LIB (821/13) for debugging.
00821/034A  USERDIRECTORY            CHECK ROUTINES  SP  G          W494:UDUTIL.S                                                   
            5.1T2   542  USERDIRECTORY.CHECK_ROUTI.SP.034   1 LINE     70    9 PAGE UM   TIFFANY             JULY 23, 1983  13:38:09
0          This is a program compiled by PL/I Optimizing compiler to help
           verify the User Directory routines.
            
           This implements the commands:
            
              OPEN               to call UDOPEN
              SET item_name      to call UDSET and set the item name 
              GET item_name      to call UDGET and get the item name 
              SEARCH             to call UDSRCH
              CLOSE              to call UDCLOS
              DUMP n             to dump "n" bytes of the value
                                 "n" defaults to 4.
              STOP               to stop the program 
              MTS                to call MTS, usually to change the value
                                 via SDS 
              $...               to issue MTS command 
              COMMENT            just a comment
              DEBUG ÈON|OFF¼     to set debug switch on or off, usually to
1                                                                                               SUN SEP 08/96   15:24:55   Page  649
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                                show how an input line is broken into words.
0          Referenced by comments of: 821/35 
00821/035A  USERDIRECTORY            CHECK ROUTINES  O   G          W494:UDUTIL                                                     
            5.1T2   543  USERDIRECTORY.CHECK_ROUTI.O.035    1 LINE  13796    8 PAGE UM   TIFFANY             JULY 23, 1983  13:38:10
0          The object of the program (821/34).
            
           Contains a $CONTINUE WITH *PL1OPTLIB.
00821/036A  USERDIRECTORY            CONVERSION      C   O          W494:NEWDIR                                                     
            5.1T2   544  USERDIRECTORY.CONVERSION.C.036     1 LINE    197    3 PAGE UM   TIFFANY             JULY 23, 1983  13:38:10
0          This is a source file that dumps the contents of the old *MTSUSERS
           file (assuming that the *USERDIRECTORY contains the old version of
           the program), then converts to a series of ADD commands for the new
           version of *USERDIRECTORY.  The new version of *USERDIRECTORY stores
           its information in the file *USERDIR.MASTER (821/20).
            
           Then, all files beginning with *MTSUSERS... can be destroyed when
           the new version of the USERDIRECTORY program is in public use.
0          Referenced by comments of: 821/20 
00821/037A  USERDIRECTORY            LOG COPY        C   O          W494:LOG.COPY                                                   
            5.1T2   545  USERDIRECTORY.LOG_COPY.C.037       1 LINE    153    1 PAGE UM   TIFFANY             JULY 23, 1983  13:38:11
0          This is a source file that copies the contents of ETC:UD.LOG
           (821/24) into another file of name LOG.ddmmmyy where "dd" is the 
           day of month, "mmm" the name of month, and "yy" the year.  Then,
           the file ETC:UD.LOG is emptied.   This is usually done per month. 
0          Referenced by comments of: 821/24 
00821/038C  USERDIRECTORY            CHKDIR          SP  G          W494:CHKDIR.S                                                   
            5.1T2   546  USERDIRECTORY.CHKDIR.SP.038        1 LINE     77   21 PAGE UM   TIFFANY             JULY 23, 1983  13:38:11
0          A source program to check out the master directory or name libraries
           for things such as "missing phonetics."
00821/039C  USERDIRECTORY            CHKDIR          O   G          W494:CHKDIR                                                     
            5.1T2   547  USERDIRECTORY.CHKDIR.O.039         1 LINE  32767   18 PAGE UM   TIFFANY             JULY 23, 1983  13:38:12
0          Requires the PHONCODE (821/6) object and *PL1OPTLIB (827/5).
00821/040C  USERDIRECTORY            UDSCAN          SA  G          W494:UDSCAN(1,999)                                              
            5.1T2   548  USERDIRECTORY.UDSCAN.SA.040        1 LINE     67    3 PAGE UM   TIFFANY             JULY 23, 1983  13:38:13
0          A subroutine that may be called in the dead-file cleanup.  See
           RSTR:SCANFILES (502).
0          Referenced by comments of: 502/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  650
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00821/041C  USERDIRECTORY            UDSCAN          O   G          W494:UDSCAN(1000)                                               
            5.1T2   549  USERDIRECTORY.UDSCAN.O.041         1 LINE   1349    3 PAGE UM   TIFFANY             JULY 23, 1983  13:38:13
00822/001   FLOPPY DISK SUPPORT      MAIN            SF  G          FLOP:FTST                                                       
            5.0T3   997  FLOPPY_DISK_SUPPORT.MAIN.SF.001    1 LINE     98   15 PAGE UM   CASHMAN             JULY 03, 1981  20:21:54
            5.0T8   376                       
0          $SOURCE FLOP:FTST. FORTRAN source for main program. Uses *OVERDRIVE (667) and
           *FTN (551/3). Also assembles FLOP:FTSTASMH (822/2). VERLAB (812) and EDGER
           (747/5) are used for listing control. Requires FLOP:FLPCOM (822/3).
0          Referenced by comments of: 822/2 
00822/002   FLOPPY DISK SUPPORT      MAIN            SA  G          FLOP:FTSTASMH                                                   
            5.0T3   998  FLOPPY_DISK_SUPPORT.MAIN.SA.002    1 LINE     68    3 PAGE UM   CASHMAN             JULY 03, 1981  20:21:56
            5.0T8   377                       
0          Assembled with FLOP:FTST (822/1). *ASMH (737) source support routines for
           main program.
0          Referenced by comments of: 822/1 
00822/003   FLOPPY DISK SUPPORT      MAIN            SF  G          FLOP:FLPCOM                                                     
            5.0T3   999  FLOPPY_DISK_SUPPORT.MAIN.SF.003    1 LINE     68    1 PAGE UM   CASHMAN             JULY 03, 1981  20:21:57
            5.0T8   378                       
0          Common definitions for all floppy routines.
0          Referenced by comments of: 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 
00822/004   FLOPPY DISK SUPPORT      MAIN            OC  G          FLOP:FLOPPY                                                     
            5.0T3  1000  FLOPPY_DISK_SUPPORT.MAIN.OC.004    1 LINE   2814   12 PAGE UM   CASHMAN             JULY 03, 1981  20:21:58
            5.0T8   379                       
0          Main program object. This will load the object of the particular floppy disk
           directory support routine.
0          Referenced by comments of: 848/25 
00822/005   FLOPPY DISK SUPPORT      CP/M            SF  G          FLOP:CPM.S                                                      
            5.0T3  1001  FLOPPY_DISK_SUPPORT.CP/M.SF.005    1 LINE     87   18 PAGE UM   CASHMAN             JULY 03, 1981  20:22:01
            5.0T8   380                       
0          CP/M directory type support routines source code. Uses *OVERDRIVE (667) and
           *FTN (551/3). Also assembles (822/6). Uses VERLAB (812) and EDGER (747/5) for
           listing enhancements. Requires FLOP:CPM.EQU (822/7) and FLOP:FLPCOM (822/3).
00822/006   FLOPPY DISK SUPPORT      CP/M            SA  G          FLOP:CPMASMH                                                    
            5.0T3  1002  FLOPPY_DISK_SUPPORT.CP/M.SA.006    1 LINE     71    3 PAGE UM   CASHMAN             JULY 03, 1981  20:22:08
            5.0T8   381                       
0          CP/M support routines *ASMH (737) source.
0          Referenced by comments of: 822/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  651
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00822/007   FLOPPY DISK SUPPORT      CP/M            SF  G          FLOP:CPM.EQU                                                    
            5.0T3  1003  FLOPPY_DISK_SUPPORT.CP/M.SF.007    1 LINE     53    1 PAGE UM   CASHMAN             JULY 03, 1981  20:22:09
            5.0T8   382                       
0          CP/M directory type specific common block definitions.
0          Referenced by comments of: 822/5 
00822/008   FLOPPY DISK SUPPORT      CP/M            OC  G          FLOP:CPMLIB                                                     
            5.0T3  1004  FLOPPY_DISK_SUPPORT.CP/M.OC.008    1 LINE   2508   13 PAGE UM   CASHMAN             JULY 03, 1981  20:22:10
            5.0T8   383                       
0          Object for CP/M directory type support.
00822/009   FLOPPY DISK SUPPORT      ICOM            SF  G          FLOP:ICOM.S                                                     
            5.0T3  1005  FLOPPY_DISK_SUPPORT.ICOM.SF.009    1 LINE     87   12 PAGE UM   CASHMAN             JULY 03, 1981  20:22:11
            5.0T8   384                       
0          FORTRAN source for ICOM directory type support. $SOURCE ICOM.S. Also
           assembles ICOMASMH (822/11). Uses *OVERDRIVE (667) and *FTN (551/3). Uses
           VERLAB (812) and EDGER (747/5) for listing enhancements. Requires
           FLOP:ICOM.EQU (822/10) and FLOP:FLPCOM (822/3).
00822/010   FLOPPY DISK SUPPORT      ICOM            SF  G          FLOP:ICOM.EQU                                                   
            5.0T3  1006  FLOPPY_DISK_SUPPORT.ICOM.SF.010    1 LINE     61    1 PAGE UM   CASHMAN             JULY 03, 1981  20:22:15
            5.0T8   385                       
0          ICOM directory type specific common block definitions.
0          Referenced by comments of: 822/9 
00822/011   FLOPPY DISK SUPPORT      ICOM            SA  G          FLOP:ICOMASMH                                                   
            5.0T3  1007  FLOPPY_DISK_SUPPORT.ICOM.SA.011    1 LINE     71    3 PAGE UM   CASHMAN             JULY 03, 1981  20:22:16
            5.0T8   386                       
0          *ASMH (737) source for ICOM directory type support routines.
0          Referenced by comments of: 822/9, 822/13 
00822/012   FLOPPY DISK SUPPORT      ICOM            OC  G          FLOP:ICOMLIB                                                    
            5.0T3  1008  FLOPPY_DISK_SUPPORT.ICOM.OC.012    1 LINE   3438   10 PAGE UM   CASHMAN             JULY 03, 1981  20:22:17
            5.0T8   387                       
0          Object for ICOM directory type support routines.
00822/013   FLOPPY DISK SUPPORT      RT11            SF  G          FLOP:RT11.S                                                     
            5.0T3  1009  FLOPPY_DISK_SUPPORT.RT11.SF.013    1 LINE     87   17 PAGE UM   CASHMAN             JULY 03, 1981  20:22:18
            5.0T8   388                       
0          RT11 directory type source. Uses *OVERDRIVE (667) and *FTN (551/3). Also
           assembles ICOMASMH (822/11). VERLAB (812) and EDGER (747/5) are used for
           listing control. Requires FLOP:RT11EQU (822/14) and FLOP:FLPCOM (822/3).
1                                                                                               SUN SEP 08/96   15:24:55   Page  652
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00822/014   FLOPPY DISK SUPPORT      RT11            SF  G          FLOP:RT11.EQU                                                   
            5.0T3  1010  FLOPPY_DISK_SUPPORT.RT11.SF.014    1 LINE     48    1 PAGE UM   CASHMAN             JULY 03, 1981  20:22:23
            5.0T8   389                       
0          RT11 directory type specific common block definitions.
0          Referenced by comments of: 822/13 
00822/015   FLOPPY DISK SUPPORT      RT11            OC  G          FLOP:RT11LIB                                                    
            5.0T3  1011  FLOPPY_DISK_SUPPORT.RT11.OC.015    1 LINE   1654   12 PAGE UM   CASHMAN             JULY 03, 1981  20:22:24
            5.0T8   390                       
0          Object for RT11 directory type support.
00822/016   FLOPPY DISK SUPPORT      IBM             SF  G          FLOP:IBM.S                                                      
            5.0T3  1012  FLOPPY_DISK_SUPPORT.IBM.SF.016     1 LINE     85   14 PAGE UM   CASHMAN             JULY 03, 1981  20:22:25
            5.0T8   391                       
0          IBM directory type support source code. $SOURCE IBM.S. Uses *OVERDRIVE
           (667) and *FTN (551/3). VERLAB (812) and EDGER (747/5) are used for
           listing control. Requires FLOP:IBM.EQU (822/17) and FLOP:FLPCOM (822/3).
00822/017   FLOPPY DISK SUPPORT      IBM             SF  G          FLOP:IBM.EQU                                                    
            5.0T3  1013  FLOPPY_DISK_SUPPORT.IBM.SF.017     1 LINE     56    1 PAGE UM   CASHMAN             JULY 03, 1981  20:22:29
            5.0T8   392                       
0          IBM directory type specific common block definitions.
0          Referenced by comments of: 822/16, 822/19 
00822/018   FLOPPY DISK SUPPORT      IBM             OC  G          FLOP:IBMLIB                                                     
            5.0T3  1014  FLOPPY_DISK_SUPPORT.IBM.OC.018     1 LINE   3342   11 PAGE UM   CASHMAN             JULY 03, 1981  20:22:30
            5.0T8   393                       
0          Object for IBM directory type support routines.
00822/019   FLOPPY DISK SUPPORT      NONE            SF  G          FLOP:NONE.S                                                     
            5.0T3  1015  FLOPPY_DISK_SUPPORT.NONE.SF.019    1 LINE     87    3 PAGE UM   CASHMAN             JULY 03, 1981  20:22:32
            5.0T8   394                       
0          Default directory type source code. $SOURCE NONE.S. Uses *OVERDRIVE (667)
           and *FTN (551/3). VERLAB (812) and EDGER (747/5) are used for listing
           control. Requires FLOP:IBM.EQU (822/17) and FLOP:FLPCOM (822/3).
00822/020   FLOPPY DISK SUPPORT      NONE            SA  G          FLOP:NONEASMH                                                   
            5.0T3  1016  FLOPPY_DISK_SUPPORT.NONE.SA.020    1 LINE     68    1 PAGE UM   CASHMAN             JULY 03, 1981  20:22:32
            5.0T8   395                       
0          *ASMH (737) default directory type.
1                                                                                               SUN SEP 08/96   15:24:55   Page  653
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00822/021   FLOPPY DISK SUPPORT      NONE            OE  G          FLOP:NONELIB                                                    
            5.0T3  1017  FLOPPY_DISK_SUPPORT.NONE.OE.021    1 LINE    490    4 PAGE UM   CASHMAN             JULY 03, 1981  20:22:33
            5.0T8   396                       
0          Object for default directory type support routines.
00822/022   FLOPPY DISK SUPPORT      DSECT           SA  G          *FLOPDSECT                                                      
            5.0T3  1018  FLOPPY_DISK_SUPPORT.DSECT.SA.022   1 LINE     71    1 PAGE UM   CASHMAN             AUG. 06, 1981  05:41:18
            5.0T8   397  *FLOPDSECT           
0          DSECT for floppy disk SNS data.
00823/001A  PASCAL/VS                INSTALL NOTES   P   G          PVS:NOTES                                                       
            5.1T2   550  PASCAL/VS.INSTALL_NOTES.P.001      1 LINE     70   11 PAGE UM   PICKELMAN           JULY 23, 1983  13:38:13
0          IBM's PASCAL/VS compiler, program number 5796-PNQ.  Since it is proprietary,
           most subcomponents cannot be distributed.  However, (823/20) will generate
           them from the IBM distribution tape.
            
           This subcomponent has a list of things that need to be done, and problems
           with the compiler.
            
           ********************************************************************************
           D5.0A changes:
            
           1)  Converted from Release 2.0 to Release 2.1.
           2)  %INCLUDE now works.
            
           ********************************************************************************
            
           ********************************************************************************
           D5.0B version:
            
           New features added, mostly in the I/O system.  These changes are
           too numerous to list, but are documented in (823/5).
           ********************************************************************************
            
           ********************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           ********************************************************************************
0          Referenced by comments of: 799/1, 807/1, 825/1 
00823/002C  PASCAL/VS                UPDATES         UC  G          PVS:CHANGES                                                     
            5.1T2   551  PASCAL/VS.UPDATES.UC.002           1 LINE    183   18 PAGE UM   PICKELMAN           JULY 23, 1983  13:38:14
0           
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  654
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/003A  PASCAL/VS                MEMO 436        WX             S0759 PVSFS VLO FSNAME=CCMEMO                                   
            5.1T2   552  PASCAL/VS.MEMO_436.WX.003          1 LINE    103   44 PAGE UM   PICKELMAN           JULY 11, 1983  15:51:08
0          This is Computing Center Memo 436 -- "PASCAL/VS in MTS."  
            
           Requires the (823/4) macros.
            
           **********************************************************************
           D5.1 version:
            
           This memo was converted from TEXTEDIT source, as distributed on D5.0C,
           to TEXTFORM source. This was done because TEXTEDIT is supported by the
           UM Statistical Research Laboratory and thus is not distributed.
           **********************************************************************
0          Referenced by comments of: 823/4 
00823/004C  PASCAL/VS                MEMO 436        WX             S0759 PVSFS VLO FSNAME=CCMEMO.MACS                              
            5.1T2   553  PASCAL/VS.MEMO_436.WX.004          1 LINE     90    3 PAGE UM   PICKELMAN           JULY 11, 1983  15:51:37
0          TEXTFORM macros required by (823/3).
0          Referenced by comments of: 823/3 
00823/005A  PASCAL/VS                MEMO 436        P              *PASCALVS.W                                                     
            5.1T2   554  PASCAL/VS.MEMO_436.P.005           1 LINE     66   45 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:27
0          This is the printer ready version of Computing Center Memo 436,
           "PASCAL/VS in MTS."
0          Referenced by comments of: 823/1 
00823/006A  PASCAL/VS                DRIVER          OE  G          *PASCALVS                                                       
            5.1T2   555  PASCAL/VS.DRIVER.OE.006            1 LINE   3844    3 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:29
                         *PASCALVS@UM         
0          The PASCAL/VS compiler. Actually just a small program which links to
           ETC:PASVS*COMP (823/14), ETC:PASVS*OPT (823/15), and ETC:PASVS*TRAN
           (823/16). This is the linkedited object of (823/7), and (823/28).
0          Referenced by comments of: 823/27, 866/5 
00823/007A  PASCAL/VS                RUNTIME         OL  G          *PASCALVSLIB                                                    
            5.1T2   556  PASCAL/VS.RUNTIME.OL.007           1 LINE    144    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:30
                         *PASCALVSLIB         
0          The runtime support library for programs compiled with PASCAL/VS.  Same
           as (823/66) but without SYM records.
0          Referenced by comments of: 802/18, 807/2, 823/6, 823/26, 825/2, 848/14, 848/15 
1                                                                                               SUN SEP 08/96   15:24:55   Page  655
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/008C  PASCAL/VS                PASCALVSLIB     O   O          SEG2:PASCALVSLIB                                                
            5.1T2   557  PASCAL/VS.PASCALVSLIB.O.008        1 LINE  13412   46 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:30
                         SEG2:PASCALVSLIB     
0          **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
00823/009C  PASCAL/VS                PASCALVSCOMP    O   O          SEG2:PASCALVSCOMP                                               
            5.1T2   558  PASCAL/VS.PASCALVSCOMP.O.009       1 LINE     43    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:32
                         SEG2:PASCALVSCOMP@UM 
0          Contains a $CONTINUE WITH ETC:PASVS*COMP (823/14) RETURN record.
00823/010C  PASCAL/VS                PASCALVSOPT     O   O          SEG2:PASCALVSOPT                                                
            5.1T2   559  PASCAL/VS.PASCALVSOPT.O.010        1 LINE     42    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:32
                         SEG2:PASCALVSOPT@UM  
0          Contains a $CONTINUE WITH ETC:PASVS*OPT (823/15) RETURN record.
00823/011C  PASCAL/VS                PASCALVSTRAN    O   O          SEG2:PASCALVSTRAN                                               
            5.1T2   560  PASCAL/VS.PASCALVSTRAN.O.011       1 LINE     43    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:32
                         SEG2:PASCALVSTRAN@UM 
0          Contains a $CONTINUE WITH ETC:PASVS*TRAN (823/16) RETURN record.
00823/012A  PASCAL/VS                COMPILER        M   G        # ETC:PASVS*MESS                                                  
                                                                                    UM   PICKELMAN                                  
                         ETC:PASVS*MESS@UM    
0          The compiler's error messages. Due to copyright restrictions this
           subcomponent cannot be distributed.
0          Referenced by comments of: 823/14, 823/77 
00823/013C  PASCAL/VS                COMPILER        D   G        # ETC:PASVS*EXPL                                                  
                                                                                    UM   PICKELMAN                                  
                         ETC:PASVS*EXPL@UM    
0          An explanation of error messages to go with error messages in the summary
           at the end of the compilation.  Text is organized in 64-character lines
           terminated with a $ENDFILE.  Text is indexed by error number.
00823/014A  PASCAL/VS                COMPILER        OE  G        # ETC:PASVS*COMP                                                  
                                                                                    UM   PICKELMAN                                  
                         ETC:PASVS*COMP@UM    
0          Pass1, the "compiler." Converts PASCAL into "UCODE." Requires
           ETC:PASVS*MESS (823/12). Due to copyright restrictions this subcomponent
           cannot be distributed.
            
           **************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  656
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/6, 823/9 
00823/015A  PASCAL/VS                OPTIMIZER       OE  G        # ETC:PASVS*OPT                                                   
                                                                                    UM   PICKELMAN                                  
                         ETC:PASVS*OPT@UM     
0          Pass 2, the "optimizer."  Converts UCODE to better UCODE.
           Not distributed due to copyright restrictions.
0          Referenced by comments of: 823/6, 823/10 
00823/016A  PASCAL/VS                TRANSLATOR      OE  G        # ETC:PASVS*TRAN                                                  
                                                                                    UM   PICKELMAN                                  
                         ETC:PASVS*TRAN@UM    
0          Pass3, the "translator." Converts "UCODE" into an S/370 object module.
           Due to copyright restrictions this subcomponent cannot be distributed.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/6, 823/11 
00823/017C  PASCAL/VS                TEST            SW  O          PVS:TESTALL                                                     
            5.1T2   561  PASCAL/VS.TEST.SW.017              1 LINE     90   19 PAGE UM   PICKELMAN           JULY 23, 1983  13:42:32
0          Test program, which should eventually test all of Pascal/VS.  It needs
           some work.
00823/018C  PASCAL/VS                NEW/DISPOSE     OC             S0759 PVSFS VLO FSNAME=NEW/DISPOSE                              
            5.1T2   562  PASCAL/VS.NEW/DISPOSE.OC.018       1 LINE    524    2 PAGE UM   PICKELMAN           JULY 11, 1983  15:52:22
0          Has several alternate versions of the NEW and DISPOSE procedures.
           These are useful for catching programs which break rules in ways 
           Pascal/VS doesn't catch.
00823/019C  PASCAL/VS                INSTALL         C              S0759 PVSFS VLO FSNAME=INSTALL                                  
            5.1T2   563  PASCAL/VS.INSTALL.C.019            1 LINE     80    6 PAGE UM   PICKELMAN           JULY 11, 1983  15:52:36
0          Source file to install Pascal/VS from the IBM distribution tape.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  657
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/020A  PASCAL/VS                INSTALL         C   G          S0759 PVSFS VLO FSNAME=VS.INSTALL                               
            5.1T2   564  PASCAL/VS.INSTALL.C.020            1 LINE     80    6 PAGE UM   PICKELMAN           JULY 11, 1983  15:52:44
0          A source file to install PASCAL/VS from the IBM distribution tape. It will
           also generate all of the subcomponents which cannot be distributed. Includes
           a list of other subcomponents required.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/1 
00823/021A  PASCAL/VS                INSTALL         C              S0759 PVSFS VLO FSNAME=VS.CMDMAC                                
            5.1T2   565  PASCAL/VS.INSTALL.C.021            1 LINE    184    4 PAGE UM   PICKELMAN           DEC. 22, 1982  17:37:26
0          A source file which uses the MTS Command Macros (802) to set up
           things for installing or maintaining PASCAL/VS. Requires (823/71).
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
00823/022C  PASCAL/VS                INSTALL         C              S0759 PVSFS VLO FSNAME=CMDMAC                                   
            5.1T2   566  PASCAL/VS.INSTALL.C.022            1 LINE    179    4 PAGE UM   PICKELMAN           FEB. 16, 1983  01:56:22
0          **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/27 
00823/023A  PASCAL/VS                INSTALL         C              S0759 PVSFS VLO FSNAME=VS.CMDMACLIB                             
            5.1T2   567  PASCAL/VS.INSTALL.C.023            1 LINE    133    4 PAGE UM   PICKELMAN           JULY 11, 1983  15:53:02
0          Command Macros ($NEW), component 802, to aid in installing and maintaining
           PASCAL/VS.
00823/024C  PASCAL/VS                INSTALL         C              S0759 PVSFS VLO FSNAME=CMDMACLIB                                
            5.1T2   568  PASCAL/VS.INSTALL.C.024            1 LINE    133    4 PAGE UM   PICKELMAN           JULY 11, 1983  15:52:56
0           
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  658
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 634/1, 823/27 
00823/025A  PASCAL/VS                INSTALL         SW  G          S0759 PVSFS VLO FSNAME=VS.LIBUILD                               
            5.1T2   569  PASCAL/VS.INSTALL.SW.025           1 LINE     68    4 PAGE UM   PICKELMAN           JAN. 03, 1982  01:13:13
0          A program similar to *IEHMOVE (291), but different. Used to copy the source
           from the IBM distribution tape to an MTS file.
0          Referenced by comments of: 823/26 
00823/026A  PASCAL/VS                INSTALL         OE  G          S0759 PVSFS VLO FSNAME=VS*LIBUILD                               
            5.1T2   570  PASCAL/VS.INSTALL.OE.026           1 LINE  32767   16 PAGE UM   PICKELMAN           JAN. 03, 1982  01:13:58
0          Linkedited version of (823/25) and (823/7). 
00823/027A  PASCAL/VS                DRIVER          SW  G          S0759 PVSFS VLO FSNAME=VS.PASCAL                                
            5.1T2   571  PASCAL/VS.DRIVER.SW.027            1 LINE     70    7 PAGE UM   PICKELMAN           NOV. 08, 1982  21:00:30
0          Source for (823/6).  See (823/22) and (823/24) for location of %INCLUDEs.
00823/028A  PASCAL/VS                DRIVER          OE  G          S0759 PVSFS VLO FSNAME=VS/PASCAL                                
            5.1T2   572  PASCAL/VS.DRIVER.OE.028            1 LINE   2914    4 PAGE UM   PICKELMAN           NOV. 08, 1982  21:02:56
0          Requires (823/66).
0          Referenced by comments of: 823/6 
00823/029A  PASCAL/VS                COMPILER        SW  G        # S0759 PVSFS VLO FSNAME=VS#COMPILE                               
                                                                                    UM   PICKELMAN                                  
0          The compiler. Not distributed due to copyright restrictions.  Requires
           (823/34).
00823/030A  PASCAL/VS                COMPILER        SW  G        # S0759 PVSFS VLO FSNAME=VS<COMPILE                               
                                                                                    UM   PICKELMAN                                  
0          The compiler modules that need to be updated for MTS.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/31 
00823/031A  PASCAL/VS                COMPILER        UC  G          S0759 PVSFS VLO FSNAME=VS>COMPILE                               
            5.1T2   573  PASCAL/VS.COMPILER.UC.031          1 LINE     78    9 PAGE UM   PICKELMAN           JULY 11, 1983  15:53:15
0          Updates for several of the compiler (823/30) modules, for use in MTS.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/33 
1                                                                                               SUN SEP 08/96   15:24:55   Page  659
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/032A  PASCAL/VS                COMPILER        SW  G        # S0759 PVSFS VLO FSNAME=VSÂCOMPILE                               
                                                                                    UM   PICKELMAN                                  
0          The compiler modules used in IBM systems, but not in MTS.
           Not distributed due to copyright restriction.
00823/033A  PASCAL/VS                COMPILER        OC  G        # S0759 PVSFS VLO FSNAME=VS/COMPILE                               
                                                                                    UM   PICKELMAN                                  
0          Object of compiler with (823/31) updates applied. Not distributed due to
           copyright restrictions.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
00823/034A  PASCAL/VS                COMPILER        SW  G        # S0759 PVSFS VLO FSNAME=VS#MACCOMP                               
                                                                                    UM   PICKELMAN                                  
0          INCLUDES used by the compiler. Not distributed due to copyright restrictions.
0          Referenced by comments of: 823/29 
00823/035A  PASCAL/VS                COMPILER        SW  G        # S0759 PVSFS VLO FSNAME=VS<MACCOMP                               
                                                                                    UM   PICKELMAN                                  
0          The compiler INCLUDES that need to be updated for MTS.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/36, 823/37 
00823/036A  PASCAL/VS                COMPILER        UC  G          S0759 PVSFS VLO FSNAME=VS>MACCOMP                               
            5.1T2   574  PASCAL/VS.COMPILER.UC.036          1 LINE     57    1 PAGE UM   PICKELMAN           NOV. 08, 1982  21:03:13
0          Updates to the compiler INCLUDE sections (823/35), for use in MTS. 
0          Referenced by comments of: 823/37 
00823/037A  PASCAL/VS                COMPILER        SW  G        # S0759 PVSFS VLO FSNAME=VS%MACCOMP                               
                                                                                    UM   PICKELMAN                                  
0          The compiler INCLUDES updated for MTS, i.e, VS<MACCOMP (823/35) with
           VS>MACCOMP (823/36) applied.
           Not distributed due to copyright restriction.
00823/038A  PASCAL/VS                OPTIMIZER       SW  G        # S0759 PVSFS VLO FSNAME=VS#OPTIMIZE                              
                                                                                    UM   PICKELMAN                                  
0          The optimizer.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/41 
1                                                                                               SUN SEP 08/96   15:24:55   Page  660
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/039A  PASCAL/VS                OPTIMIZER       SW  G        # S0759 PVSFS VLO FSNAME=VS<OPTIMIZE                              
                                                                                    UM   PICKELMAN                                  
0          The optimizer modules that need to be updated for MTS.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/40, 823/41 
00823/040A  PASCAL/VS                OPTIMIZE        UC  G          S0759 PVSFS VLO FSNAME=VS>OPTIMIZE                              
            5.1T2   575  PASCAL/VS.OPTIMIZE.UC.040          1 LINE     71    3 PAGE UM   PICKELMAN           NOV. 08, 1982  21:03:21
0          Updates for several of the optimizer modules (823/39), for use in MTS.
0          Referenced by comments of: 823/41 
00823/041A  PASCAL/VS                OPTIMIZER       O   G        # S0759 PVSFS VLO FSNAME=VS/OPTIMIZE                              
                                                                                    UM   PICKELMAN                                  
0          Object of VS#OPTIMIZE (823/38) and VS<OPTIMIZE (823/39) with VS>OPTIMIZE
           (823/40) applied.
           Not distributed due to copyright restriction.
00823/042A  PASCAL/VS                OPTIMIZER       SW  G        # S0759 PVSFS VLO FSNAME=VS#MACOPT                                
                                                                                    UM   PICKELMAN                                  
0          INCLUDE sections used by the optimizer.
           Not distributed due to copyright restriction.
00823/043A  PASCAL/VS                TRANSLATOR      SW  G        # S0759 PVSFS VLO FSNAME=VS#TRANSLATE                             
                                                                                    UM   PICKELMAN                                  
0          The translator.  Not distributed due to copyright restrictions.  Requires
           (823/47).
00823/044A  PASCAL/VS                TRANSLATOR      SW  G        # S0759 PVSFS VLO FSNAME=VS<TRANSLATE                             
                                                                                    UM   PICKELMAN                                  
0          The translator modules which need to be updated for MTS.
           Not distributed due to copyright restriction.
00823/045A  PASCAL/VS                TRANSLATOR      UC  G          S0759 PVSFS VLO FSNAME=VS>TRANSLATE                             
            5.1T2   576  PASCAL/VS.TRANSLATOR.UC.045        1 LINE     71    4 PAGE UM   PICKELMAN           JULY 11, 1983  15:53:35
0          Updates for several of the translator modules, for use in MTS.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/46 
1                                                                                               SUN SEP 08/96   15:24:55   Page  661
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/046A  PASCAL/VS                TRANSLATOR      OC  G        # S0759 PVSFS VLO FSNAME=VS/TRANSLATE                             
                                                                                    UM   PICKELMAN                                  
0          Object of the translator with (823/45) updates applied. Not distributed due to
           copyright restrictions.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
00823/047A  PASCAL/VS                TRANSLATOR      SW  G        # S0759 PVSFS VLO FSNAME=VS#MACTRAN                               
                                                                                    UM   PICKELMAN                                  
0          Includes used by the translator. Not distributed due to copyright
           restrictions.
0          Referenced by comments of: 823/43 
00823/048C  PASCAL/VS                TRANSLATOR      SW  G        # S0759 PVSFS VLO FSNAME=VS<MACTRAN                               
                                                                                    UM   PICKELMAN                                  
0          The translator includes which need to be updated (for MTS or
           bug fixes).  Not distributed due to copyright restrictions.
0          Referenced by comments of: 823/49, 823/50 
00823/049C  PASCAL/VS                TRANSLATOR      UC  G        # S0759 PVSFS VLO FSNAME=VS>MACTRAN                               
                                                                                    UM   PICKELMAN                                  
0          Updates for translator includes (823/48).
0          Referenced by comments of: 823/50 
00823/050C  PASCAL/VS                TRANSLATOR      SW  G        # S0759 PVSFS VLO FSNAME=VS%MACTRAN                               
                                                                                    UM   PICKELMAN                                  
0          The translator includes with updates applied, i.e., (823/48)
           with (823/49) applied.  Not distributed due to copyright
           restrictions.
00823/051A  PASCAL/VS                RUNTIME         SA  G          S0759 PVSFS VLO FSNAME=VS.MTS                                   
            5.1T2   577  PASCAL/VS.RUNTIME.SA.051           1 LINE     72   48 PAGE UM   PICKELMAN           JULY 11, 1983  15:53:54
0          MTS version of several of the system interface routines. Object is in
           (823/66). These have been totally rewritten for MTS.
            
           Requires *GDINFODSECT (594/1).
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
1                                                                                               SUN SEP 08/96   15:24:55   Page  662
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          **************************************************************************
0          Referenced by comments of: 823/66 
00823/052A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VS#RUN                                   
                                                                                    UM   PICKELMAN                                  
0          The PASCAL runtime support routines. Not distributed due to copyright
           restrictions.  Requires (823/61).
0          Referenced by comments of: 823/66 
00823/053A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VS<RUN                                   
                                                                                    UM   PICKELMAN                                  
0          The runtime modules which need to be updated for MTS.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/54 
00823/054A  PASCAL/VS                RUNTIME         UC  G          S0759 PVSFS VLO FSNAME=VS>RUN                                   
            5.1T2   578  PASCAL/VS.RUNTIME.UC.054           1 LINE     72    6 PAGE UM   PICKELMAN           JULY 11, 1983  15:54:04
0          Updates to the runtime routines (823/53) for use in MTS.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
00823/055A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VSÂRUN                                   
                                                                                    UM   PICKELMAN                                  
0          The runtime modules used in IBM systems, but not in MTS.
           Not distributed due to copyright restriction.
00823/056A  PASCAL/VS                RUNTIME         SA  G        # S0759 PVSFS VLO FSNAME=VS#ASM                                   
                                                                                    UM   PICKELMAN                                  
0          The assembler runtime support routines. Not distributed due to copyright
           restrictions.  Requires (823/61).
0          Referenced by comments of: 823/58, 823/66 
00823/057A  PASCAL/VS                RUNTIME         SA  G        # S0759 PVSFS VLO FSNAME=VS<ASM                                   
                                                                                    UM   PICKELMAN                                  
0          The assembler modules that need to be updated for MTS.
           Not distributed due to copyright restriction.
1                                                                                               SUN SEP 08/96   15:24:55   Page  663
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/058A  PASCAL/VS                RUNTIME         UC  G          S0759 PVSFS VLO FSNAME=VS>ASM                                   
            5.1T2   579  PASCAL/VS.RUNTIME.UC.058           1 LINE     68    4 PAGE UM   PICKELMAN           NOV. 08, 1982  21:03:05
0          Updates to (823/56) for those routines which are changed only slightly for
           MTS.
0          Referenced by comments of: 823/66 
00823/059A  PASCAL/VS                RUNTIME         SA  G        # S0759 PVSFS VLO FSNAME=VSÂASM                                   
                                                                                    UM   PICKELMAN                                  
0          The assembler modules used in IBM systems, but not in MTS.
           Not distributed due to copyright restriction.
00823/060A  PASCAL/VS                DEBUGGER        UC  G          S0759 PVSFS VLO FSNAME=VS>DEBUG                                 
            5.1T2   580  PASCAL/VS.DEBUGGER.UC.060          1 LINE     70    3 PAGE UM   PICKELMAN           JULY 11, 1983  15:54:14
0          Updates for the debugger modules (823/68), for use in MTS.
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
00823/061A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VS#MACRUN                                
                                                                                    UM   PICKELMAN                                  
0          INCLUDE sections used by the runtime support.  Not distributed due to
           copyright restrictions.
0          Referenced by comments of: 823/52, 823/56 
00823/062A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VS<MACRUN                                
                                                                                    UM   PICKELMAN                                  
0          The runtime INCLUDES that need to be updated for MTS.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/63, 823/64 
00823/063A  PASCAL/VS                RUNTIME         UC  G          S0759 PVSFS VLO FSNAME=VS>MACRUN                                
            5.1T2   581  PASCAL/VS.RUNTIME.UC.063           1 LINE     68    1 PAGE UM   PICKELMAN           NOV. 08, 1982  21:03:17
0          Updates to the runtime INCLUDES (823/62), for use in MTS. 
0          Referenced by comments of: 823/64 
00823/064A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VS%MACRUN                                
                                                                                    UM   PICKELMAN                                  
0          The runtime INCLUDES updated for MTS, i.e, VS<MACRUN (823/62) with VS>MACRUN
           (823/63) applied.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  664
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Not distributed due to copyright restriction.
00823/065A  PASCAL/VS                RUNTIME         SW  G        # S0759 PVSFS VLO FSNAME=VSÂMACRUN                                
                                                                                    UM   PICKELMAN                                  
0          The runtime INCLUDES used in IBM systems, but not in MTS.
           Not distributed due to copyright restriction.
00823/066A  PASCAL/VS                RUNTIME         OL  G          S0759 PVSFS VLO FSNAME=VS/LIB                                   
            5.1T2   582  PASCAL/VS.RUNTIME.OL.066           1 LINE  13412   46 PAGE UM   PICKELMAN           JULY 11, 1983  15:54:19
0          Object of (823/51), (823/56), (823/52) with updates (823/58) applied, and
           (823/67).
            
           **************************************************************************
           D5.1 version:
            
           Changed since D5.0C.
           **************************************************************************
0          Referenced by comments of: 823/7, 823/28, 823/51 
00823/067A  PASCAL/VS                DEBUGGER        SW  G        # S0759 PVSFS VLO FSNAME=VS#DEBUG                                 
                                                                                    UM   PICKELMAN                                  
0          Source for the debugger. Not distribute due to copyright restrictions.
           Requires (823/69).
0          Referenced by comments of: 823/66 
00823/068A  PASCAL/VS                DEBUGGER        SW  G        # S0759 PVSFS VLO FSNAME=VS<DEBUG                                 
                                                                                    UM   PICKELMAN                                  
0          The debugger modules that need to be updated for MTS.
           Not distributed due to copyright restriction.
0          Referenced by comments of: 823/60 
00823/069A  PASCAL/VS                DEBUGGER        SW  G        # S0759 PVSFS VLO FSNAME=VS#MACDEBUG                              
                                                                                    UM   PICKELMAN                                  
0          INCLUDE sections used by the debugger. Not distributed due to copyright
           restrictions.
0          Referenced by comments of: 823/67 
00823/070A  PASCAL/VS                MACLIB          SW  G          S0759 PVSFS VLO FSNAME=VS.MACLIB                                
            5.1T2   583  PASCAL/VS.MACLIB.SW.070            1 LINE     69    5 PAGE UM   PICKELMAN           NOV. 08, 1982  21:00:08
0          PASCAL INCLUDE sections for MTS-specific things used by PASCAL/VS (mostly the
           runtime system).
1                                                                                               SUN SEP 08/96   15:24:55   Page  665
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00823/071A  PASCAL/VS                MACLIB          SW  G          S0759 PVSFS VLO FSNAME=VS.INCLUDE                               
            5.1T2   584  PASCAL/VS.MACLIB.SW.071            1 LINE     47    1 PAGE UM   PICKELMAN           NOV. 08, 1982  21:00:06
0          PASCAL INCLUDE sections for various routines available to PASCAL/VS programs
           in MTS.
0          Referenced by comments of: 823/21 
00823/072A  PASCAL/VS                MACLIB          SM  G        # S0759 PVSFS VLO FSNAME=VS#MACLIB                                
                                                                                    UM   PICKELMAN                                  
0          The macro library.  Not distributed due to copyright restrictions.
00823/073A  PASCAL/VS                MACLIB          SW  G        # S0759 PVSFS VLO FSNAME=VSÂMACLIB                                
                                                                                    UM   PICKELMAN                                  
0          The macros used in IBM systems, but not in MTS.
           Not distributed due to copyright restriction.
00823/074A  PASCAL/VS                VSS             SA  G          S0759 PVSFS VLO FSNAME=VS.VSS                                   
            5.1T2   585  PASCAL/VS.VSS.SA.074               1 LINE     69    3 PAGE UM   PICKELMAN           DEC. 29, 1981  22:17:08
0          A program to run the VS version of the compiler using ETC:VSS (1078/48).
           Used to bootstrap the compiler (823/76).  Requires *GDINFODSECT (594/1).
00823/075A  PASCAL/VS                VSS             OE  G          S0759 PVSFS VLO FSNAME=VSS/PASCAL                               
            5.1T2   586  PASCAL/VS.VSS.OE.075               1 LINE   2440    3 PAGE UM   PICKELMAN           NOV. 08, 1982  21:05:22
0          Requires ETC:VSS (1078/48) and COPY:DEFS (579/10).
00823/076A  PASCAL/VS                VSS             B   G        # S0759 PVSFS VLO FSNAME=VSS/LINKLIB                              
                                                                                    UM   PICKELMAN                                  
0          The VS object for the compiler. Set up as a VSS (component 1078) PDS.
           Not distributed due to copyright restrictions.
0          Referenced by comments of: 823/74 
00823/077A  PASCAL/VS                VSS             M   G        # S0759 PVSFS VLO FSNAME=VSS/MESSAGES                             
                                                                                    UM   PICKELMAN                                  
0          (823/12) blocked for use with VSS (component 1078). Not distributed
           due to copyright restrictions.
00823/078A  PASCAL/VS                VSS             SC  S          S0759 PVSFS VLO FSNAME=VS.BUILDMESS                             
            5.1T2   587  PASCAL/VS.VSS.SC.078               1 LINE     66    1 PAGE UM   PICKELMAN           JAN. 03, 1982  00:19:11
0          A program to build a version of the message file which can be used for direct
           access under VSS. It goes into a loop after an end-of-file on input, so use
           with caution (maybe a bug in VSS, but who knows). Requires *COBLIB (538/17)
           and ETC:VSS (1078/48).
1                                                                                               SUN SEP 08/96   15:24:55   Page  666
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00824/001A  NASTRAN                  DRIVER          OC  G          NAST:NASTRAN(1,1000)                                            
            5.1T2   588  NASTRAN.DRIVER.OC.001              1 LINE     80    3 PAGE UM   MTA                 JULY 23, 1983  13:50:03
0          Driver for running MSC NASTRAN 6.2A, dated Dec. 1, 1982, in MTS.
           Obtained by assembling VSS.DRIVER (1078/49) with PAR=SYSPARM=NASTRAN.
           Requires ETC:VSS (1078/48).
00824/002A  NASTRAN                  COMMANDS        C   G          NAST:NASTRAN(*F,0)                                              
            5.1T2   589  NASTRAN.COMMANDS.C.002             1 LINE     65    1 PAGE UM   MTA                 JULY 23, 1983  13:50:03
0          VSS (component 1078) commands to run NASTRAN in MTS. Requires (824/3),
           ETC:SYS1.LINKLIB (1078/61), (824/6), and (824/5).
00824/003   NASTRAN                  OBJECT LIBRARY  OL  G        # NAST:NASLIB                                                     
                                                                                    UM   MTA                                        
0          VSS (component 1078) PDS containing MSC NASTRAN version 6.2 load modules.
            
           This file was created directly from the MSC tape file containing unloaded
           load modules using *IEHMOVE (291) with PAR=VSS. Not distributed due to
           copyright restrictions.
0          Referenced by comments of: 824/2 
00824/004A  NASTRAN                  PLOT PGM        UC  G          S1645 5.0BT2 VLO FSNAME=NASTRAN.PLOT_PGM.UC.004(1)             9
            5.1T2   590  NASTRAN.PLOT_PGM.UC.004            1 LINE     65    1 PAGE UM   MTA                 JULY 20, 1982  04:23:21
0          Updates to make the plot program work in MTS. Should be applied to the
           NASTPLOT member from the UTILSOU data set on the NASTRAN distribution tape.
00824/005   NASTRAN                  PLOT PGM        OE  G        # NAST:NASTPLOT                                                   
                                                                                    UM   MTA                                        
0          Object includes one assembly language module CFR missing from the NASTPLOT
           member in UTILSOU. The OS version of it works in MTS. Requires *PLOTSYS
           (615/9). Not distributed due to copyright restrictions.
0          Referenced by comments of: 824/2 
00824/006   NASTRAN                  RFA FILE        D   G        # NAST:NAS.RFA                                                    
                                                                                    UM   MTA                                        
0          VSS (component 1078) PDS containing NASTRAN Rigid Format Alters,
           whatever that is. Created from unloaded PDS on MSC NASTRAN tape using
           *IEHMOVE (291) with PAR=VSS. Not distributed due to copyright
           restrictions.
0          Referenced by comments of: 824/2 
00824/007   NASTRAN                  DEMO            D   G        # MTA:NAS.DEMO1                                                   
                                                                                    UM   MTA                                        
0          Test input to NASTRAN. Not distributed due to copyright restrictions.
1                                                                                               SUN SEP 08/96   15:24:55   Page  667
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00824/008C  NASTRAN                  DEMO            D   G        # MTA:NAS.DEMO2                                                   
                                                                                    UM   MTA                                        
0          Test input to NASTRAN. Not distributed due to copyright restrictions.
00824/009   NASTRAN                  OS JCL              G        # S0938 FSAVE2 VLO FSNAME=NAS.OSJCL                               
                                                                                    UM   MTA                                        
0          PROC library for NASTRAN in OS/MVS.  Not distributed due to copyright
           restrictions.
00824/010A  NASTRAN                  WRITEUP         WF  G          S0045 FSAVE3 FSNAME=NAS.W                                   97  
            5.1T2   591  NASTRAN.WRITEUP.WF.010             1 LINE     72    3 PAGE UM   MTA                 JAN. 18, 1983  00:38:42
0          Writeup on running NASTRAN in MTS.
00825/001A *PASCALTIDY                               SW  O          W591:PASCTIDY.S                                                 
            5.1T2   592  PASCALTIDY..SW.001                 1 LINE     86   20 PAGE UM   RAMANUJAN           JULY 23, 1983  13:57:03
0          The source for a Pascal program reformatter and tidier. Compile using Pascal/VS (823).
            
           ***********************************************************************
           D5.1 version:
            
           Pascaltidy was changed to include Pascal/VS extensions.
           ***********************************************************************
00825/002A *PASCALTIDY                               OL  O          *PASCALTIDY                                                     
            5.1T2   593  PASCALTIDY..OL.002                 1 LINE  29684    9 PAGE UM   RAMANUJAN           JULY 23, 1983  13:57:08
                         *PASCALTIDY          
0          Requires the Pascal/VS runtime library (823/7).
00825/003C *PASCALTIDY                               P   O          PVS:PASCALTIDY.W                                                
            5.1T2   594  PASCALTIDY..P.003                  1 LINE     62    5 PAGE UM   RAMANUJAN           JULY 23, 1983  13:57:09
0          Page-printer-ready writeup for *PASCALTIDY.
00826/001C  OS SIMULATOR RTNS        IOMACLIB        SM  G          S1516 'PL1 OPTIMIZER' FSNAME=IOMACLIB                           
            5.1T2   595  OS_SIMULATOR_RTNS.IOMACLI.SM.001   1 LINE     73   10 PAGE UM   TIFFANY             MAY  02, 1983  11:30:35
0          I/O macro library used by I/O routines and PL/I Optimizer library (827).
0          Referenced by comments of: 826/2, 826/3, 826/4, 826/5, 826/6, 826/7, 826/8, 826/9, 826/10, 826/11, 826/12, 827/1 
00826/002A  OS SIMULATOR RTNS        ATTACH          SA  G  ATTA    S1516 'PL1 OPTIMIZER' FSNAME=ATTACH                             
            5.1T2   596  OS_SIMULATOR_RTNS.ATTACH.SA.002    1 LINE     80   14 PAGE UM   TIFFANY             MAY  02, 1983  11:30:37
0          Routine that attaches FDnames to PL/I files.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
            
           **********************************************************************
           D5.0B version:
1                                                                                               SUN SEP 08/96   15:24:55   Page  668
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           Changed to allow FORTRAN users to call it.
           **********************************************************************
0          Referenced by comments of: 826/13 
00826/003C  OS SIMULATOR RTNS        CHKLIO          SA  G  CHKL    S1516 'PL1 OPTIMIZER' FSNAME=CHKLIO                             
            5.1T2   597  OS_SIMULATOR_RTNS.CHKLIO.SA.003    1 LINE     80    3 PAGE UM   TIFFANY             MAY  02, 1983  11:30:39
0          A routine to test if DDname is an MTS logical I/O unit.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/004C  OS SIMULATOR RTNS        CLOSE           SA  G  CLOS    S1516 'PL1 OPTIMIZER' FSNAME=CLOSE                              
            5.1T2   598  OS_SIMULATOR_RTNS.CLOSE.SA.004     1 LINE     80    6 PAGE UM   TIFFANY             MAY  02, 1983  11:30:40
0          A routine to close DCB's.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/005C  OS SIMULATOR RTNS        DEVTYPE         SA  G  DEVT    S1516 'PL1 OPTIMIZER' FSNAME=DEVTYPE                            
            5.1T2   599  OS_SIMULATOR_RTNS.DEVTYPE.SA.005   1 LINE     80    3 PAGE UM   TIFFANY             MAY  02, 1983  11:30:41
0          A routine that returns device information about a DDname.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/006C  OS SIMULATOR RTNS        FINDTIOT        SA  G  FIND    S1516 'PL1 OPTIMIZER' FSNAME=FINDTIOT                           
            5.1T2   600  OS_SIMULATOR_RTNS.FINDTIO.SA.006   1 LINE     80    3 PAGE UM   TIFFANY             MAY  02, 1983  11:30:42
0          A routine to find a TIOT (an I/O table entry) for a DDname.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/007C  OS SIMULATOR RTNS        FREEALL         SA  G  FREE    S1516 'PL1 OPTIMIZER' FSNAME=FREEALL                            
            5.1T2   601  OS_SIMULATOR_RTNS.FREEALL.SA.007   1 LINE     80    3 PAGE UM   TIFFANY             MAY  02, 1983  11:30:43
0          A routine to release all core spaces left over from I/O routines.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/008C  OS SIMULATOR RTNS        OPEN            SA  G  OPEN    S1516 'PL1 OPTIMIZER' FSNAME=OPEN                               
            5.1T2   602  OS_SIMULATOR_RTNS.OPEN.SA.008      1 LINE     80   14 PAGE UM   TIFFANY             MAY  02, 1983  11:30:44
0          A routine to open OS-type DCB's.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
           Copies *GDINFODSECT (594/1) and *SENSEDSECT (3025).
00826/009C  OS SIMULATOR RTNS        GETPOOL         SA  G  POOL    S1516 'PL1 OPTIMIZER' FSNAME=GETPOOL                            
            5.1T2   603  OS_SIMULATOR_RTNS.GETPOOL.SA.009   1 LINE     80    3 PAGE UM   TIFFANY             MAY  02, 1983  11:30:57
0          A routine to obtain or release buffer pools.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  669
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/010C  OS SIMULATOR RTNS        REPLACE         SA  G  REPL    S1516 'PL1 OPTIMIZER' FSNAME=REPLACE                            
            5.1T2   604  OS_SIMULATOR_RTNS.REPLACE.SA.010   1 LINE     80    3 PAGE UM   TIFFANY             MAY  02, 1983  11:31:00
0          A routine to replace a TIOT with a new FDname.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
00826/011A  OS SIMULATOR RTNS        ROUTINES        SA  G  RTNS    S1516 'PL1 OPTIMIZER' FSNAME=ROUTINES                           
            5.1T2   605  OS_SIMULATOR_RTNS.ROUTINE.SA.011   1 LINE     80   36 PAGE UM   TIFFANY             MAY  02, 1983  11:31:00
0          This contains many GET and PUT routines.
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
           Copies *GDINFODSECT (594/1) and *SENSEDSECT (3025).
            
           *********************************************************************
           D5.0B version:
            
           Fixed bug.
           *********************************************************************
00826/012C  OS SIMULATOR RTNS        WHYNONE         SA  G  WHY     S1516 'PL1 OPTIMIZER' FSNAME=WHYNONE                            
            5.1T2   606  OS_SIMULATOR_RTNS.WHYNONE.SA.012   1 LINE     80    4 PAGE UM   TIFFANY             MAY  02, 1983  11:31:04
0          A routine to figure out why GDINFO returned type "NONE".
            
           Assemble with IOMACLIB (826/1) with parameters: RENT,TEST,PEXIT(*PEXIT)
           Copies *GFINFODSECT (593/1).
0          Referenced by comments of: 826/13 
00826/013A  OS SIMULATOR RTNS        IOPACK          O   G          PL1:IOPACK                                                      
            5.1T2   607  OS_SIMULATOR_RTNS.IOPACK.O.013     1 LINE   5722   16 PAGE UM   TIFFANY             JULY 23, 1983  13:57:25
0          The object modules of everything in the subcomponents (826/2) - (826/12).
00827/001C  PL1 OPTIMIZER LIBRARY    HOWTOINSTALL.W  WF  G          S1516 'PL1 OPTIMIZER' FSNAME=INSTALL.W                          
            5.1T2   608  PL1_OPTIMIZER_LIBRARY.HOW.WF.001   1 LINE     72    1 PAGE UM   TIFFANY             MAY  02, 1983  11:27:56
0          Writeup describing how to install the PL/I Optimizer Library.
            
           The following are required:
                 Program Product 5734-PL3: Release 3, Modification Level 1.
                 Basic tape, unlabeled, 33 files.
                 Source tape 3, 3 files.
            
           NOTE: Since the third file on the source tape 3 is incomplete, the source tape
                 for the program product 5734-LM5 must be ordered to complete the third
                 file.
            
           NOTE: All the PL/I Optimizer resident and transient library routines are 
                 to be assembled with two macro libraries IOMACLIB (826/1) and
1                                                                                               SUN SEP 08/96   15:24:55   Page  670
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                PL1OPTLIBMAC (827/7) and with the following parameters:
                     XREF(SHORT),RENT 
                 Exceptions are noted.
0          Referenced by comments of: 514/4, 826/1, 827/4 
00827/002A  PL1 OPTIMIZER LIBRARY    SETLCSPL1LIB    C   G          S1516 'PL1 OPTIMIZER' FSNAME=SETLCSPL1LIB                       
            5.1T2   609  PL1_OPTIMIZER_LIBRARY.SET.C.002    1 LINE    100    4 PAGE UM   TIFFANY             MAY  02, 1983  11:27:57
0          Commands that actually set up LCSPL1LIB, given the basic tape of the
           program product 5734-PL3 and the source tape of the program product
           5734-LM5.
            
           ****************************************************************************
           D5.0B version:
            
           Certain line is corrected.
           ****************************************************************************
00827/003C  PL1 OPTIMIZER LIBRARY    SETPL1LIB       C   G          S1516 'PL1 OPTIMIZER' FSNAME=SETPL1LIB                          
            5.1T2   610  PL1_OPTIMIZER_LIBRARY.SET.C.003    1 LINE    100    3 PAGE UM   TIFFANY             MAY  02, 1983  11:27:59
0          The commands that will actually set up the file *PL1OPTLIB, given two
           tapes: the basic tape of the program product 5734-PL3 and the source tape 3.
00827/004C  PL1 OPTIMIZER LIBRARY    PLTRLIB.S       SA  G          S1516 'PL1 OPTIMIZER' FSNAME=PLTRLIB.S                          
            5.1T2   611  PL1_OPTIMIZER_LIBRARY.PLT.SA.004   1 LINE     52    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:00
0          This source generates default run-time options.  The macro library
               (file 26 on the basic tape of program product 5734-PL3) is required. 
               See the installation writeup (827/1) for details.
               Transient library options are described in IBM publication
               "OS PL/I Optimizing Compiler: Installation", form 
               SC33-0026-6, pages 94-95.
00827/005A  PL1 OPTIMIZER LIBRARY    PL1OPTLIB       OL  G        # *PL1OPTLIB                                                      
                                                                                    UM   TIFFANY                                    
0          PL/I Optimizer library to be concatenated with programs produced from
               PL/I Optimizing Compiler.  This consists of all PL/I Optimizer resident
               library routines.
            
           *** Due to IBM copyright restrictions, the library cannot be distributed. ***
            
0          Referenced by comments of: 496/23, 496/24, 506/13, 715/44, 813/58, 821/39 
00827/006A  PL1 OPTIMIZER LIBRARY    LCSPL1LIB       O   G        # SEG2:LCSPL1LIB                                                  
                                                                                    UM   TIFFANY                                    
                         SEG2:LCSPL1LIB       
0          This file is loaded into shared virtual memory at system load.
               Almost all transient library modules and I/O simulator routines are
               in this file.
1                                                                                               SUN SEP 08/96   15:24:55   Page  671
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          The first module in the file should be IBMBPSLA (827/56).
            
           *** Due to IBM copyright restrictions, this cannot be distributed. ***
00827/007C  PL1 OPTIMIZER LIBRARY    PL1OPTLIBMAC    SM  G        # PL1:PL1OPTLIBMAC                                                
                                                                                    UM   TIFFANY                                    
0          This is a macro library that is used to assemble all PL/I Optimizer library
               modules. 
            
           *** Due to IBM copyright restrictions, this cannot be distributed. ***
0          Referenced by comments of: 827/1 
00827/008C  PL1 OPTIMIZER LIBRARY    PL1LIBMAC.UP    UC  G          S1516 'PL1 OPTIMIZER' FSNAME=PL1LIBMAC.UP                       
            5.1T2   612  PL1_OPTIMIZER_LIBRARY.PL1.UC.008   1 LINE     66    3 PAGE UM   TIFFANY             MAY  02, 1983  11:28:20
0          Update input to *CDUPDATE to produce a macro library from IBM PL/I Optimizer
               macro library for library routines.
               Then issue the following:
                      $RUN PECKER 0=output SPUNCH=PL1OPTLIBMAC
               where PECKER is a program from component (506/8) and "output" is the
               output from *CDUPDATE.
00827/009A  PL1 OPTIMIZER LIBRARY    DMSIBM          UC  G          S1516 'PL1 OPTIMIZER' FSNAME=DMSIBM.UP                          
            5.1T2   613  PL1_OPTIMIZER_LIBRARY.DMS.UC.009   1 LINE     51    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:21
0          Update to resident library source DMSIBM.  This applies only to relevant
               parts (IBMBKSTA and IBMBKCPA) to indicate that PLISORT, PLICHKPT, 
               PLIREST, PLICANC produce an error message since SORT and CHECKPOINT are
               not available.
            
           ****************************************************************************
           D5.0B version:
            
           FETCH statement now supported.
           ****************************************************************************
00827/010C  PL1 OPTIMIZER LIBRARY    IBMBCCSA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBCCSA.UP                        
            5.1T2   614  PL1_OPTIMIZER_LIBRARY.IBM.UC.010   1 LINE     51    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:22
0          Update to resident library routine IBMBCCSA: String conversion director
               bootstrap.
00827/011C  PL1 OPTIMIZER LIBRARY    IBMBEATA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBEATA.UP                        
            5.1T2   615  PL1_OPTIMIZER_LIBRARY.IBM.UC.011   1 LINE     60    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:23
0          Update to resident library routine IBMBEATA: Attention interrupt handler.
00827/012C  PL1 OPTIMIZER LIBRARY    IBMBEDWA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBEDWA.UP                        
            5.1T2   616  PL1_OPTIMIZER_LIBRARY.IBM.UC.012   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:25
0          Update to transient library routine IBMBEDWA: Console transmitter.
1                                                                                               SUN SEP 08/96   15:24:55   Page  672
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/013C  PL1 OPTIMIZER LIBRARY    IBMBEFCA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBEFCA.UP                        
            5.1T2   617  PL1_OPTIMIZER_LIBRARY.IBM.UC.013   1 LINE     55    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:26
0          Update to transient library routine IBMBEFCA: Print COUNT tables.
00827/014C  PL1 OPTIMIZER LIBRARY    IBMBEMNA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBEMNA.UP                        
            5.1T2   618  PL1_OPTIMIZER_LIBRARY.IBM.UC.014   1 LINE     42    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:27
0          Update to resident library routine IBMBEMNA: Default main procedure.
               This is just a plain Csect called PLIMAIN in case that the user
               does not provide a main proceudre.  It will tell him that there
               is no main procedure.
00827/015C  PL1 OPTIMIZER LIBRARY    IBMBERRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBERRA.UP                        
            5.1T2   619  PL1_OPTIMIZER_LIBRARY.IBM.UC.015   1 LINE     71    3 PAGE UM   TIFFANY             MAY  02, 1983  11:28:28
0          Update to resident library routine IBMBERRA: Error handler.
00827/016C  PL1 OPTIMIZER LIBRARY    IBMBESMA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBESMA.UP                        
            5.1T2   620  PL1_OPTIMIZER_LIBRARY.IBM.UC.016   1 LINE     43    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:29
0          Update to transient library routine IBMBESMA: Error message routine phase 1.
00827/017C  PL1 OPTIMIZER LIBRARY    IBMBESNA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBESNA.UP                        
            5.1T2   621  PL1_OPTIMIZER_LIBRARY.IBM.UC.017   1 LINE     68    2 PAGE UM   TIFFANY             MAY  02, 1983  11:28:30
0          Update to transient library routine IBMBESNA: Error message routine phase 2.
00827/018C  PL1 OPTIMIZER LIBRARY    IBMBETBA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBETBA.UP                        
            5.1T2   622  PL1_OPTIMIZER_LIBRARY.IBM.UC.018   1 LINE     72    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:31
0          Update to transient library routine IBMBETBA: miscellaneous non-ON messages 
               (2).
00827/019C  PL1 OPTIMIZER LIBRARY    IBMBETQA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBETQA.UP                        
            5.1T2   623  PL1_OPTIMIZER_LIBRARY.IBM.UC.019   1 LINE     72    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:33
0          Update to transient library routine IBMBETQA: ON-messages (3).
00827/020C  PL1 OPTIMIZER LIBRARY    IBMBIECA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBIECA.UP                        
            5.1T2   624  PL1_OPTIMIZER_LIBRARY.IBM.UC.020   1 LINE     67    2 PAGE UM   TIFFANY             MAY  02, 1983  11:28:34
0          Update to resident library routine IBMBIECA: COBOL interlanguage housekeeping.
00827/021C  PL1 OPTIMIZER LIBRARY    IBMBIEFA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBIEFA.UP                        
            5.1T2   625  PL1_OPTIMIZER_LIBRARY.IBM.UC.021   1 LINE     68    3 PAGE UM   TIFFANY             MAY  02, 1983  11:28:36
0          Update to resident library routine IBMBIEFA: FORTRAN interlanguage
               housekeeping.
00827/022C  PL1 OPTIMIZER LIBRARY    IBMBIEPA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBIEPA.UP                        
            5.1T2   626  PL1_OPTIMIZER_LIBRARY.IBM.UC.022   1 LINE     67    2 PAGE UM   TIFFANY             MAY  02, 1983  11:28:37
0          Update to resident library routine IBMBIEPA: interlanguage  housekeeping
1                                                                                               SUN SEP 08/96   15:24:55   Page  673
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0              for PL/I procedures with OPTIONS(COBOL) or OPTIONS(FORTRAN).
00827/023C  PL1 OPTIMIZER LIBRARY    IBMBJDSA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBJDSA.UP                        
            5.1T2   627  PL1_OPTIMIZER_LIBRARY.IBM.UC.023   1 LINE     66    2 PAGE UM   TIFFANY             MAY  02, 1983  11:28:38
0          Update to resident library routine IBMBJDSA: Display statement module.
00827/024C  PL1 OPTIMIZER LIBRARY    IBMBJDTA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBJDTA.UP                        
            5.1T2   628  PL1_OPTIMIZER_LIBRARY.IBM.UC.024   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:28:40
0          Update to resident library routine IBMBJDTA: DATE built-in function.
00827/025C  PL1 OPTIMIZER LIBRARY    IBMBJDYA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBJDYA.UP                        
            5.1T2   629  PL1_OPTIMIZER_LIBRARY.IBM.UC.025   1 LINE     64    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:03
0          Update to resident library routine IBMBJDYA: Delay statement module.
00827/026C  PL1 OPTIMIZER LIBRARY    IBMBJTTA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBJTTA.UP                        
            5.1T2   630  PL1_OPTIMIZER_LIBRARY.IBM.UC.026   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:05
0          Update to resident library routine IBMBJTTA: TIME built-in function.
00827/027C  PL1 OPTIMIZER LIBRARY    IBMBJWTA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBJWTA.UP                        
            5.1T2   631  PL1_OPTIMIZER_LIBRARY.IBM.UC.027   1 LINE     48    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:06
0          Update to resident library routine IBMBJWTA: WAIT statement module.
00827/028C  PL1 OPTIMIZER LIBRARY    IBMBKDMA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKDMA.UP                        
            5.1T2   632  PL1_OPTIMIZER_LIBRARY.IBM.UC.028   1 LINE     50    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:07
0          Update to resident library routine IBMBKDMA: Dump bootstrap.
00827/029C  PL1 OPTIMIZER LIBRARY    IBMBKDOA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKDOA.UP                        
            5.1T2   633  PL1_OPTIMIZER_LIBRARY.IBM.UC.029   1 LINE     68    3 PAGE UM   TIFFANY             MAY  02, 1983  11:29:08
0          Update to transient library routine IBMBKDOA: Open dump file.
00827/030C  PL1 OPTIMIZER LIBRARY    IBMBKDTA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKDTA.UP                        
            5.1T2   634  PL1_OPTIMIZER_LIBRARY.IBM.UC.030   1 LINE     68    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:09
0          Update to transient library routine IBMBKDTA: dump file transmitter.
00827/031C  PL1 OPTIMIZER LIBRARY    IBMBKFAA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKFAA.UP                        
            5.1T2   635  PL1_OPTIMIZER_LIBRARY.IBM.UC.031   1 LINE     72    3 PAGE UM   TIFFANY             MAY  02, 1983  11:29:11
0          Update to transient library routine IBMBKFAA: Dump of file attributes
               module.
00827/032C  PL1 OPTIMIZER LIBRARY    IBMBKMRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKMRA.UP                        
            5.1T2   636  PL1_OPTIMIZER_LIBRARY.IBM.UC.032   1 LINE     69    4 PAGE UM   TIFFANY             MAY  02, 1983  11:29:13
0          Update to transient library routine IBMBKMRA: Main dump control module.
1                                                                                               SUN SEP 08/96   15:24:55   Page  674
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/033C  PL1 OPTIMIZER LIBRARY    IBMBKPTA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKPTA.UP                        
            5.1T2   637  PL1_OPTIMIZER_LIBRARY.IBM.UC.033   1 LINE     68    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:15
0          Update to transient library routine IBMBKPTA: Dump parameter translate
               module. 
00827/034C  PL1 OPTIMIZER LIBRARY    IBMBKTBA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKTBA.UP                        
            5.1T2   638  PL1_OPTIMIZER_LIBRARY.IBM.UC.034   1 LINE     72    2 PAGE UM   TIFFANY             MAY  02, 1983  11:29:16
0          Update to transient library routine IBMBKTBA: Save area control block 
               printout module.
00827/035C  PL1 OPTIMIZER LIBRARY    IBMBKTCA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKTCA.UP                        
            5.1T2   639  PL1_OPTIMIZER_LIBRARY.IBM.UC.035   1 LINE     70    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:18
0          Update to transient library routine IBMBKTCA: Trace check module.
00827/036C  PL1 OPTIMIZER LIBRARY    IBMBKTRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBKTRA.UP                        
            5.1T2   640  PL1_OPTIMIZER_LIBRARY.IBM.UC.036   1 LINE     70    3 PAGE UM   TIFFANY             MAY  02, 1983  11:29:19
0          Update to transient library routine IBMBKTRA: Dump trace analyzer module.
00827/037C  PL1 OPTIMIZER LIBRARY    IBMBMCEA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBMCEA.UP                        
            5.1T2   641  PL1_OPTIMIZER_LIBRARY.IBM.UC.037   1 LINE     52    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:20
0          Update to resident library routine IBMBMCEA: ERF, ERFC (extended float real).
00827/038C  PL1 OPTIMIZER LIBRARY    IBMBMCTA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBMCTA.UP                        
            5.1T2   642  PL1_OPTIMIZER_LIBRARY.IBM.UC.038   1 LINE     58    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:21
0          Update to transient library routine IBMBMCTA: ERF/ERFC (extended float).
           ----------
           NOTE:  Place the object in *PL1OPTLIB not in SEG2:LCSPL1LIB.
00827/039C  PL1 OPTIMIZER LIBRARY    IBMBOCAA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBOCAA.UP                        
            5.1T2   643  PL1_OPTIMIZER_LIBRARY.IBM.UC.039   1 LINE     66    3 PAGE UM   TIFFANY             MAY  02, 1983  11:29:23
0          Update to transient library routine IBMBOCAA: Close statement module.
00827/040C  PL1 OPTIMIZER LIBRARY    IBMBOCLA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBOCLA.UP                        
            5.1T2   644  PL1_OPTIMIZER_LIBRARY.IBM.UC.040   1 LINE     54    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:24
0          Update to resident library routine IBMBOCLA: Open/close bootstrap.
00827/041C  PL1 OPTIMIZER LIBRARY    IBMBOPAA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBOPAA.UP                        
            5.1T2   645  PL1_OPTIMIZER_LIBRARY.IBM.UC.041   1 LINE     61    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:25
0          Update to transient library routine IBMBOPAA: open routine, phase 1.
00827/042C  PL1 OPTIMIZER LIBRARY    IBMBOPBA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBOPBA.UP                        
            5.1T2   646  PL1_OPTIMIZER_LIBRARY.IBM.UC.042   1 LINE     67    4 PAGE UM   TIFFANY             MAY  02, 1983  11:29:27
0          Update to transient library routine IBMBOPBA: Open routine, phase 2.
1                                                                                               SUN SEP 08/96   15:24:55   Page  675
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/043C  PL1 OPTIMIZER LIBRARY    IBMBOPCA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBOPCA.UP                        
            5.1T2   647  PL1_OPTIMIZER_LIBRARY.IBM.UC.043   1 LINE     68    3 PAGE UM   TIFFANY             MAY  02, 1983  11:29:28
0          Update to transient library routine: Open routine, phase 3.
00827/044C  PL1 OPTIMIZER LIBRARY    IBMBOPDA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBOPDA.UP                        
            5.1T2   648  PL1_OPTIMIZER_LIBRARY.IBM.UC.044   1 LINE     65    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:29
0          Update to transient library routine IBMBOPDA: Open routine, phase 4.
00827/045C  PL1 OPTIMIZER LIBRARY    IBMBPEPA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPEPA.UP                        
            5.1T2   649  PL1_OPTIMIZER_LIBRARY.IBM.UC.045   1 LINE     43    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:30
0          Update to transient library routine IBMBPEPA: Diagnostic message director.
00827/046C  PL1 OPTIMIZER LIBRARY    IBMBPEQA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPEQA.UP                        
            5.1T2   650  PL1_OPTIMIZER_LIBRARY.IBM.UC.046   1 LINE     61    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:31
0          Update to transient library routine IBMBPEQA: SYSPRINT message module.
00827/047C  PL1 OPTIMIZER LIBRARY    IBMBPERA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPERA.UP                        
            5.1T2   651  PL1_OPTIMIZER_LIBRARY.IBM.UC.047   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:32
0          Update to transient library routine IBMBPERA: Console message transmitter 1.
00827/048C  PL1 OPTIMIZER LIBRARY    IBMBPETA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPETA.UP                        
            5.1T2   652  PL1_OPTIMIZER_LIBRARY.IBM.UC.048   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:34
0          Update to transient library routine IBMBPETA: Console message transmitter 2.
00827/049C  PL1 OPTIMIZER LIBRARY    IBMBPFRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPFRA.UP                        
            5.1T2   653  PL1_OPTIMIZER_LIBRARY.IBM.UC.049   1 LINE     68    3 PAGE UM   TIFFANY             MAY  02, 1983  11:29:35
0          Update to resident library routine IBMBPFRA:  FETCH/RELEASE statements.
            
           ******************************************************************
           D5.0B version:
            
           The FETCH/RELEASE statements now supported.
           *****************************************************************
00827/050C  PL1 OPTIMIZER LIBRARY    IBMBPGDA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPGDA.UP                        
            5.1T2   654  PL1_OPTIMIZER_LIBRARY.IBM.UC.050   1 LINE     44    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:37
0          Update to transient library routine IBMBPGDA: Storage management with REPORT
               option.
00827/051C  PL1 OPTIMIZER LIBRARY    IBMBPGRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPGRA.UP                        
            5.1T2   655  PL1_OPTIMIZER_LIBRARY.IBM.UC.051   1 LINE     44    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:38
0          Update to transient library routine IBMBPGRA: Storage management without 
               REPORT option.
1                                                                                               SUN SEP 08/96   15:24:55   Page  676
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/052A  PL1 OPTIMIZER LIBRARY    IBMBPIIA        UC  G          PL1:IBMBPIIA.UP                                                 
            5.1T2   656  PL1_OPTIMIZER_LIBRARY.IBM.UC.052   1 LINE     68    5 PAGE UM   TIFFANY             JULY 23, 1983  13:57:58
0          Update to transient library routine IBMBPIIA: Program ISA initialization.
            
           ************************************************************************
           D5.1 version:
            
           IBM loophole, which causes the whole PAR string to be passed, is closed.
           ************************************************************************
00827/053C  PL1 OPTIMIZER LIBRARY    IBMBPIRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPIRA.UP                        
            5.1T2   657  PL1_OPTIMIZER_LIBRARY.IBM.UC.053   1 LINE     60    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:43
0          Update to resident library routine IBMBPIRA: Program initialization.
00827/054A  PL1 OPTIMIZER LIBRARY    IBMBPITA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPITA.UP                        
            5.1T2   658  PL1_OPTIMIZER_LIBRARY.IBM.UC.054   1 LINE     65    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:44
0          Update to transient library routine IBMBPITA: Program termination.
00827/055C  PL1 OPTIMIZER LIBRARY    IBMBPMRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPMRA.UP                        
            5.1T2   659  PL1_OPTIMIZER_LIBRARY.IBM.UC.055   1 LINE     64    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:45
0          Update to transient library routine IBMBPMRA: Program management report 
               module.
00827/056C  PL1 OPTIMIZER LIBRARY    IBMBPSLA        SA  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBPSLA.S                         
            5.1T2   660  PL1_OPTIMIZER_LIBRARY.IBM.SA.056   1 LINE     52    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:47
0          This generates a low-core symbol table of the shared virtual memory part 
               of the library LCSPL1LIB.  A COM record is produced by the PUNCH
               statement suitable for PISTLE (559) to load into the shared virtual
               memory. 
0          Referenced by comments of: 827/6 
00827/057C  PL1 OPTIMIZER LIBRARY    IBMBRIOA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBRIOA.UP                        
            5.1T2   661  PL1_OPTIMIZER_LIBRARY.IBM.UC.057   1 LINE     54    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:50
0          Update to resident library routine IBMBRIOA: Record I/O interface module.
00827/058C  PL1 OPTIMIZER LIBRARY    IBMBSICA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBSICA.UP                        
            5.1T2   662  PL1_OPTIMIZER_LIBRARY.IBM.UC.058   1 LINE     68    2 PAGE UM   TIFFANY             MAY  02, 1983  11:29:51
0          Update to transient library routine IBMBSICA: Conversational input 
               transmitter.
00827/059C  PL1 OPTIMIZER LIBRARY    IBMBSIOA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBSIOA.UP                        
            5.1T2   663  PL1_OPTIMIZER_LIBRARY.IBM.UC.059   1 LINE     40    1 PAGE UM   TIFFANY             MAY  02, 1983  11:29:58
0          Update to resident library routine IBMBSIOA: Put File initialization.
1                                                                                               SUN SEP 08/96   15:24:55   Page  677
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/060C  PL1 OPTIMIZER LIBRARY    IBMBSOCA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBSOCA.UP                        
            5.1T2   664  PL1_OPTIMIZER_LIBRARY.IBM.UC.060   1 LINE     66    2 PAGE UM   TIFFANY             MAY  02, 1983  11:30:00
0          Update to transient library routine IBMBSOCA: Conversational output 
               transmitter.
00827/061C  PL1 OPTIMIZER LIBRARY    IBMBSPCA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBSPCA.UP                        
            5.1T2   665  PL1_OPTIMIZER_LIBRARY.IBM.UC.061   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:01
0          Update to transient library routine IBMBSPCA: Conversational File formatting.
00827/062C  PL1 OPTIMIZER LIBRARY    IBMBSPLA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBSPLA.UP                        
            5.1T2   666  PL1_OPTIMIZER_LIBRARY.IBM.UC.062   1 LINE     66    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:02
0          Update to resident library routine IBMBSPLA: PAGE, LINE, and SKIP.
00827/063C  PL1 OPTIMIZER LIBRARY    IBMBSXCA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBSXCA.UP                        
            5.1T2   667  PL1_OPTIMIZER_LIBRARY.IBM.UC.063   1 LINE     38    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:03
0          Update to resident library routine IBMBSXCA: Process X and COLUMN format
               items.
00827/064C  PL1 OPTIMIZER LIBRARY    IBMBTPRA        UC  G          S1516 'PL1 OPTIMIZER' FSNAME=IBMBTPRA.UP                        
            5.1T2   668  PL1_OPTIMIZER_LIBRARY.IBM.UC.064   1 LINE     43    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:05
0          Update to resident library routine IBMBTPRA: PRIORITY Pseudovariable.
00827/065C  PL1 OPTIMIZER LIBRARY    TEST1           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST1                              
            5.1T2   669  PL1_OPTIMIZER_LIBRARY.TES.SP.065   1 LINE     60    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:07
0          Routine to test builtin functions TIME and DATE.
00827/066C  PL1 OPTIMIZER LIBRARY    TEST2           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST2                              
            5.1T2   670  PL1_OPTIMIZER_LIBRARY.TES.SP.066   1 LINE     64    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:09
0          Routine to test DELAY statement.
00827/067C  PL1 OPTIMIZER LIBRARY    TEST3           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST3                              
            5.1T2   671  PL1_OPTIMIZER_LIBRARY.TES.SP.067   1 LINE     68    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:10
0          Routine to test DISPLAY statement.
00827/068C  PL1 OPTIMIZER LIBRARY    TEST4           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST4                              
            5.1T2   672  PL1_OPTIMIZER_LIBRARY.TES.SP.068   1 LINE     53    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:12
0          Routine to test attentions.
00827/069C  PL1 OPTIMIZER LIBRARY    TEST5           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST5                              
            5.1T2   673  PL1_OPTIMIZER_LIBRARY.TES.SP.069   1 LINE     60    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:13
0          Routine to test record I/O.
1                                                                                               SUN SEP 08/96   15:24:55   Page  678
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/070C  PL1 OPTIMIZER LIBRARY    TEST6           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST6                              
            5.1T2   674  PL1_OPTIMIZER_LIBRARY.TES.SP.070   1 LINE     62    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:14
0          Routine to test stream I/O.
00827/071C  PL1 OPTIMIZER LIBRARY    TEST7           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST7                              
            5.1T2   675  PL1_OPTIMIZER_LIBRARY.TES.SP.071   1 LINE     61    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:15
0          Routine to test files with BACKWARDS attributes.
00827/072C  PL1 OPTIMIZER LIBRARY    TEST8           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST8                              
            5.1T2   676  PL1_OPTIMIZER_LIBRARY.TES.SP.072   1 LINE     61    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:16
0          Routine to test a call to SORT2.
00827/073C  PL1 OPTIMIZER LIBRARY    TEST9           SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST9                              
            5.1T2   677  PL1_OPTIMIZER_LIBRARY.TES.SP.073   1 LINE     70    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:17
0          Routine to test PRINT files.
00827/074C  PL1 OPTIMIZER LIBRARY    TEST10          SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST10                             
            5.1T2   678  PL1_OPTIMIZER_LIBRARY.TES.SP.074   1 LINE     47    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:18
0          Routine to test PLIDUMP routine.
00827/075C  PL1 OPTIMIZER LIBRARY    TEST11          SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST11                             
            5.1T2   679  PL1_OPTIMIZER_LIBRARY.TES.SP.075   1 LINE     64    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:19
0          Calls GRJLDT and GRJLTM as FORTRAN routines.
00827/076C  PL1 OPTIMIZER LIBRARY    TEST12.A        SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST12.A                           
            5.1T2   680  PL1_OPTIMIZER_LIBRARY.TES.SP.076   1 LINE     49    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:20
0          Routine to call a FORTRAN subroutine (827/77).
0          Referenced by comments of: 827/77 
00827/077C  PL1 OPTIMIZER LIBRARY    TEST12.B        SF  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST12.B                           
            5.1T2   681  PL1_OPTIMIZER_LIBRARY.TES.SF.077   1 LINE     24    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:21
0          A FORTRAN routine called by (827/76).
0          Referenced by comments of: 827/76 
00827/078C  PL1 OPTIMIZER LIBRARY    TEST13.A        SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST13.A                           
            5.1T2   682  PL1_OPTIMIZER_LIBRARY.TES.SP.078   1 LINE     56    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:23
0          Calls a FORTRAN subroutine (827/79) which will be interrupted by 
           ZERODIVIDE.
0          Referenced by comments of: 827/79 
1                                                                                               SUN SEP 08/96   15:24:55   Page  679
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00827/079C  PL1 OPTIMIZER LIBRARY    TEST13.B        SF  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST13.B                           
            5.1T2   683  PL1_OPTIMIZER_LIBRARY.TES.SF.079   1 LINE     24    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:24
0          A FORTRAN subroutine which attempts to divide by zero.  Called by (827/78).
0          Referenced by comments of: 827/78 
00827/080C  PL1 OPTIMIZER LIBRARY    TEST14.A        SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST14.A                           
            5.1T2   684  PL1_OPTIMIZER_LIBRARY.TES.SP.080   1 LINE     67    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:25
0          Another test for calling a FORTRAN subroutine (827/81).
0          Referenced by comments of: 827/81 
00827/081C  PL1 OPTIMIZER LIBRARY    TEST14.B        SF  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST14.B                           
            5.1T2   685  PL1_OPTIMIZER_LIBRARY.TES.SF.081   1 LINE     24    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:26
0          A FORTRAN subroutine called by (827/80).
0          Referenced by comments of: 827/80 
00827/082C  PL1 OPTIMIZER LIBRARY    TEST15.A        SF  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST15.A                           
            5.1T2   686  PL1_OPTIMIZER_LIBRARY.TES.SF.082   1 LINE     47    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:27
0          Main FORTRAN program which calls a PL/I procedure (827/83).
0          Referenced by comments of: 827/83 
00827/083C  PL1 OPTIMIZER LIBRARY    TEST15.B        SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST15.B                           
            5.1T2   687  PL1_OPTIMIZER_LIBRARY.TES.SP.083   1 LINE     39    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:28
0          PL/I procedure that is called by the (827/82) FORTRAN program.
0          Referenced by comments of: 827/82 
00827/084C  PL1 OPTIMIZER LIBRARY    TEST16          SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST16                             
            5.1T2   688  PL1_OPTIMIZER_LIBRARY.TES.SP.084   1 LINE     78    3 PAGE UM   TIFFANY             MAY  02, 1983  11:30:29
0          A program that lists files.
00827/085C  PL1 OPTIMIZER LIBRARY    TEST17          SP  G          S1516 'PL1 OPTIMIZER' FSNAME=TEST17                             
            5.1T2   689  PL1_OPTIMIZER_LIBRARY.TES.SP.085   1 LINE     71    1 PAGE UM   TIFFANY             MAY  02, 1983  11:30:31
0          Tape ripple test (writes and then rereads it back).
00828/001A  MTS PMF PROJECT                          D              MTSS:MTSPROJ                                                    
            5.1T2   690  MTS_PMF_PROJECT..D.001             1 LINE    164   11 PAGE UM   MTS       BURLING   JULY 23, 1983  13:58:05
0          This is the PMF - Level 1.10 - (810) project file used for managing the MTS
           assemblies. Has procedures for updating and assembling, as well as various
           miscellaneous procedures. Assumes that the base source is in files, not on
           tape.
1                                                                                               SUN SEP 08/96   15:24:55   Page  680
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00828/002A  MTS PMF PROJECT          WRITEUP         WX             MTSS:MTSPROJ.WX                                                 
            5.1T2   691  MTS_PMF_PROJECT.WRITEUP.WX.002     1 LINE    117    6 PAGE UM   MTS       BURLING   JULY 23, 1983  13:58:08
0          This subcomponent is the TEXTFORM (3018) input to produce a writeup for the
           MTS PMF project.
00829/001C  TBLS                     D5.0A MASTER    SA  G          MTSS:TBLS/5.0                                                   
            5.1T2   692  TBLS.D5.0A_MASTER.SA.001           1 LINE     72    8 PAGE UM   MTS       BURLING   JULY 23, 1983  13:58:09
0          Miscellaneous tables used by the various MTS assemblies. Extracted
           mainly from the MTS deck. Copies *CNFGINFODSECT (654/1),
           COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), COPY:IT.DSECTS
           (1081/4), COPY:JOBSTA (413/9), and COPY:LLMPSEQU (087). Assemble using
           COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM
           (653/1), and COPY:DM.MACROS (769/29).
0          Referenced by comments of: 42/2 
00829/002A  TBLS                     UPDATE          UC  G          MTSS:TBLS/UPD                                                   
            5.1T2   693  TBLS.UPDATE.UC.002                 1 LINE     72    8 PAGE UM   MTS       BURLING   JULY 23, 1983  13:58:09
0          *CDUPDATE (1036) input to produce current source.
00829/003A  TBLS                     OBJECT          OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object is part of the Resident System (468).
00829/004A  TBLS                     LISTING         L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=TBLS.LIST                 
            5.1T2   694  TBLS.LISTING.L.004                 1 LINE    133  422 PAGE UM   MTS       BURLING   JULY 23, 1983  13:58:37
00829/005A  TBLS                     COMMENTS        D   G          MTSS:TBLS/COM                                                   
            5.1T2   695  TBLS.COMMENTS.D.005                1 LINE     67    1 PAGE UM   MTS       BURLING   JULY 23, 1983  13:58:41
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
00830/001C  PARSTR                                   SA  G          W164:PARSTR.S                                                   
            5.1T2   696  PARSTR..SA.001                     1 LINE     72    3 PAGE UM   STERKEN             JULY 23, 1983  13:58:41
0          This is a replacement for the PAR subroutine which is going to be phased out
           eventually. Documentation is in the first 40 lines of the program.
00830/002C  PARSTR                                   OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UM   STERKEN                                    
0          Object for the PARSTR subroutine.
00831/001C  ICON                     COMPILER        OE  G          *ICON                                                           
            5.1T2   697  ICON.COMPILER.OE.001               1 LINE  32767   50 PAGE UM   PICKELMAN           JULY 23, 1983  13:58:42
                         *ICON                
0          The ICON compiler, Version II. Originally written by Ralph E. Griswald at the
           University of Arizona. IBM 360-370 adaptation by Lois J. Morton at the
1                                                                                               SUN SEP 08/96   15:24:55   Page  681
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Systems Analysis Center, North Carolina University. Links to *FORTRANG (204).
           After preprocessing RATFOR source, it should generally be compiled with *FTN
           PAR=OVER,OPT=H. However, there are a few routines FORTRAN-H can't handle, and
           FORTRAN-G should be used. *OVERDRIVE (667) optimizes Boolean expressions.
00831/002C  ICON                     RUNTIME LIB     OL  G          *ICONLIB                                                        
            5.1T2   698  ICON.RUNTIME_LIB.OL.002            1 LINE   2630   53 PAGE UM   PICKELMAN           JULY 23, 1983  13:58:45
                         *ICONLIB             
0          The runtime support routines used by ICON programs.
00831/003C  ICON                     WRITEUP         P              *ICON.W                                                         
            5.1T2   699  ICON.WRITEUP.P.003                 1 LINE     66    1 PAGE UM   PICKELMAN           JULY 23, 1983  13:58:47
0          A short writeup on running ICON in MTS, with references for information
           about ICON.
            
           **********************************************************************
           D5.1 version:
            
           Improved for this distribution.
           **********************************************************************
00831/004C  ICON                     TEST            C              S1575 ICONFS VLO FSNAME=TEST                                    
            5.1T2   700  ICON.TEST.C.004                    1 LINE     97    3 PAGE UM   PICKELMAN           OCT. 07, 1981  02:38:33
0          A source file to test ICON. Some file names may need to be changed. Requires
           (831/5) through (831/9).
00831/005C  ICON                     TEST            SI  G          S1575 ICONFS VLO FSNAME=TEST.ICON                               
            5.1T2   701  ICON.TEST.SI.005                   1 LINE     72    9 PAGE UM   PICKELMAN           OCT. 07, 1981  02:39:41
0          Twelve ICON programs used to test the compiler.
0          Referenced by comments of: 831/4 
00831/006C  ICON                     TEST            D              S1575 ICONFS VLO FSNAME=TEST.IN                                 
            5.1T2   702  ICON.TEST.D.006                    1 LINE     50    1 PAGE UM   PICKELMAN           OCT. 07, 1981  02:40:03
0          Input data for the ICON test programs.
00831/007C  ICON                     TEST            D              S1575 ICONFS VLO FSNAME=TEST.OUT                                
            5.1T2   703  ICON.TEST.D.007                    1 LINE     73    6 PAGE UM   PICKELMAN           OCT. 07, 1981  02:40:15
0          The output from the ICON test programs.
00831/008C  ICON                     TEST            L              S1575 ICONFS VLO FSNAME=TEST.LIST                               
            5.1T2   704  ICON.TEST.L.008                    1 LINE     80   11 PAGE UM   PICKELMAN           OCT. 07, 1981  02:40:57
0          Listings of the ICON test programs.
1                                                                                               SUN SEP 08/96   15:24:55   Page  682
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00831/009C  ICON                     TEST            SF  G          S1575 ICONFS VLO FSNAME=TEST.FORT                               
            5.1T2   705  ICON.TEST.SF.009                   1 LINE     73   76 PAGE UM   PICKELMAN           OCT. 07, 1981  02:39:02
0          The FORTRAN programs generated by the first step of the compiler for the
           ICON test programs.
0          Referenced by comments of: 831/4 
00831/010C  ICON                     INCLUDES        D   G          S1575 ICONFS VLO FSNAME=INCDEF.ICONC                            
            5.1T2   706  ICON.INCLUDES.D.010                1 LINE     12    1 PAGE UM   PICKELMAN           SEP. 30, 1981  20:01:22
0          A file giving the correspondence between the include names used in ICON
           source, and unit numbers assigned by (832/2).
0          Referenced by comments of: 832/3 
00831/011C  ICON                     INCLUDES        S4  G          S1575 ICONFS VLO FSNAME=DEF                                     
            5.1T2   707  ICON.INCLUDES.S4.011               1 LINE     78    8 PAGE UM   PICKELMAN           OCT. 07, 1981  03:14:45
0          RATFOR (832) "DEFINE" statements included throughout the ICON source.
0          Referenced by comments of: 832/3 
00831/012C  ICON                     INCLUDES        S4  G          S1575 ICONFS VLO FSNAME=CMLIB                                   
            5.1T2   708  ICON.INCLUDES.S4.012               1 LINE     79    4 PAGE UM   PICKELMAN           OCT. 07, 1981  03:14:37
0          Common sections included throughout the ICON source.
0          Referenced by comments of: 832/3 
00831/013C  ICON                     RATIO           UC  G          S1575 ICONFS VLO FSNAME=RATIO.CDU                               
            5.1T2   709  ICON.RATIO.UC.013                  1 LINE     68    1 PAGE UM   PICKELMAN           OCT. 07, 1981  03:19:04
0          Updates to (831/14).
0          Referenced by comments of: 831/18 
00831/014C  ICON                     RATIO           SF  G          S1575 ICONFS VLO FSNAME=RATIO.FORT                              
            5.1T2   710  ICON.RATIO.SF.014                  1 LINE     73   11 PAGE UM   PICKELMAN           SEP. 30, 1981  20:00:52
0          The RATFOR (832) I/O system used by the compiler (831/19) and runtime support
           (831/24).
0          Referenced by comments of: 831/13, 831/18 
00831/015C  ICON                     MDEPEND         SF  G          S1575 ICONFS VLO FSNAME=MTSDEPEND.FORT                          
            5.1T2   711  ICON.MDEPEND.SF.015                1 LINE     65    1 PAGE UM   PICKELMAN           OCT. 07, 1981  02:58:56
0          The FORTRAN machine- and system-dependent routines used by the compiler
           (831/19) and runtime support (831/24).
0          Referenced by comments of: 831/18 
1                                                                                               SUN SEP 08/96   15:24:55   Page  683
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00831/016C  ICON                     MDEPEND         UC  G          S1575 ICONFS VLO FSNAME=MDEPEND.CDU                             
            5.1T2   712  ICON.MDEPEND.UC.016                1 LINE     68    1 PAGE UM   PICKELMAN           OCT. 07, 1981  03:01:04
0          Updates to (831/17).
0          Referenced by comments of: 831/18 
00831/017C  ICON                     MDEPEND         SA  G          S1575 ICONFS VLO FSNAME=MDEPEND.ASM                             
            5.1T2   713  ICON.MDEPEND.SA.017                1 LINE     80    5 PAGE UM   PICKELMAN           SEP. 30, 1981  20:00:56
0          The assembler machine- and system-dependent routines.
0          Referenced by comments of: 831/16, 831/18 
00831/018C  ICON                     LIBRARY         OL  G          S1575 ICONFS VLO FSNAME=LIB                                     
            5.1T2   714  ICON.LIBRARY.OL.018                1 LINE   2630   53 PAGE UM   PICKELMAN           OCT. 19, 1981  06:36:38
0          Object of (831/14) with (831/13) applied, (831/15), and (831/17) with
           (831/16) applied.
0          Referenced by comments of: 831/23, 831/26 
00831/019C  ICON                     COMPILER        S4  G          S1575 ICONFS VLO FSNAME=TRANS.MTS                               
            5.1T2   715  ICON.COMPILER.S4.019               1 LINE     68    1 PAGE UM   PICKELMAN           OCT. 07, 1981  03:21:28
0          Replacements for a few of the routines in (831/20).
0          Referenced by comments of: 831/14, 831/15, 831/23 
00831/020C  ICON                     COMPILER        S4  G          S1575 ICONFS VLO FSNAME=TRANS.RAT                               
            5.1T2   716  ICON.COMPILER.S4.020               1 LINE     80   59 PAGE UM   PICKELMAN           SEP. 30, 1981  20:00:58
0          RATFOR (832) source for the ICON compiler.
0          Referenced by comments of: 831/19, 831/23 
00831/021C  ICON                     COMPILER        UC  G          S1575 ICONFS VLO FSNAME=TRMAIN.CDU                              
            5.1T2   717  ICON.COMPILER.UC.021               1 LINE     63    1 PAGE UM   PICKELMAN           OCT. 07, 1981  03:09:15
0          Updates for (831/22).
0          Referenced by comments of: 831/23 
00831/022C  ICON                     COMPILER        S4  G          S1575 ICONFS VLO FSNAME=TRMAIN.RAT                              
            5.1T2   718  ICON.COMPILER.S4.022               1 LINE     73    1 PAGE UM   PICKELMAN           SEP. 30, 1981  20:01:06
0          The compiler's main program.
0          Referenced by comments of: 831/21, 831/23 
00831/023C  ICON                     COMPILER        OC  G          S1575 ICONFS VLO FSNAME=ICON                                    
            5.1T2   719  ICON.COMPILER.OC.023               1 LINE  31050   47 PAGE UM   PICKELMAN           OCT. 07, 1981  02:45:11
0          Object of (831/22) with (831/21) applied, (831/20), and (831/19).
1                                                                                               SUN SEP 08/96   15:24:55   Page  684
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Requires the (831/18) library.  May need to be renamed.
00831/024C  ICON                     RUNTIME SYSTEM  S4  G          S1575 ICONFS VLO FSNAME=RTSYS.RAT                               
            5.1T2   720  ICON.RUNTIME_SYSTEM.S4.024         1 LINE     80   57 PAGE UM   PICKELMAN           SEP. 30, 1981  20:01:09
0          RATFOR (832) source for the runtime system.
0          Referenced by comments of: 831/14, 831/15, 831/26 
00831/025C  ICON                     RUNTIME SYSTEM  S4  G          S1575 ICONFS VLO FSNAME=RTMAIN.RAT                              
            5.1T2   721  ICON.RUNTIME_SYSTEM.S4.025         1 LINE     73    1 PAGE UM   PICKELMAN           OCT. 07, 1981  03:11:07
0          The main program for the runtime system.
0          Referenced by comments of: 831/26 
00831/026C  ICON                     RUNTIME SYSTEM  O   G          S1575 ICONFS VLO FSNAME=RUN                                     
            5.1T2   722  ICON.RUNTIME_SYSTEM.O.026          1 LINE    478    1 PAGE UM   PICKELMAN           OCT. 07, 1981  02:45:28
0          Object of (831/24) and (831/25).  (831/18) may need to be renamed.
00831/027C  ICON                     XREF            P   G          S1575 ICONFS VLO FSNAME=XREF.LIST                               
            5.1T2   723  ICON.XREF.P.027                    1 LINE     71   19 PAGE UM   PICKELMAN           SEP. 30, 1981  20:01:56
0          A cross-reference of which routines call which routines, in all of ICON as
           distributed by Arizona.
00832/001C  RATFOR                   MAIN            SF  G          S1575 ICONFS VLO FSNAME=MBOOT.FORT                              
            5.1T2   724  RATFOR.MAIN.SF.001                 1 LINE     80   52 PAGE UM   PICKELMAN           SEP. 30, 1981  20:00:47
0          The RATFOR FORTRAN preprocessor used to compile most of ICON.
0          Referenced by comments of: 831/11, 831/14, 831/20, 831/24 
00832/002C  RATFOR                   MTS MAIN        SF  G          S1575 ICONFS VLO FSNAME=MBOOT.MTSMAIN                           
            5.1T2   725  RATFOR.MTS_MAIN.SF.002             1 LINE     68    1 PAGE UM   PICKELMAN           OCT. 07, 1981  02:53:01
0          A replacement for the RATFOR main program, which sets up things for MTS.
0          Referenced by comments of: 831/10 
00832/003C  RATFOR                   OBJECT          O   G          S1575 ICONFS VLO FSNAME=RATFOR                                  
            5.1T2   726  RATFOR.OBJECT.O.003                1 LINE   2628   26 PAGE UM   PICKELMAN           OCT. 07, 1981  03:22:06
0          Requires (831/10), (831/11), and (831/12) with names I/INCDEF.ICO,
           I/DEF, AND I/CMLIB, respectively.
00833/001C  STORAGE_MONITOR          SOURCE          SA  O          W237:STOR/MON.S                                                 
            5.1T3   349  STORAGE_MONITOR.SOURCE.SA.001      1 LINE     68    6 PAGE UM   VALERIO             AUG. 20, 1983  19:49:26
0          The source for a module that redefines the entry points GDINFO,
           GETSPACE and FREESPAC.  When entered a record is made of the 
           the requested storage transaction.  Except for this recording
           aspect these entry points should behave exactly like their MTS
1                                                                                               SUN SEP 08/96   15:24:55   Page  685
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Volume 3 counterparts would.  A record of all storage transactions
           will be made in the scratch file "-stortr".  Assemble using 
           *SYSMAC.
00833/002C  STORAGE_MONITOR          OBJECT          O   O          W237:STOR/MON.O                                                 
            5.1T3   350  STORAGE_MONITOR.OBJECT.O.002       1 LINE     80    5 PAGE UM   VALERIO             AUG. 20, 1983  19:49:27
0          The object for the Storage Monitor entry points GDINFO, GETSPACE
           and FREESPAC.  Should be concatenated to a file containing the 
           GDINFO/GETSPACE/FREESPAC calls that are to be monitored.  The 
           trace file "-stortr" should be emptied before every use.
0          Referenced by comments of: 802/1, 802/11 
00833/003C  STORAGE_MONITOR          WRITEUP         P   O          W237:STOR/MON.W                                                 
            5.1T3   351  STORAGE_MONITOR.WRITEUP.P.003      1 LINE     67    1 PAGE UM   VALERIO             AUG. 20, 1983  19:49:28
0          A write up describing the Storage Monitor entry points.
00834/001C  TIMEZONE                                 SA  G  TZON    S0027 DISTRB FSNAME=TIMEZONE                                    
            5.1T2   727  TIMEZONE..SA.001                   1 LINE     80    7 PAGE UM   ENGLE               AUG. 26, 1982  17:24:15
0          Subroutines to return the local time offset from Universal Time and
           the local time zone designation for a given date.
00834/002C  TIMEZONE                                 UC  G        # S0027 DISTRB FSNAME=TIMEZONEUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current
           distribution.
00834/003C  TIMEZONE                                 OC  G          S0027 DISTRB FSNAME=TZON                                        
            5.1T2   728  TIMEZONE..OC.003                   1 LINE     80    3 PAGE UM   ENGLE               AUG. 26, 1982  17:24:18
0          Referenced by comments of: 104/1, 631/22, 631/24 
00834/004C  TIMEZONE                 TMZONEXP        SA  G  TZXP    S0027 DISTRB FSNAME=TMZONEXP                                    
            5.1T2   729  TIMEZONE.TMZONEXP.SA.004           1 LINE     80    2 PAGE UM   ENGLE               AUG. 26, 1982  17:25:10
0          Subroutine to expand the two-character time-zone designation or the
           local time offset from Universal Time to an eight-character name.
00834/005C  TIMEZONE                 TMZONEXP        UC  G        # S0027 DISTRB FSNAME=TMZONEXPUPD                                 
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current 
           distribution.
00834/006C  TIMEZONE                 TMZONEXP        OC  G          S0027 DISTRB FSNAME=TZXP                                        
            5.1T2   730  TIMEZONE.TMZONEXP.OC.006           1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:25:16
0          Referenced by comments of: 104/1, 631/22, 631/24 
1                                                                                               SUN SEP 08/96   15:24:55   Page  686
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00834/007C  TIMEZONE                 TIMZONTB        SA  G          WSG:TIMZONTB.SA                                                 
            5.1T2   731  TIMEZONE.TIMZONTB.SA.007           1 LINE     64    1 PAGE UM   WSG                 JULY 23, 1983  14:02:11
0          Asm source for system timezone table which defines two-character
           codes for many time zones together with their offsets from GMT and
           an eight-character name.
00834/008C  TIMEZONE                 TIMZONTB        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   WSG                                        
0          Object part of Resident System (468).
00835/001C  SRCHI                                    SA  G          S0027 DISTRB FSNAME=SRCHI                                       
            5.1T2   732  SRCHI..SA.001                      1 LINE     72    3 PAGE UM   ENGLE               AUG. 26, 1982  17:23:34
0          Subroutine to generate indexes to be used in performing a binary search 
           on an ordered list.
00835/002C  SRCHI                                    UC  G        # S0027 DISTRB FSNAME=SRCHIUPD                                    
                                                                                    UM   ENGLE                                      
0          Updates source from previous regular distribution to current one.
00835/003C  SRCHI                                    OC  G          S0027 DISTRB FSNAME=SCHI                                        
            5.1T2   733  SRCHI..OC.003                      1 LINE     80    1 PAGE UM   ENGLE               AUG. 26, 1982  17:23:39
00836/001C  MTS VOLUME 18            MASTER          WT             S1629 MTSV18 'MTS MANUALS' POSN=NEWM1.V18                       
            5.1T2   734  MTS_VOLUME_18.MASTER.WT.001        1 LINE    132   81 PAGE UM   MANUAL              JULY 23, 1983  14:03:31
0          TEXT/360 master for Volume 18, "The MTS File Editor," of the UM MTS manuals,
           September 1982.
00836/002C  MTS VOLUME 18            PRINT           PT             S1629 MTSV18 'MTS MANUALS' POSN=PRINT1.V18                      
            5.1T2   735  MTS_VOLUME_18.PRINT.PT.002         1 LINE    132  161 PAGE UM   MANUAL              JULY 23, 1983  14:03:36
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which is
           slightly modified from the TEXT/360 print file), available on request.
00836/003C  MTS VOLUME 18            INDEX SOURCE    D              S1629 MTSV18 'MTS MANUALS' POSN=V18INDEXSOU                     
            5.1T2   736  MTS_VOLUME_18.INDEX_SOURC.D.003    1 LINE     72    2 PAGE UM   MANUAL              JULY 23, 1983  14:03:43
0          Input to *INDEX (580) for the index.
00836/004C  MTS VOLUME 18            FIGURES         WT             S1629 MTSV18 'MTS MANUALS' POSN=VISUALMODE                      
            5.1T2   737  MTS_VOLUME_18.FIGURES.WT.004       1 LINE     88    4 PAGE UM   MANUAL              JULY 23, 1983  14:03:49
0          TEXT/360 source for visual mode example.
00837/001C  STAFF OBJECT LIBRARY                     OL  G          LIB:STAFF                                                       
            5.1T2   738  STAFF_OBJECT_LIBRARY..OL.001       1 LINE   1091    2 PAGE UM   SALISBURY           JULY 23, 1983  14:03:49
                         LIB.:STAFF           
0          UM staff subroutine library.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  687
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ****************************************************************
           D5.0B version:
            
           Current contents:  statistics record conversion routine.
           ****************************************************************
0          Referenced by comments of: 616/2, 617/4, 753/5 
00838/001C  DJDE9700                 SOURCE          SA  G          PAGE:DJDE9700(1000)                                             
            5.1T2   739  DJDE9700.SOURCE.SA.001             1 LINE     72    4 PAGE UM   SHERRY              JULY 23, 1983  14:03:50
0          Source for a table of default DJDEs for the Xerox 9700 used by HASP
           (387), DSRS (637) and *PAGEPR (839). Dsect defined in COPY:MISC.MACROS
           (728/1).
00838/002C  DJDE9700                 OBJECT          OC  G        # (PART OF THE RESIDENT SYSTEM)                                   
                                                                                    UM   SHERRY                                     
00839/001C *PAGEPR                   MAIN            SQ  G          PAGE:PAGEPR.S                                                   
            5.1T2   740  PAGEPR.MAIN.SQ.001                 1 LINE     99    4 PAGE UM   SHERRY              JULY 23, 1983  14:03:50
0          The main procedure for *PAGEPR.  Requires PLUS libraries PAGEPR.SQL (839/3),
           PAGEPR.G/LIB (839/5), *CLPARSELIB (1076/11), *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 838/1, 839/13 
00839/002C *PAGEPR                   ROUTINES        SQ  G          PAGE:PAGEPR.RTNS                                                
            5.1T2   741  PAGEPR.ROUTINES.SQ.002             1 LINE    125   33 PAGE UM   SHERRY              JULY 23, 1983  14:03:51
0          Contains 32 separately compilable Plus procedures that are the service
           routines for *PAGEPR.  Line numbers in this file are important.  Most
           procedures require the Plus libraries PAGEPR.SQL (839/3), PAGEPR.G/LIB
           (839/5), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 839/13 
00839/003C *PAGEPR                   SOURCE LIBRARY  SQ  G          PAGE:PAGEPR.SQL                                                 
            5.1T2   742  PAGEPR.SOURCE_LIBRARY.SQ.003       1 LINE     84    7 PAGE UM   SHERRY              JULY 23, 1983  14:03:53
                         PAGE:PAGEPR.SQL      
0          The Plus source library for all *PAGEPR procedure, type, and global
           definitions.
0          Referenced by comments of: 839/1, 839/2 
00839/004C *PAGEPR                   GRAMMAR         S   G          PAGE:PAGEPR.G                                                   
            5.1T2   743  PAGEPR.GRAMMAR.S.004               1 LINE     80    3 PAGE UM   SHERRY              JULY 23, 1983  14:03:54
0          The CLParser grammar definition for the goal symbols used to parse *PAGEPR
           commands and control information stored in the file *PGF (839/7).
0          Referenced by comments of: 839/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  688
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00839/005C *PAGEPR                   GRAMMAR LIB     SQ  G          PAGE:PAGEPR.G/LIB                                               
            5.1T2   744  PAGEPR.GRAMMAR_LIB.SQ.005          1 LINE     65    1 PAGE UM   SHERRY              JULY 23, 1983  14:03:54
                         PAGE:PAGEPR.G/LIB    
0          The Plus source library containing the grammar declarations produced by
           *CLPARSEGEN (1076/1) when analyzing the *PAGEPR grammar (839/4).
0          Referenced by comments of: 839/1, 839/2 
00839/006C *PAGEPR                   CCTB            SA  G          PAGE:PAGEPR.CCTBS                                               
            5.1T2   745  PAGEPR.CCTB.SA.006                 1 LINE     72    7 PAGE UM   SHERRY              JULY 23, 1983  14:03:54
0          ASMH source for carriage control tables defining all page printer page
           sizes available through *PAGEPR.  Based on UQV CCTB but modified for
           UM's machine carriage control channel assignments and with some changes
           to the macros.
0          Referenced by comments of: 839/15 
00839/007C *PAGEPR                   *PGF            D   G          *PGF                                                            
            5.1T2   746  PAGEPR.?PGF.D.007                  1 LINE    206    3 PAGE UM   SHERRY              JULY 23, 1983  14:03:55
                         *PGF                 
0          The *PAGEPR control file which is indexed by line number to select
           a Xerox 9700 format.  Line numbers are important.  Each format line is
           terminated by $CONTINUE WITH *DUMMY*.
0          Referenced by comments of: 839/4, 839/8, 847/9 
00839/008C *PAGEPR                   TEST FORMATS    D   G          PAGE:PGF                                                        
            5.1T2   747  PAGEPR.TEST_FORMATS.D.008          1 LINE    206    4 PAGE UM   SHERRY              JULY 23, 1983  14:03:55
0          Same as *PGF (839/7) but contains several test formats starting at
           line 100.  This file is used by PAGEPR if the external variable
           PGF_NAME is modified to "PGF". Each format is terminated by $CONTINUE
           WITH *DUMMY*.
0          Referenced by comments of: 841/3 
00839/009C *PAGEPR                   PMF PROJECT     D   G          PAGE:PAGEPR_                                                    
            5.1T2   748  PAGEPR.PMF_PROJECT.D.009           1 LINE    152   10 PAGE UM   SHERRY              JULY 23, 1983  14:03:56
0          This is the PMF project file used to manage the *PAGEPR components.
           Use the PMF command "Describe Project in Depth" to get an overview
           of the project.  Use "Describe all Files in Full" for a list of all
           files referenced.  Line numbers are important.
00839/010C *PAGEPR                   PMF DATA        D   G          PAGE:PAGEPR_DATA                                                
            5.1T2   749  PAGEPR.PMF_DATA.D.010              1 LINE     68    1 PAGE UM   SHERRY              JULY 23, 1983  14:03:56
0          Contains some data modules used by various PMF procedures for generating
           OBJUTIL and LINKEDIT commands.
1                                                                                               SUN SEP 08/96   15:24:55   Page  689
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00839/011C *PAGEPR                   *PAGEPR         OC  G          *PAGEPR                                                         
            5.1T2   750  PAGEPR.?PAGEPR.OC.011              1 LINE     24    1 PAGE UM   SHERRY              JULY 23, 1983  14:03:56
                         *PAGEPR              
0          Contains the appropriate loader records to force a reference to the
           shared VM PAGEPR.
00839/012C *PAGEPR                   SEG2:PAGEPR     OE  G          SEG2:PAGEPR                                                     
            5.1T2   751  PAGEPR.SEG2:PAGEPR.OE.012          1 LINE  32767   12 PAGE UM   SHERRY              JULY 23, 1983  14:03:56
                         SEG2:PAGEPR          
0          Linkedited object for PAGEPR  loaded into shared VM by PISTLE.
00839/013C *PAGEPR                   OBJECT          OC  G          PAGE:PAGEPR.O                                                   
            5.1T2   752  PAGEPR.OBJECT.OC.013               1 LINE   4774   49 PAGE UM   SHERRY              JULY 23, 1983  14:03:57
                         PAGE:PAGEPR.O        
0          Unlinkedited object for the *PAGEPR main procedure (839/1) and 
           service routines (839/2).  Contains $CONTINUE WITH PAGE:PAGEPR.LCS
           (839/14) record.
0          Referenced by comments of: 839/14 
00839/014C *PAGEPR                   ENDJUNK         OC  G          PAGE:PAGEPR.LCS                                                 
            5.1T2   753  PAGEPR.ENDJUNK.OC.014              1 LINE     38    1 PAGE UM   SHERRY              JULY 23, 1983  14:03:59
                         PAGE:PAGEPR.LCS      
0          Miscellaneous loader records required when loading PAGEPR.O (839/13).
           Contains a $CONTINUE WITH PAGE:PAGEPR.CCTB (839/15) record.
0          Referenced by comments of: 839/13 
00839/015C *PAGEPR                   CCTB OBJECT     OC  G          PAGE:PAGEPR.CCTB                                                
            5.1T2   754  PAGEPR.CCTB_OBJECT.OC.015          1 LINE    256    3 PAGE UM   SHERRY              JULY 23, 1983  14:03:59
                         PAGE:PAGEPR.CCTB     
0          Object for *PAGEPR carriage control tables (839/6).
0          Referenced by comments of: 839/14 
00839/016C *PAGEPR                   HELP FILE       M   G          PAGE:PAGEPR.HELP                                                
            5.1T2   755  PAGEPR.HELP_FILE.M.016             1 LINE     70    2 PAGE UM   SHERRY              JULY 23, 1983  14:03:59
                         PAGE:PAGEPR.HELP     
0          The help file used by the CLPARSER to produce command explanations
           after encountering an invalid *PAGEPR command/option.  Line numbers
           in this file are important.
00839/017C *PAGEPR                   LOG FILE        D   G        # PAGE:PAGEPR.LOG                                                 
                                                                                    UM   SHERRY                                     
                         PAGE:PAGEPR.LOG@E    
0          Log file written by *PAGEPR for each invocation logging format 
           usage statistics, etc.
1                                                                                               SUN SEP 08/96   15:24:55   Page  690
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00839/018C *PAGEPR                   MEMO 429        PF  G          *PAGEPR.W                                                       
            5.1T2   756  PAGEPR.MEMO_429.PF.018             1 LINE    145   26 PAGE UM   SHERRY              JULY 23, 1983  14:04:00
0          This is Computing Center Memo 429, "The Xerox 9700 Page Printer,"
           with updated appendix.  Contains a $CONTINUE WITH PAGE:M429/A (839/20)
           record.
0          Referenced by comments of: 807/1 
00839/019C *PAGEPR                   MEMO 429        WF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO429.SOU                       
            5.1T2   757  PAGEPR.MEMO_429.WF.019             1 LINE     68   11 PAGE UM   SHERRY              MAY  04, 1983  16:55:31
0          This is the format source for the text portion of Computing Center
           Memo 429.
00839/020C *PAGEPR                   MEMO APPENDIX   P   G          PAGE:M429/A                                                     
            5.1T2   758  PAGEPR.MEMO_APPENDIX.P.020         1 LINE    152   14 PAGE UM   SHERRY              JULY 23, 1983  14:04:11
0          The appendix to CCMemo 429 describing all formats available through
           *PGF.  Line numbers in this file are important.
0          Referenced by comments of: 839/18 
00839/021C *PAGEPR                   NEWS            P   G          *PAGENEWS                                                       
            5.1T2   759  PAGEPR.NEWS.P.021                  1 LINE     73    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:12
0          News file describing changes to *PAGEPR and 9700 support.
00839/022C *PAGEPR                   CHANGES SOURCE  WX  G          PAGE:PAGEPR.CHAWX                                               
            5.1T2   760  PAGEPR.CHANGES_SOURCE.WX.022       1 LINE    117    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:12
0          *TEXTFORM source for change writeup (839/23).
00839/023C *PAGEPR                   CHANGES         PX  G          PAGE:PAGEPR.CHA.W                                               
            5.1T2   761  PAGEPR.CHANGES.PX.023              1 LINE     76    7 PAGE UM   SHERRY              JULY 23, 1983  14:04:12
0          Print file listing recent changes made to *PAGEPR.
0          Referenced by comments of: 839/22 
00840/001C  XEROX 9700 UM FSL        OVERLAYS        XF  G          PAGE:UM.FSL                                                     
            5.1T2   762  XEROX_9700_UM_FSL.OVERLAY.XF.001   1 LINE     53    1 PAGE UM   SHERRY              JULY 23, 1983  14:04:13
0          This file contains the Xerox 9700 form definitions for all the 
           "LINES" and "SHADING" overlays selected by the *PAGEPR OVERLAY
           option.  It contains 10 separate forms.
0          Referenced by comments of: 3047/1 
00840/002C  XEROX 9700 UM FSL        FORMS           XF  G          PAGE:FORMS.FSL                                                  
            5.1T2   763  XEROX_9700_UM_FSL.FORMS.XF.002     1 LINE     73    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:13
0          This file contains the definitions for a few Xerox 9700 forms that
           are used internally by the Computing Center. The following forms
1                                                                                               SUN SEP 08/96   15:24:55   Page  691
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          are included:
            
             PRTJAM -- A form printed on colored paper inserted in user output
                       whenever the 9700 experiences a paper jam.
             REBATE -- The user rebate request form.
             SPARUM -- A copy of Xerox's SPAR form customized for UM.
00840/003C  XEROX 9700 UM FSL        WKSP FORMS      XF  G          PAGE:WKSP.FSL                                                   
            5.1T2   764  XEROX_9700_UM_FSL.WKSP_FO.XF.003   1 LINE     72    2 PAGE UM   SHERRY              JULY 23, 1983  14:04:13
0          This file contains the definitions for all Xerox 9700 forms used
           to produce the Workshop VIII proceedings.
00841/001C  XEROX 9700 UM JSL        UM.JSL          XJ  G          PAGE:UM.JSL                                                     
            5.1T2   765  XEROX_9700_UM_JSL.UM.JSL.XJ.001    1 LINE     68    2 PAGE UM   SHERRY              JULY 23, 1983  14:04:13
0          This is UM's default job descriptor library containing all online
           jobs for the Xerox 9700 page printer.  It contains the following
           jobs:
            
              DFLT   -- the default job: duplex, landscape
              SIMPLX -- the job selected for simplex reports
              LBL24  -- a job used to print mailing labels on 24-up stock
              PHYSED -- a job requested externally
0          Referenced by comments of: 3046/1 
00841/002C  XEROX 9700 UM JSL        UMPGF           XJ  G          PAGE:UMPGF.JSL                                                  
            5.1T2   766  XEROX_9700_UM_JSL.UMPGF.XJ.002     1 LINE     68    2 PAGE UM   SHERRY              JULY 23, 1983  14:04:13
0          This file contains the PDEs defining all the formats available by
           selecting line numbers from the file *PGF.
00841/003C  XEROX 9700 UM JSL        UMPDE           XJ  G          PAGE:UMPDE.JSL                                                  
            5.1T2   767  XEROX_9700_UM_JSL.UMPDE.XJ.003     1 LINE     68    3 PAGE UM   SHERRY              JULY 23, 1983  14:04:14
0          This file contains miscellaneous PDEs defining test formats
           available at UM via the file PAGE:PGF (839/8).
00842/001C  XEROX 9700 UM FONT       A06S0L          XT  G        # PAGE:A06S0L>FNT                                                 
                                                                                    UM   SHERRY                                     
0          Xerox licensed landscape font, Scientific 10 containing math and Greek
           characters.  Used by *PGF(34).
0          Referenced by comments of: 3048/1 
00842/002C  XEROX 9700 UM FONT       A06S0P          XT  G        # PAGE:A06S0P>FNT                                                 
                                                                                    UM   SHERRY                                     
0          Xerox licensed portrait font, Scientific 10 containing math and Greek
           characters.  Used by *PGF(14).
1                                                                                               SUN SEP 08/96   15:24:55   Page  692
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00842/003C  XEROX 9700 UM FONT       L01ALA          XT  G          PAGE:L01ALA>FNT                                                 
            5.1T2   768  XEROX_9700_UM_FONT.L01ALA.XT.003   1 LINE    512    3 PAGE UM   SHERRY              JULY 23, 1983  14:04:14
0          Landscape 13.6 cpi font containing ALA characters not in the TN
           character set.  Used by *PGF(33).  Based on UQV font L01ALA
           but with new diacritics and several characters modified.
00842/004C  XEROX 9700 UM FONT       L01BOD          XT  G          PAGE:L01BOD>FNT                                                 
            5.1T2   769  XEROX_9700_UM_FONT.L01BOD.XT.004   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:14
0          Landscape 13.6 cpi bold font containing TN character set in the
           1200 print style.  Used by *PGF lines 23 and 33.
00842/005C  XEROX 9700 UM FONT       L01ITD          XT  G          PAGE:L01ITD>FNT                                                 
            5.1T2   770  XEROX_9700_UM_FONT.L01ITD.XT.005   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:14
0          Landscape 13.6 italic font containing most of the TN character set
           in the 1200 print style.
00842/006C  XEROX 9700 UM FONT       L0112D          XT  G          PAGE:L0112D>FNT                                                 
            5.1T2   771  XEROX_9700_UM_FONT.L0112D.XT.006   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:15
0          Landscape 13.6 medium font containing TN character set in the 1200
           print style.  Used by *PGF lines 23 and 33.
00842/007C  XEROX 9700 UM FONT       L05ALA          XT  G          PAGE:L05ALA>FNT                                                 
            5.1T2   772  XEROX_9700_UM_FONT.L05ALA.XT.007   1 LINE    512    3 PAGE UM   SHERRY              JULY 23, 1983  14:04:15
0          Landscape 10 cpi font containing ALA characters not in the TN
           character set.  Used by *PGF(34).  Created from P08ALA by
           rotation.
00842/008C  XEROX 9700 UM FONT       L05DWB          XT  G          PAGE:L05DWB>FNT                                                 
            5.1T2   773  XEROX_9700_UM_FONT.L05DWB.XT.008   1 LINE    512    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:15
0          This landscape 10 cpi italic font is the same as L051TD with the
           addition of 5 special characters used to make the Workshop VIII
           logo.
00842/009C  XEROX 9700 UM FONT       PR224A          XT  G          PAGE:PR224A>FNT                                                 
            5.1T2   774  XEROX_9700_UM_FONT.PR224A.XT.009   1 LINE    512    8 PAGE UM   SHERRY              JULY 23, 1983  14:04:15
0          Landscape 24 pt bold porportioned font in the Press Roman print style.
           This is the same as Xerox's font with the addition of a ':'.  Used in
           one of UM's test formats.
00842/010C  XEROX 9700 UM FONT       PR224B          XT  G          PAGE:PR224B>FNT                                                 
            5.1T2   775  XEROX_9700_UM_FONT.PR224B.XT.010   1 LINE    512    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:16
0          Portrait 24 pt bold porportional font in the Press Roman print style.
           This is the same as Xerox's font with the addition of a ':'.  Used
           in one of UM's test formats.
1                                                                                               SUN SEP 08/96   15:24:55   Page  693
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00842/011C  XEROX 9700 UM FONT       P06ALA          XT  G          PAGE:P06ALA>FNT                                                 
            5.1T2   776  XEROX_9700_UM_FONT.P06ALA.XT.011   1 LINE    512    3 PAGE UM   SHERRY              JULY 23, 1983  14:04:16
0          Portrait 13.6 cpi font containing ALA characters not in the TN
           character set.  Used by *PGF(15).  Created from L01ALA by rotation.
00842/012C  XEROX 9700 UM FONT       P06BOD          XT  G          PAGE:P06BOD>FNT                                                 
            5.1T2   777  XEROX_9700_UM_FONT.P06BOD.XT.012   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:16
0          Portrait 13.6 cpi bold font in the 1200 print style.  Used by 
           *PGF(5) and *PGF(15).
00842/013C  XEROX 9700 UM FONT       P0612D          XT  G          PAGE:P0612D>FNT                                                 
            5.1T2   778  XEROX_9700_UM_FONT.P0612D.XT.013   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:16
0          Portrait 13.6 cpi medium font in the 1200 print style.  Used by
           *PGF lines 5 and 15.
00842/014C  XEROX 9700 UM FONT       P08ALA          XT  G          PAGE:P08ALA>FNT                                                 
            5.1T2   779  XEROX_9700_UM_FONT.P08ALA.XT.014   1 LINE    512    3 PAGE UM   SHERRY              JULY 23, 1983  14:04:17
0          Portrait 10 cpi font containing ALA characters not in the TN 
           character set.  Used by *PGF(14).  Based on UQV font P08ALA
           but with new diacritics and several characters modified.
00842/015C  XEROX 9700 UM FONT       P08DWB          XT  G          PAGE:P08DWB>FNT                                                 
            5.1T2   780  XEROX_9700_UM_FONT.P08DWB.XT.015   1 LINE    512    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:17
0          This portrait 10 cpi italic font is the same as P08ITD with the
           addition of 5 special characters used to make the Workshop VIII
           logo.
00842/016C  XEROX 9700 UM FONT       P08ITD          XT  G          PAGE:P08ITD>FNT                                                 
            5.1T2   781  XEROX_9700_UM_FONT.P08ITD.XT.016   1 LINE    512    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:17
0          Portrait 10 cpi italic font containing most of the TN characters.
00842/017C  XEROX 9700 UM FONT       P08TAD          XT  G          PAGE:P08TAD>FNT                                                 
            5.1T2   782  XEROX_9700_UM_FONT.P08TAD.XT.017   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:18
0          Portrait 10 cpi normal font containing the TN character set in
           Titan 10 print style.  Used by *PGF line 4 and 14.
00842/018C  XEROX 9700 UM FONT       P08TBD          XT  G          PAGE:P08TBD>FNT                                                 
            5.1T2   783  XEROX_9700_UM_FONT.P08TBD.XT.018   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:18
0          Portrait 10 cpi bold font containing the TN character set in the
           Titan 10 print style.  Used by *PGF lines 2, 4, and 14.
00842/019C  XEROX 9700 UM FONT       P08UMA          XT  G          PAGE:P08UMA>FNT                                                 
            5.1T2   784  XEROX_9700_UM_FONT.P08UMA.XT.019   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:18
0          The portrait 12 cpi font was set up to print UM's documentation.  It
           is based on the UQV P08UMA with the addition of a few ASCII characters.
1                                                                                               SUN SEP 08/96   15:24:55   Page  694
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Used by *PGF(12).
00842/020C  XEROX 9700 UM FONT       P0812D          XT  G          PAGE:P0812D>FNT                                                 
            5.1T2   785  XEROX_9700_UM_FONT.P0812D.XT.020   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:18
0          Portrait 10 cpi normal font contains the TN character set in the 
           1200 print style, san serif.  Used by *PGF(2).
00842/021C  XEROX 9700 UM FONT       P1012D          XT  G          PAGE:P1012D>FNT                                                 
            5.1T2   786  XEROX_9700_UM_FONT.P1012D.XT.021   1 LINE    512    3 PAGE UM   SHERRY              JULY 23, 1983  14:04:19
0          Portrait 17.6 cpi normal font containing the TN character set.  Used
           by *PGF(3) for a "two-up" format and by *PGF(13).
00842/022C  XEROX 9700 UM FONT       SS115P          XT  G          PAGE:SS115P>FNT                                                 
            5.1T2   787  XEROX_9700_UM_FONT.SS115P.XT.022   1 LINE    512    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:19
0          Portrait 15 pt proportional font containing most of the TN 
           characters.  Used by a test format.  This font was obtained
           externally.
00842/023C  XEROX 9700 UM FONT       ULFN01          XT  G          PAGE:ULFN01>FNT                                                 
            5.1T2   788  XEROX_9700_UM_FONT.ULFN01.XT.023   1 LINE    512    6 PAGE UM   SHERRY              JULY 23, 1983  14:04:19
0          Landscape 13.6 cpi font containing the UBC extended character
           set.  Used by *PGF(30).
00842/024C  XEROX 9700 UM FONT       UMXTNL          XT  G          PAGE:UMXTNL>FNT                                                 
            5.1T2   789  XEROX_9700_UM_FONT.UMXTNL.XT.024   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:20
0          Landscape 13.6 cpi font containing the TN characters plus a few
           ASCII characters in the 1200 print style.  This was created from
           L0112D and is the default 9700 font at UM.  Used by *PGF(20).
00842/025C  XEROX 9700 UM FONT       UN110L          XT  G          PAGE:UN110L>FNT                                                 
            5.1T2   790  XEROX_9700_UM_FONT.UN110L.XT.025   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:20
0          UQV's landscape 10 pt proportional font containing most of the TN
           characters in the Univers print style.  Used by *PGF(31).
00842/026C  XEROX 9700 UM FONT       UN110P          XT  G          PAGE:UN110P>FNT                                                 
            5.1T2   791  XEROX_9700_UM_FONT.UN110P.XT.026   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:20
0          UQV's portrait 10 pt proportional font containing most of the TN
           characters in the Univers print style.  Used by *PGF(11).
00842/027C  XEROX 9700 UM FONT       UN210L          XT  G          PAGE:UN210L>FNT                                                 
            5.1T2   792  XEROX_9700_UM_FONT.UN210L.XT.027   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:20
0          UQV's landscape 10 pt bold proportional font containing most of 
           the TN characters in the Univers print style.  Used by *PGF(31).
1                                                                                               SUN SEP 08/96   15:24:55   Page  695
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00842/028C  XEROX 9700 UM FONT       UN210P          XT  G          PAGE:UN210P>FNT                                                 
            5.1T2   793  XEROX_9700_UM_FONT.UN210P.XT.028   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:21
0          UQV's portrait 10 pt bold proportional font containing most of the 
           TN characters in the Univers print style.  Used by *PGF(11).
00842/029C  XEROX 9700 UM FONT       UN510L          XT  G          PAGE:UN510L>FNT                                                 
            5.1T2   794  XEROX_9700_UM_FONT.UN510L.XT.029   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:21
0          UQV's landscape 10 pt italic proportional font containing most of
           the TN characters in the Univers print style.  Used by *PGF(31).
00842/030C  XEROX 9700 UM FONT       UN510P          XT  G          PAGE:UN510P>FNT                                                 
            5.1T2   795  XEROX_9700_UM_FONT.UN510P.XT.030   1 LINE    512    5 PAGE UM   SHERRY              JULY 23, 1983  14:04:21
0          UQV's portrait 10 pt italic proportional font containing most of the
           TN characters in the Univers print style.  Used by *PGF(11).
00842/031C  XEROX 9700 UM FONT       UPFN01          XT  G          PAGE:UPFN01>FNT                                                 
            5.1T2   796  XEROX_9700_UM_FONT.UPFN01.XT.031   1 LINE    512    7 PAGE UM   SHERRY              JULY 23, 1983  14:04:22
0          Portrait 10 cpi font containing the UBC extended character set.
           Used by *PGF(10).
00842/032C  XEROX 9700 UM FONT       1247DL          XT  G          PAGE:1247DL>FNT                                                 
            5.1T2   797  XEROX_9700_UM_FONT.1247DL.XT.032   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:22
0          UQV's landscape 13.6 cpi APL font containing the 1403 APL characters
           that are different from the TN character set.  Used by *PGF(23).
00842/033C  XEROX 9700 UM FONT       1247DP          XT  G          PAGE:1247DP>FNT                                                 
            5.1T2   798  XEROX_9700_UM_FONT.1247DP.XT.033   1 LINE    512    4 PAGE UM   SHERRY              JULY 23, 1983  14:04:22
0          UQV's portrait 10 cpi APL font containing the 1403 APL characters
           that are different from the TN character set.  Used by *PGF(4).
00843/001C  LOG COMMAND              CLS             SQ  G          CLS:LOG*SQ                                                      
            5.1T2   799  LOG_COMMAND.CLS.SQ.001             1 LINE     67    4 PAGE UM   BURLING             JULY 23, 1983  14:04:22
0          Plus source for $LOG CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:LOG*SRL
           (843/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
00843/002C  LOG COMMAND              GRAMMAR         SR  G          CLS:LOG*SR                                                      
            5.1T2   800  LOG_COMMAND.GRAMMAR.SR.002         1 LINE     75    1 PAGE UM   BURLING             JULY 23, 1983  14:04:23
0          This is the *CLSPARSEGEN input to produce the parser tables used by
           the $LOG CLS.
0          Referenced by comments of: 843/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  696
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00843/003C  LOG COMMAND              DECLARATIONS    SQ  G          CLS:LOG*SRL                                                     
            5.1T2   801  LOG_COMMAND.DECLARATIONS.SQ.003    1 LINE     63    1 PAGE UM   BURLING             JULY 23, 1983  14:04:23
0          This is the declarations file produced by $RUNning *CLPARSEGEN using 
           (843/2) as input.
0          Referenced by comments of: 843/1 
00843/004C  LOG COMMAND              OBJECT          OL  G          *CLSLOG                                                         
            5.1T2   802  LOG_COMMAND.OBJECT.OL.004          1 LINE   1852    6 PAGE UM   BURLING             JULY 23, 1983  14:04:24
                         *CLSLOG              
0          Complete object for $LOG CLS.  This file is post-IPL loaded into
           shared VM.
00843/005C  LOG COMMAND              HELP FILE       D   G          ETC.:LOG.HELP                                                   
            5.1T2   803  LOG_COMMAND.HELP_FILE.D.005        1 LINE     68    1 PAGE UM   BURLING             JULY 23, 1983  14:04:24
                         ETC:LOG.HELP@E       
0          This is the file used by the parser in response to HELP commands,
           and to generate some of the $LOG error messages.
00844/001A *GENDOC                   *GENDOC         OE  G          *GENDOC                                                         
            5.1T2   804  GENDOC.?GENDOC.OE.001              1 LINE  32767   21 PAGE UM   MENDAL              JULY 23, 1983  14:04:25
0          The *GENDOC on-line documentation system provides sets of databases
           and a command language that allows a user to generate MTS
           documentation in a simple, straightforward, and efficient manner. In
           addition, GENDOC provides easy to understand diagnostics and an
           on-line help facility. GENDOC is best used in conversational mode, but
           batch use is also allowed. The GENDOC system focuses on many database
           sets. Each set contains two very important databases: a "query"
           database and a document database.
            
           ************************************************************************
           D5.1 version:
            
           This is version 3.0 of the *GENDOC online documentation system.
            
           Three database sets are being distributed on D5.1:
              
                  GDOC -- the default, system documentation
                  COUN -- consultant's documentation
                  MCP  -- Microcomputer Communications Programs documentation
           ************************************************************************
0          Referenced by comments of: 844/2, 844/7, 844/11, 844/12, 844/15, 844/18, 844/21, 844/22, 844/23, 844/45, 844/46,
                 844/47, 844/49, 844/52, 844/53, 844/54, 844/55, 844/57, 844/60 
00844/002A *GENDOC                   CREATE OBJ      C   G          GDOC:GENDOC.NWOBJ                                               
            5.1T2   805  GENDOC.CREATE_OBJ.C.002            1 LINE     67    4 PAGE UM   MENDAL              JULY 23, 1983  14:04:26
0          Contains commands to be used to install a new version in
           (844/1), (844/8), (844/28) and (844/31).
1                                                                                               SUN SEP 08/96   15:24:55   Page  697
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 844/7 
00844/003A *GENDOC                   MEMO 445A       WF  G          GDOC:GENDOC.W.S                                                 
            5.1T2   806  GENDOC.MEMO_445A.WF.003            1 LINE     68    5 PAGE UM   MENDAL              JULY 23, 1983  14:04:29
0          This is Computing Center Memo 445A, "The *GENDOC On-Line Documentation
           Facility."  This file contains commands at negative line numbers to
           place output in the file *GENDOC.W (844/4).
0          Referenced by comments of: 844/4 
00844/004A *GENDOC                   MEMO 445A       PF  G          *GENDOC.W                                                       
            5.1T2   807  GENDOC.MEMO_445A.PF.004            1 LINE     68    7 PAGE UM   MENDAL              JULY 23, 1983  14:04:29
0          This is the print file for (844/3).
0          Referenced by comments of: 844/3 
00844/005A *GENDOC                   *GENDOCNEWS     P   G          *GENDOCNEWS                                                     
            5.1T2   808  GENDOC.?GENDOCNEWS.P.005           1 LINE     68    9 PAGE UM   MENDAL              JULY 23, 1983  14:04:30
0          Information file for recent changes, additions, etc. to *GENDOC.
00844/006C *GENDOC                   DESIGN GUIDE    P   G          GDOC:GENDOC.INT.W                                               
            5.1T2   809  GENDOC.DESIGN_GUIDE.P.006          1 LINE     68    8 PAGE UM   MENDAL              JULY 23, 1983  14:04:31
0          Contains documentation on how GENDOC was designed and implemented.
           Should give an insight into how GENDOC works and how it should be
           maintained.
00844/007A *GENDOC                   SOURCE          SB  G          GDOC:GENDOC.S                                                   
            5.1T2   810  GENDOC.SOURCE.SB.007               1 LINE    102   37 PAGE UM   MENDAL              JULY 23, 1983  14:04:31
0          *ALGOLW source for *GENDOC (844/1) and the test version (844/8).
           File contains commands at beginning for assembly of the test version
           with ATTN run time support (844/9). (844/2) may be used to place
           object in *GENDOC.
00844/008A *GENDOC                   TEST OBJ        O   G          GDOC:GENDOC                                                     
            5.1T2   811  GENDOC.TEST_OBJ.O.008              1 LINE  32767   21 PAGE UM   MENDAL              JULY 23, 1983  14:04:33
0          Object code for latest untested version of *GENDOC. May contain a
           $CONTINUE WITH record for (844/10), depending on when the last version
           was installed.
0          Referenced by comments of: 844/2, 844/7, 844/11, 844/12, 844/15, 844/18, 844/45, 844/46, 844/47, 844/49, 844/53,
                 844/54, 844/55, 844/57 
00844/009A *GENDOC                   ATTN SUBR       SG  G          GDOC:GENDOC.ATN.S                                               
            5.1T2   812  GENDOC.ATTN_SUBR.SG.009            1 LINE     91    1 PAGE UM   MENDAL              JULY 23, 1983  14:04:34
0          Source for ATTN run time subroutines for GENDOC. File contains
           commands to assemble, which write object into (844/10).
1                                                                                               SUN SEP 08/96   15:24:55   Page  698
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 844/7 
00844/010A *GENDOC                   ATTN SUBR       OC  G          GDOC:GENDOC.ATN.O                                               
            5.1T2   813  GENDOC.ATTN_SUBR.OC.010            1 LINE    550    1 PAGE UM   MENDAL              JULY 23, 1983  14:04:34
0          Referenced by comments of: 844/8, 844/9 
00844/011A *GENDOC                   DOCUMENTS       D   G          GDOC:GENDOC.OUTPT                                               
            5.1T2   814  GENDOC.DOCUMENTS.D.011             1 LINE    152 7225 PAGE UM   MENDAL              JULY 23, 1983  14:04:34
0          *GENDOC documents data base. Referenced by (844/31), (844/1), and
           (844/8). Line numbers in this file are extremely important. Referenced
           by the GDOC database-set only. Contains $CONTINUE WITHs to
           MCP:PROGRAM.LIST (848/156), MCP:TRS1/3.DOC (848/197) and to other line
           number ranges in this file.
00844/012A *GENDOC                   HELP            D   G          GDOC:GENDOC.ONL.W                                               
            5.1T2   815  GENDOC.HELP.D.012                  1 LINE     68  120 PAGE UM   MENDAL              JULY 23, 1983  14:12:35
0          On-line help facility for *GENDOC (the "query" data base). Line
           numbers in this file are extremely important. References (844/36).
           Referenced by (844/1), (844/8), and (844/31). Referenced by the GDOC
           database-set only.
0          Referenced by comments of: 844/36 
00844/013C *GENDOC                   INIT FILE       D   G          GDOC:GENDOC.CMDS                                                
            5.1T2   816  GENDOC.INIT_FILE.D.013             1 LINE      8    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:41
0          Initialization file for *GENDOC (all command forms).
00844/014C *GENDOC                   INIT FILE       D   G          GDOC:GENDOC.CPTS                                                
            5.1T2   817  GENDOC.INIT_FILE.D.014             1 LINE     14    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:41
0          Initialization file for *GENDOC (all help concepts).
00844/015C *GENDOC                   INIT FILE       D   G          GDOC:GENDOC.DOCS                                                
            5.1T2   818  GENDOC.INIT_FILE.D.015             1 LINE     37   11 PAGE UM   MENDAL              JULY 23, 1983  14:12:41
0          Initialization file for (844/1), (844/8), and (844/31) (all GDOC
           database-set document names).
0          Referenced by comments of: 844/16 
00844/016C *GENDOC                   INIT FILE       P   G          GDOC:GENDOC.DOCS2                                               
            5.1T2   819  GENDOC.INIT_FILE.P.016             1 LINE     37   11 PAGE UM   MENDAL              JULY 23, 1983  14:12:42
0          Same as GENDOC.DOCS (844/15), but arranged in numerical order.
00844/017C *GENDOC                   INIT FILE       D   G          GDOC:GENDOC.GENS                                                
            5.1T2   820  GENDOC.INIT_FILE.D.017             1 LINE     38    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:43
0          Initialization file for *GENDOC (all generics).  Referenced by the
           GDOC database-set only.
1                                                                                               SUN SEP 08/96   15:24:55   Page  699
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00844/018C *GENDOC                   INIT FILE       D   G          GDOC:GENDOC.NUMS                                                
            5.1T2   821  GENDOC.INIT_FILE.D.018             1 LINE     26    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:43
0          Initialization file for (844/1), (844/8), and (844/31). Line numbers
           in this file are important. Referenced by the GDOC database-set only.
00844/019C *GENDOC                   STAT FILE       P   G          GDOC:GENDOC.STATS                                               
            5.1T2   822  GENDOC.STAT_FILE.P.019             1 LINE     55    6 PAGE UM   MENDAL              JULY 23, 1983  14:12:43
0          Updated statistics file on *GENDOC usage.  Referenced by (844/29).
00844/020A *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.SNOOP                                               
                                                                                    UM   MENDAL                                     
0          If this file exists, *GENDOC uses it for logging information.
0          Referenced by comments of: 844/27, 844/28 
00844/021C *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.USTAT                                               
                                                                                    UM   MENDAL                                     
0          Log file for usage statistics. Referenced by (844/28) and (844/1).
           Line numbers in this file are important.  Line -10 should contain
           information as to when the last version of *GENDOC was installed.
00844/022C *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.CSTAT                                               
                                                                                    UM   MENDAL                                     
0          A log file for *GENDOC command statistics. Referenced by (844/1) and
           (844/28). Line numbers in this file are important.
00844/023C *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.DSTAT                                               
                                                                                    UM   MENDAL                                     
0          Log file for *GENDOC documents produced. Computes and maintains
           statistics for the GDOC database-set only. Referenced by (844/1) and
           (844/28). Line numbers in this file are important.
00844/024C *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.ERRS                                                
                                                                                    UM   MENDAL                                     
0          Error logging file for *GENDOC errors. Only errors related to the GDOC
           database-set are logged in this file.
00844/025C *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.DB.SN                                               
                                                                                    UM   MENDAL                                     
0          Log file for GENDOC.DB (844/31) usage. Doesn't have to exist for
           GENDOC.DB to run.
00844/026C *GENDOC                   LOG FILE        D   G        # GDOC:GENDOC.DB.ER                                               
                                                                                    UM   MENDAL                                     
0          Error logging file for GENDOC.DB (844/31) errors. Logs only errors
1                                                                                               SUN SEP 08/96   15:24:55   Page  700
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          related to the GDOC database-set. This file need not exist in order
           for GENDOC to run.
00844/027C *GENDOC                   STATS ANAL      SB  G          GDOC:GENDOC.STS.S                                               
            5.1T2   823  GENDOC.STATS_ANAL.SB.027           1 LINE    102    4 PAGE UM   MENDAL              JULY 23, 1983  14:12:43
0          *ALGOLW (528) source code for *GENDOC statistics analysis program.
           Contains commands in negative line number range to produce object 
           code in (844/28).  Uses UNSP:LIBRARY(1,10) (685/2) to log in file
           GDOC:GENDOC.SNOOP (844/20).
00844/028C *GENDOC                   STATS ANAL      OE  G          GDOC:GENDOC.STS.O                                               
            5.1T2   824  GENDOC.STATS_ANAL.OE.028           1 LINE  15062    5 PAGE UM   MENDAL              JULY 23, 1983  14:12:44
0          Object code for *GENDOC statistics analysis. Referenced by (844/29).
           Uses UNSP:LIBRARY(1,10) (685/2) to log in file GDOC:GENDOC.SNOOP
           (844/20).
0          Referenced by comments of: 844/2, 844/21, 844/22, 844/23, 844/27, 844/52, 844/60 
00844/029C *GENDOC                   STATS GEN       C   G          GDOC:GENDOC.*AUTO                                               
            5.1T2   825  GENDOC.STATS_GEN.C.029             1 LINE     71    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:44
0          MTS *BATCH* file for use with *AUTOSTART (816/5).  Used to generate a
           hard copy listing of *GENDOC statistics weekly.
0          Referenced by comments of: 844/19, 844/28 
00844/030C *GENDOC                   SCHEDULE        D   G          GDOC:GENDOC.SCHED                                               
            5.1T2   826  GENDOC.SCHEDULE.D.030              1 LINE     61    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:44
0          Schedule file for use with *AUTOSTART (816/5) to generate a weekly
           *BATCH* job of *GENDOC statistics.
00844/031C *GENDOC                   OBJECT          OE  G          GDOC:GENDOC.DB                                                  
            5.1T2   827  GENDOC.OBJECT.OE.031               1 LINE  32767   22 PAGE UM   MENDAL              JULY 23, 1983  14:12:44
0          Object code for *GENDOC database updating facility.
0          Referenced by comments of: 844/2, 844/11, 844/12, 844/15, 844/18, 844/25, 844/26, 844/32, 844/33, 844/34, 844/35,
                 844/39, 844/42, 844/43, 844/45, 844/46, 844/47, 844/49, 844/51, 844/53, 844/54, 844/55, 844/57, 844/59 
00844/032C *GENDOC                   DB SOU          SB  G          GDOC:GENDOC.DB.S                                                
            5.1T2   828  GENDOC.DB_SOU.SB.032               1 LINE    106   37 PAGE UM   MENDAL              JULY 23, 1983  14:12:45
0          *ALGOLW (528) source code for GENDOC.DB (844/31).
00844/033C *GENDOC                   DB RUN TIME     OC  G          GDOC:GENDOC.DB.A                                                
            5.1T2   829  GENDOC.DB_RUN_TIME.OC.033          1 LINE    550    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:47
0          ATTN run time object for GENDOC.DB (844/31).
1                                                                                               SUN SEP 08/96   15:24:55   Page  701
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00844/034C *GENDOC                   DB HELP         D   G          GDOC:GENDOC.DB.HQ                                               
            5.1T2   830  GENDOC.DB_HELP.D.034               1 LINE     68   11 PAGE UM   MENDAL              JULY 23, 1983  14:12:47
0          Online help facility for GENDOC.DB (844/31).  Line numbers in this
           file are extremely important.
0          Referenced by comments of: 844/39 
00844/035C *GENDOC                   DB INIT         D   G          GDOC:GENDOC.DB.C                                                
            5.1T2   831  GENDOC.DB_INIT.D.035               1 LINE     13    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:48
0          Initialization file for GENDOC.DB (844/31) (all command forms).
00844/036C *GENDOC                   CHANGES         P   G          GDOC:NEWVERSION                                                 
            5.1T2   832  GENDOC.CHANGES.P.036               1 LINE     65    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:48
0          Contains a hard-copy format list of changes for the current version of
           *GENDOC.
            
           This file is referenced in line range (20002,20002.999) of (844/12).
            
           ****************************************************************
           D5.1 version:
            
           The current version of *GENDOC is 3.0.
           ****************************************************************
0          Referenced by comments of: 844/12 
00844/037C *GENDOC                   BENCHMARKS      P   G          GDOC:GENDOC.BENCH                                               
            5.1T2   833  GENDOC.BENCHMARKS.P.037            1 LINE     68    8 PAGE UM   MENDAL              JULY 23, 1983  14:12:48
0          File containing the statistics obtained from running GENDOC benchmarks.
00844/038C *GENDOC                   NEW DB          C   G          GDOC:GENDOC.NEWDB                                               
            5.1T2   834  GENDOC.NEW_DB.C.038                1 LINE     99    3 PAGE UM   MENDAL              JULY 23, 1983  14:12:49
0          $SOURCE file to be used to install new database-sets in GENDOC.
           There are instructions in the file for proper use.
00844/039C *GENDOC                   DB - NEW VERS   P   G          GDOC:DBNEWVERSION                                               
            5.1T2   835  GENDOC.DB_-_NEW_VERS.P.039         1 LINE     65    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:50
0          Contains hard-copy format list of changes for current version of
           GDOC:GENDOC.DB (844/31).  This file is referenced in line range
           (20002,20002.999) of (844/34)
00844/040C *GENDOC                   MAGIC NOS.      D   G          GDOC:GENDOC.MNUM                                                
            5.1T2   836  GENDOC.MAGIC_NOS..D.040            1 LINE     60    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:50
0          Initialization file of "master=systemwide" magic numbers.  Line
           numbers in this file are important.
1                                                                                               SUN SEP 08/96   15:24:55   Page  702
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00844/041C *GENDOC                   DATABASES       D   G          GDOC:GENDOC.DBS                                                 
            5.1T2   837  GENDOC.DATABASES.D.041             1 LINE      5    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:50
0          Initialization file containing all the legal database signon IDs.
00844/042C *GENDOC                   DB CONCEPTS     D   G          GDOC:GENDOC.DBCPT                                               
            5.1T2   838  GENDOC.DB_CONCEPTS.D.042           1 LINE     14    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:50
0          Initialization file for GDOC:GENDOC.DB (844/31) (all concepts).
00844/043C *GENDOC                   DB DOC          WF  O          GDOC:GENDOC.DB.WS                                               
            5.1T2   839  GENDOC.DB_DOC.WF.043               1 LINE     68    8 PAGE UM   MENDAL              JULY 23, 1983  14:12:50
0          This is the documentation for the GDOC:GENDOC.DB (844/31) program.
           Contains commands at negative line numbers to place output in
           a file called "GDOC:GENDOC.DB.W" (844/44).
0          Referenced by comments of: 844/44 
00844/044C *GENDOC                   DB DOC          PF  O          GDOC:GENDOC.DB.W                                                
            5.1T2   840  GENDOC.DB_DOC.PF.044               1 LINE     68   10 PAGE UM   MENDAL              JULY 23, 1983  14:12:51
0          Printer-ready output for (844/43).
0          Referenced by comments of: 844/43 
00844/045C *GENDOC                   COUN OUTPT      D   G          COUN:GENDOC.OUTPT                                               
            5.1T2   841  GENDOC.COUN_OUTPT.D.045            1 LINE    132   55 PAGE UM   MENDAL              JULY 23, 1983  14:12:52
0          *GENDOC COUN documents data base. Referenced by (844/1), (844/8)
           and (844/31). Line numbers in this file are extremely important.
           Referenced by the COUN database-set only.
00844/046C *GENDOC                   COUN ONL.W      D   G          COUN:GENDOC.ONL.W                                               
            5.1T2   842  GENDOC.COUN_ONL.W.D.046            1 LINE     68    5 PAGE UM   MENDAL              JULY 23, 1983  14:12:56
0          On-line help facility for *GENDOC (the "query" data base). Line
           numbers in this file are extremely important. Referenced by (844/1),
           (844/8), and (844/31). Referenced by the COUN database-set only.
           Contains a $CONTINUE WITH to GDOC:GENDOC.ONL.W at line range
           (5005,5005.999).
00844/047C *GENDOC                   COUN NUMS       D   G          COUN:GENDOC.NUMS                                                
            5.1T2   843  GENDOC.COUN_NUMS.D.047             1 LINE     26    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:56
0          Initialization file for (844/1), (844/8), and (844/31). Line numbers
           in this file are important. Referenced by the COUN database-set only.
00844/048C *GENDOC                   COUN GENS       D   G          COUN:GENDOC.GENS                                                
            5.1T2   844  GENDOC.COUN_GENS.D.048             1 LINE     37    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:56
0          Initialization file for *GENDOC (all generics).  Referenced by the
           COUN database-set only.
1                                                                                               SUN SEP 08/96   15:24:55   Page  703
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00844/049C *GENDOC                   COUN DOCS       D   G          COUN:GENDOC.DOCS                                                
            5.1T2   845  GENDOC.COUN_DOCS.D.049             1 LINE     37    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:56
0          Initialization file for (844/1), (844/8), and (844/31) (all COUN
           database-set document names).
00844/050C *GENDOC                   COUN ERRS       D   G          COUN:GENDOC.ERRS                                                
            5.1T2   846  GENDOC.COUN_ERRS.D.050             1 LINE      ?    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:56
0          Error logging file for *GENDOC errors. Only errors related to the COUN
           database-set are logged in this file.
            
           **********************************************************************
           D5.1 version:
            
           This is an empty file.
           **********************************************************************
00844/051C *GENDOC                   COUN DB.ER      D   G          COUN:GENDOC.DB.ER                                               
            5.1T2   847  GENDOC.COUN_DB.ER.D.051            1 LINE    102    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:57
0          Error logging file for GENDOC.DB (844/31) errors. Logs only errors
           related to the COUN database-set. This file need not exist in order
           for GENDOC to run.
00844/052C *GENDOC                   COUN DSTAT      D   G          COUN:GENDOC.DSTAT                                               
            5.1T2   848  GENDOC.COUN_DSTAT.D.052            1 LINE     17    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:57
0          Log file for *GENDOC documents produced. Computes and maintains
           statistics for the COUN database-set only. Referenced by (844/1) and
           (844/28). Line numbers in this file are important.
00844/053C *GENDOC                   MCP OUTPUT      D   G          MCP:GENDOC.OUTPT                                                
            5.1T2   849  GENDOC.MCP_OUTPUT.D.053            1 LINE     68    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:57
0          *GENDOC MCP documents data base. Referenced by (844/1), (844/8)
           and (844/31). Line numbers in this file are extremely important.
           Referenced by the MCP database-set only.  Contains many $CONTINUE
           WITH lines to various MCP subcomponents -- see (848).
00844/054C *GENDOC                   MCP ONL.W       D   G          MCP:GENDOC.ONL.W                                                
            5.1T2   850  GENDOC.MCP_ONL.W.D.054             1 LINE     73    5 PAGE UM   MENDAL              JULY 23, 1983  14:12:58
0          On-line help facility for *GENDOC (the "query" data base). Line
           numbers in this file are extremely important. Referenced by (844/1),
           (844/8), and (844/31). Referenced by the MCP database-set only.
           Contains a $CONTINUE WITH to GDOC:GENDOC.ONL.W at line range
           (5005,5005.999).
00844/055C *GENDOC                   MCP NUMS        D   G          MCP:GENDOC.NUMS                                                 
            5.1T2   851  GENDOC.MCP_NUMS.D.055              1 LINE     26    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:58
0          Initialization file for (844/1), (844/8), and (844/31). Line numbers
           in this file are important. Referenced by the MCP database-set only.
1                                                                                               SUN SEP 08/96   15:24:55   Page  704
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00844/056C *GENDOC                   MCP GENS        D   G          MCP:GENDOC.GENS                                                 
            5.1T2   852  GENDOC.MCP_GENS.D.056              1 LINE     37    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:58
0          Initialization file for *GENDOC (all generics).  Referenced by the
           MCP database-set only.
00844/057C *GENDOC                   MCP DOCS        D   G          MCP:GENDOC.DOCS                                                 
            5.1T2   853  GENDOC.MCP_DOCS.D.057              1 LINE     37    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:58
0          Initialization file for (844/1), (844/8), and (844/31) (all MCP
           database-set document names).
00844/058C *GENDOC                   MCP ERRS        D   G          MCP:GENDOC.ERRS                                                 
            5.1T2   854  GENDOC.MCP_ERRS.D.058              1 LINE      ?    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:59
0          Error logging file for *GENDOC errors. Only errors related to the MCP
           database-set are logged in this file.
            
           **********************************************************************
           D5.1 version:
            
           This is an empty file.
           **********************************************************************
00844/059C *GENDOC                   MCP DB.ER       D   G          MCP:GENDOC.DB.ER                                                
            5.1T2   855  GENDOC.MCP_DB.ER.D.059             1 LINE      ?    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:59
0          Error logging file for GENDOC.DB (844/31) errors. Logs only errors
           related to the MCP database-set. This file need not exist in order
           for GENDOC to run.
            
           **********************************************************************
           D5.1 version:
            
           This is an empty file.
           **********************************************************************
00844/060C *GENDOC                   MCP DSTAT       D   G          MCP:GENDOC.DSTAT                                                
            5.1T2   856  GENDOC.MCP_DSTAT.D.060             1 LINE     15    1 PAGE UM   MENDAL              JULY 23, 1983  14:12:59
0          Log file for *GENDOC documents produced. Computes and maintains
           statistics for the MCP database-set only. Referenced by (844/1) and
           (844/28). Line numbers in this file are important.
00845/001C  FULL SCREEN HELP         PMF PROJ FILE   D              HELP:FSHELP_PROJ                                                
            5.1T2   857  FULL_SCREEN_HELP.PMF_PROJ.D.001    1 LINE    120    3 PAGE UM   HANSEN              JULY 23, 1983  14:12:59
0          Full Screen Help, or FS Help, is a program designed to provide 
           a crude full screen help facility using a help file format based
           on that used by *CLPARSER.
            
           This subcomponent is the PMF project file (see component 810), for
           the Full Screen Help subroutines.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  705
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ********************************************************************
           D5.0C version:
            
           This version of Full Screen Help should not be considered final in
           design or operation.
           ********************************************************************
0          Referenced by comments of: 845/2, 1089/3 
00845/002C  FULL SCREEN HELP         SOURCE          SQ  O          HELP:FSHELP.S                                                   
            5.1T2   858  FULL_SCREEN_HELP.SOURCE.SQ.002     1 LINE    118   16 PAGE UM   HANSEN              JULY 23, 1983  14:13:00
0          The source for various parts of FSHELP and FSHELPER.  Use the PMF
           and the PMF project file (845/1) to separate the pieces, if needed.
00845/003C  FULL SCREEN HELP         OBJECT          OC  O          HELP:FSHELP                                                     
            5.1T2   859  FULL_SCREEN_HELP.OBJECT.OC.003     1 LINE  12062    5 PAGE UM   HANSEN              JULY 23, 1983  14:13:01
00845/004C  FULL SCREEN HELP         FSHELPER        OE  O          HELP:FSHELPER                                                   
            5.1T2   860  FULL_SCREEN_HELP.FSHELPER.OE.004   1 LINE  15446    6 PAGE UM   HANSEN              JULY 23, 1983  14:13:01
0          The object of the FSHELPER program used to inspect the FSHELP 
           text files.
00845/005C  FULL SCREEN HELP         SOU LIB         SQ  G          HELP:FSHELP.SQL                                                 
            5.1T2   861  FULL_SCREEN_HELP.SOU_LIB.SQ.005    1 LINE     69    1 PAGE UM   HANSEN              JULY 23, 1983  14:13:01
0          The PLUS source library for programs using FSHELP.
0          Referenced by comments of: 810/10, 1089/9 
00845/006C  FULL SCREEN HELP         OBJ             OE  O          SEG2:FSHELP                                                     
            5.1T2   862  FULL_SCREEN_HELP.OBJ.OE.006        1 LINE  12062    5 PAGE UM   HANSEN              JULY 23, 1983  14:13:02
                         SEG2:FSHELP          
0          The linkedited object module for FSHELP subroutines.
0          Referenced by comments of: 387/38, 810/5, 1079/1 
00845/007C  FULL SCREEN HELP         DOCUMENTATION   WF             HELP:FSHELP.FMT                                                 
            5.1T2   863  FULL_SCREEN_HELP.DOCUMENT.WF.007   1 LINE     84    4 PAGE UM   HANSEN              JULY 23, 1983  14:13:02
0          This is the *FORMAT source for the FSHELP documentation.
00845/008C  FULL SCREEN HELP         DOCUMENTATION   PF             HELP:FSHELP.DOC                                                 
            5.1T2   864  FULL_SCREEN_HELP.DOCUMENT.PF.008   1 LINE     65    4 PAGE UM   HANSEN              JULY 23, 1983  14:13:02
0          Printer ready form of the FSHELP documentation.  About 6 pages.
00846/001C  NETMAIL                  GOSSIP          W   G          W267:NETMAIL.READ                                               
            5.1T2   865  NETMAIL.GOSSIP.W.001               1 LINE     70    8 PAGE UM   EADIE               JULY 23, 1983  14:13:03
0          Read this first.  It explains EVERYTHING!
1                                                                                               SUN SEP 08/96   15:24:55   Page  706
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00846/002C  NETMAIL                  INSTALL         C   G          W267:NETMAIL.MAKE                                               
            5.1T2   866  NETMAIL.INSTALL.C.002              1 LINE    143    3 PAGE UM   EADIE               JULY 23, 1983  14:13:03
0          This subcomponent contains commands to install NETMAIL.
00846/003C  NETMAIL                  SOURCE          SQ  G          W267:NETMAIL.SQ                                                 
            5.1T2   867  NETMAIL.SOURCE.SQ.003              1 LINE    231   21 PAGE UM   EADIE               JULY 23, 1983  14:13:03
0          This subcomponent contains the source code for NETMAIL.
00846/004C  NETMAIL                  GRAMMAR         SR  G          W267:NETMAIL.SR                                                 
            5.1T2   868  NETMAIL.GRAMMAR.SR.004             1 LINE     83    4 PAGE UM   EADIE               JULY 23, 1983  14:13:05
0          This subcomponent contains the source of the NETMAIL grammar.
00846/005C  NETMAIL                  XPORT           SQ  G          W267:XPORT.SQL                                                  
            5.1T2   869  NETMAIL.XPORT.SQ.005               1 LINE     91    1 PAGE UM   EADIE               JULY 23, 1983  14:13:05
0          This  subcomponent contains the source library for the NETMAIL 'tranport
           service'.
00846/006C  NETMAIL                  XPORT           SQ  G          W267:XPORT.SQ                                                   
            5.1T2   870  NETMAIL.XPORT.SQ.006               1 LINE    112    1 PAGE UM   EADIE               JULY 23, 1983  14:13:05
0          This   subcomponent  contains  the  source  of  the  NETMAIL  'transport
           service.'
0          Referenced by comments of: 846/16 
00846/007C  NETMAIL                  NETWORK         SQ  G          W267:NETWORK.SQL                                                
            5.1T2   871  NETMAIL.NETWORK.SQ.007             1 LINE     67    1 PAGE UM   EADIE               JULY 23, 1983  14:13:05
0          This  subcomponent contains the source library for the network-dependent
           NETMAIL I/O.
00846/008C  NETMAIL                  NETWORK         SQ  G          W267:MERIT.SQ                                                   
            5.1T2   872  NETMAIL.NETWORK.SQ.008             1 LINE     87    1 PAGE UM   EADIE               JULY 23, 1983  14:13:06
0          This  subcomponent  contains  the source for the Merit network-dependent
           NETMAIL I/O.
00846/009C  NETMAIL                  NETMAIL         OC  G          W267:NETMAIL>                                                   
            5.1T2   873  NETMAIL.NETMAIL.OC.009             1 LINE   3436   23 PAGE UM   EADIE               JULY 23, 1983  14:13:06
0          This  subcomponent  contains  object for NETMAIL, the transport service,
           and the Merit network I/O. There is a slight chance this  file  will  be
           $RUNable at your site without change (see NETMAIL.READ).
00846/010C  NETMAIL                  RFC_821         W   G          S1669 5.0CT1 VLO FSNAME=NETMAIL.RFC_821.W.010(1)             596
            5.1T2   874  NETMAIL.RFC_821.W.010              1 LINE     74   39 PAGE UM   EADIE               MAR. 02, 1983  22:28:38
0          This subcomponent contains ARPA protocol document RFC821.
1                                                                                               SUN SEP 08/96   15:24:55   Page  707
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00846/011C  NETMAIL                  RFC_822         W   G          S1669 5.0CT1 VLO FSNAME=NETMAIL.RFC_822.W.011(1)             597
            5.1T2   875  NETMAIL.RFC_822.W.011              1 LINE     73   33 PAGE UM   EADIE               MAR. 02, 1983  22:28:43
0          This subcomponent contains ARPA protocol document RFC822.
00846/012C  NETMAIL                  FORUM           P   G          W267:NETMAIL.CONF                                               
            5.1T2   876  NETMAIL.FORUM.P.012                1 LINE     87  190 PAGE UM   EADIE               JULY 23, 1983  14:23:56
0          *FORUM conference (NET-MAIL) in printer ready form.
00846/013C  NETMAIL                  BOXCHECK            G          W267:BOX_CHECK                                                  
            5.1T2   877  NETMAIL.BOXCHECK..013              1 LINE   5116    9 PAGE UM   EADIE               JULY 23, 1983  14:24:07
0          This subcomponent contains source (starting at line 1000) and object
           for a grungy little program to print a summary of the contents of a
           remote mailbox.
00846/014C  NETMAIL                  HOST TABLE      D   G          POST:HOST-TABLE                                                 
            5.1T2   878  NETMAIL.HOST_TABLE.D.014           1 LINE     22    1 PAGE UM   EADIE               JULY 23, 1983  14:24:08
0          This  file  contains  directives for each remote mailbox to indicate (i)
           the $MOUNT parameter and (ii) the text to  be  written  to  the  mounted
           device in order to start up the remote (slave) netmail program.
00846/015C  NETMAIL                  EXTRAS          SQ  G          W267:NETMAIL.XTRA                                               
            5.1T2   879  NETMAIL.EXTRAS.SQ.015              1 LINE     92    3 PAGE UM   EADIE               JULY 23, 1983  14:24:08
0          Contains a site name checking routine and grammar which will eventually
           be a part of *Userdirectory (821).
00846/016C  NETMAIL                  MMDF            SQ  O          W267:NETMAIL.MMDF                                               
            5.1T2   880  NETMAIL.MMDF.SQ.016                1 LINE    181    8 PAGE UM   EADIE               JULY 23, 1983  14:24:08
0          This subcomponent could replace XPORT.SQ (846/6) to implement the
           CSNET protocol called "PhoneNet".  This code needs work in the 
           error detection and correction areas.
00847/001C  PROFORT                  FLECS SOURCE    SF  G          S1223 TAXIR8 FSNAME=PROF.S                                  68  
            5.1T2   881  PROFORT.FLECS_SOURCE.SF.001        1 LINE     73   60 PAGE UM   BRILL               FEB. 10, 1983  13:49:54
0          Source for FLECS portion of PROFORT, the FORTRAN Execution Profiler.
           This should be processed by the FLECS preprocessor (673) and then
           compiled using FORTRAN-H (298) with PAR=XL.
0          Referenced by comments of: 847/3, 847/4 
00847/002C  PROFORT                  FLECS LISTING   L   G          S1223 TAXIR8 FSNAME=PROF.F                                  69  
            5.1T2   882  PROFORT.FLECS_LISTING.L.002        1 LINE    121   97 PAGE UM   BRILL               FEB. 10, 1983  13:50:10
0          Indented listing of FLECS portion of PROFORT (output listing
           produced by FLECS).
1                                                                                               SUN SEP 08/96   15:24:55   Page  708
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00847/003C  PROFORT                  FLECS OBJECT 1  O   G          S1223 TAXIR8 FSNAME=PROF.O                                  70  
            5.1T2   883  PROFORT.FLECS_OBJECT_1.O.003       1 LINE  11324   35 PAGE UM   BRILL               FEB. 10, 1983  13:50:46
0          Object for most of FLECS portion of PROFORT, that is, object
           for (847/1), line number range 1 to 10700.
00847/004C  PROFORT                  FLECS OBJECT 2  O   G          S1223 TAXIR8 FSNAME=PROFTNG.O                               71  
            5.1T2   884  PROFORT.FLECS_OBJECT_2.O.004       1 LINE    472    1 PAGE UM   BRILL               FEB. 10, 1983  13:52:30
0          Object for balance of FLECS portion of PROFORT, that is, object for 
           (847/1), line number range 11001 to 11400.
00847/005C  PROFORT                  ASM SOURCE      SA  G          S1223 TAXIR8 FSNAME=PROFASM.S                               72  
            5.1T2   885  PROFORT.ASM_SOURCE.SA.005          1 LINE     72    7 PAGE UM   BRILL               FEB. 10, 1983  13:52:40
0          Source for assembler portion of PROFORT.
00847/006C  PROFORT                  ASM OBJECT      O   G          S1223 TAXIR8 FSNAME=PROFASM.O                               73  
            5.1T2   886  PROFORT.ASM_OBJECT.O.006           1 LINE   1140    2 PAGE UM   BRILL               FEB. 10, 1983  13:52:50
0          Object for assembler portion of PROFORT.
00847/007C  PROFORT                  *PROFORT        OE  G          *PROFORT                                                        
            5.1T2   887  PROFORT.?PROFORT.OE.007            1 SEQ   32767   30 PAGE UM   BRILL               JULY 23, 1983  14:25:23
                         *PROFORT             
0          Linkedited object module for PROFORT.
00847/008C  PROFORT                  MEMO 426        WF             S0672 CCMEMO 'CCMEMOS' FSNAME=M426SOU                       234 
            5.1T2   888  PROFORT.MEMO_426.WF.008            1 LINE    165   12 PAGE UM   BRILL               NOV. 18, 1981  14:35:34
0          This is UM Computing Center Memo 426, "*PROFORT - A FORTRAN Execution
           Profiler."
0          Referenced by comments of: 847/9 
00847/009C  PROFORT                  MEMO 426        PF             S0672 CCMEMO 'CCMEMOS' FSNAME=M426OUT                       233 
            5.1T2   889  PROFORT.MEMO_426.PF.009            1 LINE    135   13 PAGE UM   BRILL               NOV. 18, 1981  14:35:12
0          Printer-ready version of (847/8).  Contains a $CONTINUE WITH UNSP:PGF
           record, which should be changed to $CONTINUE WITH *PGF (839/7).
00847/010C  PROFORT                  INSTALL GUIDE   P   G          S1223 TAXIR8 FSNAME=PROF.I                                  76  
            5.1T2   890  PROFORT.INSTALL_GUIDE.P.010        1 LINE     68    3 PAGE UM   BRILL               FEB. 10, 1983  13:53:38
0          Installation and maintenance guide for PROFORT.
00847/011C  PROFORT                  PMF PROJECT     D   G          S1223 TAXIR8 FSNAME=PROF.P                                  77  
            5.1T2   891  PROFORT.PMF_PROJECT.D.011          1 LINE    110    4 PAGE UM   BRILL               FEB. 10, 1983  13:53:45
0          PMF (810) project file for PROFORT.
1                                                                                               SUN SEP 08/96   15:24:55   Page  709
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00847/012C  PROFORT                  TEST DATA       SF  G          S1223 TAXIR8 FSNAME=PROF.SAMPLE                             78  
            5.1T2   892  PROFORT.TEST_DATA.SF.012           1 LINE     59    1 PAGE UM   BRILL               FEB. 10, 1983  13:54:00
0          Sample FORTRAN program to test PROFORT.
00848/001C  MICRO COMM PGMS          APPLE ASSEMBLE  C   G          MCP:APPLE.ASSEMB                                                
            5.1T2   893  MICRO_COMM_PGMS.APPLE_ASS.C.001    1 LINE     91    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:52
0          Component 848 is the Micro Communication Programs, or MCP, which were
           written at the University of Michigan for various microprocessors. These
           are propprietary programs for internal CC use only and are distributed under the following conditions:
            
              -  The programs will be distributed to users only after a signed 
                 license agreement (see below) has been returned to UM.
                 
              -  The terms of the license agreement will be followed.
            
           *********************************************************************
           D5.1 version:
            
           Unfortunately, our lawyers are still working on the license
           agreement, so we are sending all of these programs to all MTS
           installations. Until the license agreements are signed, we request
           that you do not distribute any MCP programs to users without obtaining
           permission from the UM Computing Center. We will send the
           agreements for you to sign as soon as our lawyers have them ready.
           *********************************************************************
            
            
           ----------------------------------------------------------------------
            
           This subcomponent contains a source file to assemble the APPLE MCP
           program, called "AMIE" (848/6). Contains $CONTINUE WITHs for many
           APPLE MCP subcomponents, (848/1) through (848/11), and many M650X
           MCP subcomponents, (848/122) through (848/138). Refers to *MCS650XASR
           (686/28).
0          Referenced by comments of: 844/53, 848/1, 848/9 
00848/002C  MICRO COMM PGMS          APPLE CONSOLE   SA  O          MCP:APPLE.CIO                                                   
            5.1T2   894  MICRO_COMM_PGMS.APPLE_CON.SA.002   1 LINE     68   12 PAGE UM   HERSEY              JULY 23, 1983  14:25:52
0          Source for the APPLE hardware-specific console I/O routine for AMIE
           (848/6).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/003C  MICRO COMM PGMS          APPLE CP/M KEY  SA  B          MCP:APPLE.CP/M.L                                                
            5.1T2   895  MICRO_COMM_PGMS.APPLE_CP/.SA.003   1 LINE     73    2 PAGE UM   HERSEY              JULY 23, 1983  14:25:53
0          APPLE CP/M lower case keyboard driver.  To be assembled by itself and 
           installed on CP/M system disk.
1                                                                                               SUN SEP 08/96   15:24:55   Page  710
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/004C  MICRO COMM PGMS          APPLE DOC       PF  G          MCP:APPLE.DOC                                                   
            5.1T2   896  MICRO_COMM_PGMS.APPLE_DOC.PF.004   1 LINE     78    5 PAGE UM   HERSEY              JULY 23, 1983  14:25:54
0          Public APPLE MCP documentation.  Will eventually be a CCMemo.
0          Referenced by comments of: 848/5 
00848/005C  MICRO COMM PGMS          APPLE DOC       WF  G          MCP:APPLE.DOC.S                                                 
            5.1T2   897  MICRO_COMM_PGMS.APPLE_DOC.WF.005   1 LINE     70    4 PAGE UM   HERSEY              JULY 23, 1983  14:25:54
0          Source for APPLE.DOC (848/4). Contains commands at the beginning of the
           file for assembly.
00848/006C  MICRO COMM PGMS          APPLE AMIE      O   G          MCP:APPLE.DOS                                                   
            5.1T2   898  MICRO_COMM_PGMS.APPLE_AMI.O.006    1 LINE     65   13 PAGE UM   HERSEY              JULY 23, 1983  14:25:54
0          Object for APPLE DOS operating system MCP program, "AMIE".
0          Referenced by comments of: 848/1, 848/2 
00848/007C  MICRO COMM PGMS          APPLE HRD DESC  D   G          MCP:APPLE.HRD                                                   
            5.1T2   899  MICRO_COMM_PGMS.APPLE_HRD.D.007    1 LINE    128    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:55
0          APPLE Hardware description file.  (HARDWARE) on distribution disks.
00848/008C  MICRO COMM PGMS          APPLE INIT      O   G          MCP:APPLE.INIT                                                  
            5.1T2   900  MICRO_COMM_PGMS.APPLE_INI.O.008    1 LINE     65   11 PAGE UM   HERSEY              JULY 23, 1983  14:25:55
0          APPLE hardware configuration program.  (MCPINIT) object on distribution
           disks.
0          Referenced by comments of: 848/9 
00848/009C  MICRO COMM PGMS          APPLE INIT ASM  C   G          MCP:APPLE.INIT.S                                                
            5.1T2   901  MICRO_COMM_PGMS.APPLE_INI.C.009    1 LINE     92    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:56
0          File containing MTS commands to assemble (848/8). Refers to
           *MCS650XASR (686/28). Contains $CONTINUE WITHs for some APPLE
           subcomponents, (848/1) through (848/11,) and some M650X subcomponents,
           (848/122) through (848/138).
00848/010C  MICRO COMM PGMS          APPLE I/O RTNS  SA  G          MCP:APPLE.SYSTM                                                 
            5.1T2   902  MICRO_COMM_PGMS.APPLE_I/O.SA.010   1 LINE     71   29 PAGE UM   HERSEY              JULY 23, 1983  14:25:56
0          Operating-system dependent I/O routines, which mostly do file I/O.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/011C  MICRO COMM PGMS          APPLE VRSN      SA  G          MCP:APPLE.VRSN                                                  
            5.1T2   903  MICRO_COMM_PGMS.APPLE_VRS.SA.011   1 LINE     85    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:57
0          This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
1                                                                                               SUN SEP 08/96   15:24:55   Page  711
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 848/1 
00848/012C  MICRO COMM PGMS          ATTNTRAP        O   G          MCP:ATTNTRAP                                                    
            5.1T2   904  MICRO_COMM_PGMS.ATTNTRAP.O.012     1 LINE     80    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:57
0          Attention trap subroutine for MCP:COPY (848/17).
0          Referenced by comments of: 848/13, 848/20, 848/140 
00848/013C  MICRO COMM PGMS          ATTNTRAP        SA  G          MCP:ATTNTRAP.S                                                  
            5.1T2   905  MICRO_COMM_PGMS.ATTNTRAP.SA.013    1 LINE     67    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:58
0          Source for (848/12). Contains commands at the beginning of the file
           for assembly.
00848/014C  MICRO COMM PGMS          BIN2HEX         O   G          MCP:BIN2HEX                                                     
            5.1T2   906  MICRO_COMM_PGMS.BIN2HEX.O.014      1 LINE     80    2 PAGE UM   HERSEY              JULY 23, 1983  14:25:58
0          Converts BINARY file to INTEL HEX format. Has a $CONTINUE WITH
           *PASCALVSLIB (823/7) record.
0          Referenced by comments of: 848/16 
00848/015C  MICRO COMM PGMS          BIN2HEX BAT     C   G          MCP:BIN2HEX.BAT                                                 
            5.1T2   907  MICRO_COMM_PGMS.BIN2HEX_B.C.015    1 LINE     96    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:58
0          $SOURCE for COMPILE and LINK.
            
           Requires *PASCALVS; contains $CONTINUE WITH *PASCALVSLIB (823/7). 
           References (848/47).
00848/016C  MICRO COMM PGMS          BIN2HEX PAS     SW  G          MCP:BIN2HEX.PAS                                                 
            5.1T2   908  MICRO_COMM_PGMS.BIN2HEX_P.SW.016   1 LINE     62    1 PAGE UM   HERSEY              JULY 23, 1983  14:25:58
0          This contains PASCAL/VS source for (848/14).
00848/017C  MICRO COMM PGMS          COPY            O   G          MCP:COPY                                                        
            5.1T2   909  MICRO_COMM_PGMS.COPY.O.017         1 LINE  10602    4 PAGE UM   HERSEY              JULY 23, 1983  14:25:58
0          MTS program run by %TELECOPY command.
0          Referenced by comments of: 848/12, 848/20, 848/139 
00848/018C  MICRO COMM PGMS          COPY DOC        PF  G          MCP:COPY.DOC                                                    
            5.1T2   910  MICRO_COMM_PGMS.COPY_DOC.PF.018    1 LINE     78    7 PAGE UM   HERSEY              JULY 23, 1983  14:25:59
0          This is the documentation for MCP:COPY.  It will eventually be a
           CCMemo.
00848/019C  MICRO COMM PGMS          COPY DOC        WF  G          MCP:COPY.DOC.S                                                  
            5.1T2   911  MICRO_COMM_PGMS.COPY_DOC.WF.019    1 LINE     79    6 PAGE UM   HERSEY              JULY 23, 1983  14:25:59
0          Source for MCP:COPY.DOC.  Contains commands at the beginning of
           the file for assembly.
1                                                                                               SUN SEP 08/96   15:24:55   Page  712
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/020C  MICRO COMM PGMS          COPY SOU        SQ  G          MCP:COPY.S                                                      
            5.1T2   912  MICRO_COMM_PGMS.COPY_SOU.SQ.020    1 LINE     74   12 PAGE UM   HERSEY              JULY 23, 1983  14:26:00
0          Source for (848/17). Contains commands at the beginning of the file
           for assembly. Has $CONTINUE WITH MCP:ATTNTRAP (848/12) record.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/021C  MICRO COMM PGMS          CP/M OBJ        O   G          MCP:CP/M                                                        
            5.1T2   913  MICRO_COMM_PGMS.CP/M_OBJ.O.021     1 LINE     59   13 PAGE UM   HERSEY              JULY 23, 1983  14:26:00
0          Referenced by comments of: 848/22, 848/28, 848/147 
00848/022C  MICRO COMM PGMS          CP/M ASSEMBLE   C   G          MCP:CP/M.ASSEMB                                                 
            5.1T2   914  MICRO_COMM_PGMS.CP/M_ASSE.C.022    1 LINE    117    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:01
0          $SOURCE file for assembling the CP/M operating system. Requires
           *Z80ASR (686/3) and COPY:I8080MACS (686/24). Contains $CONTINUE WITHs
           for various CP/M MCP subcomponents, (848/21) through (848/68), and
           various I8080 MCP subcomponents, (848/51) through (848/68).
00848/023C  MICRO COMM PGMS          CP/M DOC        PF  G          MCP:CP/M.DOC                                                    
            5.1T2   915  MICRO_COMM_PGMS.CP/M_DOC.PF.023    1 LINE     78   10 PAGE UM   HERSEY              JULY 23, 1983  14:26:01
0          Public CP/M documentation.  Will eventually be a CCMemo.
0          Referenced by comments of: 848/24 
00848/024C  MICRO COMM PGMS          CP/M DOC        WF  G          MCP:CP/M.DOC.S                                                  
            5.1T2   916  MICRO_COMM_PGMS.CP/M_DOC.WF.024    1 LINE     71    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:01
0          Source for public CP/M documentation (848/23). Contains commands at
           the beginning of the file for assembly.
00848/025C  MICRO COMM PGMS          CP/M FLOPPY     C   G          MCP:CP/M.FLOPPY                                                 
            5.1T2   917  MICRO_COMM_PGMS.CP/M_FLOP.C.025    1 LINE     67    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:02
0          Commands to generate an 8" CP/M MCP distribution floppy disk.
           Requires FLOP:FLOPPY (822/4).
00848/026C  MICRO COMM PGMS          CP/M HARD DESC  D   G          MCP:CP/M.HRD                                                    
            5.1T2   918  MICRO_COMM_PGMS.CP/M_HARD.D.026    1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:02
0          Hardware description file for the CP/M operating system.
00848/027C  MICRO COMM PGMS          CP/M INIT       O   G          MCP:CP/M.INIT                                                   
            5.1T2   919  MICRO_COMM_PGMS.CP/M_INIT.O.027    1 LINE     59    6 PAGE UM   HERSEY              JULY 23, 1983  14:26:03
0          CP/M hardware configuration program object.
0          Referenced by comments of: 848/28 
1                                                                                               SUN SEP 08/96   15:24:55   Page  713
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/028C  MICRO COMM PGMS          CP/M INIT.AS    C   G          MCP:CP/M.INIT.AS                                                
            5.1T2   920  MICRO_COMM_PGMS.CP/M_INIT.C.028    1 LINE    127    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:03
0          $SOURCE file for assembling the CP/M INIT program (848/27). Requires
           *Z80ASR (686/3) and COPY:I8080MACS (686/24). Contains $CONTINUE WITHs
           for various CP/M MCP subcomponents, (848/21) through (848/68), and
           various I8080 MCP subcomponents, (848/51) through (848/68).
00848/029C  MICRO COMM PGMS          CP/M KEY DEF    D   G          MCP:CP/M.KEY                                                    
            5.1T2   921  MICRO_COMM_PGMS.CP/M_KEY.D.029     1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:03
0          File containing the keyboard function definition data for CP/M.
00848/030C  MICRO COMM PGMS          CP/M SERIAL IO  SA  G          MCP:CP/M.SIO                                                    
            5.1T2   922  MICRO_COMM_PGMS.CP/M_SERI.SA.030   1 LINE     72    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:03
0          Serial I/O CP/M-specific routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/031C  MICRO COMM PGMS          CP/M I/O RTNS   SA  G          MCP:CP/M.SYSTM                                                  
            5.1T2   923  MICRO_COMM_PGMS.CP/M_I/O.SA.031    1 LINE     68    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:04
0          Operating system dependent I/O routines. Has $CONTINUE WITHs to
           MCP:CP/M.S1 (848/32), MCP:CP/M.S2 (848/33), and MCP:CP/M.S3 (848/34).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/032C  MICRO COMM PGMS          CP/M I/O RTNS   SA  G          MCP:CP/M.S1                                                     
            5.1T2   924  MICRO_COMM_PGMS.CP/M_I/O.SA.032    1 LINE     68    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:04
0          Operating system dependent I/O routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/31, 848/36, 848/149 
00848/033C  MICRO COMM PGMS          CP/M I/O RTNS   SA  G          MCP:CP/M.S2                                                     
            5.1T2   925  MICRO_COMM_PGMS.CP/M_I/O.SA.033    1 LINE     68    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:04
0          Operating system dependent I/O routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/31, 848/36, 848/149 
00848/034C  MICRO COMM PGMS          CP/M I/O RTNS   SA  G          MCP:CP/M.S3                                                     
            5.1T2   926  MICRO_COMM_PGMS.CP/M_I/O.SA.034    1 LINE     76   12 PAGE UM   HERSEY              JULY 23, 1983  14:26:04
0          Operating system dependent I/O routines.
1                                                                                               SUN SEP 08/96   15:24:55   Page  714
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/31, 848/36, 848/149 
00848/035C  MICRO COMM PGMS          CP/M VRSN       SA  G          MCP:CP/M.VRSN                                                   
            5.1T2   927  MICRO_COMM_PGMS.CP/M_VRSN.SA.035   1 LINE     68    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:05
0           Source containing CP/M version date and heading.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/036C  MICRO COMM PGMS          CP/M Z80 SERIO  SA  G          MCP:CP/M.Z80SIO                                                 
            5.1T2   928  MICRO_COMM_PGMS.CP/M_Z80.SA.036    1 LINE     67    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:06
0          Serial I/O Z80-specific routines.  Has $CONTINUE WITHs to
           MCP:CP/M.S1 (848/32), MCP:CP/M.S2 (848/33), and MCP:CP/M.S3 (848/34).
           Provided to users as an example.
00848/037C  MICRO COMM PGMS          DOCUMENT        PF  G          MCP:DOCUMENT                                                    
            5.1T2   929  MICRO_COMM_PGMS.DOCUMENT.PF.037    1 LINE     70   11 PAGE UM   HERSEY              JULY 23, 1983  14:26:06
0          Documents the MCP protocol.
0          Referenced by comments of: 848/38 
00848/038C  MICRO COMM PGMS          DOCUMENT        WF  G          MCP:DOCUMENT.S                                                  
            5.1T2   930  MICRO_COMM_PGMS.DOCUMENT.WF.038    1 LINE     69    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:06
0          Source for (848/37). Contains commands at the beginning of the file
           for assembly.
00848/039C  MICRO COMM PGMS          EXAMPLE         PF  G          MCP:EXAMPLE                                                     
            5.1T2   931  MICRO_COMM_PGMS.EXAMPLE.PF.039     1 LINE    135   13 PAGE UM   HERSEY              JULY 23, 1983  14:26:07
0          Example conversations.
0          Referenced by comments of: 848/40 
00848/040C  MICRO COMM PGMS          EXAMPLE         WF  G          MCP:EXAMPLE.S                                                   
            5.1T2   932  MICRO_COMM_PGMS.EXAMPLE.WF.040     1 LINE    107    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:08
0          *FORMAT source for (848/39). Contains commands at the beginning of the
           file for assembly.
00848/041C  MICRO COMM PGMS          FMT LIB         WF  G          MCP:FMT.LIB                                                     
            5.1T2   933  MICRO_COMM_PGMS.FMT_LIB.WF.041     1 LINE     84   24 PAGE UM   HERSEY              JULY 23, 1983  14:26:08
0          FORMAT macros for the various MCP documents.
1                                                                                               SUN SEP 08/96   15:24:55   Page  715
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/042C  MICRO COMM PGMS          FMT MEMO MED    WF  G          MCP:FMT.MEMO.M                                                  
            5.1T2   934  MICRO_COMM_PGMS.FMT_MEMO.WF.042    1 LINE     90    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:09
0          FORMAT macros for the various MCP documents.
00848/043C  MICRO COMM PGMS          FMT MEMO SHORT  WF  G          MCP:FMT.MEMO.S                                                  
            5.1T2   935  MICRO_COMM_PGMS.FMT_MEMO.WF.043    1 LINE     90    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:10
0          FORMAT macros for the various MCP documents.
0          Referenced by comments of: 848/196 
00848/044C  MICRO COMM PGMS          HUFFIN          SW  G          MCP:HUFFIN                                                      
            5.1T2   936  MICRO_COMM_PGMS.HUFFIN.SW.044      1 LINE    252    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:10
0          Public domain program for APPLE DOS to/from Pascal P-system.
00848/045C  MICRO COMM PGMS          IBMPC BIOS      O   G          MCP:IBMPC.BIOS                                                  
            5.1T2   937  MICRO_COMM_PGMS.IBMPC_BIO.O.045    1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:10
0          Interrupt driven serial I/O driver for IBM PC.
00848/046C  MICRO COMM PGMS          IBMPC CONSOLE   SA  G          MCP:IBMPC.CIO                                                   
            5.1T2   938  MICRO_COMM_PGMS.IBMPC_CON.SA.046   1 LINE     75    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:10
0          IBM PC console I/O.
00848/047C  MICRO COMM PGMS          IBMPC DOS       O   G          MCP:IBMPC.DOS                                                   
            5.1T2   939  MICRO_COMM_PGMS.IBMPC_DOS.O.047    1 LINE    225   15 PAGE UM   HERSEY              JULY 23, 1983  14:26:11
0          Object for the IBM PC DOS operating system, "WINDOW".
0          Referenced by comments of: 848/15 
00848/048C  MICRO COMM PGMS          IBMPC HARD      D   G          MCP:IBMPC.HRD                                                   
            5.1T2   940  MICRO_COMM_PGMS.IBMPC_HAR.D.048    1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:11
0          Hardware description file for the IBM PC.
00848/049C  MICRO COMM PGMS          IBMPC KEY       D   G          MCP:IBMPC.KEY                                                   
            5.1T2   941  MICRO_COMM_PGMS.IBMPC_KEY.D.049    1 LINE    225    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:12
0          IBM PC Keyboard function definition data file.
00848/050C  MICRO COMM PGMS          IBMPC LNK RESP  C   G          MCP:IBMPC.LNK                                                   
            5.1T2   942  MICRO_COMM_PGMS.IBMPC_LNK.C.050    1 LINE     11    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:12
0          IBM PC linker response data file.
00848/051C  MICRO COMM PGMS          I8080 CONSTANT  SA  G          MCP:I8080.CONSTA                                                
            5.1T2   943  MICRO_COMM_PGMS.I8080_CON.SA.051   1 LINE     69    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:12
0          Constant declarations for I8080 progams.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  716
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/22, 848/28, 848/147, 848/183, 848/184 
00848/052C  MICRO COMM PGMS          I8080 CONVRS    SA  G          MCP:I8080.CONVRS                                                
            5.1T2   944  MICRO_COMM_PGMS.I8080_CON.SA.052   1 LINE     69   16 PAGE UM   HERSEY              JULY 23, 1983  14:26:13
0          I8080 conversation buffer management routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/053C  MICRO COMM PGMS          I8080 DISK      SA  G          MCP:I8080.DISK                                                  
            5.1T2   945  MICRO_COMM_PGMS.I8080_DIS.SA.053   1 LINE     68   11 PAGE UM   HERSEY              JULY 23, 1983  14:26:13
0          I8080 disk file copy routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/054C  MICRO COMM PGMS          I8080 DOC       PF  G          MCP:I8080.DOC                                                   
            5.1T2   946  MICRO_COMM_PGMS.I8080_DOC.PF.054   1 LINE     79    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:14
0          MCP I8080 public documentation.  This is the printer-ready output.
           Will eventually be a CCMemo.
00848/055C  MICRO COMM PGMS          I8080 DOC       WF  G          MCP:I8080.DOC.S                                                 
            5.1T2   947  MICRO_COMM_PGMS.I8080_DOC.WF.055   1 LINE     79    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:14
0          FORMAT source for I8080 public documentation.  Contains commands
           at the beginning of the file for assembly.
00848/056C  MICRO COMM PGMS          I8080 INIT      SA  G          MCP:I8080.INIT                                                  
            5.1T2   948  MICRO_COMM_PGMS.I8080_INI.SA.056   1 LINE     77   17 PAGE UM   HERSEY              JULY 23, 1983  14:26:15
0          Source for the I8080 hardware configuration program.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/057C  MICRO COMM PGMS          I8080 INSIDE    WF  G          MCP:I8080.INSIDE                                                
            5.1T2   949  MICRO_COMM_PGMS.I8080_INS.WF.057   1 LINE     69   10 PAGE UM   HERSEY              JULY 23, 1983  14:26:16
0          Description of machine/operating system dependent routines required by
           I8080 MCP program -- similar requirements for other MCP programs.
00848/058C  MICRO COMM PGMS          I8080 I/O UTIL  SA  G          MCP:I8080.IOUTIL                                                
            5.1T2   950  MICRO_COMM_PGMS.I8080_I/O.SA.058   1 LINE     68    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:16
0          I8080 utility routines for serial I/O, called by routines in I8080.SIO
           (848/64).
            
           This source file is copyrighted.  Please do not redistribute to any third
1                                                                                               SUN SEP 08/96   15:24:55   Page  717
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          party without the permission of the University of Michigan.
0          Referenced by comments of: 848/184 
00848/059C  MICRO COMM PGMS          I8080 KEYBRD    SA  G          MCP:I8080.KEYBRD                                                
            5.1T2   951  MICRO_COMM_PGMS.I8080_KEY.SA.059   1 LINE     72   16 PAGE UM   HERSEY              JULY 23, 1983  14:26:17
0          I8080 keyboard routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/060C  MICRO COMM PGMS          I8080 MCP       SA  G          MCP:I8080.MCP                                                   
            5.1T2   952  MICRO_COMM_PGMS.I8080_MCP.SA.060   1 LINE     68   26 PAGE UM   HERSEY              JULY 23, 1983  14:26:17
0          I8080 MCP protocol routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/061C  MICRO COMM PGMS          I8080 PARSER    SA  G          MCP:I8080.PARSE                                                 
            5.1T2   953  MICRO_COMM_PGMS.I8080_PAR.SA.061   1 LINE     68    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:19
0          I8080 command parse utility subroutines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/062C  MICRO COMM PGMS          I8080 PERMIT    C   G          MCP:I8080.PERMIT                                                
            5.1T2   954  MICRO_COMM_PGMS.I8080_PER.C.062    1 LINE     34    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:19
0          Command file for permitting access to I8080 source files.
00848/063C  MICRO COMM PGMS          I8080 POLL      SA  G          MCP:I8080.POLL                                                  
            5.1T2   955  MICRO_COMM_PGMS.I8080_POL.SA.063   1 LINE     68    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:19
0          High-level I8080 polling routines (main program).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/064C  MICRO COMM PGMS          I8080 SERIAL    SA  G          MCP:I8080.SIO                                                   
            5.1T2   956  MICRO_COMM_PGMS.I8080_SER.SA.064   1 LINE     75   27 PAGE UM   HERSEY              JULY 23, 1983  14:26:20
0          Serial I/O I8080-specific routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/58 
1                                                                                               SUN SEP 08/96   15:24:55   Page  718
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/065C  MICRO COMM PGMS          I8080 STATS     SA  G          MCP:I8080.STATS                                                 
            5.1T2   957  MICRO_COMM_PGMS.I8080_STA.SA.065   1 LINE     68    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:21
0          I8080 statistics printing routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/066C  MICRO COMM PGMS          I8080 TELEPRNT  SA  G          MCP:I8080.TLPRNT                                                
            5.1T2   958  MICRO_COMM_PGMS.I8080_TEL.SA.066   1 LINE     70    7 PAGE UM   HERSEY              JULY 23, 1983  14:26:21
0          Teleprinter routines.  Machine -independent console I/O for line-oriented
           terminals.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/067C  MICRO COMM PGMS          I8080 UTIL      SA  G          MCP:I8080.UTIL                                                  
            5.1T2   959  MICRO_COMM_PGMS.I8080_UTI.SA.067   1 LINE     68   13 PAGE UM   HERSEY              JULY 23, 1983  14:26:22
0          I8080 low-level utility routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/068C  MICRO COMM PGMS          I8080 VARS      SA  G          MCP:I8080.VARS                                                  
            5.1T2   960  MICRO_COMM_PGMS.I8080_VAR.SA.068   1 LINE     68   13 PAGE UM   HERSEY              JULY 23, 1983  14:26:23
0          Variable descriptions for I8080 programs.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/22, 848/28, 848/147, 848/183 
00848/069C  MICRO COMM PGMS          I8086 BIOS      SA  G          MCP:I8086.BIOS                                                  
            5.1T2   961  MICRO_COMM_PGMS.I8086_BIO.SA.069   1 LINE     77    8 PAGE UM   HERSEY              JULY 23, 1983  14:26:23
0          Example serial I/O bios for WINDOW (source).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/112 
00848/070C  MICRO COMM PGMS          I8086 CHARS     SA  G          MCP:I8086.CHARS                                                 
            5.1T2   962  MICRO_COMM_PGMS.I8086_CHA.SA.070   1 LINE     68    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:24
0          Character name EQUATES for I8086 programs.
00848/071C  MICRO COMM PGMS          I8086 CMD PRS   SA  G          MCP:I8086.CMD                                                   
            5.1T2   963  MICRO_COMM_PGMS.I8086_CMD.SA.071   1 LINE     78    6 PAGE UM   HERSEY              JULY 23, 1983  14:26:24
0          I8086 command parsing tables.
1                                                                                               SUN SEP 08/96   15:24:55   Page  719
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/072C  MICRO COMM PGMS          I8086 CONSTANT  SA  G          MCP:I8086.CONSTA                                                
            5.1T2   964  MICRO_COMM_PGMS.I8086_CON.SA.072   1 LINE     74    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:24
0          Constant declarations for I8086 programs.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/073C  MICRO COMM PGMS          I8086 CONVRS    SA  G          MCP:I8086.CONVRS                                                
            5.1T2   965  MICRO_COMM_PGMS.I8086_CON.SA.073   1 LINE     77    6 PAGE UM   HERSEY              JULY 23, 1983  14:26:25
0           Conversation buffer management routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/074C  MICRO COMM PGMS          I8086 DISK      SA  G          MCP:I8086.DISK                                                  
            5.1T2   966  MICRO_COMM_PGMS.I8086_DIS.SA.074   1 LINE     71    7 PAGE UM   HERSEY              JULY 23, 1983  14:26:25
0          I8086 disk file copy routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/075C  MICRO COMM PGMS          I8086 DOC       PF  G          MCP:I8086.DOC                                                   
            5.1T2   967  MICRO_COMM_PGMS.I8086_DOC.PF.075   1 LINE     72   51 PAGE UM   HERSEY              JULY 23, 1983  14:26:26
0          Printer-ready output for I8086 public documentation.  Will
           eventually be a CCMemo.
00848/076C  MICRO COMM PGMS          I8086 DOC       WF  G          MCP:I8086.DOC.S                                                 
            5.1T2   968  MICRO_COMM_PGMS.I8086_DOC.WF.076   1 LINE     84   25 PAGE UM   HERSEY              JULY 23, 1983  14:26:28
0          FORMAT source for I8086 documentation.  Contains commands at the
           beginning of the file for assembly.
00848/077C  MICRO COMM PGMS          I8086 INFO      SA  G          MCP:I8086.INFO                                                  
            5.1T2   969  MICRO_COMM_PGMS.I8086_INF.SA.077   1 LINE     71    7 PAGE UM   HERSEY              JULY 23, 1983  14:26:29
0          Routines to print the I8086 HELP information.  Information comes from
           program internal tables.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/078C  MICRO COMM PGMS          I8086 INIT      SA  G          MCP:I8086.INIT                                                  
            5.1T2   970  MICRO_COMM_PGMS.I8086_INI.SA.078   1 LINE    127   18 PAGE UM   HERSEY              JULY 23, 1983  14:26:30
0          Source for the I8086 hardware configuration program.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  720
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/079C  MICRO COMM PGMS          I8086 KEYBRD    SA  G          MCP:I8086.KEYBRD                                                
            5.1T2   971  MICRO_COMM_PGMS.I8086_KEY.SA.079   1 LINE    101    8 PAGE UM   HERSEY              JULY 23, 1983  14:26:31
0          I8086 keyboard routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/080C  MICRO COMM PGMS          I8086 MACROS    SA  G          MCP:I8086.MACROS                                                
            5.1T2   972  MICRO_COMM_PGMS.I8086_MAC.SA.080   1 LINE     75    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:31
0          Structured macros.
00848/081C  MICRO COMM PGMS          I8086 MCP       SA  G          MCP:I8086.MCP                                                   
            5.1T2   973  MICRO_COMM_PGMS.I8086_MCP.SA.081   1 LINE     77   10 PAGE UM   HERSEY              JULY 23, 1983  14:26:31
0          I8086 MCP protocol routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/082C  MICRO COMM PGMS          I8086 PARSE     SA  G          MCP:I8086.PARSE                                                 
            5.1T2   974  MICRO_COMM_PGMS.I8086_PAR.SA.082   1 LINE     72    6 PAGE UM   HERSEY              JULY 23, 1983  14:26:32
0          I8086 command parse utility subroutines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/083C  MICRO COMM PGMS          I8086 PFS       SA  G          MCP:I8086.PFS                                                   
            5.1T2   975  MICRO_COMM_PGMS.I8086_PFS.SA.083   1 LINE     78   20 PAGE UM   HERSEY              JULY 23, 1983  14:26:32
0          I8086 function key semantic routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/084C  MICRO COMM PGMS          I8086 POLL      SA  G          MCP:I8086.POLL                                                  
            5.1T2   976  MICRO_COMM_PGMS.I8086_POL.SA.084   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:34
0          I8086 high-level polling routines (main program).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/085C  MICRO COMM PGMS          I8086 ROUTER    SA  G          MCP:I8086.ROUTER                                                
            5.1T2   977  MICRO_COMM_PGMS.I8086_ROU.SA.085   1 LINE     78    6 PAGE UM   HERSEY              JULY 23, 1983  14:26:34
0          I8086 routines to route messages from host to various processes.
            
           This source file is copyrighted.  Please do not redistribute to any third
1                                                                                               SUN SEP 08/96   15:24:55   Page  721
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          party without the permission of the University of Michigan.
00848/086C  MICRO COMM PGMS          I8086 SCREEN    SA  G          MCP:I8086.SCREEN                                                
            5.1T2   978  MICRO_COMM_PGMS.I8086_SCR.SA.086   1 LINE     78    6 PAGE UM   HERSEY              JULY 23, 1983  14:26:35
0          Teleprinter routines.  Machine-independent console I/O for full-screen
           oriented terminals.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/087C  MICRO COMM PGMS          I8086 SIO       SA  G          MCP:I8086.SIO                                                   
            5.1T2   979  MICRO_COMM_PGMS.I8086_SIO.SA.087   1 LINE     78   14 PAGE UM   HERSEY              JULY 23, 1983  14:26:35
0          Serial-I/O I8086-specific routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/088C  MICRO COMM PGMS          I8086 DATA RAT  SA  G          MCP:I8086.8253                                                  
            5.1T2   980  MICRO_COMM_PGMS.I8086_DAT.SA.088   1 LINE     75    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:36
0          Data rate divisor chip routine for Intel 8253.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/108 
00848/089C  MICRO COMM PGMS          I8086 DATA RAT  SA  G          MCP:I8086.1941                                                  
            5.1T2   981  MICRO_COMM_PGMS.I8086_DAT.SA.089   1 LINE     71    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:36
0          Data rate divisor chip routine for Western Digital 1941.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/090C  MICRO COMM PGMS          I8086 DATA RAT  SA  G          MCP:I8086.X16                                                   
            5.1T2   982  MICRO_COMM_PGMS.I8086_DAT.SA.090   1 LINE     71    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:37
0          Data rate divisor chip routine for no divisor chip.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/091C  MICRO COMM PGMS          I8086 DATA RAT  SA  G          MCP:I8086.ZCTC                                                  
            5.1T2   983  MICRO_COMM_PGMS.I8086_DAT.SA.091   1 LINE     71    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:37
0          Data rate divisor chip routine for Zilog Z80CTC.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
1                                                                                               SUN SEP 08/96   15:24:55   Page  722
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/092C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.2661                                                  
            5.1T2   984  MICRO_COMM_PGMS.I8086_SIO.SA.092   1 LINE     78    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:37
0          Serial I/O chip routines for: Synertek 2651 PCI and Motorola 2661
           EPCI.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/093C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.6551                                                  
            5.1T2   985  MICRO_COMM_PGMS.I8086_SIO.SA.093   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:38
0          Serial I/O chip routines for Synertek 6551.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/094C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.6850                                                  
            5.1T2   986  MICRO_COMM_PGMS.I8086_SIO.SA.094   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:38
0          Serial I/O chip routines for Motorola 6850 ACIA.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/095C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.8250                                                  
            5.1T2   987  MICRO_COMM_PGMS.I8086_SIO.SA.095   1 LINE     78    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:39
0          Serial I/O chip routines for INS 8250.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/096C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.8251                                                  
            5.1T2   988  MICRO_COMM_PGMS.I8086_SIO.SA.096   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:39
0          Serial I/O chip routines for 8251.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/097C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.8530                                                  
            5.1T2   989  MICRO_COMM_PGMS.I8086_SIO.SA.097   1 LINE     78    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:40
0          Serial I/O chip routines for Zilog 8530.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/098C  MICRO COMM PGMS          I8086 SIO CHIP  SA  G          MCP:I8086.ZSIO                                                  
            5.1T2   990  MICRO_COMM_PGMS.I8086_SIO.SA.098   1 LINE     78    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:40
0          Serial I/O chip routines for Zilog Z80SIO.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  723
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/099C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.AM3H                                                  
            5.1T2   991  MICRO_COMM_PGMS.I8086_SIO.SA.099   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:41
0          Serial I/O board routines for Alpha Micro 300.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/100C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.CAT2                                                  
            5.1T2   992  MICRO_COMM_PGMS.I8086_SIO.SA.100   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:41
0          Serial I/O board routines for Apple CAT II.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/101C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.DJOK                                                  
            5.1T2   993  MICRO_COMM_PGMS.I8086_SIO.SA.101   1 LINE     71    2 PAGE UM   HERSEY              JULY 23, 1983  14:26:42
0          Serial I/O board routines for Morrow Disk Jockey.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/102C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.DSPW                                                  
            5.1T2   994  MICRO_COMM_PGMS.I8086_SIO.SA.102   1 LINE     76    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:42
0          Serial I/O board routines for IBM DisplayWriter.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/103C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.MDSW                                                  
            5.1T2   995  MICRO_COMM_PGMS.I8086_SIO.SA.103   1 LINE     78    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:43
0          Serial I/O board routines for Morrow Designs Switch Board.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/104C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.PMMI                                                  
            5.1T2   996  MICRO_COMM_PGMS.I8086_SIO.SA.104   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:43
0          Serial I/O board routines for PMMI-300.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
1                                                                                               SUN SEP 08/96   15:24:55   Page  724
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/105C  MICRO COMM PGMS          I8086 SIO BDS   SA  G          MCP:I8086.TURT                                                  
            5.1T2   997  MICRO_COMM_PGMS.I8086_SIO.SA.105   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:44
0          Serial I/O board routines for Cromeco Tuart.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/106C  MICRO COMM PGMS          I8086 SPEC SIO  SA  G          MCP:I8086.CSTM                                                  
            5.1T2   998  MICRO_COMM_PGMS.I8086_SPE.SA.106   1 LINE     71    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:44
0          Serial I/O board routines for Custom Serial I/O.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/107C  MICRO COMM PGMS          I8086 SPEC SIO  SA  G          MCP:I8086.MDOS                                                  
            5.1T2   999  MICRO_COMM_PGMS.I8086_SPE.SA.107   1 LINE     78    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:45
0          Serial I/O board routines for MSDOS 2.0 COMn:.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/108 
00848/108C  MICRO COMM PGMS          I8086 SIO       OL  G          MCP:I8086.SIOLIB                                                
            5.1T2  1000  MICRO_COMM_PGMS.I8086_SIO.OL.108   1 LINE     64    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:45
0          Serial I/O - chip dependent routines (MS-LIB library).  Object of
           (848/88) through (848/107).
00848/109C  MICRO COMM PGMS          I8086 UTIL      SA  G          MCP:I8086.UTIL                                                  
            5.1T2  1001  MICRO_COMM_PGMS.I8086_UTI.SA.109   1 LINE     71    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:46
0          Low level I8086 utility routines.
0          Referenced by comments of: 848/112 
00848/110C  MICRO COMM PGMS          I8086 VBLD      SA  O          MCP:I8086.VBLD                                                  
            5.1T2  1002  MICRO_COMM_PGMS.I8086_VBL.SA.110   1 LINE     98   13 PAGE UM   HERSEY              JULY 23, 1983  14:26:46
0          Visual mode data structure builder and keyboard handler routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/111C  MICRO COMM PGMS          I8086 VSCRN     SA  G          MCP:I8086.VSCRN                                                 
            5.1T2  1003  MICRO_COMM_PGMS.I8086_VSC.SA.111   1 LINE     77    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:47
0          Visual mode screen handler routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
1                                                                                               SUN SEP 08/96   15:24:55   Page  725
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/112C  MICRO COMM PGMS          MSDOS ASSEMBLE  C   G          MCP:MSDOS.ASSEMB                                                
            5.1T2  1004  MICRO_COMM_PGMS.MSDOS_ASS.C.112    1 LINE     56    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:48
0          File containing MTS commands to be sourced to in order to assemble the
           current version of the MSDOS MCP routines. Contains $CONTINUE WITHs
           for many I8086 MCP subcomponents, (848/69) through (848/109), and MSDOS
           MCP subcomponents, (848/112) through (848/121).
0          Referenced by comments of: 848/112 
00848/113C  MICRO COMM PGMS          MSDOS CONSOLE   SA  G          MCP:MSDOS.CIO                                                   
            5.1T2  1005  MICRO_COMM_PGMS.MSDOS_CON.SA.113   1 LINE     77    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:48
0          MSDOS console I/O routines for CRT console version of WINDOW.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/114 
00848/114C  MICRO COMM PGMS          MSDOS CRT       O   G          MCP:MSDOS.CRT                                                   
            5.1T2  1006  MICRO_COMM_PGMS.MSDOS_CRT.O.114    1 LINE    225   16 PAGE UM   HERSEY              JULY 23, 1983  14:26:49
0          CRT console version of WINDOW.  Object of (848/113).
00848/115C  MICRO COMM PGMS          MSDOS DOC       PF  G          MCP:MSDOS.DOC                                                   
            5.1T2  1007  MICRO_COMM_PGMS.MSDOS_DOC.PF.115   1 LINE     78    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:49
0          Printer-ready MSDOS public documentation.  Will eventually be a CCMemo.
00848/116C  MICRO COMM PGMS          MSDOS DOC       WF  G          MCP:MSDOS.DOC.S                                                 
            5.1T2  1008  MICRO_COMM_PGMS.MSDOS_DOC.WF.116   1 LINE     68    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:50
0          FORMAT source for MSDOS public documentation.  Contains commands at
           the beginning of the file for assembly.
00848/117C  MICRO COMM PGMS          MSDOS HARD      D   G          MCP:MSDOS.HRD                                                   
            5.1T2  1009  MICRO_COMM_PGMS.MSDOS_HAR.D.117    1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:50
0          MSDOS hardware description file.
00848/118C  MICRO COMM PGMS          MSDOS INIT      O   G          MCP:MSDOS.INIT                                                  
            5.1T2  1010  MICRO_COMM_PGMS.MSDOS_INI.O.118    1 LINE    225    4 PAGE UM   HERSEY              JULY 23, 1983  14:26:51
0          Object for MSDOS hardware configuration program.
00848/119C  MICRO COMM PGMS          MSDOS KEY FUNC  D   G          MCP:MSDOS.KEY                                                   
            5.1T2  1011  MICRO_COMM_PGMS.MSDOS_KEY.D.119    1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:51
0          MSDOS keyboard function definition data file.
1                                                                                               SUN SEP 08/96   15:24:55   Page  726
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/120C  MICRO COMM PGMS          MSDOS MLB       SA  G          MCP:MSDOS.MLB                                                   
            5.1T2  1012  MICRO_COMM_PGMS.MSDOS_MLB.SA.120   1 LINE     70    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:51
0          I8086 constants relating to MSDOS operating system calls.
00848/121C  MICRO COMM PGMS          MSDOS I/O RTNS  SA  G          MCP:MSDOS.SYSTM                                                 
            5.1T2  1013  MICRO_COMM_PGMS.MSDOS_I/O.SA.121   1 LINE    105   10 PAGE UM   HERSEY              JULY 23, 1983  14:26:52
0          Operating-system dependent I/O routines, mostly for file I/O.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/112 
00848/122C  MICRO COMM PGMS          M650X CONSTANT  SA  G          MCP:M650X.CONSTA                                                
            5.1T2  1014  MICRO_COMM_PGMS.M650X_CON.SA.122   1 LINE     71    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:52
0          Constant declarations for M650X programs.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/1, 848/9 
00848/123C  MICRO COMM PGMS          M650X CONVRS    SA  G          MCP:M650X.CONVRS                                                
            5.1T2  1015  MICRO_COMM_PGMS.M650X_CON.SA.123   1 LINE     68    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:53
0          M650X conversation buffer management routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/124C  MICRO COMM PGMS          M650X DISK      SA  G          MCP:M650X.DISK                                                  
            5.1T2  1016  MICRO_COMM_PGMS.M650X_DIS.SA.124   1 LINE     68    7 PAGE UM   HERSEY              JULY 23, 1983  14:26:53
0          M650X disk file copy routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/125C  MICRO COMM PGMS          M650X DOC       PF  G          MCP:M650X.DOC                                                   
            5.1T2  1017  MICRO_COMM_PGMS.M650X_DOC.PF.125   1 LINE     78   10 PAGE UM   HERSEY              JULY 23, 1983  14:26:54
0          Printer-ready version of M650X public documentation.  Will eventually
           be a CCMemo.
00848/126C  MICRO COMM PGMS          M650X DOC       WF  G          MCP:M650X.DOC.S                                                 
            5.1T2  1018  MICRO_COMM_PGMS.M650X_DOC.WF.126   1 LINE     68    9 PAGE UM   HERSEY              JULY 23, 1983  14:26:54
0          FORMAT source for M650X public documentation.  Contains commands at
           the beginning of the file for assembly.
1                                                                                               SUN SEP 08/96   15:24:55   Page  727
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/127C  MICRO COMM PGMS          M650X INIT      SA  G          MCP:M650X.INIT                                                  
            5.1T2  1019  MICRO_COMM_PGMS.M650X_INI.SA.127   1 LINE     77   27 PAGE UM   HERSEY              JULY 23, 1983  14:26:55
0          Source for M650X hardware configuration program.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/128C  MICRO COMM PGMS          M650X I/O UTIL  SA  G          MCP:M650X.IOUTIL                                                
            5.1T2  1020  MICRO_COMM_PGMS.M650X_I/O.SA.128   1 LINE     70    5 PAGE UM   HERSEY              JULY 23, 1983  14:26:56
0          M650X utility routines for serial I/O.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/129C  MICRO COMM PGMS          M650X KEYBRD    SA  G          MCP:M650X.KEYBRD                                                
            5.1T2  1021  MICRO_COMM_PGMS.M650X_KEY.SA.129   1 LINE     75   19 PAGE UM   HERSEY              JULY 23, 1983  14:26:57
0          M650X keyboard routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/130C  MICRO COMM PGMS          M650X LOADER    SA  G          MCP:M650X.LOADER                                                
            5.1T2  1022  MICRO_COMM_PGMS.M650X_LOA.SA.130   1 LINE     68    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:57
0           MCP source routines.  M650X converts INTEL hex into APPLE binary.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/131C  MICRO COMM PGMS          M650X MCP       SA  G          MCP:M650X.MCP                                                   
            5.1T2  1023  MICRO_COMM_PGMS.M650X_MCP.SA.131   1 LINE     68   17 PAGE UM   HERSEY              JULY 23, 1983  14:26:58
0          MCP M650X prototype routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/132C  MICRO COMM PGMS          M650X PARSER    SA  G          MCP:M650X.PARSE                                                 
            5.1T2  1024  MICRO_COMM_PGMS.M650X_PAR.SA.132   1 LINE     78    8 PAGE UM   HERSEY              JULY 23, 1983  14:26:59
0          M650X command parse utility subroutines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/133C  MICRO COMM PGMS          M650X PERMIT    C   G          MCP:M650X.PERMIT                                                
            5.1T2  1025  MICRO_COMM_PGMS.M650X_PER.C.133    1 LINE     39    1 PAGE UM   HERSEY              JULY 23, 1983  14:26:59
0          Command file for permitting access to M650X source files.
1                                                                                               SUN SEP 08/96   15:24:55   Page  728
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/134C  MICRO COMM PGMS          M650X POLL      SA  G          MCP:M650X.POLL                                                  
            5.1T2  1026  MICRO_COMM_PGMS.M650X_POL.SA.134   1 LINE     68    3 PAGE UM   HERSEY              JULY 23, 1983  14:26:59
0          High-level M650X polling routines (main program).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/135C  MICRO COMM PGMS          M650X SCREEN    SA  G          MCP:M650X.SCREEN                                                
            5.1T2  1027  MICRO_COMM_PGMS.M650X_SCR.SA.135   1 LINE     78   13 PAGE UM   HERSEY              JULY 23, 1983  14:26:59
0          Teleprinter routines.  Machine independent console I/O for full-screen
           oriented terminals.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/136C  MICRO COMM PGMS          M650X SERIAL    SA  G          MCP:M650X.SIO                                                   
            5.1T2  1028  MICRO_COMM_PGMS.M650X_SER.SA.136   1 LINE     70   11 PAGE UM   HERSEY              JULY 23, 1983  14:27:00
0          Serial I/O M650X-specific routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/137C  MICRO COMM PGMS          M650X UTIL      SA  G          MCP:M650X.UTIL                                                  
            5.1T2  1029  MICRO_COMM_PGMS.M650X_UTI.SA.137   1 LINE     68    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:01
0          M650X low-level utility routines.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/138C  MICRO COMM PGMS          M650X VARS      SA  G          MCP:M650X.VARS                                                  
            5.1T2  1030  MICRO_COMM_PGMS.M650X_VAR.SA.138   1 LINE     72    9 PAGE UM   HERSEY              JULY 23, 1983  14:27:01
0          M650X variable descriptions.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/1, 848/9 
00848/139C  MICRO COMM PGMS          NEW COPY        O   G          MCP:NEW.COPY                                                    
            5.1T2  1031  MICRO_COMM_PGMS.NEW_COPY.O.139     1 LINE  23014    8 PAGE UM   HERSEY              JULY 23, 1983  14:27:02
0          Version of MCP:COPY (848/17) used by PDP11 programs.
00848/140C  MICRO COMM PGMS          NEW COPY SOU    SQ  G          MCP:NEW.COPY.S                                                  
            5.1T2  1032  MICRO_COMM_PGMS.NEW_COPY.SQ.140    1 LINE     80   12 PAGE UM   HERSEY              JULY 23, 1983  14:27:02
0          Contains commands at the beginning of the file for assembly.  Has
           $CONTINUE WITH MCP:ATTNTRAP (848/12) record.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  729
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/141C  MICRO COMM PGMS          NEW DOC         PF  G          MCP:NEW.DOC                                                     
            5.1T2  1033  MICRO_COMM_PGMS.NEW_DOC.PF.141     1 LINE     70   12 PAGE UM   HERSEY              JULY 23, 1983  14:27:03
00848/142C  MICRO COMM PGMS          NEW DOC         WF  G          MCP:NEW.DOC.S                                                   
            5.1T2  1034  MICRO_COMM_PGMS.NEW_DOC.WF.142     1 LINE     68   10 PAGE UM   HERSEY              JULY 23, 1983  14:27:03
0          Contains commands at the beginning of the file for assembly.
00848/143C  MICRO COMM PGMS          ONTEL EIATAP    SA  G          MCP:ONTEL/EIATAP                                                
            5.1T2  1035  MICRO_COMM_PGMS.ONTEL_EIA.SA.143   1 LINE     82   20 PAGE UM   HERSEY              JULY 23, 1983  14:27:04
0          Requires *I8080ASR (686/29).  Contains commands at the beginning
           of the file for assembly.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
            
00848/144C  MICRO COMM PGMS          ONTEL TAP DOC   WF  G          MCP:ONTEL/TAP.F                                                 
            5.1T2  1036  MICRO_COMM_PGMS.ONTEL_TAP.WF.144   1 LINE     63    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:05
0          Contains commands at the beginning of the file for assembly.
00848/145C  MICRO COMM PGMS          ONTEL TAP DOC   PF  G          MCP:ONTEL/TAP.W                                                 
            5.1T2  1037  MICRO_COMM_PGMS.ONTEL_TAP.PF.145   1 LINE     70    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:05
00848/146C  MICRO COMM PGMS          OSBORNE         O   G          MCP:OSBORNE                                                     
            5.1T2  1038  MICRO_COMM_PGMS.OSBORNE.O.146      1 LINE     59   11 PAGE UM   HERSEY              JULY 23, 1983  14:27:05
0          Referenced by comments of: 848/147 
00848/147C  MICRO COMM PGMS          OSBORNE ASSMBL  C   G          MCP:OSBORNE.ASSE                                                
            5.1T2  1039  MICRO_COMM_PGMS.OSBORNE_A.C.147    1 LINE    123    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:06
0          $SOURCE file for assembling the OSBORNE operating system. Requires
           *Z80ASR (686/3) and COPY:I8080MACS (686/24). Contains $CONTINUE WITHs
           for various CP/M MCP subcomponents, (848/21) through (848/68), various
           I8080 MCP subcomponents, (848/51) through (848/68), and various
           OSBORNE MCP subcomponents, (848/146) through (848/149).
00848/148C  MICRO COMM PGMS          OSBORNE SERIAL  SA  G          MCP:OSBORNE.SIO                                                 
            5.1T2  1040  MICRO_COMM_PGMS.OSBORNE_S.SA.148   1 LINE     68    5 PAGE UM   HERSEY              JULY 23, 1983  14:27:06
0          Serial I/O Osborne-specific routines.
00848/149C  MICRO COMM PGMS          OSBORNE I/O     SA  G          MCP:OSBORNE.SYST                                                
            5.1T2  1041  MICRO_COMM_PGMS.OSBORNE_I.SA.149   1 LINE     65    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:07
0          Operating system dependent I/O routines, mostly for file I/O. Has
           $CONTINUE WITHs for MCP:CP/M.S1 (848/32), MCP:CP/M.S2 (848/33), and
           MCP:CP/M.S3 (848/34).
1                                                                                               SUN SEP 08/96   15:24:55   Page  730
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 848/147 
00848/150C  MICRO COMM PGMS          PDP11 DOC       PF  G          MCP:PDP11.DOC                                                   
            5.1T2  1042  MICRO_COMM_PGMS.PDP11_DOC.PF.150   1 LINE     78    8 PAGE UM   HERSEY              JULY 23, 1983  14:27:07
0          Printer-ready version of the MCP PDP11 public documentation.  Will
           eventually be a CCMemo.
00848/151C  MICRO COMM PGMS          PDP11 DOC       WF  G          MCP:PDP11.DOC.S                                                 
            5.1T2  1043  MICRO_COMM_PGMS.PDP11_DOC.WF.151   1 LINE     73    7 PAGE UM   HERSEY              JULY 23, 1983  14:27:07
0          FORMAT source for the MCP PDP11 public documentation.  Contains
           commands at the beginning of the file for assembly.
00848/152C  MICRO COMM PGMS          PDP11           SA  G          MCP:PDP11.MAC                                                   
            5.1T2  1044  MICRO_COMM_PGMS.PDP11.SA.152       1 LINE     72   46 PAGE UM   HERSEY              JULY 23, 1983  14:27:08
0          Machine independent part of source for PDP11 MCP program.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
0          Referenced by comments of: 848/153, 848/164, 848/165, 848/171 
00848/153C  MICRO COMM PGMS          PLUS COMMENT    P   G          MCP:PLUS.COMMENT                                                
            5.1T2  1045  MICRO_COMM_PGMS.PLUS_COMM.L.153    1 LINE     68    5 PAGE UM   HERSEY              JULY 23, 1983  14:27:11
0          Comments about (848/152).
00848/154C  MICRO COMM PGMS          PLUS LISTING    L   G          MCP:PLUS.LISTING                                                
            5.1T2  1046  MICRO_COMM_PGMS.PLUS_LIST.L.154    1 LINE    130   59 PAGE UM   HERSEY              JULY 23, 1983  14:27:11
0          MCP terminal program written in PLUS (no file copying).  Can run on 
           PDP11.
0          Referenced by comments of: 848/156 
00848/155C  MICRO COMM PGMS          MEMO 443        WF  G          MCP:PROGRAM.S                                                   
            5.1T2  1047  MICRO_COMM_PGMS.MEMO_443.WF.155    1 LINE     96   12 PAGE UM   HERSEY              JULY 23, 1983  14:27:14
0          This is Computing Center Memo 443 -- "MCP Communications Programs
           for Micros."
            
           Contains commands at the beginning of the file for assembly.
00848/156C  MICRO COMM PGMS          MEMO 443        PF  G          MCP:PROGRAM.LIST                                                
            5.1T2  1048  MICRO_COMM_PGMS.MEMO_443.PF.156    1 LINE     71   12 PAGE UM   HERSEY              JULY 23, 1983  14:27:15
0          Printer-ready version of (848/154).
0          Referenced by comments of: 844/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  731
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/157C  MICRO COMM PGMS          PROTECT         C   G          MCP:PROTECT                                                     
            5.1T2  1049  MICRO_COMM_PGMS.PROTECT.C.157      1 LINE     37    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:15
00848/158C  MICRO COMM PGMS          PUFFIN1         SW  G          MCP:PUFFIN1                                                     
            5.1T2  1050  MICRO_COMM_PGMS.PUFFIN1.SW.158     1 LINE     78    5 PAGE UM   HERSEY              JULY 23, 1983  14:27:16
0          Public domain APPLE DOS to P-system transfer.
00848/159C  MICRO COMM PGMS          PUFFIN2         SW  G          MCP:PUFFIN2                                                     
            5.1T2  1051  MICRO_COMM_PGMS.PUFFIN2.SW.159     1 LINE     78    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:16
0          Public domain APPLE DOS to P-system transfer.
00848/160C  MICRO COMM PGMS          PUFFIN3         SW  G          MCP:PUFFIN3                                                     
            5.1T2  1052  MICRO_COMM_PGMS.PUFFIN3.SW.160     1 LINE     65    2 PAGE UM   HERSEY              JULY 23, 1983  14:27:17
0          Public domain APPLE DOS to P-system transfer.
00848/161C  MICRO COMM PGMS          RSTS CMD        C   G          MCP:RSTS.CMD                                                    
            5.1T2  1053  MICRO_COMM_PGMS.RSTS_CMD.C.161     1 LINE     40    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:17
0          Source file to assemble, link, etc. on RSTS rather that on MTS.
00848/162C  MICRO COMM PGMS          RSTS DOC        PF  G          MCP:RSTS.DOC                                                    
            5.1T2  1054  MICRO_COMM_PGMS.RSTS_DOC.PF.162    1 LINE     78    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:17
0          Printer-ready RSTS public documentation. Will eventually be a CCMemo.
00848/163C  MICRO COMM PGMS          RSTS DOC        WF  G          MCP:RSTS.DOC.S                                                  
            5.1T2  1055  MICRO_COMM_PGMS.RSTS_DOC.WF.163    1 LINE     67    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:18
0          *FORMAT source for RSTS public documentation.  Contains commands at
           the beginning of the file for assembly.
00848/164C  MICRO COMM PGMS          RSTS MACROS     SA  G          MCP:RSTS.MAC                                                    
            5.1T2  1056  MICRO_COMM_PGMS.RSTS_MACR.SA.164   1 LINE     71   14 PAGE UM   HERSEY              JULY 23, 1983  14:27:18
0          Operating system dependent part of PDP11 MCP program (848/152) for
           RSTS operating system.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/165C  MICRO COMM PGMS          RSTS PDP        O   G          MCP:RSTS.PDP                                                    
            5.1T2  1057  MICRO_COMM_PGMS.RSTS_PDP.O.165     1 LINE    128    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:19
0          Object for a PDP-11.MAC assembly (848/152) for RT11 operating system.
00848/166C  MICRO COMM PGMS          RSX11M LNK RES  C   G          MCP:RSX11M.BLD                                                  
            5.1T2  1058  MICRO_COMM_PGMS.RSX11M_LN.C.166    1 LINE     44    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:19
0          RSX11M linker response data file.
1                                                                                               SUN SEP 08/96   15:24:55   Page  732
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/167C  MICRO COMM PGMS          RSX11M CMD PRS  C   G          MCP:RSX11M.CMD                                                  
            5.1T2  1059  MICRO_COMM_PGMS.RSX11M_CM.C.167    1 LINE     52    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:19
0          RSX11M command parsing tables.
00848/168C  MICRO COMM PGMS          RSX11M DOC      PF  G          MCP:RSX11M.DOC                                                  
            5.1T2  1060  MICRO_COMM_PGMS.RSX11M_DO.PF.168   1 LINE     78    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:19
0          Printer-ready RSX11M public documentation.  Will eventually be a CCMemo.
00848/169C  MICRO COMM PGMS          RSX11M DOC      WF  G          MCP:RSX11M.DOC.S                                                
            5.1T2  1061  MICRO_COMM_PGMS.RSX11M_DO.WF.169   1 LINE     67    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:20
0          *FORMAT source for RSX11M public documentation. Contains commands at
           the beginning of the file for assembly.
00848/170C  MICRO COMM PGMS          RSX11M MACROS   SA  G          MCP:RSX11M.MAC                                                  
            5.1T2  1062  MICRO_COMM_PGMS.RSX11M_MA.SA.170   1 LINE     74   12 PAGE UM   HERSEY              JULY 23, 1983  14:27:20
0           
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/171C  MICRO COMM PGMS          RSX11M PDP      O   G          MCP:RSX11M.PDP                                                  
            5.1T2  1063  MICRO_COMM_PGMS.RSX11M_PD.O.171    1 LINE    100    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:21
0          Object for a PDP-11.MAC (848/152) assembly for RSX11M operating system.
00848/172C  MICRO COMM PGMS          RSX11M PERMIT   C   G          MCP:RSX11M.PERMI                                                
            5.1T2  1064  MICRO_COMM_PGMS.RSX11M_PE.C.172    1 LINE     33    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:21
0          Command file for permitting access to RSX11M source files.
00848/173C  MICRO COMM PGMS          RT11 CMD        C   G          MCP:RT11.CMD                                                    
            5.1T2  1065  MICRO_COMM_PGMS.RT11_CMD.C.173     1 LINE     40    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:21
0          "Directions" for ASM & LINK of RT11 MCP.
00848/174C  MICRO COMM PGMS          RT11 DOC        PF  G          MCP:RT11.DOC                                                    
            5.1T2  1066  MICRO_COMM_PGMS.RT11_DOC.PF.174    1 LINE     78    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:22
0          Printer-ready RT11 public documentation.  Will eventually be a CCMemo.
00848/175C  MICRO COMM PGMS          RT11 DOC        WF  G          MCP:RT11.DOC.S                                                  
            5.1T2  1067  MICRO_COMM_PGMS.RT11_DOC.WF.175    1 LINE     66    3 PAGE UM   HERSEY              JULY 23, 1983  14:27:22
0          *FORMAT source for RT11 public documentation.  Contains commands at
           the beginning of the file for assembly.
00848/176C  MICRO COMM PGMS          RT11            SA  G          MCP:RT11.MAC                                                    
            5.1T2  1068  MICRO_COMM_PGMS.RT11.SA.176        1 LINE     68   10 PAGE UM   HERSEY              JULY 23, 1983  14:27:22
0          Operating system dependent part of PDP11 MCP for RT11 operating
           system.
1                                                                                               SUN SEP 08/96   15:24:55   Page  733
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This source file is copyrighted. Please do not redistribute to any
           third party without the permission of the University of Michigan.
00848/177C  MICRO COMM PGMS          RT11 PDP        O   G          MCP:RT11.PDP                                                    
            5.1T2  1069  MICRO_COMM_PGMS.RT11_PDP.O.177     1 LINE    128    5 PAGE UM   HERSEY              JULY 23, 1983  14:27:22
0          Object for a PDP-11.MAC assembly for RT11 operating system.
00848/178C  MICRO COMM PGMS          RT11 PERMIT     C   G          MCP:RT11.PERMIT                                                 
            5.1T2  1070  MICRO_COMM_PGMS.RT11_PERM.C.178    1 LINE     31    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:23
0          Command file for permitting access to RT11 source files.
00848/179C  MICRO COMM PGMS          SPDOS SOU       SA  G          MCP:SPDOS.S                                                     
            5.1T2  1071  MICRO_COMM_PGMS.SPDOS_SOU.SA.179   1 LINE     68   10 PAGE UM   HERSEY              JULY 23, 1983  14:27:23
0          Operating system dependent part for I8080 MCP under XYCOM'S SPDOS
           (possibly useful as an example).
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/180C  MICRO COMM PGMS          STICKER         PF  G          MCP:STICKER.O                                                   
            5.1T2  1072  MICRO_COMM_PGMS.STICKER.PF.180     1 LINE    104    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:24
00848/181C  MICRO COMM PGMS          STICKER         PF  G          MCP:STICKER.P                                                   
            5.1T2  1073  MICRO_COMM_PGMS.STICKER.PF.181     1 LINE    104   26 PAGE UM   HERSEY              JULY 23, 1983  14:27:24
0          Contains commands at the beginning of the file for assembly.
00848/182C  MICRO COMM PGMS          STICKER         WF  G          MCP:STICKER.S                                                   
            5.1T2  1074  MICRO_COMM_PGMS.STICKER.WF.182     1 LINE     74    4 PAGE UM   HERSEY              JULY 23, 1983  14:27:25
0          Contains commands at the beginning of the file for assembly.
00848/183C  MICRO COMM PGMS          TRS-80 I/III    C   G          MCP:TRS1/3.ASM                                                  
            5.1T2  1075  MICRO_COMM_PGMS.TRS-80_I/.C.183    1 LINE    120    1 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:25
0          $SOURCE command procedure to assemble the MCP for the TRS-80
           Models I/III using *Z80ASR (686/30).
            
           Contains $CONTINUE WITHs to various MCP I8080 subcomponents, (848/51)
           through (848/68), TRS1/3 MCP subcomponents, (848/183) through
           (848/197), and TRS80.SIO (848/191).
0          Referenced by comments of: 848/183, 848/194 
00848/184C  MICRO COMM PGMS          TRS-80 I/III    C   G          MCP:TRS1/3I.ASM                                                 
            5.1T2  1076  MICRO_COMM_PGMS.TRS-80_I/.C.184    1 LINE    126    1 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:26
0          $SOURCE command procedure to assemble the MCP initialization program
           (MCPINIT) for the TRS-80 Models I/III using *Z80ASR (686/30).
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  734
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Contains $CONTINUE WITHs for MCP:I8080.CONSTA (848/51),
           MCP:TRS1/3.SYSTM (848/185), MCP:I8080.IOUTIL (848/58), and
           MCP:TRS1/3.INI.S (848/192).
0          Referenced by comments of: 848/195 
00848/185C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.SYSTM                                                
            5.1T2  1077  MICRO_COMM_PGMS.TRS-80_I/.SA.185   1 LINE     69    1 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:26
0          *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for disk I/O,
           keyboard and screen support for MCP.
            
           Contains $CONTINUE WITHs to MCP:TRS1/3.S1 (848/186), MCP:TRS1/3.S2
           (848/187), and MCP:TRS1/3.S3 (848/188).
            
           This source code is copyrighted.  Please do not redistribute to any 
           third party without the permission of the University of Michigan.
0          Referenced by comments of: 848/184 
00848/186C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.S1                                                   
            5.1T2  1078  MICRO_COMM_PGMS.TRS-80_I/.SA.186   1 LINE     77    3 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:26
0          *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for 
           subroutine locations and macros.
            
           This source code is copyrighted.  Please do not redistribute to any
           third party without the permission of the University of Michigan.
0          Referenced by comments of: 848/185 
00848/187C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.S2                                                   
            5.1T2  1079  MICRO_COMM_PGMS.TRS-80_I/.SA.187   1 LINE     68    4 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:27
0          *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for
           the PC/MTS/MCP interaction.
            
           This source code is copyrighted.  Please do not redistribute to any
           third party without the permission of the University of Michigan.
0          Referenced by comments of: 848/185 
00848/188C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.S3                                                   
            5.1T2  1080  MICRO_COMM_PGMS.TRS-80_I/.SA.188   1 LINE     79   13 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:27
0          *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for
           disk I/O, keyboard, and screen support for MCP.
            
           This source code is copyrighted.  Please do not redistribute to any
           third party without the permission of the University of Michigan.
0          Referenced by comments of: 848/185 
1                                                                                               SUN SEP 08/96   15:24:55   Page  735
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/189C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.VRSN                                                 
            5.1T2  1081  MICRO_COMM_PGMS.TRS-80_I/.SA.189   1 LINE     68    1 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:28
0          *Z80ASR (686/30) MCP-dependent code for MCP version definition.
            
           This source code is copyrighted.  Please do not redistribute to any
           third party without the permission of the University of Michigan.
00848/190C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.SIO                                                  
            5.1T2  1082  MICRO_COMM_PGMS.TRS-80_I/.SA.190   1 LINE     72    4 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:28
0          *Z80ASR (686/30) MCP-dependent code for handling general serial I/O 
           port support.
            
           This source code is copyrighted.  Please do not redistribute to any
           third party without the permission of the University of Michigan.
00848/191C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS80.SIO                                                   
            5.1T2  1083  MICRO_COMM_PGMS.TRS-80_I/.SA.191   1 LINE     78    5 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:28
0          *Z80ASR (686/30) serial I/O dependent routines to support MCP SIO
           conventions.  Handles Z80 serial I/O and Western Digital 1602 A
           and B UARS.
            
           This source code is copyrighted. Please do not redistribute to any
           third party without the permission of the University of Michigan.
0          Referenced by comments of: 848/183 
00848/192C  MICRO COMM PGMS          TRS-80 I/III    SA  G          MCP:TRS1/3.INI.S                                                
            5.1T2  1084  MICRO_COMM_PGMS.TRS-80_I/.SA.192   1 LINE     76   17 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:29
0          *Z80ASR (686/30) MCP-dependent code to interactively parameterize the
           HARDWARE file component (848/193) for the user's MCP operation.
            
           This source code is copyrighted.  Please do not redistribute to any
           third party without the permission of the University of Michigan.
0          Referenced by comments of: 848/184 
00848/193C  MICRO COMM PGMS          TRS-80 I/III    D   G          MCP:TRS1/3.HRD                                                  
            5.1T2  1085  MICRO_COMM_PGMS.TRS-80_I/.D.193    1 LINE     64    1 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:30
0          Z80 TRSDOS/NEWDOS/MCP-dependent HARDWARE parameter MCP file which is
           distributed on Models I and III TRSDOS diskettes to users.
0          Referenced by comments of: 848/192 
00848/194C  MICRO COMM PGMS          TRS-80 I/III    OC  G          MCP:TRS1/3                                                      
            5.1T2  1086  MICRO_COMM_PGMS.TRS-80_I/.OC.194   1 LINE    244    6 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:30
0          Z80 MCP communications program (MCP) object code resulting from
           using (848/183).  This is distributed on Model I and III TRSDOS
           diskettes to users.
1                                                                                               SUN SEP 08/96   15:24:55   Page  736
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/195C  MICRO COMM PGMS          TRS80 I/III     OC  G          MCP:TRS1/3.INIT                                                 
            5.1T2  1087  MICRO_COMM_PGMS.TRS80_I/I.OC.195   1 LINE    244    4 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:30
0          Z80 MCP initialization program (MCPINIT) object code resulting from
           using (848/184).  This is distributed on Models I and III TRSDOS
           diskettes to users.
00848/196C  MICRO COMM PGMS          MEMO 446        WF  G          MCP:TRS1/3.DOC.S                                                
            5.1T2  1088  MICRO_COMM_PGMS.MEMO_446.WF.196    1 LINE    108    6 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:31
0          This is Computing Center Memo 446 -- "The TRS-80 Models I/III MCP
           Program Documentation."
            
           Contains MTS commands to run *FORMAT on the writeup input which
           follows in the file.  $SOURCE to generate CCMemo 446, which
           documents the current TRS-80 Models I/III TRSDOS/NEWDOS/MCP
           implementation.
            
           Contains INCLUDE MCP:FMT.MEMO.S (848/43).
0          Referenced by comments of: 848/197 
00848/197C  MICRO COMM PGMS          MEMO 446        PF  G          MCP:TRS1/3.DOC                                                  
            5.1T2  1089  MICRO_COMM_PGMS.MEMO_446.PF.197    1 LINE     71    7 PAGE UM   FRONCZAK            JULY 23, 1983  14:27:31
0          This is the printer-ready version of (848/196).
0          Referenced by comments of: 844/11, 848/183 
00848/198C  MICRO COMM PGMS          V9000 DOS       O   G          MCP:V9000.DOS                                                   
            5.1T2  1090  MICRO_COMM_PGMS.V9000_DOS.O.198    1 LINE    225   10 PAGE UM   HERSEY              JULY 23, 1983  14:27:32
0          Object for WINDOW DOS operating system on Victor 9000.
00848/199C  MICRO COMM PGMS          V9000 HRD       D   G          MCP:V9000.HRD                                                   
            5.1T2  1091  MICRO_COMM_PGMS.V9000_HRD.D.199    1 LINE    225    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:32
0          Victor 9000 hardware description file.
00848/200C  MICRO COMM PGMS          V9000 KEY FUNC  D   G          MCP:V9000.KEY                                                   
            5.1T2  1092  MICRO_COMM_PGMS.V9000_KEY.D.200    1 LINE     64    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:32
0          Victor 9000 keyboard function definition data file.
00848/201C  MICRO COMM PGMS          XXDRV LNK RESP  C   G          MCP:XXDRV.BLD                                                   
            5.1T2  1093  MICRO_COMM_PGMS.XXDRV_LNK.C.201    1 LINE     68    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:33
0          XXDRV linker response data file.
00848/202C  MICRO COMM PGMS          XXDRV CMD PRS   C   G          MCP:XXDRV.CMD                                                   
            5.1T2  1094  MICRO_COMM_PGMS.XXDRV_CMD.C.202    1 LINE     74    1 PAGE UM   HERSEY              JULY 23, 1983  14:27:33
0          RSX11M XXDRV assembly and build command file.
1                                                                                               SUN SEP 08/96   15:24:55   Page  737
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00848/203C  MICRO COMM PGMS          XXDRV MACROS    SA  G          MCP:XXDRV.MAC                                                   
            5.1T2  1095  MICRO_COMM_PGMS.XXDRV_MAC.SA.203   1 LINE     68   10 PAGE UM   HERSEY              JULY 23, 1983  14:27:33
0          RSX11M XXDRV device driver code.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00848/204C  MICRO COMM PGMS          XXDRV OBJ       O   G          MCP:XXDRV.OBJ                                                   
            5.1T2  1096  MICRO_COMM_PGMS.XXDRV_OBJ.O.204    1 LINE    150    2 PAGE UM   HERSEY              JULY 23, 1983  14:27:33
0          RSX11M object.
00848/205C  MICRO COMM PGMS          XXTAB MACROS    SA  G          MCP:XXTAB.MAC                                                   
            5.1T2  1097  MICRO_COMM_PGMS.XXTAB_MAC.SA.205   1 LINE     70    3 PAGE UM   HERSEY              JULY 23, 1983  14:27:34
0          RSX11M tables.
            
           This source file is copyrighted.  Please do not redistribute to any third
           party without the permission of the University of Michigan.
00849/001C  MTS VOLUME 19            MASTER          WT             S1029A MTSV19 'MTS MANUALS' POSN=NEWM1.V19                      
            5.1T2  1098  MTS_VOLUME_19.MASTER.WT.001        1 LINE    132  134 PAGE UM   MANUAL              JULY 23, 1983  14:30:03
0          TEXT/360 master for Volume 19, "Tapes and Floppy Disks" of the UM MTS
           manuals, February 1983.
00849/002C  MTS VOLUME 19            PRINT           PT             S1029A MTSV19 'MTS MANUALS' POSN=PRINT1.V19                     
            5.1T2  1099  MTS_VOLUME_19.PRINT.PT.002         1 LINE    132  179 PAGE UM   MANUAL              JULY 23, 1983  14:30:08
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which
           is slightly modified from the TEXT/360 print file), available on
           request.
00849/003C  MTS VOLUME 19            INDEX SOURCE    D              S1029A MTSV19 'MTS MANUALS' POSN=V19INDEXSOU                    
            5.1T2  1100  MTS_VOLUME_19.INDEX_SOURC.D.003    1 LINE     75    3 PAGE UM   MANUAL              JULY 23, 1983  14:30:19
0          Input to *INDEX (580) for index to Volume 19.
00850/001C  MERIT STAT PGMS          SPSSSTATS       S   G          W542:SPSSSTATS                                                  
            5.1T2  1101  MERIT_STAT_PGMS.SPSSSTATS.S.001    1 LINE    111    4 PAGE UM   STARK               JULY 23, 1983  14:30:19
0          Command file to be run under SPSS at MSU. To use this file, type
           $SOURCE SPSSSTATS. Produces Merit monthly statistics for all
           connection types. Accesses monthly DSR logging files from Merit
           primary hosts. The format of the logging files is described in
           (850/15). This file contains $CONTINUE WITH records for the logging
           files, whose names have the form W542:xxSTAT.mm-yy, where xx is the
           Merit node, mm is a two-digit month, and yy is a two-digit year, e.g.
           "W542:UMSTAT.06-83 (the UM statistics for June 1983).
0          Referenced by comments of: 850/15 
1                                                                                               SUN SEP 08/96   15:24:55   Page  738
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00850/002C  MERIT STAT PGMS          LAPROG          SF  G          W542:LAPROG(1000)                                               
            5.1T2  1102  MERIT_STAT_PGMS.LAPROG.SF.002      1 LINE    106   12 PAGE UM   STARK               JULY 23, 1983  14:30:22
0          Program to produce assorted usage statistics for Merit TL and X3
           connection types. Accesses monthly DSR logging files produced by Merit
           primary hosts. The format of the logging files is described in
           (850/15). Commands used to compile may be found at the beginning of
           the file.
0          Referenced by comments of: 850/15 
00850/003C  MERIT STAT PGMS          LAPROG          OC  G          W542:LAPROG(1,999)                                              
            5.1T2  1103  MERIT_STAT_PGMS.LAPROG.OC.003      1 LINE  10766    5 PAGE UM   STARK               JULY 23, 1983  14:30:22
0          To use this file, type $SOURCE LAPROG(3000).  (Those lines are
           saved with the source code for this object module.)
00850/004C  MERIT STAT PGMS          USERSTATS       SA  G          W542:USERSTATS(1000)                                            
            5.1T2  1104  MERIT_STAT_PGMS.USERSTATS.SA.004   1 LINE     95    7 PAGE UM   STARK               JULY 23, 1983  14:30:23
0          Program to produce user statistics from Merit monthly DSR logging
           files. (Logging files are produced by all Merit primary hosts. The
           format of these logging files is described in (850/15).) Commands used
           to assemble may be found at the beginning of this file. Also uses
           input from (850/13) and from line 10,000 onward in this file. Commands
           used to run may be found in (850/13). Requires the (850/14) macro
           library.
0          Referenced by comments of: 850/13, 850/14, 850/15 
00850/005C  MERIT STAT PGMS          USERSTATS       OC  G          W542:USERSTATS(1,999)                                           
            5.1T2  1105  MERIT_STAT_PGMS.USERSTATS.OC.005   1 LINE   1948    3 PAGE UM   STARK               JULY 23, 1983  14:30:23
00850/006C  MERIT STAT PGMS          TELSTATS        SA  G          W542:TELSTATS(1000)                                             
            5.1T2  1106  MERIT_STAT_PGMS.TELSTATS.SA.006    1 LINE    103   24 PAGE UM   STARK               JULY 23, 1983  14:30:23
0          Program to produce Telenet statistics from Merit monthly DSR logging
           files. (Logging files are produced by all Merit primary hosts. The
           format of these logging files is described in (850/15).) Commands used
           to assemble may be found at the beginning of the file. Also uses input
           from (850/13) and from line 10,000 onward in this file. Also uses
           input from (850/12). Commands to run may be found in (850/13).
           Requires the (850/14) macro library.
0          Referenced by comments of: 850/8, 850/9, 850/10, 850/11, 850/12, 850/13, 850/14, 850/15 
00850/007C  MERIT STAT PGMS          TELSTATS        OC  G          W542:TELSTATS(1,999)                                            
            5.1T2  1107  MERIT_STAT_PGMS.TELSTATS.OC.007    1 LINE   4277    7 PAGE UM   STARK               JULY 23, 1983  14:30:25
00850/008C  MERIT STAT PGMS          MSIDS           D   G          W542:MSIDS                                                      
            5.1T2  1108  MERIT_STAT_PGMS.MSIDS.D.008        1 LINE    109    1 PAGE UM   STARK               JULY 23, 1983  14:30:25
0          Used by (850/6).  Contains lists of MSU user IDs for rebate purposes.
1                                                                                               SUN SEP 08/96   15:24:55   Page  739
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00850/009C  MERIT STAT PGMS          UMIDS           D   G          W542:UMIDS                                                      
            5.1T2  1109  MERIT_STAT_PGMS.UMIDS.D.009        1 LINE    344    1 PAGE UM   STARK               JULY 23, 1983  14:30:25
0          Used by (850/6).  Contains lists of UM user IDs for rebate purposes.
00850/010C  MERIT STAT PGMS          WMIDS           D   G          W542:WMIDS                                                      
            5.1T2  1110  MERIT_STAT_PGMS.WMIDS.D.010        1 LINE     96    1 PAGE UM   STARK               JULY 23, 1983  14:30:25
0          Used by (850/6).  Contains lists of WMU user IDs for rebate purposes.
00850/011C  MERIT STAT PGMS          WUIDS           D   G          W542:WUIDS                                                      
            5.1T2  1111  MERIT_STAT_PGMS.WUIDS.D.011        1 LINE    149    1 PAGE UM   STARK               JULY 23, 1983  14:30:26
0          Used by (850/6).  Contains lists of WSU user IDs for rebate purposes.
00850/012C  MERIT STAT PGMS          AREACODES       D   G          W542:AREACODES                                                  
            5.1T2  1112  MERIT_STAT_PGMS.AREACODES.D.012    1 LINE     31    1 PAGE UM   STARK               JULY 23, 1983  14:30:26
0          Used by (850/6).  Contains list of Telenet geographic locations,
           arranged by area codes.
0          Referenced by comments of: 850/6 
00850/013C  MERIT STAT PGMS          RUNSTATS        C   G          W542:RUNSTATS                                                   
            5.1T2  1113  MERIT_STAT_PGMS.RUNSTATS.C.013     1 LINE    131    1 PAGE UM   STARK               JULY 23, 1983  14:30:26
0          MTS commands to $RUN USERSTATS (850/4) and $RUN TELSTATS (850/6).
0          Referenced by comments of: 850/4, 850/6 
00850/014C  MERIT STAT PGMS          MACLIB          SM  G          W542:MACLIB                                                     
            5.1T2  1114  MERIT_STAT_PGMS.MACLIB.SM.014      1 LINE     73    7 PAGE UM   STARK               JULY 23, 1983  14:30:26
0          Macro library used in assembling USERSTATS (850/4) and TELSTATS (850/6).
0          Referenced by comments of: 850/4, 850/6 
00850/015C  MERIT STAT PGMS          STAT.DOC        P   G          W542:STAT.DOC                                                   
            5.1T2  1115  MERIT_STAT_PGMS.STAT.DOC.P.015     1 LINE    119    3 PAGE UM   STARK               JULY 23, 1983  14:30:27
0          Description of monthly DSR logging files, which are produced by Merit
           primary hosts.  Logging files are used by SPSSSTATS (850/1), LAPROG
           (850/2), USERSTATS (850/4), and TELSTATS (850/6).  See also the
           Merit network design memo ND-83-307 (not distributed).  This file
           is in a format ready to be run through *PAGEPR.
0          Referenced by comments of: 850/1, 850/2, 850/4, 850/6 
00851/001C  COMMAND SERVICE          SOURCE          SQ  G          CLS:CMDSERV*SQ                                                  
            5.1T2  1116  COMMAND_SERVICE.SOURCE.SQ.001      1 LINE     68   25 PAGE UM   BURLING             JULY 23, 1983  14:30:27
0          Plus source for service routines used by new CLSs (see components
           (852) through (858) and (509)). Contains CLS entry/exit code and
           various other useful services. See the (851/7) writeup for details.
1                                                                                               SUN SEP 08/96   15:24:55   Page  740
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Compile with CLS:CMDSERV*SQL (851/4), CLS:CMDSERV*SRL (851/3),
           COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), *CLPARSELIB (1076/11),
           and PLUS:SOURCEL*SQL (1042/5).
0          Referenced by comments of: 509/14, 851/3, 851/4, 851/5 
00851/002C  COMMAND SERVICE          GRAMMAR         SR  G          CLS:CMDSERV*SR                                                  
            5.1T2  1117  COMMAND_SERVICE.GRAMMAR.SR.002     1 LINE     68    3 PAGE UM   BURLING             JULY 23, 1983  14:30:28
0          *Clparser (1076/6) grammar used by the command service routines.
0          Referenced by comments of: 851/3, 851/5 
00851/003C  COMMAND SERVICE          DECLARATIONS    SQ  G          CLS:CMDSERV*SRL                                                 
            5.1T2  1118  COMMAND_SERVICE.DECLARATI.SQ.003   1 LINE     76    1 PAGE UM   BURLING             JULY 23, 1983  14:30:29
0          Declarations generated by *Clparsegen (1076/1) using (851/2) as
           input.  Used to compile (851/1).
0          Referenced by comments of: 509/10, 843/1, 851/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1086/1 
00851/004C  COMMAND SERVICE          PLUS LIB        SQ  G          CLS:CMDSERV*SQL                                                 
            5.1T2  1119  COMMAND_SERVICE.PLUS_LIB.SQ.004    1 LINE     68    4 PAGE UM   BURLING             JULY 23, 1983  14:30:29
0          Plus definitions for the command service routines.  Used to compile
           (851/1) and any other programs that use the service routines.
0          Referenced by comments of: 851/1, 852/1 
00851/005C  COMMAND SERVICE          OBJECT          OC  G          SEG2:CMDSERV                                                    
            5.1T2  1120  COMMAND_SERVICE.OBJECT.OC.005      1 LINE   1662   17 PAGE UM   BURLING             JULY 23, 1983  14:30:30
                         SEG2:CMDSERV         
0          Object for (851/1) and (851/2).
00851/006C  COMMAND SERVICE          WRITEUP         WF  G          CLS:CMDSERV*W                                                   
            5.1T2  1121  COMMAND_SERVICE.WRITEUP.WF.006     1 LINE     83    4 PAGE UM   BURLING             JULY 23, 1983  14:30:30
0          Writeup describing the command service routines, and also how to 
           write a Plus CLS.
0          Referenced by comments of: 851/7 
00851/007C  COMMAND SERVICE          WRITEUP         PF  G          CLS:CMDSERV*WP                                                  
            5.1T2  1122  COMMAND_SERVICE.WRITEUP.PF.007     1 LINE     69    5 PAGE UM   BURLING             JULY 23, 1983  14:30:31
0          Printer-ready version of (851/6).
0          Referenced by comments of: 851/1 
00852/001C  COPY COMMAND             SOURCE          SQ  G          CLS:COPY*SQ                                                     
            5.1T2  1123  COPY_COMMAND.SOURCE.SQ.001         1 LINE     68    6 PAGE UM   BURLING             JULY 23, 1983  14:30:31
0          Plus source for $COPY CLS.  Compile with COPY:MTS*SQL (344/4),
1                                                                                               SUN SEP 08/96   15:24:55   Page  741
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/4), CLS:COPY*SRL
           (852/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 851/1, 852/3, 852/4 
00852/002C  COPY COMMAND             GRAMMAR         SR  G          CLS:COPY*SR                                                     
            5.1T2  1124  COPY_COMMAND.GRAMMAR.SR.002        1 LINE     67    1 PAGE UM   BURLING             JULY 23, 1983  14:30:31
0          *Clparser (1076/6) grammar used by $COPY CLS.
0          Referenced by comments of: 852/4 
00852/003C  COPY COMMAND             DECLARATIONS    SQ  G          CLS:COPY*SRL                                                    
            5.1T2  1125  COPY_COMMAND.DECLARATIONS.SQ.003   1 LINE     64    1 PAGE UM   BURLING             JULY 23, 1983  14:30:31
0          Declarations generated by *Clparsegen (1076/1) using (852/3) as
           input.  Used to compile (852/1).
0          Referenced by comments of: 852/1, 852/3 
00852/004C  COPY COMMAND             OBJECT          OC  G          *NEWCLSCOPY                                                     
            5.1T2  1126  COPY_COMMAND.OBJECT.OC.004         1 LINE   4296    3 PAGE UM   BURLING             JULY 23, 1983  14:30:32
                         *NEWCLSCOPY          
0          Object for (852/1) and (852/2).
00853/001C  CREATE COMMAND           SOURCE          SQ  G          CLS:CREATE*SQ                                                   
            5.1T2  1127  CREATE_COMMAND.SOURCE.SQ.001       1 LINE     74    5 PAGE UM   BURLING             JULY 23, 1983  14:30:32
0          Plus source for $CREATE CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:CREATE*SRL
           (853/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 853/3, 853/4 
00853/002C  CREATE COMMAND           GRAMMAR         SR  G          CLS:CREATE*SR                                                   
            5.1T2  1128  CREATE_COMMAND.GRAMMAR.SR.002      1 LINE     73    1 PAGE UM   BURLING             JULY 23, 1983  14:30:32
0          *Clparser (1076/6) grammar used by CREATE CLS.
0          Referenced by comments of: 853/3, 853/4 
00853/003C  CREATE COMMAND           DECLARATIONS    SQ  G          CLS:CREATE*SRL                                                  
            5.1T2  1129  CREATE_COMMAND.DECLARATIO.SQ.003   1 LINE     66    1 PAGE UM   BURLING             JULY 23, 1983  14:30:32
0          Declarations generated by *Clparsegen (1076/1) using (853/2) as
           input.  Used to compile (853/1).
0          Referenced by comments of: 853/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  742
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00853/004C  CREATE COMMAND           OBJECT          OC  G          *NEWCLSCREATE                                                   
            5.1T2  1130  CREATE_COMMAND.OBJECT.OC.004       1 LINE   4616    3 PAGE UM   BURLING             JULY 23, 1983  14:30:33
                         *NEWCLSCREATE        
0          Object for (853/1) and (853/2).
00854/001C  DESTROY COMMAND          SOURCE          SQ  G          CLS:DESTROY*SQ                                                  
            5.1T2  1131  DESTROY_COMMAND.SOURCE.SQ.001      1 LINE     76    6 PAGE UM   BURLING             JULY 23, 1983  14:30:33
0          Plus source for $DESTROY CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:DESTROY*SRL
           (854/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 854/3, 854/4 
00854/002C  DESTROY COMMAND          GRAMMAR         SR  G          CLS:DESTROY*SR                                                  
            5.1T2  1132  DESTROY_COMMAND.GRAMMAR.SR.002     1 LINE     62    1 PAGE UM   BURLING             JULY 23, 1983  14:30:33
0          *CLPARSER (1076/6) grammar for $DESTROY CLS.
0          Referenced by comments of: 854/3, 854/4 
00854/003C  DESTROY COMMAND          DECLARATIONS    SQ  G          CLS:DESTROY*SRL                                                 
            5.1T2  1133  DESTROY_COMMAND.DECLARATI.SQ.003   1 LINE     67    1 PAGE UM   BURLING             JULY 23, 1983  14:30:34
0          Declarations generated by *CLPARSEGEN (1076/1) using (854/2) as input.  Used to
           compile (854/1).
0          Referenced by comments of: 854/1 
00854/004C  DESTROY COMMAND          OBJECT          OC  G          *NEWCLSDESTROY                                                  
            5.1T2  1134  DESTROY_COMMAND.OBJECT.OC.004      1 LINE   4272    3 PAGE UM   BURLING             JULY 23, 1983  14:30:34
                         *NEWCLSDESTROY       
0          Object for (854/1) and (854/2).
00855/001C  DUPLICATE COMMAND        SOURCE          SQ  G          CLS:DUP*SQ                                                      
            5.1T2  1135  DUPLICATE_COMMAND.SOURCE.SQ.001    1 LINE     79   12 PAGE UM   BURLING             JULY 23, 1983  14:30:34
0          Plus source for $DUPLICATE CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:DUP*SRL (855/3),
           *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 855/3, 855/4 
00855/002C  DUPLICATE COMMAND        GRAMMAR         SR  G          CLS:DUP*SR                                                      
            5.1T2  1136  DUPLICATE_COMMAND.GRAMMAR.SR.002   1 LINE     66    1 PAGE UM   BURLING             JULY 23, 1983  14:30:35
0          *CLPARSER (1076/6) grammar for $DUPLICATE CLS.
0          Referenced by comments of: 855/3, 855/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  743
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00855/003C  DUPLICATE COMMAND        DECLARATIONS    SQ  G          CLS:DUP*SRL                                                     
            5.1T2  1137  DUPLICATE_COMMAND.DECLARA.SQ.003   1 LINE     69    1 PAGE UM   BURLING             JULY 23, 1983  14:30:35
0          Declarations generated by *CLPARSEGEN (1076/1) using (855/2) as input.  Used to
           compile (855/1).
0          Referenced by comments of: 855/1 
00855/004C  DUPLICATE COMMAND        OBJECT          OC  G          *CLSDUPLICATE                                                   
            5.1T2  1138  DUPLICATE_COMMAND.OBJECT.OC.004    1 LINE   9848    4 PAGE UM   BURLING             JULY 23, 1983  14:30:35
                         *CLSDUPLICATE        
0          Object for (855/1) and (855/2).
00856/001C  EMPTY COMMAND            SOURCE          SQ  G          CLS:EMPTY*SQ                                                    
            5.1T2  1139  EMPTY_COMMAND.SOURCE.SQ.001        1 LINE     76    5 PAGE UM   BURLING             JULY 23, 1983  14:30:35
0          Plus source for $EMPTY CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:EMPTY*SRL (856/3),
           *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 856/3, 856/4 
00856/002C  EMPTY COMMAND            GRAMMAR         SR  G          CLS:EMPTY*SR                                                    
            5.1T2  1140  EMPTY_COMMAND.GRAMMAR.SR.002       1 LINE     71    1 PAGE UM   BURLING             JULY 23, 1983  14:30:35
0          *Clparser (1076/6) grammar for $EMPTY CLS.
0          Referenced by comments of: 856/3, 856/4 
00856/003C  EMPTY COMMAND            DECLARATIONS    SQ  G          CLS:EMPTY*SRL                                                   
            5.1T2  1141  EMPTY_COMMAND.DECLARATION.SQ.003   1 LINE     65    1 PAGE UM   BURLING             JULY 23, 1983  14:30:36
0          Declarations generated by *CLPARSEGEN (1076/1) using (856/2) as input.  Used to
           compile (856/1).
0          Referenced by comments of: 856/1 
00856/004C  EMPTY COMMAND            OBJECT          OC  G          *NEWCLSEMPTY                                                    
            5.1T2  1142  EMPTY_COMMAND.OBJECT.OC.004        1 LINE   3560    3 PAGE UM   BURLING             JULY 23, 1983  14:30:36
                         *NEWCLSEMPTY         
0          Object for (856/1) and (856/2).
00857/001C  RENAME COMMAND           SOURCE          SQ  G          CLS:RENAME*SQ                                                   
            5.1T2  1143  RENAME_COMMAND.SOURCE.SQ.001       1 LINE     77    8 PAGE UM   BURLING             JULY 23, 1983  14:30:36
0          Plus source for $RENAME CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:RENAME*SRL (857/3),
           *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 857/3, 857/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  744
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00857/002C  RENAME COMMAND           GRAMMAR         SR  G          CLS:RENAME*SR                                                   
            5.1T2  1144  RENAME_COMMAND.GRAMMAR.SR.002      1 LINE     66    1 PAGE UM   BURLING             JULY 23, 1983  14:30:36
0          *Clparser (1076/6) grammar for $RENAME CLS.
0          Referenced by comments of: 857/3, 857/4 
00857/003C  RENAME COMMAND           DECLARATIONS    SQ  G          CLS:RENAME*SRL                                                  
            5.1T2  1145  RENAME_COMMAND.DECLARATIO.SQ.003   1 LINE     66    1 PAGE UM   BURLING             JULY 23, 1983  14:30:37
0          Declarations generated by *CLPARSEGEN (1076/1) using (857/2) as input.  Used to
           compile (857/1).
0          Referenced by comments of: 857/1 
00857/004C  RENAME COMMAND           OBJECT          OC  G          *NEWCLSRENAME                                                   
            5.1T2  1146  RENAME_COMMAND.OBJECT.OC.004       1 LINE   6344    3 PAGE UM   BURLING             JULY 23, 1983  14:30:37
                         *NEWCLSRENAME        
0          Object for (857/1) and (857/2).
00858/001C  TRUNCATE COMMAND         SOURCE          SQ  G          CLS:TRUNCATE*SQ                                                 
            5.1T2  1147  TRUNCATE_COMMAND.SOURCE.SQ.001     1 LINE     76    6 PAGE UM   BURLING             JULY 23, 1983  14:30:37
0          Plus source for $TRUNCATE CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:TRUNCATE*SRL (858/3),
           *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
0          Referenced by comments of: 578/2, 851/1, 858/3, 858/4 
00858/002C  TRUNCATE COMMAND         GRAMMAR         SR  G          CLS:TRUNCATE*SR                                                 
            5.1T2  1148  TRUNCATE_COMMAND.GRAMMAR.SR.002    1 LINE     76    1 PAGE UM   BURLING             JULY 23, 1983  14:30:38
0          *Clparser (1076/6) grammar for $TRUNCATE CLS.
0          Referenced by comments of: 858/3, 858/4 
00858/003C  TRUNCATE COMMAND         DECLARATIONS    SQ  G          CLS:TRUNCATE*SRL                                                
            5.1T2  1149  TRUNCATE_COMMAND.DECLARAT.SQ.003   1 LINE     68    1 PAGE UM   BURLING             JULY 23, 1983  14:30:38
0          Declarations generated by *CLPARSEGEN (1076/1) using (858/2) as input.  Used to
           compile (858/1).
0          Referenced by comments of: 858/1 
00858/004C  TRUNCATE COMMAND         OBJECT          OC  G          *NEWCLSTRUNCATE                                                 
            5.1T2  1150  TRUNCATE_COMMAND.OBJECT.OC.004     1 LINE   4086    3 PAGE UM   BURLING             JULY 23, 1983  14:30:38
                         *NEWCLSTRUNCATE      
0          Object for (858/1) and (858/2).
1                                                                                               SUN SEP 08/96   15:24:55   Page  745
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00859/001C *NIM                      SOURCE          SA           # (WE CAN'T FIND IT)                                              
                                                                                    UM   STERKEN                                    
00859/002C *NIM                      OBJECT          OC  G          *NIM                                                            
            5.1T2  1151  NIM.OBJECT.OC.002                  1 LINE    255    1 PAGE UM   STERKEN             JULY 23, 1983  14:30:38
                         *NIM                 
00860/001C  MERIT CC UTILITIES       HICORE MONITOR  S   G          K1YX:PROM.S                                                     
            5.1T2  1152  MERIT_CC_UTILITIES.HICORE.S.001    1 LINE     86   34 PAGE UM   HUSAK               JULY 23, 1983  14:30:38
0          *PDP11ASR (686/32) source for the Merit PDP-11 high core monitor /
           loader / EPROM program used in PCPs and SCPs.  Requires MINOSMACS 
           (715/5) and HDWEQUS (715/9).
0          Referenced by comments of: 860/2, 860/4, 860/6 
00860/002C  MERIT CC UTILITIES       FLOPPY          S   O          K1YX:FLOPPY.S                                                   
            5.1T2  1153  MERIT_CC_UTILITIES.FLOPPY.S.002    1 LINE     85   17 PAGE UM   HUSAK               JULY 23, 1983  14:30:40
0          *PDP11ASR (686/32) source for PDP-11 standalone RX02 floppy disk
           utility.  Requires MINOSMACS (715/5), HDWEQUS (715/9) and the 
           high core monitor (860/1).
0          Referenced by comments of: 860/3 
00860/003C  MERIT CC UTILITIES       RXO2 BOOT       S   S          K1YX:BOOT.S                                                     
            5.1T2  1154  MERIT_CC_UTILITIES.RXO2_B.S.003    1 LINE     79    3 PAGE UM   HUSAK               JULY 23, 1983  14:30:41
0          *PDP11ASR (686/32) source for RX02 bootstrap block.  Uses unique
           directory format supported by FLOPPY (860/2).  Requires MINOSMACS
           (715/5) and HDWEQUS (715/9).
00860/004C  MERIT CC UTILITIES       DIS 11          S   S          K1YX:DIS11                                                      
            5.1T2  1155  MERIT_CC_UTILITIES.DIS_11.S.004    1 LINE     83   25 PAGE UM   HUSAK               JULY 23, 1983  14:30:41
0          *PDP11ASR (686/32) source for a PDP-11 resident dissassembler.  
           Requires MINOSMACS (715/5), HDWEQUS (715/9), and the high core
           monitor (860/1).
00860/005C  MERIT CC UTILITIES       CHNL DIAG JOG   C   G          K1YX:CHNLDIAG.JOB                                               
            5.1T2  1156  MERIT_CC_UTILITIES.CHNL_D.C.005    1 LINE     66    1 PAGE UM   HUSAK               JULY 23, 1983  14:30:42
0          $SOURCE file to generate diagnostic for the IBM-channel to DEC-unibus
           interface, designed by Joe Gersch.  Requires MINOSMACS (715/5),
           HDWEQUS (715/9), (860/6) and (860/7).
00860/006C  MERIT CC UTILITIES       OFFLIN CHLDIAG  S   B          K1YX:CHNLDIAG.S                                                 
            5.1T2  1157  MERIT_CC_UTILITIES.OFFLIN.S.006    1 LINE     90   21 PAGE UM   HUSAK               JULY 23, 1983  14:30:42
0          *PDP11ASR (686/32) source for diagnostic program for channel 
           interface, offline version.  Requires MINOSMACS (715/5), HDWEQUS
           (715/9), and the high core monitor (860/1).
0          Referenced by comments of: 860/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  746
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00860/007C  MERIT CC UTILITIES       ONLINE CHLDIAG  S   B          K1YX:CHNLDIAG.X.S                                               
            5.1T2  1158  MERIT_CC_UTILITIES.ONLINE.S.007    1 LINE     76    5 PAGE UM   HUSAK               JULY 23, 1983  14:30:43
0          *PDP11ASR (686/32) source for online portion of the channel interface
           diagnostic.  Not completely compatible with the latest I/F microcode.
           Requires MINOSMACS (715/5) and HDWEQUS (715/9).
0          Referenced by comments of: 860/5 
00860/008C  MERIT CC UTILITIES       HDLC PROD       S   O          MM16:HDLCPROD.S                                                 
            5.1T2  1159  MERIT_CC_UTILITIES.HDLC_P.S.008    1 LINE     99   19 PAGE UM   CASHMAN             JULY 23, 1983  14:30:44
0          *M6809ASR (686/31) source for MM16 CPU configured for HDLC.  Requires
           MM16EQUS (860/9).
00860/009C  MERIT CC UTILITIES       MM16 EQUS       S   G          MM16:MM16EQUS                                                   
            5.1T2  1160  MERIT_CC_UTILITIES.MM16_E.S.009    1 LINE     91   22 PAGE UM   CASHMAN             JULY 23, 1983  14:30:45
0          *M6809ASR (686/31) equates for CPU card.
0          Referenced by comments of: 860/8, 861/1, 861/2 
00861/001C  MERIT UMNET HARDWARE     6809 MON/DEBUG  S   G          MM16:6809MON                                                    
            5.1T2  1161  MERIT_UMNET_HARDWARE.6809.S.001    1 LINE     73    2 PAGE UM   CASHMAN             JULY 23, 1983  14:30:46
0          *M6809ASR (686/31) source for standalone 6809 monitor/debugger.  This
           is the MM16-dependent portion.  Requires (860/9) and (861/2).
0          Referenced by comments of: 861/2 
00861/002C  MERIT UMNET HARDWARE     6809 MON CODE   S   O          MM16:6809MONCODE                                                
            5.1T2  1162  MERIT_UMNET_HARDWARE.6809.S.002    1 LINE     72   33 PAGE UM   CASHMAN             JULY 23, 1983  14:30:46
0          *M6809ASR (686/31) source for standalone 6809 monitor/debugger.  This
           is the MM16-independent portion.  Requires (860/9) and (861/1).
0          Referenced by comments of: 861/1 
00861/003C  MERIT UMNET HARDWARE     MM16 BACKPLANE  S   G          MM16:MM16.WW                                                    
            5.1T2  1163  MERIT_UMNET_HARDWARE.MM16.S.003    1 LINE    223   10 PAGE UM   HUSAK               JULY 23, 1983  14:30:48
0          *WIREWRAP (306) source for MM16 microcomputer multiplexor unibus
           backplane.
00861/004C  MERIT UMNET HARDWARE     BLOCK MICRO     S   G          K1YU:BLKMICRO                                                   
            5.1T2  1164  MERIT_UMNET_HARDWARE.BLOC.S.004    1 LINE     88   11 PAGE UM   HUSAK               JULY 23, 1983  14:30:48
0          *11ASR (515) source for microprogram of channel interface (designed
           by Joe Gersch) when running on a block multiplexor channel.  Uses
           command retry.
1                                                                                               SUN SEP 08/96   15:24:55   Page  747
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00861/005C  MERIT UMNET HARDWARE     BYTE MICRO      S   G          K1YU:BYTEMICRO                                                  
            5.1T2  1165  MERIT_UMNET_HARDWARE.BYTE.S.005    1 LINE     90   11 PAGE UM   HUSAK               JULY 23, 1983  14:30:49
0          *11ASR (515) source for microprogram of channel interface when used on a 
           four-byte multiplexor channel.
00861/006C  MERIT UMNET HARDWARE     UCPWW           S   G          K1YU:ITWW                                                       
            5.1T2  1166  MERIT_UMNET_HARDWARE.UCPW.S.006    1 LINE    161    9 PAGE UM   HUSAK               JULY 23, 1983  14:30:50
0          *WIREWRAP (306) source for Merit interval timer / display panel /
           EPROM interface.  Contains a $CONTINUE WITH *WWICMAC (306/30).
00861/007C  MERIT UMNET HARDWARE     470WW           S   G          K1YU:470WW                                                      
            5.1T2  1167  MERIT_UMNET_HARDWARE.470W.S.007    1 LINE    191   22 PAGE UM   HUSAK               JULY 23, 1983  14:30:50
0          *WIREWRAP (306) source for IBM to unibus interface designed by Joe
           Gersch.  ECO level to allow working on block multiplexor channel.
           Contains a $CONTINUE WITH *WWICMAC (306/30).
00861/008C  MERIT UMNET HARDWARE     CHNL XFACE MAN  WF  S          K1YU:360MANUAL                                                  
            5.1T2  1168  MERIT_UMNET_HARDWARE.CHNL.WF.008   1 LINE    197   65 PAGE UM   HUSAK               JULY 23, 1983  14:30:52
0          *FORMAT (308) source for channel interface manual. Does not include
           revisions for ECOs to work on block multiplexor channel.
00861/009C  MERIT UMNET HARDWARE     PROM MAKE       SA  G          DIAG:PROMMAKE.S                                                 
            5.1T2  1169  MERIT_UMNET_HARDWARE.PROM.SA.009   1 LINE     68    4 PAGE UM   HUSAK               JULY 23, 1983  14:30:54
0          *ASMH source for DEC absolute loader to INTEL hex converter GLP.
           Assumes two 2708's.
0          Referenced by comments of: 861/10 
00861/010C  MERIT UMNET HARDWARE     PROM MAKE       OC  G          DIAG:PROMMAKE.O                                                 
            5.1T2  1170  MERIT_UMNET_HARDWARE.PROM.OC.010   1 LINE     80    1 PAGE UM   HUSAK               JULY 23, 1983  14:30:55
0          Object for (861/9).  Good for ROM burners.
00861/011C  MERIT UMNET HARDWARE     MM DIAG         S   S          K1YY:UN062.MMD(1)                                               
            5.1T2  1171  MERIT_UMNET_HARDWARE.MM_D.S.011    1 LINE    110   38 PAGE UM   KNOPPER             JULY 23, 1983  14:30:55
0          *PDP11ASR (686/32) source for MM16 diagnostic. This is probably the
           source for (861/12). Caveat emptor! Requires (715/5) and (715/9).
00861/012C  MERIT UMNET HARDWARE     MM DIAG         B   S          MM16:MMDIAG.T                                                   
            5.1T2  1172  MERIT_UMNET_HARDWARE.MM_D.B.012    1 LINE     80    9 PAGE UM   KNOPPER             JULY 23, 1983  14:30:57
0          Tape image for MM16 diagnostic.
            
           **********************************************************************
           D5.1 version:
            
           This is the version we've been using for months, but it needs work.
           **********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  748
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 861/11 
00861/013C  MERIT UMNET HARDWARE     KHV-11 DIAG     C   O          K1Y9:LINK.KHT                                                   
            5.1T2  1173  MERIT_UMNET_HARDWARE.KHV-.C.013    1 LINE     63    1 PAGE UM   HUSAK               JULY 23, 1983  14:30:58
0          Command file to *LINK11 together KHV-11 diagnostic program.  Requires
           the Merit CC support (715).
00861/014C  MERIT UMNET HARDWARE     KHV-11 DIAG     S   G          K1YU:KHT.S                                                      
            5.1T2  1174  MERIT_UMNET_HARDWARE.KHV-.S.014    1 LINE    105   11 PAGE UM   HUSAK               JULY 23, 1983  14:30:59
0          *PDP11ASR (686/32) source for KHV-11 diagnostic module.  Requires
           the Merit CC support (715), especially (715/5) and (715/9).
00861/015C  MERIT UMNET HARDWARE     KHV-11 DIAG     B   G          K1YU:KHT.O                                                      
            5.1T2  1175  MERIT_UMNET_HARDWARE.KHV-.B.015    1 LINE    256    3 PAGE UM   HUSAK               JULY 23, 1983  14:30:59
0          PDP-11 object module for KHV-11 diagnostic command language.
00861/016C  MERIT UMNET HARDWARE     KHV-11 DIAG     S   G          K1YU:KHTSA.S                                                    
            5.1T2  1176  MERIT_UMNET_HARDWARE.KHV-.S.016    1 LINE    106    4 PAGE UM   HUSAK               JULY 23, 1983  14:31:00
0          *PDP11ASR (686/32) source for KHV-11 diagnostic command language
           standalone routines.  Requires (861/20).
00861/017C  MERIT UMNET HARDWARE     KHV-11 DIAG     B   G          K1YU:KHTSA.O                                                    
            5.1T2  1177  MERIT_UMNET_HARDWARE.KHV-.B.017    1 LINE    256    3 PAGE UM   HUSAK               JULY 23, 1983  14:31:00
0          PDP-11 object for standalone portion of KHV-11 diagnostic.
00861/018C  MERIT UMNET HARDWARE     KHV-11 DIAG     B   G          K1Y9:MINOS.KHT                                                  
            5.1T2  1178  MERIT_UMNET_HARDWARE.KHV-.B.018    1 LINE  32767   13 PAGE UM   HUSAK               JULY 23, 1983  14:31:00
0          Core image of KHV-11 diagnostic program.
00861/019C  MERIT UMNET HARDWARE     KHV-11 DIAG     B   G          K1Y9:TAPES.KHT                                                  
            5.1T2  1179  MERIT_UMNET_HARDWARE.KHV-.B.019    1 LINE    247   13 PAGE UM   HUSAK               JULY 23, 1983  14:31:01
0          DEC absolute loader format version of KHV-11 diagnostic.
00861/020C  MERIT UMNET HARDWARE     SKEL LIB        S   O          K1YU:SKEL.LIB                                                   
            5.1T2  1180  MERIT_UMNET_HARDWARE.SKEL.S.020    1 LINE     81   15 PAGE UM   HUSAK               JULY 23, 1983  14:31:01
0          *PDP11ASR (686/32) source library for writing diagnostic routines,
           particularly the KHV ones.  Requires (715/5) and (715/9).
0          Referenced by comments of: 861/16 
00862/001C  COBOL - VS                               SA  G          W116:VS.COBOL                                                   
            5.1T2  1181  COBOL_-_VS..SA.001                 1 LINE     72    4 PAGE UM   YOUNG               JULY 23, 1983  14:31:02
0          Source for VS COBOL compiler interface.
0          Referenced by comments of: 862/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  749
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00862/002C  COBOL - VS                               OC  G          *COBOLVS                                                        
            5.1T2  1182  COBOL_-_VS..OC.002                 1 LINE     80    5 PAGE UM   YOUNG               JULY 23, 1983  14:31:03
0          Object of (862/1).  Contains a $CONTINUE WITH ETC:VSS record which
           should be changed to refer to *VSS (1078/48).
0          Referenced by comments of: 862/9 
00862/003C  COBOL - VS                               SA  G          W116:VS.COBOL.E2                                                
            5.1T2  1183  COBOL_-_VS..SA.003                 1 LINE     76    8 PAGE UM   YOUNG               JULY 23, 1983  14:31:04
0          Source for interface to run compiled COBOL/VS programs.  Copies 
           *GDINFODSECT (594).
0          Referenced by comments of: 862/4 
00862/004C  COBOL - VS                               OC  G          *COBOLVSRUN                                                     
            5.1T2  1184  COBOL_-_VS..OC.004                 1 LINE   4452    3 PAGE UM   YOUNG               JULY 23, 1983  14:31:04
0          Object of (862/3).  Contains a $CONTINUE WITH ETC:VSS record which
           should be changed to refer to *VSS ( 1078/48).
0          Referenced by comments of: 862/7, 862/8 
00862/005C  COBOL - VS                               SA  G          W116:VS.LINK.E                                                  
            5.1T2  1185  COBOL_-_VS..SA.005                 1 LINE     73    9 PAGE UM   YOUNG               JULY 23, 1983  14:31:04
0          Source for interface to run IBM linkage editor.  Copies *GDINFODSECT (594).
0          Referenced by comments of: 862/6 
00862/006C  COBOL - VS                               OC  G          *COBLINKEDIT                                                    
            5.1T2  1186  COBOL_-_VS..OC.006                 1 LINE   4672    4 PAGE UM   YOUNG               JULY 23, 1983  14:31:05
0          Object for (862/5).  Contains a $CONTINUE WITH *VSS (1078/48) record.
           Uses ETC:SYS1.LINKLIB (1078/61).
00862/007C  COBOL - VS                               OL  G        # ETC:VSCOBOL.LIB2                                                
                                                                                    UM   YOUNG                                      
0          VSS library version of VS COBOL library.  Used by *COBOLVSRUN (862/4).
            
           NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
00862/008C  COBOL - VS                               OL  G        # ETC:VSCOBOL.LIB                                                 
                                                                                    UM   YOUNG                                      
0          MTS library version of VS COBOL library.  Used by *COBOLVSRUN (862/4).
            
           NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  750
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00862/009C  COBOL - VS                               OC  G        # ETC:VSCOBOL.COMP                                                
                                                                                    UM   YOUNG                                      
0          IBM VS COBOL compiler used by *COBOLVS (862/2).
            
           NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS.
00862/010C  COBOL - VS               MEMO 439        WF  G          W116:CCMEMO.439                                                 
            5.1T2  1187  COBOL_-_VS.MEMO_439.WF.010         1 LINE    100   17 PAGE UM   YOUNG               JULY 23, 1983  14:31:05
0          This is Computing Center Memo 439 -- "IBM VS COBOL under MTS."
0          Referenced by comments of: 862/11 
00862/011C  COBOL - VS               MEMO 439        PF             S0672 CCMEMO 'CCMEMOS' FSNAME=M439.OUTPUT                       
            5.1T2  1188  COBOL_-_VS.MEMO_439.PF.011         1 LINE     70   23 PAGE UM   YOUNG               OCT. 13, 1982  12:42:51
0          This is the printer-ready version of (862/10).
00863/001C  TELL-A-GRAF                                           # (SOFTWARE NOT DISTRIBUTED)                                      
                                                                                    UM   WHIPPLE                                    
0          TELL-A-GRAF is a proprietary software product of ISSCO.  It is a 
           standalone program for doing two-dimensional computer graphics.
           TELL-A-GRAF is not distributed by UM due to copyright restrictions.
00863/002C  TELL-A-GRAF              MEMO 450        WF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO450.SOU                       
            5.1T2  1189  TELL-A-GRAF.MEMO_450.WF.002        1 LINE    225   10 PAGE UM   WHIPPLE             MAY  04, 1983  17:01:32
0          This is Computing Center Memo 450 -- "TELL-A-GRAF in MTS."
0          Referenced by comments of: 863/3 
00863/003C  TELL-A-GRAF              MEMO 450        PF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO450.OUT                       
            5.1T2  1190  TELL-A-GRAF.MEMO_450.PF.003        1 LINE     72   12 PAGE UM   WHIPPLE             MAY  04, 1983  17:01:11
0          Printer-ready version of (863/2).
00864/001C  RELEASE/HOLD BATCH       *RHB            C   G          *RHB                                                            
            5.1T2  1191  RELEASE/HOLD_BATCH.?RHB.C.001      1 LINE     54    1 PAGE UM   MTA                 JULY 23, 1983  14:31:36
                         SYS:*RHB             
0          An operator job controlled by *AUTOSTART (816/5) which issues appropriate
           HASP $RELEASE and $HOLD commands for different rate groups based on 
           data in the file SYS:AUTOHASP.CTL (864/4).
0          Referenced by comments of: 864/2, 864/4 
00864/002C  RELEASE/HOLD BATCH       MTA:AUTOHASP    SA  G          MTA:AUTOHASP(*F,999)                                            
            5.1T2  1192  RELEASE/HOLD_BATCH.MTA:AU.SA.002   1 LINE    107    3 PAGE UM   MTA                 JULY 23, 1983  14:31:36
0          Source for program run by *RHB (864/1).  Uses SEG2:MONITORS (559/4).
           Assemble with COPY:MISC.MACROS (728/1) with PAR=TEST,PEXIT=*PEXIT.
1                                                                                               SUN SEP 08/96   15:24:55   Page  751
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 864/3 
00864/003C  RELEASE/HOLD BATCH       SYS:AUTOHASP    OC  G          SYS:AUTOHASP                                                    
            5.1T2  1193  RELEASE/HOLD_BATCH.SYS:AU.OC.003   1 LINE   1474    3 PAGE UM   MTA                 JULY 23, 1983  14:31:37
                         SYS:AUTOHASP         
0          Object of (864/2).
00864/004C  RELEASE/HOLD BATCH       AUTOHASP.CTL    D   G          SYS:AUTOHASP.CTL                                                
            5.1T2  1194  RELEASE/HOLD_BATCH.AUTOHA.D.004    1 LINE     33    1 PAGE UM   MTA                 JULY 23, 1983  14:31:37
0          Used by *RHB (864/1).
0          Referenced by comments of: 864/1 
00865/001C *DUMPSYSPGNTS             *DUMPSYSPGNTS   C   G          *DUMPSYSPGNTS                                                   
            5.1T2  1195  DUMPSYSPGNTS.?DUMPSYSPGNT.C.001    1 LINE     68    1 PAGE UM   BURLING             JULY 23, 1983  14:31:37
                         *DUMPSYSPGNTS        
0          Operator file controlled by *AUTOSTART (816/5) which prints the system
           program interrupt log.  Refers to SEG2:MONITORS (559/4).
0          Referenced by comments of: 865/5 
00865/002C *DUMPSYSPGNTS             SOURCE          SA  G          DUMP:PGNTPRINT(1000)                                            
            5.1T2  1196  DUMPSYSPGNTS.SOURCE.SA.002         1 LINE     72    3 PAGE UM   BURLING             JULY 23, 1983  14:31:37
0          This is the source file for the program run by *DUMPSYSPGNTS.
           Copies COPY:CMDAREADSECT (531/2).
0          Referenced by comments of: 865/3 
00865/003C *DUMPSYSPGNTS             OBJECT          OC  G          DUMP:PGNTPRINT(1,999)                                           
            5.1T2  1197  DUMPSYSPGNTS.OBJECT.OC.003         1 LINE     80    4 PAGE UM   BURLING             JULY 23, 1983  14:31:39
                         DUMP:PGNTPRINT       
0          Object of (865/2).
00865/004C *DUMPSYSPGNTS                             D   G        # DUMP:CMDSTATTYP24                                               
                                                                                    UM   BURLING                                    
                         DUMP:CMDSTATTYP24@E  
0          File containing the system program interrupt log.
00865/005C *DUMPSYSPGNTS                             D   G        # DUMP:PGNTRECEIPTS                                               
                                                                                    UM   BURLING                                    
                         DUMP:PGNTRECEIPTS@E  
0          File containing the receipt numbers for jobs printed by *DUMPSYSPGNTS
           (865/1).
1                                                                                               SUN SEP 08/96   15:24:55   Page  752
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00866/001C  RESPONSE TIME DATA       SOURCE          SA  G          W034:RTDC.S                                                     
            5.1T3   352  RESPONSE_TIME_DATA.SOURCE.SA.001   1 LINE     71    8 PAGE UM   MTS       OGDEN     AUG. 20, 1983  19:49:29
0          Assembler source for the response time data collection area and
           routines. Assemble using *SYSMAC, COPY:MTS.MACROS (344/3),
           OLD.:CC.MACROS (1054/4), COPY:MISC.MACROS (728/1) and *PEXIT. Copies
           COPY:GLOBALS (1026/3) and COPY:LLMPSEQUS (087).
00866/002C  RESPONSE TIME DATA       OBJECT          OC  G          SEG2:RTDC                                                       
            5.1T3   353  RESPONSE_TIME_DATA.OBJECT.OC.002   1 LINE     80    2 PAGE UM   MTS       OGDEN     AUG. 20, 1983  19:49:29
                         SEG2:RTDC            
0          Object for response time data collection area and routines, normally
           loaded into shared VM using Pistle. Contains a $CW for COPY:SYSDEFS
           (579/3).
00866/003C  RESPONSE TIME DATA       CONTROL PGM     SW  G          W034:RESPONSE.S(1,999)                                          
            5.1T3   354  RESPONSE_TIME_DATA.CONTRO.SW.003   1 LINE     92    6 PAGE UM   MTS       OGDEN     AUG. 20, 1983  19:49:30
0          PascalVS program to enable, disable and control response time data
           collection using the data collection routines and area.
0          Referenced by comments of: 866/4, 866/5 
00866/004C  RESPONSE TIME DATA       CONTROL DATA P  SA  G          W034:RESPONSE.S(1000)                                           
            5.1T3   355  RESPONSE_TIME_DATA.CONTRO.SA.004   1 LINE     62    1 PAGE UM   MTS       OGDEN     AUG. 20, 1983  19:49:31
0          An assembler routine to read CMDSTAT type 28 records. Used by the
           above Pascal program (866/3). Assemble using *SYSMAC. Copies
           COPY:CMDAREADSECT (531/2).
0          Referenced by comments of: 866/5 
00866/005C  RESPONSE TIME DATA       CONTROL OBJ     OC  G          W034:RESPONSE                                                   
            5.1T3   356  RESPONSE_TIME_DATA.CONTRO.OC.005   1 LINE  15046    6 PAGE UM   MTS       OGDEN     AUG. 20, 1983  19:49:31
0          Object of the Pascal program (866/3) and the assembler subroutine
           (866/4). Contains a $CW line for *PASCALVSLIB (823/6) and COPY:SYSDEFS
           (579/3).
00867/001   MTS VOLUME 13 (NEW)                      WT             S1666 MTSV13 'MTS MANUALS' POSN=NEWM1.V13                       
                                                                                    UM   MANUAL                                     
0          TEXT/360 input for Volume 13 "Symbolic Debugging System" of the UM
           MTS manuals (in publication).
            
           Editor:  Richard A. Salisbury
            
           Note: this is a different manual than the original MTS Volume 13
                 (510) "Data Concentrator User's Guide" which is obsolete.
0          Referenced by comments of: 510/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  753
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
00867/002   MTS VOLUME 13 (NEW)                      PT             S1666 MTSV13 'MTS MANUALS' POSN=PRINT1.V13                      
                                                                                    UM   MANUAL                                     
0          TEXT/360 print file.  There is also a Xerox 9700 print file (which
           is slightly modified from the TEXT/360 print file), available on
           request.
01000/001   INTERACTIVE_FORTRAN      INSTALL.PROC    WF  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.INSTA.WF.001(1)  1042
            5.0T3  1042  INTERACTIVE_FORTRAN.INSTA.WF.001   1 LINE     80    2 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:20:35
            5.0T8   421                       
0          Description of the procedure for installing INTERACTIVE FORTRAN.
            
           *******************************************************************
           D5.0 version:
            
           This is the Spring 1981 version which includes:
            
            -- many bug fixes.
            -- /RERUN command, which reissues the last /RUN command.
            -- /SET AUTOLINE=ON command which causes the FORTRAN source 
               statement to be displayed along with the usual information
               whenever a suspension occurs.
            -- changes to the error printer so that lines longer than the
               screen width are split at a blank and printed on two lines.
               Also, in batch error messages are emphasized in the manner in 
               which FORTRAN I/O messages are emphasized.
           *********************************************************************
01000/002   INTERACTIVE_FORTRAN      *IF             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.*IF.SA.002(1)    1043
            5.0T3  1043  INTERACTIVE_FORTRAN.*IF.SA.002     1 LINE     72    9 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:20:36
            5.0T8   422                       
0          ASSEMBLER source code for routine which calls IF.
            
           May require local mods - read the comments in this module carefully.
            
0          Referenced by comments of: 1000/5, 1000/6, 1000/7 
01000/003A  INTERACTIVE_FORTRAN      *IF             OE  G          *IF                                                             
            5.1T2  1198  INTERACTIVE_FORTRAN.?IF.OE.003     1 LINE  32767   54 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:39
                         *IF                  
0          This is the user-runnable *IF object. Lines 1,999 contain the IF calling
           routine. If *IF is to be loaded into shared memory, lines 1,999 should be
           placed in *IF with two cards appended:
            
                       LCS LCSYMBOL
                       LDT
            
           Lines 1000,*L should be placed in SEG2:IF following a COM.IF record, and the
           LDT card should be removed. Lines 1000,*L have been squashed, combined, and
           purged by the linkage editor.
1                                                                                               SUN SEP 08/96   15:24:55   Page  754
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01000/004   INTERACTIVE_FORTRAN      MACLIB          SM  G          FORT:IF.MACLIB                                                  
            5.0T3  1045  INTERACTIVE_FORTRAN.MACLI.SM.004   1 LINE     83   66 PAGE UBC  O'REILLY  HANSEN    JULY 03, 1981  20:26:48
            5.0T8   424                       
0          Macro library containing macros and copy sections used by all
           IF modules; command streams for assembling any component may
           be found in the negative line number area of each source file.
           All copy sections (except the interpreter dsects) have been
           included in this macro library. Any IF module can be assembled 
           by using *ASMH and specifying 0=*SYSMAC and 2=MACLIB.
01000/005A  INTERACTIVE_FORTRAN      ELMQQSV         M   G          ETC:IF.ELMQQSV                                                  
            5.1T2  1199  INTERACTIVE_FORTRAN.ELMQQ.M.005    1 LINE    138   46 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:41
                         ETC:IF.ELMQQSV       
0          IF error message file - must be implemented @i.
           The negative line number region of this file contains
           a series of messages which are printed when a dump
           occurs -- these messages should be changed to suit
           the installation.
            
           The error message file is formatted as follows:
            
               TERSE messages   :  lines 1-4999
               NORMAL messages  :  lines 5000-9999
               LONG messages    :  lines 10000-14999
               VERBOSE messages :  lines 15000-19999
            
           If you change a message, be sure to change all 4 verbosities.
           See the comments in *IF (1000/2) for more information.
            
           Line -1 of this file should be changed to contain the local
           person to contact in case of a problem.
01000/006A  INTERACTIVE_FORTRAN      ETC:IF.DUMP     D   G        # ETC:IF.DUMP                                                     
            RD15    452  INTERACTIVE_FORTRAN.DUMPS.M.06     1 SEQ      72    3 PAGE UBC  O'REILLY  HANSEN    AUG. 30, 1978  22:31:50
                         ETC:IF.DUMP@E        
0          File which collects dump information (program interrupts in IF).
           See the comments in *IF (1000/2) for more information.
           Note this must be a sequential file; the other auxiliary files
           are line files. Dumps are actually only program interrupts in 
           IF, and usually occur as the result of a user program clobbering
           IF control information. You may see several pieces of information
           appended to the first line of the dump:
            
              "EXT" - means that an external routine was called
                      at least once, which adds weight to the
                      hypothesis that the dump was caused by a bug
                      in an external routine, rather than by a bug in IF.
            
              "ARG" - means that the "/SET ARGCHK=ON" feature was enabled
                      and was used at least once, which also adds weight
                      to the hypothesis that the dump was not caused by a 
1                                                                                               SUN SEP 08/96   15:24:55   Page  755
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                     bug in IF.
            
           Dumps are logged to this file by the MDEBUG subcomponent (1000/20).
01000/007A  INTERACTIVE_FORTRAN      EXPLAIN         M   G          ETC:IF.EXPLAIN                                                  
            5.1T2  1200  INTERACTIVE_FORTRAN.EXPLA.M.007    1 LINE     79   23 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:43
                         ETC:IF.EXPLAIN       
0          IF command explain file; see the comments in *IF (1000/2)
           for further information. This file is generated by using the FORMAT
           source for the IF manual (1000/9) as a database.
            
           Note that the description of /SET ALIGN=ON,OFF has been added to
           the explanation of the /SET command (do a /EXPLAIN /SET).
01000/008A  INTERACTIVE_FORTRAN      ETC:IF.STAT     D   G        # ETC:IF.STAT                                                     
            RD15    454  INTERACTIVE_FORTRAN.STATIS.M.08    1 LINE     62  109 PAGE UBC  O'REILLY  HANSEN    AUG. 30, 1978  22:31:53
                         ETC:IF.STAT@E        
0          Use statistics collection file; note that line 0 of this file may
           contain a message to be displayed upon invocation of IF (this 
           facility existed before the loader supported "MSG" cards).
           If line 0 does contain an invocation message, the file should
           be permitted RWEXP OTHERS;  if line 0 does not contain an
           invocation message, the file should be permitted WEXP OTHERS.
0          Referenced by comments of: 1000/37, 1000/39 
01000/009   INTERACTIVE_FORTRAN      WRITEUP         WF  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.WRITE.WF.009(1)  1048
            5.0T3  1048  INTERACTIVE_FORTRAN.WRITE.WF.009   1 LINE     93   58 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:21:28
            5.0T8   427                       
0          This is the FORMAT source for the IF writeup.
0          Referenced by comments of: 1000/7 
01000/010   INTERACTIVE_FORTRAN      WRITEUP         PF  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.WRITE.PF.010(1)  1049
            5.0T3  1049  INTERACTIVE_FORTRAN.WRITE.PF.010   1 LINE    117  101 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:21:38
            5.0T8   428                       
0          This is the IF writeup, suitable for copying to a printer.
01000/011A  INTERACTIVE_FORTRAN      TEST.VERSION    OC  G          FORT:IF.TEST                                                    
            5.1T2  1201  INTERACTIVE_FORTRAN.TEST..OC.011   1 LINE   2104    3 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:44
0          Test version of IF.  All of the object modules comprising the
           re-entrant processor, source in (1000/12) through (1000/32) and
           (1000/35), are in this file. They are squashed but not combined
           or purged so that individual csects are still accessible and
           replaceable. A shared VM version of IF is created by COMBINing
           and PURGing the object decks in this file using the LINKAGE 
           EDITOR (297).
1                                                                                               SUN SEP 08/96   15:24:55   Page  756
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01000/012A  INTERACTIVE_FORTRAN      DIRECT          SA  G          FORT:IF.DIRECT                                                  
            5.1T2  1202  INTERACTIVE_FORTRAN.DIREC.SA.012   1 LINE     78   35 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:44
0          MAIN COMMAND PROCESSOR; APPEARS IN |MAP AS DIR.
0          Referenced by comments of: 1000/11 
01000/013   INTERACTIVE_FORTRAN      EL              SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.EL.SA.013(1)     1052
            5.0T3  1052  INTERACTIVE_FORTRAN.EL.SA.013      1 LINE     72   25 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:22:39
            5.0T8   431                       
0          Error message printer; appears in |MAP as EL.
01000/014   INTERACTIVE_FORTRAN      GSC             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.GSC.SA.014(1)    1053
            5.0T3  1053  INTERACTIVE_FORTRAN.GSC.SA.014     1 LINE     79   36 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:22:41
            5.0T8   432                       
0          Semantic code generator; appears in |MAP as GENCODE.
01000/015   INTERACTIVE_FORTRAN      IFRD            SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.IFRD.SA.015(1)   1054
            5.0T3  1054  INTERACTIVE_FORTRAN.IFRD.SA.015    1 LINE     72   18 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:22:44
            5.0T8   433                       
0          Free format input routine; appears in |MAP as IFRDCODE.
01000/016   INTERACTIVE_FORTRAN      INT             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.INT.SA.016(1)    1055
            5.0T3  1055  INTERACTIVE_FORTRAN.INT.SA.016     1 LINE     72  226 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:22:46
            5.0T8   434                       
0          The interpreter.
           Appears in |MAP as INTE.
01000/017   INTERACTIVE_FORTRAN      IS              SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.IS.SA.017(1)     1056
            5.0T3  1056  INTERACTIVE_FORTRAN.IS.SA.017      1 LINE     80   43 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:05
            5.0T8   435                       
0          Semantic checking routine; appears in |MAP as SIMLATOR.
01000/018   INTERACTIVE_FORTRAN      LEX             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.LEX.SA.018(1)    1057
            5.0T3  1057  INTERACTIVE_FORTRAN.LEX.SA.018     1 LINE     79   28 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:08
            5.0T8   436                       
0          Lexical scanner; appears in |MAP as LEX.
01000/019   INTERACTIVE_FORTRAN      LIN             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.LIN.SA.019(1)    1058
            5.0T3  1058  INTERACTIVE_FORTRAN.LIN.SA.019     1 LINE     79   26 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:11
            5.0T8   437                       
0          Lexical scanner input routine; appears in |MAP as LIN.
1                                                                                               SUN SEP 08/96   15:24:55   Page  757
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01000/020   INTERACTIVE_FORTRAN      MDEBUG          SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.MDEBU.SA.020(1)  1059
            5.0T3  1059  INTERACTIVE_FORTRAN.MDEBU.SA.020   1 LINE     80   31 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:13
            5.0T8   438                       
0          Built-in SDS-like debugging facility; documentation is a separate component
           (1000/33).  Has BREAKPOINTs, ATPOINTs, and an instruction
           simulator much like SDS. Appears in |MAP as MDG.
0          Referenced by comments of: 1000/6, 1000/33 
01000/021   INTERACTIVE_FORTRAN      MON             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.MON.SA.021(1)    1060
            5.0T3  1060  INTERACTIVE_FORTRAN.MON.SA.021     1 LINE     80   15 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:17
            5.0T8   439                       
0          Compiler monitor; contains entry point named "IF".
           appears in |MAP as MON.
01000/022   INTERACTIVE_FORTRAN      OUT             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.OUT.SA.022(1)    1061
            5.0T3  1061  INTERACTIVE_FORTRAN.OUT.SA.022     1 LINE     79   31 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:19
            5.0T8   440                       
0          Another command processor; appears in |MAP as SUBOUT.
            
           Note: This module copies the interpreter dsects.
01000/023   INTERACTIVE_FORTRAN      PARSE           SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.PARSE.SA.023(1)  1062
            5.0T3  1062  INTERACTIVE_FORTRAN.PARSE.SA.023   1 LINE     79   49 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:23
            5.0T8   441                       
0          The parser;  appears in |MAP as PARSER.
01000/024   INTERACTIVE_FORTRAN      SCOM            SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SCOM.SA.024(1)   1063
            5.0T3  1063  INTERACTIVE_FORTRAN.SCOM.SA.024    1 LINE     72   23 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:27
            5.0T8   442                       
0          COMMON routine; appears in |MAP as SCOM#.
01000/025   INTERACTIVE_FORTRAN      SEQV            SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SEQV.SA.025(1)   1064
            5.0T3  1064  INTERACTIVE_FORTRAN.SEQV.SA.025    1 LINE     79   18 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:30
            5.0T8   443                       
0          EQUIVALENCE routine; appears in |MAP as SEQV#.
01000/026   INTERACTIVE_FORTRAN      SIM             SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SIM.SA.026(1)    1065
            5.0T3  1065  INTERACTIVE_FORTRAN.SIM.SA.026     1 LINE     78   19 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:32
            5.0T8   444                       
0          compilation monitor; appears in |MAP as SIM.
01000/027   INTERACTIVE_FORTRAN      SLABEL          SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SLABE.SA.027(1)  1066
            5.0T3  1066  INTERACTIVE_FORTRAN.SLABE.SA.027   1 LINE     72   10 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:33
            5.0T8   445                       
0          Label checking routine; appears in |MAP as SLABEL.
1                                                                                               SUN SEP 08/96   15:24:55   Page  758
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01000/028A  INTERACTIVE_FORTRAN      SPACE           SA  G          FORT:IF.CORE                                                    
            5.1T2  1203  INTERACTIVE_FORTRAN.SPACE.SA.028   1 LINE     78   19 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:46
0          Virtual memory management; appears in |MAP as CORE.
01000/029A  INTERACTIVE_FORTRAN      SYMBOL          SA  G          FORT:IF.SYMBOL                                                  
            5.1T2  1204  INTERACTIVE_FORTRAN.SYMBO.SA.029   1 LINE    104   32 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:46
0          Symbol table routines; appears in |MAP as SYMBOL.
01000/030   INTERACTIVE_FORTRAN      TPUT            SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.TPUT.SA.030(1)   1069
            5.0T3  1069  INTERACTIVE_FORTRAN.TPUT.SA.030    1 LINE     80   22 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:39
            5.0T8   448                       
0          Interface to operating system; 99% of system dependency is gated through this
           module. In fact, IF runs under TSS. Appears in |MAP as TPUT.
01000/031A  INTERACTIVE_FORTRAN      XLOADER         SA  G          FORT:IF.XLOADER                                                 
            5.1T2  1205  INTERACTIVE_FORTRAN.XLOAD.SA.031   1 LINE     86   95 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:48
0          IF's external loader and interface to UMLOAD.
           Appears in |MAP as XLD.
01000/032   INTERACTIVE_FORTRAN      FUNCTIONS       SA  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.FUNCT.SA.032(1)  1071
            5.0T3  1071  INTERACTIVE_FORTRAN.FUNCT.SA.032   1 LINE     80    7 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:55
            5.0T8   450                       
0          Code for ELEMENTARY FUNCTIONS not found in EFL (525); these are typically
           the "in-line" FORTRAN functions. This also serves as the error monitor for 
           EFL. IF uses the standard system EFL library (525) and standard system 
           FORTRAN I/O support (1002).
0          Referenced by comments of: 1000/11 
01000/033   INTERACTIVE_FORTRAN      MDEBUG          WF  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.MDEBU.WF.033(1)  1072
            5.0T3  1072  INTERACTIVE_FORTRAN.MDEBU.WF.033   1 LINE     89    8 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:56
            5.0T8   451                       
0          Documentation for MDEBUG, the IF SDS-like debugging facility (1000/20).
0          Referenced by comments of: 1000/20 
01000/034   INTERACTIVE_FORTRAN      CALLINGIF       WF  G          S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.CALLI.WF.034(1)  1073
            5.0T3  1073  INTERACTIVE_FORTRAN.CALLI.WF.034   1 LINE     87    4 PAGE UBC  O'REILLY  HANSEN    FEB. 26, 1981  10:23:57
            5.0T8   452                       
0          WRITEUP DESCRIBING HOW TO CALL RESIDENT IF AS A SUBROUTINE.
01000/035A  INTERACTIVE_FORTRAN      EDITOR          SA  G          FORT:IF.EDITOR                                                  
            5.1T2  1206  INTERACTIVE_FORTRAN.EDITO.SA.035   1 LINE     81   31 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:52
0          This is the interface to the MTS editor.
            
           NOTE:  The ED.MAC component (1000/36) is required as an additional macro
1                                                                                               SUN SEP 08/96   15:24:55   Page  759
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          library to assemble this component.
0          Referenced by comments of: 1000/11, 1000/36 
01000/036A  INTERACTIVE_FORTRAN      ED.MAC          SM  G          FORT:IF.ED.MAC                                                  
            5.1T2  1207  INTERACTIVE_FORTRAN.ED.MA.SM.036   1 LINE     72   26 PAGE UBC  O'REILLY  HANSEN    JULY 23, 1983  14:31:53
0          Old version of structured macros that are required to assemble the
           EDITOR subcomponent (1000/35).
0          Referenced by comments of: 1000/35 
01000/037A  INTERACTIVE_FORTRAN      STATSCAN        SQ  O          FORT:IF.STATSCAN(1000,2999)                                     
            5.1T2  1208  INTERACTIVE_FORTRAN.STATS.SQ.037   1 LINE    117   12 PAGE UM   HANSEN              JULY 23, 1983  14:31:55
0          PLUS source for a program to summarize information in the IF
           statistics file (1000/8).  Refers to (1000/8) and (1000/40).  It is
           self-describing with a HELP command.
0          Referenced by comments of: 1000/38, 1000/39 
01000/038A  INTERACTIVE_FORTRAN      STATSCAN        SA  O          FORT:IF.STATHELPS                                               
            5.1T2  1209  INTERACTIVE_FORTRAN.STATS.SA.038   1 LINE     64    1 PAGE UM   HANSEN              JULY 23, 1983  14:31:56
0          Assembly source for the HELP subroutine used by (1000/37).
0          Referenced by comments of: 1000/39 
01000/039A  INTERACTIVE_FORTRAN      STATSCAN        OC  O          FORT:IF.STATSCAN(1,999)                                         
            5.1T2  1210  INTERACTIVE_FORTRAN.STATS.OC.039   1 LINE   4076   13 PAGE UM   HANSEN              JULY 23, 1983  14:31:56
0          Object for (1000/37) and (1000/38). Refers to (1000/8) and (1000/40).  Contains
           a $CONTINUE WITH *PLUS.OBJLIB (1042/64) record.
0          Referenced by comments of: 1000/40 
01000/040   INTERACTIVE_FORTRAN      STATSCAN        D   O          FORT:IF.STATHELP                                                
            5.0T3  1079  INTERACTIVE_FORTRAN.STATS.D.040    1 LINE     65    1 PAGE UM   HANSEN              JULY 03, 1981  20:28:25
            5.0T8   458                       
0          The HELP file used by (1000/39).
0          Referenced by comments of: 1000/37, 1000/39 
01002/001A  FIX                      USER_OBJECT     OC  G          S1644 5.0BT1 VLO FSNAME=FIX.USER_OBJECT.OC.001(1)            848
            5.1T2  1211  FIX.USER_OBJECT.OC.001             1 LINE  32767   20 PAGE UBC  TIFFANY             NOV. 21, 1982  22:31:44
0          This is the unlinked object file containing SYM records. This file should not
           be used for the shared VM load as it does not include the necessary low core
           symbol table nor the COM record for PISTLE.
            
           ------------------- MAY 1979 UBC COMMENTS ---------------
            
           This is VERSION 1.9 of FIX.
1                                                                                               SUN SEP 08/96   15:24:55   Page  760
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This distribution does NOT include WSU's extended precision updates.
            
           This version sent with the following GLOBAL symbols set:
                &ID = 'ETC.'     &SEP = ':'   &FILEPFX = 'NEW.'
            
           We had hoped that this would be our official version, but it isn't yet. It
           has been our test version since May 13, 1979 and is scheduled to become
           permanent on Aug. 1, 1979.
            
           ****************************************************************************
            This is the UM version.
           ****************************************************************************
0          Referenced by comments of: 422/1, 1000/32, 3023/9 
01002/002A  FIX                      SHARED_OBJECT   OE  G          SEG2:FIX                                                        
            5.1T2  1212  FIX.SHARED_OBJECT.OE.002           1 LINE  32767   51 PAGE UBC  STEVENS   TIFFANY   JULY 23, 1983  14:32:33
                         SEG2:FIX             
0          This is the linkeditted version containing all necessary items for inclusion
           as the resident version.
            
           ------------------- May 1979 ---------------
01002/003A  FIX                      MESSAGE         M   G          ETC:FIX.MESSAGES                                                
            5.1T2  1213  FIX.MESSAGE.M.003                  1 LINE    190    6 PAGE UBC  STEVENS   TIFFANY   JULY 23, 1983  14:32:35
                         ETC:FIX.MESSAGES     
0          This is the message file for all FIX error messages. The name of this file is
           determined by the setting of items in the GLOBALS copy section:
           FDNAME=&ID.&SEP.&FILEPFX.MESSAGES.
            
           This is an indexed file and must be restored @I.
            
           ------------------- May 1979 ---------------
            
           Some of the messages have been changed to upper/lower case. This will
           continue as time permits.
            
            ****************************************************************************
            
            This is the UM version.
            ****************************************************************************
01002/004A  FIX                      EXPLAIN         D   G          ETC:FIX.EXPLAIN                                                 
            5.1T2  1214  FIX.EXPLAIN.D.004                  1 LINE     70    8 PAGE UBC  STEVENS   TIFFANY   JULY 23, 1983  14:32:36
                         ETC:FIX.EXPLAIN      
0          This file contains the text for the EXPLAIN command. The name of this file is
           determined by the setting of items in the GLOBALS copy section:
           FDNAME=&ID.&SEP.&FILEPFX.EXPLAIN.
            
           This is an indexed file and must be restored @I.
1                                                                                               SUN SEP 08/96   15:24:55   Page  761
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           ------------------- May 1979 ---------------
            
           ****************************************************************************
            
           This is the UM version.
           ****************************************************************************
            
           *****************************************************************************
           D5.0 changes, already distributed on D4.3A:
            
           Text is now in mixed case.
           *****************************************************************************
01002/005A  FIX                      FIX_PSECT       SA  G          ETC:FIX.FIODSCT                                                 
            5.1T2  1215  FIX.FIX_PSECT.SA.005               1 LINE     72   11 PAGE UBC  STEVENS   TIFFANY   JULY 23, 1983  14:32:36
                         ETC:FIX.FIODSCT      
0          The main FIX PSECT. Required as a separate file for system dumps for mnemonic
           dumping via PRDSCT. The name of this file is determined by the setting of
           items in the GLOBALS copy section: FDNAME=&ID.&SEP.&FILEPFX.FIODSCT.
            
           ------------------- May 1979 ---------------
0          Referenced by comments of: 1002/12, 1002/28, 3023/9, 3023/11 
01002/006A  FIX                      UNIT_PSECT      SA  G          ETC:FIX.UNITDSCT                                                
            5.1T2  1216  FIX.UNIT_PSECT.SA.006              1 LINE     72    3 PAGE UBC  STEVENS   TIFFANY   JULY 23, 1983  14:32:37
                         ETC:FIX.UNITDSCT     
0          The FIX unit dsect. Required as a separate file for system dumps for mnemonic
           dumping via PRDSCT. The name of this file is determined by the setting of
           items in the GLOBALS copy section: FDNAME=&ID.&SEP.&FILEPFX.UNITDSCT.
            
           ------------------- May 1979 ---------------
0          Referenced by comments of: 1002/12 
01002/007   FIX                      NEWS            P              S1560 5.0T3 VLO FSNAME=FIX.NEWS.P.007(1)                    1086
            5.0T3  1086  FIX.NEWS.P.007                     1 LINE     63    2 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:45:37
            5.0T8   465                       
0          The UBC news file regarding changes in the FORTRAN status.
            
           ------------------- May 1979 ---------------
01002/008   FIX                      DOCUMENTATION   WF  B          S1560 5.0T3 VLO FSNAME=FIX.DOCUMENTATION.WF.008(1)          1087
            5.0T3  1087  FIX.DOCUMENTATION.WF.008           1 LINE    145   72 PAGE UBC  STEVENS   TIFFANY   FEB. 23, 1981  19:29:39
            5.0T8   466                       
0          The UBC document describing FIX. 
            
           ------------------- May 1979 ---------------
1                                                                                               SUN SEP 08/96   15:24:55   Page  762
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01002/009   FIX                      DOCUMENTATION   PF  B          S1560 5.0T3 VLO FSNAME=FIX.DOCUMENTATION.PF.009(1)          1088
            5.0T3  1088  FIX.DOCUMENTATION.PF.009           1 LINE    132  103 PAGE UBC  STEVENS   TIFFANY   FEB. 23, 1981  19:29:44
            5.0T8   467                       
0          The print ready version of the UBC documentation. 
            
           ------------------- May 1979 ---------------
01002/010   FIX                      INTERNAL_DOC    WF  G          S1560 5.0T3 VLO FSNAME=FIX.INTERNAL_DOC.WF.010(1)           1089
            5.0T3  1089  FIX.INTERNAL_DOC.WF.010            1 LINE     80   30 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:45:59
            5.0T8   468                       
0          The *FMT source for the internal documentation describing how FIX is put
           together.
            
           ------------------- May 1979 ---------------
01002/011   FIX                      INTERNAL_DOC    PF  G          S1560 5.0T3 VLO FSNAME=FIX.INTERNAL_DOC.PF.011(1)           1090
            5.0T3  1090  FIX.INTERNAL_DOC.PF.011            1 LINE     69   41 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:04
            5.0T8   469                       
0          The print ready version of the internal documentation.
            
           ------------------- May 1979 ---------------
01002/012A  FIX                      MACRO_LIBRARY   SM  G          S1644 5.0BT1 VLO FSNAME=FIX.MACRO_LIBRARY.SM.012(1)          854
            5.1T2  1217  FIX.MACRO_LIBRARY.SM.012           1 LINE     73   16 PAGE UBC  STEVENS   TIFFANY   NOV. 21, 1982  22:32:05
0          The macro library to be used with all assemblies. Only two copy sections are
           not included here - FIODSCT (1002/5) and UNITDSCT (1002/6). These should
           be restored as separate files.
            
           ------------------- May 1979 ---------------
            
           The copy section GLOBALS has been updated for other installations as per
           their requests. We have not had any requests from RPI or Brazil in this
           regard and have not yet added these - hopefully we can add one as "standard",
           perhaps UM?, and reduce the number of different types.
            
           A new macro ADRYTEST has been added to test the addressability of a given
           address. Used mainly by FIODEBUG.
            
           ****************************************************************************
           This is the UM version.
           ****************************************************************************
            
           **************************************************************************
           D5.0 version:
            
           New return code added for LOADF:
            
                 -5:  Loading aborted by attention interrupt.
           **************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  763
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1002/13, 1002/14, 1002/15, 1002/16, 1002/17, 1002/18, 1002/19, 1002/20, 1002/21, 1002/22,
                 1002/23, 1002/25, 1002/27, 1002/28, 3023/9 
01002/013   FIX                      INIT            SA  G          S1560 5.0T3 VLO FSNAME=FIX.INIT.SA.013(1)                   1092
            5.0T3  1092  FIX.INIT.SA.013                    1 LINE     87    6 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:17
            5.0T8   471                       
0          The PSECT initializer routine. This routine contains the entry points
           FIXINIT, UINIT, and UINITI.
            
           The first call to FIXINIT causes the PSECT to be initialized, FIXINITI,
           including the default &ID as specified in the GLOBALS copy section. If your
           defaults are the same as UBC, except for &ID then just re-assemble this
           module and replace in the distributed object module.
            
           The PSECT may also be re-initialized via a call to FIXINITI.
            
           The code to acquire and initialize a unit dsect is also contained in this
           module, UINIT.
            
           The entry FIXEND is called to restore all necessary things before returning
           to the FORTRAN program. Currently this consists of restoring the floating
           point registers.
            
           Dependent on the setting of the assembly flag &DEBUG, this module also
           collects statistics of usage. This was useful during the growing stage of
           FIX.
            
           All source routines which STEVENS is responsible for will have untidied
           Assembler source lines except for new releases. The purpose of this is to
           leave an "audit" trail of changes made to the particular routine. This is my
           own "checkpoint" feature which few, if any, others use. If it bothers you, I
           will send only tidied source in the future.
            
           ------------------- May 1979 ---------------
            
           ********************************************************************************
           Copies *CNFGINFODSECT (654). Assemble using the FIX MACRO LIBRARY (1002/12).
           ********************************************************************************
0          Referenced by comments of: 1002/28 
01002/014   FIX                      FTN_TRANSFER    SA  G          S1560 5.0T3 VLO FSNAME=FIX.FTN_TRANSFER.SA.014(1)           1093
            5.0T3  1093  FIX.FTN_TRANSFER.SA.014            1 LINE     81   17 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:18
            5.0T8   472                       
0          This is the FIX version of IBM's IBCOM#. The initial transfer vector is
           included along with the code to perform unformatted I/O. The define file
           entry DIOCS# is also included in this module.
            
           Programs which store information in the area after the initial transfer
           vector, e.g. SNOBOL, will not work with a resident version of FIX. They will
           have to run with a non-resident version of FIX. Space has been left in the
           transfer vector for those routines which use this area for various purposes.
1                                                                                               SUN SEP 08/96   15:24:55   Page  764
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           Two extra words have been added to the transfer vector:
               1. An entry for IF, Interactive Fortran.
               2. An entry for STOP from the error monitor.
           As well, the FTNX branch has been added to the table.
            
           This should be the first loaded routine. On program interrupts, ERRMON uses
           the address of IBCOM and end of ERRMON to determine if the interrupt occurred
           in FIX.
            
           Most FORTRAN I/O calls are made to this module via a transfer vector. Only
           calls not made are NAMELIST, DEBUG, FTNCMD.
            
           ------------------- May 1979 ---------------
            
           ********************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ********************************************************************
0          Referenced by comments of: 1002/28 
01002/015   FIX                      UNIT_CONTROL    SA  G          S1560 5.0T3 VLO FSNAME=FIX.UNIT_CONTROL.SA.015(1)           1094
            5.0T3  1094  FIX.UNIT_CONTROL.SA.015            1 LINE     83   21 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:21
            5.0T8   473                       
0          This is the source code for the FIX version of IBM's FIOCS# known as the
           "UNIT CONTROL ROUTINES", UCR. Calls to UCR are via direct calls rather than
           IBM's transfer vector method.
            
           All I/O to FORTRAN units is done through this module.
            
           Processing of $ENDFILE records is determined by the &ENDFILE global symbol in
           the GLOBALS copy section.
            
            
           ------------------- May 1979 ---------------
            
           The following changes have been made to the unit control routines since the
           last distribution:
            
             1. Problems with indexed I/O and concatenated files have forced us to
                disallow this feature to users. All indexed I/O is now done with
                explicit and implicit concatenation turned off.
             2. A check has been made for no error message returned by GDINFO on an
                error return from READ or WRITE; the TAPE DSR returns no message for
                RC=4 on write.
            
           ****************************************************************************
           Copies *GDINFODSECT (594). Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
0          Referenced by comments of: 1002/28 
1                                                                                               SUN SEP 08/96   15:24:55   Page  765
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01002/016   FIX                      FORMAT_IO       SA  G          S1560 5.0T3 VLO FSNAME=FIX.FORMAT_IO.SA.016(1)              1095
            5.0T3  1095  FIX.FORMAT_IO.SA.016               1 LINE     72   32 PAGE UBC  BUCKLAND  TIFFANY   JUNE 29, 1979  14:46:23
            5.0T8   474                       
0          The module for decoding compiled formats and performing the necessary
           conversions.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
01002/017   FIX                      VARIABLE_FMT    SA  G          S1560 5.0T3 VLO FSNAME=FIX.VARIABLE_FMT.SA.017(1)           1096
            5.0T3  1096  FIX.VARIABLE_FMT.SA.017            1 LINE     72   16 PAGE UBC  BUCKLAND  TIFFANY   JUNE 29, 1979  14:46:28
            5.0T8   475                       
0          The module for decoding variable formats. List-directed I/O implemented here
           by checking for "*" as first character of the format. If true, then flag set
           to call LSTDIO instead of FINIT.
            
           The format is saved to be able to check for duplicate calls with the same
           format to save decoding time. Only one level save.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
01002/018   FIX                      MISCELLANEOUS   SA  G          S1560 5.0T3 VLO FSNAME=FIX.MISCELLANEOUS.SA.018(1)          1097
            5.0T3  1097  FIX.MISCELLANEOUS.SA.018           1 LINE     78   11 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:30
            5.0T8   476                       
0          This source file contains a number of small miscellaneous routines. UM's
           original SETxxx routines are mostly implemented as dummy routines. IBM's
           SLITE/SLITET/DVCHK/OVFLOW are also included.
            
           FIX's space allocation/de-allocation routines are included here as well as
           the routine to decode the initial FORTRAN parameter list.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
0          Referenced by comments of: 1002/28 
01002/019   FIX                      LIST_DIRECTED   SA  G          S1560 5.0T3 VLO FSNAME=FIX.LIST_DIRECTED.SA.019(1)          1098
            5.0T3  1098  FIX.LIST_DIRECTED.SA.019           1 LINE     72   21 PAGE UBC  BUCKLAND  TIFFANY   JUNE 29, 1979  14:46:31
            5.0T8   477                       
0          The module for implementing FTNH-X list-directed I/O. Control is passed to
1                                                                                               SUN SEP 08/96   15:24:55   Page  766
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          this routine from IBCOM# if a variable format which contains an "*" as the
           first character is detected.
            
           Provision is made to call this routine if using FTNX via the LDFIO# entry
           point, contained in IBCOM, for "true" list directed I/O. Both calls yield
           identical results.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
0          Referenced by comments of: 1002/28 
01002/020   FIX                      NAMELIST        SA  G          S1560 5.0T3 VLO FSNAME=FIX.NAMELIST.SA.020(1)               1099
            5.0T3  1099  FIX.NAMELIST.SA.020                1 LINE     91   27 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:37
            5.0T8   478                       
0          The module for implementing NAMELIST read and NAMELIST write statements.
            
           Two types of NAMELIST formats are supported - IBM fixed format and UBC's free
           format.
              1. IBM format is assumed (input) if "&" found in col. 2 of the first
                 record.
              2. FREE format is assumed otherwise. Blanks and commas serve as delimiters
                 in this case.
            
           Either format may be set via the appropriate SET command in FTNCMD.
            
           ------------------- May 1979 ---------------
            
           The following changes have been made to NAMELIST since the last distribution:
              1. The number of subscripts is now checked for correctness. Two new error
                 messages have been added for this purpose: too few subscripts
                 specified, too many specified.
              2. The output field width of real numbers has been increased to 16.8 from
                 16.7 to allow maximum values to be read in correctly.
            
            
           ****************************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
0          Referenced by comments of: 1002/28 
01002/021   FIX                      DEBUG           SA  G          S1560 5.0T3 VLO FSNAME=FIX.DEBUG.SA.021(1)                  1100
            5.0T3  1100  FIX.DEBUG.SA.021                   1 LINE     81   11 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:42
            5.0T8   479                       
0          The module for the FORTRAN DEBUG package which has been implemented in much
           the same manner as IBM. Exceptions are:
              1. When an output line must be saved then space is acquired for each
                 output line rather than in chunks and cramming.
1                                                                                               SUN SEP 08/96   15:24:55   Page  767
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             2. Undefined values are detected and printed as "U"'s.
              3. SUBTRACE feature extended to print the name of the routine.
              4. DISPLAY command uses a special entry point into NAMELIST to print the
                 data.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACRO LIBRARY (1002/12).
           ****************************************************************************
01002/022   FIX                      LLXU_FORTRAN    SA  G          S1560 5.0T3 VLO FSNAME=FIX.LLXU_FORTRAN.SA.022(1)           1101
            5.0T3  1101  FIX.LLXU_FORTRAN.SA.022            1 LINE     91   13 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:46:43
            5.0T8   480                       
0          The module for dynamic linking in FORTRAN written by UM.
            
           Depending on the setting of the merge flag in the loading call, FIX either
           obtains a fresh PSECT or uses the current one.
            
           Since UBC has not released the full calls to the system loader routines, only
           a subset of these calls are available to FORTRAN users. This option is
           controlled by the &LLXUX global symbol in copy section GLOBALS.
            
           ------------------- May 1979 ---------------
            
           The following changes have been made to LLXUF since the last distribution:
              1. Conditional assembly statements have been corrected to yield proper
                 code for those who use &LLXUX=1.
              2. LOADF return codes are now defined via a global SETC array to allow
                 each installation to have their own. Unfortunately, UBC had documented
                 them differently than UM and in fact, differently than implemented.
                 This led to 3 separate sets.
            
           Assemble using the FIX MACROS (1002/12).
0          Referenced by comments of: 1002/28 
01002/023   FIX                      ERROR_MONITOR   SA  G          S1560 5.0T3 VLO FSNAME=FIX.ERROR_MONITOR.SA.023(1)          1102
            5.0T3  1102  FIX.ERROR_MONITOR.SA.023           1 LINE     85  102 PAGE UBC  BUCKLAND  TIFFANY   JUNE 29, 1979  14:46:45
            5.0T8   481                       
0          The main part of the FORTRAN I/O error monitor. The error monitor is called
           via FTNCMD, user call, or from within FIX, error call. It is called initially
           by FIXINIT to set up the program interrupt exit unless one has already been
           set up.
            
           The subroutine DEFAULTS is called to initialize the default setting of
           undefined units. Whenever an error occurs, the table contained in the
           ERROR_TABLE is referenced to determine the actions required by this error.
            
           This should be the last module in the object file so that the determination
           of whether an interrupt occurred within FIX. IBCOM# should be the first one.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  768
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          ------------------- May 1979 ---------------
            
           The following changes have been made to FIODEBUG since the last distribution:
              1. The check for legal space has been made more rigorous so that programs
                 running in an unprotected system don't think that segment 0 is
                 addressable, e.g. virtual machines.
              2. SET SEMIFREE=ON/OFF has been added to allow turning off the default
                 "free-format" input.
              3. Abbreviations have been standardized.
              4. FTNCMD multiple substitution bug fixed.
              5. QUERY command returns FDname with trailing blank.
              6. The system now prints MAP/GRs/FPRs instead of ERRMON.
              7. A reasonable message is issued when intervening actions prevent
                 prompting for replacement of an input line with an error.
              8. A bug in the printing of a variable format in the debug output was
                 fixed.
            
           ********************************************************************
           Copies *GDINFODSECT (594) and *CNFGINFODSECT (654). Assemble using the FIX
           MACROS (1002/12).
           ********************************************************************
0          Referenced by comments of: 1002/28 
01002/024   FIX                      UNIT_DEFAULTS   SA  G          S1560 5.0T3 VLO FSNAME=FIX.UNIT_DEFAULTS.SA.024(1)          1103
            5.0T3  1103  FIX.UNIT_DEFAULTS.SA.024           1 LINE     49    1 PAGE UBC  BUCKLAND  TIFFANY   JUNE 29, 1979  14:47:00
            5.0T8   482                       
0          The subroutine to the error monitor to set unit defaults. The current status
           of this is to set the following defaults:
                  unit 5 - *SOURCE*
                  unit 6 - *SINK*
            
           ------------------- May 1979 ---------------
0          Referenced by comments of: 1002/28 
01002/025   FIX                      ERROR_TABLE     SA  G          S1560 5.0T3 VLO FSNAME=FIX.ERROR_TABLE.SA.025(1)            1104
            5.0T3  1104  FIX.ERROR_TABLE.SA.025             1 LINE     64    2 PAGE UBC  BUCKLAND  TIFFANY   JUNE 29, 1979  14:47:01
            5.0T8   483                       
0          The external error table, to allow adding/changing of errors without needing
           to re-assemble the whole error monitor.
            
           To change the action of one or more errors, make the appropriate change(s) to
           the error macro call in MACLIB and re-assemble this module.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACROS (1002/12).
           ****************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  769
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01002/026   FIX                      DUMP            SA  G          S1560 5.0T3 VLO FSNAME=FIX.DUMP.SA.026(1)                   1105
            5.0T3  1105  FIX.DUMP.SA.026                    1 LINE     72    7 PAGE UBC  O'REILLY  TIFFANY   DEC. 07, 1978  11:04:22
            5.0T8   484                       
0          SOURCE TO IMPLEMENT FORTRAN DUMP/PDUMP. RESIDES IN THE GENERAL LIBRARY AS IT
           IS NOT USED VERY MUCH.
0          Referenced by comments of: 1002/28 
01002/027   FIX                      LCS_SOURCE      SA  G          S1560 5.0T3 VLO FSNAME=FIX.LCS_SOURCE.SA.027(1)             1106
            5.0T3  1106  FIX.LCS_SOURCE.SA.027              1 LINE     84    1 PAGE UBC  STEVENS   TIFFANY   JUNE 29, 1979  14:47:02
            5.0T8   485                       
0          The source for generating the low core symbol table for all required FIX
           entry points. There is room at the end for an extra 12 entry points if
           required for patching purposes.
            
           ------------------- May 1979 ---------------
            
           ****************************************************************************
           Assemble using the FIX MACROS (1002/12).
           ****************************************************************************
01002/028A  FIX                      UM_UPDATES      UC  G          W062:FIX.UP                                                     
            5.1T2  1218  FIX.UM_UPDATES.UC.028              1 LINE     68    6 PAGE UBC  STEVENS   TIFFANY   JULY 23, 1983  14:32:39
0          This file contains UM'S updates to the various subcomponents of UBC'S FIX and
           the FIX MACRO LIBRARY. Current subcomponents which are updated include:
            
             1. MISCELLANEOUS   (1002/18)
             2. MACRO_LIBRARY   (1002/12)
             3. ERROR_MONITOR   (1002/23)
             4. UNIT_CONTROL    (1002/15)
             5. LLXU_FORTRAN    (1002/22)
            
           **********************************************************************
           D5.0B version:
            
             6. DUMP      (1002/26)
             7. FIODSCT   (1002/5)
             8. DEFAULTS  (1002/24)
             9. IBCOM     (1002/14)
            10. LISTDIV   (1002/19)
            11. NAMELIST  (1002/20)
            12. INIT      (1002/13)
           **********************************************************************
01003/001   TAPEAID                                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          This component, which is not currently installed at UM, is a general utility
           program for interactive manipulation of tapes.
1                                                                                               SUN SEP 08/96   15:24:55   Page  770
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01005/001   FREAD SUBR               FREAD#          SA  G          S1560 5.0T3 VLO FSNAME=FREAD_SUBR.FREAD#.SA.001(1)          1108
            5.0T3  1108  FREAD_SUBR.FREAD#.SA.001           1 LINE     77   52 PAGE UBC  STEVENS   TIFFANY   JUNE 15, 1977  09:37:11
            5.0T8   487                       
0          THIS IS THE REENTRANT PART OF FREAD, THE FREE FORMAT INPUT FACILITY.  COPIES
           THE FREAD.COPY COPY SECTION (1005/5) AND *GDINFODSECT (594).
0          Referenced by comments of: 1005/3, 1005/5 
01005/002   FREAD SUBR               FREAD#          OC  G          SEG2:FREAD                                                      
            5.0T3  1109  FREAD_SUBR.FREAD#.OC.002           1 LINE     80   11 PAGE UBC  STEVENS   TIFFANY   JULY 03, 1981  20:37:28
            5.0T8   488  SEG2:FREAD           
0          THIS OBJECT IS NORMALLY LOADED INTO SHARED VM AT IPL BY PISTLE.
01005/003   FREAD SUBR               FREAD           SA  G          S1560 5.0T3 VLO FSNAME=FREAD_SUBR.FREAD.SA.003(1)           1110
            5.0T3  1110  FREAD_SUBR.FREAD.SA.003            1 LINE     77    3 PAGE UBC  STEVENS   TIFFANY   MAY  12, 1977  16:17:34
            5.0T8   489                       
0          THIS IS THE NON-REENTRANT PART OF FREAD WHICH INTERFACES TO THE REENTRANT PART
           (1005/1).  COPIES THE FREAD.COPY COPY SECTION (1005/5).
0          Referenced by comments of: 1005/5 
01005/004   FREAD SUBR               FREAD           OC  G        # (PART OF *LIBRARY)                                              
                                                                                    UBC  STEVENS   TIFFANY                          
0          Object part of *LIBRARY (524/1)
01005/005   FREAD SUBR               FREAD.COPY      SA  G          S1560 5.0T3 VLO FSNAME=FREAD_SUBR.FREAD.COPY.SA.005(1)      1111
            5.0T3  1111  FREAD_SUBR.FREAD.COPY.SA.005       1 LINE     72    4 PAGE UBC  STEVENS   TIFFANY   JUNE 13, 1977  11:51:56
            5.0T8   490                       
0          COPY SECTION USED BY (1005/1) AND (1005/3).
0          Referenced by comments of: 1005/1, 1005/3 
01006/001   PRDSCT                                   SA             S1560 5.0T3 VLO FSNAME=PRDSCT..SA.001(1)                    1112
            5.0T3  1112  PRDSCT..SA.001                     1 LINE     83   21 PAGE UBC  STEVENS   TIFFANY   MAY  13, 1978  18:28:15
            5.0T8   491                       
0          Routine to print a formatted dump of a dsect.
            
           *****************************************************************************
           Should be assembled using the UBC Macros, which are no longer distributed by
           UM.  The version found on D4.0 tape D4T3, file 421 is the correct version to
           use.
           *****************************************************************************
01006/002   PRDSCT                                   OE             ETC:FIX.PRDSCT                                                  
            5.0T3  1113  PRDSCT..OE.002                     1 LINE   5843    3 PAGE UBC  STEVENS   TIFFANY   JULY 03, 1981  20:37:32
            5.0T8   492  ETC:FIX.PRDSCT       
1                                                                                               SUN SEP 08/96   15:24:55   Page  771
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01007/001   ROBJ                                                  # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           REPLACE OBJECT MODULES BY NAME.
01008/001   PATCH                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           PATCH OBJECT MODULES FREE-FORMAT OR REP RECORD INPUT.
01009/001   RUN                                                   # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           EXECUTE PROGRAMS FROM A LIBRARY OF PROGRAMS, SO THAT USERS NEED TO MAINTAIN
           ONLY A SINGLE FILE OF PROGRAMS.  THIS IN TURN DECREASES THE NUMBER OF FILES
           TO MAINTAIN AND REMEMBER.
01011/001   ALIST                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN 
           ASSEMBLY/FORTRAN LIST PROGRAM.
01012/001   UNITS                    D5.0 JOB PGM    SA  G          S1561 5.0T4 VLO FSNAME=UNITS.D5.0_JOB_PGM.SA.001(1)          554
            5.0T4   554  UNITS.D5.0_JOB_PGM.SA.001          1 LINE     80   36 PAGE UBC  BERRYMAN  MTA       AUG. 10, 1981  00:05:44
            5.0T11  128                       
0          JOB PROGRAM INTERFACE FOR THE UNITS JOB AND A SUBROUTINE CALLED BY IT AND ALSO BY
           THE MTS UNITS PROGRAM (1012/3).  COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087).
           ASSEMBLE USING DMPLST.MACROS (400/16).
0          Referenced by comments of: 490/1, 1012/4 
01012/002A  UNITS                    UPDATE          UC  G          MTA:UNITS.U                                                     
            5.1T2  1219  UNITS.UPDATE.UC.002                1 LINE    105    3 PAGE UBC  BERRYMAN  MTA       JULY 23, 1983  14:32:39
0          Update to bring D5.0 UNITS to current.
            
           ***************************************************************
           D5.0C version:
            
           Bug fixed.
           ***************************************************************
01012/003A  UNITS                    JOB PROGRAM     OC  G        # (PART OF RESIDENT SYSTEM)                                       
            D4T3    396  UNITS.JOB_PROGRAM.OC.002           1 LINE     80    6 PAGE UBC  BERRYMAN  MTA       JULY 29, 1977  00:11:35
0          Object part of Resident System (468).
0          Referenced by comments of: 1012/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  772
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01012/004A  UNITS                    MTS PROGRAM     SA  G          MTA:UNITS.MTS.S                                                 
            5.1T2  1220  UNITS.MTS_PROGRAM.SA.004           1 LINE     69    3 PAGE UBC  BERRYMAN  MTA       JULY 23, 1983  14:32:40
0          MTS PROGRAM TO FORMAT PARAMETERS AND CALL THE UNITS SUBROUTINE (1012/1).
01012/005A  UNITS                    MTS PROGRAM     OE  G          MTA:UNITS.O                                                     
            5.1T2  1221  UNITS.MTS_PROGRAM.OE.005           1 LINE   1119    2 PAGE UBC  BERRYMAN  MTA       JULY 23, 1983  14:32:40
                         MTA.:UNITS.O         
0          MUST BE RUN WITH PROT=OFF UNLESS A SET OF TABLES IS CONCATENATED WITH IT.
01012/006A  UNITS                    WRITEUP         WF             MTA:UNITS.W                                                     
            5.1T2  1222  UNITS.WRITEUP.WF.006               1 LINE     72    3 PAGE UBC  BERRYMAN  MTA       JULY 23, 1983  14:32:40
0          Description of input to UNITS and most messages it prints.
01014/001   MARKIV                                                # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A DATA
           MANAGEMENT REPORT GENERATION PROGRAM.
01015/001   ROTOF                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO
           REORDER LINES IN A SEQUENTIAL FILE AND TO REORDER FILES ON A TAPE.
01016/001   STEVENS MACRO LIB                        SM             S1560 5.0T3 VLO FSNAME=STEVENS_MACRO_LIB..SM.001(1)         1114
            5.0T3  1114  STEVENS_MACRO_LIB..SM.001          1 LINE     73   20 PAGE UBC  STEVENS   DWB       AUG. 30, 1978  22:42:26
            5.0T8   493                       
0          MACROS NEEDED BY *APC (496).
01019/001A  RAMROD                   SR BASE         SA  G          MTS:RAMROD.SR.50                                                
            5.1T2  1223  RAMROD.SR_BASE.SA.001              1 LINE     72   53 PAGE UBC  MTA                 JULY 23, 1983  14:32:41
0          Base source for service routines for RAMROD. Assemble using RAMROD
           MACROS (1019/10) and COPY:MTS.MACROS (344/3). Copies *CNFGINFODSECT
           (654).
0          Referenced by comments of: 596/1, 1019/2, 1019/3, 1019/11 
01019/002A  RAMROD                   SR SOU          SA  G          MTS:RAMROD.SR.S                                                 
            5.1T2  1224  RAMROD.SR_SOU.SA.002               1 LINE     80   61 PAGE UBC  MTA                 JULY 23, 1983  14:32:44
0          Current source for service routines. Obtained by applying updates
           (1019/3) to base source (1019/1).
0          Referenced by comments of: 1019/3 
1                                                                                               SUN SEP 08/96   15:24:55   Page  773
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01019/003C  RAMROD                   SR UPD          UC  G          MTS:RAMROD.SR.U                                                 
            5.1T2  1225  RAMROD.SR_UPD.UC.003               1 LINE    100   11 PAGE UBC  MTA                 JULY 23, 1983  14:32:47
0          Updates to apply to base source (1019/1) to obtain current source
           (1019/2) for service routines.
0          Referenced by comments of: 1019/2 
01019/004A  RAMROD                   SR OBJ          OC  G          MTS:RAMROD.SR.O                                                 
            5.1T2  1226  RAMROD.SR_OBJ.OC.004               1 LINE     80   27 PAGE UBC  MTA                 JULY 23, 1983  14:32:47
01019/005A  RAMROD                   INTERPRET BASE  SA  G          MTS:RAMROD.CS.50                                                
            5.1T2  1227  RAMROD.INTERPRET_BASE.SA.005       1 LINE     80   88 PAGE UM   MTA                 JULY 23, 1983  14:32:49
0          Source for the RAMROD command language interpreter. Requires the
           existence of a file, presently named MTS:RAMRODLOG (1019/17) by
           default, but setable, which is permitted at least write-extend for its
           transaction log. It also requires an explain file (1019/12). All
           filenames of this sort are assembly parameters. Copies *GFINFODSECT
           (593) and *GDINFODSECT (594). Assemble using RAMROD.MACROS (1019/10).
0          Referenced by comments of: 1019/6, 1019/7, 1019/11 
01019/006A  RAMROD                   INTERPRET SOU   SA  G          MTS:RAMROD.CS.S                                                 
            5.1T2  1228  RAMROD.INTERPRET_SOU.SA.006        1 LINE     79   99 PAGE UM   MTA                 JULY 23, 1983  14:32:53
0          Current source for INTERPRET. Obtained by applying updates (1019/7) to
           base source (1019/5).
0          Referenced by comments of: 1019/7 
01019/007C  RAMROD                   INTERPRET UPD   UC  G          MTS:RAMROD.CS.U                                                 
            5.1T2  1229  RAMROD.INTERPRET_UPD.UC.007        1 LINE    102   11 PAGE UM   MTA                 JULY 23, 1983  14:32:57
0          Update to apply to base source (1019/5) to obtain current source (1019/6)
           for INTERPRET.
0          Referenced by comments of: 1019/6 
01019/008A  RAMROD                   INTERPRET OBJ   OC  G          MTS:RAMROD.CS.O                                                 
            5.1T2  1230  RAMROD.INTERPRET_OBJ.OC.008        1 LINE     80   48 PAGE UM   MTA                 JULY 23, 1983  14:32:58
01019/009A  RAMROD                   GSFS                G          MTS:RAMROD.GSFS                                                 
            5.1T2  1231  RAMROD.GSFS..009                   1 LINE     93    4 PAGE UBC  MTA                 JULY 23, 1983  14:33:00
                         MTS:RAMROD.GSFS      
0          Source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands
           (lines 0 - .999) for interface to GETSPACE/FREESPACE that allows
           multiple segment requests. Copies *CNFGINFODSECT (654).
            
           **********************************************************************
           D5.0B version:
            
           Minor bug fixed.
1                                                                                               SUN SEP 08/96   15:24:55   Page  774
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          **********************************************************************
            
           **********************************************************************
           D5.1 version:
            
           Now contains source (lines 1000 - *L), object (lines 1 - 999) and
           $SOURCE commands.
           **********************************************************************
0          Referenced by comments of: 67/3, 67/4, 1079/1 
01019/010A  RAMROD                   MACROS          SM  G          MTS:RAMROD.MACS                                                 
            5.1T2  1232  RAMROD.MACROS.SM.010               1 LINE     72    4 PAGE UBC  MTA                 JULY 23, 1983  14:33:00
0          These macros and copy sections are used for both the command language interpreter
           and the service module.
0          Referenced by comments of: 1019/1, 1019/5, 1019/13 
01019/011A  RAMROD                   OBJECT          OC  G          MTS:RAMROD                                                      
            5.1T2  1233  RAMROD.OBJECT.OC.011               1 LINE  32767   20 PAGE UBC  MTA                 JULY 23, 1983  14:33:00
                         MTS.:RAMROD          
0          Contains the linkedited object for the command language interpreter (1019/5)
           and the service module (1019/1).  Use (1019/18) and (1019/19) to
           produce RAMROD.
01019/012A  RAMROD                   EXPLAIN         M              MTS:RAMRODEXP                                                   
            5.1T2  1234  RAMROD.EXPLAIN.M.012               1 LINE     81    3 PAGE UBC  MTA                 JULY 23, 1983  14:33:01
                         MTS.:RAMRODEXP       
0          Explain file for RAMROD.  As distributed, RAMROD expects this file to be
           named MTS:RAMRODEXP.  NOTE:  Line numbers in this file are important and
           the file starts at line 0.
0          Referenced by comments of: 1019/5 
01019/013A  RAMROD                   DUMP                G          MTS:RAMROD.DMP                                                  
            5.1T2  1235  RAMROD.DUMP..013                   1 LINE    123   15 PAGE UBC  MTA                 JULY 23, 1983  14:33:02
                         MTS.:RAMROD.DMP      
0          Source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE
           commands(lines 0 - .999) for RAMROD file directory dump program.
           Assemble using RAMROD macros (1019/10).
            
           **********************************************************************
           D5.1 version:
            
           Now contains source (lines 1000 - *L), object (lines 1 - 999) and
           $SOURCE commands.
           **********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  775
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01019/014A  RAMROD                   NOTEPOINT           G          MTS:RAMROD.NP                                                   
            5.1T2  1236  RAMROD.NOTEPOINT..014              1 LINE    103    4 PAGE UBC  MTA                 JULY 23, 1983  14:33:02
0          Source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands
           (lines 0 - .999) for module to process note/point information for
           sequential ROD files.
            
           **********************************************************************
           D5.1 version:
            
           Now contains source (lines 1000 - *L), object (lines 1 - 999) and
           $SOURCE commands.
           **********************************************************************
01019/015A  RAMROD                   INTRO           WF             S0999 5.0AT1 VLO FSNAME=RAMROD.INTRO.WF.014(1)               693
            5.1T2  1237  RAMROD.INTRO.WF.015                1 LINE     79    4 PAGE UBC  MTA                 MAR. 22, 1976  14:33:16
0          Introduction to RAMROD and IPL READER (1021).  Relevant mainly to installations
           converting from pre-IPLREADER versions of RAMROD.
0          Referenced by comments of: 1021/1 
01019/016A  RAMROD                   WRITEUP         WF             MTS:RAMROD.W                                                    
            5.1T2  1238  RAMROD.WRITEUP.WF.016              1 LINE    145   11 PAGE UBC  MTA                 JULY 23, 1983  14:36:11
                         MTS.:RAMROD.W        
0          Writeup describing the RAMROD utility.
            
           **********************************************************************
           D5.1 version:
            
           Updated for D5.1.
           **********************************************************************
01019/017A  RAMROD                   MTS:RAMRODLOG   D            # MTS:RAMRODLOG                                                   
                                                                                    UBC  MTA                                        
                         MTS:RAMRODLOG@E      
0          RAMROD log file.
0          Referenced by comments of: 1019/5 
01019/018C  RAMROD                   COMPILE         C              MTS:RAMROD.COMPILE                                              
            5.1T2  1239  RAMROD.COMPILE.C.018               1 LINE    118    1 PAGE UM   MTA                 JULY 23, 1983  14:36:12
0          $SOURCE file to compile components and apply updates.
0          Referenced by comments of: 1019/11 
01019/019C  RAMROD                   LINK            C              MTS:RAMROD.LINK                                                 
            5.1T2  1240  RAMROD.LINK.C.019                  1 LINE     95    1 PAGE UM   MTA                 JULY 23, 1983  14:36:13
0          $SOURCE file to linkedit and install a new version of RAMROD. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  776
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1019/11 
01020/001   FILE MOVE                                SA  G          FILE:FM.S                                                       
            5.0T3  1125  FILE_MOVE..SA.001                  1 LINE    106   12 PAGE UBC  HOGG      HELFFRICH AUG. 06, 1981  05:44:34
            5.0T8   504  FILE:FM.S            
0          Program to move files from a production file system to a test pack.  See
           the description of this program in (682/7).  Assemble using COPY:FILE.MACROS
           (482/45). Copies *CNFGINFODSECT (654).
0          Referenced by comments of: 461/26, 682/7, 3024/37, 3024/40 
01020/002   FILE MOVE                                OC  G          FILE:FM                                                         
            5.0T3  1126  FILE_MOVE..OC.002                  1 LINE   5498    5 PAGE UBC  HOGG      HELFFRICH AUG. 06, 1981  05:44:40
            5.0T8   505  FILE:FM              
01021/001   IPL READER               5.0 IPLBOOT     SA  G          S1561 5.0T4 VLO FSNAME=IPL_READER.5.0_IPLBOOT.SA.001(1)      559
            5.0T4   559  IPL_READER.5.0_IPLBOOT.SA.001      1 LINE     80   32 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:25
            5.0T11  133                       
0          SEE COMP (1019/15) FOR AN INTRODUCTORY WRITEUP ON RAMROD AND THE IPL READER.
            
           THIS IS A BOOTSTRAP PROGRAM FOR THE IPLREADER.  COPIES COPY:GLOBALS (1026/3),
           COPY:LLMPSEQU (087), AND COPY:PSA (162).  ASSEMBLE USING COPY:SETPARM (653) AND
           COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 4/5, 1019/15, 1021/7 
01021/002   IPL READER               IPLBOOT UPD     UC  G          MTS:IPLBOOT.S(*F,-1)                                            
            5.0T4   560  IPL_READER.IPLBOOT_UPD.UC.002      1 LINE     72   10 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:26
            5.0T11  134  MTS:IPLBOOT.S        
0          UPDATE TO PRODUCE THE CURRENT VERSION OF IPLBOOT, BASED ON THE D4.2 SOURCE.
01021/003   IPL READER               IPLBOOT         OC  G          MTS:IPLBOOT.O                                                   
            5.0T4   561  IPL_READER.IPLBOOT.OC.003          1 LINE     80    3 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:31
            5.0T11  135  MTS.:IPLBOOT.O       
01021/004   IPL READER               5.0 IPLREAD     SA  G          S1561 5.0T4 VLO FSNAME=IPL_READER.5.0_IPLREAD.SA.004(1)      562
            5.0T4   562  IPL_READER.5.0_IPLREAD.SA.004      1 LINE     80  116 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:34
            5.0T11  136                       
0          MAIN PART OF IPL READER.  COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND
           COPY:PSA (162).  ASSEMBLE USING COPY:SETPARM (653) AND COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 1021/7 
01021/005   IPL READER               IPLREAD UPD     UC  G          MTS:IPLREAD.S(*F,-1)                                            
            5.0T4   563  IPL_READER.IPLREAD_UPD.UC.005      1 LINE     76    9 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:37
            5.0T11  137  MTS:IPLREAD.S        
0          UPDATE TO PRODUCE THE CURRENT VERSION OF IPLREAD, BASED ON THE D4.2 SOURCE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  777
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01021/006   IPL READER               IPLREAD         OC  G          MTS:IPLREAD.O                                                   
            5.0T4   564  IPL_READER.IPLREAD.OC.006          1 LINE     80    9 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:45
            5.0T11  138  MTS.:IPLREAD.O       
01021/007   IPL READER               5.0 IPLINIT     SA  G          S1561 5.0T4 VLO FSNAME=IPL_READER.5.0_IPLINIT.SA.007(1)      565
            5.0T4   565  IPL_READER.5.0_IPLINIT.SA.007      1 LINE     80   29 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:06:47
            5.0T11  139                       
0          PROGRAM TO WRITE IPLBOOT (1021/1), IPLREAD (1021/4), AND UMLOAD (001/1) ON A
           DISK OR TAPE IN SELF LOADING FORM. COPIES *GDINFODSECT (594). ASSEMBLE USING
           COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 1021/10 
01021/008A  IPL READER               IPLINIT UPD     UC  G          MTS:IPLINIT.S(*F,-1)                                            
            5.1T2  1241  IPL_READER.IPLINIT_UPD.UC.008      1 LINE     72   11 PAGE UBC  O'REILLY  MTA       JULY 23, 1983  14:36:13
                         MTS.:IPLINIT.S       
0          UPDATE TO PRODUCE THE CURRENT VERSION OF IPLINIT, BASED ON THE D4.0 SOURCE.
01021/009A  IPL READER               IPLINIT         OC  G          MTS:IPLINIT.O                                                   
            5.1T2  1242  IPL_READER.IPLINIT.OC.009          1 LINE     80   10 PAGE UBC  O'REILLY  MTA       JULY 23, 1983  14:36:14
                         MTS.:IPLINIT.O       
0          OBJECT REQUIRES IPLGTUM (1021/10) AND RSTR:VTOCREAD (067/11) TO RUN.  MUST
           BE RUN WITH PROT=OFF. 
01021/010   IPL READER               IPLGTUM         SA  G          S1561 5.0T4 VLO FSNAME=IPL_READER.IPLGTUM.SA.010(1)          568
            5.0T4   568  IPL_READER.IPLGTUM.SA.010          1 LINE     72    3 PAGE UBC  O'REILLY  MTA       JULY 29, 1977  00:14:25
            5.0T11  142                       
0          SUBROUTINE TO LOAD UMLOAD (001/1) FOR IPLINIT (1021/7).
0          Referenced by comments of: 1021/9 
01021/011   IPL READER               IPLGTUM         OC  G          MTS:IPLGTUM.O                                                   
            5.0T4   569  IPL_READER.IPLGTUM.OC.011          1 LINE     80    1 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:10:00
            5.0T11  143  MTS.:IPLGTUM.O       
01021/012A  IPL READER               WRITEUP         WF             MTS:IPLREAD.W                                                   
            5.1T2  1243  IPL_READER.WRITEUP.WF.012          1 LINE     71    8 PAGE UBC  O'REILLY  MTA       JULY 23, 1983  14:36:15
                         MTS.:IPLREAD.W       
0          DESCRIPTION OF IPL READER.
01023/001A  MSG ROUTINE                              SA             W267:MSG.S                                                      
            5.1T2  1244  MSG_ROUTINE..SA.001                1 LINE     80   62 PAGE UBC  SAYLE     EADIE     JULY 23, 1983  14:36:15
0          Source for MSG routine. This is a reentrant general-purpose message routine
           with a variety of features. The routine is mainly designed to be used with
           macros and is designed to be resident. Consequently, it references CMDSUB
           rather than CMD and ZWRITEE rather than WRITE etc. For non-resident use, all
           that must be done is to change these references to their external
           counterparts.
1                                                                                               SUN SEP 08/96   15:24:55   Page  778
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
              Assemble using *SYSMAC
                             OLD:CC.MACROS (1054/4). 
              COPY's         *LOADINFODSECT (001/4).
0          Referenced by comments of: 1/5, 101/3 
01023/002A  MSG ROUTINE                              OC           # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UBC  SAYLE     EADIE                            
0          Object part of Resident System (468).
01023/003   MSG ROUTINE              PICTURE         SA  G          S1560 5.0T3 VLO FSNAME=MSG_ROUTINE.PICTURE.SA.003(1)        1128
            5.0T3  1128  MSG_ROUTINE.PICTURE.SA.003         1 LINE     72    6 PAGE UBC  SAYLE     EADIE     JULY 03, 1981  20:46:08
            5.0T8   507                       
0          "PICTURE" PROCESSING CSECT FOR MSG ROUTINE.
           ASSEMBLE USING *SYSMAC AND OLD:CC.MACROS (1054/4).
01024/001   UBC MACROS                               SM           # (NOT DISTRIBUTED)                                               
            D4T3    421  UBC_MACROS..SM.                    1 LINE     73   10 PAGE UBC  STEVENS             JULY 29, 1977  00:14:36
0          UBC COMPUTING CENTRE STAFF MACRO LIBRARY. THIS COMPONENT IS NOT DISTRIBUTED
           BY UM.
01025/001   LCS_PRINTER                                           # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE
           WHICH ALLOWS ONE TO LIST THE CONTENTS OF VARIOUS LOW-CORE SYMBOL TABLES.
01026/001A  GLOBAL SYSTEM PARS       GLOBALDEFS      SA  G          COPY:GLOBALDEFS                                                 
            5.1T2  1245  GLOBAL_SYSTEM_PARS.GLOBAL.SA.001   1 LINE     80    2 PAGE UM   MTA                 JULY 23, 1983  14:36:18
                         COPY:GLOBALDEFS      
0          CONTAINS GBL DEFINITIONS FOR:
            
                  &S370       SYSTEM/370 -- MUST BE ON
                  &OC3066     3066 CONSOLE PRESENT
                  &CRTY       ITEL 7830 COMMAND RETRY -- MUST BE OFF
                  &SIMPLEX    SINGLE PROCESSOR -- MUST BE ON
                  &OPERJOB    OPERATOR JOB BEING USED
                  &PROT       PROTECTION
                  &AMD470     AMDAHL 470
                  &BLKMPX     BLOCK MULTIPLEXOR CHANNEL -- MUST BE ON
                  &IO370      370 I/O INSTRUCTIONS -- MUST BE ON
                  &NOSLT      NO SEARCH LIST INSTRUCTION -- MUST BE ON
                  &OMR        2501 OMR FEATURE
                  &JTBLPOL    POOL ENTRIES IN JOB TABLE
                  &DTBLPOL    POOL ENTRIES IN DEVICE TABLE
                  &LFILENM    LENGTH OF FILE NAMES
                  &NDC        NO DATA CELL
                  &SPELC      SPELLING CORRECTION
                  &SPELCP     SPELLING CORRECTION PROMPT
1                                                                                               SUN SEP 08/96   15:24:55   Page  779
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                 &BRCPRNT    BATCH RC PRINT
                  &TRCPRNT    TERM RC PRINT
                  &BEBM       DEFAULT BATCH EXEC BEGINS MSG
                  &BETM       DEFAULT BATCH EXEC TERM MSG
                  &TEBM       DEFAULT TERM EXEC BEGINS MSG
                  &TETM       DEFAULT TERM EXEC TERM MSG
                  &INSTALL    THE INSTALLATION'S SHARE CODE
                  &SYSPROJ    INITIAL SUBSTRINGS FOR THOSE PROJECTS
                              THAT BELONG TO SYSTEM PROGRAMMERS.
                  &IPLPROJ    INITIAL SUBSTRINGS FOR THOSE PROJECTS 
                              FOR WHICH THE ACCOUNTING RECORD 
                              IN USE BIT CAN BE IGNORED.
                  &UQVNTPT    ON IF USING UQV NOTE/POINT FORMAT
                              FOR SEQUENTIAL FILES
                  &TTALLY     ON TO GET SYSTEM TIME TALLY
                  &OLTEPATN   ON TO GET OLTEP ATTENTION KLUDGE
                              IN UMMPS
0          Referenced by comments of: 42/1, 45/1, 101/1, 116/1, 135/1, 400/1, 545/3, 570/1, 653/1, 829/1 
01026/002A  GLOBAL SYSTEM PARS       GLOBALSETS      SA  G          COPY:GLOBALSETS                                                 
            5.1T2  1246  GLOBAL_SYSTEM_PARS.GLOBAL.SA.002   1 LINE     80    1 PAGE UM   MTA                 JULY 23, 1983  14:36:18
                         COPY:GLOBALSETS      
0          THIS FILE DEFINES VALUES FOR THE SYMBOLS IN GLOBALDEFS AS APPROPRIATE FOR THE UM AMDAHL
           470 VERSION OF MTS.
0          Referenced by comments of: 42/1, 45/1, 101/1, 116/1, 135/1, 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8, 387/27,
                 387/30, 387/32, 387/35, 400/1, 545/3, 570/1, 806/1, 829/1, 1070/1 
01026/003   GLOBAL SYSTEM PARS       GLOBALS         SA  G          COPY:GLOBALS                                                    
            5.0T3  1131  GLOBAL_SYSTEM_PARS.GLOBAL.SA.003   1 LINE     37    1 PAGE UM   MTA                 JULY 03, 1981  20:46:10
            5.0T8   510  COPY:GLOBALS         
0          CONTAINS:  $CONTINUE WITH COPY:GLOBALDEFS RETURN
                      $CONTINUE WITH COPY:GLOBALSETS RETURN
0          Referenced by comments of: 5/1, 7/1, 8/1, 9/1, 9/3, 10/1, 19/1, 21/1, 24/1, 40/1, 44/1, 46/1, 79/1, 80/1, 87/1,
                 162/1, 198/1, 353/2, 354/1, 354/5, 388/1, 399/1, 400/5, 400/15, 413/1, 464/1, 482/4, 482/7, 500/51, 507/2,
                 509/1, 513/1, 531/1, 531/8, 539/1, 540/1, 540/3, 540/6, 540/8, 540/10, 540/12, 540/17, 540/26, 545/15, 554/1,
                 554/3, 577/1, 577/3, 577/8, 577/11, 578/1, 579/1, 600/1, 615/15, 615/17, 621/2, 629/4, 631/16, 634/1, 634/3,
                 635/1, 636/1, 637/1, 638/1, 639/1, 642/16, 647/1, 651/13, 682/24, 685/5, 693/1, 731/3, 732/1, 770/1, 777/1,
                 787/19, 798/75, 818/1, 866/1, 1012/1, 1021/1, 1021/4, 1079/18, 1081/1, 1081/12, 1081/13, 1081/14, 1081/15,
                 1081/16, 3024/1, 4000/1 
01027/001   P11 JOB                                  SA  G          S1560 5.0T3 VLO FSNAME=P11_JOB..SA.001(1)                   1132
            5.0T3  1132  P11_JOB..SA.001                    1 LINE     70    2 PAGE UBC            MTA       JAN. 19, 1981  22:18:38
            5.0T8   511                       
0          JOB PROGRAM TO LOAD THE CHARACTER AND CARRIAGE CONTROL BUFFERS OF A 3211
           PRINTER FOR THE P11 PRINT TRAIN.  LOADS FCB FOR 6 LINES PER INCH ON 11
           INCH PAPER UNLESS THE "8LPI" PARAMETER IS GIVEN, IN WHICH CASE IT LOADS
           FOR 8 LINES PER INCH ON 8.5 INCH PAPER.
1                                                                                               SUN SEP 08/96   15:24:55   Page  780
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 819/1 
01027/002   P11 JOB                                  OC  G        # (PART OF RESIDENT SYSTEM)                                       
            D4T3    427  P11_JOB..OC.002                    1 LINE     80    1 PAGE UBC            MTA       MAR. 15, 1975  16:00:44
0          Object part of Resident System (468).
01028/001   STAND-ALONE DUMP         IPL MODULE      SA             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.IPL_MODU.SA.001(1)  1133
            5.0T3  1133  STAND-ALONE_DUMP.IPL_MODU.SA.001   1 LINE     72    5 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:44:58
            5.0T8   512                       
0          ASSEMBLER SOURCE FOR STAND-ALONE DUMP PROGRAM. THIS VERSION, JAN 1977,
           REPLACES THE PREVIOUS VERSION, WHICH WAS FROM IBM. THE SOURCE INCLUDES
           INSTRUCTIONS FOR GENERATING AN IPL-ABLE STAND-ALONE DUMP TAPE FROM THE
           OBJECT. THE DUMPS PRODUCED BY THIS PROGRAM ARE FORMATTED DIFFERENTLY FROM
           THOSE PRODUCED BY THE IBM STAND-ALONE DUMP PROGRAM. A VERSION OF THE
           STAND-ALONE DUMP PRINT PROGRAM THAT SUPPORTS THIS NEW FORMAT IS INCLUDED IN
           (1028/3) THROUGH (1028/9).
            
           NOTE: THIS PROGRAM HAS NEVER BEEN USED AT UM. IT WON'T WORK ON A MACHINE WITH
           16 MEGABYTES OF REAL MEMORY.
0          Referenced by comments of: 1028/2 
01028/002   STAND-ALONE DUMP         IPL MODULE      OC             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.IPL_MODU.OC.002(1)  1134
            5.0T3  1134  STAND-ALONE_DUMP.IPL_MODU.OC.002   1 LINE     80    1 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:00
            5.0T8   513                       
0          OBJECT FOR THE STAND-ALONE DUMP PROGRAM.  THIS IS THE ASSEMBLER OUTPUT,
           UN-DIDDLED FOR IPL'ING FROM.  SEE (1028/1) FOR DIDDLING INSTRUCTIONS.
01028/003   STAND-ALONE DUMP         MAIN            SP             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.MAIN.SP.003(1)      1135
            5.0T3  1135  STAND-ALONE_DUMP.MAIN.SP.003       1 LINE     88    4 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:01
            5.0T8   514                       
0          PL/1 SOURCE FOR MAIN PROGRAM OF STAND-ALONE DUMP PRINTER.  COMPLETE PROGRAM
           CONSISTS OF THE MAIN PROGRAM, THE PL/1-TO-PRTRACE INTERFACE PSD.PT, A
           VERSION OF PRTRACE (337) OF YOUR CHOICE, AND THE TIME-CONVERTING SUBROUTINE
           PSD.CT.  A COMPLETE LINKEDITED LOAD MODULE IS IN (1028/9).
0          Referenced by comments of: 1028/1 
01028/004   STAND-ALONE DUMP         MAIN            OC             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.MAIN.OC.004(1)      1136
            5.0T3  1136  STAND-ALONE_DUMP.MAIN.OC.004       1 LINE     80    9 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:06
            5.0T8   515                       
01028/005   STAND-ALONE DUMP         PSD.PT          SA             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.PT.SA.005(1)    1137
            5.0T3  1137  STAND-ALONE_DUMP.PSD.PT.SA.005     1 LINE     61    1 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:03
            5.0T8   516                       
0          SOURCE FOR THE PL/1-TO-PRTRACE INTERFACE FOR THE STAND-ALONE DUMP PRINT PROGRAM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  781
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01028/006   STAND-ALONE DUMP         PSD.PT          OC             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.PT.OC.006(1)    1138
            5.0T3  1138  STAND-ALONE_DUMP.PSD.PT.OC.006     1 LINE     80    1 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:09
            5.0T8   517                       
01028/007   STAND-ALONE DUMP         PSD.CT          SA             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.CT.SA.007(1)    1139
            5.0T3  1139  STAND-ALONE_DUMP.PSD.CT.SA.007     1 LINE     72    1 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:04
            5.0T8   518                       
0          SOURCE FOR THE TIME-CONVERTING SUBROUTINE USED BY THE STAND-ALONE DUMP PRINTER.
01028/008   STAND-ALONE DUMP         PSD.CT          OC             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.CT.OC.008(1)    1140
            5.0T3  1140  STAND-ALONE_DUMP.PSD.CT.OC.008     1 LINE     80    1 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:12
            5.0T8   519                       
01028/009   STAND-ALONE DUMP         COMPLETE PROG   OE             S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.COMPLETE.OE.009(1)  1141
            5.0T3  1141  STAND-ALONE_DUMP.COMPLETE.OE.009   1 SEQ   10118    8 PAGE UBC  O'REILLY  MTA       JAN. 31, 1977  10:45:13
            5.0T8   520                       
0          LINKEDITED VERSION OF THE STAND-ALONE-DUMP PRINT PROGRAM INCLUDING ALL THE
           REQUIRED JUNK AND A $CONTINUE WITH *PL1LIB.
0          Referenced by comments of: 1028/1, 1028/3 
01030/001   PACK MAP                 BASE SOURCE     SA  G          FILE:PM(*F,-1)                                                  
            5.0T3  1142  PACK_MAP.BASE_SOURCE.SA.001        1 LINE     80   26 PAGE UBC  O'REILLY  HELFFRICH JULY 03, 1981  20:47:24
            5.0T8   521  FILE:PM              
0          PROGRAM TO PRINT COMPLETE MAP OF A PAGE-FORMATTED DISK PACK.  FOR INSTRUCTIONS
           ON USAGE, SEE COMMENTS AT BEGINNING OF THE SOURCE. CALLS VTOCREAD (067/11) 
           AND THE SORT SUBROUTINE (303/5).  ASSEMBLE USING COPY:FILE.MACROS (482/45).
           SEE COMP (682/3) FOR A WRITEUP.
0          Referenced by comments of: 682/3, 1030/2 
01030/002A  PACK MAP                 UPDATE          UC  G          FILE:PM(1000)                                                   
            5.1T2  1247  PACK_MAP.UPDATE.UC.002             1 LINE     70    1 PAGE UBC  O'REILLY  HELFFRICH JULY 23, 1983  14:36:19
0          UPDATE DECK FOR (1030/1) TO YIELD CURRENT SOURCE.
01030/003A  PACK MAP                                 OC  G          FILE:PM(0,999)                                                  
            5.1T2  1248  PACK_MAP..OC.003                   1 LINE     82    5 PAGE UBC  O'REILLY  HELFFRICH JULY 23, 1983  14:36:20
0          OBJECT FOR PACKMAP. CONTAINS "$CONTINUE WITH RSTR:VTOCREAD+COPY:SYSDEFS"
           (067/11) AND (579/3) RECORD.
01031/001   FO                                                    # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE "FILE
           OPTIMIZER" PROGRAM, WHICH WAS WRITTEN TO OPTIMIZE THE AMOUNT OF FILE SPACE
           USED BY A FILE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  782
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01032/001   BCPL                     INSTALL_GUIDE   P   O          S1560 5.0T3 VLO FSNAME=BCPL.INSTALL_GUIDE.P.001(1)          1145
            5.0T3  1145  BCPL.INSTALL_GUIDE.P.001           1 LINE     79    1 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:01:38
            5.0T9     1                       
0          THIS VERSION OF BCPL, WRITTEN AT UNE, IS DERIVED FROM A RECENT VERSION OF THE
           CAMBRIDGE COMPILER. THE LIBRARY HAS BEEN COMPLETELY REWRITTEN ALMOST ENTIRELY
           IN BCPL, AND INCLUDES VARIOUS MTS-SPECIFIC FEATURES SUCH AS ACCESS TO LINE
           NUMBERS.
            
           THIS COMPILER CAN GENERATE AN INTERNAL SYMBOL TABLE, WHICH IS USED BY A
           LIBRARY POST-MORTEM ROUTINE TO GIVE SYMBOLIC DUMPS.
            
           VARIOUS UTILITIES ARE PROVIDED, SUCH AS A SOURCE RE-FORMATTER, TIDY
           (1032/16), A CROSS-REFERENCE PROGRAM (1032/18) THAT HANDLES SCOPES CORRECTLY,
           AND AN INTERACTIVE DEBUGGING SYSTEM (1032/12).
            
           THE INSTALLATION GUIDE (1032/1) TELLS HOW TO INSTALL AND RECOMPILE THE
           VARIOUS SUBCOMPONENTS OF THE SYSTEM.
            
           See the NOTE (1032/23) describing the partial fix to the problem caused
           by the movement of the MTS user memory segment from 6 to 8.
0          Referenced by comments of: 1032/1 
01032/002   BCPL                     CHANGELOG       P   O          S1560 5.0T3 VLO FSNAME=BCPL.CHANGELOG.P.002(1)              1146
            5.0T3  1146  BCPL.CHANGELOG.P.002               1 LINE     74    1 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:02:20
            5.0T9     2                       
0          A CHRONOLOGICAL LIST OF CHANGES TO THE UNE BCPL SYSTEM.  (THIS IS ONE OF 
           THE COMPONENTS SENT FROM UNE, AND DETAILS THE CHANGES THAT WERE MADE
           AT NEWCASTLE, NOT THE CHANGES MADE AT UM.)
01032/003   BCPL                     COMMENTS        P              S1560 5.0T3 VLO FSNAME=BCPL.COMMENTS.P.003(1)               1147
            5.0T3  1147  BCPL.COMMENTS.P.003                1 LINE     66    1 PAGE UM   UNSP                DEC. 08, 1979  20:00:45
            5.0T9     3                       
0          A BRIEF DESCRIPTION OF THE CHANGES BETWEEN UNE AND UM (MOSTLY FILENAMES).
01032/004   BCPL                     INSTALL         C              S1560 5.0T3 VLO FSNAME=BCPL.INSTALL.C.004(1)                1148
            5.0T3  1148  BCPL.INSTALL.C.004                 1 LINE     94    3 PAGE UM   UNSP                DEC. 08, 1979  20:00:49
            5.0T9     4                       
0          THE COMMANDS USED TO INSTALL BCPL AT UM.
01032/005   BCPL                     COMPILER        S   O          UNSP:BCPL.COMPILER                                              
            5.0T3  1149  BCPL.COMPILER.S.005                1 LINE    117   48 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:01:42
            5.0T9     5                       
0          CONTAINS ALL THE COMPILER MODULES (WRITTEN IN BCPL), AND THEIR
           ASSOCIATED HEADER FILES, AS A 'PDS' WHERE LINES 1-99 CONTAIN
           THE MODULE NAME, AND THE CORRESPONDING LINE NUMBER RANGE FOR THE SOURCE.
            
           TO COMPILE, THE HEADER FILES MUST BE EXTRACTED INTO REAL MTS FILES,
           IN ORDER THAT THE 'GET' COMMANDS WILL WORK.
1                                                                                               SUN SEP 08/96   15:24:55   Page  783
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
0          Referenced by comments of: 1032/14 
01032/006   BCPL                     COMPILER        OE  O          S1560 5.0T3 VLO FSNAME=BCPL.COMPILER.OE.006(1)              1150
            5.0T3  1150  BCPL.COMPILER.OE.006               1 LINE   9496   20 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:47:47
            5.0T9     6  UNSP:BCPL.COMPILER   
0          OBJECT OF THE COMPILER - $CONTINUES WITH USNP:BCPL.LIBRARY (1032/7).
01032/007   BCPL                     LIBRARY         S   O          S1560 5.0T3 VLO FSNAME=BCPL.LIBRARY.S.007(1)                1151
            5.0T3  1151  BCPL.LIBRARY.S.007                 1 LINE    124   48 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:02:02
            5.0T9     7                       
0          SOURCE OF LIBRARY AS A 'PDS'. WRITTEN IN BCPL.
0          Referenced by comments of: 1032/6, 1032/8, 1032/10, 1032/11 
01032/008   BCPL                     LIBRARY         UC  O          S1153 UNSP VLO FSNAME=BCPL.BCPLSYS                              
            5.0T3  1152  BCPL.LIBRARY.UC.008                1 LINE     62    1 PAGE UM   UNSP                DEC. 08, 1979  20:00:42
            5.0T9     8                       
0          AN UPDATE TO SECTION BCPLSYS IN THE LIBRARY SOURCE (1032/7).  USES GPSECT IN THE
           RESIDENT SYSTEM TO GET AROUND PROTECTION-INDUCED CHANGES IN SCANSTOR (ALSO IN 
           THE RESIDENT SYSTEM).
0          Referenced by comments of: 1032/11 
01032/009   BCPL                     LIBRARY         S   O          UNSP:BCPL.LIBHDR                                                
            5.0T3  1153  BCPL.LIBRARY.S.009                 1 LINE     57    2 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:47:51
            5.0T9     9  UNSP:BCPL.LIBHDR     
0          HEADER FILE FOR LIBRARY, WRITTEN IN BCPL.
0          Referenced by comments of: 1032/11 
01032/010   BCPL                     LIBRARY         S   O          UNSP:BCPL.STREAMH                                               
            5.0T3  1154  BCPL.LIBRARY.S.010                 1 LINE     90    2 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:47:52
            5.0T9    10  UNSP:BCPL.STREAMH    
0          HEADER GIVING INTERNAL STRUCTURE OF BCPL STREAMS - NEEDED BY UNSP:BCPL.LIBRARY
           (1032/7) AND ADVANCED USERS ONLY.  WRITTEN IN BCPL.
0          Referenced by comments of: 1032/11 
01032/011   BCPL                     LIBRARY         OL  O          UNSP:BCPL.LIBRARY                                               
            5.0T3  1155  BCPL.LIBRARY.OL.011                1 LINE  14056   12 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:47:54
            5.0T9    11  UNSP:BCPL.LIBRARY    
0          BCPL LIBRARY, THE LINKEDITED OBJECT OF (1032/7), (1032/8), (1032/9), AND (1032/10).
           CONTAINS SECTIONS BCPLSYS, BCPLIO, BCPLRLIB, BCPLBLIB, BCPLFLIB, AND BCPLMISC.
           ALSO CONTAINS BCPLPM AND GLOBUSE, WHICH ARE USED BY THE DEBUGGER (1032/12),
           BUT FOR WHICH WE DID NOT RECEIVE SOURCE FROM UNE. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  784
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1032/13, 1032/17, 1032/19, 1032/21 
01032/012   BCPL                     DEBUGGER        S   O          S1560 5.0T3 VLO FSNAME=BCPL.DEBUGGER.S.012(1)               1156
            5.0T3  1156  BCPL.DEBUGGER.S.012                1 LINE     91   19 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:01:51
            5.0T9    12                       
0          SOURCE OF DEBUGGING SYSTEM, WRITTEN IN BCPL.
0          Referenced by comments of: 1032/1, 1032/11, 1032/14, 1032/21 
01032/013   BCPL                     DEBUGGER        OE  O          UNSP:BCPL.DEBUG                                                 
            5.0T3  1157  BCPL.DEBUGGER.OE.013               1 LINE  14328    9 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:47:57
            5.0T9    13  UNSP:BCPL.DEBUG      
0          WORKING OBJECT OF THE DEBUGGER. $CONTINUES WITH UNSP:BCPL.LIBRARY (1032/11).
01032/014   BCPL                     BCPLOPTS        S   O          S1560 5.0T3 VLO FSNAME=BCPL.BCPLOPTS.S.014(1)               1158
            5.0T3  1158  BCPL.BCPLOPTS.S.014                1 LINE     92    7 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:02:20
            5.0T9    14                       
0          SET OF ROUTINES BORROWED FROM LEXICAL ANALYSER IN THE COMPILER (1032/5)
           FOR READING USER OPTIONS IN PROGRAMS.  WRITTEN IN BCPL. USED BY THE 
           DEBUGGER (1032/12).
01032/015   BCPL                     MACROS          SM  O          S1560 5.0T3 VLO FSNAME=BCPL.MACROS.SM.015(1)                1159
            5.0T3  1159  BCPL.MACROS.SM.015                 1 LINE     80   13 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:02:00
            5.0T9    15                       
0          MACRO LIBRARY FOR USE IN ASSEMBLING THE ASSEMBLER PARTS OF THE
           LIBRARY - I. E., BCPLSYS, BCPLFLIB, BCPLRLIB.
01032/016   BCPL                     TIDY            S   O          S1560 5.0T3 VLO FSNAME=BCPL.TIDY.S.016(1)                   1160
            5.0T3  1160  BCPL.TIDY.S.016                    1 LINE    100   21 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:02:12
            5.0T9    16                       
0          SOURCE OF SOURCE RE-FORMATTER PROGRAM, TIDY.  WRITTEN IN BCPL.
0          Referenced by comments of: 1032/1, 1032/17, 1032/21 
01032/017   BCPL                     TIDY            OE  O          UNSP:BCPL.TIDY                                                  
            5.0T3  1161  BCPL.TIDY.OE.017                   1 LINE   6640    8 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:48:01
            5.0T9    17  UNSP:BCPL.TIDY       
0          OBJECT OF (1032/16).  $CONTINUES WITH UNSP:BCPL.LIBRARY (1032/11).
01032/018   BCPL                     XREFFER         S   O          S1560 5.0T3 VLO FSNAME=BCPL.XREFFER.S.018(1)                1162
            5.0T3  1162  BCPL.XREFFER.S.018                 1 LINE    101   16 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:02:17
            5.0T9    18                       
0          SOURCE FOR THE BCPL CROSS-REFERENCER.  WRITTEN IN BCPL.
0          Referenced by comments of: 1032/1, 1032/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  785
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01032/019   BCPL                     XREFFER         OE  O          UNSP:BCPL.XREF                                                  
            5.0T3  1163  BCPL.XREFFER.OE.019                1 LINE   6488    6 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:48:04
            5.0T9    19  UNSP:BCPL.XREF       
0          OBJECT OF THE BCPL CROSS-REFERENCER.  $CONTINUES WITH UNCP:BCPL.LIBRARY
           (1032/11).
01032/020   BCPL                     MANUAL          P   O          S1560 5.0T3 VLO FSNAME=BCPL.MANUAL.P.020(1)                 1164
            5.0T3  1164  BCPL.MANUAL.P.020                  1 LINE     74   25 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:01:55
            5.0T9    20                       
0          THIS IS A PRINT FILE CONTAINING THE BCPL MANUAL WRITTEN AT CAMBRIDGE,
           WHICH DESCRIBES BCPL WITH OS DEPENDENCIES.
01032/021   BCPL                     USERGUIDE       WX  O          S1560 5.0T3 VLO FSNAME=BCPL.USERGUIDE.WX.021(1)             1165
            5.0T3  1165  BCPL.USERGUIDE.WX.021              1 LINE    111   12 PAGE UNE  HEAL      UNSP      AUG. 02, 1979  19:01:49
            5.0T9    21                       
0          TEXTFORM SOURCE OF A MANUAL ENTITLED 'HOW TO USE BCPL IN MTS.'  THIS
           MANUAL IS A GUIDE TO THE USE OF BCPL IN MTS, AND MTS-SPECIFIC PARTS
           OF THE LIBRARY (1032/11).  IT ALSO CONTAINS DOCUMENTATION FOR THE
           DEBUGGER (1032/12), XREF (1032/18), AND TIDY PROGRAMS (1032/16).
            
           THE TEXTFORM LAYOUT USED TO PRODUCE THIS AT UNE WAS NOT DISTRIBUTED,
           SO A PRINT FILE (1032/22) IS ALSO BEING INCLUDED.
0          Referenced by comments of: 1032/22 
01032/022   BCPL                     USERGUIDE       P   O          UNSP:BCPL.W                                                     
            5.0T3  1166  BCPL.USERGUIDE.P.022               1 LINE     80   38 PAGE UNE  HEAL      UNSP      JULY 03, 1981  20:48:08
            5.0T9    22                       
0          A PRINT FILE FOR (1032/21).
0          Referenced by comments of: 1032/21 
01032/023C  BCPL                     NOTE            P              W358:BLIB.NOTE                                                  
            5.1T3   357  BCPL.NOTE.P.023                    1 LINE     82    1 PAGE UNE  HEAL      UNSP      AUG. 20, 1983  19:50:39
0          A print file which explains the changes needed to the BCPL run-time
           library following the changes to the MTS user memory segment map.
0          Referenced by comments of: 1032/1 
01032/024C  BCPL                     NEW BCPLIO      S              W358:B.NEWIO                                                    
            5.1T3   358  BCPL.NEW_BCPLIO.S.024              1 LINE    124   15 PAGE UNE  HEAL      UNSP      AUG. 20, 1983  19:50:40
0          New source for the Section BCPLIO required because of the MTS change
           moving the first user memory segment from 6 to 8.
0          Referenced by comments of: 1032/25 
1                                                                                               SUN SEP 08/96   15:24:55   Page  786
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01032/025C  BCPL                     NEW LIBRARY     OL             W358:B.NEWLIB                                                   
            5.1T3   359  BCPL.NEW_LIBRARY.OL.025            1 LINE  14056   12 PAGE UNE  HEAL      UNSP      AUG. 20, 1983  19:50:40
0          New run-time library containing the modified BCPLIO (1032/24).
01033/001   COURSEWRITER                                          # (NOT INSTALLED AT UM)                                           
            D4T3    458  COURSEWRITER.COURSES.M.001         1 LINE     74    1 PAGE UBC  OSTERLIN            JUNE 04, 1976  10:38:04
0          THE MTS IMPLEMENTATION OF COURSEWRITER WAS NOT DONE BY THE UBC COMPUTING
           CENTRE, BUT BY BILL WEBB OF THE UBC DEPARTMENT OF ANIMAL RESOURCE ECOLOGY.
           THERE IS CURRENTLY NOT A WORKING VERSION OF COURSEWRITER INSTALLED AT MICHIGAN.
01034/001   MACEDIT                                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A GENERAL
           PURPOSE ASSEMBLER UTILITY PROGRAM.
01035/001   LANGUAGE                                              # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE
           LANGUAGES DATA BASE FOR ALL LANGUAGES AVAILABLE AT UBC.
01036/001A  CONTEXT-DIRECTED UPDATE  OBJECT          OE  G          *CDUPDATE                                                       
            5.1T2  1249  CONTEXT-DIRECTED_UPDATE.O.OE.001   1 LINE  32767   15 PAGE UBC  BALLARD   SHERRY    JULY 23, 1983  14:49:41
                         *CDUPDATE            
0          The complete CDUPDATE program consists of the object for the PLUS program,
           the parser tables generated by *CLPARSEGEN (1076/1), together with the loader
           records needed to include the shared VM CLPARSER and Plus runtime libraries
           (*CLPARSER (1076/6) and *PLUS.OBJLIB (1042/64) at UM). It can be produced
           with *LINKEDIT via the following commands:
            
              INCLUDE object-for-CDUPDATE
              INCLUDE object-for-tables
              (COMBINE) if desired
              PUNCH CDUPDATE 
            
           (I would prefer that you do not purge external symbols from the object module,
           although it may be combined.  The external symbols will appear in the error 
           message resulting from bugs in CDUPDATE, and are very useful to me in 
           interpreting problems.)
            
           Note that the distributed object has PLUS run-time checking enabled.
            
           A further 10-15% reduction in CPU use can be obtained by compiling
           everything with %Check:=False specified. 
            
           For the present, however, I would recommend leaving 
           the checking enabled. 
            
           ******************************************************************************
           D5.0B version:
1                                                                                               SUN SEP 08/96   15:24:55   Page  787
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This is the complete linkedited object for CDUPDATE version 2.3.
            
           This is functionally the same as version 2.2, as distributed on
           D5.0.  It has been modified to use the new version of *CLPARSER
           and to fix a couple of minor bugs.
            
           The object as distributed still has the default version set to 2.15,
           which means that /EDIT commands will behave the new way, but will
           issue a message for any edits that would have been incompatible with
           version 2.0.
            
           To change the default version, change the constant DEFAULT_VERSION at
           line 836 in (1036/2) to the value 2300 (for version=2.3).  (It may
           also be set to 2000 to obtain the same behavior as in version 2.0).
           ******************************************************************************
0          Referenced by comments of: 308/21, 400/6, 636/2, 813/7, 813/14, 813/15, 813/19, 813/20, 813/21, 813/22, 813/23,
                 813/24, 813/25, 813/28, 813/29, 813/30, 813/31, 813/40, 813/41, 813/43, 813/44, 813/45, 813/46, 813/47,
                 813/48, 813/49, 813/52, 813/53, 813/54, 813/55, 829/2, 1054/2, 4200/1 
01036/002A  CONTEXT-DIRECTED UPDATE  SOURCE          SQ  G          W067:CDUPDATE.S                                                 
            5.1T2  1250  CONTEXT-DIRECTED_UPDATE.S.SQ.002   1 LINE     88   75 PAGE UBC  BALLARD   SHERRY    JULY 23, 1983  14:49:42
0          PLUS source for CDUPDATE program. 
            
           This includes declarations generated by the analyzer for the grammar. 
           If the grammar is changed, the appropriate lines of this file must be 
           changed also. 
            
           Compiling this program requires the parser library -  specify
              0=*CLPARSELIB+*PLUS.SOURCELIB (comps. (1076/11) and (1042/5) or
                                             local equivalent)
0          Referenced by comments of: 737/15, 1036/1 
01036/003A  CONTEXT-DIRECTED UPDATE  GRAMMAR         SR  G          W067:CDUPDATE.G                                                 
            5.1T2  1251  CONTEXT-DIRECTED_UPDATE.G.SR.003   1 LINE     88    6 PAGE UBC  BALLARD   SHERRY    JULY 23, 1983  14:49:45
0          Grammar, input to *CLPARSEGEN (1076/1), defining CDUPDATE commands etc.
01036/004A  CONTEXT-DIRECTED UPDATE  WRITEUP         WF             W067:CDUPDATE.WF                                                
            5.1T2  1252  CONTEXT-DIRECTED_UPDATE.W.WF.004   1 LINE    106   16 PAGE UBC  BALLARD   SHERRY    JULY 23, 1983  14:49:45
0          Writeup describing CDUPDATE, based on a UBC writeup.  It describes the changes provided 
           by versions 2.2 and 2.3, and also has improved descriptions of the /BUFFER 
           command (which wasn't too well understood in the last version), and some
           examples.
            
           Note that it is in *FORMAT (308) this time.  It uses STAF:FMTLIB (here referred to
           by its UM name of COPY:JONMACLIBFMT (308/18).
            
           Note:  A revised version of this writeup is being distributed as
                  CCMemo 434 (1036/6).
1                                                                                               SUN SEP 08/96   15:24:55   Page  788
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01036/005A  CONTEXT-DIRECTED UPDATE  WRITEUP         PF             W067:CDUPDATE.P                                                 
            5.1T2  1253  CONTEXT-DIRECTED_UPDATE.W.PF.005   1 LINE     69   20 PAGE UBC  BALLARD   SHERRY    JULY 23, 1983  14:49:46
0          $COPY-able writeup for CDUPDATE, 28 pages.
01036/006C  CONTEXT-DIRECTED UPDATE  MEMO 434        WF             W273:MEMO434.SOU                                                
            5.1T2  1254  CONTEXT-DIRECTED_UPDATE.M.WF.006   1 LINE    112   19 PAGE UBC  SHERRY              JULY 23, 1983  14:49:47
0          This is Computing Center Memo 434, "UBC CDUPDATE."
0          Referenced by comments of: 1036/4, 1036/7 
01036/007C  CONTEXT-DIRECTED UPDATE  MEMO 434        PF             S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO434.OUT                       
            5.1T2  1255  CONTEXT-DIRECTED_UPDATE.M.PF.007   1 LINE     70   20 PAGE UBC  SHERRY              MAY  04, 1983  16:56:38
0          Printer-ready version of (1036/6).
01037/001   FORTRAN MESSAGE ROUTINE                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A
           FORTRAN-CALLABLE MESSAGE ROUTINE.
01038/001A  REPORT GENERATOR         DESCRIP         SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.DESCRIP.SA.001(1)      
            5.1T2  1256  REPORT_GENERATOR.DESCRIP.SA.001    1 LINE     81   23 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:19
0          Phase 1 of RG which performs the following functions:
             1.  data initialization , parameter scanning
             2.  process ITEM , ENTRY , and FIELD commands
            
           See the internal documentation manual for older changes to various parts of
           the actual code of this and other source subcomponents. Component (1038/11)
           is unchanged since last saved Feb 14, 1977.
01038/002A  REPORT GENERATOR         COMPILE         SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.COMPILE.SA.002(1)      
            5.1T2  1257  REPORT_GENERATOR.COMPILE.SA.002    1 LINE     80   28 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:24
0          Phase 2 of RG which performs the following functions:
             1 - process EXTRACT , ORDER , TABLE , CALL , TITLE , PRINT commands
             2 - generate appropriate blocks of data defining the required operation.
01038/003A  REPORT GENERATOR         ACTION          SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.ACTION.SA.003(1)       
            5.1T2  1258  REPORT_GENERATOR.ACTION.SA.003     1 LINE     80   22 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:31
0          Phase 3 of RG which performs the following functions:
             reads the data file and transfers the extracted data records to the
               temporary sequential file -TEMPNAME.
01038/004A  REPORT GENERATOR         PRINT           SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.PRINT.SA.004(1)        
            5.1T2  1259  REPORT_GENERATOR.PRINT.SA.004      1 LINE     80   22 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:37
0          Phase 4 of RG which performs the following functions:
             PRINT prints the required reports. PRINT , TITLE , CALL , TABLE all
               are handled here.
1                                                                                               SUN SEP 08/96   15:24:55   Page  789
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01038/005A  REPORT GENERATOR         OVERFLOW        SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.OVERFLOW.SA.005(1)     
            5.1T2  1260  REPORT_GENERATOR.OVERFLOW.SA.005   1 LINE     80    9 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:44
0          External subroutines to handle overflow and capitalization for PRINT.
           Made external because of base register problems and use of registers.
01038/006A  REPORT GENERATOR         SUBROUTINES     SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.SUBROUTI.SA.006(1)     
            5.1T2  1261  REPORT_GENERATOR.SUBROUTI.SA.006   1 LINE     80   23 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:46
0          Subroutines used by RG - all called by " BALR LINK,LINK "
             SCAN    -  get another field
             SSCAN   -   "     "      "   ( special field)
             GNUMBER -  get a numeric field
             GFIELD  -  get a field
             FNAME   -  insure field is a legal field
             NUM     -  convert a field to numeric
01038/007A  REPORT GENERATOR         DATA            SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.DATA.SA.007(1)         
            5.1T2  1262  REPORT_GENERATOR.DATA.SA.007       1 LINE     78    1 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:53
0          Generates the PSECT as a CSECT to define all required constants.
01038/008A  REPORT GENERATOR         OUTPUT          SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.OUTPUT.SA.008(1)       
            5.1T2  1263  REPORT_GENERATOR.OUTPUT.SA.008     1 LINE     80    5 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:51
0          Routine to output error comments (mark) and output formatting
           to SPRINT and echoing of input lines if requested.
01038/009A  REPORT GENERATOR         INSERT_SORT     SA  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.INSERT_S.SA.009(1)     
            5.1T2  1264  REPORT_GENERATOR.INSERT_S.SA.009   1 LINE     80   22 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:54
0          Insertion sort added for greater efficiency.
            Acquires sorting tree space in pieces independently of RG's space
            management and statistics; hence memory usage reported by RG is
            often much less than before.
            This sort is general-purpose and can be used outside RG.  The 
            initial source comment serves as documentation.
01038/010A  REPORT GENERATOR         MACLIB          SM  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.MACLIB.SM.010(1)       
            5.1T2  1265  REPORT_GENERATOR.MACLIB.SM.010     1 LINE     72   20 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:37:58
0          Macro library used by all RG source routines.
01038/011   REPORT GENERATOR         INTERNAL DOC    WF  O          S1560 5.0T3 VLO FSNAME=REPORT_GENERATOR.INTERNAL.WF.012(1)      
            5.0T3  1187  REPORT_GENERATOR.INTERNAL.WF.012   1 LINE     81    8 PAGE UBC  BUCKLAND  RIOLO     FEB. 14, 1977  08:58:39
            5.0T9    43                       
0          Requires "NO SUPER" and "NO KEYPUNCH" control FORMAT control cards.  Uses
           JONMACLIB (308/18).
            
           ************************************************************************
           This subcomponent is unchanged since last saved Feb 14, 1977.
           ************************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  790
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1038/1 
01038/012C  REPORT GENERATOR         MEMO 437        WF             W273:MEMO437.SOU                                                
            5.1T2  1266  REPORT_GENERATOR.MEMO_437.WF.012   1 LINE     89   70 PAGE UBC  BUCKLAND  RIOLO     JULY 23, 1983  14:58:11
0          This is Computing Center Memo 437 -- "UBC RG:  The Report Generator."  (It is
           a revised version of the UBC writeup.)
0          Referenced by comments of: 1038/13 
01038/013C  REPORT GENERATOR         MEMO 437        PF             W273:MEMO437.OUT                                                
            5.1T2  1267  REPORT_GENERATOR.MEMO_437.PF.013   1 LINE     72   85 PAGE UM   RIOLO               JULY 23, 1983  14:58:14
0          This is the printer-ready version of (1038/12).
01038/014A  REPORT GENERATOR         OBJECT          OC  O          *RG                                                             
            5.1T2  1268  REPORT_GENERATOR.OBJECT.OC.014     1 LINE   9719   14 PAGE UBC  BUCKLAND  RIOLO     JULY 23, 1983  14:58:17
                         *RG                  
0          -----------------
           The following items are the major changes from previous versions:
             - *COMMENT command allowed in master file descriptions;
             - Output record lengths of greater than 132 characters supported;
             - "PRINT ALL FIELDS WITH FIELDNAME" added for debugging purposes.
               This prints each fieldname and its contents;
             - "REST ARE SAME" phrase allowed in the DECODE command;
             - New parameters added:
                 . NOCONTROL which does not use carriage control on output,
                 . SIZE=N to set the number of pages of VM to use;
             - Macros may be terminate by "$ENDFILE" and may be nested up to
               five levels;
             - "WHEN FIELDNAME CHANGES" phrase supported in the PRINT command;
             - TABLE command now supports titles;
           -------------78-08-24--------
           Several bugs fixed.
           -------------78-12-01--------
             (See also UBC's November/78 Newsletter)
             - Several more bugs fixed;
             - No more arithmetic operators (+-*/) in field names;
             - No more field starting columns > 256:
             - String may now terminate fields, e.g.
                 FIELD FIRST IS TERMINATED BY 'DIVIDER'
             - 'ORDER PERMUTED' now treats any initial alphabetic character
               including lowercase as starting new word;
             - No more null literals in 'WHEN' specifications;
             - New date "SYSCHARDATE" in 'MMM DD, 19YY' form;
             - 'PRINT ALL FIELDS WITH OVERFLOW' now allowed;
             - Capitalization now recognizes all standard sentence ends.
           -----------------
            
           ***********************************************************************************
           D5.0A version:
            
           A major new release of RG.  Important new and improved features:
1                                                                                               SUN SEP 08/96   15:24:55   Page  791
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0            - general conversion to handle mixed-case input, output, messages;
             - continuation of runs after recoverable errors detected;
             - improved diagnostic and statistical messages;
             - generalization of SKIPWORDS parameter;
             - raising of maximum field length to 32,767;
             - totalling in tables;
             - default sorting of upper and lower case alphabetics equivalently;
             - multiple permuted fields in a single ORDER;
             - allowing arbitrarily many called routines;
             - multiple titles for a single PRINT;
             - more flexible control of when titles are printed;
             - printing elsewhere than on SPRINT;
             - printing the component parts of a SYSKEY if desired;
             - printing with right justification if desired;
             - new WHEN conditions in PRINTs (according to whether or not a
               field contains a string, is greater than or less than a quantity,
               or is alphabetic or numeric);
             - nesting of WHEN conditions;
           UBC Technical Note TN159 (published May 1/81, 21 pages) gives full
           details, including things not mentioned above.
           If the file RG1.:STATSMSGS exists, runs are now monitored statistically.
           ***********************************************************************************
01038/015A  REPORT GENERATOR         TEST PROGRAMS   C              S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.TEST_PRO.C.015(1)      
            5.1T2  1269  REPORT_GENERATOR.TEST_PRO.C.015    1 LINE    349   49 PAGE UBC  BUCKLAND  RIOLO     APR. 21, 1981  14:54:50
0          A series of test programs to test out your version of RG under CCID=RG1.
           $SOURCE the file to perform the tests.
0          Referenced by comments of: 1038/17 
01038/016A  REPORT GENERATOR         UM EXAMPLE      C              W280:RG.EXAMPLE                                                 
            5.1T2  1270  REPORT_GENERATOR.UM_EXAMP.C.016    1 LINE    128    3 PAGE UBC  BUCKLAND  RIOLO     JULY 23, 1983  14:58:20
0          A file that can be $SOURCEd to to produce a sample RG run.
01038/017C  REPORT GENERATOR         COMPARER        OC  O          S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.COMPARER.OC.017(1)     
            5.1T2  1271  REPORT_GENERATOR.COMPARER.OC.017   1 LINE     80    7 PAGE UBC  BUCKLAND  RIOLO     APR. 16, 1981  13:38:52
0          Comparison program used in (1038/15); compares contents of units 1 and 2
           for equality, and reports differences.
01039/001   READPAGE                                              # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A DISK
           UTILITY TO READ ANY PAGE ON ANY VOLUME ANY NUMBER OF TIMES.
01040/001   DISK                                                  # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN UMMPS
           JOB TO LOCK A PUBLIC VOLUME SO THAT IT CAN BE MOVED TO ANOTHER DRIVER, OR
           POSSIBLY ANOTHER CONTROL UNIT.
1                                                                                               SUN SEP 08/96   15:24:55   Page  792
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01041/001   RESOURCE MANAGER         DSP LIBRARY     OL  O          TMTS:DSPLIBRARY                                                 
            5.0T3  1192  RESOURCE_MANAGER.DSP_LIBR.OL.001   1 LINE   5438   21 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:24
            5.0T9    48  TMTS:DSPLIBRARY      
0          Object library containing DSPs and DSP support routines. This library
           contains: The DSP PRV initialization routines (1041/2); the DSP expanded form
           message table (1041/3); the DSP interface (1041/4); the DSP service routines
           (1041/5); the Intertask line DSP (1041/6); the intertask node DSP (1041/7);
           and the DSP table (1041/8). The Subtasking Monitor (1058) is required to run
           DSPs.
0          Referenced by comments of: 1042/1, 1051/1, 1051/33, 1051/36, 1051/39, 1079/1 
01041/002   RESOURCE MANAGER         DSP PRV INIT    SA  O          TMTS:DSPPRV(1000)                                               
            5.0T3  1193  RESOURCE_MANAGER.DSP_PRV.SA.002    1 LINE     79    3 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:26
            5.0T9    49                       
0          Pseudo-register initialization for the DSP portion of the transfer vector.
           Also contains LCS and LCSPR tables for DSP-related routines. Assemble with
           COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and the DSP macros
           (1041/9).
0          Referenced by comments of: 1041/1 
01041/003   RESOURCE MANAGER         DSP EFMS        SA  O          TMTS:DSPEFMS(1000)                                              
            5.0T3  1194  RESOURCE_MANAGER.DSP_EFMS.SA.003   1 LINE     67    3 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:27
            5.0T9    50                       
0          DSP expanded-form messages. Assemble with COPY:MNTR.MACROS (1058/30) and
           OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1041/1 
01041/004   RESOURCE MANAGER         DSP INTERFACE   SA  O          TMTS:DSPINTERFACE(1000)                                         
            5.0T3  1195  RESOURCE_MANAGER.DSP_INTE.SA.004   1 LINE     79   18 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:28
            5.0T9    51                       
0          DSP interface routine. Assemble with COPY:MNTR.MACROS (1058/30),
           OLD:CC.MACROS (1054/4), and the DSP macros (1041/9).
0          Referenced by comments of: 1041/1 
01041/005   RESOURCE MANAGER         DSP SRVC RTNS   SA  O          TMTS:DSPSERV(1000)                                              
            5.0T3  1196  RESOURCE_MANAGER.DSP_SRVC.SA.005   1 LINE     70   10 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:34
            5.0T9    52                       
0          DSP service routines. Assemble with COPY:MNTR.MACROS (1058/30),
           OLD:CC.MACROS (1054/4), COPY:FILE.MACROS (482/45), and the DSP macros
           (1041/9).
0          Referenced by comments of: 1041/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  793
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01041/006   RESOURCE MANAGER         ITSK LINE DSP   SA  O          TMTS:DSPITLN(1000)                                              
            5.0T3  1197  RESOURCE_MANAGER.ITSK_LIN.SA.006   1 LINE     78   13 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:35
            5.0T9    53                       
0          The intertask line DSP. Assemble with OLD:CC.MACROS (1054/4),
           COPY:MNTR.MACROS (1058/30), and the DSP macros (1041/9).
0          Referenced by comments of: 1041/1 
01041/007   RESOURCE MANAGER         ITSK NODE DSP   SA  O          TMTS:DSPITSK(1000)                                              
            5.0T3  1198  RESOURCE_MANAGER.ITSK_NOD.SA.007   1 LINE     78   14 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:38
            5.0T9    54                       
0          The intertask node DSP. Assemble with OLD:CC.MACROS (1054/4),
           COPY:MNTR.MACROS (1058/30), and the DSP macros (1041/9).
0          Referenced by comments of: 1041/1 
01041/008   RESOURCE MANAGER         DSP TABLE       SA  O          TMTS:DSPTABLE(1000)                                             
            5.0T3  1199  RESOURCE_MANAGER.DSP_TABL.SA.008   1 LINE     72    1 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:41
            5.0T9    55                       
0          The DSP table. Contains entries only for the intertask line and node DSPs.
           Assemble with the DSP macros (1041/9).
0          Referenced by comments of: 1041/1 
01041/009   RESOURCE MANAGER         DSP MACROS      SM  O          DMGR:DSP.MACROS                                                 
            5.0T3  1200  RESOURCE_MANAGER.DSP_MACR.SM.009   1 LINE     78    8 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:42
            5.0T9    56                       
0          DSP macro library.
0          Referenced by comments of: 1041/2, 1041/4, 1041/5, 1041/6, 1041/7, 1041/8, 1051/9, 1051/17, 1051/31, 1051/37 
01041/010   RESOURCE MANAGER         MSG EXPANSION   SA  G          DMGR:MNTRMMSG(1000)                                             
            5.0T3  1201  RESOURCE_MANAGER.MSG_EXPA.SA.010   1 LINE     68   13 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:44
            5.0T9    57                       
0          This is the message expand routine, used to expand canonical form messages.
           Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1051/1, 1051/33, 1051/39, 1079/1 
01041/011   RESOURCE MANAGER         MSG EXPANSION   OC  O          DMGR:MNTRMMSG(1,999)                                            
            5.0T3  1202  RESOURCE_MANAGER.MSG_EXPA.OC.011   1 LINE     80    6 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:47
            5.0T9    58                       
0          Object for 1041/10.
1                                                                                               SUN SEP 08/96   15:24:55   Page  794
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01041/012   RESOURCE MANAGER         RM ROUTINES     SA  O          DMGR:MNTRMETC(1000)                                             
            5.0T3  1203  RESOURCE_MANAGER.RM_ROUTI.SA.012   1 LINE     70    4 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:49
            5.0T9    59                       
0          Resource Manager service routines:  RMGTFILE, RMFRFILE, RMMESSG, RMMSGOUT.
           Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and
           COPY:FILE.MACROS (482/45).
01041/013   RESOURCE MANAGER         RM ROUTINES     OC  O          DMGR:MNTRMETC(1,999)                                            
            5.0T3  1204  RESOURCE_MANAGER.RM_ROUTI.OC.013   1 LINE     80    3 PAGE UBC  BOWLER    HELFFRICH JULY 03, 1981  20:54:50
            5.0T9    60                       
0          Object for 1041/12.
01041/014   RESOURCE MANAGER         PLUS LIBRARY    SQ  O          RMGR:RMGR#SQL                                                   
            5.0BT2   32  RESOURCE_MANAGER.PLUS_LIB.SQ.014   1 LINE     70   51 PAGE UBC  BALLARD   BURLING   NOV. 29, 1982  15:36:44
0          Current version of library of PLUS definitions for Resource Manager
           routines data structures.
            
           Distributed here in case it contains anything of interest. 
01042/001A  PLUS/470                 COMPILER        OE  G          *PLUS                                                           
            5.1T3     1  PLUS/470.COMPILER.OE.001           1 LINE  32767   83 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:14:22
                         *PLUS                
0          ******************************************************************* 
           *                         P L U S                                 *
           *           copyright 1982 Alan Ballard and Paul Whaley           *
           *                                                                 *
           *  The PLUS compiler should not be distributed without            * 
           *  permission from the authors.                                   *
           *                                                                 *
           *******************************************************************
            
           This is the current, complete, linkeditted version of the compiler. 
            
           It refers to files PLUS:PLUSMESSAGES (1042/4), *PLUS.SOURCELIB
           (1042/5) and PLUS:PLUSLOG (the PLUS compiler statistics file, which is
           not distributed).
            
           See installation notes (1042/3) for details. 
            
           This is version 24/15 of the compiler, required by most pieces of
           the Resource Manager (1041).
            
           See NEWS file (1042/75) for changes since previous distribution. 
           Note that the writeup has not been updated. 
            
           ********************************************************************
           D5.1 version:
            
           This is the version of the compiler included with the first Resource
           Manager distribution.
1                                                                                               SUN SEP 08/96   15:24:55   Page  795
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           UM version:
            
            Contains a re-compiled VERSION (1042/11) for UM and a new version
            of SDS_SYMS (1042/42) that will generate SYM cards with dsect names
            greater than 8 characters long.  The compiler option %TEST must be
            set to 2 to force this action; only the new version of SDS, (600/18)
            through (600/37), will correctly process these SYM cards.
           ********************************************************************
01042/002A  PLUS/470                 COMPILER        OC  G          PLUS:PLUS>                                                      
            5.1T3     2  PLUS/470.COMPILER.OC.002           1 LINE  12760  125 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:14:25
0          This is the current, complete unlinkeditted version 24/15 of the compiler. 
            
           This version references PLUS:PLUSMESSAGE> 
           rather than PLUS:PLUSMESSAGES. 
            
           See installation notes (1042/3) for details. 
            
           ********************************************************************
            5.0B version:
            
           Contains re-compiled versions of CONST TAB (1042/45), OBJ_GEN
           (1042/47), and OBJ_EMIT (1042/48).
           ********************************************************************
01042/003A  PLUS/470                 INSTALL NOTES   P              S0093A RMDIST FSNAME=PLUS/470.INSTALL_NOTES.P.002(1)            
            5.1T3     3  PLUS/470.INSTALL_NOTES.P.003       1 LINE     76    4 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:21
0          ************************************* 
           * Instructions for installing PLUS. *
           *************************************
           Minor revisions since previous distribution.
0          Referenced by comments of: 1042/1, 1042/2 
01042/004A  PLUS/470                 MESSAGES        M   G          PLUS:PLUSMESSAGES                                               
            5.1T3     4  PLUS/470.MESSAGES.M.004            1 LINE    147    8 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:14:43
0          Message file accessed by the compiler. 
           Install as ccid:PLUSMESSAGES for linkeditted version of compiler, 
           and as ccid:PLUSMESSAGE> for the test version of the compiler, if used. 
            
           This also includes messages specific to the PLUS-11 compiler.
           PLUS-11 references a copy in the file PLUS:PLUSMSG11.
           See installation notes (1050/3) for details. 
            
0          Referenced by comments of: 1042/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  796
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/005A  PLUS/470                 SOURCELIB       SQ  G          *PLUS.SOURCELIB                                                 
            5.1T3     5  PLUS/470.SOURCELIB.SQ.005          1 LINE     91   65 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:14:43
0          This is the source library assumed if unit
           0 is not specified when running the compiler. 
            
           The library contains a number of useful declarations. 
           Basically, the contents are:
              a) Some useful types such as Integer, Boolean, etc. 
              b) Definitions of some 370/470 machine characteristics, 
                 such as the word size, the operation codes, etc. 
              c) Declarations for the standard run-time support and other useful
                 routines in shared VM at UBC (or *PLUS.OBJLIB (1042/64)).
              d) Declarations for most of the MTS system subroutines. 
            
           There have been various additions and changes since the last distribution.
            
           ********************************************************************
           D5.1 version:
            
           This is the current UM library.
           ********************************************************************
0          Referenced by comments of: 67/1, 67/3, 67/5, 67/7, 482/69, 509/10, 509/14, 553/5, 553/9, 802/25, 821/1, 821/5,
                 839/1, 839/2, 843/1, 851/1, 852/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1036/2, 1042/1, 1042/50, 1042/56,
                 1042/67, 1042/72, 1042/73, 1042/82, 1042/87, 1076/2, 1076/9, 1080/19, 1084/2, 1086/1, 1089/9 
01042/006C  PLUS/470                 SOURCELIB       SQ  G          PLUS:SOURCEL#SQL                                                
            5.1T3     6  PLUS/470.SOURCELIB.SQ.006          1 LINE     71   61 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:14:46
0          ********************************************************************
           D5.1 version:
            
           This is the base source as distributed with the first Resource
           Manager distribution.
           ********************************************************************
0          Referenced by comments of: 1042/7 
01042/007C  PLUS/470                 SOURCELIB       UC  G          PLUS:SOURCEL*UQL                                                
            5.1T3     7  PLUS/470.SOURCELIB.UC.007          1 LINE     91    9 PAGE UM   BURLING             JULY 23, 1983  15:14:49
0          **********************************************************************
           D5.1 version: 
            
           These are the updates used to produce the current UM library from 
           (1042/6).
           **********************************************************************
0          Referenced by comments of: 811/4, 811/6, 811/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  797
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/008   PLUS/470                 LISTING         L   G          S1644 5.0BT1 VLO FSNAME=PLUS/470.LISTING.L.007(1)            898
            5.0BT1  898  PLUS/470.LISTING.L.007             1 LINE    138 1156 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:04:27
0          Complete source listing of compiler. 
           $COPY to printer (TN, if available) with PAGES=1300. 
            
           This is a listing of version 24.  There have been a few minor changes to
           the source since the listing was produced (a result of fixing the bugs 
           that inevitably showed up after preparing it for distribution). 
            
           (Note... if you want a listing of just a part of the compiler, you may 
           find it more convenient to restore the source for the part you're interested
           in and compile it.  1300 pages is unwieldy, even two-sided!)
            
           **********************************************************************
           D5.1 version:
            
           These listings have not changed since D5.0B.  They weren't included
           in the Resource Manager distribution.
           **********************************************************************
01042/009A  PLUS/470                 SOURCE          S   G          S0093A RMDIST FSNAME=PLUS/470.SOURCE.S.005(1)                   
            5.1T3     8  PLUS/470.SOURCE.S.009              1 LINE     41    1 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:27
0          Components (1042/9) to (1042/48) are PLUS source for the compiler. 
            
           See installation notes for instructions on compiling any of 
           these. 
            
           This subcomponent contains just a series of $CONTINUE WITH's
           specifying all the files (under id SUEN, at UBC) constituting the
           compiler.
            
           It is used by the compiler rebuilding job (1042/78).
0          Referenced by comments of: 1042/9 
01042/010A  PLUS/470                 MAIN            SQ  G          S0093A RMDIST FSNAME=PLUS/470.MAIN.SQ.006(1)                    
            5.1T3     9  PLUS/470.MAIN.SQ.010               1 LINE     68    8 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:27
0          Compiler main program and initialization/termination. 
01042/011A  PLUS/470                 VERSION         SQ  G          S0093A RMDIST FSNAME=PLUS/470.VERSION.SQ.007(1)                 
            5.1T3    10  PLUS/470.VERSION.SQ.011            1 LINE     68    4 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:28
0          This routine performs some initialization that differs between versions, 
           and may be different for different MTS installations. 
            
           Currently, it mainly allows setting the default compiler options, and the
           names of the files used. 
            
           See installation notes for further information. 
0          Referenced by comments of: 1042/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  798
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/012A  PLUS/470                 TRAP            SQ  G          S0093A RMDIST FSNAME=PLUS/470.TRAP.SQ.008(1)                    
            5.1T3    11  PLUS/470.TRAP.SQ.012               1 LINE     81    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:28
0          Compiler program interrupt handler. 
01042/013A  PLUS/470                 TABLE RTNS      SQ  G          S0093A RMDIST FSNAME=PLUS/470.TABLE_RTNS.SQ.009(1)              
            5.1T3    12  PLUS/470.TABLE_RTNS.SQ.013         1 LINE     81   10 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:28
0          Routines used by compiler to allocate and maintain variable-size
           arrays and tables. 
01042/014A  PLUS/470                 STRING          SQ  G          S0093A RMDIST FSNAME=PLUS/470.STRING.SQ.010(1)                  
            5.1T3    13  PLUS/470.STRING.SQ.014             1 LINE     68    7 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:29
0          Compiler string-table processing routines. 
01042/015A  PLUS/470                 MESSAGE RTNS    SQ  G          S0093A RMDIST FSNAME=PLUS/470.MESSAGE_RTNS.SQ.011(1)            
            5.1T3    14  PLUS/470.MESSAGE_RTNS.SQ.015       1 LINE     68    3 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:29
0          Routines which build and print compiler messages. 
01042/016A  PLUS/470                 CONVERT         SQ  G          S0093A RMDIST FSNAME=PLUS/470.CONVERT.SQ.012(1)                 
            5.1T3    15  PLUS/470.CONVERT.SQ.016            1 LINE     68    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:30
0          Various routines which convert things to character strings, mostly 
           for printing in messages. 
01042/017A  PLUS/470                 CONST RTNS      SQ  G          S0093A RMDIST FSNAME=PLUS/470.CONST_RTNS.SQ.013(1)              
            5.1T3    16  PLUS/470.CONST_RTNS.SQ.017         1 LINE     68    7 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:30
0          Constant processing routines. 
01042/018A  PLUS/470                 I/O RTNS        SQ  G          S0093A RMDIST FSNAME=PLUS/470.I/O_RTNS.SQ.014(1)                
            5.1T3    17  PLUS/470.I/O_RTNS.SQ.018           1 LINE     68   12 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:31
0          I/O interfacing routines. 
01042/019A  PLUS/470                 INCLUDE RTNS    SQ  G          S0093A RMDIST FSNAME=PLUS/470.INCLUDE_RTNS.SQ.015(1)            
            5.1T3    18  PLUS/470.INCLUDE_RTNS.SQ.019       1 LINE     68    8 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:32
0          Routines for processing source libraries, %Include. 
01042/020A  PLUS/470                 SCANNER         SQ  G          S0093A RMDIST FSNAME=PLUS/470.SCANNER.SQ.016(1)                 
            5.1T3    19  PLUS/470.SCANNER.SQ.020            1 LINE     68   14 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:32
0          Input scanner. 
01042/021A  PLUS/470                 PARAGRAPHER     SQ  G          S0093A RMDIST FSNAME=PLUS/470.PARAGRAPHER.SQ.017(1)             
            5.1T3    20  PLUS/470.PARAGRAPHER.SQ.021        1 LINE     68   14 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:33
0          Source paragrapher. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  799
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/022A  PLUS/470                 PARSER          SQ  G          S0093A RMDIST FSNAME=PLUS/470.PARSER.SQ.018(1)                  
            5.1T3    21  PLUS/470.PARSER.SQ.022             1 LINE     68    8 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:34
0          Input parser.  This is driven by tables generated 
           by the UBC LALR(1) analyzer (1080). 
0          Referenced by comments of: 1080/7 
01042/023A  PLUS/470                 SYMBOL_TABLE    SQ  G          S0093A RMDIST FSNAME=PLUS/470.SYMBOL_TABLE.SQ.019(1)            
            5.1T3    22  PLUS/470.SYMBOL_TABLE.SQ.023       1 LINE     95    8 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:35
0          Symbol table processing routines. 
01042/024C  PLUS/470                 XREF            SQ  G          S0093A RMDIST FSNAME=PLUS/470.XREF.SQ.020(1)                    
            5.1T3    23  PLUS/470.XREF.SQ.024               1 LINE     68   11 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:35
0          Routines used to produce the cross reference.  See the news file for
           description of the cross reference options.
            
01042/025A  PLUS/470                 EXTERN          SQ  G          S0093A RMDIST FSNAME=PLUS/470.EXTERN.SQ.021(1)                  
            5.1T3    24  PLUS/470.EXTERN.SQ.025             1 LINE     68   10 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:36
0          Pass 1 semantics for compilation units (procedures, globals). 
01042/026A  PLUS/470                 EXTNAME         SQ  G          S0093A RMDIST FSNAME=PLUS/470.EXTNAME.SQ.022(1)                 
            5.1T3    25  PLUS/470.EXTNAME.SQ.026            1 LINE     69    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:37
0          Routines which maintain a table of external names for cross-checking 
           if two routines/globals result in same ESDname. 
01042/027A  PLUS/470                 MACRO SEM       SQ  G          S0093A RMDIST FSNAME=PLUS/470.MACRO_SEM.SQ.023(1)               
            5.1T3    26  PLUS/470.MACRO_SEM.SQ.027          1 LINE     68    7 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:37
0          Pass 1 semantics for macro definition and expansion. 
01042/028A  PLUS/470                 TYPE SEM        SQ  G          S0093A RMDIST FSNAME=PLUS/470.TYPE_SEM.SQ.024(1)                
            5.1T3    27  PLUS/470.TYPE_SEM.SQ.028           1 LINE     78   27 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:38
0          Pass 1 semantics for processing type definitions. 
01042/029C  PLUS/470                 ALLOC           SQ  G          S0093A RMDIST FSNAME=PLUS/470.ALLOC.SQ.025(1)                   
            5.1T3    28  PLUS/470.ALLOC.SQ.029              1 LINE     68    3 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:40
0          Routines to manage the allocation table. 
01042/030A  PLUS/470                 VARIABLE        SQ  G          S0093A RMDIST FSNAME=PLUS/470.VARIABLE.SQ.026(1)                
            5.1T3    29  PLUS/470.VARIABLE.SQ.030           1 LINE    120   18 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:40
0          Pass 1 semantics for processing variables. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  800
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/031A  PLUS/470                 DECL SEM        SQ  G          S0093A RMDIST FSNAME=PLUS/470.DECL_SEM.SQ.027(1)                
            5.1T3    30  PLUS/470.DECL_SEM.SQ.031           1 LINE     68   10 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:41
0          Pass 1 semantics for processing declarations. 
01042/032A  PLUS/470                 STATEMENT SEM   SQ  G          S0093A RMDIST FSNAME=PLUS/470.STATEMENT_SEM.SQ.028(1)           
            5.1T3    31  PLUS/470.STATEMENT_SEM.SQ.032      1 LINE     68    4 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:42
0          Pass 1 semantics for processing statements. 
01042/033A  PLUS/470                 EXPR SEM        SQ  G          S0093A RMDIST FSNAME=PLUS/470.EXPR_SEM.SQ.029(1)                
            5.1T3    32  PLUS/470.EXPR_SEM.SQ.033           1 LINE     68   52 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:42
0          Pass 1 semantics for processing expressions. 
01042/034C  PLUS/470                 COMP VARS       SQ  G          S0093A RMDIST FSNAME=PLUS/470.COMP_VARS.SQ.030(1)               
            5.1T3    33  PLUS/470.COMP_VARS.SQ.034          1 LINE     68    9 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:45
0          Pass 1 routines used for processing compiler variables and compiler procedures.
01042/035C  PLUS/470                 INLINE          SQ  G          S0093A RMDIST FSNAME=PLUS/470.INLINE.SQ.031(1)                  
            5.1T3    34  PLUS/470.INLINE.SQ.035             1 LINE     67    4 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:46
0          Pass 1 routines for processing the INLINE function. 
01042/036A  PLUS/470                 CONTROL SEM     SQ  G          S0093A RMDIST FSNAME=PLUS/470.CONTROL_SEM.SQ.032(1)             
            5.1T3    35  PLUS/470.CONTROL_SEM.SQ.036        1 LINE     68    7 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:46
0          Pass 1 semantics for processing control structures. 
01042/037A  PLUS/470                 TREE RTNS       SQ  G          S0093A RMDIST FSNAME=PLUS/470.TREE_RTNS.SQ.033(1)               
            5.1T3    36  PLUS/470.TREE_RTNS.SQ.037          1 LINE     68    9 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:46
0          Pass 1 routines used to build intermediate code tree. 
01042/038A  PLUS/470                 ERROR SEM       SQ  G          S0093A RMDIST FSNAME=PLUS/470.ERROR_SEM.SQ.034(1)               
            5.1T3    37  PLUS/470.ERROR_SEM.SQ.038          1 LINE     68    3 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:47
0          Pass 1 error recovery semantics. 
01042/039A  PLUS/470                 VIRTUAL         SQ  G          S0093A RMDIST FSNAME=PLUS/470.VIRTUAL.SQ.035(1)                 
            5.1T3    38  PLUS/470.VIRTUAL.SQ.039            1 LINE     68    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:47
0          Routines to process "virtual registers". 
01042/040A  PLUS/470                 STREAM          SQ  G          S0093A RMDIST FSNAME=PLUS/470.STREAM.SQ.036(1)                  
            5.1T3    39  PLUS/470.STREAM.SQ.040             1 LINE     68    6 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:48
0          Routines for maintaining the "stream code" array. 
01042/041A  PLUS/470                 TEMP RTNS       SQ  G          S0093A RMDIST FSNAME=PLUS/470.TEMP_RTNS.SQ.037(1)               
            5.1T3    40  PLUS/470.TEMP_RTNS.SQ.041          1 LINE     68    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:48
0          Temporary management routines. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  801
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/042A  PLUS/470                 SDS SYMS        SQ  G          PLUS:SDS_SYMS*SQ                                                
            5.1T3    41  PLUS/470.SDS_SYMS.SQ.042           1 LINE     74    5 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:06
0          Routines to generate SYM records from symbol and variable table 
           information. 
            
           **********************************************************************
           D5.1 version:
            
           Specifying %TEST=2 will cause generation of SYM cards with full-length
           dsect names.  The new version of SDS, (600/18) through (600/37), can
           use these.
           **********************************************************************
0          Referenced by comments of: 1042/1 
01042/043A  PLUS/470                 STREAM GEN      SQ  G          S0093A RMDIST FSNAME=PLUS/470.STREAM_GEN.SQ.039(1)              
            5.1T3    42  PLUS/470.STREAM_GEN.SQ.043         1 LINE     68   50 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:49
0          Pass which tours the tree and produces "stream code". 
01042/044A  PLUS/470                 STREAM UT       SQ  G          S0093A RMDIST FSNAME=PLUS/470.STREAM_UT.SQ.040(1)               
            5.1T3    43  PLUS/470.STREAM_UT.SQ.044          1 LINE     68   24 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:52
0          Auxiliary routines used by stream code generation. 
01042/045A  PLUS/470                 CONST TABLE     SQ  G          S0093A RMDIST FSNAME=PLUS/470.CONST_TABLE.SQ.041(1)             
            5.1T3    44  PLUS/470.CONST_TABLE.SQ.045        1 LINE     74   16 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:54
0          Routines which manage the constant table used for constants emitted 
           during code generation. 
0          Referenced by comments of: 1042/2 
01042/046A  PLUS/470                 STREAM OPT      SQ  G          S0093A RMDIST FSNAME=PLUS/470.STREAM_OPT.SQ.042(1)              
            5.1T3    45  PLUS/470.STREAM_OPT.SQ.046         1 LINE     68   11 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:58
0          Optimization performed on the stream code. 
           (Currently, combination of "virtual registers", redundant branch removal,
           unreachable code removal) 
01042/047A  PLUS/470                 OBJECT GEN      SQ  G          S0093A RMDIST FSNAME=PLUS/470.OBJECT_GEN.SQ.043(1)              
            5.1T3    46  PLUS/470.OBJECT_GEN.SQ.047         1 LINE     68   32 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:24:58
0          Routines which tour stream code and produce object code. 
0          Referenced by comments of: 1042/2 
01042/048A  PLUS/470                 OBJECT EMIT     SQ  G          S0093A RMDIST FSNAME=PLUS/470.OBJECT_EMIT.SQ.044(1)             
            5.1T3    47  PLUS/470.OBJECT_EMIT.SQ.048        1 LINE     68    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:01
0          Routines which emit object code by calling object module 
           building routines (1042/66).
1                                                                                               SUN SEP 08/96   15:24:55   Page  802
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1042/2, 1042/9 
01042/049A  PLUS/470                 OBJECT LIST     SQ  G          S0093A RMDIST FSNAME=PLUS/470.OBJECT_LIST.SQ.045(1)             
            5.1T3    48  PLUS/470.OBJECT_LIST.SQ.049        1 LINE     68    6 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:01
0          Routines which produce the listing of emitted object code. 
01042/050A  PLUS/470                 PLUSLIB         SQ  G          S0093A RMDIST FSNAME=PLUS/470.PLUSLIB.SQ.046(1)                 
            5.1T3    49  PLUS/470.PLUSLIB.SQ.050            1 LINE     39    1 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:02
0          Source library used to compile any of the PLUS compiler source 
           components.  This file simply contains $CONTINUE WITH's for 
           the actual libraries used, namely
            
              SUEN:PARSDECLLIB (1042/55)
              PLUS:LALRPARSE*SL (1080/3)
              PLUS:OBJRTNS*SL (1042/68)
              SUEN:GLOBALLIB (1042/51)
              SUEN:PROCDECLLIB(1042/51)
              *PLUS.SOURCELIB (1042/5)
01042/051A  PLUS/470                 GLOBALLIB       SQ  G          S0093A RMDIST FSNAME=PLUS/470.GLOBALLIB.SQ.047(1)               
            5.1T3    50  PLUS/470.GLOBALLIB.SQ.051          1 LINE     82   34 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:02
0          PLUS library containing global blocks, types, etc. that are required by 
           more than one of the source files. 
0          Referenced by comments of: 1042/50 
01042/052A  PLUS/470                 PROCDECLLIB     SQ  G          S0093A RMDIST FSNAME=PLUS/470.PROCDECLLIB.SQ.048(1)             
            5.1T3    51  PLUS/470.PROCDECLLIB.SQ.052        1 LINE     68   39 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:04
0          Library containing procedure declarations for all procedures constituting
           the PLUS compiler. 
01042/053A  PLUS/470                 GRAMMAR         S   G          S0093A RMDIST FSNAME=PLUS/470.GRAMMAR.S.049(1)                  
            5.1T3    52  PLUS/470.GRAMMAR.S.053             1 LINE    179    5 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:07
0          Grammar for PLUS used as input to the LALR analyzer (1080) 
           to produce the distributed parser tables (1042/54).
            
           The convention is used that non-terminals are surrounded by quotes.
0          Referenced by comments of: 1080/1 
01042/054A  PLUS/470                 PARSER TABLES   OC  G          S0093A RMDIST FSNAME=PLUS/470.PARSER_TABLES.OC.050(1)           
            5.1T3    53  PLUS/470.PARSER_TABLES.OC.054      1 LINE  12760    6 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:08
0          Parser tables generated by UBC LALR (1080) from PLUS grammar. 
0          Referenced by comments of: 1042/53 
1                                                                                               SUN SEP 08/96   15:24:55   Page  803
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/055A  PLUS/470                 PARSER DECLS    SQ  G          S0093A RMDIST FSNAME=PLUS/470.PARSER_DECLS.SQ.051(1)            
            5.1T3    54  PLUS/470.PARSER_DECLS.SQ.055       1 LINE    165    3 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:08
0          PLUS source library generated by UBC LALR (1080) containing 
           declarations for production names, symbol names, table sizes.
0          Referenced by comments of: 1042/50 
01042/056A  PLUS/470                 RESIDENT LIB    OC  G          SEG2:PLUS.RESLIB                                                
            5.1T3    55  PLUS/470.RESIDENT_LIB.OC.056       1 LINE    255   11 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:16
                         SEG2:PLUS.RESLIB     
0          Object code for the PLUS library routines which are in the resident
           system at UBC. The source for these is in PLUS:RESLIB*SQ (1042/57).
            
           This consists of routines which are system and environment
           independent.
            
           Declarations for all routines in the library are in the default source
           library, *PLUS.SOURCELIB (1042/5).
            
           Documentation for these routines is in (1042/73).
            
           Note... these routines and those in SEG2:PLUS.SEG2LIB (1042/60) may be
           combined to form *PLUS.OBJLIB (1042/64) if they are not to be in
           shared VM.
            
           Also, note that the entry point names of all these routines have been
           changed from the previous version. Many have also been changed to use
           R-type parameters. This is accomplished through changes in the
           declarations in *PLUS.SOURCELIB.
            
           See the news file for further details.
            
0          Referenced by comments of: 498/139, 498/145, 1042/64, 1080/17 
01042/057A  PLUS/470                 RESIDENT LIB    SQ  G          PLUS:RESLIB*SQ                                                  
            5.1T3    56  PLUS/470.RESIDENT_LIB.SQ.057       1 LINE     73   23 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:16
0          Current UM source for PLUS library routines in resident system.
0          Referenced by comments of: 1042/56 
01042/058A  PLUS/470                 RESIDENT LIB    SQ  G          PLUS:RESLIB#SQ                                                  
            5.1T3    57  PLUS/470.RESIDENT_LIB.SQ.058       1 LINE     73   23 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:17
0          ********************************************************************
           D5.1 version:
            
           This is the base source as distributed with the first Resource
           Manager distribution.
           ********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  804
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1042/59 
01042/059C  PLUS/470                 RESIDENT LIB    UC  G          PLUS:RESLIB*UQ                                                  
            5.1T3    58  PLUS/470.RESIDENT_LIB.UC.059       1 LINE     68    1 PAGE UM   BURLING             JULY 23, 1983  15:15:18
0          Updates used to produce current UM source for resident library
           from (1042/58).
01042/060A  PLUS/470                 SEG2 LIB        OC  G          SEG2:PLUS.SEG2LIB                                               
            5.1T3    59  PLUS/470.SEG2_LIB.OC.060           1 LINE   5636   12 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:18
                         SEG2:PLUS.SEG2LIB    
0          Routines which are pistled into shared VM (entries in CCSYMBOL) at
           UBC. 
            
0          Referenced by comments of: 1042/56, 1042/64, 1089/16 
01042/061A  PLUS/470                 SEG2 LIB        SQ  G          PLUS:SEG2LIB*SQ                                                 
            5.1T3    60  PLUS/470.SEG2_LIB.SQ.061           1 LINE     88   32 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:19
0          Current UM source for the PLUS library routines which are post-ipl loaded. 
01042/062C  PLUS/470                 SEG2 LIB        SQ  G          PLUS:SEG2LIB#SQ                                                 
            5.1T3    61  PLUS/470.SEG2_LIB.SQ.062           1 LINE     88   15 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:20
0          ********************************************************************
           D5.1 version:
            
           This is the base source as distributed with the first Resource
           Manager distribution.
           ********************************************************************
0          Referenced by comments of: 1042/63 
01042/063C  PLUS/470                 SEG2 LIB        UC  G          PLUS:SEG2LIB*UQ                                                 
            5.1T3    62  PLUS/470.SEG2_LIB.UC.063           1 LINE     68   18 PAGE UM   BURLING             JULY 23, 1983  15:15:21
0          Updates used to produce current UM source for SEG2 library from (1042/62).
01042/064C  PLUS/470                 *PLUS.OBJLIB    OC  G          *PLUS.OBJLIB                                                    
            5.1T3    63  PLUS/470.?PLUS.OBJLIB.OC.064       1 LINE     24    1 PAGE UM   BURLING             JULY 23, 1983  15:15:22
                         *PLUS.OBJLIB         
0          Contains loader cards to force reference to PISTLEd PLUS run-time
           libraries, (1042/56) and (1042/60).
0          Referenced by comments of: 1000/39, 1036/1, 1042/5, 1042/56, 1089/2 
01042/065A  PLUS/470                 ENDJUNK         OC             S0093A RMDIST FSNAME=PLUS/470.ENDJUNK.OC.056(1)                 
            5.1T3    64  PLUS/470.ENDJUNK.OC.065            1 LINE     24    1 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:13
0          Loader records that reference CCSYMBOL and the PLUS low core PRV. 
           Normally, these are generated automatically by the PLUS compiler.  See
1                                                                                               SUN SEP 08/96   15:24:55   Page  805
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          NEWS file. 
            
01042/066   PLUS/470                 LIBRARY         L   G          S1644 5.0BT1 VLO FSNAME=PLUS/470.LIBRARY.L.060(1)            951
            5.0BT1  951  PLUS/470.LIBRARY.L.060             1 LINE    132  137 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:06:59
0          Listing of PLUS library routines. 
           $COPY with PAGES=250.
0          Referenced by comments of: 1042/48 
01042/067A  PLUS/470                 OBJECT RTNS     SQ  G          PLUS:OBJRTNS*SQ                                                 
            5.1T3    65  PLUS/470.OBJECT_RTNS.SQ.067        1 LINE     68   14 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:23
0          Routines that can be used to build and punch MTS object modules. 
            
           These have been separated out from the PLUS compiler so they can 
           used by other programs too.  Currently, they are used by
           the UBC LALR analyzer (1080) and by *CLPARSER (1076) as well as both PLUS 
           compilers.
            
           The routines require some storage management routines.  A set 
           are provided in PLUS:MISC*OL (1042/89), although these are 
           not used by the PLUS compiler, which has its own. The PLUS compiler 
           also does not use the routine Punch_Record which is included
           in this file. 
            
           To compile these routines, unit 0 must specify the following 
           three libraries:
               PLUS:OBJRTNS*SL  (1042/68)
               PLUS:MISC*SL     (1042/88)
               *PLUS.SOURCELIB   (1042/5)
            
           There have been a few minor changes since the RD5.0A distribution. 
            
0          Referenced by comments of: 1042/68, 1042/87 
01042/068A  PLUS/470                 OBJECT RTNS     SQ  G          PLUS:OBJRTNS*SQL                                                
            5.1T3    66  PLUS/470.OBJECT_RTNS.SQ.068        1 LINE     68    3 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:24
0          Library containing declarations for the object module routines 
           (1042/67).  This library is required to compile the routines or 
           to compile any program using the routines. 
0          Referenced by comments of: 1042/50, 1042/67, 1076/2, 1080/19 
01042/069A  PLUS/470                 OBJECT RTNS     OL  G          PLUS:OBJRTNS*OL                                                 
            5.1T3    67  PLUS/470.OBJECT_RTNS.OL.069        1 LINE    806    4 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:24
0          Object library containing the PLUS object module routines. 
            
           This version compiled for use with the new PLUS library routines. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  806
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1076/1, 1080/13, 1080/17 
01042/070A  PLUS/470                 WRITEUP         WF  G          S0093A RMDIST FSNAME=PLUS/470.WRITEUP.WF.060(1)                 
            5.1T3    68  PLUS/470.WRITEUP.WF.070            1 LINE    144   68 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:15
0          FMT source for PLUS writeup. 
            
           Contains reference to STAF:FMTLIB at line 1, which will need changing
           elsewhere. (STAF:FMTLIB is the former JON:MACLIB -- at UM
           it's (308/18).) It isn't included with this distribution, because
           previous distributions should still be O.K.)
            
           The writeup corresponds to version 22 of PLUS/470, version 10 of PLUS-11.
           It has NOT been updated for the latest round of changes. 
            
           See the NEWS file for details of the latest changes. 
0          Referenced by comments of: 1042/81, 1042/84 
01042/071A  PLUS/470                 WRITEUP         PF  G          S0093A RMDIST FSNAME=PLUS/470.WRITEUP.PF.061(1)                 
            5.1T3    69  PLUS/470.WRITEUP.PF.071            1 LINE     78   85 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:37
0           $COPYable form of PLUS writeup.  Allow 130 pages, TN printer. 
            
01042/072A  PLUS/470                 LIB WRITEUP     WF  G          S0093A RMDIST FSNAME=PLUS/470.LIB_WRITEUP.WF.062(1)             
            5.1T3    70  PLUS/470.LIB_WRITEUP.WF.072        1 LINE    135   50 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:45
0          FMT source for writeup describing *PLUS.SOURCELIB (1042/5) contents.
           Note this is now in FMT.  It references STAF:FMTLIB, formerly known as 
           JON:MACLIB (308/18) at UM. 
            
           This has not been updated for the current version.  There are a few additions
           to the library that are therefore undocumented.
            
01042/073A  PLUS/470                 LIB WRITEUP     PF  G          S0093A RMDIST FSNAME=PLUS/470.LIB_WRITEUP.PF.063(1)             
            5.1T3    71  PLUS/470.LIB_WRITEUP.PF.073        1 LINE     74   65 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:50
0          $COPYable form of writeup for *PLUS.SOURCELIB (1042/5).
           Allow 130 pages, TN printer. 
            
0          Referenced by comments of: 1042/56 
01042/074   PLUS/470                 BUGLIST         P              S1644 5.0BT1 VLO FSNAME=PLUS/470.BUGLIST.P.068(1)            959
            5.0BT1  959  PLUS/470.BUGLIST.P.068             1 LINE     68    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:20
0          Description of known bugs in the current (version 24) compiler. 
01042/075A  PLUS/470                 NEWS            P   G          S0093A RMDIST FSNAME=PLUS/470.NEWS.P.064(1)                     
            5.1T3    72  PLUS/470.NEWS.P.075                1 LINE     74    8 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:56
0          News file for PLUS. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  807
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This describes the changes that have been made since the RD5.0A 
           (version 22) distribution of PLUS.
            
           The PLUS writeup does not include these changes, so this is a required
           supplement to the manual. 
0          Referenced by comments of: 1042/1 
01042/076   PLUS/470                 WORKLIST        P              S1644 5.0BT1 VLO FSNAME=PLUS/470.WORKLIST.P.070(1)           961
            5.0BT1  961  PLUS/470.WORKLIST.P.070            1 LINE     63    4 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:22
0          This is a file containing a list of things we hope to do 
           with PLUS. 
            
           This is intended for use by the PLUS implementors, and is 
           probably not very comprehensible to anyone else, but
           may give some idea of current plans. 
01042/077   PLUS/470                 CHANGELOG       P              S1644 5.0BT1 VLO FSNAME=PLUS/470.CHANGELOG.P.071(1)          962
            5.0BT1  962  PLUS/470.CHANGELOG.P.071           1 LINE     73   17 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:23
0          This file contains a history of (almost) all changes 
           to the compiler since the first (D4.2) distribution. 
            
           It is mainly of interest to the compiler implementors,
           since the NEWS file details the changes that are visible
           to users of PLUS. 
            
01042/078A  PLUS/470                 REBUILD CMDS    C              S0093A RMDIST FSNAME=PLUS/470.REBUILD_CMDS.C.065(1)             
            5.1T3    73  PLUS/470.REBUILD_CMDS.C.078        1 LINE    157    3 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:57
0          This file contains a complete sample batch job to rebuild the PLUS compiler 
           from scratch.  It compiles the entire compiler, then verifies the compilation
           by using it to compile itself again. 
           It also rebuilds the library.
            
           This procedure is used at UBC when installing a new version. 
           It will need changing for use elsewhere. 
            
           See installation notes, and $COMMENT lines in the command file.
0          Referenced by comments of: 1042/9 
01042/079A  PLUS/470                 INSTALL CMDS    C              S0093A RMDIST FSNAME=PLUS/470.INSTALL_CMDS.C.066(1)             
            5.1T3    74  PLUS/470.INSTALL_CMDS.C.079        1 LINE     68    1 PAGE UBC  BALLARD   BURLING   MAY  05, 1983  08:25:57
0          Batch job used after generating a new private version of the PLUS 
           compiler and library (as with SUEN:REBUILD.C), to install it as the new 
           public version, producing appropriate backup etc. 
            
           It will need changes for use elsewhere. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  808
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/080   PLUS/470                 COMPARE         SS             S1644 5.0BT1 VLO FSNAME=PLUS/470.COMPARE.SS.074(1)           965
            5.0BT1  965  PLUS/470.COMPARE.SS.074            1 LINE     62    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:26
0          This is a SPITBOL GLP which we use in bootstrapping a new version of the 
           compiler, to verify that the first compilation and the second one resulted
           in the same object decks.  It just compares the two files, ignoring END 
           records.
            
           Note: 
           This program will probably require changing if it is to be 
           used elsewhere since it uses a library routine MTSLNR() which probably isn't
           in anybody else's Spitbol in order to get the source line number of lines 
           read. 
            
           Unchanged since D4.2 distribution of PLUS. 
01042/081A  PLUS/470                 LIB GENERATOR   OE  G          PLUS:LIBGEN                                                     
            5.1T3    75  PLUS/470.LIB_GENERATOR.OE.081      1 LINE   1404    6 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:34
0           
           A PLUS GLP that can be used to generate a PLUS source library from an old 
           library, or from a file with library members but no directory. 
           This is useful for initially creating a library, or for cleaning up the 
           line-numbers, recreating it if accidently renumbered etc. 
            
           This is self-contained link-edited object.  The program consists of 
           PLUS source (1042/82) and a CLPARSER grammar (1042/83).
            
           The complete object requires *CLPARSER (1076/5) and 
           PLUS:MISC*OL (1042/89) in addition to PLUS library routines.
            
           For documentation, see the current PLUS writeup (1042/70).
01042/082A  PLUS/470                 LIB GENERATOR   SQ  G          PLUS:LIBGEN*SQ                                                  
            5.1T3    76  PLUS/470.LIB_GENERATOR.SQ.082      1 LINE     68    7 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:34
0          PLUS source for library generator.  Compile with following libraries: 
                *CLPARSELIB (1076/10)
                PLUS:MISC*SL (1042/88)
                *PLUS.SOURCELIB (1042/5)
0          Referenced by comments of: 1042/81 
01042/083A  PLUS/470                 LIB GENERATOR   SR  G          PLUS:LIBGEN*SR                                                  
            5.1T3    77  PLUS/470.LIB_GENERATOR.SR.083      1 LINE     76    1 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:35
0          Grammar used by library generator.  This is in the form expected by 
           *CLPARSEGEN (1076/1). 
            
0          Referenced by comments of: 1042/81 
1                                                                                               SUN SEP 08/96   15:24:55   Page  809
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01042/084   PLUS/470                 LIB LISTER      OE  G          S1644 5.0BT1 VLO FSNAME=PLUS/470.LIB_LISTER.OE.078(1)        969
            5.0BT1  969  PLUS/470.LIB_LISTER.OE.078         1 LINE   9930    4 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:29
0          This is a GLP that may be used to list a PLUS source library, one member
           per page, with titles. 
            
           It is described in PLUS writeup (1042/70). 
            
           This is self-contained link-edited object. 
            
           (Note... a new version has been produced by a student at UBC. It produces
           multiple members per page and has various other improvements, but isn't 
           yet ready for distribution.  I expect to include it on the next 
           PLUS distribution.) 
            
01042/085   PLUS/470                 LIB LISTER      SQ  G          S1644 5.0BT1 VLO FSNAME=PLUS/470.LIB_LISTER.SQ.079(1)        970
            5.0BT1  970  PLUS/470.LIB_LISTER.SQ.079         1 LINE     68    4 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:30
0          Complete source for the library listing GLP. 
01042/086   PLUS/470                 EXAMPLE         SQ  G          S1644 5.0BT1 VLO FSNAME=PLUS/470.EXAMPLE.SQ.080(1)           971
            5.0BT1  971  PLUS/470.EXAMPLE.SQ.080            1 LINE     68    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:08:30
0          Simple example of PLUS program that performs Towers of Hanoi. 
0          Referenced by comments of: 1084/2 
01042/087A  PLUS/470                 MISC RTNS       SQ  G          PLUS:MISC*SQ                                                    
            5.1T3    78  PLUS/470.MISC_RTNS.SQ.087          1 LINE     82    7 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:35
0          This is source for a collection of auxiliary PLUS subroutines that 
           are getting used in various places, but which we don't think belong 
           in the standard PLUS library support. 
            
           The routines currently in this file are:
            1) various procedures for allocating arrays and linked lists. 
            2) a routine to do FILESTATUS-like file name generation. 
            
           The array and list routines, or substitutes for them, are required by the 
           object module punching routines (1042/67).  (Note the compiler
           provides substitutes -- it does not use these ones.)
            
           Compile with 0=MISC*SL+*PLUS.SOURCELIB
                          (1042/88)    (1042/5)
            
           This file was formerly called PLUS:UTILITY*S. 
0          Referenced by comments of: 1042/89, 1089/2 
01042/088A  PLUS/470                 MISC RTNS       SQ  G          PLUS:MISC*SQL                                                   
            5.1T3    79  PLUS/470.MISC_RTNS.SQ.088          1 LINE     68    8 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:35
0          PLUS Source library containing the declarations for the above routines. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  810
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Also includes some macros for kludging floating-point operations from
           PLUS. 
            
           This library is used when compiling the routines, or by any program that 
           calls the routines.
            
           This library was formerly called PLUS:UTILITY*SL
0          Referenced by comments of: 1042/67, 1042/82, 1042/87, 1076/2, 1089/9 
01042/089A  PLUS/470                 MISC RTNS       OL  G          PLUS:MISC*OL                                                    
            5.1T3    80  PLUS/470.MISC_RTNS.OL.089          1 LINE   1994    5 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:15:36
0          Object library containing the miscellaneous routines from (1042/87).
            
           This version has been recompiled for use with the new PLUS library.
            
0          Referenced by comments of: 1042/67, 1042/81, 1076/1 
01042/090   PLUS/470                 STATSCAN        OE  O          S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.OE.084(1)          975
            5.0BT1  975  PLUS/470.STATSCAN.OE.084           1 LINE  32767   18 PAGE UM   BURLING             JULY 26, 1982  20:08:33
0          This is a program to scan through the log file produced 
           by the PLUS compiler (PLUS:PLUSLOG) and allow one to find out 
           some things about the use. 
            
           Documentation is provided by the HELP command.
            
           Requires the file PLUS:STATSCANHELP (1042/93).
            
0          Referenced by comments of: 1042/93 
01042/091   PLUS/470                 STATSCAN        SQ  O          S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.SQ.085(1)          976
            5.0BT1  976  PLUS/470.STATSCAN.SQ.085           1 LINE    115   13 PAGE UM   BURLING             JULY 26, 1982  20:08:34
0          PLUS source for log-file scanner. 
            
           To compile, requires Clparser library (1076/11) and *PLUS.SOURCELIB.
01042/092   PLUS/470                 STATSCAN        S   O          S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.S.086(1)           977
            5.0BT1  977  PLUS/470.STATSCAN.S.086            1 LINE     84    3 PAGE UM   BURLING             JULY 26, 1982  20:08:35
0          Grammar for log-file scanner command language (input to
           *CLPARSEGEN). 
            
01042/093   PLUS/470                 STATSCAN        D   O          S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.D.087(1)           978
            5.0BT1  978  PLUS/470.STATSCAN.D.087            1 LINE     68    2 PAGE UM   BURLING             JULY 26, 1982  20:08:36
0          Help file used by HELP command when running PLUS:STATSCAN (1042/90).
0          Referenced by comments of: 1042/90 
1                                                                                               SUN SEP 08/96   15:24:55   Page  811
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01043/001   JVCT                                                  # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           CONVERT A BCD TIME/DATE TO JULIAN MICROSECONDS SINCE MARCH 1, 1900.
01044/001   JMSBTDR                                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           CONVERT FROM JULIAN MICROSECONDS TO BINARY GREGORIAN TIME, A FORMAT IN
           WHICH EACH COMPONENT OF THE TIME (YEAR, MONTH, DAY, HOUR, MINUTE, AND SO
           ON) HAS ITS OWN FULLWORD.
01045/001   BTDJMSR                                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           CONVERT FROM BINARY GREGORIAN TIME TO STANDARD MTS JULIAN MICROSECONDS.
01046/001   DAYDAT                                                # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           CONVERT MM-DD-YY TO MMM DD, YYYY.
01047/001   PRINTER DSR                                           # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A NEW
           1403/1443 PRINTER DSR.
01048/001   S                                                     # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE
           TO PRINT THE NEAREST RESIDENT SYMBOL GIVEN AN ADDRESS OR THE ADDRESS NEAREST
           A GIVEN SYMBOL.
01049/001   PRINT_MODIFIERS                                       # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO
           PRINT THE INTEGER/HEXADECIMAL EQUIVALENTS OF A GIVEN SET OF MODIFIERS.
01050/001C  PLUS-11                  COMPILER        OC  O          PLUS:PLUS11                                                     
            5.1T3    81  PLUS-11.COMPILER.OC.001            1 LINE  32767   86 PAGE UBC  FOX       EADIE     JULY 23, 1983  15:15:36
0          **********************************************************************
           D5.1 version:
            
           Version 12/4 of the PLUS-11 compiler. PLUS-11 is a cross compiler,
           running under MTS, generating code for PDP-11's.
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  812
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          This file contains references to the files PLUS:PLUSLOG11,
           PLUS:PLUSMSG11 (1052/2) and PLUS:SOURCELIB11 (1050/3), which may need
           changing with the editor for use elsewhere.
            
           The object modules produced by PLUS-11 are in the form of input to
           LINK11 (516/2).
           **********************************************************************
0          Referenced by comments of: 516/1 
01050/002C  PLUS-11                  MESSAGES        M   O          PLUS:PLUSMSG11                                                  
            5.1T3    82  PLUS-11.MESSAGES.M.002             1 LINE    147    8 PAGE UBC  FOX       EADIE     JULY 23, 1983  15:15:39
0          This is the message file used by installed PLUS-11 compiler.
01050/003C  PLUS-11                  SOURCELIB       SQ  O          PLUS:SOURCELIB11                                                
            5.1T3    83  PLUS-11.SOURCELIB.SQ.003           1 LINE     68    4 PAGE UBC  FOX       EADIE     JULY 23, 1983  15:15:39
0          **********************************************************************
           D5.1 version:
            
           This is the default source-library used by PLUS-11 if no library is
           specified on the $RUN command.
           **********************************************************************
0          Referenced by comments of: 1042/4, 1050/1 
01050/004C  PLUS-11                  LIBRARY         OC             PLUS:OBJLIB11                                                   
            5.1T3    84  PLUS-11.LIBRARY.OC.004             1 LINE     80    4 PAGE UBC  FOX       EADIE     JULY 23, 1983  15:15:39
0          Referenced by comments of: 1050/5, 1050/6 
01050/005C  PLUS-11                  LIBRARY         SQ             S0999 5.0AT1 VLO FSNAME=PLUS-11.LIBRARY.SQ.009(1)            729
            5.1T3    85  PLUS-11.LIBRARY.SQ.005             1 LINE     74    6 PAGE UBC  FOX       EADIE     JAN. 22, 1982  17:52:15
0          PLUS source for routines in PLUS:OBJLIB11 (1050/4).
01050/006C  PLUS-11                  LIBRARY         SA             S0999 5.0AT1 VLO FSNAME=PLUS-11.LIBRARY.SA.010(1)            730
            5.1T3    86  PLUS-11.LIBRARY.SA.006             1 LINE     69    9 PAGE UBC  FOX       EADIE     JAN. 22, 1982  17:52:17
0          *11ASR source for code in PLUS:OBJLIB11 (1050/4).
01050/007C  PLUS-11                  EXAMPLE         SQ             S0999 5.0AT1 VLO FSNAME=PLUS-11.EXAMPLE.SQ.011(1)            731
            5.1T3    87  PLUS-11.EXAMPLE.SQ.007             1 LINE    103    7 PAGE UBC  BALLARD   EADIE     JAN. 22, 1982  17:52:19
0          Sample PLUS-11 program for finding word-squares.
01050/008C  PLUS-11                  EXAMPLE         SQ             S0999 5.0AT1 VLO FSNAME=PLUS-11.EXAMPLE.SQ.012(1)            732
            5.1T3    88  PLUS-11.EXAMPLE.SQ.008             1 LINE     65    1 PAGE UBC  BALLARD   EADIE     JAN. 22, 1982  17:52:21
0          Sample PLUS-11 program to perform Towers of Hanoi.
1                                                                                               SUN SEP 08/96   15:24:55   Page  813
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01051/001A  VIRTUAL I/O              OBJECT          OL  O          TMTS:VDVLIBRARY                                                 
            5.1T3    89  VIRTUAL_I/O.OBJECT.OL.001          1 LINE   7940   47 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:15:45
                         TMTS:VDVLIBRARY      
0          This component contains routines used to implement virtual devices. It is
           used by the UBC Virtual Machine (component 1079), VSS (component 1078),
           and other components.
            
           The virtual channel and device object is present in a loader library format
           for applications which need to use only a subset of the devices which can be
           simulated.
            
           Note that in order to use virtual 2501 reader or virtual 3270, the Resource
           Manager Intertask line and node DSPs are used, and hence the object for the
           DSP library (1041/1), the CFM routine (1041/10), and the Subtasking Monitor
           (1058) must also be present.
0          Referenced by comments of: 1051/36, 1051/39, 1078/44, 1079/1 
01051/002A  VIRTUAL I/O              MACROS          SA  O          TMTS:VDVMACBASE(-10000,-1)                                      
            5.1T3    90  VIRTUAL_I/O.MACROS.SA.002          1 LINE     80   20 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:15:48
0          Base source for virtual I/O macro library.
01051/003A  VIRTUAL I/O              MACROS          UC  O          TMTS:VDVMACBASE(1000)                                           
            5.1T3    91  VIRTUAL_I/O.MACROS.UC.003          1 LINE     68    1 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:15:49
0          Update deck to be applied to the previously distributed source to yield the
           current source.  Running *MACUTIL (738) on this produces the library in 
           (1051/4).
01051/004A  VIRTUAL I/O              MACROS          SM  O          TMTS:VDVMACROS                                                  
            5.1T3    92  VIRTUAL_I/O.MACROS.SM.004          1 LINE     72   20 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:15:49
0          Macro library used for assembling the virtual channel, I/O devices, and 
           disk file simulator.
0          Referenced by comments of: 1051/3, 1051/5, 1051/7, 1051/9, 1051/11, 1051/13, 1051/15, 1051/17, 1051/19, 1051/21,
                 1051/23, 1051/25, 1051/27, 1051/29, 1051/31, 1051/34, 1051/37, 1051/42 
01051/005A  VIRTUAL I/O              VCHANNEL        SA  O          TMTS:VDVCHANNEL(-10000,-1)                                      
            5.1T3    93  VIRTUAL_I/O.VCHANNEL.SA.005        1 LINE     80   39 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:15:50
0          This routine is the virtual channel, which simulates a subset of the IBM 370
           I/O channel functions. Assemble with OLD:CC.MACROS (1054/4) and the Virtual
           I/O macros (1051/4).
01051/006A  VIRTUAL I/O              VCHANNEL        UC  O          TMTS:VDVCHANNEL(1000)                                           
            5.1T3    94  VIRTUAL_I/O.VCHANNEL.UC.006        1 LINE     68    1 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:15:53
0          Update deck to be applied to the previously distributed source to yield the
           current source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  814
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01051/007A  VIRTUAL I/O              VDV1052         SA  O          TMTS:VDV1052(-10000,-1)                                         
            5.1T3    95  VIRTUAL_I/O.VDV1052.SA.007         1 LINE     79    7 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:54
0          Routine to simulate a 1052 device or equivalent. Assemble with
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual
           Machine macros (1079/22).
0          Referenced by comments of: 1051/37 
01051/008A  VIRTUAL I/O              VDV1052         UC  O          TMTS:VDV1052(1000)                                              
            5.1T3    96  VIRTUAL_I/O.VDV1052.UC.008         1 LINE     72    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:54
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01051/009A  VIRTUAL I/O              VDV3270         SA  O          TMTS:VDV3270(-10000,-1)                                         
            5.1T3    97  VIRTUAL_I/O.VDV3270.SA.009         1 LINE     78   12 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:54
0          Routine to simulate an IBM 3270 device using intertask to talk to a program
           running in another task. The other program simulates the device using 3270
           binary I/O. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros
           (1051/4), the UBC Virtual Machine macros (1079/22), and the DSP macros
           (1041/9). Copies *GDINFODSECT (594).
01051/010A  VIRTUAL I/O              VDV3270         UC  O          TMTS:VDV3270(1000)                                              
            5.1T3    98  VIRTUAL_I/O.VDV3270.UC.010         1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:55
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01051/011A  VIRTUAL I/O              VDV1403         SA  O          TMTS:VDV1403(-10000,-1)                                         
            5.1T3    99  VIRTUAL_I/O.VDV1403.SA.011         1 LINE     72   10 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:55
0          Routine to simulate an IBM 1403 device or equivalent. Assemble with
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual
           Machine macros (1079/22). Copies *GDINFODSECT (594).
01051/012A  VIRTUAL I/O              VDV1403         UC  O          TMTS:VDV1403(1000)                                              
            5.1T3   100  VIRTUAL_I/O.VDV1403.UC.012         1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:56
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/013A  VIRTUAL I/O              VDV2540         SA  O          TMTS:VDV2540(-10000,-1)                                         
            5.1T3   101  VIRTUAL_I/O.VDV2540.SA.013         1 LINE     78    9 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:56
0          Routine to simulate an IBM 2540 device or equivalent. Assemble with
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual
           Machine macros (1079/22). Copies *GDINFODSECT (594).
01051/014A  VIRTUAL I/O              VDV2540         UC  O          TMTS:VDV2540(1000)                                              
            5.1T3   102  VIRTUAL_I/O.VDV2540.UC.014         1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:57
0          Update deck to be applied to the previously distributed source to yield the
1                                                                                               SUN SEP 08/96   15:24:55   Page  815
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          current source.
01051/015A  VIRTUAL I/O              VDV3420         SA  O          TMTS:VDV3420(-10000,-1)                                         
            5.1T3   103  VIRTUAL_I/O.VDV3420.SA.015         1 LINE     72   13 PAGE UBC  WHALEY    HELFFRICH JULY 23, 1983  15:15:57
0          Routine to simulate an IBM 3420 device or equivalent. Assemble with
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual
           Machine macros (1079/22). Copies *GDINFODSECT (594).
01051/016A  VIRTUAL I/O              VDV3420         UC  O          TMTS:VDV3420(1000)                                              
            5.1T3   104  VIRTUAL_I/O.VDV3420.UC.016         1 LINE     68    1 PAGE UBC  WHALEY    HELFFRICH JULY 23, 1983  15:15:58
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01051/017A  VIRTUAL I/O              VDV2501         SA  O          TMTS:VDV2501(-10000,-1)                                         
            5.1T3   105  VIRTUAL_I/O.VDV2501.SA.017         1 LINE     72   16 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:15:58
0          This is a special virtual device that accepts file names from an intertask
           network and submits the contents of the file to the virtual machine as if it
           were a card deck put in a 2501 reader device. The virtual device was written
           to allow jobs to be submitted to an operating system running in the virtual
           machine. See notes at the front of the component. Assemble with
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), the UBC Virtual
           Machine macros (1079/22), and the DSP macros (1041/9).
0          Referenced by comments of: 1051/31 
01051/018A  VIRTUAL I/O              VDV2501         UC  O          TMTS:VDV2501(1000)                                              
            5.1T3   106  VIRTUAL_I/O.VDV2501.UC.018         1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:01
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/019A  VIRTUAL I/O              VDV2701         SA  O          TMTS:VDV2701(-10000,-1)                                         
            5.1T3   107  VIRTUAL_I/O.VDV2701.SA.019         1 LINE     68    7 PAGE UBC  O'REILLY  HELFFRICH JULY 23, 1983  15:16:01
0          Routine to simulate 2701/PDA as used by UBC's Front End Processors. Calls the
           virtual PDP/11 (1051/21). Assemble with OLD:CC.MACROS (1054/4), the Virtual
           I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22).
0          Referenced by comments of: 1051/21 
01051/020A  VIRTUAL I/O              VDV2701         UC  O          TMTS:VDV2701(1000)                                              
            5.1T3   108  VIRTUAL_I/O.VDV2701.UC.020         1 LINE     68    1 PAGE UBC  O'REILLY  HELFFRICH JULY 23, 1983  15:16:02
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/021A  VIRTUAL I/O              VDVUBCFEP       SA  S          TMTS:VDVUBCFEP(-10000,-1)                                       
            5.1T3   109  VIRTUAL_I/O.VDVUBCFEP.SA.021       1 LINE     68   19 PAGE UBC  O'REILLY  HELFFRICH JULY 23, 1983  15:16:02
0          Routine to simulate communication with a UBC PDP11/40 FEP using UBC's FEP
           protocol. Called by the virtual 2701 routines (1051/19). Assemble with
1                                                                                               SUN SEP 08/96   15:24:55   Page  816
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and COPY:FECP.LIB*M,
           which was not distributed by UBC.
0          Referenced by comments of: 1051/19 
01051/022A  VIRTUAL I/O              VDVUBCFEP       UC  S          TMTS:VDVUBCFEP(1000)                                            
            5.1T3   110  VIRTUAL_I/O.VDVUBCFEP.UC.022       1 LINE     68    1 PAGE UBC  O'REILLY  HELFFRICH JULY 23, 1983  15:16:03
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/023A  VIRTUAL I/O              VDVDASD         SA  O          TMTS:VDVDASD(-10000,-1)                                         
            5.1T3   111  VIRTUAL_I/O.VDVDASD.SA.023         1 LINE     81   16 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:04
0          This routine interprets CCWs for IBM 3330 and 3350 device types and calls the
           disk file simulator (1051/27) to do the actual simulation. Assemble using
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual
           Machine macros (1079/22).
01051/024A  VIRTUAL I/O              VDVDASD         UC  O          TMTS:VDVDASD(1000)                                              
            5.1T3   112  VIRTUAL_I/O.VDVDASD.UC.024         1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:06
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/025A  VIRTUAL I/O              VDV2305         SA  O          TMTS:VDV2305(-10000,-1)                                         
            5.1T3   113  VIRTUAL_I/O.VDV2305.SA.025         1 LINE     72   15 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:06
0          This routine interprets CCWs for IBM 2305 devices and calls the disk file
           simulator (1051/27) to do the actual simulation. Assemble using
           OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual
           Machine macros (1079/22).
01051/026A  VIRTUAL I/O              VDV2305         UC  O          TMTS:VDV2305(1000)                                              
            5.1T3   114  VIRTUAL_I/O.VDV2305.UC.026         1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:07
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/027A  VIRTUAL I/O              VDVDFS          SA  O          TMTS:VDVDFS(-10000,-1)                                          
            5.1T3   115  VIRTUAL_I/O.VDVDFS.SA.027          1 LINE     80   59 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:16:07
0          Disk file simulator routines. Used by 1051/12 and 1051/13. These routines
           simulate 3330-type disk devices using a line file data structure which must
           by initialized by the preformat program (1051/36). Assemble using
           OLD:CC.MACROS (1054/4) and the Virtual I/O macros (1051/4).
0          Referenced by comments of: 1051/23, 1051/25 
01051/028A  VIRTUAL I/O              VDVDFS          UC  O          TMTS:VDVDFS(1000)                                               
            5.1T3   116  VIRTUAL_I/O.VDVDFS.UC.028          1 LINE     68    1 PAGE UBC  BERRYMAN  HELFFRICH JULY 23, 1983  15:16:11
0          Update deck to be applied to previously distributed source to yield current
           source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  817
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01051/029A  VIRTUAL I/O              VDV3370         SA  O          TMTS:VDV3370(-10000,-1)                                         
            5.1T3   117  VIRTUAL_I/O.VDV3370.SA.029         1 LINE     72   15 PAGE RPI  MCKENNEY  HELFFRICH JULY 23, 1983  15:16:11
0          This routine simulates an IBM 3370 disk. Assemble with OLD:CC.MACROS (1054/4),
           the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros
           (1079/22).
01051/030A  VIRTUAL I/O              VDV3370         UC  O          TMTS:VDV3370(1000)                                              
            5.1T3   118  VIRTUAL_I/O.VDV3370.UC.030         1 LINE     68    1 PAGE RPI  MCKENNEY  HELFFRICH JULY 23, 1983  15:16:12
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/031A  VIRTUAL I/O              2501 SUBMIT     SA  O          TMTS:VDV2501SLAVE(-10000,-1)                                    
            5.1T3   119  VIRTUAL_I/O.2501_SUBMIT.SA.031     1 LINE     72    5 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:12
0          This is a test program to submit file names, or jobs, over an intertask
           network to the virtual 2501 reader (1051/17). Assemble using OLD:CC.MACROS
           (1054/4), COPY:MNTR.MACROS (1058/30), and the DSP macros (1041/9), the UBC
           Virtual Machine macros (1079/22), the virtual I/O macros (1051/4),
           COPY:IT:MACROS (1081/6), and COPY:MISC.MACROS (728).  Copies
           COPY:IT.DSECTS (1081/4).
0          Referenced by comments of: 1051/33 
01051/032A  VIRTUAL I/O              2501 SUBMIT     UC  O          TMTS:VDV2501SLAVE(1000)                                         
            5.1T3   120  VIRTUAL_I/O.2501_SUBMIT.UC.032     1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:13
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/033A  VIRTUAL I/O              2501 SUBMIT     OC  O          TMTS:VDV2501SLAVE(1,999)                                        
            5.1T3   121  VIRTUAL_I/O.2501_SUBMIT.OC.033     1 LINE     80    5 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:13
0          Object for (1051/31). Must be run with the Subtasking Monitor (1058).
           Contains $CONTINUE WITH TMTS:DSPLIBRARY (1041/1) + DMGR:MNTRMMSG (1041/10) +
           COPY:CCSYMBOLS (579/12) + COPY:CCSYMBOL (579/9).
01051/034A  VIRTUAL I/O              PREFMT          SA  O          TMTS:VDVPREFMT(-10000,-1)                                       
            5.1T3   122  VIRTUAL_I/O.PREFMT.SA.034          1 LINE     69    4 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:13
0          Program that calls the disk file simulator routines to write standard
           record 0 on each track of an empty virtual disk file. It also contains
           an option to format an empty virtual disk file for use as a 2305 paging
           device.  Assemble with OLD:CC.MACROS (1054/4) and the Virtual I/O macros
           (1051/4). 
0          Referenced by comments of: 1051/36 
01051/035A  VIRTUAL I/O              PREFMT          UC  O          TMTS:VDVPREFMT(1000)                                            
            5.1T3   123  VIRTUAL_I/O.PREFMT.UC.035          1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:13
0          Update deck to be applied to previously distributed source to yield current
           source.
1                                                                                               SUN SEP 08/96   15:24:55   Page  818
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01051/036A  VIRTUAL I/O              PREFMT          OC  O          TMTS:VDVPREFMT(1,999)                                           
            5.1T3   124  VIRTUAL_I/O.PREFMT.OC.036          1 LINE     80    3 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:14
0          Object for (1051/34). Must be run along with (1051/1) and the DSP library
           (1041/1). Requires COPY:CCSYMBOL (579/9).
0          Referenced by comments of: 1051/27 
01051/037   VIRTUAL I/O              3270 SLAVE      SA  G          TMTS:VDV3270SLAVE(-10000,-1)                                    
            5.0T3  1331  VIRTUAL_I/O.3270_SLAVE.SA.020      1 LINE     72    9 PAGE UBC  BOWLER    HELFFRICH AUG. 06, 1981  05:48:13
            5.0T9   187                       
0          Companion program to (1051/7). See (1079/23) for description. This program
           talks over an intertask line to the virtual 3270 device in the virtual machine
           and simulates a 3270 using binary I/O to the *MSOURCE* device. Assemble using
           OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), the DSP macros (1041/9),
           the UBC Virtual Machine macros (1079/22), the Virtual I/O macros (1051/4),
           COPY:IT.MACROS (1081/6), and COPY:MISC.MACROS (728).  Copies
           COPY:IT.DSECTS (1081/4).
01051/038C  VIRTUAL I/O              3270 SLAVE      UC  G          TMTS:VDV3270SLAVE(1000)                                         
            5.1T3   125  VIRTUAL_I/O.3270_SLAVE.UC.038      1 LINE     72    3 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:14
0          Update deck to be applied to previously distributed source to yield current
           source.
01051/039A  VIRTUAL I/O              3270 SLAVE      OC  G          TMTS:VDV3270SLAVE(1,999)                                        
            5.1T3   126  VIRTUAL_I/O.3270_SLAVE.OC.039      1 LINE     80    8 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:14
0          Requires the Virtual I/O routines (1051/1), the Subtasking Monitor (1058),
           the Resource Manager DSP library (1041/1), the CFM routine (1041/10),
           COPY:MNTRDEFS (579/12), and  COPY:CCSYMBOL (579/9).
01051/040C  VIRTUAL I/O              MSOURCE 3270    SA  G          TMTS:VDVM3270(-10000,-1)                                        
            5.1T3   127  VIRTUAL_I/O.MSOURCE_3270.SA.040    1 LINE     73    9 PAGE UM   BOWLER    HELFFRICH JULY 23, 1983  15:16:15
0          Simulates 3270 on a 3270 device when the device is MSOURCE.
0          Referenced by comments of: 1051/41 
01051/041C  VIRTUAL I/O              MSOURCE 3270    UC  G          TMTS:VDVM3270(1000)                                             
            5.1T3   128  VIRTUAL_I/O.MSOURCE_3270.UC.041    1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:16:17
0          Update deck, when applied to (1051/40), yields current source.
01051/042C  VIRTUAL I/O              VDV3805         SA  G          TMTS:VDV3805(-10000,-1)                                         
            5.1T3   129  VIRTUAL_I/O.VDV3805.SA.042         1 LINE     72    6 PAGE UM   HELFFRICH           JULY 23, 1983  15:16:17
0          Simulator for an INTEL 3805/3825.  Assemble with OLD:CC.MACROS
           (1054/4) and the virtual I/O macros (1051/4).
0          Referenced by comments of: 1051/43 
1                                                                                               SUN SEP 08/96   15:24:55   Page  819
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01051/043C  VIRTUAL I/O              VDV3805         UC  G          TMTS:VDV3805(1000)                                              
            5.1T3   130  VIRTUAL_I/O.VDV3805.UC.043         1 LINE     68    1 PAGE UM   HELFFRICH           JULY 23, 1983  15:16:18
0          Update deck to be applied to (1051/42) to yield current source.
01052/001   PASCAL/UBC               COMPILER        SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/UBC.COMPILER.SW.001(1)        1333
            5.0T3  1333  PASCAL/UBC.COMPILER.SW.001         1 LINE     94  198 PAGE UBC  JOLLIFFE  UNSP      NOV. 19, 1979  15:25:53
            5.0T9   189                       
0          This is the source for the UBC Pascal compiler. Subcomponent
           (1052/2) is an update to this source for three local changes.
           This component contains several copyright notices, but UBC places
           no special restrictions on its use other than those normally
           associated with distributions of MTS.
            
           Subcomponents (1052/11) and (1052/12) contain further information
           about how to install the system.
0          Referenced by comments of: 792/1, 793/1, 1052/3 
01052/002   PASCAL/UBC               COMPILER        UC  G          S1560 5.0T3 VLO FSNAME=PASCAL/UBC.COMPILER.UC.002(1)        1334
            5.0T3  1334  PASCAL/UBC.COMPILER.UC.002         1 LINE     68    1 PAGE UBC  JOLLIFFE  UNSP      FEB. 25, 1980  09:52:52
            5.0T9   190                       
0          THE UM UPDATES TO THE COMPILER.
            
           THE NAME OF THE RUNTIME LIBRARY (1052/8) IS "UNSP:PAS.BC.LIB".
           THE NAME OF THE ERROR STATISTICS FILE (1052/10) IS "UNSP:PAS.BC.ERR".
           CALLS SNOOP IN UNSP:LIBRARY (685/2) TO RECORD USAGE IN THE FILE UNSP:STATS,
              IF IT EXISTS.
0          Referenced by comments of: 1050/1, 1052/1, 1052/3 
01052/003   PASCAL/UBC               COMPILER        OE  O          UNSP:PAS.BC                                                     
            5.0T3  1335  PASCAL/UBC.COMPILER.OE.003         1 LINE  32767   73 PAGE UBC  JOLLIFFE  UNSP      JULY 03, 1981  20:59:07
            5.0T9   191  UNSP:PAS.BC          
0          THIS IS THE LINKEDITED OBJECT OF THE PASCAL COMPILER (1052/1), WITH THE
           (1052/2) UPDATE APPLIED, AND THE RUNTIME SUPPORT LIBRARY (1052/8).
01052/004   PASCAL/UBC               MONITOR SRC     SA  O          S1560 5.0T3 VLO FSNAME=PASCAL/UBC.MONITOR_SRC.SA.004(1)     1336
            5.0T3  1336  PASCAL/UBC.MONITOR_SRC.SA.004      1 LINE     73   36 PAGE UBC  JOLLIFFE  UNSP      NOV. 19, 1979  15:14:11
            5.0T9   192                       
0          THIS FILE CONTAINS THE RUNTIME LIBRARY ASSEMBLER SOURCE MODULES.
           THESE ROUTINES DO LOW LEVEL I/O AND PASCAL PROGRAM INITIALIZATION.
           THE OBJECT OF THIS SUBCOMPONENT IS IN THE (1052/8) LIBRARY.
0          Referenced by comments of: 1052/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  820
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01052/005   PASCAL/UBC               MONITOR UPD     UC  G          S1560 5.0T3 VLO FSNAME=PASCAL/UBC.MONITOR_UPD.UC.005(1)     1337
            5.0T3  1337  PASCAL/UBC.MONITOR_UPD.UC.005      1 LINE     63    1 PAGE UM   UNSP                APR. 24, 1980  03:59:22
            5.0T9   193                       
0          Referenced by comments of: 1052/8 
01052/006   PASCAL/UBC               LIB SRC         SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/UBC.LIB_SRC.SW.006(1)         1338
            5.0T3  1338  PASCAL/UBC.LIB_SRC.SW.006          1 LINE     94   14 PAGE UBC  JOLLIFFE  UNSP      NOV. 19, 1979  15:25:17
            5.0T9   194                       
0          THIS FILE CONTAINS THE RUNTIME LIBRARY (1052/8) SOURCE MODULES, WRITTEN IN
           PASCAL.  MOST OF THE ROUTINES ARE HIGH LEVEL I/O ROUTINES.
0          Referenced by comments of: 1052/8 
01052/007   PASCAL/UBC               DEBUG SRC       SW  O          S1560 5.0T3 VLO FSNAME=PASCAL/UBC.DEBUG_SRC.SW.007(1)       1339
            5.0T3  1339  PASCAL/UBC.DEBUG_SRC.SW.007        1 LINE     82   58 PAGE UBC  JOLLIFFE  UNSP      NOV. 19, 1979  15:25:24
            5.0T9   195                       
0          THIS FILE CONTAINS THE SOURCE CODE, WRITTEN IN PASCAL, FOR THE PASCAL
           POST-MORTEM ANALYSIS (PMD) PACKAGE.
0          Referenced by comments of: 1052/8, 1052/9 
01052/008   PASCAL/UBC               RUNTIME LIB     OL  O          UNSP:PAS.BC.LIB                                                 
            5.0T3  1340  PASCAL/UBC.RUNTIME_LIB.OL.008      1 LINE   5846   50 PAGE UBC  JOLLIFFE  UNSP      JULY 03, 1981  21:00:42
            5.0T9   196  UNSP:PAS.BC.LIB      
0          THIS IS THE PASCAL RUNTIME LIBRARY.  IT CONTAINS THE OBJECT OF (1052/4) WITH
           THE (1052/5) UPDATE APPLIED, (1052/6), AND (1052/7). COMPONENT (1052/12) CONTAINS
           COMMANDS TO ASSEMBLE THE LIBRARY.
0          Referenced by comments of: 799/2, 1052/2, 1052/3, 1052/4, 1052/6, 1052/9, 1052/12 
01052/009   PASCAL/UBC               DEBUG.LOAD      OC  O          UNSP:PAS.BC.DEBUG                                               
            5.0T3  1341  PASCAL/UBC.DEBUG.LOAD.OC.009       1 LINE     30    1 PAGE UBC  JOLLIFFE  UNSP      JULY 03, 1981  21:00:46
            5.0T9   197  UNSP:PAS.BC.DEBUG    
0          THIS FILE CONTAINS ONLY AN ENT RECORD AND A $CONTINUE WITH UNSP:PAS.BC.LIB
           RECORD. IT IS LOADED BY THE RUNTIME LIBRARY (1052/8) WHEN THE DEBUGGER
           (1052/7) IS CALLED.
01052/010   PASCAL/UBC               ERRORLOG        D              S1560 5.0T3 VLO FSNAME=PASCAL/UBC.ERRORLOG.D.010(1)         1342
            5.0T3  1342  PASCAL/UBC.ERRORLOG.D.010          1 LINE     76    4 PAGE UBC  JOLLIFFE  UNSP      NOV. 19, 1979  15:26:49
            5.0T9   198                       
0          IF THIS FILE IS CREATED WITH THE NAME 'UNSP:PAS.BC.ERR' AND WITH THE GIVEN
           FORMAT, THE COMPILER WILL RECORD STATISTICS ABOUT THE ERROR MESSAGES IT
           ISSUES. IF THE FILE DOESN'T EXIST, NO LOGGING IS DONE. AS DISTRIBUTED,
           THE ERROR COUNTS ARE ZERO.  THE LINE NUMBERS IN THIS FILE ARE IMPORTANT,
           SINCE IT ALSO CONTAINS THE TEXT OF THE ERROR MESSAGES IN THE NEGATIVE
           LINE NUMBER RANGE.
0          Referenced by comments of: 1052/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  821
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01052/011   PASCAL/UBC               COMMENTS        P              S1560 5.0T3 VLO FSNAME=PASCAL/UBC.COMMENTS.P.011(1)         1343
            5.0T3  1343  PASCAL/UBC.COMMENTS.P.011          1 LINE     68    3 PAGE UBC  JOLLIFFE  UNSP      FEB. 10, 1980  17:43:44
            5.0T9   199                       
0          THIS FILE CONTAINS A DESCRIPTION OF SOME OF THE FILES ON THE PASCAL
           DISTRIBUTION TAPE RECEIVED FROM UBC.
0          Referenced by comments of: 1052/1 
01052/012   PASCAL/UBC               INSTALL         C              S1560 5.0T3 VLO FSNAME=PASCAL/UBC.INSTALL.C.012(1)          1344
            5.0T3  1344  PASCAL/UBC.INSTALL.C.012           1 LINE     79    3 PAGE UM   UNSP                DEC. 04, 1979  06:42:18
            5.0T9   200                       
0          THESE ARE THE MTS COMMANDS USED TO INSTALL PASCAL/UBC AT UM.  THERE ARE SOME
           INSTALLATION-DEPENDENCIES (LIKE TAPE RACK NUMBERS) WHICH WILL NEED TO BE
           CHANGED AT OTHER INSTALLATION. CONTAINS A $CONTINUE WITH UNSP:PAS.BC.LIB
           (1052/8) RECORD.
0          Referenced by comments of: 1052/1, 1052/8 
01052/013   PASCAL/UBC               MANUAL          P              UNSP:PAS.BC.W                                                   
            5.0T3  1345  PASCAL/UBC.MANUAL.P.013            1 LINE     71   80 PAGE UBC  JOLLIFFE  UNSP      JULY 03, 1981  21:01:33
            5.0T9   201                       
0          "PASCAL/UBC USER'S GUIDE" (SEPT. 1979 EDITION).
01053/001  *NUMLIB                                                # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01054/001   CODING CONVENTIONS       D5.0 MASTER     SM  G          S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=CC_MACROS                   
            5.0T3  1346  CODING_CONVENTIONS.D5.0_M.SM.001   1 LINE     80  104 PAGE UM   MTS       MTA       AUG. 06, 1981  05:49:49
            5.0T9   202                       
0          Base source for the new MTS Coding Conventions macro library.
01054/002A  CODING CONVENTIONS       UPDATE          UC  G          MTSS:CCMACRO/UPD                                                
            5.1T3   131  CODING_CONVENTIONS.UPDATE.UC.002   1 LINE    140   84 PAGE UM   MTS       MTA       JULY 23, 1983  15:16:19
0          MTS commands and *CDUPDATE input to produce the current source.
           The updated source, when run through *MACUTIL, will produce the
           macro library OLD:CC.MACROS (1054/4).
            
           All changes to the Coding Convention Macros should be made using *CDUPDATE
           (1036) and Mike Alexander at UM should be kept informed.
            
           ****************************************************************************
           D5.0B version:
            
           Post D5.0 updates start at line 1969.
           ****************************************************************************
            
           ****************************************************************************
           D5.1 version:
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  822
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          The macros have been changed to require a stack descriptor rooted in
           global storage.  This change is incompatible with the previous coding
           convention macros.
            
           A description of the new features may be found in the MTS Workshop VII
           Proceedings.
           ****************************************************************************
01054/003A  CODING CONVENTIONS       COPY:CC.MACROS  SM  G          COPY:CC.MACROS                                                  
            5.1T3   132  CODING_CONVENTIONS.COPY:C.SM.003   1 LINE     72   79 PAGE UM   MTS       MTA       JULY 23, 1983  15:16:25
                         COPY:CC.MACROS       
0          Referenced by comments of: 42/1, 198/1, 354/1, 464/1, 513/1, 539/1, 578/1, 635/1, 636/1, 637/1, 638/1, 639/1,
                 775/1, 818/1, 829/1, 1054/4, 4000/1 
01054/004A  CODING CONVENTIONS       OLD:CC.MACROS   SM  G          OLD:CC.MACROS                                                   
            5.1T3   133  CODING_CONVENTIONS.OLD:CC.SM.004   1 LINE     72   67 PAGE UM   MTS       MTA       JULY 23, 1983  15:16:29
                         OLD:CC.MACROS        
0          Source for the old version of CC macros.  This is the last version which
           does not use stack descriptors.  It is provided for (most) programs which
           use the coding convention macros and which have not been converted to the
           new macros COPY:CC.MACROS (1054/3).
0          Referenced by comments of: 1/5, 79/1, 101/1, 135/1, 354/5, 400/1, 400/5, 400/13, 458/89, 498/1, 540/26, 648/1,
                 651/13, 677/1, 682/24, 686/1, 721/18, 724/1, 732/1, 769/1, 769/4, 769/7, 769/10, 769/13, 769/16, 769/19,
                 769/22, 787/13, 787/15, 787/19, 787/21, 802/4, 802/29, 806/1, 811/2, 866/1, 1023/1, 1023/3, 1041/2, 1041/3,
                 1041/4, 1041/5, 1041/6, 1041/7, 1041/10, 1041/12, 1051/5, 1051/7, 1051/9, 1051/11, 1051/13, 1051/15, 1051/17,
                 1051/19, 1051/21, 1051/23, 1051/25, 1051/27, 1051/29, 1051/31, 1051/34, 1051/37, 1051/42, 1054/2, 1058/1,
                 1058/3, 1058/5, 1058/7, 1058/9, 1058/11, 1058/13, 1058/15, 1058/18, 1058/21, 1058/26, 1067/2, 1070/3, 1079/2,
                 1079/4, 1079/6, 1079/8, 1079/10, 1079/12, 1079/14, 1079/16, 1079/18 
01054/005   CODING CONVENTIONS       WRITEUP         WF             W163:CC.W                                                       
            5.0T3  1349  CODING_CONVENTIONS.WRITEU.WF.004   1 LINE     96   10 PAGE UM   MTS       OGDEN     AUG. 06, 1981  05:50:04
            5.0T9   205                       
0          Writeup describing coding conventions and the coding convention macros.
01055/001   UBC FEP (PDP-11)                                      # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE UBC FRONT-END
           PROCESSOR SOFTWARE.
01056/001   MM                                                    # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE MESSAGE MULTIPLEXOR.
01057/001   UBC FEPDSR                                            # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE UBC FRONT-END
           PROCESSOR DSR.
1                                                                                               SUN SEP 08/96   15:24:55   Page  823
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01058/001A  SUBTASKING MONITOR       MNTR            SA  G          DMGR:MNTMNTR(-10000,-1)                                         
            5.1T3   134  SUBTASKING_MONITOR.MNTR.SA.001     1 LINE     72   29 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:28
0          Subtasking Monitor initialization and management routines. 
           Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 724/3, 769/19, 787/5, 787/17, 1041/1, 1051/1, 1051/33, 1051/39, 1058/17, 1079/1 
01058/002A  SUBTASKING MONITOR       MNTR            UC  G          DMGR:MNTMNTR(1000)                                              
            5.1T3   135  SUBTASKING_MONITOR.MNTR.UC.002     1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:31
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/003A  SUBTASKING MONITOR       WAIT            SA  G          DMGR:MNTWAIT(-10000,-1)                                         
            5.1T3   136  SUBTASKING_MONITOR.WAIT.SA.003     1 LINE     72   25 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:31
0          Subtasking Monitor wait routines. 
           Requires COPY:MNTR.MACROS (1058/25), OLD:CC.MACROS (1054/4), and
           COPY:UC.MACROS (787/1).
0          Referenced by comments of: 1058/15, 1058/21 
01058/004A  SUBTASKING MONITOR       WAIT            UC  G          DMGR:MNTWAIT(1000)                                              
            5.1T3   137  SUBTASKING_MONITOR.WAIT.UC.004     1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:33
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/005A  SUBTASKING MONITOR       SERV            SA  G          DMGR:MNTSERV(-10000,-1)                                         
            5.1T3   138  SUBTASKING_MONITOR.SERV.SA.005     1 LINE     72   13 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:33
0          Subtasking Monitor service routines, including STRTIO, HALTIO, SENDIT, CNCLIT
           and DVSTAT. These routines may also be user in a non-monitor environment.
            
           Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and
           COPY:UC.MACROS (787/1).
01058/006A  SUBTASKING MONITOR       SERV            UC  G          DMGR:MNTSERV(1000)                                              
            5.1T3   139  SUBTASKING_MONITOR.SERV.UC.006     1 LINE     72    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:34
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/007A  SUBTASKING MONITOR       PRVI            SA  G          DMGR:MNTPRV(-10000,-1)                                          
            5.1T3   140  SUBTASKING_MONITOR.PRVI.SA.007     1 LINE     72    4 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:34
0          Pseudo-register vector initialization routine and LCSPR table. 
           Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and
           COPY:UC.MACROS (787/1).
1                                                                                               SUN SEP 08/96   15:24:55   Page  824
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01058/008A  SUBTASKING MONITOR       PRVI            UC  G          DMGR:MNTPRV(1000)                                               
            5.1T3   141  SUBTASKING_MONITOR.PRVI.UC.008     1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:35
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/009A  SUBTASKING MONITOR       UNND            SA  G          DMGR:MNTUNND(-10000,-1)                                         
            5.1T3   142  SUBTASKING_MONITOR.UNND.SA.009     1 LINE     72   12 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:35
0          Subtasking Monitor routines to allocate/de-allocate real devices, and
           intertask networks and nodes. Also include are the routines to do
           this in an MTS environment.
            
           Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and
           COPY:UC.MACROS (787/1).
01058/010A  SUBTASKING MONITOR       UNND            UC  G          DMGR:MNTUNND(1000)                                              
            5.1T3   143  SUBTASKING_MONITOR.UNND.UC.010     1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:36
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/011A  SUBTASKING MONITOR       ONUNIT          SA  G          DMGR:MNTONUNIT(-10000,-1)                                       
            5.1T3   144  SUBTASKING_MONITOR.ONUNIT.SA.011   1 LINE     71    5 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:37
0          Subtasking monitor routines to specify and invoke PGNT and MSG units.
            
           Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4).
01058/012A  SUBTASKING MONITOR       ONUNIT          UC  G          DMGR:MNTONUNIT(1000)                                            
            5.1T3   145  SUBTASKING_MONITOR.ONUNIT.UC.012   1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:37
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/013A  SUBTASKING MONITOR       GSFS            SA  G          DMGR:MNTGTFR(-10000,-1)                                         
            5.1T3   146  SUBTASKING_MONITOR.GSFS.SA.013     1 LINE     72   18 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:37
0          Subtasking monitor space allocation/de-allocation routines.
           Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4).
01058/014A  SUBTASKING MONITOR       GSFS            UC  G          DMGR:MNTGTFR(1000)                                              
            5.1T3   147  SUBTASKING_MONITOR.GSFS.UC.014     1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:39
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/015A  SUBTASKING MONITOR       MTS WAIT        SA  G          DMGR:MNTMTWAIT(-10000,-1)                                       
            5.1T3   148  SUBTASKING_MONITOR.MTS_WA.SA.015   1 LINE     71    2 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:39
0          This is the MTS version of the RMWAIT routine, which is part of WAIT
           (1058/3). MTS WAIT needs to be loaded past the symbol 'ENDOFMTS' in order for
           ATTN and timer interrupts to occur. Since MTS suppresses all such interrupts
           below 'ENDOFMTS', a version of the monitor in real memory, segment 0, is
1                                                                                               SUN SEP 08/96   15:24:55   Page  825
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          mostly uninterruptable if it ever waits. Requires COPY:MNTR.MACROS (1058/30),
           OLD:CC.MACROS (1054/4), and COPY:MISC.MACROS (728).
0          Referenced by comments of: 1058/17 
01058/016A  SUBTASKING MONITOR       MTS WAIT        UC  G          DMGR:MNTMTWAIT(1000)                                            
            5.1T3   149  SUBTASKING_MONITOR.MTS_WA.UC.016   1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:40
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/017A  SUBTASKING MONITOR       MONITOR OBJ     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UBC  BOWLER    HELFFRICH                        
0          The object for (1058/1) through (1058/15).  These are separate RAMROD decks
           of the same name as the source. Note that the object for (1058/15) must come
           after the RAMROD deck "MTS" in order to function properly.
           Object part of Resident System (468).
0          Referenced by comments of: 1058/27 
01058/018A  SUBTASKING MONITOR       MDUMP           SA  G          DMGR:MNTDUMP(-10000,-1)                                         
            5.1T3   150  SUBTASKING_MONITOR.MDUMP.SA.018    1 LINE     73   10 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:40
0          Routine to produce a formatted dump of subtasking monitor control blocks
           when running in an MTS environment.
            
           Requires COPY:MNTR.MACROS (1058/18) and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1058/18 
01058/019A  SUBTASKING MONITOR       MDUMP           UC  G          DMGR:MNTDUMP(1000)                                              
            5.1T3   151  SUBTASKING_MONITOR.MDUMP.UC.019    1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:40
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/020A  SUBTASKING MONITOR       MDUMP           OC  G          DMGR:MNTDUMP(1,999)                                             
            5.1T3   152  SUBTASKING_MONITOR.MDUMP.OC.020    1 LINE     80   11 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:41
0          Referenced by comments of: 1058/27 
01058/021A  SUBTASKING MONITOR       SYNCH WAIT      SA  O          DMGR:MNTSYNCWAIT(-10000,-1)                                     
            5.1T3   153  SUBTASKING_MONITOR.SYNCH.SA.021    1 LINE     72    6 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:41
0          Monitor subroutines which can replace the asynchronous wait routines (1058/3)
           if synchronous operation is desired.  Doing this means the monitor need not
           be running, that is, MNTINIT or MNTMTSI need not be called.
           Requires COPY:MNTR.MACROS (1058/21) and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1058/21 
1                                                                                               SUN SEP 08/96   15:24:55   Page  826
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01058/022A  SUBTASKING MONITOR       SYNCH WAIT      UC  O          DMGR:MNTSYNCWAIT(1000)                                          
            5.1T3   154  SUBTASKING_MONITOR.SYNCH.UC.022    1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:42
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
01058/023A  SUBTASKING MONITOR       SYNCH WAIT      OC  O          DMGR:MNTSYNCWAIT(1,999)                                         
            5.1T3   155  SUBTASKING_MONITOR.SYNCH.OC.023    1 LINE     80    4 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:42
01058/024A  SUBTASKING MONITOR       DOCUMENTATION   WF             DMGR:MNTWRITEUP(-10000,-1)                                      
            5.1T3   156  SUBTASKING_MONITOR.DOCUME.WF.024   1 LINE     89   21 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:42
0          Writeup describing the Subtasking Monitor.  Requires COPY:JONMACLIBFMT
           (308/18).
01058/025A  SUBTASKING MONITOR       DOCUMENTATION   PF             DMGR:MNTWRITEUP(1,*L)                                           
            5.1T3   157  SUBTASKING_MONITOR.DOCUME.PF.025   1 LINE     69   33 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:44
0          Referenced by comments of: 1058/3 
01058/026   SUBTASKING MONITOR       TEST PROGRAM    SA  G          DMGR:MNTTEST(1000)                                              
            5.0T3  1365  SUBTASKING_MONITOR.TEST_P.SA.017   1 LINE     71    6 PAGE UBC  BOWLER    HELFFRICH AUG. 06, 1981  05:50:59
            5.0T9   221                       
0          Test program for Subtasking Monitor.  It is strongly recommended that you
           run this program to assure yourself that the monitor is properly installed.
           Requires COPY:MNTR.MACROS (1058/26) and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1058/26 
01058/027   SUBTASKING MONITOR       TEST PROGRAM    OC  G          DMGR:MNTTEST(1,999)                                             
            5.0T3  1366  SUBTASKING_MONITOR.TEST_P.OC.018   1 LINE     80    7 PAGE UBC  BOWLER    HELFFRICH AUG. 06, 1981  05:51:02
            5.0T9   222                       
0          To use this, the object must be run along with (1058/20) and the resident
           system monitor object (1058/17).
01058/028A  SUBTASKING MONITOR       MACROS          SM  G          DMGR:MNTMACROS(-10000,-1)                                       
            5.1T3   158  SUBTASKING_MONITOR.MACROS.SM.028   1 LINE     73   23 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:46
0          Subtasking monitor macro library base source.
0          Referenced by comments of: 1058/30 
01058/029A  SUBTASKING MONITOR       MACROS          UC  G          DMGR:MNTMACROS(1000)                                            
            5.1T3   159  SUBTASKING_MONITOR.MACROS.UC.029   1 LINE     68    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:47
0          Update deck to be applied to the previously distributed source to yield the 
           current source.
0          Referenced by comments of: 1058/30 
1                                                                                               SUN SEP 08/96   15:24:55   Page  827
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01058/030A  SUBTASKING MONITOR       MNTR MACROS     SM  G          COPY:MNTR.MACROS                                                
            5.1T3   160  SUBTASKING_MONITOR.MNTR_M.SM.030   1 LINE     73   23 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:17:47
                         COPY:MNTR.MACROS     
0          The macros and copy sections associated with the Subtasking Monitor. Results
           from creating a macro library from the results of applying (1058/29) to
           (1058/28).
0          Referenced by comments of: 400/1, 769/1, 769/4, 769/7, 769/10, 769/13, 769/16, 769/19, 818/1, 1041/2, 1041/3,
                 1041/4, 1041/5, 1041/6, 1041/7, 1041/10, 1041/12, 1051/31, 1051/37, 1058/1, 1058/5, 1058/7, 1058/9, 1058/11,
                 1058/13, 1058/15, 1079/2, 1079/4, 1079/6, 1079/8, 1079/10, 1079/12, 1079/14, 1079/18 
01059/001   GENERAL_TRANSLATOR                                    # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A GENERAL
           TRANSLATING ROUTINE WHICH OBSOLETES *EBCASC, *ASCEBC, *BCDEBCD, AND *EBCBCD,
           AS WELL AS PROVIDING SOME NEW TRANSLATING FEATURES.
01060/001   FILE_CREATE                                           # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE
           TO ATTEMPT TO CREATE ONE OR MORE FILES AND TO CAUSE THE USER TO BE SIGNED
           OFF IF ANY OF THE FILE CREATE ATTEMPTS FAIL.
01061/001   PROFILE                                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, ESTABLISHES DEFAULTS
           FROM A SIGFILE.
01062/001   UBC FEP INTERFACE                                     # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01064/001   PDADSR                                                # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A RUDIMENTARY
           DSR WHICH WILL COMMUNICATE WITH UBC'S PDP-11 FEP OVER THE SINGLE-ADDRESS 2701
           INTERFACE.
01065/001   UBC FEP LOAD & DUMP                                   # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE ROM BOOTSTRAP
           LOADER FOR THE UBC PDP-11S.
01066/001   SWAT                                                  # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE MTS
           DEBUGGING MONITOR.
1                                                                                               SUN SEP 08/96   15:24:55   Page  828
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01067/001   TAPESHARE                MAIN PGM        SA  G          S1237 TAPES 'TAPEFS' FSNAME=TAPESHARE                           
            5.0T3  1368  TAPESHARE.MAIN_PGM.SA.001          1 LINE     80    5 PAGE UBC  WHALEY    UNSP      MAY  06, 1980  13:19:56
            5.0T9   224                       
0          Program to allow users to control which of their tapes can be read from, or
           optionally written on, by other users. This UM version of TAPESHARE parses
           rack names by using the initial non-numeric part of the name (prefixed by
           "ETC.:TAPE") as the name of a file which contains the data indicating tape
           access restrictions. For example, for rack name "C1000" TAPESHARE will access
           file ETC.:TAPEC to see if C1000 can be mounted by the requesting user (and in
           what way). If the file in question does not exist (no such files exist on the
           distributed test pack), then access to the tape is always allowed. If the
           file does exist, but is not accessible by the user trying to mount the tape,
           then the mount is not allowed.
            
           The main program calls TSHARESUB (1067/2). Copies *GDINFODSECT (594).
0          Referenced by comments of: 1067/4 
01067/002   TAPESHARE                TSHARESUB       SA  G          S1237 TAPES 'TAPEFS' FSNAME=TSHARESUB                           
            5.0T3  1369  TAPESHARE.TSHARESUB.SA.002         1 LINE     73   44 PAGE UBC  WHALEY    UNSP      MAY  06, 1980  13:19:10
            5.0T9   225                       
0          Subroutine that does most of the work.  Installations may want to change
           the following things before using:
            
             1) list of privileged IDs
             2) "PRJNO" and "P" might be changed to "DEPT"
                and "D"
            
           Assemble using OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1067/1, 1067/4 
01067/003   TAPESHARE                ATTNQ           SA  G          S1237 TAPES 'TAPEFS' FSNAME=TS.ATTNQ                            
            5.0T3  1370  TAPESHARE.ATTNQ.SA.003             1 LINE     80    2 PAGE UBC  WHALEY    UNSP      DEC. 22, 1978  13:26:17
            5.0T9   226                       
0          ATTENTION TRAPPING ROUTINES FOR USE BY INSTALLATIONS WHICH DO NOT HAVE UBC'S
           ATTNQ, ATTNTEST, AND ATTNNOQ. SOURCE IN LINES 1,999.
0          Referenced by comments of: 1067/4 
01067/004   TAPESHARE                                OE  G          UNSP:TAPESHARE                                                  
            5.0T3  1371  TAPESHARE..OE.004                  1 LINE  14788    5 PAGE UBC  WHALEY    UNSP      JULY 03, 1981  21:04:10
            5.0T9   227  UNSP:TAPESHARE       
0          LINKEDITED OBJECT OF TAPESHARE (1067/1), TSHARESUB (1067/2), AND ATTNQ
           (1067/3).
0          Referenced by comments of: 1067/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  829
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01067/005   TAPESHARE                CHECK SUBR      SA  G          S1237 TAPES 'TAPEFS' FSNAME=TSCHECK                             
            5.0T3  1372  TAPESHARE.CHECK_SUBR.SA.005        1 LINE     80    6 PAGE UBC  WHALEY    UNSP      AUG. 19, 1980  12:19:48
            5.0T9   228                       
0          Subroutine called by MOUNT (101) to check access to a tape.  MOUNT has a
           WXTRN for it.  Object is in *CLSMOUNT (101/1).  Assemble using COPY:MTS.MACROS
           (344/3).
0          Referenced by comments of: 101/1, 101/2, 101/3 
01067/006   TAPESHARE                CHECK SUBR      OC  G        # (PART OF *CLSMOUNT)                                             
                                                                                    UBC  WHALEY    UNSP                             
0          Part of *CLSMOUNT (101/2)
01067/007   TAPESHARE                TSHELP          D              ETC:TSHELP                                                      
            5.0T3  1373  TAPESHARE.TSHELP.D.007             1 LINE     70    3 PAGE UBC  WHALEY    UNSP      JULY 03, 1981  21:04:16
            5.0T9   229  ETC.:TSHELP          
0          TEXT FOR TAPESHARE'S HELP COMMAND.
01067/008   TAPESHARE                TSHAREID        D            # ETC.:TSHAREID                                                   
                                                                                    UBC  WHALEY    UNSP                             
                         ETC.:TSHAREID@E      
0          DATA FILE USED BY UNSP:TAPESHARE (1067/4) WHICH LISTS THE TAPES OWNED BY EACH USER.
           THIS FILE IS EMPTY ON THE TEST PACK, WHICH MEANS THAT THERE ARE NO TAPES
           OWNED BY ANYBODY AND IF TAPES ARE ADDED, THE CORRESPONDING ETC:TAPEx FILE(S)
           MUST BE CREATED FIRST. USER ID "MTS." MAY BE USED TO PERFORM SUCH TAPE
           LIBRARIAN FUNCTIONS.
01067/009   TAPESHARE                TSMANUAL        P              S1237 TAPES 'TAPEFS' FSNAME=TS.LIBRMANUAL                       
            5.0T3  1374  TAPESHARE.TSMANUAL.P.009           1 LINE     76    4 PAGE UBC  WHALEY    UNSP      DEC. 22, 1978  13:03:50
            5.0T9   230                       
0          TAPESHARE MANUAL FOR TAPE LIBRARIAN. INCLUDES PRIVILEGED COMMANDS.
01067/010   TAPESHARE                WRITEUP         WT             S1237 TAPES 'TAPEFS' FSNAME=TS.V2WRITEUP                        
            5.0T3  1375  TAPESHARE.WRITEUP.WT.010           1 LINE     71    3 PAGE UBC  WHALEY    UNSP      JULY 02, 1979  22:14:34
            5.0T9   231                       
0          VOLUME 2 STYLE USER WRITEUP.
01067/011   TAPESHARE                WRITEUP         PT             UNSP:TAPESHARE.W                                                
            5.0T3  1376  TAPESHARE.WRITEUP.PT.011           1 LINE     84    4 PAGE UBC  WHALEY    UNSP      JULY 03, 1981  21:04:26
            5.0T9   232  UNSP:TAPESHARE.W     
01067/012   TAPESHARE                *TSH            C              *TSH                                                            
            5.0T3  1377  TAPESHARE.*TSH.C.012               1 LINE     68    1 PAGE UBC  WHALEY    UNSP      JULY 03, 1981  21:04:28
            5.0T9   233  *TSH                 
0          OPERATOR FILE TO RUN UNSP:TAPESHARE.  INVOKED BY ENTERING "MTS *TSH"
           ON OPERATORS CONSOLE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  830
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01069/001   FAKE MM                                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS A UTILITY WRITTEN TO
           TEST THE UBC FEP PROTOCOL.
01070/001   SYSTEM TIMETALLY         TTTABLES        SA  G          MTS:TTTABLES(1,999)                                             
            5.0T3  1378  SYSTEM_TIMETALLY.TTTABLES.SA.001   1 LINE     68    1 PAGE UM   MTS       OGDEN     JULY 03, 1981  21:04:29
            5.0T9   234  MTS:TTTABLES         
0          Fixed storage and tables describing the timetally bins.  Used by CONFIG
           (046) and UMMPS (045) if &TTALLY=1 in COPY:GLOBALSETS (1026/2). 
01070/002   SYSTEM TIMETALLY         TTTABLES        OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       OGDEN                            
0          May be removed from the resident system even if CONFIG (046) and UMMPS
           (045) are assembled with &TTALLY=1.
           Object part of Resident System (468).
01070/003   SYSTEM TIMETALLY         TTPRINT         SA  O          MTS:TTPRINT(1000)                                               
            5.0T3  1379  SYSTEM_TIMETALLY.TTPRINT.SA.003    1 LINE     73    4 PAGE UM   MTS       OGDEN     JULY 03, 1981  21:04:29
            5.0T9   235                       
0          Program to print the results of the system timetally.  Requires an object
           deck produced by TTMAP (1070/5). Requires COPY:UMMPS.MACROS (045/14), 
           COPY:MTS.MACROS (344/3), and OLD:CC.MACROS (1054/4).
0          Referenced by comments of: 1070/5, 1070/8 
01070/004   SYSTEM TIMETALLY         TTPRINT         OC  O          MTS:TTPRINT(1,999)                                              
            5.0T3  1380  SYSTEM_TIMETALLY.TTPRINT.OC.004    1 LINE     80    5 PAGE UM   MTS       OGDEN     JULY 03, 1981  21:04:31
            5.0T9   236  MTS:TTPRINT          
0          Contains a $CONTINUE WITH COPY:CCSYMBOL+COPY:SYSDEFS reference to (579/9)
           and (579/3).
01070/005A  SYSTEM TIMETALLY         TTMAP           SS  G          MTS:TTMAP(1000)                                                 
            5.1T3   161  SYSTEM_TIMETALLY.TTMAP.SS.005      1 LINE     68    1 PAGE UM   MTS       OGDEN     JULY 23, 1983  15:17:49
0          Program to read SEG2:S2MAP (559/12) and produce an object file for use with
           TTPRINT (1070/3).  Uses *SPITDEBUG (590/9) and the ITS routine from
           UNSP:SPITLIB (590/30).
0          Referenced by comments of: 1070/3, 1070/8 
01070/006A  SYSTEM TIMETALLY         TTMAP           OC  G          MTS:TTMAP(1,999)                                                
            5.1T3   162  SYSTEM_TIMETALLY.TTMAP.OC.006      1 LINE     80   11 PAGE UM   MTS       OGDEN     JULY 23, 1983  15:17:49
                         MTS:TTMAP            
0          Contains a $CONTINUE WITH *SPITLIB (590/10).
1                                                                                               SUN SEP 08/96   15:24:55   Page  831
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01070/007   SYSTEM TIMETALLY         TTRESULTS       P              S1560 5.0T3 VLO FSNAME=SYSTEM_TIMETALLY.TTRESULT.P.007(1)   1383
            5.0T3  1383  SYSTEM_TIMETALLY.TTRESULT.P.007    1 LINE    122   95 PAGE UM   MTS       OGDEN     MAR. 28, 1981  00:25:47
            5.0T9   239                       
0          Sample results from the system timetally at UM.
01070/008C  SYSTEM TIMETALLY         TT CMD FILE     C              MTS:TT.SO                                                       
            5.1T3   360  SYSTEM_TIMETALLY.TT_CMD_F.C.008    1 LINE     68    1 PAGE UM   MTS       OGDEN     AUG. 20, 1983  19:50:41
                         MTS:TT.SO            
0          Command file to be $SOURCEd to in order to produce the system
           timetally.  Uses MTS:TTMAP (1070/5), MTS:TTPRINT (1070/3), and
           MTA:PRNTCNTS (540/3).
01071/001   3066_JOB                                              # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01072/001   UBC TAPE CATALOGUE                                    # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01073/001   SENSE.DATA.INTERPRETER                                # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01074/001   DYNAMIC_STORAGE                                       # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01075/001   TAPE_REPORT                                           # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
01076/001C *CLPARSER                 CLPARSEGEN      OE  G          *CLPARSEGEN                                                     
            5.1T3   163  CLPARSER.CLPARSEGEN.OE.001         1 LINE  32767   11 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:17:50
0          This is complete, linkedited parse table generator (grammar analyzer). 
            
           The complete object can be produced via the following 
           *LINKEDIT commands:
              $run *linkedit 
              set symsave=off
              include clpgen*oq (1076/3) 
              include clpgen*or  (1076/5) 
              include@sli plus:objrtns>ol (1042/69) 
              include@sli plus:misc>ol (1042/89) 
              include seg2:clparser _pprodnm 
              combine
            
           Note that if CLPARSER and the PLUS library are not in shared 
           vm, then they should be included@SLI also. 
            
           Also, not that if CLPARSER *is* in shared VM, the module
           _PPRODNM must be included into CLPARSEGEN (because it isn't
           entered into CCSYMBOL at UBC, being an internal entry of 
           CLPARSER that shouldn't be referenced except by CLPARSEGEN.) 
            
           There have been a few bug fixes since the RD5.0A version. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  832
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
0          Referenced by comments of: 509/12, 509/16, 774/4, 821/4, 821/7, 821/8, 839/5, 851/3, 852/3, 853/3, 854/3, 855/3,
                 856/3, 857/3, 858/3, 1036/1, 1036/3, 1042/67, 1042/83, 1086/3 
01076/002C *CLPARSER                 CLPGEN SOURCE   SQ  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.CLPGEN_SOURCE.SQ.002(1)     994
            5.1T3   164  CLPARSER.CLPGEN_SOURCE.SQ.002      1 LINE     75   36 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:15
0          PLUS source for the parser table generator.
            
           Compile this with the following libraries (concatenate together on unit 0):
              *CLPARSELIB (1076/11)
              PLUS:OBJRTNS*SL (1042/68)
              PLUS:MISC*SL (1042/88)
              *PLUS.SOURCELIB  (1042/5)
            
           See 1076/1 for description of all the pieces that make up *CLPARSEGEN.
01076/003C *CLPARSER                 CLPGEN OBJECT   OC  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.CLPGEN_OBJECT.OC.003(1)     995
            5.1T3   165  CLPARSER.CLPGEN_OBJECT.OC.003      1 LINE   5692   21 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:18
0          Object for CLPARSEGEN PLUS source.
0          Referenced by comments of: 1076/1 
01076/004A *CLPARSER                 CLPGEN GRAMMAR  SR  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.CLPGEN_GRAMMAR.S.004(1)     996
            5.1T3   166  CLPARSER.CLPGEN_GRAMMAR.SR.004     1 LINE     80    5 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:19
0          Grammar (input to *CLPARSEGEN) defining the 
           analyzer input language. 
            
01076/005A *CLPARSER                 GRAMMAR OBJ     OC  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.GRAMMAR_OBJ.OC.005(1)       997
            5.1T3   167  CLPARSER.GRAMMAR_OBJ.OC.005        1 LINE   5478    3 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:20
0          Object code generated by current version of *CLPARSEGEN from the
           current CLPARSEGEN grammar. 
0          Referenced by comments of: 1042/81, 1076/1 
01076/006A *CLPARSER                 PARSER          OC  G          *CLPARSER                                                       
            5.1T3   168  CLPARSER.PARSER.OC.006             1 LINE     24    1 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:18:22
0          CLPARSER is post-IPL loaded into shared VM at UBC.  Hence this file 
           now contains only the loader records needed to reference the 
           PLUS-callable entries in CCSYMBOL. 
            
0          Referenced by comments of: 498/145, 509/11, 509/15, 851/2, 852/2, 853/2, 854/2, 855/2, 856/2, 857/2, 858/2, 1036/1,
                 1086/2 
1                                                                                               SUN SEP 08/96   15:24:55   Page  833
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01076/007A *CLPARSER                 PARSER          OC  G          SEG2:CLPARSER                                                   
            5.1T3   169  CLPARSER.PARSER.OC.007             1 LINE   3782   13 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:18:23
                         SEG2:CLPARSER        
0          Object file containing the parser and associated routines. 
            
           There have been various bug fixes, especially in the area of syntax
           error correction, since the last (RD5.0A) version. 
            
           This contains the object generated by compiling (1076/9), 
           assembling (1076/10) and the tables generated by *CLPARSEGEN for 
           the system terminals grammar (1076/13) and the parser internal
           grammar (1076/12). 
            
           There are three COM records at the beginning, containing the 
           entry names for 
              .. the system terminals
              .. the FORTRAN callable routines
              .. the PLUS/Coding Conventions callable routines.
            
           The first two sets are entered into LCSYMBOL, and the third into CCSYMBOL.
           Thus the Pistle control line is ...
               SEG2:CLPARSER LCS=(LCSYMBOL,LCSYMBOL,CCSYMBOL)
            
           Note that if this is done, Fortran routines can use the parser without 
           needing to reference CCSYMBOL. 
            
           (1076/8) contains commands to build SEG2:CLPARSER from the pieces.
            
           Note the file CODE:PARSE.HELP which was referenced by the D5.0 version
           is no longer needed.
01076/008C *CLPARSER                 OBJUTIL CMDS    C              S1644 5.0BT1 VLO FSNAME=CLPARSER.OBJUTIL_CMDS..008(1)       1000
            5.1T3   170  CLPARSER.OBJUTIL_CMDS.C.008        1 LINE    191    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:23
0          This is a $SOURCE file to generate SEG2:CLPARSER, including the required
           COM records.  It just contains...
            
              $destroy clparser*o
              $create clparser*o size=50p
              $copy *source* clparser*o
               COM *INTEGER *HEXEGER *LINMBER *REAL *STRING *QUORING *PRIRING *HEXRING *SIMNAME *QUANAME *FDNAME 
                   *CCID *PROJECT *BLANKS *ENDLINE *ENDFILE *MORE *TO_LANK *HELMAND *HELP *TRACE *PUSH *MESSAGE
               COM CPCURP CPARSE CPGET CPGSTK CPHELP CPINIT CPINM CPRSET CPSET CPTERM CPGSS
               COM CPINITCC CPINMCC CPARSECC CPSETCC CPGETCC CPGSTKCC CPRSETCC CPTERMCC CPHELPCC 
                   CPCURPCC CPCTXTCC CPPTXTCC CPLTTCC CPGSSCC
              $ENDFILE
              $run *objutil 0=clparser*o(*l+1)
              set symsave=off
              add clp*oq
              add clp*or
              add clpsys*or
              add clp*oa
              add *ccsymbol
1                                                                                               SUN SEP 08/96   15:24:55   Page  834
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0             stop
              $endfile
0          Referenced by comments of: 1076/7 
01076/009A *CLPARSER                 PARSER SRC      SQ  G          PLUS:CLP*SQ                                                     
            5.1T3   171  CLPARSER.PARSER_SRC.SQ.009         1 LINE     77   72 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:18:24
0          PLUS source for the parser and associated routines. 
           Compile this with 
              0=*CLPARSELIB+*PLUS.SOURCELIB
                 (1076/11)    (1042/5)
            
           *********************************************************************
           D5.1 changes (based on D5.0B base, which is the
                         same as the Workshop 8 base):
            
             52) Fixed bug in Scan_Table.
             53) Fixed problems with Adjust_Stack_Positions (buffer
                 swap wrong).
             54) Fixed problem with HELP/INCLUDE.
             55) Fixed bug in Scan_Table and Print_Trace (missing cases).
             56) Allow error message to be set from a semantic routine.
           *********************************************************************
0          Referenced by comments of: 1076/7 
01076/010C *CLPARSER                 PARSER INTF     SA  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.PARSER_INTF.SA.010(1)      1002
            5.1T3   172  CLPARSER.PARSER_INTF.SA.010        1 LINE     69    7 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:28
0          Assembler source for routines which provide S-type interface to the 
           parser routines.
            
           Assemble with coding-conventions macro library.
            
           (This will be eliminated, eventually, by using PLUS's new linkage options
           to write these routines in PLUS.)
0          Referenced by comments of: 1042/82, 1076/7 
01076/011A *CLPARSER                 PARSER LIB      SQ  G          *CLPARSELIB                                                     
            5.1T3   173  CLPARSER.PARSER_LIB.SQ.011         1 LINE     68    8 PAGE UBC  BALLARD   BURLING   JULY 23, 1983  15:18:28
0          This is a PLUS source library containing definitions of the various 
           parser routines and types. 
            
           It is required to compile the parser and any PLUS program using the 
           parser.
0          Referenced by comments of: 509/10, 509/14, 553/5, 821/1, 839/1, 839/2, 843/1, 851/1, 852/1, 853/1, 854/1, 855/1,
                 856/1, 857/1, 858/1, 1036/2, 1042/91, 1076/2, 1076/9, 1084/2, 1086/1, 1089/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  835
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01076/012C *CLPARSER                 PARSER GRAMM    SR  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.PARSER_GRAMM.S.012(1)      1004
            5.1T3   174  CLPARSER.PARSER_GRAMM.SR.012       1 LINE     68    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:30
0          Grammar defining productions used internally by the parser... 
           e.g., for processing help file directory, YES/NO repsponses etc.
            
0          Referenced by comments of: 1076/7 
01076/013A *CLPARSER                 SYS TERMINALS   SR  G          S1644 5.0BT1 VLO FSNAME=CLPARSER.SYS_TERMINALS.S.013(1)     1005
            5.1T3   175  CLPARSER.SYS_TERMINALS.SR.013      1 LINE     94    3 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:31
0          Grammar defining syntax of system terminals. 
            
           The goals in this grammar define the system terminals to be allowed. 
            
           Each goal MUST be of the form 
               goal <xxx> entry "*xxx" is  whatever. 
            
           The analyzer (CLPARSEGEN) determines the legal system terminal names
           from the copy of the system-terminals table that is loaded with it. 
            
           If <xxx> is a goal in the system terminals table loaded with *CLPARSEGEN, 
           then it will recognize *xxx* as a legal system terminal.  It will assume 
           *xxx is the external symbol to which a reference should be generated. 
0          Referenced by comments of: 1076/7 
01076/014A *CLPARSER                 WRITEUP         WF             S1644 5.0BT1 VLO FSNAME=CLPARSER.WRITEUP.WF.014(1)          1006
            5.1T3   176  CLPARSER.WRITEUP.WF.014            1 LINE    114   58 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:12:32
0          Source for writeup on the parser. 
            
           It is now in FMT.  Requires STAF:FMTLIB (formerly known as JON:MACLIB).
            
01076/015A *CLPARSER                 WRITEUP         PF             S1644 5.0BT1 VLO FSNAME=CLPARSER.WRITEUP.PF.015(1)          1007
            5.1T3   177  CLPARSER.WRITEUP.PF.015            1 LINE     70   73 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:31
0          $COPYable form of parser writeup.  Allow 110 pages, TN printer. 
            
           Revision bars indicate changes since previous version. 
01076/016C *CLPARSER                 EXAMPLE 1       SR             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_1.S.016(1)         1008
            5.1T3   178  CLPARSER.EXAMPLE_1.SR.016          1 LINE     64    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:37
0          This and following files are the source for the three examples 
           used in the writeup.  All are variations of a program to evaluate
           simple arithmetic expressions.
            
           This is grammar for use with PLUS program.
1                                                                                               SUN SEP 08/96   15:24:55   Page  836
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01076/017C *CLPARSER                 EXAMPLE 1       SQ             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_1.SQ.017(1)        1009
            5.1T3   179  CLPARSER.EXAMPLE_1.SQ.017          1 LINE     68    2 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:38
0          PLUS source. 
            
01076/018C *CLPARSER                 EXAMPLE 1       D              S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_1.D.018(1)         1010
            5.1T3   180  CLPARSER.EXAMPLE_1.D.018           1 LINE     64    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:39
0          Help file used by example program. 
01076/019C *CLPARSER                 EXAMPLE 2       SR             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_2.S.019(1)         1011
            5.1T3   181  CLPARSER.EXAMPLE_2.SR.019          1 LINE     73    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:40
0          Grammar for use with Fortran program.
01076/020C *CLPARSER                 EXAMPLE 2       SF             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_2.SF.020(1)        1012
            5.1T3   182  CLPARSER.EXAMPLE_2.SF.020          1 LINE     62    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:40
0          Fortran example
01076/021C *CLPARSER                 EXAMPLE 3       SR             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.S.021(1)         1013
            5.1T3   183  CLPARSER.EXAMPLE_3.SR.021          1 LINE     66    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:41
0          Separate compilation example.  First part of grammar.
01076/022C *CLPARSER                 EXAMPLE 3       SR             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.S.022(1)         1014
            5.1T3   184  CLPARSER.EXAMPLE_3.SR.022          1 LINE     58    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:42
0          Separate compilation example.  Second part of grammar. 
01076/023C *CLPARSER                 EXAMPLE 3       SQ             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.SQ.023(1)        1015
            5.1T3   185  CLPARSER.EXAMPLE_3.SQ.023          1 LINE     68    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:42
0          Separate compilation example. First part of source.
01076/024C *CLPARSER                 EXAMPLE 3       SQ             S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.SQ.024(1)        1016
            5.1T3   186  CLPARSER.EXAMPLE_3.SQ.024          1 LINE     65    1 PAGE UBC  BALLARD   BURLING   JULY 26, 1982  20:15:43
0          Separate compilation example -- second part of source. 
01077/001   SETUP                    SOURCE          SQ  G          S1153 UNSP VLO FSNAME=SIGSETUP.PLUS                             
            5.0T3  1398  SETUP.SOURCE.SQ.001                1 LINE    121   22 PAGE UBC  BALLARD   UNSP      SEP. 19, 1980  13:01:02
            5.0T9   254                       
0          Program for selective execution of MTS commands and device commands (of most
           use in SIGFILES).  Commands in lines 0 through 0.9 indicate how this component
           should be installed.
            
           Needs GRAMMAR (1077/3) and the PLUS supervisor library (045/16).
1                                                                                               SUN SEP 08/96   15:24:55   Page  837
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01077/002   SETUP                    OBJECT          OE  G          UNSP:SIGSETUP                                                   
            5.0T3  1399  SETUP.OBJECT.OE.002                1 LINE  32767   11 PAGE UBC  BALLARD   UNSP      JULY 03, 1981  21:05:11
            5.0T9   255  UNSP:SIGSETUP        
0          CONTAINS A "$CONTINUE WITH *LIBRARY" RECORD.
01077/003   SETUP                    GRAMMAR         D              S1153 UNSP VLO FSNAME=SIGSETUP.GRAMMER                          
            5.0T3  1400  SETUP.GRAMMAR.D.003                1 LINE    100    3 PAGE UBC  BALLARD   UNSP      SEP. 19, 1980  13:01:54
            5.0T9   256                       
0          Referenced by comments of: 1077/1 
01077/004   SETUP                    WRITEUP         WF             S1153 UNSP VLO FSNAME=SIGSETUP.F                                
            5.0T3  1401  SETUP.WRITEUP.WF.004               1 LINE     99    5 PAGE UBC  BALLARD   UNSP      AUG. 12, 1980  16:51:17
            5.0T9   257                       
0          Requires COPY:JONMACLIBFMT (308/18).
01077/005   SETUP                    EXAMPLE         D              UNSP:SIGSETUP.EX                                                
            5.0T3  1402  SETUP.EXAMPLE.D.005                1 LINE     66    1 PAGE UM   UNSP                JULY 03, 1981  21:05:17
            5.0T9   258                       
01078/001  *VSS                      MAIN            SA  O          S1561 5.0T4 VLO FSNAME=VSS.MAIN.SA.011(1)                    582
            5.0T4   582  VSS.MAIN.SA.011                    1 LINE     72   17 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:41:51
            5.0T11  156                       
0          + The following source decks are from UBC in Dec/79.
0          Referenced by comments of: 1078/2, 1078/3, 1078/4 
01078/002C *VSS                      MAIN            UC  O          S1405 W8UMC FSNAME=VSS.MAIN.UC.007(1)                           
            5.1T3   187  VSS.MAIN.UC.002                    1 LINE     79    9 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:01
0          Workshop 8 update, from UBC, to (1078/1).
0          Referenced by comments of: 1078/3 
01078/003C *VSS                      MAIN            UC  O          W116:V.MAI.UNE.UC                                               
            5.1T3   188  VSS.MAIN.UC.003                    1 LINE     62    3 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:22:31
0          Unofficial version of Durham update to (1078/1).  Apply after (1078/2).
0          Referenced by comments of: 1078/4 
01078/004C *VSS                      MAIN            UC  O          W116:V.MAI.UM.UC                                                
            5.1T3   189  VSS.MAIN.UC.004                    1 LINE     73    4 PAGE UM   YOUNG               JULY 23, 1983  15:22:32
0          UM update to (1078/1).  Apply after (1078/3).
01078/005  *VSS                      COMMANDS        SA  O          S1561 5.0T4 VLO FSNAME=VSS.COMMANDS.SA.012(1)                583
            5.0T4   583  VSS.COMMANDS.SA.012                1 LINE     77   46 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:41:53
            5.0T11  157                       
0          Referenced by comments of: 1078/6, 1078/7, 1078/8 
1                                                                                               SUN SEP 08/96   15:24:55   Page  838
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01078/006C *VSS                      COMMANDS        UC  O          S1405 W8UMC FSNAME=VSS.CMDS.UC.004(1)                           
            5.1T3   190  VSS.COMMANDS.UC.006                1 LINE     79   15 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:15:55
0          Workshop 8 update, from UBC, to (1078/5).
0          Referenced by comments of: 1078/7 
01078/007C *VSS                      COMMANDS        UC  O          W116:V.CMD.UNE.UC                                               
            5.1T3   191  VSS.COMMANDS.UC.007                1 LINE     72    8 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:22:34
0          Unofficial version of Durham update to (1078/5).  Apply after 
           (1078/6).
0          Referenced by comments of: 1078/8 
01078/008C *VSS                      COMMANDS        UC  O          W116:V.CMD.UM.UC                                                
            5.1T3   192  VSS.COMMANDS.UC.008                1 LINE     72    2 PAGE UM   YOUNG               JULY 23, 1983  15:22:35
0          UM update to (1078/5).  Apply after (1078/7).
01078/009  *VSS                      SERV            SA  O          S1561 5.0T4 VLO FSNAME=VSS.SERV.SA.013(1)                    584
            5.0T4   584  VSS.SERV.SA.013                    1 LINE     72   47 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:41:57
            5.0T11  158                       
0          Referenced by comments of: 1078/10, 1078/11, 1078/13 
01078/010C *VSS                      SERV            UC  O          S1405 W8UMC FSNAME=VSS.SERV.UC.010(1)                           
            5.1T3   193  VSS.SERV.UC.010                    1 LINE     85   30 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:04
0          Workshop 8 update, from UBC, to (1078/9).
0          Referenced by comments of: 1078/11 
01078/011C *VSS                      SERV            UC  O          W116:V.SRV.UNE.UC                                               
            5.1T3   194  VSS.SERV.UC.011                    1 LINE     72    4 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:22:38
0          Unofficial version of Durham update to (1078/9).  Apply after (1078/10).
0          Referenced by comments of: 1078/12, 1078/13 
01078/012C *VSS                      SERV            UC  O          W116:V.SRV.UM.UC#                                               
            5.1T3   195  VSS.SERV.UC.012                    1 LINE     53    1 PAGE UM   YOUNG               JULY 23, 1983  15:22:38
0          Fix to (1078/11).  Apply with (1078/11).
01078/013C *VSS                      SERV            UC  O          W116:V.SRV.UM.UC                                                
            5.1T3   196  VSS.SERV.UC.013                    1 LINE     73   14 PAGE UM   YOUNG               JULY 23, 1983  15:22:38
0          UM update to (1078/9).  Apply after (1078/11) and (1079/12).
1                                                                                               SUN SEP 08/96   15:24:55   Page  839
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01078/014  *VSS                      SVCS            SA  O          S1561 5.0T4 VLO FSNAME=VSS.SVCS.SA.014(1)                    585
            5.0T4   585  VSS.SVCS.SA.014                    1 LINE     73   75 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:01
            5.0T11  159                       
0          Referenced by comments of: 1078/15, 1078/16, 1078/17 
01078/015C *VSS                      SVCS            UC  O          S1405 W8UMC FSNAME=VSS.SVCS.UC.011(1)                           
            5.1T3   197  VSS.SVCS.UC.015                    1 LINE     82   43 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:07
0          Workshop 8 update, from UBC, to (1078/14).
0          Referenced by comments of: 1078/16 
01078/016C *VSS                      SVCS            UC  O          W116:V.SVC.UNE.UC                                               
            5.1T3   198  VSS.SVCS.UC.016                    1 LINE     72   17 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:22:40
0          Unofficial version of Durham update to (1078/14).  Apply after (1078/15).
0          Referenced by comments of: 1078/17 
01078/017C *VSS                      SVCS            UC  O          W116:V.SVC.UM.UC                                                
            5.1T3   199  VSS.SVCS.UC.017                    1 LINE     80   17 PAGE UM   YOUNG               JULY 23, 1983  15:22:42
0          UM update to (1078/14).  Apply after (1078/16).
01078/018  *VSS                      BDAM            SA  O          S1561 5.0T4 VLO FSNAME=VSS.BDAM.SA.015(1)                    586
            5.0T4   586  VSS.BDAM.SA.015                    1 LINE     71    9 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:07
            5.0T11  160                       
0          Referenced by comments of: 1078/19 
01078/019C *VSS                      BDAM            UC  O          S1405 W8UMC FSNAME=VSS.BDAM.UC.002(1)                           
            5.1T3   200  VSS.BDAM.UC.019                    1 LINE     72    3 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:15:53
0          Workshop 8 update, from UBC, to (1078/18).
01078/020  *VSS                      QSAM            SA  O          S1561 5.0T4 VLO FSNAME=VSS.QSAM.SA.016(1)                    587
            5.0T4   587  VSS.QSAM.SA.016                    1 LINE     72   11 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:08
            5.0T11  161                       
0          Referenced by comments of: 1078/21, 1078/22, 1078/24 
01078/021C *VSS                      QSAM            UC  O          S1405 W8UMC FSNAME=VSS.QSAM.UC.008(1)                           
            5.1T3   201  VSS.QSAM.UC.021                    1 LINE     75   11 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:02
0          Workshop 8 update, from UBC, to (1078/20).
0          Referenced by comments of: 1078/22 
01078/022C *VSS                      QSAM            UC  O          W116:V.QSM.UNE.UC                                               
            5.1T3   202  VSS.QSAM.UC.022                    1 LINE     71    8 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:22:47
0          Unofficial version of Durham update to (1078/20).  Apply after (1078/21).
1                                                                                               SUN SEP 08/96   15:24:55   Page  840
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1078/23, 1078/24 
01078/023C *VSS                      QSAM            UC  O          W116:V.QSM.UM.UC#                                               
            5.1T3   203  VSS.QSAM.UC.023                    1 LINE     56    1 PAGE UM   YOUNG               JULY 23, 1983  15:22:47
0          Fix to (1078/22).  Apply with (1078/22).
0          Referenced by comments of: 1078/24 
01078/024C *VSS                      QSAM            UC  O          W116:V.QSM.UM.UC                                                
            5.1T3   204  VSS.QSAM.UC.024                    1 LINE     72    3 PAGE UM   YOUNG               JULY 23, 1983  15:22:48
0          UM update to (1078/20).  Apply after (1078/22) and (1078/23).
01078/025  *VSS                      BSAM            SA  O          S1561 5.0T4 VLO FSNAME=VSS.BSAM.SA.017(1)                    588
            5.0T4   588  VSS.BSAM.SA.017                    1 LINE     74   12 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:09
            5.0T11  162                       
0          Referenced by comments of: 1078/26, 1078/27, 1078/28 
01078/026C *VSS                      BSAM            UC  O          S1405 W8UMC FSNAME=VSS.BSAM.UC.003(1)                           
            5.1T3   205  VSS.BSAM.UC.026                    1 LINE     76   10 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:15:54
0          Workshop 8 update, from UBC, to (1078/25).
0          Referenced by comments of: 1078/27 
01078/027C *VSS                      BSAM            UC  O          W116:V.BSM.UNE.UC                                               
            5.1T3   206  VSS.BSAM.UC.027                    1 LINE     66    1 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:22:50
0          Unofficial version of Durham update to (1078/25).  Apply after (1078/26).
0          Referenced by comments of: 1078/28 
01078/028C *VSS                      BSAM            UC  O          W116:V.BSM.UM.UC                                                
            5.1T3   207  VSS.BSAM.UC.028                    1 LINE     66    1 PAGE UM   YOUNG               JULY 23, 1983  15:22:50
0          UM updates to (1078/25).  Apply after (1078/27).
01078/029  *VSS                      RESIDENT ROUTI  SA  O          S1561 5.0T4 VLO FSNAME=VSS.RESIDENT_ROUTI.SA.018(1)          589
            5.0T4   589  VSS.RESIDENT_ROUTI.SA.018          1 LINE     68    4 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:10
            5.0T11  163                       
0          Referenced by comments of: 1078/30, 1078/31 
01078/030C *VSS                      RESIDENT ROUTI  UC  O          S1405 W8UMC FSNAME=VSS.RESR.UC.009(1)                           
            5.1T3   208  VSS.RESIDENT_ROUTI.UC.030          1 LINE     79    5 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:03
0          Workshop 8 updates, from UBC, to (1078/29).
0          Referenced by comments of: 1078/31 
1                                                                                               SUN SEP 08/96   15:24:55   Page  841
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01078/031C *VSS                      RESIDENT ROUTI  UC  O          W116:V.RSR.UM.UC                                                
            5.1T3   209  VSS.RESIDENT_ROUTI.UC.031          1 LINE     68    1 PAGE UM   YOUNG               JULY 23, 1983  15:22:51
0          UM updates to (1078/29).  Apply after (1078/30).
01078/032  *VSS                      KEYS            SA  O          S1561 5.0T4 VLO FSNAME=VSS.KEYS.SA.019(1)                    590
            5.0T4   590  VSS.KEYS.SA.019                    1 LINE     72   16 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:23
            5.0T11  164                       
0          + Dec/79 source for VSS Keyed-file routines used by ISAM support.
           ASDFASDF
0          Referenced by comments of: 1078/33 
01078/033C *VSS                      KEYS            UC  O          S1405 W8UMC FSNAME=VSS.KEYS.UC.006(1)                           
            5.1T3   210  VSS.KEYS.UC.033                    1 LINE     83    8 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:15:59
0          Workshop 8 updates, from UBC, to (1078/32).
01078/034  *VSS                      ISAM            SA  O          S1561 5.0T4 VLO FSNAME=VSS.ISAM.SA.020(1)                    591
            5.0T4   591  VSS.ISAM.SA.020                    1 LINE     72    9 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:31
            5.0T11  165                       
0          + (B)ISAM simulation - OPEN, READ/WRITE, SETL, ESETL.
0          Referenced by comments of: 1078/35 
01078/035C *VSS                      ISAM            UC  O          S1405 W8UMC FSNAME=VSS.ISAM.UC.005(1)                           
            5.1T3   211  VSS.ISAM.UC.035                    1 LINE     78   14 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:15:57
0          Workshop 8 updates, from UBC, to (1078/34).
01078/036  *VSS                      XCP             SA  O          S1561 5.0T4 VLO FSNAME=VSS.XCP.SA.021(1)                     592
            5.0T4   592  VSS.XCP.SA.021                     1 LINE     72   34 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:11
            5.0T11  166                       
0          + Virtual channel. (May have changed component number since RD16.)
           + Same as that available at the Workshop. NOT the same as that 
           + distributed by UBC in May/80 (Maybe someday...);
           + but distributed under this component since this version is the
           + one VSS still expects.
0          Referenced by comments of: 1078/38, 1078/44 
01078/037  *VSS                      DISK SIM        SA  O          S1561 5.0T4 VLO FSNAME=VSS.DISK_SIM.SA.022(1)                593
            5.0T4   593  VSS.DISK_SIM.SA.022                1 LINE     80   58 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:14
            5.0T11  167                       
0          + Disk file simulation routines. Same as that for UBC Virtual
           + Machine, circa Sep/79. NOT the same as that distributed for
           + the Virtual Machine in May/80. (Maybe someday..);
           + but this version is the one VSS still expects.
0          Referenced by comments of: 1078/39 
1                                                                                               SUN SEP 08/96   15:24:55   Page  842
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01078/038  *VSS                      VIRTUAL DISK R  SA  O          S1561 5.0T4 VLO FSNAME=VSS.VIRTUAL_DISK_R.SA.023(1)          594
            5.0T4   594  VSS.VIRTUAL_DISK_R.SA.023          1 LINE     72   14 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:24
            5.0T11  168                       
0          + Virtual disk routines, suitable for connecting to the
           + virtual channel (1078/36). Same as that for the UBC Virtual
           + Machine, circa Sep/79. NOT the same as that distributed by
           + UBC for the Virtual Machine in May/80, but is the one
           + VSS still expects at this point.
01078/039  *VSS                      DFS MACROS      SM  O          S1561 5.0T4 VLO FSNAME=VSS.DFS_MACROS.SM.024(1)              595
            5.0T4   595  VSS.DFS_MACROS.SM.024              1 LINE     74   11 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:28
            5.0T11  169                       
0          + Macros for Disk File Simulation routines (1078/37).
           + Same as that for the UBC Virtual Machine, circa Sep/79.
           + NOT the same as that distributed by UBC for the Virtual
           + Machine in May/80, but is the version VSS currently
           + expects (which is why this one appears under this component).
01078/040A *VSS                      MACROS          SM  O          S1405 W8UMC FSNAME=VSS.LIBRARY.SA.023(1)                        
            5.1T3   212  VSS.MACROS.SM.040                  1 LINE     72   16 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:36
0          Workshop 8 version, from UBC, of the VSS macro library.
0          Referenced by comments of: 1078/41, 1078/42, 1078/43 
01078/041A *VSS                      MACROS          UC  O          S1405 W8UMC FSNAME=VSS.MAC.UC.012(1)                            
            5.1T3   213  VSS.MACROS.UC.041                  1 LINE     83    5 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:16:10
0          Workshop 8 updates, from UBC, to (1078/40).
0          Referenced by comments of: 1078/42 
01078/042C *VSS                      MACROS          UC  O          W116:V.MAC.UNE.UC                                               
            5.1T3   214  VSS.MACROS.UC.042                  1 LINE     78    4 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:23:05
0          Unofficial version of Durham update to (1078/40).  Apply after (1078/41).
0          Referenced by comments of: 1078/43 
01078/043C *VSS                      MACROS          UC  O          W116:V.MAC.UM.UC                                                
            5.1T3   215  VSS.MACROS.UC.043                  1 LINE     71    3 PAGE UM   YOUNG               JULY 23, 1983  15:23:05
0          UM updates to (1078/40).  Apply after (1078/42).
01078/044  *VSS                      XCP MACROS      SM  O          S1561 5.0T4 VLO FSNAME=VSS.XCP_MACROS.SM.027(1)              598
            5.0T4   598  VSS.XCP_MACROS.SM.027              1 LINE     68   10 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:32
            5.0T11  172                       
0          + Macros for virtual channel (1078/36). Same as those for
           + the UBC Virtual Machine, circa Sep/79.
           + NOT the same as those distributed by UBC for the Virtual
           + Machine in May/80, but is the version that VSS still
1                                                                                               SUN SEP 08/96   15:24:55   Page  843
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          + expects, so it is included under this component, rather than
           + (1051).
01078/045  *VSS                      VSMACROS        SM  O          S1561 5.0T4 VLO FSNAME=VSS.VSMACROS.SM.028(1)                599
            5.0T4   599  VSS.VSMACROS.SM.028                1 LINE     72  359 PAGE UD   BELL      YOUNG     SEP. 10, 1980  10:42:33
            5.0T11  173                       
0          + A more-or-less version of the OS public macros, taken
           + from CMS release 5.0 (I think).
01078/046  *VSS                      FAKE MSGCC      SA  O          MTA:FAKEMSGCC(1,999)                                            
            5.0T4   608  VSS.FAKE_MSGCC.SA.037              1 LINE     59    1 PAGE UM   MTA                 AUG. 10, 1981  00:15:08
            5.0T11  182                       
0          Source (all 6 lines of it) for a fake version of MSGCC that calls MSG.  This
           is required because all the stacks used by VSS (and it uses an impressive
           number of them) are only 2048 bytes long (which length is hand coded in
           various obscure dark corners of VSS) and this is too short to call MSGCC.
01078/047C *VSS                      UNITCB          SA             MTA:VSS.UNITCB                                                  
            5.1T3   216  VSS.UNITCB.SA.047                  1 LINE     68    2 PAGE UM   MTA                 JULY 23, 1983  15:23:06
0          Source for a table used by one of the UNE changes to VSS.
01078/048A *VSS                      OBJECT          OE  O          *VSS                                                            
            5.1T3   217  VSS.OBJECT.OE.048                  1 LINE  32767   44 PAGE UD   BELL      YOUNG     JULY 23, 1983  15:23:06
                         *VSS                 
0          *VSS object, with SYM cards.
0          Referenced by comments of: 655/2, 823/74, 823/75, 823/78, 824/1, 862/2, 862/4, 862/6 
01078/049A *VSS                      DRIVER PROGRAM  SA  O          MTA:VSS.DRIVER                                                  
            5.1T3   218  VSS.DRIVER_PROGRAM.SA.049          1 LINE     72    9 PAGE UM   MTA                 JULY 23, 1983  15:23:07
0          Source for a driver program to call VSS to run various programs.
           Assemble with PAR=SYSPARM=pgm-name where "pgm-name" may be "EREP",
           "VSFTN", or "NASTRAN" to get a driver program appropriate to each of
           these programs. This program reads commands from a file whose name is
           selected depending on the value of SYSPARM and passes them to VSSCMD.
           In addition to the commands recognized by VSS it also recognizes two
           commands:
            
            DEFAULT  UNIT=Fdname       defaults MTS I/O unit "UNIT" to "FDname"
            
            LINK  FDname (PAR=param)   links to "FDname".  This allows one to
                                        run MTS programs not in DAT mode.
            
           If no SYSPARM is given, it defaults to NASTRAN. 
            
           The object for each version of this is with the appropriate 
           component.
0          Referenced by comments of: 655/1, 824/1 
1                                                                                               SUN SEP 08/96   15:24:55   Page  844
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01078/050  *VSS                      CONVERT PDS     SA  O          MTA:VSS.CNVTPDS(1,999)                                          
            5.0T4   611  VSS.CONVERT_PDS.SA.040             1 LINE     72    3 PAGE UM   MTA                 AUG. 10, 1981  00:15:15
            5.0T11  185                       
0          Program to convert an old format VSS PDS to the new format in which the
           directory is stored exactly like it would be in VS.  Assign unit 0 to
           the line file containing the old format PDS.
01078/051  *VSS                      CONVERT PDS     OC  O          MTA:VSS.CNVTPDS(1000)                                           
            5.0T4   612  VSS.CONVERT_PDS.OC.041             1 LINE     80    4 PAGE UM   MTA                 AUG. 10, 1981  00:15:16
            5.0T11  186  MTA:VSS.CNVTPDS      
01078/052A *VSS                      COMPRESS PDS    SA             MTA:VSS.COMPRESS(1000)                                          
            5.1T3   219  VSS.COMPRESS_PDS.SA.052            1 LINE     72    3 PAGE UM   MTA                 JULY 23, 1983  15:23:08
                         MTA:VSS.COMPRESS     
0          Program to delete lines from a VSS PDS that are no longer referenced
           by the directory.
01078/053A *VSS                      COMPRESS PDS    OC             MTA:VSS.COMPRESS(1,999)                                         
            5.1T3   220  VSS.COMPRESS_PDS.OC.053            1 LINE     80    3 PAGE UM   MTA                 JULY 23, 1983  15:23:09
01078/054A *VSS                      PDS BUILD       SQ  O          S1405 W8UMC FSNAME=VSS.VSSPDSBUILD.SQ.027(1)                    
            5.1T3   221  VSS.PDS_BUILD.SQ.054               1 LINE     71    9 PAGE UBC  BOWLER    YOUNG     JULY 26, 1982  20:17:19
0          Comments from the source:
            
               Build a VSS partitioned data set.
               Input format is 
                   member-definition
                   member-definition
                        .
                        .
                        .
                    (end-of-file)
               where "member-definition" is
                    /MEMBER=member-name
                    (first record of member)
                    (second record of member)
                        .
                        .
                        .
                    /END-MEMBER  (this is optional.)
               where "member-name" is an eight-or-fewer-character name.
               Additionally, the command
                    /ALIAS=member-name
               may appear anywhere inside a member-definition.
               A L S O ,  the IBM IEBUPDTTE commands
                    ./   ADD   ...,MEMBER=member-name,...
                    ./   ADD   ...,NAME=member-name,...
               may be used instead of /MEMBER commands. 
               Also, 
                   ./  ALIAS   ...,MEMBER=member-name,...
                   ./  ALIAS   ...,NAME=member-name,...
1                                                                                               SUN SEP 08/96   15:24:55   Page  845
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0              may be used instead of /ALIAS.
               Also, 
                   /.  ENDUP
               will be treated as an end-of-file on input.          */
            
           Probably reads SCARDS and writes 0 or SPUNCH?
            
           *********************************************************************
           D5.1 version:
            
           This is the Workshop 8 version, from UBC, of VSSPDPBUILD.
           **********************************************************************
0          Referenced by comments of: 251/3 
01078/055A *VSS                      PDS BUILD       OC  O          *VSSPDSBUILD                                                    
            5.1T3   222  VSS.PDS_BUILD.OC.055               1 LINE   2178    6 PAGE UM   YOUNG               JULY 23, 1983  15:23:17
                         *VSSPDSBUILD         
0          Referenced by comments of: 1078/56 
01078/056C *VSS                      PDS BUILD       WF  O          W116:VSSPDS.WRT.F                                               
            5.1T3   223  VSS.PDS_BUILD.WF.056               1 LINE     72    1 PAGE UBC  BOWLER    YOUNG     JULY 23, 1983  15:23:18
0          Workshop 8 version, from UBC, of the writeup for *VSSPDSBUILD (1078/55).
           VSSPDSBUILD is also documented in CCMemo 449 (251/3).
0          Referenced by comments of: 1078/57 
01078/057C *VSS                      PDS BUILD       PF  O          W116:VSSPDS.WRT.C                                               
            5.1T3   224  VSS.PDS_BUILD.PF.057               1 LINE     69    1 PAGE UBC  BOWLER    YOUNG     JULY 23, 1983  15:23:19
0          Printer-ready version of (1078/56).
01078/058  *VSS                      LOG FILE        D   O        # ETC:VSSLOG                                                      
                                                                                    UD   BELL      YOUNG                            
                         ETC:VSSLOG@E         
0           
           One line for each use of VSS.  Don't let it fill up since VSS apparently
           dies when it is full.
01078/059C *VSS                      MEMO 448        WF  O          W116:VSS.WRIT.WF                                                
            5.1T3   225  VSS.MEMO_448.WF.059                1 LINE    108   26 PAGE UBC  BOWLER    YOUNG     JULY 23, 1983  15:23:19
0          This is Computing Center Memo 448 -- "VSS: OS/VS Simulator." It is the
           Workshop 8 version, from UBC, of writeup describing *VSS. Does not
           include changes from UD or UM.
0          Referenced by comments of: 1078/60 
1                                                                                               SUN SEP 08/96   15:24:55   Page  846
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01078/060C *VSS                      MEMO 448        PF  O          W116:VSS.WRIT.PF                                                
            5.1T3   226  VSS.MEMO_448.PF.060                1 LINE     80   32 PAGE UBC  YOUNG     YOUNG     JULY 23, 1983  15:23:20
                         MTA:VSS.WRITEUP      
0          Printer-ready version of (1078/59).
01078/061A *VSS                      MVS LINKLIB     O   G          ETC:SYS1.LINKLIB                                                
            5.1T3   227  VSS.MVS_LINKLIB.O.061              1 LINE  32767 1570 PAGE UM   MTA                 JULY 23, 1983  15:23:21
                         ETC:SYS1.LINKLIB     
0          This is a VSS PDS containing a copy of SYS1.LINKLIB from MVS. It
           contains many utility programs that can be run in VSS, although some
           particularly useful ones won't (e.g., AMBSPZAP).
            
           It was created from file 9 on tape M8ERES of the MVS 3.8E
           IPO distribution by *IEHMOVE.  It contains all members of 
           SYS1.LINKLIB.  Also contains a member created from FOS.IERRCO00
           plus MTS SORT that can be used like MVS SORT.
0          Referenced by comments of: 824/2, 862/6, 1078/62 
01078/062C *VSS                      MVS SORT INTF   SA  G          MTA:FOS.IERRCO00                                                
            5.1T3   228  VSS.MVS_SORT_INTF.SA.062           1 LINE    138   28 PAGE UM   MTA                 JULY 23, 1983  15:24:35
0          Source for interface program to allow MTS SORT to be used in VSS.
           Object is in (1078/61) and also in (1078/63).
            
           **********************************************************************
           D5.1 version:
            
           This program was inadvertantly included twice in D5.1.  It is also
           (545/17) through (545/19).
           **********************************************************************
0          Referenced by comments of: 545/17, 1078/63 
01078/063C *VSS                      MVS SORT INTF   O   G          MTA:VSS.SORT                                                    
            5.1T3   229  VSS.MVS_SORT_INTF.O.063            1 LINE     72    9 PAGE UM   MTA                 JULY 23, 1983  15:24:36
0          Object of (1078/62) ready to be fed into MTS link editor.
0          Referenced by comments of: 545/17, 1078/62 
01079/001A  VIRTUAL MACHINE - UBC    OBJECT          OC  G          TMTS:VMN                                                        
            5.1T3   230  VIRTUAL_MACHINE_-_UBC.OBJ.OC.001   1 LINE  24927   62 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:36
                         TMTS:VMN             
0          Virtual Machine program based on the Subtasking Monitor. This version derives
           from the UBC version of May 1981 from the Vancouver Workshop.
            
           This version of the virtual machine does not need to be run with PROT=OFF
           unless privileged services are being requested, such as the attachment of
           real devices to the virtual machine. This version uses the UMMPS virtual
           machine support for >1Mb virtual machines.
1                                                                                               SUN SEP 08/96   15:24:55   Page  847
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           This virtual machine also requires the Virtual I/O component (1051) and
           almost needless to say, the Subtasking Monitor (1058) along with the Resource
           Manager CFM routines (1041/10). This file should have a pkey of TMTS:VMN.
            
           Contains $CONTINUE WITH lines for: Virtual I/O library (1051/1), DSP library
           (1041/1), big fake GETSPACE routine (1019/9), COPY:DEFS (579/10), and
           HELP:FSHELP (845/6).
01079/002A  VIRTUAL MACHINE - UBC    MAIN            SA  G          TMTS:VM_MAIN(-10000,-1)                                         
            5.1T3   231  VIRTUAL_MACHINE_-_UBC.MAI.SA.002   1 LINE     79   18 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:38
0          Initialization and main subtask. Assemble with the UBC Virtual Machine macros
           (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30).
01079/003A  VIRTUAL MACHINE - UBC    MAIN            UC  G          TMTS:VM_MAIN(1000)                                              
            5.1T3   232  VIRTUAL_MACHINE_-_UBC.MAI.UC.003   1 LINE     77    5 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:40
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01079/004A  VIRTUAL MACHINE - UBC    CMND            SA  O          TMTS:VM_CMND(-10000,-1)                                         
            5.1T3   233  VIRTUAL_MACHINE_-_UBC.CMN.SA.004   1 LINE     79   50 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:40
0          Command reader and processing routines. Assemble with the UBC Virtual Machine
           macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30).
01079/005A  VIRTUAL MACHINE - UBC    CMND            UC  O          TMTS:VM_CMND(1000)                                              
            5.1T3   234  VIRTUAL_MACHINE_-_UBC.CMN.UC.005   1 LINE     73   14 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:44
0          Update deck to be applied to the previously distributed source to yield the
           current source.
            
           *******************************************************************
           D5.0C version:
            
           Uses Full Screen Help facilities (component 845) for its HELP 
           command.
           *******************************************************************
            
           *******************************************************************
           D5.1 version:
            
            - Fixes TRACE command bugs.
            - Adds 3805 device type.
            - Fixes Full Screen Help bugs.
           *******************************************************************
01079/006A  VIRTUAL MACHINE - UBC    PRIV            SA  G          TMTS:VM_PRIV(-10000,-1)                                         
            5.1T3   235  VIRTUAL_MACHINE_-_UBC.PRI.SA.006   1 LINE     80   21 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:45
0          Privileged instruction simulation. Assemble with the UBC Virtual Machine
           macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30).
1                                                                                               SUN SEP 08/96   15:24:55   Page  848
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01079/007A  VIRTUAL MACHINE - UBC    PRIV            UC  G          TMTS:VM_PRIV(1000)                                              
            5.1T3   236  VIRTUAL_MACHINE_-_UBC.PRI.UC.007   1 LINE     72   29 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:47
0          Update deck to be applied to the previously distributed source to yield the
           current source.
           **********************************************************************
           D5.1 version:
            
            - Fixes bug in TCH trace output.
            - Fixes bug in TIO trace output.
           **********************************************************************
01079/008A  VIRTUAL MACHINE - UBC    SERV            SA  O          TMTS:VM_SERV(-10000,-1)                                         
            5.1T3   237  VIRTUAL_MACHINE_-_UBC.SER.SA.008   1 LINE     79   25 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:48
0          Service subroutines. Assemble with the UBC Virtual Machine macros (1079/22),
           OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30).
01079/009A  VIRTUAL MACHINE - UBC    SERV            UC  O          TMTS:VM_SERV(1000)                                              
            5.1T3   238  VIRTUAL_MACHINE_-_UBC.SER.UC.009   1 LINE     72    6 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:50
0          Update deck to be applied to the previously distributed source to yield the
           current source.
            
           *********************************************************************
           D5.1 version:
            
            - Fix TRACE command bugs.
           *********************************************************************
01079/010A  VIRTUAL MACHINE - UBC    SUBT            SA  O          TMTS:VM_SUBT(-10000,-1)                                         
            5.1T3   239  VIRTUAL_MACHINE_-_UBC.SUB.SA.010   1 LINE     79   10 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:50
0          Subtasks for timers and I/O devices. Assemble with the UBC Virtual Machine
           macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30).
             
           *********************************************************************
           D5.1 version:
            
            - Fix bug in UC processing on real devices.
           **********************************************************************
01079/011A  VIRTUAL MACHINE - UBC    SUBT            UC  O          TMTS:VM_SUBT(1000)                                              
            5.1T3   240  VIRTUAL_MACHINE_-_UBC.SUB.UC.011   1 LINE     68    2 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:51
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01079/012A  VIRTUAL MACHINE - UBC    VDEV            SA  O          TMTS:VM_VDEV(-10000,-1)                                         
            5.1T3   241  VIRTUAL_MACHINE_-_UBC.VDE.SA.012   1 LINE     79    6 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:51
0          Virtual device device-dependent interface. Assemble with the UBC Virtual
           Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS
           (1058/30).
1                                                                                               SUN SEP 08/96   15:24:55   Page  849
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           **********************************************************************
           D5.1 version:
            
            - Fix bug in CCW tracing.
           **********************************************************************
0          Referenced by comments of: 1078/13 
01079/013A  VIRTUAL MACHINE - UBC    VDEV            UC  O          TMTS:VM_VDEV(1000)                                              
            5.1T3   242  VIRTUAL_MACHINE_-_UBC.VDE.UC.013   1 LINE     68    3 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:52
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01079/014A  VIRTUAL MACHINE - UBC    VM370SIM        SA  O          TMTS:VM_VM370SIM(-10000,-1)                                     
            5.1T3   243  VIRTUAL_MACHINE_-_UBC.VM3.SA.014   1 LINE     79   10 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:52
0          Diagnose instruction simulation routine for simulating a pseudo-VM/370
           environment. Assemble with the UBC Virtual Machine macros (1079/22),
           OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30).
01079/015A  VIRTUAL MACHINE - UBC    VM370SIM        UC  O          TMTS:VM_VM370SIM(1000)                                          
            5.1T3   244  VIRTUAL_MACHINE_-_UBC.VM3.UC.015   1 LINE     72    4 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:54
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01079/016A  VIRTUAL MACHINE - UBC    MODL            SA  G          TMTS:VM_MODL(-10000,-1)                                         
            5.1T3   245  VIRTUAL_MACHINE_-_UBC.MOD.SA.016   1 LINE     72    4 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:54
0          Virtual machine model-dependent routines. This assembly is intended to
           contain the virtual machine routines that are model-dependent, specifically,
           the routines that do machine check logouts and simulation of non-VM/370
           diagnose instructions. Assemble with the UBC Virtual Machine macros (1079/22)
           and OLD:CC.MACROS (1054/4).
01079/017A  VIRTUAL MACHINE - UBC    MODL            UC  G          TMTS:VM_MODL(1000)                                              
            5.1T3   246  VIRTUAL_MACHINE_-_UBC.MOD.UC.017   1 LINE     74    1 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:55
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01079/018A  VIRTUAL MACHINE - UBC    GETD            SA  O          TMTS:VM_GETD(-10000,-1)                                         
            5.1T3   247  VIRTUAL_MACHINE_-_UBC.GET.SA.018   1 LINE     77    4 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:55
0          This is a special routine called by the virtual machine when attaching a
           disk. Its function is to determine if the disk belongs to the MTS file
           system. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). Assemble with
           the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4),
           COPY:MNTR.MACROS (1058/30), COPY:FILE.MACROS (482/45), and COPY:UC.MACROS
           (787/1).
1                                                                                               SUN SEP 08/96   15:24:55   Page  850
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01079/019A  VIRTUAL MACHINE - UBC    GETD            UC  O          TMTS:VM_GETD(1000)                                              
            5.1T3   248  VIRTUAL_MACHINE_-_UBC.GET.UC.019   1 LINE     68    2 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:55
0          Update deck to be applied to the previously distributed source to yield the
           current source.
01079/020A  VIRTUAL MACHINE - UBC    MACLIB          SA  G          TMTS:VM_MACBASE(-10000,-1)                                      
            5.1T3   249  VIRTUAL_MACHINE_-_UBC.MAC.SA.020   1 LINE     80   12 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:56
0          Base source for virtual machine macro library.
01079/021A  VIRTUAL MACHINE - UBC    MACLIB          UC  G          TMTS:VM_MACBASE(1000)                                           
            5.1T3   250  VIRTUAL_MACHINE_-_UBC.MAC.UC.021   1 LINE     70    6 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:57
0          Update deck to be applied to the previously distributed source to yield the
           current source.  After being made into a macro library by *MACUTIL (738),
           this becomes (1079/22).
01079/022A  VIRTUAL MACHINE - UBC    MACLIB          SM  G          TMTS:VM_MACROS                                                  
            5.1T3   251  VIRTUAL_MACHINE_-_UBC.MAC.SM.022   1 LINE     72   16 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:57
0          UBC Virtual Machine macros.
0          Referenced by comments of: 1051/7, 1051/9, 1051/11, 1051/13, 1051/15, 1051/17, 1051/19, 1051/23, 1051/25, 1051/29,
                 1051/31, 1051/37, 1079/2, 1079/4, 1079/6, 1079/8, 1079/10, 1079/12, 1079/14, 1079/16, 1079/18, 1079/21 
01079/023A  VIRTUAL MACHINE - UBC    WRITEUP         WF             TMTS:VM_WRITEUP(10000)                                          
            5.1T3   252  VIRTUAL_MACHINE_-_UBC.WRI.WF.023   1 LINE     86   19 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:24:58
0          *FORMAT (308) source for the UBC Virtual Machine writeup.
0          Referenced by comments of: 1051/37, 1079/24 
01079/024A  VIRTUAL MACHINE - UBC    WRITEUP         PF  G          TMTS:VM_WRITEUP(1,9999)                                         
            5.1T3   253  VIRTUAL_MACHINE_-_UBC.WRI.PF.024   1 LINE     71   27 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:25:00
0          $COPYable writeup produced by running *FORMAT (308) on (1079/23). 
01079/025A  VIRTUAL MACHINE - UBC    HELP FILE       D   G          ETC:VM_HELP                                                 1416
            5.1T3   254  VIRTUAL_MACHINE_-_UBC.HEL.D.025    1 LINE    127   10 PAGE UBC  BOWLER    HELFFRICH JULY 23, 1983  15:25:01
                         ETC:VM_HELP          
0          Help file accessed by virtual machine HELP command. Must be permitted READ to
           PKEY=TMTS:VMN.
            
           ********************************************************************
           D5.0C version:
            
           New help file format for Full Screen Help (component 845).
           ********************************************************************
1                                                                                               SUN SEP 08/96   15:24:55   Page  851
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01080/001   UBC LALR                 WRITEUP         WF             S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_WRITEUP.WF.083(1)      1287
            5.0T3  1287  PLUS_470.LALR_WRITEUP.WF.083       1 LINE     66    3 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:05
            5.0T9   143                       
0          LALR (1080/1) - (1080/20), a program similar to *LALRGEN (745), produces
           syntax tables, and some auxiliary PLUS declarations from a BNF grammar. The
           grammar must be LALR(1).
            
           It is the only LALR(1) grammar UBC knows of that will correctly process the
           PLUS grammar (1042/53).
            
           UBC hopes to rewrite the lookahead algorithm sometime to use the efficient
           calculation described in SIGPLAN Symposium on Compiler Construction, SIGPLAN
           Notices, Vol. 14, number 8.
            
           This subcomponent contains FMT source for brief notes describing input and
           output from LALR. It assumes the reader is familiar with similar programs.
            
           Uses COPY:JONMACLIBFMT (308/18).
0          Referenced by comments of: 1042/22, 1042/53, 1042/54, 1042/55, 1042/67, 1080/1 
01080/002   UBC LALR                 WRITEUP         PF             S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_WRITEUP.PF.084(1)      1288
            5.0T3  1288  PLUS_470.LALR_WRITEUP.PF.084       1 LINE     69    3 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:13
            5.0T9   144                       
0          $COPYable writeup for LALR (5 pages)
01080/003A  UBC LALR                 DECLAR          SQ  O          S1644 5.0BT1 VLO FSNAME=UBC_LALR.DECLAR.SQ.003(1)           1043
            5.1T3   255  UBC_LALR.DECLAR.SQ.003             1 LINE     68    1 PAGE UBC  WHALEY    BURLING   JULY 26, 1982  20:18:00
0          PLUS source library containing the definition of the parser tables. 
0          Referenced by comments of: 1042/50, 1080/19 
01080/004   UBC LALR                 SOURCE          S   O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SOURCE.S.086(1)        1290
            5.0T3  1290  PLUS_470.LALR_SOURCE.S.086         1 LINE     35    1 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:20
            5.0T9   146                       
0          Components (1080/5) to (1080/14) are PLUS source for the LALR analyzer.
            
           This file contains just a series of $CONTINUE WITH's specifying 
           all the files  constituting the analyzer. 
            
           The pieces of the analyzer may be compiled independently or all
           concatenated together and compiled at once. Compiling 
           any of the pieces requires several PLUS source libraries.  Component
           (1080/19) $CONTINUES WITH all the required libraries. 
01080/005   UBC LALR                 MAIN            SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_MAIN.SQ.087(1)         1291
            5.0T3  1291  PLUS_470.LALR_MAIN.SQ.087          1 LINE     68    4 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:26
            5.0T9   147                       
0          LALR main program and initialization and some auxiliary procedures.
1                                                                                               SUN SEP 08/96   15:24:55   Page  852
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 1080/4, 1080/17 
01080/006   UBC LALR                 INPUT           SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_INPUT.SQ.088(1)        1292
            5.0T3  1292  PLUS_470.LALR_INPUT.SQ.088         1 LINE     68    4 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:36
            5.0T9   148                       
0          Input reading and scanning components. 
01080/007   UBC LALR                 PARSER          SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_PARSER.SQ.089(1)       1293
            5.0T3  1293  PLUS_470.LALR_PARSER.SQ.089        1 LINE     68    4 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:48
            5.0T9   149                       
0          LALR analyzer input parser. 
            
           This file contains the procedures to parse and recover from syntax errors
           in the input to LALR. 
            
           It serves as an example of the structure of the parser required 
           by the tables generated by LALR. 
            
           The PLUS compiler has its own version (1042/22). 
            
01080/008   UBC LALR                 PRINT           SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_PRINT.SQ.090(1)        1294
            5.0T3  1294  PLUS_470.LALR_PRINT.SQ.090         1 LINE     68    6 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:51
            5.0T9   150                       
0          This component produces listing of the grammar, and other 
           printed output produced by LALR.
01080/009   UBC LALR                 LR0             SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_LR0.SQ.091(1)          1295
            5.0T3  1295  PLUS_470.LALR_LR0.SQ.091           1 LINE     68    5 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:55
            5.0T9   151                       
0          Procedures to produce the LR(0) machine from the grammar.
01080/010   UBC LALR                 SLR1            SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SLR1.SQ.092(1)         1296
            5.0T3  1296  PLUS_470.LALR_SLR1.SQ.092          1 LINE     68    3 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:09:58
            5.0T9   152                       
0          Procedures to try SLR(1) lookahead. 
01080/011   UBC LALR                 LALR1           SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_LALR1.SQ.093(1)        1297
            5.0T3  1297  PLUS_470.LALR_LALR1.SQ.093         1 LINE     68    8 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:01
            5.0T9   153                       
0          Procedures to try LALR(1) lookahead. 
01080/012   UBC LALR                 MATRX GEN       SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_MATRX_GEN.SQ.094(1)    1298
            5.0T3  1298  PLUS_470.LALR_MATRX_GEN.SQ.094     1 LINE     68    7 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:15
            5.0T9   154                       
0          LALR generates tables which represent the parser 
           in a matrix form (intended to improve parser speed at some 
1                                                                                               SUN SEP 08/96   15:24:55   Page  853
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          cost in space).  These procedures compute the matrix 
           representation.
01080/013   UBC LALR                 PUNCH           SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_PUNCH.SQ.095(1)        1299
            5.0T3  1299  PLUS_470.LALR_PUNCH.SQ.095         1 LINE     68    7 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:18
            5.0T9   155                       
0          Routines to generate object module from the matrix 
           representation.  The routines in component (1042/69)
           are used. 
01080/014   UBC LALR                 MEMBER          SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_MEMBER.SQ.096(1)       1300
            5.0T3  1300  PLUS_470.LALR_MEMBER.SQ.096        1 LINE     67    2 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:22
            5.0T9   156                       
0          These routines generate an output PLUS library containing 
           declarations for use when writing programs to use the 
           parser tables. 
            
0          Referenced by comments of: 1080/4, 1080/17 
01080/015   UBC LALR                 GRAMMAR         S   O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_GRAMMAR.S.097(1)       1301
            5.0T3  1301  PLUS_470.LALR_GRAMMAR.S.097        1 LINE     56    1 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:25
            5.0T9   157                       
0          Simple grammar in the form required by LALR 
           defining the input to LALR.
0          Referenced by comments of: 1080/16, 1080/17, 1080/18 
01080/016   UBC LALR                 GRAMMAR         OC  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_GRAMMAR.OC.098(1)      1302
            5.0T3  1302  PLUS_470.LALR_GRAMMAR.OC.098       1 LINE    136    1 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:28
            5.0T9   158                       
0          Syntax tables generated by LALR for the grammar in (1080/15). This
           object deck is part of LALR. 
01080/017   UBC LALR                 OBJECT          OE  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_OBJECT.OE.099(1)       1303
            5.0T3  1303  PLUS_470.LALR_OBJECT.OE.099        1 LINE  32767   17 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:08:54
            5.0T9   159                       
0          This is the complete, linkeditted object for the UBC LALR analyzer. 
            
           The complete program consists of:
            
              object from (1080/5) through (1080/14)
              object generated by LALR from grammar (1080/15)
              object module routines (1042/69) (INCLUDE@SLI)
              NEW:PLUS.OBJLIB  (1042/56) (INCLUDE@SLI)
1                                                                                               SUN SEP 08/96   15:24:55   Page  854
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01080/018   UBC LALR                 DECLS           SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_DECLS.SQ.100(1)        1304
            5.0T3  1304  PLUS_470.LALR_DECLS.SQ.100         1 LINE     71    1 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:31
            5.0T9   160                       
0          PLUS source library generated by LALR from the grammar in (1080/15).
0          Referenced by comments of: 1080/19 
01080/019   UBC LALR                 SOU LIB         SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SOU_LIB.SQ.101(1)      1305
            5.0T3  1305  PLUS_470.LALR_SOU_LIB.SQ.101       1 LINE     39    1 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:34
            5.0T9   161                       
0          This file just contains $CONTINUE WITH's for the set 
           of libraries required to compile any of the files constituting the 
           analyzer.
            
           These are:
              LALR*SL (1080/20)
              LALRDECL*SL (1080/18)
              PLUS:LALRPARSE*SL (1080/3)
              PLUS:OBJRTNS*SL (1042/68)
              PLUS:SOURCELIB (1042/5)
0          Referenced by comments of: 1080/4 
01080/020   UBC LALR                 SOU LIB         SQ  O          S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SOU_LIB.SQ.102(1)      1306
            5.0T3  1306  PLUS_470.LALR_SOU_LIB.SQ.102       1 LINE     68    7 PAGE UBC  WHALEY    BURLING   SEP. 27, 1979  22:10:38
            5.0T9   162                       
0          PLUS source library containing declarations required by more than 
           one of the files constituting LALR. 
0          Referenced by comments of: 1080/1, 1080/19 
01081/001   INTERTASK                                SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK..SA.001(1)                  617
            5.0T4   617  INTERTASK..SA.001                  1 LINE     80   76 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:16:48
            5.0T11  191                       
0          SUBROUTINE CALLED BY UMMPS (045/1) TO HANDLE THE INTERTASK SVC. COPIES
           LLMPSEQU (087), COPY:GLOBALS (1026/3), COPY:IT.DSECTS (1081/4), COPY:PSA
           (162), AND COPY:IT.COPY_SECT (1081/5). ASSEMBLE WITH COPY:UMMPS.MACROS
           (045/14) AND COPY:IT.MACROS (1081/6) AND COPY:SETPARM (653).
0          Referenced by comments of: 400/15, 769/13, 769/22, 1081/5 
01081/002A  INTERTASK                                UC  G          MTA:IT.U                                                        
            5.1T3   256  INTERTASK..UC.002                  1 LINE     87    2 PAGE UBC  O'REILLY  MTA       JULY 23, 1983  15:25:17
0          Update to D5.0 version to produce current version.
01081/003A  INTERTASK                                OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UBC  O'REILLY  MTA                              
0          Object part of Resident System (468).
1                                                                                               SUN SEP 08/96   15:24:55   Page  855
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01081/004   INTERTASK                COPY SECTION 1  SA  G          COPY:IT.DSECTS                                                  
            5.0T4   619  INTERTASK.COPY_SECTION_1.SA.004    1 LINE     72    7 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:16:51
            5.0T11  193  COPY:IT.DSECTS       
0          THIS IS A COPY SECTION THAT SHOULD BE COPIED BY ANY ASSEMBLER 
           PROGRAM THAT USES INTERTASK.  IT CONTAINS EQUATES FOR THE 
           VARIOUS INTERTASK OPERATION CODES AND FLAGS, AND ALSO CONTAINS
           A VARIETY OF DSECTS INTENDED TO BE USED WITH THE SEND, SET EXIT,
           LIST, AND SENSE OPERATIONS.  THE INTERTASK MACROS (1081/6) 
           REQUIRE THE EQUATES IN THIS COPY SECTION.
0          Referenced by comments of: 388/1, 636/1, 769/22, 829/1, 1051/31, 1051/37, 1081/1, 1081/9, 1081/12, 1081/13, 1081/14,
                 1081/15, 1081/16, 1081/22, 1081/24, 1081/26 
01081/005A  INTERTASK                COPY SECTION 2  SM  G          COPY:IT.COPY_SECT                                               
            5.1T3   257  INTERTASK.COPY_SECTION_2.SM.005    1 LINE     71    7 PAGE UBC  O'REILLY  MTA       JULY 23, 1983  15:25:18
                         COPY:IT.COPY_SECT    
0          THIS IS A COPY SECTION THAT IS COPIED ONLY BY THE INTERTASK SUBROUTINE
           (1081/1) AND PRINTDUMP ITDUMP SUBR (400/15). IT DEFINES DATA STRUCTURES
           INTERNAL TO INTERTASK.
0          Referenced by comments of: 400/15, 1081/1 
01081/006   INTERTASK                MACROS          SA  G          COPY:IT.MACROS                                                  
            5.0T4   621  INTERTASK.MACROS.SA.006            1 LINE     72   19 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:16:54
            5.0T11  195  COPY:IT.MACROS       
0          MACROS TO CALL INTERTASK SVC.
0          Referenced by comments of: 636/1, 769/22, 1051/31, 1051/37, 1081/1, 1081/4, 1081/13, 1081/14, 1081/15, 1081/16 
01081/007   INTERTASK                WRITEUP         WF             S1561 5.0T4 VLO FSNAME=INTERTASK.WRITEUP.WF.007(1)           622
            5.0T4   622  INTERTASK.WRITEUP.WF.007           1 LINE     96   19 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:42:24
            5.0T11  196                       
0          A WRITEUP DESCRIBING HOW TO USE INTERTASK.
0          Referenced by comments of: 1081/8 
01081/008   INTERTASK                WRITEUP         PF             S1561 5.0T4 VLO FSNAME=INTERTASK.WRITEUP.PF.008(1)           623
            5.0T4   623  INTERTASK.WRITEUP.PF.008           1 LINE     71   22 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:42:32
            5.0T11  197                       
0          PRINT FILE FOR (1081/7).
01081/009   INTERTASK                JOB PROGRAM     SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.JOB_PROGRAM.SA.009(1)       624
            5.0T4   624  INTERTASK.JOB_PROGRAM.SA.009       1 LINE     76   11 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:22:06
            5.0T11  198                       
0          THIS IS THE SOURCE CODE FOR THE INTERTASK JOB PROGRAM.
           THE JOB PROGRAM DOES NOT PROCESS JOB PARAMETERS, BUT RATHER
           READS COMMANDS DIRECTLY FROM THE CONSOLE.  CURRENTLY, THERE
           ARE ONLY 2 COMMANDS: LIST AND SENSE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  856
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           LIST
            
              FUNCTION: TO OBTAIN A LIST OF THE NAMES OF ALL
                        NETWORKS IN EXISTENCE.  THE LIST COMMAND
                        DOES NOT TAKE PARAMETERS.
            
           SENSE NET-NAME <MODIFIERS>
            
              FUNCTION: TO SENSE A PARTICULAR NETWORK.  THE NETWORK NAME
                        MUST BE SPECIFIED.  A SUMMARY OF THE INFORMATION
                        IN THE NETWORK CONTROL BLOCK AND ONE LINE OF 
                        INFORMATION PER NODE IS PRINTED.  THE INFORMATION
                        IN THE SUMMARY IS SELF-EXPLANATORY.  THE INFORMATION
                        IN THE NODE DESCRIPTORS IS LARGELY SELF-EXPLANATORY
                        EXCEPT, PERHAPS, FOR THE INFORMATION APPEARING
                        UNDER THE COLUMN HEADING "STATUS".  THIS INFORMATION
                        APPEARS AS A SERIES OF LETTERS; THE LETTERS SHOULD
                        BE INTERPRETED AS FOLLOWS:
                            D -> MEANS NODE HAS BEEN DELETED
                            X -> MEANS NODE HAS AN EXIT SET
                            S -> MEANS EXIT IS SYNCHRONOUS
                            Q -> MEANS NODE HAS A NONEMPTY QUEUE
                                 OF MSGS, RECEIPTS, AND NOTIFICATIONS
                            B -> MEANS NODE HAS BEEN BLASTED
            
                        THE OPTIONAL MODIFIERS ARE:
                            NOHEADER -> TO SUPPRESS THE PRINTING OF
                                        THE SUMMARY OF THE INFORMATION
                                        FROM THE NETWORK CONTROL BLOCK
                            NONODES  -> TO SUPPRESS THE PRINTING OF
                                        THE INDIVIDUAL NODE DESCRIPTORS
            
                        NOTE THAT THIS PROGRAM IS ALSO RUNNABLE DIRECTLY AS
                        A NORMAL MTS PROGRAM.
            
           REQUIRES COPY:IT.DSECTS (1081/4).
01081/010   INTERTASK                JOB PROGRAM     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UBC  O'REILLY  MTA                              
0          Object part of Resident System (468).
01081/011   INTERTASK                JOB PROGRAM     OC  G          MTS:IT                                                          
            5.0T4   625  INTERTASK.JOB_PROGRAM.OC.011       1 LINE     24    1 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:22:08
            5.0T11  199  MTS:IT               
0          Contains loader control cards to run the IT job program with an MTS RUN
           command.
1                                                                                               SUN SEP 08/96   15:24:55   Page  857
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01081/012   INTERTASK                ITX             SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.ITX.SA.012(1)               626
            5.0T4   626  INTERTASK.ITX.SA.012               1 LINE     69   13 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:29
            5.0T11  200                       
0          THIS IS THE SOURCE CODE FOR THE INTERTASK EXERCISER MONITOR.
            
           THE INTERTASK EXERCISER IS A FACILITY FOR STARTING UP AN
           ARBITRARY NUMBER OF REAL TASKS WHICH USE THE INTERTASK FACILITY.
            
           WHAT NETWORKS ARE CREATED AND WHICH INTERTASK OPERATIONS ARE
           USED IS DEFINED BY THE SET OF REPERTOIRE ROUTINES WHICH ARE
           LOADED ALONG WITH THE INTERTASK EXERCISER MONITOR.
            
           THE PURPOSE OF THE MONITOR IS TO DETERMINE WHICH REPERTOIRE
           ROUTINES ARE LOADED, AND TO CONTROL THEIR EXECUTION (WHICH
           MAY BE OVERLAPPED IF REPERTOIRE ROUTINES CHOOSE TO DO THINGS
           ASYNCHRONOUSLY).  IN ESSENCE, THE MONITOR IS A REPERTOIRE
           ROUTINE DISPATCHER.
            
           THE MONITOR IS COMMAND DRIVEN.  THERE ARE CURRENTLY 3 COMMANDS:
           MTS, STOP, AND EXECUTE.  FOR A DESCRIPTION OF THESE COMMANDS,
           REFER TO THE SOURCE LISTING.
            
           REQUIRES THE MSG MACROS IN *SYSMAC, COPY:GLOBALS (1026/3),
           AND COPY:IT.DSECTS (1081/4).
0          Referenced by comments of: 1081/17, 1081/20 
01081/013   INTERTASK                ITX #001        SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#001.SA.013(1)          627
            5.0T4   627  INTERTASK.ITX_#001.SA.013          1 LINE     80    9 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:41
            5.0T11  201                       
0          THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #001.  THIS ROUTINE
           ONLY USES SYNCHRONOUS INTERTASK OPERATIONS.
            
           REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6),
           COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4).
01081/014   INTERTASK                ITX #002        SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#002.SA.014(1)          628
            5.0T4   628  INTERTASK.ITX_#002.SA.014          1 LINE     80    9 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:45
            5.0T11  202                       
0          THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #002.  THIS ROUTINE
           ONLY USES ASYNCHRONOUS INTERTASK OPERATIONS.
            
           REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6),
           COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4).
01081/015   INTERTASK                ITX #003        SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#003.SA.015(1)          629
            5.0T4   629  INTERTASK.ITX_#003.SA.015          1 LINE     80   10 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:52
            5.0T11  203                       
0          THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #003.  THIS ROUTINE
           ONLY USES ASYNCHRONOUS INTERTASK OPERATIONS AND USES RANDOM MESSAGE 
1                                                                                               SUN SEP 08/96   15:24:55   Page  858
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          LENGTHS AND EXIT BUFFER LENGTHS.
            
           REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6),
           COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4).
01081/016   INTERTASK                ITX #004        SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#004.SA.016(1)          630
            5.0T4   630  INTERTASK.ITX_#004.SA.016          1 LINE     80   11 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:56
            5.0T11  204                       
0          THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #004.  THIS ROUTINE
           ONLY USES ASYNCHRONOUS INTERTASK OPERATIONS, USES RANDOM MESSAGE 
           LENGTHS AND EXIT BUFFER LENGTHS, AND EXERCISES A FEW OF THE OTHER MORE 
           OBSCURE INTERTASK OPERATIONS LIKE CANCEL MESSAGE, CANCEL EXIT, AND
           CHANGE NODE ACCESS.
            
           REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6),
           COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4).
0          Referenced by comments of: 1081/17 
01081/017   INTERTASK                ITX             OC  G          SYS:ITX                                                         
            5.0T4   631  INTERTASK.ITX.OC.017               1 LINE     80   17 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:22:14
            5.0T11  205  SYS:ITX              
0          OBJECT FOR (1081/12) THROUGH (1081/16) AND (1081/21).
            
           NOTE:  THIS ALL CAME FROM UBC55 AND THE SOURCE AND OBJECT DO NOT AGREE,
                  BUT THIS FILE WORKS. CONTAINS REP CARDS.
01081/018   INTERTASK                ITX             C              *ITX                                                            
            5.0T4   632  INTERTASK.ITX.C.018                1 LINE     24    1 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:22:15
            5.0T11  206  *ITX                 
0          COMMAND FILE TO START 5 TASKS RUNNING ITX FOR 5000 CALLS TO EACH
           #NNN ROUTINE.  USES SYS:ITXCMD (1081/19).
01081/019   INTERTASK                ITX             C              SYS:ITXCMD                                                      
            5.0T4   633  INTERTASK.ITX.C.019                1 LINE     44    1 PAGE UBC  O'REILLY  MTA       AUG. 10, 1981  00:22:16
            5.0T11  207  SYS:ITXCMD           
0          Referenced by comments of: 1081/18 
01081/020   INTERTASK                GETMSG          SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.GETMSG.SA.020(1)            634
            5.0T4   634  INTERTASK.GETMSG.SA.020            1 LINE     68    4 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:14
            5.0T11  208                       
0          THIS IS THE SOURCE CODE FOR A UTILITY PROGRAM WHICH WILL RETURN AN ERROR
           MESSAGE GIVEN GR0 AND GR1 FROM AN INTERTASK OPERATION.  THE CODE IS 
           REENTRANT AND IS INTENDED SOME DAY TO BE PART OF THE RESIDENT SYSTEM.
           SEE THE SOURCE LISTING FOR DETAILS.
            
           CURRENTLY, IT IS USED BY INTERTASK ITX (1081/12).
1                                                                                               SUN SEP 08/96   15:24:55   Page  859
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01081/021   INTERTASK                GETMSG          OC  G          S1561 5.0T4 VLO FSNAME=INTERTASK.GETMSG.OC.021(1)            635
            5.0T4   635  INTERTASK.GETMSG.OC.021            1 LINE     80    3 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:15
            5.0T11  209                       
0          Referenced by comments of: 1081/17 
01081/022   INTERTASK                XITPTR          SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.XITPTR.SA.022(1)            636
            5.0T4   636  INTERTASK.XITPTR.SA.022            1 LINE     71    4 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:17
            5.0T11  210                       
0          THIS IS THE SOURCE CODE FOR A UTILITY WHICH WILL PRINT THE CONTENTS OF AN
           EXIT BUFFER IN A READABLE FORMAT.  THIS PROGRAM IS INTENDED TO BE USED FOR
           DEBUGGING PROGRAMS THAT USE INTERTASK. COPIES COPY:IT.DSECTS (1081/4). 
           ASSEMBLE USING THE MSG MACROS IN *SYSMAC.
01081/023   INTERTASK                XITPTR          OC  G          S1561 5.0T4 VLO FSNAME=INTERTASK.XITPTR.OC.023(1)            637
            5.0T4   637  INTERTASK.XITPTR.OC.023            1 LINE     80    3 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:19
            5.0T11  211                       
01081/024   INTERTASK                SNSPTR          SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.SNSPTR.SA.024(1)            638
            5.0T4   638  INTERTASK.SNSPTR.SA.024            1 LINE     68    3 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:21
            5.0T11  212                       
0          THIS IS THE SOURCE CODE FOR A UTILITY WHICH WILL PRINT THE CONTENTS OF A
           BUFFER AS RETURNED BY AN INTERTASK SENSE OPERATION IN A READABLE FORMAT.
           THIS PROGRAM IS INTENDED TO BE USED FOR DEBUGGING PROGRAMS THAT USE
           INTERTASK.  COPIES COPY:IT.DSECTS (1081/4).  ASSEMBLE USING THE MSG MACROS
           IN *SYSMAC.
01081/025   INTERTASK                SNSPTR          OC  G          S1561 5.0T4 VLO FSNAME=INTERTASK.SNSPTR.OC.025(1)            639
            5.0T4   639  INTERTASK.SNSPTR.OC.025            1 LINE     80    3 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:23
            5.0T11  213                       
01081/026   INTERTASK                LSTPTR          SA  G          S1561 5.0T4 VLO FSNAME=INTERTASK.LSTPTR.SA.026(1)            640
            5.0T4   640  INTERTASK.LSTPTR.SA.026            1 LINE     68    2 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:25
            5.0T11  214                       
0          THIS IS THE SOURCE CODE FOR A UTILITY WHICH WILL PRINT THE CONTENTS OF A
           BUFFER AS RETURNED BY AN INTERTASK LIST OPERATION IN A READABLE FORMAT.
           THIS PROGRAM IS INTENDED TO BE USED FOR DEBUGGING PROGRAMS THAT USE
           INTERTASK.  COPIES COPY:IT.DSECTS (1081/4).  ASSEMBLE USING THE MSG MACROS
           IN *SYSMAC.
01081/027   INTERTASK                LSTPTR          OC  G          S1561 5.0T4 VLO FSNAME=INTERTASK.LSTPTR.OC.027(1)            641
            5.0T4   641  INTERTASK.LSTPTR.OC.027            1 LINE     80    1 PAGE UBC  O'REILLY  MTA       AUG. 31, 1977  13:43:27
            5.0T11  215                       
01082/001   INDIRECT/RCMSG ROUTINES                               # (NOT DISTRIBUTED)                                               
                                                                                    UBC                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A SET OF
           SUBROUTINES USED BY THE UBC MAIL SYSTEM.  THE SUBROUTINES PROVIDE ERROR
           MESSAGES FOR MOST OF THE MAIL SYSTEM (OS-CALLABLE) SUBROUTINES.
1                                                                                               SUN SEP 08/96   15:24:55   Page  860
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01083/001C  MESSAGE FACILITY         SOURCE          SA  G          S0999 5.0AT1 VLO FSNAME=MESSAGE_FACILITY.SOURCE.SA.001(1)    747
            5.1T3   258  MESSAGE_FACILITY.SOURCE.SA.001     1 LINE     72    9 PAGE UBC            EADIE     JAN. 22, 1982  18:01:45
0          This component is a task-independent version of the subtasking monitor
           Canonical Form Message (CFM) expansion facility.
            
           This message expansion facility has been installed at U-M and will be used
           to emit messages, warnings etc. from the MTS job in a more rational manner.
           The code has been modified slightly from the Monitor release and comments
           are solicited.
            
           There is some description of how to use the facility in (1083/3).
            
           **********************************************************************
           D5.1 version:
            
           No use is made of this facility yet.
           **********************************************************************
01083/002C  MESSAGE FACILITY         OBJECT              G        # (RESIDENT SYSTEM)                                               
                                                                                    UBC            EADIE                            
01083/003C  MESSAGE FACILITY         WRITEUP         WP  G          S0999 5.0AT1 VLO FSNAME=MESSAGE_FACILITY.WRITEUP.WP.003(1)   748
            5.1T3   259  MESSAGE_FACILITY.WRITEUP.WP.003    1 LINE     68    7 PAGE UBC            EADIE     JAN. 22, 1982  18:01:47
0          Referenced by comments of: 1083/1 
01084/001C  TIME (UBC)               OBJECT          OL  G          PLUS:TIME*OL                                                    
            5.1T3   260  TIME_?UBC?.OBJECT.OL.001           1 LINE   5020   19 PAGE      BALLARD   EADIE     JULY 23, 1983  15:25:21
0          ----(D5.1)---------------------------------------------------------
            
           This is a set of time-and-date routine written in PLUS to convert
           between various forms of time and a 'canonical form'. The routines
           include general forms of input and output.
            
           Note that this library is NOT configured to be loaded in shared VM --
           the pseudo registers for this are not included.
0          Referenced by comments of: 1089/2 
01084/002C  TIME (UBC)               SOURCE          SQ  G          PLUS:TIME*SQ                                                    
            5.1T3   261  TIME_?UBC?.SOURCE.SQ.002           1 LINE    103   30 PAGE      BALLARD   EADIE     JULY 23, 1983  15:25:23
0          ----(D5.1)---------------------------------------------------------
            
           The source of the PLUS TIME routines.
            
           Compile with *PLUS and 0=PLUS:TIME*SQL (1084/3)
                                    PLUS:MISC*SQL (1042/86)
                                    *CLPARSELIB (1076/11)
                                    *PLUS.SOURCELIB (1042/5)
1                                                                                               SUN SEP 08/96   15:24:55   Page  861
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01084/003C  TIME (UBC)               SOURCELIB       SL  G          PLUS:TIME*SQL                                                   
            5.1T3   262  TIME_?UBC?.SOURCELIB.SL.003        1 LINE     68    5 PAGE      BALLARD   EADIE     JULY 23, 1983  15:25:24
0          ----(D5.1)---------------------------------------------------------
            
           The sourcelibrary for the PLUS TIME routines.
0          Referenced by comments of: 1084/2, 1089/9 
01084/004C  TIME (UBC)               GRAMMAR         SR  G          PLUS:TIME*SR                                                    
            5.1T3   263  TIME_?UBC?.GRAMMAR.SR.004          1 LINE     68    6 PAGE      BALLARD   EADIE     JULY 23, 1983  15:25:25
0          ----(D5.1)---------------------------------------------------------
            
           The grammar for the PLUS TIME routines.
01084/005C  TIME (UBC)               WRITEUP         PF  G          S1663 UBC86                                                 159 
            5.1T3   264  TIME_?UBC?.WRITEUP.PF.005          1 LINE     78   13 PAGE      BALLARD   EADIE     FEB. 04, 1983  11:08:05
0          ----(D5.1)---------------------------------------------------------
            
           A $COPY'able writeup for the PLUS TIME routines.
01084/006C  TIME (UBC)               BUILDER         C   G          PLUS:TIME.MAKE                                                  
            5.1T3   265  TIME_?UBC?.BUILDER.C.006           1 LINE    135    1 PAGE      BALLARD   EADIE     JULY 23, 1983  15:27:14
0          ----(D5.1)---------------------------------------------------------
            
           A little file to be $SOURCE'd to rebuild the file PLUS:TIME*OL
01086/001C  LIST COMMAND             SOURCE          SQ  G          CLS:LIST*SQ                                                     
            5.1T3   266  LIST_COMMAND.SOURCE.SQ.001         1 LINE    202   36 PAGE UM   KRAUSE              JULY 23, 1983  15:27:14
0          Plus source for $LIST CLS.  Compile using COPY:MTS*SQL (344/4),
           COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:LIST*SRL (1086/3),
           *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5).
           **********************************************************************
           D5.1 version:
            
           This version has a bug which can be fixed by adding the following
           line to the procedure Initialize_List, after line 1073:
            
                         Shared_Gdinfo_Ptr:=Null;
            
           **********************************************************************
0          Referenced by comments of: 1086/3, 1086/4 
01086/002C  LIST COMMAND             GRAMMAR         SR  G          CLS:LIST*SR                                                     
            5.1T3   267  LIST_COMMAND.GRAMMAR.SR.002        1 LINE     75    8 PAGE UM   KRAUSE              JULY 23, 1983  15:27:17
0          *CLParser (1076/6) grammar for the LIST command language.
0          Referenced by comments of: 1086/3, 1086/4 
1                                                                                               SUN SEP 08/96   15:24:55   Page  862
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01086/003C  LIST COMMAND             DECLARATIONS    SQ  G          CLS:LIST*SRL                                                    
            5.1T3   268  LIST_COMMAND.DECLARATIONS.SQ.003   1 LINE     73    1 PAGE UM   KRAUSE              JULY 23, 1983  15:27:17
0          Declarations generated by *CLParsegen (1076/1) using (1086/2) as
           input.  Used to compile (1086/1).
0          Referenced by comments of: 1086/1 
01086/004C  LIST COMMAND             OBJECT          OC  G          *NEWCLSLIST                                                     
            5.1T3   269  LIST_COMMAND.OBJECT.OC.004         1 LINE   6742   24 PAGE UM   KRAUSE              JULY 23, 1983  15:27:18
                         *NEWCLSLIST          
0          Object for (1086/1) and (1086/2).  Requires ETC:LISTHELP (1086/5).
0          Referenced by comments of: 1086/5 
01086/005C  LIST COMMAND             HELP FILE       D   G          ETC:LISTHELP                                                    
            5.1T3   270  LIST_COMMAND.HELP_FILE.D.005       1 LINE     68    8 PAGE UM   KRAUSE              JULY 23, 1983  15:27:19
                         ETC:LISTHELP         
0          Help file referenced by (1086/4).
0          Referenced by comments of: 1086/4 
01089/001C *FORUM                    INSTALLATION    P   G          S1663 UBC86                                                 163 
            5.1T3   271  FORUM.INSTALLATION.P.001           1 LINE     72    4 PAGE UBC  BALLARD   EADIE     FEB. 04, 1983  11:08:27
0          ----(D5.1)---------------------------------------------------------
            
           Instructions for installing and maintaining *FORUM.
            
           ***************** P L E A S E   R E A D   T H E M *****************
            
           Revised for Version 0.9 - changes indicated by revision bars. 
                        (Includes notes on the differences between V0.9 & V0.8)
0          Referenced by comments of: 1089/4 
01089/002C *FORUM                    PROGRAM         OE  G          *FORUM                                                          
            5.1T3   272  FORUM.PROGRAM.OE.002               1 LINE  32767   22 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:21
0          ----(D5.1)---------------------------------------------------------
            
           *FORUM is not post-IPL loaded at UM -- this is a version which has
           been link-editted:
            
           Continues with: PLUS:TIME*OL (1084/1)
                           PLUS:MISC*OL (1042/87)
                           *PLUS.OBJLIB (1042/64)
01089/003C *FORUM                    HELP FILE       D   G          ETC.:FORUM*H                                                    
            5.1T3   273  FORUM.HELP_FILE.D.003              1 LINE    182   14 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:22
0          ----(D5.1)---------------------------------------------------------
1                                                                                               SUN SEP 08/96   15:24:55   Page  863
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
           The FORUM help file.  It has been reformatted for use with the
           Full Screen Help facility (845).
01089/004C *FORUM                    WRITEUP         WF  O          W267:FORUM*WF                                                   
            5.1T3   274  FORUM.WRITEUP.WF.004               1 LINE    127   14 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:22
0          ----(D5.1)---------------------------------------------------------
            
           This is the FORMAT (308) source for FORUM.  It makes use of the
           FORMAT macros in COPY:JONMACLIBFMT (308/18).
            
           There have been several changes to *FORUM since this writeup was 
           produced.  They are mostly documented in the help file. 
            
           ----(Version 0.8)--------------------------------------------------
            
           The following changes correspond to version 0.8, as distributed in
           at Workshop VIII...
            
            1) A number of minor changes to the command syntax. 
            
            2) New display operands...
                  DISPLAY CONFERENCE NAME
                  DISPLAY CONFERENCE BLURB
            
            3) New select operand
                  PRINT/SELECT EXCLUDED 
            
            4) DESTROY conference-name
            
            5) PURGE CONFERENCE
               (which removes deleted and replaced items from the conference file. 
            
            6) The output produced now includes a carriage control character
               (normally a blank), so it can be copied to a printer without
               having to remember the "@-CC". 
            
            7) The DISPLAY and PRINT commands now accept an operand
                     OUTPUT=Fdname     or     ON Fdname
               to allow redirecting the output to a file, *PRINT*, etc. 
            
               The commands don't do special formatting for the printer at 
               present, except that:
                    - if entire discussions are being printed
                      ( PRINT  <discussions> ALL ), then each discussion
                      will start a new page. 
                    - if discussions from more than one conference are 
                      printed with a single PRINT command, then each conference
                      will start a new page.  E.g., PRINT ALL TITLES
                      will print the titles for each conference on a new page. 
            
               The output operand may appear either before on after other 
               command operands: 
1                                                                                               SUN SEP 08/96   15:24:55   Page  864
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
                      PRINT CONF USER-FORUM ALL ON *PRINT*
                      DISPLAY OUTPUT=*PRINT PARTICIPANTS 
            
            8) The format of responses has been changed to include the 
               author on the first line instead of the last. 
            
            9) You can now use *FORUM from more than one ID without having
               to join from each ID.  To do so, you must permit your 
               participant file Read-Write to the other ID's you wish to use,
               then specify ID=ccid in the PAR field of the $RUN command, 
               were ccid is the id containing the participant file. 
            
               That is, if your participant file is under id BALR, and
               you wish to use it from id AB1, then
                   - from ID BALR:
                        $PERMIT FORUM.PART RW AB1
                     (BALR can continue to run *FORUM as usual)
                   - from ID AB1:
                        $RUN *FORUM PAR=ID=BALR
                     (will access the participant file under BALR, instead of 
                      under AB1.)
            
               A conference name may still be specified in the PAR field
               as before, either before or after the ID= operand, with
               a separating comma. 
            
            10) The following change is mainly of interest at UBC. 
               It is now possible to use the test version of the 
               file editor when editing discussions in *FORUM.  This
               provides visual editing at most FEP terminals and 
               some other new features. 
            
               Unfortunately, FORUM has no way to determine whether the 
               TEST editor has been selected in MTS, so it is necessary to 
               use the following FORUM command:
                    SET VERSION(EDIT)=TEST
               to tell FORUM to use the test editor. 
               (The test editor has subroutine entry point EDITTEST
                at UBC to make this possible.)
            
            
           The following are not documented in the writeup or the help file...
            
               DISPLAY STATISTICS
               The FORUM management commands,
                    described in the installation notes (1089/1) 
            
           ----(Version 0.9)--------------------------------------------------
            
           The following changes correspond to version 0.9 and are new with
           this version...
            
               1.  A few bugs have been fixed.
1                                                                                               SUN SEP 08/96   15:24:55   Page  865
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0           
               2.  The heading for discussions and responses now indicates the 
                   number of lines.
            
               3.  If you try to enter an item with lines longer than the 
                   usual terminal width (about 80 characters), FORUM will 
                   suggest you shorten the lines. 
            
               4.  If you print an item with lines that are longer than the 
                   output width of the terminal the long lines will be wrapped 
                   onto multiple screen lines. 
            
               5.  The command NEXT has been implemented as a shorthand for
                   "PRINT NEXT".  It allows no operands.  The command 
                   RETRIEVE has been implemented as a synonym for "SELECT". 
                   These two changes provide a small step in the direction of
                   compatibility with the $MESSAGE command syntax. 
            
               6.  DISPLAY PARTICIPANT "name" may now be followed by the 
                   operand CONFERENCES to determine what conferences the 
                   specified person belongs to. 
            
               7.  DISPLAY CONFERENCE conference-name  may now be used to 
                   find out what access you have to a specified conference. 
            
               8.  There have been a few changes in the interaction of 
                   multiple conferences.  Unless you have gone into single
                   conference mode with the CONF command, or belong to only 
                   one conference, you will always be prompted for a conference
                   name when you start a discussion. 
                   If you are in single-conference mode and issue a JOIN command, 
                   the active conference will be changed to the conference joined. 
                   I.e., the effect will be the same as if you issued a 
                   JOIN command followed by a CONF command. 
            
               9.  This version of FORUM includes an *experimental* full screen
                   help facility. I've installed it in FORUM to try to get some
                   experience with it.  I don't plan to make any changes to the
                   program, but will relay any comments to the author. 
            
                   Unfortunately, due to problems with UBC's full-screen support
                   at network and front-end terminals, this is currently available
                   only at 3270-type terminals. 
            
                   To invoke this facility, you must issue the FORUM command
                       SET FSHELP=ON
                   before entering "HELP" or "?".   (You could put this 
                   SET command in a "forum profile" to cause it to be 
                   issued each time you run *FORUM.  (Enter "? FORUMPROFILE"
                   for information about forumprofiles. )
            
                   Hopefully, the operation of the full-screen help is self- 
                   explanatory. 
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  866
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0                  Please note that this IS experimental, and may change
                   considerably or be removed completely in future versions of
                   FORUM.
            
           ----(Version 0.9+)-------------------------------------------------
            
           A new command was added for managers to allow the total removal of
           a discussion without leaving ANY trace (previously, the title line
           of a discussion could never be removed). 
            
           The command is  "PURGE DISCUSSION <N>"  where <N> is the number of
           the discussion to be removed.
0          Referenced by comments of: 1089/5, 1089/6 
01089/005C *FORUM                    WRITEUP         PF  O          S1663 UBC86                                                 168 
            5.1T3   275  FORUM.WRITEUP.PF.005               1 LINE     75   17 PAGE UBC  BALLARD   EADIE     FEB. 04, 1983  11:18:41
0          ----(D5.1)---------------------------------------------------------
            
           Print-ready writeup for FORUM.  Output from (1089/4).
01089/006C *FORUM                    MEMO 447        PF  O        # (NOT DISTRIBUTED)                                               
                                                                                    UBC  BALLARD   EADIE                            
0          Computing Center Memo 447, "UBC FORUM (*FORUM)," is an earlier 
           version of (1089/4), and thus is not distributed.
01089/007C *FORUM                    GRAMMAR         SR  G          W267:FORUM*SR                                                   
            5.1T3   276  FORUM.GRAMMAR.SR.007               1 LINE     77    9 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:26
0          ----(D5.1)---------------------------------------------------------
            
           Grammar (input to *CLPARSER version 2) for FORUM commands. 
0          Referenced by comments of: 1089/8 
01089/008C *FORUM                    SEMANTIC DECLS  SQ  G          W267:FORUMSEM*SQL                                               
            5.1T3   277  FORUM.SEMANTIC_DECLS.SQ.008        1 LINE     72    3 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:26
0          ----(D5.1)---------------------------------------------------------
            
           Declarations generated by *CLPARSEGEN from (1089/7).
0          Referenced by comments of: 1089/9 
01089/009C *FORUM                    SOURCE LIBRARY  SQ  G          W267:FORUM*SQL                                                  
            5.1T3   278  FORUM.SOURCE_LIBRARY.SQ.009        1 LINE     68   17 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:26
0          ----(D5.1)---------------------------------------------------------
            
           Source library used for all *FORUM compilations. 
            
           Line 0 contains a series of '$continue withs' for all the libraries 
1                                                                                               SUN SEP 08/96   15:24:55   Page  867
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          required by *FORUM, so *PLUS can be run with 0=FORUM*SQL(0).
            
           The libraries required are:
            
                FORUMSEM*SQL    (1089/8)
                FORUM*SQL       (1089/9)
                HELP:FSHELP.SQL (845/5)
                *CLPARSELIB     (1076/11)
                PLUS:MISC*SQL   (1042/88)
                PLUS:TIME*SQL   (1084/3)
                *PLUS.SOURCELIB (1042/5)
0          Referenced by comments of: 1089/9 
01089/010C *FORUM                    MAIN PROG       SQ  G          W267:FOR.MAIN*SQ                                                
            5.1T3   279  FORUM.MAIN_PROG.SQ.010             1 LINE     68    9 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:27
0          ----(D5.1)---------------------------------------------------------
            
           Main program and initialization.
01089/011C *FORUM                    SEMANTIC RTNS   SQ  G          W267:FOR.SEM*SQ                                                 
            5.1T3   280  FORUM.SEMANTIC_RTNS.SQ.011         1 LINE     84   15 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:28
0          ----(D5.1)---------------------------------------------------------
            
           Semantic routines called from parser.
01089/012C *FORUM                    COMMAND RTNS    SQ  G          W267:FOR.CMD*SQ                                                 
            5.1T3   281  FORUM.COMMAND_RTNS.SQ.012          1 LINE     73   27 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:28
0          ----(D5.1)---------------------------------------------------------
            
           Command processing routines called from semantic routines for 
           some commands. 
01089/013C *FORUM                    SERVICE RTNS    SQ  G          W267:FOR.SERV*SQ                                                
            5.1T3   282  FORUM.SERVICE_RTNS.SQ.013          1 LINE     68   14 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:29
0          ----(D5.1)---------------------------------------------------------
            
           Various service routines called from command processing and the
           semantic routines.
01089/014C *FORUM                    FILE RTNS       SQ  G          W267:FOR.FILE*SQ                                                
            5.1T3   283  FORUM.FILE_RTNS.SQ.014             1 LINE     95   14 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:30
0          ----(D5.1)---------------------------------------------------------
            
           Routines which obtain various FORUM data items from the various 
           files used by *FORUM.  These are the only routines which have
           any detailed knowledge of how the data is stored. 
1                                                                                               SUN SEP 08/96   15:24:55   Page  868
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
01089/015C *FORUM                    SYSTEM INTF     SQ  G          W267:FOR.SYS*SQ                                                 
            5.1T3   284  FORUM.SYSTEM_INTF.SQ.015           1 LINE     70    8 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:31
0          ----(D5.1)---------------------------------------------------------
            
           Various system interfacing routines.  Most, but by no means all,
           systems services are invoked from within this unit.
01089/016C *FORUM                    MESSAGE RTNS    SQ  G          W267:FOR.MES*SQ                                                 
            5.1T3   285  FORUM.MESSAGE_RTNS.SQ.016          1 LINE     68    5 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:31
0          ----(D5.1)---------------------------------------------------------
            
           Message formatting routine used by *FORUM. 
            
           These routines will not be used in the next version of FORUM.  The
           new MESSAGE routines in the PLUS runtime library (1042/60) will be
           used instead.
01089/017C *FORUM                    STRING RTNS     SQ  G          W267:FOR.STRING*S                                               
            5.1T3   286  FORUM.STRING_RTNS.SQ.017           1 LINE     67    2 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:31
0          ----(D5.1)---------------------------------------------------------
            
           A couple of trivial string processing routines used by FORUM. 
01089/018C *FORUM                    PMF FILE        D   G          W267:FORUM_                                                     
            5.1T3   287  FORUM.PMF_FILE.D.018               1 LINE    113    3 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:32
0          ----(D5.1)---------------------------------------------------------
            
           This is a trivial PMF file that I use to maintain *FORUM. 
            
           It uses the PMF just as a source of command-procedures, and makes
           no use of the subfiles capabilities. 
            
           The procedures I (Gavin) use to regenerate FORUM are:
            
               REBUILD   ... compiles the grammar and the source and puts
                             all the object into the file FORUM*O (which
                             should be created first).
            
               LINK      ... link edits FORUM*O to the file FORUM>.
            
               FIX       ... edits some ccids etc in FORUM> from the test
                             usage to the production usage.
01089/019C *FORUM                    LINKEDIT CMDS   D   G          W267:FOR.LINK*C                                                 
            5.1T3   288  FORUM.LINKEDIT_CMDS.D.019          1 LINE     28    1 PAGE UBC  BALLARD   EADIE     JULY 23, 1983  15:27:32
0          ----(D5.1)---------------------------------------------------------
            
           ****************** D O   N O T   R E N U M B E R ******************
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  869
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Is used by the PMF procedure LINK.
02001/001   UNEMAIL                                               # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A MAIL 
           SYSTEM WRITTEN FOR SIGFILE USE.
02002/001   DIABLO                                                # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM
           TO DRIVE A DIABLO PRINTER.
02004/001   NUNET                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
02005/001   PRIVATE_DISKS                                         # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE UNE
           PRIVATE DISK SCHEME.
02006/001  *TOTPAGES                                              # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, LISTS FREE
           SPACE ON A NAMED VOLUME, OR ON ALL PUBLIC DISKS IF NO PARAMETER IS GIVEN.
02008/001   DEVSNIFF                                              # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS PART OF
           UNE'S IPL SEQUENCE.  IT NOTES PRIVATE VOLUMES ALREADY MOUNTED AT IPL IN
           SHARED STORAGE TABLE.
02013/001   ASM.PREP                                              # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN
           ASSEMBLER PREPROCESSOR.
02015/001   LONG                                                  # (NOT DISTRIBUTED)                                               
                                                                                    UNE                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PACKAGE
           TO DO INTEGER ARITHMETIC ON VERY LARGE NUMBERS.
03003/001   SPIRES                                                # (NOT DISTRIBUTED ON D5.1)                                       
                                                                                    UM   STERKEN                                    
0          ********************************************************************
           D5.1 comments:
            
1                                                                                               SUN SEP 08/96   15:24:55   Page  870
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          UQV is the official MTS SPIRES distributor. SPIRES is not included in
           D5.1 because of timing considerations having to do with the imminent
           arrival of a new distribution from Alberta. All D5.1 components which
           require SPIRES should work with the latest distibution you received
           from Alberta.
           ********************************************************************
03006/001  *PL1SYN                                                # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
03007/001   APLUTIL                                               # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
03011/001  *FLOWCHART                IBM SOURCE      SA  O          S1560 5.0T3 VLO FSNAME=FLOWCHART.IBM_SOURCE.SA.001(1)       1417
            5.0T3  1417  FLOWCHART.IBM_SOURCE.SA.001        1 SEQ      80  387 PAGE UQV  WARD      DWB       OCT. 10, 1974  12:28.56
            5.0T9   273                       
0          THIS IS THE SOURCE FOR THE IBM FLOWCHARTING PROGRAM.  IT DOES NOT FLOWCHART ANYTHING
           AUTOMATICALLY; YOU HAVE TO TELL IT (VIA ITS INPUT LANGUAGE) WHAT KIND OF BOXES TO
           DRAW AND HOW THEY ARE TO BE CONNECTED.  SEE THE BRIEF DESCRIPTION IN MTS VOLUME 2.
           FOR MORE COMPLETE INFORMATION, SEE IBM FORM GH20-0293.
0          Referenced by comments of: 3011/2, 3011/3 
03011/002A *FLOWCHART                MTS UPDATE      UU  O          S1644 5.0BT1 VLO FSNAME=FLOWCHART.MTS_UPDATE.UU.002(1)      1045
            5.1T3   289  FLOWCHART.MTS_UPDATE.UU.002        1 LINE     72   41 PAGE UQV  WARD      DWB       NOV. 21, 1982  23:14:35
0          *UPDATE DECK TO PRODUCE MTS VERSION OF FLOWCHART FROM ORIGINAL IBM SOURCE (3011/1).
            
           *************************************************************************
           D5.0A version:
            
           Changed Oct. 15 1982 to replace X'00' in file names of files it creates
           to C'#'.
           *************************************************************************
0          Referenced by comments of: 3011/3 
03011/003A *FLOWCHART                MTS SOURCE      SA  O          S1644 5.0BT1 VLO FSNAME=FLOWCHART.MTS_SOURCE.SA.003(1)      1046
            5.1T3   290  FLOWCHART.MTS_SOURCE.SA.003        1 LINE     80  359 PAGE UQV  WARD      DWB       NOV. 21, 1982  23:14:48
0          RESULT OF APPLYING ABOVE UPDATE (3011/2) TO IBM SOURCE (3011/1). COPIES
           *GDINFODSECT (594).
0          Referenced by comments of: 3011/4 
03011/004A *FLOWCHART                OBJECT          OC  O          S1644 5.0BT1 VLO FSNAME=FLOWCHART.OBJECT.OC.004(1)          1047
            5.1T3   291  FLOWCHART.OBJECT.OC.004            1 LINE     80   53 PAGE UQV  WARD      DWB       NOV. 21, 1982  23:15:43
0          OBJECT FROM ASSEMBLY OF MTS SOURCE (3011/3).
0          Referenced by comments of: 3011/5 
1                                                                                               SUN SEP 08/96   15:24:55   Page  871
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03011/005A *FLOWCHART                MTS OBJECT      OE  O          *FLOWCHART                                                      
            5.1T3   292  FLOWCHART.MTS_OBJECT.OE.005        1 LINE  25588   18 PAGE UQV  WARD      DWB       JULY 23, 1983  15:27:42
                         *FLOWCHART           
0          LINK-EDITED RESULT FROM ABOVE OBJECT (3011/4).
03011/006  *FLOWCHART                TEST 1          D              S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_1.D.006(1)            1422
            5.0T3  1422  FLOWCHART.TEST_1.D.006             1 LINE     72    1 PAGE UQV  WARD      DWB       JULY 03, 1981  21:07:24
            5.0T9   278                       
0          THIS COMPONENT AND THE NEXT 5 ARE *FLOWCHART TEST PROGRAMS.
03011/007  *FLOWCHART                TEST 2          D              S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_2.D.007(1)            1423
            5.0T3  1423  FLOWCHART.TEST_2.D.007             1 LINE     62    1 PAGE UQV  WARD      DWB       JULY 03, 1981  21:07:25
            5.0T9   279                       
03011/008  *FLOWCHART                TEST 3          D              S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_3.D.008(1)            1424
            5.0T3  1424  FLOWCHART.TEST_3.D.008             1 LINE     75    1 PAGE UQV  WARD      DWB       JULY 03, 1981  21:07:26
            5.0T9   280                       
03011/009  *FLOWCHART                TEST 4          D              S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_4.D.009(1)            1425
            5.0T3  1425  FLOWCHART.TEST_4.D.009             1 LINE     68    1 PAGE UQV  WARD      DWB       JULY 03, 1981  21:07:27
            5.0T9   281                       
03011/010  *FLOWCHART                TEST 5          D              S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_5.D.010(1)            1426
            5.0T3  1426  FLOWCHART.TEST_5.D.010             1 LINE     62    1 PAGE UQV  WARD      DWB       JULY 03, 1981  21:07:27
            5.0T9   282                       
03011/011  *FLOWCHART                TEST 6          D              S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_6.D.011(1)            1427
            5.0T3  1427  FLOWCHART.TEST_6.D.011             1 LINE     72    4 PAGE UQV  WARD      DWB       JULY 03, 1981  21:07:28
            5.0T9   283                       
03012/001   TYPESET                                               # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT IS NOT CURRENTLY INSTALLED AT MICHIGAN.Y
03013/001   ALGOL68C                                              # (NOT INSTALLED AT UM)                                           
            D4T3    690  ALGOL68C.COMPILER.OE.001           1 SEQ   32767   45 PAGE UQV  MAILLOUX            OCT. 11, 1976  08:56:32
0          THIS VERSION OF ALGOL68C WAS RECEIVED AT UM FROM UQV IN OCT/76 AND IS
           VERSION 242 OF THE ALGOL68C COMPILER, WHICH WAS OBTAINED FROM CAMBRIDGE, ENGLAND.
            
            
            
           NOTE: THIS VERSION HAS NOT BEEN INSTALLED AT UM AS OF 1 APR/81.
03014/001   UQV FEP                                               # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE 360 SIDEY
           OF THE UQV FRONT END DSR.
1                                                                                               SUN SEP 08/96   15:24:55   Page  872
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03016/001   APLSV                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE SV
           VERSION OF APL.
03017/001  *DES                                                   # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE DATA
           ENTRY SYSTEM, A HOME-GROWN VERSION OF VIDEO 370.
03018/001   TEXTFORM                 DESIGN SPECS    WF           # (NOT DISTRIBUTED BY UQV)                                        
                                                                                    UQV  TXTFGROUP LIFT                             
0          TEXTFORM is a registered trademark of the University of Alberta.
            
           TEXTFORM is copyrighted by the University of Alberta.
           Redistribution to installations other than those receiving
           distributions of MTS requires written permission.
            
           This is the final version of the TEXTFORM design specifications.
            
           The members of the "TXTFGROUP" are:
                Grant Crawford
                Dave Holberton
                Earl Culham
                Debbie Reinhart
            
           ******************************************************************
           This is TEXTFORM version 1.1.
           ******************************************************************
0          Referenced by comments of: 828/2, 3018/2 
03018/002   TEXTFORM                 DESIGN SPECS    PF           # (NOT DISTRIBUTED BY UQV)                                        
                                                                                    UQV  TXTFGROUP LIFT                             
0          Printer copy of (3018/1).
03018/003   TEXTFORM                 RESTORE         C              TXTF:CREATES                                                    
            5.0T4     1  TEXTFORM.RESTORE.C.003             1 LINE     73    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:17:07
            5.0T9   284                       
0          For installations installing TEXTFORM for the first time: 
            
               Component (3018/5), the Internals Manual, should be printed, 
               and the section entitled "Installation Guide" should be
               read before proceeding further.
            
           For installations who already have TEXTFORM running:
            
               Component (3018/5), the Internals Manual, lines 1 to 1278
               should be printed. However you may print the whole manual
1                                                                                               SUN SEP 08/96   15:24:55   Page  873
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0              if you wish since it has been updated since Version .97.
               Read the section entitled "Installation Guide" before
               proceeding further. There are changes.
03018/004   TEXTFORM                 INTERNALS       WX             S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.INTERNALS.WX.004        
            5.0T4     2  TEXTFORM.INTERNALS.WX.004          1 LINE    255  306 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:49:56
            5.0T9   285                       
0          This is the PLM - set up for the 1403.
           The first few lines of the file contain notes on the options 
           available, but what you need (the whole thing) is produced
           by the defaults.
0          Referenced by comments of: 3018/5, 3018/12, 3018/61, 3018/81, 3018/123, 3018/124, 3018/125, 3018/126, 3018/155,
                 3018/160, 3018/161, 3018/162 
03018/005   TEXTFORM                 INTERNALS       PX             S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.INTERNALS.PX.005        
            5.0T4     3  TEXTFORM.INTERNALS.PX.005          1 LINE    108 1036 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:50:48
            5.0T9   286                       
0          Print file for (3018/4) - about 1000 pages of TN.
           The Table of Contents is at the end of the print file.
0          Referenced by comments of: 3018/3 
03018/006   TEXTFORM                 INTRODUCTION    WX             S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.INTRODUCTION.WX.006     
            5.0T4     4  TEXTFORM.INTRODUCTION.WX.006       1 LINE    229   56 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:53:00
            5.0T9   287                       
0          The INTRODUCTION manual - set up for the 1403.
03018/007   TEXTFORM                 USERS           WX             S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.USERS.WX.007            
            5.0T4     5  TEXTFORM.USERS.WX.007              1 LINE    236   58 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:54:31
            5.0T9   288                       
0          The USERS manual - set up for the 1403.
03018/008   TEXTFORM                 REFERENCE       WX             S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.REFERENCE.WX.008        
            5.0T4     6  TEXTFORM.REFERENCE.WX.008          1 LINE    210   49 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:55:40
            5.0T9   289                       
0          The REFERENCE manual - set up for the 1403.
           (Note - Due to a bug in the handling of large structures, it will
           not run successfully.)
03018/009   TEXTFORM                 LAYOUT_DEF      WX           # (NOT AVAILABLE YET)                                             
                                                                                    UQV  TXTFGROUP LIFT                             
0          The layout definition manual will go here.
1                                                                                               SUN SEP 08/96   15:24:55   Page  874
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/010   TEXTFORM                 *TEXTFORM       OE  G          *TEXTFORM                                                       
            5.0T4     7  TEXTFORM.*TEXTFORM.OE.010          1 LINE   9440   69 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:17:51
            5.0T9   290  *TEXTFORM            
0          TEXTFORM object.
0          Referenced by comments of: 3018/14, 3018/15, 3018/16, 3018/17, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/27,
                 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/42, 3018/47, 3018/49, 3018/51, 3018/52, 3018/53, 3018/54,
                 3018/55, 3018/56, 3018/63, 3018/64, 3018/66, 3018/77, 3018/115, 3018/116, 3018/117 
03018/011   TEXTFORM                 TXTFMSGS        M              ETC:TXTFMSGS                                                    
            5.0T4     8  TEXTFORM.TXTFMSGS.M.011            1 LINE     88    7 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:17:55
            5.0T9   291  ETC:TXTFMSGS         
0          ERROR MESSAGES.
03018/012   TEXTFORM                 AMWID           SA  G          TXTF:AMWID.S                                                    
            5.0T4     9  TEXTFORM.AMWID.SA.012              1 LINE     80   16 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:17:56
            5.0T9   292                       
0          PROGRAM FOR BUILDING AM748 PHOTOTYPESETTER WIDTH TABLES.  SEE THE INTERNALS
           MANUAL (3018/4) FOR A DESCRIPTION.
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
03018/013   TEXTFORM                 AM748N          SA  G          TXTF:AM748N.S                                                   
            5.0T4    10  TEXTFORM.AM748N.SA.013             1 LINE     80   54 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:17:58
            5.0T9   293                       
0          AM748 PHOTOTYPESETTER OUTPUT DEVICE PROCESSOR (OD).  COPIES GBLC (3018/120),
           GBLS (3018/22), AND XODTGETM (3018/144).  OBJECT IN TXTFODS (3018/156).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/014   TEXTFORM                 ATPAC           SA  G          TXTF:ATPAC.S                                                    
            5.0T4    11  TEXTFORM.ATPAC.SA.014              1 LINE     80   11 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:05
            5.0T9   294                       
0          CONTAINS THE ATEXEC, ATERASE, ATINS, ATRAINS, ATRAERS, ECQSTRG, AND EXDG
           SUBROUTINES FOR AT-POINT PROCESSING.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
03018/015   TEXTFORM                 CHPAC           SA  G          TXTF:CHPAC.S                                                    
            5.0T4    12  TEXTFORM.CHPAC.SA.015              1 LINE     80   36 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:06
            5.0T9   295                       
0          CONTAINS THE GETVAL, RETVAL, SETATTR, SETVAL, GETPV, SECHG, PSVTAB, ASSIGN,
           HCHANGE, AND ERSVTAB SUBROUTINES FOR SYMBOL TABLE PROCESSING.  OBJECT IN
           *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
1                                                                                               SUN SEP 08/96   15:24:55   Page  875
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/016   TEXTFORM                 CONVPAC         SA  G          TXTF:CONVPAC.S                                                  
            5.0T4    13  TEXTFORM.CONVPAC.SA.016            1 LINE     80   46 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:09
            5.0T9   296                       
0          CONTAINS SUBROUTINES FOR CASE, LANGUAGE, STRING, AND NUMBER CONVERSION.
           OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/017   TEXTFORM                 CWKDAY          SA  G          TXTF:CWKDAY.S                                                   
            5.0T4    14  TEXTFORM.CWKDAY.SA.017             1 LINE     80    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:13
            5.0T9   297                       
0          CONTAINS DATA AND TIME SUBROUTINE.  OBJECT IN (3018/77) AND *TEXTFORM
           (3018/10).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
0          Referenced by comments of: 3018/77 
03018/018   TEXTFORM                 DEVPAC          SA  G          TXTF:DEVPAC.S                                                   
            5.0T4    15  TEXTFORM.DEVPAC.SA.018             1 LINE     80   12 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:14
            5.0T9   298                       
0          COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
           OBJECT IN *TEXTFORM (3018/10).
03018/019   TEXTFORM                 EXPAC           SA  G          TXTF:EXPAC.S                                                    
            5.0T4    16  TEXTFORM.EXPAC.SA.019              1 LINE     80   74 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:15
            5.0T9   299                       
0          CONTAINS THE TXTFDRVR, GCI, PARSER, COMDEXEC SUBROUTINES AND FRIENDS. 
           OBJECT IN  *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS
           (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/152 
03018/020   TEXTFORM                 EXPRPAC         SA  G          TXTF:EXPRPAC.S                                                  
            5.0T4    17  TEXTFORM.EXPRPAC.SA.020            1 LINE     80   27 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:21
            5.0T9   300                       
0          CONTAINS THE EVALUATE, EXPREV, AND EXEVAL SUBROUTINES FOR EXPRESSION
           EVALUATION.  OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120)
           AND GBLS (3018/22). 
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
03018/021   TEXTFORM                 FUNPAC          SA  G          TXTF:FUNPAC.S                                                   
            5.0T4    18  TEXTFORM.FUNPAC.SA.021             1 LINE     80   34 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:23
            5.0T9   301                       
0          TEXTFORM FUNCTIONS.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
1                                                                                               SUN SEP 08/96   15:24:55   Page  876
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/022   TEXTFORM                 GBLS            SA  G          TXTF:GBLS                                                       
            5.0T4    19  TEXTFORM.GBLS.SA.022               1 LINE     80    7 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:27
            5.0T9   302                       
0          COPY SECTION OF GLOBAL SYMBOLS INCLUDING INSTALLATION OPTIONS.  COPIES 
           GBLD (3018/119). COPIED BY MANY TEXTFORM SUBCOMPONENTS.
0          Referenced by comments of: 3018/13, 3018/14, 3018/15, 3018/16, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/24,
                 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34, 3018/35, 3018/36,
                 3018/37, 3018/38, 3018/41, 3018/42, 3018/44, 3018/45, 3018/46, 3018/47, 3018/48, 3018/49, 3018/50, 3018/51,
                 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/115, 3018/116, 3018/117, 3018/136, 3018/137, 3018/147,
                 3018/149, 3018/151, 3018/152, 3018/158, 3018/171 
03018/023   TEXTFORM                 GFDSTAR         SA  G          TXTF:GFDSTAR.S                                                  
            5.0T4    20  TEXTFORM.GFDSTAR.SA.023            1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:28
            5.0T9   303                       
0          CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON 
           TEXTFORM REFERENCED/LOADED FILES.  THIS IS THE PUBLIC FILE (OWNER ETC:)
           VERSION. COPIES GBLC (3018/120) AND GBLS (3018/22).  OBJECT IN (3018/66) AND 
           *TEXTFORM (3018/10). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
0          Referenced by comments of: 3018/66 
03018/024   TEXTFORM                 GFDN            SA  G          TXTF:GFDN.S                                                     
            5.0T4    21  TEXTFORM.GFDN.SA.024               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:29
            5.0T9   304                       
0          CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON
           TEXTFORM REFERENCED/LOADED FILES.  THIS IS THE NEW: VERSION.  COPIES 
           GBLC (3018/120) AND GBLS (3018/22).  OBJECT IN (3018/67).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
0          Referenced by comments of: 3018/67 
03018/025   TEXTFORM                 GFDO            SA  G          TXTF:GFDO.S                                                     
            5.0T4    22  TEXTFORM.GFDO.SA.025               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:29
            5.0T9   305                       
0          CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON
           TEXTFORM REFERENCED/LOADED FILES.  THIS IS THE OLD: VERSION.  COPIES 
           GBLC (3018/120) AND GBLS (3018/22).  OBJECT IN (3018/65).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
0          Referenced by comments of: 3018/65 
03018/026   TEXTFORM                 GFDT            SA  G          TXTF:GFDT.S                                                     
            5.0T4    23  TEXTFORM.GFDT.SA.026               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:30
            5.0T9   306                       
0          CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON 
           TEXTFORM REFERENCED/LOADED FILES.  THIS IS THE TXTF: VERSION.  COPIES 
           (3018/120) AND GBLS (3018/22).  OBJECT IN (3018/68).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
1                                                                                               SUN SEP 08/96   15:24:55   Page  877
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 3018/68 
03018/027   TEXTFORM                 GOPAC           SA  G          TXTF:GOPAC.S                                                    
            5.0T4    24  TEXTFORM.GOPAC.SA.027              1 LINE     80   23 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:30
            5.0T9   307                       
0          CONTAINS THE TXTFINIT AND TXTFTERM SUBROUTINES TO INITIALIZE AND TERMINATE
           TEXTFORM. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND 
           GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
03018/028   TEXTFORM                 HYPAC           SA  G          TXTF:HYPAC.S                                                    
            5.0T4    25  TEXTFORM.HYPAC.SA.028              1 LINE     80   56 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:33
            5.0T9   308                       
0          CONTAINS HYPHENATION SUBROUTINES.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
03018/029   TEXTFORM                 INTRFACE        SA  G          TXTF:INTRFACE.S                                                 
            5.0T4    26  TEXTFORM.INTRFACE.SA.029           1 LINE     80    8 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:37
            5.0T9   309                       
0          CONTAINS THE INTERFACE TO SYSTEM SUBROUTINES.  OBJECT IN *TEXTFORM (3018/10).
           COPIES *CNFGINFODSECT (654), GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 
03018/030   TEXTFORM                 LISTPAC         SA  G          TXTF:LISTPAC.S                                                  
            5.0T4    27  TEXTFORM.LISTPAC.SA.030            1 LINE     80   10 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:39
            5.0T9   310                       
0          CONTAINS THE LISTER, ALTLIST, CHLIST, CR, AND XREFIT SUBROUTINES FOR SOURCE
           LISTING.  OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS 
           (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/031   TEXTFORM                 MACPAC          SA  G          TXTF:MACPAC.S                                                   
            5.0T4    28  TEXTFORM.MACPAC.SA.031             1 LINE     80   47 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:40
            5.0T9   311                       
0          CONTAINS THE TXTFINPT SUBROUTINE AND FRIENDS FOR INPUT GETTING, AND 
           THE ROUTINES FOR, IF, WHILE, EXECUTE PROCESSING, ETC.  OBJECT IN
           *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/032   TEXTFORM                 NPP             SA  G          TXTF:NPP.S                                                      
            5.0T4    29  TEXTFORM.NPP.SA.032                1 LINE     80   56 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:44
            5.0T9   312                       
0          CONTAINS THE PAGEPROC SUBROUTINE FOR PAGE PROCESSING.  OBJECT IN
           *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
1                                                                                               SUN SEP 08/96   15:24:55   Page  878
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/033   TEXTFORM                 NUCLEUS CSECT   SA  G          TXTF:NUCLEUS.S                                                  
            5.0T4    30  TEXTFORM.NUCLEUS_CSECT.SA.033      1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:48
            5.0T9   313                       
0          THIS IS THE NUCLEUS CSECT WHICH CONTAINS ALL OF THE VALUES THAT TEXTFORM
           NEEDS TO KEEP TRACK OF WHAT'S WHAT.  COPIES THE NUCLEUS DSECT (3018/118),
           GBLC (3018/120), AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND
           3=DSECTS (3018/60).
03018/034   TEXTFORM                 OD.AJ832        SA  G          TXTF:OD.AJ832.S                                                 
            5.0T4    31  TEXTFORM.OD.AJ832.SA.034           1 LINE     80   31 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:49
            5.0T9   314                       
0          THE OUTPUT DEVICE PROCESSOR FOR THE ANDERSON-JACOBSON 832 TERMINAL.  OBJECT
           IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND XODTGETM
           (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/035   TEXTFORM                 OD.DECWR        SA  G          TXTF:OD.DECWR.S                                                 
            5.0T4    32  TEXTFORM.OD.DECWR.SA.035           1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:53
            5.0T9   315                       
0          THE OUTPUT DEVICE PROCESSOR FOR THE DECWRITER TERMINAL.  OBJECT IN 
           TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), OD.1403.M
           (3018/40), AND XODTGETM (3018/144).  ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/40 
03018/036   TEXTFORM                 OD.DOC          SA  G          TXTF:OD.DOC.S                                                   
            5.0T4    33  TEXTFORM.OD.DOC.SA.036             1 LINE     86   22 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:54
            5.0T9   316                       
0          CONTAINS THE ODDOC SUBROUTINE WHICH PRODUCES OUTPUT DEVICE AND FONT
           DESCRIPTIONS.  USES TXTF.ODW (3018/58) AS DATA.  OBJECT IN (3018/162).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59)
           AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/58, 3018/162 
03018/037   TEXTFORM                 OD.SKEL         SA  G          TXTF:OD.SKEL.S                                                  
            5.0T4    34  TEXTFORM.OD.SKEL.SA.037            1 LINE     80   14 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:56
            5.0T9   317                       
0          SKELETON FOR OUTPUT DEVICE PROCESSORS.  USEFUL AS A BASIS FOR WRITING AN OD.
           COPIES XODTGETM (3018/144), GBLC (3018/120), AND GBLS (3018/22).  ASSEMBLE
           WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/038   TEXTFORM                 OD.TBLGEN       SA  G          TXTF:OD.TBLGEN.S                                                
            5.0T4    35  TEXTFORM.OD.TBLGEN.SA.038          1 LINE     80   29 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:18:58
            5.0T9   318                       
0          CONTAINS THE GENTAB SUBROUTINE WHICH PRODUCES OUTPUT DEVICE PROCESSOR WIDTH
           TABLES.  COPIES GBLS (3018/22), AND GBLC (3018/120). ASSEMBLE WITH 2=MACROS
           (3018/59) AND 3=DSECTS (3018/60). OBJECT IN (3018/160).
1                                                                                               SUN SEP 08/96   15:24:55   Page  879
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 3018/57, 3018/91, 3018/95, 3018/96, 3018/97, 3018/98, 3018/99, 3018/100, 3018/101,
                 3018/104, 3018/106, 3018/109, 3018/124, 3018/138, 3018/139, 3018/140, 3018/141, 3018/142, 3018/143, 3018/150,
                 3018/159, 3018/160 
03018/039   TEXTFORM                 OD.1403.D       SA  G          TXTF:OD.1403.D.S                                                
            5.0T4    36  TEXTFORM.OD.1403.D.SA.039          1 LINE     81    7 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:01
            5.0T9   319                       
0          DSECTS FOR OUTPUT DEVICE PROCESSORS FOR IBM 1403-COMPATIBLE PRINTERS.  COPIED 
           BY (3018/40) AND (3018/43).
            
           LINE NUMBERS IN THIS FILE ARE IMPORTANT.
0          Referenced by comments of: 3018/40, 3018/43 
03018/040   TEXTFORM                 OD.1403.M       SA  G          TXTF:OD.1403.M.S                                                
            5.0T4    37  TEXTFORM.OD.1403.M.SA.040          1 LINE     81   57 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:02
            5.0T9   320                       
0          CODE FOR OUTPUT DEVICE PROCESSORS FOR IBM 1403-COMPATIBLE PRINTERS.  COPIES 
           (3018/39). COPIED BY (3018/35), (3018/41), (3018/44), (3018/45), AND (3018/46).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/35, 3018/39, 3018/41, 3018/44, 3018/45, 3018/46 
03018/041   TEXTFORM                 OD.1403         SA  G          TXTF:OD.1403.S                                                  
            5.0T4    38  TEXTFORM.OD.1403.SA.041            1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:10
            5.0T9   321                       
0          OUTPUT DEVICE PROCESSOR FOR IBM 1403.  OBJECT IN TXTFODS (3018/156).
           COPIES GBLC (3018/120), GBLS (3018/22), XODTGETM (3018/144), AND OD.1403.M
           (3018/40). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/40 
03018/042   TEXTFORM                 ODM             SA  G          TXTF:ODM.S                                                      
            5.0T4    39  TEXTFORM.ODM.SA.042                1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:11
            5.0T9   322                       
0          CONTAINS TXTFODCM, THE OUTPUT DEVICE LOADER.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLS (3018/22) AND ODPD.M (3018/43). ASSEMBLE WITH 2=MACROS (3018/59)
           AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/43, 3018/147 
03018/043   TEXTFORM                 ODPD.M          SA  G          TXTF:ODPD.M.S                                                   
            5.0T4    40  TEXTFORM.ODPD.M.SA.043             1 LINE     80   20 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:11
            5.0T9   323                       
0          COPIES (3018/39). COPIED BY ODM (3018/42) AND PDM (3018/47).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/39, 3018/42, 3018/47 
1                                                                                               SUN SEP 08/96   15:24:55   Page  880
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/044   TEXTFORM                 OSOD.1403       SA  G          TXTF:OSOD.1403.S                                                
            5.0T4    41  TEXTFORM.OSOD.1403.SA.044          1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:13
            5.0T9   324                       
0          IBM 1403 PRINTER OUTPUT DEVICE PROCESSOR FOR OS.  COPIES OD.1403.M (3018/40).
           OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND
           XODTGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/40 
03018/045   TEXTFORM                 OSPD.1403       SA  G          TXTF:OSPD.1403.S                                                
            5.0T4    42  TEXTFORM.OSPD.1403.SA.045          1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:13
            5.0T9   325                       
0          IBM 1403 PRINTER PROOF DEVICE PROCESSOR FOR OS.  COPIES OD.1403.M (3018/40),
           XODTGETM.S (3018/144), GBLS (3018/22), AND GBLC (3018/120).  OBJECT IN
           TXTFODS (3018/156). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/40 
03018/046   TEXTFORM                 PD.1403         SA  G          TXTF:PD.1403.S                                                  
            5.0T4    43  TEXTFORM.PD.1403.SA.046            1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:14
            5.0T9   326                       
0          IBM 1403 PRINTER PROOF DEVICE PROCESSOR. COPIES OD.1403.M (3018/40),
           XODTGETM.S (3018/144), GBLS (3018/22), AND GBLC (3018/120).  OBJECT IN
           TXTFODS (3018/156). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/40 
03018/047   TEXTFORM                 PDM             SA  G          TXTF:PDM.S                                                      
            5.0T4    44  TEXTFORM.PDM.SA.047                1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:15
            5.0T9   327                       
0          CONTAINS TXTFPDCM, THE PROOF DEVICE LOADER.  COPIES GBLS (3018/22),
           GBLC (3018/120), AND ODPD.M (3018/43).  OBJECT IN *TEXTFORM (3018/10).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/43, 3018/147 
03018/048   TEXTFORM                 PPEXT           SA  G          TXTF:PPEXT.S                                                    
            5.0T4    45  TEXTFORM.PPEXT.SA.048              1 LINE     80   16 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:15
            5.0T9   328                       
0          CONTAINS THE CALLPUSH AND CALLPOP SUBROUTINES TO CALL PUSH AND POP, 
           AND PPUNDO, THE INTERNAL PAGE DUMPER. COPIES GBLC (3018/120) AND GBLS
           (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/049   TEXTFORM                 PPPAC           SA  G          TXTF:PPPAC.S                                                    
            5.0T4    46  TEXTFORM.PPPAC.SA.049              1 LINE     80   40 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:17
            5.0T9   329                       
0          CONTAINS THE PAGE AND TEXT PROCESSING SUBROUTINES.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
1                                                                                               SUN SEP 08/96   15:24:55   Page  881
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/050   TEXTFORM                 PROOF           SA  G          TXTF:PROOF.S                                                    
            5.0T4    47  TEXTFORM.PROOF.SA.050              1 LINE     81   53 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:21
            5.0T9   330                       
0          IBM 1403 PRINTER PROOF DEVICE PROCESSOR FOR THE AM748 AND APS5 
           PHOTOTYPESETTERS. OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120),
           GBLS (3018/22), AND XODTGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59)
           AND 3=DSECTS (3018/60).
03018/051   TEXTFORM                 SCPAC           SA  G          TXTF:SCPAC.S                                                    
            5.0T4    48  TEXTFORM.SCPAC.SA.051              1 LINE     81   67 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:26
            5.0T9   331                       
0          CONTAINS MANY SUBROUTINES FOR COMMAND PROCESSING, ETC.  OBJECT IN 
           *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/052   TEXTFORM                 SSPAC           SA  G          TXTF:SSPAC.S                                                    
            5.0T4    49  TEXTFORM.SSPAC.SA.052              1 LINE     80   14 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:33
            5.0T9   332                       
0          CONTAINS THE REPACK, CRECHECK, DESCHECK, TSKIP, CONVMSG, FIXFDUBS, AND 
           SATRACE SUBROUTINES (MISCELLANEOUS UTILITIES).  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND
           3=DSECTS (3018/60).
03018/053   TEXTFORM                 STPAC           SA  G          TXTF:STPAC.S                                                    
            5.0T4    50  TEXTFORM.STPAC.SA.053              1 LINE     80   49 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:34
            5.0T9   333                       
0          CONTAINS THE ATXRSYMB AND READSYMB SUBROUTINES AND FRIENDS FOR SYMBOL TABLE
           AND LAYOUT PROCESSING.  OBJECT IN *TEXTFORM (3018/10).  COPIES GBLC
           (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/054   TEXTFORM                 SYSPAC          SA  G          TXTF:SYSPAC.S                                                   
            5.0T4    51  TEXTFORM.SYSPAC.SA.054             1 LINE     72   18 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:39
            5.0T9   334                       
0          CONTAINS THE ERROR, TIMER, ATTN, AND PGNT SUBROUTINES.  OBJECT IN 
           *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/055   TEXTFORM                 TEXTFORM        SA  G          TXTF:TEXTFORM.S                                                 
            5.0T4    52  TEXTFORM.TEXTFORM.SA.055           1 LINE     80    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:41
            5.0T9   335                       
0          CONTAINS TEXTFORM, THE MAIN CSECT.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
1                                                                                               SUN SEP 08/96   15:24:55   Page  882
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/056   TEXTFORM                 TP              SA  G          TXTF:TP.S                                                       
            5.0T4    53  TEXTFORM.TP.SA.056                 1 LINE     80   32 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:42
            5.0T9   336                       
0          CONTAINS TEXTPROC, THE TEXT PROCESSOR.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/057   TEXTFORM                 ODT.TN.IWD      D   G          TXTF:ODT.TN.IWD                                                 
            5.0T4    54  TEXTFORM.ODT.TN.IWD.D.057          1 LINE     65    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:45
            5.0T9   337                       
0          CONTAINS WIDTH TABLES, INPUT TO GENTAB (3018/38) FOR THE IBM 1403 PRINTER
           OUTPUT DEVICE PROCESSOR, TN PRINT TRAIN.
03018/058   TEXTFORM                 TXTF.ODW        D   G          TXTF:TXTF.ODW                                                   
            5.0T4    55  TEXTFORM.TXTF.ODW.D.058            1 LINE    118    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:46
            5.0T9   338                       
0          DESCRIPTIONS OF OUTPUT DEVICES AND FONTS.  USED BY OD.DOC (3018/36).
0          Referenced by comments of: 3018/36 
03018/059   TEXTFORM                 MACROS          SM  G          TXTF:MACROS                                                     
            5.0T4    56  TEXTFORM.MACROS.SM.059             1 LINE     81   96 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:19:47
            5.0T9   339                       
0          MOST TEXTFORM SUBCOMPONENTS REQUIRE THIS MACRO LIBRARY FOR ASSEMBLY.
0          Referenced by comments of: 3018/12, 3018/13, 3018/14, 3018/15, 3018/16, 3018/17, 3018/18, 3018/19, 3018/20, 3018/21,
                 3018/23, 3018/24, 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34,
                 3018/35, 3018/36, 3018/37, 3018/38, 3018/40, 3018/41, 3018/42, 3018/43, 3018/44, 3018/45, 3018/46, 3018/47,
                 3018/48, 3018/49, 3018/50, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/79, 3018/115, 3018/116,
                 3018/117, 3018/128, 3018/136, 3018/137, 3018/147, 3018/149, 3018/151, 3018/152, 3018/158 
03018/060   TEXTFORM                 DSECTS          SM  G          TXTF:DSECTS                                                     
            5.0T4    57  TEXTFORM.DSECTS.SM.060             1 LINE     80   46 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:00
            5.0T9   340                       
0          MOST TEXTFORM SUBCOMPONENTS REQUIRE THIS DSECT LIBRARY FOR ASSEMBLY.
0          Referenced by comments of: 3018/12, 3018/13, 3018/14, 3018/15, 3018/16, 3018/17, 3018/18, 3018/19, 3018/20, 3018/21,
                 3018/23, 3018/24, 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34,
                 3018/35, 3018/36, 3018/37, 3018/38, 3018/40, 3018/41, 3018/42, 3018/43, 3018/44, 3018/45, 3018/46, 3018/47,
                 3018/48, 3018/49, 3018/50, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/79, 3018/115, 3018/116,
                 3018/117, 3018/128, 3018/136, 3018/137, 3018/147, 3018/149, 3018/151, 3018/152, 3018/158, 3018/171 
03018/061   TEXTFORM                 SYMBIN          D   G          TXTF:SYMBIN                                                     
            5.0T4    58  TEXTFORM.SYMBIN.D.061              1 LINE    255   21 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:06
            5.0T9   341                       
0          TEXTFORM INPUT TO BUILD THE SYMBOL TABLE ("ENVIRONMENT") IN (3018/63).  SEE THE
           INTERNALS MANUAL (3018/4) FOR INSTRUCTIONS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  883
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/062   TEXTFORM                 BOOTSYMB        D   G          TXTF:BOOTSYMB                                                   
            5.0T4    59  TEXTFORM.BOOTSYMB.D.062            1 LINE   4096    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:08
            5.0T9   342                       
0          THE BOOTSTRAP SYMBOL TABLE (<BILDON>, <COMMAND>, <WNST>).
03018/063   TEXTFORM                 ENVIRONMENT     D   G          ETC:TXTFENVIR                                                   
            5.0T4    60  TEXTFORM.ENVIRONMENT.D.063         1 LINE  32000   19 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:08
            5.0T9   343  ETC:TXTFENVIR        
0          THE SYMBOL TABLE USED IN RUNNING *TEXTFORM (3018/10).
0          Referenced by comments of: 3018/61 
03018/064   TEXTFORM                 TXTFLAYOUTS     D   G          ETC:TXTFLAYOUTS                                                 
            5.0T4    61  TEXTFORM.TXTFLAYOUTS.D.064         1 LINE    252   68 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:09
            5.0T9   344  ETC:TXTFLAYOUTS      
0          THE LAYOUTS USED BY *TEXTFORM (3018/10).
03018/065   TEXTFORM                 GFDO            OC  G          TXTF:GFDO.O                                                     
            5.0T4    62  TEXTFORM.GFDO.OC.065               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:14
            5.0T9   345                       
0          OBJECT OF (3018/25).
0          Referenced by comments of: 3018/25 
03018/066   TEXTFORM                 GFDSTAR         OC  G          TXTF:GFDSTAR.O                                                  
            5.0T4    63  TEXTFORM.GFDSTAR.OC.066            1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:15
            5.0T9   346                       
0          OBJECT OF (3018/23).  THIS IS THE VERSION IN *TEXTFORM (3018/10).
0          Referenced by comments of: 3018/23 
03018/067   TEXTFORM                 GFDN            OC  G          TXTF:GFDN.O                                                     
            5.0T4    64  TEXTFORM.GFDN.OC.067               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:16
            5.0T9   347                       
0          OBJECT OF (3018/24).
0          Referenced by comments of: 3018/24 
03018/068   TEXTFORM                 GFDT            OC  G          TXTF:GFDT.O                                                     
            5.0T4    65  TEXTFORM.GFDT.OC.068               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:17
            5.0T9   348                       
0          OBJECT OF (3018/26).
0          Referenced by comments of: 3018/26 
1                                                                                               SUN SEP 08/96   15:24:55   Page  884
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/069   TEXTFORM                 NEWOLD          C              TXTF:NEWOLD                                                     
            5.0T4    66  TEXTFORM.NEWOLD.C.069              1 LINE     85    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:18
            5.0T9   349                       
0          COMMANDS TO CREATE A VERSION OF TEXTFORM UNDER OLD:, FROM THE PUBLIC
           FILE VERSION.
03018/070   TEXTFORM                 NEWPUB          C              TXTF:NEWPUB                                                     
            5.0T4    67  TEXTFORM.NEWPUB.C.070              1 LINE     45    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:19
            5.0T9   350                       
0          COMMANDS TO COPY THE FILE TXTF:TEXTFORM TO *TEXTFORM AND MAKE AN ENTRY TO
           THE FILE LINKLOG.
03018/071   TEXTFORM                 NEWSTAR         C              TXTF:NEWSTAR                                                    
            5.0T4    68  TEXTFORM.NEWSTAR.C.071             1 LINE     85    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:19
            5.0T9   351                       
0          COMMANDS TO CREATE THE PUBLIC FILE VERSION OF TEXTFORM FROM THE NEW: VERSION.
03018/072   TEXTFORM                 NEWNEW          C              TXTF:NEWNEW                                                     
            5.0T4    69  TEXTFORM.NEWNEW.C.072              1 LINE     81    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:20
            5.0T9   352                       
0          COMMANDS TO CREATE A VERSION OF TEXTFORM UNDER NEW: FROM FILES UNDER TXTF:.
03018/073   TEXTFORM                 PERCOLATE       C            # TXTF:PERCOLATE                                                  
                                                                                    UQV  TXTFGROUP LIFT                             
0          This file is not distributed because it is full of $EXEC commands 
           which none of you have.
03018/074   TEXTFORM                 LIB             C   G          S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.LIB.C.075               
            5.0T4    70  TEXTFORM.LIB.C.074                 1 LINE     75    1 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:59:40
            5.0T9   353                       
03018/075   TEXTFORM                 LINK            C              S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.LINK.C.076              
            5.0T4    71  TEXTFORM.LINK.C.075                1 LINE     40    1 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:59:41
            5.0T9   354                       
03018/076   TEXTFORM                 XCSYMB          C              S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.XCSYMB.C.077            
            5.0T4    72  TEXTFORM.XCSYMB.C.076              1 LINE     29    1 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:59:41
            5.0T9   355                       
0          COMMANDS TO COPY ENVIR2 --> TXTFENVIR --> OLDENVIR (THE SYMBOL TABLE).
03018/077   TEXTFORM                 CWKDAY          OC  G          TXTF:CWKDAY.O                                                   
            5.0T4    73  TEXTFORM.CWKDAY.OC.077             1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:38
            5.0T9   356                       
0          OBJECT OF (3018/17). ALSO INCLUDED IN *TEXTFORM (3018/10). 
0          Referenced by comments of: 3018/17 
1                                                                                               SUN SEP 08/96   15:24:55   Page  885
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/078   TEXTFORM                 LOGJOB          C              S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.LOGJOB.C.079            
            5.0T4    74  TEXTFORM.LOGJOB.C.078              1 LINE    111    1 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  21:59:43
            5.0T9   357                       
0          COMMANDS TO *FS TO SAVE ETC:TXTFLOG (3018/163).
0          Referenced by comments of: 3018/79, 3018/163 
03018/079   TEXTFORM                 LOG             SA  G          TXTF:LOG.S                                                      
            5.0T4    75  TEXTFORM.LOG.SA.079                1 LINE     69    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:40
            5.0T9   358                       
0          PROGRAM WHICH DECIDES WHEN TO START LOGJOB (3018/78).  READS (3018/78).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/80 
03018/080   TEXTFORM                 LOG             OC  G          TXTF:LOG.O                                                      
            5.0T4    76  TEXTFORM.LOG.OC.080                1 LINE     80    2 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:40
            5.0T9   359                       
0          OBJECT OF (3018/79).
03018/081   TEXTFORM                 LAY.SKEL        D   G          TXTF:LAY.SKEL                                                   
            5.0T4    77  TEXTFORM.LAY.SKEL.D.081            1 LINE    229    6 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:41
            5.0T9   360                       
0          A SKELETON, OR SAMPLE, FOR BUILDING LAYOUTS.  SEE "HOW TO BUILD A LAYOUT"
           IN THE INTERNALS MANUAL (3018/4).
03018/082   TEXTFORM                 LAY.THES        D   G          TXTF:LAY.THES                                                   
            5.0T4    78  TEXTFORM.LAY.THES.D.082            1 LINE    197    6 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:43
            5.0T9   361                       
0          THE THESIS LAYOUT.
03018/083   TEXTFORM                 LAY.TUT         D   G          TXTF:LAY.TUT                                                    
            5.0T4    79  TEXTFORM.LAY.TUT.D.083             1 LINE    229    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:44
            5.0T9   362                       
0          THE TUTORIAL LAYOUT.
03018/084   TEXTFORM                 LAY.NEWS        D   G          TXTF:LAY.NEWS                                                   
            5.0T4    80  TEXTFORM.LAY.NEWS.D.084            1 LINE    136    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:45
            5.0T9   363                       
0          THE NEWSLETTER LAYOUT.
03018/085   TEXTFORM                 LAY.OUT         D   G          TXTF:LAY.OUT                                                    
            5.0T4    81  TEXTFORM.LAY.OUT.D.085             1 LINE    198    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:45
            5.0T9   364                       
0          This used to be Layout REPORT, but it is now Layout OUTLINE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  886
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/086   TEXTFORM                 LAY.REF         D   G          TXTF:LAY.REF                                                    
            5.0T4    82  TEXTFORM.LAY.REF.D.086             1 LINE    229    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:46
            5.0T9   365                       
0          THE REFERENCE LAYOUT.
03018/087   TEXTFORM                 LAY.TECH        D   G          TXTF:LAY.TECH                                                   
            5.0T4    83  TEXTFORM.LAY.TECH.D.087            1 LINE    229    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:47
            5.0T9   366                       
0          THE TECHNICAL LAYOUT.
03018/088   TEXTFORM                 LAY.UBC         D   G          TXTF:LAY.UBC                                                    
            5.0T4    84  TEXTFORM.LAY.UBC.D.088             1 LINE    188    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:48
            5.0T9   367                       
0          LAYOUT UBC.
03018/089   TEXTFORM                 LAY.UM          D   O          TXTF:LAY.UM                                                     
            5.0T4    85  TEXTFORM.LAY.UM.D.089              1 LINE    158    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:48
            5.0T9   368                       
0          LAYOUT UM. THIS NEEDS SOME CHANGES, BUT IT DOES WORK.
03018/090   TEXTFORM                 HYPHDICT        D   G          ETC:TXTFHYPHDICT                                                
            5.0T4    86  TEXTFORM.HYPHDICT.D.090            1 LINE     22    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:49
            5.0T9   369  ETC:TXTFHYPHDICT     
0          THE HYPHENATION DICTIONARY.
03018/091   TEXTFORM                 WIDTHS          D   G          ETC:TXTFWIDS                                                    
            5.0T4    87  TEXTFORM.WIDTHS.D.091              1 LINE   1702  192 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:20:51
            5.0T9   370  ETC:TXTFWIDS         
0          WIDTH TABLES "LIBRARY" FOR OUTPUT PROCESSORS, AS CREATED BY TBLGEN (3018/38).
0          Referenced by comments of: 3018/171 
03018/092   TEXTFORM                 FUNCDEFS        D   G          TXTF:SYSFUNCS                                                   
            5.0T4    88  TEXTFORM.FUNCDEFS.D.092            1 LINE    137    8 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:00
            5.0T9   371                       
03018/093   TEXTFORM                 NEWOBJ          OC  G          TXTF:NEWSYS                                                     
            5.0T4    89  TEXTFORM.NEWOBJ.OC.093             1 LINE     33    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:01
            5.0T9   372                       
0          CONTAINS A COM CARD, AND $CONTINUE WITHS FOR THE OBJECT MODULES IN 
           TEXTFORM.  USED BY BUILD (3018/111).
03018/094   TEXTFORM                 BUILD.SUPP      C              TXTF:BUILD.SUPP                                                 
            5.0T4    90  TEXTFORM.BUILD.SUPP.C.094          1 LINE    129    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:02
            5.0T9   373                       
0          REFERS TO "*FORTG".
1                                                                                               SUN SEP 08/96   15:24:55   Page  887
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/095   TEXTFORM                 ODT.AJ.IWD      D              TXTF:ODT.AJ.IWD                                                 
            5.0T4    91  TEXTFORM.ODT.AJ.IWD.D.095          1 LINE     58    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:03
            5.0T9   374                       
0          GENTAB (3018/38) INPUT FOR ANDERSON-JACOBSON 832 TERMINAL 
           WIDTH/INTERNAL TABLES.
03018/096   TEXTFORM                 ODT.ALA.IWD     D              TXTF:ODT.ALA.IWD                                                
            5.0T4    92  TEXTFORM.ODT.ALA.IWD.D.096         1 LINE     65    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:04
            5.0T9   375                       
0          GENTAB (3018/38) INPUT FOR IBM 1403 PRINTER ALA PRINT TRAIN WIDTH/INTERNAL
           TABLES.
03018/097   TEXTFORM                 ODT.AMM.IWD     D              TXTF:ODT.AMM.IWD                                                
            5.0T4    93  TEXTFORM.ODT.AMM.IWD.D.097         1 LINE    107   22 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:04
            5.0T9   376                       
0          GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER MATH DISK WIDTH/INTERNAL
           TABLES.
03018/098   TEXTFORM                 ODT.AMS.IWD     D              TXTF:ODT.AMS.IWD                                                
            5.0T4    94  TEXTFORM.ODT.AMS.IWD.D.098         1 LINE     79   17 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:06
            5.0T9   377                       
0          GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER SCHOOLBOOK DISK
           WIDTH/INTERNAL TABLES.
03018/099   TEXTFORM                 ODT.AMT.IWD     D              TXTF:ODT.AMT.IWD                                                
            5.0T4    95  TEXTFORM.ODT.AMT.IWD.D.099         1 LINE     79   15 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:08
            5.0T9   378                       
0          GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER TIMES-ROMAN DISK 
           WIDTH/INTERNAL TABLES.
03018/100   TEXTFORM                 ODT.AMU.IWD     D              TXTF:ODT.AMU.IWD                                                
            5.0T4    96  TEXTFORM.ODT.AMU.IWD.D.100         1 LINE     79   17 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:10
            5.0T9   379                       
0          GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER UNIVERS DISK 
           WIDTH/INTERNAL TABLES.
03018/101   TEXTFORM                 ODT.APL.IWD     D              TXTF:ODT.APL.IWD                                                
            5.0T4    97  TEXTFORM.ODT.APL.IWD.D.101         1 LINE     67    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:11
            5.0T10    1                       
0          GENTAB (3018/38) INPUT FOR IBM 1403 PRINTER APL PRINT TRAIN WIDTH/INTERNAL
           TABLES.
03018/102   TEXTFORM                 ODT.CHK         D              TXTF:ODT.CHK                                                    
            5.0T4    98  TEXTFORM.ODT.CHK.D.102             1 LINE     86    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:12
            5.0T10    2                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  888
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/103   TEXTFORM                 ODT.CHSPCN      D            # TXTF:ODT.CHSPCN                                                 
                                                                                    UQV  TXTFGROUP LIFT                             
0          No longer required.
03018/104   TEXTFORM                 ODT.DECWR.IW    D              TXTF:ODT.DECWR.IW                                               
            5.0T4    99  TEXTFORM.ODT.DECWR.IW.D.104        1 LINE     65    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:13
            5.0T10    3                       
0          GENTAB (3018/38) INPUT FOR DECWRITER TERMINAL WIDTH/INTERNAL TABLES.
03018/105   TEXTFORM                 ODT.DSECT.CH    C              TXTF:ODT.DSECT.CH                                               
            5.0T4   100  TEXTFORM.ODT.DSECT.CH.C.105        1 LINE     71    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:14
            5.0T10    4                       
0          COMMANDS TO GENERATE WIDTH AND INTERNAL TABLES FOR OUTPUT DEVICE AND PROOF 
           PROCESSORS.  DTC302 TERMINAL SUPPORT IS NOT YET INCLUDED. CONTAINS MANY 
           $CONTINUE WITH RECORDS FOR TEXTFORM SOURCE COMPONENTS (SOME OF WHICH HAVE 
           NOT BEEN DISTRIBUTED BY UQV).
03018/106   TEXTFORM                 ODT.P1403M.I    D              TXTF:ODT.P1403M.I                                               
            5.0T4   101  TEXTFORM.ODT.P1403M.I.D.106        1 LINE     65   10 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:15
            5.0T10    5                       
0          GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR IBM 1403 PRINTER PROOF DEVICE
           PROCESSOR FOR AM748 PHOTOTYPESETTER MATH DISK.
03018/107   TEXTFORM                 ODT.P1403S.I    D            # TXTF:ODT.P1403S.I                                               
                                                                                    UQV  TXTFGROUP LIFT                             
0          This information is now included in (3018/109).
03018/108   TEXTFORM                 ODT.P1403T.I    D            # TXTF:ODT.P1403T.I                                               
                                                                                    UQV  TXTFGROUP LIFT                             
0          This information is now included in (3018/109).
03018/109   TEXTFORM                 ODT.P1403U.I    D              TXTF:ODT.P1403U.I                                               
            5.0T4   102  TEXTFORM.ODT.P1403U.I.D.109        1 LINE     68    7 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:16
            5.0T10    6                       
0          GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR IBM 1403 PRINTER PROOF
           DEVICE PROCESSOR FOR AM748 PHOTOTYPESETTER DISKS.
0          Referenced by comments of: 3018/107, 3018/108 
03018/110   TEXTFORM                 PERMITS         C              TXTF:PERMITS                                                    
            5.0T4   103  TEXTFORM.PERMITS.C.110             1 LINE     70    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:17
            5.0T10    7                       
0          COMMANDS TO CREATE AND PERMIT FILES NEEDED FOR A NEW: VERSION OF TEXTFORM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  889
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/111   TEXTFORM                 BUILD           C              TXTF:BUILD                                                      
            5.0T4   104  TEXTFORM.BUILD.C.111               1 LINE    679    8 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:18
            5.0T10    8                       
0          Command file to assemble all of TEXTFORM.
0          Referenced by comments of: 3018/93 
03018/112   TEXTFORM                 PUBLISH CRSE    WX             TXTF:PUB.OUT                                                    
            5.0T4   105  TEXTFORM.PUBLISH_CRSE.WX.112       1 LINE    121    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:19
            5.0T10    9                       
0          MATERIAL FOR COMPUTER ASSISTED PUBLISHING WITH TEXTFORM COURSE.
03018/113   TEXTFORM                 AM CHAR TEST    WX             TXTF:AMCST                                                      
            5.0T4   106  TEXTFORM.AM_CHAR_TEST.WX.113       1 LINE    124    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:19
            5.0T10   10                       
0          AM748 PHOTOTYPESETTER DESCRIPTION.
03018/114   TEXTFORM                 APS CHAR TEST   WX             TXTF:APSCST                                                     
            5.0T4   107  TEXTFORM.APS_CHAR_TEST.WX.114      1 LINE    132    7 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:20
            5.0T10   11                       
0          APS5 PHOTOTYPESETTER DESCRIPTION.
03018/115   TEXTFORM                 CMDPAC          SA  G          TXTF:CMDPAC.S                                                   
            5.0T4   108  TEXTFORM.CMDPAC.SA.115             1 LINE     80   20 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:21
            5.0T10   12                       
0          INTERNAL PAGE COMMAND BUILDER SUBROUTINES.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/116   TEXTFORM                 PPDPAC          SA  G          TXTF:PPDPAC.S                                                   
            5.0T4   109  TEXTFORM.PPDPAC.SA.116             1 LINE     80   18 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:23
            5.0T10   13                       
0          LOGICAL BACKSPACE, TABLE PRINTER, AND OTHER SUBROUTINES.  OBJECT IN
           *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22).
           ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/117   TEXTFORM                 LPPAC           SA  G          TXTF:LPPAC.S                                                    
            5.0T4   110  TEXTFORM.LPPAC.SA.117              1 LINE     80   48 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:25
            5.0T10   14                       
0          TABLE AND LOGICAL PAGE SUBROUTINES.  OBJECT IN *TEXTFORM (3018/10).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59)
           AND 3=DSECTS (3018/60).
03018/118   TEXTFORM                 NUCLEUS DSECT   SA  G          TXTF:NUCLEUS                                                    
            5.0T4   111  TEXTFORM.NUCLEUS_DSECT.SA.118      1 LINE     81   35 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:28
            5.0T10   15                       
0          CONTAINS THE NUCLEUS DSECT, WHICH IS COPIED BY MOST PARTS OF TEXTFORM
1                                                                                               SUN SEP 08/96   15:24:55   Page  890
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          VIA THE TENTER MACRO.
0          Referenced by comments of: 3018/33 
03018/119   TEXTFORM                 GBLD            SA  G          TXTF:GBLD                                                       
            5.0T4   112  TEXTFORM.GBLD.SA.119               1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:33
            5.0T10   16                       
0          CONTAINS GLOBAL SYMBOL DEFINITIONS, WHICH ARE COPIED BY MANY TEXTFORM
           SUBCOMPONENTS.
0          Referenced by comments of: 3018/22, 3018/120 
03018/120   TEXTFORM                 GBLC            SA  G          TXTF:GBLC                                                       
            5.0T4   113  TEXTFORM.GBLC.SA.120               1 LINE     80    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:34
            5.0T10   17                       
0          COMMENTS DESCRIBING SYMBOLS IN GBLD (3018/119).  THIS IS COPIED BY MANY
           TEXTFORM SUBCOMPONENTS.
0          Referenced by comments of: 3018/13, 3018/14, 3018/15, 3018/16, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/24,
                 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34, 3018/35, 3018/36,
                 3018/37, 3018/38, 3018/41, 3018/44, 3018/45, 3018/46, 3018/47, 3018/48, 3018/49, 3018/50, 3018/51, 3018/52,
                 3018/53, 3018/54, 3018/55, 3018/56, 3018/115, 3018/116, 3018/117, 3018/136, 3018/137, 3018/147, 3018/149,
                 3018/151, 3018/152, 3018/158 
03018/121   TEXTFORM                 FILES           C              S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.FILES.C.124             
            5.0T4   114  TEXTFORM.FILES.C.121               1 LINE     70    1 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  22:01:19
            5.0T10   18                       
0          PROTOTYPE FOR COMMAND FILE TO COPY FILES BETWEEN NEW:, OLD:, AND ETC:.  USE
           $EDIT TO PUT IN THE IDS.
03018/122   TEXTFORM                 XCWID           C              S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.XCWID.C.125             
            5.0T4   115  TEXTFORM.XCWID.C.122               1 LINE     72    1 PAGE UQV  TXTFGROUP LIFT      FEB. 20, 1979  22:01:19
            5.0T10   19                       
0          COMMANDS TO COPY TXTFWIDS --> TXTFWIDS --> OLDTWIDS (THE WIDTH TABLES).
03018/123   TEXTFORM                 APSWID          D              TXTF:APS.WID.D                                                  
            5.0T4   116  TEXTFORM.APSWID.D.123              1 LINE    400   11 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:48
            5.0T10   20                       
0          CHARACTER WIDTHS FOR THE APS5 PHOTOTYPESETTER.  SEE THE INTERNALS MANUAL
           (3018/4) FOR A DESCRIPTION.
03018/124   TEXTFORM                 APSWID          C              TXTF:APSWID.C                                                   
            5.0T4   117  TEXTFORM.APSWID.C.124              1 LINE     98    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:49
            5.0T10   21                       
0          COMMANDS TO CREATE GENTAB (3018/38) INPUT FOR THE APS5 PHOTOTYPESETTER.
           SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION.
1                                                                                               SUN SEP 08/96   15:24:55   Page  891
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/125   TEXTFORM                 APSCOM          D              TXTF:APSKOM.C                                                   
            5.0T4   118  TEXTFORM.APSCOM.D.125              1 LINE     93    8 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:21:50
            5.0T10   22                       
0          APS5 PHOTOTYPESETTER CHARACTER NAMES.  SEE THE INTERNALS MANUAL
           (3018/4) FOR A DESCRIPTION.
03018/126   TEXTFORM                 APSMERGE        SF  G          S1561 5.0T4 VLO FSNAME=TEXTFORM.APSMERGE.SF.126(1)           119
            5.0T4   119  TEXTFORM.APSMERGE.SF.126           1 LINE     80   17 PAGE UQV  TXTFGROUP LIFT      FEB. 29, 1980  10:02:13
            5.0T10   23                       
0          PROGRAM USED IN CONSTRUCTING APS5 PHOTOTYPESETTER WIDTH/INTERNAL TABLES.
           SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION.
0          Referenced by comments of: 3018/153 
03018/127   TEXTFORM                 APSDUMP         SF  G          TXTF:APSDMP.FS                                                  
            5.0T4   120  TEXTFORM.APSDUMP.SF.127            1 LINE     58    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:13
            5.0T10   24                       
03018/128   TEXTFORM                 APSDUMP         SA  G          TXTF:APSDMP.S                                                   
            5.0T4   121  TEXTFORM.APSDUMP.SA.128            1 LINE     72    7 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:14
            5.0T10   25                       
0          ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/129   TEXTFORM                 APSREPAGE       SF  G          S1561 5.0T4 VLO FSNAME=TEXTFORM.APSREPAGE.SF.129(1)          122
            5.0T4   122  TEXTFORM.APSREPAGE.SF.129          1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      FEB. 29, 1980  10:02:19
            5.0T10   26                       
03018/130   TEXTFORM                 LAY.APA         D              TXTF:LAY.APA                                                    
            5.0T4   123  TEXTFORM.LAY.APA.D.130             1 LINE    248    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:16
            5.0T10   27                       
0          LAYOUT APA.
03018/131   TEXTFORM                 LAY.JPAL        D              TXTF:LAY.JPAL                                                   
            5.0T4   124  TEXTFORM.LAY.JPAL.D.131            1 LINE    223    4 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:17
            5.0T10   28                       
0          LAYOUT JPALEON.
03018/132   TEXTFORM                 LAY.NUM         D              TXTF:LAY.NUM                                                    
            5.0T4   125  TEXTFORM.LAY.NUM.D.132             1 LINE    250    6 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:17
            5.0T10   29                       
0          LAYOUT NUMERATE. (LOCATION OF DOCUMENTATION UNKNOWN.)
03018/133   TEXTFORM                 LAY.SPI         D              TXTF:LAY.SPI                                                    
            5.0T4   126  TEXTFORM.LAY.SPI.D.133             1 LINE    229    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:18
            5.0T10   30                       
0          LAYOUT SPIRES.
1                                                                                               SUN SEP 08/96   15:24:55   Page  892
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/134   TEXTFORM                 LAY.THENUM      D              TXTF:LAY.THENUM                                                 
            5.0T4   127  TEXTFORM.LAY.THENUM.D.134          1 LINE    197    6 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:19
            5.0T10   31                       
0          LAYOUT THESISNUMERATE.
03018/135   TEXTFORM                 LISTCALCHARS    SF  G          S1561 5.0T4 VLO FSNAME=TEXTFORM.LISTCALCHARS.SF.135(1)       128
            5.0T4   128  TEXTFORM.LISTCALCHARS.SF.135       1 LINE     73    4 PAGE UQV  TXTFGROUP LIFT      FEB. 29, 1980  10:02:33
            5.0T10   32                       
0          PROGRAM TO PRODUCE WIDTH/INTERNAL TABLES FOR THE CALCOMP OUPUT DEVICE
           PROCESSOR (3018/137).  READS ETC:PLOTALPHA (615/8).
0          Referenced by comments of: 3018/155 
03018/136   TEXTFORM                 OD.APS5         SA  G          TXTF:OD.APS5.S                                                  
            5.0T4   129  TEXTFORM.OD.APS5.SA.136            1 LINE     81   56 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:21
            5.0T10   33                       
0          OUTPUT DEVICE PROCESSOR FOR THE APS5 PHOTOTYPESETTER.  OBJECT IS IN 
           TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND
           XODGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/137   TEXTFORM                 OD.CALCOMP      SA  G          TXTF:OD.CALCOMP.S                                               
            5.0T4   130  TEXTFORM.OD.CALCOMP.SA.137         1 LINE     80   28 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:26
            5.0T10   34                       
0          CALCOMP OUTPUT DEVICE PROCESSOR.  USES UM'S PLOTSYS (615/9); OTHER INSTALLATIONS
           MAY HAVE TO MAKE MINOR CHANGES SO THAT IT WILL WORK. COPIES XODGETM (3018/144),
           GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/135 
03018/138   TEXTFORM                 ODT.AMC.IWD     D              TXTF:ODT.AMC.IWD                                                
            5.0T4   131  TEXTFORM.ODT.AMC.IWD.D.138         1 LINE     79   16 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:28
            5.0T10   35                       
0          GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER CHELMSFORD DISK
           WIDTH/INTERNAL TABLES.
03018/139   TEXTFORM                 ODT.CALC.ID     D              TXTF:ODT.CALC.ID                                                
            5.0T4   132  TEXTFORM.ODT.CALC.ID.D.139         1 LINE     91   37 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:30
            5.0T10   36                       
0          GENTAB (3018/38) INPUT FOR CALCOMP OUTPUT DEVICE PROCESSOR INTERNAL TABLES.
03018/140   TEXTFORM                 ODT.SKEL.IWD    D              TXTF:ODT.SKEL.IWD                                               
            5.0T4   133  TEXTFORM.ODT.SKEL.IWD.D.140        1 LINE     65    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:33
            5.0T10   37                       
0          GENTAB (3018/38) INPUT FOR SKELETON OR SAMPLE WIDTH/INTERNAL TABLES.
           USEFUL WHEN WRITING A NEW OUTPUT DEVICE PROCESSOR.
1                                                                                               SUN SEP 08/96   15:24:55   Page  893
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/141   TEXTFORM                 ODT.APS.ID      D              TXTF:ODT.APS.ID                                                 
            5.0T4   134  TEXTFORM.ODT.APS.ID.D.141          1 LINE     56  192 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:34
            5.0T10   38                       
0          GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR APS5 PHOTOTYPESETTER
           OUTPUT DEVICE PROCESSOR.
03018/142   TEXTFORM                 ODT.APS.WD      D              TXTF:ODT.APS.WD                                                 
            5.0T4   135  TEXTFORM.ODT.APS.WD.D.142          1 LINE     56  188 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:46
            5.0T10   39                       
0          GENTAB (3018/38) INPUT FOR WIDTH TABLES FOR APS5 PHOTOTYPESETTER
           OUTPUT DEVICE PROCESSOR.
03018/143   TEXTFORM                 ODT.PAPS.IWD    D              TXTF:ODT.PAPS.IWD                                               
            5.0T4   136  TEXTFORM.ODT.PAPS.IWD.D.143        1 LINE     73   19 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:57
            5.0T10   40                       
0          GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR IBM 1403 PRINTER PROOF
           DEVICE FOR APS5 OUTPUT DEVICE PROCESSOR.
03018/144   TEXTFORM                 ODPDTESTMACS    SA  G          TXTF:XODTGETM.S                                                 
            5.0T4   137  TEXTFORM.ODPDTESTMACS.SA.144       1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:27:59
            5.0T10   41                       
0          THIS IS A FILE WHICH CURRENTLY CONTAINS ONLY COMMENTS, BUT WHICH IS INTENDED
           TO CONTAIN MACROS AND/OR COPY SECTIONS COPIED BY OUTPUT DEVICE AND PROOF
           DEVICE PROCESSORS.
0          Referenced by comments of: 3018/13, 3018/34, 3018/35, 3018/37, 3018/41, 3018/44, 3018/45, 3018/46, 3018/50, 3018/136,
                 3018/137 
03018/145   TEXTFORM                 AJDITTO         SF  G          S1561 5.0T4 VLO FSNAME=TEXTFORM.AJDITTO.SF.145(1)            138
            5.0T4   138  TEXTFORM.AJDITTO.SF.145            1 LINE     71    4 PAGE UQV  TXTFGROUP LIFT      FEB. 29, 1980  10:03:53
            5.0T10   42                       
0          AN *DITTO-LIKE PROGRAM FOR TEXTFORM OUTPUT TO THE ANDERSON-JACOBSON
           832 TERMINAL.
0          Referenced by comments of: 3018/146 
03018/146   TEXTFORM                 AJDITTO         WX             S1561 5.0T4 VLO FSNAME=TEXTFORM.AJDITTO.WX.146(1)            139
            5.0T4   139  TEXTFORM.AJDITTO.WX.146            1 LINE    144    3 PAGE UQV  TXTFGROUP LIFT      FEB. 29, 1980  10:03:55
            5.0T10   43                       
0          DOCUMENTATION FOR (3018/145).
03018/147   TEXTFORM                 WIDCONV         SA  G          TXTF:WIDCONV.S                                                  
            5.0T4   140  TEXTFORM.WIDCONV.SA.147            1 LINE     80   20 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:06
            5.0T10   44                       
0          FUNCTION WHICH TAKES WIDTH/INTERNAL TABLES AND ADDS DIRECTORY
           INFORMATION REQUIRED BY TXTFODCM (3018/42) AND TXTFPDCM (3018/47).
           COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59)
1                                                                                               SUN SEP 08/96   15:24:55   Page  894
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/148, 3018/149, 3018/161 
03018/148   TEXTFORM                 WIDCONV         D              TXTF:WCONV.D                                                    
            5.0T4   141  TEXTFORM.WIDCONV.D.148             1 LINE    681    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:08
            5.0T10   45                       
0          DATA FOR WIDCONV (3018/147).
03018/149   TEXTFORM                 WIDPAC          SA  O          TXTF:WIDPAC.S                                                   
            5.0T4   142  TEXTFORM.WIDPAC.SA.149             1 LINE     80   22 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:09
            5.0T10   46                       
0          CPRDNET (ETC.) USED BY WIDCONV (3018/147). COPIES GBLC (3018/120), AND 
           GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
03018/150   TEXTFORM                 ODT.CALC.WD     D              TXTF:ODT.CALC.WD                                                
            5.0T4   143  TEXTFORM.ODT.CALC.WD.D.150         1 LINE     95   37 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:11
            5.0T10   47                       
0          GENTAB (3018/38) INPUT FOR CALCOMP OUTPUT DEVICE PROCESSOR WIDTH TABLES.
03018/151   TEXTFORM                 FNCHI           SA  G          TXTF:FNCHI.S                                                    
            5.0T4   144  TEXTFORM.FNCHI.SA.151              1 LINE     80   23 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:14
            5.0T10   48                       
0          CONTAINS THE FONTINFO AND CHARINFO SUBROUTINES TO GET FONT OR CHARACTER
           INFORMATION.  OBJECT IN TXTFFNS (3018/157). COPIES GBLC (3018/120) AND 
           GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/157 
03018/152   TEXTFORM                 GETDATA         SA  G          TXTF:GTXTDAT.S                                                  
            5.0T4   145  TEXTFORM.GETDATA.SA.152            1 LINE     80    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:16
            5.0T10   49                       
0          CONTAINS THE GTXTDAT SUBROUTINES TO READ TEXT FROM GUSER AND PASS IT TO
           TXTFDRVR, IN (3018/19).  OBJECT IN TXTFFNS (3018/157). COPIES GBLC (3018/120)
           AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60).
0          Referenced by comments of: 3018/157 
03018/153   TEXTFORM                 APS.DCT.D       D              TXTF:APS.DCT.D                                                  
            5.0T4   146  TEXTFORM.APS.DCT.D.D.153           1 LINE    279    5 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:17
            5.0T10   50                       
0          DATA TO APSMERG (3018/126).
03018/154   TEXTFORM                 CALCWID         C              TXTF:CALCWID.C                                                  
            5.0T4   147  TEXTFORM.CALCWID.C.154             1 LINE     80    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:18
            5.0T10   51                       
1                                                                                               SUN SEP 08/96   15:24:55   Page  895
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/155   TEXTFORM                 CALC.ID         D              TXTF:CALC.ID                                                    
            5.0T4   148  TEXTFORM.CALC.ID.D.155             1 LINE     85   45 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:19
            5.0T10   52                       
0          DATA TO LISTCALCHARS (3018/135).  SEE THE INTERNALS MANUAL (3018/4) FOR
           A DESCRIPTION.
03018/156   TEXTFORM                 TXTFODS         OL  O          ETC:TXTFODS                                                     
            5.0T4   149  TEXTFORM.TXTFODS.OL.156            1 LINE  10130   23 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:23
            5.0T10   53  ETC:TXTFODS          
0          OBJECT OF ALL OUTPUT DEVICE PROCESSORS.
0          Referenced by comments of: 3018/13, 3018/34, 3018/35, 3018/41, 3018/44, 3018/45, 3018/46, 3018/50, 3018/136, 3018/158 
03018/157   TEXTFORM                 TXTFFNS         OL  G          ETC:TXTFFNS                                                     
            5.0T4   150  TEXTFORM.TXTFFNS.OL.157            1 LINE   2128    3 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:25
            5.0T10   54  ETC:TXTFFNS          
0          CONTAINS THE FONTINFO, CHARINFO AND TXTDAT SUBROUTINES. SOURCE IN 
           (3018/151) AND (3018/152).
0          Referenced by comments of: 3018/151, 3018/152 
03018/158   TEXTFORM                 OD.DTC302       SA  O          TXTF:OD.DTC302.S                                                
            5.0T4   151  TEXTFORM.OD.DTC302.SA.158          1 LINE     72   18 PAGE UM   LIFT                JULY 03, 1981  21:28:26
            5.0T10   55                       
0          OUTPUT DEVICE PROCESSOR FOR A DTC302 AND DIABLO 1620 "DAISY-WHEEL" TERMINALS
           AND NEC SPINWRITER S520.  HAS 1/60TH INCH HORIZONTAL.  THE FOLLOWING FEATURES
           ARE NOT YET IMPLEMENTED:  SUBSCRIPTS, SUPERSCRIPTS, 1/48TH INCH VERTICAL UNIT,
           SPECIAL CHARACTERS, MID-PAGE WHEEL CHANGES, AND OTHERS.  SEE ASSEMBLY 
           PARAMETER &WHICH TO GET TERMINAL TYPE.
            
           OBJECT IN TXTFODS (3018/156).
            
           ASSEMBLE USING *ASMH WITH 2=MACROS (3018/59), 3=DSECTS (3018/60).
           COPIES GBLC (3018/120) AND GBLS (3018/22).
03018/159   TEXTFORM                 DTC302 TABLES   D              TXTF:WIDDTC302                                                  
            5.0T4   152  TEXTFORM.DTC302_TABLES.D.159       1 LINE     64    1 PAGE UM   LIFT                JULY 03, 1981  21:28:28
            5.0T10   56                       
0          WIDTH TABLES FOR DTC302. PROCESS WITH TBLGEN (3018/38).
           NEEDS IMPROVEMENTS, BUT USABLE AS IS.
03018/160   TEXTFORM                 OD.TBLGEN       OC  G          TXTF:OD.TBLGEN.O                                                
            5.0T4   153  TEXTFORM.OD.TBLGEN.OC.160          1 LINE     80   14 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:29
            5.0T10   57                       
0          OBJECT OF (3018/38).  EXECUTES AS A TEXTFORM FUNCTION.  SEE THE INTERNALS
           MANUAL (3018/4) FOR A DESCRIPTION.
0          Referenced by comments of: 3018/38 
1                                                                                               SUN SEP 08/96   15:24:55   Page  896
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/161   TEXTFORM                 WIDCONV         OC  G          TXTF:WIDCONV.O                                                  
            5.0T4   154  TEXTFORM.WIDCONV.OC.161            1 LINE     80   10 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:30
            5.0T10   58                       
0          OBJECT OF (3018/147).  EXECUTES AS A TEXTFORM FUNCTION.  SEE THE INTERNALS
           MANUAL (3018/4) FOR A DESCRIPTION.
03018/162   TEXTFORM                 OD.DOC          OC  G          TXTF:OD.DOC.O                                                   
            5.0T4   155  TEXTFORM.OD.DOC.OC.162             1 LINE     80   10 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:32
            5.0T10   59                       
0          OBJECT OF (3018/36).  EXECUTES AS A TEXTFORM FUNCTION.  SEE THE INTERNALS
           MANUAL (3018/4) FOR A DESCRIPTION.
0          Referenced by comments of: 3018/36 
03018/163   TEXTFORM                 TXTFLOG         D            # ETC:TXTFLOG                                                     
                                                                                    UQV  TXTFGROUP LIFT                             
                         ETC:TXTFLOG@E        
0          LOG FILE WRITTEN BY *TEXTFORM FOR EACH RUN OF *TEXTFORM BY A USER.  CONTENTS
           SAVED ON TAPE BY WEEKLY PROCEDURE.  SEE LOGJOB (3018/78). THIS SHOULD BE
           PERMITTED WE (PKEY=NEW:TEXTFORM,PKEY=*TEXTFORM,PKEY=OLD:TEXTFORM).
0          Referenced by comments of: 3018/78, 3018/164, 3018/166, 3018/167 
03018/164   TEXTFORM                 LOG             SA  G          TXTF:LOG.S                                                      
            5.0T4   156  TEXTFORM.LOG.SA.164                1 LINE     69    3 PAGE UM   LIFT      LIFT      JULY 03, 1981  21:28:33
            5.0T10   60                       
0          THIS IS THE LOGSAVING PROGRAM DEVELOPED AND USED BY UM.  IT DETERMINES
           IF ETC:TXTFLOG (3018/163), THE TEXTFORM STATISTICS FILE, SHOULD BE
           SAVED, BASED ON THE TIME OF THE LAST SAVE.  IF THE PROGRAM DETERMINES
           THAT THE STATISTICS FILE SHOULD BE SAVED, IT SUBMITS A BATCH JOB,
           (3018/169, WHICH WILL RUN THE LOGSAVE PROGRAM, (3018/167), TO SAVE THE
           STATISTICS FILE ON TAPE.  IT ALSO REPORTS ERRORS WHICH OCCURRED WHILE
           SAVING ETC:TXTFLOG.
03018/165   TEXTFORM                 LOG             OC  G          TXTF:LOG.O                                                      
            5.0T4   157  TEXTFORM.LOG.OC.165                1 LINE     80    2 PAGE UM   LIFT      LIFT      JULY 03, 1981  21:28:34
            5.0T10   61                       
03018/166   TEXTFORM                 LOGJOB          C   G          TXTF:LOGSAVEJOB                                                 
            5.0T4   158  TEXTFORM.LOGJOB.C.166              1 LINE     53    1 PAGE UM   LIFT      LIFT      JULY 03, 1981  21:28:35
            5.0T10   62                       
0          BATCH JOB TO SAVE ETC:TXTFLOG (3018/163), THE TEXTFORM STATISTICS FILE, ON
           TAPE. THESE COMMANDS RUN THE LOGSAVE PROGRAM (3018/167). NEGATIVE LINE
           NUMBERS CONTAIN INFORMATION USED BY LOGSAVE. THE PASSWORD MUST BE SUPPLIED ON
           LINE 2 AND THE MOUNT COMMAND ON LINE -1 MUST BE MODIFIED BEFORE IT IS
           ACTUALLY USED.
0          Referenced by comments of: 3018/167 
1                                                                                               SUN SEP 08/96   15:24:55   Page  897
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/167   TEXTFORM                 LOGSAVE         SA  G          S1561 5.0T4 VLO FSNAME=TEXTFORM.LOGSAVE.SA.167(1)            159
            5.0T4   159  TEXTFORM.LOGSAVE.SA.167            1 LINE     67    4 PAGE UM   LIFT      LIFT      FEB. 29, 1980  10:08:11
            5.0T10   63                       
0          PROGRAM TO SAVE ETC:TXTFLOG (3018/163), THE TEXTFORM STATISTICS FILE, ON
           TAPE.  THE PROGRAM IS RUN BY COMMANDS IN (3018/166).
0          Referenced by comments of: 3018/164, 3018/166 
03018/168   TEXTFORM                 LOGSAVE         OC  G          S1561 5.0T4 VLO FSNAME=TEXTFORM.LOGSAVE.OC.168(1)            160
            5.0T4   160  TEXTFORM.LOGSAVE.OC.168            1 LINE     80    2 PAGE UM   LIFT      LIFT      FEB. 29, 1980  10:08:12
            5.0T10   64                       
03018/169   TEXTFORM                 BUGS            P              TXTF:TEXTFORM.BUG                                               
            5.0T4   161  TEXTFORM.BUGS.P.169                1 LINE     68    1 PAGE UQV  TXTFGROUP LIFT      JULY 03, 1981  21:28:58
            5.0T10   65                       
0          LIST OF SOME VERSION 1 BUGS.
03018/170   TEXTFORM                 INSTNOTES       WX             S1561 5.0T4 VLO FSNAME=TEXTFORM.INSTNOTES.WX.170(1)          162
            5.0T4   162  TEXTFORM.INSTNOTES.WX.170          1 LINE     89    4 PAGE UM   LIFT                FEB. 29, 1980  10:08:27
            5.0T10   66                       
0          NOTES COMPILED WHILE INSTALLING VERSION 1 OF TEXTFORM AT UM.
03018/171   TEXTFORM                 WIDUTIL         SA  S          TXTF:WIDUTIL                                                    
            5.0T4   163  TEXTFORM.WIDUTIL.SA.171            1 LINE     72   14 PAGE UM   LIFT                JULY 03, 1981  21:29:02
            5.0T10   67                       
0          OBJUTIL FOR OUTPUT PROCESSOR WIDTH TABLE LIBRARIES, E.G., ETC:TXTFWIDS
           (3018/91).  THIS IS A STAND-ALONE PROGRAM.  ASSEMBLE WITH 2=DSECTS (3018/60).
           COPIES GBLS (3018/22). THIS IS A PRELIMINARY VERSION.
03018/172   TEXTFORM                 WIDUTIL         OC  S          TXTF:WIDUTILX                                                   
            5.0T4   164  TEXTFORM.WIDUTIL.OC.172            1 LINE     80    5 PAGE UM   LIFT                JULY 03, 1981  21:29:05
            5.0T10   68                       
03018/173   TEXTFORM                 WIDUTIL         WX             TXTF:WWIDUTIL                                                   
            5.0T4   165  TEXTFORM.WIDUTIL.WX.173            1 LINE     72    4 PAGE UM   LIFT                JULY 03, 1981  21:29:06
            5.0T10   69                       
0          USAGE AND INTERNALS WRITEUP FOR THE PRELIMINARY VERSION OF WIDUTIL.
03018/174   TEXTFORM                 MACROS          WX  S          COPY:JONMACLIBTXT                                               
            5.0T4   166  TEXTFORM.MACROS.WX.174             1 LINE    143    7 PAGE UBC  DUKE      UNSP      JULY 03, 1981  21:29:06
            5.0T10   70                       
0          THIS FILE CONTAINS A LARGE NUMBER OF TEXTFORM MACROS, ETC. DEVELOPED BY 
           JON NIGHTINGALE AND TINA DUKE TO CORRESPOND TO JON:MACLIB WHICH IS
           DISTRIBUTED BY UM AS (308/18), FOR PRODUCING DOCUMENTS IN UBC STYLE.
            
           THIS IS A PRELIMINARY VERSION.
1                                                                                               SUN SEP 08/96   15:24:55   Page  898
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03018/175   TEXTFORM                 LAY.TYNE        D   O          S1561 5.0T4 VLO FSNAME=TEXTFORM.LAY.TYNE.D.175(1)            167
            5.0T4   167  TEXTFORM.LAY.TYNE.D.175            1 LINE    160    9 PAGE UNE  HUNTER    LIFT      FEB. 09, 1980  16:08:43
            5.0T10   71                       
0          NUMAC documentation group standards layout.
03018/176   TEXTFORM                 LAY.DEE         D   O          S1561 5.0T4 VLO FSNAME=TEXTFORM.LAY.DEE.D.176(1)             168
            5.0T4   168  TEXTFORM.LAY.DEE.D.176             1 LINE    187    9 PAGE UNE  HUNTER    LIFT      FEB. 09, 1980  16:08:49
            5.0T10   72                       
0          NUMAC general layout with numbered headings.
03019/001   VAM748                                                # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO
           SIMULATE THE AM748 ON A LINE PRINTER.
03020/001   FASTSET                                               # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO
           CONVERT EBCDIC TEXT (PLUS A BUNCH OF CONTROLS) TO AM748 PHOTOTYPESETTER INPUT.
03021/001   SETUP-DECK MAKER                                      # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO
           GENERATE SETUP DECKS USING VARYING CARD STOCKS.
03023/001  *ASSIST                   SERVICE MODULE  SA  G          S1561 5.0T4 VLO FSNAME=ASSIST.SERVICE_MODULE.SA.001(1)       169
            5.0T4   169  ASSIST.SERVICE_MODULE.SA.001       1 LINE     80  143 PAGE UQV  J BODWIN  J BODWIN  JUNE 22, 1977  22:07:17
            5.0T10   73                       
0          BASE SOURCE FOR ASSIST SERVICE MODULE (I.E., I/O, MAIN PROGRAM, INTERRUPTS,
           ETC.). ASSEMBLE WITH ASSISTMACLIB (3023/10).
0          Referenced by comments of: 309/1, 3023/2, 3023/10 
03023/002  *ASSIST                   SERVICE MODULE  UU  G          S1561 5.0T4 VLO FSNAME=ASSIST.SERVICE_MODULE.UU.002(1)       170
            5.0T4   170  ASSIST.SERVICE_MODULE.UU.002       1 LINE     72   30 PAGE UQV  J BODWIN  J BODWIN  DEC. 17, 1978  15:40:57
            5.0T10   74                       
0          UPDATE TO BE APPLIED TO (3023/1) TO YIELD SERVICE MODULE SOURCE.  ASSEMBLE
           UPDATED SOURCE USING ASSISTMACLIB (3023/10).
0          Referenced by comments of: 3023/11 
03023/003  *ASSIST                   ASSEMBLER       SA  G          S1561 5.0T4 VLO FSNAME=ASSIST.ASSEMBLER.SA.003(1)            171
            5.0T4   171  ASSIST.ASSEMBLER.SA.003            1 LINE     80  185 PAGE UQV  J BODWIN  J BODWIN  JUNE 22, 1977  22:07:35
            5.0T10   75                       
0          BASE SOURCE FOR ASSEMBLER OF THE ASSIST PACKAGE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  899
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          Referenced by comments of: 3023/4, 3023/10 
03023/004  *ASSIST                   ASSEMBLER       UU  G          S1561 5.0T4 VLO FSNAME=ASSIST.ASSEMBLER.UU.004(1)            172
            5.0T4   172  ASSIST.ASSEMBLER.UU.004            1 LINE     72    7 PAGE UQV  J BODWIN  J BODWIN  DEC. 17, 1978  15:41:04
            5.0T10   76                       
0          UPDATE TO BE APPLIED TO (3023/3) TO YIELD ASSEMBLER SOURCE.  ASSEMBLE UPDATED
           SOURCE USING ASSISTMACLIB (3023/10).
0          Referenced by comments of: 3023/11 
03023/005  *ASSIST                   MACRO PHASE     SA  G          S1561 5.0T4 VLO FSNAME=ASSIST.MACRO_PHASE.SA.005(1)          173
            5.0T4   173  ASSIST.MACRO_PHASE.SA.005          1 LINE     80  139 PAGE UQV  J BODWIN  J BODWIN  JUNE 22, 1977  22:07:59
            5.0T10   77                       
0          BASE SOURCE FOR MACRO PROCESSOR OF ASSIST PACKAGE.
0          Referenced by comments of: 3023/6, 3023/10 
03023/006  *ASSIST                   MACRO PHASE     UU  G          S1561 5.0T4 VLO FSNAME=ASSIST.MACRO_PHASE.UU.006(1)          174
            5.0T4   174  ASSIST.MACRO_PHASE.UU.006          1 LINE     72    1 PAGE UQV  J BODWIN  J BODWIN  DEC. 17, 1978  15:41:09
            5.0T10   78                       
0          UPDATE TO BE APPLIED TO (3023/5) TO YIELD MACRO PROCESSOR SOURCE.  ASSEMBLE
           UPDATED SOURCE USING ASSISTMACLIB (3023/10).
0          Referenced by comments of: 3023/11 
03023/007  *ASSIST                   SIMULATOR       SA  G          S1561 5.0T4 VLO FSNAME=ASSIST.SIMULATOR.SA.007(1)            175
            5.0T4   175  ASSIST.SIMULATOR.SA.007            1 LINE     80   74 PAGE UQV  J BODWIN  J BODWIN  FEB. 12, 1979  16:01:18
            5.0T10   79                       
0          Referenced by comments of: 3023/8 
03023/008  *ASSIST                   SIMULATOR       UU  G          S1561 5.0T4 VLO FSNAME=ASSIST.SIMULATOR.UU.008(1)            176
            5.0T4   176  ASSIST.SIMULATOR.UU.008            1 LINE     72    5 PAGE UQV  J BODWIN  J BODWIN  DEC. 17, 1978  15:41:37
            5.0T10   80                       
0          UPDATE TO BE APPLIED TO (3023/7) TO YIELD SIMULATOR SOURCE.
0          Referenced by comments of: 3023/11 
03023/009  *ASSIST                   INTERFACE       SA  G          S1561 5.0T4 VLO FSNAME=ASSIST.INTERFACE.SA.009(1)            177
            5.0T4   177  ASSIST.INTERFACE.SA.009            1 LINE     80    5 PAGE UM   J BODWIN            DEC. 17, 1978  15:50:37
0          Interface to FIX (1002) for Assist I/O. Copies GLOBALS from FIX macro
           library (1002/12) and FIODSECT (1002/5).
0          Referenced by comments of: 3023/11 
1                                                                                               SUN SEP 08/96   15:24:55   Page  900
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03023/010  *ASSIST                   MACRO LIB       SM  G          S1561 5.0T4 VLO FSNAME=ASSIST.MACRO_LIB.SM.010(1)            178
            5.0T4   178  ASSIST.MACRO_LIB.SM.010            1 LINE     80  108 PAGE UQV  J BODWIN  J BODWIN  DEC. 18, 1978  15:22:02
            5.0T10   82                       
0          MACRO LIBRARY USED BY UPDATED (3023/1), (3023/3), AND (3023/5).  INCLUDES THE OLD,
           NO LONGER DISTRIBUTED, SOURCE1 (SUNDRIES) AS A COPY SECTION.  OLD SOURCE1
           UPDATES INCLUDED.
0          Referenced by comments of: 3023/1, 3023/2, 3023/4, 3023/6, 3023/11 
03023/011A *ASSIST                   *ASSIST         OE  G          *ASSIST                                                         
            5.1T3   293  ASSIST.?ASSIST.OE.011              1 SEQ   28760   16 PAGE UQV  J BODWIN  J BODWIN  JULY 23, 1983  15:27:44
                         *ASSIST              
0          CURRENT, LINKEDITED ASSIST OBJECT COMPRISED OF OBJECT FROM (3023/2), (3023/4), 
           (3023/6), (3023/8), (3023/9), AND (3023/10). THE SYSTEM MACRO LIBRARY FEATURE (3023/6)
           REFERENCES THE FILE *ASSISTMAC (3023/12). HAS A $CONTINUE WITH *LIBRARY RECORD.
            
           **********************************************************************
           D5.1 version:
            
           This is included in D5.1 because it was reassembled with FIODSECT
           (1002/5).
           **********************************************************************
0          Referenced by comments of: 3023/12 
03023/012  *ASSIST                   *ASSISTMAC      SM             *ASSISTMAC                                                      
            5.0T4   180  ASSIST.*ASSISTMAC.SM.012           1 LINE     72    5 PAGE UQV  J BODWIN  J BODWIN  JULY 03, 1981  21:31:22
            5.0T10   84  *ASSISTMAC           
0          ASSIST "SYSTEM" MACRO LIBRARY, REFERENCED BY (3023/11).
0          Referenced by comments of: 3023/11 
03023/013  *ASSIST                   TEST PROGRAMS   SA             S1561 5.0T4 VLO FSNAME=ASSIST.TEST_PROGRAMS.SA.013(1)        181
            5.0T4   181  ASSIST.TEST_PROGRAMS.SA.013        1 LINE     73    9 PAGE UQV  J BODWIN  J BODWIN  JUNE 10, 1977  13:20:14
            5.0T10   85                       
0          TEST PROGRAMS TO EXERCISE ALL FEATURES OF ASSIST.
03024/001A  BENCHMARK - TERMINAL     DSR             SA  G          BNCH:DSR.S                                                      
            5.1T3   294  BENCHMARK_-_TERMINAL.DSR.SA.001    1 LINE    114   33 PAGE UM   OGDEN               JULY 23, 1983  15:27:44
                         BNCH:DSR.S           
0          BENCHMARK DSR. ALLOWS SIMULATION OF MANY TERMINAL USERS ENTERING INPUT AS
           SPECIFIED IN *SCRIPTN AT A SPECIFIED TYPING RATE WITH SPECIFIED "THINK" TIMES
           AND WITH OUTPUT (THROWN AWAY) AT A SPECIFIED RATE. COPIES COPY:GLOBALS
           (1026/3), COPY:LLMPSEQU(100) (087), COPY:CDCADSECT (3024/24), *GDINFODSECT
           (594), *SENSEDSECT (3025), and COPY:BNCHSTATDSCT (3024/99). ASSEMBLE USING
           COPY:MTS.MACROS (344/3) AND COPY:MISC.MACROS (728).
0          Referenced by comments of: 3024/5, 3024/22, 3024/30, 3024/99 
1                                                                                               SUN SEP 08/96   15:24:55   Page  901
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/002A  BENCHMARK - TERMINAL     DSR             OC  G          *BNCHRTN                                                        
            5.1T3   295  BENCHMARK_-_TERMINAL.DSR.OC.002    1 LINE   8064    7 PAGE UM   OGDEN               JULY 23, 1983  15:27:46
                         *BNCHRTN             
03024/003A  BENCHMARK - TERMINAL     MONITOR         SA  G          BNCH:MONITOR.S                                                  
            5.1T3   296  BENCHMARK_-_TERMINAL.MONI.SA.003   1 LINE     72   10 PAGE UM   OGDEN               JULY 23, 1983  15:27:46
                         BNCH:MONITOR.S       
0          PROGRAM TO CONTROL BENCHMARK RUNS.  COPIES COPY:CDCADSECT (3024/24) AND COPY:JOBSTA (413/9).
0          Referenced by comments of: 3024/22, 3024/27, 3024/29 
03024/004A  BENCHMARK - TERMINAL     MONITOR         OC  G          BNCH:MONITOR                                                    
            5.1T3   297  BENCHMARK_-_TERMINAL.MONI.OC.004   1 LINE   4782    6 PAGE UM   OGDEN               JULY 23, 1983  15:27:47
                         BNCH:MONITOR         
03024/005   BENCHMARK - TERMINAL     ANALYSIS        SF  O          BNCH:ANALYSIS.S                                                 
            5.0T4   186  BENCHMARK_-_TERMINAL.ANAL.SF.005   1 LINE     73    3 PAGE UM   OGDEN               JULY 03, 1981  21:31:35
            5.0T10   90  BNCH:ANALYSIS.S      
0          PROGRAM TO PRINT THE DATA COLLECTED BY (3024/1).
03024/006   BENCHMARK - TERMINAL     ANALYSIS        OC  O          BNCH:ANALYSIS                                                   
            5.0T4   187  BENCHMARK_-_TERMINAL.ANAL.OC.006   1 LINE   1668    4 PAGE UM   OGDEN               JULY 03, 1981  21:31:36
            5.0T10   91  BNCH:ANALYSIS        
03024/007A  BENCHMARK - TERMINAL     SCRIPT POINTER  D              *SCRIPTPTRFILE                                                  
            5.1T3   298  BENCHMARK_-_TERMINAL.SCRI.D.007    1 LINE     24    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:47
                         *SCRIPTPTRFILE       
0          DATA FILE USED BY MTS TO MAP THE PSEUDO-DEVICE NAMES *SN* INTO SCRIPT FILE NAMES.
03024/008A  BENCHMARK - TERMINAL     SCRIPT 1        C              *SCRIPT1                                                        
            5.1T3   299  BENCHMARK_-_TERMINAL.SCRI.C.008    1 LINE     90    3 PAGE UM   OGDEN               JULY 23, 1983  15:27:48
                         *SCRIPT1             
0          SCRIPT WHICH USES EDITOR FAST INSERT MODE.
03024/009A  BENCHMARK - TERMINAL     SCRIPT 2        C              *SCRIPT2                                                        
            5.1T3   300  BENCHMARK_-_TERMINAL.SCRI.C.009    1 LINE     52    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:48
                         *SCRIPT2             
0          SCRIPT WHICH USES THE EDITOR.
03024/010A  BENCHMARK - TERMINAL     SCRIPT 3        C              *SCRIPT3                                                        
            5.1T3   301  BENCHMARK_-_TERMINAL.SCRI.C.010    1 LINE     56    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:48
                         *SCRIPT3             
0          SCRIPT WHICH ENTERS, COMPILES, AND RUNS THE ETEST (COMPUTE E TO 2500 DECIMAL
           PLACES) PROGRAM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  902
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/011A  BENCHMARK - TERMINAL     SCRIPT 4        C              *SCRIPT4                                                        
            5.1T3   302  BENCHMARK_-_TERMINAL.SCRI.C.011    1 LINE     58    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:48
                         *SCRIPT4             
0          INTERACTIVE FORTRAN (IF) SCRIPT.
03024/012A  BENCHMARK - TERMINAL     SCRIPT 5        C              *SCRIPT5                                                        
            5.1T3   303  BENCHMARK_-_TERMINAL.SCRI.C.012    1 LINE     85    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:48
                         *SCRIPT5             
0          ASSEMBLER SCRIPT.
03024/013   BENCHMARK - TERMINAL     SCRIPT 5 DATA   SA             BNCH:WSG.TAPE                                                   
            5.0T4   194  BENCHMARK_-_TERMINAL.SCRI.SA.013   1 LINE     72   47 PAGE UM   OGDEN               JULY 03, 1981  21:31:41
            5.0T10   98  BNCH:WSG.TAPE        
0          ASSEMBLY SOURCE FOR PROGRAM ASSEMBLED BY SCRIPT 5. REQUIRES (3024/100),
           (3024/101), AND (3024/103). COPIES *CNFGINFODSECT (654).
0          Referenced by comments of: 3024/100, 3024/101, 3024/102, 3024/103 
03024/014A  BENCHMARK - TERMINAL     SCRIPT 6        C              *SCRIPT6                                                        
            5.1T3   304  BENCHMARK_-_TERMINAL.SCRI.C.014    1 LINE     40    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:49
                         *SCRIPT6             
0          FAST FOURIER TRANSFORM SCRIPT.
03024/015   BENCHMARK - TERMINAL     SCRIPT 6 PGM    SF  G          S1561 5.0T4 VLO FSNAME=BENCHMARK_-_TERMINAL.SCRI.SF.015(1)   196
            5.0T4   196  BENCHMARK_-_TERMINAL.SCRI.SF.015   1 LINE     71    6 PAGE UM   OGDEN               AUG. 28, 1975  17:00:57
            5.0T10  100                       
0          DOUBLE PRECISION FFT PROGRAM IN FTN H WHICH IS RUN BY SCRIPT 6.
0          Referenced by comments of: 3024/16, 3024/17 
03024/016   BENCHMARK - TERMINAL     SCRIPT 6 PGM    OE  G          BNCH:FFT.HD                                                     
            5.0T4   197  BENCHMARK_-_TERMINAL.SCRI.OE.016   1 SEQ    1440    2 PAGE UM   OGDEN               JULY 03, 1981  21:31:50
            5.0T10  101  BNCH:FFT.HD          
0          Object of (3024/15).
0          Referenced by comments of: 3024/17 
03024/017   BENCHMARK - TERMINAL     SCRIPT 6 DATA   D              BNCH:FFT.DATA                                                   
            5.0T4   198  BENCHMARK_-_TERMINAL.SCRI.D.017    1 LINE     11    1 PAGE UM   OGDEN               JULY 03, 1981  21:31:51
            5.0T10  102  BNCH:FFT.DATA        
0          DATA FOR SCRIPT 6 FFT PROGRAM (3024/15).
           Data for Script 6 FFT program (3024/16).
1                                                                                               SUN SEP 08/96   15:24:55   Page  903
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/018A  BENCHMARK - TERMINAL     SCRIPT 7        C              *SCRIPT7                                                        
            5.1T3   305  BENCHMARK_-_TERMINAL.SCRI.C.018    1 LINE     64    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:49
                         *SCRIPT7             
0          BIG FORTRAN SCRIPT.
03024/019   BENCHMARK - TERMINAL     SCRIPT 7 PGM    SF  G          BNCH:SCRIPT7PGM                                                 
            5.0T4   200  BENCHMARK_-_TERMINAL.SCRI.SF.019   1 LINE     72    4 PAGE UM   OGDEN               JULY 03, 1981  21:31:53
            5.0T10  104  BNCH:SCRIPT7PGM      
0          PROGRAM USED BY SCRIPT 7.
03024/020A  BENCHMARK - TERMINAL     SCRIPT 8        C              *SCRIPT8                                                        
            5.1T3   306  BENCHMARK_-_TERMINAL.SCRI.C.020    1 LINE     69    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:49
                         *SCRIPT8             
0          TAXIR SCRIPT.
03024/021   BENCHMARK - TERMINAL     SCRIPT 8 DATA   D              BNCH:USE.T                                                      
            5.0T4   202  BENCHMARK_-_TERMINAL.SCRI.D.021    1 LINE  32764   92 PAGE UM   OGDEN               JULY 03, 1981  21:31:54
            5.0T10  106  BNCH:USE.T           
03024/022   BENCHMARK - TERMINAL     COMM AREA       SA  G          BNCH:SEG2.S                                                     
            5.0T4   204  BENCHMARK_-_TERMINAL.COMM.SA.023   1 LINE     69    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:00
            5.0T10  108  BNCH:SEG2.S          
0          COMMUNICATIONS AREA USED BY BNCH:DSR.S (3024/1) AND BNCH:MONITOR.S (3024/3).  MUST BE
           LOADED INTO SHARED VM PRIOR TO RUNNING BNCH:MONITOR.  COPIES COPY:CDCADSECT (3024/24).
03024/023   BENCHMARK - TERMINAL     COMM AREA       OC  G          BNCH:SEG2                                                       
            5.0T4   205  BENCHMARK_-_TERMINAL.COMM.OC.024   1 LINE     80    4 PAGE UM   OGDEN               JULY 03, 1981  21:32:01
            5.0T10  109  BNCH:SEG2            
03024/024   BENCHMARK - TERMINAL     CDCADSECT       SA  G          COPY:CDCADSECT                                                  
            5.0T4   206  BENCHMARK_-_TERMINAL.CDCA.SA.025   1 LINE     60    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:02
            5.0T10  110  COPY:CDCADSECT       
0          COPY SECTION DESCRIBING THE FORMAT OF AN ENTRY IN THE COMMUNICATIONS AREA.
0          Referenced by comments of: 3024/1, 3024/3, 3024/22 
03024/025   BENCHMARK - TERMINAL     SOURCE FILE     C              BNCH:SCR                                                        
            5.0T4   207  BENCHMARK_-_TERMINAL.SOUR.C.026    1 LINE     76    2 PAGE UM   OGDEN               JULY 03, 1981  21:32:03
            5.0T10  111  BNCH:SCR             
0          COMMAND FILE TO RUN A TERMINAL BENCHMARK.
0          Referenced by comments of: 3024/26, 3024/27 
03024/026C  BENCHMARK - TERMINAL     MACROS          CM  G          BNCH:MACROS                                                     
            5.1T3   307  BENCHMARK_-_TERMINAL.MACR.CM.026   1 LINE     75    4 PAGE UM   OGDEN               JULY 23, 1983  15:27:49
                         BNCH:MACROS          
0          Command macro library to perform benchmarks.  Much better than (3024/25).
1                                                                                               SUN SEP 08/96   15:24:55   Page  904
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/027   BENCHMARK - TERMINAL     START COMMANDS  D              BNCH:CMDS                                                       
            5.0T4   208  BENCHMARK_-_TERMINAL.STAR.D.027    1 LINE      9    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:03
            5.0T10  112  BNCH:CMDS            
0          BNCH:MONITOR (3024/3) START COMMANDS, USED BY BNCH:SCR (3024/25).
03024/028   BENCHMARK - TERMINAL     TEST SCRIPTS    C              BNCH:TEST                                                       
            5.0T4   209  BENCHMARK_-_TERMINAL.TEST.C.028    1 LINE     62    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:04
            5.0T10  113  BNCH:TEST            
0          COMMAND FILE TO PRODUCE A PRINTED COPY OF THE EXECUTION OF ONE OF THE SCRIPTS
           TO CHECK THAT IT WORKS CORRECTLY.
03024/029   BENCHMARK - TERMINAL     MON WRITEUP     WF             BNCH:MONITOR.F                                                  
            5.0T4   210  BENCHMARK_-_TERMINAL.MON.WF.029    1 LINE    129    5 PAGE UM   OGDEN               JULY 03, 1981  21:32:05
            5.0T10  114  BNCH:MONITOR.F       
0          WRITEUP DESCRIBING BNCH:MONITOR (3024/3).
03024/030   BENCHMARK - TERMINAL     DSR WRITEUP     WF             BNCH:DSR.F                                                      
            5.0T4   211  BENCHMARK_-_TERMINAL.DSR.WF.030    1 LINE     97    6 PAGE UM   OGDEN               JULY 03, 1981  21:32:06
            5.0T10  115  BNCH:DSR.F           
0          WRITEUP DESCRIBING THE BENCHMARK DSR (3024/1).
03024/031   BENCHMARK - TERMINAL     STATSUM         SG  G          BNCH:STATSUM.S                                                  
            5.0T4   212  BENCHMARK_-_TERMINAL.STAT.SG.031   1 LINE    104    3 PAGE UM   OGDEN               JULY 03, 1981  21:32:07
            5.0T10  116  BNCH:STATSUM.S       
0          PROGRAM TO READ *STATISTICS DATA AND PRODUCE MEAN, SD, MIN, AND MAX FIGURES
           BY SCRIPT FOR CPU TIME, VMI, WAIT VMI, AND ELAPSED TIME.  CALLS THE PAR
           SUBR (687/1), THE JVCT SUBR (674), AND THE BECORI SUBR WHICH IS PART OF
           NAAS:IMSL (NOT CURRENTLY DISTRIBUTED).
03024/032   BENCHMARK - TERMINAL     STATSUM         OE  G          BNCH:STATSUM                                                    
            5.0T4   213  BENCHMARK_-_TERMINAL.STAT.OE.032   1 LINE   3770    5 PAGE UM   OGDEN               JULY 03, 1981  21:32:08
            5.0T10  117  BNCH:STATSUM         
03024/033   BENCHMARK - TERMINAL     BNCH:STATS      D            # BNCH:STATS                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:STATS@E         
0          FILE USED TO COLLECT DATA DURING BENCHMARK RUNS.
03024/034   BENCHMARK - TERMINAL     BNCH:OUTPUT     D            # BNCH:OUTPUT                                                     
                                                                                    UM   OGDEN                                      
                         BNCH:OUTPUT@E        
0          FILE USED TO SAVE OUTPUT WHILE TESTING BENCHMARK SCRIPTS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  905
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/035   BENCHMARK - TERMINAL     BNCH:TSTATS     D            # BNCH:TSTATS                                                     
                                                                                    UM   OGDEN                                      
                         BNCH:TSTATS@E        
0          FILE USED TO SAVE DSR STATISTICS WHILE TESTING BENCHMARK SCRIPTS.
03024/036C  BENCHMARK - TERMINAL     BNCH:TSTATS     D            # BNCH:TAXIRSTATS                                                 
                                                                                    UM   OGDEN                                      
                         BNCH:TAXIRSTATS@E    
03024/037   BENCHMARK - TERMINAL     CRE FM INPUT    C              BNCH:CREFMINPUT                                              459
            5.0T4   214  BENCHMARK_-_TERMINAL.CRE.C.036     1 LINE     67    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:08
            5.0T10  118  BNCH:CREFMINPUT      
0          COMMAND FILE THAT MAY BE $SOURCED TO TO CREATE FILEMOVE (1020) INPUT AS
           THE FIRST STEP IN MOVING FROM A ONE-PACK TO A MULTI-PACK SYSTEM.
03024/038   BENCHMARK - TERMINAL     LISTFILES       SA  G          BNCH:LISTFILES.S                                             460
            5.0T4   215  BENCHMARK_-_TERMINAL.LIST.SA.037   1 LINE     72    2 PAGE UM   OGDEN               JULY 03, 1981  21:32:09
            5.0T10  119  BNCH:LISTFILES.S     
0          PROGRAM TO PROCURE A LIST OF ALL FILES IN THE FILE SYSTEM ON SPUNCH.
           ASSEMBLE USING COPY:FILE.MACROS (482/45).
0          Referenced by comments of: 3024/40 
03024/039   BENCHMARK - TERMINAL     LISTFILES       OC  G          BNCH:LISTFILES                                                  
            5.0T4   216  BENCHMARK_-_TERMINAL.LIST.OC.038   1 LINE     80    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:10
            5.0T10  120  BNCH:LISTFILES       
03024/040   BENCHMARK - TERMINAL     ASSIGNVOL       SS  G          BNCH:ASSIGNVOL.S                                                
            5.0T4   217  BENCHMARK_-_TERMINAL.ASSI.SS.039   1 LINE     66    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:11
            5.0T10  121  BNCH:ASSIGNVOL.S     
0          PROGRAM WHICH TAKES A VOLUME NAME PREFIX AND MAXIMUM VOLUME NUMBER PLUS THE
           FILE LIST PRODUCED BY THE LISTFILE PROGRAM (3024/38) AND PROCURES OUTPUT
           THAT CAN BE USED AS INPUT TO FILEMOVE (1020).
03024/041   BENCHMARK - TERMINAL     ASSIGNVOL       OC  G          BNCH:ASSIGNVOL                                                  
            5.0T4   218  BENCHMARK_-_TERMINAL.ASSI.OC.040   1 LINE     80    4 PAGE UM   OGDEN               JULY 03, 1981  21:32:12
            5.0T10  122  BNCH:ASSIGNVOL       
0          HAS A $CONTINUE WITH *SPITLIB CARD.
03024/042   BENCHMARK - TERMINAL                     OC           # BNCH:ANOV.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:ANOV.@UM        
0          Subcomponents (3024/42) through (3024/94) are MIDAS files (not MIDAS input)
           used by (3024/95) through (3024/97).  They cannot be distributed due to
           Stat Lab restrictions.
0          Referenced by comments of: 3024/42 
1                                                                                               SUN SEP 08/96   15:24:55   Page  906
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/043   BENCHMARK - TERMINAL                     OC           # BNCH:AUTO.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:AUTO.@UM        
03024/044   BENCHMARK - TERMINAL                     OE           # BNCH:CANO.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:CANO.@UM        
03024/045   BENCHMARK - TERMINAL                     OE           # BNCH:CLUS.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:CLUS.@UM        
03024/046   BENCHMARK - TERMINAL                     OC           # BNCH:CODE.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:CODE.@UM        
03024/047   BENCHMARK - TERMINAL                     OE           # BNCH:COMP.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:COMP.@E         
03024/048   BENCHMARK - TERMINAL                     D            # BNCH:CONTROL                                                    
                                                                                    UM   OGDEN                                      
                         BNCH:CONTROL@UM      
03024/049   BENCHMARK - TERMINAL                     OE           # BNCH:CORR.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:CORR.@UM        
03024/050   BENCHMARK - TERMINAL                     OC           # BNCH:COVA.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:COVA.@UM        
03024/051   BENCHMARK - TERMINAL                     OC           # BNCH:CROS.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:CROS.@UM        
03024/052   BENCHMARK - TERMINAL                     OC           # BNCH:DESC.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:DESC.@UM        
03024/053   BENCHMARK - TERMINAL                     OE           # BNCH:DISC.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:DISC.@UM        
03024/054   BENCHMARK - TERMINAL                     OE           # BNCH:DISP.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:DISP.@UM        
03024/055   BENCHMARK - TERMINAL                     OE           # BNCH:DIST.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:DIST.@UM        
1                                                                                               SUN SEP 08/96   15:24:55   Page  907
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/056   BENCHMARK - TERMINAL                     OE           # BNCH:DOCUMENTOR                                                 
                                                                                    UM   OGDEN                                      
                         BNCH:DOCUMENTOR@UM   
03024/057   BENCHMARK - TERMINAL                     OE           # BNCH:DUMP                                                       
                                                                                    UM   OGDEN                                      
                         BNCH:DUMP            
03024/058   BENCHMARK - TERMINAL                     D            # BNCH:ERRORS                                                     
                                                                                    UM   OGDEN                                      
                         BNCH:ERRORS          
03024/059   BENCHMARK - TERMINAL                     OC           # BNCH:FACT.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:FACT.@UM        
03024/060   BENCHMARK - TERMINAL                     OE           # BNCH:GENE.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:GENE.@UM        
03024/061   BENCHMARK - TERMINAL                     OE           # BNCH:HIST.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:HIST.@UM        
03024/062   BENCHMARK - TERMINAL                     OC           # BNCH:ICOMP                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:ICOMP           
03024/063   BENCHMARK - TERMINAL                     OC           # BNCH:KSAM.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:KSAM.@UM        
03024/064   BENCHMARK - TERMINAL                     OE           # BNCH:MANO.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:MANO.@UM        
03024/065   BENCHMARK - TERMINAL                     OE           # BNCH:MCOR.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:MCOR.@UM        
03024/066   BENCHMARK - TERMINAL                     OE           # BNCH:MIDAS                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:MIDAS@UM        
03024/067   BENCHMARK - TERMINAL                     OE           # BNCH:MISS.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:MISS.@UM        
03024/068   BENCHMARK - TERMINAL                     OC           # BNCH:ONEW.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:ONEW.@UM        
1                                                                                               SUN SEP 08/96   15:24:55   Page  908
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/069   BENCHMARK - TERMINAL                     OE           # BNCH:OSIR.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:OSIR.@UM        
03024/070   BENCHMARK - TERMINAL                     OE           # BNCH:PAIR.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:PAIR.@UM        
03024/071   BENCHMARK - TERMINAL                     OC           # BNCH:PLOT.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:PLOT.@UM        
03024/072   BENCHMARK - TERMINAL                     OC           # BNCH:POLY.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:POLY.@UM        
03024/073   BENCHMARK - TERMINAL                     OC           # BNCH:PRIN.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:PRIN.@UM        
03024/074   BENCHMARK - TERMINAL                     OE           # BNCH:PROF.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:PROF.@UM        
03024/075   BENCHMARK - TERMINAL                     OE           # BNCH:RCOR.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:RCOR.@UM        
03024/076   BENCHMARK - TERMINAL                     OE           # BNCH:READ.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:READ.@UM        
03024/077   BENCHMARK - TERMINAL                     OC           # BNCH:REGR.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:REGR.@UM        
03024/078   BENCHMARK - TERMINAL                     OC           # BNCH:ROTA.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:ROTA.@UM        
03024/079   BENCHMARK - TERMINAL                     OE           # BNCH:RPAI.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:RPAI.@UM        
03024/080   BENCHMARK - TERMINAL                     OE           # BNCH:SAVE.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SAVE.@UM        
03024/081   BENCHMARK - TERMINAL                     OE           # BNCH:SCAT.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SCAT.@UM        
1                                                                                               SUN SEP 08/96   15:24:55   Page  909
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/082   BENCHMARK - TERMINAL                     OE           # BNCH:SELE.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SELE.@UM        
03024/083   BENCHMARK - TERMINAL                     OE           # BNCH:SEPA.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SEPA.@UM        
03024/084   BENCHMARK - TERMINAL                     OC           # BNCH:SETXY                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SETXY           
03024/085   BENCHMARK - TERMINAL                     OC           # BNCH:SIMU.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SIMU.@UM        
03024/086   BENCHMARK - TERMINAL                     OE           # BNCH:SPEC.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:SPEC.@UM        
03024/087   BENCHMARK - TERMINAL                     OE           # BNCH:STUD.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:STUD.@UM        
03024/088   BENCHMARK - TERMINAL                     D            # BNCH:TALENT*                                                    
                                                                                    UM   OGDEN                                      
                         BNCH:TALENT*@UM      
03024/089   BENCHMARK - TERMINAL                     OC           # BNCH:TIME                                                       
                                                                                    UM   OGDEN                                      
                         BNCH:TIME            
03024/090   BENCHMARK - TERMINAL                     OE           # BNCH:TRAN.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:TRAN.@UM        
03024/091   BENCHMARK - TERMINAL                     OC           # BNCH:TSQU.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:TSQU.@UM        
03024/092   BENCHMARK - TERMINAL                     OC           # BNCH:TWOS.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:TWOS.@UM        
03024/093   BENCHMARK - TERMINAL                     OE           # BNCH:TWOW.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:TWOW.@UM        
03024/094   BENCHMARK - TERMINAL                     OC           # BNCH:WRIT.                                                      
                                                                                    UM   OGDEN                                      
                         BNCH:WRIT.@UM        
0          Referenced by comments of: 3024/42 
1                                                                                               SUN SEP 08/96   15:24:55   Page  910
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/095A  BENCHMARK - TERMINAL     MIDAS SCRIPTS   C              *SCRIPT9                                                        
            5.1T3   308  BENCHMARK_-_TERMINAL.MIDA.C.095    1 LINE     47    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:50
                         *SCRIPT9             
0          Requires (3024/98).
0          Referenced by comments of: 3024/42, 3024/98 
03024/096A  BENCHMARK - TERMINAL     MIDAS SCRIPTS   C              *SCRIPTA                                                        
            5.1T3   309  BENCHMARK_-_TERMINAL.MIDA.C.096    1 LINE     48    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:50
                         *SCRIPTA             
03024/097A  BENCHMARK - TERMINAL     MIDAS SCRIPTS   C              *SCRIPTB                                                        
            5.1T3   310  BENCHMARK_-_TERMINAL.MIDA.C.097    1 LINE     47    1 PAGE UM   OGDEN               JULY 23, 1983  15:27:50
                         *SCRIPTB             
0          Referenced by comments of: 3024/42 
03024/098   BENCHMARK - TERMINAL     MIDAS DATA      D              BNCH:MIDAS_1_DATA                                               
            5.0T4   222  BENCHMARK_-_TERMINAL.MIDA.D.097    1 LINE   1232    4 PAGE UM   OGDEN               JULY 03, 1981  21:32:16
            5.0T10  126  BNCH:MIDAS_1_DATA    
0          A data file required by *SCRIPT1M (3024/95).
0          Referenced by comments of: 3024/95 
03024/099   BENCHMARK - TERMINAL     COPY SECTION    SA             COPY:BNCHSTATDSCT                                               
            5.0T4   223  BENCHMARK_-_TERMINAL.COPY.SA.098   1 LINE     68    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:17
            5.0T10  127  COPY:BNCHSTATDSCT    
0          A copy section used by the Terminal Benchmark DSR (3024/1).  It describes
           the statistics record produced by (3024/1).
0          Referenced by comments of: 3024/1 
03024/100   BENCHMARK - TERMINAL     GLOBALDEFS      SA             BNCH:GLOBALDEFS                                                 
            5.0T4   224  BENCHMARK_-_TERMINAL.GLOB.SA.099   1 LINE     80    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:18
            5.0T10  128  BNCH:GLOBALDEFS      
0          Required by (3024/13).
0          Referenced by comments of: 3024/13, 3024/102 
03024/101   BENCHMARK - TERMINAL     GLOBALSETS      SA             BNCH:GLOBALSETS                                                 
            5.0T4   225  BENCHMARK_-_TERMINAL.GLOB.SA.100   1 LINE     80    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:19
            5.0T10  129  BNCH:GLOBALSETS      
0          Required by (3024/13).
0          Referenced by comments of: 3024/13, 3024/102 
1                                                                                               SUN SEP 08/96   15:24:55   Page  911
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03024/102   BENCHMARK - TERMINAL     GLOBALS         SA             BNCH:GLOBALS                                                    
            5.0T4   226  BENCHMARK_-_TERMINAL.GLOB.SA.101   1 LINE     37    1 PAGE UM   OGDEN               JULY 03, 1981  21:32:20
            5.0T10  130  BNCH:GLOBALS         
0          Required by (3024/13). Contains $CONTINUE WITHs to BNCH:GLOBALDEFS (3024/100)
           and BNCH:GLOBALSETS (3024/101).
03024/103   BENCHMARK - TERMINAL     LLMPSEQU        SA             BNCH:LLMPSEQU                                                   
            5.0T4   227  BENCHMARK_-_TERMINAL.LLMP.SA.102   1 LINE     72    9 PAGE UM   OGDEN               JULY 03, 1981  21:32:21
            5.0T10  131  BNCH:LLMPSEQU        
0          Required by (3024/13).
0          Referenced by comments of: 3024/13 
03025/001A *SENSEDSECT                               SA  G          *SENSEDSECT                                                     
            5.1T3   311  SENSEDSECT..SA.001                 1 LINE     80    4 PAGE UM   MTS       SHERRY    JULY 23, 1983  15:27:50
                         *SENSEDSECT          
0          UQV DSECT FOR MAG TAPE SNS DATA -- NOW EXTENDED BY UM TO ADD SNS DATA FOR *...*.
            
           ******************************************************************************
           D5.0A changes:
            
           Contains page printer changes.
           ******************************************************************************
0          Referenced by comments of: 101/1, 135/1, 291/1, 314/1, 340/1, 489/1, 496/1, 513/1, 545/3, 548/1, 548/3, 553/1,
                 636/1, 637/1, 638/1, 696/1, 814/2, 816/3, 826/8, 826/11, 3024/1 
03028/001   PATCHSYS                                              # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO
           DYNAMICALLY PATCH THE SYSTEM AT POST-IPL TIME.
03030/001   VAMREC                                                # (PART OF FILE SYSTEM RECOVERY)                                  
                                                                                    UQV                                             
0          Part of File System Recovery, (682/24) and (682/25)
03031/001   LKED CONVERTER                                        # (OBSOLETED BY VSS)                                              
                                                                                    UQV                                             
0          THIS IS A PROGRAM THAT WILL READ OS LINKAGE EDITOR INPUT OR THE COMBINED
           OBJECT AND MEMBER-RECORD FILES OUTPUT BY *UNLINKER (562).
03036/001   C+                                                    # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE C+
           SYSTEM PROGRAMMING LANGUAGE.
1                                                                                               SUN SEP 08/96   15:24:55   Page  912
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03037/001   METRIC                                                # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM
           FOR DISPLAYING INFORMATION ABOUT SYSTEM ACTIVITY.
03038/001   MOVECAT                                               # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A FILE
           SYSTEM UTILITY FOR MAKING AN EXACT COPY OF THE FILE SYSTME CATALOG.
03043/001   FILE RELOCATE                                         # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A SMALL
           UTILITY TO MOVE FILES FROM ONE PACK TO ANOTHER, USED BY THE OPERATIONS
           STAFF AT UQV.
03045/001   SCB DOCUMENTOR                                        # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE SYSTEM
           CONTROL BLOCK DESCRIPTOR SYSTEM.
03046/001   XEROX 9700 UQV JSL                                    # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE UQV JOBS
           DESCRIPTION SOURCE FOR THE XEROX 9700.  SEE COMPONENT (841) FOR THE UM 
           VERSION.
03047/001   XEROX 9700 UQV FSL                                    # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE UQV FORMS
           LANGUAGE SOURCE FILES FOR THE XEROX 9700.  SEE COMPONENT (840) FOR THE UM
           VERSION.
03048/001   XEROX 9700 UQV FONT                                   # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE XEROX
           9700 FONTS.  SEE COMPONENT (842) FOR THE UM VERSION.
03050/001   PAGE PRINTER SUBRTN                                   # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT IS NOT CURRENTLY INSTALLED AT MICHIGAN.
03051/001   PAGE PRINTER TBLS                                     # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT IS NOT CURRENTLY INSTALLED AT MICHIGAN.
1                                                                                               SUN SEP 08/96   15:24:55   Page  913
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
03053/001   FPAPRTN                                               # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE DSR
           FOR THE FLOATING POINT SYSTEMS 190L ARRAY PROCESSOR.
03054/001   APSUB                                                 # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A NEW PART
           OF MTS TO DEAL WITH THE ARRAY PROCESSOR.
03055/001   AP SOFTWARE                                           # (NOT DISTRIBUTED)                                               
                                                                                    UQV                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS
           UPDATES TO FLOATING POINT SYSTEMS SOFTWARE.
03062/001C  SPLIT & COMBINE          SPLIT           SA  G          W267:SPLIT.SA                                                   
            5.1T3   312  SPLIT_&_COMBINE.SPLIT.SA.001       1 LINE     72    5 PAGE UQV  ENGLEY    EADIE     JULY 23, 1983  15:27:51
0          SPLIT and COMBINE are two programs written originally at UQV to
           convert and unconvert, respectively, files to a form which can be 
           readily transported over networks.
            
           The conversion accounts for long lines, line numbers, non-printing
           characters and erroneous trimming of blanks.
03062/002C  SPLIT & COMBINE          SPLIT           OC  G          W267:SPLIT                                                      
            5.1T3   313  SPLIT_&_COMBINE.SPLIT.OC.002       1 LINE   1702    1 PAGE UQV  ENGLEY    EADIE     JULY 23, 1983  15:27:52
03062/003C  SPLIT & COMBINE          COMBINE         SA  G          W267:COMBINE.SA                                                 
            5.1T3   314  SPLIT_&_COMBINE.COMBINE.SA.003     1 LINE     72    8 PAGE UQV  ENGLEY    EADIE     JULY 23, 1983  15:27:52
03062/004C  SPLIT & COMBINE          COMBINE         OC  G          W267:COMBINE                                                    
            5.1T3   315  SPLIT_&_COMBINE.COMBINE.OC.004     1 LINE   2490    4 PAGE UQV  ENGLEY    EADIE     JULY 23, 1983  15:27:52
04000/001   GATE                     D5.0 MASTER     SA  G  GATE    S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=GATE                        
            5.0T4   642  GATE.D5.0_MASTER.SA.001            1 LINE     80   22 PAGE UM   MTS       BURLING   AUG. 10, 1981  00:22:42
            5.0T11  216                       
0          GATE, which replaces LCSYMBOL (043), is an interface from user programs to
           MTS-provided subroutines. It defines LCSYMBOL and furnishes the entry points
           for all user-callable system subroutines which must run in system mode --
           i.e., those which require access to the MTS system segment (currently segment
           7) or issue privileged SVCs. This component also provides the return point
           for these subroutines. At the entry (port), an MC instruction is used to
           switch to system mode; at the return, another MC is used and the return is
           made to the original caller in user mode. Copies COPY:LLMPSEQU (087) and
           COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3),
           COPY:CC.MACROS (1054/3), COPY:SETPARM (653/1), and COPY:MISC.MACROS (728/1).
0          Referenced by comments of: 42/2, 43/1, 354/7, 509/3, 579/7, 4000/10 
1                                                                                               SUN SEP 08/96   15:24:55   Page  914
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/002A  GATE                     UPDATE          UC  G          MTSS:GATE/UPD                                                   
            5.1T3   316  GATE.UPDATE.UC.002                 1 LINE     76   19 PAGE UM   MTS       BURLING   JULY 23, 1983  15:27:53
0          *CDUPDATE input to produce current source.
0          Referenced by comments of: 4000/5 
04000/003A  GATE                                     OC  G        # (PART OF RESIDENT SYSTEM)                                       
                                                                                    UM   MTS       BURLING                          
0          Object part of Resident System (468).
04000/004A  GATE                                     L              S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=GATE.LIST                 
            5.1T3   317  GATE..L.004                        1 LINE    133  112 PAGE UM   MTS       BURLING   JULY 23, 1983  15:28:21
04000/005C  GATE                     TGATE UPDATE    UC  G          MTSS:TGATE/UPD                                                  
            5.1T3   361  GATE.TGATE_UPDATE.UC.005           1 LINE     68    1 PAGE UM   MTS       BURLING   AUG. 20, 1983  19:50:42
0          This update is used in conjunction with the GATE update (4000/2) to produce
           the TGATE deck used with TMTS.
04000/006A  GATE                     COMMENTS        D   G          MTSS:GATE/COM                                                   
            5.1T3   318  GATE.COMMENTS.D.006                1 LINE     69    1 PAGE UM   MTS       BURLING   JULY 23, 1983  15:28:23
0          This file contains annotation about changes to this subcomponent.
           It is fed to Ramrod as annotation for this deck.
04000/007C  GATE                     PORT WRITEUP    WF  G          MTSS:PORT*WF                                                    
            5.1T3   319  GATE.PORT_WRITEUP.WF.007           1 LINE     71    6 PAGE UM   BURLING             JULY 23, 1983  15:28:23
0          *FORMAT source for writeup describing how to add a PORT to the GATE assembly.
0          Referenced by comments of: 4000/8 
04000/008C  GATE                     PORT WRITEUP    PF  G          MTSS:PORT*W                                                     
            5.1T3   320  GATE.PORT_WRITEUP.PF.008           1 LINE     69    9 PAGE UM   BURLING             JULY 23, 1983  15:28:24
0          Print-ready version of (4000/7).
04000/009   GATE                     STAT FILES      P              S1561 5.0T4 VLO FSNAME=GATE.STAT_FILES.P.005(1)              229
            5.0T4   229  GATE.STAT_FILES.P.005              1 LINE     73    3 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:43
            5.0T10  133                       
0          SUBCOMPONENTS (4000/9) THROUGH (4000/50) COMPRISE THE UNIVERSITY OF MICHIGAN
           GATE STATISTICS COLLECTION FACILITY.
            
           STAT FILES (4000/9) IS A PRINT FILE CONTAINING A LIST OF ALL FILES,
           TOGETHER WITH A DESCRIPTION OF THEIR CONTENTS, WHICH MAKE UP THE 
           COLLECTION FACILITY.
0          Referenced by comments of: 4000/9 
1                                                                                               SUN SEP 08/96   15:24:55   Page  915
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/010   GATE                     STAT UPDATE     UC  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_UPDATE.UC.006(1)            230
            5.0T4   230  GATE.STAT_UPDATE.UC.006            1 LINE     68    3 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:45
            5.0T10  134                       
0          CONTAINS UPDATE DECKS FOR APPLYING THE GATE STATISTICS COLLECTION FACILITY
           TO THE GATE (4000/1).  ALSO UPDATES THE GATE SOURCE TO WORK WITH ASSEMBLER H.
04000/011   GATE                     STATON          SA  G          S1561 5.0T4 VLO FSNAME=GATE.STATON.SA.007(1)                 231
            5.0T4   231  GATE.STATON.SA.007                 1 LINE     69    3 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:47
            5.0T10  135                       
0          CONTAINS ASSEMBLY LANGUAGE SOURCE FOR THE STATON PROGRAM, WHICH ACTIVATES
           THE COUNTERS IN THE GATE.  STATON CALLS THE LOADSVM SUBROUTINE ENTRY POINT 
           TO PISTLE (559/2). 
04000/012   GATE                     STATON          OC  G          S1561 5.0T4 VLO FSNAME=GATE.STATON.OC.008(1)                 232
            5.0T4   232  GATE.STATON.OC.008                 1 LINE     80    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:49
            5.0T10  136                       
0           
04000/013   GATE                     GATESTAT CSECT  SA  G          S1561 5.0T4 VLO FSNAME=GATE.GATESTAT_CSECT.SA.009(1)         233
            5.0T4   233  GATE.GATESTAT_CSECT.SA.009         1 LINE     72    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:51
            5.0T10  137                       
0          THIS IS THE ASSEMBLY LANGUAGE SOURCE FOR THE GATESTAT CSECT, WHICH IS
           LOADED INTO SHARED VM TO PROVIDE A PLACE FOR THE GATE TO MAINTAIN ITS
           USE COUNTERS. 
04000/014   GATE                     GATESTAT CSECT  OC  G          S1561 5.0T4 VLO FSNAME=GATE.GATESTAT_CSECT.OC.010(1)         234
            5.0T4   234  GATE.GATESTAT_CSECT.OC.010         1 LINE     80    3 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:53
            5.0T10  138                       
04000/015   GATE                     STATOFF         SA  G          S1561 5.0T4 VLO FSNAME=GATE.STATOFF.SA.011(1)                235
            5.0T4   235  GATE.STATOFF.SA.011                1 LINE     68    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:55
            5.0T10  139                       
0          THIS IS THE ASSEMBLY LANGUAGE SOURCE FOR THE STATOFF PROGRAM, WHICH IS
           USED TO DEACTIVATE THE USE COUNTERS IN THE GATE.  COPIES COPY:SYSDEFS.
04000/016   GATE                     STATOFF         OC  G          S1561 5.0T4 VLO FSNAME=GATE.STATOFF.OC.012(1)                236
            5.0T4   236  GATE.STATOFF.OC.012                1 LINE     80    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:57
            5.0T10  140                       
04000/017   GATE                     STAT REC MAIN   SF  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_MAIN.SF.013(1)          237
            5.0T4   237  GATE.STAT_REC_MAIN.SF.013          1 LINE     63    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:00:59
            5.0T10  141                       
0          FORTRAN SOURCE FOR THE MAIN PROGRAM OF THE GATE STATISTICS RECORDING
           SYSTEM. 
0          Referenced by comments of: 4000/39, 4000/41, 4000/43 
1                                                                                               SUN SEP 08/96   15:24:55   Page  916
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/018   GATE                     STAT REC MAIN   OC  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_MAIN.OC.014(1)          238
            5.0T4   238  GATE.STAT_REC_MAIN.OC.014          1 LINE     90    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:01
            5.0T10  142                       
04000/019   GATE                     GETUSR SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.GETUSR_SUBR.SF.015(1)            239
            5.0T4   239  GATE.GETUSR_SUBR.SF.015            1 LINE     68    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:03
            5.0T10  143                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM GETUSR SUBROUTINE, WHICH
           GETS PARAMETER VALUES FROM THE USER.  USES COMMON AREAS FROM FTN COMMON 
           (4000/39).
04000/020   GATE                     GETUSR SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.GETUSR_SUBR.OE.016(1)            240
            5.0T4   240  GATE.GETUSR_SUBR.OE.016            1 LINE    692    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:05
            5.0T10  144                       
04000/021   GATE                     INIT SUBR       SF  G          S1561 5.0T4 VLO FSNAME=GATE.INIT_SUBR.SF.017(1)              241
            5.0T4   241  GATE.INIT_SUBR.SF.017              1 LINE     67    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:07
            5.0T10  145                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM INIT SUBROUTINE.  THIS
           SUBROUTINE PROMPTS THE USER FOR RUN-TIME PARAMETER VALUES, INITIALIZES
           THE SYMBOL TABLE, AND WRITES THE HEADER FOR MIDAS OUTPUT.  USES COMMON 
           AREAS FROM FTN COMMON (4000/39).
04000/022   GATE                     INIT SUBR       OC  G          S1561 5.0T4 VLO FSNAME=GATE.INIT_SUBR.OC.018(1)              242
            5.0T4   242  GATE.INIT_SUBR.OC.018              1 LINE    166    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:09
            5.0T10  146                       
04000/023   GATE                     PUTHDR SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.PUTHDR_SUBR.SF.019(1)            243
            5.0T4   243  GATE.PUTHDR_SUBR.SF.019            1 LINE     61    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:11
            5.0T10  147                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM PUTHDR SUBROUTINE, WHICH
           PUTS OUT A HEADER IN THE MIDAS STATISTICS FILE.  THE HEADER INCLUDES A
           TIME STAMP AND MIDAS RUN AND READ COMMANDS.  USES COMMON AREAS DEFINED 
           BY FTN COMMON (4000/39). 
04000/024   GATE                     PUTHDR SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.PUTHDR_SUBR.OE.020(1)            244
            5.0T4   244  GATE.PUTHDR_SUBR.OE.020            1 LINE   1332    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:14
            5.0T10  148                       
04000/025   GATE                     PUTMID SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.PUTMID_SUBR.SF.021(1)            245
            5.0T4   245  GATE.PUTMID_SUBR.SF.021            1 LINE     60    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:16
            5.0T10  149                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM PUTMID SUBROUTINE, WHICH
           PUTS OUT USE STATISTICS IN MIDAS-COMPATIBLE FORMAT.  USES COMMON AREAS 
           DEFINED BY FTN COMMON (4000/39). 
1                                                                                               SUN SEP 08/96   15:24:55   Page  917
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/026   GATE                     PUTMID SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.PUTMID_SUBR.OE.022(1)            246
            5.0T4   246  GATE.PUTMID_SUBR.OE.022            1 LINE    340    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:18
            5.0T10  150                       
04000/027   GATE                     PUTUSR SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.PUTUSR_SUBR.SF.023(1)            247
            5.0T4   247  GATE.PUTUSR_SUBR.SF.023            1 LINE     63    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:20
            5.0T10  151                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM PUTUSR SUBROUTINE, WHICH
           PUTS OUT USE STATISTICS ON A TERMINAL.  USES COMMON AREA DEFINED BY FTN 
           COMMON (4000/39). 
04000/028   GATE                     PUTUSR SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.PUTUSR_SUBR.OE.024(1)            248
            5.0T4   248  GATE.PUTUSR_SUBR.OE.024            1 LINE    348    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:22
            5.0T10  152                       
04000/029   GATE                     SAMPLE SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.SAMPLE_SUBR.SF.025(1)            249
            5.0T4   249  GATE.SAMPLE_SUBR.SF.025            1 LINE     67    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:24
            5.0T10  153                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM SAMPLE SUBROUTINE, WHICH
           SETS UP TIMER INTERRUPTS AND EXAMINES AND WRITES OUT USE COUNTERS FOR EACH
           TIME PERIOD.  USES COMMON AREAS DEFINED BY FTN COMMON (4000/39).
04000/030   GATE                     SAMPLE SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.SAMPLE_SUBR.OE.026(1)            250
            5.0T4   250  GATE.SAMPLE_SUBR.OE.026            1 LINE    630    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:26
            5.0T10  154                       
04000/031   GATE                     TBLDEF SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.TBLDEF_SUBR.SF.027(1)            251
            5.0T4   251  GATE.TBLDEF_SUBR.SF.027            1 LINE     65    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:28
            5.0T10  155                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM TBLDEF SUBROUTINE, WHICH
           INITIALIZES THE SYMBOL TABLES USING ONLY THOSE ROUTINES WHOSE COUNTERS
           HAVE BEEN INCREMENTED FROM THEIR INITIAL VALUES.  USES COMMON AREAS 
           DEFINED BY FTN COMMON (4000/39). 
04000/032   GATE                     TBLDEF SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.TBLDEF_SUBR.OE.028(1)            252
            5.0T4   252  GATE.TBLDEF_SUBR.OE.028            1 LINE    394    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:30
            5.0T10  156                       
04000/033   GATE                     TBLUSR SUBR     SF  G          S1561 5.0T4 VLO FSNAME=GATE.TBLUSR_SUBR.SF.029(1)            253
            5.0T4   253  GATE.TBLUSR_SUBR.SF.029            1 LINE     68    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:32
            5.0T10  157                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM TBLUSR SUBROUTINE, WHICH
           READS FROM THE USER A LIST OF ROUTINES TO MONITOR.  IT INITIALIZES THE
           TABLES BASED ON THIS LIST. USES COMMON AREAS DEFINED BY FTN COMMON (4000/39). 
04000/034   GATE                     TBLUSR SUBR     OE  G          S1561 5.0T4 VLO FSNAME=GATE.TBLUSR_SUBR.OE.030(1)            254
            5.0T4   254  GATE.TBLUSR_SUBR.OE.030            1 LINE    856    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:34
            5.0T10  158                       
0          Referenced by comments of: 4000/39 
1                                                                                               SUN SEP 08/96   15:24:55   Page  918
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/035   GATE                     DBLMATH SUBR    SA  G          S1561 5.0T4 VLO FSNAME=GATE.DBLMATH_SUBR.SA.031(1)           255
            5.0T4   255  GATE.DBLMATH_SUBR.SA.031           1 LINE     72    3 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:36
            5.0T10  159                       
0          SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM DOUBLE-WORD MATH
           ROUTINES.
04000/036   GATE                     DBLMATH SUBR    OC  G          S1561 5.0T4 VLO FSNAME=GATE.DBLMATH_SUBR.OC.032(1)           256
            5.0T4   256  GATE.DBLMATH_SUBR.OC.032           1 LINE     80    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:38
            5.0T10  160                       
04000/037   GATE                     GETSTAT SUBR    SA  G          S1561 5.0T4 VLO FSNAME=GATE.GETSTAT_SUBR.SA.033(1)           257
            5.0T4   257  GATE.GETSTAT_SUBR.SA.033           1 LINE     73    8 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:40
            5.0T10  161                       
0          SOURCE FOR SEVERAL LOW-LEVEL STATISTICS ACCESS ROUTINES, WHICH ARE USED
           BY THE GATE STATISTICS RECORDING SYSTEM TO ACCESS THE COUNTS OF GATE
           ACTIVITY.  COPIES COPY:JOBSTA (413/9).
04000/038   GATE                     GETSTAT SUBR    OC  G          S1561 5.0T4 VLO FSNAME=GATE.GETSTAT_SUBR.OC.034(1)           258
            5.0T4   258  GATE.GETSTAT_SUBR.OC.034           1 LINE     80    3 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:43
            5.0T10  162                       
0          Referenced by comments of: 4000/41, 4000/43 
04000/039   GATE                     FTN COMMON      SF  G          S1561 5.0T4 VLO FSNAME=GATE.FTN_COMMON.SF.035(1)             259
            5.0T4   259  GATE.FTN_COMMON.SF.035             1 LINE     66    2 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:45
            5.0T10  163                       
0          SOURCE FOR FORTRAN COMMON AREA DEFINITIONS USED BY ALL FORTRAN SUBROUTINES
           (4000/17) THROUGH (4000/34) IN THE GATE STATISTICS RECORDING SYSTEM.
0          Referenced by comments of: 4000/19, 4000/21, 4000/23, 4000/25, 4000/27, 4000/29, 4000/31, 4000/33, 4000/40, 4000/42 
04000/040   GATE                     STAT REC USER   SF  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_USER.SF.036(1)          260
            5.0T4   260  GATE.STAT_REC_USER.SF.036          1 LINE     52    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:47
            5.0T10  164                       
0          SOURCE FOR FORTRAN BLOCK DATA WHICH ASSIGNS LOGICAL I/O UNITS FOR CONVENIENT
           USE FROM A TERMINAL.  USES COMMON AREAS FROM FTN COMMON (4000/39). 
0          Referenced by comments of: 4000/41 
04000/041   GATE                     STAT REC USER   OC  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_USER.OC.037(1)          261
            5.0T4   261  GATE.STAT_REC_USER.OC.037          1 LINE     72    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:49
            5.0T10  165                       
0          OBJECT FILE FOR THE GATE STATISTICS RECORDING SYSTEM (4000/17) THROUGH
           (4000/38) IN A FORM WHICH CAN BE $RUN. THE OBJECT FOR (4000/40) IS INCLUDED,
           ALONG WITH $CONTINUE WITHS FOR ALL OTHER FILES IN THE GATE STATISTICS
           RECORDING SYSTEM (4000/17) THROUGH (4000/38) AND A "$CONTINUE WITH
           COPY:SYSDEFS RETURN" LINE.
0          Referenced by comments of: 4000/43 
1                                                                                               SUN SEP 08/96   15:24:55   Page  919
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/042   GATE                     STAT REC OPER   SF  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_OPER.SF.038(1)          262
            5.0T4   262  GATE.STAT_REC_OPER.SF.038          1 LINE     52    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:51
            5.0T10  166                       
0          SOURCE FOR FORTRAN BLOCK DATA WHICH ASSIGNS LOGICAL I/O UNITS FOR USE
           WITH *GSA (4000/44).  USES COMMON AREAS FROM FTN COMMON (4000/39).
04000/043   GATE                     STAT REC OPER   OC  G          S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_OPER.OC.039(1)          263
            5.0T4   263  GATE.STAT_REC_OPER.OC.039          1 LINE     72    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:53
            5.0T10  167                       
0          OBJECT FILE FOR THE GATE STATISTICS RECORDING SYSTEM (4000/17) THROUGH
           (4000/38) IN A FORM WHICH CAN BE $RUN. SAME AS (4000/41) EXCEPT THAT I/O
           UNITS ARE ASSIGNED FOR USE WITH *GSA.
04000/044   GATE                     *GSA            C              S1561 5.0T4 VLO FSNAME=GATE.*GSA.C.040(1)                    264
            5.0T4   264  GATE.*GSA.C.040                    1 LINE     77    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:55
            5.0T10  168                       
0          COMMAND FILE TO ACTIVATE THE GATE STATISTICS COLLECTION SYSTEM.  CONTAINS A
           "$CONTINUE WITH MTS:GS.STATPARS RETURN" LINE.
0          Referenced by comments of: 4000/42, 4000/48 
04000/045   GATE                     LOCK            D            # SYS:GS.LOCK                                                     
                                                                                    UM   HELFFRICH                                  
0          EMPTY FILE USED BY *GSA.
04000/046   GATE                     NEWSTAT         D            # SYS:GS.NEWSTAT                                                  
                                                                                    UM   HELFFRICH                                  
0          EMPTY FILE USED BY *GSA.
04000/047   GATE                     OLDSTAT         D            # SYS:GS.OLDSTAT                                                  
                                                                                    UM   HELFFRICH                                  
0          EMPTY FILE USED BY *GSA.
04000/048   GATE                     STAT PARAMS     D              S1561 5.0T4 VLO FSNAME=GATE.STAT_PARAMS.D.044(1)             265
            5.0T4   265  GATE.STAT_PARAMS.D.044             1 LINE     56    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:58
            5.0T10  169                       
0          CONTAINS PARAMETERS READ BY THE STATISTICS RECORDING SYSTEM WHEN IT IS 
           STARTED BY USING THE OPERATOR FILE *GSA (4000/44).  CONTAINS A LIST OF
           PARAMETERS NORMALLY SUPPLIED BY THE USER IF THE STATISTICS RECORDING IS RUN 
           FROM A TERMINAL.
04000/049   GATE                     *GSD            C              S1561 5.0T4 VLO FSNAME=GATE.*GSD.C.045(1)                    266
            5.0T4   266  GATE.*GSD.C.045                    1 LINE     55    1 PAGE UM   HELFFRICH           SEP. 27, 1978  00:01:59
            5.0T10  170                       
0          COMMAND FILE TO DEACTIVATE THE GATE STATISTICS COLLECTION SYSTEM.
1                                                                                               SUN SEP 08/96   15:24:55   Page  920
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04000/050   GATE                     WRITEUP         WF             S1561 5.0T4 VLO FSNAME=GATE.WRITEUP.WF.046(1)                267
            5.0T4   267  GATE.WRITEUP.WF.046                1 LINE     97    9 PAGE UM   HELFFRICH           SEP. 27, 1978  00:02:01
            5.0T10  171                       
0          STRUCTURAL DESCRIPTION AND USER'S GUIDE TO THE GATESTAT GATE STATISTICS
           COLLECTION SYSTEM.
0          Referenced by comments of: 4000/9 
04001/001   NONPRIV KWIC                                          # (NOT DISTRIBUTED)                                               
                                                                                    WSU                                             
0          THIS COMPONENT IS NOT INSTALLED AT MICHIGAN.
04003/001   DUMPER                                                # (NOT DISTRIBUTED)                                               
                                                                                    WSU                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM
           TO DUMP THE DUMPS FROM THE PAGING DISK TO TAPE, WHICH IS INPUT TO THE
           PRINTDUMP PROGRAM (400).
04009/001   ACCESS                                                # (NOT DISTRIBUTED)                                               
                                                                                    WSU                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A SUBROUTINE
           TO RETURN ACCESS INFORMATION ABOUT A FILE.
04010/001   SVMR                                                  # (NOT DISTRIBUTED)                                               
                                                                                    WSU                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS
           GETSVM, FEESVM, AND SCANSVM, STORAGE MANAGEMENT SUBROUTINES FOR SHARED
           VIRTUAL MEMORY.
0          Referenced by comments of: 4011/1 
04011/001   SVMTABLE                                              # (NOT DISTRIBUTED)                                               
                                                                                    WSU                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS THE 
           CONTROL BLOCK FOR SVMR (4010).
04014/001   WHIZBANG                                              # (NOT DISTRIBUTED)                                               
                                                                                    WSU                                             
0          THIS COMPONENT IS NOT INSTALLED AT MICHIGAN.
04200/001   UNCDUPDATE                                            # (NOT DISTRIBUTED)                                               
                                                                                    RPI                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM
           TO COMPARE TWO FILES AND OUTPUT THEIR DIFFERENCES IN THE FORM OF *CDUPDATE
           (1036) CONTROL STATEMENTS AND INSERTION RECORDS.
1                                                                                               SUN SEP 08/96   15:24:55   Page  921
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
04201/001   RPI REMOTE OPCONSOLE                                  # (NOT DISTRIBUTED)                                               
                                                                                    RPI                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE RPI
           REMOTE OPERATOR'S CONSOLE PROGRAM.
04222/001   FILE MOVER                                            # (NOT DISTRIBUTED)                                               
                                                                                    RPI                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM
           TO MOVE FILES FROM ONE VOLUME TO ANOTHER.
04240/001   STUDENT IPL ROUTINE                                   # (NOT DISTRIBUTED)                                               
                                                                                    RPI                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN IPL
           LOADER FOR USE WITH ST360 (472).
04241/001   3277 SCREEN I/O ROUTINE                               # (NOT DISTRIBUTED)                                               
                                                                                    RPI                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS
           SUBROUTINES TO CREATE SCREEN FIELDS, READ SCREEN FIELDS, UPDATE SCREEN FIELDS,
           AND INTERCEPT THE ATTENTION KEYS.
04242/001   LCLPRINT                                              # (NOT DISTRIBUTED)                                               
                                                                                    RPI                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM
           WHICH SUPPORTS THE COURIER 8700 PRINTERS AS NON-SPOOLED PRINT-STATIONS AT
           REMOTE TERMINAL SITES.
04401/001   PN3203 JOB                                            # (NOT DISTRIBUTED)                                               
                                                                                    SFU                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE JOB
           THAT LOADS THE UCSB AND FCB BUFFERS FOR THE 3203-4 PRINTER WITH A PN PRINT
           TRAIN.
04403/001   DIVMIXED                                              # (NOT DISTRIBUTED)                                               
                                                                                    SFU                                             
0          THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS USED TO
           PERFORM MIXED PRECISION DIVISION WHEN A NORMAL DIVISION FAILS.
04404/001   APL - VS                                              # (NOT DISTRIBUTED)                                               
                                                                                    SFU            FRONCZAK                         
0          SFU is the MTS distributor for VS APL.
04404/002C  APL - VS                 MEMO 435        WF             APLI:APL.VSMEMO                                                 
            5.1T3   321  APL_-_VS.MEMO_435.WF.002           1 LINE     93   23 PAGE UM   FRONCZAK            JULY 23, 1983  15:28:24
0          This is the FORMAT source for Computing Center Memo 435 --
1                                                                                               SUN SEP 08/96   15:24:55   Page  922
0  Num   R       Component Name         Subname     Type G Seq ID S                          Location                           File
+_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____
          6250 tape-file             FS Name              Ver FType LRECL Size DevT Inst  Person   Local Per      Date        Time
+         ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________
          1600 tape-file       Disk Name
+         ______________ _____________________
0          "MTS VS APL User's Guide."  This source requires a lot of 
           massaging to produce (4404/3), but it is included in the 
           distribution in case anyone wants it anyway.
04404/003C  APL - VS                 MEMO 435        PF  G          S0672 CCMEMO 'CCMEMOS' FSNAME=M435.OUTPUT                       
            5.1T3   322  APL_-_VS.MEMO_435.PF.003           1 LINE     71   28 PAGE SFU            FRONCZAK  OCT. 13, 1982  12:29:52
0          This is the printer-ready version of Computing Center Memo 435 --
           "MTS VS APL User's Guide."
0          Referenced by comments of: 4404/2 
