1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00004/001E  TABLES                                   SA  G  TABL    WSG:TABLES                                                      
            4.2BT1    1  TABLES..SA.001                     1 LINE     80   25 PAGE UM   WSG                 OCT. 17, 1979  21:13:15
                         WSG.:TABLES          
0          THE FORMAT OF THE LOGICAL CHANNEL TABLE (LCH) HAS CHANGED.
           THERE IS NOW A 3RD BYTE IN THE SUBLIST ENTRY FOR EACH PATH
           WHICH IS AN OFFSET THAT IS TO BE ADDED TO THE CHANNEL ADDRESS.
           ADDING A ZERO SHOULD MAKE EXISTING TABLES WORK. 
            
           TABLES THAT DEFINE THE HARDWARE CONFIGURATION FOR THE UM AMDAHL 470, THE NUMBER OF LOW-CORE
           TERMINAL I/O BUFFERS, THE LIST OF PUBLIC DISK VOLUME NAMES AND CORRESPONDING DISK DRIVES, ETC.
           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).  THIS DECK CONTAINS
           SEVERAL MACRO DEFINITIONS USEFUL FOR DEFINING THE TABLES.  COPIES COPY:LLMPSEQU (087),
           COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), AND *CNFGINFODSECT(2) (654).
           ASSEMBLE USING COPY:FILE.MACROS (482/33) AND COPY:SETPARM (653).
           NOTE:  IT IS NORMAL TO GET AN *ASMG WARNING MESSAGE ABOUT RELOCATABLE Y-CONS. IF
                  ASSEMBLING WITH *ASMH, USE PAR=REL2 TO SUPPRESS THESE WARNINGS.
00004/002E  TABLES                   WRITEUP         WF             W163:TABLES.F                                                   
            4.2BT1    2  TABLES.WRITEUP.WF.003              1 LINE    147   13 PAGE UM   WSG                 OCT. 17, 1979  21:13:17
                         WSG.:TABLES.WF       
00024/001E  ONLINE/OFFLINE                           SA  G          MTS:ON/OFFLINE(1,999)                                           
            4.2BT1    3  ONLINE/OFFLINE..SA.001             1 LINE     80    8 PAGE UM   MTA                 OCT. 17, 1979  21:13:19
                         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.
00042/001E  MTS                      UPDATE          UC  G          MTS:MTSUPD                                                      
            4.2BT1    4  MTS.UPDATE.UC.002                  1 LINE     76   30 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:13:21
                         MTS.:MTSUPD          
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
1                                                                                               SUN SEP 08/96   14:21:51   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          WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=MTS.
00042/002E  MTS                      ASM JOB         C              MTS:MTSASM                                                      
            4.2BT1    5  MTS.ASM_JOB.C.004                  1 LINE    125    5 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:13:31
                         MTS.:MTSASM          
0          USING THE D4.2 SOURCE AS BASE:
            
           AT LINE 1, A BATCH JOB TO ASSEMBLE MTS AND ALL OF THE SUBROUTINES
           AT LINE 1000, A BATCH JOB TO ASSEMBLE ONLY PARTICULAR PIECES OF MTS
            
           USING THE D4.0 SOURCE AS BASE:
            
           AT LINE 2000, A BATCH JOB TO ASSEMBLE MTS AND ALL OF THE SUBROUTINES
           AT LINE 3000, A BATCH JOB TO ASSEMBLE ONLY PARTICULAR PIECES OF MTS
            
           IF THE D4.0 SOURCE IS USED AS A BASE, THE VARIOUS ...UPD FILES MUST
           HAVE CERTAIN $CONTINUE WITH LINES REMOVED FROM THEM.
00045/001E  SUPERVISOR               UPDATE          UC  G          MTA:UMMPS.U                                                     
            4.2BT1    6  SUPERVISOR.UPDATE.UC.002           1 LINE     76   32 PAGE UM   MTA                 OCT. 17, 1979  21:13:33
                         MTA:UMMPS.U          
0          UPDATE TO D4.0 UMMPS (045/1) TO PRODUCE CURRENT UMMPS.
0          Referenced by comments of: 45/1 
00046/001E  CONFIG                   UPDATE          UC  G          MTA:CONFIG.U                                                    
            4.2BT1    7  CONFIG.UPDATE.UC.002               1 LINE     76   12 PAGE UM   MTA                 OCT. 17, 1979  21:13:43
                         MTA.:CONFIG.U        
0          UDATE TO 046/1 TO PRODUCE CURRENT CONFIG.
00087    E  LLMPSEQU                                 SA  G          COPY:LLMPSEQU                                                   
            4.2BT1    8  LLMPSEQU..SA.                      1 LINE     72   10 PAGE UM   MTA                 OCT. 17, 1979  21:13:45
                         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: 4/1, 24/1, 387/1, 387/2, 388/1, 577/1, 577/3, 621/1, 1012/1 
00197    E *SMDS                                     M              *SMDS                                                           
            4.2BT1    9  SMDS..M.                           1 LINE    168    6 PAGE UM   MTS                 OCT. 17, 1979  21:14:26
                         *SMDS                
0          MTS MESSAGE FILE (SYSTEM MESSAGES DATA SET).  USED IN CONJUNCTION WITH FMSG MACRO IN MTS.
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00198/001E  GUINFO/CUINFO SUBRS      UPDATE          UC  G          MTS:INFOUPD                                                     
            4.2BT1   10  GUINFO/CUINFO_SUBRS.UPDAT.UC.002   1 LINE     72    5 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:14:28
                         MTS.:INFOUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=INFO.
00225/001E *SYSMAC                                   SM  G          *SYSMAC                                                         
            4.2BT1   11  SYSMAC..SM.002                     1 LINE     80   79 PAGE UM   MTA                 OCT. 17, 1979  21:14:29
                         *SYSMAC              
0          THIS IS BEING INCLUDED ON RD4.2B BECAUSE SO MANY THINGS USE ITS MACROS
           IMPLICITLY THAT WE JUST CAN'T BE SURE THAT EVERYTHING WILL WORK WITH THE
           PREVIOUS VERSION.  SO TO BE ON THE SAFE SIDE ...
00344/001E  MTS.MACROS               UPDATE          UC  G          MTS:MACROSUPD                                                   
            4.2BT1   12  MTS.MACROS.UPDATE.UC.002           1 LINE     80   18 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:14:47
                         MTS.:MACROSUPD       
