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 -------------------------------------------------------------------- ******************************************************************** --------------------------------------------------------------------