0          MTS COMMANDS AND *CDUPDATE INPUT TO PRODUCE THE CURRENT SOURCE.  FILE
           CONTAINS $CONTINUE WITH LINE TO ALLOW USE OF UPDATE WITH THE D4.2 SOURCE
           AS BASE.  THIS LINE SHOULD BE REMOVED WHEN USING THE D4.1 SOURCE AS BASE.
           THE UPDATED SOURCE, WHEN RUN THROUGH *MACUTIL, WILL PRODUCE THE
           CURRENT MACRO LIBRARY (344/3).
00354/001E  LLXU                     UPDATE          UC  G          MTS:LLXUUPD                                                     
            4.2BT1   13  LLXU.UPDATE.UC.002                 1 LINE     82   10 PAGE UM   MTS       SHERRY    OCT. 17, 1979  21:14:52
                         MTS.:LLXUUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=LLXU.
00387/001E  HASP                     MAIN            SA  G  HSP     S0996 HASP 'MODULAR HASP' FSNAME=HASP.MAIN                      
            4.2BT1   14  HASP.MAIN.SA.001                   1 LINE     80  213 PAGE UM   HANSEN              OCT. 11, 1979  22:07:50
0          SOURCE FOR MAIN ASSEMBLY OF MTS HASP, WHICH IS DERIVED FROM IBM HASP II VERSION 2.3.
           THIS VERSION USES THE SLT (SEARCH LIST) INSTRUCTION, OPTIONALLY (&NOSLT), TO SEARCH
           PCE'S, DCT'S, AND MESSAGE BLOCKS.  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/002E  HASP                     EXEC            SA  G  EXEC    S0996 HASP 'MODULAR HASP' FSNAME=HASP.EXEC                      
            4.2BT1   15  HASP.EXEC.SA.002                   1 LINE     80   56 PAGE UM   HANSEN              OCT. 11, 1979  22:08:30
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/003E  HASP                     RDR             SA  G  RDR     S0996 HASP 'MODULAR HASP' FSNAME=HASP.RDR                       
            4.2BT1   16  HASP.RDR.SA.003                    1 LINE     80   75 PAGE UM   HANSEN              OCT. 11, 1979  22:08:19
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00387/004E  HASP                     PPR             SA  G  PPR     S0996 HASP 'MODULAR HASP' FSNAME=HASP.PPR                       
            4.2BT1   17  HASP.PPR.SA.004                    1 LINE     80   26 PAGE UM   HANSEN              OCT. 11, 1979  22:08:36
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
00387/005E  HASP                     DATA            SA  G  DATA    S0996 HASP 'MODULAR HASP' FSNAME=HASP.DATA                      
            4.2BT1   18  HASP.DATA.SA.005                   1 LINE     80   10 PAGE UM   HANSEN              OCT. 11, 1979  22:08:43
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
00387/006E  HASP                     MACROS          SM  G  MACS    S0996 HASP 'MODULAR HASP' FSNAME=HASP.MACLIB                    
            4.2BT1   19  HASP.MACROS.SM.006                 1 LINE     80  132 PAGE UM   HANSEN              OCT. 11, 1979  22:07:22
0          HASP MACRO LIBRARY.
0          Referenced by comments of: 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8 
00387/007E  HASP                     OPER            SA  G  OPER    S0996 HASP 'MODULAR HASP' FSNAME=HASP.OPER                      
            4.2BT1   20  HASP.OPER.SA.007                   1 LINE     80   98 PAGE UM   HANSEN              OCT. 11, 1979  22:08:08
0          COPIES COPY:GLOBALSETS (1026/2).  ASSEMBLE USING COPY:MTS.MACROS (344/3) AND
           HASP.MACROS (387/6).
00387/008E  HASP                     MXMTR           SA  G  MXMT    S0996 HASP 'MODULAR HASP' FSNAME=HASP.MXMTR                     
            4.2BT1   21  HASP.MXMTR.SA.008                  1 LINE     80   17 PAGE UM   HANSEN              OCT. 11, 1979  22:08:40
0          MERIT BATCH TRANSMITTER PROCESSOR.  ASSEMBLE USING COPY:MTS.MACROS (344/3)
           AND HASP.MACROS (387/6).
00388/001E  HASPLING                 MAIN            SA  G  HSPL    S0996 HASP 'MODULAR HASP' FSNAME=HASPLING                       
            4.2BT1   22  HASPLING.MAIN.SA.001               1 LINE     80   27 PAGE UM   HANSEN              OCT. 11, 1979  22:08:45
0          COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087).  ASSEMBLE USING
           COPY:MTS.MACROS (344/3).
00388/002E  HASPLING                 MNET            SA  G  HSPM    S0996 HASP 'MODULAR HASP' FSNAME=HSPLNG.MNET                    
            4.2BT1   23  HASPLING.MNET.SA.002               1 LINE     80   19 PAGE UM   HANSEN              OCT. 11, 1979  22:08:50
0          ASSEMBLE USING COPY:MTS.MACROS (344/3).
00400/001E  PRINTDUMP                SSCN SUBR UPD   UC  G          MTS:SSCNUPD                                                     
            4.2BT1   24  PRINTDUMP.SSCN_SUBR_UPD.UC.004     1 LINE     72    3 PAGE UM   MTS       MTA       OCT. 17, 1979  21:19:13
                         MTS.:SSCNUPD         
0          MTS COMMANDS AND *CDUPDATE INPUT TO PRODUCE THE CURRENT SOURCE.  FILE
           CONTAINS $CONTINUE WITH LINE TO ALLOW USE OF THE UPDATE WITH THE RD16 SOURCE
           AS BASE.  THIS LINE SHOULD BE REMOVED WHEN USING THE D4.0 SOURCE AS BASE.
           UPDATE USES $CONTROL *IN* POSN=SSCN.
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00461/001E  DISTRIBUTION             1600 DRIVER     D              MTS:DRIVER1600                                                  
            4.2BT1 88    DISTRIBUTION.1600_DRIVER.D.006     1 LINE    263   13 PAGE UM   SWEET               OCT. 17, 1979  21:55:00
                         MTS:DRIVER1600       
0          THIS IS THE DRIVER FILE FOR THE 1600 BPI VERSION OF UM RD4.2B (REVL=E).
           THERE IS NO 6250 VERSION. 
           TO OBTAIN A LIST OF THOSE COMPONENTS INCLUDED ON RD4.2B SIMPLY
           USE THE *DEDIT COMMAND LIST.
00464/001E  PLIMIT                   UPDATE          UC  G          MTS:PLIMUPD                                                     
            4.2BT1   25  PLIMIT.UPDATE.UC.002               1 LINE     68    1 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:20:29
                         MTS.:PLIMUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=PLIM.
00482/001E  FILE SYSTEM              PDLIST PGM      SA  G          FILE:PDLIST(1000)                                               
            4.2BT1   26  FILE_SYSTEM.PDLIST_PGM.SA.034      1 LINE     72    4 PAGE UM   HELFFRICH           OCT. 17, 1979  21:21:19
                         FILE:PDLIST          
0          PROGRAM TO PRINT THE PHYSICAL DRIVE ADDRESS FOR EACH PUBLIC DISK VOLUME.
           THIS PROGRAM IS DEPENDENT ON THE SENSE DATA FORMAT AND SO WILL NOT WORK ON
           SOME MANUFACTURERS DISKS, E.G., STC.
00482/002E  FILE SYSTEM              PDLIST PGM      OC  G          FILE:PDLIST(1,999)                                              
            4.2BT1   27  FILE_SYSTEM.PDLIST_PGM.OC.035      1 LINE     80    3 PAGE UM   HELFFRICH           OCT. 17, 1979  21:21:21
00513/001E  DYSSUB                   UPDATE          UC  G          MTS:DYSUPD                                                      
            4.2BT1   28  DYSSUB.UPDATE.UC.002               1 LINE     72    4 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:22:04
                         MTS.:DYSUPD          
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=DYS.
00531/001E  COMMAND STATISTICS       CMDSTAT UPDATE  UC  G          MTS:CMDSTATUPD                                                  
            4.2BT1   29  COMMAND_STATISTICS.CMDSTA.UC.002   1 LINE     72    3 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:22:06
                         MTS.:CMDSTATUPD      
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.1 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=CMDSTAT. 
            
           REQUIRES THE RD16 VERSION OF CMDPIKUP (531/6).
00535/001E  CLS INTERFACE            GOM T/V DSECT   SG  G          COPY:CLSTV.SG                                                   
            4.2BT1   30  CLS_INTERFACE.GOM_T/V_DSE.SG.009   1 LINE     97    1 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:22:07
                         COPY:CLSTV.SG        
0          THIS IS THE GOM EQUIVALENT OF 535/6, I.E., THE CLSTV MACRO IN MTS.MACROS
           (344/3).
           THE RD4.2A (RD16) VERSION OF THIS WON'T COMPILE. THIS VERSION SHOULD.
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00539/001E  TIMNTRP                  UPDATE          UC  G          MTS:TIMTUPD                                                     
            4.2BT1   31  TIMNTRP.UPDATE.UC.002              1 LINE     72    4 PAGE UM   MTS       MTA       OCT. 17, 1979  21:22:08
                         MTS.:TIMTUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=TIMT.
00545/001E *FAKEOS                   OS SVC 59 SIML  SA             MTA:FOS.SVC59                                                   
            4.2BT1   32  FAKEOS.OS_SVC_59_SIML.SA.016       1 LINE     71    6 PAGE UM   MTA                 OCT. 17, 1979  21:22:09
                         MTA.:FOS.SVC59       
0          SOURCE FOR OS SVC 59 SIMULATOR.
           COPIES FAKEOS.GLBS (545/19) AND *CNFGINFODSECT (654).
           ASSEMBLE USING *SYSMAC, *OSMAC, AND FOS.MACLIB (545/21).
00545/002E *FAKEOS                   FOS.OLTS        OE             ETC:FOS.OLTS                                                    
            4.2BT1   33  FAKEOS.FOS.OLTS.OE.017             1 LINE   1670    6 PAGE UM   MTA                 OCT. 17, 1979  21:22:11
                         ETC.:FOS.OLTS        
0          OBJECT FROM 545/15 AND 545/16.  MUST BE CONCATENATED WITH *FAKEOS (545/38) WHEN RUNNING OLTEP.
00577/001E  MACHINE CHECK RECOVERY   370 MCHCCH      SA  G          MTA:MCHCCH.S                                                    
            4.2BT1   34  MACHINE_CHECK_RECOVERY.37.SA.002   1 LINE     80   14 PAGE UM   MTA                 OCT. 17, 1979  21:22:13
                         MTA.:MCHCCH.S        
0          370 MODEL-INDEPENDENT MACHINE AND CHANNEL CHECK HANDLER.
           ASSEMBLE USING COPY:SETPARM (653), *SYSMAC, AND MCHMAC (577/2).
           COPIES COPY:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT (470),
           COPY:CMDAREADSECT (531/18), COPY:GLOBALS (1026/3), AND
           COPY:BJPDSCT (650/3).
0          Referenced by comments of: 577/3, 655/1 
00577/002E  MACHINE CHECK RECOVERY   MACROS          SM  G          MTA:MCHMAC                                                      
            4.2BT1   35  MACHINE_CHECK_RECOVERY.MA.SM.006   1 LINE     72   29 PAGE UM   MTA                 OCT. 17, 1979  21:22:19
                         MTA.:MCHMAC          
0          MACROS FOR ASSEMBLING EREP AND MACHINE CHECK RECOVERY.
0          Referenced by comments of: 577/1, 577/3, 655/1 
00577/003E  MACHINE CHECK RECOVERY   MCHSUBR         SA  G          MTA:MCHSUBR(1,999)                                              
            4.2BT1   36  MACHINE_CHECK_RECOVERY.MC.SA.007   1 LINE     72   11 PAGE UM   MTA                 OCT. 17, 1979  21:22:25
                         MTA.:MCHSUBR         
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.  THIS VERSION OF MCHSUBR (THE
           ONLY ONE SO FAR) IS FOR THE AMDAHL 470 AND IS A NOP ON ANY OTHER MACHINE.  IT CAN
           BE DELETED FROM THE SYSTEM IF NOT NEEDED.  COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU
           (087), AND COPY:PSA (162).  ASSEMBLE USING MCHMAC (577/2) AND COPY:SETPARM (653).
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00578/001E  RSF                      UPDATE          UC  G          MTS:RSFUPD                                                      
            4.2BT1   37  RSF.UPDATE.UC.002                  1 LINE     71    7 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:22:35
                         MTS.:RSFUPD          
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=RSF.
00621/001E  DIRECT ACCESS ERROR LOG  READ3330LOG     SA  G          MTA:READ3330LOG(1,999)                                          
            4.2BT1   38  DIRECT_ACCESS_ERROR_LOG.R.SA.002   1 LINE     72    3 PAGE UM   MTA                 OCT. 17, 1979  21:23:19
                         MTA.:READ3330LOG     
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/18), COPY:GLOBALS (1026/3),
           AND COPY:LLMPSEQU (087).  ASSEMBLE USING COPY:FILE.MACROS (482/33).
0          Referenced by comments of: 621/3 
00621/002E  DIRECT ACCESS ERROR LOG  READ3330LOG     OC  G          MTA:READ3330LOG(1000)                                           
            4.2BT1   39  DIRECT_ACCESS_ERROR_LOG.R.OC.003   1 LINE     80    2 PAGE UM   MTA                 OCT. 17, 1979  21:23:20
00621/003E  DIRECT ACCESS ERROR LOG  PRINT UC 3330   SA  G          MTA:PRINTUC3330(1,999)                                          
            4.2BT1   40  DIRECT_ACCESS_ERROR_LOG.P.SA.004   1 LINE     57    1 PAGE UM   MTA                 OCT. 17, 1979  21:23:21
                         MTA.:PRINTUC3330     
0          PROGRAM TO READ UNIT CHECK LOG RECORDS, AS SAVED BY READ3330LOG (621/1), UC3330 (603),
           OR ANY OTHER UNIT CHECK ROUTINE.  READS FROM SCARDS, PRINTS ON SPRINT.  IT IGNORES
           ALL RECORDS THAT ARE NOT OF TYPE 4.  "PAR=ERRORS" MEANS TO PRINT ONLY THOSE RECORDS
           WHICH ARE REALLY ERRORS.  CALLS READBFR ROUTINE (709) AND PRUC3330 (621/7).
           COPIES COPY:CMDAREADSECT (531/18).
00621/004E  DIRECT ACCESS ERROR LOG  PRINT UC 3330   OC  G          MTA:PRINTUC3330(1000)                                           
            4.2BT1   41  DIRECT_ACCESS_ERROR_LOG.P.OC.005   1 LINE     80    1 PAGE UM   MTA                 OCT. 17, 1979  21:23:23
00621/005E  DIRECT ACCESS ERROR LOG  SORT AND PRINT  SA  G          MTA:PRINTUC                                                     
            4.2BT1   42  DIRECT_ACCESS_ERROR_LOG.S.SA.008   1 LINE     72   10 PAGE UM   MTA                 OCT. 17, 1979  21:23:24
                         MTA.:PRINTUC         
0          PROGRAM TO SORT AND SUMMARIZE UNIT CHECK AND BUFFERED LOG DATA FOR 3330 AND 2305.
           ACCEPTS PAR=STC (FOR STC DRIVES, SEE BELOW), 2305 (TO PRINT 2305 ERRORS ONLY), OR
           BOTH (FOR BOTH 2305 AND 3330 ERRORS).  IF NEITHER 2305 NOR BOTH IS GIVEN, IT PROMTS.
           COPIES COPY:CMDAREADSECT (531/18).  CALLS PRUC3330 (621/7) AND JVCT (674).
           HAS ASSEMBLY PARAMETER (&UM) WHICH REMAPS STC DRIVE IDS ACCORDING THE MESS STC
           MADE OF THEM AT UM.
00621/006E  DIRECT ACCESS ERROR LOG  SORT AND PRINT  OC  G          MTA:PUC                                                         
            4.2BT1   43  DIRECT_ACCESS_ERROR_LOG.S.OC.009   1 LINE   6912    5 PAGE UM   MTA                 OCT. 17, 1979  21:23:31
                         MTA.:PUC             
0          HAS A "$CONTINUE WITH MTA:PRUC3330(1000)+W030:UBCDATEX RETURN" RECORD.
           THE REFERENCE TO W030:UBCDATEX IS FOR THE OBJECT FOR JVCT (674).
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00621/007E  DIRECT ACCESS ERROR LOG  PRUC3330        SA  G          MTA:PRUC3330(1,999)                                             
            4.2BT1   44  DIRECT_ACCESS_ERROR_LOG.P.SA.010   1 LINE     71    3 PAGE UM   MTA                 OCT. 17, 1979  21:23:32
                         MTA.:PRUC3330        
0          SUBROUTINE CALLED BY 621/4 AND 621/8.  COPIES COPY:CMDAREADSECT (531/18).
0          Referenced by comments of: 621/3, 621/5 
00635/001E  FSUB                     UPDATE          UC  G          MTS:FSUBUPD                                                     
            4.2BT1   45  FSUB.UPDATE.UC.002                 1 LINE     72   16 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:23:34
                         MTS.:FSUBUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=FSUB.
00636/001E  CMDS                     UPDATE          UC  G          MTS:CMDSUPD                                                     
            4.2BT1   46  CMDS.UPDATE.UC.002                 1 LINE     80   32 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:23:39
                         MTS.:CMDSUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS A "$CONTINUE WITH" LINE TO 
           ALLOW USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE
           REMOVED WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=CMDS.
00637/001E  DSRS                     UPDATE          UC  G          MTS:DSRSUPD                                                     
            4.2BT1   47  DSRS.UPDATE.UC.002                 1 LINE     71   10 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:23:46
                         MTS.:DSRSUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=DSRS.
00638/001E  USUB                     UPDATE          UC  G          MTS:USUBUPD                                                     
            4.2BT1   48  USUB.UPDATE.UC.002                 1 LINE     80   23 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:23:49
                         MTS.:USUBUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=USUB.
00639/001E  DSRI                     UPDATE          UC  G          MTS:DSRIUPD                                                     
            4.2BT1   49  DSRI.UPDATE.UC.002                 1 LINE     72   13 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:23:57
                         MTS.:DSRIUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=DSRI.
00651/001E  RATES                    RATENBR UPD     UC  G          MTS:RNBRUPD                                                     
            4.2BT1   50  RATES.RATENBR_UPD.UC.011           1 LINE     68    3 PAGE UM   MTS       MTA       OCT. 17, 1979  21:24:01
                         MTS.:RNBRUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
1                                                                                               SUN SEP 08/96   14:21:51   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          WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=RNBR.
00653/001E  SETPARM                  ASMG VERSION    SM  G          COPY:SETPARM                                                    
            4.2BT1   51  SETPARM.ASMG_VERSION.SM.001        1 LINE     72    3 PAGE UM   MTA                 OCT. 17, 1979  21:24:03
                         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. 
           FOR EXAMPLE, IF A PROGRAM HAS A SETPARM MACRO (AFTER COPYING COPY:GLOBALS)
           AND IS ASSEMBLED WITH PAR=SYSPARM=0001100101023 THEN ADDITIONAL SET
           STATEMENTS WILL BE GENERATED AS FOLLOWS:
               &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
0          Referenced by comments of: 4/1, 577/1, 577/3 
00653/002E  SETPARM                  ASMH VERSION    SA  G        # SEE COPY:SETPARM (653/1)                                        
            D4.1T1  462  SETPARM.ASMH_VERSION.SA.002        1 LINE     72    3 PAGE UM   MTA                 MAY  13, 1978  18:07:40
0          ASMH VERSION OF SETPARM MACRO.
            
           SCANS SYSPARM FOR NAME=TVAL WHERE "NAME" IS A SYMBOL NAME,
           "T" IS A, B, C, 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.
00655/001E  EREP/370                 CNVTEREP        SA  O          MTA:CNVTEREP(1,999)                                             
            4.2BT1   52  EREP/370.CNVTEREP.SA.002           1 LINE     72    8 PAGE UM   MTA                 OCT. 17, 1979  21:24:04
                         MTA.:CNVTEREP        
0          PROGRAM TO CONVERT LOG RECORDS GENERATED BY MCHCCH (577/1) AND UC3330 (603) TO
           A FORMAT ACCEPTABLE TO THE IBM EREP PROGRAM WHICH IS RUN UNDER *FAKEOS IN MTS.
           CALLS JVCT (674) AND MAY CALL IGFC60 (589/4), IGFC70 (589/5), IGFC80 (589/6),
           IGFCIC (NOT DISTRIBUTED), OR A#VCCH47 (589/8) IF VERY OLD DATA IS PROCESSED.
           COPIES COPY:CMDAREADSECT (531/18) AND *CNFGINFODSECT (654).  ASSEMBLE USING
           MCHMAC (577/2).
00655/002E  EREP/370                 CNVTEREP        OC  O          MTA:CNVTEREP(1000)                                              
            4.2BT1   53  EREP/370.CNVTEREP.OC.003           1 LINE     80    6 PAGE UM   MTA                 OCT. 17, 1979  21:24:09
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00655/003E  EREP/370                 470 RMS SOURCE  SA  G          S0081 ADV254 'RMS6.0' POSN=MS.UPGRADE.SOURCE                6   
            4.2BT1   54  EREP/370.470_RMS_SOURCE.SA.004     1 SEQ      80  196 PAGE AMD            MTA       OCT. 17, 1979  21:33:02
00655/004E  EREP/370                 470 LIBRARY     OL  G          ETC:EREP470LIB                                                  
            4.2BT1   55  EREP/370.470_LIBRARY.OL.005        1 LINE  14805   12 PAGE AMD            MTA       OCT. 17, 1979  21:33:08
                         ETC.:EREP470LIB      
00655/005E  EREP/370                 LIBRARY         OL  O          ETC:EREPLIB                                                     
            4.2BT1   56  EREP/370.LIBRARY.OL.010            1 LINE   6144  183 PAGE UM   MTA                 OCT. 17, 1979  21:33:10
                         ETC.:EREPLIB         
0          LIBRARY CONTAINING ALL OF EREP (VS2 REL 3.7) FOR ALL MODELS OF 370.
            
                         >>>>>>>CONTAINS A REP CARD.<<<<<<<
00737/001E *ASMH                     INFO3           WX             MTA:ASMHMEMO                                                    
            4.2BT1   57  ASMH.INFO3.WX.014                  1 LINE    106    5 PAGE UM   MTA                 OCT. 17, 1979  21:33:24
0          A MEMO GIVING DETAILS ABOUT RECENT CHANGES TO *ASMH.
00737/002E *ASMH                     UTILITY         SS  O          MTA:ASMHUTIL                                                    
            4.2BT1   58  ASMH.UTILITY.SS.015                1 LINE    117    4 PAGE UM   MTA                 OCT. 17, 1979  21:33:26
                         MTA.:ASMHUTIL        
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/3), ASMHUPD
           (737/18), ASMHUPDBUGS (737/19), ASMHUPDMTS (737/20), ASMHUPDNUM (737/21), ASMHUPDEXTEN
           (737/22), ASMHOBJ (737/29), VARIOUS SCRATCH FILES, UNSP:SPITLIB(590/29), ASMHLOG, AND
           *CDUPDATE (1036/2).
0          Referenced by comments of: 737/3 
00737/003E *ASMH                     DIR             D              MTA:ASMHDIR                                                     
            4.2BT1   59  ASMH.DIR.D.016                     1 LINE    256    3 PAGE UM   MTA                 OCT. 17, 1979  21:33:28
                         MTA.:ASMHDIR         
0          DIRECTORY OF LOCATION OF *ASMH COMPONENTS USED BY ASMHUTIL (737/2).
0          Referenced by comments of: 737/2 
00737/004E *ASMH                     MACRO UPDATE    UC  G          MTA:ASMHMACUPD                                                  
            4.2BT1   60  ASMH.MACRO_UPDATE.UC.023           1 LINE     77   23 PAGE UM   MTA                 OCT. 17, 1979  21:33:29
                         MTA.:ASMHMACUPD      
0          UPDATE TO PRODUCE THE MTS MACRO LIBRARY FROM THE IBM SOURCE (737/10).
00737/005E *ASMH                     NEW UPDATES     UC  G          MTA:ASMHUPDNEW                                                  
            4.2BT1   61  ASMH.NEW_UPDATES.UC.024            1 LINE     76   75 PAGE UM   MTA                 OCT. 17, 1979  21:33:37
                         MTA:ASMHUPDNEW       
0          POST D4.1 UDPATES, IN CHRONOLOGICAL ORDER, TO ASMH.
            
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00737/006E *ASMH                     TEST PGM #2     SA  G          MTA:ASMHT2                                                      
            4.2BT1   62  ASMH.TEST_PGM_#2.SA.033            1 LINE     72    1 PAGE UM   MTA                 OCT. 17, 1979  21:33:57
0          PROGRAM TO TEST NEW SYSTEM SET SYMBOLS.  START AT LINE *F.
00737/007E *ASMH                     TEST PGM #31    SA  G          MTA:ASMHT31                                                     
            4.2BT1   63  ASMH.TEST_PGM_#31.SA.062           1 LINE     67    1 PAGE UM   MTA                 OCT. 17, 1979  21:33:58
0          PROGRAM TO TEST MHELP 8 OUTPUT.
00737/008E *ASMH                     TEST PGM #35    SA  G          MTA:ASMHT35                                                     
            4.2BT1   64  ASMH.TEST_PGM_#35.SA.066           1 LINE     72    1 PAGE UM   MTA                 OCT. 17, 1979  21:33:59
0          PROGRAM TO TEST TRAILING COMMAS ON VARIOUS ASSEMBLER STATEMENTS.
00737/009E *ASMH                     TEST PGM #36    SA  G          MTA:ASMHT36                                                     
            4.2BT1   65  ASMH.TEST_PGM_#36.SA.067           1 LINE     58    1 PAGE UM   MTA                 OCT. 17, 1979  21:34:01
0          TEST PROGRAM FOR PEXIT SUBROUTINE AND PARAMETER AND OCTL.  INTENDED TO 
           BE USED WITH 737/69.
00737/010E *ASMH                     TEST PGM #37    SA  G          MTA:ASMHT37                                                     
            4.2BT1   66  ASMH.TEST_PGM_#37.SA.070           1 LINE     47    1 PAGE UM   MTA                 OCT. 17, 1979  21:34:02
0          TEST "_" AS AN ALPHEBETIC CHARACTER
0          Referenced by comments of: 737/4 
00737/011E *ASMH                     TEST PGM #38    SA  G          MTA:ASMHT38                                                     
            4.2BT1   67  ASMH.TEST_PGM_#38.SA.071           1 LINE     72    1 PAGE UM   MTA                 OCT. 17, 1979  21:34:04
0          TEST CHANGES TO PASS 2 UNDEFINED SYMBOL PROCESSING
0          Referenced by comments of: 737/2 
00737/012E *ASMH                     TEST PGM #39    SA  G          MTA:ASMHT39                                                     
            4.2BT1   68  ASMH.TEST_PGM_#39.SA.072           1 LINE     71    3 PAGE UM   MTA                 OCT. 17, 1979  21:34:06
0          TEST RELOCATABLE AND QUALIFIED USINGS
00737/013E *ASMH                     TEST PGM #40    SA  G          MTA:ASMHT40                                                     
            4.2BT1   69  ASMH.TEST_PGM_#40.SA.073           1 LINE     64    2 PAGE UM   MTA                 OCT. 17, 1979  21:34:07
0          TEST PASS2 ERRORS
00769/001E  DISK MANAGER             MAIN            SA  G          DMGR:DM.ABSMAIN.S                                               
            4.2BT1   70  DISK_MANAGER.MAIN.SA.001           1 LINE    122    4 PAGE UM   GOODRICH            OCT. 17, 1979  21:34:08
0          THIS IS A PRELIMINARY TEST VERSION OF THE DISK MANAGER.
            
           THIS SUBCOMPONENT IS THE MAIN PROGRAM OF THE MTS DISK MANAGER FOR USE AS
           AN ABSOLUTE TASK.  THE COMMANDS FOR ASSEMBLING IT START AT LINE 1 IN THE 
           FILE AND MAY BE $SOURCED TO.  REQUIRES DMGR:DM.MACROS (769/8), COPY:CC.MACROS
           (1054/3), AND COPY:RM.MACROS (1041/1).
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00769/002E  DISK MANAGER             MTS MAIN        SA  G          DMGR:DM.MTSMAIN.S                                               
            4.2BT1   71  DISK_MANAGER.MTS_MAIN.SA.002       1 LINE    131    5 PAGE UM   GOODRICH            OCT. 17, 1979  21:34:09
0          THIS IS THE MTS VERSION OF THE MAIN PROGRAM OF THE DISK MANAGER.  IT REPLACES
           THE ABSOLUTE VERSION FOR TESTING PURPOSES.  IT CONTAINS THE COMMANDS TO
           ASSEMBLE IT AT LINE 1 AND MAY BE $SOURCED TO.  REQUIRES DMGR:DM.MACROS (769/8),
           COPY:CC.MACROS (1054/3), AND COPY:RM.MACROS (1041/1).
00769/003E  DISK MANAGER             DISPATCH        SA  G          DMGR:DM.DISPTCH.S                                               
            4.2BT1   72  DISK_MANAGER.DISPATCH.SA.003       1 LINE    146   11 PAGE UM   GOODRICH            OCT. 17, 1979  21:34:11
0          THIS IS THE DISPATCH SUBTASK OF THE DISK MANAGER, WHICH DOES THE FOLLOWING
           THINGS:
            
                  1) ADDS AND DELETES DISK DRIVES
                  2) SENDS REQUESTS TO LOCKMNGR (769/5) FOR LOCK AND UNLOCK PROCESSING
                  3) SORTS REQUESTS FROM THE SUPERVISOR AND THOSE RECEIVED BACK FROM
                     THE LOCKMNGR TO THE APPROPRIATE DISKLING (769/4) SUBTASK
                  4) REQUESTS PAGE-IN OPERATIONS OF SUPERVISOR FOR DISKLINGS 
                  5) POSTS FINISHED REQUESTS TO SUPERVISOR.
            
           THIS SUBCOMPONENT ALSO INCLUDES THE DMWAIT SUBROUTINE, WHICH REPLACES THE
           RMWAIT SUBROUTINE IN THE SUBTASKING MONITOR.  CONTAINS COMMANDS STARTING
           AT LINE 1 FOR ASSEMBLY AND MAY BE $SOURCED TO.  REQUIRES DMGR:DM.MACROS
           (769/8), COPY:CC.MACROS (1054/3), AND COPY:RM.MACROS (1041/1).
0          Referenced by comments of: 769/4, 769/6 
00769/004E  DISK MANAGER             DISK INTERFACE  SA  G          DMGR:DM.DISKXF.S                                                
            4.2BT1   73  DISK_MANAGER.DISK_INTERFA.SA.004   1 LINE    160   17 PAGE UM   GOODRICH            OCT. 17, 1979  21:34:21
0          THIS IS THE DISK INTERFACE OF THE DISK MANAGER. IT CONTAINS THE DISKLING AND
           IOMNGR 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/3)
                 3) POST FINISHES 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) 
            
           CONTAINS COMMANDS AT LINE 1 FOR ASSEMBLY AND MAY BE $SOURCED TO.  REQUIRES
           DMGR:DM.MACROS (769/8), COPY:CC.MACROS (1054/3), COPY:RM.MACROS (1041/1),
           AND COPY.FILE.MACROS (482/33).
0          Referenced by comments of: 769/3 
00769/005E  DISK MANAGER             LOCKING         SA  G          DMGR:DM.LOCK.S                                                  
            4.2BT1   74  DISK_MANAGER.LOCKING.SA.005        1 LINE    140   19 PAGE UM   GOODRICH            OCT. 17, 1979  21:34:55
0          THESE ARE THE LOCKING ROUTINES AND THE LOCKMNGR SUBTASK, WHICH LOCKS AND
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
0          UNLOCKS PAGES AND VOLUMES FOR REQUESTS.  COMMANDS FOR ASSEMBLY START AT
           LINE 1 SO THAT THE FILE MAY BE $SOURCED TO.  REQUIRES DMGR:DM.MACROS (769/8),
           COPY:CC.MACROS (1054/3), AND COPY:RM.MACROS (1041/1).
0          Referenced by comments of: 769/3 
00769/006E  DISK MANAGER             MISCELLANEOUS   SA  G          DMGR:DM.MISC.S                                                  
            4.2BT1   75  DISK_MANAGER.MISCELLANEOU.SA.006   1 LINE    140    3 PAGE UM   GOODRICH            OCT. 17, 1979  21:35:18
0          THIS SUBCOMPONENT CONSISTS OF MISCELLANEOUS SUBTASKS AND ROUTINES, INCLUDING
           THE EXITMNGR AND ITSKMNGR SUBTASKS.  THE EXITMNGR WAITS FOR TASK EXITS FROM
           THE SUPERVISOR AND CREATES OTHER STATIC TASKS, AND THE ITSKMNGR WAITS FOR
           MESSAGES ON THE INTERTASK NETWORK FOR "DISK MANAGER CONTROL" AND INFORMS THE
           DISPATCH SUBTASK (769/3) OF WHAT IS REQUESTED.  COMMANDS FOR ASSEMBLY START
           AT LINE 1 SO THAT THE FILE MAY BE SOURCED TO.  REQUIRES DMGR:DM.MACROS 
           (769/8), COPY:CC.MACROS (1054/3), AND COPY:RM.MACROS (1041/1).
00769/007E  DISK MANAGER             OBJECT          OE  G        # DMGR:DM.O                                                       
                                                                                    UM   GOODRICH                                   
0          THIS IS THE OBJECT OF 769/1 AND 769/3 THROUGH 769/6, THE ABSOLUTE VERSION
           OF THE MTS DISK MANAGER.  WHEN IT IS INSTALLED, IT WILL BE LOADED BY THE
           IPL LOADER.  INCLUDES CODE FOR THE UBC SUBTASKING MONITOR (COMP. 1058, NOT
           DISTRIBUTED BY UM).
00769/008E  DISK MANAGER             MACROS          SM  G          DMGR:DM.MACROS                                                  
            4.2BT1   76  DISK_MANAGER.MACROS.SM.008         1 LINE     72   17 PAGE UM   GOODRICH            OCT. 17, 1979  21:37:07
0          THIS IS THE MACRO LIBRARY FOR THE MTS DISK MANAGER. IT ALSO CONTAINS COPY
           SECTIONS.
0          Referenced by comments of: 769/1, 769/2, 769/3, 769/4, 769/5, 769/6 
00777/001E  STARTUP/SHUTDOWN                         SA  G          MTS:SHUTDOWN(1,999)                                             
            4.2BT1   77  STARTUP/SHUTDOWN..SA.001           1 LINE     72    3 PAGE UM   OGDEN               OCT. 17, 1979  21:44:56
0          THE STARTUP AND SHUTDOWN JOB PROGRAMS, RECENTLY MOVED TO AN ASSEMBLY OF
           THEIR OWN AND OUT OF CMDS.
           ASSEMBLE USING COPY:MISC.MACROS
00777/002E  STARTUP/SHUTDOWN                         OC  G        # RESIDENT SYSTEM (SEE COMP 468/1)                                
                                                                                    UM   OGDEN                                      
00778/001E  SIGNONM                                  SA  G          MTS:SIGNONM(1,999)                                              
            4.2BT1   78  SIGNONM..SA.001                    1 LINE     71    1 PAGE UM   OGDEN               OCT. 17, 1979  21:44:56
0          THE SIGNONM (SIGNON MESSAGE) JOB PROGRAM, RECENTLY MOVED OUT OF CMDS AND
           INTO AN ASSEMBLY OF ITS OWN.
           ASSEMBLE USING COPY:MISC.MACROS.  REQUIRES COPY:GLOBALS AND
           COPY:LLMPSEQU.
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
00778/002E  SIGNONM                                  OC  G        # RESIDENT SYSTEM (SEE COMP 468/1)                                
                                                                                    UM   OGDEN                                      
01012/001E  UNITS                    JOB PROGRAM     SA  G          MTA:UNITS.S(1,1999)                                             
            4.2BT1   79  UNITS.JOB_PROGRAM.SA.001           1 LINE     79   21 PAGE UBC  BERRYMAN  MTA       OCT. 17, 1979  21:45:22
                         MTA.:UNITS.S         
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/12).
01026/001E  GLOBAL SYSTEM PARS       GLOBALDEFS      SA  G          COPY:GLOBALDEFS                                                 
            4.2BT1   80  GLOBAL_SYSTEM_PARS.GLOBAL.SA.001   1 LINE     80    2 PAGE UM   MTA                 OCT. 17, 1979  21:45:30
                         COPY:GLOBALDEFS      
0          CONTAINS GBL DEFINITIONS FOR:
            
                  &S370       SYSTEM/370
                  &OC3066     3066 CONSOLE PRESENT
                  &CRTY       ITEL 7830 COMMAND RETRY
                  &SIMPLEX    SINGLE PROCESSOR
                  &OPERJOB    OPERATOR JOB BEING USED
                  &PROT       PROTECTION
                  &AMD470     AMDAHL 470
                  &BLKMPX     BLOCK MULTIPLEXOR CHANNEL
                  &IO370      370 I/O INSTRUCTIONS
                  &NOSLT      NO SEARCH LIST INSTRUCTION
                  &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
                  &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
            (NEW) &SYSPROJ    INITIAL SUBSTRINGS FOR THOSE PROJECTS
                              THAT BELONG TO SYSTEM PROGRAMMERS.
            (NEW) &IPLPROJ    INITIAL SUBSTRINGS FOR THOSE PROJECTS 
                              FOR WHICH THE ACCOUNTING RECORD 
                              IN USE BIT CAN BE IGNORED.
0          Referenced by comments of: 4/1, 653/1 
01026/002E  GLOBAL SYSTEM PARS       GLOBALSETS      SA  G          COPY:GLOBALSETS                                                 
            4.2BT1   81  GLOBAL_SYSTEM_PARS.GLOBAL.SA.002   1 LINE     80    1 PAGE UM   MTA                 OCT. 17, 1979  21:45:31
                         COPY:GLOBALSETS      
0          THIS FILE DEFINES VALUES FOR THE SYMBOLS IN GLOBALDEFS AS APPROPRIATE FOR THE UM AMDAHL
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
0          470 VERSION OF MTS.
0          Referenced by comments of: 4/1, 387/1, 387/2, 387/3, 387/4, 387/5, 387/7 
01054/001E  CODING CONVENTIONS       MACRO SOURCE    SA  G          S0466 MTSSD4 'MTS D4.2 INTERMEDIATE' POSN=CC_MACROS             
            4.2BT1   82  CODING_CONVENTIONS.MACRO.SA.001    1 SEQ      80  155 PAGE UBC  BERRYMAN  HELFFRICH OCT. 17, 1979  21:52:17
0          BASE SOURCE FOR THE NEW MTS CODING CONVENTION MACRO LIBRARY.  THIS SOURCE
           DOES NOT MATCH THE SOURCE SENT OUT ON RD4.2A (RD16), BUT ALL FUTURE UPDATES
           TO THE CODING CONVENTION MACROS WILL BE BASED ON THIS SOURCE. 
01054/002E  CODING CONVENTIONS       MACRO UPDATES   C   G          MTS.:CCMACROSUPD                                                
            4.2BT1   83  CODING_CONVENTIONS.MACRO.C.002     1 LINE     93    3 PAGE UBC  BERRYMAN  HELFFRICH OCT. 17, 1979  21:52:22
0          UPDATE FILE TO BE APPLIED TO 1054/1 TO YIELD CURRENT MACRO LIBRARY (1054/3).
           ALL CHANGES TO THE CODING CONVENTION MACROS SHOULD BE MADE USING CDUPDATE
           AND JEFF BERRYMAN AT UBC SHOULD BE KEPT INFORMED.
01054/003E  CODING CONVENTIONS       CC MACRO LIB    SM  G          COPY:CC.MACROS                                                  
            4.2BT1   84  CODING_CONVENTIONS.CC_MAC.SM.003   1 LINE     78   90 PAGE UBC  BERRYMAN  HELFFRICH OCT. 17, 1979  21:52:24
                         COPY:CC.MACROS       
0          CURRENT VERSION OF THE NEW MTS CODING CONVENTION MACROS.
           THIS VERSION REPLACES COPY:RMGRMACLIB (1054/4) WHEN ASSEMBLING 
           MTS AND FRIENDS AND SHOULD EVENTUALLY REPLACE COPY:RMGRMACLIB
           COMPLETELY.  NOTE: IN THIS VERSION OF CC.MACROS THE
           REGISTER CONVENTIONS FOR R12 AND R13 HAVE NOT YET BEEN REVERSED!
0          Referenced by comments of: 769/1, 769/2, 769/3, 769/4, 769/5, 769/6, 1054/2, 1054/4 
01054/004E  CODING CONVENTIONS       RMGR MACRO LIB  SM  G        # COPY:RMGRMACLIB (OBSOLETE)                                      
            RD16T1  290  CODING_CONVENTIONS.RMGR_M.SM.001   1 LINE     73  110 PAGE UBC  BERRYMAN  MTA       JULY 12, 1979  23:33:14
0          THIS IS THE OBSOLETE RESOURCE MANAGER MACRO LIBRARY.  IT HAS BEEN REPLACED
           BY COPY:RM.MACROS (1041/1) AND COPY:CC.MACROS (1054/3).
0          Referenced by comments of: 1054/3 
04000/001E  GATE                     UPDATE          UC  G          MTS:GATEUPD                                                     
            4.2BT1   85  GATE.UPDATE.UC.002                 1 LINE     90    4 PAGE UM   MTS       HELFFRICH OCT. 17, 1979  21:53:59
                         MTS.:GATEUPD         
0          UPDATE TO PRODUCE CURRENT SOURCE. FILE CONTAINS $CONTINUE WITH LINE TO ALLOW
           USE OF UPDATE WITH THE D4.2 SOURCE AS BASE.  THIS LINE SHOULD BE REMOVED
           WHEN USING D4.0 SOURCE AS BASE. UPDATE USES $CONTROL *IN* POSN=GATE.
09000/001E  CONFER                   MTS:FORUM       P              W163:FORUM                                                      
            4.2BT1   86  CONFER.MTS:FORUM.P.001             1 LINE     71   76 PAGE UM   OGDEN               OCT. 17, 1979  21:54:01
0          ITEMS FROM MTS:FORUM.  SHOULD BE COPIED TO A TN PRINTER.
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
09000/002E  CONFER                   TXTF:FORUM      P              W163:TXTFITEMS                                                  
            4.2BT1   87  CONFER.TXTF:FORUM.P.002            1 LINE     71   20 PAGE UM   OGDEN               OCT. 17, 1979  21:54:22
0          ITEMS FROM TXTF:FORUM.  SHOULD BE COPIED TO A TN PRINTER.
09999/001E  MTS RD4.2B NOTES                                      # NOTHING BUT A WAY TO GET COMMENTS INTO THE DRIVER FILE          
                                                                                    UM   OGDEN                                      
0          MTS RD4.2B   tape 1 of 1   9-track   1600 bpi   *FS tape
           VOLUME=4.2BT1   LBLTYPE=VLO   REVL=E 
            
           The UM driver file used to create this *FS tape was the last
           file saved on the tape.  To make additional copies of this
           listing use *FS to restore the driver file, file number (88);
           and use the *DEDIT command LIST ON *PRINT*.
            
           This tape includes:
             (1)  the *CDUPDATE decks for MTS and friends (MTSUPD, CMDSUPD,
                  RSFUPD, ...),
             (2)  several components with changes that are required because
                  of the MTS changes (HASP, *SMDS, GLOBALS, SIGNONM,
                  and STARTUP/SHUTDOWN),
             (3)  the *CDUPDATE decks for UMMPS and CONFIG,
             (4)  several components with changes that are required because
                  of the UMMPS and CONFIG changes (TABLES, ONLINE/OFFLINE,
                  LLMPSEQU, FAKEOS SVC 59 simulation,  Machine
                  Check Recovery, EREP, and UNITS),
             (5)  PDLIST because I got confused and thought the changes
                  George made were required by (4) when in fact they weren't,
             (6)  other components that are needed to assemble the above
                  (*ASMH, *SYSMAC, COPY:MISC.MACROS, COPY:CC.MACROS and
                  COPY:SETPARM), 
             (7)  a preview version of the incomplete disk manager,
             (8)  print files for recent items from MTS:FORUM and TXTF:FORUM.
            
           The idea (or at least the original idea) behind this redistribution
           was to send machine readable *CDUPDATE decks with MTS and UMMPS
           changes rather than paper change forms.
            
           This is the first redistribution of MTS to use the new numbering
           scheme.  Rather than RD17 the name becomes RD4.2B. RD16 would have
           been RD4.2A under the new scheme.  Because tape volume names are
           limited to a maximum of six characters and an additional two
           characters (Tn) must be appended to the name to specify the
           tape number it has become necessary to drop the prefix RD from
           the volume name (VOL=4.2BT1).  Using this scheme the volume names
           for D4.2 of MTS would have been VOL=4.2Tn.
            
           RD4.2C is tentatively planned for late 1979.  Tapes from
           other installations to be included on RD4.2C should be sent to
           Liz Sweet and arrive in Ann Arbor by 26 November 1979. 
            
           Jeff Ogden (UM) 
            
1                                                                                               SUN SEP 08/96   14:21:51   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
+         ______________ _____________________
0          --------------------------------------------------------------------
           ********************************************************************
           --------------------------------------------------------------------
            
            
