1 SUN SEP 08/96 15:24:55 Page 1 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00001/001 UMLOAD D5.0 MASTER SA G W009:UMLOAD/5.0 5.0T1 1 UMLOAD.D5.0_MASTER.SA.001 1 LINE 80 88 PAGE UM SHERRY JULY 03, 1981 11:55:32 5.0T1 1 0 The MTS relocatable loader. 0 Referenced by comments of: 1021/7, 1021/10 00001/002A UMLOAD UPDATE UC G W009:UMLOAD.U 5.1T1 1 UMLOAD.UPDATE.UC.002 1 LINE 71 2 PAGE UM SHERRY JULY 23, 1983 09:48:05 0 Update deck to produce current UMLOAD source from the D5.0 base. ***************************************************************** D5.0B version: A couple of minor bugs fixed. Also has change to IPL symbol table allocation for new version of RAMROD. ***************************************************************** ***************************************************************** D5.1 version: Change to calculation of PR CXD length for LCSPR tables. See update. ***************************************************************** 00001/003A UMLOAD OBJECT OC G # (PART OF RESIDENT SYSTEM) UM SHERRY 0 Object part of Resident System (468). 00001/004 UMLOAD LOADINFO DSECT SA G *LOADINFODSECT 5.0T1 3 UMLOAD.LOADINFO_DSECT.SA.004 1 LINE 67 1 PAGE UM SHERRY JULY 03, 1981 11:55:43 5.0T1 3 *LOADINFODSECT 0 Copy section for information returned by LOADINFO subroutine, part of (354/1). 0 Referenced by comments of: 495/1, 506/3, 545/3, 721/1, 738/1, 804/1, 1023/1 00001/005A UMLOAD INFO CLS SA O W009:CLSINFO.S 5.1T1 2 UMLOAD.INFO_CLS.SA.005 1 LINE 101 34 PAGE UM SHERRY JULY 23, 1983 09:48:05 0 A CLS-coded program available via the $INFO command at UM to allow the user to examine loader tables (including the resident IPL loader psect) and low core symbol tales (LCSYMBOL, SYSDEFS, , etc.). Assemble using COPY:MTS.MACROS (344/3) and the *OBJUTIL miscellaneous macros (721/15). Copies *CNFGINFODSECT (654) and OLD:CC.MACROS (1054/4). Requires the MSG routines (1023/1). ******************************************************************************** Changes since D5.0: 1 SUN SEP 08/96 15:24:55 Page 2 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 - Now available as the staff-only command $INFO. - Some bug fixes. - Internal changes to reduce VM requirements. ******************************************************************************** 00001/006A UMLOAD INFO CLS OE O *CLSINFO 5.1T1 3 UMLOAD.INFO_CLS.OE.006 1 LINE 14652 5 PAGE UM SHERRY JULY 23, 1983 09:48:08 *CLSINFO 00001/007A UMLOAD INFO CLS M W009:CLSINFO.X 5.1T1 4 UMLOAD.INFO_CLS.M.007 1 LINE 74 3 PAGE UM SHERRY JULY 23, 1983 09:48:08 W009:CLSINFO.X 0 Message file used by the INFO CLS. Line numbers in this file are important. 00001/008A UMLOAD INFO CLS WF W009:CLSINFO.W 5.1T1 5 UMLOAD.INFO_CLS.WF.008 1 LINE 86 4 PAGE UM SHERRY JULY 23, 1983 09:48:09 W009:CLSINFO.W 0 Writeup describing the INFO CLS program. 00001/009A UMLOAD CLSDRV SA O W009:CLSDRV.S 5.1T1 6 UMLOAD.CLSDRV.SA.009 1 LINE 109 1 PAGE UM SHERRY JULY 23, 1983 09:48:09 0 This is an interface program which permits the INFO CLS to be run as a normal program. Assemble with COPY:MTS.MACROS (344/3) and the *OBJUTIL macros (721/14). 00001/010A UMLOAD CLSDRV OC O W009:CLSDRV.O 5.1T1 7 UMLOAD.CLSDRV.OC.010 1 LINE 612 1 PAGE UM SHERRY JULY 23, 1983 09:48:09 W009:CLSDRV.O 00003/001 JOBLIST SA G S1558 5.0T1 VLO FSNAME=JOBLIST..SA.001(1) 10 5.0T1 10 JOBLIST..SA.001 1 LINE 71 5 PAGE UM HELFFRICH AUG. 05, 1981 01:57:33 5.0T1 10 0 Many assemblies which together form the list of available jobs in UMMPS. Assemble with PAR=B. 0 Referenced by comments of: 534/1 00003/002 JOBLIST OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00004/001A TABLES UM TABLES SA G WSG:TABLES 5.1T1 8 TABLES..SA.001 1 LINE 120 2 PAGE UM WSG JULY 23, 1983 09:48:09 WSG.:TABLES 0 Tables that define the hardware configuration for the UM Amdahl 5860, the installation name, the list of public disk volume names, the number of job tables, the year and time zone, the list of backup consoles used by the supervisor backup operator console support, and the list of regular operator consoles and printers used by the OPERATOR job. 1 SUN SEP 08/96 15:24:55 Page 3 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Beginning with D5.1, TABLES is generated by a comprehensive set of macros (004/3) making the definition of the I/O configuration almost trivial. This deck is distributed as an example of an I/O configuration; obviously, each installation will supply TABLES for its local configuration or use DECKGEN (004/5). Assemble using the TABLES MACROS (004/3), COPY:FILE.MACROS (482/45) and COPY:SETPARM (653) Use *ASMH with PAR=REL2 to suppress halfword relocatable Y-CON warning messages. Contains commands to assemble starting at line 0. 0 Referenced by comments of: 4/3, 482/48 00004/002A TABLES UM TABLES OC G # (PART OF RESIDENT SYSTEM) UM WSG 0 Object part of Resident System (468). 00004/003C TABLES MACROS SM G MTA:TABLES.MAC 5.1T1 9 TABLES.MACROS.SM.003 1 LINE 73 34 PAGE UM MTA JULY 23, 1983 09:48:09 MTA:TABLES.MAC 0 Macro library used for generation of TABLES assembly (004/1) from a description of the configuration. See TABLES writeup (004/4) for details of the macro usage. 0 Referenced by comments of: 4/1 00004/004A TABLES WRITEUP WF MTA:TABLES.W 5.1T3 323 TABLES.WRITEUP.WF.004 1 LINE 106 13 PAGE UM MTA AUG. 20, 1983 19:29:19 MTA:TABLES.W 0 Referenced by comments of: 4/3 00004/005A TABLES DECKGEN SA O MTS:DECKGEN(1000) 5.1T3 324 TABLES.DECKGEN.SA.005 1 LINE 72 45 PAGE UBC HELFFRICH AUG. 20, 1983 19:29:20 0 Stand-alone program to generate an assembler object deck for the system tables CSECT based on input entered from the operator's console. It will also write the generated object deck onto a tape, for subsequent use with the IPLREADER program (1021), which can replace the tables csect in a system with the one from the tape. Uses the IPLREADER routines for console i/o, which means that a 3270 may be used. Copies *CNFGINFODSECT (654). Assemble with *ASMH using COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), and *SYSMAC. ******************************************************************************** D5.0A version: Removed MAXADD from tables generated. ******************************************************************************** 0 Referenced by comments of: 4/1 1 SUN SEP 08/96 15:24:55 Page 4 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00004/006A TABLES DECKGEN OC O MTS:DECKGEN(1,999) 5.1T3 325 TABLES.DECKGEN.OC.006 1 LINE 80 9 PAGE UBC HELFFRICH AUG. 20, 1983 19:29:23 MTS.:DECKGEN 0 This object deck is also the third IPL deck in the first file of the distribution restore tape. 00004/007A TABLES *IPL.DECKGEN O O *IPL.DECKGEN 5.1T3 326 TABLES.?IPL.DECKGEN.O.007 1 SEQ 4100 54 PAGE UBC HELFFRICH AUG. 20, 1983 19:29:24 *IPL.DECKGEN 0 Object for DECKGEN suitable for loading by the IPL reader. 00004/008A TABLES DECKGEN DESCR WF MTS:DECKGEN.W 5.1T3 327 TABLES.DECKGEN_DESCR.WF.008 1 LINE 126 10 PAGE UBC HELFFRICH AUG. 20, 1983 19:29:26 MTS:DECKGEN.W 0 Writeup describing how to use the DECKGEN program to generate a tables object deck. A copy is included with the paper documentation. 00005/001 JBRP D5.0 SOURCE SA G S1561 5.0T4 VLO FSNAME=JBRP.D5.0_SOURCE.SA.001(1) 268 5.0T4 268 JBRP.D5.0_SOURCE.SA.001 1 LINE 80 7 PAGE UM MTA AUG. 09, 1981 22:30:26 5.0T10 172 0 Job request processor (task initialization). Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:SETPARM (653). 00005/002 JBRP OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00006/001 FNDJTL SA G S1558 5.0T1 VLO FSNAME=FNDJTL..SA.001(1) 17 5.0T1 17 FNDJTL..SA.001 1 LINE 80 2 PAGE UM MTA JULY 27, 1977 21:23:58 5.0T1 17 0 FIND JOB TABLE. 00006/002 FNDJTL OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00007/001 FBJTJL D5.0 SOURCE SA G S1561 5.0T4 VLO FSNAME=FBJTJL.D5.0_SOURCE.SA.001(1) 270 5.0T4 270 FBJTJL.D5.0_SOURCE.SA.001 1 LINE 80 4 PAGE UM MTA AUG. 09, 1981 22:31:05 5.0T10 174 0 Free buffers and job table, called by EXIT (010). Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:SETPARM (653). 1 SUN SEP 08/96 15:24:55 Page 5 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00007/002 FBJTJL OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00008/001 FIDCQ SA G S1558 5.0T1 VLO FSNAME=FIDCQ..SA.001(1) 18 5.0T1 18 FIDCQ..SA.001 1 LINE 72 1 PAGE UM MTA JULY 03, 1981 11:58:50 5.0T1 18 0 Free I/O devices and CPU queue. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:SETPARM (653) and COPY:MISC.MACROS (728/1). 00008/002A FIDCQ OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). ********************************************************************** D5.1 version: Reassembled since LLMPSEQU changed. ********************************************************************** 00009/001A BUFALLOC SA G MTS.:BUFALLOC.S 19 5.1T1 10 BUFALLOC..SA.001 1 LINE 128 4 PAGE UM MTS OGDEN JULY 23, 1983 09:49:04 0 Subroutine to allocate and release 128-byte, shared memory, terminal, I/O buffers. This routine is called by several terminal device support routines (TSFO, PDP8RTN, MNETRTN, etc). It allocates buffers from a pool of buffers which are in paged, shared VM which BUFALLOC allocates dynamically. The purpose of these buffers is to have the terminal routines doing I/O into shared pages, thus reducing the number of different VM pages locked in real memory during terminal I/O. Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), and *CNFGINFODSECT (654). The BUFSTAT program (009/3) prints which job is using which buffer(s). ***************************************************************************** D5.0C version: BUFALLOC has been changed to fetch protect the pages it allocated in shared VM and as a result some BUFALLOC callers will need to be changed to do an SVC PROTOFF/SVC PROTON sequence around references to terminal buffers. ***************************************************************************** 00009/002A BUFALLOC OC G # (PART OF RESIDENT SYSTEM) UM MTS OGDEN 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 6 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00009/003A BUFALLOC BUFSTAT SA G MTS:BUFSTAT(1000) 5.1T1 11 BUFALLOC.BUFSTAT.SA.003 1 LINE 72 3 PAGE UM MTS OGDEN JULY 23, 1983 09:49:05 MTS.:BUFSTAT 0 Program to print which jobs are using which low-core terminal buffers, how many are not being used, and approximately how many more are required when they are all in use. Run with PROT=off. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). 0 Referenced by comments of: 9/1, 618/1 00009/004A BUFALLOC BUFSTAT OC G MTS:BUFSTAT(1,999) 5.1T1 12 BUFALLOC.BUFSTAT.OC.004 1 LINE 80 2 PAGE UM MTS OGDEN JULY 23, 1983 09:49:05 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00010/001 EXIT SA G S1558 5.0T1 VLO FSNAME=EXIT..SA.001(1) 22 5.0T1 22 EXIT..SA.001 1 LINE 72 3 PAGE UM MTA JULY 03, 1981 12:03:12 5.0T1 22 0 Kills calling task. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:SETPARM (653) and COPY:DM.MACROS (769/29). 0 Referenced by comments of: 7/1 00010/002C EXIT UC G MTA:EXIT.U(1) 5.1T1 13 EXIT..UC.002 1 LINE 68 1 PAGE UM MTA JULY 23, 1983 09:49:05 0 Post D5.0 updates to EXIT. Makes the SVC DISKIO conditional. 00010/003A EXIT OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00011/001 CARDUC SA G S1558 5.0T1 VLO FSNAME=CARDUC..SA.001(1) 23 5.0T1 23 CARDUC..SA.001 1 LINE 80 9 PAGE UM MTA JULY 30, 1973 03:30.59 5.0T1 23 0 2501 and 2540 reader Unit Check Routines. 00011/002 CARDUC OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00012/001 TAPEUC # (OBSOLETE) D4T1 23 TAPEUC..SA.001 1 LINE 80 18 PAGE SFU JULY 27, 1977 21:25:13 D4T1 23 0 Magnetic tape unit check routines, obsoleted by (787/19). 1 SUN SEP 08/96 15:24:55 Page 7 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00013/001 PTRUC 5.0 SOURCE SA G S1561 5.0T4 VLO FSNAME=PTRUC.5.0_SOURCE.SA.001(1) 272 5.0T4 272 PTRUC.5.0_SOURCE.SA.001 1 LINE 80 14 PAGE UM MTA AUG. 09, 1981 22:31:11 5.0T10 176 0 1403, 1443, 3211, and 3203 printer Unit Check Routines. 00013/002A PTRUC UPDATE UC G MTA:PTRUC.U 5.1T1 14 PTRUC.UPDATE.UC.002 1 LINE 64 1 PAGE UM MTA JULY 23, 1983 09:49:06 0 Update to bring the D5.0 PTRUC to current version. ****************************************************************** D5.0B version: Fixes bug that loops on certain 3211 errors. ****************************************************************** 00013/003A PTRUC OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00014/001A PUNUC SA G W226:PUNUC 5.1T1 15 PUNUC..SA.001 1 LINE 71 4 PAGE UM DWB JULY 23, 1983 09:49:06 0 2540, 2520, and 1442 punch Unit Check Routines. ********************************************************************** D5.1 version: Changed to add support for a 2520 punch. ********************************************************************** 00014/002 PUNUC OC G # (PART OF RESIDENT SYSTEM) UM DWB 0 Object part of Resident System (468). 00016/001A CCTB SA G PAGE:CCTB.S 5.1T1 16 CCTB..SA.001 1 LINE 80 3 PAGE UM MTS SHERRY JULY 23, 1983 09:49:08 0 Used by MTS to translate logical carriage control to printer commands. recently changed to define "8" as bottom of logical page. See the DSR update (637/2) for details. *********************************************************************** D5.0B version: Changed to add ":" carriage control. *********************************************************************** 1 SUN SEP 08/96 15:24:55 Page 8 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00016/002A CCTB OC G # (PART OF RESIDENT SYSTEM) UM MTS SHERRY 0 Object part of Resident System (468). 00017/001 PN XLATE TABLE SA # (OBSOLETE) D3T1 17 PN_XLATE_TABLE..SA.1 1 SEQ 80 1 PAGE UM JULY 30, 1973 23:01.33 00018/001 STOP/BLAST/GOOSE JOBS SA G S1558 5.0T1 VLO FSNAME=STOP/BLAST/GOOSE_JOBS..SA.001(1) 26 5.0T1 26 STOP/BLAST/GOOSE_JOBS..SA.001 1 SEQ 80 1 PAGE UM MTA JULY 30, 1973 23:01.54 5.0T1 26 0 The STOP, BLAST, and GOOSE UMMPS job programs. Unchanged since DIST 1.0. 00018/002 STOP/BLAST/GOOSE JOBS OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00019/001A TASKS JOB SA G S0792 WSGFS FSNAME=TASKS.SA 5.1T1 17 TASKS_JOB..SA.001 1 LINE 80 10 PAGE UM WSG FEB. 09, 1983 12:05:02 0 The job program version of *TASKS (145); contains the TSKFMT routine called by *TASKS (145/1) and SSRTN (413/1) and the TSKFMT2 routine called by the MTS Message System SCANJBTB routine (798/75). Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). 0 Referenced by comments of: 145/1, 413/1, 647/1 00019/002A TASKS JOB OC G # (PART OF RESIDENT SYSTEM) UM WSG 0 Object part of Resident System (468). 00020/001 JOBDUMP SA G S1558 5.0T1 VLO FSNAME=JOBDUMP..SA.001(1) 28 5.0T1 28 JOBDUMP..SA.001 1 SEQ 80 1 PAGE UM MTA JULY 30, 1973 23:03.31 5.0T1 28 0 UMMPS "JOBDUMP" job. Uses SVC SJOBDUMP to dump the specified job. Unchanged since DIST 1.0. 00020/002 JOBDUMP OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00021/001A BROADCST SA G MTS:BROADCST(1000) 5.1T1 18 BROADCST..SA.001 1 LINE 72 8 PAGE UM MTS OGDEN JULY 23, 1983 09:51:12 MTS.:BROADCST 0 Job program used by system operator to send messages to a specific user or to all users. Has a SETA symbol (&DC) which controls conditional assembly of code which sends broadcast messages to the UM DATA CONCENTRATORS. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using 1 SUN SEP 08/96 15:24:55 Page 9 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 COPY:MISC.MACROS (728). 00021/002A BROADCST OC G # (PART OF RESIDENT SYSTEM) UM MTS OGDEN 0 Object part of Resident System (468). 00021/003A BROADCST PGM OC G MTS:BROADCST(1,499) 5.1T1 19 BROADCST.PGM.OC.003 1 LINE 25 1 PAGE UM MTS OGDEN JULY 23, 1983 09:51:13 0 A program that can be $RUN to do what the BROADCST JOB program does. 00023/001 TPMOVE JOBS SA O TAPE:TPMOVE(1000) 5.0T1 31 TPMOVE_JOBS..SA.001 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 12:04:35 5.0T1 31 0 Jobs to move a tape (rew, wtm, bsf, bsr, fsf, fsr, erg). the wtm job doesn't use a modeset, so the density will be unpredictable on dual-density tape drives. Requires the tape Unit Check Routines (787/19). Assemble using COPY:UC.MACROS (787/1). 0 Referenced by comments of: 787/20 00023/002 TPMOVE JOBS OC O # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00024/001 ONLINE/OFFLINE SA G MTS:ON/OFFLINE(1,999) 5.0T1 32 ONLINE/OFFLINE..SA.001 1 LINE 80 8 PAGE UM MTA JULY 03, 1981 12:04:36 5.0T1 32 MTS.:ON/OFFLINE 0 Job to online or offline a device, control unit, channel, or channel-control unit path. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). 1. To online/offline one or more devices: ONLINE|OFFLINE devname1 devname2 ... 2. To online/offline a control unit: ONLINE|OFFLINE CU|ALL devname1|cu#1 devname2|cu#2 ... where the devnames must be names of devices that are attached to only one control unit, and the cu#s are control unit numbers as assigned in TABLES. 3. To online/offline a connection between a channel and a control unit: ONLINE|OFFLINE CHAN|CH|CHANNEL chanad devname1|cu#1 devname2|cu#2 ... where chanad is either a channel number in hex (e.g. 0, 1, 2, etc.) or a channel address in hex (e.g. 080, 1d0, etc.). The devnames must be devices attached to the specified channel in only one way. 4. To online/offline a channel: ONLINE|OFFLINE CHAN|CH|CHANNEL chanad where chanad is the same as in 3. above. Only one chanad may be given. 1 SUN SEP 08/96 15:24:55 Page 10 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00024/002 ONLINE/OFFLINE OC O # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00025/001 QN/PN/TN JOBS SA G MTS.:PNQNTN(1,900) 5.0T1 33 QN/PN/TN_JOBS..SA.001 1 LINE 67 3 PAGE UM MTA AUG. 05, 1981 01:57:53 5.0T1 33 0 Three assemblies that load the 1403 UCS buffer for QN, Pn, or Tn character sets. The Qn job contains a subroutine used by all the rest of them. For example, entering "PN PTR1 ECHO" on the operator's console will load the UCS buffer for PTR1 with the PN character set and echo the characters to the printer for verification. Unchanged since Distribution 2.0. 00025/002 QN/PN/TN JOBS OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00026/001 CPCC JOB SA # (OBSOLETE) D3T1 25 CPCC_JOB..SA.1 1 SEQ 80 7 PAGE UM JULY 30, 1973 23:04.05 00031/001 GTZ # (OBSOLETE) D2.1 036 UM 00038/001 TSFO SA G TSF W032:TSFOSOU5.0 5.0T1 34 TSFO..SA.001 1 LINE 80 244 PAGE UM COWAN EMERY JULY 03, 1981 12:04:39 5.0T1 34 0 Source for TSFO (Twenty-Seven-Forty-One), the MTS device support routines for the IBM 2703 (device types TTY and 2741) or the Memorex 1270 with auto-speed (device type MRXA). Assemble using COPY:MTS.MACROS (344/3). 00038/002 TSFO *2741RTN OC G *2741RTN 5.0T1 35 TSFO.*2741RTN.OC.002 1 LINE 80 17 PAGE UM COWAN EMERY JULY 03, 1981 12:04:55 5.0T1 35 *2741RTN 0 This is the TSFO object file which is normally loaded into shared VM by PISTLE at IPL. The "COM" card at the beginning tells PISTLE to define the following symbols in LCSYMBOL: TSFO entry point for device type 2741 TEL2 entry point for device type TTY MTXA entry point for device type MRXA 00038/003 TSFO *TTYRTN OC G *TTYRTN 5.0T1 36 TSFO.*TTYRTN.OC.003 1 LINE 30 1 PAGE UM COWAN EMERY JULY 03, 1981 12:04:57 5.0T1 36 *TTYRTN 0 This file consists of: $CONTINUE WITH *2741RTN RETURN LDT TEL2 It serves the same function as *2741RTN if the symbol TEL2 is undefined in LCSYMBOL. Normally TEL2 is defined by PISTLE at IPL. 1 SUN SEP 08/96 15:24:55 Page 11 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00038/004 TSFO *MRXARTN OC G *MRXARTN 5.0T1 37 TSFO.*MRXARTN.OC.004 1 LINE 30 1 PAGE UM COWAN EMERY JULY 03, 1981 12:04:58 5.0T1 37 *MRXARTN 0 This file consists of: $CONTINUE WITH *2741RTN RETURN LDT MRXA It serves the same function as *2741RTN if the symbol MRXA is undefined in LCSYMBOL. Normally MRXA is defined by PISTLE at IPL. 00038/005 TSFO TRTBLGEN SA S1558 5.0T1 VLO FSNAME=TSFO.TRTBLGEN.SA.005(1) 38 5.0T1 38 TSFO.TRTBLGEN.SA.005 1 LINE 80 11 PAGE UM COWAN EMERY JULY 27, 1977 21:28:26 5.0T1 38 0 Program to generate translate tables for use with TSFO. It was used to generate all non-ASCII tables included in the deck distributed, and can very easily be used to generate any arbitrary translate tables. Logical I/O units used are: 1 Definition of names of characters (038/9). 2 Definition of character set on the golfball, (038/10) and (038/11) are examples. 3 Definition of the code set being used, either (038/7) or (038/8). SPRINT printed output and error comments. SPUNCH new translate tables. The program does extensive error checking and if any output occurs on SPUNCH it is probably OK. 0 Referenced by comments of: 38/7, 38/8, 38/9, 38/10, 38/11 00038/006 TSFO TRTBLGEN OC S1558 5.0T1 VLO FSNAME=TSFO.TRTBLGEN.OC.006(1) 39 5.0T1 39 TSFO.TRTBLGEN.OC.006 1 LINE 80 3 PAGE UM COWAN EMERY JULY 27, 1977 21:28:28 5.0T1 39 00038/007 TSFO KBD2741PTTC D S1558 5.0T1 VLO FSNAME=TSFO.KBD2741PTTC.D.007(1) 40 5.0T1 40 TSFO.KBD2741PTTC.D.007 1 LINE 41 1 PAGE UM COWAN EMERY JULY 27, 1977 21:28:30 5.0T1 40 0 See (038/5). This is the 2741 PTTC keyboard definition. 0 Referenced by comments of: 38/5 00038/008 TSFO KBD2741CORR D S1558 5.0T1 VLO FSNAME=TSFO.KBD2741CORR.D.008(1) 41 5.0T1 41 TSFO.KBD2741CORR.D.008 1 LINE 41 1 PAGE UM COWAN EMERY JULY 27, 1977 21:28:33 5.0T1 41 0 See (038/5). This is the 2741 correspondence keyboard definition. 0 Referenced by comments of: 38/5 1 SUN SEP 08/96 15:24:55 Page 12 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00038/009 TSFO EBCDDEFN D S1558 5.0T1 VLO FSNAME=TSFO.EBCDDEFN.D.009(1) 42 5.0T1 42 TSFO.EBCDDEFN.D.009 1 LINE 32 3 PAGE UM COWAN EMERY JULY 27, 1977 21:28:35 5.0T1 42 0 See (038/5). This is the definition of the names used for characters in the input. 0 Referenced by comments of: 38/5 00038/010 TSFO GOLFPTTC D S1558 5.0T1 VLO FSNAME=TSFO.GOLFPTTC.D.010(1) 43 5.0T1 43 TSFO.GOLFPTTC.D.010 1 LINE 72 3 PAGE UM COWAN EMERY JULY 27, 1977 21:28:37 5.0T1 43 0 See (038/5). This file contains definitions of PTTC golf balls. The definitions start at line nnn, where nnn is the last 3 digits of the golf ball number. Contains "$CONTINUE WITH W032:GOLFPTTC" lines. 0 Referenced by comments of: 38/5 00038/011 TSFO GOLFCORR D S1558 5.0T1 VLO FSNAME=TSFO.GOLFCORR.D.011(1) 44 5.0T1 44 TSFO.GOLFCORR.D.011 1 LINE 72 8 PAGE UM COWAN EMERY JULY 27, 1977 21:28:39 5.0T1 44 0 See (038/5). This file contains definitions of correspondence golf balls. The definitions start at line nnn, where nnn is the last 3 digits of the golf ball number. Contains "$CONTINUE WITH W032:GOLFCORR" lines. 0 Referenced by comments of: 38/5 00039/001 CASECONV # (PART OF TRTABLES -- COMP. 779) 5.0T1 45 CASECONV..SA.001 1 LINE 80 1 PAGE UM APR. 05, 1980 13:40:36 5.0T1 45 0 Translate table to convert lower case to upper case. All other characters are unchanged. 00040/001 KEYWRD SCANNER SA G W164:KWIC(MIN,-1) 5.0T1 46 KEYWRD_SCANNER..SA.001 1 LINE 73 58 PAGE UM STERKEN JULY 03, 1981 12:05:25 5.0T1 46 0 D5.0 base source for Keyword Scanner. Copies COPY:GLOBALS (1026/3). 0 Referenced by comments of: 40/5, 798/33, 798/67, 798/81 00040/002A KEYWRD SCANNER UPDATE UC G W164:KWIC(10000,*L) 5.1T1 20 KEYWRD_SCANNER.UPDATE.UC.002 1 LINE 82 4 PAGE UM STERKEN JULY 23, 1983 09:51:13 00040/003A KEYWRD SCANNER OBJECT OC G # (PART OF RESIDENT SYSTEM) UM STERKEN 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 13 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00040/004 KEYWRD SCANNER CHANGES WF W164:FMT.KWSCAN 5.0T1 48 KEYWRD_SCANNER.CHANGES.WF.004 1 LINE 81 4 PAGE UM STERKEN JULY 03, 1981 12:05:40 5.0T1 48 00040/005 KEYWRD SCANNER SPELLING CORR SA G W164:KWIC.SPELL(1000) 5.0T1 49 KEYWRD_SCANNER.SPELLING_C.SA.005 1 LINE 70 3 PAGE UM STERKEN JULY 03, 1981 12:05:41 5.0T1 49 0 Spelling correction subroutine used by MTS and the Keyword Scanner (40/1). Also user-callable. 00040/006 KEYWRD SCANNER SPELLING CORR OC G # (PART OF RESIDENT SYSTEM) UM STERKEN 0 Object part of Resident System (468). 00041/001 GETSPACE/FREESPAC SA # (OBSOLETE) D4T1 51 GETSPACE/FREESPAC.D4_MAST.SA.001 1 SEQ 80 28 PAGE UM JULY 27, 1977 21:31:43 0 Obsoleted by (732). 00042/001 MTS D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=MTS 5.0T4 274 MTS.D5.0_MASTER.SA.001 1 LINE 80 175 PAGE UM MTS BURLING AUG. 21, 1981 06:03:51 5.0T10 178 0 Master source for MTS. Copies COPY:LLMPSEQU(100) (087), COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), COPY:JOBSTA (413/9), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM (653), COPY:DM.MACROS (769/29), and *SYSMAC. 0 Referenced by comments of: 42/2, 344/1 00042/002A MTS UPDATE UC G MTSS:MTS/UPD 5.1T1 21 MTS.UPDATE.UC.002 1 LINE 119 102 PAGE UM MTS BURLING JULY 23, 1983 09:51:16 0 *CDUPDATE input to produce current source. The following is a complete list of the MTS pieces. These are the pieces which require the DSECT, i.e. use the THEDSECT macro, and its dependencies to assemble. The object for all these pieces is in RAMROD. MTS (042) FSUB (635) CMDS (636) USUB (638) DSRS (637) DSRI (639) INFO (198) PLIM (464) LLXU (354) TIMT (539) RSF (578) GATE (4000) 1 SUN SEP 08/96 15:24:55 Page 14 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 RNBR (651/13) CMDSTAT (531) DYS (513) TBLS (829) In addition, PRINTDUMP SSCN (400/5) is reassembled whenever MTS is reassembled. The object should be placed in PRINTDUMP. 0 Referenced by comments of: 344/1 00042/003A MTS OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00042/004A MTS L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=MTS.LIST 5.1T1 22 MTS..L.004 1 LINE 133 587 PAGE UM MTS BURLING JULY 23, 1983 09:52:55 00042/005 MTS FILETYPE WORDS WF S1561 5.0T4 VLO FSNAME=MTS.FILETYPE_WORDS.WF.006(1) 278 5.0T4 278 MTS.FILETYPE_WORDS.WF.006 1 LINE 134 3 PAGE UM MTA BURLING MAY 28, 1975 22:49:52 5.0T10 182 0 Writeup describing how to add a new type of file to MTS. 00042/006 MTS TSATBL WORDS WF S1561 5.0T4 VLO FSNAME=MTS.TSATBL_WORDS.WF.007(1) 279 5.0T4 279 MTS.TSATBL_WORDS.WF.007 1 LINE 113 2 PAGE UM MTA BURLING AUG. 21, 1981 06:06:29 5.0T10 183 0 Writeup describing how to use the TSATBL macro (in COPY:MTS.MACROS). 00042/007C MTS CHANGES WX MTSS:MTSCHANGESWX 5.1T1 23 MTS.CHANGES.WX.007 1 LINE 117 14 PAGE UM MTS BURLING JULY 23, 1983 09:53:01 0 TEXTFORM source for list of MTS changes since last distribution or redistribution. 00042/008A MTS CHANGES P MTSS:MTSCHANGES 5.1T1 24 MTS.CHANGES.P.008 1 LINE 71 15 PAGE UM MTS BURLING JULY 23, 1983 09:53:02 0 List of changes to MTS since the last distribution or redistribution. 00042/009A MTS COMMENTS D G MTSS:MTS/COM 5.1T1 25 MTS.COMMENTS.D.009 1 LINE 68 3 PAGE UM MTS BURLING JULY 23, 1983 09:53:02 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00043/001 LCSYMBOL SA # (PART OF GATE) UM 0 Part of GATE (4000). 0 Referenced by comments of: 4000/1 1 SUN SEP 08/96 15:24:55 Page 15 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00044/001A PDP BASE SOURCE SA G ALWB:PDP.5.0A 5.1T1 26 PDP.BASE_SOURCE.SA.001 1 LINE 72 48 PAGE UM J BODWIN JULY 23, 1983 09:53:03 0 The paging drum processor. Assembly parameters allow version to be assembled for either 2305 fixed head file and 3330 migration disk, or 2301 drum and 3330 migration disk and/or 3805 fixed block paging device. Distributed object is for 2305/3330/3805 combination normally used on UM system. Copies COPY:PCBDSECT (470), COPY:LLMPSEQU (087), and COPY:GLOBALS (1026/3). ******************************************************************** This is the base source (as of D5.0A -- January 1982). ******************************************************************** 0 Referenced by comments of: 44/2, 44/3, 540/3, 769/1 00044/002A PDP UPDATE UC G ALWB:PDP.U 5.1T1 27 PDP.UPDATE.UC.002 1 LINE 100 14 PAGE UM J BODWIN JULY 23, 1983 09:53:05 0 This is the update which, when applied to (044/1) yields (044/3). 0 Referenced by comments of: 44/3 00044/003A PDP CURRENT SOU SA G ALWB:PDP.S 5.1T1 28 PDP.CURRENT_SOU.SA.003 1 LINE 80 55 PAGE UM J BODWIN JULY 23, 1983 09:53:05 0 This is the current source for the PDP. It is (044/1) with the (044/2) update applied. 0 Referenced by comments of: 44/2 00044/004A PDP 2305/3330 OBJ OC G # (PART OF RESIDENT SYSTEM) UM J BODWIN 0 Version assembled for use with 2 FBA devices (UM has one 3805 and one 3825) and IBM 3330 (or equivalent) paging disk. Object part of Resident System (468). 00045/001 SUPERVISOR D5.0 MASTER SA G S1561 5.0T4 VLO FSNAME=SUPERVISOR.D5.0_MASTER.SA.001(1) 281 5.0T4 281 SUPERVISOR.D5.0_MASTER.SA.001 1 LINE 80 356 PAGE UM MTA SEP. 04, 1981 02:51:26 5.0T10 185 0 Master source for D5.0 supervisor. Copies COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), COYP:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT (470), and COPY:CMDAREADSECT (531/20). Assemble with COPY:SETPARM (653), COPY:MISC.MACROS (728), COPY:UMMPS.MACROS (045/14), and COPY:DM.MACROS (769/29). 0 Referenced by comments of: 45/2, 540/3, 611/1, 769/1, 769/4, 769/16, 799/1, 806/1, 1070/1, 1070/2, 1081/1 1 SUN SEP 08/96 15:24:55 Page 16 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00045/002A SUPERVISOR UPDATE UC G MTA:UMMPS.U 5.1T1 29 SUPERVISOR.UPDATE.UC.002 1 LINE 79 21 PAGE UM MTA JULY 23, 1983 09:53:07 0 Update to D5.0 UMMPS to produce current UMMPS (45/1). ******************************************************************************** D5.0C version: Bugs fixed, IPTE support, common segment support, DMGR changes, etc. ******************************************************************************** 00045/003A SUPERVISOR OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00045/004A SUPERVISOR L S0707 UMMPSL POSN=UMMPS.LISTING.370 5.1T1 30 SUPERVISOR..L.004 1 LINE 133 861 PAGE UM MTA JULY 23, 1983 09:54:58 00045/005 SUPERVISOR SVC WRITEUP WT W163:SVC.WT 5.0T4 284 SUPERVISOR.SVC_WRITEUP.WT.005 1 LINE 122 41 PAGE UM OGDEN AUG. 05, 1981 01:30:38 5.0T10 188 0 TEXT/360 input for a writeup describing all UMMPS supervisor call (SVC) instructions. 00045/006 SUPERVISOR SVC WRITEUP PT MTS:SVC.W 5.0T4 285 SUPERVISOR.SVC_WRITEUP.PT.006 1 LINE 83 80 PAGE UM OGDEN AUG. 21, 1981 06:39:45 5.0T10 189 MTS.:SVC.W 0 Copy this to a TN printer @CC (not @MCC). 00045/007 SUPERVISOR TEST SVC STIO SA G MTA:TESTSTIO(1,999) 5.0T1 51 SUPERVISOR.TEST_SVC_STIO.SA.007 1 LINE 67 3 PAGE UM MTA JULY 03, 1981 12:08:19 5.0T1 51 0 Test program for SVC STIO to be used in the Virtual Machine. 00045/008 SUPERVISOR TEST SVC STIO OC G MTA:TESTSTIO(1000) 5.0T1 52 SUPERVISOR.TEST_SVC_STIO.OC.008 1 LINE 80 2 PAGE UM MTA JULY 03, 1981 12:08:20 5.0T1 52 00045/009 SUPERVISOR TEST PROT SVC SA O S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_PROT_SVC.SA.009(1) 53 5.0T1 53 SUPERVISOR.TEST_PROT_SVC.SA.009 1 LINE 80 5 PAGE UM MTA JULY 27, 1977 21:46:22 5.0T1 53 0 Program to test the SVCs related to protection. Intended to be used while running MTS in the Virtual Machine. Halts if an error occurs. 00045/010 SUPERVISOR TEST PROT SVC OC O S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_PROT_SVC.OC.010(1) 54 5.0T1 54 SUPERVISOR.TEST_PROT_SVC.OC.010 1 LINE 80 1 PAGE UM MTA JULY 27, 1977 21:46:25 5.0T1 54 1 SUN SEP 08/96 15:24:55 Page 17 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00045/011 SUPERVISOR TEST SETSTK SA G S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_SETSTK.SA.011(1) 55 5.0T1 55 SUPERVISOR.TEST_SETSTK.SA.011 1 LINE 59 1 PAGE UM MTA MAY 13, 1978 17:01:22 5.0T1 55 0 Program to test the changes to the SETSTK SVC. 00045/012 SUPERVISOR TEST SETSTK OC G S1558 5.0T1 VLO FSNAME=SUPERVISOR.TEST_SETSTK.OC.012(1) 56 5.0T1 56 SUPERVISOR.TEST_SETSTK.OC.012 1 LINE 80 1 PAGE UM MTA MAY 13, 1978 17:01:23 5.0T1 56 00045/013 SUPERVISOR DOCUMENTATION WF S1558 5.0T1 VLO FSNAME=SUPERVISOR.DOCUMENTATION.WF.013(1) 57 5.0T1 57 SUPERVISOR.DOCUMENTATION.WF.013 1 LINE 94 6 PAGE UM MTA MAR. 26, 1979 02:15:12 5.0T1 57 0 Summary of sections of UMMPS and what they do. Prepared for a lecture to a graduate programming class. ************************************************************************************ D5.0 version: This is out-of-date. ************************************************************************************ 00045/014A SUPERVISOR MACROS SM G COPY:UMMPS.MACROS 5.1T1 31 SUPERVISOR.MACROS.SM.014 1 LINE 73 8 PAGE UM MTA JULY 23, 1983 09:55:15 COPY:UMMPS.MACROS 0 Referenced by comments of: 45/1, 46/1, 400/1, 1070/3, 1081/1 00045/015A SUPERVISOR SCHEDULING DES WX S1568 OGDEN2 FSNAME=CPUSCHED 5.1T1 32 SUPERVISOR.SCHEDULING_DES.WX.015 1 LINE 89 6 PAGE UM OGDEN DEC. 07, 1981 03:43:20 0 Description of CPU Scheduling, the Big Job Mechanism, and the BJPMOD subroutine (650). 00045/016C SUPERVISOR PLUS LIBRARY SQ O S1405 W8UMC FSNAME=SUPERVISOR.PLUS_LIBRARY.SQ.015 5.1T1 33 SUPERVISOR.PLUS_LIBRARY.SQ.016 1 LINE 68 27 PAGE UBC BALLARD JULY 26, 1982 19:59:43 0 This is a PLUS library including UMMPS-related definitions (system control blocks, services, SVC numbers etc.) It now includes most of the supervisor data structures that are used by code outside UMMPS. Intertask-related definitions which were formerly in a separate library are now included here. *********************************************************************** D5.0B version: This has now been updated to correspond to MTS distribution RD5.0A. (There are a few new data structures introduced in D5.0 that have not yet been added to the library; however, the definitions that ARE in the library have been revised for RD5.0A) *********************************************************************** 1 SUN SEP 08/96 15:24:55 Page 18 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1077/1 00045/017A SUPERVISOR PLUS LIBRARY SQ O COPY:SUPER*SQL 5.1T1 34 SUPERVISOR.PLUS_LIBRARY.SQ.017 1 LINE 68 27 PAGE UBC BALLARD BURLING JULY 23, 1983 10:06:51 0 This is a PLUS library including UMMPS-related definitions (system control blocks, services, SVC numbers etc.) It now includes most of the supervisor data structures that are used by code outside UMMPS. Intertask-related definitions which were formerly in a separate library are now included here. ******************************************************************** D5.1 version: This is the current UM library. ******************************************************************** 0 Referenced by comments of: 509/14 00045/018C SUPERVISOR PLUS LIBRARY SQ O COPY:SUPER#SQL 5.1T1 35 SUPERVISOR.PLUS_LIBRARY.SQ.018 1 LINE 68 27 PAGE UBC BALLARD BURLING JULY 23, 1983 10:06:53 0 ******************************************************************** D5.1 version: This is the base source as distributed with the first Resource Manager distribution. ******************************************************************** 0 Referenced by comments of: 45/19 00045/019C SUPERVISOR PLUS LIBRARY UC O COPY:SUPER*UQL 5.1T1 36 SUPERVISOR.PLUS_LIBRARY.UC.019 1 LINE 95 1 PAGE UBC BALLARD BURLING JULY 23, 1983 10:06:54 0 Updates used to produce the current UM library from (045/18). 00046/001 CONFIG D5.0 MASTER SA G S0699 D3TAPE POSN=CONFIG.D5 5.0T4 288 CONFIG.D5.0_MASTER.SA.001 1 LINE 80 35 PAGE UM MTA AUG. 09, 1981 22:48:50 5.0T10 192 0 D5.0 master source for configuration program. Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT (470), COPY:CMDAREADSECT (531/20), and *CNFGINFODSECT (654). Assemble using COPY:MISC.MACROS (728), COPY:SETPARM (653), and the Supervisor macros (45/14). 0 Referenced by comments of: 1070/1, 1070/2 00046/002A CONFIG UPDATE UC G MTA:CONFIG.U 5.1T1 37 CONFIG.UPDATE.UC.002 1 LINE 72 4 PAGE UM MTA JULY 23, 1983 10:06:54 0 Update to D5.0 CONFIG to produce current CONFIG. 1 SUN SEP 08/96 15:24:55 Page 19 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ******************************************************************************** D5.0C version: Disk cache changes, IPTE support, common segment support. ******************************************************************************** 00046/003A CONFIG OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00046/004A CONFIG L S0707 UMMPSL POSN=CNFG.LISTING.370 5.1T1 38 CONFIG..L.004 1 LINE 133 191 PAGE UM MTA JULY 23, 1983 10:07:02 00047/001 *CATALOG SA G # (OBSOLETE) D3T1 56 CATALOG..SA.1 1 LINE 80 8 PAGE UM JULY 30, 1973 23:26.21 0 Obsoleted by FILESTATUS (529). 00049/001 SDUMP SUBR SA S1558 5.0T1 VLO FSNAME=SDUMP_SUBR..SA.001(1) 58 5.0T1 58 SDUMP_SUBR..SA.001 1 LINE 80 18 PAGE UM MTS BURLING MAR. 26, 1979 02:16:17 5.0T1 58 0 MTS subroutine to dump storage areas. Also used by $DISPLAY command. Copies *CNFGINFODSECT (654). Assemble using *SYSMAC. 0 Referenced by comments of: 463/1 00049/002 SDUMP SUBR OC # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00050/001 STATISTICS SAVE *STA C *STA 5.0T1 59 STATISTICS_SAVE.?STA.C.001 1 LINE 36 1 PAGE UM SALISBURY AUG. 05, 1981 01:58:16 5.0T1 59 *STA 0 Command file used by the system operator to run the statistics save program. Invoked by entering "MTS *STA" on the operator's console. The save program dumps the MTS job statistics file (*STATISTICS) to tape. MTS warns the operator when *STATISTICS has reached 7500 records by printing "*** *STATISTICS IS FULL ***" on the console. When this happens, the operator should immediately enter "MTS *STA" to begin the save program before the file is really full (jobs will begin to "snark" if this happens). 0 Referenced by comments of: 256/2 00050/002 STATISTICS SAVE *STI C *STI 5.0T1 60 STATISTICS_SAVE.?STI.C.002 1 LINE 59 1 PAGE UM SALISBURY AUG. 05, 1981 01:58:17 5.0T1 60 *STI 0 Command file which is run automatically at system initialization by INIT:INITCMD (97/2). This causes the statistics save program (50/3) to check for a system crash during the last statistics save. If there was a crash, the directory (50/6) is repaired and *STATISTICS (50/5) is resaved. 1 SUN SEP 08/96 15:24:55 Page 20 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 97/2 00050/003A STATISTICS SAVE SAVE PGM SG G W044:NEWSTA.S 5.1T1 39 STATISTICS_SAVE.SAVE_PGM.SG.003 1 LINE 114 8 PAGE UM SALISBURY JULY 23, 1983 10:07:04 0 Program to save *STATISTICS (50/5) on tape. The use of this program is described in the MTS Operators Manual (592). In general, this program saves *STATISTICS on both a monthly and a daily tape and enters the signon/signoff time ranges into the file SYS:DIRECTORY (50/6). ********************************************************************** D5.1 version: Changed for case conversion. ********************************************************************** 0 Referenced by comments of: 50/2, 50/6 00050/004A STATISTICS SAVE SAVE PGM OC G SYS:NEWSTA 5.1T1 40 STATISTICS_SAVE.SAVE_PGM.OC.004 1 LINE 80 12 PAGE UM SALISBURY JULY 23, 1983 10:07:05 SYS.:NEWSTA 0 Contains a $CONTINUE WITH SYS:DIRLIB (742/5). 00050/005 STATISTICS SAVE *STATISTICS D # MTS:TST.STAT UM SALISBURY *STATISTICS 0 Data file used to accumulate MTS SIGNOFF statistics to be used for billing and job statistics. Must be permitted as follows: P/N, RW (PKEY=*SYS.STAT, PKEY=SYS.:STA, MTS.&PKEY=*SYS.STAT, ACC.&PKEY=ACC.:ACCMAINT), R (PKEY=INIT:INITCHK, ACC.) 0 Referenced by comments of: 50/2, 50/3, 97/2 00050/006 STATISTICS SAVE DIRECTORY D # MTS:TST.DIR UM SALISBURY SYS.:DIRECTORY 0 Directory of statistics files (*STATISTICS) that have been saved on daily and monthly statistics tapes by SYS:NEWSTA (50/3). This directory may be interrogated by the tape directory program (742). 0 Referenced by comments of: 50/2, 50/3 00050/007 STATISTICS SAVE WORK FILE D G # SYS.:STATISTICS UM SALISBURY SYS.:STATISTICS@E 00051/001 *WATFOR # (OBSOLETE) D2T2 011 UM 1 SUN SEP 08/96 15:24:55 Page 21 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00052/001A *COINFLIP SA *COINFLIP(1000) 5.1T1 41 COINFLIP..SA.001 1 LINE 72 3 PAGE UM STERKEN JULY 23, 1983 10:07:05 0 Demonstration program. 00052/002A *COINFLIP OE *COINFLIP(0,999) 5.1T1 42 COINFLIP..OE.002 1 LINE 2055 1 PAGE UM STERKEN JULY 23, 1983 10:07:05 *COINFLIP 00053/001 DISKDUMP SA G FILE:DISKDUMP(1000) 5.0T1 65 DISKDUMP..SA.001 1 LINE 72 6 PAGE UM HELFFRICH AUG. 05, 1981 01:58:25 5.0T1 65 0 Program to dump disk and datacell physical records. Doesn't call MTS file routines. 00053/002 DISKDUMP OC G FILE:DISKDUMP(1,900) 5.0T1 66 DISKDUMP..OC.002 1 LINE 80 3 PAGE UM HELFFRICH AUG. 05, 1981 01:58:28 5.0T1 66 FILE:DISKDUMP 00054/001 *TPS S # (OBSOLETE) D2T1 145 UM 00054/002 *TPS LL PTR UC S # (OBSOLETE) D2T1 146 UM 00055/001 *BCDEBCD SA G S1558 5.0T1 VLO FSNAME=BCDEBCD..SA.001(1) 67 5.0T1 67 BCDEBCD..SA.001 1 SEQ 80 2 PAGE UM ENGLE JULY 30, 1973 23:27.43 5.0T1 67 0 Translate scientific 026 code to EBCD. 00055/002 *BCDEBCD OC G *BCDEBCD 5.0T1 68 BCDEBCD..OC.002 1 LINE 80 1 PAGE UM ENGLE JULY 03, 1981 12:19:29 5.0T1 68 *BCDEBCD 00056/001 *2250RTN SA # (OBSOLETE) D4T1 91 2250RTN..SA. 1 SEQ 80 26 PAGE UM JULY 30, 1973 23:28.54 00057/001 *TABEDIT SA O S1558 5.0T1 VLO FSNAME=TABEDIT..SA.001(1) 69 5.0T1 69 TABEDIT..SA.001 1 LINE 80 5 PAGE UM PIRKOLA JULY 27, 1977 21:50:27 5.0T1 69 0 Program to reformat records using a specified tab character and tab stops. Copies *GDINFODSECT (594). Assemble using *SYSMAC. 00057/002 *TABEDIT OC O *TABEDIT 5.0T1 70 TABEDIT..OC.002 1 LINE 80 2 PAGE UM PIRKOLA JULY 03, 1981 12:19:31 5.0T1 70 *TABEDIT 00058/001 *T7D S # (OBSOLETE) D2T1 142 UM 1 SUN SEP 08/96 15:24:55 Page 22 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00059/001 *TCP S # (OBSOLETE) D2T1 141 UM 00060/001 JBRP S # (OBSOLETE) D2T1 144 UM 00061/001 *T9D S # (OBSOLETE) D2T1 143 UM 00063/001 *PTSKRTN SA # (OBSOLETE) D4T1 94 PTSKRTN..SA. 1 SEQ 80 14 PAGE UM JULY 30, 1973 23:30.18 00064/001 *OBJSCAN SA G SCAN W062:OBJSCAN.S(1) 5.0T1 71 OBJSCAN..SA.001 1 LINE 80 21 PAGE UM TIFFANY JULY 03, 1981 12:19:31 5.0T1 71 0 Scans object decks (or files) and prints entry points and line number ranges for each module encountered. Copies *GDINFODSECT (594). 00064/002 *OBJSCAN OE G *OBJSCAN 5.0T1 72 OBJSCAN..OE.002 1 SEQ 5162 4 PAGE UM TIFFANY JULY 03, 1981 12:19:35 5.0T1 72 *OBJSCAN 00065/001 *ASMERR S # (OBSOLETE) D2T1 323 UM 00066/001 *ASMG ASMGASM SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGASM 1 5.0T1 73 ASMG.ASMGASM.SA.001 1 SEQ 80 20 PAGE UM MTA JULY 03, 1981 12:20:47 5.0T1 73 0 The G level assembler (ASMG) version 2, level 7 from the University of Waterloo. 00066/002 *ASMG ASMGBUFF SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGBUFF 2 5.0T1 74 ASMG.ASMGBUFF.SA.002 1 SEQ 80 51 PAGE UM MTA JULY 03, 1981 12:20:50 5.0T1 74 00066/003 *ASMG ASMGFD SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFD 3 5.0T1 75 ASMG.ASMGFD.SA.003 1 SEQ 80 21 PAGE UM MTA JULY 03, 1981 12:20:52 5.0T1 75 00066/004 *ASMG ASMGFEX SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFEX 4 5.0T1 76 ASMG.ASMGFEX.SA.004 1 SEQ 80 19 PAGE UM MTA JULY 03, 1981 12:20:53 5.0T1 76 00066/005 *ASMG ASMGFI SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFI 5 5.0T1 77 ASMG.ASMGFI.SA.005 1 SEQ 80 13 PAGE UM MTA JULY 03, 1981 12:20:55 5.0T1 77 00066/006 *ASMG ASMGFPP SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGFPP 6 5.0T1 78 ASMG.ASMGFPP.SA.006 1 SEQ 80 33 PAGE UM MTA JULY 03, 1981 12:20:57 5.0T1 78 1 SUN SEP 08/96 15:24:55 Page 23 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/007 *ASMG ASMGF1 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF1 7 5.0T1 79 ASMG.ASMGF1.SA.007 1 SEQ 80 46 PAGE UM MTA JULY 03, 1981 12:21:00 5.0T1 79 00066/008 *ASMG ASMGF2 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF2 8 5.0T1 80 ASMG.ASMGF2.SA.008 1 SEQ 80 89 PAGE UM MTA JULY 03, 1981 12:21:04 5.0T1 80 00066/009 *ASMG ASMGF2A SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF2A 9 5.0T1 81 ASMG.ASMGF2A.SA.009 1 SEQ 80 60 PAGE UM MTA JULY 03, 1981 12:21:09 5.0T1 81 00066/010 *ASMG ASMGF3 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF3 10 5.0T1 82 ASMG.ASMGF3.SA.010 1 SEQ 80 62 PAGE UM MTA JULY 03, 1981 12:21:13 5.0T1 82 00066/011 *ASMG ASMGF7C SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7C 11 5.0T1 83 ASMG.ASMGF7C.SA.011 1 SEQ 80 26 PAGE UM MTA JULY 03, 1981 12:21:15 5.0T1 83 00066/012 *ASMG ASMGF7D SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7D 12 5.0T1 84 ASMG.ASMGF7D.SA.012 1 SEQ 80 25 PAGE UM MTA JULY 03, 1981 12:21:17 5.0T1 84 00066/013 *ASMG ASMGF7E SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7E 13 5.0T1 85 ASMG.ASMGF7E.SA.013 1 SEQ 80 26 PAGE UM MTA JULY 03, 1981 12:21:19 5.0T1 85 00066/014 *ASMG ASMGF7G SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7G 14 5.0T1 86 ASMG.ASMGF7G.SA.014 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 12:21:21 5.0T1 86 00066/015 *ASMG ASMGF7I SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7I 15 5.0T1 87 ASMG.ASMGF7I.SA.015 1 SEQ 80 15 PAGE UM MTA JULY 03, 1981 12:21:22 5.0T1 87 00066/016 *ASMG ASMGF7L SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7L 16 5.0T1 88 ASMG.ASMGF7L.SA.016 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 12:21:23 5.0T1 88 00066/017 *ASMG ASMGF7N SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7N 17 5.0T1 89 ASMG.ASMGF7N.SA.017 1 SEQ 80 13 PAGE UM MTA JULY 03, 1981 12:21:25 5.0T1 89 00066/018 *ASMG ASMGF7S SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7S 18 5.0T1 90 ASMG.ASMGF7S.SA.018 1 SEQ 80 8 PAGE UM MTA JULY 03, 1981 12:21:26 5.0T1 90 00066/019 *ASMG ASMGF7V SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7V 19 5.0T1 91 ASMG.ASMGF7V.SA.019 1 SEQ 80 21 PAGE UM MTA JULY 03, 1981 12:21:28 5.0T1 91 1 SUN SEP 08/96 15:24:55 Page 24 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/020 *ASMG ASMGF7X SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF7X 20 5.0T1 92 ASMG.ASMGF7X.SA.020 1 SEQ 80 36 PAGE UM MTA JULY 03, 1981 12:21:30 5.0T1 92 00066/021 *ASMG ASMGF8A SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8A 21 5.0T1 93 ASMG.ASMGF8A.SA.021 1 SEQ 80 27 PAGE UM MTA JULY 03, 1981 12:21:32 5.0T1 93 00066/022 *ASMG ASMGF8C SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8C 22 5.0T1 94 ASMG.ASMGF8C.SA.022 1 SEQ 80 6 PAGE UM MTA JULY 03, 1981 12:21:34 5.0T1 94 00066/023 *ASMG ASMGF8D SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8D 23 5.0T1 95 ASMG.ASMGF8D.SA.023 1 SEQ 80 23 PAGE UM MTA JULY 03, 1981 12:21:36 5.0T1 95 00066/024 *ASMG ASMGF8I SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8I 24 5.0T1 96 ASMG.ASMGF8I.SA.024 1 SEQ 80 15 PAGE UM MTA JULY 03, 1981 12:21:38 5.0T1 96 00066/025 *ASMG ASMGF8L SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8L 25 5.0T1 97 ASMG.ASMGF8L.SA.025 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 12:21:39 5.0T1 97 00066/026 *ASMG ASMGF8M SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8M 26 5.0T1 98 ASMG.ASMGF8M.SA.026 1 SEQ 80 27 PAGE UM MTA JULY 03, 1981 12:21:41 5.0T1 98 00066/027 *ASMG ASMGF8N SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8N 27 5.0T1 99 ASMG.ASMGF8N.SA.027 1 SEQ 80 13 PAGE UM MTA JULY 03, 1981 12:21:42 5.0T1 99 00066/028 *ASMG ASMGF8P SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8P 28 5.0T1 100 ASMG.ASMGF8P.SA.028 1 SEQ 80 22 PAGE UM MTA JULY 03, 1981 12:21:44 5.0T1 100 00066/029 *ASMG ASMGF8S SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8S 29 5.0T1 101 ASMG.ASMGF8S.SA.029 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 12:21:45 5.0T1 101 00066/030 *ASMG ASMGF8V SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGF8V 30 5.0T1 102 ASMG.ASMGF8V.SA.030 1 SEQ 80 21 PAGE UM MTA JULY 03, 1981 12:21:47 5.0T1 102 00066/031 *ASMG ASMGIS00 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS00 31 5.0T1 103 ASMG.ASMGIS00.SA.031 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 12:21:49 5.0T1 103 00066/032 *ASMG ASMGIS09 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS09 33 5.0T1 104 ASMG.ASMGIS09.SA.032 1 SEQ 80 9 PAGE UM MTA JULY 03, 1981 12:21:51 5.0T1 104 1 SUN SEP 08/96 15:24:55 Page 25 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/033 *ASMG ASMGIS20 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS20 35 5.0T1 105 ASMG.ASMGIS20.SA.033 1 SEQ 80 6 PAGE UM MTA JULY 03, 1981 12:21:52 5.0T1 105 00066/034 *ASMG ASMGIS44 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS44 36 5.0T1 106 ASMG.ASMGIS44.SA.034 1 SEQ 80 9 PAGE UM MTA JULY 03, 1981 12:21:54 5.0T1 106 00066/035 *ASMG ASMGIS60 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS60 37 5.0T1 107 ASMG.ASMGIS60.SA.035 1 SEQ 80 10 PAGE UM MTA JULY 03, 1981 12:21:55 5.0T1 107 00066/036 *ASMG ASMGIS67 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS67 38 5.0T1 108 ASMG.ASMGIS67.SA.036 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 12:21:56 5.0T1 108 00066/037 *ASMG ASMGIS70 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS70 39 5.0T1 109 ASMG.ASMGIS70.SA.037 1 SEQ 80 12 PAGE UM MTA JULY 03, 1981 12:21:58 5.0T1 109 00066/038 *ASMG ASMGIS71 SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGIS71 40 5.0T1 110 ASMG.ASMGIS71.SA.038 1 SEQ 80 12 PAGE UM MTA JULY 03, 1981 12:21:59 5.0T1 110 00066/039 *ASMG ASMGRTA SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGRTA 41 5.0T1 111 ASMG.ASMGRTA.SA.039 1 SEQ 80 5 PAGE UM MTA JULY 03, 1981 12:22:01 5.0T1 111 00066/040 *ASMG ASMGUP SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGUP 42 5.0T1 112 ASMG.ASMGUP.SA.040 1 SEQ 80 20 PAGE UM MTA JULY 03, 1981 12:22:02 5.0T1 112 00066/041 *ASMG APARM SA G S0032 ASMGOS 'ASMGOS 27' POSN=APARM 43 5.0T1 113 ASMG.APARM.SA.041 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 12:22:03 5.0T1 113 00066/042 *ASMG ASMGSET SA G S0032 ASMGOS 'ASMGOS 27' POSN=ASMGSET 44 5.0T1 114 ASMG.ASMGSET.SA.042 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 12:22:04 5.0T1 114 00066/043 *ASMG COMMENCE SM G S0032 ASMGOS 'ASMGOS 27' POSN=COMMENCE 45 5.0T1 115 ASMG.COMMENCE.SM.043 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:05 5.0T1 115 00066/044 *ASMG COMMON SM G S0032 ASMGOS 'ASMGOS 27' POSN=COMMON 46 5.0T1 116 ASMG.COMMON.SM.044 1 SEQ 80 18 PAGE UM MTA JULY 03, 1981 12:22:07 5.0T1 116 00066/045 *ASMG DCBOUT SM G S0032 ASMGOS 'ASMGOS 27' POSN=DCBOUT 47 5.0T1 117 ASMG.DCBOUT.SM.045 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:08 5.0T1 117 1 SUN SEP 08/96 15:24:55 Page 26 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/046 *ASMG DEFCHAR SM G S0032 ASMGOS 'ASMGOS 27' POSN=DEFCHAR 48 5.0T1 118 ASMG.DEFCHAR.SM.046 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 12:22:09 5.0T1 118 00066/047 *ASMG ELZERO SM G S0032 ASMGOS 'ASMGOS 27' POSN=ELZERO 49 5.0T1 119 ASMG.ELZERO.SM.047 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:10 5.0T1 119 00066/048 *ASMG EMSG SM G S0032 ASMGOS 'ASMGOS 27' POSN=EMSG 50 5.0T1 120 ASMG.EMSG.SM.048 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:11 5.0T1 120 00066/049 *ASMG ENTRYOUT SM G S0032 ASMGOS 'ASMGOS 27' POSN=ENTRYOUT 51 5.0T1 121 ASMG.ENTRYOUT.SM.049 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:12 5.0T1 121 00066/050 *ASMG EPTR SM G S0032 ASMGOS 'ASMGOS 27' POSN=EPTR 52 5.0T1 122 ASMG.EPTR.SM.050 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:12 5.0T1 122 00066/051 *ASMG FDIMEN SM G S0032 ASMGOS 'ASMGOS 27' POSN=FDIMEN 53 5.0T1 123 ASMG.FDIMEN.SM.051 1 SEQ 80 9 PAGE UM MTA JULY 03, 1981 12:22:14 5.0T1 123 00066/052 *ASMG FINISH SM G S0032 ASMGOS 'ASMGOS 27' POSN=FINISH 54 5.0T1 124 ASMG.FINISH.SM.052 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:15 5.0T1 124 00066/053 *ASMG GETT SM G S0032 ASMGOS 'ASMGOS 27' POSN=GETT 55 5.0T1 125 ASMG.GETT.SM.053 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:16 5.0T1 125 00066/054 *ASMG INST SM G S0032 ASMGOS 'ASMGOS 27' POSN=INST 56 5.0T1 126 ASMG.INST.SM.054 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 12:22:17 5.0T1 126 00066/055 *ASMG INSTSET SM G S0032 ASMGOS 'ASMGOS 27' POSN=INSTSET 57 5.0T1 127 ASMG.INSTSET.SM.055 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 12:22:18 5.0T1 127 00066/056 *ASMG LIST1EQU SM G S0032 ASMGOS 'ASMGOS 27' POSN=LIST1EQU 58 5.0T1 128 ASMG.LIST1EQU.SM.056 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 12:22:20 5.0T1 128 00066/057 *ASMG MESSAGE SM G S0032 ASMGOS 'ASMGOS 27' POSN=MESSAGE 59 5.0T1 129 ASMG.MESSAGE.SM.057 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:20 5.0T1 129 00066/058 *ASMG PRINTOUT SM G S0032 ASMGOS 'ASMGOS 27' POSN=PRINTOUT 60 5.0T1 130 ASMG.PRINTOUT.SM.058 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:21 5.0T1 130 1 SUN SEP 08/96 15:24:55 Page 27 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/059 *ASMG PRNT SM G S0032 ASMGOS 'ASMGOS 27' POSN=PRNT 61 5.0T1 131 ASMG.PRNT.SM.059 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:22 5.0T1 131 00066/060 *ASMG PUTT SM G S0032 ASMGOS 'ASMGOS 27' POSN=PUTT 62 5.0T1 132 ASMG.PUTT.SM.060 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:23 5.0T1 132 00066/061 *ASMG RD SM G S0032 ASMGOS 'ASMGOS 27' POSN=RD 63 5.0T1 133 ASMG.RD.SM.061 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:24 5.0T1 133 00066/062 *ASMG SETR SM G S0032 ASMGOS 'ASMGOS 27' POSN=SETR 64 5.0T1 134 ASMG.SETR.SM.062 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:25 5.0T1 134 00066/063 *ASMG SNAPDATA SM G S0032 ASMGOS 'ASMGOS 27' POSN=SNAPDATA 65 5.0T1 135 ASMG.SNAPDATA.SM.063 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:26 5.0T1 135 00066/064 *ASMG SNAPOUT SM G S0032 ASMGOS 'ASMGOS 27' POSN=SNAPOUT 66 5.0T1 136 ASMG.SNAPOUT.SM.064 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 12:22:27 5.0T1 136 00066/065 *ASMG TIMEOUT SM G S0032 ASMGOS 'ASMGOS 27' POSN=TIMEOUT 67 5.0T1 137 ASMG.TIMEOUT.SM.065 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:28 5.0T1 137 00066/066 *ASMG TRANSLAT SM G S0032 ASMGOS 'ASMGOS 27' POSN=TRANSLAT 68 5.0T1 138 ASMG.TRANSLAT.SM.066 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:29 5.0T1 138 00066/067 *ASMG UPEMSG SM G S0032 ASMGOS 'ASMGOS 27' POSN=UPEMSG 69 5.0T1 139 ASMG.UPEMSG.SM.067 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 12:22:30 5.0T1 139 00066/068 *ASMG ASMGMOD SA G S0003 FSWATF FSNAME=ASMGMOD 5.0T1 140 ASMG.ASMGMOD.SA.068 1 LINE 80 1 PAGE UM MTA SEP. 22, 1978 00:38:16 5.0T1 140 00066/069 *ASMG ASMGMOD OC G # (PART OF ASMGMOD) D4T1 165 ASMG.ASMGMOD.OC.069 1 LINE 80 1 PAGE UM MTA JULY 27, 1977 21:53:37 00066/070 *ASMG GTIMEST OC G S0563 D4T1 VLO FSNAME=ASMG.GTIMEST.OC.070(1) 166 5.0T1 141 ASMG.GTIMEST.OC.070 1 LINE 80 1 PAGE UM MTA JULY 27, 1977 21:53:39 5.0T1 141 00066/071 *ASMG ASMGUPD UU G S0003 FSWATF FSNAME=ASMGUPD 5.0T1 142 ASMG.ASMGUPD.UU.071 1 LINE 83 40 PAGE UM MTA SEP. 22, 1978 00:33:53 5.0T1 142 1 SUN SEP 08/96 15:24:55 Page 28 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/072 *ASMG ASMGJOB C S0003 FSWATF FSNAME=ASMGJOB 5.0T1 143 ASMG.ASMGJOB.C.072 1 LINE 124 1 PAGE UM MTA SEP. 22, 1978 00:39:08 5.0T1 143 00066/073 *ASMG ASMGJOB2 C S0003 FSWATF FSNAME=ASMGJOB2 5.0T1 144 ASMG.ASMGJOB2.C.073 1 LINE 112 1 PAGE UM MTA SEP. 22, 1978 00:39:29 5.0T1 144 00066/074 *ASMG ASMGLINK C S0003 FSWATF FSNAME=ASMGLINK 5.0T1 145 ASMG.ASMGLINK.C.074 1 LINE 112 1 PAGE UM MTA SEP. 22, 1978 00:40:31 5.0T1 145 00066/075 *ASMG ASMGCOPY C S0003 FSWATF FSNAME=ASMGCOPY 5.0T1 146 ASMG.ASMGCOPY.C.075 1 LINE 26 2 PAGE UM MTA SEP. 22, 1978 00:41:07 5.0T1 146 00066/076 *ASMG *ASMG OE G *ASMG 5.0T1 147 ASMG.*ASMG.OE.076 1 SEQ 8849 3 PAGE UM MTA JULY 03, 1981 12:29:17 5.0T1 147 *ASMG 00066/077 *ASMG ASMGFPP OE G ETC:ASMGFPP 5.0T1 148 ASMG.ASMGFPP.OE.077 1 SEQ 12064 5 PAGE UM MTA JULY 03, 1981 12:29:18 5.0T1 148 ETC.:ASMGFPP 00066/078A *ASMG ASMGF1 OE G ETC:ASMGF1 5.1T1 43 ASMG.ASMGF1.OE.078 1 SEQ 9088 3 PAGE UM MTA JULY 23, 1983 10:07:06 ETC.:ASMGF1 00066/079 *ASMG ASMGF2 OE G ETC:ASMGF2 5.0T1 150 ASMG.ASMGF2.OE.079 1 SEQ 20784 6 PAGE UM MTA JULY 03, 1981 12:29:20 5.0T1 150 ETC.:ASMGF2 00066/080 *ASMG ASMGF3 OE G ETC:ASMGF3 5.0T1 151 ASMG.ASMGF3.OE.080 1 SEQ 8286 3 PAGE UM MTA JULY 03, 1981 12:29:22 5.0T1 151 ETC.:ASMGF3 00066/081 *ASMG ASMGF7 OE G ETC:ASMGF7 5.0T1 152 ASMG.ASMGF7.OE.081 1 SEQ 12904 6 PAGE UM MTA JULY 03, 1981 12:29:23 5.0T1 152 ETC.:ASMGF7 00066/082 *ASMG ASMGF8 OE G ETC:ASMGF8 5.0T1 153 ASMG.ASMGF8.OE.082 1 SEQ 9552 6 PAGE UM MTA JULY 03, 1981 12:29:24 5.0T1 153 ETC.:ASMGF8 00066/083 *ASMG ASMGIS00 OE G ETC:ASMGIS00 5.0T1 154 ASMG.ASMGIS00.OE.083 1 SEQ 2220 1 PAGE UM MTA JULY 03, 1981 12:29:25 5.0T1 154 ETC.:ASMGIS00 00066/084 *ASMG ASMGIS09 OE G ETC:ASMGIS09 5.0T1 155 ASMG.ASMGIS09.OE.084 1 SEQ 1834 1 PAGE UM MTA JULY 03, 1981 12:29:26 5.0T1 155 ETC.:ASMGIS09 1 SUN SEP 08/96 15:24:55 Page 29 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00066/085 *ASMG ASMGIS20 OE G ETC:ASMGIS20 5.0T1 156 ASMG.ASMGIS20.OE.085 1 SEQ 1199 1 PAGE UM MTA JULY 03, 1981 12:29:27 5.0T1 156 ETC.:ASMGIS20 00066/086 *ASMG ASMGIS44 OE G ETC:ASMGIS44 5.0T1 157 ASMG.ASMGIS44.OE.086 1 SEQ 1866 1 PAGE UM MTA JULY 03, 1981 12:29:27 5.0T1 157 ETC.:ASMGIS44 00066/087 *ASMG ASMGIS60 OE G ETC:ASMGIS60 5.0T1 158 ASMG.ASMGIS60.OE.087 1 SEQ 2074 1 PAGE UM MTA JULY 03, 1981 12:29:28 5.0T1 158 ETC.:ASMGIS60 00066/088 *ASMG ASMGIS67 OE G ETC:ASMGIS67 5.0T1 159 ASMG.ASMGIS67.OE.088 1 SEQ 2160 1 PAGE UM MTA JULY 03, 1981 12:29:29 5.0T1 159 ETC.:ASMGIS67 00066/089 *ASMG ASMGIS70 OE G ETC:ASMGIS70 5.0T1 160 ASMG.ASMGIS70.OE.089 1 SEQ 2372 1 PAGE UM MTA JULY 03, 1981 12:29:30 5.0T1 160 ETC.:ASMGIS70 00066/090 *ASMG ASMGIS71 OE G ETC:ASMGIS71 5.0T1 161 ASMG.ASMGIS71.OE.090 1 SEQ 2380 1 PAGE UM MTA JULY 03, 1981 12:29:30 5.0T1 161 ETC.:ASMGIS71 00066/091 *ASMG ASMGRTA OE G ETC:ASMGRTA 5.0T1 162 ASMG.ASMGRTA.OE.091 1 SEQ 1280 1 PAGE UM MTA JULY 03, 1981 12:29:31 5.0T1 162 ETC.:ASMGRTA 00066/092 *ASMG ASMGUP OE G ETC:ASMGUP 5.0T1 163 ASMG.ASMGUP.OE.092 1 SEQ 3538 1 PAGE UM MTA JULY 03, 1981 12:29:32 5.0T1 163 ETC.:ASMGUP 00066/093 *ASMG USER'S GUIDE P S0881 ASMG27 POSN=ASMG.GUIDE.USERS 3 5.0T1 164 ASMG.USER'S_GUIDE.P.093 1 SEQ 80 41 PAGE UM MTA JULY 03, 1981 12:30:00 5.0T1 164 00066/094 *ASMG IMPLEMENTATION P S0881 ASMG27 POSN=ASMG.GUIDE.IMPL 4 5.0T1 165 ASMG.IMPLEMENTATION.P.094 1 SEQ 78 27 PAGE UM MTA JULY 03, 1981 12:30:03 5.0T1 165 00066/095 *ASMG *ASMGSYSMAC SM G *ASMGSYSMAC 5.0T1 166 ASMG.*ASMGSYSMAC.SM.095 1 LINE 80 81 PAGE UM MTA JULY 03, 1981 12:30:04 5.0T1 166 *ASMGSYSMAC 00067/001C FILE SAVE CAT SQ G RSTR:FS_CAT(1000) 5.1T1 44 FILE_SAVE.CAT.SQ.001 1 LINE 69 8 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:06 0 This component is a combination of what were previously two components, FILE SAVE, component 67, and FILE SAVE - ONLINE, component 716. (067/1) is the first portion of the MTS filesave, i.e., disk backup, program. This program is run once per week at UM to produce a backup of all disk files in case of hardware or software problems. On other days, a partial filesave is produced using the online file save 1 SUN SEP 08/96 15:24:55 Page 30 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 program (067/23) of those files which have changed since the previous file save was run. The tapes generated by the full save are copied, see (610), and saved for several months. Six week intervals of these full tapes are saved for several years. We have found that this procedure, which includes storing the full tapes in another building, seems to provide a reasonable backup. ************************************************************************* This is the PLUS source for the catalog scan portion of full file save. Requires the following PLUS source libraries: RSTR:FS_*SQL (067/9) COPY:FILE*SQL (482/65) COPY:MTS*SQL (344/4) *PLUS.SOURCELIB (1042/5) 0 Referenced by comments of: 67/1 00067/002C FILE SAVE CAT OC G RSTR:FS_CAT(1,999.5) 5.1T1 45 FILE_SAVE.CAT.OC.002 1 LINE 4454 7 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:07 RSTR:FS_CAT 0 Contains a "$Continue with FILE:FINT*OL (482/70) + COPY:SYSDEFS" record at line 999.5. 00067/003C FILE SAVE MAIN SQ G RSTR:FS_MAIN(1000) 5.1T1 46 FILE_SAVE.MAIN.SQ.003 1 LINE 72 12 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:07 0 Main portion of the full file save. This portion saves a series of volumes. It is run by the slave streams (067/19). Note: The subroutine Read_Extract makes Getspace requests that are potentially > 1MB in size. At UM, we use the Ramrod GSFS_BIG (1019/9) module to manage this. The object for GSFS_BIG is included with the object for FS_MAIN (067/4). Installations that have installed updates to the STOR routines that allow > 1MB allocations can just use *OBJUTIL to delete the module GSFS_BIG. Requires the following PLUS source libraries: RSTR:FS_*SQL (067/9) COPY:FILE*SQL (482/65) COPY:MTS*SQL (344/4) *PLUS.SOURCELIB (1042/5) 00067/004C FILE SAVE MAIN OC G RSTR:FS_MAIN(1,999.5) 5.1T1 47 FILE_SAVE.MAIN.OC.004 1 LINE 2044 11 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:08 RSTR:FS_MAIN 0 Contains a $CONTINUE WITH FILE:FINT*OL (482/70) + RSTR:VTOCREAD (067/11) + RSTR:SAVEFILE (067/10) + RSTR:TAPEOUT (067/24) + COPY:SYSDEFS record at line 999.5 1 SUN SEP 08/96 15:24:55 Page 31 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Also contains a copy of the object for the Ramrod GSFS_BIG (1019/9) module. 0 Referenced by comments of: 67/3 00067/005C FILE SAVE FINR SQ G RSTR:FS_FINR(1000) 5.1T1 48 FILE_SAVE.FINR.SQ.005 1 LINE 74 8 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:08 0 Portion of the full file save which resets the must-be-saved bits in the catalog. Requires the following PLUS source libraries: RSTR:FS_*SQL (067/9) COPY:FILE*SQL (482/65) COPY:MTS*SQL (344/4) *PLUS.SOURCELIB (1042/5) 00067/006C FILE SAVE FINR OC G RSTR:FS_FINR(1,999.5) 5.1T1 49 FILE_SAVE.FINR.OC.006 1 LINE 5424 7 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:09 RSTR:FS_FINR 0 Contains a "$CONTINUE WITH FILE:FINT*OL (482/70) + COPY:SYSDEFS" record at line 999.5 00067/007C FILE SAVE FDIR SQ G RSTR:FS_FDIR(1000) 5.1T1 50 FILE_SAVE.FDIR.SQ.007 1 LINE 71 4 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:09 0 Portion of the full file save to produce the FILEDIRnn files for input to the merge processor. Requires the following PLUS source libraries: RSTR:FS_*SQL (067/9) COPY:FILE*SQL (482/65) *PLUS.SOURCELIB (1042/5) 00067/008C FILE SAVE FDIR OC G RSTR:FS_FDIR(1,999.5) 5.1T1 51 FILE_SAVE.FDIR.OC.008 1 LINE 3428 5 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:10 RSTR:FS_FDIR 0 Contains a "$CONTINUE WITH *DUMMY*" record at line 999.5 00067/009C FILE SAVE PLUS LIBRARY SQ G RSTR:FS_*SQL 5.1T1 52 FILE_SAVE.PLUS_LIBRARY.SQ.009 1 LINE 74 3 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:10 RSTR:FS_*SQL 0 PLUS source library for the re-written piece of the full file save. The "MAIN" subcomponent was functionally replaced by CAT, MAIN, FINR and FDIR subcomponents. 0 Referenced by comments of: 67/1, 67/3, 67/5, 67/7 1 SUN SEP 08/96 15:24:55 Page 32 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00067/010 FILE SAVE SAVEFILE SA G SFIL RSTR:SAVEFILE(1000) 5.0T1 168 FILE_SAVE.SAVEFILE.SA.002 1 LINE 80 11 PAGE UM HELFFRICH AUG. 05, 1981 02:00:59 5.0T1 168 RSTR:SAVEFILE 0 Assemble using COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728) and *SYSMAC. 0 Referenced by comments of: 67/4, 67/23, 67/26, 67/44, 502/8 00067/011 FILE SAVE VTOCRD SA G VTOC RSTR:VTOCREAD(1000) 5.0T1 169 FILE_SAVE.VTOCRD.SA.003 1 LINE 80 14 PAGE UM HELFFRICH AUG. 05, 1981 02:01:02 5.0T1 169 RSTR:VTOCREAD 0 Subroutine to read entire VTOC of disk volume. Assemble using *SYSMAC and COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 67/4, 67/44, 104/135, 682/21, 682/38, 682/46, 682/47, 1021/9, 1030/1, 1030/3 00067/012 FILE SAVE RESTART SA G RSTR:LFS.RESTART(1000) 5.0T1 171 FILE_SAVE.RESTART.SA.005 1 LINE 72 3 PAGE UM HELFFRICH AUG. 05, 1981 02:01:06 5.0T1 171 0 Program used by weekly save (067/17) to cause the weekly tapes to be re-used after their cycle period has expired. This period is currently 6 weeks. This has to be done because if filesave crashes with part of a set of tapes written, it would not reuse the partially written tapes of the set when restarted. This program is a kludge. Assemble with the file save macros (067/35). 0 Referenced by comments of: 67/16 00067/013 FILE SAVE RESTART OC G RSTR:LFS.RESTART(1,999) 5.0T1 172 FILE_SAVE.RESTART.OC.006 1 LINE 80 3 PAGE UM HELFFRICH AUG. 05, 1981 02:01:06 5.0T1 172 RSTR:LFS.RESTART 00067/014C FILE SAVE LISTER SA G RSTR:LISTER(1000) 5.1T1 53 FILE_SAVE.LISTER.SA.014 1 LINE 72 8 PAGE UM HELFFRICH JULY 23, 1983 10:07:10 0 File save listing program. This program should be run after file saves and after file save tape copy program to generate a hard copy listing of the save (if desired). The program reads the files named "FILEDIRnn" or "COPYDIRnn" and produces a listing of the result. The listing contains the tape number upon which each file saved (or copied) resides. This program does not rely upon the existence of the master tape directory (RSTR:TAPEDIR) for its functioning. Any item which it finds in a copy or listing file is simply collected, and listed. 00067/015C FILE SAVE LISTER OC G RSTR:LISTER(1,999) 5.1T1 54 FILE_SAVE.LISTER.OC.015 1 LINE 80 5 PAGE UM HELFFRICH JULY 23, 1983 10:07:11 RSTR:LISTER 1 SUN SEP 08/96 15:24:55 Page 33 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00067/016A FILE SAVE SPECIAL START C *SVS 5.1T1 55 FILE_SAVE.SPECIAL_START.C.016 1 LINE 19 1 PAGE UM BURLING JULY 23, 1983 10:07:11 RSTR:*SVS 0 Operator file which uses features of LFS.RESTART (067/12) to run a special full file save at a non-standard time of the week. Contains the command $SOURCE RSTR:SVWCMD(500) (067/18). 00067/017A FILE SAVE WEEKLY START C *SVW 5.1T1 56 FILE_SAVE.WEEKLY_START.C.017 1 LINE 17 1 PAGE UM BURLING JULY 23, 1983 10:07:11 RSTR:*SVW 0 Operator file which is used to start the weekly full filesave process. All users should be off the system when this is run. This file will $Source to RSTR:SVWCMD (067/18) which will scan the catalog and build a catalog extract file for each volume to be saved, and then start up some number of slave streams (currently 8 at UM) using *TSN. Invoked by entering "MTS *SVW" on the operator's console. 0 Referenced by comments of: 67/12, 67/18 00067/018A FILE SAVE WEEKLY START C G RSTR:SVWCMD 5.1T1 57 FILE_SAVE.WEEKLY_START.C.018 1 LINE 87 3 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:11 RSTR:SVWCMD 0 Command file which does the weekly and special file saves. $Sourced to by *SVW (067/17). This file contains, starting at line 2000, a list of the public volumes to be saved. Any volumes not on this list will still be saved, after suitable complaint. 0 Referenced by comments of: 67/16, 67/17, 67/19 00067/019A FILE SAVE WEEKLY SLAVE C *TSN 5.1T1 58 FILE_SAVE.WEEKLY_SLAVE.C.019 1 LINE 14 1 PAGE UM BURLING JULY 23, 1983 10:07:12 RSTR:*TSN 0 Operator file used by RSTR:SVWCMD (067/18) to start slave streams. Not normally used by itself. 0 Referenced by comments of: 67/3 00067/020A FILE SAVE WEEKLY SLAVE C G RSTR:TSNCMD 5.1T1 59 FILE_SAVE.WEEKLY_SLAVE.C.020 1 LINE 87 1 PAGE UM WHALEY BURLING JULY 23, 1983 10:07:12 RSTR:TSNCMD 0 Command file which is invoked from *TSN. This is the commands for the individual slave streams. 1 SUN SEP 08/96 15:24:55 Page 34 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00067/021C FILE SAVE MERGE LOCK C G RSTR:MRG_LOCK 5.1T1 60 FILE_SAVE.MERGE_LOCK.C.021 1 LINE 60 1 PAGE UM BURLING JULY 23, 1983 10:07:12 RSTR:MRG_LOCK 0 This file is used by the weekend (total) file save to tell when the slave streams have finished, and to keep *DCS (a program to start up the Data Concentrators), *LAS (154/1), and *MNS (642/1) from starting up prematurely. 00067/022A FILE SAVE *SAV C *SAV 5.1T1 61 FILE_SAVE.?SAV.C.022 1 LINE 89 1 PAGE UM HELFFRICH JULY 23, 1983 10:07:13 RSTR:*SAV 0 Command file to start the online filesave and merge operations. Invoked by entering "MTS *SAV" on the operator's console. This file also contains commands to purge the journal log file. It may need to be changed according to local installation preference. 0 Referenced by comments of: 67/46 00067/023 FILE SAVE SAVE PGM SA G OLFS RSTR:DSF(1000) 5.0T1 185 FILE_SAVE.SAVE_PGM.SA.019 1 LINE 80 22 PAGE UM HELFFRICH AUG. 05, 1981 02:01:18 5.0T1 185 RSTR:DSF 0 Source for the online filesave. This program saves the changed files in the system and creates files with names of the form "FILEDIRnn", where nn=01,02,..., which constitute the input to the merge program (067/27). The merge program ultimately makes the save times for the files saved by the online file save available to *RESTORE (712). Calls SAVEFILE (067/10) and TAPEOUT (067/24). Assemble using COPY:FILE.MACROS (482/45) and the filesave macros (067/35). NOTE: The directory files RSTR:FILEDIR.MAC, RSTR:FILEDIR.NEW, and RSTR:TAPEDIR must be permitted read to PKEY=*RESTORE, UNLIM to RSTR, and RW to PKEY=DEADUCATDES. 0 Referenced by comments of: 67/1, 67/24, 67/26, 67/44 00067/024 FILE SAVE TAPEOUT SA G TPDO RSTR:TAPEOUT(1000) 5.0T1 187 FILE_SAVE.TAPEOUT.SA.021 1 LINE 80 25 PAGE UM HELFFRICH AUG. 05, 1981 02:01:25 5.0T1 187 0 Subroutine called by the save program (067/23) to write a filesave tape which maintains a tape directory file named "TAPEDIR". It will also create and permit a tape directory if one does not exist. The tapes have rack numbers of the form fsnnnn, where nnnn=0001-0999 for daily -- change only -- saves =1000-1999 for weekly full saves =2000- for deadfile saves -- not currently used at UM Has assembly EQU's for setting the save cycle period -- currently 42 days. Assemble using the file save macros (067/35). 1 SUN SEP 08/96 15:24:55 Page 35 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 67/4, 67/23, 67/26, 502/8 00067/025 FILE SAVE TAPEOUT OC G RSTR:TAPEOUT(1,999) 5.0T1 188 FILE_SAVE.TAPEOUT.OC.022 1 LINE 80 9 PAGE UM HELFFRICH AUG. 05, 1981 02:01:44 5.0T1 188 RSTR:TAPEOUT 00067/026 FILE SAVE SAVE PGM OC G RSTR:OLFSOBJ 5.0T1 186 FILE_SAVE.SAVE_PGM.OC.020 1 LINE 80 17 PAGE UM HELFFRICH AUG. 05, 1981 02:01:23 5.0T1 186 RSTR:OLFSOBJ 0 Contains object of (067/10), (067/23), and (067/24). 0 Referenced by comments of: 671/1 00067/027 FILE SAVE MERGE PGM SA G MERG RSTR:MERGE(1000) 5.0T1 189 FILE_SAVE.MERGE_PGM.SA.023 1 LINE 80 17 PAGE UM HELFFRICH AUG. 05, 1981 02:01:52 5.0T1 189 0 Program to merge FILEDIRnn files with the current FILEDIR.MAS making note of files which no longer exist and removing entries which are no longer available, according to TAPEDIR, because the tape has been reused. It also destroys FILEDIRnn files. FILEDIR.NEW is used so that the merge process is "crash- proof" -- it may be stopped and restarted. Calls non-resident copies (in case PISTLE has not been run) of the TIME (360) and JULGRG (522) subroutines and the CHKFILE subroutine (682/41). Program will create and permit the appropriate filesave directory files -- RSTR:FILEDIR.MAS and RSTR:FILEDIR.NEW -- if they don't already exist. Copies *CNFGINFODSECT (654) and *GFINFODSECT (593). Assemble using the filesave macros (067/35). 0 Referenced by comments of: 67/23, 682/41 00067/028 FILE SAVE MERGE PGM OC G RSTR:MERGE(1,999) 5.0T1 190 FILE_SAVE.MERGE_PGM.OC.024 1 LINE 80 5 PAGE UM HELFFRICH AUG. 05, 1981 02:01:55 5.0T1 190 RSTR:MERGE 0 Contains two "ALI" RECORDS and "$CONTINUE WITH SEG2:CFE+SEG2:TIME+FILE:CHKFILE+COPY:SYSDEFS+*LIBRARY". 00067/029 FILE SAVE TAPEDIRLIST SA G TPDL RSTR:TAPEDIRLIST(1000) 5.0T1 191 FILE_SAVE.TAPEDIRLIST.SA.025 1 LINE 80 4 PAGE UM HELFFRICH AUG. 05, 1981 02:01:57 5.0T1 191 0 Program to list the "TAPEDIR" file in readable form. Assemble using the FILESAVE macros (067/35). 00067/030 FILE SAVE TAPEDIRLIST OC G RSTR:TAPEDIRLIST(1,999) 5.0T1 192 FILE_SAVE.TAPEDIRLIST.OC.026 1 LINE 80 2 PAGE UM HELFFRICH AUG. 05, 1981 02:01:58 5.0T1 192 RSTR:TAPEDIRLIST 00067/031A FILE SAVE REGENERATE SA G RSTR:REGENERATE(1000) 5.1T1 62 FILE_SAVE.REGENERATE.SA.031 1 LINE 72 4 PAGE UM HELFFRICH JULY 23, 1983 10:07:13 0 Program to regenerate lost portions of the master file and tape directory files if a disk disaster, or something else, destroys them. Assemble using the FILESAVE 1 SUN SEP 08/96 15:24:55 Page 36 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 macro library (067/35). ********************************************************************** D5.1 version: -- Changed to prompt for tape drive instead of taking it on the $RUN command. -- Changed to unlock files periodically so multiple streams can be run. ********************************************************************** 00067/032A FILE SAVE REGENERATE OC G RSTR:REGENERATE(1,998) 5.1T1 63 FILE_SAVE.REGENERATE.OC.032 1 LINE 80 4 PAGE UM HELFFRICH JULY 23, 1983 10:07:13 RSTR:REGENERATE 0 Contains a "$CONTINUE WITH *ENDJUNK" card. 00067/033 FILE SAVE *FSM C *FSM 5.0T1 195 FILE_SAVE.?FSM.C.029 1 LINE 28 1 PAGE UM HELFFRICH AUG. 05, 1981 02:02:00 5.0T1 195 RSTR:*FSM 0 Command file to start the online filesave merge operation only. Invoked by entering "MTS *FSM" on the operator's console. 0 Referenced by comments of: 97/2 00067/034 FILE SAVE WRITEUP WF RSTR:OLFS.W 5.0T1 196 FILE_SAVE.WRITEUP.WF.030 1 LINE 102 5 PAGE UM HELFFRICH AUG. 05, 1981 02:02:01 5.0T1 196 RSTR:OLFS.W 0 Informal documentation for the online file save. 00067/035 FILE SAVE MACROS SM G RSTR:FS.MACROS 5.0T1 197 FILE_SAVE.MACROS.SM.031 1 LINE 72 3 PAGE UM HELFFRICH AUG. 05, 1981 02:02:02 5.0T1 197 RSTR:FS.MACROS 0 FILESAVE macro library. 0 Referenced by comments of: 67/12, 67/23, 67/24, 67/27, 67/29, 67/31, 67/46, 610/1, 671/1, 671/3, 682/39, 712/1, 712/3 00067/036 FILE SAVE RECOVER SA G RSTR:RECOVER(1001) 5.0T1 198 FILE_SAVE.RECOVER.SA.032 1 LINE 72 1 PAGE UM HELFFRICH AUG. 05, 1981 02:02:03 5.0T1 198 0 Small program to copy and re-label a set of weekly filesave tapes erroneously written by FILESAVE. 00067/037 FILE SAVE RECOVER OC G RSTR:RECOVER(1,999) 5.0T1 199 FILE_SAVE.RECOVER.OC.033 1 LINE 80 2 PAGE UM HELFFRICH AUG. 05, 1981 02:02:04 5.0T1 199 RSTR:RECOVER 1 SUN SEP 08/96 15:24:55 Page 37 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00067/038 FILE SAVE FILEDIR.MAS D # RSTR:FILEDIR.MAS UM HELFFRICH RSTR:FILEDIR.MAS@E 0 Online FILESAVE file directory file. 00067/039 FILE SAVE FILEDIR.NEW D # RSTR:FILEDIR.NEW UM HELFFRICH RSTR:FILEDIR.NEW@E 0 Online FILESAVE file directory file. 00067/040 FILE SAVE TAPEDIR D # RSTR:TAPEDIR UM HELFFRICH RSTR:TAPEDIR@E 0 Online FILESAVE tape directory file. 00067/041 FILE SAVE FSLOG D # RSTR:FSLOG UM HELFFRICH RSTR:FSLOG@E 0 FILESAVE permanent log file. 00067/042 FILE SAVE FSJOURNAL D # RSTR:FSJOURNAL UM HELFFRICH RSTR:FSJOURNAL@E 0 FILESAVE journal log file. 00067/043 FILE SAVE RECOVERING WF RSTR:RECOVERING 5.0T1 200 FILE_SAVE.RECOVERING.WF.039 1 LINE 106 3 PAGE UM HELFFRICH AUG. 05, 1981 02:02:45 5.0T1 200 RSTR:RECOVERING 0 Writeup describing how to regenerate the file save directories if they are damaged as a result of a disk disaster. 00067/044 FILE SAVE TESTER SA O RSTR:FSTEST(1000) 5.0T1 201 FILE_SAVE.TESTER.SA.040 1 LINE 46 1 PAGE UM HELFFRICH AUG. 05, 1981 02:02:46 5.0T1 201 0 Series of object modules to be concatenated to online FILESAVE (067/23) to debug it. $CONTINUEs WITH SAVEFILE (067/10) + VTOCREAD (067/11) + COPY:SYSDEFS (579/3). 00067/045 FILE SAVE TESTER OC O RSTR:FSTEST(1,999) 5.0T1 202 FILE_SAVE.TESTER.OC.041 1 LINE 80 1 PAGE UM HELFFRICH AUG. 05, 1981 02:02:47 5.0T1 202 RSTR:FSTEST 00067/046A FILE SAVE TAPE PREVIEW SA O RSTR:TAPEPREVIEW(1000) 5.1T1 64 FILE_SAVE.TAPE_PREVIEW.SA.046 1 LINE 72 5 PAGE UM HELFFRICH JULY 23, 1983 10:07:13 0 Program invoked by *SAV (067/22) to print out the next "n" online FILESAVE tapes to be used. Takes the number "n" in the parameter field, where "n" is the number of tapes to print out. Assemble using the FILESAVE macros 1 SUN SEP 08/96 15:24:55 Page 38 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (067/35). 00067/047A FILE SAVE TAPE PREVIEW OC O RSTR:TAPEPREVIEW(1,999) 5.1T1 65 FILE_SAVE.TAPE_PREVIEW.OC.047 1 LINE 80 3 PAGE UM HELFFRICH JULY 23, 1983 10:07:14 RSTR:TAPEPREVIEW 00069/001 *DRAW SA # (OBSOLETE) D4T1 210 DRAW..SA. 1 SEQ 80 13 PAGE UM JULY 30, 1973 23:38.23 00071/001A LISTSTAT SA G W030:LISTSTAT(1,999) 5.1T1 66 LISTSTAT..SA.001 1 LINE 72 10 PAGE UM LIFT JULY 23, 1983 10:07:14 0 Program to print *STATISTICS records. Will read records on SCARDS from a file or blocked tape, such as produced by *CMB. Prints output on SPRINT. Alternate subroutine entry LIST#, used by SCAN (753), lets caller specify I/O FDUBS instead of SCARDS/SPRINT. Program must be run with PROT=OFF. If a rate number appears in the *STATISTICS record and the job was run after the beginning of 1974, the MTS GETRATES subroutine (651/11) is called to obtain a set of rates used to print the cost of the job. Otherwise, rates are obtained from assembled-in tables. For this reason, the program will have to be reassembled at each installation since the rate tables will be wrong. Assemble using COPY:MTS.MACROS (344/3). Copies COPY:RATEVEC (651/3). Source in lines 1,999. ***************************************************************************** D5.0B version: Changed to add new STAT record format. ***************************************************************************** 0 Referenced by comments of: 707/3, 753/5 00071/002A LISTSTAT OC G MTS:LISTSTAT 5.1T1 67 LISTSTAT..OC.002 1 LINE 7436 3 PAGE UM LIFT JULY 23, 1983 10:07:15 MTS:LISTSTAT 00072/001 *FORTEDIT SA O # (OBSOLETE) D3T1 170 FORTEDIT..SA.1 1 SEQ 80 20 PAGE UM JULY 30, 1973 23:39.26 00073/001 *DSK C *DSK 5.0T1 207 DSK..C.001 1 LINE 32 1 PAGE UM HELFFRICH JULY 03, 1981 12:35:13 5.0T1 207 FILE:*DSK 0 Command file to run SYS:DSK (073/5). Invoked by entering "MTS *DSK" on operators console. 0 Referenced by comments of: 644/1, 682/4 00073/002 *DSK *DSO C *DSO 5.0T1 208 DSK.*DSO.C.002 1 LINE 21 1 PAGE UBC HOGG HELFFRICH JULY 03, 1981 12:35:14 5.0T1 208 *DSO 0 Command file invoked by entering "MTS *DSO" from operator's console which signs on under user id "SYS" and runs SYS:DSK (073/5) with output to a temporary file, the end of which (showing the total disk space used and 1 SUN SEP 08/96 15:24:55 Page 39 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 available) is then copied to the operator's console. 00073/003 *DSK BASE SOURCE SA G FILE:DSKMAN(-10000,-1) 5.0T1 209 DSK.BASE_SOURCE.SA.003 1 LINE 80 6 PAGE UM HELFFRICH JULY 03, 1981 12:35:15 5.0T1 209 FILE:DSKMAN 0 This program is a front-end to the VOLREL subroutine, in (482/4). It allows the operators to manipulate information in the system's DSKTAB entries, which affect the availability and certain attributes of the mts public volumes. Volumes can be added to, removed from, or temporarily "forgotten" by the system. Additionally, they can also be designated to have the following characteristics: no catalog permitted; no files created on them unless explicitly requested; or no files created on them unless space is unavailable elsewhere. The program will also display information in the DSKTAB entries which are of operator interest, e.g., the number of free pages on each disk. Assemble using COPY:FILE.MACROS (482/45). See (682/4) for a writeup. 0 Referenced by comments of: 73/4 00073/004 *DSK UPDATE UC G FILE:DSKMAN(1000) 5.0T1 210 DSK.UPDATE.UC.004 1 LINE 68 3 PAGE UM HELFFRICH JULY 03, 1981 12:35:16 5.0T1 210 0 Update deck to be applied to (073/3) to yield current source. 00073/005 *DSK DSKMAN OC G SYS:DSK 5.0T1 211 DSK.DSKMAN.OC.005 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 12:35:18 5.0T1 211 SYS.:DSK 0 Referenced by comments of: 73/1, 73/2 00074/001 *2250EDIT SA # (OBSOLETE) D4T1 216 2250EDIT..SA. 1 SEQ 80 29 PAGE UM JULY 30, 1973 23:39.56 00076/001 RESERVE DISK *RSV C *RSV 5.0T1 212 RESERVE_DISK.*RSV.C.001 1 LINE 45 1 PAGE UM MTA JULY 03, 1981 12:35:19 5.0T1 212 *RSV 0 Command file to run the disk reserve program (076/3). Invoked by entering "MTS *RSV" on operator's console. 00076/002 RESERVE DISK RESERVE PGM SA G S1558 5.0T1 VLO FSNAME=RESERVE_DISK.RESERVE_PGM.SA.002(1) 213 5.0T1 213 RESERVE_DISK.RESERVE_PGM.SA.002 1 LINE 80 1 PAGE UM MTA JULY 30, 1973 23:40.00 5.0T1 213 0 Program to execute a reserve command for a disk pack. Used only with 2844 or 2 tail switch. 00076/003 RESERVE DISK RESERVE PGM OC G SYS:RSV 5.0T1 214 RESERVE_DISK.RESERVE_PGM.OC.003 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 12:35:24 5.0T1 214 SYS.:RSV 0 Referenced by comments of: 76/1 1 SUN SEP 08/96 15:24:55 Page 40 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00077/001 STATBUFF SA G S1558 5.0T1 VLO FSNAME=STATBUFF..SA.001(1) 215 5.0T1 215 STATBUFF..SA.001 1 LINE 80 1 PAGE UM HELFFRICH JULY 27, 1977 21:56:41 5.0T1 215 0 Points to the buffer used by the STAT job (079) if it is active. The second word points to the STAT job's job table. 00077/002 STATBUFF OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00078/001 STAT SUBROUTINE SA G S1558 5.0T1 VLO FSNAME=STAT_SUBROUTINE..SA.001(1) 216 5.0T1 216 STAT_SUBROUTINE..SA.001 1 LINE 80 4 PAGE UM HELFFRICH JULY 27, 1977 21:56:44 5.0T1 216 0 Subroutine to produce STAT job entries for MTS I/O. 00078/002 STAT SUBROUTINE OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00079/001A STAT JOB SA G W170:STAT.JOB(1000) 5.1T1 68 STAT_JOB..SA.001 1 LINE 80 13 PAGE UM HELFFRICH JULY 23, 1983 10:07:15 W170:STAT.JOB 0 The "STAT" job will save statistics about hardware interrupts, MTS I/O operations, and internal supervisor functions (such as the execution of SIO) on tape. Can produce large amounts of data quickly. *ANALYSIS (140) can help analyze the data. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). Assemble using COPY:SETPARM (653), COPY:MISC.MACROS (728), COPY:UC.MACROS (787/1), and OLD:CC.MACROS (1054/4). ********************************************************************** D5.0B version: Fixes bugs. ********************************************************************** 0 Referenced by comments of: 77/1, 79/3, 140/1, 787/20 00079/002A STAT JOB OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00079/003 STAT JOB STATSW SA G W170:STAT.PROG(1000) 5.0T1 218 STAT_JOB.STATSW.SA.003 1 LINE 72 5 PAGE UM HELFFRICH JULY 03, 1981 12:35:38 5.0T1 218 W170:STAT.PROG 0 The STATSW job program (which is also a MTS-callable routine) parses an input line from OPER (or SCARDS, if MTS called) and calls the STATSSUB subroutine in 1 SUN SEP 08/96 15:24:55 Page 41 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 the STAT job assembly (079/1) to do the dirty work relating to data collection recording switching. See the comments in the source listing. 0 Referenced by comments of: 79/5 00079/004 STAT JOB STATSW JOB OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00079/005 STAT JOB MTS STATSW OC G MTS:STATSW 5.0T1 219 STAT_JOB.MTS_STATSW.OC.005 1 LINE 24 1 PAGE UM HELFFRICH JULY 03, 1981 12:35:40 5.0T1 219 MTS.:STATSW 0 Contains RIP and LCS cards to force reference to the MTS entry point to STATSW (079/3) to enable the STATSW job to be run as an MTS program. 00079/006 STAT JOB MEMO 393 WF S0607 ARCHIV FSNAME=STAT.CCMEMO 5.0T1 220 STAT_JOB.MEMO_393.WF.006 1 LINE 97 2 PAGE UM HELFFRICH MAY 13, 1978 17:03:09 5.0T1 220 0 This is Computing Center Memo 393 -- "Data-Collection Facility". Requires hand-inserted characters. 0 Referenced by comments of: 140/2, 140/7 00080/001 INIT JOB SA G S1558 5.0T1 VLO FSNAME=INIT_JOB..SA.001(1) 221 5.0T1 221 INIT_JOB..SA.001 1 LINE 70 1 PAGE UM MTA JULY 03, 1981 12:35:44 5.0T1 221 0 After IPL, the "INIT" job is automatically started (without an operator request). If &OPERJOB (in COPY:GLOBALS) is set, the INIT job will start the operator job and wait up to 20 seconds for it to start. Then it starts the disk manager (769). After finding the disk locations of the MTS file catalogs, it turns over the remaining work of initializing the system to MTS by using the SVC STRTJB to start "MTS *INIT", see (097/1). Installations not using the operator job will want to change the value of &OPERJOB and reassemble the INIT job to remove the 20 second delay. Copies COPY:GLOBALS (1026/3). 00080/002 INIT JOB OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00082/001 DMOD SA # (OBSOLETE) D4T1 224 DMOD..SA.001 1 LINE 80 7 PAGE UM JULY 27, 1977 21:56:50 00083/001 *EBCDBCD SA G S1558 5.0T1 VLO FSNAME=EBCDBCD..SA.001(1) 222 5.0T1 222 EBCDBCD..SA.001 1 LINE 80 3 PAGE UM WSG JAN. 11, 1980 17:33:39 5.0T1 222 0 Program to translate arbitrary length 029 keypunch records to 026. Source in lines 1,999. 1 SUN SEP 08/96 15:24:55 Page 42 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00083/002 *EBCDBCD OC G *EBCDBCD 5.0T1 223 EBCDBCD..OC.002 1 LINE 80 1 PAGE UM WSG JULY 03, 1981 12:36:03 5.0T1 223 *EBCDBCD 00084/001 AUDIO RESP UNIT - 7772 ARURTN SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.AR.SA.001(1) 224 5.0T1 224 AUDIO_RESP_UNIT_-_7772.AR.SA.001 1 LINE 80 56 PAGE UM WSG JULY 28, 1976 00:35:37 5.0T1 224 0 Device support routines for the IBM 7772 Audio Response Unit. No longer in use at UM. References *ARUDEF (084/4) and *SPEAK (084/3). Uses BAS and BASR instructions like crazy. Assemble with PAR=IS=67. 0 Referenced by comments of: 84/3, 84/4 00084/002 AUDIO RESP UNIT - 7772 *ARURTN OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*A.OC.002(1) 225 5.0T1 225 AUDIO_RESP_UNIT_-_7772.*A.OC.002 1 LINE 80 4 PAGE UM WSG JULY 28, 1976 00:35:45 5.0T1 225 0 Object suitable for loading into shared VM. 00084/003 AUDIO RESP UNIT - 7772 *SPEAK D G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*S.D.003(1) 226 5.0T1 226 AUDIO_RESP_UNIT_-_7772.*S.D.003 1 LINE 255 60 PAGE UM WSG JULY 30, 1973 23:42.25 5.0T1 226 0 Vocabulary file for *ARURTN (084/1). 0 Referenced by comments of: 84/1 00084/004 AUDIO RESP UNIT - 7772 *ARUDEF D G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*A.D.004(1) 227 5.0T1 227 AUDIO_RESP_UNIT_-_7772.*A.D.004 1 LINE 10 1 PAGE UM WSG JULY 30, 1973 23:42.34 5.0T1 227 0 Public "text insertion" file for *ARURTN (084/1) 0 Referenced by comments of: 84/1 00084/005 AUDIO RESP UNIT - 7772 DCVD SUBR SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SA.005(1) 228 5.0T1 228 AUDIO_RESP_UNIT_-_7772.DC.SA.005 1 LINE 80 5 PAGE UM WSG FEB. 13, 1976 17:36:01 5.0T1 228 0 Subroutine to convert digitally coded voice from the format expected by the 7772 to a more reasonable format. 0 Referenced by comments of: 84/12, 84/15, 84/17 00084/006 AUDIO RESP UNIT - 7772 DCVD SUBR OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.OC.006(1) 229 5.0T1 229 AUDIO_RESP_UNIT_-_7772.DC.OC.006 1 LINE 80 1 PAGE UM WSG FEB. 13, 1976 17:36:06 5.0T1 229 0 Put this in *LIBRARY. 1 SUN SEP 08/96 15:24:55 Page 43 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00084/007 AUDIO RESP UNIT - 7772 DCVC SUBR SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SA.007(1) 230 5.0T1 230 AUDIO_RESP_UNIT_-_7772.DC.SA.007 1 LINE 80 4 PAGE UM WSG FEB. 13, 1976 17:36:17 5.0T1 230 0 Subroutine to convert digitally coded voice to the format expected by the 7772. 0 Referenced by comments of: 84/12, 84/15, 84/17 00084/008 AUDIO RESP UNIT - 7772 DCVC SUBR OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.OC.008(1) 231 5.0T1 231 AUDIO_RESP_UNIT_-_7772.DC.OC.008 1 LINE 80 1 PAGE UM WSG FEB. 13, 1976 17:36:26 5.0T1 231 0 Put this in *LIBRARY. 00084/009 AUDIO RESP UNIT - 7772 DCVG SUBR SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SA.009(1) 232 5.0T1 232 AUDIO_RESP_UNIT_-_7772.DC.SA.009 1 LINE 80 3 PAGE UM WSG FEB. 13, 1976 17:36:52 5.0T1 232 0 Subroutine to retrieve the digitally coded voice used by the 7772. 0 Referenced by comments of: 84/12, 84/15, 84/17 00084/010 AUDIO RESP UNIT - 7772 DCVG SUBR OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.OC.010(1) 233 5.0T1 233 AUDIO_RESP_UNIT_-_7772.DC.OC.010 1 LINE 80 1 PAGE UM WSG FEB. 13, 1976 17:36:55 5.0T1 233 0 Put this in *LIBRARY. 00084/011 AUDIO RESP UNIT - 7772 *ARUVOC D G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*A.D.011(1) 234 5.0T1 234 AUDIO_RESP_UNIT_-_7772.*A.D.011 1 LINE 102 11 PAGE UM WSG JULY 30, 1973 23:42.36 5.0T1 234 0 Listing of ARU vocabulary (*SPEAK) suitable for printing. 00084/012 AUDIO RESP UNIT - 7772 CREVOC SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.CR.SA.012(1) 235 5.0T1 235 AUDIO_RESP_UNIT_-_7772.CR.SA.012 1 LINE 80 19 PAGE UM WSG FEB. 13, 1976 17:38:37 5.0T1 235 0 Program to create an AUR vocabulary file. Calls the *LIBRARY subroutines DCVD (084/5), DCVC (084/7), and DCVG (084/9) as well as the MSG subroutine (084/13). 0 Referenced by comments of: 84/13, 84/14 00084/013 AUDIO RESP UNIT - 7772 CREVOC MSG SUB SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.CR.SA.013(1) 236 5.0T1 236 AUDIO_RESP_UNIT_-_7772.CR.SA.013 1 LINE 80 5 PAGE UM WSG FEB. 25, 1976 12:52:33 5.0T1 236 0 MSG subr called by CREVOC (084/12). 0 Referenced by comments of: 84/12, 84/14 1 SUN SEP 08/96 15:24:55 Page 44 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00084/014 AUDIO RESP UNIT - 7772 *CREVOC OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*C.OC.014(1) 237 5.0T1 237 AUDIO_RESP_UNIT_-_7772.*C.OC.014 1 LINE 80 3 PAGE UM WSG FEB. 25, 1976 12:51:48 5.0T1 237 0 Object for CREVOC (084/12) and the MSG subr (084/13). Also contains error messages starting at line 800. Line numbers are important in this file. 00084/015 AUDIO RESP UNIT - 7772 VLIST SA G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.VL.SA.015(1) 238 5.0T1 238 AUDIO_RESP_UNIT_-_7772.VL.SA.015 1 LINE 80 4 PAGE UM WSG FEB. 13, 1976 17:39:10 5.0T1 238 0 Program to either speak or print an Audio Response Unit vocabulary file. Calls the *LIBRARY subroutines DCVD (084/5), DCVC (084/7), and DCVG (084/9). 00084/016 AUDIO RESP UNIT - 7772 *VLIST OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*V.OC.016(1) 239 5.0T1 239 AUDIO_RESP_UNIT_-_7772.*V.OC.016 1 LINE 80 1 PAGE UM WSG FEB. 13, 1976 17:39:14 5.0T1 239 00084/017 AUDIO RESP UNIT - 7772 DCVDEC SF G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.DC.SF.017(1) 240 5.0T1 240 AUDIO_RESP_UNIT_-_7772.DC.SF.017 1 LINE 67 1 PAGE UM WSG FEB. 13, 1976 17:39:56 5.0T1 240 0 Program to form and list the info which would be transmitted to the ARU for a text line. Calls the *LIBRARY subroutines DCVD (084/5), DCVC (084/7), and DCVG (084/9). 00084/018 AUDIO RESP UNIT - 7772 *DCVDEC OC G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*D.OC.018(1) 241 5.0T1 241 AUDIO_RESP_UNIT_-_7772.*D.OC.018 1 LINE 454 1 PAGE UM WSG FEB. 13, 1976 17:40:05 5.0T1 241 00084/019 AUDIO RESP UNIT - 7772 *FSK D G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*F.D.019(1) 242 5.0T1 242 AUDIO_RESP_UNIT_-_7772.*F.D.019 1 LINE 31 1 PAGE UM WSG JULY 30, 1973 23:43.01 5.0T1 242 0 An ARU vocabulary that translates all output to 11-bit (frame size) ASCII code. 00084/020 AUDIO RESP UNIT - 7772 *IM D G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*I.D.020(1) 243 5.0T1 243 AUDIO_RESP_UNIT_-_7772.*I.D.020 1 LINE 87 1 PAGE UM WSG JULY 30, 1973 23:43.03 5.0T1 243 0 An ARU vocabulary that translates all output to international morse code. 00084/021 AUDIO RESP UNIT - 7772 *NOTES D G S1558 5.0T1 VLO FSNAME=AUDIO_RESP_UNIT_-_7772.*N.D.021(1) 244 5.0T1 244 AUDIO_RESP_UNIT_-_7772.*N.D.021 1 LINE 91 2 PAGE UM WSG JULY 30, 1973 23:43.05 5.0T1 244 0 An ARU vocabulary that defines two octaves of "musical" tones. 00086/001 *2501RTN SA G S1558 5.0T1 VLO FSNAME=2501RTN..SA.001(1) 245 5.0T1 245 2501RTN..SA.001 1 LINE 80 16 PAGE UM DWB JULY 27, 1977 21:58:36 5.0T1 245 0 MTS device support routines for the IBM 2501 card reader. Calls BINEBCD (243). 1 SUN SEP 08/96 15:24:55 Page 45 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 243/1 00086/002 *2501RTN OC G *2501RTN 5.0T1 246 2501RTN..OC.002 1 LINE 80 2 PAGE UM DWB JULY 03, 1981 12:36:20 5.0T1 246 *2501RTN 0 Object for 2501 routines. 00087/001A LLMPSEQU SA G COPY:LLMPSEQU 5.1T1 69 LLMPSEQU..SA.001 1 LINE 80 14 PAGE UM MTA JULY 23, 1983 10:07:17 COPY:LLMPSEQU 0 Copy section for definitions of job table, device list, device table, etc. which is copied by many programs. Its name comes straight from ancient history (Lincoln Labs multi-programming supervisor equalities). The line numbers in this file are important since some programs copy it starting at line 100. NOTE: Programs copying this file must first copy COPY:GLOBALS (1026/3). 0 Referenced by comments of: 5/1, 7/1, 8/1, 9/1, 9/3, 10/1, 19/1, 21/1, 24/1, 42/1, 44/1, 45/1, 46/1, 79/1, 101/1, 104/98, 116/1, 135/1, 198/1, 353/2, 354/1, 354/5, 387/1, 387/2, 387/7, 387/27, 388/1, 400/1, 400/5, 400/15, 413/1, 464/1, 482/4, 482/7, 500/51, 507/2, 509/1, 513/1, 531/1, 531/8, 539/1, 540/1, 540/3, 540/6, 540/8, 540/12, 540/17, 540/26, 545/3, 545/15, 554/1, 554/3, 570/1, 577/1, 577/3, 577/8, 577/11, 578/1, 615/15, 621/2, 629/4, 631/16, 634/1, 634/3, 635/1, 636/1, 637/1, 638/1, 639/1, 642/16, 647/1, 651/13, 682/24, 693/1, 731/3, 732/1, 770/1, 777/1, 798/75, 806/1, 818/1, 829/1, 866/1, 1012/1, 1021/1, 1021/4, 1079/18, 1081/1, 3024/1, 4000/1 00090/001 *HEXLIST SA # (OBSOLETE) D3T1 202 HEXLIST..SA.1 1 LINE 80 6 PAGE UM JULY 30, 1973 23:43.29 00091/001 *DOUBLE SA # (OBSOLETE) D3T1 204 DOUBLE..SA.1 1 LINE 80 16 PAGE UM JULY 27, 1973 22:03.05 00092/001 FILE RESTORE RSTFMT0 SA G RSTR:RSTFMT0(1000) 5.0T1 247 FILE_RESTORE.RSTFMT0.SA.001 1 LINE 71 28 PAGE UM HELFFRICH JULY 03, 1981 12:36:21 5.0T1 247 RSTR:RSTFMT0 0 Main program to restore files from tapes produced by FILESAVE or DEADFILES. Assemble using *SYSMAC. 0 Referenced by comments of: 92/2, 92/3, 92/4 00092/002 FILE RESTORE RSTFMT1 SA G RSTR:RSTFMT1(1000) 5.0T1 248 FILE_RESTORE.RSTFMT1.SA.002 1 LINE 71 17 PAGE UM HELFFRICH JULY 03, 1981 12:36:28 5.0T1 248 RSTR:RSTFMT1 0 Subroutine called by (092/1). Assemble using *SYSMAC. 0 Referenced by comments of: 92/4 1 SUN SEP 08/96 15:24:55 Page 46 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00092/003A FILE RESTORE RSTFMT2 SA G RSTR:RSTFMT2(1000) 5.1T1 70 FILE_RESTORE.RSTFMT2.SA.003 1 LINE 72 22 PAGE UM HELFFRICH JULY 23, 1983 10:07:17 RSTR:RSTFMT2 0 Subroutine called by (092/1) and *RESTORE (712). Assemble using *SYSMAC and COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 92/4, 712/1, 712/3, 712/4 00092/004A FILE RESTORE OC G RSTR:RST 5.1T1 71 FILE_RESTORE..OC.004 1 LINE 2256 25 PAGE UM HELFFRICH JULY 23, 1983 10:07:19 RSTR:RST 0 Object from (092/1), (092/2), and (092/3). Also contains object for old tape unit check routines, the source for which is not distributed since they are obsolete. 00092/005 FILE RESTORE *RST C *RST 5.0T1 251 FILE_RESTORE.*RST.C.005 1 LINE 66 1 PAGE UM HELFFRICH JULY 03, 1981 12:36:47 5.0T1 251 RSTR:*RST 0 Command file to run file restore program (RSTR:RST). Invoked by entering "MTS *RST" on operator's console. 00094/001 *TIME SA G S1558 5.0T1 VLO FSNAME=TIME..SA.001(1) 252 5.0T1 252 TIME..SA.001 1 LINE 80 2 PAGE UM TIFFANY JULY 27, 1977 21:59:07 5.0T1 252 0 Program to print time and date. 00094/002 *TIME OC G *TIME 5.0T1 253 TIME..OC.002 1 SEQ 247 1 PAGE UM TIFFANY JULY 03, 1981 12:36:49 5.0T1 253 *TIME 00096/001 *SYMBOLS SA G S1558 5.0T1 VLO FSNAME=SYMBOLS..SA.001(1) 254 5.0T1 254 SYMBOLS..SA.001 1 LINE 80 13 PAGE UM SHERRY MAR. 26, 1979 02:20:51 5.0T1 254 0 Prints external symbols defined in *LIBRARY, *SSP, and LCSYMBOL. 00096/002 *SYMBOLS OC G *SYMBOLS 5.0T1 255 SYMBOLS..OC.002 1 LINE 1628 3 PAGE UM SHERRY JULY 03, 1981 12:36:53 5.0T1 255 *SYMBOLS 00097/001 INIT *INIT C *INIT 5.0T1 256 INIT.*INIT.C.001 1 LINE 47 1 PAGE UM ENGLE JULY 03, 1981 12:36:54 5.0T1 256 INIT:*INIT 0 The command file *INIT is automatically invoked by the system after IPL. No operator action is required. This command file signs on under the id INIT and sources to INIT:INITCMD. *INIT(10), *INIT(20), *INIT(30), *INIT(40), and *INIT(50) are invoked later by ACCINITL in INIT:INIT to produce lists of the user ids which were not properly 1 SUN SEP 08/96 15:24:55 Page 47 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 signed off when the system last went down (if any) so that they may be "fixed". 0 Referenced by comments of: 80/1 00097/002A INIT INIT:INITCMD C INIT:INITCMD 5.1T1 72 INIT.INIT:INITCMD.C.002 1 LINE 84 1 PAGE UM MTA JULY 23, 1983 10:07:20 INIT:INITCMD 0 This file contains the commands necessary to initialize the system after a reload. The following functions are performed: 1. INIT:REASON (097/22) is created, permitted and emptied. 2. The current time and date are checked against the time and date of the last signoff in *STATISTICS (050/5) to verify, at least partially, that they are correct. 3. The program INITLOG (097/12) is run to obtain the reason for reloading from the operator and write it at the end of the file INIT:LOG (097/21) and into INIT:REASON. 4. The PDP is started. 5. INIT:REASON is copied to the end of INIT:RELOADLOG (097/23). 6. RAMROD is run to write the comments for the current system to INIT:REASON(2000), which is then copied to OPER. 7. The post-IPL loader, MTS *S2L (559/1), is started. 8. MTS *CLN (531/6) is started to begin the CMDSTAT data collection. 9. MTS *FSM (067/33) is started to clean up the online file save directories. 10. MTS *STI (050/2) is started to check for a system crash during the last statistics save. 11. The system status master job, JOBS MAC, is started. 12. ETC:SAVE.COUNTS is emptied. 13. The CLEAN program (097/8) is run to destroy any scratch files which were left around when the system last went down. 14. The INIT program (097/4) is run. It starts up 5 (the number of auxiliary accounting files) other jobs (MTS *INIT(10), MTS *INIT(20), etc.) to make 5 lists (in the files INIT1, INIT2, etc.) of the user IDs which were signed-on when the system last went down. When the 5 files are complete, it prints "THE ACCOUNTING FILE IS AVAILABLE" on the operators console and begins "fixing" the IDs. When finished, the total number of IDs fixed is printed on the console. No batch jobs should be allowed to run (i.e. don't release execution) until this information has printed, since it is possible that some of the batch jobs to be run will have user IDs which are still being fixed. It is ok to bring up terminal lines after the "ACCOUNTING FILE IS AVAILABLE" message prints and after the "POST-IPL SYSTEM LOADED OK" message prints, but some terminal users may not be able to signon until their user IDs have been fixed. These users will get a message which indicates that their IDs are temporarily unavailable. 0 Referenced by comments of: 50/2, 97/14, 531/6, 531/7, 559/1 00097/003C INIT TST.INITCMD C # MTS:TST.INITCMD UM MTA INIT:INITCMD@UM 00097/004A INIT INIT:INIT OE G INIT:INIT 5.1T1 73 INIT.INIT:INIT.OE.004 1 LINE 1298 4 PAGE UM ENGLE JULY 23, 1983 10:07:20 INIT:INIT 0 Program to initiate and control invocations of the program at INIT(1000) that fixes user IDs which were in use when the system last went down. 1 SUN SEP 08/96 15:24:55 Page 48 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This file must be given the program key INIT. This program references INIT1, INIT2, etc. to get the user IDs to be listed. These lists are built by the program at INIT(1000). 0 Referenced by comments of: 97/2, 104/95 00097/005A INIT INITCHK SA G ICHK S0027 DISTRB FSNAME=INITCHK 5.1T1 74 INIT.INITCHK.SA.005 1 LINE 80 4 PAGE UM ENGLE AUG. 26, 1982 11:28:33 0 Program to check for reinitialization and that the operator has entered a "reasonable" time and date. Copies GRDEF (104/83). 0 Referenced by comments of: 104/91 00097/006C INIT INITCHK UC G S0027 DISTRB FSNAME=INITCHKUPD 5.1T1 75 INIT.INITCHK.UC.006 1 LINE 72 1 PAGE UM ENGLE AUG. 26, 1982 11:28:39 0 Updates source from previous regular distribution to current one. 00097/007A INIT INIT:INITCHK OC G INIT:INITCHK 5.1T1 76 INIT.INIT:INITCHK.OC.007 1 LINE 1280 2 PAGE UM ENGLE JULY 23, 1983 10:10:37 INIT:INITCHK 0 Referenced by comments of: 104/91 00097/008 INIT CLEAN SA G FILE:SFDESTRY 5.0T1 260 INIT.CLEAN.SA.006 1 LINE 70 2 PAGE UM HELFFRICH JULY 03, 1981 12:36:57 5.0T1 260 FILE:SFDESTRY 0 Program to destroy scratch files. Assemble using COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 97/2 00097/009 INIT CLEAN OC G INIT:CLEAN 5.0T1 261 INIT.CLEAN.OC.007 1 LINE 80 1 PAGE UM HELFFRICH JULY 03, 1981 12:36:57 5.0T1 261 INIT:CLEAN 00097/010 INIT DINIT SA O S1558 5.0T1 VLO FSNAME=INIT.DINIT.SA.008(1) 262 5.0T1 262 INIT.DINIT.SA.008 1 LINE 80 7 PAGE UM DWB AUG. 01, 1973 00:54.09 5.0T1 262 0 Drum initialization program. Has table of drum names to use assembled in. As distributed, the table contains two names: DRM1 and DRM2. If the program can't acquire any of the specified drums from the supervisor, it prints "nnnn NOT AVAILABLE" and goes on to the next drum. 00097/011 INIT DINIT OC INIT:DINIT 5.0T1 263 INIT.DINIT.OC.009 1 LINE 80 4 PAGE UM DWB JULY 03, 1981 12:36:59 5.0T1 263 INIT:DINIT 00097/012A INIT INITLOG SA G INIT:INITLOG.S 5.1T1 77 INIT.INITLOG.SA.012 1 LINE 62 1 PAGE UM MTA JULY 23, 1983 10:10:37 0 Program to log reloads. Run by *INIT and asks operator for reason for reload. 1 SUN SEP 08/96 15:24:55 Page 49 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Copies *CNFGINFODSECT (654). Assemble using *SYSMAC. ************************************************************************* D5.0B version: Minor changes for the 5860. ************************************************************************* 0 Referenced by comments of: 97/2 00097/013A INIT INITLOG OC G INIT:INITLOG 5.1T1 78 INIT.INITLOG.OC.013 1 LINE 661 2 PAGE UM MTA JULY 23, 1983 10:10:37 INIT:INITLOG 00097/014 INIT FMT2305 SA G S1558 5.0T1 VLO FSNAME=INIT.FMT2305.SA.012(1) 266 5.0T1 266 INIT.FMT2305.SA.012 1 LINE 68 4 PAGE UBC MTA JULY 03, 1981 12:37:01 5.0T1 266 0 MTS program to initialize (i.e. format) a 2305 or its understudy. This program is run from INIT:INITCMD (097/2) at startup to format a 2305 before starting the PDP. 00097/015 INIT FMT2305 OC G INIT:FMT2305 5.0T1 267 INIT.FMT2305.OC.013 1 SEQ 80 2 PAGE UBC MTA JULY 03, 1981 12:37:02 5.0T1 267 INIT:FMT2305 00097/016 INIT INIT:INIT1 D # INIT:INIT1 UM ENGLE INIT:INIT1@E 0 List of user IDs in *ACCOUNTING1 which need to be fixed after IPL. 00097/017 INIT INIT:INIT2 D # INIT:INIT2 UM ENGLE INIT:INIT2@E 0 List of user IDs in *ACCOUNTING2 which need to be fixed after IPL. 00097/018 INIT INIT:INIT3 D # INIT:INIT3 UM ENGLE INIT:INIT3@E 0 List of user IDs in *ACCOUNTING3 which need to be fixed after IPL. 00097/019 INIT INIT:INIT4 D # INIT:INIT4 UM ENGLE INIT:INIT4@E 0 List of user IDs in *ACCOUNTING4 which need to be fixed after IPL. 1 SUN SEP 08/96 15:24:55 Page 50 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00097/020 INIT INIT:INIT5 D # INIT:INIT5 UM ENGLE INIT:INIT5@E 0 List of user IDs in *ACCOUNTING5 which need to be fixed after IPL. 00097/021 INIT INIT:LOG D # INIT:LOG UM MTA INIT:LOG@E 0 Log of system reloads. Contains the time and date of each reload, the name of the system IPLed from, the reason for the reload (as entered by the operator), the list of scratch files destroyed, and the list of user IDs fixed. 0 Referenced by comments of: 97/2 00097/022 INIT INIT:REASON D # INIT:REASON UM MTA INIT:REASON@E 0 file to contain reason for reloading and current system name and comments after each reload. 0 Referenced by comments of: 97/2 00097/023 INIT INIT:RELOADLOG D # INIT:RELOADLOG UM MTA INIT:RELOADLOG@E 0 log of system reloads. Same as INIT:LOG except does not contain the lists of scratch files or user IDs. 0 Referenced by comments of: 97/2 00098/001 *SQUASH SA # (OBSOLETE) D2T1 278 UM 0 Obsoleted by *LINKEDIT (297) and *OBJUTIL (721). 00099/001 *IHC M # (OBSOLETE) D3T1 225 IHC..M. 1 LINE 68 1 PAGE UM JULY 30, 1973 23:46.44 00100/001 *FILEDUMP SA G S1558 5.0T1 VLO FSNAME=FILEDUMP..SA.001(1) 268 5.0T1 268 FILEDUMP..SA.001 1 LINE 80 8 PAGE UM PIRKOLA JULY 27, 1977 22:03:25 5.0T1 268 0 Use *TAPEDUMP instead. 00100/002 *FILEDUMP OC G *FILEDUMP 5.0T1 269 FILEDUMP..OC.002 1 LINE 80 3 PAGE UM PIRKOLA JULY 03, 1981 12:37:04 5.0T1 269 *FILEDUMP 1 SUN SEP 08/96 15:24:55 Page 51 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00101/001A MOUNT COMMAND SA G TAPE:MOUNT.S 5.1T1 79 MOUNT_COMMAND..SA.001 1 LINE 133 68 PAGE UM SHERRY JULY 23, 1983 10:10:37 0 This is new MOUNT CLS/subroutine which is based on the UBC rewrite of the UM version, by Ken Bowler. The comments on the source file document the differences between the two versions. this version of mount requires several changes to MTS, viz., 1) the internal tables addresses RSVNMTBA and FYTPTBLA in MTS must be made available to mount through LCSYMBOL 2) MSGCC is required 3) the CLS transfer vector routine PKEY is required to push, set, and pop program keys 4) a port in the GATE for the MOUNT subroutine is required 5) HALTIO entry is needed for the OPERATOR DSR. This version of the MOUNT subroutine supports the extended calling sequence described in MTS Volume 3 (501). Supports magnetic tapes, 2671 paper tape reader, paper tape punches on the UM Data Concentrator, 7772 audio response unit, floppy disks, and the Merit the maximum number of devices of each type (if zero, the code and tables to support that type are deleted). Another assembly parameter specifies the rack number for scratch tapes (distributed as 'POOL'). Other parameters specify the default density for scratch tapes (distributed as 8en for 7-track and 1600 for 9-track). Another parameter specifies whether the tape ID is required (as distributed, it is). Another parameter specifies the supervisor lock number, if any, to be used for interlocking the operator communication, i.e. to prevent multiple mount requests from being presented to the operator simultaneously. This is distributed as zero, i.e. no interlocking). MOUNT calls the MNTSTAT subroutine (447/1) to record a MOUNT statistics record for every mount request. It also calls CUINFO for each mount done by the operator to increment the mount count (for billing). MOUNT will refuse any mount requiring operator intervention if the system is in unattended mode or if NTM is ON (batch jobs are rerun). Interfaces with the TAPESHARE check subroutine (1067/5). Copies COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), COPY:JOBSTA (413/9), COPY:LLMPSEQU (087), *GDINFODSECT (594), *CNFGINFODSECT (654), *SENSEDSECT (3025), and COPY:MNTGINFDSECT (806/3). Assemble using COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4), and *SYSMAC with PAR=PEXIT=*PEXIT. ******************************************************************************** D5.0A version: A couple of bugs fixed. ******************************************************************************** ******************************************************************************** D5.0B version: - Some changes to Merit support. - Changes to call CSSET to set the CLS command status. 1 SUN SEP 08/96 15:24:55 Page 52 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 - Some bug fixes. ******************************************************************************** ***************************************************************************** D5.1 version: CSSET call changed, bug in VOLUME command fixed, minor Merit change. ***************************************************************************** 0 Referenced by comments of: 101/2, 271/1, 447/1, 806/1, 806/3, 1067/5 00101/002A MOUNT COMMAND OC G *CLSMOUNT 5.1T1 80 MOUNT_COMMAND..OC.002 1 LINE 27126 34 PAGE UM SHERRY JULY 23, 1983 10:10:41 *CLSMOUNT 0 Object for the MOUNT command CLS (101/1), the MNTSTAT subroutine (447/1), the MSGRACK# message (101/3) and the Tapeshare CHECK subroutine (1067/5). This file is loaded into shared VM after IPL by PISTLE. 0 Referenced by comments of: 447/2, 1067/6 00101/003 MOUNT COMMAND MSG RACK # SA G TAPE:MSGRACK#.S 5.0T1 272 MOUNT_COMMAND.MSG_RACK_#.SA.003 1 LINE 66 1 PAGE UM SHERRY JULY 03, 1981 12:37:22 5.0T1 272 0 This subcomponent is just a MSG routine (1023) message that is printed by the MOUNT CLS whenever certain rack numbers are mounted. The TAPESHARE routine CHECK (1067/5) gives a special return code to mount whenever certain rack numbers are referenced (they have a special field in their directory entries). This mechanism can be disabled by removing the object for MSGRACK# from *CLSMOUNT. 0 Referenced by comments of: 101/2 00101/004 MOUNT COMMAND *MOUNTSUB OC G *MOUNTSUB 5.0T1 274 MOUNT_COMMAND.*MOUNTSUB.OC.005 1 LINE 25 1 PAGE UM MTS SHERRY JULY 03, 1981 12:37:24 5.0T1 274 *MOUNTSUB 0 This file contains an ENT card for the symbol "MOUNTSUB" followed by a "$CONTINUE WITH *CLSMOUNT" card. It is used as the file name in the LOADT table in MTS, and is loaded from if the MOUNTSUB subroutine is not defined in LCSYMBOL. 00101/005 MOUNT COMMAND *MOUNT # (OBSOLETED BY $MOUNT) D3T1 230 MOUNT.*MOUNT.OC.3 1 LINE 24 1 PAGE UM JULY 30, 1973 23:47.04 00102/001 *DISMOUNT # (OBSOLETED BY $RELEASE) D3T1 232 DISMOUNT.*DISMOUNT.OC.3 1 LINE 24 1 PAGE UM JULY 30, 1973 23:47.08 00104/001A ACCOUNTING ACCFORMAT SA G AFMT S0027 DISTRB FSNAME=ACCFORMAT 5.1T1 81 ACCOUNTING.ACCFORMAT.SA.001 1 SEQ 80 3 PAGE UM ENGLE NOV. 23, 1982 16:41:42 0 COMPONENT (104) CONTAINS THE SOURCE AND OBJECT FOR THE MTS ACCOUNTING ROUTINES. THE FOLLOWING PROGRAMS CAN BE CONSTRUCTED BY COMBINING THE OBJECT FILES AS INDICATED BELOW: 1 SUN SEP 08/96 15:24:55 Page 53 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 *ACCRESTORE ASTR+AFLU+AIO+GTFL+ACAT+FLRT+CSIG+TV+DEFS *STATUS STAT+TZXP+TZON+TV+SYSDEFS ACC:ACCDISPLAY ADSP+ACCLIB ACC:ACCERRORSCAN ACNS+ACCLIB ACC:ACCFILCHARGE ADSP+AFLC+ACCLIB ACC:ACCHEXDISP ADSP+AXPR+ACCLIB ACC:ACCLISTING ALST+ACCLIB ACC:ACCMAINT AMAT+ACCLIB ACC:ACCPASWD APSW+GTFL+AIO+TZON+FLNM+TV ACC:ACCRETRIEVE ARTV+ATRD+ACCLIB ACC:ACCSAVE ASAV+ACCLIB ACC:DIRDISPLAY DDSP+ACCLIB ACC:DIRLIST DLST+ACCLIB ACC:GETFILECHG FLUP+TZXP+AIO+TZON+FLRT+TTRP+GTFL+TV+ SYSDEFS ACC:PROJECTDISP APDS+ACCLIB ACC:PROJECTIDS APID+ACCLIB ACC:PROJECTLIST APLS+ACCLIB ACC:PROJECTMAINT APMT+ACCLIB ACC:DISPROJECT AMXM(&STAPRJ=1)+ACCLIB ACCUPDAT ARDW+PRINT+AIO+TTRP+GTFL+OLDPRINT+ ACCPRINT+TZON+TV+LCNT+ACCUPDAT INIT:INIT(1,999) AINT INIT:INIT(1000) AINS+GTFL+FLNM+AFLU+OFLD+ACAT+AIO+TV+ FLRT+CSIG+SYSDEFS ACC:ACCLIB ACAT+ACNV+AERR+AFIN+AFKF+AFLA+AFLU+AIO+ AIOI+ALPR+ALST+APLS+APPR+APRT+AUPR+CSIG+ DIR+DPRT+FIOC+FLNM+FLRT+FLSH+GPID+GTFL+ IOLC+LCNT+LOG+OFLD+RBTA+SCNV+STRD+TMCL+ TTRP+TV+TZON+TZXP+SYSDEFS (SEE ACCOUNTING CLS FOR FIOC (631/14) AND AUPR (631/13); BILLING FOR SCNV (500/61); REBATE FOR RBTA (632/6) AND TIMEZONE FOR TZON (834/3) AND TZXP (834/6). ACCFORMAT (104/1) IS THE COPY SECTION THAT DESCRIBES THE ACCOUNTING FILE RECORD FORMAT. IT IS COPIED UNDER THE NAME "ACCFORMAT" BY COMPONENTS OF THE ACCOUNTING SYSTEM. *** NOTE: ACCOUNTING PROGRAMS HAVE A GBLB SYMBOL (&DC) TO ELIMINATE THE ASSEMBLY OF INSTRUCTIONS FOR THE DATA CELL. IF THE VALUE OF &DC IS 0, THE INSTRUCTIONS WILL NOT BE ASSEMBLED. IF THE VALUE IS 1, THE INSTRUCTIONS WILL BE ASSEMBLED. ALL DISTRIBUTION PROGRAMS HAVE THE VALUE SET TO 0, AND THE RESULTS OF SETTING &DC TO 1 ARE NOT GUARANTEED. *************************************************************************** D5.0C version: ACCFORMAT has been changed to full word fields for maximum and current file space. Previously distributed programs will not assemble correctly with this version if they reference these fields. *************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 54 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 104/1, 104/5, 104/8, 104/11, 104/13, 104/15, 104/18, 104/24, 104/30, 104/36, 104/57, 104/61, 104/73, 104/92, 104/95, 104/101, 104/104, 104/108, 104/111, 104/116, 104/121, 502/1, 586/1, 631/8, 631/11, 632/4 00104/002A ACCOUNTING ACCFORMAT UC G S0027 DISTRB FSNAME=ACCFORMATUPD 5.1T1 82 ACCOUNTING.ACCFORMAT.UC.002 1 LINE 72 2 PAGE UM ENGLE NOV. 23, 1982 16:41:49 0 Updates source from previous regular distribution to current distribution. 00104/003 ACCOUNTING ACCPROJFMT SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCPROJFMT.SA.002(1) 276 5.0T1 276 ACCOUNTING.ACCPROJFMT.SA.002 1 LINE 80 1 PAGE UM ENGLE JAN. 25, 1979 16:25:29 5.0T1 276 0 COPIED UNDER THE NAME "ACCPROJFMT" TO GIVE THE FORMAT OF THE PROJECT FILE *PROJECT. 0 Referenced by comments of: 104/24, 104/48, 104/61, 104/158, 500/37, 500/41, 631/8 00104/004 ACCOUNTING ACCPROJFMT UC G # S0027 DISTRB FSNAME=ACCPROJFMT D4.2T1 51 ACCOUNTING.ACCPROJFMT.UC.003 1 LINE 67 1 PAGE UM ENGLE JAN. 25, 1979 16:25:32 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/005A ACCOUNTING ACCERROR SA G AERR S0027 DISTRB FSNAME=ACCERROR 5.1T1 83 ACCOUNTING.ACCERROR.SA.005 1 LINE 80 8 PAGE UM ENGLE MAY 23, 1983 14:51:04 0 CHECKS ACCOUNTING RECORD FOR ERRORS (SUCH AS NEGATIVE NUMBERS). PART OF ACCERRORSCAN (104/64). COPIES ACCFORMAT (104/1). 00104/006C ACCOUNTING ACCERROR UC G S0027 DISTRB FSNAME=ACCERRORUPD 5.1T1 84 ACCOUNTING.ACCERROR.UC.006 1 LINE 72 3 PAGE UM ENGLE MAY 23, 1983 14:51:07 0 Updates source from previous regular distribution to current one. 00104/007A ACCOUNTING ACCERROR OC G S0027 DISTRB FSNAME=AERR 5.1T1 85 ACCOUNTING.ACCERROR.OC.007 1 LINE 80 3 PAGE UM ENGLE MAY 23, 1983 14:51:11 00104/008A ACCOUNTING ACCPRINT SA G APRT S0027 DISTRB FSNAME=ACCPRINT 5.1T1 86 ACCOUNTING.ACCPRINT.SA.008 1 LINE 80 11 PAGE UM ENGLE NOV. 23, 1982 16:20:40 0 FORMATS AN ACCOUNTING RECORD FOR PRINTING. SUBROUTINE USED BY SEVERAL PROGRAMS. COPIES ACCFORMAT (104/1). 0 Referenced by comments of: 104/150 00104/009A ACCOUNTING ACCPRINT UC G S0027 DISTRB FSNAME=ACCPRINTUPD 5.1T1 87 ACCOUNTING.ACCPRINT.UC.009 1 LINE 72 5 PAGE UM ENGLE NOV. 23, 1982 16:20:44 0 Updates source from previous regular distribution to current one. 00104/010A ACCOUNTING ACCPRINT OC G S0027 DISTRB FSNAME=APRT 5.1T1 88 ACCOUNTING.ACCPRINT.OC.010 1 LINE 80 6 PAGE UM ENGLE NOV. 23, 1982 16:20:47 1 SUN SEP 08/96 15:24:55 Page 55 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/011A ACCOUNTING ACCLIST SA G ALST S0027 DISTRB FSNAME=ACCLIST 5.1T1 89 ACCOUNTING.ACCLIST.SA.011 1 LINE 80 4 PAGE UM ENGLE AUG. 20, 1982 16:43:36 0 READS THE ACCOUNTING FILE AND CALLS ACCLSTPR FOR EACH RECORD. COPIES ACCFORMAT (104/1). 00104/012C ACCOUNTING ACCLIST UC G S0027 DISTRB FSNAME=ACCLISTUPD 5.1T1 90 ACCOUNTING.ACCLIST.UC.012 1 LINE 72 1 PAGE UM ENGLE AUG. 20, 1982 16:43:38 0 Updates source from previous regular distribution to current distribution. 00104/013A ACCOUNTING ACCLIST OC G S0027 DISTRB FSNAME=ALST 5.1T1 91 ACCOUNTING.ACCLIST.OC.013 1 LINE 80 2 PAGE UM ENGLE AUG. 20, 1982 16:43:42 0 Copies ACCFORMAT (104/1). 00104/014A ACCOUNTING ACCLIST OC G ACC:ACCLISTING 5.1T1 92 ACCOUNTING.ACCLIST.OC.014 1 LINE 224 1 PAGE UM ENGLE JULY 23, 1983 10:11:31 ACC:ACCLISTING 0 Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record. 00104/015 ACCOUNTING ACCINITL SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCINITL.SA.012(1) 283 5.0T1 283 ACCOUNTING.ACCINITL.SA.012 1 LINE 80 6 PAGE UM ENGLE AUG. 13, 1980 10:36:53 5.0T1 283 0 RESTORES LOCK BITS AND FILE SPACE FIELDS FOR ALL RECORDS WITH CURRENT NUMBER OF SIGNONS > 0. COPIES ACCFORMAT (104/1). 00104/016 ACCOUNTING ACCINITL UC G # S0027 DISTRB FSNAME=ACCINITLUPD 5.0T1 284 ACCOUNTING.ACCINITL.UC.013 1 LINE 72 3 PAGE UM ENGLE AUG. 13, 1980 10:37:01 5.0T1 284 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/017 ACCOUNTING ACCINITL OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCINITL.OC.014(1) 285 5.0T1 285 ACCOUNTING.ACCINITL.OC.014 1 LINE 80 2 PAGE UM ENGLE AUG. 13, 1980 10:37:08 5.0T1 285 00104/018A ACCOUNTING STATUS SA G STAT S0027 DISTRB FSNAME=STATUS 5.1T1 93 ACCOUNTING.STATUS.SA.018 1 LINE 80 27 PAGE UM ENGLE AUG. 20, 1982 16:48:48 0 MAIN PROGRAM FOR *STATUS (129/2). COPIES ACCFORMAT (104/1). THIS PROGRAM HAS A GLOBAL SYMBOL &CLS. IF &CLS IS 0, THE OBJECT FOR *STATUS IS PRODUCED. IF &CLS IS 1, A SUBROUTINE TO BE CALLED BY THE ACCOUNTING CLS IS PRODUCED. THIS LATTER ASSEMBLY USES COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 129/1, 129/2 00104/019A ACCOUNTING STATUS UC G S0027 DISTRB FSNAME=STATUSUPD 5.1T1 94 ACCOUNTING.STATUS.UC.019 1 LINE 72 3 PAGE UM ENGLE AUG. 20, 1982 16:49:01 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 1 SUN SEP 08/96 15:24:55 Page 56 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/020A ACCOUNTING STATUS OC G S0027 DISTRB FSNAME=STAT 5.1T1 95 ACCOUNTING.STATUS.OC.020 1 LINE 80 6 PAGE UM ENGLE AUG. 20, 1982 16:49:04 0 OBJECT FOR *STATUS (129/2). 00104/021A ACCOUNTING STATUS OC G S0027 DISTRB FSNAME=STATCLS 5.1T1 96 ACCOUNTING.STATUS.OC.021 1 LINE 80 7 PAGE UM ENGLE AUG. 20, 1982 16:49:10 0 OBJECT FOR ACCOUNTING CLS SUBROUTINE. 0 Referenced by comments of: 631/22, 631/24 00104/022 ACCOUNTING FILERATE SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.FILERATE.SA.019(1) 290 5.0T1 290 ACCOUNTING.FILERATE.SA.019 1 LINE 80 3 PAGE UM ENGLE DEC. 05, 1975 10:10:41 5.0T1 290 0 SUBROUTINE TO RETURN A CURRENT RATE NUMBER AND THE FILE RATES FOR A SIGNON ID. COPIES GRDEF (104/83) AND COPY:RATEVEC (651/3). 0 Referenced by comments of: 484/1 00104/023A ACCOUNTING FILERATE OC G S0027 DISTRB FSNAME=FLRT 5.1T1 97 ACCOUNTING.FILERATE.OC.023 1 LINE 80 1 PAGE UM ENGLE AUG. 20, 1982 17:03:48 0 *********************************************************************** D5.0B version: Reassembled for new accounting record format. *********************************************************************** 00104/024A ACCOUNTING ACCMAINT SA G AMAT S0027 DISTRB FSNAME=ACCMAINT 5.1T1 98 ACCOUNTING.ACCMAINT.SA.024 1 LINE 80 63 PAGE UM ENGLE MAY 23, 1983 14:50:48 0 Main program for ACCMAINT. Run with PROT=OFF. Copies ACCFORMAT (104/1) and ACCPROJFMT (104/3). The external symbol ACCLOGFL contains the name of a file (ACC:ACCLOG) into which a log is written. 0 Referenced by comments of: 104/150 00104/025A ACCOUNTING ACCMAINT UC G S0027 DISTRB FSNAME=ACCMAINTUPD 5.1T1 99 ACCOUNTING.ACCMAINT.UC.025 1 LINE 72 10 PAGE UM ENGLE MAY 23, 1983 14:50:56 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/026A ACCOUNTING ACCMAINT OC G S0027 DISTRB FSNAME=AMAT 5.1T1 100 ACCOUNTING.ACCMAINT.OC.026 1 LINE 80 11 PAGE UM ENGLE MAY 23, 1983 14:51:00 00104/027A ACCOUNTING ACCMAINT OE G ACC:ACCMAINT 5.1T1 101 ACCOUNTING.ACCMAINT.OE.027 1 LINE 5618 5 PAGE UM ENGLE JULY 23, 1983 10:12:19 ACC:ACCMAINT 0 Contains a $CONTINUE WITH ACC:ACCLIB record. 1 SUN SEP 08/96 15:24:55 Page 57 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/028 ACCOUNTING ACCIO SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCIO.SA.025(1) 295 5.0T1 295 ACCOUNTING.ACCIO.SA.025 1 LINE 80 15 PAGE UM ENGLE JUNE 04, 1976 14:22:22 5.0T1 295 0 GENERAL I/O SUBROUTINES FOR THE ACCOUNTING FILE(S). 0 Referenced by comments of: 104/47, 484/1 00104/029 ACCOUNTING ACCIO OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCIO.OC.026(1) 296 5.0T1 296 ACCOUNTING.ACCIO.OC.026 1 LINE 80 3 PAGE UM ENGLE JUNE 04, 1976 14:22:35 5.0T1 296 0 THERE ARE REP CARDS IN THIS FILE TO CHANGE FILE NAMES TO PUBLIC FILES. 0 Referenced by comments of: 104/118, 104/119, 104/120, 631/22, 631/24 00104/030 ACCOUNTING ACCGFUPD SA G # S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCGFUPD.SA.027(1) 297 5.0T1 297 ACCOUNTING.ACCGFUPD.SA.027 1 LINE 72 1 PAGE UM ENGLE MAR. 21, 1975 01:02:18 5.0T1 297 0 PROGRAM TO UPDATE FILE STORAGE FIELDS FOR ALL USERIDS. RUN WITH ACCRDWRT (104/39). COPIES ACCFORMAT (104/1). 0 Referenced by comments of: 104/39 00104/031 ACCOUNTING ACCGFUPD OC G # W013:ACCGFUPD(1,98) 299 5.0T1 298 ACCOUNTING.ACCGFUPD.OC.028 1 LINE 80 1 PAGE UM ENGLE JULY 03, 1981 12:41:21 5.0T1 298 0 Referenced by comments of: 682/38 00104/032A ACCOUNTING ACCDSPLA SA G ADSP S0027 DISTRB FSNAME=ACCDSPLA 5.1T1 102 ACCOUNTING.ACCDSPLA.SA.032 1 LINE 80 4 PAGE UM ENGLE AUG. 20, 1982 17:19:45 0 PROGRAM TO READ A SPECIFIC RECORD OF THE ACCOUNTING FILE AND CALL ACCPRINT FOR IT. 00104/033C ACCOUNTING ACCDSPLA UC G S0027 DISTRB FSNAME=ACCDSPLAUPD 5.1T1 103 ACCOUNTING.ACCDSPLA.UC.033 1 LINE 72 1 PAGE UM ENGLE AUG. 20, 1982 17:19:49 0 Updates source from previous regular distribution to current one. 00104/034A ACCOUNTING ACCDSPLA OC G S0027 DISTRB FSNAME=ADSP 5.1T1 104 ACCOUNTING.ACCDSPLA.OC.034 1 LINE 80 2 PAGE UM ENGLE AUG. 20, 1982 17:19:53 00104/035A ACCOUNTING ACCDSPLA OC G ACC:ACCDISPLAY 5.1T1 105 ACCOUNTING.ACCDSPLA.OC.035 1 LINE 216 1 PAGE UM ENGLE JULY 23, 1983 10:12:39 ACC:ACCDISPLAY 00104/036A ACCOUNTING ACCSTRUP SA G ASTR S0027 DISTRB FSNAME=ACCSTRUP 5.1T1 106 ACCOUNTING.ACCSTRUP.SA.036 1 LINE 80 6 PAGE UM ENGLE AUG. 23, 1982 11:36:59 0 MAIN PROGRAM OF *ACCRESTORE - THE PROGRAM THAT *FIX RUNS. RUN WITH PROT=OFF. COPIES ACCFORMAT (104/1). 1 SUN SEP 08/96 15:24:55 Page 58 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 484/1 00104/037C ACCOUNTING ACCSTRUP UC G S0027 DISTRB FSNAME=ACCSTRUPUPD 5.1T1 107 ACCOUNTING.ACCSTRUP.UC.037 1 LINE 72 2 PAGE UM ENGLE AUG. 23, 1982 11:37:04 0 Updates source from previous regular distribution to current one. 00104/038A ACCOUNTING ACCSTRUP OC G S0027 DISTRB FSNAME=ASTR 5.1T1 108 ACCOUNTING.ACCSTRUP.OC.038 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 11:37:12 00104/039 ACCOUNTING ACCRDWRT SA G # S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCRDWRT.SA.034(1) 303 5.0T1 303 ACCOUNTING.ACCRDWRT.SA.034 1 LINE 80 6 PAGE UM ENGLE OCT. 05, 1972 12:20.15 5.0T1 303 0 PROGRAM TO PERFORM GENERAL REFORMATTING OPERATION ON THE ACCOUNTING FILE. IT CALLS A USER PROVIDED SUBROUTINE CALLED ACCUPDAT TO DO THE ACTUAL REFORMATTING. ACCGFUPD (104/30) IS AN EXAMPLE OF SUCH A SUBROUTINE. THE COMMENTS AT THE FRONT OF THIS SUBCOMPONENT GIVE MORE INFORMATION. 0 Referenced by comments of: 104/30 00104/040 ACCOUNTING ACCRDWRT OC G # S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCRDWRT.OC.035(1) 304 5.0T1 304 ACCOUNTING.ACCRDWRT.OC.035 1 LINE 80 2 DISK UM ENGLE OCT. 05, 1972 12:20.35 5.0T1 304 0 Referenced by comments of: 682/38 00104/041A ACCOUNTING PRJCONVERT SG G S0027 DISTRB FSNAME=PRJCONVERT 5.1T1 109 ACCOUNTING.PRJCONVERT.SG.041 1 LINE 61 1 PAGE UM ENGLE AUG. 23, 1982 11:49:41 0 Converts a Distribution 5.0 project file to Distribution 5.1 ... by converting expiration times to GMT. Old project file is read by SCARDS; new project file is on SPUNCH. Listing of new project file is on SPRINT. 0 Referenced by comments of: 632/3 00104/042A ACCOUNTING PRJCONVERT OC G S0027 DISTRB FSNAME=PCNV 5.1T1 110 ACCOUNTING.PRJCONVERT.OC.042 1 LINE 80 1 PAGE UM ENGLE AUG. 23, 1982 11:50:07 00104/043A ACCOUNTING ACCPRJMT SA G APMT S0027 DISTRB FSNAME=ACCPRJMT 5.1T1 111 ACCOUNTING.ACCPRJMT.SA.043 1 LINE 80 30 PAGE UM ENGLE MAY 25, 1983 14:36:42 0 MAIN PROGRAM FOR PROJECTMAINT - THE PROGRAM THAT MAINTAINS *PROJECT. RUN WITH PROT=OFF. THE EXTERNAL SYMBOL ACCLOGFL CONTAINS THE NAME OF A FILE (ACC:ACCLOG) INTO WHICH A LOG IS WRITTEN. 0 Referenced by comments of: 104/150 00104/044A ACCOUNTING ACCPRJMT UC G S0027 DISTRB FSNAME=ACCPRJMTUPD 5.1T1 112 ACCOUNTING.ACCPRJMT.UC.044 1 LINE 72 4 PAGE UM ENGLE MAY 25, 1983 14:36:52 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 1 SUN SEP 08/96 15:24:55 Page 59 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/045A ACCOUNTING ACCPRJMT OC G S0027 DISTRB FSNAME=APMT 5.1T1 113 ACCOUNTING.ACCPRJMT.OC.045 1 LINE 80 5 PAGE UM ENGLE MAY 25, 1983 14:36:57 00104/046A ACCOUNTING ACCPRJMT OE G ACC:PROJECTMAINT 5.1T1 114 ACCOUNTING.ACCPRJMT.OE.046 1 LINE 3616 3 PAGE UM ENGLE JULY 23, 1983 10:13:24 ACC:PROJECTMAINT 0 Contains a $CONTINUE WITH ACC:ACCLIB record. 00104/047A ACCOUNTING ACCLIB OL G ACC:ACCLIB 5.1T1 115 ACCOUNTING.ACCLIB.OL.047 1 LINE 972 29 PAGE UM ENGLE JULY 23, 1983 10:13:24 ACC:ACCLIB 0 THERE ARE REP CARDS IN THIS LIBRARY TO CHANGE FILE NAMES IN ACCIO (104/28) TO PUBLIC FILES. THIS FILE MUST BE PERMITTED AS FOLLOWS: R PKEY=FILEINFO. 0 Referenced by comments of: 104/14, 104/107, 104/124, 104/155, 326/6, 632/4, 682/38 00104/048A ACCOUNTING PRJPRINT SA G APPR S0027 DISTRB FSNAME=PRJPRINT 5.1T1 116 ACCOUNTING.PRJPRINT.SA.048 1 LINE 80 10 PAGE UM ENGLE AUG. 23, 1982 12:26:12 0 SUBROUTINE TO PRINT A RECORD FROM *PROJECT. COPIES ACCPROJFMT (104/3). 0 Referenced by comments of: 104/150 00104/049C ACCOUNTING PRJPRINT UC G S0027 DISTRB FSNAME=PRJPRINTUPD 5.1T1 117 ACCOUNTING.PRJPRINT.UC.049 1 LINE 72 3 PAGE UM ENGLE AUG. 23, 1982 12:26:26 0 Updates source from previous regular distribution to current one. 00104/050A ACCOUNTING PRJPRINT OC G S0027 DISTRB FSNAME=APPR 5.1T1 118 ACCOUNTING.PRJPRINT.OC.050 1 LINE 80 4 PAGE UM ENGLE AUG. 23, 1982 12:26:32 00104/051 ACCOUNTING PRJLIST SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJLIST.SA.045(1) 313 5.0T1 313 ACCOUNTING.PRJLIST.SA.045 1 LINE 80 4 PAGE UM ENGLE OCT. 05, 1972 15:13.34 5.0T1 313 0 PROGRAM TO READ EACH RECORD FROM *PROJECT AND CALL PRJPRINT FOR IT. 0 Referenced by comments of: 500/41 00104/052 ACCOUNTING PRJLIST OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJLIST.OC.046(1) 314 5.0T1 314 ACCOUNTING.PRJLIST.OC.046 1 LINE 80 1 DISK UM ENGLE OCT. 05, 1972 15:13.55 5.0T1 314 00104/053 ACCOUNTING PRJLIST OC G ACC:PROJECTLIST UM ENGLE ACC:PROJECTLIST 1 SUN SEP 08/96 15:24:55 Page 60 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/054 ACCOUNTING PRJDSPLA SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJDSPLA.SA.048(1) 315 5.0T1 315 ACCOUNTING.PRJDSPLA.SA.048 1 LINE 80 4 PAGE UM ENGLE OCT. 05, 1972 15:17.03 5.0T1 315 0 PROGRAM TO READ A SPECIFIC RECORD FROM *PROJECT AND CALL PRJPRINT FOR IT. 00104/055 ACCOUNTING PRJDSPLA OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.PRJDSPLA.OC.049(1) 316 5.0T1 316 ACCOUNTING.PRJDSPLA.OC.049 1 LINE 80 1 DISK UM ENGLE OCT. 05, 1972 15:17.49 5.0T1 316 00104/056 ACCOUNTING PRJDSPLA OC G ACC:PROJECTDISP UM ENGLE ACC:PROJECTDISP 00104/057A ACCOUNTING ACCPASWD SA G APSW S0027 DISTRB FSNAME=ACCPASWD 5.1T1 119 ACCOUNTING.ACCPASWD.SA.057 1 LINE 80 6 PAGE UM ENGLE AUG. 23, 1982 12:46:18 0 PROGRAM TO GENERATE A RANDOM PASSWORD FOR AN ACCOUNTING RECORD AND PRINT THE NEW PASSWORD PLUS THE DATE AND TIME THE PASSWORD WAS PREVIOUSLY SET. THIS PROGRAM WRITES AN AUDIT TRAIL IN THE FILE *PWSTAT, WHICH MUST EXIST AS A LINE FILE WITH AT LEAST ONE LINE (WHICH MAY BE ANYTHING). RUN WITH PROT=OFF. COPIES ACCFORMAT (104/1). 0 Referenced by comments of: 104/187, 104/188, 104/195 00104/058C ACCOUNTING ACCPASWD UC G S0027 DISTRB FSNAME=ACCPASWDUPD 5.1T1 120 ACCOUNTING.ACCPASWD.UC.058 1 LINE 72 1 PAGE UM ENGLE AUG. 23, 1982 12:46:24 0 Updates source from previous regular distribution to current one. 00104/059A ACCOUNTING ACCPASWD OC G S0027 DISTRB FSNAME=APSW 5.1T1 121 ACCOUNTING.ACCPASWD.OC.059 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 14:53:46 00104/060A ACCOUNTING ACCPASWD OE G WPSW:PROGRAM1 5.1T1 122 ACCOUNTING.ACCPASWD.OE.060 1 SEQ 3980 2 PAGE UM ENGLE JULY 23, 1983 10:13:48 WPSW:PROGRAM1 00104/061A ACCOUNTING ACONSIST SA G ACNS S0027 DISTRB FSNAME=ACONSIST 5.1T1 123 ACCOUNTING.ACONSIST.SA.061 1 LINE 80 14 PAGE UM ENGLE AUG. 23, 1982 12:49:13 0 MAIN PROGRAM FOR ACCERRORSCAN. RUN WITH PROT=OFF. COPIES ACCFORMAT (104/1) AND ACCPROJFMT (104/3). 0 Referenced by comments of: 104/150 00104/062A ACCOUNTING ACONSIST UC G S0027 DISTRB FSNAME=ACONSISTUPD 5.1T1 124 ACCOUNTING.ACONSIST.UC.062 1 LINE 69 1 PAGE UM ENGLE AUG. 23, 1982 12:49:19 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/063A ACCOUNTING ACONSIST OC G S0027 DISTRB FSNAME=ACNS 5.1T1 125 ACCOUNTING.ACONSIST.OC.063 1 LINE 80 4 PAGE UM ENGLE AUG. 23, 1982 12:49:23 1 SUN SEP 08/96 15:24:55 Page 61 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/064A ACCOUNTING ACONSIST OC G ACC:ACCERRORSCAN 5.1T1 126 ACCOUNTING.ACONSIST.OC.064 1 LINE 1592 3 PAGE UM ENGLE JULY 23, 1983 10:13:49 ACC:ACCERRORSCAN 0 Referenced by comments of: 104/5 00104/065 ACCOUNTING FILENAME SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.FILENAME.SA.058(1) 322 5.0T1 322 ACCOUNTING.FILENAME.SA.058 1 LINE 80 1 PAGE UM ENGLE JAN. 25, 1979 16:39:44 5.0T1 322 0 Contains the names of the files *ACCOUNTING, *PWSTAT, *PROJECT, *PROJDIRECTORY, and *STATISTICS. 0 Referenced by comments of: 104/166 00104/066 ACCOUNTING FILENAME UC G # S0027 DISTRB FSNAME=FILENAMEUPD D4.2T1 70 ACCOUNTING.FILENAME.UC.055 1 LINE 39 1 PAGE UM ENGLE JAN. 25, 1979 16:39:54 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/067 ACCOUNTING FILENAME OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.FILENAME.OC.060(1) 323 5.0T1 323 ACCOUNTING.FILENAME.OC.060 1 SEQ 80 1 PAGE UM ENGLE JAN. 25, 1979 16:40:00 5.0T1 323 0 Referenced by comments of: 104/118, 104/119, 104/120, 631/22, 631/24 00104/068 ACCOUNTING DIRECTRY SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRECTRY.SA.061(1) 324 5.0T1 324 ACCOUNTING.DIRECTRY.SA.061 1 LINE 80 17 PAGE UM ENGLE JAN. 10, 1979 15:27:14 5.0T1 324 0 I/O SUBROUTINES FOR THE DIRECTORY FILE. COPIES *CNFGINFODSECT (654). 00104/069 ACCOUNTING DIRECTRY OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRECTRY.OC.062(1) 325 5.0T1 325 ACCOUNTING.DIRECTRY.OC.062 1 LINE 80 4 PAGE UM ENGLE JAN. 10, 1979 15:27:27 5.0T1 325 0 Referenced by comments of: 631/22, 631/24 00104/070 ACCOUNTING DIRLIST SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRLIST.SA.063(1) 326 5.0T1 326 ACCOUNTING.DIRLIST.SA.063 1 LINE 80 4 PAGE UM ENGLE DEC. 06, 1974 11:36.26 5.0T1 326 0 MAIN PROGRAM FOR DIRLIST - LIST THE PROJECT DIRECTORY. 00104/071 ACCOUNTING DIRLIST OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRLIST.OC.064(1) 327 5.0T1 327 ACCOUNTING.DIRLIST.OC.064 1 LINE 80 2 PAGE UM ENGLE DEC. 06, 1974 11:36.55 5.0T1 327 00104/072 ACCOUNTING DIRLIST OC G ACC:DIRLIST UM ENGLE ACC:DIRLIST 1 SUN SEP 08/96 15:24:55 Page 62 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/073A ACCOUNTING FILUPDAT SA G FLUP S0027 DISTRB FSNAME=FILUPDAT 5.1T1 127 ACCOUNTING.FILUPDAT.SA.073 1 LINE 80 8 PAGE UM ENGLE AUG. 23, 1982 13:03:20 0 PROGRAM TO CHARGE USERS FOR FILE STORAGE FROM LAST SIGNON TO THE END OF THE CURRENT MONTH (IF NO PAR= IS GIVEN) OR EXPIRATION TIME. IF PAR=MM/DD/YY IS GIVEN, UPDATE IS TO 24:00:00 OF MM/DD/YY OR EXPIRATION TIME. IF PAR= MM/DD/YY HH:MM:SS IS GIVEN, UPDATE IS TO SPECIFIED TIME OR EXPIRATION TIME. PROGRAM UPDATES THE ACCOUNTING RECORD AND WRITES A STATISTICS RECORD FOR BILLING. RUN WITH PROT=OFF. COPIES ACCFORMAT (104/1). 0 Referenced by comments of: 104/187, 104/188 00104/074C ACCOUNTING FILUPDAT UC G S0027 DISTRB FSNAME=FILUPDATUPD 5.1T1 128 ACCOUNTING.FILUPDAT.UC.074 1 LINE 69 1 PAGE UM ENGLE AUG. 23, 1982 13:03:24 0 Updates source from previous regular distribution to current one. 00104/075A ACCOUNTING FILUPDAT OC G S0027 DISTRB FSNAME=FLUP 5.1T1 129 ACCOUNTING.FILUPDAT.OC.075 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 13:04:43 00104/076C ACCOUNTING ACCCONVERT SG G S0027 DISTRB FSNAME=ACCCONVERT 5.1T1 130 ACCOUNTING.ACCCONVERT.SG.076 1 LINE 59 1 PAGE UM ENGLE AUG. 23, 1982 13:35:25 0 Converts auxiliary accounting files for previous distributions to current distribution. Old auxiliary accounting file is read by SCARDS; new auxiliary accounting file is on SPUNCH; listing of new auxiliary accounting file is on SPRINT. 00104/077C ACCOUNTING ACCCONVERT OC G S0027 DISTRB FSNAME=ACCCNV 5.1T1 131 ACCOUNTING.ACCCONVERT.OC.077 1 LINE 80 1 PAGE UM ENGLE AUG. 23, 1982 13:37:06 00104/078A ACCOUNTING ACCCNVRT SA G ACNV S0027 DISTRB FSNAME=ACCCNVRT 5.1T1 132 ACCOUNTING.ACCCNVRT.SA.078 1 LINE 80 4 PAGE UM ENGLE AUG. 23, 1982 13:45:21 0 SUBROUTINE TO CONVERT A PREVIOUS ACCOUNTING RECORD FORMAT TO THE CURRENT FORMAT. 00104/079 ACCOUNTING ACCCNVRT UC G # S0027 DISTRB FSNAME=ACCCNVRTUPD UM ENGLE 0 Updates source from previous regular distribution to current one. 00104/080A ACCOUNTING ACCCNVRT OC G S0027 DISTRB FSNAME=ACNV 5.1T1 133 ACCOUNTING.ACCCNVRT.OC.080 1 LINE 80 1 PAGE UM ENGLE AUG. 23, 1982 13:45:51 00104/081A ACCOUNTING DISPROJECT OC G S0027 DISTRB FSNAME=DISPROJECT 5.1T1 134 ACCOUNTING.DISPROJECT.OC.081 1 LINE 80 7 PAGE UM ENGLE JUNE 10, 1983 16:27:32 0 Program to print "DISPLAY PROJECT" (as in $ACCOUNTING) for any given project. Run with PROT=OFF. Produced by assembling ACCMXMAT (631/8) with &STAPRJ set to one. 0 Referenced by comments of: 104/82, 631/8 1 SUN SEP 08/96 15:24:55 Page 63 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/082A ACCOUNTING DISPROJECT OE G ACC:DISPROJECT 5.1T1 135 ACCOUNTING.DISPROJECT.OE.082 1 LINE 2390 3 PAGE UM ENGLE JULY 23, 1983 10:14:37 ACC:DISPROJECT 0 LINKEDITED VERSION OF (104/81) + (631/21) + "$CONTINUE WITH ACC:ACCLIB". 00104/083 ACCOUNTING GRDEF SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.GRDEF.SA.072(1) 333 5.0T1 333 ACCOUNTING.GRDEF.SA.072 1 SEQ 80 1 PAGE UM ENGLE JAN. 10, 1973 17:16.39 5.0T1 333 0 COPY SECTION. 0 Referenced by comments of: 97/5, 104/22, 104/92, 104/95, 104/98, 104/108, 104/114, 104/125, 104/139, 104/158, 360/1, 500/47, 586/1, 631/1, 631/5, 631/14, 632/4, 708/1 00104/084 ACCOUNTING WKDAY SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.WKDAY.SA.073(1) 334 5.0T1 334 ACCOUNTING.WKDAY.SA.073 1 LINE 80 1 PAGE UM ENGLE JAN. 09, 1973 12:14.08 5.0T1 334 0 SUBROUTINE TO PRODUCE THE DAY OF THE WEEK FOR A GIVEN DATE. USED IN INITCHK (104/91). 00104/085 ACCOUNTING WKDAY OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.WKDAY.OC.074(1) 335 5.0T1 335 ACCOUNTING.WKDAY.OC.074 1 LINE 80 1 DISK UM ENGLE JAN. 09, 1973 12:14.29 5.0T1 335 00104/086 ACCOUNTING DIRDSPLA SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRDSPLA.SA.075(1) 336 5.0T1 336 ACCOUNTING.DIRDSPLA.SA.075 1 LINE 80 3 PAGE UM ENGLE JAN. 12, 1973 13:57.36 5.0T1 336 0 PROGRAM TO READ A SPECIFIC RECORD FROM *PRJDIRECTORY AND CALL DIRPRINT FOR IT. 00104/087 ACCOUNTING DIRDSPLA OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRDSPLA.OC.076(1) 337 5.0T1 337 ACCOUNTING.DIRDSPLA.OC.076 1 LINE 80 1 DISK UM ENGLE JAN. 12, 1973 13:57.46 5.0T1 337 00104/088 ACCOUNTING DIRDSPLA OC G ACC:DIRDISPLAY UM ENGLE ACC:DIRDISPLAY 00104/089 ACCOUNTING DIRPRINT SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRPRINT.SA.078(1) 338 5.0T1 338 ACCOUNTING.DIRPRINT.SA.078 1 LINE 80 6 PAGE UM ENGLE DEC. 06, 1974 12:00.11 5.0T1 338 0 SUBROUTINE TO FORMAT A DIRECTORY ENTRY FOR PRINTING. USED IN ACC:ACCLIB. 00104/090 ACCOUNTING DIRPRINT OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.DIRPRINT.OC.079(1) 339 5.0T1 339 ACCOUNTING.DIRPRINT.OC.079 1 LINE 80 2 PAGE UM ENGLE DEC. 06, 1974 12:00.34 5.0T1 339 00104/091 ACCOUNTING INITCHK # (PART OF INIT) UM ENGLE 0 DISTRIBUTED AS (097/5) AND (097/7) 1 SUN SEP 08/96 15:24:55 Page 64 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 104/84 00104/092A ACCOUNTING ACCFLUPD SA G AFLU S0027 DISTRB FSNAME=ACCFLUPD 5.1T1 136 ACCOUNTING.ACCFLUPD.SA.092 1 LINE 80 7 PAGE UM ENGLE AUG. 23, 1982 13:53:39 0 SUBROUTINE TO UPDATE FILE STORAGE INFORMATION IN AN ACCOUNTING RECORD. COPIES ACCFORMAT (104/1) AND GRDEF (104/83). 0 Referenced by comments of: 484/1 00104/093A ACCOUNTING ACCFLUPD UC G S0027 DISTRB FSNAME=ACCFLUPDUPD 5.1T1 137 ACCOUNTING.ACCFLUPD.UC.093 1 LINE 72 1 PAGE UM ENGLE AUG. 23, 1982 13:53:45 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/094A ACCOUNTING ACCFLUPD OC G S0027 DISTRB FSNAME=AFLU 5.1T1 138 ACCOUNTING.ACCFLUPD.OC.094 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 13:53:51 00104/095A ACCOUNTING ACCINSCN SA G AINS S0027 DISTRB FSNAME=ACCINSCN 5.1T1 139 ACCOUNTING.ACCINSCN.SA.095 1 LINE 80 8 PAGE UM ENGLE AUG. 23, 1982 13:58:36 0 USED IN INIT:INIT (097/4). COPIES ACCFORMAT (104/1) AND GRDEF (104/83). 00104/096A ACCOUNTING ACCINSCN UC G S0027 DISTRB FSNAME=ACCINSCNUPD 5.1T1 140 ACCOUNTING.ACCINSCN.UC.096 1 LINE 72 1 PAGE UM ENGLE AUG. 23, 1982 13:58:42 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/097A ACCOUNTING ACCINSCN OC G S0027 DISTRB FSNAME=AINS 5.1T1 141 ACCOUNTING.ACCINSCN.OC.097 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 13:59:11 00104/098 ACCOUNTING CURSIG SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.CURSIG.SA.087(1) 346 5.0T1 346 ACCOUNTING.CURSIG.SA.087 1 LINE 80 1 PAGE UM ENGLE JAN. 08, 1973 17:55.52 5.0T1 346 0 SUBROUTINE TO DETERMINE NUMBER OF CURRENT SIGNONS. COPIES GRDEF (104/83) AND *LLMPSEQU. NOTE THAT THE SOURCE SHOULD BE CHANGED (IF RE-ASSEMBLED) SO THAT IT COPIES COPY:LLMPSEQU (087) INSTEAD OF *LLMPSEQU WHICH NO LONGER EXISTS. 0 Referenced by comments of: 484/1 00104/099 ACCOUNTING CURSIG OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.CURSIG.OC.088(1) 347 5.0T1 347 ACCOUNTING.CURSIG.OC.088 1 LINE 80 1 DISK UM ENGLE JAN. 08, 1973 17:56.03 5.0T1 347 00104/100 ACCOUNTING DEDFLFIX # (PART OF DEADFILES) UM ENGLE 0 Distributed as (502/10) and (502/11) 00104/101A ACCOUNTING ACCLSTPR SA G ALPR S0027 DISTRB FSNAME=ACCLSTPR 5.1T1 142 ACCOUNTING.ACCLSTPR.SA.101 1 LINE 80 10 PAGE UM ENGLE NOV. 23, 1982 16:20:53 0 SUBROUTINE TO PRINT AN ACCOUNTING RECORD IN ABBREVIATED LISTING FORMAT. COPIES ACCFORMAT (104/1). 1 SUN SEP 08/96 15:24:55 Page 65 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 104/150 00104/102A ACCOUNTING ACCLSTPR UC G S0027 DISTRB FSNAME=ACCLSTPRUPD 5.1T1 143 ACCOUNTING.ACCLSTPR.UC.102 1 LINE 72 4 PAGE UM ENGLE NOV. 23, 1982 16:21:07 0 Updates source from previous regular distribution to current one. 00104/103A ACCOUNTING ACCLSTPR OC G S0027 DISTRB FSNAME=ALPR 5.1T1 144 ACCOUNTING.ACCLSTPR.OC.103 1 LINE 80 4 PAGE UM ENGLE NOV. 23, 1982 16:21:12 00104/104A ACCOUNTING ACCFLCHG SA G AFLC S0027 DISTRB FSNAME=ACCFLCHG 5.1T1 145 ACCOUNTING.ACCFLCHG.SA.104 1 LINE 80 4 PAGE UM ENGLE AUG. 23, 1982 14:29:21 0 SUBROUTINE TO PRINT INFORMATION RELEVANT TO ACCUMULATED FILE CHARGES FOR AN ACCOUNTING RECORD. CALLED BY ACCDSPLA. COPIES ACCFORMAT (104/1). 00104/105A ACCOUNTING ACCFLCHG UC G S0027 DISTRB FSNAME=ACCFLCHGUPD 5.1T1 146 ACCOUNTING.ACCFLCHG.UC.105 1 LINE 72 1 PAGE UM ENGLE AUG. 23, 1982 14:29:27 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/106A ACCOUNTING ACCFLCHG OC G S0027 DISTRB FSNAME=AFLC 5.1T1 147 ACCOUNTING.ACCFLCHG.OC.106 1 LINE 80 2 PAGE UM ENGLE AUG. 23, 1982 14:29:42 00104/107A ACCOUNTING ACCFLCHG OE G ACC:ACCFILCHARGE 5.1T1 148 ACCOUNTING.ACCFLCHG.OE.107 1 LINE 838 1 PAGE UM ENGLE JULY 23, 1983 10:15:57 ACC:ACCFILCHARGE 0 ACCDSPLA+ACCFLCHG. Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record. 00104/108A ACCOUNTING APSWDISP SA G APWD S0027 DISTRB FSNAME=APSWDISP 5.1T1 149 ACCOUNTING.APSWDISP.SA.108 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 14:36:22 0 SUBROUTINE TO PRINT INTERNAL PASSWORD REPRESENTATION AND LAST DATE AND TIME SET FOR AN ACCOUNTING RECORD. CALLED BY ACCDSPLA. COPIES ACCFORMAT (104/1) AND GRDEF (104/83). 00104/109C ACCOUNTING APSWDISP UC G S0027 DISTRB FSNAME=APSWDISPUPD 5.1T1 150 ACCOUNTING.APSWDISP.UC.109 1 LINE 70 1 PAGE UM ENGLE AUG. 23, 1982 14:36:29 0 Updates source from previous regular distribution to current one. 00104/110A ACCOUNTING APSWDISP OC G S0027 DISTRB FSNAME=APWD 5.1T1 151 ACCOUNTING.APSWDISP.OC.110 1 LINE 80 1 PAGE UM ENGLE AUG. 23, 1982 14:36:34 00104/111A ACCOUNTING ACCHEXPR SA O AXPR S0027 DISTRB FSNAME=ACCHEXPR 5.1T1 152 ACCOUNTING.ACCHEXPR.SA.111 1 LINE 80 3 PAGE UM ENGLE AUG. 23, 1982 15:03:48 0 SUBROUTINE TO PRINT AN ACCOUNTING RECORD IN HEX. CALLED BY ACCDSPLA. COPIES ACCFORMAT (104/1). 00104/112C ACCOUNTING ACCHEXPR UC O S0027 DISTRB FSNAME=ACCHEXPRUPD 5.1T1 153 ACCOUNTING.ACCHEXPR.UC.112 1 LINE 72 1 PAGE UM ENGLE AUG. 23, 1982 15:03:53 0 Updates source from previous regular distribution to current one. 1 SUN SEP 08/96 15:24:55 Page 66 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/113A ACCOUNTING ACCHEXPR OC O S0027 DISTRB FSNAME=AXPR 5.1T1 154 ACCOUNTING.ACCHEXPR.OC.113 1 LINE 80 1 PAGE UM ENGLE AUG. 23, 1982 15:03:56 00104/114 ACCOUNTING TIMETRP SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMETRP.SA.100(1) 357 5.0T1 357 ACCOUNTING.TIMETRP.SA.100 1 LINE 80 3 PAGE UM ENGLE DEC. 06, 1974 12:04.25 5.0T1 357 0 SUBROUTINE TO SET UP REAL TIME INTERRUPTS AND SET A FLAG AT THE INTERRUPT. COPIES GRDEF (104/83). 00104/115 ACCOUNTING TIMETRP OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMETRP.OC.101(1) 358 5.0T1 358 ACCOUNTING.TIMETRP.OC.101 1 LINE 80 1 PAGE UM ENGLE DEC. 06, 1974 12:04.41 5.0T1 358 0 Referenced by comments of: 631/22, 631/24 00104/116A ACCOUNTING ACCFLGRS SA G ASAR S0027 DISTRB FSNAME=ACCFLGRS 5.1T1 155 ACCOUNTING.ACCFLGRS.SA.116 1 LINE 80 6 PAGE UM ENGLE NOV. 23, 1982 16:21:16 0 Program to reset flags in a user's accounting record. If &FLAG is 'S' or null, the program will reset the signon attention flag. If &FLAG is 'P', the program will reset the project sigfile attention flag. If &FLAG is 'I', the program will reset the signons inhibited flag. This program writes an audit trail in the file *PWSTAT, which must exist as a line file with at least one line (which may be anything). Run with PROT=OFF. Copies ACCFORMAT (104/1). *************************************************************************** D5.0C version: This was formerly ACCSGATR. *************************************************************************** 0 Referenced by comments of: 104/118, 104/119, 104/120, 104/187, 104/188, 104/195 00104/117A ACCOUNTING ACCFLGRS UC G S0027 DISTRB FSNAME=ACCFLGRSUPD 5.1T1 156 ACCOUNTING.ACCFLGRS.UC.117 1 LINE 72 2 PAGE UM ENGLE NOV. 23, 1982 16:21:21 0 Updates source from previous regular distribution to current one. 00104/118A ACCOUNTING ACCFLGRS OC G WPSW:PROGRAM2 5.1T1 157 ACCOUNTING.ACCFLGRS.OC.118 1 SEQ 3084 2 PAGE UM ENGLE JULY 23, 1983 10:16:28 WPSW:PROGRAM2 0 Linkeditted object for (104/116), with &FLAG='S' or null, and (104/130), (104/29), (104/67), (104/177), and (164). Resets the signon attention flag. 00104/119C ACCOUNTING ACCFLGRS OC G WPSW:PROGRAM3 5.1T1 158 ACCOUNTING.ACCFLGRS.OC.119 1 LINE 3084 3 PAGE UM ENGLE JULY 23, 1983 10:16:28 WPSW:PROGRAM3 0 Linkeditted object for (104/116), with &FLAG='P', and (104/130), (104/29), (104/67), (104/177), and (164). Resets the signon project attention flag. 1 SUN SEP 08/96 15:24:55 Page 67 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/120C ACCOUNTING ACCFLGRS OC G WPSW:PROGRAM4 5.1T1 159 ACCOUNTING.ACCFLGRS.OC.120 1 LINE 3084 3 PAGE UM ENGLE JULY 23, 1983 10:16:28 WPSW:PROGRAM4 0 Linkeditted object for (104/116), with &FLAG='I', and (104/130), (104/29), (104/67), (104/177), and (164). Resets the flag which inhibits signon. 00104/121A ACCOUNTING ACCSAVE SA G ASAV S0027 DISTRB FSNAME=ACCSAVE 5.1T1 160 ACCOUNTING.ACCSAVE.SA.121 1 LINE 80 8 PAGE UM ENGLE AUG. 23, 1982 15:26:05 0 MAIN PROGRAM FOR ACC:ACCSAVE TO SAVE ACCOUNTING AND PROJECT FILES ON TAPE. COPIES ACCFORMAT (104/1). 0 Referenced by comments of: 104/152 00104/122C ACCOUNTING ACCSAVE UC G S0027 DISTRB FSNAME=ACCSAVEUPD 5.1T1 161 ACCOUNTING.ACCSAVE.UC.122 1 LINE 71 2 PAGE UM ENGLE AUG. 23, 1982 15:26:18 0 Updates source from previous regular distribution to current one. 00104/123A ACCOUNTING ACCSAVE OC G S0027 DISTRB FSNAME=ASAV 5.1T1 162 ACCOUNTING.ACCSAVE.OC.123 1 LINE 80 4 PAGE UM ENGLE AUG. 23, 1982 15:26:23 00104/124A ACCOUNTING ACCSAVE OE G ACC:ACCSAVE 5.1T1 163 ACCOUNTING.ACCSAVE.OE.124 1 LINE 2142 1 PAGE UM ENGLE JULY 23, 1983 10:16:53 ACC:ACCSAVE 0 Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record. 00104/125A ACCOUNTING ACCTAPRD SA G ATRP S0027 DISTRB FSNAME=ACCTAPRD 5.1T1 164 ACCOUNTING.ACCTAPRD.SA.125 1 LINE 80 4 PAGE UM ENGLE AUG. 23, 1982 15:41:48 0 VERSION OF ACCREAD TO BE USED WITH ACCOUNTING FILE SAVE TAPES. COPIES GRDEF (104/83). 00104/126C ACCOUNTING ACCTAPRD UC G S0027 DISTRB FSNAME=ACCTAPRDUPD 5.1T1 165 ACCOUNTING.ACCTAPRD.UC.126 1 LINE 72 1 PAGE UM ENGLE AUG. 23, 1982 15:42:12 0 Updates source from previous regular distribution to current one. 00104/127A ACCOUNTING ACCTAPRD OC G S0027 DISTRB FSNAME=ATRD 5.1T1 166 ACCOUNTING.ACCTAPRD.OC.127 1 LINE 80 2 PAGE UM ENGLE AUG. 23, 1982 15:42:14 00104/128 ACCOUNTING GETFILE SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.GETFILE.SA.109(1) 365 5.0T1 365 ACCOUNTING.GETFILE.SA.109 1 LINE 80 4 PAGE UM ENGLE OCT. 07, 1980 16:58:00 5.0T1 365 0 SUBROUTINE TO GET A FDUB, ETC. 1 SUN SEP 08/96 15:24:55 Page 68 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/129 ACCOUNTING GETFILE UC G # S0027 DISTRB FSNAME=GETFILEUPD 5.0T1 366 ACCOUNTING.GETFILE.UC.110 1 LINE 71 1 PAGE UM ENGLE OCT. 07, 1980 16:58:03 5.0T1 366 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/130 ACCOUNTING GETFILE OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.GETFILE.OC.111(1) 367 5.0T1 367 ACCOUNTING.GETFILE.OC.111 1 LINE 80 2 PAGE UM ENGLE OCT. 07, 1980 16:58:05 5.0T1 367 0 Referenced by comments of: 104/118, 104/119, 104/120, 484/1, 631/22, 631/24 00104/131 ACCOUNTING ACATALOG SA G ACAT FILE:ACATALOG(1000) 5.0T1 368 ACCOUNTING.ACATALOG.SA.112 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 12:44:21 5.0T1 368 0 SUBROUTINE THAT GETS THE CURRENT DISK AND DATA CELL SPACE FOR A USER FROM THE CATALOG AND DSCB. USED BY ACC:ACCMAINT, INIT:INIT, AND *ACCRESTORE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00104/132 ACCOUNTING ACATALOG OC G FILE:ACATALOG(1,998) 5.0T1 369 ACCOUNTING.ACATALOG.OC.113 1 LINE 80 2 PAGE UM HELFFRICH JULY 03, 1981 12:44:22 5.0T1 369 FILE:ACATALOG 0 Referenced by comments of: 484/1 00104/133 ACCOUNTING ACATALOG SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACATALOG.SA.114(1) 370 5.0T1 370 ACCOUNTING.ACATALOG.SA.114 1 LINE 80 3 PAGE UM MTA JULY 27, 1977 22:18:36 5.0T1 370 0 THIS IS A SPECIAL VERSION OF ACATALOG (REFERRED TO AS "SUPER ACATALOG") WHICH PERFORMS THE SAME FUNCTION, BUT CALLS THE ACATSUB SUBROUTINE (104/135) TO BUILD A TABLE OF USER ID VERSUS FILE SPACE FOR ALL USERS ON THE FIRST CALL TO ACATALOG. FROM THEN ON, IT JUST DOES A TABLE LOOKUP TO GET THE SIZE -- THE RESULT BEING A VERY FAST ACATALOG. THIS VERSION IS ONLY USED WHEN EVERY USER'S FILE SPACE IS TO BE RECALCULATED. AT UM, IT HAS ONLY BEEN USED WHEN NEW FILE SYSTEMS ARE INSTALLED, I.E. WHEN A COMPLETE FILE SAVE AND RESTORE HAVE BEEN DONE. 0 Referenced by comments of: 104/135 00104/134 ACCOUNTING ACATALOG OC G FILE:ACATALOG.FAST 5.0T1 371 ACCOUNTING.ACATALOG.OC.115 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 12:44:23 5.0T1 371 FILE:ACATALOG.FAST 0 Referenced by comments of: 682/38 00104/135A ACCOUNTING ACATALOG.FAST SA G FILE:REALACATSUB(1,999) 5.1T1 167 ACCOUNTING.ACATALOG.FAST.SA.135 1 LINE 71 7 PAGE UM MTA JULY 23, 1983 10:16:55 0 SUBROUTINE CALLED BY SUPER ACATALOG (104/133). IT BUILDS A TABLE OF THE AMOUNT OF SPACE USED BY EACH USERID WHICH HAS FILES. THIS VERSION IS DIFFERENT FROM THE PROGRAM USED IN DISK DISASTER RECOVERY, SEE COMP (682/46) TO VERIFY CATALOG/DSCB CONSISTENCY. CALLS VTOCREAD (067/11). ASSEMBLE USING COPY:FILE.MACROS (482/45). 1 SUN SEP 08/96 15:24:55 Page 69 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 104/133, 682/38 00104/136A ACCOUNTING ACATALOG.FAST OC G FILE:REALACATSUB(1000) 5.1T1 168 ACCOUNTING.ACATALOG.FAST.OC.136 1 LINE 1964 3 PAGE UM MTA JULY 23, 1983 10:16:55 FILE:REALACATSUB 00104/137A ACCOUNTING WRITEUP WF S0027 DISTRB FSNAME=ACCWRITEUP 5.1T1 169 ACCOUNTING.WRITEUP.WF.137 1 LINE 80 9 PAGE UM ENGLE AUG. 24, 1982 16:54:11 0 A WRITEUP DESCRIBING THE MTS ACCOUNTING SYSTEM: FILES AND MAINTENANCE PROGRAMS. 00104/138A ACCOUNTING WRITEUP UC S0027 DISTRB FSNAME=ACCWRITEUPUPD 5.1T1 170 ACCOUNTING.WRITEUP.UC.138 1 LINE 80 3 PAGE UM ENGLE AUG. 24, 1982 16:54:15 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/139 ACCOUNTING IOLOKCK SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.IOLOKCK.SA.120(1) 376 5.0T1 376 ACCOUNTING.IOLOKCK.SA.120 1 LINE 80 5 PAGE UM ENGLE DEC. 05, 1975 12:27:08 5.0T1 376 0 SUBROUTINE TO INTERCEPT I/O ERRORS AND NON-ZERO RETURN CODES FROM SETLCK IN ORDER TO PREVENT INTERRUPTION OF FILE LOCK WAITS. SETIOERR MUST BE CALLED WITH IOLOKCK AS THE I/O ERROR SUBROUTINE IN ORDER TO ACTIVATE THE I/O ERROR INTERCEPT. COPIES GRDEF (104/83). 00104/140 ACCOUNTING IOLOKCK OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.IOLOKCK.OC.121(1) 377 5.0T1 377 ACCOUNTING.IOLOKCK.OC.121 1 LINE 80 2 PAGE UM ENGLE DEC. 05, 1975 12:27:18 5.0T1 377 0 Referenced by comments of: 631/22, 631/24 00104/141 ACCOUNTING FLINFCL SG G S1558 5.0T1 VLO FSNAME=ACCOUNTING.FLINFCL.SG.122(1) 378 5.0T1 378 ACCOUNTING.FLINFCL.SG.122 1 LINE 59 1 PAGE UM ENGLE FEB. 27, 1978 13:45:51 5.0T1 378 0 PROGRAM TO READ THE ACCOUNTING FILES AND PRINT STATISTICS ON FILE USAGE BROKEN DOWN BY THE FIRST LETTER OF THE PROJECT NUMBER FOR ACTIVE (UNEXPIRED) SIGNON ID'S AND SUMMARIZED FOR ALL DEAD (EXPIRED) ID'S. IF PAR=DEAD IS GIVEN, THE REVERSE IS DONE, I.E., THE USAGE INFORMATION IS BROKEN DOWN BY THE FIRST LETTER OF THE PROJECT NUMBER FOR DEAD ID'S AND SUMMARIZED FOR ALL ACTIVE ID'S. THE PARAMETER MM/DD/YY (OR DATE=MM/DD/YY) MAY ALSO BE GIVEN TO SPECIFY A DATE; FILES BELONGING TO ID'S EXPIRING AT OR BEFORE MIDNIGHT OF THAT DATE ARE CONSIDERED DEAD. IF NO DATE IS SPECIFIED, THEN THE PREVIOUS MIDNIGHT IS USED AS THE TIME. IN ADDITION, IF PAR=STAFF IS GIVEN, ADDITIONAL INFORMATION FOR EACH SIGNON ID BELONGING TO A PROJECT BEGINNING WITH THE LETTER W IS PRINTED. THIS SECTION LOADS THE MAIN FUNCTION (104/143) FROM ACC:ACCLIB+NEW:GOMLIB. 00104/142 ACCOUNTING FLINFCL OC G ACC:FILEINFO 5.0T1 379 ACCOUNTING.FLINFCL.OC.123 1 LINE 80 1 PAGE UM ENGLE FEB. 24, 1981 15:43:56 5.0T1 379 ACC:FILEINFO 0 This file has the program key ACC.:FILEINFO. ******************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 70 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Contains a REP line to cause loading only from ACC:ACCLIB instead of from ACC:ACCLIB+NEW:GOMLIB. ******************************************************************************** 00104/143A ACCOUNTING ACCFLINF SG G S0027 DISTRB FSNAME=ACCFLINF 5.1T1 171 ACCOUNTING.ACCFLINF.SG.143 1 LINE 100 4 PAGE UM ENGLE AUG. 24, 1982 17:05:01 0 MAIN FUNCTION TO READ THE ACCOUNTING FILES AND PRINT STATISTICS ON FILE USAGE. 0 Referenced by comments of: 104/141, 104/146, 104/148 00104/144A ACCOUNTING ACCFLINF UC G S0027 DISTRB FSNAME=ACCFLINFUPD 5.1T1 172 ACCOUNTING.ACCFLINF.UC.144 1 LINE 88 1 PAGE UM ENGLE AUG. 24, 1982 17:05:08 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/145A ACCOUNTING ACCFLINF OC G S0027 DISTRB FSNAME=AFIN 5.1T1 173 ACCOUNTING.ACCFLINF.OC.145 1 LINE 80 7 PAGE UM ENGLE AUG. 24, 1982 17:05:14 00104/146 ACCOUNTING ACCFLKWF SG G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLKWF.SG.127(1) 382 5.0T1 382 ACCOUNTING.ACCFLKWF.SG.127 1 LINE 70 1 PAGE UM ENGLE FEB. 27, 1978 14:01:40 5.0T1 382 0 KWSCAN EXECUTE SUBROUTINE FOR ACCFLINF (104/143). 00104/147 ACCOUNTING ACCFLKWF OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLKWF.OC.128(1) 383 5.0T1 383 ACCOUNTING.ACCFLKWF.OC.128 1 LINE 80 1 PAGE UM ENGLE FEB. 27, 1978 14:02:24 5.0T1 383 00104/148 ACCOUNTING ACCFLATN SG G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLATN.SG.129(1) 384 5.0T1 384 ACCOUNTING.ACCFLATN.SG.129 1 LINE 55 1 PAGE UM ENGLE JAN. 09, 1979 15:35:45 5.0T1 384 0 GOM ATTENTION INTERRUPT EXIT FOR ACCFLINF (104/143). 00104/149 ACCOUNTING ACCFLATN OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCFLATN.OC.130(1) 385 5.0T1 385 ACCOUNTING.ACCFLATN.OC.130 1 LINE 80 1 PAGE UM ENGLE JAN. 09, 1979 15:38:12 5.0T1 385 00104/150 ACCOUNTING LINCOUNT SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.LINCOUNT.SA.133(1) 388 5.0T1 388 ACCOUNTING.LINCOUNT.SA.133 1 LINE 80 1 PAGE UM ENGLE JAN. 09, 1979 13:00:46 5.0T1 388 0 DEFINITION OF THE VARIABLE LINCOUNT. REFERENCED BY ACCPRINT (104/8), ACCLSTPR (104/101), PRJPRINT (104/48), ACCMAINT (104/24), ACCPRJMT (104/43), AND ACONSIST (104/61). 00104/151 ACCOUNTING LINCOUNT OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.LINCOUNT.OC.134(1) 389 5.0T1 389 ACCOUNTING.LINCOUNT.OC.134 1 LINE 80 1 PAGE UM ENGLE JAN. 09, 1979 13:01:15 5.0T1 389 1 SUN SEP 08/96 15:24:55 Page 71 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/152A ACCOUNTING ACCRETRV SG G S0027 DISTRB FSNAME=ACCRETRV 5.1T1 174 ACCOUNTING.ACCRETRV.SG.152 1 LINE 128 7 PAGE UM ENGLE AUG. 24, 1982 17:17:13 0 PROGRAM TO MOUNT A MONTHLY ACCSAVE TAPE (104/121) OR AN ANNUAL TAPE AND DISPLAY OR LIST ACCOUNTING OR PROJECT RECORDS. ASSUMES THAT THE ANNUAL TAPES ARE IN RACK NUMBERS ACCNN WHERE NN STARTS WITH TPBASE AND IS INCREMENTED BY 2. ASSUMES THAT THE FIRST YEAR IS 19YY WHERE YY IS BASEYR. (TPBASE=29, BASEYR=78 IN DISTRIBUTED VERSION.) ALSO ASSUMES THE EXISTENCE OF PROGRAMS IN ACC:ACCDISPLAY, ACC:PROJECTDISP, ACC:ACCLISTING, AND ACC:PROJECTLIST. 0 Referenced by comments of: 104/156 00104/153A ACCOUNTING ACCRETRV UC G S0027 DISTRB FSNAME=ACCRETRVUPD 5.1T1 175 ACCOUNTING.ACCRETRV.UC.153 1 LINE 72 2 PAGE UM ENGLE AUG. 24, 1982 17:17:23 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00104/154A ACCOUNTING ACCRETRV OC G S0027 DISTRB FSNAME=ARTV 5.1T1 176 ACCOUNTING.ACCRETRV.OC.154 1 LINE 80 13 PAGE UM ENGLE AUG. 24, 1982 17:18:00 00104/155A ACCOUNTING ACCRETRV OE G ACC:ACCRETRIEVE 5.1T1 177 ACCOUNTING.ACCRETRV.OE.155 1 LINE 7132 6 PAGE UM ENGLE JULY 23, 1983 10:16:58 ACC.:ACCRETRIEVE 0 ACCRETRV+ACCTAPRD. Contains a $CONTINUE WITH ACC:ACCLIB (104/47) record. 00104/156 ACCOUNTING TIMECALL SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMECALL.SA.139(1) 393 5.0T1 393 ACCOUNTING.TIMECALL.SA.139 1 LINE 80 1 PAGE UM ENGLE JAN. 09, 1979 13:05:36 5.0T1 393 0 INTERFACE TO DYNAMICALLY LINK TO THE TIME SUBROUTINE. CALLED BY ACCRETRV (104/152). 00104/157 ACCOUNTING TIMECALL OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.TIMECALL.OC.140(1) 394 5.0T1 394 ACCOUNTING.TIMECALL.OC.140 1 LINE 80 1 PAGE UM ENGLE JAN. 09, 1979 13:06:23 5.0T1 394 00104/158 ACCOUNTING GTPRJIDS SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.GTPRJIDS.SA.141(1) 395 5.0T1 395 ACCOUNTING.GTPRJIDS.SA.141 1 LINE 80 14 PAGE UM ENGLE FEB. 04, 1981 14:25:28 5.0T1 395 0 SUBROUTINE TO OBTAIN THE SIGNON IDS BELONGING TO A PROJECT. COPIES GRDEF (104/83), ACCPROJFMT (104/3) AND *CNFGINFODSECT (654). 00104/159 ACCOUNTING GTPRJIDS UC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.GTPRJIDS.UC.142(1) 396 5.0T1 396 ACCOUNTING.GTPRJIDS.UC.142 1 LINE 71 1 PAGE UM ENGLE FEB. 04, 1981 14:26:13 5.0T1 396 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 1 SUN SEP 08/96 15:24:55 Page 72 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/160 ACCOUNTING GTPRJIDS OC G SEG2:GPID 5.0T1 397 ACCOUNTING.GTPRJIDS.OC.143 1 LINE 2752 2 PAGE UM ENGLE JULY 03, 1981 12:45:09 5.0T1 397 SEG2:GPID 00104/161 ACCOUNTING ACCPRJID SG G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCPRJID.SG.144(1) 398 5.0T1 398 ACCOUNTING.ACCPRJID.SG.144 1 LINE 112 1 PAGE UM ENGLE JAN. 09, 1979 13:08:32 5.0T1 398 0 PROGRAM TO LIST THE SIGNON ID'S FOR A SPECIFIED PROJECT. 00104/162 ACCOUNTING ACCPRJID OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.ACCPRJID.OC.145(1) 399 5.0T1 399 ACCOUNTING.ACCPRJID.OC.145 1 LINE 80 4 PAGE UM ENGLE JAN. 09, 1979 13:08:55 5.0T1 399 00104/163 ACCOUNTING ACCPRJID OE G ACC:PROJECTIDS UM ENGLE ACC.:PROJECTIDS 00104/164 ACCOUNTING IDRANGE SG G S1558 5.0T1 VLO FSNAME=ACCOUNTING.IDRANGE.SG.147(1) 400 5.0T1 400 ACCOUNTING.IDRANGE.SG.147 1 LINE 84 3 PAGE UM ENGLE JAN. 09, 1979 14:35:56 5.0T1 400 0 PROGRAM TO PRINT THE LAST ID IN A RANGE GIVEN THE FIRST ID AND NUMBER OF ID'S OR THE NUMBER OF ID'S GIVEN THE FIRST AND LAST ID'S WITH OPTION TO LIST ALL ID'S IN THE RANGE. COLLATING SEQUENCE IS A-H, J-N, P-Z, 0-9. 00104/165 ACCOUNTING IDRANGE OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.IDRANGE.OC.148(1) 401 5.0T1 401 ACCOUNTING.IDRANGE.OC.148 1 LINE 80 4 PAGE UM ENGLE JAN. 09, 1979 14:36:14 5.0T1 401 00104/166A ACCOUNTING ACCKILL SG O S0027 DISTRB FSNAME=ACCKILL 5.1T1 178 ACCOUNTING.ACCKILL.SG.166 1 LINE 72 3 PAGE UM ENGLE NOV. 23, 1982 16:21:46 0 Program to be run by the operators to set the flag to inhibit signons. Program prompts for operator's name, name of person requesting the change, the signon ID, and the signon ID a second time for verification. Information about the change is written in PASWRDFL. See FILENAME (104/65). 0 Referenced by comments of: 104/188 00104/167A ACCOUNTING ACCKILL UC G S0027 DISTRB FSNAME=ACCKILLUPD 5.1T1 179 ACCOUNTING.ACCKILL.UC.167 1 LINE 71 1 PAGE UM ENGLE NOV. 23, 1982 16:21:55 0 UPDATES SOURCE FROM THE PREVIOUS REGULAR DISTRIBUTION TO THE CURRENT DISTRIBUTION. 00104/168A ACCOUNTING ACCKILL OC O SYS.:ACCKILL 5.1T1 180 ACCOUNTING.ACCKILL.OC.168 1 LINE 5555 4 PAGE UM ENGLE JULY 23, 1983 10:17:26 SYS:ACCKILL 0 Referenced by comments of: 104/169, 104/170 1 SUN SEP 08/96 15:24:55 Page 73 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/169 ACCOUNTING ACCKILL C SYS:CPW 5.0T1 405 ACCOUNTING.ACCKILL.C.152 1 LINE 51 1 PAGE UM MTA AUG. 05, 1981 02:05:27 5.0T1 405 SYS:CPW 0 File $SOURCEd to by (104/170) to run ACCKILL (104/168). 0 Referenced by comments of: 104/170 00104/170 ACCOUNTING ACCKILL C *CPW 5.0T1 406 ACCOUNTING.ACCKILL.C.153 1 LINE 11 1 PAGE UM MTA AUG. 05, 1981 02:05:28 5.0T1 406 *CPW 0 Operator file which $SOURCEs to (104/169) to $RUN (104/168). 0 Referenced by comments of: 104/169 00104/171 ACCOUNTING AIOIF SA G S1558 5.0T1 VLO FSNAME=ACCOUNTING.AIOIF.SA.152(1) 407 5.0T1 407 ACCOUNTING.AIOIF.SA.152 1 LINE 80 1 PAGE UM ENGLE AUG. 15, 1980 11:23:00 5.0T1 407 0 THIS IS AN INTERFACE TO THE ACCOUNTING I/O SUBROUTINES FOR PROGRAMS WRITTEN IN LANGUAGES WHICH CANNOT ACCESS GENERAL REGISTERS 0 OR 13. 00104/172 ACCOUNTING AIOIF OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.AIOIF.OC.153(1) 408 5.0T1 408 ACCOUNTING.AIOIF.OC.153 1 LINE 80 1 PAGE UM ENGLE AUG. 15, 1980 11:23:05 5.0T1 408 00104/173 ACCOUNTING LOG SG G S1558 5.0T1 VLO FSNAME=ACCOUNTING.LOG.SG.154(1) 409 5.0T1 409 ACCOUNTING.LOG.SG.154 1 LINE 80 3 PAGE UM ENGLE FEB. 20, 1980 10:41:31 5.0T1 409 0 SUBROUTINE TO WRITE AN AUDIT TRAIL IN A LOG FILE. 0 Referenced by comments of: 631/22, 631/24 00104/174 ACCOUNTING LOG UC G # S0027 DISTRB FSNAME=LOGUPD 4.3T1 90 ACCOUNTING.LOG.UC.145 1 LINE 67 1 PAGE UM ENGLE FEB. 20, 1980 10:41:38 00104/175 ACCOUNTING LOG OC G S1558 5.0T1 VLO FSNAME=ACCOUNTING.LOG.OC.156(1) 410 5.0T1 410 ACCOUNTING.LOG.OC.156 1 LINE 80 4 PAGE UM ENGLE FEB. 20, 1980 10:41:45 5.0T1 410 00104/176C ACCOUNTING TRANSVEC SA G TV S0027 DISTRB FSNAME=TRANSVEC 5.1T1 181 ACCOUNTING.TRANSVEC.SA.176 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 17:17:53 0 Standard transfer vector address. 00104/177C ACCOUNTING TRANSVEC OC G S0027 DISTRB FSNAME=TV 5.1T1 182 ACCOUNTING.TRANSVEC.OC.177 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 17:17:55 0 Referenced by comments of: 104/118, 104/119, 104/120 1 SUN SEP 08/96 15:24:55 Page 74 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/178C ACCOUNTING PRJEXPIR SG G S0027 DISTRB FSNAME=PRJEXPIR 5.1T1 183 ACCOUNTING.PRJEXPIR.SG.178 1 LINE 95 1 PAGE UM ENGLE AUG. 26, 1982 17:18:18 0 Program to list expiration times, university account numbers, and unit codes for all projects which expire on the current date (*), a given date (MM/DD/YY), or within a range of dates (MM/DD/YY MM/DD/YY). 0 Referenced by comments of: 484/1 00104/179 ACCOUNTING PRJEXPIR UC G # S0027 DISTRB FSNAME=PRJEXPIRUPD UM ENGLE 0 Updates source from previous regular distribution to current one. 00104/180C ACCOUNTING PRJEXPIR OC G S0027 DISTRB FSNAME=PEXP 5.1T1 184 ACCOUNTING.PRJEXPIR.OC.180 1 LINE 80 3 PAGE UM ENGLE AUG. 26, 1982 17:18:58 00104/181C ACCOUNTING OPTFIELD SA G OFLD S0027 DISTRB FSNAME=OPTFIELD 5.1T1 185 ACCOUNTING.OPTFIELD.SA.181 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 17:20:15 0 Subroutine to locate an optional field in an accounting or a statistics record. 00104/182 ACCOUNTING OPTFIELD UC G # S0027 DISTRB FSNAME=OPTFIELDUPD UM ENGLE 0 Updates source from previous regular distribution to current one. 00104/183C ACCOUNTING OPTFIELD OC G S0027 DISTRB FSNAME=OFLD 5.1T1 186 ACCOUNTING.OPTFIELD.OC.183 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 17:20:18 0 Referenced by comments of: 631/22, 631/24 00104/184C ACCOUNTING ACCUNUSE SG O S0027 DISTRB FSNAME=ACCUNUSE 5.1T1 187 ACCOUNTING.ACCUNUSE.SG.184 1 LINE 105 3 PAGE UM ENGLE JAN. 31, 1983 11:49:57 0 Produces a listing of unused blocks of signon IDs and the number of IDs within each block for a specified range. 00104/185 ACCOUNTING ACCUNUSE UC G AUNU # S0027 DISTRB FSNAME=ACCUNUSEUPD UM ENGLE 0 Updates source from previous regular distribution to current distribution. 00104/186C ACCOUNTING ACCUNUSE OC O S0027 DISTRB FSNAME=AUNU 5.1T1 188 ACCOUNTING.ACCUNUSE.OC.186 1 LINE 80 5 PAGE UM ENGLE JAN. 31, 1983 11:50:30 00104/187 ACCOUNTING *ACCOUNTING D # MTS:$ACCOUNTING UM ENGLE *ACCOUNTING 0 THIS FILE CONTAINS THE SUFFIXS FOR THE NAME OF THE AUXILIARY ACCOUNTING FILE CONTAINING THE ACCOUNTING RECORD FOR EACH USER ID. THIS FILE MUST BE PERMITTED AS FOLLOWS: R/N,R (PKEY=*SYS.ACC,PKEY=*SYS.ACCOUNT, PKEY=INIT:INIT,PKEY=(ACCPASWD (104/57)),PKEY=(ACCSGATR (104/116)), 1 SUN SEP 08/96 15:24:55 Page 75 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 PKEY=(FIX (502/10)),PKEY=*ACRESTORE,PKEY=(SCANFILES (502/1)), PKEY=(ACCKILL(104/149))),WE PKEY=INIT:INITCHK,RW ACC.,RWE PKEY=(FILUPDAT (104/73)) THE DISTRIBUTED SYSTEM HAS THE FOLLOWING USERIDS: ACC., APL., BB00 ... BB99, BNCH, B001 ... B500, COPY, DIST, DWB., ETC., FILE, FIX., INIT, MAIL, MTA., MTS., NEW., NPRV, RSTR, SEG2, STRT, SYS., TAPE, TMTS, UNSP, WSG., W009, AND W170. 00104/188A ACCOUNTING *ACCOUNTING1 D # MTS:$ACCOUNTING1 UM ENGLE *ACCOUNTING1 0 The auxiliary accounting files (*ACCOUNTING1, *ACCOUNTING2, etc.) contain the actual accounting records, one for each user id. The files must be permitted as follows: R/N,RWC (PKEY=*SYS.ACC,PKEY=*SYS.ACCOUNT,PKEY=INIT:INIT, PKEY=(FIX (502/10)),PKEY=*ACRESTORE,PKEY=(FILUPDAT (104/73)), PKEY=(SCANFILES (502/1)),PKEY=(ACCPASWD (104/57)), PKEY=(ACCSGATR (104/116)),PKEY=(ACCKILL (104/166))), R PKEY=ACC.:FILEINFO,RW ACC. 00104/189A ACCOUNTING *ACCOUNTING2 D # MTS:$ACCOUNTING2 UM ENGLE *ACCOUNTING2 00104/190A ACCOUNTING *ACCOUNTING3 D # MTS:$ACCOUNTING3 UM ENGLE *ACCOUNTING3 00104/191A ACCOUNTING *ACCOUNTING4 D # MTS:$ACCOUNTING4 UM ENGLE *ACCOUNTING4 00104/192A ACCOUNTING *ACCOUNTING5 D # MTS:$ACCOUNTING5 UM ENGLE *ACCOUNTING5 00104/193 ACCOUNTING *PROJECT D # MTS:$PROJECT UM ENGLE *PROJECT 0 THE PROJECT FILE CONTAINS A RECORD FOR EACH PROJECT. THE FILE MUST BE PERMITTED AS FOLLOWS: P/N, RW (ACC., MTS.&PKEY=ACCMAINT), R PKEY=(*SYS.ACCOUNT,PKEY=*SYS.MESSAGE,PKEY=*USERDIRECTO) THIS FILE MUST ALSO BE PERMITTED READ TO THE USER ID WHICH RUNS THE BILLING PROGRAMS. 00104/194A ACCOUNTING *PRJDIRECTORY D # MTS:$PRJDIRECTOR UM ENGLE *PRJDIRECTORY 0 THE PROJECT DIRECTORY FILE CONTAINS LISTS OF THE USER ID'S BELONGING TO EACH PROJECT. THE FILE MUST BE PERMITTED AS FOLLOWS: P/N, RW (ACC., MTS.&PKEY=ACCMAINT), R PKEY=(*SYS.ACCOUNT,PKEY=*SYS.MESSAGE, PKEY=*USERDIRECTO) 1 SUN SEP 08/96 15:24:55 Page 76 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00104/195 ACCOUNTING *PWSTAT D # *PWSTAT UM ENGLE *PWSTAT@E 0 LOG FILE USED TO RECORD THE TIME AND DATE OF PASSWORD SETTINGS BY THE ACCOUNTING PROGRAMS. MUST BE PERMITTED AS FOLLOWS: P/N, (RWC,TRUNC) ACC.&PKEY=NEW.:LOGPURGE, NONE PKEY=*MTS.FILESTA SOME INSTALLATIONS MAY CHOOSE TO PERMIT THIS FILE WE TO ALL SO THAT ANY USER WHO MANAGES TO RUN ACCPASWD (104/57) OR ACCSGATR (104/116) WILL LEAVE SOME EVIDENCE. IN THEORY, THESE PROGAMS ARE NOT AVAILABLE TO USERS. 00104/196 ACCOUNTING LOG FILE D # ACC.:ACCLOG UM ENGLE ACC.:ACCLOG@E 0 THIS FILE WILL ACCUMULATE ACCOUNTING MAINTENANCE AND PROJECT MAINTENANCE DATA. IT SHOULD BE PURGED REGULARLY TO PREVENT IT BECOMING TOO LARGE. LOGPURGE (739) MAY BE USED FOR THIS PURPOSE. 00108/001 *PL360 COMPILER S3 DBMS:PL360COMP.S 5.0T1 411 PL360.COMPILER.S3.001 1 LINE 81 81 PAGE UM STERKEN JULY 03, 1981 12:45:36 5.0T1 411 0 THIS VERSION OF PL360 IS BASED ON ONE RECEIVED FROM STANFORD IN LATE 1977 AND INSTALLED AT UM IN JANUARY, 1978. A SET OF UPDATES FROM STANFORD HAS BEEN APPLIED, AS HAVE SOME LOCAL CHANGES TO THE SYM RECORDS OUTPUT UNDER THE TEST OPTION. THE UNSP SNOOP SUBROUTINE, SEE (685/2), IS CALLED TO KEEP STATISTICS OF PL360 USAGE ON THE FILE ETC:PL360.SNOOP, WHICH SHOULD BE PERMITTED WRITEXP TO PKEY=*PL360. THE PL360 COMPILER CONSISTS OF TWO PARTS. PL360COMP IS WRITTEN IN PL360 AND CONTAINS ALL SYSTEM INDEPENDENT PORTIONS OF THE COMPILER. PL360INTF IS WRITTEN IN ASSEMBLY AND IS THE MTS INTERFACE TO PL360. THE ENTRY POINT IS IN PL360COMP. ONCE *PL360 IS BOOTSTRAPPED, THE OBJECT MODULES ARE OBTAINED AS FOLLOWS: $RUN *PL360 SCARDS=PL360COMP.S SPUNCH=PL360COMP.O SPRINT=*PRINT* PAR=SIZE=100 $RUN *ASMH SCARDS=PL360INTF.S SPUNCH=PL360INTF.O SPRINT=*PRINT* *PL360 IS THEN LINKEDITED AS FOLLOWS: $RUN *LINKEDIT INCLUDE UNSP:LIBRARY ONLY SNOOP RENAME WRITE WRITE# INCLUDE PL360COMP.O+PL360INTF.O COMBINE@NAME=PL360 PUNCH ON *PL360 STOP $CONTROL *PL360 PKEY=*PL360 *PL360 CREATES AND DESTROYS A TEMPORARY FILE (-PL360#01) IN WHICH IT KEEPS AN INTERMEDIATE VERSION OF THE OBJECT MODULES IT PRODUCES. 1 SUN SEP 08/96 15:24:55 Page 77 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 THE MTS VERSION OF PL360 IS DESCRIBED FURTHER IN CCMEMO 75. THE BEST REFERENCE MANUAL FOR PL360 IS "INTRODUCTION TO PL360 PROGRAMMING" BY RICHARD L. GUERTIN (WADSWORTH PUBLISHING CO., BELMONT, CALIFORNIA). 00108/002A *PL360 MTS INTERFACE SA DBMS:PL360INTF.S 5.1T1 189 PL360.MTS_INTERFACE.SA.002 1 LINE 72 8 PAGE UM STERKEN JULY 23, 1983 10:17:45 0 SOURCE FOR MTS INTERFACE OF PL/360. 00108/003A *PL360 *PL360 OE *PL360 5.1T1 190 PL360.?PL360.OE.003 1 SEQ 29250 11 PAGE UM STERKEN JULY 23, 1983 10:17:46 *PL360 00108/004A *PL360 LIBRARY SA DBMS:PL360LIB.S 5.1T1 191 PL360.LIBRARY.SA.004 1 LINE 80 3 PAGE UM STERKEN JULY 23, 1983 10:17:46 0 *PL360LIB CONTAINS VARIOUS UTILITY SUBROUTINES (READ, WRITE, PAGE, PUNCH, ETC.) WHICH CAN BE REFERENCED FROM PL360 PROGRAMS AS PRE-DECLARED PROCEDURES. THE CALLING SEQUENCE IS NOT OS-STANDARD. SEE "INTRODUCTION TO PL360 PROGRAMMING" OR CCMEMO 75 FOR DETAILS. THESE ROUTINES ARE NOT USED BY PL360COMP. PL360LIB.S CONTAINS THE ASSEMBLY SOURCE FOR *PL360LIB. 00108/005 *PL360 *PL360LIB OE *PL360LIB 5.0T1 415 PL360.*PL360LIB.OE.005 1 LINE 572 1 PAGE UM STERKEN JULY 03, 1981 12:45:45 5.0T1 415 *PL360LIB 00110/001 TNL SA # (ABANDONED) D3T1 335 TNL.*TNL.S.1 1 SEQ 80 30 PAGE UM JULY 31, 1973 00:08.57 00111/001 *PTPRRTN SA G PTPR W116:PTPR.S 5.0T1 416 PTPRRTN..SA.001 1 LINE 80 24 PAGE UM YOUNG JULY 03, 1981 12:45:46 5.0T1 416 0 DEVICE SUPPORT ROUTINES FOR THE IBM 2671 PAPER TAPE READER. ASKS THE OPERATOR FOR THE CAUSE OF ANY EQUIPMENT CHECKS AND THEN TRANSMITS THAT INFORMATION TO THE USER. MAXIMUM LENGTH OF THE OPERATOR'S RESPONSE IS GOVERNED BY THE LENGTH OF THE PAD WHICH IS FOUND IN THE PSECT (LENGTH IS COMPUTED BY &LENRESP). MINIMUM LENGTH OF THE OPERATOR'S RESPONSE IS SET BY &MINRESP AND IS CURRENTLY SET TO 10 CHARACTERS. COPIES COPY:MTS.MACROS. 00111/002 *PTPRRTN OC G *PTPRRTN 5.0T1 417 PTPRRTN..OC.002 1 LINE 80 3 PAGE UM YOUNG JULY 03, 1981 12:45:48 5.0T1 417 *PTPRRTN 00116/001A *PDP8RTN SA G WSG:PDP8 5.1T1 192 PDP8RTN..SA.001 1 LINE 73 62 PAGE UM WSG JULY 23, 1983 10:17:47 0 MTS device support routines for the UM Front End Processors (Data Concentrators). Includes support for Votrax Audio Response Units by calling special subroutines (681) to perform I/O conversion. This DSR is also used for device type FDSK at UM, where floppy 1 SUN SEP 08/96 15:24:55 Page 78 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 disks are attached through a Front End Processor. Copies COPY:LLMPSEQU (087), COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 681/1, 681/2, 681/15 00116/002A *PDP8RTN OC G *PDP8RTN 5.1T1 193 PDP8RTN..OC.002 1 LINE 32767 26 PAGE UM WSG JULY 23, 1983 10:17:50 *PDP8RTN 0 Referenced by comments of: 681/2, 681/3, 681/4, 681/10, 681/12, 681/14 00116/003 *PDP8RTN *FDSKRTN OC G *FDSKRTN 5.0T1 420 PDP8RTN.*FDSKRTN.OC.003 1 LINE 23 1 PAGE UM WSG JULY 03, 1981 12:46:00 5.0T1 420 *FDSKRTN 0 Consists of a "$CONTINUE WITH *PDP8RTN" line. 00116/004 *PDP8RTN MEMO 375 WF S1558 5.0T1 VLO FSNAME=PDP8RTN.MEMO_375.WF.005(1) 422 5.0T1 422 PDP8RTN.MEMO_375.WF.005 1 LINE 104 10 PAGE UM WOLFSON SEP. 07, 1978 15:03:42 5.0T1 422 0 THIS IS COMPUTING CENTER MEMO 375 -- "THE DECWRITER TERMINAL AND MTS." 00116/005 *PDP8RTN MEMO 413 WF S1558 5.0T1 VLO FSNAME=PDP8RTN.MEMO_413.WF.006(1) 423 5.0T1 423 PDP8RTN.MEMO_413.WF.006 1 LINE 68 3 PAGE UM WSG FEB. 29, 1980 10:17:22 5.0T1 423 0 This is Computing Center Memo 413 -- "Guide for Using Decwriter Terminals with Various Terminal Controllers." 00116/006C *PDP8RTN MEMO 438 WF S0792 FSNAME=MEMO438.WF 5.1T1 194 PDP8RTN.MEMO_438.WF.006 1 LINE 158 21 PAGE UM WSG OCT. 05, 1982 17:36:58 0 This is Computing Center Memo 438 -- "The Revised Data Concentrator Device Command Language." 00117/001 *GRAPHMAC SM # (OBSOLETE) D4T1 396 GRAPHMAC..SM. 1 SEQ 80 63 PAGE UM JULY 31, 1973 00:14.26 00119/001 SYN360 SS S1558 5.0T1 VLO FSNAME=SYN360..SS.001(1) 424 5.0T1 424 SYN360..SS.001 1 SEQ 80 5 PAGE UM DWB JULY 31, 1973 00:15.37 5.0T1 424 0 PROGRAM (IN SNOBOL) TO PRODUCE THE SYNTAX TABLES THAT SNOBOL USES TO PARSE ITS INPUT. USED AS "CPU BURNER" AND "PAGER" FOR SYSTEM TESTING. 0 Referenced by comments of: 119/2 1 SUN SEP 08/96 15:24:55 Page 79 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00119/002 SYN360 TABLES DATA D S1558 5.0T1 VLO FSNAME=SYN360.TABLES_DATA.D.002(1) 425 5.0T1 425 SYN360.TABLES_DATA.D.002 1 SEQ 80 3 PAGE UM DWB JULY 31, 1973 00:15.38 5.0T1 425 0 INPUT TO (119/1). ENDS WITH A "$CONTINUE WITH SYNTBL" CARD. 00120/001 REWIND SUBR SA G S1558 5.0T1 VLO FSNAME=REWIND_SUBR..SA.001(1) 426 5.0T1 426 REWIND_SUBR..SA.001 1 LINE 80 1 PAGE UM MTA MAY 13, 1978 17:05:05 5.0T1 426 0 FORTRAN CALLABLE REWIND SUBROUTINE. ASSEMBLE USING *SYSMAC. 00120/002 REWIND SUBR OC G # (PART OF *LIBRARY) UM MTA 0 Object is in *LIBRARY (524/1). 00121/001 *USERS SG G S1558 5.0T1 VLO FSNAME=USERS..SG.001(1) 427 5.0T1 427 USERS..SG.001 1 LINE 75 1 PAGE UM MTA APR. 05, 1980 14:06:21 5.0T1 427 0 GOM PROGRAM TO ISSUE A "$SYSTEMSTATUS USERS" COMMAND (GRUDGINGLY). IT IS SUGGESTED THAT THIS PROGRAM NOT BE INSTALLED AT NEW INSTALLATIONS. 00121/002 *USERS OC G *USERS 5.0T1 428 USERS..OC.002 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 12:46:12 5.0T1 428 00123/001 *PTASKS SA # (OBSOLETE) D4T1 405 PTASKS..SA. 1 SEQ 80 17 PAGE UM JULY 31, 1973 00:15.58 00126/001 BLSTDEV SA G S1558 5.0T1 VLO FSNAME=BLSTDEV..SA.001(1) 429 5.0T1 429 BLSTDEV..SA.001 1 LINE 80 3 PAGE UM MTA JULY 30, 1973 03:31.46 5.0T1 429 0 SUBROUTINE TO RESET A DEVICE FOR A NEW OPERATION. USED BY SEVERAL DSR'S. 00126/002 BLSTDEV OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00128/001 *PTPPRTN SA S S1558 5.0T1 VLO FSNAME=PTPPRTN..SA.001(1) 430 5.0T1 430 PTPPRTN..SA.001 1 SEQ 80 19 PAGE UM WSG JULY 31, 1973 00:17.03 5.0T1 430 0 MTS device support routines for IBM 1018 paper tape punch. Has bugs and has not been used at UM for many years. Object not distributed. 1 SUN SEP 08/96 15:24:55 Page 80 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00129/001 *STATUS SA G # (PART OF ACCOUNTING) UM ENGLE 0 PROGRAM TO ALLOW USER TO PRINT INFO FROM HIS ACCOUNTING RECORD. RUN WITH PROT=OFF. Distributed as part of ACCOUNTING (104/18). 00129/002A *STATUS OE G *STATUS 5.1T1 195 STATUS..OE.002 1 LINE 8412 4 PAGE UM ENGLE JULY 23, 1983 10:17:54 *STATUS 0 CONSISTS OF: STATUS (104/18) + *LCS (164). THIS FILE MUST BE PERMITTED AS FOLLOWS: U/N,R PKEY=*MTS.RUN THIS FILE MUST BE GIVEN THE PROGRAM KEY *STATUS. 0 Referenced by comments of: 104/18, 104/20 00131/001 STRTPDP # (OBSOLETE) D2T1 149 UM 0 Obsoleted by the $SYSTEMSTATUS command. 00132/001 *PERMIT SA # (OBSOLETE) D4T1 409 PERMIT..SA.001 1 LINE 80 6 PAGE UM JULY 27, 1977 22:26:58 00133/001 *PLOT SA S1011 ETC 'MISC' FSNAME=PTRCONVPLOT 5.0T1 432 PLOT..SA.001 1 LINE 72 8 PAGE UM LIFT DEC. 07, 1978 15:44:47 5.0T1 432 0 CONVERSATIONAL INTERFACE TO PRINTER PLOT SUBROUTINES (282). 00133/002 *PLOT OC *PLOT 5.0T1 433 PLOT..OC.002 1 LINE 80 3 PAGE UM LIFT JULY 03, 1981 12:46:48 5.0T1 433 *PLOT 00135/001A *TAPERTN SA G TAPE:TAPE 5.1T1 196 TAPERTN..SA.001 1 LINE 81 95 PAGE UM SHERRY JULY 23, 1983 10:17:55 TAPE:TAPE 0 MTS device support routines for magnetic tapes. NOTE: The "NLC" control command (which only works if issued by a user ID which is authorized to $SET PROT=OFF or by user ID "SYS." with program key "*LABEL") overrides the normal checking for volume labels. It is used by *LABEL (487) to label virgin tapes and FIND LABEL (729) to print unknown labels. Copies COPY:LLMPSEQU (087), COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), *CNFGINFODSECT (654), and *SENSEDSECT (3025). Assemble using COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4), COPY:UC.MACROS (787/1), and COPY:SETPARM (653) with PAR=PEXIT=*PEXIT (775). ******************************************************************************** D5.0A version: Some bugs fixed and implements TIMER=n control command to print warning message if tape not used for specific interval. 1 SUN SEP 08/96 15:24:55 Page 81 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ******************************************************************************** ******************************************************************************** D5.0B version: Implements TRANSLATE control command to change translate table used for ASCII data translation. Default translation tables changed from IBM to MTS. ******************************************************************************** ***************************************************************************** D5.1 version: Messages now in mixed case. Lower case control commands accepted. All control commands now check for invalid or extra parameters. Some bug fixes. ***************************************************************************** 0 Referenced by comments of: 787/20, 806/1 00135/002A *TAPERTN UPDATE UC G TAPE:TAPE.U 5.1T1 197 TAPERTN.UPDATE.UC.002 1 LINE 149 14 PAGE UM SHERRY JULY 23, 1983 10:17:58 00135/003A *TAPERTN OC G *TAPERTN 5.1T1 198 TAPERTN..OC.003 1 LINE 20904 15 PAGE UM SHERRY JULY 23, 1983 10:17:59 *TAPERTN 0 THIS FILE IS NORMALLY LOADED INTO SHARED VM BY PISTLE. 00136/001 *FIX C G *FIX 5.0T1 437 FIX..C.001 1 LINE 7 1 PAGE UM ENGLE JULY 03, 1981 12:47:00 5.0T1 437 *FIX 0 COMMAND FILE USED BY OPERATORS TO CLEAN UP A USERID (E.G. AFTER A SNARK). THIS WILL SET THE CORRECT NUMBER OF CURRENT SIGNONS IN THE USER'S ACCOUNTING RECORD AND UPDATE HIS FILE SPACE INFORMATION. THIS FILE SOURCES TO FIX:FIX (136/2). INVOKED BY ENTERING "MTS *FIX" ON OPERATORS CONSOLE. 00136/002 *FIX FIX:FIX C G FIX:FIX 5.0T1 438 FIX.FIX:FIX.C.002 1 LINE 52 1 PAGE UM ENGLE JULY 03, 1981 12:47:01 5.0T1 438 FIX.:FIX 0 COMMAND FILE TO RUN *ACCRESTORE (484). 0 Referenced by comments of: 136/1 00137/001 *UPDATE D5.0 MASTER SA G W009:UPDATE.S 5.0T1 439 UPDATE.D5.0_MASTER.SA.001 1 LINE 80 29 PAGE UM SHERRY JULY 03, 1981 12:47:03 5.0T1 439 0 D5.0 MASTER SOURCE FOR THE MTS SOURCE UPDATE PROGRAM. REQUIRES BLOCKED I/O ROUTINES (283). 1 SUN SEP 08/96 15:24:55 Page 82 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00137/002 *UPDATE OE G *UPDATE 5.0T1 440 UPDATE..OE.002 1 LINE 7560 4 PAGE UM SHERRY JULY 03, 1981 12:47:05 5.0T1 440 *UPDATE 00138/001 *TEXT360 MONITOR SA G S1558 5.0T1 VLO FSNAME=TEXT360.MONITOR.SA.001(1) 441 5.0T1 441 TEXT360.MONITOR.SA.001 1 LINE 80 18 PAGE UM TIFFANY JULY 27, 1977 22:49:43 5.0T1 441 0 NEW VERSION 7 OF TEXT/360 TEXT PROCESSING PROGRAM. THE SEPARATE PROGRAMS *FMAINT, *BLDLIN, *PLAOUT, AND *POSTPR ARE NO LONGER USED. INSTEAD, *TEXT360 CONTAINS ALL THESE PROGRAMS. IN ADDITION, MOST PARTS OF TEXT/360 HAVE BEEN RE-WRITTEN BECOMING BOTH SMALLER AND FASTER. 0 Referenced by comments of: 138/8 00138/002A *TEXT360 FMAINT SA G S0990 TXT370 'TEXT370' POSN=FM.CT052 5.1T1 199 TEXT360.FMAINT.SA.002 1 LINE 80 52 PAGE UM TIFFANY JULY 23, 1983 10:19:35 0 TEXT/360 FILE MAINTENANCE. ************************************************************************* D5.0B version: The only changes were made for the font PO8UMA, *PGF(12) as follows: Name Text360 Representation Output code -------------------- ---------------------- ----------- Broken vertical line //I 6A Tilde //T 73 Up arrow //4 74 Down arrow //5 75 Left arrow //6 76 Right arrow //7 77 Grave accent //M 79 Caret //E AA In addition, //W is now illegal. ************************************************************************* 00138/003 *TEXT360 BLDLIN SA G S1558 5.0T1 VLO FSNAME=TEXT360.BLDLIN.SA.003(1) 443 5.0T1 443 TEXT360.BLDLIN.SA.003 1 LINE 80 94 PAGE UM TIFFANY JULY 27, 1977 22:49:54 5.0T1 443 0 TEXT/360 BUILD LINES. 00138/004 *TEXT360 HYPHEN SA G S1558 5.0T1 VLO FSNAME=TEXT360.HYPHEN.SA.004(1) 444 5.0T1 444 TEXT360.HYPHEN.SA.004 1 LINE 80 10 PAGE UM TIFFANY MAR. 26, 1979 02:31:56 5.0T1 444 0 TEXT/360 SUBROUTINE TO HYPHENATE WORDS. 1 SUN SEP 08/96 15:24:55 Page 83 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00138/005 *TEXT360 PLAOUT SA G S1558 5.0T1 VLO FSNAME=TEXT360.PLAOUT.SA.005(1) 445 5.0T1 445 TEXT360.PLAOUT.SA.005 1 LINE 80 70 PAGE UM TIFFANY MAR. 26, 1979 02:31:56 5.0T1 445 0 TEXT/360 PAGE LAYOUT. 00138/006 *TEXT360 PPR1 SP O S1558 5.0T1 VLO FSNAME=TEXT360.PPR1.SP.006(1) 446 5.0T1 446 TEXT360.PPR1.SP.006 1 LINE 80 28 PAGE UM TIFFANY MAR. 26, 1979 02:32:05 5.0T1 446 0 TEXT/360 POST PROCESSOR. 00138/007 *TEXT360 PPR2 SA G S1558 5.0T1 VLO FSNAME=TEXT360.PPR2.SA.007(1) 447 5.0T1 447 TEXT360.PPR2.SA.007 1 LINE 80 11 PAGE UM TIFFANY JULY 27, 1977 22:50:26 5.0T1 447 0 TEXT/360 SPELLING POSTPROCESSOR. 0 Referenced by comments of: 138/8 00138/008A *TEXT360 OBJECT OE G *TEXT360 5.1T1 200 TEXT360.OBJECT.OE.008 1 LINE 14896 28 PAGE UM TIFFANY JULY 23, 1983 10:19:35 *TEXT360 0 OBJECT FROM (138/1) THROUGH (138/7). ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD. 00138/009 *TEXT360 *PRESCAN SA O S1558 5.0T1 VLO FSNAME=TEXT360.*PRESCAN.SA.009(1) 449 5.0T1 449 TEXT360.*PRESCAN.SA.009 1 LINE 80 40 PAGE UM TIFFANY JULY 27, 1977 22:50:30 5.0T1 449 0 TEXT/360 PRESCAN PROGRAM. 00138/010 *TEXT360 *PRESCAN OE O *PRESCAN 5.0T1 450 TEXT360.*PRESCAN.OE.010 1 LINE 8994 5 PAGE UM TIFFANY JULY 03, 1981 12:48:44 5.0T1 450 *PRESCAN 00138/011 *TEXT360 *PRINT SA G S0990 TXT370 'TEXT370' POSN=PRINT.EC120 5.0T1 451 TEXT360.*PRINT.SA.011 1 SEQ 80 14 PAGE UM TIFFANY JULY 03, 1981 12:48:47 5.0T1 451 0 TEXT/360 output printing program. 00138/012 *TEXT360 *PRINT OC G *PRINT 5.0T1 452 TEXT360.*PRINT.OC.012 1 LINE 2464 4 PAGE UM TIFFANY JULY 03, 1981 12:48:48 5.0T1 452 *PRINT 00138/013 *TEXT360 *DICTUPD SP G S1558 5.0T1 VLO FSNAME=TEXT360.*DICTUPD.SP.013(1) 453 5.0T1 453 TEXT360.*DICTUPD.SP.013 1 LINE 80 7 PAGE UM TIFFANY JULY 27, 1977 22:50:41 5.0T1 453 0 PROGRAM TO MAINTAIN TEXT/360 SPELLING DICTIONARY. 1 SUN SEP 08/96 15:24:55 Page 84 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00138/014 *TEXT360 *DICTUPD OE O *DICTUPD 5.0T1 454 TEXT360.*DICTUPD.OE.014 1 LINE 10746 5 PAGE UM TIFFANY JULY 03, 1981 12:48:50 5.0T1 454 *DICTUPD 0 ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD. 00138/015 *TEXT360 *DICT D *DICT 5.0T1 455 TEXT360.*DICT.D.015 1 SEQ 4096 22 PAGE UM TIFFANY JULY 03, 1981 12:48:51 5.0T1 455 *DICT 0 TEXT/360 SPELLING DICTIONARY CONTAINING ABOUT 12000 WORDS. 00138/016A *TEXT360 *HYPHDICT D *HYPHDICT 5.1T1 201 TEXT360.?HYPHDICT.D.016 1 LINE 64 6 PAGE UM MANUAL JULY 23, 1983 10:19:36 *HYPHDICT 0 A HYPHENATION OVERRIDE DICTIONARY FOR WORDS THAT MTS TEXT PROCESSING LANGUAGES CANNOT HYPHENATE CORRECTLY. 00138/017 *TEXT360 *T360MASTCONV SP G S1558 5.0T1 VLO FSNAME=TEXT360.*T360MASTCONV.SP.017(1) 457 5.0T1 457 TEXT360.*T360MASTCONV.SP.017 1 LINE 70 3 PAGE UM TIFFANY JULY 12, 1979 22:25:52 5.0T1 457 0 PROGRAM TO CONVERT A TEXT/360 MASTER FILE INTO A TEXT/360 INPUT STREAM. 00138/018 *TEXT360 *T360MASTCONV SA G S1558 5.0T1 VLO FSNAME=TEXT360.*T360MASTCONV.SA.018(1) 458 5.0T1 458 TEXT360.*T360MASTCONV.SA.018 1 LINE 72 1 PAGE UM TIFFANY JULY 12, 1979 22:25:54 5.0T1 458 0 A SUBROUTINE TO REPLACE "NONPRINTABLE" CHARACTERS WITH SPECIAL CHARACTERS PRECEDED BY EITHER A "/" OR "//". 00138/019 *TEXT360 *T360MASTCONV OE G *T360MASTCONV 5.0T1 459 TEXT360.*T360MASTCONV.OE.019 1 LINE 5598 5 PAGE UM TIFFANY JULY 03, 1981 12:48:55 5.0T1 459 *T360MASTCONV 0 EXTERNAL SYMBOL IHESAPC SHOULD BE RENAMED IHESAPE. ENDS WITH A "$CONTINUE WITH *PL1LIB" RECORD. 00140/001 *ANALYSIS SA G S1558 5.0T1 VLO FSNAME=ANALYSIS..SA.001(1) 460 5.0T1 460 ANALYSIS..SA.001 1 LINE 80 60 PAGE UM MTA JULY 27, 1977 22:50:55 5.0T1 460 0 PROGRAM USED IN ANALYZING THE STATISTICS PRODUCED ON MAGNETIC TAPE BY THE STAT JOB (079). ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 79/1 00140/002 *ANALYSIS OC G *ANALYSIS(1) 5.0T1 461 ANALYSIS..OC.002 1 LINE 11972 7 PAGE UM MTA JULY 03, 1981 12:48:58 5.0T1 461 *ANALYSIS 0 THIS FILE CONTAINS SEVERAL OTHER THINGS STARTING AT LINE -1000. SEE CCMEMO 393 (079/6). 1 SUN SEP 08/96 15:24:55 Page 85 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00140/003 *ANALYSIS PL/1 MAIN PGM SP S1558 5.0T1 VLO FSNAME=ANALYSIS.PL/1_MAIN_PGM.SP.003(1) 462 5.0T1 462 ANALYSIS.PL/1_MAIN_PGM.SP.003 1 LINE 80 1 PAGE UM MTA JUNE 28, 1974 16:12.14 5.0T1 462 0 PL/1 MAIN PROGRAM FOR USE WITH *ANALYSIS. 00140/004 *ANALYSIS PL/1 MAIN PGM OC *ANALYSIS(0,.999) 5.0T1 463 ANALYSIS.PL/1_MAIN_PGM.OC.004 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 12:48:59 5.0T1 463 00140/005 *ANALYSIS EXAMPLE STP2 SA G S0938 FSAVE2 VLO FSNAME=KIPSSTP2(2) 124 5.0T1 464 ANALYSIS.EXAMPLE_STP2.SA.005 1 LINE 73 24 PAGE UM MTA NOV. 08, 1975 00:29:03 5.0T1 464 0 EXAMPLE STP2 SUBROUTINE FOR USE WITH *ANALYSIS. CALLS THE HISTOGRAM SUBROUTINE (140/7). COPIES *ANALYSIS(-800,-700) AND REQUIRES *SYSMAC. 0 Referenced by comments of: 140/7 00140/006 *ANALYSIS EXAMPLE STP2 OC G S0938 FSAVE2 VLO FSNAME=KIPSSTP2(3) 177 5.0T1 465 ANALYSIS.EXAMPLE_STP2.OC.006 1 LINE 80 29 PAGE UM MTA OCT. 25, 1976 22:22:14 5.0T1 465 00140/007 *ANALYSIS HISTOGRAM SA G *ANALYSIS(-400,-1) 5.0T1 466 ANALYSIS.HISTOGRAM.SA.007 1 LINE 72 6 PAGE UM MTA JULY 03, 1981 12:50:00 5.0T1 466 0 SUBROUTINE TO PLOT HISTOGRAMS, VAGUELY RELATED TO *ANALYSIS AND BRIEFLY DESCRIBED IN CCMEMO 393 (079/6). CALLED BY THE EXAMPLE STP2 SUBROUTINE (140/5). ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 140/5, 718/2, 799/1 00140/008 *ANALYSIS HISTOGRAM OC G *ANALYSIS(-600,-401) 5.0T1 467 ANALYSIS.HISTOGRAM.OC.008 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 12:50:01 5.0T1 467 00140/009 *ANALYSIS CALLSTP2 SA G MTA:CALLSTP2(1,999) 5.0T1 468 ANALYSIS.CALLSTP2.SA.009 1 LINE 70 3 PAGE UM MTA JULY 03, 1981 12:50:02 5.0T1 468 MTA.:CALLSTP2 0 PROGRAM TO REPLACE *ANALYSIS FOR THE CASE WHERE ONLY STP2A, STP2D, AND/OR STP2E ARE SUPPLIED AND THE JOB AREA IS NOT NEEDED. MUCH FASTER THAN *ANALYSIS FOR THIS CASE. 00140/010 *ANALYSIS CALLSTP2 OC G MTA:CALLSTP2(1000) 5.0T1 469 ANALYSIS.CALLSTP2.OC.010 1 LINE 80 2 PAGE UM MTA JULY 03, 1981 12:50:03 5.0T1 469 00141/001 *GPAKDRAW S # (OBSOLETE) UM 1 SUN SEP 08/96 15:24:55 Page 86 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00143/001 REWIND# SUBR SA # (PART OF RSF) UM 0 Now part of RSF (578) 00144/001 *ASA SA O S1558 5.0T1 VLO FSNAME=ASA..SA.001(1) 470 5.0T1 470 ASA..SA.001 1 LINE 80 4 PAGE UM TIFFANY JULY 27, 1977 23:16:57 5.0T1 470 0 PRINTS OUTPUT WITH ASA STANDARD CARRIAGE CONTROL. ASSEMBLE WITH PAR=BATCH. 00144/002 *ASA OC O *ASA 5.0T1 471 ASA..OC.002 1 LINE 80 1 PAGE UM TIFFANY JULY 03, 1981 12:50:05 5.0T1 471 *ASA 00145/001 *TASKS SA G S0792 WSGFS FSNAME=MTASKS.SA 5.0T1 472 TASKS..SA.001 1 LINE 60 3 PAGE UM WSG NOV. 17, 1980 15:53:50 5.0T1 472 0 MTS program to print task status in same format as TASKS job (019). Calls TSKFMT subroutine which is part of TASKS job (019). 0 Referenced by comments of: 19/1 00145/002 *TASKS OC G *TASKS 5.0T1 473 TASKS..OC.002 1 LINE 80 1 PAGE UM WSG JULY 03, 1981 12:51:49 5.0T1 473 *TASKS 00146/001 *OLDED SA # (OBSOLETE) D2T1 325 UM 00147/001 *FILESCAN SA G S1558 5.0T1 VLO FSNAME=FILESCAN..SA.001(1) 474 5.0T1 474 FILESCAN..SA.001 1 LINE 80 9 PAGE UM ENGLE DEC. 05, 1975 16:09:05 5.0T1 474 0 MTS FILE SCANNING PROGRAM. 00147/002 *FILESCAN OE G *FILESCAN 5.0T1 475 FILESCAN..OE.002 1 LINE 255 2 PAGE UM ENGLE JULY 03, 1981 12:51:50 5.0T1 475 *FILESCAN 00148/001 *WATLIB # *WATLIB UM SHERRY *WATLIB@UM 0 This file has source for a bunch of FORTRAN subroutines and assembler subroutine object decks which *WATFIV assumes as the default library when attempting to resolve undefined symbols in WATFIV programs. Not distributed because of Waterloo restrictions. 0 Referenced by comments of: 148/2, 148/3 1 SUN SEP 08/96 15:24:55 Page 87 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00148/002 *WATLIB WATSUB SUBR SA G S1558 5.0T1 VLO FSNAME=WATLIB.WATSUB_SUBR.SA.002(1) 477 5.0T1 477 WATLIB.WATSUB_SUBR.SA.002 1 LINE 66 3 PAGE UM SHERRY AUG. 14, 1977 19:11:25 5.0T1 477 0 SOURCE FOR THE WATSUB SUBROUTINE. OBJECT IS IN *WATLIB (148/1). 00148/003 *WATLIB TRACER SUBR SA G S1558 5.0T1 VLO FSNAME=WATLIB.TRACER_SUBR.SA.003(1) 478 5.0T1 478 WATLIB.TRACER_SUBR.SA.003 1 LINE 57 1 PAGE UM SHERRY AUG. 14, 1977 19:11:26 5.0T1 478 0 SOURCE FOR THE TRACER SUBROUTINE. OBJECT IS IN *WATLIB (148/1). 00148/004 *WATLIB WATGENLIB SA G S1558 5.0T1 VLO FSNAME=WATLIB.WATGENLIB.SA.004(1) 479 5.0T1 479 WATLIB.WATGENLIB.SA.004 1 LINE 80 23 PAGE UM SHERRY JULY 27, 1977 23:22:29 5.0T1 479 0 WATFIV LIBRARY GENERATOR. THE WATFIV CONTROL CARD CHARACTER IS "/" (ALTERNATIVELY "$"), SO THE SET SYMBOLS &CC AND &CCA SHOULD BE CHANGED APPROPRIATELY IF A DIFFERENT CONVENTION IS FOLLOWED. ASSEMBLE USING *SYSMAC. 00148/005 *WATLIB *WATGENLIB OE G *WATGENLIB 5.0T1 480 WATLIB.*WATGENLIB.OE.005 1 SEQ 3151 2 PAGE UM SHERRY JULY 03, 1981 12:51:54 5.0T1 480 *WATGENLIB 00151/001 *CONVSNOBOL SS G *CONVSNOBOL 5.0T1 481 CONVSNOBOL..SS.001 1 LINE 69 1 PAGE UM SWARTZ JULY 03, 1981 12:51:55 5.0T1 481 *CONVSNOBOL 0 $SOURCE FILE WHICH RUNS A SNOBOL PROGRAM TO ENHANCE CONVERSATIONAL USE OF SNOBOL. 00153/001 *MADTOPL1 SS MPL1 *MADTOPL1 5.0T1 482 MADTOPL1..SS.001 1 LINE 80 21 PAGE UM JULY 03, 1981 12:51:56 5.0T1 482 *MADTOPL1 0 CONVERT MAD 7090 TO PL/I 00154/001 *LAS C *LAS 5.0T1 483 LAS..C.001 1 LINE 9 1 PAGE UM WSG JULY 03, 1981 12:51:59 5.0T1 483 STRT:*LAS 0 Command file for starting MTS terminal lines. Invoked by entering "MTS *LAS" on the operators console. Signs on under user id "STRT" and sources to STRT:LAS (154/2). 0 Referenced by comments of: 67/21, 621/1 00154/002 *LAS LAS C MTS:TST.LAS 5.0T1 484 LAS.LAS.C.002 1 LINE 67 1 PAGE UM WSG JULY 03, 1981 12:52:00 5.0T1 484 STRT:LAS 0 Command file which starts up MTS terminal lines. This file will have to be modified for each installation's I/O configuration. 1 SUN SEP 08/96 15:24:55 Page 88 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 154/1 00154/003 *LAS LAS UM C # STRT:LAS UM WSG STRT:LAS@UM 0 UM version of STRT:LAS. 00156/001 IPL PROGRAM # (OBSOLETE) D3.2T1 131 IPL_PROGRAM..SA.01 1 LINE 80 13 PAGE UM MAR. 21, 1975 01:13:31 00157/001 IPL BOOTSTRAP SA G # (OBSOLETE) D4T1 465 IPL_BOOTSTRAP..SA.001 1 LINE 80 4 PAGE UM JULY 27, 1977 23:22:41 D4T1 465 00160/001 FRONCOPY S # (OBSOLETE) D2T1 387 UM 00162/001A PSA DSECT SA G COPY:PSA 5.1T1 202 PSA_DSECT..SA.001 1 LINE 72 5 PAGE UM MTA JULY 23, 1983 10:19:37 COPY:PSA 0 Definition of prefixed storage area (PSA). Copied by CONFIG, the supervisor, and others. Requires that COPY:GLOBALS (1026/3) be copied first. 0 Referenced by comments of: 45/1, 46/1, 540/3, 577/1, 577/3, 577/8, 577/11, 634/3, 1021/1, 1021/4, 1081/1 00163/001 PL1 COMPILER MACLIB SM G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.MACLIB.SM.001(1) 485 5.0T1 485 PL1_COMPILER.MACLIB.SM.001 1 LINE 80 27 PAGE UM TIFFANY APR. 05, 1980 14:08:31 5.0T1 485 0 PL/I(F) VERSION 5.5 COMPILER (RELEASE 21.8). THIS VERSION OF THE PL/I(F) COMPILER DIFFERS FROM PREVIOUS VERSIONS IN THE FOLLOWING WAYS: 1) COMPILATION IS FASTER AND CHEAPER. 2) INPUT RECORDS OVER 100 BYTES ARE TRUNCATED WITH A WARNING. 3) COMPILER OPTIONS ARE NO LONGER SET TO DEFAULT AT THE SECOND (AND SUBSEQUENT) COMPILATION. THEY WILL BE THE SAME AS AT THE FIRST COMPILATION UNLESS OVERRIDDEN BY THE %PROCESS RECORD. 4) OPTION DIAG IS THE DEFAULT IF SERCOM IS DIFFERENT THAN SPRINT OR IF SPRINT IS NOT USED. 5) IF SPRINT IS SET TO A TERMINAL BY DEFAULT, THEN OPTIONS NOOPLIST, NOSOURCE2, NOSOURCE, NOXREF, NOATR, NOEXTREF, AND NOLIST ARE ASSUMED. 6) TWO NEW OPTIONS HAVE BEEN ADDED: A) THE MTS/OS OPTION PRODUCES OBJECT MODULES THAT ARE INTENDED FOR MTS OR OS, RESPECTIVELY. THE DEFAULT IS MTS. B) NUM/NONUM CONTROLS THE PRINTING OF MTS LINE NUMBERS IN THE SOURCE LISTING. THE DEFAULT IS NUM. 7) THE WORK FILE -SYSUT4 IS NOW A VIRTUAL MEMORY FILE. THIS SUBCOMPONENT, MACLIB, IS A MACRO LIBRARY FOR THE SIMULATION OF OS/360 1 SUN SEP 08/96 15:24:55 Page 89 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 STUFF IN MTS. 0 Referenced by comments of: 163/3, 163/5, 163/6, 163/7, 163/8, 163/9, 163/10, 163/11, 163/13, 233/1, 506/11 00163/002 PL1 COMPILER MACLIB SM G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.MACLIB.SM.002(1) 486 5.0T1 486 PL1_COMPILER.MACLIB.SM.002 1 LINE 73 8 PAGE UM TIFFANY APR. 05, 1980 14:08:33 5.0T1 486 0 ANOTHER MACRO LIBRARY. 00163/003 PL1 COMPILER REPLACE SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.REPLACE.SA.003(1) 487 5.0T1 487 PL1_COMPILER.REPLACE.SA.003 1 LINE 80 3 PAGE UM TIFFANY APR. 05, 1980 14:08:35 5.0T1 487 0 ROUTINE TO REPLACE A TIOT, ATTACHING ANYTHING TO AN MTS LOGICAL I/O UNIT IF APPLICABLE. ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/004 PL1 COMPILER CHKLIO SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.CHKLIO.SA.004(1) 488 5.0T1 488 PL1_COMPILER.CHKLIO.SA.004 1 LINE 80 3 PAGE UM TIFFANY APR. 05, 1980 14:09:00 5.0T1 488 0 ROUTINE TO CHECK IF A NAME IS AN MTS LOGICAL I/O UNIT. 00163/005 PL1 COMPILER NONSENSE SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.NONSENSE.SA.005(1) 489 5.0T1 489 PL1_COMPILER.NONSENSE.SA.005 1 LINE 80 3 PAGE UM TIFFANY APR. 05, 1980 14:09:27 5.0T1 489 0 ROUTINE TO SAY THAT SOMETHING DOES NOT EXIST OR IS NOT AVAILABLE. ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/006 PL1 COMPILER FREEDDEF SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.FREEDDEF.SA.006(1) 490 5.0T1 490 PL1_COMPILER.FREEDDEF.SA.006 1 LINE 80 2 PAGE UM TIFFANY APR. 05, 1980 14:09:53 5.0T1 490 0 ROUTINE TO FREE ALL DDEF'S. ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/007 PL1 COMPILER FINDTIOT SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.FINDTIOT.SA.007(1) 491 5.0T1 491 PL1_COMPILER.FINDTIOT.SA.007 1 LINE 80 2 PAGE UM TIFFANY APR. 05, 1980 14:10:19 5.0T1 491 0 ROUTINE TO FIND A TIOT GIVEN A "DDNAME." ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/008 PL1 COMPILER DDEF SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.DDEF.SA.008(1) 492 5.0T1 492 PL1_COMPILER.DDEF.SA.008 1 LINE 80 10 PAGE UM TIFFANY APR. 05, 1980 14:10:46 5.0T1 492 0 ROUTINE TO PROCESS DDEF COMMANDS AND GET A TIOT FOR EACH. 1 SUN SEP 08/96 15:24:55 Page 90 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/009 PL1 COMPILER OPEN SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.OPEN.SA.009(1) 493 5.0T1 493 PL1_COMPILER.OPEN.SA.009 1 LINE 80 16 PAGE UM TIFFANY APR. 05, 1980 14:11:16 5.0T1 493 0 SIMULATE OS/360 OPEN. CURRENTLY ONLY BSAM AND QSAM ARE SUPPORTED. ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/010 PL1 COMPILER ROUT SA G RUTE W062:IOPACK(8000,8999) 5.0T1 494 PL1_COMPILER.ROUT.SA.010 1 LINE 80 32 PAGE UM TIFFANY JULY 03, 1981 12:52:08 5.0T1 494 0 List of various routines. Assemble using the (163/1) macro library. 00163/011 PL1 COMPILER CLOSE SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.CLOSE.SA.011(1) 495 5.0T1 495 PL1_COMPILER.CLOSE.SA.011 1 LINE 80 5 PAGE UM TIFFANY APR. 05, 1980 14:13:12 5.0T1 495 0 SIMULATE OS/360 CLOSE. ASSEMBLE USING THE (163/1) MACRO LIBRARY. 00163/012 PL1 COMPILER SETPFX SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.SETPFX.SA.012(1) 496 5.0T1 496 PL1_COMPILER.SETPFX.SA.012 1 LINE 80 7 PAGE UM TIFFANY APR. 05, 1980 14:13:46 5.0T1 496 0 ALTERNATE ROUTINES: SETPFX, GETPFX WITH MULTICHARACTER PREFIX FEATURES. 0 Referenced by comments of: 233/1 00163/013 PL1 COMPILER UPDATE UC W062:PL1.UP 5.0T1 497 PL1_COMPILER.UPDATE.UC.013 1 LINE 73 40 PAGE UM TIFFANY JULY 03, 1981 12:52:57 5.0T1 497 0 Old *CDUPDATE input to produce current MTS PL/I compiler from OS/360 Release 21.8 source. The compiler may be produced in the following way: 1) use PL/1 maintenance HENPECKER (506/8) to pick up the specific module sources from IEBUPDT OS Release 21.8 source. 2) apply update (this subcomponent). 3) run *ASMH (737/30) with macro library OSMACLIB (163/1). See (506/11) for information regarding the installation and maintenance of version 5.5 of the PL/I-F compiler. 00163/014 PL1 COMPILER ESDLIST SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.ESDLIST.SA.014(1) 498 5.0T1 498 PL1_COMPILER.ESDLIST.SA.014 1 LINE 80 2 PAGE UM TIFFANY APR. 05, 1980 14:14:37 5.0T1 498 0 TABLE OF SOMETHING OR OTHER USED BY PL/1 MAINTENANCE LLXU (506/7). 1 SUN SEP 08/96 15:24:55 Page 91 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 SOURCE GENERATED BY PL/1 MAINTENANCE CRELCS (506/1). 00163/015 PL1 COMPILER IEMTM SA G S1558 5.0T1 VLO FSNAME=PL1_COMPILER.IEMTM.SA.015(1) 499 5.0T1 499 PL1_COMPILER.IEMTM.SA.015 1 LINE 72 23 PAGE UM TIFFANY JULY 03, 1981 12:53:20 5.0T1 499 0 COMPILER PHASE "TM" WHICH PRODUCES THE SYMPL1 RECORDS IF THE "TEST" OPTION IS USED. 00163/016 PL1 COMPILER *PL1 OE G *PL1 5.0T1 500 PL1_COMPILER.*PL1.OE.016 1 LINE 5204 9 PAGE UM TIFFANY JULY 03, 1981 12:53:27 5.0T1 500 *PL1 0 Referenced by comments of: 163/17 00163/017 PL1 COMPILER PL1LINKLIB OE G ETC:PL1LINKLIB 5.0T1 501 PL1_COMPILER.PL1LINKLIB.OE.017 1 LINE 17779 238 PAGE UM TIFFANY JULY 03, 1981 12:53:28 5.0T1 501 ETC:PL1LINKLIB 0 A DIR-TYPE LIBRARY LINE FILE FROM WHICH *PL1 (163/16) LOADS PHASES DURING COMPILATION. 00164/001 *LCS OC G *LCS 5.0T1 502 LCS..OC.001 1 LINE 24 1 PAGE UM MTA JULY 03, 1981 12:53:41 5.0T1 502 *LCS 0 CONTAINS THE SINGLE LOADER CARD: LCS LCSYMBOL 0 Referenced by comments of: 104/118, 104/119, 104/120, 129/2, 303/4, 739/4, 740/4 00170/001 *LISTVTOC SA # (OBSOLETE) D2T1 105 UM 00171/001 *BATCH SA # (OBSOLETED BY *BATCH*) D2T1 327 UM 00172/001 *UMIST MACRO LIB SM S1558 5.0T1 VLO FSNAME=UMIST.MACRO_LIB.SM.001(1) 503 5.0T1 503 UMIST.MACRO_LIB.SM.001 1 LINE 72 8 PAGE UM SALISBURY SEP. 07, 1979 09:14:41 5.0T1 503 0 (172/1) THRU (172/9) REPRESENT THE CURRENT SOURCE FOR *UMIST. IT CONSISTS OF 1 MACRO LIBRARY, 2 COPY SECTIONS, AND 6 ASSEMBLIES. TO ASSEMBLE UMIST CREATE AND FILL UMIST.SYMS (172/2) AND UMIST.PSECT (172/3) (THE COPY SECTIONS), CREATE THE MACRO LIBRARY, AND ASSEMBLE ANY OR ALL OF THE ASSEMBLIES USING BOTH *SYSMAC AND THE SPECIAL MACRO LIBRARY. COMPONENT (172/1) IS THE MACRO LIBRARY READY FOR COPYING INTO A FILE. 0 Referenced by comments of: 172/1 00172/002 *UMIST /SYMBOLS SA S1558 5.0T1 VLO FSNAME=UMIST./SYMBOLS.SA.002(1) 504 5.0T1 504 UMIST./SYMBOLS.SA.002 1 LINE 72 3 PAGE UM SALISBURY SEP. 07, 1979 09:16:28 5.0T1 504 0 THIS IS THE UMIST.SYMS COPY SECTION 0 Referenced by comments of: 172/1, 172/4, 172/5, 172/7, 172/8, 172/9 1 SUN SEP 08/96 15:24:55 Page 92 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00172/003 *UMIST /PSECT SA S1558 5.0T1 VLO FSNAME=UMIST./PSECT.SA.003(1) 505 5.0T1 505 UMIST./PSECT.SA.003 1 LINE 72 4 PAGE UM SALISBURY SEP. 07, 1979 09:16:38 5.0T1 505 0 THIS IS THE UMIST.PSECT COPY SECTION. 0 Referenced by comments of: 172/1, 172/5, 172/7, 172/8, 172/9 00172/004 *UMIST /ENTRY SA S1558 5.0T1 VLO FSNAME=UMIST./ENTRY.SA.004(1) 506 5.0T1 506 UMIST./ENTRY.SA.004 1 LINE 71 5 PAGE UM SALISBURY SEP. 07, 1979 09:17:28 5.0T1 506 0 "/ENTRY" MODULE WHICH MAKES UMIST INDEPENDENT OF SYSTEM CONVENTIONS AS MUCH AS POSSIBLE. COPIES UMIST.SYMS (172/2). 0 Referenced by comments of: 172/11 00172/005 *UMIST /TABLES SA S1558 5.0T1 VLO FSNAME=UMIST./TABLES.SA.005(1) 507 5.0T1 507 UMIST./TABLES.SA.005 1 LINE 73 5 PAGE UM SALISBURY SEP. 07, 1979 09:17:51 5.0T1 507 0 MASTER DEFINITION TABLES FOR VARIOUS UMIST FEATURES, E.G., SPECIAL SYMBOLS. CALLED "/TABLES". COPIES UMIST.SYMS (172/2) AND UMIST.PSECT (172/3). 00172/006 *UMIST /MISC SA S1558 5.0T1 VLO FSNAME=UMIST./MISC.SA.006(1) 508 5.0T1 508 UMIST./MISC.SA.006 1 LINE 72 1 PAGE UM SALISBURY SEP. 07, 1979 09:18:10 5.0T1 508 0 "/MISC" -- FOUR MISCELLANEOUS CONTROL SECTIONS USED WITH THE CODE: ACTIVE-NEUTRAL STRING STORAGE, PUSH DOWN STACK, INPUT BUFFER, AND FREE STORAGE. 00172/007 *UMIST /UTILITIES SA S1558 5.0T1 VLO FSNAME=UMIST./UTILITIES.SA.007(1) 509 5.0T1 509 UMIST./UTILITIES.SA.007 1 LINE 77 24 PAGE UM SALISBURY SEP. 07, 1979 09:18:57 5.0T1 509 0 "/UTILITIES" -- UTILITY FUNCTIONS, INCLUDING THE MAIN PROCESSOR, WHICH SUPPORT PRIMITIVE FUNCTIONS. THIS ASSEMBLY USES THE "SWPR" RPQ'ED INSTRUCTION. COPIES UMIST.SYMS (172/2) AND UMIST.PSECT (172/3). 00172/008 *UMIST /FCNS/1 SA S1558 5.0T1 VLO FSNAME=UMIST./FCNS/1.SA.008(1) 510 5.0T1 510 UMIST./FCNS/1.SA.008 1 LINE 71 27 PAGE UM SALISBURY SEP. 07, 1979 09:19:10 5.0T1 510 0 "/FCNS/1" -- THE MOST IMPORTANT PRIMITIVE FUCNTIONS. COPIES UMIST.SYMS (172/2) AND UMIST.PSECT (172/3). 00172/009 *UMIST /FCNS/2 SA S1558 5.0T1 VLO FSNAME=UMIST./FCNS/2.SA.009(1) 511 5.0T1 511 UMIST./FCNS/2.SA.009 1 LINE 71 19 PAGE UM SALISBURY SEP. 07, 1979 09:19:24 5.0T1 511 0 "/FCNS/2" -- MORE PRIMITIVE FUNCTIONS. COPIES UMIST.SYMS (172/2) AND UMIST.PSECT (172/3). 0 Referenced by comments of: 172/1, 172/11 1 SUN SEP 08/96 15:24:55 Page 93 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00172/010 *UMIST TEST DECK D S1558 5.0T1 VLO FSNAME=UMIST.TEST_DECK.D.010(1) 512 5.0T1 512 UMIST.TEST_DECK.D.010 1 LINE 80 3 PAGE UM SALISBURY SEP. 07, 1979 09:20:43 5.0T1 512 0 "/TEST" COMPREHENSIVE TEST DECK FOR *UMIST. NOT PART OF UMIST ITSELF. 00172/011 *UMIST OBJECT OE G *UMIST 5.0T1 513 UMIST.OBJECT.OE.011 1 LINE 15736 8 PAGE UM SALISBURY JULY 03, 1981 12:53:50 5.0T1 513 *UMIST 0 LINKEDITED OBJECT OF (172/4) THROUGH (172/9). 00175/001 *GPAKLIB OL # (OBSOLETE) D4T1 500 GPAKLIB..OL. 1 SEQ 3888 40 DISK UM JAN. 22, 1973 18:22.11 00178/001 *PIL - OLD VERSION SA S # (OBSOLETE) D3T1 447 PIL..SA.1 1 SEQ 80 215 PAGE UM JULY 31, 1973 00:38.27 0 Obsoleted by the new *PIL (566). 00179/001 *GPAKGRID OC # (OBSOLETE) D4T1 501 GPAKGRID..OC. 1 LINE 80 7 DISK UM JAN. 22, 1973 22:06.14 00180/001 SCANDASD SA # (OBSOLETE) D2T1 117 UM 00182/001 *SNOBOL4 MAIN SA G S1558 5.0T1 VLO FSNAME=SNOBOL4.MAIN.SA.001(1) 514 5.0T1 514 SNOBOL4.MAIN.SA.001 1 SEQ 80 138 PAGE UM SWARTZ JULY 31, 1973 00:40.21 5.0T1 514 0 BELL LABS SOURCE FOR VERSION 3.0 SNOBOL 4. COPIES MLINK (182/11), PARMS (182/12), AND MDATA (182/13). 0 Referenced by comments of: 182/6 00182/002 *SNOBOL4 SUBR SA G S1558 5.0T1 VLO FSNAME=SNOBOL4.SUBR.SA.002(1) 515 5.0T1 515 SNOBOL4.SUBR.SA.002 1 SEQ 80 46 PAGE UM SWARTZ JULY 31, 1973 00:41.01 5.0T1 515 0 BELL LABS SOURCE FOR SUBROUTINES. 00182/003 *SNOBOL4 MACROS SA G S1558 5.0T1 VLO FSNAME=SNOBOL4.MACROS.SA.003(1) 516 5.0T1 516 SNOBOL4.MACROS.SA.003 1 SEQ 80 41 PAGE UM SWARTZ JULY 31, 1973 00:44.08 5.0T1 516 0 BELL LABS SOURCE FOR MACROS. 00182/004 *SNOBOL4 GENERATE C S1558 5.0T1 VLO FSNAME=SNOBOL4.GENERATE.C.004(1) 517 5.0T1 517 SNOBOL4.GENERATE.C.004 1 LINE 128 1 PAGE UM SWARTZ MAY 06, 1975 19:57:08 5.0T1 517 0 MTS COMMANDS TO UPDATE, ASSEMBLE, AND TEST THE MTS VERSION OF SNOBOL4. 1 SUN SEP 08/96 15:24:55 Page 94 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00182/005 *SNOBOL4 LINKEDIT C S1558 5.0T1 VLO FSNAME=SNOBOL4.LINKEDIT.C.005(1) 518 5.0T1 518 SNOBOL4.LINKEDIT.C.005 1 LINE 54 1 PAGE UM SWARTZ MAY 06, 1975 19:57:10 5.0T1 518 0 MTS COMMANDS TO LINKEDIT, AND TEST THE MTS VERSION OF SNOBOL4. 00182/006 *SNOBOL4 UPDATE UU G S1558 5.0T1 VLO FSNAME=SNOBOL4.UPDATE.UU.006(1) 519 5.0T1 519 SNOBOL4.UPDATE.UU.006 1 LINE 80 23 PAGE UM SWARTZ APR. 30, 1975 22:36:24 5.0T1 519 0 *UPDATE DECK TO MODIFIY BELL LABS SOURCE (182/1) TO BRING IT UP TO VERSION 3.10 SNOBOL 4 AND TO ADD THE CHANGES NECESSARY TO RUN IT IN MTS. 00182/007 *SNOBOL4 OBJECT OE G *SNOBOL4 5.0T1 520 SNOBOL4.OBJECT.OE.007 1 SEQ 32767 27 PAGE UM SWARTZ JULY 03, 1981 12:54:07 5.0T1 520 *SNOBOL4 0 OBJECT FROM ASSEMBLY OF MAIN AND SUBR, WHICH HAS BEEN COMBINED AND PURGED BY *LINKEDIT. 00182/008 *SNOBOL4 MACLEAN SP G S1558 5.0T1 VLO FSNAME=SNOBOL4.MACLEAN.SP.008(1) 521 5.0T1 521 SNOBOL4.MACLEAN.SP.008 1 SEQ 80 1 PAGE UM SWARTZ JULY 31, 1973 00:47.21 5.0T1 521 0 SOURCE FOR A PROGRAM TO PROCESS THE MACRO LIBRARY AND COPY SECTIONS FOR A SNOBOL ASSEMBLY. 0 Referenced by comments of: 334/11 00182/009 *SNOBOL4 MACLEAN OC G S1558 5.0T1 VLO FSNAME=SNOBOL4.MACLEAN.OC.009(1) 522 5.0T1 522 SNOBOL4.MACLEAN.OC.009 1 SEQ 80 2 PAGE UM SWARTZ JULY 31, 1973 00:47.23 5.0T1 522 0 RUN THIS PLUS *PL1LIB. 00182/010 *SNOBOL4 TEST PGMS SS G S1558 5.0T1 VLO FSNAME=SNOBOL4.TEST_PGMS.SS.010(1) 523 5.0T1 523 SNOBOL4.TEST_PGMS.SS.010 1 LINE 72 3 PAGE UM SWARTZ APR. 30, 1975 22:36:43 5.0T1 523 0 PROGRAMS FOR TESTING SNOBOL4. 00182/011 *SNOBOL4 MLINK SA G S1558 5.0T1 VLO FSNAME=SNOBOL4.MLINK.SA.011(1) 524 5.0T1 524 SNOBOL4.MLINK.SA.011 1 LINE 28 1 PAGE UM SWARTZ APR. 30, 1975 22:36:16 5.0T1 524 0 COPY SECTION. 0 Referenced by comments of: 182/1, 334/1 00182/012 *SNOBOL4 PARMS SA G S1558 5.0T1 VLO FSNAME=SNOBOL4.PARMS.SA.012(1) 525 5.0T1 525 SNOBOL4.PARMS.SA.012 1 LINE 68 1 PAGE UM SWARTZ APR. 30, 1975 22:36:18 5.0T1 525 0 COPY SECTION. 1 SUN SEP 08/96 15:24:55 Page 95 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 182/1, 334/1 00182/013 *SNOBOL4 MDATA SA G S1558 5.0T1 VLO FSNAME=SNOBOL4.MDATA.SA.013(1) 526 5.0T1 526 SNOBOL4.MDATA.SA.013 1 LINE 39 1 PAGE UM SWARTZ APR. 30, 1975 22:36:14 5.0T1 526 0 COPY SECTION. 0 Referenced by comments of: 182/1, 334/1 00191/001 *TRANSNOBOL SS G *TRANSNOBOL 5.0T1 527 TRANSNOBOL..SS.001 1 LINE 76 4 PAGE UM SWARTZ JULY 03, 1981 12:54:12 5.0T1 527 *TRANSNOBOL 0 CONVERT SNOBOL3 TO SNOBOL4. UNCHANGED SINCE DIST 1. 00193/001 *OSMAC SM *OSMAC 5.0T1 528 OSMAC..SM.001 1 LINE 72 159 PAGE UM YOUNG JULY 03, 1981 12:54:13 5.0T1 528 *OSMAC 0 MACRO LIBRARY FOR OS/360 RELEASE 21.0 0 Referenced by comments of: 193/2, 234/19, 458/1, 458/79, 545/3, 545/4, 545/8, 545/10, 545/12, 545/14, 545/15, 545/25, 545/27, 545/29, 545/31, 545/33, 545/35, 545/37, 545/39 00193/002 *OSMAC BUILD PROGRAM SA MACB W116:BUILDMAC.S 5.0T1 529 OSMAC.BUILD_PROGRAM.SA.002 1 SEQ 80 11 PAGE UM YOUNG JULY 03, 1981 12:54:35 5.0T1 529 0 THIS IS A PROGRAM TO BUILD *OSMAC (193/1). IT READS NAMES OF MACROS (UP TO 255 CHARS PER LINE) FROM SCARDS, DELETING ANY NAMES WHICH ARE DUPLICATES OR WHICH ARE LONGER THAN 8 CHARS. THE LIST OF MACRO NAMES IS TERMINATED BY AN END-OF-FILE FROM SCARDS. THE NAMES ARE SORTED INTO ALPHABETICAL ORDER AND THE MACRO TAPE IS THEN READ FROM LOGICAL I/O UNIT 0. THE SPECIFIED MACROS ARE WRITTEN IN THE MACRO LIBRARY FILE (LOGICAL I/O UNIT 1) BEGINNING AT LINE 3000. THE READING IS TERMINATED WHEN ALL SPECIFIED MACROS HAVE BEEN FOUND OR WHEN 2 CONSEQUTIVE END-OF-FILES HAVE BEEN READ. A DIRECTORY SHOWING THE STARTING LINE NUMBER FOR EACH MACRO IS PRINTED ON SPRINT. NORMALLY, THIS PROGRAM DELETES SEQUENCE ID FROM THE MACROS TO SAVE FILE SPACE (A LOT). STATEMENTS 201 AND 202 SHOULD BE DELETED IF SEQUENCE ID IS TO BE PRESERVED: LA 1,72 STH 1,LEN 00193/003 *OSMAC BUILD PROGRAM OC W116:BUILDMAC 5.0T1 530 OSMAC.BUILD_PROGRAM.OC.003 1 LINE 80 3 PAGE UM YOUNG JULY 03, 1981 12:54:36 5.0T1 530 00196/001 PAGEIT SA # (OBSOLETE) D3T2 4 PAGEIT..SA.1 1 LINE 80 3 PAGE UM JULY 31, 1973 20:59.23 0 Obsoleted by PAGLOAD (643). 1 SUN SEP 08/96 15:24:55 Page 96 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00197/001A *SMDS M *SMDS 5.1T1 203 SMDS..M.001 1 LINE 168 7 PAGE UM MTS JULY 23, 1983 10:19:37 *SMDS 0 MTS MESSAGE FILE (SYSTEM MESSAGES DATA SET). USED IN CONJUNCTION WITH FMSG MACRO IN COPY:MTS.MACROS (344/3). 00197/002C *SMDS SMDSTBL GEN SG G MTSS:GEN_SMDSTBL(1000,*L) 5.1T1 204 SMDS.SMDSTBL_GEN.SG.002 1 LINE 75 2 PAGE UM MTS BURLING JULY 23, 1983 10:19:37 0 Program that scans *SMDS and produces an object deck (197/5) containing the messages from *SDMS to be read by the FMSG macro in COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 197/4, 197/5 00197/003C *SMDS SMDSTBL GEN OC G MTSS:GEN_SMDSTBL(1,500) 5.1T1 205 SMDS.SMDSTBL_GEN.OC.003 1 LINE 80 3 PAGE UM MTS BURLING JULY 23, 1983 10:19:38 00197/004C *SMDS SMDSTBL GEN C G MTSS:GEN_SMDSTBL(0,.999) 5.1T1 206 SMDS.SMDSTBL_GEN.C.004 1 LINE 96 1 PAGE UM MTS BURLING JULY 23, 1983 10:19:39 0 Source commands necessary to compile (197/2). 00197/005C *SMDS SMDSTBL O G # (PART OF THE RESIDENT SYSTEM) UM MTS BURLING 0 The object deck, produced by the (197/2) program, containing the messages from *SMDS. Part of the resident system. **************************************************************************** D5.0B version: At UM we've changed the FMSG macro in COPY:MTS.MACROS (344/3) so it no longer reads all its messages from *SMDS directly. The disk I/O was causing problems. We've written a program, Gen_smdstbl (197/2), that scans *SMDS and produces this subcomponent, an object deck containing the messages. FMSG searches here for messages first before looking in *SMDS. **************************************************************************** 0 Referenced by comments of: 197/2 00198/001 GUINFO/CUINFO SUBRS D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=INFO 5.0T4 294 GUINFO/CUINFO_SUBRS.D5.0.SA.001 1 LINE 80 19 PAGE UM MTS BURLING AUG. 09, 1981 22:49:16 5.0T10 198 0 Subroutines to allow users to access (or change) certain information in the MTS dsect. Copies COPY:LLMPSEQU (087), COPY:JOBSTA (413/9), and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM (653). 0 Referenced by comments of: 42/2 1 SUN SEP 08/96 15:24:55 Page 97 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00198/002A GUINFO/CUINFO SUBRS UPDATE UC G MTSS:INFO/UPD 5.1T1 207 GUINFO/CUINFO_SUBRS.UPDAT.UC.002 1 LINE 82 15 PAGE UM MTS BURLING JULY 23, 1983 10:19:39 0 *CDUPDATE input to produce current source. 00198/003A GUINFO/CUINFO SUBRS OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00198/004A GUINFO/CUINFO SUBRS L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=INFO.LIST 5.1T1 208 GUINFO/CUINFO_SUBRS..L.004 1 LINE 133 78 PAGE UM MTS BURLING JULY 23, 1983 10:20:13 00198/005A GUINFO/CUINFO SUBRS COMMENTS D G MTSS:INFO/COM 5.1T1 209 GUINFO/CUINFO_SUBRS.COMME.D.005 1 LINE 67 1 PAGE UM MTS BURLING JULY 23, 1983 10:20:14 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00200/001 *SDARTN SA # (OBSOLETE) D3T2 8 SDARTN..SA.1 1 LINE 80 94 PAGE UM JULY 31, 1973 21:01.58 00201/001 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.001(1) 532 5.0T1 532 GPSS.OS_SOURCE.SA.001 1 SEQ 80 20 PAGE UM FLANIGAN JULY 27, 1977 23:35:43 5.0T1 532 0 THE MTS IMPLEMENTATION OF GPSS OFFERS SEVERAL FEATURES NOT PROVIDED BY THE IBM VERSION: 1. IMPROVED LISTING CONTROL WITH BATCH AND TERMINAL DEFAULTS. 2. LINE NUMBERS IN THE LISTING. 3. SENSIBLE CARRIAGE CONTROL (FAR FEWER PAGE SKIPS). 4. CAPABILITY OF DIRECTLY INTERFACING WITH SUBROUTINES THAT USE OS/I CALLING SEQUENCES. 5. SUBROUTINES TO ALLOW MANIPULATION OF GPSS DATA FROM FORTRAN PROGRAMS. 6. TIME ESTIMATES TO ALLOW ERROR OUTPUT TO BE PRINTED BEFORE MTS TERMINATES A JOB. 7. ATTENTION INTERRUPT CONTROL TO TELL THE USER WHERE HIS PROGRAM IS AND HOW MUCH HAS BEEN SPENT. 8. PADDING AND TRUNCATION OF JOBTAPES FOR DISK SPACE ECONOMY. 9. ERROR MESSAGE SUMMARY. THREE PRINCIPLE APPENDAGES ARE TACKED ONTO THE IBM MODULES TO MAKE THESE IMPROVEMENTS. FIRST, A DRIVER PROGRAM IS PROVIDED TO SCAN THE PAR= FIELD AND SET-UP DEFAULTS; AND, AT THE CONCLUSION OF A RUN, TO PRINT AN ERROR SUMMARY WHERE APPROPRIATE. SECOND, A SET OF INTERFACE SUBROUTINES PROVIDE A SIMULATED OS/360 ENVIRONMENT. ONE NOTABLE FEATURE OF THIS INTERFACE IS THAT SCRATCH FILE I/O IS IMPLEMENTED BY USE OF VIRTUAL MEMORY FILES. THIRD, A SET OF SMALL "HOOK" SUBROUTINES IS PROVIDED. BECAUSE OF THE VOLATILITY OF THE RATHER POOR IBM CODE, SUCH FUNCTIONS AS IMPROVED LISTING CONTROL WERE IMPLEMENTED BY ASSEMBLING "HOOKS" INTO THE IBM CODE, EACH "HOOK" RESULTING IN A CALL TO A "HOOK" SUBROUTINE. WHILE THE "HOOK" SUBROUTINES EXHIBIT WHAT WOULD APPEAR TO BE BAD PROGRAMMING PRACTICES (E.G. ABSOLUTE DISPLACEMENTS IN INSTRUCTIONS), THEY HAVE BEEN CODED IN SUCH A WAY AS TO BE INSENSITIVE TO REASSEMBLY OF THE IBM MODULES. COMPONENTS (201/1) THROUGH (201/11) ARE THE OS/360 SOURCE FOR GPSS VERSION 1 MODIFICATION LEVEL 3. 0 Referenced by comments of: 201/1 1 SUN SEP 08/96 15:24:55 Page 98 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00201/002 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.002(1) 533 5.0T1 533 GPSS.OS_SOURCE.SA.002 1 SEQ 80 11 PAGE UM FLANIGAN JULY 27, 1977 23:35:44 5.0T1 533 00201/003 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.003(1) 534 5.0T1 534 GPSS.OS_SOURCE.SA.003 1 SEQ 80 8 PAGE UM FLANIGAN JULY 27, 1977 23:35:46 5.0T1 534 00201/004 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.004(1) 535 5.0T1 535 GPSS.OS_SOURCE.SA.004 1 SEQ 80 62 PAGE UM FLANIGAN JULY 27, 1977 23:35:50 5.0T1 535 00201/005 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.005(1) 536 5.0T1 536 GPSS.OS_SOURCE.SA.005 1 SEQ 80 102 PAGE UM FLANIGAN JULY 27, 1977 23:35:55 5.0T1 536 00201/006 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.006(1) 537 5.0T1 537 GPSS.OS_SOURCE.SA.006 1 SEQ 80 22 PAGE UM FLANIGAN JULY 27, 1977 23:35:57 5.0T1 537 00201/007 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.007(1) 538 5.0T1 538 GPSS.OS_SOURCE.SA.007 1 SEQ 80 88 PAGE UM FLANIGAN JULY 27, 1977 23:36:02 5.0T1 538 00201/008 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.008(1) 539 5.0T1 539 GPSS.OS_SOURCE.SA.008 1 SEQ 80 112 PAGE UM FLANIGAN JULY 27, 1977 23:36:08 5.0T1 539 00201/009 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.009(1) 540 5.0T1 540 GPSS.OS_SOURCE.SA.009 1 SEQ 80 152 PAGE UM FLANIGAN JULY 27, 1977 23:36:16 5.0T1 540 00201/010 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.010(1) 541 5.0T1 541 GPSS.OS_SOURCE.SA.010 1 SEQ 80 109 PAGE UM FLANIGAN JULY 27, 1977 23:36:23 5.0T1 541 00201/011 *GPSS OS SOURCE SA G S1558 5.0T1 VLO FSNAME=GPSS.OS_SOURCE.SA.011(1) 542 5.0T1 542 GPSS.OS_SOURCE.SA.011 1 SEQ 80 57 PAGE UM FLANIGAN JULY 27, 1977 23:36:28 5.0T1 542 0 Referenced by comments of: 201/1 00201/012 *GPSS GPSSUPDATE UU G S1558 5.0T1 VLO FSNAME=GPSS.GPSSUPDATE.UU.012(1) 543 5.0T1 543 GPSS.GPSSUPDATE.UU.012 1 LINE 80 7 PAGE UM FLANIGAN AUG. 13, 1974 15:30.13 5.0T1 543 0 UPDATE DECK TO BE APPLIED TO 11 OS SOURCE FILES. A TAPE-TO-TAPE UPDATE VIA *UPDATE USING *IBM* TO *MTS* IS ASSUMED. THIS UPDATE PRODUCES VERSION 1, MOD 4 GPSS. 00201/013 *GPSS GPSS.OS.O OE G S1558 5.0T1 VLO FSNAME=GPSS.GPSS.OS.O.OE.013(1) 544 5.0T1 544 GPSS.GPSS.OS.O.OE.013 1 LINE 255 43 PAGE UM FLANIGAN AUG. 13, 1974 15:28.34 5.0T1 544 0 OBJECT CODE FOR 11 UPDATED IBM SOURCE FILES. 1 SUN SEP 08/96 15:24:55 Page 99 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00201/014 *GPSS GPSSMAC SM G S1558 5.0T1 VLO FSNAME=GPSS.GPSSMAC.SM.014(1) 545 5.0T1 545 GPSS.GPSSMAC.SM.014 1 LINE 80 8 PAGE UM FLANIGAN APR. 06, 1974 14:48.29 5.0T1 545 0 MACRO LIBRARY NEEDED FOR ALL ASSEMBLIES. 00201/015 *GPSS GPSS.S SA G S1558 5.0T1 VLO FSNAME=GPSS.GPSS.S.SA.015(1) 546 5.0T1 546 GPSS.GPSS.S.SA.015 1 LINE 80 7 PAGE UM FLANIGAN APR. 06, 1974 14:48.33 5.0T1 546 0 SOURCE FOR MTS DRIVER PROGRAM. 00201/016 *GPSS GPSSPKG.S SA G S1558 5.0T1 VLO FSNAME=GPSS.GPSSPKG.S.SA.016(1) 547 5.0T1 547 GPSS.GPSSPKG.S.SA.016 1 LINE 80 7 PAGE UM FLANIGAN APR. 06, 1974 14:48.38 5.0T1 547 0 SOURCE FOR THE MTS INTERFACE SUBROUTINES WHICH SIMULATE OS/360 FUNCTIONS. 00201/017 *GPSS HOOKSECT.S SA G S1558 5.0T1 VLO FSNAME=GPSS.HOOKSECT.S.SA.017(1) 548 5.0T1 548 GPSS.HOOKSECT.S.SA.017 1 LINE 80 15 PAGE UM FLANIGAN APR. 06, 1974 14:48.50 5.0T1 548 0 SOURCE FOR SUBROUTINES CALLED FROM "HOOKS" PLACED IN THE OS/360 CODE. 00201/018 *GPSS JUNK.S SA G S1558 5.0T1 VLO FSNAME=GPSS.JUNK.S.SA.018(1) 549 5.0T1 549 GPSS.JUNK.S.SA.018 1 LINE 80 3 PAGE UM FLANIGAN APR. 06, 1974 14:48.42 5.0T1 549 0 SOURCE FOR SEVERAL SUBROUTINES. 00201/019 *GPSS GPSS.MTS.O OE G S1558 5.0T1 VLO FSNAME=GPSS.GPSS.MTS.O.OE.019(1) 550 5.0T1 550 GPSS.GPSS.MTS.O.OE.019 1 LINE 255 7 PAGE UM FLANIGAN APR. 06, 1974 14:49.02 5.0T1 550 0 OBJECT CODE FOR GPSS.S, GPSSPKG.S, HOOKSECT.S, AND JUNK.S. 00201/020 *GPSS *GPSS OE G *GPSS 543 5.0T1 551 GPSS.*GPSS.OE.020 1 SEQ 32767 34 PAGE UM FLANIGAN JULY 03, 1981 12:55:10 5.0T1 551 *GPSS 0 LINKEDIT OF GPSS.OS.O AND GPSS.MTS.O WITH ENTRY POINT ESD ITEMS PURGED. NOTE: GPSS CALL THE FOLLOWING LIBRARY SUBROUTINES: COST, SETIME, AND TIMNTRP. 00201/021 *GPSS GPSSLIB SA G S1558 5.0T1 VLO FSNAME=GPSS.GPSSLIB.SA.021(1) 552 5.0T1 552 GPSS.GPSSLIB.SA.021 1 LINE 80 8 PAGE UM FLANIGAN APR. 06, 1974 14:48.45 5.0T1 552 0 SOURCE FOR SUBROUTINES WHICH ALLOW THE MANIPULATION OF GPSS DATA FROM FORTRAN SUBROUTINES. 00201/022 *GPSS *GPSSLIB OC G *GPSSLIB 5.0T1 553 GPSS.*GPSSLIB.OC.022 1 SEQ 80 1 PAGE UM FLANIGAN JULY 03, 1981 12:55:13 5.0T1 553 *GPSSLIB 1 SUN SEP 08/96 15:24:55 Page 100 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00201/023 *GPSS *GPSSERR M G *GPSSERR 5.0T1 554 GPSS.*GPSSERR.M.023 1 LINE 73 9 PAGE UM FLANIGAN JULY 03, 1981 12:55:13 5.0T1 554 *GPSSERR 0 ERROR MESSAGE FILE. 00201/024 *GPSS TESTPROG S G S1558 5.0T1 VLO FSNAME=GPSS.TESTPROG.S.024(1) 555 5.0T1 555 GPSS.TESTPROG.S.024 1 LINE 80 1 PAGE UM FLANIGAN APR. 06, 1974 14:49.23 5.0T1 555 0 SOURCE FOR TEST PROGRAM. 00201/025 *GPSS TESTOUTPUT D G S1558 5.0T1 VLO FSNAME=GPSS.TESTOUTPUT.D.025(1) 556 5.0T1 556 GPSS.TESTOUTPUT.D.025 1 LINE 129 3 PAGE UM FLANIGAN NOV. 02, 1974 13:57.22 5.0T1 556 0 OUTPUT WHICH SHOULD BE OBTAINED FROM TEST PROGRAM. 00201/026 *GPSS NOTES WF S1558 5.0T1 VLO FSNAME=GPSS.NOTES.WF.026(1) 557 5.0T1 557 GPSS.NOTES.WF.026 1 LINE 107 1 PAGE UM FLANIGAN MAR. 06, 1974 03:34.46 5.0T1 557 0 WRITEUP DESCRIBING GPSS/360. 00204/001A FORTRANG IEYFORT SA G S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORT.S 5.1T1 210 FORTRANG.IEYFORT.SA.001 1 LINE 71 11 PAGE UM HANSEN JUNE 02, 1983 18:59:30 0 THIS IS THE MTS VERSION OF THE CONTROL MODULE OF THE FORTRAN G COMPILER. IT INCORPORATES THE FUNCTIONS OF THE OS MODULES IEYFORT AND IEYFORT2. THIS MODULE IS THE ENTRY POINT TO THE COMPILER. **************************************************************************** D5.1 version: Changed to use CONFIGINFO to locate virtual segments they use rather than having this built into the program. **************************************************************************** 0 Referenced by comments of: 551/1, 831/1 00204/002A FORTRANG IEYFORT OC G S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORT.O 5.1T1 211 FORTRANG.IEYFORT.OC.002 1 LINE 80 3 PAGE UM HANSEN JUNE 02, 1983 18:59:33 00204/003A FORTRANG IEYFORTD SA G S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORTD.S 5.1T1 212 FORTRANG.IEYFORTD.SA.003 1 LINE 71 11 PAGE UM HANSEN JUNE 03, 1983 16:05:03 0 THIS IS THE CONTROL MODULE OF THE COMPILER VERSION WHICH PRODUCES SYM RECORDS. IT OBTAINS SYMBOL STORAGE IN SEGMENT 6 AND COMPILER STORAGE IN SEGMENTS 7 AND ABOVE, GREATLY REDUCING THE CHANCE OF A COMPILER PROGRAM INTERRUPT. 0 Referenced by comments of: 204/21 1 SUN SEP 08/96 15:24:55 Page 101 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00204/004A FORTRANG IEYFORTD OC G S0049 FG21.8 'FORTRAN_G' FSNAME=IEYFORTD.O 5.1T1 213 FORTRANG.IEYFORTD.OC.004 1 LINE 80 3 PAGE UM HANSEN JUNE 03, 1983 16:05:25 00204/005 FORTRANG IEYALL SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYALL.SA.005(1) 562 5.0T1 562 FORTRANG.IEYALL.SA.005 1 LINE 80 87 PAGE UM HANSEN OCT. 06, 1975 14:36:02 5.0T1 562 0 FORTRAN G ALLOCATE MODULE. COPIES IEYPSCT (204/27). ASSEMBLE USING IEYMACROS (204/23). 00204/006 FORTRANG IEYALL OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYALL.OC.006(1) 563 5.0T1 563 FORTRANG.IEYALL.OC.006 1 LINE 80 4 PAGE UM HANSEN JUNE 01, 1976 11:26:38 5.0T1 563 00204/007 FORTRANG IEYEXT SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYEXT.SA.007(1) 564 5.0T1 564 FORTRANG.IEYEXT.SA.007 1 LINE 80 60 PAGE UM HANSEN OCT. 06, 1975 14:36:23 5.0T1 564 0 FORTRAN G EXIT MODULE. COPIES IEYPSCT (204/27). ASSEMBLE USING IEYMACROS (204/23). 00204/008 FORTRANG IEYEXT OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYEXT.OC.008(1) 565 5.0T1 565 FORTRANG.IEYEXT.OC.008 1 LINE 80 4 PAGE UM HANSEN JUNE 01, 1976 11:26:43 5.0T1 565 00204/009 FORTRANG IEYGEN SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYGEN.SA.009(1) 566 5.0T1 566 FORTRANG.IEYGEN.SA.009 1 LINE 80 171 PAGE UM HANSEN OCT. 06, 1975 14:37:56 5.0T1 566 0 FORTRAN G CODE GENERATION MODULE. COPIES IEYPSCT (204/27). ASSEMBLE USING IEYMACROS (204/23). 00204/010 FORTRANG IEYGEN OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYGEN.OC.010(1) 567 5.0T1 567 FORTRANG.IEYGEN.OC.010 1 LINE 80 8 PAGE UM HANSEN JUNE 01, 1976 11:26:47 5.0T1 567 00204/011 FORTRANG IEYINT SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYINT.SA.011(1) 568 5.0T1 568 FORTRANG.IEYINT.SA.011 1 LINE 80 3 PAGE UM HANSEN OCT. 06, 1975 14:38:23 5.0T1 568 0 FORTRAN G POP INTERPRETER. COPIES IEYDINT (204/24). ASSEMBLE USING IEYMACROS (204/23). 00204/012 FORTRANG IEYINT OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYINT.OC.012(1) 569 5.0T1 569 FORTRANG.IEYINT.OC.012 1 LINE 80 4 PAGE UM HANSEN JUNE 01, 1976 11:26:51 5.0T1 569 00204/013 FORTRANG IEYPAR SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPAR.SA.013(1) 570 5.0T1 570 FORTRANG.IEYPAR.SA.013 1 LINE 80 188 PAGE UM HANSEN NOV. 13, 1975 09:23:17 5.0T1 570 0 FORTRAN G PARSER MODIFIED TO ALLOW AN ARBITRARY NUMBER OF COMMENTS BETWEEN ANY TWO STATEMENTS. COPIES IEYDINT (204/24). ASSEMBLE USING IEYMACROS (204/23). 1 SUN SEP 08/96 15:24:55 Page 102 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00204/014 FORTRANG IEYPAR OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPAR.OC.014(1) 571 5.0T1 571 FORTRANG.IEYPAR.OC.014 1 LINE 80 9 PAGE UM HANSEN JUNE 01, 1976 11:26:55 5.0T1 571 0 Contains REP cards which have been incorporated into the source. 00204/015 FORTRANG IEYROL SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYROL.SA.015(1) 572 5.0T1 572 FORTRANG.IEYROL.SA.015 1 LINE 80 11 PAGE UM HANSEN OCT. 06, 1975 14:39:13 5.0T1 572 0 FORTRAN G ROLL CONTROL MODULE FOR COMPILER WORKSPACE. ASSEMBLE USING IEYMACROS (204/23). 00204/016 FORTRANG IEYROL OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYROL.OC.016(1) 573 5.0T1 573 FORTRANG.IEYROL.OC.016 1 LINE 80 4 PAGE UM HANSEN JUNE 01, 1976 11:27:00 5.0T1 573 00204/017 FORTRANG IEYOPT SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYOPT.SA.017(1) 574 5.0T1 574 FORTRANG.IEYOPT.SA.017 1 LINE 68 3 PAGE UM HANSEN OCT. 08, 1975 16:28:22 5.0T1 574 0 THIS IS AN OPTION SCANNER CALLED BY IEYFORT TO PARSE THE PAR FIELD. 00204/018 FORTRANG IEYOPT OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYOPT.OC.018(1) 575 5.0T1 575 FORTRANG.IEYOPT.OC.018 1 LINE 255 1 PAGE UM HANSEN OCT. 08, 1975 16:31:46 5.0T1 575 00204/019 FORTRANG IEYUNF SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYUNF.SA.019(1) 576 5.0T1 576 FORTRANG.IEYUNF.SA.019 1 LINE 80 35 PAGE UM HANSEN OCT. 06, 1975 14:39:38 5.0T1 576 0 FORTRAN G "UNIFY" MODULE. COPIES IEYPSCT (204/27). ASSEMBLE USING IEYMACROS (204/23). 00204/020 FORTRANG IEYUNF OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYUNF.OC.020(1) 577 5.0T1 577 FORTRANG.IEYUNF.OC.020 1 LINE 80 8 PAGE UM HANSEN JUNE 01, 1976 11:27:04 5.0T1 577 00204/021 FORTRANG IEYSYM SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYSYM.SA.021(1) 578 5.0T1 578 FORTRANG.IEYSYM.SA.021 1 LINE 72 15 PAGE UM HANSEN DEC. 15, 1975 12:43:24 5.0T1 578 0 THIS IS THE SYM CARD PRODUCING MODULE. IT IS CALLED BY IEYFORTD (204/3). 00204/022 FORTRANG IEYSYM OC G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYSYM.OC.022(1) 579 5.0T1 579 FORTRANG.IEYSYM.OC.022 1 LINE 80 4 PAGE UM HANSEN DEC. 15, 1975 12:43:35 5.0T1 579 00204/023 FORTRANG IEYMACROS SM G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYMACROS.SM.023(1) 580 5.0T1 580 FORTRANG.IEYMACROS.SM.023 1 LINE 80 62 PAGE UM HANSEN OCT. 08, 1975 16:29:23 5.0T1 580 0 THE MACRO LIBRARY NEEDED TO ASSEMBLE ALL OS MODULES OF FORTRAN G, I.E. EVERYTHING EXCEPT IEYFORT, IEYFORTD, IEYOPT, AND IEYSYM. 1 SUN SEP 08/96 15:24:55 Page 103 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 204/5, 204/7, 204/9, 204/11, 204/13, 204/15, 204/19 00204/024 FORTRANG IEYDINT SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYDINT.SA.024(1) 581 5.0T1 581 FORTRANG.IEYDINT.SA.024 1 LINE 80 34 PAGE UM HANSEN OCT. 08, 1975 16:30:07 5.0T1 581 0 A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G. 0 Referenced by comments of: 204/11, 204/13 00204/025 FORTRANG IEYMID SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYMID.SA.025(1) 582 5.0T1 582 FORTRANG.IEYMID.SA.025 1 LINE 80 1 PAGE UM HANSEN OCT. 08, 1975 16:29:36 5.0T1 582 0 A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G. 00204/026 FORTRANG IEYPRF SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPRF.SA.026(1) 583 5.0T1 583 FORTRANG.IEYPRF.SA.026 1 LINE 80 1 PAGE UM HANSEN OCT. 08, 1975 16:29:45 5.0T1 583 0 A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G. 00204/027 FORTRANG IEYPSCT SA G S1558 5.0T1 VLO FSNAME=FORTRANG.IEYPSCT.SA.027(1) 584 5.0T1 584 FORTRANG.IEYPSCT.SA.027 1 LINE 80 5 PAGE UM HANSEN OCT. 08, 1975 16:30:00 5.0T1 584 0 A COPY SECTION REQUIRED FOR ASSEMBLING OS MODULES OF FORTRAN G. 0 Referenced by comments of: 204/5, 204/7, 204/9, 204/19 00204/028A FORTRANG *FORTRANG OE G *FORTRANG 5.1T1 214 FORTRANG.?FORTRANG.OE.028 1 SEQ 32767 16 PAGE UM HANSEN JULY 23, 1983 10:22:11 *FORTRANG 0 THE LINKEDITED OBJECT OF THE REGULAR (NON-TEST) FORTRAN G COMPILER. IT INCLUDES IEYFORT, IEYALL, IEYEXT, IEYINT, IEYGEN, IEYOPT, IEYPAR, IEYROL, AND IEYUNF. **************************************************************************** D5.1 version: Changed to use CONFIGINFO to locate virtual segments they use rather than having this built into the program. **************************************************************************** 00204/029A FORTRANG TEST OBJECT OE G *FTNGTEST 5.1T1 215 FORTRANG.TEST_OBJECT.OE.029 1 SEQ 32767 17 PAGE UM HANSEN JULY 23, 1983 10:22:11 *FTNGTEST 0 THE LINKEDITED OBJECT OF THE SYM CARD PRODUCING VERSION OF THE FORTRAN G COMPILER. IT INCLUDES IEYFORTD, IEYALL, IEYEXT, IEYINT, IEYGEN, IEYOPT, IEYPAR, IEYROL, IEYSYM, AND IEYUNF. 1 SUN SEP 08/96 15:24:55 Page 104 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00210/001A *LISP SA G WATF:LISP.MHRI 5.1T1 216 LISP..SA.001 1 LINE 71 105 PAGE UM MTA JULY 23, 1983 10:22:12 0 NEW LISP INTERPRETER WRITTEN BY UM MENTAL HEALTH RESEARCH INSTITUTE. THE OLD OS/360 LISP IS NOW USED ONLY IN CONJUNCTION WITH REDUCE2 (556). ******************************************************************************** D5.0B version: Bug fixed. ******************************************************************************** 00210/002A *LISP OE G *LISP 5.1T1 217 LISP..OE.002 1 LINE 32767 28 PAGE UM MTA JULY 23, 1983 10:22:17 *LISP 00210/003 *LISP TRANSIT SA G C4541C GO FSNAME=TRANSIT.ASMG 5.0T1 589 LISP.TRANSIT.SA.003 1 LINE 93 7 PAGE UM MTA JAN. 06, 1979 12:43:54 5.0T1 589 0 THIS COMPONENT CONTAINS THE "HYPOTHETICAL WORLDS" FUNCTIONS, RPLACA2, RPLACD2, SETA2, NEWWORLD, REALWORLD, GETWORLD. 00210/004C *LISP TRANSIT S O WATF:TRANSPORT.FI 5.1T1 218 LISP.TRANSIT.S.004 1 LINE 104 2 PAGE UM MTA JULY 23, 1983 10:22:18 0 Definitions for 3 functions left out of the TRANSIT package. To install these, restore the TRANSIT package, define and compile these, and checkpoint the new TRANSIT package. 00210/005 *LISP EDITOR S G C4541C GO FSNAME=EDIT.LISP 5.0T1 590 LISP.EDITOR.S.004 1 LINE 152 6 PAGE UM MTA JAN. 06, 1979 12:43:25 5.0T1 590 0 THIS COMPONENT CONTAINS THE LISP SOURCE FOR A LISP DATA STRUCTURE EDITOR. IT WAS WRITTEN AT UBC AND IS DOCUMENTED IN MTS VOLUME 8. 00210/006 *LISP BREAK S G C4541C GO FSNAME=DEBUG.LISP 5.0T1 591 LISP.BREAK.S.005 1 LINE 126 5 PAGE UM MTA JAN. 06, 1979 12:42:46 5.0T1 591 0 THIS COMPONENT CONTAINS THE LISP SOURCE FOR A LISP DEBUGGING PACKAGE. IT WAS WRITTEN AT UBC AND IS DOCUMENTED IN MTS VOLUME 8. 00210/007 *LISP COMPILER S G C4541C GO FSNAME=COMPILER.LISP 5.0T1 592 LISP.COMPILER.S.006 1 LINE 116 29 PAGE UM MTA DEC. 07, 1979 09:48:26 5.0T1 592 0 THIS IS THE LISP SOURCE FOR THE LISP COMPILER. 1 SUN SEP 08/96 15:24:55 Page 105 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00210/008A *LISP *LISPLIB O G *LISPLIB 5.1T1 219 LISP.?LISPLIB.O.008 1 LINE 32517 75 PAGE UM MTA JULY 23, 1983 10:22:18 *LISPLIB 0 THIS IS A SEQ FILE WHICH CONTAINS CHECKPOINTED VERSIONS OF LESS FREQUENTLY USED FUNCTIONS IN A FORMAT UNDERSTOOD ONLY BY THE LISP INTERPRETER. IT CURRENTLY CONTAINS THE SUBCOMPONENTS TRANSIT, EDITOR, BREAK, AND COMPILER. 00212/001 *FILESNIFF SA G # (OBSOLETE) D3T2 49 FILESNIFF..SA.1 1 LINE 80 6 PAGE UM JULY 31, 1973 21:17.52 0 Obsoleted by the FILESTATUS command (529). 00217/001 *LIBTOFASTLIB S # (OBSOLETE) D2T1 289 UM 00220/001 *GOMAD S # (OBSOLETE) D2T1 293 UM 00221/001 **TP S # (OBSOLETE) D2T1 140 UM 00223/001 SIOERR SUBR SA G S1558 5.0T1 VLO FSNAME=SIOERR_SUBR..SA.001(1) 594 5.0T1 594 SIOERR_SUBR..SA.001 1 LINE 80 1 PAGE UM MTA JULY 27, 1977 23:54:04 5.0T1 594 0 FORTRAN INTERFACE TO SETIOERR. 00223/002 SIOERR SUBR OC G # (PART OF *LIBRARY) UM MTA 0 Object part of *LIBRARY (524/1) 00225/001A *SYSMAC SM G MTA:SYSMAC 5.1T1 220 SYSMAC..SM.001 1 LINE 73 162 PAGE UM MTA JULY 23, 1983 10:22:21 0 MTS general system macro library for *ASMH. This version is the same as *SYSMAC on the test pack (225/2) except that the comments have not been removed. 0 Referenced by comments of: 648/1 00225/002A *SYSMAC SM G *SYSMAC 5.1T1 221 SYSMAC..SM.002 1 LINE 73 119 PAGE UM MTA JULY 23, 1983 10:22:28 *SYSMAC 0 Referenced by comments of: 225/1 00225/003A *SYSMAC TEST PGM 1 SA G MTA:TESTIOMAC 5.1T1 222 SYSMAC.TEST_PGM_1.SA.003 1 LINE 72 11 PAGE UM MTA JULY 23, 1983 10:22:32 0 TEST PROGRAM FOR MANY MACROS IN *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 106 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00225/004 *SYSMAC TEST PGM 2 SA G MTA:TESTMINMAX 5.0T1 598 SYSMAC.TEST_PGM_2.SA.004 1 LINE 45 3 PAGE UM MTA JULY 03, 1981 12:58:00 5.0T1 598 0 TESTS MIN AND MAX MACROS. 00229/001 *TIDY SF # (OBSOLETE) D4T1 589 TIDY..SF.001 1 SEQ 80 60 PAGE UM JULY 31, 1973 21:20.10 0 Obsoleted by *FTNTIDY (727). 0 Referenced by comments of: 727/1 00231/001 *GRAPHLIB SA # (OBSOLETE) D4T1 591 GRAPHLIB..SA. 1 SEQ 80 211 PAGE UM JULY 31, 1973 21:21.10 00233/001 PL1 LIBRARY MACLIB SM G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.MACLIB.SM.001(1) 599 5.0T1 599 PL1_LIBRARY.MACLIB.SM.001 1 LINE 80 66 PAGE UM TIFFANY JULY 27, 1977 23:22:48 5.0T1 599 0 Subcomponents (233/1) through (233/12) are older versions of the I/O routines also distributed in the PL1 compiler, components (163/1) through (163/12). They are being distributed as a part of the PL1 library since they will not be added to the library, work upon which has been frozen due to the arrival of the PL1 Optimizing Compiler (813). MACLIB is a macro library for the simulation of OS/360 stuff in MTS. 0 Referenced by comments of: 233/1, 233/41 00233/002 PL1 LIBRARY SAMEQU SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SAMEQU.SA.002(1) 600 5.0T1 600 PL1_LIBRARY.SAMEQU.SA.002 1 SEQ 80 4 PAGE UM TIFFANY JULY 27, 1977 23:23:35 5.0T1 600 0 COPY SECTION FOR OS SIMULATION PACKAGE. COPIED BY SEVERAL PARTS OF PL1 SOURCE 0 Referenced by comments of: 233/3, 233/4, 233/5, 233/6, 233/7, 233/8, 233/9, 233/10, 233/11, 233/32 00233/003 PL1 LIBRARY REPLACE SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.REPLACE.SA.003(1) 601 5.0T1 601 PL1_LIBRARY.REPLACE.SA.003 1 SEQ 80 3 PAGE UM TIFFANY JULY 27, 1977 23:23:36 5.0T1 601 0 ROUTINE TO REPLACE A TIOT, ATTACHING ANYTHING TO AN MTS LOGICAL I/O UNIT IF APPLICABLE. COPIES SAMEQU (233/2). 00233/004 PL1 LIBRARY CKLIO SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CKLIO.SA.004(1) 602 5.0T1 602 PL1_LIBRARY.CKLIO.SA.004 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 23:23:38 5.0T1 602 0 ROUTINE TO CHECK IF A NAME IS AN MTS LOGICAL I/O UNIT. COPIES SAMEQU (233/2). 1 SUN SEP 08/96 15:24:55 Page 107 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00233/005 PL1 LIBRARY NONSENSE SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.NONSENSE.SA.005(1) 603 5.0T1 603 PL1_LIBRARY.NONSENSE.SA.005 1 SEQ 80 3 PAGE UM TIFFANY JULY 27, 1977 23:23:40 5.0T1 603 0 ROUTINE TO SAY THAT SOMETHING DOES NOT EXIST OR IS NOT AVAILABLE. COPIES SAMEQU (233/2). 00233/006 PL1 LIBRARY FREEDDEF SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.FREEDDEF.SA.006(1) 604 5.0T1 604 PL1_LIBRARY.FREEDDEF.SA.006 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 23:23:43 5.0T1 604 0 ROUTINE TO FREE ALL DDEF'S. COPIES SAMEQU (233/2). 00233/007 PL1 LIBRARY FINDTIOT SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.FINDTIOT.SA.007(1) 605 5.0T1 605 PL1_LIBRARY.FINDTIOT.SA.007 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 23:23:45 5.0T1 605 0 ROUTINE TO FIND A TIOT GIVEN A "DDNAME." COPIES SAMEQU (233/2). 00233/008 PL1 LIBRARY DDEF SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.DDEF.SA.008(1) 606 5.0T1 606 PL1_LIBRARY.DDEF.SA.008 1 SEQ 80 8 PAGE UM TIFFANY JULY 27, 1977 23:23:48 5.0T1 606 0 ROUTINE TO PROCESS DDEF COMMANDS AND GET A TIOT FOR EACH. COPIES SAMEQU (233/2). 00233/009 PL1 LIBRARY OPEN SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.OPEN.SA.009(1) 607 5.0T1 607 PL1_LIBRARY.OPEN.SA.009 1 SEQ 80 16 PAGE UM TIFFANY MAY 13, 1978 17:06:25 5.0T1 607 0 SIMULATE OS/360 OPEN. CURRENTLY ONLY BSAM AND QSAM ARE SUPPORTED. COPIES SAMEQU (233/2). 00233/010 PL1 LIBRARY ROUT SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ROUT.SA.010(1) 608 5.0T1 608 PL1_LIBRARY.ROUT.SA.010 1 SEQ 80 26 PAGE UM TIFFANY MAY 13, 1978 17:06:27 5.0T1 608 0 LIST OF VARIOUS ROUTINES. COPIES SAMEQU (233/2). 00233/011 PL1 LIBRARY CLOSE SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CLOSE.SA.011(1) 609 5.0T1 609 PL1_LIBRARY.CLOSE.SA.011 1 SEQ 80 4 PAGE UM TIFFANY JULY 27, 1977 23:23:56 5.0T1 609 0 SIMULATE OS/360 CLOSE. COPIES SAMEQU (233/2). 00233/012 PL1 LIBRARY QUIT SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.QUIT.SA.012(1) 610 5.0T1 610 PL1_LIBRARY.QUIT.SA.012 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 23:23:57 5.0T1 610 0 QUIT ONLY IN BATCH 0 Referenced by comments of: 233/1 1 SUN SEP 08/96 15:24:55 Page 108 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00233/013 PL1 LIBRARY PL1MACLIB SM G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.PL1MACLIB.SM.013(1) 611 5.0T1 611 PL1_LIBRARY.PL1MACLIB.SM.013 1 LINE 80 13 PAGE UM TIFFANY JULY 27, 1977 23:56:02 5.0T1 611 0 MACRO LIBRARY FOR PL/I LIBRARY ROUTINES. 0 Referenced by comments of: 233/41 00233/014 PL1 LIBRARY SNAP SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SNAP.SA.014(1) 612 5.0T1 612 PL1_LIBRARY.SNAP.SA.014 1 SEQ 80 3 PAGE UM TIFFANY JULY 27, 1977 23:56:16 5.0T1 612 0 SUBROUTINES TO DUMP. USED BY IHEDUMP. 00233/015 PL1 LIBRARY CNTL SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CNTL.SA.015(1) 613 5.0T1 613 PL1_LIBRARY.CNTL.SA.015 1 SEQ 80 2 PAGE UM TIFFANY JULY 27, 1977 23:56:17 5.0T1 613 0 SUBROUTINE TO INTERFACE BETWEEN PL/I PROGRAMS AND MTS 'CONTROL' SUBROUTINE. 00233/016 PL1 LIBRARY RAND SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.RAND.SA.016(1) 614 5.0T1 614 PL1_LIBRARY.RAND.SA.016 1 LINE 80 2 PAGE UM TIFFANY JULY 28, 1977 00:03:58 5.0T1 614 0 RANDOM NUMBER GENERATOR 00233/017 PL1 LIBRARY USERID SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.USERID.SA.017(1) 615 5.0T1 615 PL1_LIBRARY.USERID.SA.017 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:00 5.0T1 615 0 RUN TIME SUBR 00233/018 PL1 LIBRARY BATCH SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.BATCH.SA.018(1) 616 5.0T1 616 PL1_LIBRARY.BATCH.SA.018 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:02 5.0T1 616 0 RUN TIME SUBROUTINE TO CALL CANREPLY 00233/019 PL1 LIBRARY ELAPSED SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ELAPSED.SA.019(1) 617 5.0T1 617 PL1_LIBRARY.ELAPSED.SA.019 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:05 5.0T1 617 0 RUN TIME SUBROUTINE 00233/020 PL1 LIBRARY CPUTIME SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CPUTIME.SA.020(1) 618 5.0T1 618 PL1_LIBRARY.CPUTIME.SA.020 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:07 5.0T1 618 0 RUN TIME SUBROUTINE 1 SUN SEP 08/96 15:24:55 Page 109 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00233/021 PL1 LIBRARY UN-QSAM SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.UN-QSAM.SA.021(1) 619 5.0T1 619 PL1_LIBRARY.UN-QSAM.SA.021 1 LINE 80 18 PAGE UM TIFFANY JULY 27, 1977 01:52:09 5.0T1 619 0 I/O ROUTINES FOR NON-STANDARD PL/I FILES -- IHEITB 00233/022 PL1 LIBRARY KEY SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.KEY.SA.022(1) 620 5.0T1 620 PL1_LIBRARY.KEY.SA.022 1 SEQ 80 2 PAGE UM TIFFANY JULY 27, 1977 01:52:12 5.0T1 620 0 NEXTKEY AND LASTKEY 00233/023 PL1 LIBRARY ATTACH SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ATTACH.SA.023(1) 621 5.0T1 621 PL1_LIBRARY.ATTACH.SA.023 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:14 5.0T1 621 0 PROGRAM TO CALL DDEF AT RUN TIME 00233/024 PL1 LIBRARY DISPLAY SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.DISPLAY.SA.024(1) 622 5.0T1 622 PL1_LIBRARY.DISPLAY.SA.024 1 SEQ 80 2 PAGE UM TIFFANY JULY 27, 1977 01:52:16 5.0T1 622 0 REPLACEMENT FOR AN IBM SUBROUTINE. OUTPUT ON SERCOM, INPUT FROM GUSER. 00233/025 PL1 LIBRARY IHEMAIN SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEMAIN.SA.025(1) 623 5.0T1 623 PL1_LIBRARY.IHEMAIN.SA.025 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:19 5.0T1 623 0 MAIN PROGRAM IF USER DOES NOT GIVE ONE 0 Referenced by comments of: 233/43 00233/026 PL1 LIBRARY IHEOST SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEOST.SA.026(1) 624 5.0T1 624 PL1_LIBRARY.IHEOST.SA.026 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:21 5.0T1 624 0 GIVES TIME AND DATE. 00233/027 PL1 LIBRARY SIGNOFF SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SIGNOFF.SA.027(1) 625 5.0T1 625 PL1_LIBRARY.SIGNOFF.SA.027 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:23 5.0T1 625 0 RUN TIME SUBR 00233/028 PL1 LIBRARY SYSERR SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.SYSERR.SA.028(1) 626 5.0T1 626 PL1_LIBRARY.SYSERR.SA.028 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:26 5.0T1 626 0 SYSTEM AND ERROR 1 SUN SEP 08/96 15:24:55 Page 110 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00233/029 PL1 LIBRARY IHELTT SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHELTT.SA.029(1) 627 5.0T1 627 PL1_LIBRARY.IHELTT.SA.029 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:28 5.0T1 627 0 TRANSFER VECTOR TABLE IN *PL1LIB. 00233/030 PL1 LIBRARY IHELTV SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHELTV.SA.030(1) 628 5.0T1 628 PL1_LIBRARY.IHELTV.SA.030 1 SEQ 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:30 5.0T1 628 0 TRANSFER VECTOR TABLE IN SHAREDPL1LIB. 00233/031 PL1 LIBRARY IHESAP SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHESAP.SA.031(1) 629 5.0T1 629 PL1_LIBRARY.IHESAP.SA.031 1 LINE 80 8 PAGE UM TIFFANY JULY 27, 1977 01:52:32 5.0T1 629 0 PL/I PROGRAM INITIALIZER. 0 Referenced by comments of: 233/43 00233/032 PL1 LIBRARY FINFO SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.FINFO.SA.032(1) 630 5.0T1 630 PL1_LIBRARY.FINFO.SA.032 1 SEQ 80 4 PAGE UM TIFFANY JULY 27, 1977 01:52:35 5.0T1 630 0 ROUTINE TO GET INFORMATION FOR A PL/I FILE. COPIES SAMEQU (233/2). 00233/033 PL1 LIBRARY READ/WRITE SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.READ/WRITE.SA.033(1) 631 5.0T1 631 PL1_LIBRARY.READ/WRITE.SA.033 1 SEQ 80 5 PAGE UM TIFFANY JULY 27, 1977 01:52:38 5.0T1 631 0 ROUTINES IHEREAD AND IHERITE. 00233/034 PL1 LIBRARY NOTE/POINT SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.NOTE/POINT.SA.034(1) 632 5.0T1 632 PL1_LIBRARY.NOTE/POINT.SA.034 1 SEQ 80 2 PAGE UM TIFFANY JULY 27, 1977 01:52:40 5.0T1 632 0 SUBROUTINE TO INTERFACE BETWEEN PL/I PROGRAMS AND THE MTS SUBROUTINES 'NOTE' AND 'POINT'. 00233/035 PL1 LIBRARY PLCALL ET AL SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.PLCALL_ET_AL.SA.035(1) 633 5.0T1 633 PL1_LIBRARY.PLCALL_ET_AL.SA.035 1 LINE 80 6 PAGE UM ENGLE MAY 17, 1976 14:28:46 5.0T1 633 0 SUBROUTINES PCALL, PLCALLD, PLCALLE, AND PLCALLF ENABLE A PL1 PROGRAM TO CALL SUBROUTINES WHICH REQUIRE THE NORMAL FTN OR ASM S-TYPE CALLING SEQUENCE. THE SUBROUTINES PL1ADR AND PL1RC ARE ALSO ENTRY POINTS TO THIS PROGRAM. 00233/036 PL1 LIBRARY IHEATTN SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEATTN.SA.036(1) 634 5.0T1 634 PL1_LIBRARY.IHEATTN.SA.036 1 LINE 80 9 PAGE UM TIFFANY JULY 27, 1977 01:52:50 5.0T1 634 0 ASSEMBLE USING *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 111 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00233/037 PL1 LIBRARY IHEZZZZZ SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEZZZZZ.SA.037(1) 635 5.0T1 635 PL1_LIBRARY.IHEZZZZZ.SA.037 1 LINE 80 1 PAGE UM TIFFANY JULY 27, 1977 01:52:52 5.0T1 635 0 A NULL-LENGTH CONTROL SECTION TO BE PLACED AT THE END OF SHAREDPL1LIB FOR THE BENEFIT OF SDS. 00233/038 PL1 LIBRARY CALLPL1 SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.CALLPL1.SA.038(1) 636 5.0T1 636 PL1_LIBRARY.CALLPL1.SA.038 1 LINE 72 10 PAGE UM TIFFANY JULY 27, 1977 01:52:55 5.0T1 636 0 SUBROUTINES PL1SUB, PL1FCN, IPLFCN, PLDFCN, I2FCN, CPXFCN, CDFCN, LGLFCN, LG1FCN, PL1BEG, PL1END, AND IPL1RC WHICH CAN BE USED BY NON-PL1 PROGRAMS TO CALL PL1 PROCEDURES. 0 Referenced by comments of: 233/43 00233/039 PL1 LIBRARY MAXLEN SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.MAXLEN.SA.039(1) 637 5.0T1 637 PL1_LIBRARY.MAXLEN.SA.039 1 LINE 80 1 PAGE UM TIFFANY JULY 27, 1977 01:54:07 5.0T1 637 0 MAXLEN OBTAINS THE MAXIMUM LENGTH FOR A GIVEN PL/1 CHARACTER VARYING STRING. 00233/040 PL1 LIBRARY IHEDBNA SA G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.IHEDBNA.SA.040(1) 638 5.0T1 638 PL1_LIBRARY.IHEDBNA.SA.040 1 SEQ 80 4 PAGE UM TIFFANY MAY 13, 1978 17:07:38 5.0T1 638 0 THIS REPLACES THE IBM VERSION OF IHEDBNA WHICH CAUSED ADDRESSABILITY INTERRUPTS, ESPECIALLY IN *LINKEDIT WHILE CONVERTING BIT STRINGS TO ARITHMETIC VALUES. 00233/041 PL1 LIBRARY UPDATE UI G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.UPDATE.UI.041(1) 639 5.0T1 639 PL1_LIBRARY.UPDATE.UI.041 1 LINE 73 9 PAGE UM TIFFANY JULY 27, 1977 01:54:11 5.0T1 639 0 *IEBUPDAT INPUT TO PRODUCE CURRENT MTS PL1 LIBRARY FROM IBM RELEASE 21.8. THE RESULT OF THIS ASSEMBLY SHOULD BE ASSEMBLED USING THE FOLLOWING MACRO LIBRARIES (IN THE ORDER GIVEN): PL1MACLIB (233/13), MACLIB (233/1), AND *SYSMAC. 00233/042 PL1 LIBRARY ENDPL1LIB OC G S1558 5.0T1 VLO FSNAME=PL1_LIBRARY.ENDPL1LIB.OC.042(1) 640 5.0T1 640 PL1_LIBRARY.ENDPL1LIB.OC.042 1 LINE 24 1 PAGE UM TIFFANY JULY 27, 1977 01:54:14 5.0T1 640 0 CONTAINS 5 LOADER CARDS (RIP PL1SYM, RIP IHEPRD, LCS LCSYMBOL, LCS PL1SYM, LCSPR IHEPRD). 00233/043 PL1 LIBRARY *PL1LIB OL G *PL1LIB 5.0T1 641 PL1_LIBRARY.*PL1LIB.OL.043 1 SEQ 2642 3 PAGE UM TIFFANY JULY 03, 1981 12:59:29 5.0T1 641 *PL1LIB 0 NON-REENTRANT PART OF RUN-TIME LIBRARY; THE REMAINDER IS IN SHAREDPL1LIB. NOTE: IHEMAIN (233/25) MUST COME AFTER BOTH IHESAP (233/31) AND CALLPL1 (233/38) IN THE DIR RECORD FOR THIS LIBRARY. 1 SUN SEP 08/96 15:24:55 Page 112 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 326/6 00233/044 PL1 LIBRARY SHAREDPL1LIB OE G SEG2:SHAREDPL1LIB 5.0T1 642 PL1_LIBRARY.SHAREDPL1LIB.OE.044 1 LINE 256 58 PAGE UM TIFFANY JULY 03, 1981 12:59:30 5.0T1 642 SEG2:SHAREDPL1LIB 0 REENTRANT PART OF RUN-TIME LIBRARY; LOADED INTO SHARED VM AT IPL BY PISTLE. CONTAINS IHEPRD WHICH IS SET UP CORRECTLY BY CRELCSPR (506/2). 00233/045 PL1 LIBRARY UNSP PREAD SA G PREA S1153 UNSP VLO FSNAME=PREAD.S 5.0T1 643 PL1_LIBRARY.UNSP_PREAD.SA.045 1 LINE 80 3 PAGE UM UNSP NOV. 09, 1975 19:29:47 5.0T1 643 0 THE FOLLOWING PROCEDURES CONSTITUTE THE UM "UNSUPPORTED" PL/1 LIBRARY. PREAD ALLOWS THE MTS READ SUBROUTINE TO BE CALLED FROM A PL/1 PROGRAM WITHOUT USING PLCALL. 00233/046 PL1 LIBRARY UNSP PWRITE SA G PWRI S1153 UNSP VLO FSNAME=PWRITE.S 5.0T1 644 PL1_LIBRARY.UNSP_PWRITE.SA.046 1 LINE 80 3 PAGE UM UNSP NOV. 09, 1975 19:29:40 5.0T1 644 0 PWRITE ALLOWS THE MTS WRITE SUBROUTINE TO BE CALLED FROM A PL/1 PROGRAM WITHOUT USING PLCALL. 00233/047 PL1 LIBRARY UNSP SETLEN SA O SETL S1153 UNSP VLO FSNAME=SETLEN.S 5.0T1 645 PL1_LIBRARY.UNSP_SETLEN.SA.047 1 LINE 80 1 PAGE UM UNSP NOV. 09, 1975 19:30:07 5.0T1 645 0 SETLEN RESETS THE LENGTH OF A PL/1 CHARACTER VARYING STRING. 00233/048 PL1 LIBRARY UNSP LIBRARY OL O UNSP:PL1LIB 5.0T1 646 PL1_LIBRARY.UNSP_LIBRARY.OL.048 1 LINE 105 1 PAGE UM UNSP JULY 03, 1981 13:00:51 5.0T1 646 UNSP:PL1LIB 00233/049 PL1 LIBRARY UNSP LIBRARY WF S1153 UNSP VLO FSNAME=PL1LIB.FMT 5.0T1 647 PL1_LIBRARY.UNSP_LIBRARY.WF.049 1 LINE 81 4 PAGE UM UNSP SEP. 15, 1980 16:43:35 5.0T1 647 00234/001 8ASR 8ASRMAC SM G S1558 5.0T1 VLO FSNAME=8ASR.8ASRMAC.SM.001(1) 648 5.0T1 648 8ASR.8ASRMAC.SM.001 1 LINE 80 16 PAGE UM JUNE 02, 1976 20:37:42 5.0T1 648 0 MACRO LIBRARY FOR DEC ASSEMBLERS. 0 Referenced by comments of: 234/4, 234/6 00234/002 8ASR 8ASREQU.C SA G S1558 5.0T1 VLO FSNAME=8ASR.8ASREQU.C.SA.002(1) 649 5.0T1 649 8ASR.8ASREQU.C.SA.002 1 LINE 80 4 PAGE UM JULY 19, 1977 11:33:37 5.0T1 649 0 COPY SECTION. 0 Referenced by comments of: 234/4, 234/6 1 SUN SEP 08/96 15:24:55 Page 113 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00234/003 8ASR 8ASRST.C SA G S1558 5.0T1 VLO FSNAME=8ASR.8ASRST.C.SA.003(1) 650 5.0T1 650 8ASR.8ASRST.C.SA.003 1 LINE 80 7 PAGE UM JULY 19, 1977 11:34:01 5.0T1 650 0 COPY SECTION. 0 Referenced by comments of: 234/4, 234/6 00234/004 8ASR MAIN PROGRAM SA G S1558 5.0T1 VLO FSNAME=8ASR.MAIN_PROGRAM.SA.004(1) 651 5.0T1 651 8ASR.MAIN_PROGRAM.SA.004 1 LINE 99 33 PAGE UM JULY 19, 1977 11:34:21 5.0T1 651 0 MAIN PROGRAM FOR *8ASR, *9ASR, AND *1ASR. COPIES 8ASREQU.C (234/2) AND 8ASRST.C (234/3) AND REQUIRES 8ASRMAC (234/1). 0 Referenced by comments of: 234/6 00234/005 8ASR MAIN PROGRAM OC G S1558 5.0T1 VLO FSNAME=8ASR.MAIN_PROGRAM.OC.005(1) 652 5.0T1 652 8ASR.MAIN_PROGRAM.OC.005 1 LINE 80 10 PAGE UM JULY 19, 1977 11:34:41 5.0T1 652 0 Referenced by comments of: 234/10, 234/13, 234/18 00234/006 8ASR SUBROUTINES SA G S1558 5.0T1 VLO FSNAME=8ASR.SUBROUTINES.SA.006(1) 653 5.0T1 653 8ASR.SUBROUTINES.SA.006 1 LINE 105 10 PAGE UM JUNE 02, 1976 20:41:06 5.0T1 653 0 SUBROUTINES USED BY (234/4). COPIES 8ASREQU.C (234/2) AND 8ASRST.C (234/3) AND REQUIRES 8ASRMAC (234/1). 00234/007 8ASR SUBROUTINES OC G S1558 5.0T1 VLO FSNAME=8ASR.SUBROUTINES.OC.007(1) 654 5.0T1 654 8ASR.SUBROUTINES.OC.007 1 LINE 80 5 PAGE UM JUNE 02, 1976 20:41:13 5.0T1 654 0 Referenced by comments of: 234/10, 234/13, 234/18 00234/008 8ASR PDP-8 OP TBLS SA G S1558 5.0T1 VLO FSNAME=8ASR.PDP-8_OP_TBLS.SA.008(1) 655 5.0T1 655 8ASR.PDP-8_OP_TBLS.SA.008 1 LINE 99 4 PAGE UM JUNE 02, 1976 20:41:53 5.0T1 655 0 ASSEMBLY TO DEFINE PDP-8 OPERATION CODES FOR *8ASR. 00234/009 8ASR PDP-8 OP TBLS OC G S1558 5.0T1 VLO FSNAME=8ASR.PDP-8_OP_TBLS.OC.009(1) 656 5.0T1 656 8ASR.PDP-8_OP_TBLS.OC.009 1 LINE 80 5 PAGE UM JUNE 02, 1976 20:42:06 5.0T1 656 0 Referenced by comments of: 234/10 00234/010 8ASR *8ASR OE G *8ASR 5.0T1 657 8ASR.*8ASR.OE.010 1 SEQ 11502 7 PAGE UM JULY 03, 1981 13:01:24 5.0T1 657 *8ASR 0 OBJECT CONSISTING OF (234/5) + (234/7) + (234/9). 1 SUN SEP 08/96 15:24:55 Page 114 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00234/011 8ASR PDP-9 OP TBLS SA G S1558 5.0T1 VLO FSNAME=8ASR.PDP-9_OP_TBLS.SA.011(1) 658 5.0T1 658 8ASR.PDP-9_OP_TBLS.SA.011 1 LINE 99 4 PAGE UM JUNE 02, 1976 20:42:18 5.0T1 658 0 ASSEMBLY TO DEFINE PDP-9 OPERATION CODES FOR *9ASR. 00234/012 8ASR PDP-9 OP TBLS OC G S1558 5.0T1 VLO FSNAME=8ASR.PDP-9_OP_TBLS.OC.012(1) 659 5.0T1 659 8ASR.PDP-9_OP_TBLS.OC.012 1 LINE 80 5 PAGE UM JUNE 02, 1976 20:42:26 5.0T1 659 0 Referenced by comments of: 234/13 00234/013 8ASR *9ASR OE G *9ASR 5.0T1 660 8ASR.*9ASR.OE.013 1 SEQ 11502 7 PAGE UM JULY 03, 1981 13:01:26 5.0T1 660 *9ASR 0 OBJECT CONSISTING OF (234/5) + (234/7) + (234/12). 00234/014 8ASR PDP-1 OP TBLS SA G S1558 5.0T1 VLO FSNAME=8ASR.PDP-1_OP_TBLS.SA.014(1) 661 5.0T1 661 8ASR.PDP-1_OP_TBLS.SA.014 1 LINE 99 5 PAGE UM JUNE 02, 1976 20:42:35 5.0T1 661 0 ASSEMBLY TO DEFINE PDP-1 OPERATION CODES FOR *1ASR. 00234/015 8ASR PDP-1 OP TBLS OC G S1558 5.0T1 VLO FSNAME=8ASR.PDP-1_OP_TBLS.OC.015(1) 662 5.0T1 662 8ASR.PDP-1_OP_TBLS.OC.015 1 LINE 80 6 PAGE UM JUNE 02, 1976 20:42:43 5.0T1 662 0 Referenced by comments of: 234/18 00234/016 8ASR FRIDEN TR TBL SA S1558 5.0T1 VLO FSNAME=8ASR.FRIDEN_TR_TBL.SA.016(1) 663 5.0T1 663 8ASR.FRIDEN_TR_TBL.SA.016 1 LINE 99 3 PAGE UM JUNE 02, 1976 20:42:57 5.0T1 663 0 ASSEMBLY TO DEFINE TRANSLATE TABLE FOR FRIDEN TERMINAL USED IN CONNECTION WITH *1ASR. 00234/017 8ASR FRIDEN TR TBL OC S1558 5.0T1 VLO FSNAME=8ASR.FRIDEN_TR_TBL.OC.017(1) 664 5.0T1 664 8ASR.FRIDEN_TR_TBL.OC.017 1 LINE 80 3 PAGE UM JUNE 02, 1976 20:43:05 5.0T1 664 0 Referenced by comments of: 234/18 00234/018 8ASR *1ASR OE G *1ASR 5.0T1 665 8ASR.*1ASR.OE.018 1 SEQ 11986 7 PAGE UM JULY 03, 1981 13:01:29 5.0T1 665 *1ASR 0 OBJECT CONSISTING OF (234/5) + (234/7) + (234/15) + (234/17). 00234/019 8ASR OS INTERFACE SA S1558 5.0T1 VLO FSNAME=8ASR.OS_INTERFACE.SA.019(1) 666 5.0T1 666 8ASR.OS_INTERFACE.SA.019 1 LINE 80 8 PAGE UM JUNE 29, 1973 21:38.49 5.0T1 666 0 SUBROUTINES TO PROVIDE MTS ENVIRONMENT FOR 8ASR IN OS/360. NOT COMPLETELY CHECKED OUT. OBJECT NOT DISTRIBUTED. ASSEMBLE USING *OSMAC (193) OR USE OS/360. 1 SUN SEP 08/96 15:24:55 Page 115 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00234/020A 8ASR LINK EDITOR SA G W002:8LINK.S 5.1T1 223 8ASR.LINK_EDITOR.SA.020 1 LINE 80 77 PAGE UM KRAUSE JULY 23, 1983 10:22:34 0 Program to linkedit relocatable PDP-8 object to produce loadable file or tape. Copies 8PANEL (234/24). ******************************************************************* D5.1 version: Changed to run with PROT=ON. ******************************************************************* 00234/021A 8ASR LINK EDITOR OC G W002:8LINK 5.1T1 224 8ASR.LINK_EDITOR.OC.021 1 LINE 3756 15 PAGE UM KRAUSE JULY 23, 1983 10:22:39 0 Referenced by comments of: 234/25 00234/022 8ASR PDP8 SIMULATOR SA G S1558 5.0T1 VLO FSNAME=8ASR.PDP8_SIMULATOR.SA.022(1) 669 5.0T1 669 8ASR.PDP8_SIMULATOR.SA.022 1 LINE 80 28 PAGE UM JUNE 29, 1973 21:42.44 5.0T1 669 0 PDP-8 SIMULATOR SECTION OF *8LINK. COPIES 8PANEL (234/24). 00234/023 8ASR PDP8 SIMULATOR OC G S1558 5.0T1 VLO FSNAME=8ASR.PDP8_SIMULATOR.OC.023(1) 670 5.0T1 670 8ASR.PDP8_SIMULATOR.OC.023 1 LINE 80 2 DISK UM JUNE 29, 1973 21:47.24 5.0T1 670 0 Referenced by comments of: 234/25 00234/024 8ASR 8PANEL SA G S1558 5.0T1 VLO FSNAME=8ASR.8PANEL.SA.024(1) 671 5.0T1 671 8ASR.8PANEL.SA.024 1 LINE 80 3 PAGE UM JUNE 29, 1973 21:43.27 5.0T1 671 0 COPY SECTION. 0 Referenced by comments of: 234/20, 234/22 00234/025A 8ASR *8LINK OE G *8LINK 5.1T1 225 8ASR.?8LINK.OE.025 1 SEQ 3756 13 PAGE UM KRAUSE JULY 23, 1983 10:22:40 *8LINK 0 LINK EDIT OF (234/21) + (234/23). 00234/026 8ASR MEMO 329 WF S1558 5.0T1 VLO FSNAME=8ASR.MEMO_329.WF.026(1) 673 5.0T1 673 8ASR.MEMO_329.WF.026 1 LINE 234 32 PAGE UM JAN. 24, 1977 21:23:27 5.0T1 673 0 THIS IS COMPUTING CENTER MEMO 329 -- "*8ASR PDP-8 ASSEMBLER AND *8LINK LINK EDITOR AND LOADER" 00238/001 *2250PLOT SA # (OBSOLETE) D4T1 654 2250PLOT..SA. 1 SEQ 80 4 PAGE UM JULY 31, 1973 21:29.07 1 SUN SEP 08/96 15:24:55 Page 116 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00241/001 *TRACK SA # (OBSOLETE) D4T1 655 TRACK..SA. 1 SEQ 80 8 PAGE UM JULY 31, 1973 21:29.51 00243/001 BINEBCD SA G S1558 5.0T1 VLO FSNAME=BINEBCD..SA.001(1) 674 5.0T1 674 BINEBCD..SA.001 1 LINE 80 4 PAGE UM MTA JULY 27, 1977 02:04:19 5.0T1 674 0 SUBROUTINE TO CONVERT AN EBCDIC CARD WHICH WAS READ IN COLUMN BINARY BACK TO EBCDIC. CALLED BY *2501RTN (086) AND BY HASP (387). THIS VERSION DOES NO ERROR CHECKING. 0 Referenced by comments of: 86/1 00243/002 BINEBCD OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00243/003 BINEBCD SA G S1558 5.0T1 VLO FSNAME=BINEBCD..SA.003(1) 675 5.0T1 675 BINEBCD..SA.003 1 LINE 80 4 PAGE UM MTA JULY 27, 1977 02:04:21 5.0T1 675 0 SAME SUBROUTINE, BUT WITH ERROR CHECKING. OBJECT NOT DISTRIBUTED. 00244/001 **CT # (OBSOLETE) D2T1 138 UM 00249/001 *COPY SA # (OBSOLETE) D4T1 658 COPY..SA.001 1 LINE 80 4 PAGE UM JULY 27, 1977 02:04:23 00251/001 *IEBUPDAT SP O S1558 5.0T1 VLO FSNAME=IEBUPDAT..SP.001(1) 676 5.0T1 676 IEBUPDAT..SP.001 1 SEQ 80 3 PAGE UM TIFFANY JULY 31, 1973 21:31.45 5.0T1 676 0 A PROGRAM TO COPY TAPES CONTAINING CARD IMAGES CONFORMING TO THE IBM IEBUPDAT OR IEBUPDTE PROGRAMS. THIS PROGRAM WILL MAKE INSERTIONS AND DELETIONS. 00251/002 *IEBUPDAT OC O *IEBUPDAT 5.0T1 677 IEBUPDAT..OC.002 1 LINE 80 5 PAGE UM TIFFANY JULY 03, 1981 13:01:39 5.0T1 677 *IEBUPDAT 0 ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD. 00251/003C *IEBUPDAT MEMO 449 PF G S0672 CCMEMO 'CCMEMOS' 294 5.1T1 226 IEBUPDAT.MEMO_449.PF.003 1 LINE 80 12 PAGE UM YOUNG JUNE 28, 1983 10:31:21 0 This is Computing Center Memo 449 -- "IBM Operating System Utility Programs." Documents IEBUPDAT, IEHMOVE (291), VSSPDSBUILD (1078/54), and UNLINKER (562). 0 Referenced by comments of: 291/1, 562/1, 1078/56 1 SUN SEP 08/96 15:24:55 Page 117 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00253/001 LINE DIRECTORY SORT SA # (OBSOLETE) D2T1 121 UM 0 Obsoleted by *VALIDATEFILE (546). 00254/001 BSLOAD SA G # (OBSOLETE) D3.1T1 192 BSLOAD..SA.1 1 LINE 80 26 PAGE UM MAR. 06, 1974 03:34.57 00256/001 STATISTICS COMBINE *CMB C *CMB 5.0T1 678 STATISTICS_COMBINE.*CMB.C.001 1 LINE 31 1 PAGE UM WSG JULY 03, 1981 13:01:40 5.0T1 678 *CMB 0 Command file to run STATISTICS COMBINE program (256/2). Invoked by entering "MTS *CMB" on the operator's console. 00256/002 STATISTICS COMBINE COMBINE PGM SA G S1558 5.0T1 VLO FSNAME=STATISTICS_COMBINE.COMBIN.SA.002(1) 679 5.0T1 679 STATISTICS_COMBINE.COMBIN.SA.002 1 LINE 80 7 PAGE UM WSG OCT. 02, 1978 11:48:07 5.0T1 679 0 Program to combine and block MTS statistics tapes as produced by *STA (050/1). Program will ask for tape drive where output tape is mounted, then ask for input tape drive names. Combine process is ended by entering "DONE" for an input drive name. This program produces tapes which are blocked in a rather non-standard manner. However, most system programs which read *STATISTICS data are capable of deblocking these tapes. Source in lines 1,999. 0 Referenced by comments of: 256/1 00256/003 STATISTICS COMBINE COMBINE PGM OC G SYS:CMB 5.0T1 680 STATISTICS_COMBINE.COMBIN.OC.003 1 LINE 80 2 PAGE UM WSG JULY 03, 1981 13:01:45 5.0T1 680 SYS.:CMB 00257/001 *MOMS OC # (NOT DISTRIBUTED) D3T2 123 MOMS..OC. 1 LINE 255 12 DISK UM FEB. 22, 1973 17:18.51 00258/001 RECEIPT CARDS *RCP C *RCP 5.0T1 681 RECEIPT_CARDS.*RCP.C.001 1 LINE 31 1 PAGE UM DONNELLY JULY 03, 1981 13:01:46 5.0T1 681 *RCP 0 COMMAND FILE TO RUN BATCH RECEIPT (S-8) CARD GENERATOR PROGRAM (258/3). INVOKED BY ENTERING "MTS *RCP" FROM OPERATORS CONSOLE. 00258/002A RECEIPT CARDS RECEIPT PGM SA RECP W035:RCP 5.1T1 227 RECEIPT_CARDS.RECEIPT_PGM.SA.002 1 LINE 80 5 PAGE UM DONNELLY JULY 23, 1983 10:26:34 0 PROGRAM TO GENERATE MTS BATCH RECEIPT CARDS. 00258/003A RECEIPT CARDS RECEIPT PGM OC SYS:RCP 5.1T1 228 RECEIPT_CARDS.RECEIPT_PGM.OC.003 1 LINE 1646 1 PAGE UM DONNELLY JULY 23, 1983 10:26:35 SYS.:RCP 0 Referenced by comments of: 258/1 1 SUN SEP 08/96 15:24:55 Page 118 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00259/001 *LIST SA # (OBSOLETE) D2T1 332 UM 00260/001 SSP # (NOT DISTRIBUTED) D3T2 127 UM 00261/001 SLIP SLIP FTN SF G S1558 5.0T1 VLO FSNAME=SLIP.SLIP_FTN.SF.001(1) 684 5.0T1 684 SLIP.SLIP_FTN.SF.001 1 LINE 84 25 PAGE UM MTA DEC. 21, 1975 20:30:52 5.0T1 684 0 SLIP IS A LIBRARY OF FORTRAN-CALLABLE SUBROUTINES FOR LIST PROCESSING. SEE THE DESCRIPTION IN THE CACM V.6, N.9, SEPT/63, PP 524-544. THERE ARE TWO SEPARATE IMPLEMENTATIONS IN MTS: *SLIP IS THE NORMAL DOUBLE-WORD VERSION, "LITTLE SLIP" (UNSP:LSLIPLIB) IS A SINGLE-PRECISION VERSION. THIS SUB-COMPONENT IS THE FORTRAN SOURCE FOR *SLIP. 00261/002 SLIP SLIP PRIM SA G S1558 5.0T1 VLO FSNAME=SLIP.SLIP_PRIM.SA.002(1) 685 5.0T1 685 SLIP.SLIP_PRIM.SA.002 1 LINE 79 4 PAGE UM MTA MAY 03, 1977 15:46:19 5.0T1 685 0 THIS IS THE ASSEMBLY SOURCE FOR *SLIP PRIMITIVES. CONTAINS MTS COMMANDS AT THE FRONT OF THE FILE FOR ASSEMBLY. 00261/003 SLIP *SLIP OL G *SLIP 5.0T1 686 SLIP.*SLIP.OL.003 1 SEQ 2040 37 PAGE UM MTA JULY 03, 1981 13:01:50 5.0T1 686 *SLIP 00261/004 SLIP *SLIPDEC SF G SDEC *SLIPDEC 5.0T1 687 SLIP.*SLIPDEC.SF.004 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 13:01:52 5.0T1 687 *SLIPDEC 0 THIS IS A SET OF FORTRAN DECLARATIONS FOR ALL SLIP FUNCTIONS. IT IS TO BE USED BY PROGRAMS WHICH CALL THE *SLIP PACKAGE. 00261/005 SLIP LSLIP FTN SF O S1153 UNSP VLO FSNAME=LSLIP.S 5.0T1 688 SLIP.LSLIP_FTN.SF.005 1 LINE 84 30 PAGE UM UNSP JUNE 22, 1976 16:35:26 5.0T1 688 0 THIS SUB-COMPONENT IS THE FORTRAN SOURCE FOR THE "LITTLE SLIP" PACKAGE. 0 Referenced by comments of: 261/7 00261/006 SLIP LSLIP LIBRARY OL O UNSP:LSLIPLIB 5.0T1 689 SLIP.LSLIP_LIBRARY.OL.006 1 LINE 946 36 PAGE UM UNSP JULY 03, 1981 13:02:06 5.0T1 689 UNSP:LSLIPLIB 00261/007 SLIP LSLIP LIBRARY P UNSP:LSLIPLIB.W 5.0T1 690 SLIP.LSLIP_LIBRARY.P.007 1 LINE 69 1 PAGE UM UNSP JULY 03, 1981 13:02:09 5.0T1 690 0 A WRITEUP FOR (261/5). 1 SUN SEP 08/96 15:24:55 Page 119 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00265/001 *1 SM *1 5.0T1 691 1..SM.001 1 LINE 80 31 PAGE UM SALISBURY JULY 03, 1981 13:02:10 5.0T1 691 *1 0 MACRO LIBRARY FOR LIST PROCESSING IN ASSEMBLY LANGUAGE. SIMILAR TO L6. 00267/001 *DOWNDATE SA O S1558 5.0T1 VLO FSNAME=DOWNDATE..SA.001(1) 692 5.0T1 692 DOWNDATE..SA.001 1 LINE 80 9 PAGE UM MTA JULY 27, 1977 02:09:53 5.0T1 692 0 THE INVERSE OF *UPDATE. WILL PRODUCE AN UPDATE DECK FROM TWO SOURCE TAPES. CALLS SCANPAR SUBROUTINE (267/3). 0 Referenced by comments of: 267/3 00267/002 *DOWNDATE OE O *DOWNDATE 5.0T1 693 DOWNDATE..OE.002 1 LINE 2626 2 PAGE UM MTA JULY 03, 1981 13:02:15 5.0T1 693 *DOWNDATE 0 INCLUDES SCANPAR (267/3) OBJECT. 0 Referenced by comments of: 267/4 00267/003 *DOWNDATE SCANPAR SA S1558 5.0T1 VLO FSNAME=DOWNDATE.SCANPAR.SA.003(1) 694 5.0T1 694 DOWNDATE.SCANPAR.SA.003 1 LINE 80 3 PAGE UM MTA JULY 27, 1977 02:09:57 5.0T1 694 0 SUBROUTINE CALLED BY DOWNDATE (267/1) AND UNEDIT (561/1) TO SCAN PARAMETERS. 0 Referenced by comments of: 267/1, 267/2, 561/1 00267/004 *DOWNDATE SCANPAR OC # (PART OF *DOWNDATE) D4T1 678 DOWNDATE.SCANPAR.OC.004 1 LINE 80 1 PAGE UM MTA JULY 27, 1977 02:09:59 D4T2 191 0 Part of *DOWNDATE (267/2). 00268/001 @TESTITP S # (OBSOLETE) D2T1 421 UM 00270/001 DISMOUNT SUBR SA G # (PART OF MTS/FSUB) 5.0T1 695 DISMOUNT_SUBR..SA.001 1 LINE 70 3 PAGE UM JULY 03, 1981 13:02:16 5.0T1 695 00271/001 MOUNT SUBR # (OBSOLETE) 680 D4T1 680 MOUNT_SUBR..SA.001 1 LINE 80 3 PAGE UM DEC. 01, 1976 12:50:44 0 Now part of the MOUNT command (101). 00273/001 FPC SA G S1558 5.0T1 VLO FSNAME=FPC..SA.001(1) 697 5.0T1 697 FPC..SA.001 1 LINE 80 6 PAGE UM WSG JULY 31, 1973 21:33.40 5.0T1 697 0 SUBROUTINES E7090, D7090, E7090P, D7090P TO CONVERT IBM 7090 SERIES FLOATING POINT NUMBERS TO SYSTEM/360 1 SUN SEP 08/96 15:24:55 Page 120 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 LONG AND SHORT FORM. 00273/002 FPC OC G # (PART OF *LIBRARY) UM WSG 0 Object part of *LIBRARY (524/1) 00274/001 GLINT S # (NOT DISTRIBUTED) D2T1 395 UM 00275/001 BITWISE LOGIC - IHCLOGIC SA G S1558 5.0T1 VLO FSNAME=BITWISE_LOGIC_-_IHCLOGIC..SA.001(1) 698 5.0T1 698 BITWISE_LOGIC_-_IHCLOGIC..SA.001 1 LINE 80 4 PAGE UM TIFFANY SEP. 15, 1977 18:53:12 5.0T1 698 0 SUBROUTINES AND, LAND, OR, LOR, XOR, LXOR, COMPL, LCOMPL, SHFTL, AND SHFTR USED FOR LOGICAL OPERATIONS IN FORTRAN. 00275/002 BITWISE LOGIC - IHCLOGIC OC G # (PART OF *LIBRARY) UM TIFFANY 0 Object part of *LIBRARY (524/1) 00278/001 IOH SA G S1558 5.0T1 VLO FSNAME=IOH..SA.001(1) 699 5.0T1 699 IOH..SA.001 1 LINE 80 153 PAGE UM SWARTZ MAY 13, 1978 17:07:43 5.0T1 699 0 I/O CONVERSION PACKAGE. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 387/24, 400/1 00278/002 IOH OC G S1558 5.0T1 VLO FSNAME=IOH..OC.002(1) 700 5.0T1 700 IOH..OC.002 1 LINE 80 21 PAGE UM SWARTZ MAY 13, 1978 17:08:15 5.0T1 700 0 OBJECT IS ALSO IN *LIBRARY (524) -- MAY NOT BE EXACTLY THE SAME VERSION. 00278/003 IOH IOPKG SA G S1558 5.0T1 VLO FSNAME=IOH.IOPKG.SA.003(1) 701 5.0T1 701 IOH.IOPKG.SA.003 1 LINE 68 5 PAGE UM SWARTZ MAY 13, 1978 17:08:19 5.0T1 701 0 COPIES *GDINFODSECT (594). 00278/004 IOH IOPKG OC G S1558 5.0T1 VLO FSNAME=IOH.IOPKG.OC.004(1) 702 5.0T1 702 IOH.IOPKG.OC.004 1 LINE 80 3 PAGE UM SWARTZ MAY 13, 1978 17:08:22 5.0T1 702 0 OBJECT IS ALSO IN *LIBRARY (524). 00278/005 IOH TEST PGM SA G S1558 5.0T1 VLO FSNAME=IOH.TEST_PGM.SA.005(1) 703 5.0T1 703 IOH.TEST_PGM.SA.005 1 LINE 80 11 PAGE UM SWARTZ JULY 27, 1977 02:10:39 5.0T1 703 0 PROGRAM TO TEST IOH. 1 SUN SEP 08/96 15:24:55 Page 121 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00278/006 IOH TEST PGM OC G S1558 5.0T1 VLO FSNAME=IOH.TEST_PGM.OC.006(1) 704 5.0T1 704 IOH.TEST_PGM.OC.006 1 LINE 80 10 PAGE UM SWARTZ JULY 27, 1977 02:10:41 5.0T1 704 00278/007 IOH IOHDBLIN SA S1558 5.0T1 VLO FSNAME=IOH.IOHDBLIN.SA.007(1) 705 5.0T1 705 IOH.IOHDBLIN.SA.007 1 LINE 74 7 PAGE UM SWARTZ JULY 27, 1977 02:10:43 5.0T1 705 00278/008 IOH IOHDBLIN OE ETC:IOHDBLIN 5.0T1 706 IOH.IOHDBLIN.OE.008 1 SEQ 2530 1 PAGE UM SWARTZ JULY 03, 1981 13:02:28 5.0T1 706 ETC.:IOHDBLIN 00278/009 IOH IOHDBLOUT SA S1558 5.0T1 VLO FSNAME=IOH.IOHDBLOUT.SA.009(1) 707 5.0T1 707 IOH.IOHDBLOUT.SA.009 1 LINE 73 5 PAGE UM SWARTZ JULY 27, 1977 02:10:48 5.0T1 707 00278/010 IOH IOHDBLOUT OE ETC:IOHDBLOUT 5.0T1 708 IOH.IOHDBLOUT.OE.010 1 SEQ 1363 1 PAGE UM SWARTZ JULY 03, 1981 13:02:30 5.0T1 708 ETC.:IOHDBLOUT 00278/011 IOH IOHEVAL SA S1558 5.0T1 VLO FSNAME=IOH.IOHEVAL.SA.011(1) 709 5.0T1 709 IOH.IOHEVAL.SA.011 1 LINE 65 2 PAGE UM SWARTZ MAY 13, 1978 17:08:24 5.0T1 709 00278/012 IOH IOHEVAL OC ETC:IOHEVAL 5.0T1 710 IOH.IOHEVAL.OC.012 1 SEQ 80 1 PAGE UM SWARTZ JULY 03, 1981 13:02:32 5.0T1 710 ETC.:IOHEVAL 00279/001 LINPG SUBR # (NOT DISTRIBUTED) D2T1 396 UM 00282/001 PRINTER PLOT SUBR SA G S1011 ETC 'MISC' FSNAME=PTRPLOT 5.0T1 711 PRINTER_PLOT_SUBR..SA.001 1 LINE 69 21 PAGE UM LIFT FEB. 23, 1979 11:28:04 5.0T1 711 0 COPIES "PLOTDS" (282/2). ASSEMBLE WITH PAR=BATCH. 0 Referenced by comments of: 133/1, 282/2 00282/002 PRINTER PLOT SUBR COPY SECTION SA G S1011 ETC 'MISC' FSNAME=PTRPLOTD4DS 5.0T1 712 PRINTER_PLOT_SUBR.COPY_SE.SA.002 1 LINE 69 3 PAGE UM LIFT APR. 06, 1977 18:45:48 5.0T1 712 0 "PLOTDS" COPY SECTION COPIED BY (282/1). 0 Referenced by comments of: 282/1 00282/003 PRINTER PLOT SUBR OC G # (PART OF *LIBRARY) UM LIFT 0 Object part of *LIBRARY (524/1) 1 SUN SEP 08/96 15:24:55 Page 122 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00283/001 BLOCKED I/O - QSAM SA G W116:QSAM.S 697 5.0T1 713 BLOCKED_I/O_-_QSAM..SA.001 1 LINE 80 20 PAGE UM YOUNG JULY 03, 1981 13:02:42 5.0T1 713 0 LIBRARY SUBROUTINES TO PERFORM FIXED BLOCKING (FORMAT FB) ON FILES, TAPES, ETC. ENTRY POINTS: QGETUCB (QGTUCB), QOPEN, QGET, QPUT, QCLOSE, QCNTRL, AND QFREEUCB (QFRUCB). COPIES *GDINFODSECT (594). 0 Referenced by comments of: 137/1 00283/002 BLOCKED I/O - QSAM OC G # (PART OF *LIBRARY) UM YOUNG 0 Object part of *LIBRARY (524/1) 00285/001 SKIP SUBR SA G S1558 5.0T1 VLO FSNAME=SKIP_SUBR..SA.001(1) 714 5.0T1 714 SKIP_SUBR..SA.001 1 LINE 80 5 PAGE UM WSG MAY 02, 1978 23:41:03 5.0T1 714 0 Subroutine to space a file or tape forward or backward by records and/or files. Source in lines 1,999. 00285/002 SKIP SUBR OC G # (PART OF *LIBRARY) UM WSG 0 Object part of *LIBRARY (524/1) 00286/001 MATH SUBRS # (NOT DISTRIBUTED) D2T1 389 UM 00287/001 SPIE SUBR SA G S1558 5.0T1 VLO FSNAME=SPIE_SUBR..SA.001(1) 715 5.0T1 715 SPIE_SUBR..SA.001 1 LINE 80 3 PAGE UM MTA JULY 27, 1977 02:12:55 5.0T1 715 0 SUBROUTINE TO INTERFACE OS/360 'SPIE' MACRO WITH MTS 'PGNTTRP' SUBROUTINE. 00287/002 SPIE SUBR OC G # (PART OF *LIBRARY) UM MTA 0 Object part of *LIBRARY (524/1) 00291/001A *IEHMOVE SA G SCAN W062:IEHMOVE.S 5.1T1 229 IEHMOVE..SA.001 1 LINE 80 39 PAGE UM TIFFANY JULY 23, 1983 10:26:35 0 Program to read unloaded OS/360 data sets in MTS. See also *UNLINKER (562). Calls the BLKRTN subroutine (562/2) to read OS/VS IEBCOPY or IEHMOVE tapes. Assemble with PEXIT=*PEXIT (775). Copies *GDINFODSECT (594) and *SENSEDSECT (3025). This IEHMOVE is documented in CCMemo 449 (251/3). ********************************************************************** D5.1 version: Recognizes VSS parameters to set up VSS PDS. ********************************************************************** 1 SUN SEP 08/96 15:24:55 Page 123 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 251/3, 823/25, 824/3, 824/6 00291/002A *IEHMOVE OE G *IEHMOVE 5.1T1 230 IEHMOVE..OE.002 1 LINE 7960 6 PAGE UM TIFFANY JULY 23, 1983 10:26:37 *IEHMOVE 00293/001 *MACGEN SA G S1558 5.0T1 VLO FSNAME=MACGEN..SA.001(1) 718 5.0T1 718 MACGEN..SA.001 1 LINE 80 3 PAGE UM HELFFRICH JULY 27, 1977 02:13:02 5.0T1 718 0 GENERATE THE DIRECTORY FOR A MACRO LIBRARY. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 648/41 00293/002 *MACGEN OE G *MACGEN 5.0T1 719 MACGEN..OE.002 1 SEQ 658 1 PAGE UM HELFFRICH JULY 03, 1981 13:03:00 5.0T1 719 *MACGEN 00296/001 CHECKDASD SA # (OBSOLETE) D2T1 119 UM 00297/001 *LINKEDIT LKEDCMD SP G W052:LINK.CMD.S 5.0T1 720 LINKEDIT.LKEDCMD.SP.001 1 LINE 99 33 PAGE UM SHERRY JULY 03, 1981 13:03:01 5.0T2 1 0 MTS LINKAGE EDITOR MAIN PROGRAM - COMMAND PROCESSOR. CONTAINS A "$CONTINUE WITH W052:LINK.COM" (297/6) RECORD. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 0 Referenced by comments of: 98/1, 297/15, 706/13, 813/13, 821/16, 821/26, 1000/11 00297/002 *LINKEDIT INCLUDE SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.INCLUDE.SP.002(1) 721 5.0T1 721 LINKEDIT.INCLUDE.SP.002 1 LINE 100 17 PAGE UM SHERRY APR. 05, 1980 14:21:51 5.0T2 2 0 CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/003 *LINKEDIT PUNCH SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.PUNCH.SP.003(1) 722 5.0T1 722 LINKEDIT.PUNCH.SP.003 1 LINE 100 7 PAGE UM SHERRY JULY 27, 1977 02:13:20 5.0T2 3 0 CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/004 *LINKEDIT COMBINE SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.COMBINE.SP.004(1) 723 5.0T1 723 LINKEDIT.COMBINE.SP.004 1 LINE 100 10 PAGE UM SHERRY JULY 27, 1977 02:13:22 5.0T2 4 0 CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 1 SUN SEP 08/96 15:24:55 Page 124 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00297/005 *LINKEDIT SUBR SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.SUBR.SP.005(1) 724 5.0T1 724 LINKEDIT.SUBR.SP.005 1 LINE 99 5 PAGE UM SHERRY JULY 27, 1977 02:13:25 5.0T2 5 0 CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/006 *LINKEDIT LINK.COM SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.LINK.COM.SP.006(1) 725 5.0T1 725 LINKEDIT.LINK.COM.SP.006 1 LINE 100 6 PAGE UM SHERRY APR. 05, 1980 14:21:54 5.0T2 6 0 COPY SECTION REQUIRED TO COMPILE THE INDIVIDUAL ROUTINES. LINE NUMBERS IN THIS FILE ARE IMPORTANT. 0 Referenced by comments of: 297/1, 297/2, 297/3, 297/4, 297/5, 297/8, 297/9, 297/10, 297/11, 297/12, 297/14, 297/15 00297/007 *LINKEDIT ASMSUBR SA G S1558 5.0T1 VLO FSNAME=LINKEDIT.ASMSUBR.SA.007(1) 726 5.0T1 726 LINKEDIT.ASMSUBR.SA.007 1 LINE 71 3 PAGE UM SHERRY JULY 27, 1977 02:13:29 5.0T2 7 0 ASMG SUBROUTINES. 00297/008 *LINKEDIT DUMP SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.DUMP.SP.008(1) 727 5.0T1 727 LINKEDIT.DUMP.SP.008 1 LINE 92 4 PAGE UM SHERRY JULY 27, 1977 02:13:31 5.0T2 8 0 SUBROUTINE TO PRODUCE ERROR DUMPS. CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/009 *LINKEDIT UTIL SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.UTIL.SP.009(1) 728 5.0T1 728 LINKEDIT.UTIL.SP.009 1 LINE 88 3 PAGE UM SHERRY APR. 05, 1980 14:21:56 5.0T2 9 0 MISCELLANEOUS UTILITY SUBROUTINES. CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/010 *LINKEDIT UNLK SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.UNLK.SP.010(1) 729 5.0T1 729 LINKEDIT.UNLK.SP.010 1 LINE 100 6 PAGE UM SHERRY JULY 27, 1977 02:13:36 5.0T2 10 0 SUBROUTINE TO UNLINK MULTIPLE-CSECT MODULES. CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/011 *LINKEDIT PURGE SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.PURGE.SP.011(1) 730 5.0T1 730 LINKEDIT.PURGE.SP.011 1 LINE 91 3 PAGE UM SHERRY JULY 27, 1977 02:13:40 5.0T2 11 0 SUBROUTINE TO IMPLEMENT PURGE AND REPLACE (UPDATE) COMMANDS. CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 1 SUN SEP 08/96 15:24:55 Page 125 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00297/012 *LINKEDIT XMAL SP G S1558 5.0T1 VLO FSNAME=LINKEDIT.XMAL.SP.012(1) 731 5.0T1 731 LINKEDIT.XMAL.SP.012 1 LINE 96 8 PAGE UM SHERRY JULY 27, 1977 02:13:42 5.0T2 12 0 SUBROUTINE TO IMPLEMENT XREF, MAP, ATTRIBUTE, AND LIST COMMANDS. CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/013 *LINKEDIT IOCVT SA G W052:LINK.IOCVT.S 5.0T1 732 LINKEDIT.IOCVT.SA.013 1 LINE 72 18 PAGE UM SHERRY JULY 03, 1981 13:03:22 5.0T2 13 0 ROUTINES TO DO I/O CONVERSIONS, TEXT MODIFICATION, AND SCANNING; USED BY DISPLAY, SCAN, AND MODIFY COMMANDS. ASSEMBLE USING *SYSMAC. 00297/014 *LINKEDIT IOSUB SP G W052:LINK.IOSUB.S 5.0T1 733 LINKEDIT.IOSUB.SP.014 1 LINE 91 3 PAGE UM SHERRY JULY 03, 1981 13:03:26 5.0T2 14 0 SUBROUTINE USED BY DISPLAY, SCAN, AND MODIFY COMMANDS. CONTAINS "$CONTINUE WITH W052:LINK.COM" (297/6) RECORDS. COMPILE WITH PARAMETER SORMGIN=(2,100,1) 00297/015 *LINKEDIT LINK.CMD.GEN C W052:LINK.CMD.G 5.0T1 734 LINKEDIT.LINK.CMD.GEN.C.015 1 LINE 106 1 PAGE UM SHERRY JULY 03, 1981 13:03:27 5.0T2 15 0 THIS IS AN MTS COMMAND SOURCE FILE TO RECOMPILE LINK.CMD.S (297/1). LINE NUMBERS IN THIS FILE ARE IMPORTANT. THIS FILE CONTAINS SOME $EDIT COMMANDS TO SET THE VERSION DATE IN W052:LINK.COM (297/6) BEFORE COMPILING. 00297/016 *LINKEDIT LINKLOAD OC G S1558 5.0T1 VLO FSNAME=LINKEDIT.LINKLOAD.OC.016(1) 735 5.0T1 735 LINKEDIT.LINKLOAD.OC.016 1 LINE 32767 121 PAGE UM SHERRY APR. 05, 1980 14:21:59 5.0T2 16 0 UNLINKEDITED OBJECT FOR LINKAGE EDITOR. THIS FILE HAS A "$CONTINUE WITH *PL1LIB" RECORD IN IT. 00297/017 *LINKEDIT LINKEDIT.G C S1558 5.0T1 VLO FSNAME=LINKEDIT.LINKEDIT.G.C.017(1) 736 5.0T1 736 LINKEDIT.LINKEDIT.G.C.017 1 LINE 34 1 PAGE UM SHERRY JULY 27, 1977 02:13:54 5.0T2 17 0 THIS FILE CONTAINS ALL THE MTS AND *LINKEDIT COMMANDS NECESSARY TO LINKEDIT THE UNLINKEDITED VERSION OF THE LINKAGE EDITOR (297/17). THE *LINKEDIT COMMAND "RENAME IHESAPC IHESAPE" IS IMPORTANT SO THAT THE PAR= FIELD ON A $RUN *LINKEDIT COMMAND WON'T BE INTERCEPTED BY THE PL1 ENVIRONMENT. 0 Referenced by comments of: 297/17 1 SUN SEP 08/96 15:24:55 Page 126 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00297/018 *LINKEDIT OBJECT OE G *LINKEDIT 5.0T1 737 LINKEDIT.OBJECT.OE.018 1 SEQ 32767 71 PAGE UM SHERRY JULY 03, 1981 13:03:31 5.0T2 18 *LINKEDIT 0 THIS FILE HAS A "$CONTINUE WITH *PL1LIB" RECORD IN IT. 00298/001A *FORTRANH ASM SOU SA G S1099 FORTRN FSNAME=FTNH.ASM 5.1T1 231 FORTRANH.ASM_SOU.SA.001 1 LINE 80 282 PAGE UM HANSEN OCT. 26, 1982 16:46:00 0 SOURCE FOR ASSEMBLER MODULES WHICH HAVE BEEN CHANGED FROM THE OS AND UNIVERSITY OF ROCHESTER VERSIONS. ASSEMBLE USING (298/7) MACRO LIBRARY. 0 Referenced by comments of: 298/5, 298/7, 551/1, 666/1, 668/1, 847/1 00298/002A *FORTRANH FORTRAN SOU SF G S1099 FORTRN FSNAME=FTNH.FTN 5.1T1 232 FORTRANH.FORTRAN_SOU.SF.002 1 LINE 80 161 PAGE UM HANSEN JUNE 02, 1983 15:53:58 0 SOURCE FOR FORTRAN MODULES WHICH HAVE BEEN CHANGED FROM THE OS AND UNIVERSITY OF ROCHESTER VERSIONS. 0 Referenced by comments of: 298/5 00298/003 *FORTRANH ROCHESTER SOU S G S1558 5.0T1 VLO FSNAME=FORTRANH.ROCHESTER_SOU.S.003(1) 740 5.0T1 740 FORTRANH.ROCHESTER_SOU.S.003 1 LINE 80 93 PAGE UM HANSEN DEC. 01, 1978 12:43:27 5.0T2 21 0 SOURCE (ASSEMBLER AND FORTRAN) FOR THE MODULES FROM THE UNIVERSITY OF ROCHESTER. 0 Referenced by comments of: 298/5 00298/004 *FORTRANH OS SOURCE S O S1558 5.0T1 VLO FSNAME=FORTRANH.OS_SOURCE.S.004(1) 741 5.0T1 741 FORTRANH.OS_SOURCE.S.004 1 SEQ 80 1263 PAGE UM HANSEN MAR. 26, 1979 02:37:25 5.0T2 22 0 SOURCE MODULES FOR THOSE PARTS OF FORTRAN H UNCHANGED FROM OS (RELEASE 20.1). NO PTF'S ARE INCLUDED IN THIS FILE. 0 Referenced by comments of: 298/5 00298/005A *FORTRANH OBJECT OC G S1099 FORTRN FSNAME=FORTRANH.O 5.1T1 233 FORTRANH.OBJECT.OC.005 1 LINE 22909 138 PAGE UM HANSEN JULY 11, 1983 13:49:25 0 COMPLETE, UN-LINKEDITED FORTRAN H COMPILER, CONSISTING OF OBJECT FOR (298/1), (298/2), (298/3), AND (298/4). 0 Referenced by comments of: 298/6 1 SUN SEP 08/96 15:24:55 Page 127 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00298/006A *FORTRANH *FORTRANH OE G *FORTRANH 5.1T1 234 FORTRANH.?FORTRANH.OE.006 1 LINE 32767 225 PAGE UM HANSEN JULY 23, 1983 10:28:55 *FORTRANH 0 LINKEDITED VERSION OF (298/5). 00298/007 *FORTRANH MACLIB SM G S1558 5.0T1 VLO FSNAME=FORTRANH.MACLIB.SM.007(1) 744 5.0T1 744 FORTRANH.MACLIB.SM.007 1 LINE 72 3 PAGE UM HANSEN NOV. 14, 1978 18:00:46 5.0T2 25 0 MACRO LIBRARY USED BY (298/1). 0 Referenced by comments of: 298/1 00299/001 *LOVOC S # (OBSOLETE) D2T2 205 UM 00300/001 *LODEF S # (OBSOLETE) D2T2 206 UM 00302/001 *SSPSOURCE SF G # (NOT DISTRIBUTED) D3T2 167 SSPSOURCE..SF.1 1 LINE 80 5 PAGE UM FEB. 17, 1972 13:31.13 00303/001A SORT SORT PGM SA G SORT S0027 DISTRB FSNAME=SORT 5.1T1 235 SORT.SORT_PGM.SA.001 1 LINE 80 93 PAGE UM ENGLE OCT. 05, 1982 13:06:28 0 GENERAL SORT PROGRAM. COPIES *CNFGINFODSECT (654). ASSEMBLE AS FOLLOWS FOR THE TWO VERSIONS: &SUB SETB 0 FOR *SORT VERSION (303/4). &SUB SETB 1 FOR SORT SUBROUTINE VERSION (303/5). NOTE: OTHER VALUES FOR MBYI AND MBYT MAY BE MORE APPROPRIATE FOR MACHINES OTHER THAN THE AMDAHL 470V/8 OR WITH A RATE STRUCTURE OTHER THAN ONE FOR WHICH THE COST OF 1 CPU SECOND EQUALS THE COST OF 200 VMI PAGE-SECONDS (AS AT UM). 0 Referenced by comments of: 584/1 00303/002A SORT SORT PGM UC G S0027 DISTRB FSNAME=SORTUPDATE 5.1T1 236 SORT.SORT_PGM.UC.002 1 LINE 72 5 PAGE UM ENGLE OCT. 05, 1982 13:07:22 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00303/003A SORT *SORT OC G S0027 DISTRB FSNAME=SRT 5.1T1 237 SORT.?SORT.OC.003 1 LINE 80 11 PAGE UM ENGLE OCT. 05, 1982 13:07:27 0 Referenced by comments of: 303/4 1 SUN SEP 08/96 15:24:55 Page 128 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00303/004A SORT *SORT OE G *SORT 5.1T1 238 SORT.?SORT.OE.004 1 SEQ 7736 4 PAGE UM ENGLE JULY 23, 1983 10:29:09 *SORT 0 LINKEDITED COMBINATION OF (303/3) AND *LCS (164). 0 Referenced by comments of: 303/1, 449/1 00303/005A SORT SORT SUBR OC G S0027 DISTRB FSNAME=SRT1 5.1T1 239 SORT.SORT_SUBR.OC.005 1 LINE 80 11 PAGE UM ENGLE SEP. 24, 1982 14:26:22 0 Referenced by comments of: 303/1, 1030/1 00303/006 SORT SORT2/3/4 SUBR SA G SRT2 S0027 DISTRB FSNAME=SORT2 5.0T1 750 SORT.SORT2/3/4_SUBR.SA.006 1 LINE 80 38 PAGE UM ENGLE APR. 17, 1981 17:56:51 5.0T2 31 0 SORT2 IS A SUBROUTINE TO SORT AN ARRAY IN VM. SORT3 IS A SUBROUTINE TO SORT AN ARRAY IN VM INCLUDING A "TAGGED" ARRAY. SORT4 IS A SUBROUTINE TO SORT AN ARRAY OF ADDRESSES BASED ON THE DATA TO WHICH THE ADDRESSES REFER. COPIES *CNFGINFODSECT (654). 00303/007 SORT SORT2/3/4 SUBR UC G # S0027 DISTRB FSNAME=SORT2UPDATE 5.0T1 751 SORT.SORT2/3/4_SUBR.UC.007 1 LINE 72 3 PAGE UM ENGLE APR. 17, 1981 17:57:07 5.0T2 32 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00303/008 SORT SORT2/3/4 SUBR OC G S1558 5.0T1 VLO FSNAME=SORT.SORT2/3/4_SUBR.OC.008(1) 752 5.0T1 752 SORT.SORT2/3/4_SUBR.OC.008 1 LINE 80 5 PAGE UM ENGLE APR. 17, 1981 17:57:12 5.0T2 33 00303/009 SORT MESSAGE SA G S1558 5.0T1 VLO FSNAME=SORT.MESSAGE.SA.009(1) 753 5.0T1 753 SORT.MESSAGE.SA.009 1 LINE 80 4 PAGE UM ENGLE MAR. 06, 1981 16:37:04 5.0T2 34 0 MODULE TO PRINT SORT ERROR MESSAGES (303/12). 0 Referenced by comments of: 303/17 00303/010 SORT MESSAGE UC G # S0027 DISTRB FSNAME=MESSAGEUPDATE 754 5.0T1 754 SORT.MESSAGE.UC.010 1 LINE 72 1 PAGE UM ENGLE MAR. 06, 1981 16:37:32 5.0T2 35 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00303/011 SORT MESSAGE OE G S1558 5.0T1 VLO FSNAME=SORT.MESSAGE.OE.011(1) 755 5.0T1 755 SORT.MESSAGE.OE.011 1 LINE 80 1 PAGE UM ENGLE MAR. 06, 1981 16:37:45 5.0T2 36 1 SUN SEP 08/96 15:24:55 Page 129 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00303/012A SORT MESSAGES M S0027 DISTRB FSNAME=SORTMESSAGES 5.1T1 240 SORT.MESSAGES.M.012 1 LINE 81 3 PAGE UM ENGLE AUG. 26, 1982 12:56:49 0 SORT ERROR MESSAGES. NOTE: LINE NUMBERS ARE IMPORTANT IN THIS FILE. 0 Referenced by comments of: 303/9, 303/17 00303/013A SORT CHECK SA G S0027 DISTRB FSNAME=SORTCHK 5.1T1 241 SORT.CHECK.SA.013 1 LINE 80 9 PAGE UM ENGLE AUG. 26, 1982 12:58:42 0 MODULE TO IMPLEMENT THE SORT "CHK" PARAMETER. 0 Referenced by comments of: 303/17 00303/014C SORT CHECK UC G S0027 DISTRB FSNAME=SORTCHKUPD 5.1T1 242 SORT.CHECK.UC.014 1 LINE 77 5 PAGE UM ENGLE AUG. 26, 1982 12:58:48 0 Updates source from previous regular distribution to current one. 00303/015A SORT CHECK OE G S0027 DISTRB FSNAME=CHK 5.1T1 243 SORT.CHECK.OE.015 1 LINE 2268 1 PAGE UM ENGLE AUG. 26, 1982 13:00:50 00303/016A SORT DOC WT S0027 DISTRB FSNAME=SORTWRITEUP 5.1T1 244 SORT.DOC.WT.016 1 LINE 256 51 PAGE UM ENGLE MAY 26, 1983 10:20:22 0 TEXT/360 MASTER FOR MTS VOLUME 5 SORT WRITEUP. 00303/017A SORT *SORTLM OE G *SORTLM 5.1T1 245 SORT.?SORTLM.OE.017 1 LINE 2753 4 PAGE UM ENGLE JULY 23, 1983 10:29:44 *SORTLM 0 FILE CONTAINING ERROR MESSAGE PROGRAM (303/9), MESSAGES (303/12), CHECK ROUTINE (303/13), AND TAPESORT (303/24). LINE NUMBERS IN THIS FILE ARE IMPORTANT. 00303/018 SORT SRTTMTST SA G S1558 5.0T1 VLO FSNAME=SORT.SRTTMTST.SA.017(1) 761 5.0T1 761 SORT.SRTTMTST.SA.017 1 LINE 80 4 PAGE UM ENGLE JAN. 24, 1977 16:01:14 5.0T2 42 0 MAIN PROGRAM TO PRODUCE CPU AND VMI TIMING RESULTS WHEN LOADED WITH *SORT. 00303/019 SORT SRTTMTST OC G S1558 5.0T1 VLO FSNAME=SORT.SRTTMTST.OC.018(1) 762 5.0T1 762 SORT.SRTTMTST.OC.018 1 LINE 80 1 PAGE UM ENGLE JAN. 24, 1977 16:02:11 5.0T2 43 00303/020 SORT SORTPLOT SF G S1558 5.0T1 VLO FSNAME=SORT.SORTPLOT.SF.019(1) 763 5.0T1 763 SORT.SORTPLOT.SF.019 1 LINE 80 7 PAGE UM ENGLE MAY 18, 1976 11:19:41 5.0T2 44 0 PROGRAM TO GENERATE CALCOMP TIMING PLOTS FOR THE SORT WRITEUP. INTERNAL STATEMENT NUMBER 87 SHOULD BE SKIPPED TO ELIMINATE THE PLOTTING OF DATA POINTS. 1 SUN SEP 08/96 15:24:55 Page 130 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00303/021 SORT SORTPLOT OC G S1558 5.0T1 VLO FSNAME=SORT.SORTPLOT.OC.020(1) 764 5.0T1 764 SORT.SORTPLOT.OC.020 1 LINE 3500 4 PAGE UM ENGLE MAY 18, 1976 11:23:17 5.0T2 45 00303/022A SORT SORTPLOT D G S0027 DISTRB FSNAME=SRTPDATA 5.1T1 246 SORT.SORTPLOT.D.022 1 LINE 28 3 PAGE UM ENGLE SEP. 30, 1982 11:46:43 0 DATA FOR SORT TIMING PLOTS, MEASURED ON AMDAHL 470V/8. 00303/023A SORT SORTPLOT D G S0027 DISTRB FSNAME=SRTPPLOT 5.1T1 247 SORT.SORTPLOT.D.023 1 LINE 2798 17 PAGE UM ENGLE SEP. 30, 1982 11:46:55 0 CALCOMP PLOT FILE FOR SORT TIMING PLOTS IN SORT WRITEUP. CONTAINS PPEN RECORDS FOR MULTICOLOR PLOTTING. 00303/024 SORT TAPESORT SA G S1558 5.0T1 VLO FSNAME=SORT.TAPESORT.SA.023(1) 767 5.0T1 767 SORT.TAPESORT.SA.023 1 LINE 80 18 PAGE UM ENGLE OCT. 24, 1979 16:41:35 5.0T2 48 0 MODULE TO IMPLEMENT THE TAPE MERGE OPTION IN SORT. CONTAINS A GBLC SYMBOL &MODE WITH VALUE '6250' WHICH SPECIFIES THE MODE (DENSITY) FOR THE POOL TAPES MOUNTED BY THIS PROGRAM. 0 Referenced by comments of: 303/17 00303/025 SORT TAPESORT UC G # S0027 DISTRB FSNAME=TAPESORTUPD 4.3T1 170 SORT.TAPESORT.UC.023 1 LINE 72 3 PAGE UM ENGLE OCT. 24, 1979 16:42:42 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00303/026 SORT TAPESORT OC G S1558 5.0T1 VLO FSNAME=SORT.TAPESORT.OC.025(1) 768 5.0T1 768 SORT.TAPESORT.OC.025 1 LINE 80 3 PAGE UM ENGLE OCT. 24, 1979 16:43:40 5.0T2 49 00303/027 SORT SRT2TIME SG G S1558 5.0T1 VLO FSNAME=SORT.SRT2TIME.SG.026(1) 769 5.0T1 769 SORT.SRT2TIME.SG.026 1 LINE 72 4 PAGE UM ENGLE SEP. 09, 1977 16:42:55 5.0T2 50 0 PROGRAM TO PRODUCE CPU TIMING RESULTS FOR SORT2, SORT3, AND SORT4. MAY BE USED TO TIME ONE OR MORE VERSIONS OF THESE SUBROUTINES. INFORMATION REQUESTED BY PROMPTING INCLUDES LOCATIONS (FILE NAMES ENTERED ONE/LINE TERMINATED BY EOF) OF ADDITIONAL VERSIONS (BESIDES THE ONE LOADED WITH THE PROGRAM), WHETHER THE RESULTS OF EACH INDIVIDUAL REPETITION ARE TO BE PRINTED, THE NUMBER OF REPETITIONS (0 OR MORE) FOR EACH TEST (RANDOM NUMBERS, ALREADY ORDERED, REVERSE ORDER, AND ALL EQUAL), ELEMENTS/ARRAY, ELEMENT LENGTH (LENGTH IS SAME FOR TAG ELEMENTS FOR SORT3), AND STARTING RANDOM NUMBER. IF ELEMENTS/ARRAY OR ELEMENT LENGTH IS ZERO, A NEW SET OF NUMBER OF REPETITIONS WILL BE REQUESTED. 00303/028 SORT SRT2TIME OC G S1558 5.0T1 VLO FSNAME=SORT.SRT2TIME.OC.027(1) 770 5.0T1 770 SORT.SRT2TIME.OC.027 1 LINE 80 8 PAGE UM ENGLE SEP. 09, 1977 16:44:10 5.0T2 51 0 >>>>>>>> NOTE: REP CARD IN THIS OBJECT CAUSES THE TIMES TO BE PRINTED AS TIME/N RATHER THAN TIME/(N*LOG2(N)). 1 SUN SEP 08/96 15:24:55 Page 131 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00303/029 SORT SORT4F SA G S1558 5.0T1 VLO FSNAME=SORT.SORT4F.SA.028(1) 771 5.0T1 771 SORT.SORT4F.SA.028 1 LINE 80 3 PAGE UM ENGLE FEB. 20, 1980 13:49:43 5.0T2 52 0 SORT4F IS A SUBROUTINE TO SORT AN ARRAY OF FORTRAN INDEXES BASED ON THE DATA TO WHICH THE INDEXES REFER. 00303/030 SORT SORT4F OC G S1558 5.0T1 VLO FSNAME=SORT.SORT4F.OC.029(1) 772 5.0T1 772 SORT.SORT4F.OC.029 1 LINE 80 1 PAGE UM ENGLE FEB. 20, 1980 13:49:51 5.0T2 53 00304/001 TAPE DIAGNOSTIC *TPD C *TPD 5.0T1 773 TAPE_DIAGNOSTIC.*TPD.C.001 1 LINE 61 1 PAGE UM WSG JULY 03, 1981 13:06:05 5.0T2 54 *TPD 0 Command file to run the MTS TAPE DIAGNOSTIC program (304/2). Invoked by entering "MTS *TPD" on the operator's console. 00304/002 TAPE DIAGNOSTIC SA G WSG:TAPEDIAG(1,999) 5.0T1 774 TAPE_DIAGNOSTIC..SA.002 1 LINE 66 4 PAGE UM WSG JULY 03, 1981 13:06:06 5.0T2 55 WSG.:TAPEDIAG 0 Simple tape diagnostic program. Reads and writes random length, random data records. Works on both 7- and 9-track. When it asks for a tape drive, parameters may be given after the drive name as follows: 800 - for 9-track, test 800 bpi. 1600 - for 9-track, test 1600 bpi. 6250 - for 9-track, test 6250 bpi. all - test the entire tape rather than the default 300 read/write attempts. If none of the first three parameters is given, all 9-track densities will be tested in succession (800, 1600, and 6250). If any of these densities is not supported by the drive being tested, a warning message will be produced and that density is skipped. All three 7-track densities are always tested on an interleaved record-by-record basis. 0 Referenced by comments of: 304/1 00304/003 TAPE DIAGNOSTIC OC G WSG:TAPEDIAG(1000) 5.0T1 775 TAPE_DIAGNOSTIC..OC.003 1 LINE 80 3 PAGE UM WSG JULY 03, 1981 13:06:07 5.0T2 56 00305/001 *FTNTOPL1 SLCPF4 SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SLCPF4.SP.001(1) 776 5.0T1 776 FTNTOPL1.SLCPF4.SP.001 1 SEQ 80 2 PAGE UM TIFFANY JULY 31, 1973 22:47.13 5.0T2 57 0 IBM PROGRAM 360-CV-710: LCP FORTRAN-IV TO PL/I, VERSION 1 LEVEL 0. THE SOURCE DECKS, (305/1) THROUGH (305/20), SHOULD BE STORED IN FILES NAMED AS INDICATED. THE UPDATE DECK (305/21) WILL CONVERT THESE FILES, WHICH ARE UNMODIFIED IBM SOURCE, INTO A VERSION THAT WILL RUN IN MTS. MOST OF THESE 1 SUN SEP 08/96 15:24:55 Page 132 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 PROGRAMS ARE WRITTEN IN PL/I VERSION 4 WITH SORGMIN=(2,41). THE ONLY PROGRAMS WHICH ARE NOT PL/I ARE SCONVER, SPUTTBS, AND SLBLNK, WHICH ARE ASSEMBLY LANGUAGE. UNCHANGED SINCE DIST 2. 0 Referenced by comments of: 305/1 00305/002 *FTNTOPL1 SCONVER SA O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SCONVER.SA.002(1) 777 5.0T1 777 FTNTOPL1.SCONVER.SA.002 1 SEQ 80 4 PAGE UM TIFFANY JULY 31, 1973 22:47.14 5.0T2 58 00305/003 *FTNTOPL1 SPUTTBS SA O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPUTTBS.SA.003(1) 778 5.0T1 778 FTNTOPL1.SPUTTBS.SA.003 1 SEQ 80 24 PAGE UM TIFFANY JULY 31, 1973 22:47.18 5.0T2 59 0 Referenced by comments of: 305/21 00305/004 *FTNTOPL1 SLTCOL SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SLTCOL.SP.004(1) 779 5.0T1 779 FTNTOPL1.SLTCOL.SP.004 1 SEQ 80 12 PAGE UM TIFFANY JULY 31, 1973 22:47.22 5.0T2 60 00305/005 *FTNTOPL1 SIPPRS SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SIPPRS.SP.005(1) 780 5.0T1 780 FTNTOPL1.SIPPRS.SP.005 1 SEQ 80 27 PAGE UM TIFFANY JULY 31, 1973 22:47.25 5.0T2 61 00305/006 *FTNTOPL1 SPH10 SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPH10.SP.006(1) 781 5.0T1 781 FTNTOPL1.SPH10.SP.006 1 SEQ 80 11 PAGE UM TIFFANY JULY 31, 1973 22:47.28 5.0T2 62 00305/007 *FTNTOPL1 SFNPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SFNPRO.SP.007(1) 782 5.0T1 782 FTNTOPL1.SFNPRO.SP.007 1 SEQ 80 10 PAGE UM TIFFANY JULY 31, 1973 22:47.30 5.0T2 63 00305/008 *FTNTOPL1 SDMPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SDMPRO.SP.008(1) 783 5.0T1 783 FTNTOPL1.SDMPRO.SP.008 1 SEQ 80 18 PAGE UM TIFFANY JULY 31, 1973 22:47.32 5.0T2 64 00305/009 *FTNTOPL1 SNLPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SNLPRO.SP.009(1) 784 5.0T1 784 FTNTOPL1.SNLPRO.SP.009 1 SEQ 80 9 PAGE UM TIFFANY JULY 31, 1973 22:47.34 5.0T2 65 00305/010 *FTNTOPL1 SFTPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SFTPRO.SP.010(1) 785 5.0T1 785 FTNTOPL1.SFTPRO.SP.010 1 SEQ 80 21 PAGE UM TIFFANY JULY 31, 1973 22:47.38 5.0T2 66 00305/011 *FTNTOPL1 SRTPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SRTPRO.SP.011(1) 786 5.0T1 786 FTNTOPL1.SRTPRO.SP.011 1 SEQ 80 10 PAGE UM TIFFANY JULY 31, 1973 22:47.40 5.0T2 67 00305/012 *FTNTOPL1 SIOPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SIOPRO.SP.012(1) 787 5.0T1 787 FTNTOPL1.SIOPRO.SP.012 1 SEQ 80 25 PAGE UM TIFFANY JULY 31, 1973 22:47.43 5.0T2 68 1 SUN SEP 08/96 15:24:55 Page 133 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00305/013 *FTNTOPL1 SARPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SARPRO.SP.013(1) 788 5.0T1 788 FTNTOPL1.SARPRO.SP.013 1 SEQ 80 27 PAGE UM TIFFANY JULY 31, 1973 22:47.47 5.0T2 69 00305/014 *FTNTOPL1 SCAPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SCAPRO.SP.014(1) 789 5.0T1 789 FTNTOPL1.SCAPRO.SP.014 1 SEQ 80 4 PAGE UM TIFFANY JULY 31, 1973 22:47.49 5.0T2 70 00305/015 *FTNTOPL1 SIFPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SIFPRO.SP.015(1) 790 5.0T1 790 FTNTOPL1.SIFPRO.SP.015 1 SEQ 80 6 PAGE UM TIFFANY JULY 31, 1973 22:47.52 5.0T2 71 00305/016 *FTNTOPL1 SALPRO SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SALPRO.SP.016(1) 791 5.0T1 791 FTNTOPL1.SALPRO.SP.016 1 SEQ 80 7 PAGE UM TIFFANY JULY 31, 1973 22:47.54 5.0T2 72 00305/017 *FTNTOPL1 SPH20 SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPH20.SP.017(1) 792 5.0T1 792 FTNTOPL1.SPH20.SP.017 1 SEQ 80 16 PAGE UM TIFFANY JULY 31, 1973 22:47.58 5.0T2 73 00305/018 *FTNTOPL1 SPH30 SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SPH30.SP.018(1) 793 5.0T1 793 FTNTOPL1.SPH30.SP.018 1 SEQ 80 41 PAGE UM TIFFANY JULY 31, 1973 22:48.03 5.0T2 74 00305/019 *FTNTOPL1 SLBLNK SA O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SLBLNK.SA.019(1) 794 5.0T1 794 FTNTOPL1.SLBLNK.SA.019 1 SEQ 80 4 PAGE UM TIFFANY JULY 31, 1973 22:48.07 5.0T2 75 00305/020 *FTNTOPL1 SUT1 SP O S1558 5.0T1 VLO FSNAME=FTNTOPL1.SUT1.SP.020(1) 795 5.0T1 795 FTNTOPL1.SUT1.SP.020 1 SEQ 80 3 PAGE UM TIFFANY JULY 31, 1973 22:48.08 5.0T2 76 0 Referenced by comments of: 305/1 00305/021 *FTNTOPL1 UPDATE UU O S1558 5.0T1 VLO FSNAME=FTNTOPL1.UPDATE.UU.021(1) 796 5.0T1 796 FTNTOPL1.UPDATE.UU.021 1 LINE 80 4 PAGE UM TIFFANY JULY 27, 1977 02:25:15 5.0T2 77 0 UPDATE DECK, INCLUDING MTS COMMANDS, TO PRODUCE IN A FILE "NEWLCP" A VERSION OF *FTNTOPL1 THAT WILL RUN IN MTS. THIS DECK WILL HAVE TO BE CHANGED TO MEET LOCAL CONDITIONS - IT CURRENTLY USES THE DATA CELL. LATEST VERSION CORRECTS SPUTTBS (305/3) SO THAT THERE CAN BE MORE THAN 200 INPUT CARDS. 0 Referenced by comments of: 305/1 00305/022 *FTNTOPL1 OC O *FTNTOPL1 5.0T1 797 FTNTOPL1..OC.022 1 SEQ 22330 46 PAGE UM TIFFANY JULY 03, 1981 13:06:28 5.0T2 78 *FTNTOPL1 0 ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD. 1 SUN SEP 08/96 15:24:55 Page 134 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00306/001 *WIREWRAP WW.S.MAIN SA G WWMN S0767 'SAVETAPE' FSNAME=WW.S.MAIN 5.0T1 798 WIREWRAP.WW.S.MAIN.SA.001 1 LINE 80 55 PAGE UM CASHMAN AUG. 21, 1975 11:54:24 5.0T2 79 0 PROGRAM TO PRODUCE ALL SORTS OF NEAT OUTPUT ABOUT WIRING BACKPANELS FOR HARDWARE DEVICES. INPUT TO THE PROGRAM IS A MACRO-ORIENTED LANGUAGE FOR DESCRIBING HARDWARE DEVICES FROM LOGIC DIAGRAMS. OUTPUT INCLUDES LISTS OF SIGNALS, WIRE-CHAINS, IC'S USED, COST AND POWER TOTALS, AND A PUNCHED CARD DECK FOR AUTOMATICALLY DRIVING ANY GARDNER-DENVER WIREWRAP MACHINE. THE WIREWRAP PROGRAM CONSISTS OF THREE CSECTS: WW.S.MAIN (306/1), WW.S.AUX (306/2), AND WW.S.MACR (306/3). EACH REQUIRES COPY SECTIONS WWCOPY (306/5) AND WWDATA (306/6) AND MACRO LIBRARIES WWMAC (306/7) AND *SYSMAC. THE OBJECT MODULE (*WIREWRAP) MUST BE RUN IN CONJUNCTION WITH THE *WWLIB (306/9) LIBRARY FILE OR MUST BE CONCATENATED WITH A PRIVATE SUBROUTINE PACKAGE USED TO DEFINE THE CHARACTERISTICS OF THE IC MOUNTING TECHNIQUE. SOURCE FILE WWJOB (306/8) WILL ASSEMBLE *WIREWRAP. 0 Referenced by comments of: 306/1, 306/5, 306/6, 306/7, 861/3, 861/6, 861/7 00306/002 *WIREWRAP WW.S.AUX SA G WWAU S0767 'SAVETAPE' FSNAME=WW.S.AUX 5.0T1 799 WIREWRAP.WW.S.AUX.SA.002 1 LINE 80 42 PAGE UM CASHMAN AUG. 21, 1975 11:54:30 5.0T2 80 0 Referenced by comments of: 306/1, 306/5, 306/6, 306/7 00306/003 *WIREWRAP WW.S.MACR SA G WWMC S0767 'SAVETAPE' FSNAME=WW.S.MACR 5.0T1 800 WIREWRAP.WW.S.MACR.SA.003 1 LINE 80 29 PAGE UM CASHMAN AUG. 21, 1975 11:54:38 5.0T2 81 0 Referenced by comments of: 306/1, 306/5, 306/6, 306/7 00306/004 *WIREWRAP *WIREWRAP OE G *WIREWRAP 5.0T1 801 WIREWRAP.*WIREWRAP.OE.004 1 SEQ 12724 15 PAGE UM CASHMAN JULY 03, 1981 13:12:00 5.0T2 82 *WIREWRAP 00306/005 *WIREWRAP WWCOPY SA G WWCO S0767 'SAVETAPE' FSNAME=WWCOPY 5.0T1 802 WIREWRAP.WWCOPY.SA.005 1 LINE 80 4 PAGE UM CASHMAN AUG. 21, 1975 11:55:07 5.0T2 83 0 COPY SECTION USED BY (306/1), (306/2), AND (306/3) 0 Referenced by comments of: 306/1 00306/006 *WIREWRAP WWDATA SA G WWDA S0767 'SAVETAPE' FSNAME=WWDATA 5.0T1 803 WIREWRAP.WWDATA.SA.006 1 LINE 80 8 PAGE UM CASHMAN AUG. 21, 1975 11:55:02 5.0T2 84 0 COPY SECTION USED BY (306/1), (306/2), AND (306/3). 0 Referenced by comments of: 306/1 00306/007 *WIREWRAP WWMAC SM G S0767 'SAVETAPE' FSNAME=WWMAC 5.0T1 804 WIREWRAP.WWMAC.SM.007 1 LINE 73 3 PAGE UM CASHMAN AUG. 21, 1975 11:54:50 5.0T2 85 0 MACRO LIB USED BY (306/1), (306/2), AND (306/3). 1 SUN SEP 08/96 15:24:55 Page 135 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 306/1 00306/008 *WIREWRAP WWJOB C G S0767 'SAVETAPE' FSNAME=WWJOB 5.0T1 805 WIREWRAP.WWJOB.C.008 1 LINE 92 1 PAGE UM CASHMAN AUG. 21, 1975 11:54:55 5.0T2 86 0 Referenced by comments of: 306/1 00306/009 *WIREWRAP *WWLIB OL G *WWLIB 5.0T1 806 WIREWRAP.*WWLIB.OL.009 1 LINE 2948 37 PAGE UM CASHMAN JULY 03, 1981 13:12:05 5.0T2 87 *WWLIB 0 NON-STANDARD LIBRARY FILE USED BY *WIREWRAP TO OBTAIN CHARACTERISTICS OF THE IC MOUNTING TECHNIQUE. CONSISTS OF A DIRECTORY FOLLOWED BY THE LINK-EDITED OBJECT MODULES FOR BAY TYPES: LAB, LAB16, IC, MSERIES, PG1, PG3, PG5, PG13, UG1, MIC, RSERIES, 8SERIES, CHIP, AND DOUGLAS. THE *WIREWRAP USER'S GUIDE (306/33) DESCRIBES MOST OF THESE BAY TYPES. 8SERIES IS USED FOR CLASSIC PDP-8 MINCOMPUTERS. CHIP AND DOUGLAS ARE DESCRIBED IN THEIR RESPECTIVE FORTRAN SOURCE CODES. THIS LIBRARY ALSO MAKES USE OF OBJECT FILES *WWSQGRD (306/11), *WWSTGRD1 (306/13), AND *WWSTGRD2 (306/15). 0 Referenced by comments of: 306/1, 306/16, 306/17, 306/18, 306/19, 306/20, 306/21, 306/22, 306/23, 306/24, 306/25, 306/26, 306/27, 306/28, 306/29 00306/010 *WIREWRAP SQGRD SA G SQGR S0767 'SAVETAPE' FSNAME=SQGRD.S 5.0T1 807 WIREWRAP.SQGRD.SA.010 1 LINE 80 7 PAGE UM CASHMAN DEC. 13, 1973 12:57.39 5.0T2 88 0 SUBROUTINE FOR GARDNER-DENVER AUTOMATIC WIREWRAP MACHINE. 00306/011 *WIREWRAP SQGRD OE G *WWSQGRD 5.0T1 808 WIREWRAP.SQGRD.OE.011 1 SEQ 606 1 PAGE UM CASHMAN JULY 03, 1981 13:12:32 5.0T2 89 *WWSQGRD 0 Referenced by comments of: 306/9 00306/012 *WIREWRAP STGRD1 SA G STG1 S0767 'SAVETAPE' FSNAME=STGRD1.S 5.0T1 809 WIREWRAP.STGRD1.SA.012 1 LINE 80 8 PAGE UM CASHMAN DEC. 13, 1973 12:57.57 5.0T2 90 0 SUBROUTINE FOR GARDNER-DENVER AUTOMATIC WIREWRAP MACHINE. 00306/013 *WIREWRAP STGRD1 OE G *WWSTGRD1 5.0T1 810 WIREWRAP.STGRD1.OE.013 1 SEQ 726 1 PAGE UM CASHMAN JULY 03, 1981 13:12:34 5.0T2 91 *WWSTGRD1 0 Referenced by comments of: 306/9 00306/014 *WIREWRAP STGRD2 SA G STG2 S0767 'SAVETAPE' FSNAME=STGRD2.S 5.0T1 811 WIREWRAP.STGRD2.SA.014 1 LINE 80 8 PAGE UM CASHMAN DEC. 13, 1973 12:58.13 5.0T2 92 0 SUBROUTINE FOR GARDNER-DENVER AUTOMATIC WIREWRAP MACHINE. 1 SUN SEP 08/96 15:24:55 Page 136 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00306/015 *WIREWRAP STGRD2 OE G *WWSTGRD2 5.0T1 812 WIREWRAP.STGRD2.OE.015 1 SEQ 5718 2 PAGE UM CASHMAN JULY 03, 1981 13:12:36 5.0T2 93 *WWSTGRD2 0 Referenced by comments of: 306/9 00306/016 *WIREWRAP LAB SF G LAB S0767 'SAVETAPE' FSNAME=LAB.S 5.0T1 813 WIREWRAP.LAB.SF.016 1 LINE 80 5 PAGE UM CASHMAN FEB. 20, 1976 14:55:25 5.0T2 94 0 SUBROUTINE PACKAGE FOR BAY TYPE 'LAB'. OBJECT MODULE IN *WWLIB (306/9). 00306/017 *WIREWRAP LAB16 SF G S0767 'SAVETAPE' FSNAME=LAB16.S 5.0T1 814 WIREWRAP.LAB16.SF.017 1 LINE 70 3 PAGE UM CASHMAN MAR. 13, 1978 15:48:56 5.0T2 95 0 SUBROUTINE PACKAGE FOR BAY TYPE 'LAB16', WHICH IS THE SAME AS 'LAB' EXCEPT IT ALLOWS FOR 14- OR 16-PIN CHIPS. OBJECT MODULE IN *WWLIB (306/9). 00306/018 *WIREWRAP MSERIES SF G MSER S0767 'SAVETAPE' FSNAME=MSERIES.S 5.0T1 815 WIREWRAP.MSERIES.SF.018 1 LINE 80 5 PAGE UM CASHMAN DEC. 13, 1973 12:56.06 5.0T2 96 0 SUBROUTINE PACKAGE FOR BAY TYPE 'MSERIES'. OBJECT MODULE IN *WWLIB (306/9). 00306/019 *WIREWRAP RSERIES SF G RSER S0767 'SAVETAPE' FSNAME=RSERIES.S 5.0T1 816 WIREWRAP.RSERIES.SF.019 1 LINE 80 5 PAGE UM CASHMAN DEC. 13, 1973 12:56.35 5.0T2 97 0 SUBROUTINE PACKAGE FOR BAY TYPE 'RSERIES'. OBJECT MODULE IN *WWLIB (306/9). 00306/020 *WIREWRAP IC SF G IC S0767 'SAVETAPE' FSNAME=IC.S 5.0T1 817 WIREWRAP.IC.SF.020 1 LINE 80 5 PAGE UM CASHMAN DEC. 13, 1973 12:55.30 5.0T2 98 0 SUBROUTINE PACKAGE FOR BAY TYPE 'IC'. OBJECT MODULE IN *WWLIB (306/9). 00306/021 *WIREWRAP MIC SF G MIC S0767 'SAVETAPE' FSNAME=MIC.S 5.0T1 818 WIREWRAP.MIC.SF.021 1 LINE 80 6 PAGE UM CASHMAN JAN. 16, 1974 13:12.44 5.0T2 99 0 SUBROUTINE PACKAGE FOR BAY TYPE 'MIC'. OBJECT MODULE IN *WWLIB (306/9). 00306/022 *WIREWRAP PG1 SF G PG1 S0767 'SAVETAPE' FSNAME=79.PG1SOU 5.0T1 819 WIREWRAP.PG1.SF.022 1 LINE 80 6 PAGE UM CASHMAN DEC. 13, 1973 13:35.38 5.0T2 100 0 SUBROUTINE PACKAGE FOR BAY TYPE 'PG1'. OBJECT MODULE IN *WWLIB (306/9). 00306/023 *WIREWRAP PG3 SF G PG3 S0767 'SAVETAPE' FSNAME=79.PG3SOU 5.0T1 820 WIREWRAP.PG3.SF.023 1 LINE 80 7 PAGE UM CASHMAN DEC. 13, 1973 13:36.09 5.0T2 101 0 SUBROUTINE PACKAGE FOR BAY TYPE 'PG3'. OBJECT MODULE IN *WWLIB (306/9). 1 SUN SEP 08/96 15:24:55 Page 137 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00306/024 *WIREWRAP PG5 SF G PG5 S0767 'SAVETAPE' FSNAME=79.PG5SOU 5.0T1 821 WIREWRAP.PG5.SF.024 1 LINE 80 6 PAGE UM CASHMAN DEC. 13, 1973 13:36.26 5.0T2 102 0 SUBROUTINE PACKAGE FOR BAY TYPE 'PG5'. OBJECT MODULE IN *WWLIB (306/9). 00306/025 *WIREWRAP PG13 SF G PG13 S0767 'SAVETAPE' FSNAME=79.PG13SOU 5.0T1 822 WIREWRAP.PG13.SF.025 1 LINE 80 7 PAGE UM CASHMAN DEC. 13, 1973 13:35.53 5.0T2 103 0 SUBROUTINE PACKAGE FOR BAY TYPE 'PG13'. OBJECT MODULE IN *WWLIB (306/9). 00306/026 *WIREWRAP UG1 SA G UG1 S0767 'SAVETAPE' FSNAME=AUGATUG1.S 5.0T1 823 WIREWRAP.UG1.SA.026 1 LINE 80 20 PAGE UM CASHMAN JAN. 16, 1974 13:13.19 5.0T2 104 0 SUBROUTINE PACKAGE FOR BAY TYPE 'UG1'. OBJECT MODULE IN *WWLIB (306/9). 00306/027 *WIREWRAP CHIP SF G S0767 'SAVETAPE' FSNAME=CHIP.S 5.0T1 824 WIREWRAP.CHIP.SF.027 1 LINE 69 3 PAGE UM CASHMAN MAR. 01, 1978 10:29:04 5.0T2 105 0 SUBROUTINE PACKAGE FOR BAY TYPE 'CHIP'. USEFUL FOR "BREADBOARDING" APPLICATIONS; I.E. STICKING WIREWRAP SOCKETS INTO VECTOR BOARD. COMPLETE DOCUMENTATION IS IN THE FORTRAN SOURCE FOR THE FIRST SUBROUTINE. OBJECT MODULE IN *WWLIB (306/9). 00306/028 *WIREWRAP DOUGLAS SF G S0767 'SAVETAPE' FSNAME=DOUGLAS.S 5.0T1 825 WIREWRAP.DOUGLAS.SF.028 1 LINE 69 4 PAGE UM CASHMAN FEB. 20, 1976 14:58:54 5.0T2 106 0 Subroutine package for bay type 'DOUGLAS' -- the DEC-bay-compatible '10-DE-77' socket board. Documentation is in the FORTRAN source for the first subroutine. Object module in *WWLIB (306/9). 00306/029 *WIREWRAP 8SERIES SF G S0767 'SAVETAPE' FSNAME=8SERIES.S 5.0T1 826 WIREWRAP.8SERIES.SF.029 1 LINE 73 3 PAGE UM CASHMAN DEC. 13, 1973 12:57.00 5.0T2 107 0 Subroutine package for bay type '8series' -- for DEC's PDP-8 classic mini-computer. Object module in *WWLIB (306/9). 00306/030A *WIREWRAP *WWICMAC D *WWICMAC 5.1T1 248 WIREWRAP.?WWICMAC.D.030 1 LINE 65 4 PAGE UM CASHMAN JULY 23, 1983 10:30:03 *WWICMAC 0 This file contains "Wirewrap macros" for most of the IC's used for logic design at the UM Computing Center. This file may be read by *WIREWRAP when the user specifies "PAR=TYPE=IC" for the mounting technique. 0 Referenced by comments of: 861/6, 861/7 1 SUN SEP 08/96 15:24:55 Page 138 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00306/031 *WIREWRAP *WWLABMAC D *WWLABMAC 5.0T1 828 WIREWRAP.*WWLABMAC.D.031 1 LINE 55 3 PAGE UM CASHMAN JULY 03, 1981 13:19:04 5.0T2 109 *WWLABMAC 0 THIS FILE CONTAINS A "WIREWRAP MACRO" DICTIONARY FOR IC'S USED IN THE LOGIC LAB "SUITCASE" USED IN ECE DEPARTMENT CLASSES AT UM. THIS FILE MAY BE READ BY *WIREWRAP WHEN THE USER SPECIFIES "PAR=TYPE=LAB" FOR THE MOUNTING TECHNIQUE. 00306/032 *WIREWRAP TTLMAC D G S0767 'SAVETAPE' FSNAME=TTLMAC 5.0T1 829 WIREWRAP.TTLMAC.D.032 1 LINE 91 4 PAGE UM CASHMAN JUNE 18, 1976 13:38:55 5.0T2 110 0 ANOTHER "WIREWRAP MACRO" DICTIONARY. 00306/033 *WIREWRAP MEMO 267 WT S1558 5.0T1 VLO FSNAME=WIREWRAP.MEMO_267.WT.033(1) 830 5.0T1 830 WIREWRAP.MEMO_267.WT.033 1 LINE 81 49 PAGE UM CASHMAN FEB. 03, 1977 16:58:19 5.0T2 111 0 THIS IS COMPUTING CENTER MEMO 267 -- "*WIREWRAP USER'S GUIDE" 0 Referenced by comments of: 306/9 00307/001 *OBJCONV SA # (OBSOLETE) D3T2 220 OBJCONV..SA.1 1 SEQ 80 1 PAGE UM JULY 31, 1973 22:54.21 00308/001 *FMT MAIN SA O S1558 5.0T1 VLO FSNAME=FMT.MAIN.SA.001(1) 831 5.0T1 831 FMT.MAIN.SA.001 1 LINE 75 91 PAGE UBC NIGHTINGA PICKELMAN AUG. 25, 1980 19:14:04 5.0T2 112 0 FORMAT TEXT PROCESSING LANGUAGE, KNOWN AS *FMT THROUGHOUT MTS-LAND EXCEPT AT UM WHERE IT IS CALLED *FORMAT. THIS IS THE MAIN PROGRAM AND "MAIN LINE" SUBROUTINES. ALL ROUTINES USING THE FMT#DS COPY SECTION IN (308/4) ARE INCLUDED HERE, NAMELY FMT, FMTCC, FMTOUT, AND CONCARD. THIS VERSION HAS MULTIPLE COLUMN SUPPORT AND SUPERFMT. ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC. 0 Referenced by comments of: 308/5, 560/1, 769/25, 798/98, 798/99, 802/31, 810/2, 861/8, 1036/4, 1079/23, 1079/24, 1089/4 00308/002 *FMT SUBROUTINES SA O S1558 5.0T1 VLO FSNAME=FMT.SUBROUTINES.SA.002(1) 832 5.0T1 832 FMT.SUBROUTINES.SA.002 1 LINE 75 58 PAGE UBC NIGHTINGA PICKELMAN AUG. 12, 1980 17:28:24 5.0T2 113 0 SUBROUTINES WHICH DO NOT COPY FMT#DS. THE ROUTINE FMTOPTS SHOULD BE REASSEMBLED TO CHANGE THE NAME OF THE FUNCTION LIBRARY ETC:FMTLIB (308/16), IF NECESSARY. ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC. 0 Referenced by comments of: 308/5 00308/003 *FMT MORE SUBRS SA O S1558 5.0T1 VLO FSNAME=FMT.MORE_SUBRS.SA.003(1) 833 5.0T1 833 FMT.MORE_SUBRS.SA.003 1 LINE 77 29 PAGE UBC NIGHTINGA PICKELMAN AUG. 12, 1980 17:28:37 5.0T2 114 0 ADDITIONAL SUBROUTINES WHICH ARE ALSO USED BY THE FUNCTIONS (308/6) ET SEQ. 1 SUN SEP 08/96 15:24:55 Page 139 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC. 0 Referenced by comments of: 308/5 00308/004 *FMT UBCMACLIB SM G S1558 5.0T1 VLO FSNAME=FMT.UBCMACLIB.SM.004(1) 834 5.0T1 834 FMT.UBCMACLIB.SM.004 1 LINE 73 14 PAGE UBC NIGHTINGA PICKELMAN AUG. 25, 1980 19:13:53 5.0T2 115 0 Referenced by comments of: 308/1, 308/2, 308/3, 308/7, 308/9 00308/005 *FMT OBJECT OE O *FORMAT 5.0T1 835 FMT.OBJECT.OE.005 1 SEQ 32167 13 PAGE UBC NIGHTINGA PICKELMAN JULY 03, 1981 13:22:26 5.0T2 116 *FORMAT 0 OBJECT FROM (308/1), (308/2), AND (308/3). 00308/006 *FMT HYPHEN S3 O S1558 5.0T1 VLO FSNAME=FMT.HYPHEN.S3.006(1) 836 5.0T1 836 FMT.HYPHEN.S3.006 1 LINE 80 3 PAGE UBC NIGHTINGA PICKELMAN JUNE 30, 1980 20:14:28 5.0T2 117 0 THIS COMPONENT AND THOSE FOLLOWING ARE THE SOURCE FOR THE FMT DYNAMICALLY LOADED FUNCTION LIBRARY (ETC:FMTLIB). THIS IS THE HYPHEN FUNCTION AND ITS SUBROUTINES. IT HAS $CONTINUE WITHS WHICH ARE SELF-REFERENCING. AFTER COMPILATION, REFERENCES IN THE OBJECT TO INFREE1 SHOULD BE CHANGED TO INFREE#. THIS FUNCTION REFERENCES THE DATA FILE ETC:FMTDICT (308/17). 0 Referenced by comments of: 308/3, 308/7, 308/16 00308/007 *FMT GSPFRSP SA O S1558 5.0T1 VLO FSNAME=FMT.GSPFRSP.SA.007(1) 837 5.0T1 837 FMT.GSPFRSP.SA.007 1 LINE 71 3 PAGE UBC NIGHTINGA PICKELMAN JUNE 30, 1980 20:14:34 5.0T2 118 0 SUBROUTINE CALLED BY HYPHEN (308/6). ASSEMBLE USING UBCMACLIB (308/4) AND *SYSMAC. 0 Referenced by comments of: 308/17 00308/008 *FMT INDEX SF O S1558 5.0T1 VLO FSNAME=FMT.INDEX.SF.008(1) 838 5.0T1 838 FMT.INDEX.SF.008 1 LINE 80 10 PAGE UBC NIGHTINGA PICKELMAN AUG. 01, 1979 20:25:37 5.0T2 119 0 INDEX FUNCTION AND SEVERAL SUBROUTINES. 00308/009 *FMT ASMFNS SA O S1558 5.0T1 VLO FSNAME=FMT.ASMFNS.SA.009(1) 839 5.0T1 839 FMT.ASMFNS.SA.009 1 LINE 68 5 PAGE UBC NIGHTINGA PICKELMAN AUG. 14, 1978 11:37:32 5.0T2 120 0 FUNCTIONS UCTRAN, IFDEF, IFNUL, BLOCK, CAPIT, DOUBLE, GETPAR, FMTCHAR, MOST, AND ALL. ASSEMBLE WITH PAR=B USING UBCMACLIB (308/4) AND *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 140 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00308/010 *FMT CONTENTS SF O S1558 5.0T1 VLO FSNAME=FMT.CONTENTS.SF.010(1) 840 5.0T1 840 FMT.CONTENTS.SF.010 1 LINE 73 4 PAGE UBC NIGHTINGA PICKELMAN AUG. 14, 1978 11:37:48 5.0T2 121 0 AFTER COMPILATION, CHANGE THE NAME "CONTNS " TO "CONTENTS" IN THE OBJECT. 00308/011 *FMT COUNT SF G S1558 5.0T1 VLO FSNAME=FMT.COUNT.SF.011(1) 841 5.0T1 841 FMT.COUNT.SF.011 1 LINE 72 3 PAGE UBC NIGHTINGA PICKELMAN AUG. 14, 1978 11:38:03 5.0T2 122 00308/012 *FMT DATE S3 O S1558 5.0T1 VLO FSNAME=FMT.DATE.S3.012(1) 842 5.0T1 842 FMT.DATE.S3.012 1 LINE 71 4 PAGE UBC NIGHTINGA PICKELMAN AUG. 12, 1980 17:19:33 5.0T2 123 00308/013 *FMT FTNFNS SF O S1558 5.0T1 VLO FSNAME=FMT.FTNFNS.SF.013(1) 843 5.0T1 843 FMT.FTNFNS.SF.013 1 LINE 72 6 PAGE UBC NIGHTINGA PICKELMAN MAR. 03, 1981 11:00:19 5.0T2 124 0 Functions STACK, NULL, CENTER, TEST, INPUT, MYSORT, PAD, FOR, SPREAD, EXIST, JUST, and FMTCNTRL. After compilation, change the name "FMTCTL " to "FMTCNTRL" in the object. 00308/014 *FMT SORT SF O S1558 5.0T1 VLO FSNAME=FMT.SORT.SF.014(1) 844 5.0T1 844 FMT.SORT.SF.014 1 LINE 64 1 PAGE UBC NIGHTINGA PICKELMAN AUG. 01, 1979 20:25:24 5.0T2 125 0 AFTER COMPILATION, CHANGE THE NAME "FMTSRT " TO FMTSORT" IN THE OBJECT. 00308/015 *FMT PAGE SF O S1558 5.0T1 VLO FSNAME=FMT.PAGE.SF.015(1) 845 5.0T1 845 FMT.PAGE.SF.015 1 LINE 72 3 PAGE UBC NIGHTINGA PICKELMAN AUG. 14, 1978 11:40:07 5.0T2 126 0 PAGE FUNCTION AND FMTPAG SUBROUTINE. 0 Referenced by comments of: 308/16 00308/016 *FMT FMTLIB OL O ETC:FMTLIB 5.0T1 846 FMT.FMTLIB.OL.016 1 LINE 6322 26 PAGE UBC NIGHTINGA PICKELMAN JULY 03, 1981 13:23:48 5.0T2 127 ETC.:FMTLIB 0 FUNCTION LIBRARY CONSISTING OF OBJECT FROM (308/6) THROUGH (308/15). 0 Referenced by comments of: 308/2 00308/017 *FMT DICT D ETC:FMTDICT 5.0T1 847 FMT.DICT.D.017 1 LINE 80 3 PAGE UBC NIGHTINGA PICKELMAN JULY 03, 1981 13:23:53 5.0T2 128 ETC.:FMTDICT 0 HYPHENATION DICTIONARY DATA FILE USED BY (308/7). 0 Referenced by comments of: 308/6 1 SUN SEP 08/96 15:24:55 Page 141 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00308/018 *FMT JONMACLIB SM O COPY:JONMACLIBFMT 5.0T1 848 FMT.JONMACLIB.SM.018 1 LINE 110 8 PAGE UBC NIGHTINGA PICKELMAN JULY 03, 1981 13:23:54 5.0T2 129 COPY:JONMACLIBFMT 0 UBC'S JON:MACLIB -- FMT MACROS USED IN UBC DOCUMENTATION. DOCUMENTATION FOR JON:MACLIB IS IN (308/21). THERE MAY BE SOME PROBLEM USING UM'S *FORMAT WITH THESE MACROS, BUT NOT NECESSARILY. AT UM, THIS FILE IS PERMITTED ONLY TO P=W?. 0 Referenced by comments of: 308/19, 774/7, 1036/4, 1038/11, 1042/70, 1042/72, 1058/24, 1077/4, 1080/1, 1089/4, 3018/174 00308/019 *FMT JONMACLIB SF O S1558 5.0T1 VLO FSNAME=FMT.JONMACLIB.SF.019(1) 849 5.0T1 849 FMT.JONMACLIB.SF.019 1 LINE 68 3 PAGE UBC NIGHTINGA PICKELMAN AUG. 12, 1980 17:23:16 5.0T2 130 0 FUNCTIONS DYNAMICALLY LOADED BY (308/18). 0 Referenced by comments of: 308/20 00308/020 *FMT JONMACLIB OL O COPY:JONFMT.FNLIB 5.0T1 850 FMT.JONMACLIB.OL.020 1 LINE 1120 4 PAGE UBC NIGHTINGA PICKELMAN JULY 03, 1981 13:24:11 5.0T2 131 COPY:JONFMT.FNLIB 0 OBJECT OF (308/19). 00308/021 *FMT JONMACLIB WF COPY:JONMACLIB.F 5.0T1 851 FMT.JONMACLIB.WF.021 1 LINE 149 8 PAGE UBC NIGHTINGA PICKELMAN JULY 03, 1981 13:24:11 5.0T2 132 0 This is the UBC's writeup describing JONMACLIB. Lines -99,-1 of the file contain CDUPDATE (1036) commands to make source compatible with UM's *FORMAT. 0 Referenced by comments of: 308/18 00308/022 *FMT FMTAPA WF S1153 UNSP VLO FSNAME=FMTAPA.FMT 5.0T1 852 FMT.FMTAPA.WF.022 1 LINE 81 6 PAGE UM NIGHTINGA UNSP SEP. 15, 1980 16:42:59 5.0T2 133 0 WRITEUP DESCRIBING A SET OF *FORMAT MACROS (308/24) WHICH PRODUCES HEADINGS IN AMERICAN PSYCHIATRIC ASSOCIATION FORMAT AND A FEW OTHER THINGS. 00308/023 *FMT FMTAPA WF UNSP:FMTAPA 5.0T1 853 FMT.FMTAPA.WF.023 1 LINE 51 1 PAGE UM NIGHTINGA UNSP JULY 03, 1981 13:24:37 5.0T2 134 0 THIS FILE CONTAINS *FMT CONTROL COMMANDS. IT IS TO BE "|INCLUD"ED BY *FMT FOR FILES WHICH USE FMTAPA (308/24). 1 SUN SEP 08/96 15:24:55 Page 142 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00308/024 *FMT FMTAPA WF UNSP:FMTMACLIB 5.0T1 854 FMT.FMTAPA.WF.024 1 LINE 94 3 PAGE UM NIGHTINGA UNSP JULY 03, 1981 13:24:38 5.0T2 135 0 THESE ARE THE FORMAT APA MACROS. 0 Referenced by comments of: 308/22, 308/23, 308/25 00308/025 *FMT FMTAPA OE UNSP:FMTLIB 5.0T1 855 FMT.FMTAPA.OE.025 1 LINE 520 1 PAGE UM NIGHTINGA UNSP JULY 03, 1981 13:24:39 5.0T2 136 0 OBJECT (WE DO NOT HAVE THE SOURCE) OF FUNCTIONS USED BY FMTAPA (308/24). 00309/001 *STASS360 SA # (OBSOLETE) D3T2 225 STASS360.MONITOR.SA.1 1 SEQ 80 11 PAGE UM JULY 31, 1973 22:55.58 0 Obsoleted by *ASSIST (3023). 00311/001 *VARRLIST S # (OBSOLETE) D2T1 333 UM 00313/001 1130 RJE SUPPORT PROGRAM S # (OBSOLETE) D2T1 096 UM 00314/001 *LABELSNIFF SA G W062:LBLSNIFF.S 5.0T1 856 LABELSNIFF..SA.001 1 LINE 73 37 PAGE UM TIFFANY JULY 03, 1981 13:24:40 5.0T2 137 0 Program to print information about what's on a tape. Copies *SENSEDSECT (3025) and *GDINFODSECT (594). Requires the (314/3) macro library and *SYSMAC. Assemble with PEXIT=*PEXIT (775). 00314/002 *LABELSNIFF OE G *LABELSNIFF 5.0T1 857 LABELSNIFF..OE.002 1 LINE 15788 14 PAGE UM TIFFANY JULY 03, 1981 13:24:44 5.0T2 138 *LABELSNIFF 00314/003 *LABELSNIFF MACLIB SM G W062:LBLSNIFF.MAC 5.0T1 858 LABELSNIFF.MACLIB.SM.003 1 LINE 72 4 PAGE UM TIFFANY JULY 03, 1981 13:24:45 5.0T2 139 0 Referenced by comments of: 314/1 00315/001 *ANS SA # (OBSOLETE) D2T1 155 UM 00316/001 GENLIB SA # (OBSOLETE) D3T2 236 GENLIB..SA. 1 SEQ 80 6 PAGE UNE JULY 31, 1973 22:59.46 0 Obsoleted by *OBJUTIL (721). 1 SUN SEP 08/96 15:24:55 Page 143 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00318/001 *XPL SUBMONITOR SA G S1558 5.0T1 VLO FSNAME=XPL.SUBMONITOR.SA.001(1) 859 5.0T1 859 XPL.SUBMONITOR.SA.001 1 SEQ 80 24 PAGE UM SHERRY JULY 27, 1977 02:39:23 5.0T2 140 0 XPL COMPILER AND EXECUTION CONTROL (SEE 1968 FJCC PROC, PP 617-636). ONE NEVER $RUNS AN XPL OBJECT DECK SINCE THE OBJECT CODE IS STORED IN A FORMAT UNIQUE TO XPL. RATHER, ONE RUNS THE XPL SUBMONITOR, WHICH IN TURN LOADS THE XPL PROGRAM AND PROVIDES A RUN-TIME INTERFACE TO MTS. SINCE THE COMPILER ITSELF IS ALSO AN XPL PROGRAM, IT MUST BE RUN IN THE SAME MANNER, I.E. IT MUST BE RUN UNDER CONTROL OF THE SUBMONITOR. THE 2 FILES *XPL AND *XPLGO CONTAIN MTS OBJECT FOR A SET OF DEFAULT FILE NAMES FOR THE COMPILER AND COMPILED CODE EXECUTION RESPECTIVELY. EACH ENDS WITH "$CONTINUE WITH *XMON" SO THAT BY $RUNNING *XPL OR *XPLGO, THE SUBMONITOR (*XMON), WITH APPROPRIATE DEFAULTS, IS INVOKED. MODIFIED UBC SOURCE FOR THE XPL SUBMONITOR (*XMON). 00318/002 *XPL SUBMONITOR OC G S1558 5.0T1 VLO FSNAME=XPL.SUBMONITOR.OC.002(1) 860 5.0T1 860 XPL.SUBMONITOR.OC.002 1 SEQ 80 2 PAGE UM SHERRY JULY 27, 1977 02:39:26 5.0T2 141 0 THIS FILE PLUS THE OBJECT FOR TRACE (318/4) CONSTITUTE *XMON. THE FOLLOWING PATCH SHOULD BE INSERTED INTO THIS OBJECT FILE: REP 0008C6 01,0700,0700 TRACE DIES IF LEFT IN 0 Referenced by comments of: 318/4 00318/003 *XPL TRACE SA G S1558 5.0T1 VLO FSNAME=XPL.TRACE.SA.003(1) 861 5.0T1 861 XPL.TRACE.SA.003 1 SEQ 80 33 PAGE UM SHERRY JULY 27, 1977 02:39:35 5.0T2 142 0 UNMODIFIED UBC SOURCE FOR TRACE SUBROUTINE USED BY THE SUBMONITOR (*XMON). 00318/004 *XPL TRACE OC G S1558 5.0T1 VLO FSNAME=XPL.TRACE.OC.004(1) 862 5.0T1 862 XPL.TRACE.OC.004 1 SEQ 80 2 PAGE UM SHERRY JULY 27, 1977 02:39:38 5.0T2 143 0 THE SUBMONITOR OBJECT (318/2) PLUS THIS FILE CONSTITUTE *XMON. THE FOLLOWING 2 LOADER CARDS SHOULD ALSO BE ADDED AT THE END OF *XMON: LCS LCSYMBOL LDT XPLSM 0 Referenced by comments of: 318/2 00318/005 *XPL *XMON OE G *XMON 5.0T1 863 XPL.*XMON.OE.005 1 SEQ 4384 2 PAGE UM SHERRY JULY 03, 1981 13:24:54 5.0T2 144 *XMON 00318/006 *XPL DEFAULTS SA G S1558 5.0T1 VLO FSNAME=XPL.DEFAULTS.SA.006(1) 864 5.0T1 864 XPL.DEFAULTS.SA.006 1 SEQ 80 1 PAGE UM SHERRY JULY 27, 1977 02:39:44 5.0T2 145 0 SOURCE FOR THE 2 SETS OF SUBMONITOR DEFAULTS, THE FIRST FOR THE EXECUTION OF THE COMPILER (*XPL) AND THE SECOND FOR THE EXECUTION OF COMPILED CODE (*XPLGO). 1 SUN SEP 08/96 15:24:55 Page 144 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00318/007 *XPL *XPL OC G *XPL 5.0T1 865 XPL.*XPL.OC.007 1 LINE 80 1 PAGE UM SHERRY JULY 03, 1981 13:24:55 5.0T2 146 *XPL 0 OBJECT FOR THE FIRST DEFAULTS PROGRAM. CONTAINS A "$CONTINUE WITH *XMON" LINE. 00318/008 *XPL *XPLGO OC G *XPLGO 5.0T1 866 XPL.*XPLGO.OC.008 1 LINE 80 1 PAGE UM SHERRY JULY 03, 1981 13:24:56 5.0T2 147 *XPLGO 0 OBJECT FOR THE SECOND DEFAULTS PROGRAM. CONTAINS A "$CONTINUE WITH *XMON" LINE. 00318/009 *XPL COMPILER SX G *XCOM 5.0T1 867 XPL.COMPILER.SX.009 1 LINE 80 54 PAGE UM SHERRY JULY 03, 1981 13:24:56 5.0T2 148 *XCOM 0 XPL SOURCE FOR THE XPL COMPILER (*XCOM). THIS VERSION IS MODIFIED FROM AN EARLY STANFORD RELEASE; IT IS NOT THE SHARE RELEASE. IT WAS USED QUITE HEAVILY AT UM AND IS RELATIVELY BUG-FREE. MOST XPL USERS NOW USE *EXPL (495) BECAUSE INDEPENDENTLY COMPILABLE PROCEDURES REDUCE THE COST OF COMPILER DEVELOPMENT. THE COMPILER SOURCE IS KEPT IN A PUBLIC FILE (*XCOM) SO THAT PARTS OF IT ARE AVAILABLE FOR EXTRACTION BY STUDENTS IN COMPILER WRITING COURSES. 00318/010 *XPL COMPILER O G *XPLCOMPILER 5.0T1 868 XPL.COMPILER.O.010 1 SEQ 240 29 PAGE UM SHERRY JULY 03, 1981 13:25:00 5.0T2 149 *XPLCOMPILER 0 XPL FORMAT OBJECT FILE FOR THE XPL COMPILER (*XPLCOMPILER). 00318/011 *XPL *XPLIBRARY SX G *XPLIBRARY 5.0T1 869 XPL.*XPLIBRARY.SX.011 1 SEQ 80 1 PAGE UM SHERRY JULY 03, 1981 13:25:02 5.0T2 150 *XPLIBRARY 0 SOURCE LIBRARY USED BY ALL XPL COMPILATIONS. MUST BE IN *XPLIBRARY TO RUN XPL. 00318/012 *XPL *SKELETON SX G *SKELETON 5.0T1 870 XPL.*SKELETON.SX.012 1 LINE 80 10 PAGE UM SHERRY JULY 03, 1981 13:25:03 5.0T2 151 *SKELETON 0 THIS IS THE MINIMAL FRAMEWORK FOR A TABLE-DRIVEN COMPILER. USER IS EXPECTED TO REPLACE THE SYNTAX TABLES WITH APPROPRIATE TABLES PRODUCED BY *ANALYZER AND COMPLETE THE COMPILER BY WRITING THE CODE SYNTHESIZER SECTION. 0 Referenced by comments of: 495/8 00318/013 *XPL ANALYZER SX G S1558 5.0T1 VLO FSNAME=XPL.ANALYZER.SX.013(1) 871 5.0T1 871 XPL.ANALYZER.SX.013 1 SEQ 80 33 PAGE UM SHERRY JULY 27, 1977 02:40:20 5.0T2 152 0 XPL PROGRAM TO ANALYZE A BNF DESCRIPTION OF A LANGUAGE AND PRODUCE TABLES FOR COMPILING IT. 0 Referenced by comments of: 495/7 1 SUN SEP 08/96 15:24:55 Page 145 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00318/014 *XPL *ANALYZER O G *ANALYZER 5.0T1 872 XPL.*ANALYZER.O.014 1 SEQ 240 24 PAGE UM SHERRY JULY 03, 1981 13:25:07 5.0T2 153 *ANALYZER 0 XPL FORMAT OBJECT FILE. 00318/015 *XPL XPLBNF D G S1558 5.0T1 VLO FSNAME=XPL.XPLBNF.D.015(1) 873 5.0T1 873 XPL.XPLBNF.D.015 1 SEQ 80 3 PAGE UM SHERRY JULY 27, 1977 02:40:28 5.0T2 154 0 BNF DESCRIPTION OF XPL SUITABLE FOR INPUT TO *ANALYZER. 00318/016 *XPL MEMO 230 WF S1558 5.0T1 VLO FSNAME=XPL.MEMO_230.WF.016(1) 874 5.0T1 874 XPL.MEMO_230.WF.016 1 LINE 127 4 PAGE UM SHERRY JAN. 25, 1977 18:03:50 5.0T2 155 0 THIS IS COMPUTING CENTER MEMO 230 -- "XPL USER'S GUIDE" 00319/001 *FLIKPLT OC # (OBSOLETE) D3T2 251 FLIKPLT..OC. 1 LINE 80 15 PAGE UM JULY 31, 1973 23:03.29 00321/001 *PIB OC # (OBSOLETE) D3T2 252 PIB..OC. 1 LINE 80 122 PAGE UM JULY 31, 1973 23:03.31 00322/001 *2260RTN SA G MTA:2260RTN 5.0T4 297 2260RTN..SA.001 1 LINE 72 32 PAGE UM MTA AUG. 09, 1981 22:49:31 5.0T10 201 0 MTS DEVICE SUPPORT ROUTINES FOR IBM 2260 DISPLAY. SUPPORT FOR THE @MAXLEN MODIFIER HAS BEEN ADDED, BUT NOT TESTED DUE TO LACK OF HARDWARE AT UM. ASSEMBLE USING COPY:MTS.MACROS (344/3). 00322/002 *2260RTN OC G *2260RTN 5.0T4 298 2260RTN..OC.002 1 LINE 80 4 PAGE UM MTA AUG. 09, 1981 22:49:34 5.0T10 202 *2260RTN 00324/001 EDITOR - OLD # (OBSOLETE) D3T2 255 UM FEB. 02, 1973 21:38.36 00326/001A STAT MONTHLY SUMMARY MAIN PGM SP G S0027 DISTRB FSNAME=SYSSTAT 5.1T1 249 STAT_MONTHLY_SUMMARY.MAIN.SP.001 1 LINE 94 18 PAGE UM ENGLE MAY 26, 1983 10:18:11 0 Reads statistics (*STATISTICS) tapes or files and prints many pages of interesting (hopefully) information about a months running of the system. It also reads SPU utilization and HASP batch queue statistics from SSRTN (413/1), normally in SYS:SSRTNSUMM, and prints that information. The following logical i/o units are used: 0 input of SSRTN (413/1) summary data. SPRINT output. The following PLIi file names are used: 1 SUN SEP 08/96 15:24:55 Page 146 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ERROR log of skipped input records, list of weekday minutes during which the most users were signed on, and list of weekend minutes during which the most users were signed on. The number of minutes for each category is approximately 1% of the total minutes for the combined categories. SAVE save or restore intermediate information (see below). SCARDS uses get list for 6 or 7 items, followed by get data for 2 variables: 1) 'mm' month to analyze, or '00' look at all input (requires 'full', Â'CPU', and Â'mixed') 2) 'yyyy' year 3) 'part' use data from whatever part of month is present, or 'full' expect data from entire month, or '9to5' filters all data except 9am to 5pm, or '5toM' filters all data except 5pm to midnight, or 'cour' filters all data except for project numbers beginning with "1", "2", or "3", or 'ugrd' filters all data except for project numbers 1AWA, 1BF4, 1AAA, 1AGA, 1APA, 1AVA, 1CXA, or 1HGA. 4) 'rest' restore data (checkpoint) from save, or 'save' save (checkpoint) data on save, or 'user' save num of users versus time data only on save, or 'CPU.' skip everything except jobs program statistics, or 'none' none of above 5) 'CPU' process jobs statistics data, see (413/10), or 'yes' same as 'cpu', or 'not' omit processing of jobs statistics 6) 'whole' no rate change during period of computation, or 'mixed' rate change occurred 7) 'dd' first day (of month) for new rates. Give only if 'mixed' given. 8) testcount=n number of input records to echo on SPRINT (debug) 9) debug='1'b produces general debug output. Prints for only n records if testcount given. This is followed by one or more lines each containing a mount request or file name for statistics records. The list of input files is terminated by "done" or an end-of-file. At UM, the normal input used is: 'mm' 'yyyy' 'part' 'none' 'CPU' 'whole' ; statm 9tp *t* vol=statm 'mmm 19yy monthly statistics' stat 9tp *t* vol=stat 'mmm+1 1, 19yy, 1 a.m. daily statistics' bill 9tp *t* vol=stat 'mmm 19yy daily mts statistics file charges' done 1 SUN SEP 08/96 15:24:55 Page 147 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This program also reads two files automatically, *RATEFILE (651/10) and BATCHID (326/7). 0 Referenced by comments of: 326/2, 326/5, 326/6 00326/002A STAT MONTHLY SUMMARY UPDATE UC G S0027 DISTRB FSNAME=SYSSTATUPD 5.1T1 250 STAT_MONTHLY_SUMMARY.UPDA.UC.002 1 LINE 72 12 PAGE UM ENGLE AUG. 26, 1982 13:46:02 0 Updates source for MAIN PGM (326/1), PPAGES SUBR (326/3), and SETRATE (326/5) from previous regular distribution to current distribution. Assumes that source modules are concatenated in the order given. 00326/003A STAT MONTHLY SUMMARY PPAGES SUBR SP G S0027 DISTRB FSNAME=PPAGES 5.1T1 251 STAT_MONTHLY_SUMMARY.PPAG.SP.003 1 LINE 99 9 PAGE UM ENGLE AUG. 26, 1982 13:46:55 0 Subroutine called by main program. 0 Referenced by comments of: 326/2, 326/6 00326/004 STAT MONTHLY SUMMARY CPUSE SUBR SG G S1558 5.0T1 VLO FSNAME=STAT_MONTHLY_SUMMARY.CPUS.SG.004(1) 878 5.0T1 878 STAT_MONTHLY_SUMMARY.CPUS.SG.004 1 LINE 179 4 PAGE UM ENGLE DEC. 13, 1977 16:12:06 5.0T2 159 0 Subroutine which reads SSRTN summary data, see (413/1), and prints the results. Called only if 'CPU' is specified for the fifth parameter or 'CPU.' is specified for the fourth parameter. 0 Referenced by comments of: 326/6 00326/005A STAT MONTHLY SUMMARY SETRATE SP G S0027 DISTRB FSNAME=SETRATE 5.1T1 252 STAT_MONTHLY_SUMMARY.SETR.SP.005 1 LINE 72 5 PAGE UM ENGLE AUG. 26, 1982 13:47:58 0 Subroutines which fill in a rate structure by calling GETRATES and decompose a rate number into subscripts. Assumption of how rate number is computed is builtin, see line 68 ff. (326/1) calls SETRATE to dynamically construct the current and old rates. External reference to GETRATE on ESD card in object deck must be changed or aliased to GETRATES. Run with PROT=OFF. 0 Referenced by comments of: 326/2, 326/6 00326/006A STAT MONTHLY SUMMARY OBJECT OC G S0027 DISTRB FSNAME=SYST 5.1T1 253 STAT_MONTHLY_SUMMARY.OBJE.OC.006 1 LINE 80 219 PAGE UM ENGLE JULY 21, 1983 11:46:05 0 Object modules for (326/1), (326/3), (326/4), and (326/5). Contains an ALI GETRATE GETRATES line and a $CONTINUE WITH *PL1LIB (233/43) + ACC:ACCLIB (104/47) card. Run with PROT=OFF. To run, issue something like: $RUN SYST 0=SYS:SSRTNSUMM SPRINT=OUT PAR=ERROR=-ERROR 00326/007A STAT MONTHLY SUMMARY BATCHID D S0027 DISTRB FSNAME=BATCHID 5.1T1 254 STAT_MONTHLY_SUMMARY.BATC.D.007 1 LINE 4 1 PAGE UM ENGLE MAY 26, 1983 10:19:29 0 100-line data file referenced to define the mapping between the first two digits 1 SUN SEP 08/96 15:24:55 Page 148 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 of the S-8 number and the remote batch station ID's. 0 Referenced by comments of: 326/1 00328/001 ALLLINES SA # (OBSOLETE) D2T1 264 UM 00330/001 ABKGET SP O S1558 5.0T1 VLO FSNAME=ABKGET..SP.001(1) 882 5.0T1 882 ABKGET..SP.001 1 LINE 80 5 PAGE UM DWB APR. 05, 1980 14:27:12 5.0T2 163 0 Program to sort and tabulate terminal answerback statistics from *STATISTICS data. Will read input from either an individual or monthly statistics tape. First line of input must be month and year, second and succeeding lines must be file or tape names, or mount requests, terminated by an END-OF-FILE or "DONE" -- for example '01' '1977' (line must have trailing blank) STATM 9TP *T* VOL=STATM 'JAN 1977' STAT 9TP *T* VOL=STAT '1 FEB 1977 01:00' DONE 00330/002 ABKGET OC O S1558 5.0T1 VLO FSNAME=ABKGET..OC.002(1) 883 5.0T1 883 ABKGET..OC.002 1 LINE 80 9 PAGE UM DWB APR. 05, 1980 14:27:14 5.0T2 164 00334/001 *SNOBOL4B MAIN SA G S1558 5.0T1 VLO FSNAME=SNOBOL4B.MAIN.SA.001(1) 884 5.0T1 884 SNOBOL4B.MAIN.SA.001 1 SEQ 80 107 PAGE UM SWARTZ JULY 31, 1973 23:13.39 5.0T2 165 0 Bell Labs source for Version 3.0 SNOBOL 4 with blocks (blocks version 1.0). This file is assumed to be file 1 on the input tape for the update. Copies MLINK (182/11), PARMS (182/12), and MDATA (182/13). 0 Referenced by comments of: 334/8 00334/002 *SNOBOL4B SUBR SA G S1558 5.0T1 VLO FSNAME=SNOBOL4B.SUBR.SA.002(1) 885 5.0T1 885 SNOBOL4B.SUBR.SA.002 1 SEQ 80 49 PAGE UM SWARTZ JULY 31, 1973 23:14.01 5.0T2 166 0 Bell Labs source for subroutines. This file is assumed to be file 6 on the input tape for the update. 00334/003 *SNOBOL4B CLEANIO SA G S1558 5.0T1 VLO FSNAME=SNOBOL4B.CLEANIO.SA.003(1) 886 5.0T1 886 SNOBOL4B.CLEANIO.SA.003 1 SEQ 80 8 PAGE UM SWARTZ JULY 31, 1973 23:14.24 5.0T2 167 0 Bell Labs source for CLEANIO. This file is assumed to be file 5 on the input tape for the update. 1 SUN SEP 08/96 15:24:55 Page 149 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00334/004 *SNOBOL4B BASIC MACROS SA G S1558 5.0T1 VLO FSNAME=SNOBOL4B.BASIC_MACROS.SA.004(1) 887 5.0T1 887 SNOBOL4B.BASIC_MACROS.SA.004 1 SEQ 80 41 PAGE UM SWARTZ JULY 31, 1973 23:14.15 5.0T2 168 0 Bell Labs source for basic macros. This file is assumed to be file 4 on the input tape for the update. 00334/005 *SNOBOL4B NEW MACROS SA G S1558 5.0T1 VLO FSNAME=SNOBOL4B.NEW_MACROS.SA.005(1) 888 5.0T1 888 SNOBOL4B.NEW_MACROS.SA.005 1 SEQ 80 5 PAGE UM SWARTZ JULY 31, 1973 23:14.21 5.0T2 169 0 Bell Labs source for new macros. This file is assumed to be file 3 on the input tape for the update. 00334/006 *SNOBOL4B GENERATE C S1558 5.0T1 VLO FSNAME=SNOBOL4B.GENERATE.C.006(1) 889 5.0T1 889 SNOBOL4B.GENERATE.C.006 1 LINE 128 1 PAGE UM SWARTZ MAY 08, 1975 14:44:26 5.0T2 170 0 MTS commands to update, assemble, and test the MTS version of SNOBOL4B. 00334/007 *SNOBOL4B LINKEDIT C S1558 5.0T1 VLO FSNAME=SNOBOL4B.LINKEDIT.C.007(1) 890 5.0T1 890 SNOBOL4B.LINKEDIT.C.007 1 LINE 56 1 PAGE UM SWARTZ MAY 08, 1975 14:44:28 5.0T2 171 0 MTS commands to LINKEDIT, and test the MTS version of SNOBOL4B. 00334/008 *SNOBOL4B UPDATE UU G S1558 5.0T1 VLO FSNAME=SNOBOL4B.UPDATE.UU.008(1) 891 5.0T1 891 SNOBOL4B.UPDATE.UU.008 1 LINE 80 22 PAGE UM SWARTZ MAY 08, 1975 14:44:18 5.0T2 172 0 *UPDATE deck to modifiy Bell Labs source (334/1) to bring it up to version 3.10 SNOBOL 4 with blocks (blocks version 1.10) and to add the changes necessary to run it in MTS. 00334/009 *SNOBOL4B OBJECT OE G *SNOBOL4B 5.0T1 892 SNOBOL4B.OBJECT.OE.009 1 SEQ 32767 41 PAGE UM SWARTZ JULY 03, 1981 13:35:44 5.0T2 173 *SNOBOL4B 0 Object from assembly of MAIN, SUBR, and CLEANIO plus FTN.O which has been combined and purged by *LINKEDIT. 00334/010 *SNOBOL4B FTN.O OE G S1558 5.0T1 VLO FSNAME=SNOBOL4B.FTN.O.OE.010(1) 893 5.0T1 893 SNOBOL4B.FTN.O.OE.010 1 LINE 255 5 PAGE UM SWARTZ MAY 08, 1975 14:44:42 5.0T2 174 0 FORTRAN I/O routines for use by SNOBOL4B. 00334/011 *SNOBOL4B MACLEAN # (SEE *SNOBOL4) UM SWARTZ 0 Same as MACLEAN under *SNOBOL4 (182/8). 1 SUN SEP 08/96 15:24:55 Page 150 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00334/012 *SNOBOL4B TEST PGMS SS G S1558 5.0T1 VLO FSNAME=SNOBOL4B.TEST_PGMS.SS.012(1) 894 5.0T1 894 SNOBOL4B.TEST_PGMS.SS.012 1 LINE 74 5 PAGE UM SWARTZ MAY 08, 1975 14:44:44 5.0T2 175 0 Programs for testing SNOBOL4B. 00335/001A *DITTO SA G S0791 FMTJNK 'FORMAT' FSNAME=DITTO 5.1T1 255 DITTO..SA.001 1 LINE 71 4 PAGE UM LIFT NOV. 28, 1977 21:13:32 0 Program to produce ditto (or other duplicating process) masters on a 2741 or 1050 from printed output (such as from *FORMAT) which may include overprinting. ******************************************************************************** D5.0C version: Changed to set margins on device (this change is probably installation- dependent. ******************************************************************************** 00335/002A *DITTO OE G *DITTO 5.1T1 256 DITTO..OE.002 1 LINE 2426 2 PAGE UM LIFT JULY 23, 1983 10:33:39 *DITTO 00336/001 *SPL # (NOT DISTRIBUTED) D3T2 277 UM JULY 31, 1973 23:16.06 00337/001 PRINTTRACE SA G MTA:PRINTTRACE(1,999) 5.0T4 299 PRINTTRACE..SA.001 1 LINE 71 4 PAGE UM MTA AUG. 09, 1981 22:49:35 5.0T10 203 MTA.:PRINTTRACE 0 Subroutine to print trace table entries from dump tape or STAT job tape. To get trace table on STAT job tape type "TRCTP" on Operators' console. Assemble using *SYSMAC. 0 Referenced by comments of: 400/1, 400/17, 540/20, 1028/3 00337/002 PRINTTRACE OC G MTA:PRINTTRACE(1000,1999) 5.0T4 300 PRINTTRACE..OC.002 1 LINE 3016 3 PAGE UM MTA AUG. 09, 1981 22:49:37 5.0T10 204 00338/001 RIPPLE PN/QN SA O MTA:RIPPLE(1,999) 5.0T1 897 RIPPLE.PN/QN.SA.001 1 LINE 56 1 PAGE UM MTA JULY 03, 1981 13:36:11 5.0T2 178 MTA.:RIPPLE 0 Program to ripple print on a PN or QN printer. Useful for cleaning a train or checking out a printer. OLTEP (458) does a better job. 0 Referenced by comments of: 338/4 1 SUN SEP 08/96 15:24:55 Page 151 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00338/002 RIPPLE PN/QN OC O MTA:RIPPLE(1000) 5.0T1 898 RIPPLE.PN/QN.OC.002 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 13:36:11 5.0T2 179 00338/003 RIPPLE *RIP C *RIP 5.0T1 899 RIPPLE.*RIP.C.003 1 LINE 36 1 PAGE UM MTA JULY 03, 1981 13:36:12 5.0T2 180 *RIP 0 Command file to run MTA:RIPPLE(1000). Invoked by entering "MTS *RIP , PTRX" on the operator's console, where PTRX is the printer to be rippled. 0 Referenced by comments of: 338/6 00338/004 RIPPLE TN SA O MTA:TNRIP(1,999) 5.0T1 900 RIPPLE.TN.SA.004 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 13:36:13 5.0T2 181 MTA.:TNRIP 0 Same as (338/1) except for TN printers. 00338/005 RIPPLE TN OC O MTA:TNRIP(1000) 5.0T1 901 RIPPLE.TN.OC.005 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 13:36:13 5.0T2 182 00338/006 RIPPLE *TNR C *TNR 5.0T1 902 RIPPLE.*TNR.C.006 1 LINE 18 1 PAGE UM MTA JULY 03, 1981 13:36:14 5.0T2 183 *TNR 0 Same as *RIP (338/3) except that it runs MTA:TNRIP(1000). 00339/001 WRITE80 S # (OBSOLETE) D2T1 165 UM 00340/001 READRESTP SA O MTA:READRESTP(1,999) 5.0T1 903 READRESTP..SA.001 1 LINE 72 9 PAGE UM MTA JULY 03, 1981 13:36:15 5.0T2 184 0 Program which will read a DUMP/RESTORE tape and extract things from an OS, DOC, or VS data set. It produces output that can be used as input to *UNLINKER (562). It will process any OS data set which has no more than 3 extents and no note lists. It prompts for data set names using GUSER and SERCOM, reads from unit 0, and writes on unit 1. "LIST NAMES" on GUSER will get a list of DSNAMES in the VTOC. Copies *SENSEDSECT (3025). 0 Referenced by comments of: 340/2 00340/002 READRESTP SUBROUTINE SA O # (PART OF MTA:READRESTP) UM MTA 0 Subroutine called by (340/1). 1 SUN SEP 08/96 15:24:55 Page 152 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00340/003 READRESTP OC O MTA:READRESTP(1000) 5.0T1 904 READRESTP..OC.003 1 LINE 80 5 PAGE UM MTA JULY 03, 1981 13:36:18 5.0T2 185 00341/001 RDRSTP # (OBSOLETE) D2T1 168 UM 0 Obsoleted by *UNLINKER (562). 00342/001 LIBPRINT S # (OBSOLETE) D2T1 171 UM 00343/001 MTS.CONTAB SA # (OBSOLETE) D3.2T1 180 MTS.CONTAB..SA. 1 LINE 80 4 PAGE UM MAR. 21, 1975 01:24:57 0 Now part of COPY:MTS.MACROS (344/3). 00344/001 MTS.MACROS D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=MTS_MACROS 5.0T1 905 MTS.MACROS.D5.0_MASTER.SA.001 1 LINE 80 104 PAGE UM MTS BURLING AUG. 05, 1981 02:18:08 5.0T2 186 0 D5.0 master source for the MTS macro library which is used to assemble MTS (042) and the "MTS subroutines" as listed under the comments for (042/2) in addition to many other programs. Copies COPY:RATEVEC (651/3). 00344/002A MTS.MACROS UPDATE UC G MTSS:MTSMAC/UPD 5.1T1 257 MTS.MACROS.UPDATE.UC.002 1 LINE 90 90 PAGE UM MTS BURLING JULY 23, 1983 10:33:39 0 *CDUPDATE input to produce the current source. 0 Referenced by comments of: 344/3 00344/003A MTS.MACROS MACRO LIBRARY SM G COPY:MTS.MACROS 5.1T1 258 MTS.MACROS.MACRO_LIBRARY.SM.003 1 LINE 80 139 PAGE UM MTS BURLING JULY 23, 1983 10:33:43 COPY:MTS.MACROS 0 This is "COPY:MTS.MACROS" which is produced by *MACUTIL (738), using as input the output from the *CDUPDATE run of (344/2) against the appropriate base source. 0 Referenced by comments of: 1/5, 1/9, 38/1, 42/1, 71/1, 101/1, 104/18, 116/1, 135/1, 197/1, 197/2, 197/5, 198/1, 322/1, 343/1, 345/1, 346/1, 347/1, 348/1, 354/1, 354/5, 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8, 388/1, 388/2, 400/5, 413/5, 447/1, 464/1, 482/61, 500/51, 509/1, 513/1, 529/1, 531/1, 531/8, 531/15, 535/1, 535/3, 539/1, 553/1, 553/2, 553/7, 559/2, 567/1, 570/1, 578/1, 585/1, 600/1, 600/3, 600/5, 600/7, 600/9, 600/11, 600/18, 600/19, 600/20, 600/22, 600/23, 600/24, 600/25, 600/26, 600/27, 600/28, 600/29, 600/30, 600/31, 600/32, 600/33, 600/34, 615/15, 616/1, 617/1, 620/1, 622/1, 623/1, 624/1, 629/1, 631/1, 632/1, 635/1, 636/1, 637/1, 638/1, 639/1, 640/1, 645/1, 648/1, 651/13, 677/1, 680/1, 707/1, 725/1, 732/1, 753/1, 753/3, 761/1, 761/3, 770/1, 777/1, 798/24, 798/33, 798/35, 798/67, 798/69, 798/75, 798/81, 798/83, 806/1, 809/3, 809/4, 809/6, 811/2, 829/1, 866/1, 1019/1, 1067/5, 1070/3, 3024/1, 4000/1 00344/004A MTS.MACROS PLUS LIBRARY SQ O COPY:MTS*SQL 5.1T1 259 MTS.MACROS.PLUS_LIBRARY.SQ.004 1 LINE 143 56 PAGE UBC MTS BURLING JULY 23, 1983 10:33:48 0 This is a PLUS library of MTS internal definitions (data structures, 1 SUN SEP 08/96 15:24:55 Page 153 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 routines, etc.). Includes versions of many of the more commonly required structures. Contains a fairly complete definition of the CLS transfer vector, and some other CLS-related definitions. Comments in the library members indicate the distribution level to which they correspond. ******************************************************************** D5.1 version: This is the current UM library. ******************************************************************** 0 Referenced by comments of: 67/1, 67/3, 67/5, 509/10, 509/14, 802/1, 802/25, 821/1, 843/1, 851/1, 852/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1086/1 00344/005C MTS.MACROS PLUS LIBRARY SQ O MTSS:MTS#SQL 5.1T1 260 MTS.MACROS.PLUS_LIBRARY.SQ.005 1 LINE 74 54 PAGE UBC MTS BURLING JULY 23, 1983 10:33:50 0 ******************************************************************** D5.1 version: This is the base source as distributed with the first Resource Manager distribution. ******************************************************************** 0 Referenced by comments of: 344/6 00344/006C MTS.MACROS PLUS LIBRARY UC G MTSS:MTS*UQL 5.1T1 261 MTS.MACROS.PLUS_LIBRARY.UC.006 1 LINE 143 25 PAGE UM BURLING BURLING JULY 23, 1983 10:33:52 0 **************************************************************************** D5.1 version: These are the updates which were used to produce the current UM library from (344/5). **************************************************************************** 00345/001 MTS.EQU SA # (OBSOLETE) D3.2T1 182 MTS.EQU..SA. 1 LINE 80 4 PAGE UM MAR. 21, 1975 01:25:01 0 Now part of COPY:MTS.MACROS (344/3). 00346/001 MTS.DSECT SA # (OBSOLETE) D3.2T1 183 MTS.DSECT..SA. 1 LINE 80 20 PAGE UM MAR. 21, 1975 01:25:03 0 Now part of COPY:MTS.MACROS (344/3). 00347/001 MTS.EQU2 SA # (OBSOLETE) D3.2T1 184 MTS.EQU2..SA. 1 LINE 81 4 PAGE UM MAR. 21, 1975 01:25:08 0 Now part of COPY:MTS.MACROS (344/3). 1 SUN SEP 08/96 15:24:55 Page 154 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00348/001 MTS.RHTABLE SA # (OBSOLETE) D3.2T1 185 MTS.RHTABLE..SA. 1 LINE 80 3 PAGE UM MAR. 21, 1975 01:25:10 0 Now part of COPY:MTS.MACROS (344/3). 00350/001 BLOCKLETTER SA # (OBSOLETE) D2T1 252 UM 00353/001 BABYSIT *BBS C *BBS 5.0T1 908 BABYSIT.*BBS.C.001 1 LINE 37 1 PAGE UM WSG JULY 03, 1981 13:37:13 5.0T2 189 *BBS 0 Command file invoked by entering "MTS *BBS" from operator's console which signs on under user id "SYS." and runs (353/3) with i/o on the operator's console. 00353/002A BABYSIT SA O WSG:BBSIT 5.1T1 262 BABYSIT..SA.002 1 LINE 72 3 PAGE UM WSG JULY 23, 1983 10:33:54 0 Program to watch for specified users to signon or signoff. Useful for catching a pirate. Run with PROT=OFF. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). ******************************************************************** For D5.1: Changed to print better information at each signon and signoff including the job number and time of day as well as a "bell" character. In addition, BABYSIT now fakes things so that another user looking at a task which is running BABYSIT will see it as being in "Jobsta wait" even though it isn't. 00353/003A BABYSIT OC O SYS:BABYSIT 5.1T1 263 BABYSIT..OC.003 1 LINE 1519 1 PAGE UM WSG JULY 23, 1983 10:33:54 SYS:BABYSIT 0 Referenced by comments of: 353/1 00354/001 LLXU D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=LLXU 5.0T4 301 LLXU.D5.0_MASTER.SA.001 1 LINE 80 59 PAGE UM MTS SHERRY AUG. 09, 1981 22:49:39 5.0T10 205 0 LOAD/LINK/XCTL/UNLOAD subroutines, the interface between MTS and UMLOAD. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3) and COPY:CC.MACROS (1054/3). 0 Referenced by comments of: 1/4, 42/2 00354/002A LLXU UPDATE UC G MTSS:LLXU/UPD 5.1T1 264 LLXU.UPDATE.UC.002 1 LINE 70 7 PAGE UM MTS SHERRY JULY 23, 1983 10:33:54 0 *CDUPDATE input to produce current source. 1 SUN SEP 08/96 15:24:55 Page 155 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00354/003A LLXU OC G # (PART OF RESIDENT SYSTEM) UM MTS SHERRY 0 Object part of Resident System (468). 00354/004A LLXU L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=LLXU.LIST 5.1T1 265 LLXU..L.004 1 LINE 133 156 PAGE UM MTS SHERRY JULY 23, 1983 10:33:57 00354/005 LLXU LLXUTEST SA G W009:LLXUTEST.S 5.0T1 911 LLXU.LLXUTEST.SA.005 1 LINE 157 47 PAGE UM SHERRY JULY 03, 1981 13:37:16 5.0T2 192 0 PROGRAM TO TEST LOAD/LINK/XCTL/UNLOAD. ASSEMBLE USING *SYSMAC, OLD:CC.MACROS (1054/4), COPY:MTS.MACROS (344/3), COPY:MISC.MACROS (728) AND THE *OBJUTIL MISCELLANEOUS MACROS (721/15). COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND *CNFGINFODSECT (654). CONTAINS REFERENCE TO W009:LLXUTEST.XTL (354/9). DOCUMENTATION ON THE USE OF THIS PROGRAM IS CONTAINED IN THE WRITEUP (354/11). 0 Referenced by comments of: 354/7, 354/9, 354/11 00354/006 LLXU LLXUTEST OC G W009:LLXUTEST.O 5.0T1 912 LLXU.LLXUTEST.OC.006 1 LINE 9964 17 PAGE UM SHERRY JULY 03, 1981 13:37:36 5.0T2 193 00354/007 LLXU FAKEGATE SA G W009:FAKEGATE.S 5.0T1 913 LLXU.FAKEGATE.SA.007 1 LINE 68 1 PAGE UM SHERRY JULY 03, 1981 13:37:39 5.0T2 194 0 DUMMY VERSIONS OF ROUTINES IN GATE (4000) WHICH LLXU CALLS -- REQUIRED FOR LLXUTEST (354/5). 00354/008 LLXU FAKEGATE OC G W009:FAKEGATE.O 5.0T1 914 LLXU.FAKEGATE.OC.008 1 LINE 204 1 PAGE UM SHERRY JULY 03, 1981 13:37:40 5.0T2 195 00354/009 LLXU TOXCTL SA G W009:LLXUTEST.XTL(1000) 5.0T1 915 LLXU.TOXCTL.SA.009 1 LINE 50 1 PAGE UM SHERRY JULY 03, 1981 13:37:41 5.0T2 196 0 INTERFACE TO XCTL WHICH PERMITS XCTL TO BE TESTED BY LLXUTEST (354/5) WITHOUT UNLOADING THE TEST PROGRAM. 0 Referenced by comments of: 354/5 00354/010 LLXU TOXCTL OC G W009:LLXUTEST.XTL(1,999) 5.0T1 916 LLXU.TOXCTL.OC.010 1 LINE 80 1 PAGE UM SHERRY JULY 03, 1981 13:37:42 5.0T2 197 00354/011 LLXU TEST WRITEUP WF W009:LLXUTEST.W 5.0T1 917 LLXU.TEST_WRITEUP.WF.011 1 LINE 119 14 PAGE UM SHERRY JULY 03, 1981 13:37:43 5.0T2 198 0 WRITEUP DESCRIBING LLXUTEST (354/5). 1 SUN SEP 08/96 15:24:55 Page 156 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 354/5 00354/012A LLXU COMMENTS D G MTSS:LLXU/COM 5.1T1 266 LLXU.COMMENTS.D.012 1 LINE 65 1 PAGE UM MTS BURLING JULY 23, 1983 10:33:59 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00355/001 STATSCN SA G # (OBSOLETED BY RSCAN (707) AND SCAN (753)) 5.0T1 918 STATSCN..SA.001 1 LINE 80 7 PAGE UM JULY 03, 1981 13:37:50 5.0T2 199 00357/001 RCALL/ADROF SUBRS SA G S1558 5.0T1 VLO FSNAME=RCALL/ADROF_SUBRS..SA.001(1) 920 5.0T1 920 RCALL/ADROF_SUBRS..SA.001 1 LINE 80 4 PAGE UM ENGLE AUG. 13, 1980 13:34:26 5.0T2 201 0 RCALL ALLOWS FORTRAN PROGRAMS TO CALL SUBROUTINES WITH R TYPE CALLING SEQUENCES, E.G. GETFD. ADROF ALLOWS FORTRAN PROGRAMS TO GET THE ADDRESS OF A VARIABLE, E.G. ADROF('ABC'). 00357/002 RCALL/ADROF SUBRS UC G # S0027 DISTRB FSNAME=RCALLUPD 5.0T1 921 RCALL/ADROF_SUBRS..UC.002 1 LINE 72 2 PAGE UM ENGLE AUG. 13, 1980 13:34:31 5.0T2 202 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00357/003 RCALL/ADROF SUBRS OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 00358/001 *TAPECOPY SA G S0792 WSGFS FSNAME=TAPECOPY 5.0T1 922 TAPECOPY..SA.001 1 LINE 72 9 PAGE UM WSG JUNE 10, 1981 16:51:23 5.0T2 203 0 Multiple file tape copy program. Copies labeled or unlabeled tapes, 7- or 9-track. 00358/002 *TAPECOPY OC G *TAPECOPY 5.0T1 923 TAPECOPY..OC.002 1 LINE 5127 3 PAGE UM WSG JULY 03, 1981 13:38:17 5.0T2 204 *TAPECOPY 00360/001 TIME SUBR SA G S1558 5.0T1 VLO FSNAME=TIME_SUBR..SA.001(1) 924 5.0T1 924 TIME_SUBR..SA.001 1 LINE 80 17 PAGE UM ENGLE FEB. 04, 1981 15:12:50 5.0T2 205 0 SUBROUTINE TO DO THINGS WITH THE TIME (DATE/TIME, CPU, AND ELAPSED). COPIES GRDEF (104/83) AND *CNFGINFODSECT (654). 0 Referenced by comments of: 67/27, 798/3 00360/002 TIME SUBR UC G S1558 5.0T1 VLO FSNAME=TIME_SUBR..UC.002(1) 925 5.0T1 925 TIME_SUBR..UC.002 1 LINE 71 1 PAGE UM ENGLE FEB. 04, 1981 15:13:04 5.0T2 206 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 1 SUN SEP 08/96 15:24:55 Page 157 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00360/003 TIME SUBR OC G SEG2:TIME 5.0T1 926 TIME_SUBR..OC.003 1 LINE 80 4 PAGE UM ENGLE JULY 03, 1981 13:38:36 5.0T2 207 SEG2:TIME 0 LOADED INTO SHARED VM BY PISTLE. 00387/001A HASP MAIN SA G HSP S1528 HASP FSNAME=HASP.MAIN 5.1T1 267 HASP.MAIN.SA.001 1 LINE 80 229 PAGE UM HANSEN MAY 20, 1983 15:11:27 0 Source for main assembly of MTS HASP, which is derived from IBM HASP II version 2.3. Optionally uses the SLT instruction (see &NOSLT) to search PCEs, DCTs, and message blocks. Copies COPY:GLOBALSETS (1026/2), COPY:JOBSTA (413/9), and COPY:LLMPSEQU (087). If the value of the assembly parameter &MAXJOBS is changed, SSRTN (413/1) should be similarly changed and reassembled. Assemble using COPY:MTS.MACROS (344/3) and HASP.MACROS (387/6). 0 Referenced by comments of: 243/1, 400/1, 413/1, 570/3, 838/1 00387/002A HASP EXEC SA G EXEC S1528 HASP FSNAME=HASP.EXEC 5.1T1 268 HASP.EXEC.SA.002 1 LINE 80 64 PAGE UM HANSEN JUNE 07, 1983 17:02:08 0 COPIES COPY:GLOBALSETS (1026/2), COPY:JOBSTA (413/9), AND COPY:LLMPSEQU (087). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6). 00387/003A HASP RDR SA G RDR S1528 HASP FSNAME=HASP.RDR 5.1T1 269 HASP.RDR.SA.003 1 LINE 80 97 PAGE UM HANSEN JULY 13, 1983 14:39:23 0 COPIES COPY:GLOBALSETS (1026/2). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6). 00387/004A HASP PPR SA G PPR S1528 HASP FSNAME=HASP.PPR 5.1T1 270 HASP.PPR.SA.004 1 LINE 80 38 PAGE UM HANSEN JUNE 07, 1983 17:02:36 0 COPIES COPY:GLOBALSETS (1026/2). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6). 00387/005A HASP DATA SA G DATA S1528 HASP FSNAME=HASP.DATA 5.1T1 271 HASP.DATA.SA.005 1 LINE 80 15 PAGE UM HANSEN JUNE 07, 1983 17:02:41 0 COPIES COPY:GLOBALSETS (1026/2). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6). 00387/006A HASP MACROS SM G MACS S1528 HASP FSNAME=HASP.MACLIB 5.1T1 272 HASP.MACROS.SM.006 1 LINE 80 142 PAGE UM HANSEN JUNE 07, 1983 17:02:13 0 HASP MACRO LIBRARY. 0 Referenced by comments of: 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8, 387/27, 387/30, 387/32, 387/35 00387/007A HASP OPER SA G OPER S1528 HASP FSNAME=HASP.OPER 5.1T1 273 HASP.OPER.SA.007 1 LINE 80 114 PAGE UM HANSEN MAY 20, 1983 15:12:32 0 COPIES COPY:GLOBALSETS (1026/2) AND COPY:LLMPSEQU (087). ASSEMBLE USING 1 SUN SEP 08/96 15:24:55 Page 158 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6). 00387/008A HASP MXMTR SA G MXMT S1528 HASP FSNAME=HASP.MXMTR 5.1T1 274 HASP.MXMTR.SA.008 1 LINE 80 18 PAGE UM HANSEN MAY 20, 1983 15:12:29 0 MERIT BATCH TRANSMITTER PROCESSOR. ASSEMBLE USING COPY:MTS.MACROS (344/3) AND HASP.MACROS (387/6). COPIES COPY:GLOBALSETS (1026/2). 00387/009A HASP SEG2:HASP OC G SEG2:HASP 5.1T1 275 HASP.SEG2:HASP.OC.009 1 LINE 80 115 PAGE UM HANSEN JULY 23, 1983 10:36:00 SEG2:HASP 0 The HASP object is loaded by PISTLE after IPL. This file also contains the HASPLING (388) object. The Merit ASCII/EBCDIC translation table (570/3) object is included in this file. 0 Referenced by comments of: 388/3, 570/4 00387/010A HASP LISTING L S1019 HASPLS POSN=HASP.LIST 5.1T1 276 HASP.LISTING.L.010 1 LINE 133 1693 PAGE UM HANSEN JULY 23, 1983 10:37:06 00387/011 HASP HRTP1130 SA G 1130 HASP:HRTP1130.U 5.0T1 937 HASP.HRTP1130.SA.011 1 LINE 80 176 PAGE UM HANSEN JULY 03, 1981 13:41:28 5.0T2 218 0 REMOTE TERMINAL PROGRAM FOR 1130. THIS IS THE OS VERSION WITH A FEW BUGS FIXED. 00387/012 HASP HRTPLOAD SA G LOAD HASP:HRTPLOAD.U 5.0T1 938 HASP.HRTPLOAD.SA.012 1 LINE 80 38 PAGE UM HANSEN JULY 03, 1981 13:41:45 5.0T2 219 0 LOADER FOR REMOTE 1130 PROGRAM. THIS IS THE OS VERSION WITH A FEW BUGS FIXED. 00387/013 HASP HRTPB360 SA G B360 HASP:HRTP360.ASM 5.0T1 939 HASP.HRTPB360.SA.013 1 LINE 80 104 PAGE UM HANSEN JULY 03, 1981 13:41:48 5.0T2 220 0 REMOTE PROGRAM FOR 360'S (BOTH MODEL 20 AND OTHER). THIS IS THE OS VERSION WITH BUGS FIXED. NOTE: THIS REMOTE PROGRAM IS FROM HASP II VERSION 3.1, ALTHOUGH IT WORKS OK WITH MTS HASP (WHICH WAS DERIVED PRINCIPALLY FROM HASP II VERSION 2.3). INCLUDES TN PRINTER SUPPORT. 00387/014 HASP HRTPSYS3 SA G S1558 5.0T1 VLO FSNAME=HASP.HRTPSYS3.SA.014(1) 940 5.0T1 940 HASP.HRTPSYS3.SA.014 1 LINE 80 102 PAGE UM HANSEN AUG. 02, 1973 02:31.26 5.0T2 221 0 REMOTE PROGRAM FOR IBM SYSTEM/3. HERE AGAIN, THIS VERSION IS FROM HASP II VERSION 3.1. 00387/015 HASP RTPBOOT B G S1558 5.0T1 VLO FSNAME=HASP.RTPBOOT.B.015(1) 941 5.0T1 941 HASP.RTPBOOT.B.015 1 LINE 160 1 PAGE UM HANSEN AUG. 02, 1973 02:31.40 5.0T2 222 0 BOOTSTRAP LOADER FOR 1130 REMOTE PROGRAM. THESE ARE THE SIX BINARY CARDS THAT THE HASP MANUAL TELLS YOU TO HAND PUNCH. THE CARDS SHOULD BE COPIED TO *PUNCH*@BIN AND PLACED AT THE BEGINNING OF THE 1130 REMOTE PROGRAM DECK. 1 SUN SEP 08/96 15:24:55 Page 159 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 NO SOURCE AVAILABLE. 00387/016 HASP LETRRIP SA G S1558 5.0T1 VLO FSNAME=HASP.LETRRIP.SA.016(1) 942 5.0T1 942 HASP.LETRRIP.SA.016 1 LINE 80 2 PAGE UM HANSEN AUG. 02, 1973 02:31.42 5.0T2 223 0 PARTIAL SOURCE FOR AN MTS PROGRAM TO CONVERT 1130 OBJECT PROGRAMS ASSEMBLED BY *ASMG FROM ASMG OBJECT FORMAT TO 1130 BINARY OBJECT CARD FORMAT. READS FROM SCARDS, WRITES ON SPUNCH. 0 Referenced by comments of: 387/17 00387/017 HASP LETRRIP OC G S1558 5.0T1 VLO FSNAME=HASP.LETRRIP.OC.017(1) 943 5.0T1 943 HASP.LETRRIP.OC.017 1 LINE 80 6 PAGE UM HANSEN AUG. 02, 1973 02:31.44 5.0T2 224 0 The object is in three parts: 1. The OS/360 object for LETRRIP from HASP with REP cards to patch all OS SVC's into invalid op-codes which produce program interrupts which can be fielded; 2. The object from (387/16); and 3. The object for the ALGOL compiler (or library) MTS interface, (505/2) or (505/22). 00387/018 HASP *HSP C *HSP 5.0T1 944 HASP.*HSP.C.018 1 LINE 9 1 PAGE UM WSG JULY 03, 1981 13:42:22 5.0T2 225 STRT:*HSP 0 Command file which signs on under user ID "STRT" and sources to STRT:HSP (387/19). Invoked by entering "MTS *HSP" from operators console. 00387/019 HASP STRT:HSP C MTS:TST.HSP 5.0T1 945 HASP.HSP.C.019 1 LINE 23 1 PAGE UM WSG JULY 03, 1981 13:42:23 5.0T2 226 STRT:HSP 0 This file issues bunches of HASP commands ($START et al.). The particular commands will have to be modified for the I/O devices in use at each installation. The UM local version (not the distributed version) starts *HLG (752). 0 Referenced by comments of: 387/18 00387/020C HASP STRT:HSP UM C # STRT:HSP UM WSG STRT:HSP@UM 0 This is the standard UM version of STRT:HSP. 1 SUN SEP 08/96 15:24:55 Page 160 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00387/021 HASP *DRN C *DRN 5.0T1 946 HASP.*DRN.C.020 1 LINE 9 1 PAGE UM WSG JULY 03, 1981 13:42:23 5.0T2 227 STRT:*DRN 0 Command file which signs on under user id "STRT" and sources to STRT:DRN (387/22). Invoked by entering "MTS *DRN" from operators console. 00387/022A HASP STRT:DRN C STRT:DRN 5.1T1 277 HASP.STRT:DRN.C.022 1 LINE 16 1 PAGE UM WSG JULY 23, 1983 10:37:35 STRT:DRN 0 This file issues "$DRAIN SAxx" HASP commands used to drain HASP prior to shutdown. The particular commands will have to be modified for the RJE lines used at each installation. 0 Referenced by comments of: 387/21 00387/023A HASP OPER MANUAL WF W225:HSPM.FMT 5.1T1 278 HASP.OPER_MANUAL.WF.023 1 LINE 203 42 PAGE UM DONNELLY JULY 23, 1983 10:37:36 0 MTS HASP OPERATOR'S MANUAL. NOTE: SEE ALSO THE MAIN MTS OPERATOR'S MANUAL (592). 00387/024 HASP PCE SNIFFER SA PCE HASP:PCE(1,999) 5.0T1 949 HASP.PCE_SNIFFER.SA.023 1 LINE 80 4 PAGE UM HANSEN JULY 03, 1981 13:42:34 5.0T2 230 HASP:PCE 0 PCE SNIFFER UTILITY PROGRAM. EVERY 3 SECONDS, THIS PROGRAM PRINTS THE FOLLOWING OUTPUT LINE: F:N1 B:N2 T: N3P N4U N5B WHERE N1 IS THE NUMBER OF FREE HASP EXECUTION PCE'S, N2 IS THE NUMBER OF PCE'S CURRENTLY BEING USED FOR BATCH EXECUTION, N3 IS THE NUMBER OF *PRINT* PCE'S, N4 IS THE NUMBER OF *PUNCH* PCE'S, AND N5 IS THE NUMBER OF *BATCH* PCE'S. IF PAR=CHANGE IS SPECIFIED WHEN THE PROGRAM IS RUN, IT PRINTS THE LINE ONLY IF IT DIFFERS FROM THE PREVIOUS LINE PRINTED. IF PAR=VERIFY IS SPECIFIED, THE PROGRAM CHECKS TO MAKE SURE THE PCE'S ARE ATTACHED TO THE USER THEY THINK THEY ARE. IF IT DISCOVERS A PCE FOR WHICH THE JOB TABLE USER ID DIFFERS FROM THE JCT ID, IT PRINTS: PCE: AAAAA JCTID: IIII JOB TABLE: PPPPPPPP JOB N WHERE AAAAA IS THE HEX LOCN OF THE PCE, IIII IS THE ID IN THE JCT (0000 IF ZERO, ???? IF JCT ADDR NOT LEGAL), PPPPPPPP IS THE USERID AND PROJECT NO. FROM THE JOB TABLE (???????? IF BAD JOB NUMBER), AND N IS THE JOB NUMBER. USES IOH (278) FOR OUTPUT FORMATTING AND REQUIRES THE HASP COPY SECTIONS. 0 Referenced by comments of: 569/1 1 SUN SEP 08/96 15:24:55 Page 161 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00387/025 HASP PCE SNIFFER OC HASP:PCE(1000) 5.0T1 950 HASP.PCE_SNIFFER.OC.024 1 LINE 80 1 PAGE UM HANSEN JULY 03, 1981 13:42:35 5.0T2 231 0 Referenced by comments of: 569/1 00387/026 HASP WRITEUP WF S1558 5.0T1 VLO FSNAME=HASP.WRITEUP.WF.025(1) 951 5.0T1 951 HASP.WRITEUP.WF.025 1 LINE 116 18 PAGE UM HANSEN APR. 23, 1981 14:18:33 5.0T2 232 00387/027A HASP DUMP/ANAL SA S1528 HASP FSNAME=D/A.ASM 5.1T1 279 HASP.DUMP/ANAL.SA.027 1 LINE 72 54 PAGE UM HANSEN MAY 20, 1983 15:10:53 0 THIS PROGRAM PERMITS A SYSTEM PROGRAMMER TO LOOK AT MEMORY OR A DUMP TAPE VIA A TAPE OPTIONALLY ASSIGNED TO UNIT 1 AND PRINT IT IN AN EASILY READABLE FORM. FORMS PERMITTED ARE PRIMARILY HASP DSECT FORMATS, E.G. PCE AND DCT, AND JOBTABLE OR DUMP FORMATS. A HELP COMMAND PROVIDES COMPREHENSIVE DESCRIPTIONS AS OBTAINED FROM (387/29). COPIES COPY:GLOBALSETS (1026/2) AND COPY:LLMPSEQU (087). REQUIRES ASSEMBLY WITH THE HASP MACROS (387/6). CONTAINS MTS COMMANDS AT THE BEGINNING OF THE FILE TO ASSEMBLE IT. IT ALSO CONTAINS A SPECIAL VERSION OF THE SYSADR SUBROUTINE (400/10) WHICH READS FROM THE DUMP TAPE. IT REQUIRES THE VMFIND SUBROUTINE (400/3). 0 Referenced by comments of: 387/29 00387/028A HASP DUMP/ANAL OC HASP:D/A 5.1T1 280 HASP.DUMP/ANAL.OC.028 1 LINE 758 42 PAGE UM HANSEN JULY 23, 1983 10:37:43 HASP:D/A 00387/029A HASP DUMP/ANAL HELP M HASP:D/A.HELP 5.1T1 281 HASP.DUMP/ANAL_HELP.M.029 1 LINE 68 5 PAGE UM HANSEN JULY 23, 1983 10:37:44 HASP:D/A.HELP 0 HELP MESSAGE FILE FOR USE BY DUMP/ANAL (387/27). THIS FILE IS IN THE FORM OF AN ASSEMBLER MACRO LIBRARY. 0 Referenced by comments of: 387/27 00387/030A HASP HASPTRACKS SA O S1528 HASP FSNAME=HASPTRACKS.S 5.1T1 282 HASP.HASPTRACKS.SA.030 1 LINE 70 4 PAGE UM HANSEN MAY 20, 1983 15:13:20 0 PROGRAM TO CHECK FOR DUPLICATE OR MISSING TRACKS ON A HASP SPOOL PACK AND TO REPAIR (VERIFICATION REQUIRED) THE CYLINDER MAP IN MEMORY. THE FILE BEGINS WITH MTS COMMANDS TO ASSEMBLE THE PROGRAM. REQUIRES THE HASP MACRO LIBRARY (387/6) FOR ASSEMBLY. COPIES COPY:GLOBALSETS (1026/2). CALLS THE SYSADR (400/10) SUBROUTINE. 0 Referenced by comments of: 387/31 00387/031A HASP HASPTRACKS OC O HASP:HASPTRACKS 5.1T1 283 HASP.HASPTRACKS.OC.031 1 LINE 256 7 PAGE UM HANSEN JULY 23, 1983 10:37:49 0 Object for HASPTRACKS (387/30) plus the object for SYSADR (400/10). 1 SUN SEP 08/96 15:24:55 Page 162 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00387/032A HASP QUESCAN SA O S1528 HASP FSNAME=QUESCAN.S 5.1T1 284 HASP.QUESCAN.SA.032 1 LINE 71 5 PAGE UM HANSEN MAY 20, 1983 15:13:27 0 PROGRAM TO SCAN THE HASP QUEUE, VERIFYING THAT ALL ENTRIES ARE PROPERLY LINKED, LOCATING UNATTACHED SEGMENTS, AND MAKING OTHER TESTS. THE FILE BEGINS WITH MTS COMMANDS TO ASSEMBLE THE PROGRAM. COPIES THE HASP COPY SECTIONS AND REQUIRES THE HASP MACRO LIBRARY (387/6) FOR ASSEMBLY. CALLS THE SYSADR (400/10) SUBR. COPIES COPY:GLOBALSETS (1026/2). 0 Referenced by comments of: 387/33 00387/033A HASP QUESCAN OC O HASP:QUESCAN 5.1T1 285 HASP.QUESCAN.OC.033 1 LINE 256 7 PAGE UM HANSEN JULY 23, 1983 10:37:50 0 OBJECT FOR QUESCAN (387/32) PLUS THE OBJECT FOR SYSADR (400/10). 00387/034 HASP HASPSTAT CMDS C *HPS 5.0T1 959 HASP.HASPSTAT_CMDS.C.033 1 LINE 44 1 PAGE UM HANSEN AUG. 05, 1981 02:26:19 5.0T2 240 *HPS 0 COMMAND FILE USED BY THE OPERATORS TO RUN THE HASPSTAT PROGRAM (387/35) TO CHECK FOR POSSIBLE HASP PROBLEMS. 00387/035A HASP HASPSTAT SA O S1528 HASP FSNAME=HASPSTAT.S 5.1T1 286 HASP.HASPSTAT.SA.035 1 LINE 68 3 PAGE UM HANSEN MAY 20, 1983 15:13:15 0 PROGRAM TO LOOK AT HASP WHILE IT'S RUNNING AND CHECK FOR POSSIBLE PROBLEMS. IF FOUND, THEY ARE PRINTED ON SERCOM. THE FILE BEGINS WITH MTS COMMANDS TO ASSEMBLE THE PROGRAM. COPIES COPY:GLOBALSETS (1026/2). REQUIRES THE HASP MACRO LIBRARY (387/6) FOR ASSEMBLY. CALLS THE SYSADR (400/10) SUBR. 0 Referenced by comments of: 387/34, 387/36 00387/036A HASP HASPSTAT OC O HASP:HASPSTAT 5.1T1 287 HASP.HASPSTAT.OC.036 1 LINE 256 6 PAGE UM HANSEN JULY 23, 1983 10:37:52 HASP:HASPSTAT 0 Object for HASPSTAT (387/35) plus the object for SYSADR (400/10). 0 Referenced by comments of: 387/38 00387/037C HASP VIRT CONSOLE S O HASP:CONSOLE.S 5.1T1 288 HASP.VIRT_CONSOLE.S.037 1 LINE 204 29 PAGE UM HANSEN JULY 23, 1983 10:37:52 0 Source for the HASP virtual console program. The PMF project file (387/40) has details and may be used to sort out all the pieces. **************************************************************************** D5.1 version: A problem was discovered with this version after the D5.1 tapes were written. The problem is that a timer exit (set by MTS) goes off while HASP:CONSOLE is in its intertask exit routine. Normally, MTS inhibits 1 SUN SEP 08/96 15:24:55 Page 163 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 timer exits that occur more than two levels up on the CPU queue, but since the task is in user mode, this check is skipped and MTS takes the timer interrupt, doing a FLUSH in the process. The temporary fix we've installed on our system is REP 000017 01,00 This should be applied to CSECT TIMER_ON at about line 344. It causes the screen to NOT be updated based on a timer, but only when input is entered from the keyboard or when a message is received on the intertask link. **************************************************************************** 00387/038C HASP VIRT CONSOLE OC O HASP:CONSOLE 5.1T1 289 HASP.VIRT_CONSOLE.OC.038 1 LINE 6328 26 PAGE UM HANSEN JULY 23, 1983 10:37:54 0 The object for the HASP virtual console program. Requires HELP:FSHELP (845/6) and HASP:HASPSTAT (387/36). References (387/39). 0 Referenced by comments of: 387/39 00387/039C HASP VIRT CONSOLE D O HASP:CONSOLE.HELP 5.1T1 290 HASP.VIRT_CONSOLE.D.039 1 LINE 89 12 PAGE UM HANSEN JULY 23, 1983 10:37:54 0 The HELP text for use by (387/38). 0 Referenced by comments of: 387/38 00387/040A HASP PMF PROJECT D G HASP:HASP 5.1T1 291 HASP.PMF_PROJECT.D.040 1 LINE 186 11 PAGE UM HANSEN JULY 23, 1983 10:37:55 0 This is a PMF project file for handling HASP and friends. It is used by the #PMF CLS (810). 0 Referenced by comments of: 387/37 00387/041C HASP RMT 360/20 GD # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the HASP Remote 360/20 Operator's Guide. Only hard copies of this component are distributed. 00387/042C HASP RMT 360/NON-20 # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the HASP Remote 360/non-20 Operator's Guide. Only hard copies of this component are distributed. 00387/043C HASP RMT 1130/1800 # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the HASP Remote 1130/1800 Operator's Guide. Only hard copies of this 1 SUN SEP 08/96 15:24:55 Page 164 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 component are distributed. 00387/044C HASP RMT S/3 GDE # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the HASP Remote System/3 Operator's Guide. Only hard copies of this component are distributed. 00387/045C HASP 2780 RMT WKSTA # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the HASP 2780 Remote Workstation Operator's Guide. Only hard copies of this component are distributed. 00388/001A HASPLING MAIN SA G S1528 HASP FSNAME=HASPLING 5.1T1 292 HASPLING.MAIN.SA.001 1 LINE 82 24 PAGE UM HANSEN MAY 20, 1983 15:13:06 0 Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU(100) (087), COPY:IT.DSECTS (1081/4) and COPY:UC.MACROS. Assemble using COPY:MTS.MACROS (344/3). Requires the Tape Unit Check Routines (787/19). 0 Referenced by comments of: 387/9, 787/20 00388/002A HASPLING MNET SA G S1528 HASP FSNAME=HSPLNG.MNET 5.1T1 293 HASPLING.MNET.SA.002 1 LINE 82 11 PAGE UM HANSEN MAY 20, 1983 15:13:22 0 ASSEMBLE USING COPY:MTS.MACROS (344/3). 00388/003A HASPLING OBJECT OC G # (PART OF SEG2:HASP) UM HANSEN 0 Part of SEG2:HASP (387/9). 00389/001 *GENLIB SA G S1558 5.0T1 VLO FSNAME=GENLIB..SA.001(1) 965 5.0T1 965 GENLIB..SA.001 1 LINE 80 143 PAGE UM TIFFANY JULY 27, 1977 03:05:47 5.0T2 246 0 THIS IS THE SOURCE FOR *GENLIB. NOTE: *GENLIB IS STILL SUPPORTED BY UM, BUT *OBJUTIL (721) IS PREFERRED. 0 Referenced by comments of: 505/25 00389/002 *GENLIB OE G *GENLIB 5.0T1 966 GENLIB..OE.002 1 LINE 12279 14 PAGE UM TIFFANY JULY 03, 1981 13:43:28 5.0T2 247 *GENLIB 0 Contains a $CONTINUE WITH *LIBRARY (524/1) record. 00389/003 *GENLIB MESSAGES M ETC:GENLIBHELP 5.0T1 967 GENLIB.MESSAGES.M.003 1 LINE 66 10 PAGE UM TIFFANY JULY 03, 1981 13:43:30 5.0T2 248 ETC.:GENLIBHELP 0 MESSAGE FILE REFERENCED FOR THE EXPLAIN COMMAND. 1 SUN SEP 08/96 15:24:55 Page 165 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00390/001 *QUE # (OBSOLETE) 5.0T1 968 QUE..C.001 1 LINE 30 1 PAGE UM JULY 03, 1981 13:43:32 5.0T2 249 0 Command file to print a listing (on *PRINT*) of the HASP queue. Invoked by entering "MTS *QUE" on the operator's console. Obsoleted by changes to HASP. 00391/001 FILE STATISTICS SP # (OBSOLETE) D2T1 123 UM 00392/001 *FSAVE SA # (OBSOLETE) D2.2 116 UM 0 Obsoleted by *FS (548). 0 Referenced by comments of: 549/1 00399/001 DUMP SA G S0699 D3TAPE POSN=DUMP.D5 5.0T4 304 DUMP..SA.001 1 LINE 80 12 PAGE UM MTA AUG. 09, 1981 22:49:53 5.0T10 208 0 THIS IS THE UMMPS SYSTEM DUMP PROGRAM. IT TAKES A DUMP OF ALL OF REAL MEMORY PLUS, OPTIONALLY, THE VM FOR A SPECIFIED JOB. IT WRITES THE DUMP UNFORMATED ONTO A 9-TRACK LABELED TAPE FOR WHICH THE VOLUME LABEL MUST BE 'DUMPXX'. THE PRINTDUMP PROGRAM (400) WILL PRINT SELECTED PARTS OF A DUMP TAPE. COPIES COPY:GLOBALS (1026/3). ASSEMBLE USING COPY:SETPARM (653). 0 Referenced by comments of: 400/1 00399/002 DUMP OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00400/001 PRINTDUMP D5.0 MAIN SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.D5.0_MAIN.SA.001(1) 305 5.0T4 305 PRINTDUMP.D5.0_MAIN.SA.001 1 LINE 80 89 PAGE UM MTA AUG. 09, 1981 22:50:32 5.0T10 209 0 Prints dump tapes produced by SYSTEM DUMP (399). A separate dump program is also available for HASP, see (387). PRINTDUMP requires PRINTTRACE (337), IOH (278) for the "TRACE" command only, TASKSTAT (647), and LOADCLAS (540/8). Copies COPY:LLMPSEQU (087), COPY:PCBDSECT (470), COPY:GLOBALDEFS (1026/1), COPY:GLOBALSETS (1026/2), and *CNFGINFODSECT (654). Assemble using COPY:SETPARM (653), the (400/16) macros, COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), COPY:DM.MACROS (769/29), COPY:UMMPS.MACROS (045/14) and COPY:MISC.MACROS (728). Most subcomponents of PRINTDUMP require the (400/16) macros. 0 Referenced by comments of: 399/1, 4003/1 1 SUN SEP 08/96 15:24:55 Page 166 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00400/002A PRINTDUMP MAIN UPDATE UC G MTA:DMPLST.U(1) 5.1T1 294 PRINTDUMP.MAIN_UPDATE.UC.002 1 LINE 73 2 PAGE UM MTA JULY 23, 1983 10:37:59 0 Update to produce the current source for the main program from the D5.0 source. 00400/003 PRINTDUMP 5.0 VMFIND SUB SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_VMFIND_SUB.SA.003(1) 307 5.0T4 307 PRINTDUMP.5.0_VMFIND_SUB.SA.003 1 LINE 80 7 PAGE UM MTA AUG. 09, 1981 22:50:44 5.0T10 211 0 Subroutine to find a VM page on a dump tape. 0 Referenced by comments of: 387/27, 400/4 00400/004C PRINTDUMP 5.0 VMFIND SUB UC G MTA:DMPLST.VMF.U 5.1T1 295 PRINTDUMP.5.0_VMFIND_SUB.UC.004 1 LINE 68 1 PAGE UM MTA JULY 23, 1983 10:37:59 0 ************************************************************************** D5.1 version: Fixes a bug in the D5.0 version of (400/3). ************************************************************************** 00400/005 PRINTDUMP D5 SSCN SUBR SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.D5_SSCN_SUBR.SA.005(1) 309 5.0T4 309 PRINTDUMP.D5_SSCN_SUBR.SA.005 1 LINE 80 17 PAGE UM MTS MTA AUG. 09, 1981 22:50:48 5.0T10 213 0 D4.0 master source for subroutine to dump the VM of an MTS task, formatting it appropriately. Must be reassembled whenever the MTS dsect is changed. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU(100) (087). Assemble using COPY:MTS.MACROS (344/3) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 42/2, 400/9 00400/006A PRINTDUMP SSCN SUBR UPD UC G MTSS:SSCN/UPD 5.1T1 296 PRINTDUMP.SSCN_SUBR_UPD.UC.006 1 LINE 82 7 PAGE UM MTS MTA JULY 23, 1983 10:38:00 0 *CDUPDATE (1036) input to produce the current source. 00400/007A PRINTDUMP SSCN SUBR LIST L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=SSCN.LIST 5.1T1 297 PRINTDUMP.SSCN_SUBR_LIST.L.007 1 LINE 133 62 PAGE UM MTS MTA JULY 23, 1983 10:38:08 00400/008A PRINTDUMP SSCN SUBR COMM D G MTSS:SSCN/COM 5.1T1 298 PRINTDUMP.SSCN_SUBR_COMM.D.008 1 LINE 65 1 PAGE UM MTS MTA JULY 23, 1983 10:38:09 0 This file contains annotation about changes to SSCN. 00400/009 PRINTDUMP 5.0 DUMP SUBR SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_DUMP_SUBR.SA.008(1) 312 5.0T4 312 PRINTDUMP.5.0_DUMP_SUBR.SA.008 1 LINE 80 4 PAGE UM MTA AUG. 09, 1981 22:50:58 5.0T10 216 0 Subroutine to format DUMP output. Called by SSCN (400/5). 1 SUN SEP 08/96 15:24:55 Page 167 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00400/010 PRINTDUMP 5.0 SYSADR SUB SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_SYSADR_SUB.SA.010(1) 314 5.0T4 314 PRINTDUMP.5.0_SYSADR_SUB.SA.010 1 LINE 80 3 PAGE UM MTA AUG. 09, 1981 22:51:38 5.0T10 218 0 Subroutine to resolve a name from the UMLOAD symbol table for the resident system on a dump tape. 0 Referenced by comments of: 387/27, 387/30, 387/31, 387/32, 387/33, 387/35, 387/36 00400/011 PRINTDUMP 5.0 ICTAB SUBR SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_ICTAB_SUBR.SA.012(1) 316 5.0T4 316 PRINTDUMP.5.0_ICTAB_SUBR.SA.012 1 LINE 80 21 PAGE UM MTA JULY 27, 1977 03:06:43 5.0T10 220 0 SUBROUTINE WHICH IMPLEMENTS THE ICTAB COMMAND FOR PRINTDUMP. THIS IS A MODIFIED VERSION OF TABLMOD (554). ASSEMBLE USING COPY:FILE.MACROS (482/45). 00400/012 PRINTDUMP 5.0 ICSTAT SUB SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.5.0_ICSTAT_SUB.SA.013(1) 317 5.0T4 317 PRINTDUMP.5.0_ICSTAT_SUB.SA.013 1 LINE 80 6 PAGE UM MTA JULY 27, 1977 03:06:45 5.0T10 221 0 VERSION OF THE ICSTAT SUBROUTINE, PART OF (482/34), THAT WORKS FROM A DUMP TAPE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00400/013 PRINTDUMP CMDREAD SUBR SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.CMDREAD_SUBR.SA.014(1) 318 5.0T4 318 PRINTDUMP.CMDREAD_SUBR.SA.014 1 LINE 72 7 PAGE UM MTA APR. 05, 1980 14:40:26 5.0T10 222 0 SUBROUTINE TO READ COMMANDS. ASSEMBLE WITH OLD:CC.MACROS (1054/4). COPIES *GDINFODSECT (594). 00400/014 PRINTDUMP IOSETUP SUBR SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.IOSETUP_SUBR.SA.015(1) 319 5.0T4 319 PRINTDUMP.IOSETUP_SUBR.SA.015 1 LINE 72 4 PAGE UM MTA APR. 05, 1980 14:40:29 5.0T10 223 0 SUBROUTINE TO FIND A DUMP TAPE. COPIES *GDINFODSECT (594). 00400/015 PRINTDUMP ITDUMP SUBR SA G S1561 5.0T4 VLO FSNAME=PRINTDUMP.ITDUMP_SUBR.SA.016(1) 320 5.0T4 320 PRINTDUMP.ITDUMP_SUBR.SA.016 1 LINE 80 19 PAGE UM MTA AUG. 09, 1981 23:04:03 5.0T10 224 0 Dumps UBC Intertask stuff (1081). Assemble with the PRINTDUMP macros (400/16). Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU ( (087), and COPY:IT.COPY_SECT (1081/5). 0 Referenced by comments of: 1081/5 00400/016A PRINTDUMP MACROS SM G MTA:DMPLST.MACROS 5.1T1 299 PRINTDUMP.MACROS.SM.016 1 LINE 75 3 PAGE UM MTA JULY 23, 1983 10:38:09 0 Macro library required for assembly by most parts of PRINTDUMP. 0 Referenced by comments of: 400/1, 400/15, 729/2, 814/4, 1012/1 1 SUN SEP 08/96 15:24:55 Page 168 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00400/017A PRINTDUMP OC G MTS:PRINTDUMP 5.1T1 300 PRINTDUMP..OC.017 1 LINE 14738 37 PAGE UM MTS MTA JULY 23, 1983 10:38:10 MTS.:PRINTDUMP 0 THIS FILE CONTAINS THE OBJECT FOR ALL OF PRINTDUMP PLUS PRINTTRACE (337). 0 Referenced by comments of: 732/7, 814/2, 814/9, 814/11 00410/001A *ASMTIDY SA G LBT:ASMTIDY.S 5.1T1 301 ASMTIDY..SA.001 1 LINE 73 39 PAGE UM TIFFANY JULY 23, 1983 10:38:11 0 PROGRAM TO CLEAN UP AND ENTER ASSEMBLY PROGRAMS INTO FILES. USES ASMTIDY MACLIB (410/3) AND *SYSMAC. COPIES *GDINFODSECT (594). 0 Referenced by comments of: 410/3 00410/002A *ASMTIDY OC G *ASMTIDY 5.1T1 302 ASMTIDY..OC.002 1 LINE 15572 9 PAGE UM TIFFANY JULY 23, 1983 10:38:13 *ASMTIDY 00410/003 *ASMTIDY MACLIB SM G LBT:ASMTIDY.MAC 5.0T1 974 ASMTIDY.MACLIB.SM.003 1 LINE 73 4 PAGE UM TIFFANY JULY 03, 1981 13:43:45 5.0T2 255 0 Macro library used for assembling (410/1). 0 Referenced by comments of: 410/1 00413/001A SYSTEM STATUS SSRTN SA G WSG:SSRTN 5.1T1 303 SYSTEM_STATUS.SSRTN.SA.001 1 LINE 73 52 PAGE UM WSG JULY 23, 1983 10:38:13 WSG.:SSRTN 0 The System Status Routine, SSRTN, computes system load (CPU, paging, disk, channel, and drum space) during every 20 seconds of system operation. It is a subroutine called by the OPERATOR job (634), the JOBS job (413/3) and the MTS $SYSTEMSTATUS CLS (413/5). It also has a separate entry point, SSFMT, which only produces the formatted output vector as printed by the LOAD command. This entry is called by the OPERATOR job (to produce the top line on the console screen) and by the 3270 %ACTIVITY command (629/4). The MASTER command can only be activated by one task at a time. When issued, it causes that task to perform the load calculation every 20 seconds updating the information in the JOBSTA vector (413/7) for use by other tasks and also logging the data via CMDSTAT as record type 8. SSRTN calls BJPMOD (650), CHECKFE (731), TASKSTAT (647), TSKFMT (019), CMDSTATS (531), and PATHDEV (818). Copies COPY:BJPDSCT (650/3), COPY:JOBSTA (413/9), COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), *CNFGINFODSECT (654), and COPY:MNTQINFDSECT (806/3). ********************************************************************** Changes since D5.0: 1. Increase the number of AUX queue entries. 2. Allow the displaying of VM of non-MTS jobs by any priv user. 1 SUN SEP 08/96 15:24:55 Page 169 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 3. More JOBSTA values for BJPMOD added. 4. Recognize the two high bits of HASP QUEPRTRT as QUEPN and QUETN if the HASP symbol $FINDJIT is undefined. If it is defined, call it to get actual JIT and use that to determine if PAGE printer or LINE printer with PN/TN/SP/ANY. This info is used in /Q cmmd. This is an upward compatible change for a new version of HASP not yet distributed. 5. In addition, if $FINDJIT is defined, then QUEPRIO is redefined so that the priority is in the low 4 bits (instead of high). In addition, a new 3-bit job class is defined in QUEPRIO. This is an upward compatible change for the latest version of HASP. 6. Changed to add a JOBSTA vector value for the disk cache size and to allow it to be displayed via /DIS CS. 7. Increase the number of parallel queue entries to 2000 to match HASP (387). Installations should change this number, the symbol MAXJOBS, to match the value of &MAXJOBS in the local HASP. If the value is too small, the SSRTN Q command will not track all HASP jobs properly; if it is too large, 12 unused bytes of shared VM are allocated for each unneeded entry. ********************************************************************** 0 Referenced by comments of: 19/1, 326/1, 326/4, 387/1, 413/3, 413/5, 413/7, 413/10, 540/10, 647/1, 650/1, 731/1, 806/1, 806/2, 806/3, 818/1 00413/002A SYSTEM STATUS SSRTN OC G # (PART OF RESIDENT SYSTEM) UM WSG 0 Object part of Resident System (468). 00413/003 SYSTEM STATUS JOBS JOB SA G S1558 5.0T1 VLO FSNAME=SYSTEM_STATUS.JOBS_JOB.SA.003(1) 976 5.0T1 976 SYSTEM_STATUS.JOBS_JOB.SA.003 1 LINE 80 3 PAGE UM WSG JULY 27, 1977 03:07:17 5.0T2 257 0 UMMPS job program named "JOBS" to interface to SSRTN (413/1) from the job program level. 0 Referenced by comments of: 413/1 00413/004 SYSTEM STATUS JOBS JOB OC G # (PART OF RESIDENT SYSTEM) UM WSG 0 Object part of Resident System (468). 00413/005A SYSTEM STATUS SYS STAT CLS SA G WSG:SSTA.CLS(1,999) 5.1T1 304 SYSTEM_STATUS.SYS_STAT_CL.SA.005 1 LINE 71 9 PAGE UM WSG JULY 23, 1983 10:38:15 0 $SYSTEMSTATUS CLS for interfacing with SSRTN (413/1) from MTS command level. Assemble with PAR=PEXIT=*PEXIT and using COPY:MTS.MACROS (344/3). ******************************************************************************** Changes since D5.0: Changed to accept mixed case input. 1 SUN SEP 08/96 15:24:55 Page 170 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ******************************************************************************** 0 Referenced by comments of: 413/1, 806/1 00413/006A SYSTEM STATUS SYS STAT CLS OC G *CLSSSTA 5.1T1 305 SYSTEM_STATUS.SYS_STAT_CL.OC.006 1 LINE 2577 1 PAGE UM WSG JULY 23, 1983 10:38:16 *CLSSSTA 0 This file is normally loaded into shared VM at IPL by pistle. 00413/007 SYSTEM STATUS JOBSTA VECTOR SA G WSG:SSTA.VEC(1,999) 5.0T1 979 SYSTEM_STATUS.JOBSTA_VECT.SA.007 1 LINE 51 1 PAGE UM WSG JULY 03, 1981 13:43:57 5.0T2 260 0 System status information vector maintained by SSRTN (413/1). Copies COPY:JOBSTA (413/9). 0 Referenced by comments of: 413/1, 540/10 00413/008A SYSTEM STATUS JOBSTA VECTOR OC G # (PART OF RESIDENT SYSTEM) UM WSG 0 This object deck should be kept in segment 0 to reduce the overhead of the SVC WAYT in SSRTN. Object part of Resident System (468). 00413/009A SYSTEM STATUS JOBSTA DSECT SA G COPY:JOBSTA 5.1T1 306 SYSTEM_STATUS.JOBSTA_DSEC.SA.009 1 LINE 71 3 PAGE UM WSG JULY 23, 1983 10:38:16 COPY:JOBSTA 0 This is the DSECT for the system status vector. 0 Referenced by comments of: 42/1, 101/1, 198/1, 387/1, 387/2, 413/1, 413/7, 540/10, 634/1, 647/1, 650/1, 731/1, 806/1, 829/1, 3024/3, 4000/37 00413/010 SYSTEM STATUS SUMMPRT SG G WSG:SUMMPRT(1,999) 5.0T1 981 SYSTEM_STATUS.SUMMPRT.SG.010 1 LINE 121 1 PAGE UM WSG JULY 03, 1981 13:43:59 5.0T2 262 WSG.:SUMMPRT 0 GOM program to print summary data collected by SSRTN (413/1). 0 Referenced by comments of: 326/1 00413/011 SYSTEM STATUS SUMMPRT OC G WSG:SUMMPRT(1000) 5.0T1 982 SYSTEM_STATUS.SUMMPRT.OC.011 1 LINE 80 2 PAGE UM WSG JULY 03, 1981 13:44:00 5.0T2 263 00413/012 SYSTEM STATUS DOCUMENTATION WF S0792 WSGFS FSNAME=SSRTN.DOC.WF 5.0T4 324 SYSTEM_STATUS.DOCUMENTATI.WF.012 1 LINE 106 3 PAGE UM WSG AUG. 09, 1981 23:04:10 5.0T10 228 0 Writeup describing the system load computation algorithm and job scheduling mechanism. (Note: this writeup is slightly out-of-date.) 1 SUN SEP 08/96 15:24:55 Page 171 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00414/001 *TAPEDUMP SA G S0792 WSGFS FSNAME=TAPEDUMP 5.0T1 983 TAPEDUMP..SA.001 1 LINE 73 10 PAGE UM WSG AUG. 29, 1980 17:33:28 5.0T2 264 0 Program to dump 7- or 9-track tapes or files. 00414/002 *TAPEDUMP OE G *TAPEDUMP 5.0T1 984 TAPEDUMP..OE.002 1 LINE 3883 3 PAGE UM WSG JULY 03, 1981 13:44:05 5.0T2 265 *TAPEDUMP 00418/001 *HBT S # (OBSOLETED BY *...*) D2T1 183 UM 00421/001 *SCN S # (OBSOLETED BY *...*) D2T1 199 UM 00422/001 FORTRAN LIBRARY SA # (OBSOLETE) D3T2 350 FORTRAN_LIBRARY.IBCOM#.SA.1 1 LINE 80 29 PAGE UM AUG. 02, 1973 02:49.57 0 Obsoleted by FIX (1002). 00436/001 GTDJMSR SA DWB:GRJTM(1,124) 5.0T1 985 GTDJMSR..SA.001 1 LINE 77 3 PAGE UM DWB JULY 03, 1981 13:44:05 5.0T2 266 0 SUBROUTINE TO CONVERT GREGORIAN TIME AND DATE TO JULIAN MICRO-SECONDS SINCE MARCH 1, 1900. SIMILAR TO GRGJULTM (518), BUT TAKES DIFFERENT ARGUMENTS. 00436/002 GTDJMSR OC # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00436/003 GTDJMSR GTDJMS SA DWB:GTDJMS(1,999) 5.0T1 986 GTDJMSR.GTDJMS.SA.003 1 LINE 77 1 PAGE UM DWB JULY 03, 1981 13:44:06 5.0T2 267 0 SUBROUTINE WITH S-TYPE CALLING SEQUENCE TO INTERFACE TO GTDJMSR. CONVERTS GREGORIAN TIME AND DATE TO JULIAN MICRO-SECONDS SINCE MARCH 1, 1900. 00436/004 GTDJMSR GTDJMS OC # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00437/001 JMSGTDR/JTUGTDR SA DWB:JMSGTDR(125,999) 5.0T1 987 JMSGTDR/JTUGTDR..SA.001 1 LINE 77 4 PAGE UM DWB JULY 03, 1981 13:44:07 5.0T2 268 0 SUBROUTINE TO CONVERT JULIAN MICRO-SECONDS TO GREGORIAN TIME AND DATE. SIMILAR TO JULGRGTM (522), BUT TAKES DIFFERENT ARGUMENTS. HAS ALTERNATE ENTRY POINT (JTUGTDR) WHICH CONVERTS JULIAN TIMER-UNITS TO GREGORIAN TIME AND DATE. THIS IS THE UBC-CORRECTED VERSION OF FEB/77 WITH A FEW ADDITIONAL UM CORRECTIONS ADDED. 1 SUN SEP 08/96 15:24:55 Page 172 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00437/002 JMSGTDR/JTUGTDR OC # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00437/003 JMSGTDR/JTUGTDR JMSGTD SA DWB:JMSGTD(1,999) 5.0T1 988 JMSGTDR/JTUGTDR.JMSGTD.SA.003 1 LINE 77 1 PAGE UM DWB JULY 03, 1981 13:44:08 5.0T2 269 0 SUBROUTINE WITH S-TYPE CALLING SEQUENCE TO INTERFACE TO JMSGTDR. 00437/004 JMSGTDR/JTUGTDR JMSGTD OC # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00437/005 JMSGTDR/JTUGTDR JTUGTD SA DWB:JTUGTD(1,999) 5.0T1 989 JMSGTDR/JTUGTDR.JTUGTD.SA.005 1 LINE 77 1 PAGE UM DWB JULY 03, 1981 13:44:08 5.0T2 270 0 SUBROUTINE WITH S-TYPE CALLING SEQUENCE TO INTERFACE TO JTUGTDR. 00437/006 JMSGTDR/JTUGTDR JTUGTD OC # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00441/001 *FILEUSE SA G # (OBSOLETE) D3T2 369 FILEUSE..SA.1 1 LINE 80 5 PAGE UM AUG. 02, 1973 02:54.05 0 Obsoleted by the FILESTATUS command (529). 00442/001 CCATL SA O CCAT FILE:CCATL(1000) 5.0T1 990 CCATL..SA.001 1 LINE 80 18 PAGE UM HELFFRICH JULY 03, 1981 13:44:09 5.0T2 271 FILE:CCATL 0 THE GENERAL OPERATION OF THIS PROGRAM IS TO ALLOCATE AN *MASTER.CATALOG0 OF THE REQUESTED SIZE AND THEN SUBALLOCATE TO THE MICAT, SYSCAT, SFCAT, AND USER CATALOG AS REQUESTED, ALLOCATING ADDITIONAL *MASTER.CATALOGN'S AS NECESSARY. AS A RESULT THE FOUR "LOGICAL PIECES" OF THE CATALOG MAY BE MADE TO ALL FALL WITHIN THE SAME EXTENT OR IN FOUR SEPARATE EXTENTS (AND VOLUMES) OR SOMEWHERE IN BETWEEN DEPENDING ON HOW THE EXTENT SIZES AND CATALOG SIZES ARE SPECIFIED. (AT UM, PUT THE MICAT, SYSCAT, AND SFCAT ON THREE SEPARATE VOLUMES TO MINIMIZE CONTENTION.) ASSEMBLE USING COPY:FILE.MACROS (482/45). SEE COMP (682/2) FOR A WRITEUP. 0 Referenced by comments of: 682/2 00442/002 CCATL OC O FILE:CCATL(1,999) 5.0T1 991 CCATL..OC.002 1 LINE 80 5 PAGE UM HELFFRICH JULY 03, 1981 13:44:13 5.0T2 272 1 SUN SEP 08/96 15:24:55 Page 173 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00443/001 FORMAT-TEXT360 CONVERTER SS S W073:FORMAT2T360 5.0T1 992 FORMAT-TEXT360_CONVERTER..SS.001 1 LINE 90 9 PAGE UM SALISBURY JULY 03, 1981 13:44:15 5.0T2 273 0 SNOBOL PROGRAM TO CONVERT INPUT FOR *FORMAT TO INPUT FOR TEXT/360. THIS PROGRAM HAS MANY LIMITATIONS AND SOME KNOWN BUGS, BUT IS USUALLY BETTER THAN RETYPING. 00444/001A MTS VOLUME 2 MASTER WT S0485 MTSV2 'MTS MANUALS' POSN=NEWM15.V2 5.1T1 307 MTS_VOLUME_2.MASTER.WT.001 1 LINE 132 306 PAGE UM MANUAL JULY 23, 1983 10:40:48 0 TEXT/360 master for Volume 2 "Public File Descriptions" of the UM MTS manuals, April 1982, updated Febraury 1983. Editor: Richard A. Salisbury 00444/002A MTS VOLUME 2 PRINT PT S0485 MTSV2 'MTS MANUALS' POSN=PRINT15.V2 5.1T1 308 MTS_VOLUME_2.PRINT.PT.002 1 LINE 132 555 PAGE UM MANUAL JULY 23, 1983 10:40:59 0 TEXT/360 PRINT FILE. 00444/003 MTS VOLUME 2 FLOWCHART P S1558 5.0T1 VLO FSNAME=MTS_VOLUME_2.FLOWCHART.P.003(1) 995 5.0T1 995 MTS_VOLUME_2.FLOWCHART.P.003 1 SEQ 133 6 PAGE UM MANUAL MAR. 26, 1979 02:54:14 5.0T2 276 0 *FLOWCHART EXAMPLE -- MUST BE PRINTED AT 8 LINES/INCH. 00444/004C MTS VOLUME 2 UPDATE 1 P W073:TNLV2.FEB83 5.1T1 309 MTS_VOLUME_2.UPDATE_1.P.004 1 LINE 80 108 PAGE UM MANUAL JULY 23, 1983 10:41:04 0 Update 1 to MTS Volume 2. 00447/001 MOUNT STATISTICS MNTSTAT SUBR SA G S1558 5.0T1 VLO FSNAME=MOUNT_STATISTICS.MNTSTAT.SA.001(1) 999 5.0T1 999 MOUNT_STATISTICS.MNTSTAT.SA.001 1 LINE 80 3 PAGE UM WSG JAN. 14, 1977 15:13:26 5.0T2 280 0 THE MOUNT STATISTICS FACILITY IS USED TO SAVE INFORMATION ABOUT MOUNTS AND ATTEMPTED MOUNTS WHICH FAIL. THIS INFORMATION IS COLLECTED VIA THE CMDSTAT FACILITY (531) AS RECORD TYPE 16. THE CMDSTAT FACILITY PERIODICALLY PLACES THE MNTSTAT RECORDS IN THE FILE SYS:MOUNTSTAT. THE SAVMS PROGRAM (447/3) SHOULD BE RUN ABOUT MONTHLY TO DUMP THE DATA FROM THIS FILE ONTO TAPE. THE SAVMS PROGRAM WILL LEAVE THE RECORD FOR THE LAST REFERENCE TO EACH RACK NUMBER IN THE FILE FOR ACCESS BY THE MSSCN PROGRAM (447/5) AND DELETE OLDER RECORDS. THE MSDEL PROGRAM (447/8) CAN BE USED TO DELETE ANY ADDITIONAL UNWANTED RECORDS AFTER SAVMS HAS BEEN RUN. MNTSTAT IS A SUBROUTINE CALLED BY THE MOUNT COMMAND (101) TO LOG STATISTICS RECORDS ABOUT EACH MOUNT REQUEST. ASSEMBLE USING COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 101/1, 101/2, 447/3, 447/8 00447/002 MOUNT STATISTICS MNTSTAT SUBR OC G # (PART OF *CLSMOUNT) UM WSG 0 Part of *CLSMOUNT (101/2). 1 SUN SEP 08/96 15:24:55 Page 174 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00447/003 MOUNT STATISTICS SAVMS PGM SA G SVMS WSG:SAVMS(1,999) 5.0T1 1000 MOUNT_STATISTICS.SAVMS_PG.SA.003 1 LINE 80 7 PAGE UM WSG JULY 03, 1981 13:47:19 5.0T2 281 WSG.:SAVMS 0 PROGRAM TO DUMP THE MOUNT STATISTICS FROM SYS:MOUNTSTAT TO TAPE. THIS PROGRAM IS RUN MONTHLY AT UM. IT COPIES ALL PREVIOUSLY UNSAVED RECORDS TO A TAPE AND THEN DELETES ALL BUT THE LAST REFERENCE(S) (WITH AND WITHOUT RING=IN) FOR EACH RACK NUMBER. AT UM, THIS LEAVES ABOUT 100 PAGES WORTH OF MOUNT STATISTICS. THIS IS DONE SO THAT AN ONLINE FILE CONTAINING THE LAST REFERENCE (AND LAST POTENTIAL CHANGE) FOR EACH TAPE IS AVAILABLE FOR THE MSSCN PROGRAM (447/5). THE FILE SYS:MOUNTSTAT MUST BE A LINE FILE. THE TAPE IS BLOCKED VB(16379,255). AT UM, WE COPY EACH MONTH'S TAPE ONTO THE END OF A LARGER TAPE, SAVING THE MOUNT STATISTICS INDEFINITELY. IT IS ADVISABLE TO OCCASIONALLY OPTIMIZE SYS:MOUNTSTAT BY COPYING IT TO ANOTHER FILE AND BACK SINCE THE PROCESS OF DELETING THE OLD RECORDS (BY SAVMS) CAUSES THE FILE TO BECOME UNOPTIMIZED. THIS PROGRAM WILL HANDLE A MIXTURE OF BOTH THE RECORDS PRODUCED BY MNTSTAT (447/1) VIA CMDSTAT AND THE OLDER RECORDS PRODUCED BY THE D3.0 TAPESTAT PROGRAM. 0 Referenced by comments of: 447/1 00447/004 MOUNT STATISTICS SAVMS PGM OC G WSG:SAVMS(1000) 5.0T1 1001 MOUNT_STATISTICS.SAVMS_PG.OC.004 1 LINE 80 2 PAGE UM WSG JULY 03, 1981 13:47:20 5.0T2 282 00447/005 MOUNT STATISTICS MSSCN PGM SA G MSSN WSG:MSSCN(1,999) 5.0T1 1002 MOUNT_STATISTICS.MSSCN_PG.SA.005 1 LINE 80 13 PAGE UM WSG JULY 03, 1981 13:47:21 5.0T2 283 WSG.:MSSCN 0 PROGRAM TO SCAN MOUNT STATISTICS RECORDS (FROM FILE OR TAPE) LOOKING FOR SPECIFIED RACK NUMBERS OR USERS FOR SPECIFIED DATE RANGES. IT PRINTS THE RECORDS ON SPRINT SORTED BY RACK NUMBER AND DATE/TIME. FOR EXAMPLE, $RUN MSSCN(1000) SCARDS=SYS:MOUNTSTAT R S0622 03-25-76 05-22-76 U WSG. 01-14-77 P ABCD R S08## $ENDFILE WILL SCAN SYS:MOUNTSTAT FOR ALL MOUNTS OF TAPE S0622 FROM 25 MAR 76 TO 22 MAY 76, FOR ALL MOUNTS BY USER WSG ON 14 JAN 77, FOR ALL MOUNTS BY PROJECT ABCD, AND FOR ALL MOUNTS OF TAPES WITH RACK NUMBERS BEGINNING WITH S08 FOLLOWED BY ANY TWO CHARACTERS. IF SCARDS IS NOT ASSIGNED, MSSCN WILL PROMPT FOR FDNAMES TO BE SCANNED. IF MORE THAN 500 RECORDS ARE LIKELY TO BE OUTPUT, THE PROGRAM SHOULD BE RUN WITH PAR=N, WHERE N IS AN UPPER BOUND (USED FOR SORTING). THIS PROGRAM WILL ALSO ACCEPT THE OLDER RECORDS PRODUCED BY THE D3.0 TAPESTAT PROGRAM (NOW OBSOLETE). 0 Referenced by comments of: 447/1, 447/3, 447/7 00447/006 MOUNT STATISTICS MSSCN PGM OC G SYS:MSSCN 5.0T1 1003 MOUNT_STATISTICS.MSSCN_PG.OC.006 1 LINE 80 3 PAGE UM WSG JULY 03, 1981 13:47:23 5.0T2 284 SYS.:MSSCN 1 SUN SEP 08/96 15:24:55 Page 175 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00447/007 MOUNT STATISTICS *MSS C *MSS 5.0T1 1004 MOUNT_STATISTICS.*MSS.C.007 1 LINE 54 1 PAGE UM WSG JULY 03, 1981 13:47:24 5.0T2 285 *MSS 0 COMMAND FILE USED BY THE OPERATORS TO RUN MSSCN (447/5). INVOKED BY ENTERING "MTS *MSS" ON THE OPERATOR'S CONSOLE. 00447/008 MOUNT STATISTICS MSDEL PGM SA G WSG:MSDEL(1,999) 5.0T1 1005 MOUNT_STATISTICS.MSDEL_PG.SA.008 1 LINE 64 2 PAGE UM WSG JULY 03, 1981 13:47:25 5.0T2 286 WSG.:MSDEL 0 PROGRAM USED TO DELETE UNWANTED RECORDS FROM THE MOUNT STATISTICS FILE SYS:MOUNTSTAT. IT ASKS FOR RACK NUMBERS TO BE DELETED, WHICH MUST BE ENTERED ONE PER LINE, FOLLOWED BY AN END-OF-FILE. IT MAKES ONE PASS THROUGH SYS:MOUNTSTAT, WHICH IS LOCKED FOR MODIFICATION, AND DELETES ANY RECORD WHICH HAS ONE OF THE SPECIFIED RACK NUMBERS. AT UM, THIS PROGRAM IS RUN PERIODICALLY TO CLEAN OUT OLD SERIES OF RACK NUMBERS TO KEEP SYS:MOUNTSTAT AT A REASONABLE SIZE. THIS PROGRAM WILL NEVER DELETE ANY RECORD WHICH HAS NOT BEEN PREVIOUSLY SAVED ON TAPE AND WILL HANDLE A FILE WHICH IS A MIXTURE OF RECORDS PRODUCED BY MNTSTAT (447/1) AND THE D3.0 TAPESTAT PROGRAM (NOW OBSOLETE). 0 Referenced by comments of: 447/1 00447/009 MOUNT STATISTICS MSDEL PGM OC G WSG:MSDEL(1000) 5.0T1 1006 MOUNT_STATISTICS.MSDEL_PG.OC.009 1 LINE 80 2 PAGE UM WSG JULY 03, 1981 13:47:26 5.0T2 287 00447/010 MOUNT STATISTICS SYS:MOUNTSTAT D # SYS:MOUNTSTAT UM WSG SYS:MOUNTSTAT@E 00449/001 *DEB S # (OBSOLETE) D2T1 341 UM 0 Obsoleted by *SORT (303/4). 00451/001 CATALOG VERIFY - VNTD # (PART OF FILE SYSTEM RECOVERY) UM 0 Part of File System Recovery (682/18). 00453/001 DRUM INIT SA # (OBSOLETE) D4T1 994 UM 0 STAND ALONE PROGRAM TO FORMAT DRUMS. 00455/001 DBS:MAC SM # (OBSOLETE) D3T3 17 DBS:MAC..SM. 1 LINE 66 3 PAGE UM AUG. 01, 1973 18:21.38 00456/001 *CONFIG SA # (OBSOLETE) D2T1 318 UM 1 SUN SEP 08/96 15:24:55 Page 176 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00457/001 TPSBUFFER SA # (OBSOLETE) D2T1 147 UM 00458/001 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.001(1) 1007 5.0T1 1007 OLTEP.21.7_SOURCE.SA.001 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:47:54 5.0T3 1 0 (458/1) THROUGH (458/76) CONTAIN THE SOURCE FOR OS/360 RELEASE 21.7 OLTEP. THIS IS ASSEMBLED WITH *OSMAC (193) AND OLTEPMACLIB (458/77). OLTEP IS RUN UNDER FAKEOS. SEE (545). 0 Referenced by comments of: 338/1, 458/1 00458/002 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.002(1) 1008 5.0T1 1008 OLTEP.21.7_SOURCE.SA.002 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:47:55 5.0T3 2 00458/003 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.003(1) 1009 5.0T1 1009 OLTEP.21.7_SOURCE.SA.003 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:47:56 5.0T3 3 00458/004 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.004(1) 1010 5.0T1 1010 OLTEP.21.7_SOURCE.SA.004 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:47:57 5.0T3 4 00458/005 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.005(1) 1011 5.0T1 1011 OLTEP.21.7_SOURCE.SA.005 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:47:58 5.0T3 5 00458/006 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.006(1) 1012 5.0T1 1012 OLTEP.21.7_SOURCE.SA.006 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:47:59 5.0T3 6 00458/007 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.007(1) 1013 5.0T1 1013 OLTEP.21.7_SOURCE.SA.007 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:48:00 5.0T3 7 00458/008 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.008(1) 1014 5.0T1 1014 OLTEP.21.7_SOURCE.SA.008 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:01 5.0T3 8 00458/009 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.009(1) 1015 5.0T1 1015 OLTEP.21.7_SOURCE.SA.009 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:02 5.0T3 9 00458/010 OLTEP 21.7 SOURCE SA G S1558 5.0T1 VLO FSNAME=OLTEP.21.7_SOURCE.SA.010(1) 1016 5.0T1 1016 OLTEP.21.7_SOURCE.SA.010 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:03 5.0T3 10 00458/011 OLTEP 21.7 SOURCE SA G S0710 OLTEP 11 5.0T1 1017 OLTEP.21.7_SOURCE.SA.011 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:04 5.0T3 11 1 SUN SEP 08/96 15:24:55 Page 177 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/012 OLTEP 21.7 SOURCE SA G S0710 OLTEP 12 5.0T1 1018 OLTEP.21.7_SOURCE.SA.012 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:05 5.0T3 12 00458/013 OLTEP 21.7 SOURCE SA G S0710 OLTEP 13 5.0T1 1019 OLTEP.21.7_SOURCE.SA.013 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:06 5.0T3 13 00458/014 OLTEP 21.7 SOURCE SA G S0710 OLTEP 14 5.0T1 1020 OLTEP.21.7_SOURCE.SA.014 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:07 5.0T3 14 00458/015 OLTEP 21.7 SOURCE SA G S0710 OLTEP 15 5.0T1 1021 OLTEP.21.7_SOURCE.SA.015 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:48:08 5.0T3 15 00458/016 OLTEP 21.7 SOURCE SA G S0710 OLTEP 16 5.0T1 1022 OLTEP.21.7_SOURCE.SA.016 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:09 5.0T3 16 00458/017 OLTEP 21.7 SOURCE SA G S0710 OLTEP 17 5.0T1 1023 OLTEP.21.7_SOURCE.SA.017 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:10 5.0T3 17 00458/018 OLTEP 21.7 SOURCE SA G S0710 OLTEP 18 5.0T1 1024 OLTEP.21.7_SOURCE.SA.018 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:48:11 5.0T3 18 00458/019 OLTEP 21.7 SOURCE SA G S0710 OLTEP 19 5.0T1 1025 OLTEP.21.7_SOURCE.SA.019 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:12 5.0T3 19 00458/020 OLTEP 21.7 SOURCE SA G S0710 OLTEP 20 5.0T1 1026 OLTEP.21.7_SOURCE.SA.020 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:14 5.0T3 20 00458/021 OLTEP 21.7 SOURCE SA G S0710 OLTEP 21 5.0T1 1027 OLTEP.21.7_SOURCE.SA.021 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:15 5.0T3 21 00458/022 OLTEP 21.7 SOURCE SA G S0710 OLTEP 22 5.0T1 1028 OLTEP.21.7_SOURCE.SA.022 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:16 5.0T3 22 00458/023 OLTEP 21.7 SOURCE SA G S0710 OLTEP 23 5.0T1 1029 OLTEP.21.7_SOURCE.SA.023 1 SEQ 80 1 PAGE UM MTA JULY 03, 1981 13:48:17 5.0T3 23 00458/024 OLTEP 21.7 SOURCE SA G S0710 OLTEP 24 5.0T1 1030 OLTEP.21.7_SOURCE.SA.024 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:18 5.0T3 24 1 SUN SEP 08/96 15:24:55 Page 178 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/025 OLTEP 21.7 SOURCE SA G S0710 OLTEP 25 5.0T1 1031 OLTEP.21.7_SOURCE.SA.025 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 13:48:19 5.0T3 25 00458/026 OLTEP 21.7 SOURCE SA G S0710 OLTEP 26 5.0T1 1032 OLTEP.21.7_SOURCE.SA.026 1 SEQ 80 12 PAGE UM MTA JULY 03, 1981 13:48:21 5.0T3 26 00458/027 OLTEP 21.7 SOURCE SA G S0710 OLTEP 27 5.0T1 1033 OLTEP.21.7_SOURCE.SA.027 1 SEQ 80 35 PAGE UM MTA JULY 03, 1981 13:48:23 5.0T3 27 00458/028 OLTEP 21.7 SOURCE SA G S0710 OLTEP 28 5.0T1 1034 OLTEP.21.7_SOURCE.SA.028 1 SEQ 80 19 PAGE UM MTA JULY 03, 1981 13:48:25 5.0T3 28 00458/029 OLTEP 21.7 SOURCE SA G S0710 OLTEP 29 5.0T1 1035 OLTEP.21.7_SOURCE.SA.029 1 SEQ 80 24 PAGE UM MTA JULY 03, 1981 13:48:27 5.0T3 29 00458/030 OLTEP 21.7 SOURCE SA G S0710 OLTEP 30 5.0T1 1036 OLTEP.21.7_SOURCE.SA.030 1 SEQ 80 12 PAGE UM MTA JULY 03, 1981 13:48:29 5.0T3 30 00458/031 OLTEP 21.7 SOURCE SA G S0710 OLTEP 31 5.0T1 1037 OLTEP.21.7_SOURCE.SA.031 1 SEQ 80 26 PAGE UM MTA JULY 03, 1981 13:48:31 5.0T3 31 00458/032 OLTEP 21.7 SOURCE SA G S0710 OLTEP 32 5.0T1 1038 OLTEP.21.7_SOURCE.SA.032 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 13:48:33 5.0T3 32 00458/033 OLTEP 21.7 SOURCE SA G S0710 OLTEP 33 5.0T1 1039 OLTEP.21.7_SOURCE.SA.033 1 SEQ 80 23 PAGE UM MTA JULY 03, 1981 13:48:35 5.0T3 33 00458/034 OLTEP 21.7 SOURCE SA G S0710 OLTEP 34 5.0T1 1040 OLTEP.21.7_SOURCE.SA.034 1 SEQ 80 21 PAGE UM MTA JULY 03, 1981 13:48:37 5.0T3 34 00458/035 OLTEP 21.7 SOURCE SA G S0710 OLTEP 35 5.0T1 1041 OLTEP.21.7_SOURCE.SA.035 1 SEQ 80 8 PAGE UM MTA JULY 03, 1981 13:48:38 5.0T3 35 00458/036 OLTEP 21.7 SOURCE SA G S0710 OLTEP 36 5.0T1 1042 OLTEP.21.7_SOURCE.SA.036 1 SEQ 80 7 PAGE UM MTA JULY 03, 1981 13:48:39 5.0T3 36 00458/037 OLTEP 21.7 SOURCE SA G S0710 OLTEP 37 5.0T1 1043 OLTEP.21.7_SOURCE.SA.037 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 13:48:40 5.0T3 37 1 SUN SEP 08/96 15:24:55 Page 179 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/038 OLTEP 21.7 SOURCE SA G S0710 OLTEP 38 5.0T1 1044 OLTEP.21.7_SOURCE.SA.038 1 SEQ 80 9 PAGE UM MTA JULY 03, 1981 13:48:42 5.0T3 38 00458/039 OLTEP 21.7 SOURCE SA G S0710 OLTEP 39 5.0T1 1045 OLTEP.21.7_SOURCE.SA.039 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 13:48:43 5.0T3 39 00458/040 OLTEP 21.7 SOURCE SA G S0710 OLTEP 40 5.0T1 1046 OLTEP.21.7_SOURCE.SA.040 1 SEQ 80 16 PAGE UM MTA JULY 03, 1981 13:48:45 5.0T3 40 00458/041 OLTEP 21.7 SOURCE SA G S0710 OLTEP 41 5.0T1 1047 OLTEP.21.7_SOURCE.SA.041 1 SEQ 80 8 PAGE UM MTA JULY 03, 1981 13:48:46 5.0T3 41 00458/042 OLTEP 21.7 SOURCE SA G S0710 OLTEP 42 5.0T1 1048 OLTEP.21.7_SOURCE.SA.042 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 13:48:47 5.0T3 42 00458/043 OLTEP 21.7 SOURCE SA G S0710 OLTEP 43 5.0T1 1049 OLTEP.21.7_SOURCE.SA.043 1 SEQ 80 37 PAGE UM MTA JULY 03, 1981 13:48:49 5.0T3 43 00458/044 OLTEP 21.7 SOURCE SA G S0710 OLTEP 44 5.0T1 1050 OLTEP.21.7_SOURCE.SA.044 1 SEQ 80 17 PAGE UM MTA JULY 03, 1981 13:48:51 5.0T3 44 00458/045 OLTEP 21.7 SOURCE SA G S0710 OLTEP 45 5.0T1 1051 OLTEP.21.7_SOURCE.SA.045 1 SEQ 80 15 PAGE UM MTA JULY 03, 1981 13:48:53 5.0T3 45 00458/046 OLTEP 21.7 SOURCE SA G S0710 OLTEP 46 5.0T1 1052 OLTEP.21.7_SOURCE.SA.046 1 SEQ 80 31 PAGE UM MTA JULY 03, 1981 13:48:55 5.0T3 46 00458/047 OLTEP 21.7 SOURCE SA G S0710 OLTEP 47 5.0T1 1053 OLTEP.21.7_SOURCE.SA.047 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:48:56 5.0T3 47 00458/048 OLTEP 21.7 SOURCE SA G S0710 OLTEP 48 5.0T1 1054 OLTEP.21.7_SOURCE.SA.048 1 SEQ 80 12 PAGE UM MTA JULY 03, 1981 13:48:58 5.0T3 48 00458/049 OLTEP 21.7 SOURCE SA G S0710 OLTEP 49 5.0T1 1055 OLTEP.21.7_SOURCE.SA.049 1 SEQ 80 15 PAGE UM MTA JULY 03, 1981 13:48:59 5.0T3 49 00458/050 OLTEP 21.7 SOURCE SA G S0710 OLTEP 50 5.0T1 1056 OLTEP.21.7_SOURCE.SA.050 1 SEQ 80 10 PAGE UM MTA JULY 03, 1981 13:49:01 5.0T3 50 1 SUN SEP 08/96 15:24:55 Page 180 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/051 OLTEP 21.7 SOURCE SA G S0710 OLTEP 51 5.0T1 1057 OLTEP.21.7_SOURCE.SA.051 1 SEQ 80 5 PAGE UM MTA JULY 03, 1981 13:49:02 5.0T3 51 00458/052 OLTEP 21.7 SOURCE SA G S0710 OLTEP 52 5.0T1 1058 OLTEP.21.7_SOURCE.SA.052 1 SEQ 80 24 PAGE UM MTA JULY 03, 1981 13:49:04 5.0T3 52 00458/053 OLTEP 21.7 SOURCE SA G S0710 OLTEP 53 5.0T1 1059 OLTEP.21.7_SOURCE.SA.053 1 SEQ 80 27 PAGE UM MTA JULY 03, 1981 13:49:06 5.0T3 53 00458/054 OLTEP 21.7 SOURCE SA G S0710 OLTEP 54 5.0T1 1060 OLTEP.21.7_SOURCE.SA.054 1 SEQ 80 24 PAGE UM MTA JULY 03, 1981 13:49:08 5.0T3 54 00458/055 OLTEP 21.7 SOURCE SA G S0710 OLTEP 55 5.0T1 1061 OLTEP.21.7_SOURCE.SA.055 1 SEQ 80 33 PAGE UM MTA JULY 03, 1981 13:49:10 5.0T3 55 00458/056 OLTEP 21.7 SOURCE SA G S0710 OLTEP 56 5.0T1 1062 OLTEP.21.7_SOURCE.SA.056 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 13:49:12 5.0T3 56 00458/057 OLTEP 21.7 SOURCE SA G S0710 OLTEP 57 5.0T1 1063 OLTEP.21.7_SOURCE.SA.057 1 SEQ 80 39 PAGE UM MTA JULY 03, 1981 13:49:15 5.0T3 57 00458/058 OLTEP 21.7 SOURCE SA G S0710 OLTEP 58 5.0T1 1064 OLTEP.21.7_SOURCE.SA.058 1 SEQ 80 32 PAGE UM MTA JULY 03, 1981 13:49:17 5.0T3 58 00458/059 OLTEP 21.7 SOURCE SA G S0710 OLTEP 59 5.0T1 1065 OLTEP.21.7_SOURCE.SA.059 1 SEQ 80 21 PAGE UM MTA JULY 03, 1981 13:49:19 5.0T3 59 00458/060 OLTEP 21.7 SOURCE SA G S0710 OLTEP 60 5.0T1 1066 OLTEP.21.7_SOURCE.SA.060 1 SEQ 80 20 PAGE UM MTA JULY 03, 1981 13:49:21 5.0T3 60 00458/061 OLTEP 21.7 SOURCE SA G S0710 OLTEP 61 5.0T1 1067 OLTEP.21.7_SOURCE.SA.061 1 SEQ 80 18 PAGE UM MTA JULY 03, 1981 13:49:23 5.0T3 61 00458/062 OLTEP 21.7 SOURCE SA G S0710 OLTEP 62 5.0T1 1068 OLTEP.21.7_SOURCE.SA.062 1 SEQ 80 8 PAGE UM MTA JULY 03, 1981 13:49:24 5.0T3 62 00458/063 OLTEP 21.7 SOURCE SA G S0710 OLTEP 63 5.0T1 1069 OLTEP.21.7_SOURCE.SA.063 1 SEQ 80 10 PAGE UM MTA JULY 03, 1981 13:49:26 5.0T3 63 1 SUN SEP 08/96 15:24:55 Page 181 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/064 OLTEP 21.7 SOURCE SA G S0710 OLTEP 64 5.0T1 1070 OLTEP.21.7_SOURCE.SA.064 1 SEQ 80 12 PAGE UM MTA JULY 03, 1981 13:49:27 5.0T3 64 00458/065 OLTEP 21.7 SOURCE SA G S0710 OLTEP 65 5.0T1 1071 OLTEP.21.7_SOURCE.SA.065 1 SEQ 80 38 PAGE UM MTA JULY 03, 1981 13:49:30 5.0T3 65 00458/066 OLTEP 21.7 SOURCE SA G S0710 OLTEP 66 5.0T1 1072 OLTEP.21.7_SOURCE.SA.066 1 SEQ 80 7 PAGE UM MTA JULY 03, 1981 13:49:32 5.0T3 66 00458/067 OLTEP 21.7 SOURCE SA G S0710 OLTEP 67 5.0T1 1073 OLTEP.21.7_SOURCE.SA.067 1 SEQ 80 3 PAGE UM MTA JULY 03, 1981 13:49:33 5.0T3 67 00458/068 OLTEP 21.7 SOURCE SA G S0710 OLTEP 68 5.0T1 1074 OLTEP.21.7_SOURCE.SA.068 1 SEQ 80 19 PAGE UM MTA JULY 03, 1981 13:49:34 5.0T3 68 00458/069 OLTEP 21.7 SOURCE SA G S0710 OLTEP 69 5.0T1 1075 OLTEP.21.7_SOURCE.SA.069 1 SEQ 80 13 PAGE UM MTA JULY 03, 1981 13:49:36 5.0T3 69 00458/070 OLTEP 21.7 SOURCE SA G S0710 OLTEP 70 5.0T1 1076 OLTEP.21.7_SOURCE.SA.070 1 SEQ 80 15 PAGE UM MTA JULY 03, 1981 13:49:37 5.0T3 70 00458/071 OLTEP 21.7 SOURCE SA G S0710 OLTEP 71 5.0T1 1077 OLTEP.21.7_SOURCE.SA.071 1 SEQ 80 24 PAGE UM MTA JULY 03, 1981 13:49:39 5.0T3 71 00458/072 OLTEP 21.7 SOURCE SA G S0710 OLTEP 72 5.0T1 1078 OLTEP.21.7_SOURCE.SA.072 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 13:49:41 5.0T3 72 00458/073 OLTEP 21.7 SOURCE SA G S0710 OLTEP 73 5.0T1 1079 OLTEP.21.7_SOURCE.SA.073 1 SEQ 80 2 PAGE UM MTA JULY 03, 1981 13:49:42 5.0T3 73 00458/074 OLTEP 21.7 SOURCE SA G S0710 OLTEP 74 5.0T1 1080 OLTEP.21.7_SOURCE.SA.074 1 SEQ 80 21 PAGE UM MTA JULY 03, 1981 13:49:44 5.0T3 74 00458/075 OLTEP 21.7 SOURCE SA G S0710 OLTEP 75 5.0T1 1081 OLTEP.21.7_SOURCE.SA.075 1 SEQ 80 26 PAGE UM MTA JULY 03, 1981 13:49:46 5.0T3 75 00458/076 OLTEP 21.7 SOURCE SA G S0710 OLTEP 76 5.0T1 1082 OLTEP.21.7_SOURCE.SA.076 1 SEQ 80 9 PAGE UM MTA JULY 03, 1981 13:49:48 5.0T3 76 0 Referenced by comments of: 458/1 1 SUN SEP 08/96 15:24:55 Page 182 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/077 OLTEP OLTEPMACLIB SM G S0938 FSAVE2 VLO FSNAME=OLTEPMACLIB(1) 5.0T1 1083 OLTEP.OLTEPMACLIB.SM.077 1 LINE 72 56 PAGE UM MTA SEP. 23, 1975 00:49:30 5.0T3 77 0 MACROS, SOME OF WHICH ARE USED BY OLTEP -- NOT SURE WHICH MACROS ARE NOT NEEDED. 0 Referenced by comments of: 458/1 00458/078 OLTEP OBJECT OC G ETC:OLTEP 5.0T1 1084 OLTEP.OBJECT.OC.078 1 SEQ 920 2 PAGE UM MTA JULY 03, 1981 13:50:10 5.0T3 78 ETC.:OLTEP 0 OBJECT FOR OLTEP MAIN PROGRAM AND IFDOLT59, WHICH IS INCLUDED TO GET THE RIGHT DEFINITION OF SOME MULTIPLY DEFINED SYMBOLS. 00458/079 OLTEP OLTEPLIB OL G ETC:OLTEPLIB 5.0T1 1085 OLTEP.OLTEPLIB.OL.079 1 LINE 2572 64 PAGE UM MTA JULY 03, 1981 13:50:11 5.0T3 79 ETC.:OLTEPLIB 0 OBJECT LIBRARY FOR THE REST OF OLTEP. SOME MODULES WHICH ARE NOT USED IN MTS ARE INCLUDED. THE FOLLOWING PATCHES ARE INCLUDED BECAUSE THESE MODULES USE MACROS WHICH ARE NOT IN *OSMAC (193): TO IFDOLT20: REP 000000 0141F00020,07FE TO IFDOLT22: REP 000386 014700 HAS OTHER PATCHES AS WELL. 0 Referenced by comments of: 458/80 00458/080 OLTEP OLTEPBLDLIN D G MTA:OLTEPBLDLIN 5.0T1 1086 OLTEP.OLTEPBLDLIN.D.080 1 LINE 60 1 PAGE UM MTA JULY 03, 1981 13:50:16 5.0T3 80 MTA:OLTEPBLDLIN 0 INPUT TO CREBLDL (545/43) FOR OLTEP. CONTAINS ENTRIES FOR THINGS IN OLTEPLIB (458/79), BUT NOT OLTEPCDSLIB (458/86) OR OLTEPTSTLIB (458/82). 0 Referenced by comments of: 458/81 00458/081 OLTEP OLTEPBLDL D G ETC:OLTEPBLDL 5.0T1 1087 OLTEP.OLTEPBLDL.D.081 1 SEQ 242 11 PAGE UM MTA JULY 03, 1981 13:50:17 5.0T3 81 ETC:OLTEPBLDL 0 BLDL INFO FOR OLTEP. CREATED BY CREBLDL (545/43) USING (458/80), (458/83), AND (458/85) AS INPUT. 00458/082 OLTEP OLTEPTSTLIB OL G MTS.:TST.OLTEPTST 5.0T1 1088 OLTEP.OLTEPTSTLIB.OL.082 1 LINE 26386 249 PAGE UM MTA JULY 03, 1981 13:50:18 5.0T3 82 ETC:OLTEPTSTLIB 0 OBJECT LIBRARY FOR TEST SECTIONS AND CDS (CONFIGURATION DATA SET) MODULES. INCLUDES TESTS FOR: 2400, 2301, 2540, 2541, 2501, 1403, 2305, 2671, 2835, 3270, AND 3274. ALSO INCLUDES SOSP FOR USE IN BUILDING CDS ENTRIES AND RETRIEVING TEST SECTIONS FROM THE OLTSEP TAPE. SOSP IS VERSION 8.0. TO ADD NEW TEST SECTIONS, SIMPLY PUT THEM IN THIS LIBRARY AND ADD A LINE FOR EACH TO 1 SUN SEP 08/96 15:24:55 Page 183 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 OLTEPTSTBLDL (458/83) (AND RUN IT THROUGH CREBLDL). EACH TEST SECTION MUST HAVE AN ENTRY WITH THE SAME NAME AS THE SECTION (E.G. T2400A). ***************************************************************** Contains REP cards. ***************************************************************** 0 Referenced by comments of: 458/80, 458/83 00458/083 OLTEP OLTEPTSTBLDL D MTA:OLTEPTSTBLDL 5.0T1 1089 OLTEP.OLTEPTSTBLDL.D.083 1 LINE 60 7 PAGE UM MTA JULY 03, 1981 13:50:37 5.0T3 83 0 INPUT TO CREBLDL (545/43) FOR (458/82). 0 Referenced by comments of: 458/81, 458/82 00458/084 OLTEP OLTEPCDS D MTA:OLTEPCDS 5.0T1 1090 OLTEP.OLTEPCDS.D.084 1 LINE 81 10 PAGE UM MTA JULY 03, 1981 13:50:39 5.0T3 84 0 Input to CDS create program (458/90) to produce a CDS for the UM hardware configuration. 0 Referenced by comments of: 458/86, 458/89 00458/085 OLTEP OLTEPCDSBLDL D MTA:OLTEPCDSBLDL 5.0T1 1091 OLTEP.OLTEPCDSBLDL.D.085 1 LINE 60 16 PAGE UM MTA AUG. 05, 1981 02:30:37 5.0T3 85 0 Input to CREBLDL (545/43) for the UM configuration cds. This file was created by OLTEPOBJCVT (458/88) reading the output of OLTEPCRECDS (458/90). 0 Referenced by comments of: 458/81 00458/086 OLTEP OLTEPCDSLIB OL G ETC:OLTEPCDSLIB 5.0T1 1092 OLTEP.OLTEPCDSLIB.OL.086 1 LINE 10404 31 PAGE UM MTA JULY 03, 1981 13:50:44 5.0T3 86 ETC.:OLTEPCDSLIB 0 Library of CDS entries for the UM configuration produced by OLTEPCRECDS (458/90) reading OLTEPCDS (458/84). 0 Referenced by comments of: 458/80 00458/087 OLTEP OLTEPOBJCVT SA O MTA:OLTEPOBJCVT(1,999) 5.0T1 1093 OLTEP.OLTEPOBJCVT.SA.087 1 LINE 72 3 PAGE UM MTA JULY 03, 1981 13:50:48 5.0T3 87 0 PROGRAM TO CONVERT OLTSEP, OLTEP, OR CDS DECKS WITH OR WITHOUT OS LINKEDIT CONTROL CARDS TO MTS FORMAT AND PRODUCE INPUT TO CREBLDL FOR THEM. THE INPUT IS READ FROM SCARDS; THE MTS OBJECT DECKS ARE WRITTEN ON SPUNCH; A PROTOTYPE BLDL RECORD IS READ FROM UNIT 0; AND BLDL OUTPUT RECORDS WITH CORRECT NAME AND LENGTH ARE WRITTEN ON UNIT 1. 1 SUN SEP 08/96 15:24:55 Page 184 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00458/088 OLTEP OLTEPOBJCVT OC O MTA:OLTEPOBJCVT(1000) 5.0T1 1094 OLTEP.OLTEPOBJCVT.OC.088 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 13:50:49 5.0T3 88 0 Referenced by comments of: 458/85 00458/089 OLTEP CDS CREATE PGM SA G MTA:OLTEPCRECDS(1,999) 5.0T1 1095 OLTEP.CDS_CREATE_PGM.SA.089 1 LINE 72 4 PAGE UM MTA JULY 03, 1981 13:50:51 5.0T3 89 0 PROGRAM TO READ CDS DEFINITION CARDS, E.G. (458/84), AND PRODUCE DECKS FOR THE CDS MODULES ON SPUNCH. ASSEMBLE USING OLD:CC.MACROS (1054/4) AND *SYSMAC. 00458/090 OLTEP CDS CREATE PGM OC G MTA:OLTEPCRECDS(1000) 5.0T1 1096 OLTEP.CDS_CREATE_PGM.OC.090 1 LINE 80 4 PAGE UM MTA JULY 03, 1981 13:50:54 5.0T3 90 0 Referenced by comments of: 458/84, 458/85, 458/86 00458/091 OLTEP OLTEPCMD C MTA:OLTEPCMD 5.0T1 1097 OLTEP.OLTEPCMD.C.091 1 LINE 124 1 PAGE UM MTA JULY 03, 1981 13:50:55 5.0T3 91 MTA.:OLTEPCMD 0 THE FOLLOWING PROCEDURES SHOULD BE USED FOR RELEASE 21.7 OLTEP. TO RUN OLTEP, ISSUE THE FOLLOWING COMMAND: $SOURCE OLTEPCMD WHERE OLTEPCMD IS (458/91) MODIFIED FOR LOCAL FILE NAMES. THIS WILL LOAD THE SPECIAL VERSION OF FAKEOS AND START OLTEP WITH THE COMMENT "IFD102I OLTS RUNNING" BEING PRINTED. FURTHER OPERATOR COMMUNICATION WITH OLTEP IS DESCRIBED IN THE IBM MANUAL (FORM GC28-6650-6) ON PAGES 41-47. THE OPERATION OF OLTEP IN MTS IS AS DESCRIBED IN THIS MANUAL EXCEPT FOR THE FOLLOWING: 1. PAGES 1-40 DESCRIBE HOW TO INSTALL AND INVOKE OLTEP IN OS AND ARE IRRELEVANT. 2. THE PROCEDURE REQUIRED TO INTERRUPT A TEST IS TO PRESS THE ATTENTION KEY. 3. ALL COMMUNICATION IS VIA THE TERMINAL, NOT THE OPERATOR'S CONSOLE. 4. IT IS NOT NECESSARY TO TYPE "R 00,'XXX'", SINCE "XXX" IS TREATED IN EXACTLY THE SAME WAY. 5. THE PRINTED OUTPUT FROM OLTEP (REFERED TO AS THE DIAGMSG DD IN THE MANUAL) WILL BE PUT IN THE TEMPORARY FILE -DIAG WHICH MAY BE COPIED TO *PRINT* AFTER OLTEP TERMINATES. 0 Referenced by comments of: 458/91 00459/001 *ICSERIES S # (OBSOLETE) D2T2 155 UM 00460/001 WIREWRAP TEST # (OBSOLETE) D2T2 156 UM 1 SUN SEP 08/96 15:24:55 Page 185 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/001A DISTRIBUTION *DEDIT MAIN SA G WSG:DEDIT 5.1T1 310 DISTRIBUTION.?DEDIT_MAIN.SA.001 1 LINE 74 71 PAGE UM WSG JULY 23, 1983 10:41:09 0 Distribution driver file editor used to construct and edit driver files. Copies COPY:DRDSECT (461/6) and *CNFGINFODSECT (654). Assemble with PAR=PEXIT=*PEXIT. ******************************************************************************** Changes since D5.0: 1. Bug fixed which could cause errors when using the MOVE command. 2. Changed to page number output listings. 3. REVL= on FOR, LIST, and PLIST commands now restricts the search to the specified revision level(s), rather that including all components with the specified levels. 4. Added a HELP/EXPLAIN command which uses a help file (461/5). 5. Added VISUAL command (461/2). Use HELP command for documentation. 6. Modified FIXINTB, CREFFIX, et al to fix several bugs which caused component cross referencess to be incorrect under some obscure circumstances especially with the DELETE and MERGE commands. 7. Add SET WARNING=ÈON|OFF¼ to control printing of various warning messages. Default is WARN=ON. 8. Modified CREFFIX routine to print (if WARN=ON) what changes in component cross references have been made each time the COMMENT command is used. This will show what references to other components were added and deleted, as well as the name, subcomponent name, and type of the component to which the reference was added or deleted. D5.1 version: 9. More bugs fixed in component cross reference code. 10. Some error messages improved. 11. Bugs fixed in "/name" processing, both non-visual and visual (461/2). 0 Referenced by comments of: 461/2, 461/3, 461/6, 528/10 00461/002A DISTRIBUTION *DEDIT VIS CMD SG G WSG:DEDIT.VIS.SG 5.1T1 311 DISTRIBUTION.?DEDIT_VIS_C.SG.002 1 LINE 166 9 PAGE UM WSG JULY 23, 1983 10:41:11 0 GOM subroutine called by DEDIT (461/1) to implement the VISUAL command. Calls the Screen Support Routines (811). Object is part of *DEDIT (461/3). ****************************************************************** Changes since D5.0: Changed for new version of the Screen Support Routines. ****************************************************************** 0 Referenced by comments of: 461/1, 461/3 1 SUN SEP 08/96 15:24:55 Page 186 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/003A DISTRIBUTION *DEDIT OBJECT OE G *DEDIT 5.1T1 312 DISTRIBUTION.?DEDIT_OBJEC.OE.003 1 LINE 19462 17 PAGE UM WSG JULY 23, 1983 10:41:12 *DEDIT 0 Object for (461/1) + (461/2). 0 Referenced by comments of: 461/2 00461/004C DISTRIBUTION *DEDIT HELP WF WSG:DEDIT.WF 5.1T1 313 DISTRIBUTION.?DEDIT_HELP.WF.004 1 LINE 75 11 PAGE UM WSG JULY 23, 1983 10:41:13 0 *FORMAT input for *DEDIT help file. This file should be run through *FORMAT to produce ETC:DEDIT.HELP (461/5). ******************************************************************** For D5.1: Minor text corrections. 00461/005C DISTRIBUTION *DEDIT HELP PF ETC:DEDIT.HELP 5.1T1 314 DISTRIBUTION.?DEDIT_HELP.PF.005 1 LINE 76 11 PAGE UM WSG JULY 23, 1983 10:41:13 ETC:DEDIT.HELP 0 File containing the text used by the *DEDIT help and explain commands. 0 Referenced by comments of: 461/1, 461/4 00461/006 DISTRIBUTION DRIVER DSECT SA G COPY:DRDSECT 5.0T1 1099 DISTRIBUTION.DRIVER_DSECT.SA.004 1 LINE 72 1 PAGE UM WSG JULY 03, 1981 13:50:57 5.0T3 93 COPY:DRDSECT 0 Copy section for the driver file DSECT used by *FS (548) and *DEDIT (461/1). It defines the structure of a distribution driver file record. 0 Referenced by comments of: 461/1, 548/1 00461/007A DISTRIBUTION DRIVERSCAN SS G DIST:DRIVERSCN.SS 5.1T1 315 DISTRIBUTION.DRIVERSCAN.SS.007 1 LINE 75 5 PAGE UBC BERRYMAN WSG JULY 23, 1983 10:41:15 0 Source for a Spitbol program that scans a distribution driver file and prints a list of component numbers that aren't in it. The program also performs a number of simple checks on component names, subcomponent names, component numbers, and subcomponent numbers. It will also verify that all of the files referenced exist and can be read. It uses the ACCESS function (461/8) to check for read access. ******************************************************************* D5.1 version: All known bugs fixed. 0 Referenced by comments of: 461/8, 461/9 1 SUN SEP 08/96 15:24:55 Page 187 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/008 DISTRIBUTION DRVSCAN ACCESS SA G S1558 5.0T1 VLO FSNAME=DISTRIBUTION.DRVSCAN_ACCE.SA.010(1) 1102 5.0T1 1102 DISTRIBUTION.DRVSCAN_ACCE.SA.010 1 LINE 72 3 PAGE UBC BERRYMAN WSG JULY 03, 1981 13:51:01 5.0T3 96 0 Spitbol interface to CHKFILE. Used by DRIVERSCAN (461/7). Object is part of (461/9). 0 Referenced by comments of: 461/7, 461/9 00461/009A DISTRIBUTION DRIVERSCAN OC G DIST:DRIVERSCAN 5.1T1 316 DISTRIBUTION.DRIVERSCAN.OC.009 1 LINE 9776 6 PAGE UBC BERRYMAN WSG JULY 23, 1983 10:41:15 DIST:DRIVERSCAN 0 Object for (461/7) is at line 1; object for (461/8) is at line -1000. Contains a $CONTINUE WITH *SPITLIB record. 0 Referenced by comments of: 461/8 00461/010C DISTRIBUTION DATECHK SS G DIST:DATECHK.SS 5.1T1 317 DISTRIBUTION.DATECHK.SS.010 1 LINE 126 3 PAGE UM WSG JULY 23, 1983 10:41:16 0 Source for a Spitbol program to read through a driver file and look at components which DO NOT have a revision level on a specified list and, if the component is located in a file, to check the last change date of the file and compare it with the date the component was last distributed, reporting those files which have changed since the last distribution but which don't have a revision level and are thus not scheduled for distribution. Calls the LSTCHG function (461/11). Object part of (461/12). 0 Referenced by comments of: 461/11, 461/12 00461/011C DISTRIBUTION DATECHK LSTCHG SA G DIST:DATECHK.SA 5.1T1 318 DISTRIBUTION.DATECHK_LSTC.SA.011 1 LINE 67 1 PAGE UM WSG JULY 23, 1983 10:41:16 0 Asm source for the LSTCHG function used by DATECHK (461/10) to obtain the last change date of a specified file. Object part of (461/12). 0 Referenced by comments of: 461/10, 461/12 00461/012C DISTRIBUTION DATECHK OE G DIST:DATECHK 5.1T1 319 DISTRIBUTION.DATECHK.OE.012 1 LINE 9504 6 PAGE UM WSG JULY 23, 1983 10:41:16 DIST:DATECHK 0 Object for (794/2) and (461/10) beginning at line 1. Object for (461/11) beginning at line -1000. Contains a $CONTINUE WITH *SPITLIB record. 0 Referenced by comments of: 461/10, 461/11 1 SUN SEP 08/96 15:24:55 Page 188 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/013 DISTRIBUTION 5-LINE SA G S1558 5.0T1 VLO FSNAME=DISTRIBUTION.5-LINE.SA.012(1) 1104 5.0T1 1104 DISTRIBUTION.5-LINE.SA.012 1 LINE 80 8 PAGE UBC HOGG MAR. 01, 1973 19:33:27 5.0T3 98 0 Program to print the first 5 and last 5 lines of each file on a *FS tape. Used to verify dist tape contents. 00461/014 DISTRIBUTION 5-LINE OC G MTS:FS5L 1087 5.0T1 1105 DISTRIBUTION.5-LINE.OC.013 1 LINE 80 3 PAGE UBC HOGG JULY 03, 1981 13:51:17 5.0T3 99 00461/015A DISTRIBUTION DRIVER D W02X:5.1DRIVER 5.1T3 364 DISTRIBUTION.DRIVER.D.015 2 LINE 32767 472 PAGE UM SWEET JAN. 28, 1987 11:29:01 DIST:DRIVER 0 This is the complete driver file for UM D5.1. Items included in D5.1 may be marked with revision levels as follows: REVL=A subcomponents which have changed since D5.0 (Aug. 1981) REVL=C new subcomponents which have been added to the production system at UM since D5.0. REVL=D preliminary versions which may still change significantly and in some incompatible way. Line numbers in this file are important. ********************************************************************* This driver file is normally kept in DIST:DRIVER at UM. ********************************************************************* 0 Referenced by comments of: 461/16, 461/18 00461/016A DISTRIBUTION DRIVER COMMENT D W02X:5.1COMM 5.1T3 365 DISTRIBUTION.DRIVER_COMM.D.016 1 LINE 120 241 PAGE UM SWEET JAN. 28, 1987 11:29:40 DIST:COMM 0 This is the comment file for the D5.1 driver file (461/15). Line numbers in this file are important. ********************************************************************* At UM this file is normally kept in DIST:COMM. ********************************************************************* 1 SUN SEP 08/96 15:24:55 Page 189 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/017A DISTRIBUTION DRIV INDEX GEN C DIST:DISTINDEX 5.1T1 320 DISTRIBUTION.DRIV_INDEX_G.C.017 1 LINE 133 1 PAGE UM SWEET JULY 23, 1983 10:42:44 DIST:DISTINDEX 0 Command file to produce a driver file alphabetized index. 00461/018A DISTRIBUTION 6250 INDEX P DIST:INDEX6250 5.1T3 362 DISTRIBUTION.6250_INDEX.P.018 1 LINE 134 244 PAGE UM SWEET AUG. 20, 1983 19:55:21 DIST:INDEX6250 0 6250 version of the index for the UM driver file (461/15). Copy to a printer. 00461/019A DISTRIBUTION GENERAL NOTES WF DIST:GENNOTES.WF 5.1T3 328 DISTRIBUTION.GENERAL_NOTE.WF.019 1 LINE 197 13 PAGE UM SWEET AUG. 20, 1983 19:42:02 DIST:GENNOTES.WF 0 General notes on MTS Distribution 5.1. 00461/020A DISTRIBUTION NEW SYS WF DIST:NEWSYS.WF 5.1T3 329 DISTRIBUTION.NEW_SYS.WF.020 1 LINE 156 5 PAGE UM SWEET AUG. 20, 1983 19:42:07 DIST:NEWSYS.WF 0 A writeup describing the installation of MTS Distribution 5.1 at new installations, i.e. installations which have not previously used MTS. 00461/021A DISTRIBUTION EXISTING SYS WF DIST:OLDSYS.WF 5.1T3 330 DISTRIBUTION.EXISTING_SYS.WF.021 1 LINE 81 10 PAGE UM SWEET AUG. 20, 1983 19:42:10 DIST:OLDSYS.WF 0 A writeup describing the installation of MTS Distribution 5.1 at existing installations, i.e. installations which have previously used MTS. 00461/022A DISTRIBUTION D5.1 MEMO LIST WF DIST:MEMOLIST 5.1T3 331 DISTRIBUTION.D5.1_MEMO_LI.WF.022 1 LINE 110 3 PAGE UM SWEET AUG. 20, 1983 19:42:11 0 Writeup showing the status of all UM Computing Center memos at the time of D5.1. Dynamically loads the IND functions from the publications function library (711/8). 00461/023A DISTRIBUTION MTS BIB WF DIST:MTS.BIB 5.1T1 321 DISTRIBUTION.MTS_BIB.WF.023 1 LINE 69 3 PAGE UM SWEET JULY 23, 1983 10:42:52 0 Bibliography of published papers about MTS and related topics. 00461/024C DISTRIBUTION UM CNFIG CHART P # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the UM Machine configuration chart. Only hard copies of this component are distributed. 1 SUN SEP 08/96 15:24:55 Page 190 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/025C DISTRIBUTION TSS DASDI INST # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is instructions for TSS DASDI. Only hard copies of this component are distributed. 00461/026A DISTRIBUTION FM.GEN S* G DIST:FM.GEN 5.1T1 322 DISTRIBUTION.FM.GEN.S?.026 1 LINE 93 16 PAGE UM WSG JULY 23, 1983 10:42:52 DIST:FM.GEN 0 MTS commands and a Spitbol (actually SNOSTORM) program to generate input for FILE MOVE (1020) which can be used to build a test pack based on a driver file. The program will ask for the following: 1. The name of a file which contains a complete list of the files currently on the test pack (possibly null), 2. The name of the driver file, 3. The driver file revision level to be used (enter a null line for a full distribution), and 4. If you want the FILE MOVE input to contain LASTCHG= parameter which will cause FILE MOVE to check to see if files being moved have been changed since the date they were written on the distribution tape. The program will read through the driver file and, for lines which have a non-blank disk name field (see *DEDIT) and the appropriate revision level, it will output (on SPUNCH) records which can be used as input to FILE MOVE. This input will contain three kinds of data: 1. Files to be destroyed on the test pack (ones no longer listed in the disk name of any component), 2. Files to be moved to the test pack (ones with the appropriate revision level), and 3. Files to be created on the test pack and which will be permitted the same as the corresponding file on the regular system, but which will be left empty (ones which have disk names ending with "@E"). In addition, the program will look for other modifiers on disk names, besides @E, and write the FILE MOVE input to temporary file(s) with the same name(s) as the modifier(s) instead of writing it to SPUNCH. In this way, it is possible to generate FILE MOVE data for more than one test pack. At UM, this facility is used to maintain UM and benchmark test packs which differ slightly from the standard distribution test pack. The program will print an error message (on unit 1) for any component (at the specified revision level) which has a bad save control field or which is located on tape (since FILE MOVE doesn't have the capability of getting files from tapes). It will also output (on unit 0) a new file list for the pack, i.e., a list of what files will be on the pack after FILE MOVE is run. 1 SUN SEP 08/96 15:24:55 Page 191 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00461/027A DISTRIBUTION MTS511 FILES D DIST:MTS511.FILES 5.1T3 332 DISTRIBUTION.MTS511_FILES.D.027 1 LINE 17 7 PAGE UM J BODWIN AUG. 20, 1983 19:42:12 DIST:MTS511.FILES 0 A list of all the files on the D5.1 dump/restore pack. 00461/028 DISTRIBUTION MEMO 378 WF S1558 5.0T1 VLO FSNAME=DISTRIBUTION.MEMO_378.WF.026(1) 1109 5.0T1 1109 DISTRIBUTION.MEMO_378.WF.026 1 LINE 92 11 PAGE UM PIRKOLA MAY 13, 1978 17:22:07 5.0T3 103 0 This is Computing Center Memo 378 -- "Support Categories for Computing Center Software." 00461/029 DISTRIBUTION CHG FORMS CMDS C MTS:CHANGEFORMS 5.0T1 1110 DISTRIBUTION.CHG_FORMS_CM.C.027 1 LINE 66 1 PAGE UM DWB JULY 03, 1981 13:51:49 5.0T3 104 0 Command file to run the distribution change form generation program (461/30) which reads the change form data file (461/31) to produce change forms in the file -forms. 00461/030 DISTRIBUTION CHG FORMS PGM SS G MTS:CHGFORMPGM 5.0T1 1111 DISTRIBUTION.CHG_FORMS_PG.SS.028 1 LINE 78 3 PAGE UM DWB JULY 03, 1981 13:51:50 5.0T3 105 0 Spitbol program to process the change form data file (461/31) and produce change forms. 0 Referenced by comments of: 461/29, 461/31 00461/031 DISTRIBUTION CHG FORMS DATA D MTS:CHGFORMDATA 5.0T1 1112 DISTRIBUTION.CHG_FORMS_DA.D.029 1 LINE 94 93 PAGE UM DWB JULY 03, 1981 13:51:52 5.0T3 106 0 Data file of change forms relevant to Distribution 4. To be used as input to the change form program (461/30) to produce the actual printed forms. The construction of this data file is described in (461/32). 0 Referenced by comments of: 461/29, 461/30, 461/32 00461/032 DISTRIBUTION CHG FORMS DESC WF S1558 5.0T1 VLO FSNAME=DISTRIBUTION.CHG_FORMS_DE.WF.030(1) 1113 5.0T1 1113 DISTRIBUTION.CHG_FORMS_DE.WF.030 1 LINE 68 3 PAGE UM DWB MAY 13, 1978 17:22:07 5.0T3 107 0 Memo to UM Computing Center staff about how to construct the change forms data file (461/31). 0 Referenced by comments of: 461/31 00462/001 CHECKSUM SA # (OBSOLETE) D3T3 36 CHECKSUM..SA.1 1 SEQ 80 3 PAGE UM AUG. 01, 1973 18:30.28 0 Obsoleted by MTS protection mechanisms. 1 SUN SEP 08/96 15:24:55 Page 192 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00463/001 STDDMP SUBR SA G MTS:STDDMP(1000) 5.0T1 1114 STDDMP_SUBR..SA.001 1 LINE 72 5 PAGE UM MTA JULY 03, 1981 13:52:00 5.0T3 108 0 PRODUCES STANDARD FORMAT DUMPS. SEE ALSO SDUMP (049). 00463/002 STDDMP SUBR OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00464/001 PLIMIT D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=PLIM 5.0T4 325 PLIMIT.D5.0_MASTER.SA.001 1 LINE 80 3 PAGE UM MTS BURLING AUG. 09, 1981 23:04:25 5.0T10 229 0 Checks page and punch limits. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3), COPY:SETPARM (653), and COPY:CC.MACROS (1054/3). 0 Referenced by comments of: 42/2 00464/002A PLIMIT UPDATE UC G MTSS:PLIM/UPD 5.1T1 323 PLIMIT.UPDATE.UC.002 1 LINE 68 2 PAGE UM MTS BURLING JULY 23, 1983 10:42:55 0 *CDUPDATE input to produce current source. 00464/003A PLIMIT OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00464/004A PLIMIT L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=PLIM.LIST 5.1T1 324 PLIMIT..L.004 1 LINE 133 20 PAGE UM MTS BURLING JULY 23, 1983 10:43:31 00464/005A PLIMIT COMMENTS D G MTSS:PLIM/COM 5.1T1 325 PLIMIT.COMMENTS.D.005 1 LINE 54 1 PAGE UM MTS BURLING JULY 23, 1983 10:43:32 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00465/001 *APL MTS INTERFACE SA G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.MTS 5.0T1 1115 APL.MTS_INTERFACE.SA.001 1 LINE 101 42 PAGE UM HELFFRICH FEB. 16, 1981 16:27:12 5.0T3 109 0 THE APL-MTS INTERFACE. ASSEMBLE USING THE APL MACRO LIBRARY (465/3). CONTAINS THE OBJECT AT LINE 1 AND THE SOURCE AT LINE 1000. COPIES APLDEFN, DIRSECT, ZSYMBOLS, AND PERTERM FROM THE APL MACRO LIBRARY (465/3), AND *GFINFODSECT (593). IMPLEMENTS THE ")TIME" COMMAND. 1 SUN SEP 08/96 15:24:55 Page 193 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00465/002 *APL TRTABS SA G TRTA S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.TRTA.S 5.0T1 1116 APL.TRTABS.SA.002 1 LINE 80 43 PAGE UM HELFFRICH MAR. 04, 1977 19:14:31 5.0T3 110 0 SOURCE FOR THE APL TRANSLATE TABLES TO CONVERT APL INTERNAL CHARACTERS TO EXTERNAL CHARACTERS. INCLUDES TABLES FOR: 1052, 1050, 2741, CORRESPONDENCE 2741, TTY 38 APL ASSIGNMENT #3, GSI300/DTC300/DTC302, APL2 DEVICES (DDI265), LA36, AND ASCII DEVICES. ASSEMBLE USING THE APL MACRO LIBRARY (465/3). 00465/003 *APL MACRO LIBRARY SM G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.MACROS 5.0T1 1117 APL.MACRO_LIBRARY.SM.003 1 LINE 80 18 PAGE UM HELFFRICH FEB. 16, 1981 13:03:23 5.0T3 111 0 MACRO LIBRARY CONTAINING MACROS AND COPY SECTIONS REQUIRED FOR ASSEMBLING ALL THE APL SOURCE COMPONENTS. 0 Referenced by comments of: 465/1, 465/2, 465/4, 465/5, 465/6, 465/7, 465/8, 465/9, 465/10, 465/11, 465/12, 465/13, 465/14, 465/15, 465/16 00465/004 *APL ARTH UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.ARTH.U 5.0T1 1118 APL.ARTH_UPDATE.UU.004 1 LINE 72 1 PAGE UM HELFFRICH MAR. 04, 1977 19:17:46 5.0T3 112 0 UPDATE TO BE APPLIED TO ORIGINAL SOURCE TO YIELD CURRENT UM SOURCE FOR ARTH MODULE. THE SUCCEEDING SUBCOMPONENTS (465/5) THROUGH (465/15) ARE SIMILAR. ARTH CHANGES: MACRO FIXUP AND RECOGNITION OF "REVERSAL ALONG FIRST DIMENSION" OPERATOR. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 0 Referenced by comments of: 465/5, 465/6, 465/7, 465/8, 465/9, 465/10, 465/11, 465/12, 465/13, 465/14, 465/15 00465/005 *APL DEXP UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.DEXP.U 5.0T1 1119 APL.DEXP_UPDATE.UU.005 1 LINE 61 1 PAGE UM HELFFRICH MAR. 04, 1977 19:18:21 5.0T3 113 0 SEE COMMENTS FOR (465/4). DEXP CHANGES: FIX OF BUG CAUSING OCCASIONAL WRONG SIGN OF VALUE RETURNED BY SQUARE ROOT. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 0 Referenced by comments of: 465/4 00465/006 *APL DYIB UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.DYIB.U 5.0T1 1120 APL.DYIB_UPDATE.UU.006 1 LINE 65 1 PAGE UM HELFFRICH MAR. 04, 1977 19:18:55 5.0T3 114 0 SEE COMMENTS FOR (465/4). DYIB CHANGES: IMPLEMENTATION OF PRIVILEGED DYADIC OPERATIONS. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/007 *APL IBAR UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.IBAR.U 5.0T1 1121 APL.IBAR_UPDATE.UU.007 1 LINE 72 1 PAGE UM HELFFRICH MAR. 04, 1977 19:19:29 5.0T3 115 0 SEE COMMENTS FOR (465/4). IBAR CHANGES: CHANGE TO RETRIEVAL METHOD FOR TIME OF DAY IBEAM. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 1 SUN SEP 08/96 15:24:55 Page 194 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00465/008 *APL OCTL UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.OCTL.U 5.0T1 1122 APL.OCTL_UPDATE.UU.008 1 LINE 72 1 PAGE UM HELFFRICH FEB. 16, 1981 16:27:57 5.0T3 116 0 SEE COMMENTS FOR (465/4). OCTL CHANGES: CHANGES FOR CATN. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/009 *APL REDU UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.REDU.U 5.0T1 1123 APL.REDU_UPDATE.UU.009 1 LINE 72 1 PAGE UM HELFFRICH MAR. 04, 1977 19:20:30 5.0T3 117 0 SEE COMMENTS FOR (465/4). REDU CHANGES: YIELDS NONCE ERROR IF "SCAN" OPERATION IS ATTEMPTED. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/010 *APL SLCT UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.SLCT.U 5.0T1 1124 APL.SLCT_UPDATE.UU.010 1 LINE 72 1 PAGE UM HELFFRICH MAR. 04, 1977 19:21:01 5.0T3 118 0 SEE COMMENTS FOR (465/4). SLCT CHANGES: RECOGNITION OF EXPANSION AND COMPRESSION ALONG FIRST DIMENSION SYMBOLS. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/011 *APL TPIN UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.TPIN.U 5.0T1 1125 APL.TPIN_UPDATE.UU.011 1 LINE 72 13 PAGE UM HELFFRICH FEB. 16, 1981 16:28:41 5.0T3 119 0 SEE COMMENTS FOR (465/4). TPIN CHANGES: )SYMBOLS COMMAND IMPLEMENTED; BUG RELATING TO IGNORING OF INPUT AFTER ATTN INTERRUPT FIXED; CHANGES TO OBTAIN DATE DIFFERENTLY; )COPY AND )PCOPY ERROR REPORTING ADDED; )TIME COMMAND IMPLEMENTED. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/012 *APL VECT UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.VECT.U 5.0T1 1126 APL.VECT_UPDATE.UU.012 1 LINE 65 1 PAGE UM HELFFRICH MAR. 04, 1977 19:22:13 5.0T3 120 0 SEE COMMENTS FOR (465/4). VECT CHANGES: CALLS ERROR$ RATHER THAN ERROR. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/013 *APL AGOR UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.AGOR.U 5.0T1 1127 APL.AGOR_UPDATE.UU.013 1 LINE 72 1 PAGE UM HELFFRICH FEB. 16, 1981 16:26:42 5.0T3 121 0 SEE COMMENTS FOR (465/4). AGOR CHANGES: IMPLEMENTS ")TIME" COMMAND. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 00465/014 *APL DPY UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.DPY.U 5.0T1 1128 APL.DPY_UPDATE.UU.014 1 LINE 72 1 PAGE UM HELFFRICH AUG. 08, 1979 22:04:56 5.0T3 122 0 SEE COMMENTS FOR (465/4). DPY CHANGES: LABELED STATEMENTS IN FUNCTION ARE DISPLAYED ONE COLUMN TO THE LEFT. ASSEMBLE USING THE APL MACRO LIBRARY (465/3). 1 SUN SEP 08/96 15:24:55 Page 195 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00465/015 *APL ERR UPDATE UU G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.ERR.U 5.0T1 1129 APL.ERR_UPDATE.UU.015 1 LINE 72 1 PAGE UM HELFFRICH FEB. 16, 1981 16:27:02 5.0T3 123 0 SEE COMMENTS FOR (465/4). ERR CHANGES: IMPLEMENTS ")TIME" COMMAND. ASSEMBLE RESULT USING THE APL MACRO LIBRARY (465/3). 0 Referenced by comments of: 465/4 00465/016 *APL CATN SA G S0984 ARCHIV 'APL ARCHIVE' FSNAME=APL.CATN 5.0T1 1130 APL.CATN.SA.016 1 LINE 92 10 PAGE UM HELFFRICH FEB. 16, 1981 13:06:10 5.0T3 124 0 Rewrite of catenation processor to provide full catenation capabilities in APL/MTS. Copies OPSECT and APLDEFN from the APL macro library (465/3). 00465/017 *APL OBJECT OC G S1558 5.0T1 VLO FSNAME=APL.OBJECT.OC.017(1) 1131 5.0T1 1131 APL.OBJECT.OC.017 1 LINE 11465 39 PAGE UM HELFFRICH JULY 03, 1981 13:54:39 5.0T3 125 0 APL OBJECT LOADED INTO SHARED VM BY PISTLE AT IPL. 0 Referenced by comments of: 465/18 00465/018 *APL *APL OC G S1558 5.0T1 VLO FSNAME=APL.*APL.OC.018(1) 1132 5.0T1 1132 APL.*APL.OC.018 1 LINE 24 1 PAGE UM HELFFRICH JULY 03, 1981 13:54:45 5.0T3 126 0 CONTAINS 4 LOADER CARDS (RIP, COM, LCS, LDT) TO FORCE REFERENCE TO SHARED VM APL (465/17). 00466/001 ACTIVCNT/ASTATSUB SA G S1558 5.0T1 VLO FSNAME=ACTIVCNT/ASTATSUB..SA.001(1) 1134 5.0T1 1134 ACTIVCNT/ASTATSUB..SA.001 1 LINE 80 1 PAGE UM DWB JULY 03, 1981 13:54:52 5.0T3 128 0 ACTIVCNT CONTAINS THE NUMBER OF USERS SIGNED ON AND ASTATSUB IS USED TO COMMUNICATE BETWEEN MTS AND THE STAT JOB. 00466/002 ACTIVCNT/ASTATSUB OC G # (PART OF RESIDENT SYSTEM) UM DWB 0 Object part of Resident System (468). 00467/001 ENDSEG2 SA G S1558 5.0T1 VLO FSNAME=ENDSEG2..SA.001(1) 1135 5.0T1 1135 ENDSEG2..SA.001 1 LINE 65 1 PAGE UM MTA JULY 03, 1981 13:54:53 5.0T3 129 0 ASSEMBLY TO MARK THE END OF THE IPLED PART OF SHARED VM. 00467/002 ENDSEG2 OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 196 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00468/001A RESIDENT SYSTEM D5.1 SYS D *IPL.D5.1SYS 5.1T3 333 RESIDENT_SYSTEM.D5.1_SYS.D.001 1 SEQ 4100 242 PAGE UM MTS BURLING AUG. 20, 1983 19:42:17 *IPL.D5.1SYS 0 RAMROD IPL file for the D5.1 MTS system (with dummy TABLES) distributed on the DUMP/RESTORE pack. This IPL file is also on the MTSUTL distribution tape. 0 Referenced by comments of: 1/3, 3/2, 4/2, 5/2, 6/2, 7/2, 8/2, 9/2, 10/3, 11/2, 13/3, 14/2, 16/2, 18/2, 19/2, 20/2, 21/2, 23/2, 24/2, 25/2, 40/3, 40/6, 42/3, 44/4, 45/3, 46/3, 49/2, 77/2, 78/2, 79/2, 79/4, 80/2, 126/2, 198/3, 243/2, 354/3, 399/2, 413/2, 413/4, 413/8, 463/2, 464/3, 466/2, 467/2, 482/3, 482/6, 482/9, 482/12, 482/15, 482/18, 482/21, 482/24, 482/27, 482/30, 482/33, 482/35, 482/38, 513/3, 531/3, 534/2, 539/3, 554/2, 572/2, 576/2, 577/2, 577/7, 578/3, 579/2, 579/5, 579/8, 586/3, 589/3, 589/7, 589/9, 591/2, 628/4, 634/2, 634/5, 635/3, 636/3, 637/3, 638/3, 639/3, 647/2, 650/2, 651/12, 651/15, 651/18, 708/3, 723/2, 731/2, 731/4, 732/3, 758/2, 759/2, 769/3, 769/6, 769/9, 769/12, 769/15, 769/18, 769/21, 769/24, 769/31, 777/2, 778/2, 787/7, 787/10, 787/18, 787/20, 803/2, 818/3, 819/2, 829/3, 834/8, 1012/3, 1023/2, 1027/2, 1058/17, 1070/2, 1081/3, 1081/10, 4000/3 00468/002A RESIDENT SYSTEM D5.1 UM SYS D *IPL.D5.1SYS.511 5.1T3 334 RESIDENT_SYSTEM.D5.1_UM_S.D.002 1 SEQ 4100 237 PAGE UM MTS BURLING AUG. 20, 1983 19:42:27 *IPL.0 0 RAMROD IPL file for the D5.1 MTS system with the UM I/O configuration, but only the MTS511 disk pack. This is the "current" system on the D5.1 DUMP/RESTORE pack. 00468/003A RESIDENT SYSTEM UM RAMROD D MTS.:D5.1ROD 5.1T3 335 RESIDENT_SYSTEM.UM_RAMROD.D.003 1 LINE 32767 514 PAGE UM MTS BURLING AUG. 20, 1983 19:42:38 MTS.:ROD 0 Current UM RAMROD file. The following procedures are used in maintaining this file. Whenever a new system is installed i.e., made "current", three things are done: 1. The name of the system installed is changed to the "model number" of the date it is installed, e.g. "AY108" for May 10, 1978. 2. The system installed is made the current system. 3. The oldest system is deleted so that there are about five systems, the current one and the four preceding. When someone wishes to change a component, but not install a new system, a new system called "NEWSYS" is created from the current system (if it doesn't already exist) and the desired changes made and noted using the ANNOTATE command. Then when the NEWSYS system is actually to be installed as the running system, the procedure above is followed. A test system can be created at any time with any name, but when the new components are ready to be installed, they should be put in "NEWSYS" and the test system destroyed. 1 SUN SEP 08/96 15:24:55 Page 197 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This file contains some copyrighted material, which we have permission to redistribute to other MTS installations, with the understanding that this file shall not be distributed to any other third parties. Please help us honor our commitment. 00468/004A RESIDENT SYSTEM *IPL.1 D # *IPL.1 UM MTS BURLING *IPL.1@E 0 First backup system object in form suitable for loading by the IPL Reader. Note: this file is empty on the test pack. 00468/005A RESIDENT SYSTEM *IPL.2 D # *IPL.2 UM MTS BURLING *IPL.2@E 0 Second backup system object in form suitable for loading by the IPL Reader. Note: this file is empty on the test pack. 00468/006A RESIDENT SYSTEM *IPL.3 D # *IPL.3 UM MTS BURLING *IPL.3@E 0 Third backup system object in form suitable for loading by the IPL Reader. Note: this file is empty on the test pack. 00468/007A RESIDENT SYSTEM WRITEUP WF DIST:RESSYS.WF 5.1T3 336 RESIDENT_SYSTEM.WRITEUP.WF.007 1 LINE 154 5 PAGE UM MTS BURLING AUG. 20, 1983 19:43:15 DIST:RESSYS.WF 0 A writeup describing the structure of the system object decks. 00469/001 360/20 RJE SUPPORT PGM S # (OBSOLETE) D2T1 094 UM 00470/001 PCB DSECT COPY:PCBDSECT SA G COPY:PCBDSECT 5.0T1 1136 PCB_DSECT.COPY:PCBDSECT.SA.001 1 LINE 72 3 PAGE UM MTA JULY 03, 1981 13:54:54 5.0T3 130 COPY:PCBDSECT 0 Dsect for the page control block. Copied by the supervisor, PDP, and CONFIG among others. 0 Referenced by comments of: 44/1, 45/1, 46/1, 400/1, 577/1 00471/001 REX SA # (OBSOLETE) D3.2T1 303 REX.MONITOR.SA.01 1 LINE 80 78 PAGE UM JULY 16, 1974 13:04:27 00472/001 *ST360 MAIN PGM SA G S1558 5.0T1 VLO FSNAME=ST360.MAIN_PGM.SA.001(1) 1137 5.0T1 1137 ST360.MAIN_PGM.SA.001 1 SEQ 80 41 PAGE UM MTA AUG. 01, 1973 18:40.02 5.0T3 131 0 THE STUDENT VIRTUAL MACHINE SIMULATOR. THE SIMULATED MACHINE HAS THE FOLLOWING CHARACTERISTICS: 1 SUN SEP 08/96 15:24:55 Page 198 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 1. THE SYSTEM/360 UNIVERSAL INSTRUCTION SET 2. NO INTERVAL TIMER 3. NO MEMORY PROTECTION 4. 32K BYTES OF STORAGE 5. AN I/O COMPLEMENT CONSISTING OF: A. 1052 OPERATOR'S CONSOLE ADDRESS 0009 B. 2540 CARD READER ADDRESS 000C C. 2540 CARD PUNCH ADDRESS 000D D. 1403 LINE PRINTER ADDRESS 000E E. 2 2401 9-TRACK TAPE DRIVES ADDRESSES 0180-0181 6. EXCEPT AT IPL, SELF-MODIFYING CCW'S ARE NOT ALLOWED 7. INSTANTANEOUS I/O NOTE: THE STANDARD VIRTUAL MACHINE (558) NOW HAS AN ASSEMBLY PARAMETER TO PRODUCE A STUDENT VERSION. 0 Referenced by comments of: 472/2, 4240/1 00472/002 *ST360 CCWTRANS SUBR SA G S1558 5.0T1 VLO FSNAME=ST360.CCWTRANS_SUBR.SA.002(1) 1138 5.0T1 1138 ST360.CCWTRANS_SUBR.SA.002 1 SEQ 80 12 PAGE UM MTA AUG. 01, 1973 18:49.51 5.0T3 132 0 SUBROUTINE CALLED BY (472/1) TO TRANSLATE CCW LISTS. UNCHANGED SINCE DIST 2.0. 00472/003 *ST360 OBJECT OE G *ST360 5.0T1 1139 ST360.OBJECT.OE.003 1 SEQ 8720 5 PAGE UM MTA JULY 03, 1981 13:55:01 5.0T3 133 *ST360 00473/001 *1130ASM CCD SA S1558 5.0T1 VLO FSNAME=1130ASM.CCD.SA.001(1) 1140 5.0T1 1140 1130ASM.CCD.SA.001 1 SEQ 80 48 PAGE UM AUG. 01, 1973 18:51.47 5.0T3 134 0 IBM ASSEMBLER FOR THE IBM 1130 AND IBM 1800 COMPUTERS. THIS VERSION HAS BEEN MODIFIED TO RUN IN MTS. THIS THING APPEARS TO CONSIST OF 4 ASSEMBLIES AND 1 COPY SECTION. THE QUESTION IS WHICH IS WHICH. WE SUGGEST THAT THE FIRST MAY BE THE COPY SECTION, BUT WE'RE NOT SURE. 00473/002 *1130ASM M0 SA S1558 5.0T1 VLO FSNAME=1130ASM.M0.SA.002(1) 1141 5.0T1 1141 1130ASM.M0.SA.002 1 SEQ 80 2 PAGE UM AUG. 01, 1973 18:51.57 5.0T3 135 00473/003 *1130ASM M12 SA S1558 5.0T1 VLO FSNAME=1130ASM.M12.SA.003(1) 1142 5.0T1 1142 1130ASM.M12.SA.003 1 SEQ 80 74 PAGE UM AUG. 01, 1973 18:52.43 5.0T3 136 00473/004 *1130ASM M3 SA S1558 5.0T1 VLO FSNAME=1130ASM.M3.SA.004(1) 1143 5.0T1 1143 1130ASM.M3.SA.004 1 SEQ 80 89 PAGE UM AUG. 01, 1973 18:53.47 5.0T3 137 1 SUN SEP 08/96 15:24:55 Page 199 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00473/005 *1130ASM M4 SA S1558 5.0T1 VLO FSNAME=1130ASM.M4.SA.005(1) 1144 5.0T1 1144 1130ASM.M4.SA.005 1 SEQ 80 25 PAGE UM AUG. 01, 1973 18:54.12 5.0T3 138 00473/006 *1130ASM OBJECT OC *1130ASM 5.0T1 1145 1130ASM.OBJECT.OC.006 1 SEQ 80 18 PAGE UM JULY 03, 1981 13:55:09 5.0T3 139 *1130ASM 00475/001 OS SIMULATION PACKAGE S # (OBSOLETE) D2T1 284 UM 00476/001 DBS:MSG S # (OBSOLETE) D2T1 441 UM 00480/001 APF SA # (OBSOLETE) D2T1 329 UM 00481/001 FILE SAVE - OLD VERSION O # (OBSOLETE) D2T1 001 UM 00482/001 FILE SYSTEM MOVE SA G FILE:MOVE(*F,-1) 5.0T1 1146 FILE_SYSTEM.MOVE.SA.001 1 LINE 72 3 PAGE UM HELFFRICH JULY 03, 1981 13:55:11 5.0T3 140 0 Subroutine to move core around. Copies *CNFGINFODSECT (654). 00482/002A FILE SYSTEM MOVE UC G FILE:MOVE(1000) 5.1T1 326 FILE_SYSTEM.MOVE.UC.002 1 LINE 72 1 PAGE UM HELFFRICH JULY 23, 1983 10:46:08 FILE:MOVE 00482/003A FILE SYSTEM MOVE OC G # (PART OF RESIDENT SYSTEM) 4.3AT1 133 FILE_SYSTEM.MOVE.OC.003 1 LINE 80 1 PAGE UM HELFFRICH OCT. 12, 1980 15:44:10 0 Object part of Resident System (468). 0 Referenced by comments of: 482/50 00482/004 FILE SYSTEM VOLGET SA G FILE:VOLGET(*F,-1) 5.0T1 1148 FILE_SYSTEM.VOLGET.SA.004 1 LINE 80 23 PAGE UM HELFFRICH JULY 03, 1981 13:55:13 5.0T3 142 0 Subroutine to acquire disk drive before doing I/O. Assemble with COPY:FILE.MACROS (482/45) and COPY:DM.MACROS (769/29). Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). 0 Referenced by comments of: 73/3, 534/3 00482/005A FILE SYSTEM VOLGET UC G FILE:VOLGET(1000) 5.1T1 327 FILE_SYSTEM.VOLGET.UC.005 1 LINE 68 1 PAGE UM HELFFRICH JULY 23, 1983 10:46:09 FILE:VOLGET 1 SUN SEP 08/96 15:24:55 Page 200 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00482/006A FILE SYSTEM VOLGET OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/007 FILE SYSTEM TRAK SA G FILE:TRAK(-10000,-1) 5.0T1 1150 FILE_SYSTEM.TRAK.SA.007 1 LINE 80 25 PAGE UM HELFFRICH JULY 03, 1981 13:55:24 5.0T3 144 0 BASIC SUBROUTINES TO HANDLE FILE BUFFERING AND WRITE THE DISK, OR TALK TO THE DISK MANAGER (769) COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). ASSEMBLE WITH COPY:FILE.MACROS(482/45), COPY:SETPARM (653), AND COPY:DM.MACROS (769/29). NOTE: THIS PROGRAM USES SOFTWARE COMMAND CHAINING FOR 2314'S AND 2311'S. 0 Referenced by comments of: 482/61 00482/008A FILE SYSTEM TRAK UC G FILE:TRAK(1000) 5.1T1 328 FILE_SYSTEM.TRAK.UC.008 1 LINE 73 2 PAGE UM HELFFRICH JULY 23, 1983 10:46:10 FILE:TRAK 00482/009A FILE SYSTEM TRAK OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/010 FILE SYSTEM READI SA G FILE:READI(*F,-1) 5.0T1 1152 FILE_SYSTEM.READI.SA.010 1 LINE 80 6 PAGE UM HELFFRICH JULY 03, 1981 13:55:35 5.0T3 146 0 SUBROUTINE TO READ FROM A LINE FILE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/011A FILE SYSTEM READI UC G FILE:READI(1000) 5.1T1 329 FILE_SYSTEM.READI.UC.011 1 LINE 68 1 PAGE UM HELFFRICH JULY 23, 1983 10:46:11 FILE:READI 00482/012A FILE SYSTEM READI OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/013 FILE SYSTEM WRITEI SA G FILE:WRITEI(*F,-1) 5.0T1 1154 FILE_SYSTEM.WRITEI.SA.013 1 LINE 79 34 PAGE UM HELFFRICH JULY 03, 1981 13:55:37 5.0T3 148 0 SUBROUTINE TO WRITE LINE FILES. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/014A FILE SYSTEM WRITEI UC G FILE:WRITEI(1000) 5.1T1 330 FILE_SYSTEM.WRITEI.UC.014 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 10:46:11 FILE:WRITEI 1 SUN SEP 08/96 15:24:55 Page 201 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00482/015A FILE SYSTEM WRITEI OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/016 FILE SYSTEM READL SA G FILE:READL(*F,-1) 5.0T1 1156 FILE_SYSTEM.READL.SA.016 1 LINE 78 10 PAGE UM HELFFRICH JULY 03, 1981 13:55:53 5.0T3 150 0 BASE SOURCE FOR SUBROUTINE TO FIND THE FIRST OR LAST LINE NUMBER IN A FILE. ALSO CONTAINS SUBROUTINES TO RENUMBER, COUNT, RETURN, AND SET LINES IN A LINE FILE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/017A FILE SYSTEM READL UC G FILE:READL(1000) 5.1T1 331 FILE_SYSTEM.READL.UC.017 1 LINE 68 1 PAGE UM HELFFRICH JULY 23, 1983 10:46:12 FILE:READL 00482/018A FILE SYSTEM READL OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/019 FILE SYSTEM OPEN SA G FILE:OPEN(-10000,-1) 5.0T1 1158 FILE_SYSTEM.OPEN.SA.019 1 LINE 80 52 PAGE UM HELFFRICH AUG. 05, 1981 02:34:27 5.0T3 152 0 SUBROUTINES TO OPEN, CLOSE, CREATE, DESTROY, EMPTY, RENAME, AND TRUNCATE FILES. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/020 FILE SYSTEM OPEN UC G FILE:OPEN(1000) 5.0T1 1159 FILE_SYSTEM.OPEN.UC.020 1 LINE 106 13 PAGE UM HELFFRICH AUG. 05, 1981 02:34:36 5.0T3 153 FILE:OPEN 00482/021 FILE SYSTEM OPEN OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/022 FILE SYSTEM GETDSK SA G FILE:GETDSK(-10000,-1) 5.0T1 1160 FILE_SYSTEM.GETDSK.SA.022 1 LINE 80 22 PAGE UM HELFFRICH JULY 03, 1981 13:56:12 5.0T3 154 0 SUBROUTINES TO ALLOCATE AND RELEASE DISK SPACE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/023 FILE SYSTEM GETDSK UC G FILE:GETDSK(1000) 5.0T1 1161 FILE_SYSTEM.GETDSK.UC.023 1 LINE 82 4 PAGE UM HELFFRICH JULY 03, 1981 13:56:17 5.0T3 155 FILE:GETDSK 00482/024 FILE SYSTEM GETDSK OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 202 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00482/025 FILE SYSTEM FLINE SA G FILE:FLINE(-10000,-1) 5.0T1 1162 FILE_SYSTEM.FLINE.SA.025 1 LINE 80 6 PAGE UM HELFFRICH JULY 03, 1981 13:56:19 5.0T3 156 0 SUBROUTINE TO SEARCH THE LINE DIRECTORY OF A LINE FILE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/026 FILE SYSTEM FLINE UC G FILE:FLINE(1000) 5.0T1 1163 FILE_SYSTEM.FLINE.UC.026 1 LINE 70 1 PAGE UM HELFFRICH JULY 03, 1981 13:56:20 5.0T3 157 FILE:FLINE 00482/027 FILE SYSTEM FLINE OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/028 FILE SYSTEM CATALOG SA G FILE:CATALOG(*F,-1) 5.0T1 1164 FILE_SYSTEM.CATALOG.SA.028 1 LINE 80 65 PAGE UM HELFFRICH JULY 03, 1981 13:56:21 5.0T3 158 0 SUBROUTINES WHICH MAINTAIN THE CATALOG OF FILES. ASSEMBLE USING COPY:FILE.MACROS (482/45), (724/4), and (546/3). 00482/029A FILE SYSTEM CATALOG UC G FILE:CATALOG(1000) 5.1T1 332 FILE_SYSTEM.CATALOG.UC.029 1 LINE 68 3 PAGE UM HELFFRICH JULY 23, 1983 10:46:13 FILE:CATALOG 00482/030A FILE SYSTEM CATALOG OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/031 FILE SYSTEM RWSEQ SA G FILE:RWSEQ(-10000,-1) 5.0T1 1166 FILE_SYSTEM.RWSEQ.SA.031 1 LINE 72 15 PAGE UM HELFFRICH JULY 03, 1981 13:56:52 5.0T3 160 0 SUBROUTINES TO READ AND WRITE SEQUENTIAL FILES. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/032 FILE SYSTEM RWSEQ UC G FILE:RWSEQ(1000) 5.0T1 1167 FILE_SYSTEM.RWSEQ.UC.032 1 LINE 68 1 PAGE UM HELFFRICH JULY 03, 1981 13:56:54 5.0T3 161 FILE:RWSEQ 00482/033 FILE SYSTEM RWSEQ OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/034 FILE SYSTEM TABLRTN SA G FILE:TABLRTN 5.0T1 1168 FILE_SYSTEM.TABLRTN.SA.034 1 LINE 78 31 PAGE UM HELFFRICH JULY 03, 1981 13:56:55 5.0T3 162 FILE:TABLRTN 0 SUBROUTINES TO MAINTAIN SYSTEM-WIDE SHARED FILE TABLE. ASSEMBLE USING COPY:FILE.MACROS (482/45). 1 SUN SEP 08/96 15:24:55 Page 203 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ASSEMBLE STARTING AT LINE 1. 0 Referenced by comments of: 400/12, 482/50, 534/3 00482/035 FILE SYSTEM TABLRTN OC G FILE:TABLRTN.O 5.0T1 1169 FILE_SYSTEM.TABLRTN.OC.035 1 LINE 80 24 PAGE UM HELFFRICH JULY 03, 1981 13:57:13 5.0T3 163 FILE:TABLRTN.O 0 OBJECT ALSO PART OF THE RESIDENT SYSTEM (468). 00482/036 FILE SYSTEM GETFINF SA G FILE:GETFINF(-10000,-1) 5.0T1 1170 FILE_SYSTEM.GETFINF.SA.036 1 LINE 80 8 PAGE UM HELFFRICH JULY 03, 1981 13:57:15 5.0T3 164 0 SUBROUTINE TO RETURN INFORMATION ABOUT A FILE. CALLED BY MTS SUBROUTINE "GFINFO" (PART OF RSF). ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/037 FILE SYSTEM GETFINF UC G FILE:GETFINF(1000) 5.0T1 1171 FILE_SYSTEM.GETFINF.UC.037 1 LINE 68 1 PAGE UM HELFFRICH JULY 03, 1981 13:57:17 5.0T3 165 FILE:GETFINF 00482/038 FILE SYSTEM GETFINF OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00482/039 FILE SYSTEM TEST DSACC SA G FILE:DSACC(1,999) 5.0T1 1172 FILE_SYSTEM.TEST_DSACC.SA.039 1 LINE 41 1 PAGE UM HELFFRICH JULY 03, 1981 13:57:18 5.0T3 166 FILE:DSACC 0 SPECIAL NOP VERSION OF DSACC FOR USE IN TESTING FILE ROUTINES. 0 Referenced by comments of: 482/46, 682/38 00482/040 FILE SYSTEM TEST DSACC OC G FILE:DSACC(1000) 5.0T1 1173 FILE_SYSTEM.TEST_DSACC.OC.040 1 LINE 80 1 PAGE UM HELFFRICH JULY 03, 1981 13:57:18 5.0T3 167 00482/041A FILE SYSTEM FSTEST SA G FILE:FSTEST(1005) 5.1T1 333 FILE_SYSTEM.FSTEST.SA.041 1 LINE 72 13 PAGE UM HELFFRICH JULY 23, 1983 10:46:15 FILE:FSTEST 0 File system test program. Assemble using COPY:FILE.MACROS (482/45) and *SYSMAC. Uses many symbols in SYSDEFS unless loaded with private copies of file routines. ******************************************************************************** D5.0A version: Added DDUMP command to dump file directory pages in sequence. ******************************************************************************** 0 Referenced by comments of: 682/11 1 SUN SEP 08/96 15:24:55 Page 204 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00482/042A FILE SYSTEM FSTEST OC G FILE:FSTEST(1,1004.999) 5.1T1 334 FILE_SYSTEM.FSTEST.OC.042 1 LINE 80 6 PAGE UM HELFFRICH JULY 23, 1983 10:46:16 00482/043 FILE SYSTEM FILE.MACROS SM G FILE:MACROS(-10000,0) 5.0T1 1176 FILE_SYSTEM.FILE.MACROS.SM.043 1 LINE 80 10 PAGE UM HELFFRICH JULY 03, 1981 13:57:26 5.0T3 170 0 BASE SOURCE FOR THE FILE SYSTEM MACRO LIBRARY. 0 Referenced by comments of: 482/44 00482/044A FILE SYSTEM FILE.MACROS UC G FILE:MACROS(1000) 5.1T1 335 FILE_SYSTEM.FILE.MACROS.UC.044 1 LINE 69 1 PAGE UM HELFFRICH JULY 23, 1983 10:46:16 FILE:MACROS 0 Update to be applied to (482/43) to yield current macro source (482/45). 00482/045A FILE SYSTEM FILE.MACROS SM G COPY:FILE.MACROS 5.1T1 336 FILE_SYSTEM.FILE.MACROS.SM.045 1 LINE 72 10 PAGE UM HELFFRICH JULY 23, 1983 10:46:17 COPY:FILE.MACROS 0 MACRO LIBRARY USED TO ASSEMBLE THE FILE SYSTEM AND RELATED ROUTINES. 0 Referenced by comments of: 4/1, 4/5, 67/10, 67/11, 67/23, 73/3, 92/3, 97/8, 104/131, 104/135, 400/11, 400/12, 442/1, 482/4, 482/10, 482/13, 482/16, 482/19, 482/22, 482/25, 482/28, 482/31, 482/34, 482/36, 482/41, 482/44, 482/50, 482/52, 482/61, 502/1, 502/8, 509/1, 540/17, 546/1, 554/1, 554/3, 578/1, 598/1, 599/1, 621/2, 629/4, 671/3, 682/18, 682/21, 682/24, 682/26, 682/28, 682/30, 682/32, 682/41, 682/43, 682/46, 724/1, 769/1, 769/4, 769/7, 769/10, 769/13, 769/16, 769/19, 769/22, 769/30, 790/2, 790/4, 790/5, 790/7, 818/1, 1020/1, 1021/1, 1021/4, 1021/7, 1030/1, 1041/5, 1041/12, 1079/18, 3024/38 00482/046A FILE SYSTEM TEST FILERTNS OC G FILE:FILERTNS 5.1T3 337 FILE_SYSTEM.TEST_FILERTNS.OC.046 1 LINE 38 1 PAGE UM HELFFRICH AUG. 20, 1983 19:45:20 FILE:FILERTNS 0 A SERIES OF $CONTINUE WITHS TO PICK UP THE VARIOUS FILE SYSTEM OBJECT DECKS, A TEST VERSION OF TABLES (482/48), AND A TEST VERSION OF DSACC (482/39). 0 Referenced by comments of: 482/48 00482/047C FILE SYSTEM TEST FILERTNS OC G FILE:FILERTNS.REA 5.1T1 337 FILE_SYSTEM.TEST_FILERTNS.OC.047 1 LINE 38 1 PAGE UM HELFFRICH JULY 23, 1983 10:46:17 FILE:FILERTNS.REA 0 Real file routines which are handy when you're on the test pack. 00482/048 FILE SYSTEM TEST TABLES SA G FILE:TABLES.TEST(1000) 5.0T1 1180 FILE_SYSTEM.TEST_TABLES.SA.047 1 LINE 56 1 PAGE UM HELFFRICH JULY 03, 1981 13:57:31 5.0T3 174 0 A CUT-DOWN VERSION OF TABLES (004) CONTAINING ONLY A DEVICE LIST WITH TWO DISKS, D340 AND D350, A DSKTAB WITH ONLY ONE PACK, AND CATALOG ROOT ENTRIES. USED WITH THE TEST VERSION OF THE FILE ROUTINES (482/46). 1 SUN SEP 08/96 15:24:55 Page 205 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 482/46 00482/049 FILE SYSTEM TEST TABLES OC G FILE:TABLES.TEST(1,998) 5.0T1 1181 FILE_SYSTEM.TEST_TABLES.OC.048 1 LINE 80 2 PAGE UM HELFFRICH JULY 03, 1981 13:57:32 5.0T3 175 FILE:TABLES.TEST 00482/050 FILE SYSTEM TABLRTN TEST SA G FILE:TABLTST 5.0T1 1182 FILE_SYSTEM.TABLRTN_TEST.SA.049 1 LINE 72 14 PAGE UM HELFFRICH JULY 03, 1981 13:57:33 5.0T3 176 FILE:TABLTST 0 PROGRAM TO TEST THE SHARED FILE TABLE ROUTINES TABLRTN (482/34). TO USE THIS, THE SHARED FILE TABLE ROUTINES MUST BE RE-ASSEMBLED STARTING AT LINE 0, SO THAT ALL SVC'S ARE REPLACED WITH SUBROUTINE CALLS TO ENTRY POINTS IN THIS TABLE TEST PROGRAM. THE COMMANDS ACCEPTED BY THIS PROGRAM ARE DOCUMENTED IN THE SOURCE. THIS PROGRAM SHOULD BE ASSEMBLED USING *SYSMAC AND COPY:FILE.MACROS (482/45). THIS PROGRAM REQUIRES A COPY OF MOVE (482/3) IN ORDER TO LOAD PROPERLY. 00482/051 FILE SYSTEM TABLRTN TEST OC G FILE:TABLTST.O 5.0T1 1183 FILE_SYSTEM.TABLRTN_TEST.OC.050 1 LINE 80 5 PAGE UM HELFFRICH JULY 03, 1981 13:57:35 5.0T3 177 FILE:TABLTST.O 00482/052 FILE SYSTEM CATALOG SCAN SA G FILE:CATSCAN(1000) 5.0T1 1184 FILE_SYSTEM.CATALOG_SCAN.SA.051 1 LINE 70 9 PAGE UM HELFFRICH JULY 03, 1981 13:57:36 5.0T3 178 FILE:CATSCAN 0 A PROGRAM WHICH GOES THROUGH THE CATALOG BY USER ID AND GATHERS INFORMATION OF INTEREST, E.G., THE NUMBER OF FILES WITH SPECIFIC SHARING DESCRIPTORS, ETC. IT TAKES A LONG TIME TO RUN. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00482/053 FILE SYSTEM CATALOG SCAN OC G FILE:CATSCAN(1,999) 5.0T1 1185 FILE_SYSTEM.CATALOG_SCAN.OC.052 1 LINE 80 7 PAGE UM HELFFRICH JULY 03, 1981 13:57:39 5.0T3 179 00482/054 FILE SYSTEM DOCUMENTATION WF S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DOCUMENTATION.WF.053(1) 1186 5.0T1 1186 FILE_SYSTEM.DOCUMENTATION.WF.053 1 LINE 190 63 PAGE UM HELFFRICH DEC. 10, 1976 17:23:53 5.0T3 180 0 FORMAT INPUT FOR THE MTS FILE SYSTEM INTERNAL DOCUMENTATION. THE FORMAT OUTPUT SHOULD BE RUN THROUGH THE INDEX PROGRAM (482/55) TO PRODUCE AN INDEX FOR THE FRONT OF THIS WRITEUP. COMPONENT (482/56) CONTAINS COMMANDS TO DO THIS. SEE ALSO COMP (682/1) FOR ADDITIONAL DOCUMENTATION RELATED TO THE FILE SYSTEM. 0 Referenced by comments of: 482/56, 482/59 00482/055 FILE SYSTEM INDEX SS G S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.INDEX.SS.054(1) 1187 5.0T1 1187 FILE_SYSTEM.INDEX.SS.054 1 LINE 68 1 PAGE UM HELFFRICH DEC. 10, 1976 17:24:07 5.0T3 181 0 SNOBOL PROGRAM TO PRODUCE A TABLE OF CONTENTS FOR THE FILE SYSTEM INTERNAL DOCUMENTATION. 0 Referenced by comments of: 482/54, 482/56 1 SUN SEP 08/96 15:24:55 Page 206 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00482/056 FILE SYSTEM DOC CMDS C S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DOC_CMDS.C.055(1) 1188 5.0T1 1188 FILE_SYSTEM.DOC_CMDS.C.055 1 LINE 65 1 PAGE UM HELFFRICH DEC. 10, 1976 17:24:15 5.0T3 182 0 A COMMAND FILE TO PRODUCE THE COMPLETE FILE SYSTEM INTERNAL DOCUMENTATION. IT REFERENCES THE FORMAT INPUT (482/54) AND THE INDEX PROGRAM (482/55). 0 Referenced by comments of: 482/54 00482/057 FILE SYSTEM DSECTLIST1 SS G S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DSECTLIST1.SS.056(1) 1189 5.0T1 1189 FILE_SYSTEM.DSECTLIST1.SS.056 1 LINE 53 1 PAGE UM HELFFRICH JULY 27, 1977 03:56:53 5.0T3 183 0 This SNOBOL program and DSECTLIST2 (482/58) are used to convert an assembly language DSECT into format input which includes symbol values for inclusion in a writeup. 0 Referenced by comments of: 482/58, 482/59 00482/058 FILE SYSTEM DSECTLIST2 SS G S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DSECTLIST2.SS.057(1) 1190 5.0T1 1190 FILE_SYSTEM.DSECTLIST2.SS.057 1 LINE 63 1 PAGE UM HELFFRICH JULY 27, 1977 03:56:55 5.0T3 184 0 The SPUNCH output from (482/57) should be run through this program, the SPUNCH output from this program then being *FORMAT input. 0 Referenced by comments of: 482/57, 482/59 00482/059 FILE SYSTEM DSECTLIST CMDS C S1558 5.0T1 VLO FSNAME=FILE_SYSTEM.DSECTLIST_CMD.C.058(1) 1191 5.0T1 1191 FILE_SYSTEM.DSECTLIST_CMD.C.058 1 LINE 71 1 PAGE UM HELFFRICH JULY 27, 1977 03:56:57 5.0T3 185 0 This command file will run the DSECTLIST programs (482/57) and (482/58) and slightly edit the output for each of the file system DSECTS: FCBEQU, BCBEQU, CATEQU, DSKDSCT, DSCBDSCT, PATEQU, ICEQU, and FDUBDSECT. The resulting output is included as part of (482/54). 00482/060A FILE SYSTEM SCRATCH SIZES C FILE:SCRATCHSIZES(1) 5.1T1 338 FILE_SYSTEM.SCRATCH_SIZES.C.060 1 LINE 75 3 PAGE UM HELFFRICH JULY 23, 1983 10:46:17 FILE:SCRATCHSIZES 0 A SOURCE FILE TO GENERATE A LIST OF HOW MUCH SCRATCH AREA SPACE EACH FILE ROUTINE SUBROUTINE NEEDS. THE FILE CONTAINS THE NECESSARY COMMANDS TO INVOKE THE ASSEMBLER, THE ASSEMBLER MACROS WHICH DO THE DIRTY WORK, AND THE DATA UPON WHICH THE MACROS WORK. THE COMMANDS ARE DEPENDENT UPON THE FILE NAME WHICH CONTAINS THEM. 00482/061 FILE SYSTEM TRAKSTAT SA O FILE:TRAKSTAT(1000) 5.0T1 1193 FILE_SYSTEM.TRAKSTAT.SA.060 1 LINE 72 7 PAGE UM HELFFRICH JULY 03, 1981 13:57:54 5.0T3 187 FILE:TRAKSTAT 0 PROGRAM TO DISPLAY HISTOGRAMS, PREFERABLY ON A 3270 DEVICE, OF CURRENT DISK ACTIVITY IN VARIOUS CATEGORIES: LINE DIRECTORY, DATA, CATALOG, PAT, AND DSCB. TAKES THE FOLLOWING PAR FIELD PARAMETERS: 1 SUN SEP 08/96 15:24:55 Page 207 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 NOHIST TO SUPPRESS HISTOGRAMS NOCLEAR TO SUPPRESS CLEARING OF CUMULATIVE I/O COUNTS DT= NS|NM|NH¬ TO DEFINE SAMPLE INTERVAL RESET= NO|YES¬ TO RESET SWITCH IN TRAK (482/7) WHICH TRIGGERS STATISTICS COLLECTION DEFAULT PARAMETERS ARE DT=15S, RESET=YES. COPIES COPY:FILE.MACROS (482/45) AND COPY:MTS.MACROS (344/3). 00482/062 FILE SYSTEM TRAKSTAT OC O FILE:TRAKSTAT(1,999) 5.0T1 1194 FILE_SYSTEM.TRAKSTAT.OC.061 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 13:58:01 5.0T3 188 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00482/063 FILE SYSTEM TRAKSTATAREA SA O FILE:TRAKSTATAREA(1000) 5.0T1 1195 FILE_SYSTEM.TRAKSTATAREA.SA.062 1 LINE 62 1 PAGE UM HELFFRICH JULY 03, 1981 13:58:04 5.0T3 189 FILE:TRAKSTATAREA 0 THIS REGION MUST BE PISTLED WITH THE "ALIGN" OPTION BEFORE FILE SYSTEM STATISTICS MAY BE GENERATED. THE FIRST WORD OF THIS REGION IS A COUNT RELATING TO HOW MANY PUBLIC VOLUMES THERE ARE FOR WHICH STATISTICS MAY BE ACCUMULATED. 00482/064 FILE SYSTEM TRAKSTATAREA OC O FILE:TRAKSTATAREA(1,999) 5.0T1 1196 FILE_SYSTEM.TRAKSTATAREA.OC.063 1 LINE 80 2 PAGE UM HELFFRICH JULY 03, 1981 13:58:05 5.0T3 190 00482/065C FILE SYSTEM PLUS LIBRARY SQ G COPY:FILE*SQL 5.1T1 339 FILE_SYSTEM.PLUS_LIBRARY.SQ.065 1 LINE 80 13 PAGE UBC WHALEY BURLING JULY 23, 1983 10:46:18 COPY:FILE*SQL 0 PLUS source library for various file system declarations. ******************************************************************** D5.1 version: This is the current UM library. ******************************************************************** 0 Referenced by comments of: 67/1, 67/3, 67/5, 67/7, 482/67, 482/69, 509/10, 509/14, 821/1, 843/1, 851/1, 852/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1086/1 00482/066C FILE SYSTEM PLUS LIBRARY SQ G FILE:FILE#SQL 5.1T1 340 FILE_SYSTEM.PLUS_LIBRARY.SQ.066 1 LINE 80 13 PAGE UBC WHALEY BURLING JULY 23, 1983 10:46:18 0 ******************************************************************** D5.1 version: This is the base source as distributed with the first Resource Manager distribution. ******************************************************************** 1 SUN SEP 08/96 15:24:55 Page 208 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 482/67 00482/067C FILE SYSTEM PLUS LIBRARY UC G FILE:FILE*UQL 5.1T1 341 FILE_SYSTEM.PLUS_LIBRARY.UC.067 1 LINE 65 1 PAGE UM BURLING JULY 23, 1983 10:46:19 0 These are the updates that were used to produce the current UM library (482/65) from (482/66). 00482/068C FILE SYSTEM PLUS INTERFACE SA G FILE:FINT*SA 5.1T1 342 FILE_SYSTEM.PLUS_INTERFAC.SA.068 1 LINE 85 5 PAGE UBC WHALEY BURLING JULY 23, 1983 10:46:19 FILE:FINT*SA 0 Assembler source for assembler part of PLUS (and CC) callable interface to various file routines. This does not take advantage of the PLUS version 23 linkage features. 00482/069C FILE SYSTEM PLUS INTERFACE SQ G FILE:FINT*SQ 5.1T1 343 FILE_SYSTEM.PLUS_INTERFAC.SQ.069 1 LINE 68 3 PAGE UBC WHALEY BURLING JULY 23, 1983 10:46:19 FILE:FINT*SQ 0 PLUS portion of PLUS interface to file routines. Requires the following PLUS source libraries: COPY:FILE*SQL (482/65) *PLUS.SOURCELIB (1042/5) 00482/070C FILE SYSTEM PLUS INTERFACE OL G FILE:FINT*OL 5.1T1 344 FILE_SYSTEM.PLUS_INTERFAC.OL.070 1 LINE 380 4 PAGE UBC WHALEY BURLING JULY 23, 1983 10:46:19 FILE:FINT*OL 0 Object library for PLUS interface to file routines. 0 Referenced by comments of: 67/2, 67/4, 67/6 00483/001 *WATFIV UPDATE UU G W159:WAT5.SGEN 5.0T1 1197 WATFIV.UPDATE.UU.001 1 LINE 80 31 PAGE UM SHERRY JULY 03, 1981 13:58:06 5.0T3 191 0 The WATFIV update deck (483/1) is organized (by line number) as follows: LINE NUMBERS FILE # NAME 2000,2999 *2* ACCT 9000,9999 *9* ARITH 11000,11999 *11* CDEFN 17000,17999 *17* COMMR 34000,34999 *34* DODO 42000,42999 *42* ERROR 44000,44999 *44* ERRTEXTS 46000,46999 *46* EXTRN 49000,49999 *49* FORMAT 50000,50999 *50* FORMCONV 51000,51999 *51* FRIOSCAN 1 SUN SEP 08/96 15:24:55 Page 209 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 53000,53999 *53* FUNCTION 55000,55999 *55* IBCOM# 58000,58999 *58* INOUT 60000,60999 *60* LANDR 61000,61999 *61* MAIN 66000,66999 *66* NAMELIST 68000,68999 *68* OPTIONS 71000,71999 *71* SCAN 75000,75999 *75* SPEX 76000,76999 *76* STARTA 77000,77999 *77* STARTB 78000,78999 *78* STOP# 79000,79999 *79* SYS 84000,84999 *84* WATIO 85000,85999 *85* WATLOAD 86000,86999 *86* ZMONTH Line numbers in this file are important. This component should be restored to a file named WAT5.SGEN since the command file (483/7) has numerous references to this file. 0 Referenced by comments of: 483/1, 483/7 00483/002 *WATFIV FIOCS SA G W159:WAT5.FIOCS.S 5.0T1 1198 WATFIV.FIOCS.SA.002 1 LINE 80 15 PAGE UM SHERRY JULY 03, 1981 13:58:10 5.0T3 192 0 ASSEMBLE USING *SYSMAC + 2 MACRO LIBRARIES FROM WATERLOO. 0 Referenced by comments of: 483/8 00483/003 *WATFIV DIOCS SA G S1558 5.0T1 VLO FSNAME=WATFIV.DIOCS.SA.003(1) 1199 5.0T1 1199 WATFIV.DIOCS.SA.003 1 LINE 80 3 PAGE UM SHERRY JULY 27, 1977 03:57:08 5.0T3 193 0 ASSEMBLE USING *SYSMAC + 2 MACRO LIBRARIES FROM WATERLOO. 0 Referenced by comments of: 483/8 00483/004 *WATFIV DEFAULT SA G W159:WAT5.DFALT.S 5.0T1 1200 WATFIV.DEFAULT.SA.004 1 LINE 71 2 PAGE UM SHERRY JULY 03, 1981 13:58:14 5.0T3 194 0 SUBROUTINE TO RETURN MTS PAGE AND TIME ESTIMATES TO SET UP DEFAULTS INTERNAL TO THE COMPILER. ASSEMBLE USING *SYSMAC. NOTE: THIS ROUTINE IS ALSO USED BY ALGOLW (COMPONENT 528) AND PLC (COMPONENT 485). 0 Referenced by comments of: 483/8 00483/005 *WATFIV OBJECT OE G # *WATFIV UM SHERRY *WATFIV@UM 0 NOTE: BECAUSE OF WATERLOO RESTRICTIONS, THE WATFIV OBJECT CANNOT BE DISTRIBUTED. 1 SUN SEP 08/96 15:24:55 Page 210 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00483/006 *WATFIV TEST DECKS SF G W159:WAT5.TEST 5.0T1 1201 WATFIV.TEST_DECKS.SF.006 1 LINE 80 8 PAGE UM SHERRY JULY 03, 1981 13:58:16 5.0T3 195 0 THE FIRST FEW LINES ON THIS FILE CONTAIN THE MTS COMMANDS NEEDED TO COMPILE THE TEST DECKS WHICH START AT LINE 1000. THEY MUST BE RUN WITH THE FOLLOWING I/O ASSIGNMENTS (TEMPORARY FILES): 1 A SEQUENTIAL FILE 2 A LINE FILE 3 ANOTHER LINE FILE LINE NUMBERS IN THIS FILE ARE IMPORTANT. 00483/007 *WATFIV REASS C W159:WAT5.REASS 5.0T1 1202 WATFIV.REASS.C.007 1 LINE 116 6 PAGE UM SHERRY JULY 03, 1981 13:58:18 5.0T3 196 0 THIS FILE CONTAINS ALL THE MTS COMMANDS NECESSARY TO GENERATE THE VARIOUS COMPONENTS OF WATFIV. THE MTS COMMANDS ARE ORGANIZED (BY LINE NUMBER) IDENTICALLY TO (483/1), E.G. THE SOURCE COMMANDS NECESSARY TO ASSEMBLE WATIO (TAPE FILE #84) ARE LOCATED IN THE LINE RANGE 84000,84999 AS ARE THE CORRESPONDING UPDATE CONTROL CARDS IN WAT5.SGEN (483/1). LINE NUMBERS IN THIS FILE ARE IMPORTANT SINCE (483/8) CONTAINS REFERENCES BY LINE NUMBER. THIS FIRST HUNDRED LINES OF THIS FILE CONTAIN DESCRIPTIONS OF THE VARIOUS SOURCE COMMANDS. THIS FILE CONTAINS TWO $MOUNT COMMANDS-- ONE TO MOUNT THE WATERLOO DISTRIBUTION TAPE AND ANOTHER TO MOUNT A TAPE WHICH RECEIVES THE UNLOADED WATFIV SOURCE FILES. THE MOUNT COMMANDS ARE AT LINE NUMBERS 101 AND 201, RESPECTIVELY, AND SHOULD BE REPLACED APPROPRIATELY. 0 Referenced by comments of: 483/1, 483/8 00483/008 *WATFIV $SOU C W159:WAT5.$SOU 5.0T1 1203 WATFIV.$SOU.C.008 1 LINE 55 1 PAGE UM SHERRY JULY 03, 1981 13:58:19 5.0T3 197 0 THIS FILE CONTAINS ALL THE "$SOURCE WAT5.REASS(---)" (483/7) COMMANDS NECESSARY TO GENERATE THE MTS VERSION OF WATFIV. THIS IS A FIVE STEP PROCEDURE: 1. THE SOURCE CODE FOR WATFIV IS UNLOADED FROM THE WATERLOO DISTRIBUTION TAPE (WATFIV V1L4) ONTO ANOTHER TAPE; A MACRO LIBRARY IS UNLOADED; AND THE FUNCTION OBJECT DECK LIBRARY IS UNLOADED AND UPDATED. 2. THE COPY SECTIONS ACCT, CDEFN, COMMR, ERRTEXTS, EXTRN, OPTIONS, STARTA, STARTB, AND SYS ARE GENERATED (A DISK FILE WITH THE SAME NAME IS PRODUCED FOR EACH COPY SECTION). 3. THE WATFIV CSECTS ARE ASSEMBLED. 4. THE LOCAL MTS ORIGINATED ROUTINES FIOCS (483/2), DIOCS (483/3), DFLT (483/4), TIME (483/9), AND MTSFUN (483/10) ARE ASSEMBLED. 5. THE RESULTING OBJECT DECKS ARE LINKEDITED VIA THE PROCEDURE (483/11) AND THE OUTPUT IS PLACED IN A FILE NAMED WAT5, WHICH MAY BE COPIED TO THE PUBLIC FILE *WATFIV. THUS, WATFIV WILL BE GENERATED IF THIS FILE IS $SOURCED TO. 1 SUN SEP 08/96 15:24:55 Page 211 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 483/7 00483/009 *WATFIV TIME SA O S1558 5.0T1 VLO FSNAME=WATFIV.TIME.SA.009(1) 1204 5.0T1 1204 WATFIV.TIME.SA.009 1 LINE 80 7 PAGE UM SHERRY JULY 27, 1977 03:57:19 5.0T3 198 0 VERSION OF THE MTS TIME SUBROUTINE RECODED TO CONFORM TO WATFIV CALLING CONVENTIONS. PROGRAM WRITTEN AT UBC. ASSEMBLE USING *SYSMAC AND THE TWO WATERLOO MACRO LIBRARIES. 0 Referenced by comments of: 483/8 00483/010 *WATFIV MTSFUN SA G S1558 5.0T1 VLO FSNAME=WATFIV.MTSFUN.SA.010(1) 1205 5.0T1 1205 WATFIV.MTSFUN.SA.010 1 LINE 80 4 PAGE UM SHERRY JULY 27, 1977 03:57:21 5.0T3 199 0 CODE FOR BUILTIN SUBROUTINES RAND, SCLOCK, CLOCK, IEOR, IOR, IAND, AND ICOMPL. ASSEMBLE USING *SYSMAC AND THE TWO WATERLOO MACRO LIBRARIES. 0 Referenced by comments of: 483/8 00483/011 *WATFIV RELINK C W159:WAT5.RELINK 5.0T1 1206 WATFIV.RELINK.C.011 1 LINE 20 1 PAGE UM SHERRY JULY 03, 1981 13:58:21 5.0T3 200 0 LINKEDITOR COMMANDS REQUIRED TO LINKEDIT WATFIV. "INCLUDES" WAT5.O (483/12). 0 Referenced by comments of: 483/8, 483/12 00483/012 *WATFIV WAT5.O OC G W159:WAT5.O 5.0T1 1207 WATFIV.WAT5.O.OC.012 1 LINE 80 1 PAGE UM SHERRY JULY 03, 1981 13:58:22 5.0T3 201 0 THIS FILE CONTAINS A SERIES OF "$CONTINUE WITH" RECORDS, THE OBJECT FOR SPIE, AND SOME LOADER CONTROL RECORDS TO CAUSE THE VARIOUS WATFIV SUB-COMPONENTS TO BE LOADED WHEN THIS FILE IS $RUN. ALSO REFERENCED BY (483/11) TO LINKEDIT WATFIV. 0 Referenced by comments of: 483/11 00484/001A *ACCRESTORE OE G *ACCRESTORE 5.1T1 345 ACCRESTORE..OE.001 1 LINE 3584 3 PAGE UM ENGLE JULY 23, 1983 10:46:20 *ACCRESTORE 0 PROGRAM TO COMPUTE NUMBER OF CURRENT SIGNONS AND CURRENT DISK SPACE FOR A USERID AND THEN UPDATE THE ACCOUNTING RECORD. FILE IS LINKEDIT OF ACCSTRUP (104/36), THE MAIN PROGRAM, PLUS CURSIG (104/98), ACATALOG (104/132), GETFILE (104/130), ACCIO (104/28), ACCFLUPD (104/92), FILERATE (104/22), TV (104/178), AND SYSDEFS. THIS FILE MUST BE PERMITTED AS FOLLOWS: U/N,R (P=W&PKEY=*MTS.RUN,USERID&PKEY=*MTS.ETC.RUN) WHERE "USERID" SHOULD BE REPLACED BY THE USER ID USED TO RUN DEADFILES (502). THIS FILE MUST BE GIVEN THE PROGRAM KEY *ACRESTORE. 0 Referenced by comments of: 136/2, 502/11 1 SUN SEP 08/96 15:24:55 Page 212 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00485/001 *PLC INSTALLATION WF PL1:PLCINSTALL.W 5.0T1 1209 PLC.INSTALLATION.WF.001 1 LINE 132 6 PAGE UM TIFFANY JULY 03, 1981 13:58:23 5.0T3 203 0 Due to copyright restrictions, the master source, macro library, and object for PL/C cannot be distributed. It must be obtained directly from Cornell University. (485/1) consists of instructions for installing PL/C release 7.6 in MTS. 0 Referenced by comments of: 485/1, 485/22, 485/24 00485/002 *PLC OSPLCGEN C G S0548 PLCARC 'PLC ARCHIVE' FSNAME=OSPLCGEN 5.0T1 1210 PLC.OSPLCGEN.C.002 1 LINE 67 2 PAGE UM TIFFANY APR. 10, 1981 15:16:29 5.0T3 204 0 MTS command file to generate OS PL/C in file OSPLC. 00485/003 *PLC MTSPLCGEN C G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MTSPLCGEN 5.0T1 1211 PLC.MTSPLCGEN.C.003 1 LINE 110 3 PAGE UM TIFFANY APR. 10, 1981 15:16:47 5.0T3 205 0 MTS command file to generate initial MTS PL/C in file MTSPLC. 00485/004 *PLC INITPLCGEN C O S0548 PLCARC 'PL/C ARCHIVE' FSNAME=INITPLCGEN 5.0T1 1212 PLC.INITPLCGEN.C.004 1 LINE 110 2 PAGE UM TIFFANY APR. 10, 1981 15:16:59 5.0T3 206 0 MTS command file to generate the copy section PLCLXRWT to be replaced in PLCMACLIB (485/37), and the object modules PLCMAIN, PLCRVT, and PLCRTT to be replaced in MTSPLC. 00485/005 *PLC MESGPLCGEN C G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MESGPLCGEN 5.0T1 1213 PLC.MESGPLCGEN.C.005 1 LINE 106 1 PAGE UM TIFFANY APR. 10, 1981 15:17:10 5.0T3 207 0 MTS command file to generate error messages with corrections. 00485/006 *PLC CLEANPLCGEN C G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CLEANPLCGEN 5.0T1 1214 PLC.CLEANPLCGEN.C.006 1 LINE 106 3 PAGE UM TIFFANY APR. 10, 1981 15:17:19 5.0T3 208 0 Final generation -- the result is an unpatched PLC object deck. 00485/007 *PLC CGDR.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CGDR.U 5.0T1 1215 PLC.CGDR.U.UC.007 1 LINE 71 3 PAGE UM TIFFANY APR. 10, 1981 15:24:47 5.0T3 209 0 MTS update for the code-generation driver module. 1 SUN SEP 08/96 15:24:55 Page 213 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00485/008 *PLC CGIG.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CGIG.U 5.0T1 1216 PLC.CGIG.U.UC.008 1 LINE 58 1 PAGE UM TIFFANY APR. 10, 1981 15:25:00 5.0T3 210 0 MTS update for the code-generation interpretive coder. 00485/009C *PLC CGOP.U UC G PL1:CGOP.U 5.1T1 346 PLC.CGOP.U.UC.009 1 LINE 67 1 PAGE UM TIFFANY JULY 23, 1983 10:46:20 0 MTS update for the module which generates code for operator tables. Corrects outstanding bug of ADD, MULTIPLY, and DIVIDE builtin functions. 00485/010 *PLC CGXG.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CGXG.U 5.0T1 1217 PLC.CGXG.U.UC.009 1 LINE 63 1 PAGE UM TIFFANY APR. 10, 1981 15:25:14 5.0T3 211 0 MTS update for the expression code-generator. 00485/011 *PLC CONT.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CONT.U 5.0T1 1218 PLC.CONT.U.UC.010 1 LINE 100 9 PAGE UM TIFFANY APR. 10, 1981 15:25:28 5.0T3 212 0 MTS update for the collection of CSECTS which control the sequencing of the compiler phases and provide interfacing between PL/C and the low level routines. 00485/012 *PLC CVNM.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=CVNM.U 5.0T1 1219 PLC.CVNM.U.UC.011 1 LINE 67 1 PAGE UM TIFFANY APR. 10, 1981 15:25:45 5.0T3 213 0 MTS update for number conversion routine. 00485/013 *PLC DGIO.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=DGIO.U 5.0T1 1220 PLC.DGIO.U.UC.012 1 LINE 95 1 PAGE UM TIFFANY APR. 10, 1981 15:25:55 5.0T3 214 0 MTS update for the I/O-statement code generator. 00485/014 *PLC ERMW.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=ERMW.U 5.0T1 1221 PLC.ERMW.U.UC.013 1 LINE 92 3 PAGE UM TIFFANY APR. 10, 1981 15:26:15 5.0T3 215 0 MTS update for the module which produces the error messages. 00485/015 *PLC EXEC.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXEC.U 5.0T1 1222 PLC.EXEC.U.UC.014 1 LINE 71 1 PAGE UM TIFFANY APR. 10, 1981 15:26:39 5.0T3 216 0 MTS update for the module which contains run-time utility routines. 00485/016 *PLC EXIO.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXIO.U 5.0T1 1223 PLC.EXIO.U.UC.015 1 LINE 51 1 PAGE UM TIFFANY APR. 10, 1981 15:26:51 5.0T3 217 0 MTS update for the module which contains common run-time I/O routines. 1 SUN SEP 08/96 15:24:55 Page 214 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00485/017 *PLC EXON.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXON.U 5.0T1 1224 PLC.EXON.U.UC.016 1 LINE 44 1 PAGE UM TIFFANY APR. 10, 1981 15:27:00 5.0T3 218 0 MTS update for the module containing the ON-unit manager. 00485/018 *PLC EXRI.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXRI.U 5.0T1 1225 PLC.EXRI.U.UC.017 1 LINE 99 1 PAGE UM TIFFANY MAY 15, 1981 11:32:25 5.0T3 219 0 MTS update for the module which performs record I/O. 00485/019 *PLC EXUD.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=EXUD.U 5.0T1 1226 PLC.EXUD.U.UC.018 1 LINE 67 1 PAGE UM TIFFANY APR. 10, 1981 15:27:25 5.0T3 220 0 MTS update for the module that processes undefined variables. 00485/020 *PLC GPCR.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=GPCR.U 5.0T1 1227 PLC.GPCR.U.UC.019 1 LINE 87 1 PAGE UM TIFFANY APR. 10, 1981 15:27:35 5.0T3 221 0 MTS update for the module which performs conversions at run-time. 00485/021 *PLC IM.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=IM.U 5.0T1 1228 PLC.IM.U.UC.020 1 LINE 98 5 PAGE UM TIFFANY APR. 10, 1981 15:27:47 5.0T3 222 0 MTS update for the installation-dependent module. 00485/022 *PLC INIT.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=INIT.U 5.0T1 1229 PLC.INIT.U.UC.021 1 LINE 68 3 PAGE UM TIFFANY APR. 10, 1981 15:27:58 5.0T3 223 0 See installation writeup (485/1) for details. 00485/023 *PLC LEXI.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=LEXI.U 5.0T1 1230 PLC.LEXI.U.UC.022 1 LINE 66 1 PAGE UM TIFFANY APR. 10, 1981 15:28:08 5.0T3 224 0 Update applies to PLCMACLIB (485/37), which contains several copy sections for the Lexical Analyzer. If you are changing PLCLEXI, PLCSYNA and PLCPICT must also be reassembled since they copy part of PLCLEXI. 00485/024 *PLC MESG.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MESG.U 5.0T1 1231 PLC.MESG.U.UC.023 1 LINE 59 1 PAGE UM TIFFANY APR. 10, 1981 15:28:22 5.0T3 225 0 See installation writeup (485/1) for details. 1 SUN SEP 08/96 15:24:55 Page 215 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00485/025 *PLC MIMO.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=MIMO.U 5.0T1 1232 PLC.MIMO.U.UC.024 1 LINE 97 8 PAGE UM TIFFANY APR. 10, 1981 15:28:32 5.0T3 226 0 MTS update for the module which gains initial control in PL/C (mini-monitor). 00485/026 *PLC OPTB.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=OPTB.U 5.0T1 1233 PLC.OPTB.U.UC.025 1 LINE 72 1 PAGE UM TIFFANY APR. 10, 1981 15:28:43 5.0T3 227 0 MTS update for the module which defines the default options for PL/C. 00485/027 *PLC OPTN.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=OPTN.U 5.0T1 1234 PLC.OPTN.U.UC.026 1 LINE 99 4 PAGE UM TIFFANY APR. 10, 1981 15:28:52 5.0T3 228 0 MTS update for the module which performs the compiler options scanning. 00485/028 *PLC PICT.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PICT.U 5.0T1 1235 PLC.PICT.U.UC.027 1 LINE 62 1 PAGE UM TIFFANY APR. 10, 1981 15:29:01 5.0T3 229 0 MTS update for the module that processes pictures. 00485/029 *PLC RVRS.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=RVRS.U 5.0T1 1236 PLC.RVRS.U.UC.028 1 LINE 36 1 PAGE UM TIFFANY APR. 10, 1981 15:29:11 5.0T3 230 0 MTS update for the reverse-translation generator. 00485/030 *PLC SYNA.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=SYNA.U 5.0T1 1237 PLC.SYNA.U.UC.029 1 LINE 68 3 PAGE UM TIFFANY APR. 11, 1981 16:19:06 5.0T3 231 0 Update applies only to PLCMACLIB (485/37), which contains several copy sections for the Syntactic-Analysis Routine. 00485/031 *PLC SYSO.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=SYSO.U 5.0T1 1238 PLC.SYSO.U.UC.030 1 LINE 100 18 PAGE UM TIFFANY APR. 10, 1981 15:29:47 5.0T3 232 0 MTS update for the module which interfaces with the operating system. 00485/032 *PLC XREF.U UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=XREF.U 5.0T1 1239 PLC.XREF.U.UC.031 1 LINE 69 1 PAGE UM TIFFANY APR. 10, 1981 15:30:06 5.0T3 233 0 MTS update for the cross-reference generator. 00485/033 *PLC DEFAULT SA G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=DEFAULT.S 5.0T1 1240 PLC.DEFAULT.SA.032 1 LINE 71 3 PAGE UM TIFFANY APR. 19, 1978 17:48:53 5.0T3 234 0 Subroutine to handle default page and time estimates in MTS -- not part of the 1 SUN SEP 08/96 15:24:55 Page 216 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Cornell source. 00485/034 *PLC DEFAULT OC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=DEFAULT.O 5.0T1 1241 PLC.DEFAULT.OC.033 1 LINE 80 1 PAGE UM TIFFANY APR. 19, 1978 17:48:00 5.0T3 235 00485/035 *PLC PLCMSGS SA G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PLCMSGS 5.0T1 1242 PLC.PLCMSGS.SA.034 1 LINE 72 4 PAGE UM TIFFANY APR. 10, 1981 15:30:20 5.0T3 236 0 Source for a routine to print all PL/C error messages. Use this for verification of error messages. (Not a part of the Cornell source.) Copies *GDINFODSECT (594). 00485/036 *PLC PLCMSGS OC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PLCMSGS.O 5.0T1 1243 PLC.PLCMSGS.OC.035 1 LINE 80 3 PAGE UM TIFFANY APR. 10, 1981 15:30:37 5.0T3 237 0 Refers to PLCMSGA...PLCMSGF. 00485/037 *PLC PLCMACLIB SM G # PL1:PLCMACLIB UM TIFFANY 0 PL/C macro library. Cannot be distributed due to copyright restriction. 0 Referenced by comments of: 485/4, 485/23, 485/30, 485/38 00485/038 *PLC PLCMACLIB UC G S0548 PLCARC 'PL/C ARCHIVE' FSNAME=PLCMAC.UP 5.0T1 1244 PLC.PLCMACLIB.UC.037 1 LINE 71 2 PAGE UM TIFFANY APR. 10, 1981 15:23:36 5.0T3 238 0 Update for PLCMACLIB (485/37). 00485/039A *PLC OBJECT OC G # SEG2:PLC UM TIFFANY 0 PL/C segment 2 object. Cannot be distributed due to copyright restrictions. 00485/040 *PLC *PLC OC G *PLC 5.0T1 1245 PLC.*PLC.OC.039 1 SEQ 24 1 PAGE UM TIFFANY JULY 03, 1981 14:06:01 5.0T3 239 0 These cards refer to the actual object loaded by PISTLE (559). 00486/001 *HBQ SA # (OBSOLETE) D4T1 1196 HBQ..SA.001 1 LINE 80 18 PAGE UM FEB. 25, 1975 16:41:55 0 Obsoleted by the $SYSTEMSTATUS command. 00487/001A *LABEL MAIN PGM SA G TAPE:LABEL(1,999) 5.1T1 347 LABEL.MAIN_PGM.SA.001 1 LINE 68 5 PAGE UM LIFT JULY 23, 1983 10:46:23 0 Program to initialize labeled or unlabeled magnetic tapes. Calls TPINIT subroutine (487/4). Source in lines 1,999. 1 SUN SEP 08/96 15:24:55 Page 217 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 135/1, 487/3 00487/002A *LABEL MAIN PGM OE G *LABEL 5.1T1 348 LABEL.MAIN_PGM.OE.002 1 LINE 2088 1 PAGE UM LIFT JULY 23, 1983 10:46:23 *LABEL 00487/003 *LABEL *LBL C *LBL 5.0T1 1248 LABEL.*LBL.C.003 1 LINE 34 1 PAGE UM LIFT JULY 03, 1981 14:06:04 5.0T3 242 *LBL 0 COMMAND FILE TO RUN *LABEL (487/1) FOR THE OPERATORS. INVOKED BY ENTERING "MTS *LBL" ON THE OPERATOR'S CONSOLE. 00487/004A *LABEL TPINIT SUBR SA G TAPE:TAPEINIT(1,999) 5.1T1 349 LABEL.TPINIT_SUBR.SA.004 1 LINE 72 4 PAGE UM LIFT JULY 23, 1983 10:46:23 0 Subroutine, with alternate entry TAPEINIT, which initializes tapes (labeled or unlabeled). Source in lines 1,999. ******************************************************************************* D5.0B version: Change in ANSI labels. ******************************************************************************* 0 Referenced by comments of: 487/1 00487/005A *LABEL TPINIT SUBR OC G # (PART OF *LIBRARY) UM LIFT 0 Object part of *LIBRARY (524/1) 00488/001 CONTROL SA # (OBSOLETE) D2.3 035 UM 00489/001A TESTIO SA G S0792 WSGFS FSNAME=TT.SA 5.1T1 350 TESTIO..SA.001 1 LINE 71 8 PAGE UM WSG FEB. 09, 1983 12:11:18 0 The TESTIO program (also known as TAPETEST and TT) was designed to test MTS user-level I/O. It can be used to do simple reads and writes on arbitrary FDnames, but will also test backward reads, @MAXLEN reads, etc. See the writeup (489/3) for details. Copies *SENSEDSECT (3025). 00489/002A TESTIO OE G UNSP:TESTIO 5.1T1 351 TESTIO..OE.002 1 LINE 3524 3 PAGE UM WSG JULY 23, 1983 10:46:27 UNSP:TESTIO 00489/003A TESTIO P UNSP:TESTIO.W 5.1T1 352 TESTIO..P.003 1 LINE 69 1 PAGE UM WSG JULY 23, 1983 10:46:27 UNSP:TESTIO.W 0 Referenced by comments of: 489/1 1 SUN SEP 08/96 15:24:55 Page 218 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00490/001 *LAR C *LAR 5.0T1 1253 LAR..C.001 1 LINE 29 1 PAGE UM MTA JULY 03, 1981 14:06:13 5.0T3 247 STRT:*LAR 0 COMMAND FILE TO RUN UNITS (1012) TO RESET ALL 2703 (AND SIMILAR) LINES. IT RESETS EVERYTHING WITH DEVICE TYPE MRXA, SDA, TTY, OR 2741. INVOKED BY ENTERING "MTS *LAR" ON THE OPERATOR'S CONSOLE. IT SHOULD ONLY BE USED WHEN A 2703 OR MEMOREX 1270 HAS DROPPED ITS LINES SINCE IT FAKES A UNIT CHECK ON EACH 2703 ADDRESS. 00491/001 *SCRAMBLE # (OBSOLETE) D4T1 1204 SCRAMBLE..SF.001 1 LINE 50 1 PAGE UM JUNE 06, 1976 22:11:25 D4T3 303 0 Obsoleted by *ENCRYPT (677) 00492/001 *DCALC SP G S1558 5.0T1 VLO FSNAME=DCALC..SP.001(1) 1254 5.0T1 1254 DCALC..SP.001 1 LINE 80 13 PAGE UM MTA AUG. 03, 1973 21:27.08 5.0T3 248 0 PL/I DESK CALCULATOR PROGRAM. 00492/002 *DCALC OE G *DCALC 5.0T1 1255 DCALC..OE.002 1 SEQ 21678 9 PAGE UM MTA JULY 03, 1981 14:06:17 5.0T3 249 *DCALC 0 Ends with a "$CONTINUE WITH *PL1LIB" card. 00493/001 *TALLY MAIN SA O S1558 5.0T1 VLO FSNAME=TALLY.MAIN.SA.001(1) 1256 5.0T1 1256 TALLY.MAIN.SA.001 1 LINE 80 9 PAGE UM VALERIO JULY 27, 1977 04:12:45 5.0T3 250 0 TALLY IS A PROGRAM TO MONITOR THE EXECUTION OF A USER PROGRAM AND TO COUNT THE NUMBER OF TIMES EACH MACHINE INSTRUCTION IS EXECUTED. 00493/002 *TALLY SIM SUBR SA O S1558 5.0T1 VLO FSNAME=TALLY.SIM_SUBR.SA.002(1) 1257 5.0T1 1257 TALLY.SIM_SUBR.SA.002 1 LINE 80 36 PAGE UM VALERIO JULY 27, 1977 04:12:47 5.0T3 251 00493/003 *TALLY OBJECT OC O *TALLY 5.0T1 1258 TALLY.OBJECT.OC.003 1 LINE 255 4 PAGE UM VALERIO JULY 03, 1981 14:06:20 5.0T3 252 *TALLY 00494/001 *CSMP SA G CSMP W020:CSMPDISTR(1,341) 5.0T1 1259 CSMP..SA.001 1 LINE 80 8 PAGE UM FLANIGAN JULY 03, 1981 14:06:21 5.0T3 253 0 CONTINUOUS SYSTEM MODELING PROGRAM (MODIFIED FROM IBM). *CSMP PROVIDES FULL COMPREHENSIVE CONTROL OVER ALL PHASES FOR ONE OR MORE STACKED MODELS. 1 SUN SEP 08/96 15:24:55 Page 219 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00494/002 *CSMP OE G *CSMP 5.0T1 1260 CSMP..OE.002 1 SEQ 80 2 PAGE UM FLANIGAN JULY 03, 1981 14:06:22 5.0T3 254 *CSMP 00494/003 *CSMP CSMPTRAN SA G CPTR W020:CSMPDISTR(500,720) 5.0T1 1261 CSMP.CSMPTRAN.SA.003 1 LINE 80 6 PAGE UM FLANIGAN JULY 03, 1981 14:06:24 5.0T3 255 0 TRANSLATION CONTROL. ASSEMBLE USING *SYSMAC AND PUT IN *CSMPTRAN. ADD "$CONTINUE WITH *CSMPLIB" AT END. 00494/004 *CSMP *CSMPTRAN OE G *CSMPTRAN 5.0T1 1262 CSMP.*CSMPTRAN.OE.004 1 SEQ 80 1 PAGE UM FLANIGAN JULY 03, 1981 14:06:25 5.0T3 256 *CSMPTRAN 0 ENDS WITH A "$CONTINUE WITH *CSMPLIB" CARD. 00494/005 *CSMP CSMPEXEC SA G CPEX W020:CSMPDISTR(1000,1107) 5.0T1 1263 CSMP.CSMPEXEC.SA.005 1 LINE 80 4 PAGE UM FLANIGAN JULY 03, 1981 14:06:25 5.0T3 257 0 EXECUTION CONTROL 00494/006 *CSMP *CSMPEXEC OE G *CSMPEXEC 5.0T1 1264 CSMP.*CSMPEXEC.OE.006 1 SEQ 80 1 PAGE UM FLANIGAN JULY 03, 1981 14:06:26 5.0T3 258 *CSMPEXEC 00494/007 *CSMP CSMPLIB IBM S G S0280 'FLANIGAN SYSTEM SOURCE ONE' FMT=FB(8000,80) 2 5.0T1 1265 CSMP.CSMPLIB_IBM.S.007 1 SEQ 80 155 PAGE UM FLANIGAN JULY 03, 1981 14:07:13 5.0T3 259 0 ORIGINAL IBM SOURCE (FORTRAN AND ASM). 00494/008 *CSMP CSMPLIB UPD UU G W020:CSMPDISTR(2000,2175) 5.0T1 1266 CSMP.CSMPLIB_UPD.UU.008 1 LINE 80 4 PAGE UM FLANIGAN JULY 03, 1981 14:07:15 5.0T3 260 0 THIS UPDATE DECK APPLIES ALL KNOWN IBM APARS PLUS LOCAL CHANGES. IT ASSUMES THE FOLLOWING: 1. IBM SOURCE IS ON TAPE *S* 2. A POOL TAPE HAS BEEN MOUNTED AS *P* 3. AN EMPTY SEQUENTIAL FILE -A EXISTS THIS UPDATE PUTS THE UPDATED CSMP FORTRAN ROUTINES ON *P* WITH BLOCKING FACTOR 100, REWINDS IT, PUTS THE UPDATED CSMP ASSEMBLER ROUTINES IN -A, AND REWINDS AND UNLOADS *S*. 0 Referenced by comments of: 494/10 00494/009 *CSMP CSMPLIB ASM SA G W020:CSMPDISTR(1500,1531) 5.0T1 1267 CSMP.CSMPLIB_ASM.SA.009 1 LINE 70 1 PAGE UM FLANIGAN JULY 03, 1981 14:07:16 5.0T3 261 0 TWO ASM ROUTINES USED DURING DYNAMIC LINKING. 1 SUN SEP 08/96 15:24:55 Page 220 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 494/10 00494/010 *CSMP *CSMPLIB OL G *CSMPLIB 5.0T1 1268 CSMP.*CSMPLIB.OL.010 1 SEQ 6924 32 PAGE UM FLANIGAN JULY 03, 1981 14:07:17 5.0T3 262 *CSMPLIB 0 LIBRARY MADE FROM ASM AND FTN ROUTINES UPDATED BY (494/8) AND ASM ROUTINES FROM COMPONENT (494/9). (NOTE: FORTRANH HAS BEEN USED.) 00495/001 EXPL SUBMONITOR SA G W052:EXMON.S 5.0T1 1269 EXPL.SUBMONITOR.SA.001 1 LINE 80 33 PAGE UM SHERRY JULY 03, 1981 14:07:19 5.0T3 263 0 Extended version of XPL. Using this version, an XPL program can consist of a collection of independently compiled procedures. This version produces normal MTS object decks, rather than special object modules. The submonitor consists of 4 csects: XMON, XPLDFLTS, COMPACT#, and SORTIT. Also included are the runtime library routines INDEX, TIMEX, EXCALL, and MAIN (which is a dummy routine to print an error message if no main procedure exists). Assemble using *SYSMAC with PAR=BATCH. Copies *GDINFODSECT (594) and *LOADINFODSECT (001/4). 0 Referenced by comments of: 318/9, 495/2 00495/002 EXPL *EXPLIB OE G *EXPLIB 5.0T1 1270 EXPL.*EXPLIB.OE.002 1 LINE 5914 6 PAGE UM SHERRY JULY 03, 1981 14:07:21 5.0T3 264 *EXPLIB 0 EXPL RUNTIME LIBRARY. THIS LIBRARY IS GENERATED BY *OBJUTIL (721) AND CONSISTS OF THE OBJECT MODULES PRODUCED BY ASSEMBLING (495/1). 0 Referenced by comments of: 782/60 00495/003A EXPL *EXCOM SX G *EXCOM 5.1T1 353 EXPL.?EXCOM.SX.003 1 LINE 100 70 PAGE UM SHERRY JULY 23, 1983 10:46:28 *EXCOM 0 EXPL SOURCE FOR THE EXTENDED XPL COMPILER. THE RESULTING OBJECT MUST BE RUN CONCATENATED WITH *EXPLIB. 0 Referenced by comments of: 495/5 00495/004C EXPL EXCOM.U UC G W052:EXCOM.U 5.1T1 354 EXPL.EXCOM.U.UC.004 1 LINE 118 13 PAGE UM SHERRY JULY 23, 1983 10:46:31 0 Update deck to produce the current version of *EXCOM from the D5.0 version. Contains update to string catenate code required if an EXPL object module is to execute when loaded above segment 7. 1 SUN SEP 08/96 15:24:55 Page 221 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00495/005A EXPL EXPL OBJ OE G W052:EXPL.O 5.1T1 355 EXPL.EXPL_OBJ.OE.005 1 LINE 32767 42 PAGE UM SHERRY JULY 23, 1983 10:46:31 0 OBJECT PRODUCED BY COMPILING *ECXOM (495/3). 00495/006A EXPL *EXPL OE G *EXPL 5.1T1 356 EXPL.?EXPL.OE.006 1 SEQ 32767 43 PAGE UM SHERRY JULY 23, 1983 10:46:33 *EXPL 0 IT IS MOST CONVENIENT TO LINKEDIT THE COMPILER AND SUBMONITOR TOGETHER TO MAKE *EXPL. NOTE THAT THE ENTRY POINT MUST BE XPLSM. WHEN LINKEDITING, THE XPLDFLTS CSECT WHICH SETS THE FREE STRING AREA SIZE (FSASIZE) TO 15 PAGES SHOULD BE USED. $SOURCE EXPL.LINK (495/9) TO GENERATE THE LINKEDITED VERSION OF EXPL. 00495/007 EXPL *EXPLBNF D G *EXPLBNF 5.0T1 1274 EXPL.*EXPLBNF.D.006 1 LINE 73 3 PAGE UM SHERRY JULY 03, 1981 14:08:32 5.0T3 268 *EXPLBNF 0 SUITABLE INPUT TO *ANALYZER (318/13) TO PRODUCE THE NECESSARY DECLARATIONS FOR DRIVING THE PARSING ALGORITHM FOR *EXPL. 00495/008 EXPL *EXSKELETON SX G *EXSKELETON 5.0T1 1275 EXPL.*EXSKELETON.SX.007 1 LINE 80 12 PAGE UM SHERRY JULY 03, 1981 14:08:32 5.0T3 269 *EXSKELETON 0 THIS IS A VERSION OF SKELETON (318/12), A PROTO-COMPILER FOR USE WITH *EXPL. IT CONSISTS OF SEVERAL INDEPENDENTLY COMPILABLE EXTERNAL PROCEDURES WHICH FORM THE FRAMEWORK FOR A TABLE-DRIVEN COMPILER. 00495/009 EXPL LINK C G S1558 5.0T1 VLO FSNAME=EXPL.LINK.C.008(1) 1276 5.0T1 1276 EXPL.LINK.C.008 1 LINE 22 1 PAGE UM SHERRY OCT. 12, 1980 15:46:30 5.0T3 270 0 SOURCE FILE WHICH LINKEDITS THE APPROPRIATE PIECES OF THE SUBMONITOR AND EXCOM INTO AN EXPL COMPILER. 0 Referenced by comments of: 495/6 00495/010 EXPL MEMO 416 WX S1558 5.0T1 VLO FSNAME=EXPL.MEMO_416.WX.009(1) 1277 5.0T1 1277 EXPL.MEMO_416.WX.009 1 LINE 199 14 PAGE UM SHERRY OCT. 12, 1980 15:46:30 5.0T3 271 0 THIS IS COMPUTING CENTER MEMO 416 -- "EXPL - EXTENDED XPL." THIS MEMO OBSOLETES MEMOS 343 AND 390. 00496/001A *APC SA G LBT:APC.S 5.1T1 357 APC..SA.001 1 LINE 82 68 PAGE UM TIFFANY JULY 23, 1983 10:46:34 0 This is the all-purpose compare program which is used primarily to test for equality between records of two files or devices. Copies *GDINFODSECT (594) and *SENSEDSECT (3025). ************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 222 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 D5.0C version: Changed to acknowledge Lee Data devices. ************************************************************************** 0 Referenced by comments of: 629/12, 1016/1 00496/002A *APC OE G *APC 5.1T1 358 APC..OE.002 1 LINE 21311 8 PAGE UM TIFFANY JULY 23, 1983 10:46:37 *APC 00496/003 *APC EXPLAIN MSG M ETC:APCEXP 5.0T1 1280 APC.EXPLAIN_MSG.M.003 1 LINE 66 10 PAGE UM TIFFANY JULY 03, 1981 14:08:46 5.0T3 274 ETC.:APCEXP 0 Explain message file for *APC. 00496/004C *APC EXPER VERS DOC P W062:NEWAPC.P 5.1T1 359 APC.EXPER_VERS_DOC.P.004 1 LINE 66 2 PAGE TIFFANY JULY 23, 1983 10:46:37 0 Components (496/5) through (496/24) comprise an experimental version of APC which uses the Screen Support Routines (811). Most of the source requires the PL/I Optimizing Compiler (813). This subcomponent is a copy of MTS:FORUM item 350, which describes this version of *APC. 00496/005C *APC MAIN SP O W062:NEWAPC.S 5.1T1 360 APC.MAIN.SP.005 1 LINE 68 5 PAGE UM TIFFANY JULY 23, 1983 10:46:38 0 This subcomponent is the main procedure. Requires the PL/I Optimizing Compiler (813). 0 Referenced by comments of: 496/4, 496/23 00496/006C *APC CMD SP O W062:APC_CMD.S 5.1T1 361 APC.CMD.SP.006 1 LINE 71 11 PAGE UM TIFFANY JULY 23, 1983 10:46:38 0 This is the routine which passes the commands and issues them. 00496/007C *APC VISUAL SP O W062:APC_VISUAL.S 5.1T1 362 APC.VISUAL.SP.007 1 LINE 69 10 PAGE UM TIFFANY JULY 23, 1983 10:46:39 0 This is the routine which does the visual mode; it requires the Screen Support Routines (811). 00496/008C *APC CONTINUE SP O W062:APC_CONTINUE 5.1T1 363 APC.CONTINUE.SP.008 1 LINE 68 2 PAGE UM TIFFANY JULY 23, 1983 10:46:39 0 This is the routine which issues the CONTINUE command. 1 SUN SEP 08/96 15:24:55 Page 223 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00496/009C *APC SCAN SP O W062:APC_SCAN.S 5.1T1 364 APC.SCAN.SP.009 1 LINE 67 2 PAGE UM TIFFANY JULY 23, 1983 10:46:39 0 This is the routine which issues the SCAN command. 00496/010C *APC LOG SP O W062:APC_LOG.S 5.1T3 338 APC.LOG.SP.010 1 LINE 64 2 PAGE UM TIFFANY AUG. 20, 1983 19:45:20 0 This is the routine which issues the LOG command. 00496/011C *APC RDLINE SP O W062:APC_ETC.S(2000,2999) 5.1T1 365 APC.RDLINE.SP.011 1 LINE 65 1 PAGE UM TIFFANY JULY 23, 1983 10:46:39 0 This is the routine which reads a line from unit 0 or 1. 00496/012C *APC EQUAL SP O W062:APC_ETC.S(4000,4999) 5.1T1 366 APC.EQUAL.SP.012 1 LINE 66 2 PAGE UM TIFFANY JULY 23, 1983 10:46:40 0 This is the routine which compares two lines. 00496/013C *APC CONVERT LINE SP O W062:APC_ETC.S(7000,7999) 5.1T1 367 APC.CONVERT_LINE.SP.013 1 LINE 65 1 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 This is the routine which converts and edits a fullword MTS line into a twelve-character field. 00496/014C *APC DOUBLE SP O W062:APC_ETC.S(9000,9999) 5.1T1 368 APC.DOUBLE.SP.014 1 LINE 71 3 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 This is the routine which prints lines from both units in two-column format. 00496/015C *APC SINGLE SP O W062:APC_ETC.S(10000,10999) 5.1T1 369 APC.SINGLE.SP.015 1 LINE 67 2 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 This is the routine which prints a line from either unit 0 or unit 1 in one-column format. 00496/016C *APC HEX SP O W062:APC_ETC.S(1,999) 5.1T1 370 APC.HEX.SP.016 1 LINE 67 2 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 Two entry points HEX and HEX4 convert character strings into hexadecimal format. 00496/017C *APC ERROR SP O W062:APC_ETC.S(1000,1999) 5.1T1 371 APC.ERROR.SP.017 1 LINE 68 1 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 This is the routine which prints an error message, given the message number. 00496/018C *APC FWD SP O W062:APC_ETC.S(3000,3999) 5.1T1 372 APC.FWD.SP.018 1 LINE 64 1 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 Two entry points FWD and BACK issue two commands FORWARD and BACK, respectively. 1 SUN SEP 08/96 15:24:55 Page 224 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00496/019C *APC CONVERT SP O W062:APC_ETC.S(5000,5999) 5.1T1 373 APC.CONVERT.SP.019 1 LINE 68 1 PAGE UM TIFFANY JULY 23, 1983 10:46:41 0 This routine converts a character string into a fullword integer. 00496/020C *APC LNRCONV SP O W062:APC_ETC.S(6000,6999) 5.1T1 374 APC.LNRCONV.SP.020 1 LINE 67 1 PAGE UM TIFFANY JULY 23, 1983 10:46:42 0 This routine converts a character string into an internal MTS line number. 00496/021C *APC GETLNR SP O W062:APC_ETC.S(8000,8999) 5.1T1 375 APC.GETLNR.SP.021 1 LINE 63 2 PAGE UM TIFFANY JULY 23, 1983 10:46:42 0 This routine processes the screen line number field and positions the unit accordingly. 00496/022C *APC FDNAME SA O W062:FDNAME(1,999) 5.1T1 376 APC.FDNAME.SA.022 1 LINE 58 1 PAGE UM TIFFANY JULY 23, 1983 10:46:42 0 This routine returns a file/device name and the beginning line number, given the unit number. 0 Referenced by comments of: 496/23 00496/023C *APC EXPER OBJECT O O W062:VISUAL 5.1T1 377 APC.EXPER_OBJECT.O.023 1 LINE 22100 25 PAGE UM TIFFANY JULY 23, 1983 10:46:42 0 Object modules from the subcomponents (496/5) through (496/22), an experimental version of *APC. Do not use *OBJUTIL (721), since the first csect of each module is always PLISTART. Contains a $CONTINUE WITH *PL1OPTLIB (827/5) record. 0 Referenced by comments of: 496/24 00496/024C *APC LINKEDIT OL O LBT:APC 5.1T1 378 APC.LINKEDIT.OL.024 1 LINE 32767 26 PAGE UM TIFFANY JULY 23, 1983 10:46:43 0 This is linkeditted from (496/23) by combining the object modules. This will speed up the loading mechanism. Requires *PL1OPTLIB (827/5). 0 Referenced by comments of: 496/4 00497/001 *SNAP SF G S0280 'FLANIGAN SYSTEM SOURCE ONE' FMT=FB(8000,80) 1 5.0T1 1281 SNAP..SF.001 1 SEQ 80 132 PAGE UM FLANIGAN JULY 03, 1981 14:08:57 5.0T3 275 00497/002 *SNAP UU G S1558 5.0T1 VLO FSNAME=SNAP..UU.002(1) 1282 5.0T1 1282 SNAP..UU.002 1 LINE 73 1 PAGE UM FLANIGAN JULY 30, 1973 20:45.57 5.0T3 276 1 SUN SEP 08/96 15:24:55 Page 225 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00497/003 *SNAP OE G *SNAP 5.0T1 1283 SNAP..OE.003 1 SEQ 5212 27 PAGE UM FLANIGAN JULY 03, 1981 14:09:05 5.0T3 277 *SNAP 00498/001A *IG *IG OL G *IG 5.1T1 379 IG.?IG.OL.001 1 LINE 8248 19 PAGE UM WHIPPLE JULY 23, 1983 10:46:44 *IG 0 This is the coding conventions version of the Integrated Graphics, or IG, system. IG is a library of FORTRAN-callable subroutines for performing graphics operations on a large variety of devices. It consists of *IG and routines for device-dependent I/O support. Each source module for this component contains the MTS commands for assembling it. Each should be assembled using COPY:IG.COPY.M (498/28). Many modules use the Version Labeler (812). The following is a directory of the subcomponents of IG: Subcomponent # Contents (498/2) - (498/21) Device-independent portion of IG (498/23) - (498/24) Dsects for use when debugging (498/28) Macros and copy sections (498/29) - (498/30) Test programs (498/31) - (498/33) Statistics utilities (498/34) Source for PDP-9 op sys for use with IG (498/35) The character font library (498/36) - (498/57) Source for the character fonts (498/58) - (498/59) The new-IG-to-old-DDR adaptor routine (498/60) The skeleton new-style DDR (498/62) - (498/137) DDRs (498/138) - (498/145) A new version, in PLUS, of Interactive IG (498/146) Implementation guide (498/147) EGP writeup (498/148) Usage statistics file This subcomponent is the object library IG users concatenate to their programs. Contains the modules #PWRIT (498/20) IAIG (498/145) plus loader cards to reference the resident IG. NOTE: This assumes that SEG2:IG (498/02) has been installed in shared VM. If this is not the case, this module should be combined with all modules from SEG2:IG except LCS (498/17) and run through *OBJUTIL with PAR=LIB. This subcomponent requires the following other files: *SYSMAC OLD:CC.MACROS (1054/4) *PEXIT (775) 1 SUN SEP 08/96 15:24:55 Page 226 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ALWB:SIDELABEL (747/3) 0 Referenced by comments of: 498/20, 812/1 00498/002A *IG SEG2:IG OL G SEG2:IG 5.1T1 380 IG.SEG2:IG.OL.002 1 LINE 13016 65 PAGE UM WHIPPLE JULY 23, 1983 10:46:45 SEG2:IG 0 This is the portion of IG that gets loaded into shared VM. Contains the following IG modules: LCS (498/17) DIUSERXF (498/03) DIRTNS (498/5) DSM (498/7) DUMP (498/9) EGP (498/11) #IGETDD (498/13) LOAD (498/15) PD (498/18) #SS (498/21) and some loader control records (LCS, RIP, etc.) at the end. 0 Referenced by comments of: 498/1, 498/3, 498/5, 498/7, 498/9, 498/11, 498/13, 498/15, 498/18, 498/21 00498/003A *IG DI USERXF SA G GRAF:DIUSER/BAS 5.1T1 381 IG.DI_USERXF.SA.003 1 LINE 136 13 PAGE UM WHIPPLE JULY 23, 1983 10:46:47 0 This is the user-callable routines module for *IG's Device Interface to its device-dependent routines. Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2 00498/004C *IG DI USERXF UC G GRAF:DIUSER/UPD 5.1T1 382 IG.DI_USERXF.UC.004 1 LINE 98 1 PAGE UM WHIPPLE JULY 23, 1983 10:46:48 00498/005A *IG DI RTNS SA G GRAF:DIRTNS/BAS 5.1T1 383 IG.DI_RTNS.SA.005 1 LINE 139 53 PAGE UM WHIPPLE JULY 23, 1983 10:46:48 0 This is the internal routines module for *IG's Device Interface to its device-dependent routines. Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2, 498/57 00498/006C *IG DI RTNS UC G GRAF:DIRTNS/UPD 5.1T1 384 IG.DI_RTNS.UC.006 1 LINE 167 1 PAGE UM WHIPPLE JULY 23, 1983 10:46:50 1 SUN SEP 08/96 15:24:55 Page 227 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/007A *IG DSM SA G GRAF:DSM/BAS 5.1T1 385 IG.DSM.SA.007 1 LINE 133 42 PAGE UM WHIPPLE JULY 23, 1983 10:46:50 0 Source for Data Structure Modification csect (DSM). Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2 00498/008C *IG DSM UC G GRAF:DSM/UPD 5.1T1 386 IG.DSM.UC.008 1 LINE 73 3 PAGE UM WHIPPLE JULY 23, 1983 10:46:52 00498/009A *IG DUMP SA G GRAF:DUMP/BAS 5.1T1 387 IG.DUMP.SA.009 1 LINE 134 9 PAGE UM WHIPPLE JULY 23, 1983 10:46:52 0 Source for IG Data Structure Dumping routine (IGDUMP). Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2 00498/010C *IG DUMP UC G GRAF:DUMP/UPD 5.1T1 388 IG.DUMP.UC.010 1 LINE 68 1 PAGE UM WHIPPLE JULY 23, 1983 10:46:52 00498/011A *IG EGP SA G GRAF:EGP/BAS 5.1T1 389 IG.EGP.SA.011 1 LINE 133 10 PAGE UM WHIPPLE JULY 23, 1983 10:46:52 0 Source for External Graphics Procedure csect (EGP). Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2 00498/012C *IG EGP UC G GRAF:EGP/UPD 5.1T1 390 IG.EGP.UC.012 1 LINE 68 1 PAGE UM WHIPPLE JULY 23, 1983 10:46:53 00498/013A *IG GETDD SA G GRAF:GETDD/BAS 5.1T1 391 IG.GETDD.SA.013 1 LINE 135 21 PAGE UM WHIPPLE JULY 23, 1983 10:46:53 0 Source for Get Device Dependent Routine csect (#IGETDD). Object is in SEG2:IG (498/02). This module has conditional assembly parts for UNE. To use, change the SETC symbol &INSTALL (in IGGBLS) to UNE 0 Referenced by comments of: 498/2 00498/014C *IG GETDD UC G GRAF:GETDD/UPD 5.1T1 392 IG.GETDD.UC.014 1 LINE 94 3 PAGE UM WHIPPLE JULY 23, 1983 10:46:54 1 SUN SEP 08/96 15:24:55 Page 228 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/015A *IG LOAD SA G GRAF:LOAD/BAS 5.1T1 393 IG.LOAD.SA.015 1 LINE 134 11 PAGE UM WHIPPLE JULY 23, 1983 10:46:54 0 Source for Object Loading facility (IGLOAD#). Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2 00498/016C *IG LOAD UC G GRAF:LOAD/UPD 5.1T1 394 IG.LOAD.UC.016 1 LINE 98 4 PAGE UM WHIPPLE JULY 23, 1983 10:46:55 00498/017 *IG LCS SA G S1558 5.0T1 VLO FSNAME=IG.LCS.SA.010(1) 1293 5.0T1 1293 IG.LCS.SA.010 1 LINE 68 2 PAGE UM WHIPPLE JULY 03, 1981 14:11:32 5.0T3 287 0 Source for the module that defines the IG low core symbol table when IG is installed in shared VM. 0 Referenced by comments of: 498/1, 498/2 00498/018A *IG PD SA G GRAF:PD/BAS 5.1T1 395 IG.PD.SA.018 1 LINE 132 19 PAGE UM WHIPPLE JULY 23, 1983 10:46:55 0 Source for Picture Description csect (PD). Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/2 00498/019C *IG PD UC G GRAF:PD/UPD 5.1T1 396 IG.PD.UC.019 1 LINE 85 1 PAGE UM WHIPPLE JULY 23, 1983 10:46:56 00498/020 *IG PWRIT SA G S1558 5.0T1 VLO FSNAME=IG.PWRIT.SA.012(1) 1295 5.0T1 1295 IG.PWRIT.SA.012 1 LINE 113 10 PAGE UM WHIPPLE JULY 03, 1981 14:11:45 5.0T3 289 0 Source for the *PLOTSYS (615/9) interface which allows CalComp plotting programs to run with IG instead. Object is in *IG (498/01). 0 Referenced by comments of: 498/1 00498/021A *IG SYSTEM SERVICE SA G GRAF:SS/BAS 5.1T1 397 IG.SYSTEM_SERVICE.SA.021 1 LINE 132 12 PAGE UM WHIPPLE JULY 23, 1983 10:46:57 0 Source code for the System Services csect (#SS). Contains system-dependent code (GETSPACE, READ, WRITE, etc). This module has conditional assembly sections for UNE and Wayne State. The UNE code is untested by UM. To use the conditional assembly, change the SETC symbol &INSTALL in IGGBLS (located in COPY:IG.COPY.M (498/28)) to either UNE or WSU. 1 SUN SEP 08/96 15:24:55 Page 229 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Object is in SEG2:IG (498/02). 0 Referenced by comments of: 498/1, 498/2 00498/022C *IG SYSTEM SERVICE UC G GRAF:SS/UPD 5.1T1 398 IG.SYSTEM_SERVICE.UC.022 1 LINE 96 2 PAGE UM WHIPPLE JULY 23, 1983 10:46:57 00498/023 *IG DSECTS SA G S1558 5.0T1 VLO FSNAME=IG.DSECTS.SA.014(1) 1297 5.0T1 1297 IG.DSECTS.SA.014 1 LINE 93 1 PAGE UM WHIPPLE JULY 03, 1981 14:11:48 5.0T3 291 0 This is a series of dsects defining many of the IG data structures. Useful when debugging IG. 0 Referenced by comments of: 498/1 00498/024 *IG DSECTS OC G S1558 5.0T1 VLO FSNAME=IG.DSECTS.OC.015(1) 1298 5.0T1 1298 IG.DSECTS.OC.015 1 LINE 80 1 PAGE UM WHIPPLE JULY 03, 1981 14:11:49 5.0T3 292 0 A file that can be INCLUDED in SDS. Contains definitions for the following dsects: XFRM -- The transformation block BRANCH -- The branch block LEAF -- The leaf block NODE -- The node block BUD -- The bud block 0 Referenced by comments of: 498/1 00498/025A *IG IG MACROS SA G GRAF:MACRO/BAS 5.1T1 399 IG.IG_MACROS.SA.025 1 LINE 73 29 PAGE UM WHIPPLE JULY 23, 1983 10:46:57 0 This is the D5.0 base source for the IG macros, i.e., it is COPY:IG.COPY.M (498/28) as distributed on D5.0. 0 Referenced by comments of: 498/26 00498/026C *IG IG MACROS UC G GRAF:MACRO/UPD 5.1T1 400 IG.IG_MACROS.UC.026 1 LINE 99 5 PAGE UM WHIPPLE JULY 23, 1983 10:46:59 0 Updates to the D5.0 base (498/25) to produce the current source (498/27) for the IG macros. 00498/027C *IG IG MACROS SA G GRAF:MACRO/CUR 5.1T1 401 IG.IG_MACROS.SA.027 1 LINE 80 30 PAGE UM WHIPPLE JULY 23, 1983 10:46:59 0 Current version of the IG macro library. Run *MACUTIL on this file to produce (498/28). 0 Referenced by comments of: 498/26 1 SUN SEP 08/96 15:24:55 Page 230 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/028A *IG IG MACROS SM G COPY:IG.COPY.M 5.1T1 402 IG.IG_MACROS.SM.028 1 LINE 80 29 PAGE UM WHIPPLE JULY 23, 1983 10:47:00 0 Library of copy sections and macros used by the various components of IG. 0 Referenced by comments of: 498/1, 498/21, 498/25, 498/27 00498/029 *IG TEST SF G GRAF:IG.TEST.S 5.0T1 1300 IG.TEST.SF.017 1 LINE 85 22 PAGE UM WHIPPLE JULY 03, 1981 14:11:55 5.0T3 294 0 FORTRAN source for the program to test out new versions of IG. 0 Referenced by comments of: 498/1 00498/030 *IG BRANCH MONITOR SA G GRAF:BMON.S 5.0T1 1301 IG.BRANCH_MONITOR.SA.018 1 LINE 80 5 PAGE UM WHIPPLE JULY 03, 1981 14:12:06 5.0T3 295 0 Source for a program which monitors all the branches in a specified routine. 0 Referenced by comments of: 498/1 00498/031A *IG STATS SAVE C GRAF:IG.SHUFFLE 5.1T1 403 IG.STATS_SAVE.C.031 1 LINE 63 1 PAGE UM WHIPPLE JULY 23, 1983 10:47:01 0 Commands to save the contents of the statistics file (498/148) maintained by IG. The tape mount command in this file must be changed for each installation before it is of use. 0 Referenced by comments of: 498/1 00498/032 *IG STATS CALC SF G S1558 5.0T1 VLO FSNAME=IG.STATS_CALC.SF.020(1) 1303 5.0T1 1303 IG.STATS_CALC.SF.020 1 LINE 67 2 PAGE UM WHIPPLE JUNE 16, 1976 19:12:11 5.0T3 297 0 FORTRAN source for a program which calculates and groups information on IG usage from the statistics gathered by IG. 00498/033 *IG STATS SCAN SA G S1558 5.0T1 VLO FSNAME=IG.STATS_SCAN.SA.021(1) 1304 5.0T1 1304 IG.STATS_SCAN.SA.021 1 LINE 87 3 PAGE UM WHIPPLE JUNE 16, 1976 19:12:16 5.0T3 298 0 Assembler source for a program to scan selectively for certain records in the statistics file maintained by IG. 0 Referenced by comments of: 498/1 00498/034 *IG IGRI.339 S S0596 BLAH 'IG ROUTINES' FSNAME=W114:IGRI.339.S 5.0T1 1305 IG.IGRI.339.S.022 1 LINE 79 13 PAGE UM WHIPPLE DEC. 21, 1974 16:04.29 5.0T3 299 0 Source for an operating system for the DEC 339 / PDP-9 which allows the running of IG. 1 SUN SEP 08/96 15:24:55 Page 231 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 498/1 00498/035 *IG FONTS OE G ETC:IG.FONTS 5.0T1 1306 IG.FONTS.OE.023 1 LINE 8604 26 PAGE UM WHIPPLE JULY 03, 1981 14:16:51 5.0T3 300 ETC:IG.FONTS 0 This file contains the object for the IG character fonts. Each font starts on a multiple of line 100. 0 Referenced by comments of: 498/1 00498/036 *IG ASCII7 SA G S0933 IGDIST FSNAME=IG.ASCII7 5.0T1 1307 IG.ASCII7.SA.024 1 LINE 71 4 PAGE UM WHIPPLE MAR. 02, 1981 10:54:05 5.0T3 301 0 Source for the ASCII7 font used by IG. 0 Referenced by comments of: 498/1 00498/037 *IG CYRILLIC2 SA G S0933 IGDIST FSNAME=IG.CYRILLIC2 5.0T1 1308 IG.CYRILLIC2.SA.025 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:54:14 5.0T3 302 0 Source for the Cyrillic font used by IG. 00498/038 *IG GOTHIC.ENGLIS SA G S0933 IGDIST FSNAME=IG.GOTHIC.EN 5.0T1 1309 IG.GOTHIC.ENGLIS.SA.026 1 LINE 72 8 PAGE UM WHIPPLE MAR. 02, 1981 10:54:25 5.0T3 303 0 Source for the Gothic English font used by IG. 00498/039 *IG GOTHIC.FRAKTU SA G S0933 IGDIST FSNAME=IG.GOTHIC.FR 5.0T1 1310 IG.GOTHIC.FRAKTU.SA.027 1 LINE 72 9 PAGE UM WHIPPLE MAR. 02, 1981 10:54:35 5.0T3 304 0 Source for the Gothic Fraktur font used by IG. 00498/040 *IG GOTHIC.ITALIA SA G S0933 IGDIST FSNAME=IG.GOTHIC.IT 5.0T1 1311 IG.GOTHIC.ITALIA.SA.028 1 LINE 72 8 PAGE UM WHIPPLE MAR. 02, 1981 10:54:43 5.0T3 305 0 Source for the Gothic Italian font used by IG. 00498/041 *IG GREEK SA G S0933 IGDIST FSNAME=IG.GREEK 5.0T1 1312 IG.GREEK.SA.029 1 LINE 71 4 PAGE UM WHIPPLE MAR. 02, 1981 10:54:50 5.0T3 306 0 Source for the (obsolete) Greek font used by IG. This font is obsolete because it uses a "funny" (i.e. different than *PLOTSYS) character mapping. One of the other Greek fonts should be used instead. 1 SUN SEP 08/96 15:24:55 Page 232 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/042 *IG GREEK.CARTOGR SA G S0933 IGDIST FSNAME=IG.GREEK.CAR 5.0T1 1313 IG.GREEK.CARTOGR.SA.030 1 LINE 70 3 PAGE UM WHIPPLE MAR. 02, 1981 10:54:57 5.0T3 307 0 Source for the Greek Cartographic font used by IG. 00498/043 *IG GREEK.1 SA G S0933 IGDIST FSNAME=IG.GREEK1 5.0T1 1314 IG.GREEK.1.SA.031 1 LINE 72 5 PAGE UM WHIPPLE MAR. 02, 1981 10:55:02 5.0T3 308 0 Source for the Greek.1 font used by IG. 00498/044 *IG GREEK.2 SA G S0933 IGDIST FSNAME=IG.GREEK2 5.0T1 1315 IG.GREEK.2.SA.032 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:55:08 5.0T3 309 0 Source for the Greek.2 font used by IG. 00498/045 *IG GREEK.2A SA G S0933 IGDIST FSNAME=IG.GREEK2A 5.0T1 1316 IG.GREEK.2A.SA.033 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:55:13 5.0T3 310 0 Source for the Greek.2a font used by IG. 00498/046 *IG ITALIC.2 SA G S0933 IGDIST FSNAME=IG.ITALIC2 5.0T1 1317 IG.ITALIC.2.SA.034 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:55:20 5.0T3 311 0 Source for the Italic.2 font used by IG. 00498/047 *IG ITALIC.2A SA G S0933 IGDIST FSNAME=IG.ITALIC2A 5.0T1 1318 IG.ITALIC.2A.SA.035 1 LINE 72 5 PAGE UM WHIPPLE MAR. 02, 1981 10:55:25 5.0T3 312 0 Source for the Italic.2a font used by IG. 00498/048 *IG ITALIC.3 SA G S0933 IGDIST FSNAME=IG.ITALIC3 5.0T1 1319 IG.ITALIC.3.SA.036 1 LINE 72 8 PAGE UM WHIPPLE MAR. 02, 1981 10:55:30 5.0T3 313 0 Source for the Italic.3 font used by IG. 00498/049 *IG ROMAN.2 SA G S0933 IGDIST FSNAME=IG.ROMAN2 5.0T1 1320 IG.ROMAN.2.SA.037 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:55:37 5.0T3 314 0 Source for the Roman.2 font used by IG. 00498/050 *IG ROMAN.2A SA G S0933 IGDIST FSNAME=IG.ROMAN2A 5.0T1 1321 IG.ROMAN.2A.SA.038 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:55:42 5.0T3 315 0 Source for the Roman.2a font used by IG. 1 SUN SEP 08/96 15:24:55 Page 233 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/051 *IG ROMAN.3 SA G S0933 IGDIST FSNAME=IG.ROMAN3 5.0T1 1322 IG.ROMAN.3.SA.039 1 LINE 72 8 PAGE UM WHIPPLE MAR. 02, 1981 10:55:48 5.0T3 316 0 Source for the Roman.3 font used by IG. 00498/052 *IG SANSERIF.CART SA G S0933 IGDIST FSNAME=IG.SANSERIFC 5.0T1 1323 IG.SANSERIF.CART.SA.040 1 LINE 70 3 PAGE UM WHIPPLE MAR. 02, 1981 10:55:54 5.0T3 317 0 Source for the Sanserif.cart font used by IG. 00498/053 *IG SANSERIF.1 SA G S0933 IGDIST FSNAME=IG.SANSERIF1 5.0T1 1324 IG.SANSERIF.1.SA.041 1 LINE 72 5 PAGE UM WHIPPLE MAR. 02, 1981 10:55:59 5.0T3 318 0 Source for the Sanserif.1 font used by IG. 00498/054 *IG SANSERIF.2 SA G S0933 IGDIST FSNAME=IG.SANSERIF2 5.0T1 1325 IG.SANSERIF.2.SA.042 1 LINE 72 6 PAGE UM WHIPPLE MAR. 02, 1981 10:56:03 5.0T3 319 0 Source for the Sanserif.2 font used by IG. 00498/055 *IG SCRIPT.1 SA G S0933 IGDIST FSNAME=IG.SCRIPT1 5.0T1 1326 IG.SCRIPT.1.SA.043 1 LINE 72 5 PAGE UM WHIPPLE MAR. 02, 1981 10:56:10 5.0T3 320 0 Source for the Script.1 font used by IG. 00498/056 *IG SCRIPT.2 SA G S0933 IGDIST FSNAME=IG.SCRIPT2 5.0T1 1327 IG.SCRIPT.2.SA.044 1 LINE 72 7 PAGE UM WHIPPLE MAR. 02, 1981 10:56:15 5.0T3 321 0 Source for the Script.2 font used by IG. 00498/057 *IG STANDARD SA G S0933 IGDIST FSNAME=IG.STANDARD 5.0T1 1328 IG.STANDARD.SA.045 1 LINE 71 3 PAGE UM WHIPPLE MAR. 02, 1981 10:56:20 5.0T3 322 0 Source for the Standard font used by IG. This was formerly a part of the DI assembly (498/5). 0 Referenced by comments of: 498/1 00498/058A *IG OLD DDR ADAPT SA G GRAF:IG.DDRXF.S 5.1T1 404 IG.OLD_DDR_ADAPT.SA.058 1 LINE 130 13 PAGE UM WHIPPLE JULY 23, 1983 10:47:02 0 This is an adaptor routine which provides the new coding convention DDR interface to *IG and at the same time provides the old DI interface to old- style device-dependent routines. All that is needed to provide a new-style DDR from an old one is to place the object module for the old-style DDR after the object module for this subcomponent in a file. This must be done for all existing DDRs to use the new version of *IG. The new DDR external symbol 1 SUN SEP 08/96 15:24:55 Page 234 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 is #IGDDR. 0 Referenced by comments of: 498/1 00498/059A *IG OLD DDR ADAPT OC G *IG.DDRXF 5.1T1 405 IG.OLD_DDR_ADAPT.OC.059 1 LINE 2740 4 PAGE UM WHIPPLE JULY 23, 1983 10:47:02 *IG.DDRXF 0 Object for the new IG to old-style DDR adaptor routine. This must be inserted in the front of each old-style DDR file. 0 Referenced by comments of: 498/1, 498/65, 498/69, 498/75, 498/77, 498/79, 498/81, 498/83, 498/85, 498/87, 498/89, 498/91, 498/93, 498/95, 498/102, 498/107, 498/111, 498/113, 498/119, 498/125, 498/132, 498/135, 498/137 00498/060 *IG SKELETON DDR SA GRAF:SKELETON.DDR 5.0T1 1331 IG.SKELETON_DDR.SA.048 1 LINE 132 9 PAGE UM WHIPPLE JULY 03, 1981 14:21:16 5.0T3 325 0 Source code for a skeleton DDR. This may be filled in to produce new-style DDRs. 0 Referenced by comments of: 498/1 00498/061C *IG AED 512 DDR SA GRAF:AED512.S 5.1T1 406 IG.AED_512_DDR.SA.061 1 LINE 132 21 PAGE UQV WHIPPLE JULY 23, 1983 10:47:03 0 Source for the DDR for the AED 512 terminals. This is not installed in a public file at UM since no one around here has one of these terminals. File contains MTS commands at the beginning which do not necessarily work. 00498/062 *IG *IG.AGT SA G S1558 5.0T1 VLO FSNAME=IG.*IG.AGT.SA.049(1) 1332 5.0T1 1332 IG.*IG.AGT.SA.049 1 LINE 89 8 PAGE UM WHIPPLE FEB. 26, 1977 20:24:08 5.0T3 326 0 Source for the DDR for the Adage 10 refresh display. 0 Referenced by comments of: 498/1 00498/063 *IG *IG.AGT OC G S1558 5.0T1 VLO FSNAME=IG.*IG.AGT.OC.050(1) 1333 5.0T1 1333 IG.*IG.AGT.OC.050 1 LINE 80 3 PAGE UM WHIPPLE MAY 11, 1977 18:47:58 5.0T3 327 0 Object for the Adage Graphics Terminal DDR. 00498/064 *IG *IG.AJ830 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.AJ830.SA.051(1) 1334 5.0T1 1334 IG.*IG.AJ830.SA.051 1 LINE 93 10 PAGE UM WHIPPLE JULY 09, 1977 14:04:41 5.0T3 328 0 Source for the DDR for the Anderson-Jacobson 830 terminal with diablo printer and plot option. 1 SUN SEP 08/96 15:24:55 Page 235 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/065 *IG *IG.AJ830 OC G *IG.AJ830 5.0T1 1335 IG.*IG.AJ830.OC.052 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:21:24 5.0T3 329 *IG.AJ830 0 Object for the Anderson-Jacobson 830 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/066 *IG *IG.CCMP SA G GRAF:IG.CCMP.S 5.0T1 1336 IG.*IG.CCMP.SA.053 1 LINE 129 13 PAGE UM WHIPPLE JULY 03, 1981 14:21:25 5.0T3 330 0 Source for the DDR for the CalComp plotter via *PLOTSYS. 00498/067 *IG *IG.CCMP OC G *IG.CCMP 5.0T1 1337 IG.*IG.CCMP.OC.054 1 SEQ 2784 4 PAGE UM WHIPPLE JULY 03, 1981 14:21:28 5.0T3 331 *IG.CCMP 0 Object for the CalComp plotter DDR. Has a $CONTINUE WITH *PLOTSYS (615/9) card. 00498/068 *IG *IG.CK400 SA G S0933 IGDIST FSNAME=IG.CK400.S 5.0T1 1338 IG.*IG.CK400.SA.055 1 LINE 90 11 PAGE UM WHIPPLE AUG. 06, 1979 12:36:50 5.0T3 332 0 Source for the DDR for the Computek 400 storage tube display. 00498/069 *IG *IG.CK400 OC G *IG.CK400 5.0T1 1339 IG.*IG.CK400.OC.056 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:21:48 5.0T3 333 *IG.CK400 0 Object for the Computek 400 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/070 *IG *IG.CRT SA G GRAF:IG.CRT.S 5.0T1 1340 IG.*IG.CRT.SA.057 1 LINE 128 17 PAGE UM WHIPPLE JULY 03, 1981 14:21:49 5.0T3 334 0 Source for the generic CRT DDR. Produces 21 line by 70 column printer- plots. 00498/071 *IG *IG.CRT OC G *IG.CRT 5.0T1 1341 IG.*IG.CRT.OC.058 1 LINE 4600 6 PAGE UM WHIPPLE JULY 03, 1981 14:21:59 5.0T3 335 *IG.CRT 0 Object for the generic CRT DDR. 00498/072 *IG *IG.DEBUG SA G GRAF:IG.DEBUG.S 5.0T1 1342 IG.*IG.DEBUG.SA.059 1 LINE 130 15 PAGE UM WHIPPLE JULY 03, 1981 14:22:00 5.0T3 336 0 Source for the DDR for the debugging routines DDR. 1 SUN SEP 08/96 15:24:55 Page 236 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/073 *IG *IG.DEBUG OC G *IG.DEBUG 5.0T1 1343 IG.*IG.DEBUG.OC.060 1 LINE 4708 5 PAGE UM WHIPPLE JULY 03, 1981 14:22:02 5.0T3 337 *IG.DEBUG 0 Object for the Debugging DDR. 00498/074 *IG *IG.DTC300 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.DTC300.SA.061(1) 1344 5.0T1 1344 IG.*IG.DTC300.SA.061 1 LINE 95 9 PAGE UM WHIPPLE JULY 09, 1977 14:04:56 5.0T3 338 0 Source for the DDR for the Data Terminals Corporation 300 terminal with diablo printer and plot option. 00498/075 *IG *IG.DTC300 OC G *IG.DTC300 5.0T1 1345 IG.*IG.DTC300.OC.062 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:22:03 5.0T3 339 *IG.DTC300 0 Object for the Data Terminals Corporation 300 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/076 *IG *IG.DTC302 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.DTC302.SA.063(1) 1346 5.0T1 1346 IG.*IG.DTC302.SA.063 1 LINE 95 9 PAGE UM WHIPPLE JULY 09, 1977 14:05:02 5.0T3 340 0 Source for the DDR for the Data Terminals Corporation 302 terminal with diablo printer and plot option. 00498/077 *IG *IG.DTC302 OC G *IG.DTC302 5.0T1 1347 IG.*IG.DTC302.OC.064 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:22:05 5.0T3 341 *IG.DTC302 0 Object for the Data Terminals Corporation 302 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/078 *IG *IG.GT40 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.GT40.SA.065(1) 1348 5.0T1 1348 IG.*IG.GT40.SA.065 1 LINE 91 10 PAGE UM WHIPPLE MAY 01, 1977 16:06:13 5.0T3 342 0 Source for the DDR for the Digital Equipment Corporation GT40 refresh display. 00498/079 *IG *IG.GT40 OC G *IG.GT40 5.0T1 1349 IG.*IG.GT40.OC.066 1 LINE 80 4 PAGE UM WHIPPLE JULY 03, 1981 14:22:07 5.0T3 343 *IG.GT40 0 Object for the Digital Equipment Corporation GT40 refresh display DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 1 SUN SEP 08/96 15:24:55 Page 237 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/080 *IG *IG.HIDP11 SA GRAF:IG.HIDP11.S 5.0T1 1350 IG.*IG.HIDP11.SA.067 1 LINE 101 12 PAGE UM WHIPPLE JULY 03, 1981 14:22:08 5.0T3 344 0 Source code for the Houston Instruments DP-11 plotter DDR. 00498/081 *IG *IG.HIDP11 OC *IG.HIDP11 5.0T1 1351 IG.*IG.HIDP11.OC.068 1 LINE 3348 4 PAGE UM WHIPPLE JULY 03, 1981 14:22:11 5.0T3 345 *IG.HIDP11 0 Object for the Houston Instruments DP-11 plotter DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/082 *IG *IG.HP2648A SA G GRAF:IG.HP2648A.S 5.0T1 1352 IG.*IG.HP2648A.SA.069 1 LINE 102 11 PAGE UM WHIPPLE JULY 03, 1981 14:22:12 5.0T3 346 0 Source for the DDR for the Hewlitt-Packard 2648a video-graphics terminal. This code is a modified version of what was sent from UBC. 00498/083 *IG *IG.HP2648A OC G *IG.HP2648A 5.0T1 1353 IG.*IG.HP2648A.OC.070 1 LINE 2524 3 PAGE UM WHIPPLE JULY 03, 1981 14:22:17 5.0T3 347 *IG.HP2648A 0 Object for the Hewlitt-Packard video-graphics terminal DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/084 *IG *IG.HP7203 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.HP7203.SA.071(1) 1354 5.0T1 1354 IG.*IG.HP7203.SA.071 1 LINE 95 9 PAGE UM WHIPPLE MAY 01, 1977 16:06:18 5.0T3 348 0 Source for the DDR for the Hewlitt-Packard 7203a plotter with EIA interface. 00498/085 *IG *IG.HP7203 OC G *IG.HP7203 5.0T1 1355 IG.*IG.HP7203.OC.072 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:22:19 5.0T3 349 *IG.HP7203 0 Object for the Hewlitt-Packard 7203 plotter DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/086 *IG *IG.HP7221 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.HP7221.SA.073(1) 1356 5.0T1 1356 IG.*IG.HP7221.SA.073 1 LINE 102 17 PAGE UM WHIPPLE AUG. 29, 1978 01:25:18 5.0T3 350 0 Source for the DDR for the Hewlitt-Packard 7221a 4-pen plotter with EIA interface. 1 SUN SEP 08/96 15:24:55 Page 238 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/087 *IG *IG.HP7221 OC G *IG.HP7221 5.0T1 1357 IG.*IG.HP7221.OC.074 1 LINE 80 5 PAGE UM WHIPPLE JULY 03, 1981 14:22:21 5.0T3 351 *IG.HP7221 0 Object for the Hewlitt-Packard 7221 plotter DDR. Contains a $CONTINUE WITH *IG.DDRXF RETUREN (498/59) record. 00498/088C *IG *IG.HP7470 SA G GRAF:HP7470.S 5.1T1 407 IG.?IG.HP7470.SA.088 1 LINE 129 15 PAGE UM WHIPPLE JULY 23, 1983 10:47:04 0 Source for the DDR for the Hewlett Packard 7470 terminal. File contains MTS commands at the beginning which do not necessarily work. 00498/089C *IG *IG.HP7470 OC G *IG.HP7470 5.1T1 408 IG.?IG.HP7470.OC.089 1 LINE 80 6 PAGE UM WHIPPLE JULY 23, 1983 10:47:04 0 Object for the DDR for the Hewlett Packard 7470 terminal. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/090 *IG *IG.HUGHES SA G GRAF:IG.HUGHES.S 5.0T1 1358 IG.*IG.HUGHES.SA.075 1 LINE 101 19 PAGE UM WHIPPLE JULY 03, 1981 14:22:21 5.0T3 352 0 Source for the DDR for the Hughes graphics terminal. 00498/091 *IG *IG.HUGHES OC G *IG.HUGHES 5.0T1 1359 IG.*IG.HUGHES.OC.076 1 LINE 2900 4 PAGE UM WHIPPLE JULY 03, 1981 14:22:23 5.0T3 353 *IG.HUGHES 0 Object for the Hughes Graphics terminal DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/092 *IG *IG.MX12000 SA G S0933 IGDIST FSNAME=IG.MX12000.S 5.0T1 1360 IG.*IG.MX12000.SA.077 1 LINE 94 13 PAGE UM WHIPPLE JAN. 04, 1979 18:39:08 5.0T3 354 0 Source for the DDR for the Magnavox 12000 plasma terminal. 00498/093 *IG *IG.MX12000 OC G *IG.MX12000 5.0T1 1361 IG.*IG.MX12000.OC.078 1 LINE 80 4 PAGE UM WHIPPLE JULY 03, 1981 14:23:00 5.0T3 355 *IG.MX12000 0 Object for the Magnavox 12000 terminal DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 1 SUN SEP 08/96 15:24:55 Page 239 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/094 *IG *IG.PEP SA G S1558 5.0T1 VLO FSNAME=IG.*IG.PEP.SA.079(1) 1362 5.0T1 1362 IG.*IG.PEP.SA.079 1 LINE 96 11 PAGE UM WHIPPLE JULY 09, 1977 14:06:57 5.0T3 356 0 Source for the DDR for the Princeton Electronic Products 801 lithicon display. 00498/095 *IG *IG.PEP OC G *IG.PEP 5.0T1 1363 IG.*IG.PEP.OC.080 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:23:02 5.0T3 357 *IG.PEP 0 Object for the Princeton Electronic Products 801 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/096 *IG *IG.PICK SA G GRAF:IG.PICK.S 5.0T1 1364 IG.*IG.PICK.SA.081 1 LINE 129 8 PAGE UM WHIPPLE JULY 03, 1981 14:23:03 5.0T3 358 0 Source for the Pick Simulator DDR. 00498/097 *IG *IG.PICK OC G *IG.PICK 5.0T1 1365 IG.*IG.PICK.OC.082 1 LINE 1284 4 PAGE UM WHIPPLE JULY 03, 1981 14:23:09 5.0T3 359 *IG.PICK 0 Object for the Pick Simulator DDR. 00498/098 *IG *IG.PRINTER SA G GRAF:IG.PRINTER.S 5.0T1 1366 IG.*IG.PRINTER.SA.083 1 LINE 132 17 PAGE UM WHIPPLE JULY 03, 1981 14:23:10 5.0T3 360 0 Source for the generalized DDR for printer plots. (This is a complete rewrite of the old IG.PRNT routine.) Copies *GDINFODSECT (594). This DDR adapts itself to the maximum output width of the device it's used on. 00498/099 *IG *IG.PRINTER OC G *IG.PRINTER 5.0T1 1367 IG.*IG.PRINTER.OC.084 1 LINE 4752 6 PAGE UM WHIPPLE JULY 03, 1981 14:23:12 5.0T3 361 *IG.PRINTER 0 Object for the general printer-plot DDR. 00498/100C *IG PRINTRONIX DDR SA G GRAF:PRINTRONIX.S(1) 5.1T1 409 IG.PRINTRONIX_DDR.SA.100 1 LINE 70 8 PAGE UBC WHIPPLE JULY 23, 1983 10:47:05 0 Source for the DDR for the Printronix terminal. This is not installed in a public file at UM since no one around here has one of these. 00498/101 *IG *IG.QUMES5 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.QUMES5.SA.085(1) 1368 5.0T1 1368 IG.*IG.QUMES5.SA.085 1 LINE 92 10 PAGE UM WHIPPLE JAN. 04, 1979 18:38:55 5.0T3 362 0 Source for the DDR for the Qume Sprint5 terminal with diablo-style printer. 1 SUN SEP 08/96 15:24:55 Page 240 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/102 *IG *IG.QUMES5 OC G *IG.QUMES5 5.0T1 1369 IG.*IG.QUMES5.OC.086 1 LINE 80 4 PAGE UM WHIPPLE JULY 03, 1981 14:23:22 5.0T3 363 *IG.QUMES5 0 Object for the Qumes5 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/103A *IG *IG.SAVE SA G GRAF:IG.SAVE.S 5.1T1 410 IG.?IG.SAVE.SA.103 1 LINE 129 14 PAGE UM WHIPPLE JULY 23, 1983 10:47:06 0 Source for the fake DDR which does saving of objects. 00498/104A *IG *IG.SAVE OC G *IG.SAVE 5.1T1 411 IG.?IG.SAVE.OC.104 1 LINE 3042 6 PAGE UM WHIPPLE JULY 23, 1983 10:47:06 *IG.SAVE 0 Object for the Object-Save fake DDR. 00498/105C *IG SELANAR DDR SA G GRAF:SELANAR.S(9) 5.1T1 412 IG.SELANAR_DDR.SA.105 1 LINE 73 16 PAGE RPI WHIPPLE JULY 23, 1983 10:47:07 0 Source for the DDR for the VT 100 Selanar terminal. This is not installed in a public file at UM since no one around here has one of these terminals. 00498/106 *IG *IG.TD4000 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.TD4000.SA.089(1) 1372 5.0T1 1372 IG.*IG.TD4000.SA.089 1 LINE 92 9 PAGE UM WHIPPLE JULY 09, 1977 14:07:12 5.0T3 366 0 Source for the DDR for the Trend Data 4000 terminal with diablo printer and plot option. 00498/107 *IG *IG.TD4000 OC G *IG.TD4000 5.0T1 1373 IG.*IG.TD4000.OC.090 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:23:27 5.0T3 367 *IG.TD4000 0 Object for the Trend Data 4000 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/108C *IG TELIDON DDR SA G GRAF:TELIDON.S 5.1T1 413 IG.TELIDON_DDR.SA.108 1 LINE 132 18 PAGE UBC WHIPPLE JULY 23, 1983 10:47:07 0 Source for the DDR for the Telidon terminal. This is not installed in a public file at UM since no one around here has one of these terminals. File contains MTS commands at the beginning which do not necessarily work. 0 Referenced by comments of: 498/109 1 SUN SEP 08/96 15:24:55 Page 241 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/109C *IG PDIFILE DDR UC G GRAF:PDIFILE.U 5.1T1 414 IG.PDIFILE_DDR.UC.109 1 LINE 128 2 PAGE UBC WHIPPLE JULY 23, 1983 10:47:09 0 Update to (498/108) to make it write Telidon output to a file. 00498/110 *IG *IG.TX4002 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.TX4002.SA.091(1) 1374 5.0T1 1374 IG.*IG.TX4002.SA.091 1 LINE 96 10 PAGE UM WHIPPLE JULY 09, 1977 14:07:23 5.0T3 368 0 Source for the DDR for the Tektronix 4002 storage tube display. 00498/111 *IG *IG.TX4002 OC G *IG.TX4002 5.0T1 1375 IG.*IG.TX4002.OC.092 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:23:28 5.0T3 369 *IG.TX4002 0 Object for the Tektronix 4002 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/112 *IG *IG.TX4006 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.TX4006.SA.093(1) 1376 5.0T1 1376 IG.*IG.TX4006.SA.093 1 LINE 95 11 PAGE UM WHIPPLE JULY 09, 1977 14:07:28 5.0T3 370 0 Source for the DDR for the Tektronix 4006 storage tube display. 00498/113 *IG *IG.TX4006 OC G *IG.TX4006 5.0T1 1377 IG.*IG.TX4006.OC.094 1 LINE 80 4 PAGE UM WHIPPLE JULY 03, 1981 14:23:30 5.0T3 371 *IG.TX4006 0 Object for the Tektronix 4006 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/114 *IG *IG.TX4010 SA G GRAF:IG.TX4010.S 5.0T1 1378 IG.*IG.TX4010.SA.095 1 LINE 131 16 PAGE UM WHIPPLE JULY 03, 1981 14:23:30 5.0T3 372 0 Source for the DDR for the Tektronix 4010 storage tube display. 00498/115 *IG *IG.TX4010 OC G *IG.TX4010 5.0T1 1379 IG.*IG.TX4010.OC.096 1 SEQ 3776 4 PAGE UM WHIPPLE JULY 03, 1981 14:23:36 5.0T3 373 *IG.TX4010 0 Object for the Tektronix 4010 DDR. 00498/116 *IG *IG.TX4014 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.TX4014.SA.097(1) 1380 5.0T1 1380 IG.*IG.TX4014.SA.097 1 LINE 105 12 PAGE UM WHIPPLE OCT. 11, 1977 19:01:55 5.0T3 374 0 Source for the DDR for the Tektronix 4014 storage tube display. 1 SUN SEP 08/96 15:24:55 Page 242 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/117 *IG *IG.TX4014 OC G *IG.TX4014 5.0T1 1381 IG.*IG.TX4014.OC.098 1 LINE 3902 5 PAGE UM WHIPPLE JULY 03, 1981 14:23:57 5.0T3 375 *IG.TX4014 0 Object for the Tektronix 4014 DDR. 00498/118 *IG *IG.TX4025 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.TX4025.SA.099(1) 1382 5.0T1 1382 IG.*IG.TX4025.SA.099 1 LINE 95 11 PAGE UM WHIPPLE APR. 08, 1978 16:57:48 5.0T3 376 0 Source for the DDR for the Tektronix 4025 storage tube display. 00498/119 *IG *IG.TX4025 OC G *IG.TX4025 5.0T1 1383 IG.*IG.TX4025.OC.100 1 LINE 80 4 PAGE UM WHIPPLE JULY 03, 1981 14:23:58 5.0T3 377 *IG.TX4025 0 Object for the Tektronix 4025 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/120C *IG *IG.TX4025GIN SA G GRAF:TX4025GIN.S 5.1T1 415 IG.?IG.TX4025GIN.SA.120 1 LINE 131 15 PAGE UM WHIPPLE JULY 23, 1983 10:47:09 0 Source for the DDR for the Tektronics 4025 terminal with graphics input. File contains MTS commands at the beginning which do not necessarily work. 00498/121C *IG *IG.TX4025GIN OC G *IG.TX4025GIN 5.1T1 416 IG.?IG.TX4025GIN.OC.121 1 LINE 3484 5 PAGE UM WHIPPLE JULY 23, 1983 10:47:10 0 Object for the Tektronics 4025 terminal with graphics input. 00498/122 *IG *IG.TX4027 SA G GRAF:IG.TX4027.S 5.0T1 1384 IG.*IG.TX4027.SA.101 1 LINE 131 17 PAGE UM WHIPPLE JULY 03, 1981 14:23:59 5.0T3 378 0 Source for the DDR for the Tektronix 4027 raster display. 00498/123 *IG *IG.TX4027 OC G *IG.TX4027 5.0T1 1385 IG.*IG.TX4027.OC.102 1 LINE 4140 5 PAGE UM WHIPPLE JULY 03, 1981 14:24:02 5.0T3 379 *IG.TX4027 0 Object for the Tektronix 4027 DDR. 00498/124 *IG *IG.TX4662 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.TX4662.SA.103(1) 1386 5.0T1 1386 IG.*IG.TX4662.SA.103 1 LINE 102 12 PAGE UM WHIPPLE JAN. 04, 1979 18:39:03 5.0T3 380 0 Source for the DDR for the Tektronix 4662 digital plotter. 1 SUN SEP 08/96 15:24:55 Page 243 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/125 *IG *IG.TX4662 OC G *IG.TX4662 5.0T1 1387 IG.*IG.TX4662.OC.104 1 LINE 80 4 PAGE UM WHIPPLE JULY 03, 1981 14:24:04 5.0T3 381 *IG.TX4662 0 Object for the Tektronix 4662 plotter DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/126 *IG *IG.TX4663 SA O GRAF:IG.TX4663.S 5.0T1 1388 IG.*IG.TX4663.SA.105 1 LINE 131 17 PAGE UM WHIPPLE JULY 03, 1981 14:24:05 5.0T3 382 0 Source for the Tektronix 4663 plotter DDR. 00498/127 *IG *IG.TX4663 OC O *IG.TX4663 5.0T1 1389 IG.*IG.TX4663.OC.106 1 LINE 4372 6 PAGE UM WHIPPLE JULY 03, 1981 14:24:11 5.0T3 383 *IG.TX4663 0 Object for the Tektronix 4663 plotter DDR. 00498/128C *IG VT640 DDR SA G GRAF:VT640.S(9) 5.1T1 417 IG.VT640_DDR.SA.128 1 LINE 73 17 PAGE RPI WHIPPLE JULY 23, 1983 10:47:10 0 Source for the DDR for the Retro-graphics VT 640 terminal. This is not in a public file at UM since no one around here has one of these terminals. 00498/129 *IG *IG.VUCOM SA G S1558 5.0T1 VLO FSNAME=IG.*IG.VUCOM.SA.107(1) 1390 5.0T1 1390 IG.*IG.VUCOM.SA.107 1 LINE 93 6 PAGE UM WHIPPLE FEB. 26, 1977 20:28:30 5.0T3 384 0 Source for the DDR for the Vucom terminal. 00498/130 *IG *IG.VUCOM OC G S0933 IGDIST FSNAME=IG.VUCOM.O 5.0T1 1391 IG.*IG.VUCOM.OC.108 1 LINE 80 3 PAGE UM WHIPPLE JUNE 16, 1976 19:09:45 5.0T3 385 0 Object for the Vucom terminal DDR. 00498/131 *IG *IG.XX1620 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.XX1620.SA.109(1) 1392 5.0T1 1392 IG.*IG.XX1620.SA.109 1 LINE 95 9 PAGE UM WHIPPLE JULY 09, 1977 21:46:28 5.0T3 386 0 Source for the DDR for the Xerox 1620 terminal with diablo printer. 00498/132 *IG *IG.XX1620 OC G *IG.XX1620 5.0T1 1393 IG.*IG.XX1620.OC.110 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:24:23 5.0T3 387 *IG.XX1620 0 Object for the Xerox 1620 terminal DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 1 SUN SEP 08/96 15:24:55 Page 244 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/133 *IG *IG.ZETA SA G S0933 IGDIST FSNAME=IG.ZETA.S 5.0T1 1394 IG.*IG.ZETA.SA.111 1 LINE 101 12 PAGE UM WHIPPLE AUG. 06, 1979 12:38:34 5.0T3 388 0 Source for the DDR for the Zeta plotter developed by NCSS. ************************************************************************* D5.0 version: Needs some changes to run in MTS. Object not distributed. ************************************************************************* 00498/134 *IG *IG.3270 SA G GRAF:IG.3278.S 5.0T1 1395 IG.*IG.3270.SA.112 1 LINE 93 9 PAGE UM WHIPPLE JULY 03, 1981 14:25:18 5.0T3 389 0 Source for the DDR for the IBM 3278 terminals. This is a slightly modified version of the DDR received from UBC. Changes were to fix a bug in graphic input. 00498/135 *IG *IG.3270 OC G *IG.3270 5.0T1 1396 IG.*IG.3270.OC.113 1 LINE 2859 4 PAGE UM WHIPPLE JULY 03, 1981 14:25:20 5.0T3 390 *IG.3270 0 Object for the IBM 3278 terminal DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 00498/136 *IG *IG.339 SA G S1558 5.0T1 VLO FSNAME=IG.*IG.339.SA.114(1) 1397 5.0T1 1397 IG.*IG.339.SA.114 1 LINE 96 6 PAGE UM WHIPPLE APR. 08, 1978 16:58:02 5.0T3 391 0 Source for the DDR for the Digital Equipment Corporation 339 refresh display. 00498/137 *IG *IG.339 OC G *IG.339 5.0T1 1398 IG.*IG.339.OC.115 1 LINE 80 3 PAGE UM WHIPPLE JULY 03, 1981 14:25:22 5.0T3 392 *IG.339 0 Object for the Digital Equipment Corporation 339 DDR. Contains a $CONTINUE WITH *IG.DDRXF RETURN (498/59) record. 0 Referenced by comments of: 498/1 00498/138A *IG INTERACTIVE IG SQ G GRAF:IAIG.S 5.1T1 418 IG.INTERACTIVE_IG.SQ.138 1 LINE 142 13 PAGE UM WHIPPLE JULY 23, 1983 10:47:11 0 Source for an interactive version of IG requiring no programming on part of user. Written in PLUS using *CLPARSER. May be used as a graphics monitor by calling the entry IAIG. 0 Referenced by comments of: 498/1, 498/142, 498/143 1 SUN SEP 08/96 15:24:55 Page 245 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/139A *IG INTERACTIVE IG SA G GRAF:IAIG.ASM.S 5.1T1 419 IG.INTERACTIVE_IG.SA.139 1 LINE 99 3 PAGE UM WHIPPLE JULY 23, 1983 10:47:11 0 Source for the assembler interface to Interactive IG. This is a slight modification of what is normally PLUSMAIN in (1042/56). 00498/140A *IG INTERACTIVE IG SQ G GRAF:IG.PLUSLIB 5.1T1 420 IG.INTERACTIVE_IG.SQ.140 1 LINE 77 13 PAGE UM WHIPPLE JULY 23, 1983 10:47:12 0 Library containing PLUS declarations and dummy declarations for the IG routines. 00498/141A *IG INTERACTIVE IG D G GRAF:IAIG.GR 5.1T1 421 IG.INTERACTIVE_IG.D.141 1 LINE 112 6 PAGE UM WHIPPLE JULY 23, 1983 10:47:12 0 This the PLUS grammar for Interactive IG. 00498/142A *IG IAIG MISC FNS SQ G W279:PLUSFNS*SQ 5.1T1 422 IG.IAIG_MISC_FNS.SQ.142 1 LINE 107 3 PAGE UM WHIPPLE JULY 23, 1983 10:47:13 0 Source for miscellaneous functions used by IAIG.S (498/138). Mostly have to do with converting real numbers to and from strings. 0 Referenced by comments of: 498/145 00498/143A *IG IAIG MISC FNS SQ G W279:PLUSFNS*SQL 5.1T1 423 IG.IAIG_MISC_FNS.SQ.143 1 LINE 61 2 PAGE UM WHIPPLE JULY 23, 1983 10:47:13 0 Library of PLUS declarations for the miscellaneous functions used by IAIG.S (498/138). 00498/144A *IG INTERACTIVE IG M G GRAF:IAIG.HELP 5.1T1 424 IG.INTERACTIVE_IG.M.144 1 LINE 79 5 PAGE UM WHIPPLE JULY 23, 1983 10:47:14 0 This is the help file for Interactive IG. ************************************************************************* D5.0 changes: This file is grossly incomplete. ************************************************************************* 00498/145A *IG INTERACTIVE IG OC G GRAF:IAIG.O 5.1T1 425 IG.INTERACTIVE_IG.OC.145 1 LINE 8248 16 PAGE UM WHIPPLE JULY 23, 1983 10:47:14 0 Object code for Interactive IG. Contains all necessary parts of PLUS:OBJLIB (1042/56), *CLPARSER (1076/6), and GRAF:PLUSFNS.S (498/142). Contains a "$CONTINUE WITH GRAF:NEWIG" card, which should by changed to "$CONTINUE WITH *IG" at other installations. 0 Referenced by comments of: 498/1 1 SUN SEP 08/96 15:24:55 Page 246 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00498/146 *IG IMPLEMENTATION WF S1558 5.0T1 VLO FSNAME=IG.IMPLEMENTATION.WF.124(1) 1407 5.0T1 1407 IG.IMPLEMENTATION.WF.124 1 LINE 145 25 PAGE UM WHIPPLE AUG. 29, 1978 01:29:16 5.0T3 401 0 The Integrated Graphics internal guts and implementation guide. ************************************************************************* D5.0 version: Currently obsolete. ************************************************************************* 0 Referenced by comments of: 498/1 00498/147 *IG EGP WRITEUP WX GRAF:IG.EGP.WX 5.0T1 1408 IG.EGP_WRITEUP.WX.125 1 LINE 78 5 PAGE UM WHIPPLE JULY 03, 1981 14:25:44 5.0T3 402 0 A writeup for External Graphics Procedures. ************************************************************************** D5.0 version: Note: This is a first cut. Comments and suggestions would be welcome. ************************************************************************** 0 Referenced by comments of: 498/1 00498/148 *IG ETC:IG.STAT D # ETC:IG.STAT UM WHIPPLE ETC:IG.STAT@E 0 File for accumulating usage statistics. 0 Referenced by comments of: 498/1, 498/31 00500/001A BILLING BLSIGCK SG G S0027 DISTRB FSNAME=BLSIGCK 5.1T1 426 BILLING.BLSIGCK.SG.001 1 LINE 94 3 PAGE UM ENGLE AUG. 25, 1982 10:44:32 0 PROGRAM TO LIST ALL SIGNONS WHICH WERE MADE DURING THE BILLING PERIOD AND ARE STILL SIGNED ON OR WHICH STILL HAVE A STATISTICS RECORD IN THE STATISTICS FILE. IF SIGONSCN (500/51) DETECTS AN INCONSISTENCY, THIS PROGRAM ATTEMPTS TO CORRECT THE SITUATION BY REASSEMBLING THE SUBROUTINE ON THE ASSUMPTION THAT THE MTS DSECT HAS BEEN CHANGED. PKEY=BILL:BLSIGCK. RUN WITH PROT=OFF. 0 Referenced by comments of: 500/51 00500/002C BILLING BLSIGCK UC G S0027 DISTRB FSNAME=BLSIGCKUPD 5.1T1 427 BILLING.BLSIGCK.UC.002 1 LINE 71 1 PAGE UM ENGLE AUG. 25, 1982 10:44:37 0 Updates source from previous regular distribution to current one. 1 SUN SEP 08/96 15:24:55 Page 247 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00500/003A BILLING BLSIGCK OC G S0027 DISTRB FSNAME=BLSC 5.1T1 428 BILLING.BLSIGCK.OC.003 1 LINE 80 5 PAGE UM ENGLE AUG. 25, 1982 10:44:43 00500/004A BILLING BILLRFT SP G BLRF S0027 DISTRB FSNAME=BILLRFT 5.1T1 429 BILLING.BILLRFT.SP.004 1 LINE 80 24 PAGE UM ENGLE AUG. 25, 1982 11:06:42 0 PROGRAM TO REFORMAT STATISTICS RECORDS, HAND BILLING RECORDS, OS/360 BILLING RECORDS, AND NETWORK RECORDS FOR BILLING SORT. 0 Referenced by comments of: 500/29, 500/37, 500/43 00500/005A BILLING BILLRFT UC G S0027 DISTRB FSNAME=BILLRFTUPD 5.1T1 430 BILLING.BILLRFT.UC.005 1 LINE 72 4 PAGE UM ENGLE AUG. 25, 1982 11:06:51 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/006A BILLING BILLRFT OC G S0027 DISTRB FSNAME=BLRF 5.1T1 431 BILLING.BILLRFT.OC.006 1 LINE 80 23 PAGE UM ENGLE AUG. 25, 1982 11:07:25 0 REFORMATTING PROGRAM FOR REGULAR BILLING (COMPILED WITH %NET='';). 00500/007A BILLING BILLRFT OC G S0027 DISTRB FSNAME=NETBLRF 5.1T1 432 BILLING.BILLRFT.OC.007 1 LINE 80 19 PAGE UM ENGLE AUG. 25, 1982 11:08:14 0 REFORMATTING PROGRAM FOR NETWORK BILLING (COMPILED WITH %NET='YES';). 00500/008A BILLING BILLING SP G BILL S0027 DISTRB FSNAME=BILLING 5.1T1 433 BILLING.BILLING.SP.008 1 LINE 80 33 PAGE UM ENGLE MAY 25, 1983 16:21:09 0 PROGRAM TO DO MAIN PART OF BILLING AFTER SORT. 0 Referenced by comments of: 500/29, 500/31, 500/45 00500/009A BILLING BILLING UC G S0027 DISTRB FSNAME=BILLINGUPD 5.1T1 434 BILLING.BILLING.UC.009 1 LINE 72 5 PAGE UM ENGLE MAY 25, 1983 16:21:27 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/010A BILLING BILLING OC G S0027 DISTRB FSNAME=BILL 5.1T1 435 BILLING.BILLING.OC.010 1 LINE 80 28 PAGE UM ENGLE AUG. 25, 1982 11:12:48 0 REGULAR BILLING (COMPILED WITH %NET='';). 00500/011A BILLING BILLING OC G S0027 DISTRB FSNAME=NETBILL 5.1T1 436 BILLING.BILLING.OC.011 1 LINE 80 17 PAGE UM ENGLE MAY 25, 1983 16:21:34 0 NETWORK BILLING (COMPILED WITH %NET='YES';). 00500/012A BILLING BILPRNT SP G BLPR S0027 DISTRB FSNAME=BILPRNT 5.1T1 437 BILLING.BILPRNT.SP.012 1 LINE 80 14 PAGE UM ENGLE MAY 25, 1983 16:22:48 0 PROGRAM TO PRINT BILLING REPORTS. 0 Referenced by comments of: 500/30, 500/47 1 SUN SEP 08/96 15:24:55 Page 248 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00500/013C BILLING BILPRNT UC G S0027 DISTRB FSNAME=BILPRNTUPD 5.1T1 438 BILLING.BILPRNT.UC.013 1 LINE 72 4 PAGE UM ENGLE MAY 25, 1983 16:22:59 0 Updates source from previous regular distribution to current one. 00500/014A BILLING BILPRNT OC G S0027 DISTRB FSNAME=BLPR 5.1T1 439 BILLING.BILPRNT.OC.014 1 LINE 80 16 PAGE UM ENGLE MAY 25, 1983 16:23:07 00500/015A BILLING BILLUTIL SG G S0027 DISTRB FSNAME=BILLUTIL 5.1T1 440 BILLING.BILLUTIL.SG.015 1 LINE 194 2 PAGE UM ENGLE AUG. 25, 1982 11:25:46 0 PROGRAM TO EXTRACT MONTHLY INFORMATION FROM THE FILE DIVISION (500/30) AND ENTER IT INTO THE UTILIZATION DATA BANK (500/32). 0 Referenced by comments of: 500/32, 500/56 00500/016A BILLING BILLUTIL UC G S0027 DISTRB FSNAME=BILLUTILUPD 5.1T1 441 BILLING.BILLUTIL.UC.016 1 LINE 194 1 PAGE UM ENGLE AUG. 25, 1982 11:26:32 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/017A BILLING BILLUTIL OC G S0027 DISTRB FSNAME=BLUT 5.1T1 442 BILLING.BILLUTIL.OC.017 1 LINE 80 4 PAGE UM ENGLE AUG. 25, 1982 11:26:43 00500/018A BILLING BLPRVUTL SG G S0027 DISTRB FSNAME=BLPRVUTL 5.1T1 443 BILLING.BLPRVUTL.SG.018 1 LINE 88 1 PAGE UM ENGLE AUG. 25, 1982 11:57:24 0 PROGRAM TO PRODUCE INPUT FOR TAXIR (668) SPECIFYING THE HEADING, MONTH, AND YEAR FOR A REPORT FOR THE PREVIOUS MONTH. 00500/019A BILLING BLPRVUTL UC G S0027 DISTRB FSNAME=BLPRVUTLUPD 5.1T1 444 BILLING.BLPRVUTL.UC.019 1 LINE 88 1 PAGE UM ENGLE AUG. 25, 1982 11:57:29 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/020A BILLING BLPRVUTL OC G S0027 DISTRB FSNAME=BPRU 5.1T1 445 BILLING.BLPRVUTL.OC.020 1 LINE 80 3 PAGE UM ENGLE AUG. 25, 1982 11:57:34 00500/021A BILLING UTILSORT SG G S0027 DISTRB FSNAME=UTILSORT 5.1T1 446 BILLING.UTILSORT.SG.021 1 LINE 71 1 PAGE UM ENGLE AUG. 25, 1982 12:06:02 0 PROGRAM TO SORT TAXIR (668) OUTPUT FROM THE UTILIZATION DATA BANK (500/32). SEE BILLSOURCE (500/28) FOR SOURCE COMMANDS UTILIZING THIS PROGRAM. 00500/022A BILLING UTILSORT UC G S0027 DISTRB FSNAME=UTILSORTUPD 5.1T1 447 BILLING.UTILSORT.UC.022 1 LINE 67 1 PAGE UM ENGLE AUG. 25, 1982 12:06:08 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/023A BILLING UTILSORT OC G S0027 DISTRB FSNAME=UTLS 5.1T1 448 BILLING.UTILSORT.OC.023 1 LINE 80 3 PAGE UM ENGLE AUG. 25, 1982 12:06:12 1 SUN SEP 08/96 15:24:55 Page 249 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00500/024A BILLING STATEMNT SG G S0027 DISTRB FSNAME=STATEMNT 5.1T1 449 BILLING.STATEMNT.SG.024 1 LINE 158 6 PAGE UM ENGLE AUG. 25, 1982 12:09:41 0 PROGRAM TO PRODUCE COMPARATIVE STATEMENTS SHOWING FIGURES FOR "CURRENT" MONTH AND YEAR-TO-DATE FOR BOTH THE "CURRENT" YEAR AND THE PREVIOUS YEAR. AN INDICATION OF THE VALUES FOR THE PAR= FIELD IS GIVEN AT THE BEGINNING OF THE PROGRAM. SEE BILLSOURCE (500/28) FOR SOURCE COMMANDS UTILIZING THIS PROGRAM. FIRST LINE OF REPORT IS "THE UNIVERSITY OF MICHIGAN COMPUTING CENTER." 00500/025A BILLING STATEMNT UC G S0027 DISTRB FSNAME=STATEMNTUPD 5.1T1 450 BILLING.STATEMNT.UC.025 1 LINE 158 1 PAGE UM ENGLE AUG. 25, 1982 12:09:45 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/026A BILLING STATEMNT OC G S0027 DISTRB FSNAME=STMT 5.1T1 451 BILLING.STATEMNT.OC.026 1 LINE 80 10 PAGE UM ENGLE AUG. 25, 1982 12:09:51 00500/027A BILLING BILLWRITEUP WF G S0027 DISTRB FSNAME=BILLWRITEUP 5.1T1 452 BILLING.BILLWRITEUP.WF.027 1 LINE 82 10 PAGE UM ENGLE AUG. 25, 1982 15:48:27 0 WRITEUP FOR RUNNING BILLING. 00500/028A BILLING BILLSOURCE C S0027 DISTRB FSNAME=BILLSOURCE 5.1T1 453 BILLING.BILLSOURCE.C.028 1 LINE 508 9 PAGE UM ENGLE MAY 25, 1983 16:31:45 0 COMMAND FILE FOR RUNNING BILLING. LINE NUMBERS IN THIS FILE ARE IMPORTANT TO THE RESTART FILE (500/33). 0 Referenced by comments of: 500/21, 500/24, 500/33 00500/029A BILLING BILLTABLES D S0027 DISTRB FSNAME=BILLTABLES 5.1T1 454 BILLING.BILLTABLES.D.029 1 LINE 76 4 PAGE UM ENGLE MAY 25, 1983 16:28:19 0 MACHINE READABLE TABLE OF INFORMATION USED BY BILLING. READ DURING EXECUTION OF BILLRFT (500/4) AND BILLING (500/8). 00500/030 BILLING DIVISION D BILL:DIVISION 5.0T1 1435 BILLING.DIVISION.D.029 1 LINE 104 27 PAGE UM ENGLE JULY 03, 1981 14:26:59 5.0T3 429 0 MACHINE READABLE TABLE OF UNIVERSITY UNITS ACCORDING TO UNIT CODE. READ AND WRITTEN BY BILPRNT (500/12). 0 Referenced by comments of: 500/15, 500/56 00500/031A BILLING COVER D S0027 DISTRB FSNAME=COVER 5.1T1 455 BILLING.COVER.D.031 1 LINE 66 1 PAGE UM ENGLE MAY 25, 1983 16:28:36 0 MACHINE READABLE COVER LETTER FOR LISTINGS OF INDIVIDUAL RUNS. READ BY BILLING (500/8). 00500/032A BILLING UTILIZATION D G S0027 DISTRB FSNAME=UTILIZATION 5.1T1 456 BILLING.UTILIZATION.D.032 1 LINE 616 1 PAGE UM ENGLE AUG. 25, 1982 17:32:49 0 SKELETON TAXIR (668) UTILIZATION DATA BANK (I.E., THE DATA BANK WITHOUT THE 1 SUN SEP 08/96 15:24:55 Page 250 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 DATA). CALENDAR YEAR RANGE IS 1979 THROUGH 1985. FISCAL YEAR RANGE IS 79-80 THROUGH 85-86. THIS DATA BANK IS UPDATED USING BILLUTIL (500/15). 0 Referenced by comments of: 500/15, 500/21 00500/033A BILLING RESTART C S0027 DISTRB FSNAME=RESTART 5.1T1 457 BILLING.RESTART.C.033 1 LINE 46 1 PAGE UM ENGLE AUG. 25, 1982 17:33:44 0 COMMAND FILE TO RESTART IN THE MIDDLE OF THE BILLING PROCESS AFTER SOME PARTS HAVE BEEN COMPLETED. HAS $CONTINUE WITH'S TO BILLSOURCE (500/28). LINE NUMBERS IN THIS FILE ARE IMPORTANT. 0 Referenced by comments of: 500/28 00500/034A BILLING BILLLIB OL G S0027 DISTRB FSNAME=BILLLIB 5.1T1 458 BILLING.BILLLIB.OL.034 1 LINE 456 13 PAGE UM ENGLE AUG. 25, 1982 17:37:43 0 LIBRARY FOR BILLING PROGRAMS. ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD. 00500/035 BILLING FLUSH SP G S1558 5.0T1 VLO FSNAME=BILLING.FLUSH.SP.034(1) 1440 5.0T1 1440 BILLING.FLUSH.SP.034 1 LINE 80 1 PAGE UM ENGLE JUNE 07, 1973 10:28.44 5.0T3 434 0 SUBROUTINE TO FORCE A LINE OF OUTPUT TO A PL/I STREAM FILE (PUT STATEMENTS) TO BE PRINTED NOW (DAMNIT), E.G., ON A TERMINAL FOR PROMPTING FOR INPUT. 00500/036 BILLING FLUSH OC G S1558 5.0T1 VLO FSNAME=BILLING.FLUSH.OC.035(1) 1441 5.0T1 1441 BILLING.FLUSH.OC.035 1 LINE 80 1 PAGE UM ENGLE JAN. 08, 1974 15:46.26 5.0T3 435 00500/037 BILLING BLPRJFL SA G S1558 5.0T1 VLO FSNAME=BILLING.BLPRJFL.SA.036(1) 1442 5.0T1 1442 BILLING.BLPRJFL.SA.036 1 LINE 80 4 PAGE UM ENGLE DEC. 06, 1974 13:12.59 5.0T3 436 0 SUBROUTINE TO READ THE NEXT PROJECT RECORD FROM *PROJECT. CALLED BY BILLRFT (500/4). COPIES ACCPROJFMT (104/3). 00500/038 BILLING BLPRJFL OC G S1558 5.0T1 VLO FSNAME=BILLING.BLPRJFL.OC.037(1) 1443 5.0T1 1443 BILLING.BLPRJFL.OC.037 1 LINE 80 1 PAGE UM ENGLE DEC. 06, 1974 13:13.11 5.0T3 437 00500/039 BILLING PNLIST SP G S1558 5.0T1 VLO FSNAME=BILLING.PNLIST.SP.038(1) 1444 5.0T1 1444 BILLING.PNLIST.SP.038 1 LINE 80 5 PAGE UM ENGLE JAN. 10, 1979 16:34:56 5.0T3 438 0 PROGRAM TO PRODUCE LISTINGS OF PROJECT NUMBERS IN *PROJECT SORTED BY UNIVERSITY ACCOUNT NUMBER, INTER-DEPARTMENTAL REQUISITION NUMBER, UNIT CODE, AND NAME. 0 Referenced by comments of: 500/41 00500/040 BILLING PNLIST OC G S1558 5.0T1 VLO FSNAME=BILLING.PNLIST.OC.039(1) 1445 5.0T1 1445 BILLING.PNLIST.OC.039 1 LINE 80 6 PAGE UM ENGLE FEB. 12, 1979 11:52:37 5.0T3 439 1 SUN SEP 08/96 15:24:55 Page 251 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00500/041 BILLING PNLSEXTR SA G S1558 5.0T1 VLO FSNAME=BILLING.PNLSEXTR.SA.040(1) 1446 5.0T1 1446 BILLING.PNLSEXTR.SA.040 1 LINE 80 3 PAGE UM ENGLE DEC. 06, 1974 13:16.12 5.0T3 440 0 SUBROUTINE TO EXTRACT PROJECT INFORMATION FOR PNLIST (500/39). CALLED BY PRJLIST (104/51) WHICH IS CALLED BY PNLIST. COPIES ACCPROJFMT (104/3). 00500/042 BILLING PNLSEXTR OC G S1558 5.0T1 VLO FSNAME=BILLING.PNLSEXTR.OC.041(1) 1447 5.0T1 1447 BILLING.PNLSEXTR.OC.041 1 LINE 80 1 PAGE UM ENGLE DEC. 06, 1974 13:16.32 5.0T3 441 00500/043 BILLING BLRECPR SP G S1558 5.0T1 VLO FSNAME=BILLING.BLRECPR.SP.042(1) 1448 5.0T1 1448 BILLING.BLRECPR.SP.042 1 LINE 80 3 PAGE UM ENGLE MAY 03, 1974 14:16.05 5.0T3 442 0 PROGRAM TO PRINT REFORMATTED BILLING RECORDS PRODUCED BY BILLRFT (500/4). 00500/044 BILLING BLRECPR OC G S1558 5.0T1 VLO FSNAME=BILLING.BLRECPR.OC.043(1) 1449 5.0T1 1449 BILLING.BLRECPR.OC.043 1 LINE 80 3 PAGE UM ENGLE MAY 03, 1974 14:16.20 5.0T3 443 00500/045 BILLING POSIFIL SP G S1558 5.0T1 VLO FSNAME=BILLING.POSIFIL.SP.044(1) 1450 5.0T1 1450 BILLING.POSIFIL.SP.044 1 LINE 80 3 PAGE UM ENGLE JAN. 08, 1974 15:49.10 5.0T3 444 0 SUBROUTINE CALLED BY BILLING (500/8) TO POSITION PL/1 FILES FOR RESTART. 00500/046 BILLING POSIFIL OC G S1558 5.0T1 VLO FSNAME=BILLING.POSIFIL.OC.045(1) 1451 5.0T1 1451 BILLING.POSIFIL.OC.045 1 LINE 80 2 PAGE UM ENGLE JAN. 08, 1974 15:49.29 5.0T3 445 00500/047 BILLING BLDVSRTE SA G S1558 5.0T1 VLO FSNAME=BILLING.BLDVSRTE.SA.046(1) 1452 5.0T1 1452 BILLING.BLDVSRTE.SA.046 1 LINE 80 4 PAGE UM ENGLE JAN. 10, 1979 14:53:17 5.0T3 446 0 SORT EXIT SUBROUTINES TO DO DIVISION SORT FOR BILPRNT (500/12). COPIES GRDEF (104/83). 00500/048 BILLING BLDVSRTE OC G S1558 5.0T1 VLO FSNAME=BILLING.BLDVSRTE.OC.047(1) 1453 5.0T1 1453 BILLING.BLDVSRTE.OC.047 1 LINE 80 2 PAGE UM ENGLE FEB. 12, 1979 11:52:41 5.0T3 447 00500/049 BILLING BILLMNT SG G S1558 5.0T1 VLO FSNAME=BILLING.BILLMNT.SG.048(1) 1454 5.0T1 1454 BILLING.BILLMNT.SG.048 1 LINE 73 1 PAGE UM ENGLE MAR. 01, 1977 17:10:37 5.0T3 448 0 GOM PROGRAM TO MOUNT THE BILLING REPORT TAPE. 00500/050 BILLING BILLMNT OC G S1558 5.0T1 VLO FSNAME=BILLING.BILLMNT.OC.049(1) 1455 5.0T1 1455 BILLING.BILLMNT.OC.049 1 LINE 80 3 PAGE UM ENGLE MAR. 01, 1977 17:10:40 5.0T3 449 1 SUN SEP 08/96 15:24:55 Page 252 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00500/051A BILLING SIGONSCN SA G SSCN S0027 DISTRB FSNAME=SIGONSCN 5.1T1 459 BILLING.SIGONSCN.SA.051 1 LINE 80 5 PAGE UM ENGLE AUG. 26, 1982 10:14:10 0 SUBROUTINE TO SCAN THE JOB TABLE FOR SIGNONS MADE DURING THE BILLING PERIOD. CALLED BY BLSIGCK (500/1). COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087). ASSEMBLE USING COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 500/1 00500/052C BILLING SIGONSCN UC G S0027 DISTRB FSNAME=SIGONSCNUPD 5.1T1 460 BILLING.SIGONSCN.UC.052 1 LINE 72 2 PAGE UM ENGLE AUG. 26, 1982 10:14:13 0 Updates source from previous regular distribution to current one. 00500/053A BILLING SIGONSCN OC G S0027 DISTRB FSNAME=SSCN 5.1T1 461 BILLING.SIGONSCN.OC.053 1 LINE 80 6 PAGE UM ENGLE AUG. 26, 1982 10:14:15 00500/054 BILLING TAPMNT SG G S1558 5.0T1 VLO FSNAME=BILLING.TAPMNT.SG.052(1) 1458 5.0T1 1458 BILLING.TAPMNT.SG.052 1 LINE 72 3 PAGE UM ENGLE JAN. 09, 1979 13:48:40 5.0T3 452 0 SUBROUTINE TO ACQUIRE SUCCESSIVE FILES FOR A SPECIFIED RANGE FROM TAPE DIRECTORY TAPES. 00500/055 BILLING TAPMNT OC G S1558 5.0T1 VLO FSNAME=BILLING.TAPMNT.OC.053(1) 1459 5.0T1 1459 BILLING.TAPMNT.OC.053 1 LINE 80 5 PAGE UM ENGLE JAN. 09, 1979 13:50:32 5.0T3 453 00500/056A BILLING DIVTOTXR SG G S0027 DISTRB FSNAME=DIVTOTXR 5.1T1 462 BILLING.DIVTOTXR.SG.056 1 LINE 135 4 PAGE UM ENGLE AUG. 26, 1982 10:29:39 0 PROGRAM TO PRODUCE TAXIR INPUT DATA FROM THE MONTHLY INFORMATION IN THE FILE DIVISION (500/30). THIS CAN BE RUN SEPARATELY WITH OUTPUT ON SPUNCH OR CALLED AS A SUBROUTINE BY BILLUTIL (500/15). 00500/057A BILLING DIVTOTXR UC G S0027 DISTRB FSNAME=DIVTOTXRUPD 5.1T1 463 BILLING.DIVTOTXR.UC.057 1 LINE 135 3 PAGE UM ENGLE AUG. 26, 1982 10:29:47 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00500/058A BILLING DIVTOTXR OC G S0027 DISTRB FSNAME=DTXR 5.1T1 464 BILLING.DIVTOTXR.OC.058 1 LINE 80 6 PAGE UM ENGLE AUG. 26, 1982 10:29:53 00500/059C BILLING STACNVRT SA G SCNV S0027 DISTRB FSNAME=STACNVRT 5.1T1 465 BILLING.STACNVRT.SA.059 1 LINE 80 4 PAGE UM ENGLE AUG. 26, 1982 17:21:24 0 Subroutine to convert a previous statistics record format to the current format. 0 Referenced by comments of: 616/1, 617/1 1 SUN SEP 08/96 15:24:55 Page 253 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00500/060C BILLING STACNVRT UC G # S0027 DISTRB FSNAME=STACNVRTUPD UM ENGLE 0 Updates source from previous regular distribution to current distribution. 00500/061C BILLING STACNVRT OC G S0027 DISTRB FSNAME=SCNV 5.1T1 466 BILLING.STACNVRT.OC.061 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 17:21:27 0 Referenced by comments of: 104/1 00501/001A MTS VOLUME 3 MASTER WT S0486 MTSV3 'MTS MANUALS' POSN=NEWM18.V3 5.1T1 467 MTS_VOLUME_3.MASTER.WT.001 1 LINE 132 342 PAGE UM MANUAL JULY 23, 1983 10:56:53 0 TEXT/360 master for Volume 3 "System Subroutine Descriptions" of the UM MTS manuals, April 1981, updated March 1982 and February 1983. Editor: Richard A. Salisbury 0 Referenced by comments of: 101/1 00501/002A MTS VOLUME 3 PRINT PT S0486 MTSV3 'MTS MANUALS' POSN=PRINT18.V3 5.1T1 468 MTS_VOLUME_3.PRINT.PT.002 1 LINE 132 694 PAGE UM MANUAL JULY 23, 1983 10:57:06 0 TEXT/360 print file. There is also a Xerox 9700 file (which is slightly modified from the TEXT/360 print file), which is available on request. 00501/003C MTS VOLUME 3 UPDATE 1 P W073:TNLV3.MAR82 5.1T1 469 MTS_VOLUME_3.UPDATE_1.P.003 1 LINE 79 84 PAGE UM MANUAL JULY 23, 1983 10:57:13 0 Update 1 to MTS Volume 3. 00501/004C MTS VOLUME 3 UPDATE 1S P W073:TNLV3.MAR82S 5.1T1 470 MTS_VOLUME_3.UPDATE_1S.P.004 1 LINE 79 11 PAGE UM MANUAL JULY 23, 1983 10:57:17 0 Update 1 to MTS Volume 3 (systems section). 00501/005C MTS VOLUME 3 UPDATE 2 P W073:TNLV3.FEB83 5.1T1 471 MTS_VOLUME_3.UPDATE_2.P.005 1 LINE 79 80 PAGE UM MANUAL JULY 23, 1983 10:57:18 0 Update 2 to MTS Volume 3. 00501/006C MTS VOLUME 3 UPDATE 2S P W073:TNLV3.FEB83S 5.1T1 472 MTS_VOLUME_3.UPDATE_2S.P.006 1 LINE 79 15 PAGE UM MANUAL JULY 23, 1983 10:57:21 0 Update 2 to MTS Volume 3 (systems section). 00502/001A DEADFILES SCANFILES SA G SCFL S0027 DISTRB FSNAME=SCANFILE 5.1T1 473 DEADFILES.SCANFILES.SA.001 1 LINE 80 13 PAGE UM ENGLE MAY 25, 1983 17:34:44 0 DEADfiles is a series of programs used to remove files which belong to expired user ID's. At UM, this is done once per month and the tape(s) generated are saved indefinitely. (502/14) describes the procedure. 1 SUN SEP 08/96 15:24:55 Page 254 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 SCANFILES copies ACCFORMAT (104/1) and *GFINFODSECT (593). Assemble using COPY:FILE.MACROS (482/45). Calls the SCANMBOX subroutine (502/12) for dead mailbox information and UDSCAN (821/40) for dead name information. Run with PROT=OFF. 0 Referenced by comments of: 104/187, 104/188, 484/1, 821/40 00502/002A DEADFILES SCANFILES UC G S0027 DISTRB FSNAME=SCANFILEUPD 5.1T1 474 DEADFILES.SCANFILES.UC.002 1 LINE 72 3 PAGE UM ENGLE MAY 25, 1983 17:34:47 0 Updates source from previous regular distribution to current distribution. 00502/003A DEADFILES SCANFILES OE G RSTR:SCANFILES 5.1T1 475 DEADFILES.SCANFILES.OE.003 1 LINE 2751 6 PAGE UM ENGLE JULY 23, 1983 10:57:40 RSTR:SCANFILES 00502/004 DEADFILES DESTROY SA G RSTR:DEADFILEDES(1000) 5.0T2 4 DEADFILES.DESTROY.SA.004 1 LINE 71 1 PAGE UM HELFFRICH JULY 03, 1981 14:46:40 5.0T3 461 RSTR:DEADFILEDES 0 Program to destroy a list of files. Calls the file routines' DESTROY entry point directly to circumvent denial of destroy access. Assemble using *SYSMAC. 00502/005 DEADFILES DESTROY OC G RSTR:DEADFILEDES(1,998) 5.0T2 5 DEADFILES.DESTROY.OC.005 1 LINE 80 1 PAGE UM HELFFRICH JULY 03, 1981 14:46:41 5.0T3 462 00502/006A DEADFILES CATDES SA G RSTR:DEADUCATDES(1000) 5.1T1 476 DEADFILES.CATDES.SA.006 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 10:57:41 RSTR:DEADUCATDES 0 Program to destroy user catalogs. Running this program is the only way that catalog space is ever reclaimed and if this program is not run, the catalog will only get bigger. This program also deletes file entries for expired user IDs from the FILESAVE master file directory so that the files may not be restored using *RESTORE. Assemble using *SYSMAC. 00502/007A DEADFILES CATDES OC G RSTR:DEADUCATDES(1,998) 5.1T1 477 DEADFILES.CATDES.OC.007 1 LINE 80 3 PAGE UM HELFFRICH JULY 23, 1983 10:57:41 0 This file should have the program key RSTR:DEADUCATDES. 00502/008 DEADFILES SAVEFILES SA G RSTR:DEADSAVE(1000) 5.0T2 8 DEADFILES.SAVEFILES.SA.008 1 LINE 72 3 PAGE UM HELFFRICH JULY 03, 1981 14:46:43 5.0T3 465 0 Program to save a specific set of files - usually the list of dead files, but it reads an arbitrary list. Assemble using *SYSMAC and COPY:FILE.MACROS (482/45). Calls the following subroutines: SAVEFILE 1 SUN SEP 08/96 15:24:55 Page 255 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (067/10) and TAPEOUT (067/24). 00502/009 DEADFILES SAVEFILES OC G RSTR:DEADSAVE(1,998) 5.0T2 9 DEADFILES.SAVEFILES.OC.009 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 14:46:44 5.0T3 466 RSTR:DEADSAVE 00502/010 DEADFILES FIX SA G S1559 5.0T2 VLO FSNAME=DEADFILES.FIX.SA.010(1) 10 5.0T2 10 DEADFILES.FIX.SA.010 1 LINE 80 1 PAGE UM ENGLE JAN. 08, 1973 17:58.20 5.0T3 467 0 Program to update the file information in an accounting record to adjust for the files destroyed. Calls *ACCRESTORE. Run with PROT=OFF. 0 Referenced by comments of: 104/100, 104/187, 104/188 00502/011 DEADFILES FIX OC G MTS:TST.FIX 5.0T2 11 DEADFILES.FIX.OC.011 1 LINE 80 1 PAGE UM ENGLE JULY 03, 1981 14:46:45 5.0T3 468 RSTR:FIX 0 Contains a $CONTINUE WITH *ACCRESTORE (484/1) record. 0 Referenced by comments of: 104/100 00502/012C DEADFILES SCANMBOX SG G RSTR:SCANMBOX(1000) 5.1T1 478 DEADFILES.SCANMBOX.SG.012 1 LINE 76 2 PAGE UM STERKEN JULY 23, 1983 10:57:42 0 Subroutine used by DEADFILES to retrieve active message system mailbox names. 0 Referenced by comments of: 502/1 00502/013C DEADFILES SCANMBOX OC G RSTR:SCANMBOX(1,999) 5.1T1 479 DEADFILES.SCANMBOX.OC.013 1 LINE 80 3 PAGE UM STERKEN JULY 23, 1983 10:57:42 00502/014C DEADFILES WRITEUP P RSTR:DEADFILES.W 5.1T3 339 DEADFILES.WRITEUP.P.014 1 LINE 67 3 PAGE UM OGDEN AUG. 20, 1983 19:45:21 0 Writeup describing how to run DEADFILES. 0 Referenced by comments of: 502/1 00504/001A MTS VOLUME 1 MASTER WT S0488 MTSV1 'MTS MANUALS' POSN=NEWM10.V1 5.1T1 480 MTS_VOLUME_1.MASTER.WT.001 1 LINE 132 337 PAGE UM MANUAL JULY 23, 1983 11:00:53 0 TEXT/360 master for Volume 1, "Michigan Terminal System," of the UM MTS manuals, February 1983. Editor: Richard A. Salisbury 0 Referenced by comments of: 798/1 1 SUN SEP 08/96 15:24:55 Page 256 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00504/002A MTS VOLUME 1 PRINT PT S0488 MTSV1 'MTS MANUALS' POSN=PRINT10.V1 5.1T1 481 MTS_VOLUME_1.PRINT.PT.002 1 LINE 132 489 PAGE UM MANUAL JULY 23, 1983 11:01:07 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), which is available on request. 00504/003A MTS VOLUME 1 INDEX SOURCE D S0488 MTSV1 'MTS MANUALS' POSN=V1INDEXSOU.10 5.1T1 482 MTS_VOLUME_1.INDEX_SOURCE.D.003 1 LINE 73 7 PAGE UM MANUAL JULY 23, 1983 11:02:53 00505/001 *ALGOL DUMPRESTORE C S0504 'UBC -> UM #6' FMT=U(255) 1 5.0T2 19 ALGOL.DUMPRESTORE.C.001 1 SEQ 44 2 PAGE UNE SALISBURY JULY 03, 1981 14:50:11 5.0T3 476 0 MTS COMMANDS USED TO GENERATE OR RESTORE THE ALGOL FILES ON THE UNE ALGOL DISTRIBUTION TAPE. ALTHOUGH THESE COMMANDS ARE NOT APPROPRIATE FOR RESTORING THE ALGOL FILES FROM THE DISTRIBUTION TAPE, THEY ARE INCLUDED BECAUSE THEY SHOW THE ORGANIZATION OF THE UNE ALGOL. 00505/002 *ALGOL CINTSORC SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 4 5.0T2 20 ALGOL.CINTSORC.SA.002 1 SEQ 80 30 PAGE UNE SALISBURY JULY 03, 1981 14:50:16 5.0T3 477 0 COMPILER/MTS INTERFACE MODULE. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 387/17, 505/19 00505/003 *ALGOL FSACONV SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 5 5.0T2 21 ALGOL.FSACONV.SA.003 1 SEQ 80 2 PAGE UNE SALISBURY JULY 03, 1981 14:50:17 5.0T3 478 0 COPY SECTION COPIED BY COMPILER. 0 Referenced by comments of: 505/14, 505/20 00505/004 *ALGOL FSAREA SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 6 5.0T2 22 ALGOL.FSAREA.SA.004 1 SEQ 80 3 PAGE UNE SALISBURY JULY 03, 1981 14:50:17 5.0T3 479 0 COPY SECTION COPIED BY COMPILER. 0 Referenced by comments of: 505/14, 505/20, 505/21 00505/005 *ALGOL IEX50T SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 7 5.0T2 23 ALGOL.IEX50T.SA.005 1 SEQ 80 95 PAGE UNE SALISBURY JULY 03, 1981 14:50:22 5.0T3 480 0 COPY SECTION COPIED BY COMPILER. 0 Referenced by comments of: 505/14 1 SUN SEP 08/96 15:24:55 Page 257 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00505/006 *ALGOL IEX60000 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 8 5.0T2 24 ALGOL.IEX60000.SA.006 1 SEQ 80 15 PAGE UNE SALISBURY JULY 03, 1981 14:50:24 5.0T3 481 0 COPY SECTION COPIED BY COMPILER. 0 Referenced by comments of: 505/15 00505/007 *ALGOL OSALG00 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 14 5.0T2 25 ALGOL.OSALG00.SA.007 1 SEQ 80 10 PAGE UNE SALISBURY JULY 03, 1981 14:50:36 5.0T3 482 0 COMPS (505/7) THROUGH (505/16) ARE OS/360 ALGOL COMPILER SOURCE. EACH MUST BE ASSEMBLED USING THE SPECIAL OS MACRO LIBRARY (505/17). THIS SUBCOMPONENT COPIES WORKAREA (505/18). 0 Referenced by comments of: 505/7, 505/17, 505/19 00505/008 *ALGOL OSALG01 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 15 5.0T2 26 ALGOL.OSALG01.SA.008 1 SEQ 80 4 PAGE UNE SALISBURY JULY 03, 1981 14:50:37 5.0T3 483 00505/009 *ALGOL OSALG10 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 16 5.0T2 27 ALGOL.OSALG10.SA.009 1 SEQ 80 22 PAGE UNE SALISBURY JULY 03, 1981 14:50:38 5.0T3 484 0 COPIES WORKAREA (505/18). 00505/010 *ALGOL OSALG11 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 17 5.0T2 28 ALGOL.OSALG11.SA.010 1 SEQ 80 88 PAGE UNE SALISBURY JULY 03, 1981 14:50:42 5.0T3 485 0 COPIES WORKAREA (505/18). 00505/011 *ALGOL OSALG20 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 18 5.0T2 29 ALGOL.OSALG20.SA.011 1 SEQ 80 16 PAGE UNE SALISBURY JULY 03, 1981 14:50:45 5.0T3 486 0 COPIES WORKAREA (505/18). 00505/012 *ALGOL OSALG30 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 19 5.0T2 30 ALGOL.OSALG30.SA.012 1 SEQ 80 62 PAGE UNE SALISBURY JULY 03, 1981 14:50:48 5.0T3 487 0 COPIES WORKAREA (505/18). 00505/013 *ALGOL OSALG40 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 20 5.0T2 31 ALGOL.OSALG40.SA.013 1 SEQ 80 17 PAGE UNE SALISBURY JULY 03, 1981 14:50:50 5.0T3 488 0 COPIES WORKAREA (505/18). 1 SUN SEP 08/96 15:24:55 Page 258 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00505/014 *ALGOL OSALG50 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 21 5.0T2 32 ALGOL.OSALG50.SA.014 1 SEQ 80 96 PAGE UNE SALISBURY JULY 03, 1981 14:50:55 5.0T3 489 0 COPIES FSACONV (505/3), FSAREA (505/4), AND IEX50T (505/5). 00505/015 *ALGOL OSALG51 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 22 5.0T2 33 ALGOL.OSALG51.SA.015 1 SEQ 80 24 PAGE UNE SALISBURY JULY 03, 1981 14:50:57 5.0T3 490 0 COPIES IEX60000 (505/6) AND WORKAREA (505/18). 00505/016 *ALGOL OSALG51M SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 23 5.0T2 34 ALGOL.OSALG51M.SA.016 1 SEQ 80 9 PAGE UNE SALISBURY JULY 03, 1981 14:50:58 5.0T3 491 0 Referenced by comments of: 505/7, 505/17, 505/19 00505/017 *ALGOL OSMAC SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 24 5.0T2 35 ALGOL.OSMAC.SA.017 1 SEQ 80 103 PAGE UNE SALISBURY JULY 03, 1981 14:51:03 5.0T3 492 0 SPECIAL OS INTERFACE MACROS. MUST BE USED TO ASSEMBLE COMPS (505/7) THROUGH (505/16). 0 Referenced by comments of: 505/7, 505/20, 505/21 00505/018 *ALGOL WORKAREA SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 25 5.0T2 36 ALGOL.WORKAREA.SA.018 1 SEQ 80 4 PAGE UNE SALISBURY JULY 03, 1981 14:51:05 5.0T3 493 0 COPY SECTION COPIED BY COMPILER AND LIBRARY. 0 Referenced by comments of: 505/7, 505/9, 505/10, 505/11, 505/12, 505/13, 505/15 00505/019 *ALGOL *ALGOL OC G *ALGOL 5.0T2 37 ALGOL.*ALGOL.OC.019 1 SEQ 80 31 PAGE UM SALISBURY JULY 03, 1981 14:51:05 5.0T3 494 *ALGOL 0 COMPLETE COMPILER OBJECT FILE. CONSISTS OF OBJECT OF COMPS (505/7) THROUGH (505/16), THE OS/360 SOURCE, PLUS THE COMPILER/MTS INTERFACE MODULE (505/2) AND AN " ENT COMENTRY" LOADER CARD TO SPECIFY THE COMPILER ENTRY POINT. 00505/020 *ALGOL LIBSORC SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 11 5.0T2 38 ALGOL.LIBSORC.SA.020 1 SEQ 80 181 PAGE UNE SALISBURY JULY 03, 1981 14:51:38 5.0T3 495 0 OS/360 LIBRARY SOURCE. ASSEMBLE USING OSMAC (505/17). COPIES FSACONV (505/3) AND FSAREA (505/4). 0 Referenced by comments of: 505/23 1 SUN SEP 08/96 15:24:55 Page 259 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00505/021 *ALGOL LIBSORC1 SA G S0504 'UBC -> UM #6' FMT=FB(3200,80) 12 5.0T2 39 ALGOL.LIBSORC1.SA.021 1 SEQ 80 37 PAGE UNE SALISBURY JULY 03, 1981 14:51:42 5.0T3 496 0 MORE OS/360 LIBRARY SOURCE. ASSEMBLE USING OSMAC (505/17). COPIES FSAREA (505/4). 0 Referenced by comments of: 505/23 00505/022 *ALGOL LINTSORC SA G S1559 5.0T2 VLO FSNAME=ALGOL.LINTSORC.SA.022(1) 40 5.0T2 40 ALGOL.LINTSORC.SA.022 1 LINE 80 28 PAGE UM SALISBURY AUG. 03, 1973 22:24.23 5.0T3 497 0 LIBRARY/MTS INTERFACE MODULE. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 387/17, 505/23 00505/023 *ALGOL *ALGOLLIB OL G *ALGOLLIB 5.0T2 41 ALGOL.*ALGOLLIB.OL.023 1 SEQ 3963 11 PAGE UM SALISBURY JULY 03, 1981 14:51:58 5.0T3 498 *ALGOLLIB 0 COMPLETE LIBRARY OBJECT FILE. CONSISTS OF OBJECT OF COMPS (505/20) AND (505/21) ,THE OS/360 LIBRARY SOURCE, PLUS THE LIBRARY/MTS INTERFACE MODULE (505/22) AND AN " ENT LIBENTRY" LOADER CARD TO SPECIFY THE LIBRARY ENTRY POINT. 00505/024 *ALGOL KDFSORC S G S0504 'UBC -> UM #6' FMT=FB(3200,80) 10 5.0T2 42 ALGOL.KDFSORC.S.024 1 SEQ 80 45 PAGE UNE SALISBURY JULY 03, 1981 14:52:10 5.0T3 499 0 SOURCE FOR THE "KDF9" I/O LIBRARY. MAY BE USED BY USERS WHO ARE ACCUSTOMED TO RUNNING ALGOL PROGRAMS ON THE KDF9 COMPUTER. THE SOURCE IS ENTIRELY IN ALGOL EXCEPT FOR "FORMAT" WHICH IS ASSEMBLE LANGUAGE. 00505/025 *ALGOL *KDFLIB OL G *KDFLIB 5.0T2 43 ALGOL.*KDFLIB.OL.025 1 SEQ 348 56 PAGE UM SALISBURY JULY 03, 1981 14:52:11 5.0T3 500 *KDFLIB 0 KDF9 I/O LIBRARY AS PRODUCED BY *GENLIB (389). NOTE: THIS VERSION OF KDFLIB USES SHORT FLOATING POINT ARITHMETIC. PAR=LONG,PROCEDURE SHOULD BE USED TO RECOMPILE THE LIBRARY IF LONG FLOATING POINT ARITHMETIC IS DESIRED. 00505/026 *ALGOL KDFLIBTEST S G S1559 5.0T2 VLO FSNAME=ALGOL.KDFLIBTEST.S.026(1) 44 5.0T2 44 ALGOL.KDFLIBTEST.S.026 1 LINE 67 1 PAGE UM SALISBURY AUG. 03, 1973 22:25.28 5.0T3 501 0 ALGOL PROGRAM TO TEST *KDFLIB. 00506/001 PL1 MAINTENANCE CRELCS SA G S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.CRELCS.SA.001(1) 45 5.0T2 45 PL1_MAINTENANCE.CRELCS.SA.001 1 SEQ 80 5 PAGE UM TIFFANY APR. 05, 1980 15:30:20 5.0T3 502 0 CREATES LOW-CORE SYMBOL TABLES, ESPECIALLY PL1SYM, INTSUBS, AND INESD. REQUESTS ON GUSER THE NAME OF LCS TABLE, SUCH AS INESD. THEN REQUESTS, ON 1 SUN SEP 08/96 15:24:55 Page 260 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 SCARDS, THE COMPLETE LIST OF LOW-CORE SYMBOLS. 0 Referenced by comments of: 163/14, 506/2, 506/5, 506/6 00506/002 PL1 MAINTENANCE CRELCSPR SA G S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.CRELCSPR.SA.002(1) 46 5.0T2 46 PL1_MAINTENANCE.CRELCSPR.SA.002 1 LINE 80 6 PAGE UM TIFFANY JULY 28, 1977 01:46:04 5.0T3 503 0 SAME AS (506/1) EXCEPT FOR PSEUDO-REGISTERS. IHEPRD IS GENERATED. 0 Referenced by comments of: 233/44 00506/003A PL1 MAINTENANCE RUN SA G PL1:RUN.S 269 5.1T1 483 PL1_MAINTENANCE.RUN.SA.003 1 LINE 85 22 PAGE UM TIFFANY JULY 23, 1983 11:02:54 0 Program used to simulate the loading process with the PL/I library in user VM, rather than shared VM (for checkout). Similar to UBC's *RUN program (not distributed), but with extra feature (specified by "S2L=" keyword) for loading libraries (such as FIX, SHAREDPL1LIB, etc.) into segment 12 instead of shared VM. See the source for usage instructions. Copies *LOADINFODSECT (001/4). Requires PL1:SUBR.MAC (506/9). ******************************************************************************* D5.0A version: Completely rewritten. No longer requires the UBC macros. ******************************************************************************* 00506/004 PL1 MAINTENANCE SYMBOLS SA G S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.SYMBOLS.SA.004(1) 48 5.0T2 48 PL1_MAINTENANCE.SYMBOLS.SA.004 1 SEQ 80 5 PAGE UM TIFFANY JULY 28, 1977 01:46:12 5.0T3 505 0 PRINT PL1LIB SYMBOLS AND THEIR CURRENT ADDRESSES. 00506/005 PL1 MAINTENANCE PL1SYMBOLS D S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.PL1SYMBOL.D.005(1) 49 5.0T2 49 PL1_MAINTENANCE.PL1SYMBOL.D.005 1 LINE 117 2 PAGE UM TIFFANY JULY 28, 1977 01:46:16 5.0T3 506 0 LIST OF PL/I SYMBOL NAMES. USED BY CRELCS (506/1). 00506/006 PL1 MAINTENANCE INTSUBS D S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.INTSUBS.D.006(1) 50 5.0T2 50 PL1_MAINTENANCE.INTSUBS.D.006 1 SEQ 56 1 PAGE UM TIFFANY JULY 28, 1977 01:46:20 5.0T3 507 0 LIST OF INTERNAL SUBROUTINES. USED BY CRELCS (506/1). 00506/007 PL1 MAINTENANCE LLXU SA G LLXU W062:LOAD.S 5.0T2 51 PL1_MAINTENANCE.LLXU.SA.007 1 LINE 80 20 PAGE UM TIFFANY JULY 03, 1981 14:57:15 5.0T3 508 0 SIMULATE OS LINK/LOAD/XCTL WITH GOODIES. THIS ROUTINE DOESN'T CALL UMLOAD, LLXU, AND FRIENDS; IT HAS A SIMPLE LOADER TO SPEED UP THE COMPILER. COPIES *GDINFODSECT (594). 1 SUN SEP 08/96 15:24:55 Page 261 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 163/14 00506/008 PL1 MAINTENANCE HENPECKER SA G PL1:PECKER.S 5.0T2 52 PL1_MAINTENANCE.HENPECKER.SA.008 1 LINE 126 10 PAGE UM TIFFANY JULY 03, 1981 14:57:17 5.0T3 509 0 Program to pick up the source modules from IEHUPDTE input tape such as the PL/1 compiler. Copies *GDINFODSECT (594) and *CNFGINFODSECT (654). Assemble with PL1:SUBR.MAC (506/9) and *SYSMAC. 0 Referenced by comments of: 163/13, 813/7, 827/8 00506/009 PL1 MAINTENANCE MACRO LIB SM G PL1:SUBR.MAC 5.0T2 53 PL1_MAINTENANCE.HENPECKER.SM.009 1 LINE 72 3 PAGE UM TIFFANY JULY 03, 1981 14:57:21 5.0T3 510 0 Macro library containing various subroutine macros. 0 Referenced by comments of: 506/3, 506/8 00506/010 PL1 MAINTENANCE INSTALLATION WF S1559 5.0T2 VLO FSNAME=PL1_MAINTENANCE.INSTALLAT.WF.010(1) 54 5.0T2 54 PL1_MAINTENANCE.INSTALLAT.WF.010 1 LINE 140 18 PAGE UM TIFFANY JULY 28, 1977 01:46:32 5.0T3 511 0 INSTRUCTIONS FOR INSTALLATION OF PL/I IN MTS AND DOCUMENTATION ON OS SIMULATION PACKAGE. 00506/011 PL1 MAINTENANCE INSTALLATION WF W062:PL1INSTALL.W 5.0T2 55 PL1_MAINTENANCE.INSTALLAT.WF.011 1 LINE 134 5 PAGE UM TIFFANY JULY 03, 1981 14:57:23 5.0T3 512 0 WRITEUP INDICATING HOW TO INSTALL AND MAINTAIN THE PL/I-F COMPILER (163). 0 Referenced by comments of: 163/13 00506/012C PL1 MAINTENANCE PRINTLOG SP G W062:PRINTLOG 5.1T1 484 PL1_MAINTENANCE.PRINTLOG.SP.012 1 LINE 69 3 PAGE UM TIFFANY JULY 23, 1983 11:02:56 0 A program that prints out the contents of ETC:PL1OPTLOG (813/4). 00506/013C PL1 MAINTENANCE PRINTLOG OC G W062:PRINTLOG.O 5.1T1 485 PL1_MAINTENANCE.PRINTLOG.OC.013 1 LINE 4424 4 PAGE UM TIFFANY JULY 23, 1983 11:02:56 0 Requires *PL1OPTLIB (827/5). 00506/014C PL1 MAINTENANCE KEEPO2X SA G W062:KEEPX02(1,999) 5.1T1 486 PL1_MAINTENANCE.KEEPO2X.SA.014 1 LINE 65 1 PAGE UM TIFFANY JULY 23, 1983 11:02:57 0 Program to discard records that don't start with X'02'. 1 SUN SEP 08/96 15:24:55 Page 262 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00506/015C PL1 MAINTENANCE KEEPO2X OC G W062:KEEPX02(1000) 5.1T1 487 PL1_MAINTENANCE.KEEPO2X.OC.015 1 LINE 80 1 PAGE UM TIFFANY JULY 23, 1983 11:02:57 00507/001 TIMELIMIT *LIM C *LIM 5.0T2 56 TIMELIMIT.*LIM.C.001 1 LINE 60 1 PAGE UM WSG JULY 03, 1981 14:57:24 5.0T4 1 *LIM 0 Command file used by operators to find out how much CPU time is remaining for an executing batch job. Invoked by entering "MTS *LIM" on operator's console. 00507/002 TIMELIMIT TLIMIT PGM SA G S1559 5.0T2 VLO FSNAME=TIMELIMIT.TLIMIT_PGM.SA.002(1) 57 5.0T2 57 TIMELIMIT.TLIMIT_PGM.SA.002 1 LINE 80 5 PAGE UM WSG JAN. 13, 1977 16:30:08 5.0T4 2 0 Program to compute how much time is left before a job exceeds its global time limit. Operator enters either a job number or user ID to specify the job(s) for which the remaining time is to be calculated. End-of-file terminates program. Copies COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), and *CNFGINFODSECT (654). Source in lines 1,999. 00507/003 TIMELIMIT TLIMIT PGM OC G SYS:TLIMIT 5.0T2 58 TIMELIMIT.TLIMIT_PGM.OC.003 1 LINE 80 1 PAGE UM WSG JULY 03, 1981 14:57:25 5.0T4 3 SYS.:TLIMIT 00508/001 *BASIC STRT1 C S1559 5.0T2 VLO FSNAME=BASIC.STRT1.C.001(1) 59 5.0T2 59 BASIC.STRT1.C.001 1 LINE 70 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:22 5.0T4 4 0 MTS commands to restore files needed to generate BASIC, (508/2) through (508/18) and (508/28) and (508/29), which it assumes are on an *FS tape by themselves. 00508/002 *BASIC STRT2 C S1559 5.0T2 VLO FSNAME=BASIC.STRT2.C.002(1) 60 5.0T2 60 BASIC.STRT2.C.002 1 LINE 128 1 PAGE UM FRONCZAK APR. 05, 1980 15:30:30 5.0T4 5 0 MTS COMMANDS TO ASSEMBLE AND LINK-EDIT THE BASIC SOURCE, (508/19) THROUGH (508/27), WHICH IT ASSUMES ARE ON A REGULAR (NON-*FS) BLOCKED, LABELED TAPE. 0 Referenced by comments of: 508/1 00508/003 *BASIC BIFDSECT SA G S1559 5.0T2 VLO FSNAME=BASIC.BIFDSECT.SA.003(1) 61 5.0T2 61 BASIC.BIFDSECT.SA.003 1 LINE 66 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:26 5.0T4 6 0 THE DSECT USED BY "BUILT-IN" FUNCTIONS. 0 Referenced by comments of: 508/23 1 SUN SEP 08/96 15:24:55 Page 263 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00508/004A *BASIC CLIDSECT SA G W070:CLIDSECT 5.1T1 488 BASIC.CLIDSECT.SA.004 1 LINE 72 3 PAGE UM FRONCZAK JULY 23, 1983 11:02:57 0 THE DSECT USED BY COMMAND AND CMNDINIT. 0 Referenced by comments of: 508/19, 508/22, 508/25, 508/26 00508/005 *BASIC DS6A SA G S1559 5.0T2 VLO FSNAME=BASIC.DS6A.SA.005(1) 63 5.0T2 63 BASIC.DS6A.SA.005 1 LINE 72 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:30 5.0T4 8 0 THE DSECT USED BY LOADER. 0 Referenced by comments of: 508/22 00508/006 *BASIC DSECTCOMM SA G S1559 5.0T2 VLO FSNAME=BASIC.DSECTCOMM.SA.006(1) 64 5.0T2 64 BASIC.DSECTCOMM.SA.006 1 LINE 70 3 PAGE UM FRONCZAK JULY 28, 1977 01:48:33 5.0T4 9 0 THE BASIC COMMON DSECT. 0 Referenced by comments of: 508/19, 508/20, 508/21, 508/22, 508/23, 508/24, 508/25, 508/26, 508/27 00508/007 *BASIC DSECT9A SA G S1559 5.0T2 VLO FSNAME=BASIC.DSECT9A.SA.007(1) 65 5.0T2 65 BASIC.DSECT9A.SA.007 1 LINE 69 2 PAGE UM FRONCZAK APR. 01, 1979 22:26:50 5.0T4 10 0 THE DSECT USED BY ENCODE, DECODE, AND CIOGLTCH. 0 Referenced by comments of: 508/22 00508/008 *BASIC FHDRDSECT SA G S1559 5.0T2 VLO FSNAME=BASIC.FHDRDSECT.SA.008(1) 66 5.0T2 66 BASIC.FHDRDSECT.SA.008 1 LINE 72 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:37 5.0T4 11 0 THE "FILE HEADER" DSECT. 0 Referenced by comments of: 508/24, 508/26 00508/009 *BASIC GLOBALSYM SA G S1559 5.0T2 VLO FSNAME=BASIC.GLOBALSYM.SA.009(1) 67 5.0T2 67 BASIC.GLOBALSYM.SA.009 1 LINE 66 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:39 5.0T4 12 0 CODE TO SET "GLOBAL SETC SYMBOLS" TO ENABLE OR DISABLE THE SLT AND SWPR INSTRUCTIONS AND DEFINE THE INSTALLATION NAME. 0 Referenced by comments of: 508/19, 508/20, 508/22, 508/23, 508/25 00508/010 *BASIC INTFACMAC SM G S1559 5.0T2 VLO FSNAME=BASIC.INTFACMAC.SM.010(1) 68 5.0T2 68 BASIC.INTFACMAC.SM.010 1 LINE 58 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:41 5.0T4 13 0 BASIC MACRO LIBRARY. 1 SUN SEP 08/96 15:24:55 Page 264 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00508/011 *BASIC LDICDSCT SA G S1559 5.0T2 VLO FSNAME=BASIC.LDICDSCT.SA.011(1) 69 5.0T2 69 BASIC.LDICDSCT.SA.011 1 LINE 72 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:44 5.0T4 14 0 THE "LOADING DIRECTORY" DSECT. 0 Referenced by comments of: 508/19, 508/21 00508/012 *BASIC MAPDSECT SA G S1559 5.0T2 VLO FSNAME=BASIC.MAPDSECT.SA.012(1) 70 5.0T2 70 BASIC.MAPDSECT.SA.012 1 LINE 68 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:46 5.0T4 15 0 THE "MAP ENTRY DESCRIPTION" DSECT. 0 Referenced by comments of: 508/19, 508/21 00508/013 *BASIC OPDEFEQUS SA G S1559 5.0T2 VLO FSNAME=BASIC.OPDEFEQUS.SA.013(1) 71 5.0T2 71 BASIC.OPDEFEQUS.SA.013 1 LINE 70 2 PAGE UM FRONCZAK JULY 28, 1977 01:48:48 5.0T4 16 0 "EQUS" USED IN OPERATOR DEFINITIONS. 0 Referenced by comments of: 508/21 00508/014 *BASIC OPDEFMACROS SM G S1559 5.0T2 VLO FSNAME=BASIC.OPDEFMACROS.SM.014(1) 72 5.0T2 72 BASIC.OPDEFMACROS.SM.014 1 LINE 72 3 PAGE UM FRONCZAK JULY 28, 1977 01:48:50 5.0T4 17 0 MACRO LIBRARY TO GENERATE THE OPERATOR DEFINITIONS. 00508/015 *BASIC PDSECT SA G S1559 5.0T2 VLO FSNAME=BASIC.PDSECT.SA.015(1) 73 5.0T2 73 BASIC.PDSECT.SA.015 1 LINE 72 3 PAGE UM FRONCZAK JULY 28, 1977 01:48:52 5.0T4 18 0 THE DSECT USED BY THE LEXICAL SCAN ROUTINES (LEX----). 0 Referenced by comments of: 508/20 00508/016 *BASIC SYMTABDEF SA G S1559 5.0T2 VLO FSNAME=BASIC.SYMTABDEF.SA.016(1) 74 5.0T2 74 BASIC.SYMTABDEF.SA.016 1 LINE 33 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:55 5.0T4 19 0 THE SYMBOL TABLE DSECT (UNDOCUMENTED). 00508/017 *BASIC SYMTABSECT SA G S1559 5.0T2 VLO FSNAME=BASIC.SYMTABSECT.SA.017(1) 75 5.0T2 75 BASIC.SYMTABSECT.SA.017 1 LINE 70 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:57 5.0T4 20 0 THE SYMBOL TABLE DSECT (DOCUMENTED). 0 Referenced by comments of: 508/20, 508/21 1 SUN SEP 08/96 15:24:55 Page 265 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00508/018 *BASIC WSLAYOUT SA G S1559 5.0T2 VLO FSNAME=BASIC.WSLAYOUT.SA.018(1) 76 5.0T2 76 BASIC.WSLAYOUT.SA.018 1 LINE 68 1 PAGE UM FRONCZAK JULY 28, 1977 01:48:59 5.0T4 21 0 THE "WORKING STORAGE LAYOUT" DSECT. 0 Referenced by comments of: 508/1, 508/19, 508/22 00508/019A *BASIC CLI SA G S0358 BSCSEF POSN=*BASIC.CLI 5.1T1 489 BASIC.CLI.SA.019 1 LINE 80 129 PAGE UM FRONCZAK JULY 23, 1983 11:03:48 0 Copies (508/4), (508/6), (508/9), (508/11), (508/12), (508/18), and (508/28). 0 Referenced by comments of: 508/2 00508/020 *BASIC LEX SA G S0358 BSCSEF POSN=*BASIC.LEX 5.0T2 78 BASIC.LEX.SA.020 1 SEQ 80 108 PAGE UM FRONCZAK JULY 03, 1981 14:58:56 5.0T4 23 0 Copies (508/6), (508/9), (508/15), and (508/17). 00508/021A *BASIC CMP SA G S0358 BSCSEF POSN=*BASIC.CMP 5.1T1 490 BASIC.CMP.SA.021 1 LINE 80 108 PAGE UM FRONCZAK JULY 23, 1983 11:03:56 0 Copies (508/6), (508/11), (508/12), (508/13), and (508/17). 00508/022 *BASIC CPS SA G S0358 BSCSEF POSN=*BASIC.CPS 5.0T2 80 BASIC.CPS.SA.022 1 SEQ 80 80 PAGE UM FRONCZAK JULY 03, 1981 14:59:07 5.0T4 25 0 Copies (508/4), (508/5), (508/6), (508/7), (508/9), and (508/18). 00508/023 *BASIC NUM SA G S0358 BSCSEF POSN=*BASIC.NUM 5.0T2 81 BASIC.NUM.SA.023 1 SEQ 80 62 PAGE UM FRONCZAK JULY 03, 1981 14:59:11 5.0T4 26 0 Copies (508/3), (508/6), and (508/9). 00508/024A *BASIC VFL SA G S0358 BSCEF POSN=*BASIC.VFL 5.1T1 491 BASIC.VFL.SA.024 1 LINE 80 41 PAGE UM FRONCZAK JULY 23, 1983 11:04:02 0 Copies (508/6) and (508/8). 00508/025A *BASIC BIO SA G S0358 BSCEF POSN=*BASIC.BIO 5.1T1 492 BASIC.BIO.SA.025 1 LINE 80 51 PAGE UM FRONCZAK JULY 23, 1983 11:04:04 0 Copies (508/4), (508/6), (508/9), and (508/28). 00508/026A *BASIC INF SA G S0358 BSCEF POSN=*BASIC.INF 5.1T1 493 BASIC.INF.SA.026 1 LINE 80 52 PAGE UM FRONCZAK JULY 23, 1983 11:04:06 0 Copies (508/4), (508/6), (508/8), and (508/29). 1 SUN SEP 08/96 15:24:55 Page 266 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00508/027 *BASIC BSI SA G S0358 BSCSEF POSN=*BASIC.BSI 5.0T2 85 BASIC.BSI.SA.027 1 SEQ 80 5 PAGE UM FRONCZAK JULY 03, 1981 14:59:23 5.0T4 30 0 Copies (508/6). 0 Referenced by comments of: 508/2 00508/028 *BASIC LIBSYM SA G S1559 5.0T2 VLO FSNAME=BASIC.LIBSYM.SA.028(1) 86 5.0T2 86 BASIC.LIBSYM.SA.028 1 LINE 66 1 PAGE UM FRONCZAK JULY 28, 1977 01:50:32 5.0T4 31 0 PARAMETERIZES THE STAFF USER ID FOR BASIC LIBRARY FILES AS WELL AS THE LIBRARY PREFIX CHARACTER. 0 Referenced by comments of: 508/1, 508/19, 508/25 00508/029 *BASIC SPECIALRATES SA G S1559 5.0T2 VLO FSNAME=BASIC.SPECIALRATES.SA.029(1) 87 5.0T2 87 BASIC.SPECIALRATES.SA.029 1 LINE 70 1 PAGE UM FRONCZAK JULY 28, 1977 01:50:33 5.0T4 32 0 The disk storage charges used for the calculation of the remaining balance for: %print balance and statistics printing. 0 Referenced by comments of: 508/1, 508/26 00508/030A *BASIC *BASIC OC G *BASIC 5.1T1 494 BASIC.?BASIC.OC.030 1 SEQ 32767 28 PAGE UM FRONCZAK JULY 23, 1983 11:04:07 *BASIC 0 Object for BASIC. ******************************************************************************* D5.0B version: Moved object out of shared VM. ******************************************************************************* 00508/031A *BASIC BASICHELPC M ETC:BASICHELPC 5.1T1 495 BASIC.BASICHELPC.M.031 1 LINE 68 1 PAGE UM FRONCZAK JULY 23, 1983 11:04:08 ETC.:BASICHELPC 0 BASIC help command file. 00508/032 *BASIC SIGNONM FILE D ETC:BASICSIGNONM 5.0T2 92 BASIC.SIGNONM_FILE.D.034 1 LINE 59 1 PAGE UM FRONCZAK JULY 03, 1981 14:59:37 5.0T4 37 ETC:BASICSIGNONM 0 File containing BASIC "signon" message. 00508/033A *BASIC UPDATEFILE UC W070:UPDATEFILE 5.1T1 497 BASIC.UPDATEFILE.UC.034 1 LINE 87 9 PAGE UM FRONCZAK JULY 23, 1983 11:04:09 0 ******************************************************************************** D5.0B: 1 SUN SEP 08/96 15:24:55 Page 267 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Contains *CDUPDATE source which documents the D5.0A to D5.0B changes. ******************************************************************************** 00509/001 PERMIT COMMAND D5.0 MASTER SA G MTS:PERMIT.S 5.0T2 93 PERMIT_COMMAND..SA.001 1 LINE 80 27 PAGE UM MTS OGDEN JULY 03, 1981 14:59:38 5.0T4 38 0 This is the source for the MTS $PERMIT command and the PERMIT, SETKEY, SETFPRIV, and SETFSAVE subroutines. The PERMIT command is implemented as a CLS although it really isn't since it has no sub-commands. This was done solely for ease of isolation, checkout, and modification. Has $PERMIT CLS entry point PERCMD and subroutine entry points PERMIT, SETKEY, SETFPRIV, and SETFSAVE. Calls many of the file routines directly. Copies COPY:GLOBALS (1026/3), *CNFGINFODSECT (654), and COPY:LLMPSEQU(100) (087). Assemble using COPY:MTS.MACROS (344/3), COPY:FILE.MACROS (482/45), COPY:SETPARM (653) and COPY:MISC.MACROS (728). 0 Referenced by comments of: 529/1, 851/1 00509/002A PERMIT COMMAND UPDATE UC G MTS:PERMITUPD 5.1T1 498 PERMIT_COMMAND.UPDATE.UC.002 1 LINE 177 3 PAGE UM MTS OGDEN JULY 23, 1983 11:04:10 0 Update to produce current source, using the D5.0 source as base. **************************************************************** D5.0A changes: Changes required by mixed case commands are included. **************************************************************** **************************************************************** D5.0B changes: Changed to call CSSET. **************************************************************** 00509/003A PERMIT COMMAND *CLSPERMIT OC G *CLSPERMIT 5.1T1 499 PERMIT_COMMAND.?CLSPERMIT.OC.003 1 LINE 80 9 PAGE UM MTS OGDEN JULY 23, 1983 11:04:10 *CLSPERMIT 0 This file is normally loaded into shared VM by PISTLE, using the IPL option. The LOADER COM card defines the symbols PERCMD and SETFPRIV in LCSYMBOL. The other subroutines are named in the GATE (4000) (LCSYMBOL) and so can not be included in the COM card. 0 Referenced by comments of: 509/14 00509/004 PERMIT COMMAND *PERSUB OC G *PERSUB 5.0T2 96 PERMIT_COMMAND.*PERSUB.OC.004 1 LINE 26 1 PAGE UM MTS OGDEN JULY 03, 1981 14:59:42 5.0T4 41 *PERSUB 0 This file contains an ENT card for the symbol "PERSUB" followed by a "$CONTINUE WITH *CLSPERMIT" card. It is used as the file name in the 1 SUN SEP 08/96 15:24:55 Page 268 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 LOADT table in MTS, and is loaded from if the PERSUB subroutine is not defined in LCSYMBOL. 00509/005 PERMIT COMMAND *SKEYSUB OC G *SKEYSUB 5.0T2 97 PERMIT_COMMAND.*SKEYSUB.OC.005 1 LINE 26 1 PAGE UM MTS OGDEN JULY 03, 1981 14:59:43 5.0T4 42 *SKEYSUB 0 This file contains an ENT card for the symbol "SKEYSUB" followed by a "$CONTINUE WITH *CLSPERMIT" card. It is used as the file name in the LOADT table in MTS, and is loaded from if the SKEYSUB subroutine is not defined in LCSYMBOL. 00509/006 PERMIT COMMAND *SFSAVSUB OC G *SFSAVSUB 5.0T2 98 PERMIT_COMMAND.*SFSAVSUB.OC.006 1 LINE 26 1 PAGE UM MTS OGDEN JULY 03, 1981 14:59:44 5.0T4 43 *SFSAVSUB 0 This file contains an ENT card for the symbol "SFSSUB" followed by a "$CONTINUE WITH *CLSPERMIT" card. It is used as the file name in the LOADT table in MTS, and is loaded from if the SFSSUB subroutine is not defined in LCSYMBOL. 00509/007 PERMIT COMMAND *SPRIVSUB OC G *SPRIVSUB 5.0T2 99 PERMIT_COMMAND.*SPRIVSUB.OC.007 1 LINE 25 1 PAGE UM MTS OGDEN JULY 03, 1981 14:59:45 5.0T4 44 *SPRIVSUB 0 This file contains an ENT card for the symbol "SETFPSUB" followed by a "$CONTINUE WITH *CLSPERMIT" card. It is used as the file name in the LOADT table in MTS, and is loaded from if the SETFPSUB subroutine is not defined in LCSYMBOL. 00509/008 PERMIT COMMAND SUBR TEST PGM SF MTS:TESTPERSUB(1,999) 5.0T2 100 PERMIT_COMMAND.SUBR_TEST.SF.008 1 LINE 72 3 PAGE UM MTS OGDEN JULY 03, 1981 14:59:46 5.0T4 45 0 PROGRAM TO TEST THE PERMIT SUBROUTINE. 00509/009 PERMIT COMMAND SUBR TEST PGM SF MTS:TESTPERSUB2(1,999) 5.0T2 101 PERMIT_COMMAND.SUBR_TEST.SF.009 1 LINE 71 2 PAGE UM MTS OGDEN JULY 03, 1981 14:59:47 5.0T4 46 0 ANOTHER PROGRAM TO TEST THE PERMIT SUBROUTINE. 00509/010C PERMIT COMMAND NEW SOURCE SQ G CLS:PERMIT*SQ 5.1T1 500 PERMIT_COMMAND.NEW_SOURCE.SQ.010 1 LINE 68 7 PAGE UM BURLING JULY 23, 1983 11:04:11 0 Plus source for rewritten PERMIT CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:PERMIT*SRL (509/12), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 509/12, 509/13, 578/2 1 SUN SEP 08/96 15:24:55 Page 269 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00509/011C PERMIT COMMAND NEW GRAMMAR SR G CLS:PERMIT*SR 5.1T1 501 PERMIT_COMMAND.NEW_GRAMMA.SR.011 1 LINE 68 1 PAGE UM BURLING JULY 23, 1983 11:04:12 0 *Clparser (1076/6) grammar for rewritten $PERMIT CLS. 0 Referenced by comments of: 509/12, 509/13 00509/012C PERMIT COMMAND NEW DECLAR SQ G CLS:PERMIT*SRL 5.1T1 502 PERMIT_COMMAND.NEW_DECLAR.SQ.012 1 LINE 66 1 PAGE UM BURLING JULY 23, 1983 11:04:12 0 Declarations generated by *CLPARSEGEN (1076/1) using (509/11) as input. Used to compile (509/10). 0 Referenced by comments of: 509/10 00509/013C PERMIT COMMAND NEW OBJECT OC G *NEWCLSPERMIT 5.1T1 503 PERMIT_COMMAND.NEW_OBJECT.OC.013 1 LINE 4158 3 PAGE UM BURLING JULY 23, 1983 11:04:12 *NEWCLSPERMIT 0 Object for (509/10) and (509/11). 00509/014C PERMIT COMMAND NEW SUBR SOU SQ G CLS:PERSUB*SQ 5.1T1 504 PERMIT_COMMAND.NEW_SUBR_S.SQ.014 1 LINE 68 28 PAGE UM BURLING JULY 23, 1983 11:04:13 0 Plus source for rewrite of PERMIT subroutines (also SKEYSUB, SETFPSUB, and SETFPSUT). These are PISTLEd at UM, and used by Version(permit)=NEW, and any programs that call the PERMIT subroutine. Version(permit)=CURRENT (509/3) uses a private copy of the old PERMIT subroutines. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), COPY:SUPER*SQL (045/17), CLS CMDSERV*SQL (851/1), CLS:PERSUB*SRL (509/16), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 509/16, 509/17 00509/015C PERMIT COMMAND NEW SUBR GRAMM SR G CLS:PERSUB*SR 5.1T1 505 PERMIT_COMMAND.NEW_SUBR_G.SR.015 1 LINE 71 3 PAGE UM BURLING JULY 23, 1983 11:04:14 0 *Clparser (1076/6) grammar for PERMIT subroutines. 0 Referenced by comments of: 509/16, 509/17 00509/016C PERMIT COMMAND NEW SUBR DECL SQ G CLS:PERSUB*SRL 5.1T1 506 PERMIT_COMMAND.NEW_SUBR_D.SQ.016 1 LINE 67 1 PAGE UM BURLING JULY 23, 1983 11:04:14 0 Declarations generated by *CLPARSEGEN (1076/1) using (509/15) as input. Used to compile (509/14). 0 Referenced by comments of: 509/14 00509/017C PERMIT COMMAND NEW SUBR OBJ OC G SEG2:PERSUB 5.1T1 507 PERMIT_COMMAND.NEW_SUBR_O.OC.017 1 LINE 3550 18 PAGE UM BURLING JULY 23, 1983 11:04:14 SEG2:PERSUB 0 Object for (509/14) and (509/15). 1 SUN SEP 08/96 15:24:55 Page 270 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 578/2 00510/001 MTS VOLUME 13 (OLD) WF # (OBSOLETE) 5.0T2 102 MTS_VOLUME_13..WF.001 1 LINE 159 61 PAGE UM AUG. 01, 1973 22:10.11 5.0T4 47 0 FORMAT input for Volume 13 "Data Concentrator User's Guide" of the UM MTS Manuals, August 1973. This manual is obsolete. There is a new Volume 13, dealing with SDS. See comp (867). 0 Referenced by comments of: 867/1 00511/001A *OBJLIST SA G LBT:OBJLIST.S 273 5.1T1 508 OBJLIST..SA.001 1 LINE 72 25 PAGE UM TIFFANY JULY 23, 1983 11:04:15 0 PROGRAM TO DUMP MTS OBJECT DECKS IN A NICE FORMAT. READS *ASMH (737) SYM RECORDS. 00511/002A *OBJLIST OE G *OBJLIST 5.1T1 509 OBJLIST..OE.002 1 SEQ 7031 4 PAGE UM TIFFANY JULY 23, 1983 11:04:17 *OBJLIST 00512/001A MTS VOLUME 11 MASTER WT S0549 MTSV11 'MTS MANUALS' POSN=NEWM4.V11 5.1T1 510 MTS_VOLUME_11.MASTER.WT.001 1 LINE 132 85 PAGE UM MANUAL JULY 23, 1983 11:05:29 0 TEXT/360 master for Volume 11 "Plot Description System" of the UM MTS manuals, August 1978, updated April 1980, and Sept. 1982. Editor: Gail H. Lift 00512/002A MTS VOLUME 11 PRINT PT S0549 MTSV11 'MTS MANUALS' POSN=PRINT4.V11 5.1T1 511 MTS_VOLUME_11.PRINT.PT.002 1 LINE 132 174 PAGE UM MANUAL JULY 23, 1983 11:05:36 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 00512/003A MTS VOLUME 11 FIGURES SG G S0549 MTSV11 'MTS MANUALS' POSN=V11FIGS.MAIN.3 5.1T1 512 MTS_VOLUME_11.FIGURES.SG.003 1 LINE 80 3 PAGE UM MANUAL JULY 23, 1983 11:05:45 0 GOM SOURCE FOR MAIN PROGRAM TO CALL SUBROUTINES WHICH GENERATE FIGURES FOR VOLUME 11. 00512/004A MTS VOLUME 11 FIGURES SF G S0549 MTSV11 'MTS MANUALS' POSN=V11FIGS.SUBR.3 5.1T1 513 MTS_VOLUME_11.FIGURES.SF.004 1 LINE 150 40 PAGE UM MANUAL JULY 23, 1983 11:05:47 0 FORTRAN SOURCE FOR SUBROUTINES WHICH GENERATE FIGURES FOR VOLUME 11. 00512/005A MTS VOLUME 11 INDEX SOURCE D S0549 MTSV11 'MTS MANUALS' POSN=V11INDEXSOU 5.1T1 514 MTS_VOLUME_11.INDEX_SOURC.D.005 1 LINE 37 3 PAGE UM MANUAL JULY 23, 1983 11:06:25 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 11. 1 SUN SEP 08/96 15:24:55 Page 271 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00512/006 MTS VOLUME 11 UPDATE 1 P S1559 5.0T2 VLO FSNAME=MTS_VOLUME_11.UPDATE_1.PT.006(1) 111 5.0T2 111 MTS_VOLUME_11.UPDATE_1.PT.006 1 LINE 103 19 PAGE UM MANUAL APR. 05, 1980 15:34:35 5.0T4 56 0 THIS IS "UPDATE 1 TO MTS VOLUME 11," APRIL 1980. $COPY TO A TN PRINTER USING THE @MCC MODIFIER. 00512/007C MTS VOLUME 11 UPDATE 2 P W073:TNLV11.SEP82 5.1T1 515 MTS_VOLUME_11.UPDATE_2.P.007 1 LINE 79 27 PAGE UM MANUAL JULY 23, 1983 11:06:25 0 This is "Update 2 to MTS Volume 11," Sept. 1982. 00513/001 DYSSUB D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=DYS 5.0T4 329 DYSSUB.D5.0_MASTER.SA.001 1 LINE 80 21 PAGE UM MTS BURLING AUG. 09, 1981 23:04:54 5.0T10 233 0 Subroutine to process some $DISPLAY parameters. Copies COPY:LLMPSEQU(100) (087), COPY:GLOBALS (1026/3), *GDINFODSECT (594), *SENSEDSECT (3025), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3), COPY:SETPARM (653/1) and COPY:CC.MACROS (1054/3). 0 Referenced by comments of: 42/2 00513/002A DYSSUB UPDATE UC G MTSS:DYS/UPD 5.1T1 516 DYSSUB.UPDATE.UC.002 1 LINE 75 12 PAGE UM MTS BURLING JULY 23, 1983 11:06:28 0 *CDUPDATE input to produce current source. 00513/003A DYSSUB OC G # (PART OF RESIDENT SYSTEM) 4.2CT1 117 DYSSUB..OC.003 1 LINE 80 3 PAGE UM MTS BURLING NOV. 27, 1979 23:12:48 0 NEW VERSIONS CAN BE LOADED INTO SHARED VM USING PISTLE (559), EVEN THOUGH DYSSUB IS INITIALLY LOADED AS PART OF THE RESIDENT SYSTEM. Object part of Resident System (468). 00513/004A DYSSUB L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=DYS.LIST 5.1T1 517 DYSSUB..L.004 1 LINE 133 89 PAGE UM MTS BURLING JULY 23, 1983 11:07:07 00513/005A DYSSUB COMMENTS D G MTSS:DYS/COM 5.1T1 518 DYSSUB.COMMENTS.D.005 1 LINE 68 1 PAGE UM MTS BURLING JULY 23, 1983 11:07:08 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00514/001 *PL1TIDY SP G W062:NEATENED 5.0T2 112 PL1TIDY..SP.001 1 LINE 72 18 PAGE UM TIFFANY JULY 03, 1981 15:00:19 5.0T4 57 0 THIS IS A REVISED VERSION OF THE IBM "NEATER" PROGRAM. NOTE: AFTER COMPILATION, THE SYMBOL IHESAPC IN THE OBJECT MUST BE CHANGED TO IHESAPE. 1 SUN SEP 08/96 15:24:55 Page 272 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00514/002 *PL1TIDY OE G OLD:PL1TIDY 5.0T2 113 PL1TIDY..OE.002 1 SEQ 25530 9 PAGE UM TIFFANY JULY 03, 1981 15:00:21 5.0T4 58 *PL1TIDY 0 ENDS WITH A "$CONTINUE WITH *PL1LIB" CARD. 00514/003A *PL1TIDY PL/I OPT VERS SP G PL1:PL1TIDY.S 5.1T1 519 PL1TIDY.PL/I_OPT_VERS.SP.003 1 LINE 75 25 PAGE UM TIFFANY JULY 23, 1983 11:07:09 0 PL/I Optimizer version of PL/I tidying program. 00514/004A *PL1TIDY PL/I OPT VERS OC G *PL1TIDY 5.1T1 520 PL1TIDY.PL/I_OPT_VERS.OC.004 1 LINE 32767 16 PAGE UM TIFFANY JULY 23, 1983 11:07:11 0 Requires *PL1OPTLIB (827). 00515/001 *11ASR INSTAL C S1559 5.0T2 VLO FSNAME=11ASR.INSTAL.C.001(1) 114 5.0T2 114 11ASR.INSTAL.C.001 1 LINE 125 1 PAGE UM EADIE JULY 03, 1981 15:00:22 5.0T4 59 0 MTS commands to assemble and link edit all the csects for the PDP-11 assembler. Assemble using (515/2), *SYSMAC and COPY:MISC.MACROS (728). 0 Referenced by comments of: 516/1, 660/15, 686/32, 686/43, 755/1, 755/3, 861/4, 861/5 00515/002 *11ASR MACLIB SM G S1559 5.0T2 VLO FSNAME=11ASR.MACLIB.SM.002(1) 115 5.0T2 115 11ASR.MACLIB.SM.002 1 LINE 64 4 PAGE UM EADIE APR. 05, 1980 15:34:51 5.0T4 60 0 MACRO LIBRARY USED TO ASSEMBLE COMPS (515/3) THROUGH (515/7). 0 Referenced by comments of: 515/1, 515/3 00515/003 *11ASR KERNEL SA G S1559 5.0T2 VLO FSNAME=11ASR.KERNEL.SA.003(1) 116 5.0T2 116 11ASR.KERNEL.SA.003 1 LINE 86 105 PAGE UM EADIE JULY 03, 1981 15:00:26 5.0T4 61 0 Copies SITECODE from the 11ASR macro library (515/2). 0 Referenced by comments of: 515/2, 515/11 00515/004 *11ASR DCEVAL SA G S1559 5.0T2 VLO FSNAME=11ASR.DCEVAL.SA.004(1) 117 5.0T2 117 11ASR.DCEVAL.SA.004 1 LINE 80 18 PAGE UM EADIE APR. 05, 1980 15:35:07 5.0T4 62 00515/005 *11ASR REPSCN SA G S1559 5.0T2 VLO FSNAME=11ASR.REPSCN.SA.005(1) 118 5.0T2 118 11ASR.REPSCN.SA.005 1 LINE 80 5 PAGE UM EADIE APR. 05, 1980 15:35:10 5.0T4 63 00515/006 *11ASR MACPRO SA G S1559 5.0T2 VLO FSNAME=11ASR.MACPRO.SA.006(1) 119 5.0T2 119 11ASR.MACPRO.SA.006 1 LINE 70 38 PAGE UM EADIE APR. 05, 1980 15:35:12 5.0T4 64 1 SUN SEP 08/96 15:24:55 Page 273 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00515/007 *11ASR EXTF11 SA G S1559 5.0T2 VLO FSNAME=11ASR.EXTF11.SA.007(1) 120 5.0T2 120 11ASR.EXTF11.SA.007 1 LINE 72 7 PAGE UM EADIE APR. 05, 1980 15:35:23 5.0T4 65 0 Referenced by comments of: 515/2 00515/008 *11ASR OPCODE SA G S1559 5.0T2 VLO FSNAME=11ASR.OPCODE.SA.008(1) 121 5.0T2 121 11ASR.OPCODE.SA.008 1 LINE 72 15 PAGE UM EADIE APR. 05, 1980 15:35:26 5.0T4 66 00515/009 *11ASR MICROP SA G S1559 5.0T2 VLO FSNAME=11ASR.MICROP.SA.009(1) 122 5.0T2 122 11ASR.MICROP.SA.009 1 LINE 72 6 PAGE UM EADIE APR. 05, 1980 15:35:28 5.0T4 67 00515/010 *11ASR OBJECT OE G *11ASR 5.0T2 123 11ASR.OBJECT.OE.010 1 SEQ 13512 39 PAGE UM EADIE JULY 03, 1981 15:00:43 5.0T4 68 *11ASR 00515/011A *11ASR 11ASRERROR M G ETC:11ASRERROR 5.1T1 521 11ASR.11ASRERROR.M.011 1 LINE 70 4 PAGE UM EADIE JULY 23, 1983 11:07:12 ETC.:11ASRERROR 0 ERROR COMMENT FILE REFERENCED BY 11ASR KERNAL (515/3) ON LINE 7455. 00515/012 *11ASR MEMO 286 WT S1559 5.0T2 VLO FSNAME=11ASR.MEMO_286.WT.012(1) 125 5.0T2 125 11ASR.MEMO_286.WT.012 1 LINE 80 49 PAGE UM EADIE JAN. 26, 1977 20:17:02 5.0T4 70 0 THIS IS COMPUTING CENTER MEMO 286 -- "THE PDP-11 ASSEMBLER AND LINK EDITOR: A USER'S GUIDE TO *11ASR AND *LINK11" 0 Referenced by comments of: 516/3 00516/001A *LINK11 SA G W267:LINK11(1000) 5.1T1 522 LINK11..SA.001 1 LINE 80 57 PAGE UM EADIE JULY 23, 1983 11:07:12 0 Link editor for the PDP-11 assemblers *11ASR (515), MICRO-CROSS ASSEMBLERs (686), and PLUS11 (1050). ----(D5.0A)---------------------------------------------------------- This version of the link editor has some improvements: 1) GUSER is reset to *MSOURCE* after an attention. ******************************************************************* D5.1 version: This version has some changes and improvements: 1) DIR record processing 2) variable length hex input on commands 1 SUN SEP 08/96 15:24:55 Page 274 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 3) processing of TXT records with odd starting addresses and/or odd lengths ******************************************************************** 0 Referenced by comments of: 660/1, 715/2, 715/3 00516/002A *LINK11 OE G *LINK11 5.1T1 523 LINK11..OE.002 1 SEQ 13690 9 PAGE UM EADIE JULY 23, 1983 11:07:16 *LINK11 0 Referenced by comments of: 1050/1 00516/003A *LINK11 USER'S GUIDE WT # (PART OF *11ASR) UM EADIE 0 See Memo 286 (515/12) 00517/001 LOGICAL OPERATORS SA G S1559 5.0T2 VLO FSNAME=LOGICAL_OPERATORS..SA.001(1) 128 5.0T2 128 LOGICAL_OPERATORS..SA.001 1 LINE 70 4 PAGE UM HARDING JULY 28, 1977 01:59:54 5.0T4 73 0 SUBROUTINES TO PROVIDE THE FOLLOWING SYSTEM/360 MACHINE OPERATIONS: MVC, CLC, NC, OC, XC, TR, TRT, ED, AND EDMK. 00517/002 LOGICAL OPERATORS OC G # (PART OF *LIBRARY) UM HARDING 0 Object part of *LIBRARY (524/1) 00518/001 GRGJUL SUBRS SA G S1559 5.0T2 VLO FSNAME=GRGJUL_SUBRS..SA.001(1) 129 5.0T2 129 GRGJUL_SUBRS..SA.001 1 LINE 80 5 PAGE UM ENGLE DEC. 05, 1975 16:10:51 5.0T4 74 0 GREGORIAN TO JULIAN DATE/TIME CONVERSION SUBROUTINES (GRGJULDT, GRGJULTM, AND GRJLSEC). 0 Referenced by comments of: 436/1, 529/1 00518/002 GRGJUL SUBRS OC G # (PART OF JULGRG SUBRS) UM ENGLE 0 Part of JULGRG subroutines object (522/2). 00519/001 GRJLDT/GRJLTM SUBRS GRJLDT SA G S1559 5.0T2 VLO FSNAME=GRJLDT/GRJLTM_SUBRS.GRJLD.SA.001(1) 130 5.0T2 130 GRJLDT/GRJLTM_SUBRS.GRJLD.SA.001 1 LINE 80 1 PAGE UM ENGLE JAN. 20, 1978 13:32:33 5.0T4 75 0 GREGORIAN-TO-JULIAN CONVERSION SUBROUTINES (TWO OF MANY -- TOO MANY). 00519/002 GRJLDT/GRJLTM SUBRS GRJLDT OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 1 SUN SEP 08/96 15:24:55 Page 275 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00519/003 GRJLDT/GRJLTM SUBRS GRJLTM SA G S1559 5.0T2 VLO FSNAME=GRJLDT/GRJLTM_SUBRS.GRJLT.SA.003(1) 131 5.0T2 131 GRJLDT/GRJLTM_SUBRS.GRJLT.SA.003 1 LINE 80 1 PAGE UM ENGLE JAN. 20, 1978 13:33:56 5.0T4 76 00519/004 GRJLDT/GRJLTM SUBRS GRJLTM OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 00520/001 GROSDT SA G S1559 5.0T2 VLO FSNAME=GROSDT..SA.001(1) 132 5.0T2 132 GROSDT..SA.001 1 LINE 80 2 PAGE UM ENGLE JAN. 20, 1978 13:36:51 5.0T4 77 0 GREGORIAN TO OS/360 (YYDDD) DATE CONVERSION SUBROUTINE. 00520/002 GROSDT OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 00521/001 JLGRDT/JLGRTM JLGRDT SA G S1559 5.0T2 VLO FSNAME=JLGRDT/JLGRTM.JLGRDT.SA.001(1) 133 5.0T2 133 JLGRDT/JLGRTM.JLGRDT.SA.001 1 LINE 80 1 PAGE UM ENGLE OCT. 03, 1972 11:55.50 5.0T4 78 0 JULIAN-TO-GREGORIAN CONVERSION SUBROUTINES. 00521/002 JLGRDT/JLGRTM JLGRDT OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 00521/003 JLGRDT/JLGRTM JLGRTM SA G S1559 5.0T2 VLO FSNAME=JLGRDT/JLGRTM.JLGRTM.SA.003(1) 134 5.0T2 134 JLGRDT/JLGRTM.JLGRTM.SA.003 1 LINE 80 1 PAGE UM ENGLE OCT. 03, 1972 11:57.15 5.0T4 79 00521/004 JLGRDT/JLGRTM JLGRTM OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 00522/001 JULGRG SUBRS SA G S1559 5.0T2 VLO FSNAME=JULGRG_SUBRS..SA.001(1) 135 5.0T2 135 JULGRG_SUBRS..SA.001 1 LINE 80 5 PAGE UM ENGLE MAY 03, 1973 10:00.10 5.0T4 80 0 JULIAN TO GREGORIAN DATE/TIME CONVERSION SUBROUTINES (JULGRGDT, JULGRGTM, AND JLGRSEC). 0 Referenced by comments of: 67/27, 437/1, 529/1 00522/002 JULGRG SUBRS OC G SEG2:CFE 5.0T2 136 JULGRG_SUBRS..OC.002 1 LINE 80 1 PAGE UM ENGLE JULY 03, 1981 15:01:05 5.0T4 81 SEG2:CFE 0 THE OBJECT FOR THESE RE-ENTRANT SUBROUTINES IS LOADED IN SHARED VM FROM THE FILE "SEG2:REWIND#&CFE" BY PISTLE AT IPL. 1 SUN SEP 08/96 15:24:55 Page 276 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 518/2 00523/001 OSGRDT SA G S1559 5.0T2 VLO FSNAME=OSGRDT..SA.001(1) 137 5.0T2 137 OSGRDT..SA.001 1 LINE 80 2 PAGE UM ENGLE JAN. 20, 1978 13:38:52 5.0T4 82 0 OS/360 (YYDDD) TO GREGORIAN DATE CONVERSION SUBROUTINE. 00523/002 OSGRDT OC G # (PART OF *LIBRARY) UM ENGLE 0 Object part of *LIBRARY (524/1) 00524/001A *LIBRARY OL *LIBRARY 5.1T1 524 LIBRARY..OL.001 1 LINE 32767 86 PAGE UM SALISBURY JULY 23, 1983 11:07:17 *LIBRARY 0 OBJECT LIBRARY FOR SYSTEM NON-RESIDENT SUBROUTINES. THE SOURCE FILES FOR THE PROGRAMS CONTAINED IN THIS LIBRARY ARE GIVEN ELSEWHERE IN THIS DISTRIBUTION UNDER THE SPECIFIC SUBROUTINE NAME. THIS LIBRARY IS AUTOMATICALLY SEARCHED WHEN PROGRAMS ARE LOADED IF THERE ARE UNRESOLVED SYMBOLS. 0 Referenced by comments of: 120/2, 223/2, 273/2, 275/2, 278/2, 278/4, 282/3, 283/2, 285/2, 287/2, 357/3, 389/2, 436/2, 436/4, 437/2, 437/4, 437/6, 487/5, 517/2, 519/2, 519/4, 520/2, 521/2, 521/4, 523/2, 528/60, 563/12, 606/2, 607/2, 612/2, 626/2, 627/2, 659/19, 659/28, 659/30, 659/32, 666/3, 687/2, 709/2, 744/1, 744/6, 773/1, 798/4, 800/2, 800/4, 801/2, 1005/4 00524/002A *LIBRARY CREATELIB C LIB:CREATELIB 5.1T1 525 LIBRARY.CREATELIB.C.002 1 LINE 55 1 PAGE UM SALISBURY JULY 23, 1983 11:07:20 0 MTS command file to construct a new library file; it copies the individual modules into a file, link edits the file, and then run *GENLIB. NOTE: This command file has many "$CONTINUE WITH" lines for private files (not distributed) which constitute the components of *LIBRARY. 0 Referenced by comments of: 524/3 00524/003 *LIBRARY ENTERLIB C LIB:ENTERLIB 5.0T2 140 LIBRARY.ENTERLIB.C.003 1 LINE 37 1 PAGE UM SALISBURY JULY 03, 1981 15:01:11 5.0T4 85 0 MTS COMMAND FILE TO ENTER THE NEW LIBRARY FILE CONSTRUCTED BY CREATELIB (524/2) INTO *LIBRARY. WITH RSF, THIS CAN BE DONE DURING NORMAL SYSTEM OPERATION. 00524/004 *LIBRARY WF S0592 SFILES FSNAME=MOD.LIB 5.0T2 141 LIBRARY..WF.004 1 LINE 68 3 PAGE UM SALISBURY DEC. 03, 1980 16:01:50 5.0T4 86 00525/001 ELEM FUNC LIB SQRT SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.SQRT.SA.001(1) 142 5.0T2 142 ELEM_FUNC_LIB.SQRT.SA.001 1 LINE 70 1 DISK UM HARDING JUNE 27, 1972 12:02.02 5.0T4 87 0 THE ELEMENTARY FUNCTION LIBRARY CONTAINS THE MATHEMATICAL AND IMPLICITLY CALLED SUBROUTINES USUALLY ASSOCIATED WITH THE FORTRAN IV LANGUAGE AS WELL AS 1 SUN SEP 08/96 15:24:55 Page 277 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 A FEW ADDITIONAL FUNCTIONS WHICH, INEXPLICABLY, ARE NOT PART OF THE IBM FORTRAN LIBRARY. THESE FUNCTIONS ARE ALL RE-ENTRANT AND, THEREFORE, ARE NORMALLY LOADED INTO SHARED VM. COMPS (525/1) THROUGH (525/46) SHOULD BE ASSEMBLED USING EFL.MACLIB (525/47). 0 Referenced by comments of: 525/1, 525/47, 527/1, 528/53, 1000/32 00525/002 ELEM FUNC LIB EXP SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.EXP.SA.002(1) 143 5.0T2 143 ELEM_FUNC_LIB.EXP.SA.002 1 LINE 71 3 PAGE UM HARDING SEP. 24, 1974 09:04.04 5.0T4 88 00525/003 ELEM FUNC LIB ALOG10/ALOG SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ALOG10/ALOG.SA.003(1) 144 5.0T2 144 ELEM_FUNC_LIB.ALOG10/ALOG.SA.003 1 LINE 71 2 DISK UM HARDING JUNE 27, 1972 12:02.13 5.0T4 89 00525/004 ELEM FUNC LIB COS/SIN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.COS/SIN.SA.004(1) 145 5.0T2 145 ELEM_FUNC_LIB.COS/SIN.SA.004 1 LINE 71 2 DISK UM HARDING JUNE 27, 1972 12:02.18 5.0T4 90 00525/005 ELEM FUNC LIB COTAN/TAN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.COTAN/TAN.SA.005(1) 146 5.0T2 146 ELEM_FUNC_LIB.COTAN/TAN.SA.005 1 LINE 71 2 DISK UM HARDING JUNE 27, 1972 12:02.23 5.0T4 91 00525/006 ELEM FUNC LIB ARCOS/ARSIN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ARCOS/ARSIN.SA.006(1) 147 5.0T2 147 ELEM_FUNC_LIB.ARCOS/ARSIN.SA.006 1 LINE 69 2 DISK UM HARDING JUNE 27, 1972 12:02.28 5.0T4 92 00525/007 ELEM FUNC LIB ATAN2/ATAN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ATAN2/ATAN.SA.007(1) 148 5.0T2 148 ELEM_FUNC_LIB.ATAN2/ATAN.SA.007 1 LINE 70 2 DISK UM HARDING JUNE 27, 1972 12:02.33 5.0T4 93 00525/008 ELEM FUNC LIB COSH/SINH SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.COSH/SINH.SA.008(1) 149 5.0T2 149 ELEM_FUNC_LIB.COSH/SINH.SA.008 1 LINE 71 1 DISK UM HARDING JUNE 27, 1972 12:02.38 5.0T4 94 00525/009 ELEM FUNC LIB TANH SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.TANH.SA.009(1) 150 5.0T2 150 ELEM_FUNC_LIB.TANH.SA.009 1 LINE 68 1 DISK UM HARDING JUNE 27, 1972 12:02.42 5.0T4 95 00525/010 ELEM FUNC LIB ERFC/ERF SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ERFC/ERF.SA.010(1) 151 5.0T2 151 ELEM_FUNC_LIB.ERFC/ERF.SA.010 1 LINE 71 2 DISK UM HARDING JUNE 27, 1972 12:02.46 5.0T4 96 00525/011 ELEM FUNC LIB ALGAMA/GAMMA SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ALGAMA/GAMM.SA.011(1) 152 5.0T2 152 ELEM_FUNC_LIB.ALGAMA/GAMM.SA.011 1 LINE 69 2 DISK UM HARDING JUNE 27, 1972 12:02.51 5.0T4 97 00525/012 ELEM FUNC LIB DSQRT SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DSQRT.SA.012(1) 153 5.0T2 153 ELEM_FUNC_LIB.DSQRT.SA.012 1 LINE 68 1 DISK UM HARDING JUNE 27, 1972 12:02.56 5.0T4 98 1 SUN SEP 08/96 15:24:55 Page 278 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00525/013 ELEM FUNC LIB DEXP SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DEXP.SA.013(1) 154 5.0T2 154 ELEM_FUNC_LIB.DEXP.SA.013 1 LINE 70 2 DISK UM HARDING JUNE 27, 1972 12:03.00 5.0T4 99 00525/014 ELEM FUNC LIB DLOG10/DLOG SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DLOG10/DLOG.SA.014(1) 155 5.0T2 155 ELEM_FUNC_LIB.DLOG10/DLOG.SA.014 1 LINE 67 2 DISK UM HARDING JUNE 27, 1972 12:03.05 5.0T4 100 00525/015 ELEM FUNC LIB DCOS/DSIN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DCOS/DSIN.SA.015(1) 156 5.0T2 156 ELEM_FUNC_LIB.DCOS/DSIN.SA.015 1 LINE 69 2 DISK UM HARDING JUNE 27, 1972 12:03.11 5.0T4 101 00525/016 ELEM FUNC LIB DCOTAN/DTAN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DCOTAN/DTAN.SA.016(1) 157 5.0T2 157 ELEM_FUNC_LIB.DCOTAN/DTAN.SA.016 1 LINE 71 2 DISK UM HARDING JUNE 27, 1972 12:03.15 5.0T4 102 00525/017 ELEM FUNC LIB DARCOS/DARSIN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DARCOS/DARS.SA.017(1) 158 5.0T2 158 ELEM_FUNC_LIB.DARCOS/DARS.SA.017 1 LINE 69 2 DISK UM HARDING JUNE 27, 1972 12:03.20 5.0T4 103 00525/018 ELEM FUNC LIB DATAN2/DATAN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DATAN2/DATA.SA.018(1) 159 5.0T2 159 ELEM_FUNC_LIB.DATAN2/DATA.SA.018 1 LINE 70 2 DISK UM HARDING FEB. 16, 1973 09:37.48 5.0T4 104 00525/019 ELEM FUNC LIB DCOSH/DSINH SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DCOSH/DSINH.SA.019(1) 160 5.0T2 160 ELEM_FUNC_LIB.DCOSH/DSINH.SA.019 1 LINE 68 2 DISK UM HARDING JUNE 27, 1972 12:03.32 5.0T4 105 00525/020 ELEM FUNC LIB DTANH SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DTANH.SA.020(1) 161 5.0T2 161 ELEM_FUNC_LIB.DTANH.SA.020 1 LINE 68 1 DISK UM HARDING JUNE 27, 1972 12:03.36 5.0T4 106 00525/021 ELEM FUNC LIB DERFC/DERF SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DERFC/DERF.SA.021(1) 162 5.0T2 162 ELEM_FUNC_LIB.DERFC/DERF.SA.021 1 LINE 72 2 DISK UM HARDING JUNE 27, 1972 12:03.39 5.0T4 107 00525/022 ELEM FUNC LIB DLGAMA/DGAMMA SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DLGAMA/DGAM.SA.022(1) 163 5.0T2 163 ELEM_FUNC_LIB.DLGAMA/DGAM.SA.022 1 LINE 70 2 DISK UM HARDING JUNE 27, 1972 12:03.42 5.0T4 108 00525/023 ELEM FUNC LIB CABS SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CABS.SA.023(1) 164 5.0T2 164 ELEM_FUNC_LIB.CABS.SA.023 1 LINE 66 1 DISK UM HARDING JUNE 27, 1972 12:03.46 5.0T4 109 00525/024 ELEM FUNC LIB CSQRT SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CSQRT.SA.024(1) 165 5.0T2 165 ELEM_FUNC_LIB.CSQRT.SA.024 1 LINE 67 2 DISK UM HARDING JUNE 27, 1972 12:03.50 5.0T4 110 00525/025 ELEM FUNC LIB CEXP SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CEXP.SA.025(1) 166 5.0T2 166 ELEM_FUNC_LIB.CEXP.SA.025 1 LINE 68 1 DISK UM HARDING JUNE 27, 1972 12:03.54 5.0T4 111 1 SUN SEP 08/96 15:24:55 Page 279 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00525/026 ELEM FUNC LIB CLOG SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CLOG.SA.026(1) 167 5.0T2 167 ELEM_FUNC_LIB.CLOG.SA.026 1 LINE 69 2 DISK UM HARDING JUNE 27, 1972 12:03.57 5.0T4 112 00525/027 ELEM FUNC LIB CCOS/CSIN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CCOS/CSIN.SA.027(1) 168 5.0T2 168 ELEM_FUNC_LIB.CCOS/CSIN.SA.027 1 LINE 69 2 PAGE UM HARDING JULY 27, 1973 12:18.03 5.0T4 113 00525/028 ELEM FUNC LIB CDABS SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDABS.SA.028(1) 169 5.0T2 169 ELEM_FUNC_LIB.CDABS.SA.028 1 LINE 69 1 DISK UM HARDING JUNE 27, 1972 12:04.04 5.0T4 114 00525/029 ELEM FUNC LIB CDSQRT SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDSQRT.SA.029(1) 170 5.0T2 170 ELEM_FUNC_LIB.CDSQRT.SA.029 1 LINE 71 2 DISK UM HARDING JUNE 27, 1972 12:04.08 5.0T4 115 00525/030 ELEM FUNC LIB CDEXP SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDEXP.SA.030(1) 171 5.0T2 171 ELEM_FUNC_LIB.CDEXP.SA.030 1 LINE 70 1 DISK UM HARDING JUNE 27, 1972 12:04.12 5.0T4 116 00525/031 ELEM FUNC LIB CDLOG SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDLOG.SA.031(1) 172 5.0T2 172 ELEM_FUNC_LIB.CDLOG.SA.031 1 LINE 69 2 DISK UM HARDING JUNE 27, 1972 12:04.16 5.0T4 117 00525/032 ELEM FUNC LIB CDCOS/CDSIN SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDCOS/CDSIN.SA.032(1) 173 5.0T2 173 ELEM_FUNC_LIB.CDCOS/CDSIN.SA.032 1 LINE 63 2 DISK UM HARDING JUNE 27, 1972 12:04.19 5.0T4 118 00525/033 ELEM FUNC LIB FIXPI# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FIXPI#.SA.033(1) 174 5.0T2 174 ELEM_FUNC_LIB.FIXPI#.SA.033 1 LINE 70 1 DISK UM HARDING JUNE 27, 1972 12:04.23 5.0T4 119 00525/034 ELEM FUNC LIB FRXPI# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FRXPI#.SA.034(1) 175 5.0T2 175 ELEM_FUNC_LIB.FRXPI#.SA.034 1 LINE 66 1 DISK UM HARDING JUNE 27, 1972 12:04.25 5.0T4 120 00525/035 ELEM FUNC LIB FDXPI# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FDXPI#.SA.035(1) 176 5.0T2 176 ELEM_FUNC_LIB.FDXPI#.SA.035 1 LINE 68 1 DISK UM HARDING JUNE 27, 1972 12:04.28 5.0T4 121 00525/036 ELEM FUNC LIB FCXPI# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FCXPI#.SA.036(1) 177 5.0T2 177 ELEM_FUNC_LIB.FCXPI#.SA.036 1 LINE 67 1 DISK UM HARDING JUNE 27, 1972 12:04.31 5.0T4 122 00525/037 ELEM FUNC LIB FCDXI# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FCDXI#.SA.037(1) 178 5.0T2 178 ELEM_FUNC_LIB.FCDXI#.SA.037 1 LINE 71 1 DISK UM HARDING JUNE 27, 1972 12:04.34 5.0T4 123 00525/038 ELEM FUNC LIB FRXPR# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FRXPR#.SA.038(1) 179 5.0T2 179 ELEM_FUNC_LIB.FRXPR#.SA.038 1 LINE 66 1 DISK UM HARDING JUNE 27, 1972 12:04.37 5.0T4 124 1 SUN SEP 08/96 15:24:55 Page 280 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00525/039 ELEM FUNC LIB FDXPD# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.FDXPD#.SA.039(1) 180 5.0T2 180 ELEM_FUNC_LIB.FDXPD#.SA.039 1 LINE 67 1 DISK UM HARDING JUNE 27, 1972 12:04.43 5.0T4 125 00525/040 ELEM FUNC LIB CMPY# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CMPY#.SA.040(1) 181 5.0T2 181 ELEM_FUNC_LIB.CMPY#.SA.040 1 LINE 61 1 DISK UM HARDING JUNE 27, 1972 12:04.46 5.0T4 126 00525/041 ELEM FUNC LIB CDVD# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDVD#.SA.041(1) 182 5.0T2 182 ELEM_FUNC_LIB.CDVD#.SA.041 1 LINE 67 1 PAGE UM HARDING APR. 05, 1980 15:35:49 5.0T4 127 00525/042 ELEM FUNC LIB CDMPY# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDMPY#.SA.042(1) 183 5.0T2 183 ELEM_FUNC_LIB.CDMPY#.SA.042 1 LINE 61 1 DISK UM HARDING JUNE 27, 1972 12:04.54 5.0T4 128 00525/043 ELEM FUNC LIB CDDVD# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.CDDVD#.SA.043(1) 184 5.0T2 184 ELEM_FUNC_LIB.CDDVD#.SA.043 1 LINE 67 1 PAGE UM HARDING APR. 05, 1980 15:35:51 5.0T4 129 00525/044 ELEM FUNC LIB DREAL SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DREAL.SA.044(1) 185 5.0T2 185 ELEM_FUNC_LIB.DREAL.SA.044 1 LINE 58 1 DISK UM HARDING JUNE 27, 1972 12:05.00 5.0T4 130 00525/045 ELEM FUNC LIB DIMAG SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.DIMAG.SA.045(1) 186 5.0T2 186 ELEM_FUNC_LIB.DIMAG.SA.045 1 LINE 58 1 DISK UM HARDING JUNE 27, 1972 12:05.02 5.0T4 131 00525/046 ELEM FUNC LIB MINMAX SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.MINMAX.SA.046(1) 187 5.0T2 187 ELEM_FUNC_LIB.MINMAX.SA.046 1 LINE 65 2 DISK UM HARDING JUNE 27, 1972 12:05.05 5.0T4 132 0 Referenced by comments of: 525/1, 525/47 00525/047 ELEM FUNC LIB EFL.MACLIB SM G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.EFL.MACLIB.SM.047(1) 188 5.0T2 188 ELEM_FUNC_LIB.EFL.MACLIB.SM.047 1 LINE 65 1 DISK UM HARDING JUNE 27, 1972 12:05.10 5.0T4 133 0 EFL MACRO LIBRARY REQUIRED FOR ASSEMBLING COMPS (525/1) THROUGH (525/46). 0 Referenced by comments of: 525/1 00525/048 ELEM FUNC LIB ERRMON# SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB.ERRMON#.SA.048(1) 189 5.0T2 189 ELEM_FUNC_LIB.ERRMON#.SA.048 1 LINE 70 9 PAGE UM HARDING JULY 28, 1977 02:09:29 5.0T4 134 0 EFL ERROR MONITOR. 0 Referenced by comments of: 527/1 1 SUN SEP 08/96 15:24:55 Page 281 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00525/049 ELEM FUNC LIB SA G S1559 5.0T2 VLO FSNAME=ELEM_FUNC_LIB..SA.049(1) 190 5.0T2 190 ELEM_FUNC_LIB..SA.049 1 LINE 57 3 PAGE UM HARDING SEP. 24, 1974 09:03.35 5.0T4 135 0 SOURCE FOR LOW-CORE SYMBOL TABLE "" WHICH DEFINES EACH OF THE ENTRY POINTS FOR THE EFL ROUTINES. THE SYMBOL TABLE IS POINTED TO BY LCSYMBOL. THE ASSEMBLED NAME OF THIS PROGRAM IS "EFL" SINCE "" IS AN ILLEGAL CSECT NAME. THE OBJECT DECK MUST BE CHANGED (BY THE EDITOR) TO CHANGE THE NAME TO "" IF IT IS RE-ASSEMBLED. 00525/050 ELEM FUNC LIB OBJECT OC G SEG2:EFL 5.0T2 191 ELEM_FUNC_LIB.OBJECT.OC.050 1 LINE 80 17 PAGE UM HARDING JULY 03, 1981 15:03:58 5.0T4 136 SEG2:EFL 0 OBJECT LOADED INTO SHARED VM AT IPL BY PISTLE. THE FOLLOWING SYMBOLS ARE ADDED TO LCSYMBOL BY PISTLE: TRACER, TRACER#, SIOC, SIOC#, SIOCP, AND THE SYMBOL DEFINES A SEPARATE SYMBOL TABLE WHICH CONTAINS THE ADDRESSES OF OF ALL THE EFL ENTRY POINTS. 0 Referenced by comments of: 526/4, 527/2 00526/001 SIOC SUBR SA G S1559 5.0T2 VLO FSNAME=SIOC_SUBR..SA.001(1) 192 5.0T2 192 SIOC_SUBR..SA.001 1 LINE 80 42 PAGE UM HARDING JULY 28, 1977 02:09:37 5.0T4 137 0 AN I/O CONVERSION PROGRAM TO PERFORM FLOATING POINT, INTEGER, LOGICAL, AND HEX CONVERSIONS. THE CONVERSIONS AVAILABLE CORRESPOND TO THOSE USUALLY ASSOCIATED WITH THE D, E, F, G, I, L, AND Z FORTRAN FORMAT SPECIFICATIONS. THIS PROGRAM IS RE-ENTRANT AND, THEREFORE, IS NORMALLY LOADED INTO SHARED VM. 00526/002 SIOC SUBR OC G SEG2:SIOC 5.0T2 193 SIOC_SUBR..OC.002 1 LINE 80 3 PAGE UM HARDING JULY 03, 1981 15:04:01 5.0T4 138 SEG2:SIOC 00526/003 SIOC SUBR SIOCP SA G S1559 5.0T2 VLO FSNAME=SIOC_SUBR.SIOCP.SA.003(1) 194 5.0T2 194 SIOC_SUBR.SIOCP.SA.003 1 LINE 80 6 PAGE UM HARDING APR. 05, 1980 15:35:56 5.0T4 139 0 SUBROUTINE TO TRANSLATE FORTRAN FORMAT-LIKE CHARACTER STRINGS INTO THE DATA BLOCK REQUIRED FOR CALLING SIOC. 00526/004 SIOC SUBR SIOCP OC G # (PART OF ELEM FUNC LIB OBJECT) UM HARDING 0 Part of SEG2:EFL (525/50). 00527/001 TRACER SUBR SA G S1559 5.0T2 VLO FSNAME=TRACER_SUBR..SA.001(1) 195 5.0T2 195 TRACER_SUBR..SA.001 1 LINE 80 52 PAGE UM HARDING SEP. 24, 1974 09:04.21 5.0T4 140 0 THE TRACEBACK PROGRAM FORMERLY PROVIDED CONVERSATIONAL ERROR PROCESSING FOR ERROR CONDITIONS DETECTED BY THE ELEMENTARY FUNCTION LIBRARY (525) AS WELL AS PROGRAM AND ATTENTION INTERRUPT PROCESSING. COMMANDS ARE AVAILABLE FOR DISPLAYING AND 1 SUN SEP 08/96 15:24:55 Page 282 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ALTERING FLOATING POINT, INTEGER, CHARACTER, AND HEX DATA. THIS PROGRAM IS RE-ENTRANT AND, THEREFORE, CAN BE LOADED INTO SHARED VM. NOTE: AT UM, THIS COMPONENT IS CONSIDERED TO BE OBSOLETE AND WILL PROBABLY BE REMOVED FROM THE SYSTEM IN THE NEAR FUTURE SINCE THE CURRENT VERSION OF THE EFL ERROR MONITOR (525/48) NO LONGER CALLS IT. 00527/002 TRACER SUBR OC G # (PART OF ELEM FUNC LIB OBJECT) UM HARDING 0 Part of SEG2:EFL (525/50). 00528/001A ALGOLW ALGOLW OC G S1527 ALGOLW 'ARCHIVE' 97 5.1T1 526 ALGOLW.ALGOLW.OC.001 1 LINE 24 1 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 18:25:25 0 ALW ********************************************************* ALW ALW * * ALW ALW * U N E A L G O L W * ALW ALW * * ALW ALW ********************************************************* ALW ALW ========================================================= ALW Contact people: Alan Hunter NUMAC Computing Service Computing Laboratory The University of Newcastle upon Tyne NEWCASTLE NE1 7RU England Jim Bodwin Computing Center The University of Michigan 1075 Beal Avenue Ann Arbor MICHIGAN 48109 U.S.A. ALW ========================================================= ALW Installation of the Algol W system from this distribution is described in subcomponent (528/24). This and all other writeups included with this component should be $COPied to a TN printer @MCC. The ALGOLW user manual, MTS Volume 16, is distributed as component (741). ALW ========================================================= ALW All subcomponents should be restored to filenames formed from: 1 SUN SEP 08/96 15:24:55 Page 283 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 . except (528/36), which should be restored to "MACLIB". ALW ========================================================= ALW This subcomponent: This is the public file *ALGOLW if Algol W is loaded into shared VM. The following component (528/2) is *ALGOLW otherwise. It is now the only public file in the Algol W system, but contains only the loader records required to link into the post IPL loaded system. The compiler/monitor entry point name is AWDRIVER, in the post IPL Algol W system - subcomponent (528/2). To install without re-assembly only (528/1) and (528/2) are required. For non-shared VM systems only (528/2) and possibly (528/70) are required. 0 Referenced by comments of: 528/1, 528/2, 844/27, 844/32 00528/002A ALGOLW ALGOLW OE G *ALGOLW 5.1T1 527 ALGOLW.ALGOLW.OE.002 1 LINE 32767 59 PAGE UNE HUNTER J BODWIN JULY 23, 1983 11:08:48 *ALGOLW 0 Contains the re-entrant Algol W system, which may run in either post-IPL loaded shared storage or in user segments. It is built from the individual object decks by the set of MTS commands in subcomponent (528/40). To use in user segments this subcomponent should be restored and $RUN. This is currently done at UM where the contents of this component reside in the public file *ALGOLW. Another copy of this resides in *LIBRARY since this also includes the Algol W run-time library. It is possible to split out the unneeded modules in the run-time library version. However, this has not been done because of the problems associated with maintaining two versions. Note that the run-time library IS used by the compiler. For systems where Algol W is to reside in shared VM, this is the module may be loaded directly into shared VM and the preceeding file (528/1) should be restored to *ALGOLW. Additionally, AWSEG2 (528/70) should be loaded into shared VM if Algol W was ever loaded into shared VM. See the component for a fuller description of why. A source file, subcomponent (528/39), may be used to transfer the contents of this file to the file SEG2:ALGOLW, which is normally the production Algol W system. See also the comment below. The COM card defining LCSYMBOL entries is: COM ALGOLW01 This subcomponent contains the assembled object decks from the following source decks: DRIVER.SA (528/14) -- Compiler system control routine SERVICES.SA (528/51) -- Compiler service routines 1 SUN SEP 08/96 15:24:55 Page 284 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 LOADER.SA (528/33) -- Loader for CLG / Monitor SCAN.S3 (528/49) -- Compiler phase A : scan PARSE.S3 (528/42) -- Compiler phase A : parse AWB.S3 (528/07) -- Compiler phase B : code generate RENTALIB.SA (528/47) -- Run time initialisation and interrupt exits GETENV.SA (528/20) -- ALGOL W environment getter IOPACK.SA (528/27) -- I/O system entries SYSPACK.SA (528/55) -- I/O system unit control FMTPACK.SA (528/16) -- I/O system format routines BADGUYS.SA (528/09) -- Run time error processor GOODGUYS.SA (528/23) -- Run time debug processor FUNRTNS.SA (528/18) -- Function entries SHORTFNS.SA (528/53) -- Short real and complex analytic functions LONGFNS.SA (528/35) -- Long real and complex analytic functions RECORDS.S3 (528/45) -- Record allocation WOLFPACK.SA (528/58) -- Keyword / expression scanner MTSSIM.SA (528/38) -- MTS system interface module LCS.SA (528/31) -- ALGOL W low core symbol table DEFAULT.SA (791/01) -- MTS time and page limit defaults If this file is to be loaded into shared VM then the following two lines should be appended first: LCS LCSYMBOL LDT 0 Referenced by comments of: 528/1, 528/12, 528/39, 528/40 00528/003 ALGOLW ASM C G S1527 ALGOLW 'ARCHIVE' 82 5.0T2 198 ALGOLW.ASM.C.003 1 LINE 114 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:20 5.0T4 143 0 MTS skeleton command deck to assemble a mythical Algol W component "XYZ". Copy it to a scratch file, say "-ASM", and edit/source: $EDIT -ASM :CHANGE@ALL /FILE ;XYZ;; $SOURCE -ASM to assemble the subcomponent called . 00528/004 ALGOLW AWA C G S1527 ALGOLW 'ARCHIVE' 83 5.0T2 199 ALGOLW.AWA.C.004 1 LINE 84 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:21 5.0T4 144 0 MTS commands to compile the compiler, Phase A. The scanner is in (528/49), and its object is in (528/48). The parser is in (528/42), and its object is in (528/41). 0 Referenced by comments of: 528/41, 528/48 00528/005 ALGOLW AWB C G S1527 ALGOLW 'ARCHIVE' 84 5.0T2 200 ALGOLW.AWB.C.005 1 LINE 70 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:22 5.0T4 145 0 MTS commands to compiler the compiler, Phase B. 1 SUN SEP 08/96 15:24:55 Page 285 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 The source is in (528/7), and the object is in (528/6). 0 Referenced by comments of: 528/6 00528/006A ALGOLW AWB OC G S1527 ALGOLW 'ARCHIVE' 54 5.1T1 528 ALGOLW.AWB.OC.006 1 LINE 80 52 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:44:51 0 Compiler scan and parse phase object produced by (528/5) from (528/7). 0 Referenced by comments of: 528/5 00528/007A ALGOLW AWB S3 G S1527 ALGOLW 'ARCHIVE' 30 5.1T1 529 ALGOLW.AWB.S3.007 1 LINE 72 81 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:36:39 0 Source (PL360) for the Algol W compiler, phase B. 0 Referenced by comments of: 528/2, 528/5, 528/6, 528/65 00528/008A ALGOLW BADGUYS OC G S1527 ALGOLW 'ARCHIVE' 59 5.1T1 530 ALGOLW.BADGUYS.OC.008 1 LINE 80 22 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:46:53 0 Object deck assembled from subcomponent (528/9). 00528/009A ALGOLW BADGUYS SA G S1527 ALGOLW 'ARCHIVE' 36 5.1T1 531 ALGOLW.BADGUYS.SA.009 1 LINE 72 51 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:38:51 0 Assembler source for the Algol W run time error and exception processor. SD: AWXERROR LD: ** None ** 0 Referenced by comments of: 528/2, 528/8, 528/59, 528/66 00528/010 ALGOLW BUILD C G S1527 ALGOLW 'ARCHIVE' 85 5.0T2 205 ALGOLW.BUILD.C.010 1 LINE 68 9 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:38 5.0T4 150 0 Contains an MTS command deck to build the driver file for this distribution, from scratch, in a file called "_DRIVER". It runs *DEDIT (461/1) - comments are stored in the driver file negative line range. 00528/011 ALGOLW COMMON S3 G S1527 ALGOLW 'ARCHIVE' 31 5.0T2 206 ALGOLW.COMMON.S3.011 1 LINE 72 4 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:39 5.0T4 151 0 Compiler scan and parse phase : source for data segments and procedures common to both (528/49) and (528/42). 0 Referenced by comments of: 528/42, 528/49 1 SUN SEP 08/96 15:24:55 Page 286 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00528/012 ALGOLW DECKGEN C G S1527 ALGOLW 'ARCHIVE' 86 5.0T2 207 ALGOLW.DECKGEN.C.012 1 LINE 113 3 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:40 5.0T4 152 0 A command deck to assemble/compile all of the object decks for the ALGOL W system, assuming nothing. If *ALL* of the assemblies and compilations are successful then (528/40) is invoked to regenerate (528/2). 0 Referenced by comments of: 528/40 00528/013A ALGOLW DRIVER OC G S1527 ALGOLW 'ARCHIVE' 61 5.1T1 532 ALGOLW.DRIVER.OC.013 1 LINE 80 13 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:48:05 0 Object deck assembled from subcomponent (528/14). 00528/014A ALGOLW DRIVER SA G S1527 ALGOLW 'ARCHIVE' 38 5.1T1 533 ALGOLW.DRIVER.SA.014 1 LINE 72 38 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:39:52 0 Assembler source for the Algol W compiler system driver routine. All scheduling of source programs through the compiler, and in CLG/Monitor mode, loading and execution of compiled programs, is performed by this control section. This includes processing of compiler parameters and those given on control cards. Copies GLOBALS (528/21). SD: AWDRIVER Compiler system (*ALW) entry point LD: ** None ** 0 Referenced by comments of: 528/2, 528/13, 528/21, 528/51, 528/67 00528/015A ALGOLW FMTPACK OC G S1527 ALGOLW 'ARCHIVE' 62 5.1T1 534 ALGOLW.FMTPACK.OC.015 1 LINE 80 13 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:48:24 0 Object deck assembled from subcomponent (528/16). 00528/016A ALGOLW FMTPACK SA G S1527 ALGOLW 'ARCHIVE' 39 5.1T1 535 ALGOLW.FMTPACK.SA.016 1 LINE 72 50 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:40:29 0 Assembler source for the Algol W I/O format conversion routines. Processes input and output data conversion. These are stack linked "Q-routines". SD: AWFMTPAK Q-routine transfer vector LD: ** None ** 0 Referenced by comments of: 528/2, 528/15, 528/68 00528/017 ALGOLW FUNRTNS OC G S1527 ALGOLW 'ARCHIVE' 63 5.0T2 212 ALGOLW.FUNRTNS.OC.017 1 LINE 80 5 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:52 5.0T4 157 0 Object deck assembled from subcomponent (528/18). 1 SUN SEP 08/96 15:24:55 Page 287 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00528/018 ALGOLW FUNRTNS SA G S1527 ALGOLW 'ARCHIVE' 40 5.0T2 213 ALGOLW.FUNRTNS.SA.018 1 LINE 72 14 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:53 5.0T4 158 0 Assembler source for the Algol W standard function entries control section. Provides entries to implicit functions (powers, complex arithmetic, etc.) and the link through to standard functions of analysis provided by (528/53) and (528/35). SD: AWFUNLIB LD: AWCHKASR Assertion check AWTIMEFN Clock function - TIME AWTRACER Debug trace - TRACE AWFMCALL Formal call AWFPARCV Formal parameter conversion AWREFCHK Reference check AWEXPNFN Exponent function - EXPONENT AWSANALF Real analytic functions - (528/53) AWLANALF Long real analytic functions - (528/35) AWSCANLF Complex analytic functions - (528/53) AWLCANLF Long complex analytic functions - (528/35) AWPOWERS Powers evaluation AWRICVFN Real to integer conversion functions - ENTIER, ROUND, TRUNCATE AWCARITH Complex arithmetic 0 Referenced by comments of: 528/2, 528/17 00528/019 ALGOLW GETENV OC G S1527 ALGOLW 'ARCHIVE' 64 5.0T2 214 ALGOLW.GETENV.OC.019 1 LINE 80 6 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:55 5.0T4 159 0 Object deck assembled from subcomponent (528/20). 00528/020 ALGOLW GETENV SA G S1527 ALGOLW 'ARCHIVE' 41 5.0T2 215 ALGOLW.GETENV.SA.020 1 LINE 68 10 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:56 5.0T4 160 0 Assembler source for the Algol W environment acquisition routines. SD: AWGETENV Non Algol W entry to Algol W LD: ALWBEG Explicit initialization ALWEND Explicit shutdown AWLINKST Link function environment switch 0 Referenced by comments of: 528/2, 528/19 00528/021 ALGOLW GLOBALS SA G S1527 ALGOLW 'ARCHIVE' 42 5.0T2 216 ALGOLW.GLOBALS.SA.021 1 LINE 68 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:57 5.0T4 161 0 This file defines three assembler variables: &INSTALL -- set to your installation code (e.g. 'UNE') 1 SUN SEP 08/96 15:24:55 Page 288 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 &VERSION -- set to the version identifier (normally a five-character date) &LIBNAME -- the current Algol W entry in LCSYMBOL This file is copied by (528/14) and (528/38). Conditional assembly *MUST* be confined to the system interface module (528/38) *ONLY*. (528/14) assembles two of the variables into an 8-byte descriptor: CL5'&VERSION',CL3'&INSTALL'. This appears on the END card of any object program generated. It also generates the COM card for PISTLE using &LIBNAME. 0 Referenced by comments of: 528/14, 528/31, 528/33, 528/38 00528/022 ALGOLW GOODGUYS OC G S1527 ALGOLW 'ARCHIVE' 65 5.0T2 217 ALGOLW.GOODGUYS.OC.022 1 LINE 80 4 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:58 5.0T4 162 0 Object deck assembled from subcomponent (528/23). 00528/023 ALGOLW GOODGUYS SA G S1527 ALGOLW 'ARCHIVE' 43 5.0T2 218 ALGOLW.GOODGUYS.SA.023 1 LINE 68 2 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:04:59 5.0T4 163 0 Assembler source for the Algol W run time debug processor routines processor. (Implementation held pending MTS community decisions.) SD: AWXDEBUG LD: not yet finalized 0 Referenced by comments of: 528/2, 528/22 00528/024 ALGOLW INSTALL P G S1527 ALGOLW 'ARCHIVE' 93 5.0T2 219 ALGOLW.INSTALL.P.024 1 LINE 76 3 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:00 5.0T4 164 0 Print file from subcomponent (528/25). Copy to a TN printer. 0 Referenced by comments of: 528/1, 528/25 00528/025 ALGOLW INSTALL WX G S1527 ALGOLW 'ARCHIVE' 92 5.0T2 220 ALGOLW.INSTALL.WX.025 1 LINE 74 3 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:01 5.0T4 165 0 TEXTFORM source for: ========================================================== = Algol W Installation Guide = = by - Alan Hunter = = April 1970 = ========================================================== This short document describes how to install Algol W in the MTS operating system. It is intended for the "keeper" of Algol W 1 SUN SEP 08/96 15:24:55 Page 289 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 at each particular installation. The print file is subcomponent (528/24). 0 Referenced by comments of: 528/24 00528/026 ALGOLW IOPACK OC G S1527 ALGOLW 'ARCHIVE' 66 5.0T2 221 ALGOLW.IOPACK.OC.026 1 LINE 80 7 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:02 5.0T4 166 0 Object deck assembled from subcomponent (528/27). 00528/027 ALGOLW IOPACK SA G S1527 ALGOLW 'ARCHIVE' 44 5.0T2 222 ALGOLW.IOPACK.SA.027 1 LINE 72 19 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:03 5.0T4 167 0 Assembler source for the Algol W I/O system entries control section. Provides initial entries for all I/O entry standard procedures, and for string conversion functions. SD: AWIOPACK LD: AWRDEDIT Basic input - READ, READON, READCARD AWWREDIT Basic output - WRITE, WRITEON, WRITECARD AWGTEDIT Unit input - GET, GETON AWPTEDIT Unit output - PUT, PUTON AWGTCONV Read internal string - GETSTRING AWPTCONV Write internal string - PUTSTRING AWGETSTR Unit string input - GETCARD, XGETCARD AWPUTSTR Unit string output - PUTCARD, XPUTCARD AWDELETE Unit indexed delete - XDELETE AWIOSYSP Control procedures - READER, WRITER, IOCONTROL, NEWLINE, RELEASE, PROTECT, REWIND, EMPTY, FLUSH, ATTNTRAP, OBEY, STOP AWASSIGN Unit allocation - ASSIGN AWQUACON Unit control - CONTROL, QUALIFY AWSENSIO Unit information - SENSE AWSTRCVF String conversion functions - INTBASE10, INTBASE16, BASE10, LONGBASE10, BASE16, LONGBASE16, DATE 0 Referenced by comments of: 528/2, 528/26 00528/028 ALGOLW KXSCAN P G S1527 ALGOLW 'ARCHIVE' 94 5.0T2 223 ALGOLW.KXSCAN.P.028 1 LINE 88 6 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:05 5.0T4 168 0 Print file from subcomponent (528/29). Copy to a TN printer. 0 Referenced by comments of: 528/29 00528/029 ALGOLW KXSCAN WX G S1527 ALGOLW 'ARCHIVE' 95 5.0T2 224 ALGOLW.KXSCAN.WX.029 1 LINE 102 3 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:07 5.0T4 169 0 TEXTFORM source for: 1 SUN SEP 08/96 15:24:55 Page 290 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ========================================================== = Newcastle University Computing Laboratory = = NUMAC Document S21 = = KXSCAN - A Keyword and Expression Scanner = = by - Alan Hunter = = December 1979 (incomplete) = ========================================================== This document describes the KXSCAN subroutine used for all keyword and expression decoding within Algol W. It is completely independent of both Algol W and any operating system, and has been used in the OS/MVT and OS/VS2 3.7 systems at NUMAC. The print file is subcomponent (528/28). Copyright: The University of Newcastle upon Tyne 0 Referenced by comments of: 528/28 00528/030 ALGOLW LCS OC G S1527 ALGOLW 'ARCHIVE' 67 5.0T2 225 ALGOLW.LCS.OC.030 1 LINE 80 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:07 5.0T4 170 0 Object deck assembled from subcomponent (528/31). 00528/031 ALGOLW LCS SA G S1527 ALGOLW 'ARCHIVE' 45 5.0T2 226 ALGOLW.LCS.SA.031 1 LINE 68 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:08 5.0T4 171 0 Assembler source for the ALGOL W system low core symbol table. SD: &libname from (528/21) Low core symbol table LD: ** None ** 0 Referenced by comments of: 528/2, 528/30 00528/032 ALGOLW LOADER OC G S1527 ALGOLW 'ARCHIVE' 68 5.0T2 227 ALGOLW.LOADER.OC.032 1 LINE 80 5 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:09 5.0T4 172 0 Object deck assembled from subcomponent (528/33). 00528/033 ALGOLW LOADER SA S S1527 ALGOLW 'ARCHIVE' 46 5.0T2 228 ALGOLW.LOADER.SA.033 1 LINE 72 18 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:10 5.0T4 173 0 Assembler source for the Algol W system loader. Used by the compiler driver to load programs compiled in CLG or Monitor mode. Copies ALWB:GLOBALS (528/21). SD: AWLOADER Algol W loader LD: ** None ** 1 SUN SEP 08/96 15:24:55 Page 291 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 528/2, 528/32 00528/034 ALGOLW LONGFNS OC S S1527 ALGOLW 'ARCHIVE' 69 5.0T2 229 ALGOLW.LONGFNS.OC.034 1 LINE 80 6 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:12 5.0T4 174 0 Object deck assembled from subcomponent (528/35). 00528/035 ALGOLW LONGFNS SA G S1527 ALGOLW 'ARCHIVE' 47 5.0T2 230 ALGOLW.LONGFNS.SA.035 1 LINE 72 23 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:13 5.0T4 175 0 Assembler source for the Algol W short precision analytic functions. Code adapted from the University of Michigan Elementary Function Library, which was in turn adapted from the Chicago routines. SD: AWLRLFNS Long real function transfer vector - LONGSQRT, LONGEXP, LONGLN, LONGLOG, LONGSIN, LONGCOS, LONGARCTAN, LONGCOT, LONGARCSIN, LONGARCCOS, LONGSINH, LONGCOSH, LONGTANH, LONGERF, LONGERFC, LONGGAMMA, LONGLNGAMMA LD: AWLCXFNS Long complex function transfer vector - LONGCXSIN, LONGCXCOS, LONGCXSQRT, LONGCXLN, LONGCXEXP 0 Referenced by comments of: 528/2, 528/18, 528/34 00528/036 ALGOLW MACLIB SM G S1527 ALGOLW 'ARCHIVE' 76 5.0T2 231 ALGOLW.MACLIB.SM.036 1 LINE 72 39 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:15 5.0T4 176 0 Contains the Algol W system macro library. 0 Referenced by comments of: 528/1 00528/037 ALGOLW MTSSIM OC G S1527 ALGOLW 'ARCHIVE' 70 5.0T2 232 ALGOLW.MTSSIM.OC.037 1 LINE 80 5 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:19 5.0T4 177 0 Object deck assembled from subcomponent (528/38). 00528/038 ALGOLW MTSSIM SA G S1527 ALGOLW 'ARCHIVE' 48 5.0T2 233 ALGOLW.MTSSIM.SA.038 1 LINE 72 31 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:20 5.0T4 178 0 Assembler source for the Algol W <--> MTS system interface module. All communication between Algol W and the operating system is performed by calls to these entries. Copies ALWB:GLOBALS (528/21). SD: AWMTSSIM LD: AWSIMBGN SIM initialisation AWSIMEND SIM close down 1 SUN SEP 08/96 15:24:55 Page 292 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 AWGTMAIN Get main storage AWFRMAIN Return main storage AWGTROOT Get root dsect storage AWFDROOT Find root dsect storage AWFRROOT Free root dsect storage AWERRRTN Escape route for GETENV routines AWXCLOCK System clock AWRDRECD Read in a record AWWRRECD Write out a record AWWRDECK Punch out a loader record AWDSOPEN Open a dataset AWDSCLOS Close a dataset AWDSFREE Free (release) a dataset AWDSRWND Rewind a dataset AWDSUNIT Assign a dataset to DDname AWDSCTRL Control operation on dataset AWDSSENS Return dataset information AWDSCLEA Reset or empty a dataset AWCNRPLY Query conversational AWDDNAME Get Device Definition names AWPREFIX Set terminal prefix character AWATTNTR Set attention interrupt exit AWPGNTTR Set program interrupt exit AWTIMNTR Set timer interrupt exit AWSIMXIT Escape route for compiler system AWSYSCMD Issue system command AWGETLCS Return A(system LCS table) AWIDVLOG Monitor ID verify and log AWEDITOR Invoke system editor AWLIBOBJ Supply library file inclusion directive AWEXLOAD Load external object modules AWCCLOOP Supply information for page limit check AWDEFALT Supply installation defaults 0 Referenced by comments of: 528/2, 528/21, 528/37 00528/039 ALGOLW NEWSYS C G S1527 ALGOLW 'ARCHIVE' 96 5.0T2 234 ALGOLW.NEWSYS.C.039 1 LINE 66 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:23 5.0T4 179 0 This contains a set of MTS commands to change the current post-IPL (production) Algol W system. It should be sourced from the id "SEG2". Be sure that you are aware of the consequences of using this, and that you have the permission of your local Senior Systems Programmer to change files on "SEG2". The new system is built using *OBJUTIL (721) using the file SEG2:ALGOLW (528/2) as a basis. 0 Referenced by comments of: 528/2 1 SUN SEP 08/96 15:24:55 Page 293 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00528/040 ALGOLW OBJBUILD C G S1527 ALGOLW 'ARCHIVE' 87 5.0T2 235 ALGOLW.OBJBUILD.C.040 1 LINE 66 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:24 5.0T4 180 0 Contains an MTS command deck to set up (528/2) from the individual object decks. During the conversion, SYM loader cards are deleted. This file is copied by (528/12). 0 Referenced by comments of: 528/2, 528/12 00528/041 ALGOLW PARSE OC G S1527 ALGOLW 'ARCHIVE' 55 5.0T2 236 ALGOLW.PARSE.OC.041 1 LINE 80 43 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:25 5.0T4 181 0 Compiler scan and parse phase object produced by (528/4) from (528/42). 0 Referenced by comments of: 528/4 00528/042 ALGOLW PARSE S3 G S1527 ALGOLW 'ARCHIVE' 32 5.0T2 237 ALGOLW.PARSE.S3.042 1 LINE 72 73 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:28 5.0T4 182 0 PL360 source for the Algol W compiler, phase A, recursive descent parser. Has a $CONTINUE WITH COMMON.S3 (528/11) record. 0 Referenced by comments of: 528/2, 528/4, 528/11, 528/41 00528/043 ALGOLW RECORDS C G S1527 ALGOLW 'ARCHIVE' 88 5.0T2 238 ALGOLW.RECORDS.C.043 1 LINE 66 1 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:33 5.0T4 183 0 Contains an MTS command deck to compile the record allocation library routine (528/45). 00528/044 ALGOLW RECORDS OC G S1527 ALGOLW 'ARCHIVE' 56 5.0T2 239 ALGOLW.RECORDS.OC.044 1 LINE 80 3 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:34 5.0T4 184 0 Object deck compiled from subcomponent (528/45). 00528/045 ALGOLW RECORDS S3 G S1527 ALGOLW 'ARCHIVE' 33 5.0T2 240 ALGOLW.RECORDS.S3.045 1 LINE 72 5 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:35 5.0T4 185 0 PL360 source for the Algol W record allocation routine. SD: AWRCALOC Record allocator LD: ** None ** 0 Referenced by comments of: 528/2, 528/43, 528/44 1 SUN SEP 08/96 15:24:55 Page 294 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00528/046 ALGOLW RENTALIB OC G S1527 ALGOLW 'ARCHIVE' 71 5.0T2 241 ALGOLW.RENTALIB.OC.046 1 LINE 80 9 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:36 5.0T4 186 0 Object deck assembled from subcomponent (528/47). 00528/047 ALGOLW RENTALIB SA G S1527 ALGOLW 'ARCHIVE' 49 5.0T2 242 ALGOLW.RENTALIB.SA.047 1 LINE 68 18 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:37 5.0T4 187 0 Assembler source for the Algol W library root control section. Provides the initialization entry for the run time stytem, with dummy section initialization code, and also the interrupt exits. SD: AWSYSTEM Initial run time entry LD: AWSYINIT root dummy section initialisation AWCLOSE system close down 0 Referenced by comments of: 528/2, 528/46 00528/048 ALGOLW SCAN OC G S1527 ALGOLW 'ARCHIVE' 57 5.0T2 243 ALGOLW.SCAN.OC.048 1 LINE 80 19 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:39 5.0T4 188 0 Compiler scan and parse phase object produced by (528/4) from (528/49). 0 Referenced by comments of: 528/4 00528/049 ALGOLW SCAN S3 G S1527 ALGOLW 'ARCHIVE' 34 5.0T2 244 ALGOLW.SCAN.S3.049 1 LINE 72 27 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:41 5.0T4 189 0 Source (PL360) for the Algol W compiler, phase A, scanner. Has a $CONTINUE WITH COMMON.S3 (528/11) record. 0 Referenced by comments of: 528/2, 528/4, 528/11, 528/48 00528/050 ALGOLW SERVICES OC G S1527 ALGOLW 'ARCHIVE' 72 5.0T2 245 ALGOLW.SERVICES.OC.050 1 LINE 80 8 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:43 5.0T4 190 0 Object deck assembled from subcomponent (528/51). 00528/051 ALGOLW SERVICES SA G S1527 ALGOLW 'ARCHIVE' 50 5.0T2 246 ALGOLW.SERVICES.SA.051 1 LINE 70 32 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:44 5.0T4 191 0 Assembler source for the Algol W compiler service routines. These supply I/O and other facilities to the compiler phases. Their addresses are contained in a transfer vector in (528/14). SD: AWCSRTNS LD: AWGETCRD Source cards input AWPUTLNE Listing/Diagnostics output 1 SUN SEP 08/96 15:24:55 Page 295 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 AWVFLIST Virtual file listing routines AWXRFRTN Cross reference AWPUTCRD Object card output AWGTSTOR Nested storage allocation AWFRSTOR Nested storage release AWGTTIME Processor time clock AWPUTMSG Messages, AWCSRTNS + AWDRIVER 0 Referenced by comments of: 528/2, 528/50 00528/052 ALGOLW SHORTFNS OC G S1527 ALGOLW 'ARCHIVE' 73 5.0T2 247 ALGOLW.SHORTFNS.OC.052 1 LINE 80 6 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:47 5.0T4 192 0 Object deck assembled from subcomponent (528/53). 00528/053 ALGOLW SHORTFNS SA G S1527 ALGOLW 'ARCHIVE' 51 5.0T2 248 ALGOLW.SHORTFNS.SA.053 1 LINE 72 20 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:49 5.0T4 193 0 Assembler source for the Algol W short precision analytic functions. Code adapted from the University of Michigan Elementary Function Library (525), which was in turn adapted from the Chicago routines. SD: AWSRLFNS Short real function transfer vector - SQRT, EXP,LN, LOG, SIN, COS, ARCTAN, TAN, COT, ARCSIN, ARCCOS, SINH, COSH, TANH, ERF, ERFC, GAMMA, LNGAMMA LD: AWSCXFNS Short complex function transfer vector - CXSIN, CXCOS, CXSQRT, CXLN, CXEXP 0 Referenced by comments of: 528/2, 528/18, 528/52 00528/054A ALGOLW SYSPACK OC G S1527 ALGOLW 'ARCHIVE' 74 5.1T1 536 ALGOLW.SYSPACK.OC.054 1 LINE 80 14 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:50:18 0 Object deck assembled from subcomponent (528/55). 00528/055A ALGOLW SYSPACK SA G S1527 ALGOLW 'ARCHIVE' 52 5.1T1 537 ALGOLW.SYSPACK.SA.055 1 LINE 72 33 PAGE UNE HUNTER J BODWIN JUNE 11, 1982 15:44:10 0 Assembler source for the Algol W I/O system record and device control routines. These are stack linked "Q-routines". SD: AWSYSPAK Q-routine transfer vector LD: AWFMSCAN Format string decoder (O/S type I rtn) 0 Referenced by comments of: 528/2, 528/54, 528/69 00528/056 ALGOLW TESTPGMS SW G S1527 ALGOLW 'ARCHIVE' 89 5.0T2 251 ALGOLW.TESTPGMS.SW.056 1 LINE 81 7 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:57 5.0T4 196 0 Contains a set of small Algol W programs to test *ALGOLW as a 1 SUN SEP 08/96 15:24:55 Page 296 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 compiler (source to object deck). To use: $RUN *ALGOLW SCARDS=TESTPGMS.SW 00528/057 ALGOLW WOLFPACK OC G S1527 ALGOLW 'ARCHIVE' 75 5.0T2 252 ALGOLW.WOLFPACK.OC.057 1 LINE 80 11 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:05:58 5.0T4 197 0 Object deck assembled from subcomponent (528/58). 00528/058 ALGOLW WOLFPACK SA G S1527 ALGOLW 'ARCHIVE' 53 5.0T2 253 ALGOLW.WOLFPACK.SA.058 1 LINE 72 49 PAGE UNE HUNTER J BODWIN JULY 03, 1981 15:06:00 5.0T4 198 0 Assembler source for the Algol W system independent subroutines. Provides a keyword/expression scanner and a block letter routine. SD: AWINDRTN LD: AWKXSCAN Keyword and expression processing AWCVREAL Convert real routine AWBLKLTR Block letter generation AWSPACES Stop on space table AWSPACOM Stop on space or comma table AWNSPACE Stop on not space table AWNSPACM Stop on not space or comma table AWUCTOLC Translate UC alpha to LC alpha table AWATSIGN Stop on an "@" table KXSCAN Tourist synonym for AWKXSCAN 0 Referenced by comments of: 528/2, 528/57 00528/059 ALGOLW AWSNAP SA G S1527 ALGOLW 'ARCHIVE' 90 5.0T2 254 ALGOLW.AWSNAP.SA.059 1 LINE 68 3 PAGE UM J BODWIN JULY 03, 1981 15:06:08 5.0T4 199 0 This subcomponent is not a part of ALGOLW, but an interface to the ALGOLW SNAPSHOT routine, which is part of BADGUYS (528/9). Documentation may be found in the source. 00528/060 ALGOLW AWSNAP OC G # (PART OF *LIBRARY) UM J BODWIN 0 Object part of *LIBRARY (524/1) 00528/061 ALGOLW *XALGOLW OE G # (OBSOLETE) D4T2 238 ALGOLW.*XALGOLW.OE.006 1 SEQ 3402 2 PAGE UM J BODWIN JULY 28, 1977 02:13:51 0 *XALGOLW IS NO LONGER SUPPORTED AT UM. 00528/062C ALGOLW MEMO 427 WF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO427.SOU 5.1T1 538 ALGOLW.MEMO_427.WF.062 1 LINE 137 4 PAGE UM J BODWIN MAY 04, 1983 16:53:45 0 This is Computing Center Memo 427 -- "Algol W Snapshot Dumps." 1 SUN SEP 08/96 15:24:55 Page 297 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00528/063C ALGOLW MEMO 427 PF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO427.OUT 5.1T1 539 ALGOLW.MEMO_427.PF.063 1 LINE 76 4 PAGE UM J BODWIN MAY 04, 1983 16:53:25 0 Printer-ready version of (528/63). 0 Referenced by comments of: 528/63 00528/064 ALGOLW UNSP I/O SA G ALIO S1153 UNSP VLO FSNAME=ALGOLIO.S 5.0T2 255 ALGOLW.UNSP_I/O.SA.062 1 LINE 80 5 PAGE UM UNSP J BODWIN FEB. 23, 1979 04:51:31 5.0T4 200 0 THE OBJECT OF THIS IS IN UNSP:LIBRARY (685/2). THIS MODULE IS USABLE, BUT IT HAS BEEN OUTDATED BY NEW FEATURES OF *ALGOLW. 00528/065C ALGOLW AWB UC G S1527 ALGOLW 'ARCHIVE' 77 5.1T1 540 ALGOLW.AWB.UC.065 1 LINE 67 1 PAGE UM J BODWIN JUNE 11, 1982 15:55:53 0 Update deck tehat (when applied to AWB base source) produced (528/7). See dist 4.1 for the base source. 00528/066C ALGOLW BADGUYS UC G S1527 ALGOLW 'ARCHIVE' 78 5.1T1 541 ALGOLW.BADGUYS.UC.066 1 LINE 67 1 PAGE UM J BODWIN JUNE 11, 1982 15:56:01 0 Update deck that (when applied to BADGUYS base source) produces (528/9). See dist 4.1 for the base source. 00528/067C ALGOLW DRIVER UC G S1527 ALGOLW 'ARCHIVE' 79 5.1T1 542 ALGOLW.DRIVER.UC.067 1 LINE 83 1 PAGE UM J BODWIN JUNE 11, 1982 15:56:11 0 Update deck that (when applied to DRIVER base source) produces (528/14). See dist 4.1 for the base source. 00528/068C ALGOLW FMTPACK UC G S1527 ALGOLW 'ARCHIVE' 80 5.1T1 543 ALGOLW.FMTPACK.UC.068 1 LINE 65 1 PAGE UM J BODWIN JUNE 11, 1982 15:56:19 0 Update deck that (when applied to FMTPACK base source) produces (528/16). See dist 4.1 for the base source. 00528/069C ALGOLW SYSPACK UC G S1527 ALGOLW 'ARCHIVE' 81 5.1T1 544 ALGOLW.SYSPACK.UC.069 1 LINE 66 1 PAGE UM J BODWIN JUNE 11, 1982 15:56:30 0 Update deck that (when applied to SYSPACK base source) produces (528/55). See dist 4.1 for the base source. 00528/070C ALGOLW AWSEG2 OC G S1527 ALGOLW 'ARCHIVE' 58 5.1T1 545 ALGOLW.AWSEG2.OC.070 1 LINE 80 1 PAGE UM J BODWIN JUNE 11, 1982 15:46:44 0 This module is a FAKE LCS table with the name ALGOLW01 that should be loaded into shared VM on systems where Algol W USED to reside in shared VM but now is loaded into user VM. This is needed because the old Algol W object modules contained: RIP ALGOLW01 LCS 1 SUN SEP 08/96 15:24:55 Page 298 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ... object module ... LCS ALGOLW01 The ALGOLW01 LCS table contained pointers to all of the Algol W routines that used to reside in shared VM. Unless the "dummy" LCS table is loaded, such "old" object modules will produce a warning about ALGOLW01 not being found during loading. I just wish that I had thought about this problem when I drempt up the ALGOLW01 scheme. Sigh. Apologies to all who run across this. 0 Referenced by comments of: 528/1, 528/2, 528/71 00528/071C ALGOLW AWSEG2 SA G S1527 ALGOLW 'ARCHIVE' 35 5.1T1 546 ALGOLW.AWSEG2.SA.071 1 LINE 68 1 PAGE UM J BODWIN JUNE 11, 1982 15:38:48 0 Source file for above (528/70) 00529/001 FILESTATUS COMMAND D5.0 MASTER SA MTS:FSTA.S 5.0T2 256 FILESTATUS_COMMAND..SA.001 1 LINE 79 46 PAGE UM MTS PICKELMAN JULY 03, 1981 15:06:14 5.0T4 201 0 SOURCE FOR FILESTATUS COMMAND WHICH IS NORMALLY LOADED BY PISTLE AT IPL AND EXECUTED WHENEVER A $FILESTATUS COMMAND IS ISSUED. THIS COMMAND PRINTS INFO ABOUT FILES. THE FILESTATUS COMMAND, LIKE THE PERMIT COMMAND, WAS IMPLEMENTED AS A COMMAND LANGUAGE SUBSYSTEM EVEN THOUGH IT REALLY ISN'T A CLS. SEE THE COMMENTS FOR (509/1). COPIES *GFINFODSECT (593) AND *GDINFODSECT (594). ASSEMBLE WITH COPY:MTS.MACROS (344/3). REQUIRES SHARED VM SUBROUTINES JULGRGDT (522) AND GRGJULDT (518). 0 Referenced by comments of: 47/1, 212/1, 441/1 00529/002A FILESTATUS COMMAND UPDATE UC G MTS:FSTAUPD 5.1T1 547 FILESTATUS_COMMAND.UPDATE.UC.002 1 LINE 119 7 PAGE UM MTS PICKELMAN JULY 23, 1983 11:10:57 0 Uses D5.0 source as base. ********************************************************************** D5.1 version: Mixed case messages added. ********************************************************************** 00529/003A FILESTATUS COMMAND OC *CLSFILESTATUS 5.1T1 548 FILESTATUS_COMMAND..OC.003 1 LINE 80 18 PAGE UM MTS PICKELMAN JULY 23, 1983 11:10:58 *CLSFILESTATUS 1 SUN SEP 08/96 15:24:55 Page 299 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00530/001 *AMENDS SA S1559 5.0T2 VLO FSNAME=AMENDS..SA.001(1) 259 5.0T2 259 AMENDS..SA.001 1 LINE 80 6 PAGE UM DWB JULY 28, 1977 02:17:36 5.0T4 204 0 CHANGED TO PROMPT FOR OLD AND NEW COPIES IF UNITS 0 AND/OR 1 ARE NOT ASSIGNED. 00530/002 *AMENDS OC *AMENDS 5.0T2 260 AMENDS..OC.002 1 LINE 80 3 PAGE UM DWB JULY 03, 1981 15:06:29 5.0T4 205 *AMENDS 00531/001 COMMAND STATISTICS CMDSTAT D5.0 SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=CMDSTAT 5.0T4 332 COMMAND_STATISTICS.CMDSTA.SA.001 1 LINE 80 6 PAGE UM MTS BURLING AUG. 09, 1981 23:05:08 5.0T10 236 0 General system logging facility to log all MTS commands, the HASP log, the operator's console log, unit and machine check records, etc. Copies COPY:CMDAREADSECT (531/20), COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), AND *CNFGINFODSECT (654/1). Assemble using COPY:MTS.MACROS (344/3) and COPY:SETPARM (653/1). See the comments at the start of COPY:CMDAREADSECT (531/20) for a list of the current codes. Records are logged by calling the S-type entry to CMDSTAT as follows: CALL CMDSTATS,(LOC,LEN,TYPE) where LOC is the location of the record LEN is the halfword length of the record TYPE is the fullword record type and RC=0 is normal RC=4 mean all drop areas are full; the record has not been logged. 0 Referenced by comments of: 42/2, 413/1, 447/1, 752/1 00531/002A COMMAND STATISTICS CMDSTAT UPDATE UC G MTSS:CMDSTAT/UPD(1,99999) 5.1T1 549 COMMAND_STATISTICS.CMDSTA.UC.002 1 LINE 72 3 PAGE UM MTS BURLING JULY 23, 1983 11:10:59 0 *CDUPDATE input to produce current source. 0 Referenced by comments of: 531/20, 632/1, 865/2, 866/4 00531/003A COMMAND STATISTICS CMDSTAT OBJECT OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00531/004A COMMAND STATISTICS CMDSTAT LIST L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=CMDSTAT.LIST 5.1T1 550 COMMAND_STATISTICS.CMDSTA.L.004 1 LINE 133 49 PAGE UM MTS BURLING JULY 23, 1983 11:11:34 00531/005A COMMAND STATISTICS CMDSTAT COMM D G MTSS:CMDSTAT/COM 5.1T1 551 COMMAND_STATISTICS.CMDSTA.D.005 1 LINE 66 1 PAGE UM MTS BURLING JULY 23, 1983 11:11:35 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 1 SUN SEP 08/96 15:24:55 Page 300 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00531/006A COMMAND STATISTICS *CLN C *CLN 5.1T1 552 COMMAND_STATISTICS.?CLN.C.006 1 LINE 81 1 PAGE UM MTS LIFT JULY 23, 1983 11:11:36 *CLN 0 Command file to delete various old data lines from INIT:UC3330LOG (621/14) and INIT:MCFILE (577/15) before starting *CMD (531/7). Runs SYS:PURGE (739/5). This file is started by INIT:INITCMD (097/2). 0 Referenced by comments of: 97/2, 531/7, 739/5 00531/007A COMMAND STATISTICS *CMD C G *CMD 5.1T1 553 COMMAND_STATISTICS.?CMD.C.007 1 LINE 90 1 PAGE UM MTS LIFT JULY 23, 1983 11:11:36 *CMD 0 When the system is IPLed, INIT:INITCMD (097/2) invokes *CLN (531/6), which in turn invokes *CMD. After signon, *CMD runs CMDPIKUP (531/8). An error file (CMDERRORS) must exist under the user id used for *CMD. The logged records fill up a 384 page file about 3 times per day under busy conditions. Two such files are used alternately. The tapes onto which they are dumped fill up in about 2 weeks. 0 Referenced by comments of: 531/6, 531/10, 621/14 00531/008 COMMAND STATISTICS CMDPIKUP SA G CMDP SYS:CMDPIKUP(1000) 5.0T2 263 COMMAND_STATISTICS.CMDPIK.SA.007 1 LINE 80 20 PAGE UM MTS LIFT JULY 03, 1981 15:06:31 5.0T4 208 SYS:CMDPIKUP 0 Program to pickup log records from CMDSTAT and save them in files; filenames are specified by the CMDDIR file (531/11). When a file fills up, CMDPIKUP uses the SVC STRTJB to start "MTS *DWB" (531/14) which dumps the filled file onto tape according to directory information in CMDDIR. In addition, machine and channel check records, type 10, are also written on unit 10 which is assigned to the file INIT:MCFILE. Unit check records, types 4 and 25 are also written on unit 4 which is assigned to the file INIT:UC3330LOG(*l+1). CMDPIKUP requires an empty file named CMDSTATLOCK which is used to make sure that only one copy of this program is running at a time. When CMDPIKUP is started, it first scans the directory file looking for busy entries. If it finds any, it changes file busy to file full and tape busy to tape active, see (531/38), and then sets things up so a file-to-tape task (531/14) will be started up about 4 minutes after CMDPIKUP started (this delay is to allow PISTLE to finish loading MOUNT if the system has just been IPLed). This program also creates and fills files for use by *HLG (752/3). NOTE: The file "CMDDIR" (531/11) is referenced directly by this program. CMDPIKUP copies COPY:CMDAREADSECT (531/20), COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), *GFINFODSECT (593), and *GDINFODSECT (594). Assemble using COPY:MTS.MACROS (344/3) and MTA:MCHMAC (577/5). 0 Referenced by comments of: 531/7 00531/009 COMMAND STATISTICS CMDPIKUP OC G SYS:CMDPIKUP(1,999) 5.0T2 264 COMMAND_STATISTICS.CMDPIK.OC.008 1 LINE 80 7 PAGE UM MTS LIFT JULY 03, 1981 15:06:35 5.0T4 209 1 SUN SEP 08/96 15:24:55 Page 301 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00531/010A COMMAND STATISTICS CMDSTATLOCK D # SYS:CMDSTATLOCK UM MTS LIFT SYS:CMDSTATLOCK@E 0 File used by *CMD (531/7) to make sure only one copy at a time is running. 00531/011A COMMAND STATISTICS SYS:CMDDIR D MTS:TST.CMDDIR 5.1T1 554 COMMAND_STATISTICS.SYS:CM.D.011 1 LINE 32 1 PAGE UM MTS LIFT JULY 23, 1983 11:11:36 SYS.:CMDDIR 0 This file specifies the names of the data files used for dumping the logged records. It also specifies the tape parameters used for dumping each file to tape when full. *** WARNING *** When editting this file with the editor, never use visual mode or the REPLACE command since the lines containing tape information have hex fields which will be clobbered. *************************************************************************** D5.0B version: The format of this file has changed. See (531/15) for description. *************************************************************************** 0 Referenced by comments of: 531/8, 531/15 00531/012 COMMAND STATISTICS SYS:CMDSTAT1 D # SYS:CMDSTAT1 UM MTS LIFT SYS:CMDSTAT1@E 00531/013 COMMAND STATISTICS SYS:CMDSTAT2 D # SYS:CMDSTAT2 UM MTS LIFT SYS:CMDSTAT2@E 00531/014A COMMAND STATISTICS *DWB C G MTS:TST.DWB 5.1T1 555 COMMAND_STATISTICS.?DWB.C.014 1 LINE 175 1 PAGE UM MTS LIFT JULY 23, 1983 11:11:36 *DWB 0 Command file invoked by CMDPIKUP to run the CMDTAPE program (531/15) which dumps a full log file to tape and updates the CMDFDIR directory to add a line of information for each file written. The CMDTAPE program also writes some command statistics into files; the current list of those files is contained within this file and in (531/15). The file CMDERRORS is required for logging. It would seem that Don could have thought of some name more original than his initials. Don's response: "Since no one would name an SVC after me, I was forced ... " 0 Referenced by comments of: 531/8 00531/015A COMMAND STATISTICS CMDTAPE SA G W030:CMDTAPE 5.1T1 556 COMMAND_STATISTICS.CMDTAP.SA.015 1 LINE 69 11 PAGE UM MTS LIFT JULY 23, 1983 11:11:37 0 Program to copy CMDSTAT log files to tape. Run by *DWB. NOTE: The files CMDDIR (531/11) and CMDFDIR (531/17) are referenced directly by 1 SUN SEP 08/96 15:24:55 Page 302 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 this program. Copies COPY:CMDAREADSECT (531/20). Assemble using COPY:MTS.MACROS (344/3) and COPY:MISC.MACROS(728/1). Uses SEG2:MONITORS (559/4). *********************************************************************** D5.0B version: Changed for bulletproofing. *********************************************************************** 0 Referenced by comments of: 531/11, 531/14, 531/16, 531/17, 531/18, 531/19, 531/34 00531/016A COMMAND STATISTICS CMDTAPE OC G SYS:CMDTAPE.O 5.1T1 557 COMMAND_STATISTICS.CMDTAP.OC.016 1 LINE 5144 3 PAGE UM MTS LIFT JULY 23, 1983 11:11:38 SYS.:CMDTAPE.O 0 Object of (531/15) and (722/1). 00531/017 COMMAND STATISTICS SYS:CMDFDIR D # SYS.:CMDFDIR D4T2 266 COMMAND_STATISTICS.SYS:CM.D.010 1 LINE ? 1 PAGE UM MTS LIFT JULY 28, 1977 02:18:13 SYS.:CMDFDIR@E 0 Data file, maintained by the CMDTAPE program (531/15), which has one line for each file on a command statistics tape. It has the earliest and latest times for that file, the file number, and the mount information. It is ordered by the earliest time. Some programs use this file to determine what tape to use, given a time range. 0 Referenced by comments of: 531/15 00531/018 COMMAND STATISTICS CMDERRORS D # SYS:CMDERRORS UM MTS LIFT SYS:CMDERRORS@E 0 Log file for CMDTAPE (531/15). 00531/019A COMMAND STATISTICS HASP RECEIPTS D # SYS:HASPRECEIPTS UM MTS LIFT SYS:HASPRECEIPTS@E 0 Log file, used by the CMDTAPE program (531/15), which logs the *PRINT* receipt numbers for the printed HASP logs produced by it. 0 Referenced by comments of: 787/6 00531/020A COMMAND STATISTICS CMDAREADSECT SA G CMDA COPY:CMDAREADSECT 5.1T1 558 COMMAND_STATISTICS.CMDARE.SA.020 1 LINE 80 6 PAGE UM MTS LIFT JULY 23, 1983 11:11:39 COPY:CMDAREADSECT 0 Copy section for DSECT which defines a CMDSTAT record. Updated using the (531/2) CDUPDATE deck. 0 Referenced by comments of: 45/1, 46/1, 531/1, 531/8, 531/15, 531/34, 531/36, 540/10, 577/1, 621/2, 621/4, 621/8, 621/12, 655/4, 707/1, 707/2, 718/1, 753/1, 753/3, 787/5, 787/13, 787/15, 787/19, 787/21 1 SUN SEP 08/96 15:24:55 Page 303 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00531/021A COMMAND STATISTICS CMDAREADSECT UC G MTSS:CMDSTAT/UPD(100000) 5.1T1 559 COMMAND_STATISTICS.CMDARE.UC.021 1 LINE ? 1 PAGE UM MTS LIFT JULY 23, 1983 11:11:39 0 ********************************************************************** D5.1 version: There have been no updates, so this file is empty on the D5.1 tapes. ********************************************************************** 00531/022 COMMAND STATISTICS CHECKTIME SA G S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CHECKT.SA.020(1) 271 5.0T2 271 COMMAND_STATISTICS.CHECKT.SA.020 1 LINE 80 5 PAGE UM MTS LIFT JULY 28, 1977 02:20:53 5.0T4 216 0 Program to check command statistics output times to see if something is missing or whatever. It prints the time/date of the first and last records and other records if the difference from the previous record is at least 1 second and is greater than 128 times the average of the last 8 differences, or if the difference is greater than 10 minutes. If the difference is negative, it does the same thing except that it uses 16 times the average of the last 8. If par=m is given, it goes through multiple files. If par=s is given, it prints every 128th record instead of making the above checks. 00531/023 COMMAND STATISTICS CHECKTIME OC G S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CHECKT.OC.021(1) 272 5.0T2 272 COMMAND_STATISTICS.CHECKT.OC.021 1 LINE 80 3 PAGE UM MTS LIFT JULY 28, 1977 02:20:56 5.0T4 217 00531/024 COMMAND STATISTICS CMDXTRACT SF S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.SF.022(1) 273 5.0T2 273 COMMAND_STATISTICS.CMDXTR.SF.022 1 LINE 71 1 PAGE UM MTS LIFT APR. 01, 1979 22:38:18 5.0T4 218 0 Program to extract command lines for a given userid and time range. Takes statistics input on SCARDS, prints lines (with time,date,ID PROJ NO,and task number) on 6. 5 (input) and SPRINT (output) should be attached to terminal. It will ask questions for its parameters. 0 Referenced by comments of: 531/26, 531/28 00531/025 COMMAND STATISTICS CMDXTRACT OC S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.OC.023(1) 274 5.0T2 274 COMMAND_STATISTICS.CMDXTR.OC.023 1 LINE 914 2 PAGE UM MTS LIFT APR. 01, 1979 22:38:19 5.0T4 219 00531/026 COMMAND STATISTICS CMDXTRACT3 SF S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.SF.024(1) 275 5.0T2 275 COMMAND_STATISTICS.CMDXTR.SF.024 1 LINE 65 1 PAGE UM MTS LIFT APR. 01, 1979 22:38:19 5.0T4 220 0 Program to extract HASP log items and other things. Asks for a record type and a "thing", e.g. an S8 number, to search for. Run it like (531/24). 00531/027 COMMAND STATISTICS CMDXTRACT3 OC S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.OC.025(1) 276 5.0T2 276 COMMAND_STATISTICS.CMDXTR.OC.025 1 LINE 778 2 PAGE UM MTS LIFT APR. 01, 1979 22:38:20 5.0T4 221 1 SUN SEP 08/96 15:24:55 Page 304 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00531/028 COMMAND STATISTICS CMDXTRACT4 SF S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.SF.026(1) 277 5.0T2 277 COMMAND_STATISTICS.CMDXTR.SF.026 1 LINE 71 2 PAGE UM MTS LIFT APR. 01, 1979 22:38:21 5.0T4 222 0 Extracts types 1 through 4 for a given time interval and optionally for a given userid. Run like (531/24). 00531/029 COMMAND STATISTICS CMDXTRACT4 OC S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDXTR.OC.027(1) 278 5.0T2 278 COMMAND_STATISTICS.CMDXTR.OC.027 1 LINE 954 2 PAGE UM MTS LIFT APR. 01, 1979 22:38:21 5.0T4 223 00531/030 COMMAND STATISTICS PROCESSING SF S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.PROCES.SF.028(1) 279 5.0T2 279 COMMAND_STATISTICS.PROCES.SF.028 1 LINE 75 9 PAGE UM MTS LIFT APR. 01, 1979 22:38:22 5.0T4 224 0 Program to read and generate various statistics on command data (usage of various commands for various categories of users, average length of commands and command names,usage of abbreviations,...) SCARDS-data in 6 -print out 5 -prompt input SPRINT-prompt output (asks for number of files to process) 0 Referenced by comments of: 531/32 00531/031 COMMAND STATISTICS PROCESSING OC S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.PROCES.OC.029(1) 280 5.0T2 280 COMMAND_STATISTICS.PROCES.OC.029 1 LINE 20186 11 PAGE UM MTS LIFT APR. 01, 1979 22:38:23 5.0T4 225 00531/032 COMMAND STATISTICS PROCESSING SF DWB:CMDPROC2(1,999) 5.0T2 281 COMMAND_STATISTICS.PROCES.SF.030 1 LINE 106 9 PAGE UM MTS LIFT JULY 03, 1981 15:07:05 5.0T4 226 0 This is a modified version of (531/30), modified to accumulate set options by CLD and to allow checkpointing and restoring of data with removal of some other stuff. 00531/033 COMMAND STATISTICS PROCESSING OC DWB:CMDPROC2(1000) 5.0T2 282 COMMAND_STATISTICS.PROCES.OC.031 1 LINE 20398 18 PAGE UM MTS LIFT JULY 03, 1981 15:07:11 5.0T4 227 00531/034 COMMAND STATISTICS SELECTCMD SA G SELC MTS:SELECTCMD(1,999) 5.0T2 283 COMMAND_STATISTICS.SELECT.SA.033 1 LINE 80 6 PAGE UM MTS LIFT JULY 03, 1981 15:07:16 5.0T4 228 MTS.:SELECTCMD 0 Program to retrieve data from CMDSTAT tapes using directory built by CMDTAPE (531/15). Calls READBFR routine (709). Copies COPY:CMDAREADSECT (531/20). 0 Referenced by comments of: 709/1 1 SUN SEP 08/96 15:24:55 Page 305 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00531/035 COMMAND STATISTICS SELECTCMD OC G MTS:SELECTCMD(1000) 5.0T2 284 COMMAND_STATISTICS.SELECT.OC.034 1 LINE 1450 3 PAGE UM MTS LIFT JULY 03, 1981 15:07:17 5.0T4 229 00531/036 COMMAND STATISTICS CMDUTIL SA G S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDUTI.SA.035(1) 285 5.0T2 285 COMMAND_STATISTICS.CMDUTI.SA.035 1 LINE 80 9 PAGE UM MTS LIFT APR. 05, 1980 18:06:37 5.0T4 230 0 Program to print or copy (or both) command statistics records based on record types. This program replaces and extends CMDAREAPRINT. If no parameter is given, it will prompt for PRINT|COPY|BOTH and for the record types. Currently, records which are not command statistics (i.e. not types 1, 2, 3, or 5) are just printed as bcd. This is fine for the HASP and console logs, but not for others. Routines to format other record types for printing can be included when written. If PAR=COUNT is given, then it will neither copy nor print, but instead simply report the number of records of each type found. It reads CMDSTAT data from SCARDS and prints output on SPRINT. If the COPY function is specified, then record type n is written on MTS I/O unit n. Copies COPY:CMDAREADSECT (531/20). 00531/037 COMMAND STATISTICS CMDUTIL OC G S1559 5.0T2 VLO FSNAME=COMMAND_STATISTICS.CMDUTI.OC.036(1) 286 5.0T2 286 COMMAND_STATISTICS.CMDUTI.OC.036 1 LINE 80 4 PAGE UM MTS LIFT APR. 05, 1980 18:06:40 5.0T4 231 00531/038 COMMAND STATISTICS CARE & FEEDING WF # (OBSOLETED BY THE OPER. MAN. - COMP. 592) 5.0T2 289 COMMAND_STATISTICS.CARE_&.WF.039 1 LINE 112 3 PAGE UM MTS LIFT JULY 03, 1981 15:14:59 5.0T4 234 0 Writeup describing normal behavior of command statistics pickup and what to do when abnormalities occur. See the most recent version of the Operator's Manual (592). 0 Referenced by comments of: 531/8 00532/001 *PLOTSEE SA G GRAF:PLOTSEE.S 5.0T2 290 PLOTSEE..SA.001 1 LINE 95 16 PAGE UM WHIPPLE JULY 03, 1981 15:14:59 5.0T4 235 0 PLOT PREVIEWING PROGRAM. USER OF ANY *IG-SUPPORTED DISPLAY CAN VIEW PDS PLOT FILES PRODUCED VIA *PLOTSYS. HAS "WINDOWING" FACILITY. USES PLOT SYSTEM ROUTINE PSYM (615/5) ASSEMBLED WITH THE &WHAT SETC SYMBOL SET TO 'IG'. 00532/002 *PLOTSEE OE G *PLOTSEE 5.0T2 291 PLOTSEE..OE.002 1 LINE 7512 10 PAGE UM WHIPPLE JULY 03, 1981 15:15:10 5.0T4 236 *PLOTSEE 0 CONTAINS A "$CONTINUE WITH *IG" LINE. 00533/001 *FRISK SA # (OBSOLETE) D4T2 284 FRISK.MAIN.SA.001 1 LINE 72 44 PAGE UBC JULY 18, 1977 15:53:27 0 Obsoleted by *FTNTIDY (727). 0 Referenced by comments of: 727/1 1 SUN SEP 08/96 15:24:55 Page 306 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00534/001 TMTS FAKE JOB-PGM SA G MTS:TMTSFAKE(1,999) 5.0T2 292 TMTS.FAKE_JOB-PGM.SA.001 1 LINE 59 1 PAGE UM MTA JULY 03, 1981 15:15:11 5.0T4 237 MTS.:TMTSFAKE 0 Dummy job program pointed to by TMTS job list entry, part of JOBLIST (003). 00534/002 TMTS FAKE JOB-PGM OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00534/003A TMTS LOADMTS SA G TMTS:LOADMTS(2000) 5.1T1 560 TMTS.LOADMTS.SA.003 1 LINE 72 10 PAGE UM MTS STERKEN JULY 23, 1983 11:11:39 TMTS:LOADMTS 0 Program to load a test version of MTS and friends into shared VM and plant the entry point in the TMTS job list entry. I/O unit usage: GUSER - for user input SERCOM - for prompting SPRINT - map, messages, and everything written on SERCOM Two parameters may be given: PAR=TEST (the default) means load the test system into private VM and don't change the entry point in the TMTS job list, PAR=NOTEST means load the test system into shared VM and change the TMTS job list entry point. The program finds the first unused address in shared VM using ENDSEG2 and asks if it is ok to start loading there. Reply "OK" or with a new address in shared VM. The program prompts for the name of a file to load from, which should contain those parts of the system to be tested, but must contain at least the following: MTS, MTS SUBRS (GETSPACE/FREESPAC, GUINFO/CUINFO, PLIMIT, LLXU, TIMER, CMDS, RSF, GATE, USUB, FSUB, DSRS, DSRI), COST, CFDUB, SYSDEFS, GETRATES, RATEVEC, RATENBR, DYSSUB, CHARGE, STDDMP, MSG, and ENDSEG2. GATE should be assembled with &TMTS set to 1. Other components may also be included, but neither VOLGET (482/4) nor TABLRTN (482/34) should be included. Copies *CNFGINFODSECT (654) and *GDINFOCSECT (594). 00534/004A TMTS LOADMTS OC G TMTS:LOADMTS(1,1999) 5.1T1 561 TMTS.LOADMTS.OC.004 1 LINE 80 5 PAGE UM MTA JULY 23, 1983 11:11:40 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3). 00534/005A TMTS TMTSLIB OL O TMTS:TMTSLIB 5.1T1 562 TMTS.TMTSLIB.OL.005 1 LINE 32767 148 PAGE UM MTS JULY 23, 1983 11:11:41 TMTS:TMTSLIB 0 This is a special (and not current) version of *LIBRARY which includes additional subroutines which normally are in shared VM and not part of *LIBRARY. The test system should reference this file and not *LIBRARY. The following command will cause this to be done: 1 SUN SEP 08/96 15:24:55 Page 307 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 $SET LIBSRCH=TMTS:TMTSLIB *LIBRARY=OFF 0 Referenced by comments of: 534/6 00534/006A TMTS POSTIPL C G TMTS:POSTIPL 5.1T1 563 TMTS.POSTIPL.C.006 1 LINE 97 1 PAGE UM MTS JULY 23, 1983 11:11:45 TMTS:POSTIPL 0 Lines 1 to 9 of this file contain commands to run PISTLE to load SEG2:TIME(360) into shared VM and define its symbols in the TMTS LCSYMBOL. This file also contains the source, at line 10, and object, at line 1000, for a small FORTRAN/program which calls the TIME/subroutine with PROT=OFF to cause it to initialize itself. It also contains a $CONTINUE WITH TMTS:TMTSLIB (534/5) record. The procedure is to first load TMTS, start a TMTS task, SIGNON, and $SOURCE to this command file. 00535/001A CLS INTERFACE CLS DRIVER PGM SA O DRIV W237:MTSII.S 5.1T1 564 CLS_INTERFACE.CLS_DRIVER.SA.001 1 LINE 80 39 PAGE UM VALERIO JULY 23, 1983 11:11:46 0 Program to fake an MTS/CLS interface for debugging a new CLS. Since it executes as a normal program, SDS can be used in the debugging. Assemble using COPY:MTS.MACROS (344/3). ********************************************************************* D5.1 version: More reliable version. ********************************************************************* 00535/002A CLS INTERFACE CLS DRIVER PGM OC O W237:MTSII.O 5.1T1 565 CLS_INTERFACE.CLS_DRIVER.OC.002 1 LINE 80 14 PAGE UM VALERIO JULY 23, 1983 11:11:48 00535/003A CLS INTERFACE GOM T/V DSECT SG G COPY:CLSTV.SG 5.1T1 566 CLS_INTERFACE.GOM_T/V_DSE.SG.003 1 LINE 69 3 PAGE UM MTS STERKEN JULY 23, 1983 11:11:48 COPY:CLSTV.SG 0 THIS IS THE GOM EQUIVALENT OF THE CLSTV MACRO IN MTS.MACROS (344/3). 00536/001 *BRAILLE # (OBSOLETE) D3T4 199 BRAILLE..SA.1 1 LINE 73 21 PAGE UM JULY 30, 1973 03:34.19 00538/001 *COBOLU EXECUTOR SA G COBU MTA:COBOLU(1,999) 5.0T2 299 COBOLU.EXECUTOR.SA.001 1 LINE 80 4 PAGE UM YOUNG JULY 03, 1981 15:15:27 5.0T4 244 0 THIS IS THE COBOL EXECUTOR (ANALOGOUS TO *FTN), I.E. IT IS THE COMPILER INTERFACE PROGRAM. COPIES FAKEOS.GBLS (545/20). ASSEMBLE USING *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 308 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00538/002 *COBOLU EXECUTOR OE G *COBOLU 5.0T2 300 COBOLU.EXECUTOR.OE.002 1 LINE 746 1 PAGE UM YOUNG JULY 03, 1981 15:15:28 5.0T4 245 *COBOLU 00538/003 *COBOLU BLDLIN D MTA:COBOL.BLDLIN 5.0T2 301 COBOLU.BLDLIN.D.003 1 LINE 44 1 PAGE UM YOUNG JULY 03, 1981 15:15:29 5.0T4 246 0 SCARDS INPUT TO CREBLDL (545/43) TO BUILD (538/4). 00538/004 *COBOLU BLDL D ETC:COBOL.BLDL 5.0T2 302 COBOLU.BLDL.D.004 1 SEQ 238 1 PAGE UM YOUNG JULY 03, 1981 15:15:30 5.0T4 247 ETC.:COBOL.BLDL 0 Referenced by comments of: 538/3 00538/005 *COBOLU IKFCBL00 OE O ETC:IKFCBL00 5.0T2 303 COBOLU.IKFCBL00.OE.005 1 SEQ 1024 4 PAGE UM YOUNG JULY 03, 1981 15:15:31 5.0T4 248 ETC.:IKFCBL00 0 COMPONENTS (538/5) THROUGH (538/16) ARE THE UNMODIFIED OS/360 OBJECT FOR THE ANSI COBOL COMPILER RELEASE 21.6, VERSION 2. 0 Referenced by comments of: 538/5 00538/006 *COBOLU IKFCBL01 OE O ETC:IKFCBL01 5.0T2 304 COBOLU.IKFCBL01.OE.006 1 SEQ 6144 5 PAGE UM YOUNG JULY 03, 1981 15:15:31 5.0T4 249 ETC.:IKFCBL01 0 OBJECT HAS REP CARDS TO CHANGE DEFAULT PAR FIELD, AMONG OTHER THINGS. 00538/007 *COBOLU IKFCBL1B OE O ETC:IKFCBL1B 5.0T2 305 COBOLU.IKFCBL1B.OE.007 1 SEQ 1024 7 PAGE UM YOUNG JULY 03, 1981 15:15:32 5.0T4 250 ETC.:IKFCBL1B 00538/008 *COBOLU IKFCBL10 OE O ETC:IKFCBL10 5.0T2 306 COBOLU.IKFCBL10.OE.008 1 SEQ 1024 12 PAGE UM YOUNG JULY 03, 1981 15:15:33 5.0T4 251 ETC.:IKFCBL10 00538/009 *COBOLU IKFCBL20 OE O ETC:IKFCBL20 5.0T2 307 COBOLU.IKFCBL20.OE.009 1 SEQ 1024 13 PAGE UM YOUNG JULY 03, 1981 15:15:34 5.0T4 252 ETC.:IKFCBL20 00538/010 *COBOLU IKFCBL30 OE O ETC:IKFCBL30 5.0T2 308 COBOLU.IKFCBL30.OE.010 1 SEQ 1024 4 PAGE UM YOUNG JULY 03, 1981 15:15:35 5.0T4 253 ETC.:IKFCBL30 00538/011 *COBOLU IKFCBL40 OE O ETC:IKFCBL40 5.0T2 309 COBOLU.IKFCBL40.OE.011 1 SEQ 1024 11 PAGE UM YOUNG JULY 03, 1981 15:15:36 5.0T4 254 ETC.:IKFCBL40 1 SUN SEP 08/96 15:24:55 Page 309 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00538/012 *COBOLU IKFCBL50 OE O ETC:IKFCBL50 5.0T2 310 COBOLU.IKFCBL50.OE.012 1 SEQ 1024 9 PAGE UM YOUNG JULY 03, 1981 15:15:37 5.0T4 255 ETC.:IKFCBL50 00538/013 *COBOLU IKFCBL51 OE O ETC:IKFCBL51 5.0T2 311 COBOLU.IKFCBL51.OE.013 1 SEQ 1024 10 PAGE UM YOUNG JULY 03, 1981 15:15:37 5.0T4 256 ETC.:IKFCBL51 00538/014 *COBOLU IKFCBL6A OE O ETC:IKFCBL6A 5.0T2 312 COBOLU.IKFCBL6A.OE.014 1 SEQ 1024 1 PAGE UM YOUNG JULY 03, 1981 15:15:38 5.0T4 257 ETC.:IKFCBL6A 00538/015 *COBOLU IKFCBL60 OE O ETC:IKFCBL60 5.0T2 313 COBOLU.IKFCBL60.OE.015 1 SEQ 1024 8 PAGE UM YOUNG JULY 03, 1981 15:15:39 5.0T4 258 ETC.:IKFCBL60 00538/016 *COBOLU IKFCBL70 OE O ETC:IKFCBL70 5.0T2 314 COBOLU.IKFCBL70.OE.016 1 SEQ 1024 13 PAGE UM YOUNG JULY 03, 1981 15:15:40 5.0T4 259 ETC.:IKFCBL70 0 Referenced by comments of: 538/5 00538/017 *COBOLU *COBLIB OL O *COBLIB 5.0T2 315 COBOLU.*COBLIB.OL.017 1 SEQ 1368 9 PAGE UM YOUNG JULY 03, 1981 15:15:41 5.0T4 260 *COBLIB 0 OBJECT LIBRARY FOR OS/360 RELEASE 21.6 COBOL LIBRARY. NOTE: *GENLIB COMPLAINS ABOUT THIS (MULTIPLY DEFINED SYMBOLS). IGNORE IT. 0 Referenced by comments of: 823/78 00538/018 *COBOLU TEST PGM #1 SC MTA:COBTEST 5.0T2 316 COBOLU.TEST_PGM_#1.SC.018 1 LINE 67 1 PAGE UM YOUNG JULY 03, 1981 15:15:42 5.0T4 261 0 TEST PROGRAM. 00538/019 *COBOLU TEST PGM #2 SC MTA:COBTEST2 5.0T2 317 COBOLU.TEST_PGM_#2.SC.019 1 LINE 73 4 PAGE UM YOUNG JULY 03, 1981 15:15:42 5.0T4 262 0 ANOTHER TEST PROGRAM. 00538/020 *COBOLU TEST PGM #3 SC MTA:COBTEST3 5.0T2 318 COBOLU.TEST_PGM_#3.SC.020 1 LINE 59 1 PAGE UM YOUNG JULY 03, 1981 15:15:43 5.0T4 263 0 TESTS THE SORT VERB. 00539/001 TIMNTRP D5.0 MASTER SA G S1561 5.0T4 VLO FSNAME=TIMNTRP.D5.0_MASTER.SA.001(1) 336 5.0T4 336 TIMNTRP.D5.0_MASTER.SA.001 1 LINE 80 26 PAGE UM MTS HELFFRICH AUG. 09, 1981 23:05:30 5.0T10 240 0 MTS timer interrupt routines (user callable): SETIME, RSTIME, GETIME, and TIMNTRP. 1 SUN SEP 08/96 15:24:55 Page 310 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM (653/1). Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). 0 Referenced by comments of: 42/2 00539/002A TIMNTRP UPDATE UC G MTSS:TIMT/UPD 5.1T1 567 TIMNTRP.UPDATE.UC.002 1 LINE 84 9 PAGE UM MTS HELFFRICH JULY 23, 1983 11:11:49 0 *CDUPDATE input to produce current source. 00539/003A TIMNTRP OC G # (PART OF RESIDENT SYSTEM) UM MTS HELFFRICH 0 Object part of Resident System (468). 00539/004A TIMNTRP L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=TIMT.LIST 5.1T1 568 TIMNTRP..L.004 1 LINE 133 79 PAGE UM MTS HELFFRICH JULY 23, 1983 11:12:13 00539/005 TIMNTRP TEST PROG #1 SA O S1559 5.0T2 VLO FSNAME=TIMNTRP.TEST_PROGRAM.SA.005(1) 319 5.0T2 319 TIMNTRP.TEST_PROGRAM.SA.005 1 LINE 80 6 PAGE UM MTS HELFFRICH JULY 28, 1977 02:37:30 5.0T4 264 0 DRIVER FOR TESTING TIMER ROUTINES. 00539/006 TIMNTRP TEST PROG #1 OC O S1559 5.0T2 VLO FSNAME=TIMNTRP.TEST_PROGRAM.OC.006(1) 320 5.0T2 320 TIMNTRP.TEST_PROGRAM.OC.006 1 LINE 80 3 PAGE UM MTS HELFFRICH JULY 28, 1977 02:37:32 5.0T4 265 0 Referenced by comments of: 539/9 00539/007C TIMNTRP TEST PROG #2 SA G W170:TESTTIMERDI(1000) 5.1T1 569 TIMNTRP.TEST_PROG_#2.SA.007 1 LINE 72 2 PAGE UM HELFFRICH JULY 23, 1983 11:12:14 0 Test program to check out timer interrupt processing in DSRI (639) during explicit concatenation processing. This program causes a snark if the user program gets dispatched in system mode, and otherwise runs to completion. 00539/008C TIMNTRP TEST PROG #2 OC G W170:TESTTIMERDI(1,999) 5.1T1 570 TIMNTRP.TEST_PROG_#2.OC.008 1 LINE 80 3 PAGE UM HELFFRICH JULY 23, 1983 11:12:14 00539/009 TIMNTRP TEST PGM INPUT D O S1559 5.0T2 VLO FSNAME=TIMNTRP.TEST_PGM_INPUT.D.007(1) 321 5.0T2 321 TIMNTRP.TEST_PGM_INPUT.D.007 1 LINE 75 1 PAGE UM MTS HELFFRICH MAY 06, 1981 02:53:31 5.0T4 266 0 Input to (539/6) to test real time waits, intended to test SDS's (600) handling of timer interrupts. 00539/010A TIMNTRP COMMENTS D G MTSS:TIMT/COM 5.1T1 571 TIMNTRP.COMMENTS.D.010 1 LINE 68 1 PAGE UM MTS BURLING JULY 23, 1983 11:12:14 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 1 SUN SEP 08/96 15:24:55 Page 311 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00540/001A SYSTEM WATCHERS PDPBUG SA G MTA:PDPBUG(1000) 5.1T1 572 SYSTEM_WATCHERS.PDPBUG.SA.001 1 LINE 68 4 PAGE UM MTA JULY 23, 1983 11:12:15 MTA.:PDPBUG 0 THIS COMPONENT CONSISTS OF PROGRAMS WHICH MONITOR THE ACTIVITY OF VARIOUS PARTS OF THE SYSTEM. PDPBUG IS A PROGRAM TO PRINT STATISTICS ABOUT SYSTEM PAGING. COMMENTS IN THE SOURCE CODE DESCRIBE THE OUTPUT. MUST BE RE-ASSEMBLED IF THE PDP IS RE-ASSEMBLED. THE ITEMS TO BE CHANGED ARE DOCUMENTED IN SOURCE COMMENTS. COPIES COPY:LLMPSEQU(100) (087), COPY:GLOBALS (1026/3), AND *CNFGINFODSECT (654). ASSEMBLE WITH COPY:SETPARM (653). 00540/002A SYSTEM WATCHERS PDPBUG OC G MTA:PDPBUG(1,999) 5.1T1 573 SYSTEM_WATCHERS.PDPBUG.OC.002 1 LINE 80 3 PAGE UM MTA JULY 23, 1983 11:12:15 00540/003A SYSTEM WATCHERS PRNTCNTS SA G MTA:PRNTCNTS(1000) 5.1T1 574 SYSTEM_WATCHERS.PRNTCNTS.SA.003 1 LINE 74 13 PAGE UM MTA JULY 23, 1983 11:12:16 MTA.:PRNTCNTS 0 PROGRAM TO PRINT ALL SORTS OF COUNTS AND TIMES FROM THE PDP (044) AND SUPERVISOR (045). IT MUST BE REASSEMBLED WHENEVER EITHER THE PDP OR UMMPS CHANGES BECAUSE OF THE MANY SYMBOLS OF THE FORM "DISPN EQU X" WHICH GIVE THE LOCATIONS OF THE COUNTS IN THE PDP AND SUPERVISOR. ASSEMBLE USING *SYSMAC. COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND COPY:PSA (162). 0 Referenced by comments of: 604/1, 1070/8 00540/004A SYSTEM WATCHERS PRNTCNTS OC G MTA:PRNTCNTS(1,999) 5.1T1 575 SYSTEM_WATCHERS.PRNTCNTS.OC.004 1 LINE 80 9 PAGE UM MTA JULY 23, 1983 11:12:17 00540/005 SYSTEM WATCHERS HOGS CMDS C *HGS 5.0T4 343 SYSTEM_WATCHERS.HOGS_CMDS.C.005 1 LINE 40 1 PAGE UM MTA AUG. 09, 1981 23:06:24 5.0T10 247 *HGS 0 COMMAND FILE USED BY THE OPERATORS TO RUN THE HOGS PROGRAM (540/6) TO FIND OUT WHICH JOBS ARE USING THE MOST CPU TIME, VM, AND DRUM READS. 00540/006 SYSTEM WATCHERS HOGS SA G MTA:HOGS(1000) 5.0T4 344 SYSTEM_WATCHERS.HOGS.SA.006 1 LINE 73 4 PAGE UM MTA AUG. 09, 1981 23:06:24 5.0T10 248 MTA.:HOGS 0 PROGRAM TO FIND THE JOBS WHICH ARE USING THE MOST CPU TIME, VM, AND DRUM READS. COPIES COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3). ASSEMBLE USING COPY:SETPARM (653). 0 Referenced by comments of: 540/5 00540/007 SYSTEM WATCHERS HOGS OC G MTA:HOGS(1,999) 5.0T4 345 SYSTEM_WATCHERS.HOGS.OC.007 1 LINE 80 3 PAGE UM MTA AUG. 09, 1981 23:06:26 5.0T10 249 1 SUN SEP 08/96 15:24:55 Page 312 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00540/008 SYSTEM WATCHERS LOADCLAS SA G MTS:LOADCLAS(1000) 5.0T4 346 SYSTEM_WATCHERS.LOADCLAS.SA.008 1 LINE 73 7 PAGE UM MTA AUG. 09, 1981 23:06:27 5.0T10 250 0 PROGRAM TO CALL TASKSTAT (647) FOR EVERY JOB IN THE SYSTEM EVERY 30 SECONDS AND SUMMARIZE THE RESULTS. COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087). ASSEMBLE USING COPY:MISC.MACROS (728). 0 Referenced by comments of: 400/1, 647/1 00540/009 SYSTEM WATCHERS LOADCLAS OC G MTS:LOADCLAS(1,999) 5.0T4 347 SYSTEM_WATCHERS.LOADCLAS.OC.009 1 LINE 80 5 PAGE UM MTA AUG. 09, 1981 23:06:31 5.0T10 251 MTS:LOADCLAS 00540/010A SYSTEM WATCHERS DBJP SA G MTS:DBJP(1000) 5.1T1 576 SYSTEM_WATCHERS.DBJP.SA.010 1 LINE 73 4 PAGE UM MTS OGDEN JULY 23, 1983 11:12:17 MTS.:DBJP 0 PROGRAM TO DISPLAY BIG JOB PARAMETERS (AND OTHER STUFF). EVERY 20 SECONDS IT PRINTS STATISTICS RELATING TO THE SYSTEM LOAD. IF SCARDS IS EXPLICITLY ASSIGNED, THEN TYPE 8 CMDSTAT RECORDS GENERATED BY SSRTN (413) ARE USED TO GENERATE THE STATISTICS. OTHERWISE, THE INCORE JOBSTA VECTOR (413/7) IS USED AS THE SOURCE OF INFORMATION. DBJP CAN ALSO BE USED TO TEST NEW VERSION OF BJPMOD (650) BY CONCATENATING DBJP TO THE NEW BJPMOD OBJECT (BJPMOD MUST PRECEDE DBJP). COPIES COPY:GLOBALS (1026/3), COPY:JOBSTA (413/9), COPY:BJPDSCT (650/3), COPY:CMDAREADSECT (531/20), *GDINFODSECT (594), AND *CNFGINFODSECT (654). 00540/011A SYSTEM WATCHERS DBJP OC G MTS:DBJP(1,999) 5.1T1 577 SYSTEM_WATCHERS.DBJP.OC.011 1 LINE 1866 4 PAGE UM MTS OGDEN JULY 23, 1983 11:12:18 00540/012 SYSTEM WATCHERS DPBJ SA G MTS:DPBJ(1000) 5.0T4 350 SYSTEM_WATCHERS.DPBJ.SA.012 1 LINE 73 3 PAGE UM MTA AUG. 09, 1981 23:06:38 5.0T10 254 MTS:DPBJ 0 EVERY 20 SECONDS, THIS PROGRAM PRINTS THE NUMBER OF JOBS, IN EACH OF 4 CATEGORIES, THAT HAVE USED ANY CPU TIME IN THE PREVIOUS 20 SECONDS. THE CATEGORIES ARE DETERMINED BY WHETHER THE JOB IS PAGING BOUND AND WHETHER IT IS OVER THE BIG JOB THRESHOLD, "BIGJTH". COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). 00540/013 SYSTEM WATCHERS DPBJ OC G MTS:DPBJ(1,999) 5.0T4 351 SYSTEM_WATCHERS.DPBJ.OC.013 1 LINE 1268 2 PAGE UM MTA AUG. 09, 1981 23:06:40 5.0T10 255 00540/014A SYSTEM WATCHERS DRUMSTAT SA O MTA:DRUMSTAT(1000) 5.1T1 578 SYSTEM_WATCHERS.DRUMSTAT.SA.014 1 LINE 72 3 PAGE UM MTA JULY 23, 1983 11:12:18 MTA.:DRUMSTAT 0 EVERY 30 SECONDS, THIS PROGRAM PRINTS DRUMIN, DRUMOUT, DISKIN, DISKOUT, LOOPS, NRP (NUMBER OF RELEASED PAGES), SKPREAD (NUMBER OF READS SKIPPED TO WAIT FOR MORE WORK), NCP (NUMBER OF CHANNEL PROGRAMS), NWPD (NUMBER OF WRITE PAGES DISCARDED, I.E. UNCHANGED), NGWP (NUMBER OF PAGES FROM GETWP), NOXACNT (NUMBER OF PAGES ON PIQ WITH NO EXTERNAL ADDRESS), PI/LOOP (PAGE INS PER LOOP), PI/CP, T/LOOP (TIME PER LOOP), T/PI, T/CP, AND %SS (PERCENT SUPERVISOR STATE) FOR THE PDP. 1 SUN SEP 08/96 15:24:55 Page 313 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00540/015A SYSTEM WATCHERS DRUMSTAT OC O MTA:DRUMSTAT(1,999) 5.1T1 579 SYSTEM_WATCHERS.DRUMSTAT.OC.015 1 LINE 80 2 PAGE UM MTA JULY 23, 1983 11:12:18 00540/016 SYSTEM WATCHERS GTUNIT MAIN SG G S1561 5.0T4 VLO FSNAME=SYSTEM_WATCHERS.GTUNIT_MA.SG.017(1) 355 5.0T4 355 SYSTEM_WATCHERS.GTUNIT_MA.SG.017 1 LINE 44 1 PAGE UM OGDEN NOV. 10, 1977 20:40:15 5.0T10 259 0 MAIN PROGRAM TO CALL THE GTUNIT SUBR (540/17) EVERY 20 SECONDS. CALLS THE PAR (687/1) AND ATRAP (689/1) SUBROUTINES. 0 Referenced by comments of: 540/18 00540/017 SYSTEM WATCHERS GTUNIT SUBR SA G S1561 5.0T4 VLO FSNAME=SYSTEM_WATCHERS.GTUNIT_SU.SA.018(1) 356 5.0T4 356 SYSTEM_WATCHERS.GTUNIT_SU.SA.018 1 LINE 80 4 PAGE UM OGDEN FEB. 03, 1978 15:16:59 5.0T10 260 0 SUBROUTINE TO COUNT THE NUMBER OF GTUNIT WAITS OUTSTANDING FOR EACH PUBLIC DISK VOLUME, AND PRINT THE NON-ZERO RESULTS ON SPRINT. CALLS TASKSTAT (647). COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). ASSEMBLE USING COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 540/16, 540/18, 647/1 00540/018 SYSTEM WATCHERS GTUNIT OE G FILE:GTUNIT 5.0T4 357 SYSTEM_WATCHERS.GTUNIT.OE.019 1 LINE 652 3 PAGE UM OGDEN AUG. 09, 1981 23:14:20 5.0T10 261 FILE:GTUNIT 0 OBJECT FOR (540/16) AND (540/17). 00540/019A SYSTEM WATCHERS TTPRINT SA G MTA:TTPRINT.S 5.1T1 580 SYSTEM_WATCHERS.TTPRINT.SA.019 1 LINE 71 3 PAGE UM MTA JULY 23, 1983 11:12:18 MTA.:TTPRINT.S 0 PROGRAM TO PRINT THE SUPERVISOR TRACE TABLE AT THE TIME IT IS RUN, I.E., FROM MEMORY. 00540/020A SYSTEM WATCHERS TTPRINT OE G MTA:TTPRINT 5.1T1 581 SYSTEM_WATCHERS.TTPRINT.OE.020 1 LINE 376 1 PAGE UM MTA JULY 23, 1983 11:12:18 MTA.:TTPRINT 0 Contains $CONTINUE WITH MTA:PRINTTRACE (337/1) and $CONTINUE WITH COPY:DEFS (579/10) record. 00540/021 SYSTEM WATCHERS UPTIME CMDS C *LRL 5.0T4 360 SYSTEM_WATCHERS.UPTIME_CM.C.022 1 LINE 8 1 PAGE UM MTA AUG. 09, 1981 23:14:25 5.0T10 264 *LRL 0 COMMAND FILE USED BY THE OPERATORS TO PRINT THE REASON FOR THE LAST SYSTEM RELOAD AND THE ELAPSED TIME SINCE THAT RELOAD. INVOKED BY ENTERING "MTS *LRL" ON THE OPERATOR'S CONSOLE. 0 Referenced by comments of: 540/22 1 SUN SEP 08/96 15:24:55 Page 314 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00540/022 SYSTEM WATCHERS UPTIME CMDS C SYS:LRL 5.0T4 361 SYSTEM_WATCHERS.UPTIME_CM.C.023 1 LINE 29 1 PAGE UM MTA AUG. 09, 1981 23:14:26 5.0T10 265 SYS.:LRL 0 COMMAND FILE SOURCED TO BY *LRL (540/21) TO GET THE REASON FOR THE LAST RELOAD AND RUN THE UPTIME PROGRAM (540/23). 00540/023 SYSTEM WATCHERS UPTIME PGM SA G MTA:UPTIME(1000) 5.0T4 362 SYSTEM_WATCHERS.UPTIME_PG.SA.024 1 LINE 72 1 PAGE UM MTA AUG. 09, 1981 23:14:27 5.0T10 266 0 Program to print the elapsed time since the last IPL. NOTE: This program only works on a 370, 470, or 580. 0 Referenced by comments of: 540/22, 713/1 00540/024 SYSTEM WATCHERS UPTIME PGM OC G UNSP:UPTIME 5.0T4 363 SYSTEM_WATCHERS.UPTIME_PG.OC.025 1 LINE 80 1 PAGE UM MTA AUG. 09, 1981 23:14:29 5.0T10 267 UNSP:UPTIME 0 Referenced by comments of: 713/1 00540/025 SYSTEM WATCHERS PWCT CMDS C *PWC 5.0T4 364 SYSTEM_WATCHERS.PWCT_CMDS.C.026 1 LINE 58 1 PAGE UM MTS OGDEN AUG. 09, 1981 23:14:30 5.0T10 268 *PWC 0 COMMAND FILE USED BY THE OPERATORS TO RUN THE PWCT PROGRAM (540/26) TO PRINT WAIT COUNTS FOR MTS JOBS. INVOKED BY ENTERING "MTS *PWC" ON THE OPERATOR'S CONSOLE. 00540/026A SYSTEM WATCHERS PWCT PGM SA G MTS:PWC(1000) 5.1T1 582 SYSTEM_WATCHERS.PWCT_PGM.SA.026 1 LINE 73 13 PAGE UBC HOGG OGDEN JULY 23, 1983 11:13:37 MTS.:PWC 0 PROGRAM TO PRINT WAIT COUNTS, I.E., COUNTS OF HOW MANY MTS TASKS ARE WAITING FOR WHAT. IT TAKES THREE OPTIONAL INTEGER NUMBERS IN THE PAR FIELD SEPARATED BY BLANKS: NUMBER OF SECONDS BETWEEN SAMPLES, NUMBER OF LINES OF OUTPUT BETWEEN HEADINGS, AND THE TOTAL NUMBER OF LINES OF OUTPUT BEFORE QUITTING. COPIES COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3). ASSEMBLE USING OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 540/25, 647/1 00540/027A SYSTEM WATCHERS PWCT PGM OC G MTS:PWC(1,999) 5.1T1 583 SYSTEM_WATCHERS.PWCT_PGM.OC.027 1 LINE 2880 4 PAGE UBC HOGG OGDEN JULY 23, 1983 11:13:38 00540/028C SYSTEM WATCHERS PRINTQLEN SA G MTS:PRINTQLEN(1000) 5.1T1 584 SYSTEM_WATCHERS.PRINTQLEN.SA.028 1 LINE 72 2 PAGE UM MTA JULY 23, 1983 11:13:38 MTS:PRINTQLEN 0 Program to print the lengths of the various CPU queues. 1 SUN SEP 08/96 15:24:55 Page 315 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00540/029C SYSTEM WATCHERS PRINTQLEN OC G MTS:PRINTQLEN(1,999) 5.1T1 585 SYSTEM_WATCHERS.PRINTQLEN.OC.029 1 LINE 80 2 PAGE UM MTA JULY 23, 1983 11:13:39 00541/001 *DECODE SA G S1559 5.0T2 VLO FSNAME=DECODE..SA.001(1) 322 5.0T2 322 DECODE..SA.001 1 LINE 80 4 PAGE UM MTA AUG. 01, 1973 22:56.50 5.0T4 267 0 PROGRAM TO PROVIDE HASP-TYPE DECOMPRESSION/DEBLOCKING FOR EXPERIMENTAL REMOTE BATCH USAGE. 0 Referenced by comments of: 796/1, 796/4 00541/002 *DECODE OC G *DECODE 5.0T2 323 DECODE..OC.002 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 15:19:09 5.0T4 268 *DECODE 00542/001 *DF # (NOT DISTRIBUTED) D3T4 222 UM AUG. 01, 1973 22:56.58 00543/001 *ENCODE SA G S1559 5.0T2 VLO FSNAME=ENCODE..SA.001(1) 324 5.0T2 324 ENCODE..SA.001 1 LINE 80 10 PAGE UM MTA AUG. 01, 1973 22:57.23 5.0T4 269 0 PROGRAM TO PROVIDE HASP-TYPE COMPRESSION/BLOCKING FOR EXPERIMENTAL REMOTE BATCH USAGE. 0 Referenced by comments of: 796/1 00543/002 *ENCODE OC G *ENCODE 5.0T2 325 ENCODE..OC.002 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 15:19:11 5.0T4 270 *ENCODE 00544/001 *ENDJUNK OC G *ENDJUNK 5.0T2 326 ENDJUNK..OC.001 1 LINE 24 1 PAGE UM MTA JULY 03, 1981 15:19:12 5.0T4 271 *ENDJUNK 0 CONTAINS THE TWO LOADER CARDS: LCS LCSYMBOL LDT 00545/001 *FAKEOS INSTALLATION WF S0989 UQV15 FSNAME=FAKEOS.INSTALLATION(1) 15 5.0T2 327 FAKEOS.INSTALLATION.WF.001 1 LINE 100 3 PAGE UM MTA FEB. 17, 1976 20:04:00 5.0T4 272 0 SOMEWHAT OUT-OF-DATE WRITEUP DESCRIBING THE ORGANIZATION AND INSTALLATION OF *FAKEOS. 0 Referenced by comments of: 458/1, 762/3, 793/1 00545/002 *FAKEOS WRITEUP WF S0989 UQV15 FSNAME=FAKEOS.WRITEUP(1) 14 5.0T2 328 FAKEOS.WRITEUP.WF.002 1 LINE 148 11 PAGE UM MTA FEB. 17, 1976 20:03:19 5.0T4 273 0 UQV USER-LEVEL WRITEUP DESCRIBING THE USAGE AND FEATURES OF *FAKEOS. UM USER-LEVEL DOCUMENTATION IS IN MTS VOLUME 2. 1 SUN SEP 08/96 15:24:55 Page 316 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00545/003 *FAKEOS MAIN D5 MASTER SA G S1561 5.0T4 VLO FSNAME=FAKEOS.MAIN_D5_MASTER.SA.003(1) 367 5.0T4 367 FAKEOS.MAIN_D5_MASTER.SA.003 1 LINE 80 244 PAGE UM MTA AUG. 09, 1981 23:15:15 5.0T10 271 0 MASTER SOURCE FOR THE FAKEOS MAIN PROGRAM. COPIES COPY:GLOBALDEFS (1026/1), FAKEOS.GBLS (545/20), COPY:GLOBALSETS (1026/2), COPY:LLMPSEQU (087), *LOADINFODSECT (001/4), *GDINFODSECT (594), AND *SENSEDSECT (3025). ASSEMBLE USING *SYSMAC (ON UNIT 2), *OSMAC (193) (ON UNIT 0), AND FOS.MACLIB (545/22). 0 Referenced by comments of: 545/22 00545/004 *FAKEOS PREFIX D5 MAST SA G S1561 5.0T4 VLO FSNAME=FAKEOS.PREFIX_D5_MAST.SA.004(1) 368 5.0T4 368 FAKEOS.PREFIX_D5_MAST.SA.004 1 LINE 80 56 PAGE UM MTA AUG. 09, 1981 23:15:56 5.0T10 272 0 MASTER SOURCE FOR FAKEOS PREFIX. COPIES FAKEOS.GBLS (545/20), *GDINFODSECT (594), AND *CNFGINFODSECT (654). ASSEMBLE USING *SYSMAC (ON UNIT 2), *OSMAC (193) (ON UNIT 0), AND FOS.MACLIB (545/22). 0 Referenced by comments of: 545/22 00545/005A *FAKEOS UPDATES UC G MTA:FOS.UPDATES 5.1T1 586 FAKEOS.UPDATES.UC.005 1 LINE 73 3 PAGE UM MTA JULY 23, 1983 11:13:39 0 Post D5.0 updates to FAKEOS prefix, line 1, and main program, line 10000. Required to make FAKEOS work with a version of MTS that includes SVCTRP. 00545/006C *FAKEOS ASSEMBLY CMDS C MTA:FOS.ASM 5.1T1 587 FAKEOS.ASSEMBLY_CMDS.C.006 1 LINE 90 1 PAGE UM MTA JULY 23, 1983 11:13:39 0 COMMANDS TO ASSEMBLE FAKEOS PREFIX, AT LINE 1, AND MAIN PROGRAM, AT LINE 1000. 00545/007 *FAKEOS OS LOWCORE SA S1559 5.0T2 VLO FSNAME=FAKEOS.OS_LOWCORE.SA.008(1) 331 5.0T2 331 FAKEOS.OS_LOWCORE.SA.008 1 LINE 42 4 PAGE UM MTA JULY 03, 1981 15:19:56 5.0T4 276 0 CONTENTS OF FIRST HALF-PAGE OF OS. 00545/008 *FAKEOS BDAM SIMULATOR SA S1559 5.0T2 VLO FSNAME=FAKEOS.BDAM_SIMULATOR.SA.009(1) 332 5.0T2 332 FAKEOS.BDAM_SIMULATOR.SA.009 1 LINE 87 69 PAGE UM MTA MAR. 07, 1980 23:48:27 5.0T4 277 0 SOURCE FOR OS BDAM SIMULATOR. COPIES FAKEOS.GBLS (545/20). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22). 00545/009 *FAKEOS BDAM SIMULATOR OE ETC:BDAM 5.0T2 333 FAKEOS.BDAM_SIMULATOR.OE.010 1 SEQ 15140 4 PAGE UM MTA JULY 03, 1981 15:21:13 5.0T4 278 ETC.:BDAM 1 SUN SEP 08/96 15:24:55 Page 317 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00545/010 *FAKEOS DDNAME SCANNER SA S1559 5.0T2 VLO FSNAME=FAKEOS.DDNAME_SCANNER.SA.011(1) 334 5.0T2 334 FAKEOS.DDNAME_SCANNER.SA.011 1 LINE 80 20 PAGE UM MTA MAY 25, 1978 15:00:44 5.0T4 279 0 SOURCE FOR DDNAME SCANNER. COPIES FAKEOS.GBLS (545/20) and *GDINFODSECT (594). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22). 00545/011 *FAKEOS DDNAME SCANNER OC # (PART OF *FAKEOS) D3.2T1 455 FAKEOS.VOSDDEF.OE.18 1 SEQ 2586 1 PAGE UM MTA MAR. 21, 1975 01:50:37 0 Part of *FAKEOS (545/45) 00545/012 *FAKEOS EXCP SIMULATOR SA MTA:FOS.EXCP 5.0T2 335 FAKEOS.EXCP_SIMULATOR.SA.013 1 LINE 72 8 PAGE UM MTA JULY 03, 1981 15:21:53 5.0T4 280 0 SOURCE FOR NON-OLTEP EXCP SIMULATOR. ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22). 00545/013 *FAKEOS EXCP SIMULATOR OE ETC:FAKEOS.EXCP 5.0T2 336 FAKEOS.EXCP_SIMULATOR.OE.014 1 SEQ 2492 1 PAGE UM MTA JULY 03, 1981 15:21:54 5.0T4 281 ETC.:FAKEOS.EXCP 00545/014A *FAKEOS OLTEP EXCP SIM SA MTA:FOS.OLTSEXCP 5.1T1 588 FAKEOS.OLTEP_EXCP_SIM.SA.014 1 LINE 96 5 PAGE UM MTA JULY 23, 1983 11:13:40 0 SOURCE FOR OLTEP EXCP SIMULATOR. COPIES FAKEOS.GBLS (545/20). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22). 0 Referenced by comments of: 545/16, 545/22 00545/015A *FAKEOS OS SVC 59 SIML SA MTA:FOS.SVC59 5.1T1 589 FAKEOS.OS_SVC_59_SIML.SA.015 1 LINE 86 6 PAGE UM MTA JULY 23, 1983 11:13:41 0 SOURCE FOR OS SVC 59 SIMULATOR. COPIES FAKEOS.GLBS (545/20), COPY:GLOBALS (1026/3), *CNFGINFODSECT (654), AND COPY:LLMPSEQU (087). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22). 0 Referenced by comments of: 545/16, 545/22 00545/016A *FAKEOS FOS.OLTS OE ETC:FOS.OLTS 5.1T1 590 FAKEOS.FOS.OLTS.OE.016 1 LINE 1694 2 PAGE UM MTA JULY 23, 1983 11:13:41 ETC.:FOS.OLTS 0 OBJECT FROM (545/14) AND (545/15). CONTAINS A $CONTINUE WITH *FAKEOS RECORD. MUST BE CONCATENATED WITH *FAKEOS (545/45) WHEN RUNNING OLTEP. 00545/017A *FAKEOS IERRCO00 SA MTA:FOS.IERRCO00(1,9999) 5.1T1 591 FAKEOS.IERRCO00.SA.017 1 LINE 78 19 PAGE UM MTA JULY 23, 1983 11:13:41 0 Source for the VSS/FAKEOS SORT interface subroutine. ******************************************************************** 1 SUN SEP 08/96 15:24:55 Page 318 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 D5.1 version: Now allows calls that don't include the E15 and E35 exits, and hence which read and/or write data sets. This version currently works only in VSS, not FAKEOS. This subroutine was inadvertantly put on the D5.1 tapes twice. It is also (1078/62) and (1078/63). ********************************************************************** 0 Referenced by comments of: 545/18, 1078/62 00545/018C *FAKEOS VSS SORT OC MTA:VSS.SORT 5.1T1 592 FAKEOS.VSS_SORT.OC.018 1 LINE 72 9 PAGE UM MTA JULY 23, 1983 11:13:43 0 Object for IERRCO00 (545/17) and the SORT subroutine with the appropriate MVS linkedit statements to make a load module for IERRCO00 usable in VSS. 00545/019C *FAKEOS VSS SORT C MTA:FOS.IERRCO00(-10,.999) 5.1T1 593 FAKEOS.VSS_SORT.C.019 1 LINE 138 1 PAGE UM MTA JULY 23, 1983 11:13:43 0 Commands to assemble (line 0) and linkedit (line -10) IERRCO00 for use with VSS. 0 Referenced by comments of: 1078/62 00545/020 *FAKEOS FAKEOS.GBLS SA MTA:FAKEOS.GBLS 5.0T2 341 FAKEOS.FAKEOS.GBLS.SA.019 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 15:22:00 5.0T4 286 0 GLOBAL PARAMETERS COPY SECTION. EACH INSTALLATION SHOULD RE-DEFINE &OWNER, &COBUID, &MPSID, &FAKEID, &FAKMAIN, &ICENAME, AND &ETCID. 0 Referenced by comments of: 538/1, 545/3, 545/4, 545/8, 545/10, 545/14, 545/15, 545/39, 737/3 00545/021 *FAKEOS FOS.LPA SA S1559 5.0T2 VLO FSNAME=FAKEOS.FOS.LPA.SA.020(1) 342 5.0T2 342 FAKEOS.FOS.LPA.SA.020 1 LINE 55 1 PAGE UM MTA JULY 03, 1981 15:22:01 5.0T4 287 0 SYMBOL TABLE FOR MODULES MOVED FROM FOS.IGG TO *FAKEOS. OBJECT IN *FAKEOS (545/45). 00545/022A *FAKEOS FOS.MACLIB SM MTA:FOS.MACLIB 5.1T1 594 FAKEOS.FOS.MACLIB.SM.022 1 LINE 80 26 PAGE UM MTA JULY 23, 1983 11:13:43 0 FAKEOS MACRO LIBRARY. *************************************************************************** D5.0B version: Since the main DSECT changed, everything that uses it must be reassembled (at least (545/3), (545/4), (545/14), (545/15). *************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 319 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 545/3, 545/4, 545/8, 545/10, 545/12, 545/14, 545/15, 545/39 00545/023A *FAKEOS IERRCO00 TEST SA G MTA:FOS.IERRTEST(1,999) 5.1T1 595 FAKEOS.IERRCO00_TEST.SA.023 1 LINE 72 3 PAGE UM MTA JULY 23, 1983 11:13:45 0 TEST PROGRAM FOR IERRCO00. RUNS WITHOUT FAKEOS. ALL THE SORT TEST DATA IS INTERNAL TO IT. SETS THE "DIAG" PARAMETER TO IERRCO00 SO A LOT OF SORT TRACE OUTPUT IS PRODUCED. CHECKS THE RESULT OF THE SORT AND PRINTS ERROR COMMENTS IF BAD. 00545/024A *FAKEOS IERRCO00 TEST OC G MTA:FOS.IERRTEST(1000) 5.1T1 596 FAKEOS.IERRCO00_TEST.OC.024 1 LINE 80 4 PAGE UM MTA JULY 23, 1983 11:13:45 00545/025 *FAKEOS BSAM TEST SA MTA:FOS.TESTBSAM(1,999) 5.0T2 346 FAKEOS.BSAM_TEST.SA.024 1 LINE 65 1 PAGE UM MTA JULY 03, 1981 15:22:07 5.0T4 291 0 PROGRAM TO TEST BSAM BY COPYING FROM INPUT TO SYSPRINT USING BSAM WITH DOUBLE BUFFERING ON BOTH. ASSEMBLE USING *OSMAC (193) (ON UNIT 2) AND *SYSMAC (ON UNIT 0). 00545/026 *FAKEOS BSAM TEST OC MTA:FOS.TESTBSAM(1000) 5.0T2 347 FAKEOS.BSAM_TEST.OC.025 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 15:22:08 5.0T4 292 00545/027 *FAKEOS QSAM TEST SA MTA:FOS.TESTQSAM(1,999) 5.0T2 348 FAKEOS.QSAM_TEST.SA.026 1 LINE 69 1 PAGE UM MTA JULY 03, 1981 15:22:09 5.0T4 293 0 PROGRAM TO TEST QSAM BY COPYING INPUT TO OUTPUT USING QSAM. ECHOS EACH LINE ON MTS UNIT 1. GENERAL ENOUGH TO ALLOW ANY MODE OF GET AND PUT (MOVE, LOCATE, DATA) AND ANY RECORD FORMAT (NO MEAN TRICK IN OS!). ASSEMBLE USING *SYSMAC (ON UNIT 2) AND *OSMAC (193) (ON UNIT 0) (SIC). 00545/028 *FAKEOS QSAM TEST OC MTA:FOS.TESTQSAM(1000) 5.0T2 349 FAKEOS.QSAM_TEST.OC.027 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 15:22:10 5.0T4 294 00545/029 *FAKEOS UPDATE TEST SA MTA:FOS.TSTUPDAT(1,999) 5.0T2 350 FAKEOS.UPDATE_TEST.SA.028 1 LINE 66 1 PAGE UM MTA JULY 03, 1981 15:22:11 5.0T4 295 0 TEST PROGRAM WHICH READS INPUT USING BSAM WITH DOUBLE BUFFERING AND REWRITES ANY LINE BEGINNING WITH "A" AFTER CHANGING THE "A" TO "B". ALSO ECHOS LINES READ ON SYSPRINT USING QSAM. ASSEMBLE WITH *SYSMAC (ON UNIT 0) AND *OSMAC (193) (ON UNIT 2). 00545/030 *FAKEOS UPDATE TEST OC MTA:FOS.TSTUPDAT(1000) 5.0T2 351 FAKEOS.UPDATE_TEST.OC.029 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 15:22:12 5.0T4 296 1 SUN SEP 08/96 15:24:55 Page 320 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00545/031 *FAKEOS TIMER TEST SA MTA:FOS.TESTTIME(1,999) 5.0T2 352 FAKEOS.TIMER_TEST.SA.030 1 LINE 69 1 PAGE UM MTA JULY 03, 1981 15:22:12 5.0T4 297 0 PROGRAM WHICH TESTS STIMER AND TTIMER IN OS. PRINTS MESSAGES TELLING WHAT IT'S DOING. ASSEMBLE USING *SYSMAC (ON UNIT 0) AND *OSMAC (193) (ON UNIT 2). IF ASSEMBLED WITH *SYSMAC ONLY, IT WILL TEST STIMER AND TTIMER IN MTS. 0 Referenced by comments of: 607/1 00545/032 *FAKEOS TIMER TEST OC MTA:FOS.TESTTIME(1000) 5.0T2 353 FAKEOS.TIMER_TEST.OC.031 1 LINE 80 2 PAGE UM MTA JULY 03, 1981 15:22:14 5.0T4 298 00545/033 *FAKEOS WTO/WTOR TEST SA O MTA:FOS.WTOTST(1,999) 5.0T2 354 FAKEOS.WTO/WTOR_TEST.SA.032 1 LINE 72 1 PAGE UM MTA JULY 03, 1981 15:22:14 5.0T4 299 0 TESTS WTO (WRITE TO OPERATOR) AND WTOR (WRITE TO OPERATOR WITH REPLY). ASSEMBLE WITH *OSMAC (193) ON UNIT 0 AND *SYSMAC ON UNIT 2. 00545/034 *FAKEOS WTO/WTOR TEST OC O MTA:FOS.WTOTST(1000) 5.0T2 355 FAKEOS.WTO/WTOR_TEST.OC.033 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 15:22:15 5.0T4 300 00545/035 *FAKEOS SNAP TEST SA O MTA:FOS.TESTDUMP(1,999) 5.0T2 356 FAKEOS.SNAP_TEST.SA.034 1 LINE 72 1 PAGE UM MTA JULY 03, 1981 15:22:16 5.0T4 301 0 Test program for SNAP macros. Contains several assemblies. Assemble with PAR=BATCH. Requires *OSMAC (193) on unit 0. 00545/036 *FAKEOS SNAP TEST OC O MTA:FOS.TESTDUMP(1000) 5.0T2 357 FAKEOS.SNAP_TEST.OC.035 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 15:22:17 5.0T4 302 0 Needs to be made into a library to be used. 00545/037 *FAKEOS TSO TEST SA O MTA:FOS.TESTTSO(1,999) 5.0T2 358 FAKEOS.TSO_TEST.SA.036 1 LINE 72 1 PAGE UM MTA JULY 03, 1981 15:22:17 5.0T4 303 0 Test TGET, TPUT, and STAX macros. Note that the D5.0 FAKEOS doesn't support these, but VSS, component 1078, does. Requires *OSMAC (193). 00545/038 *FAKEOS TSO TEST OC O MTA:FOS.TESTTSO(1000) 5.0T2 359 FAKEOS.TSO_TEST.OC.037 1 LINE 80 2 PAGE UM MTA JULY 03, 1981 15:22:19 5.0T4 304 00545/039 *FAKEOS BDAM DUMP SA MTA:FOS.BDAMDUMP(1000) 5.0T2 360 FAKEOS.BDAM_DUMP.SA.038 1 LINE 72 5 PAGE UM MTA JULY 03, 1981 15:22:19 5.0T4 305 0 SOURCE FOR PROGRAM TO DUMP BDAM FAKEOS FILES. 1 SUN SEP 08/96 15:24:55 Page 321 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 COPIES FAKEOS.GBLS (545/20). ASSEMBLE USING *SYSMAC, *OSMAC (193), AND FOS.MACLIB (545/22). 00545/040 *FAKEOS BDAM DUMP OC MTA:FOS.BDAMDUMP(1,999) 5.0T2 361 FAKEOS.BDAM_DUMP.OC.039 1 LINE 80 4 PAGE UM MTA JULY 03, 1981 15:22:21 5.0T4 306 00545/041 *FAKEOS FAKEOSTRACE SA S1559 5.0T2 VLO FSNAME=FAKEOS.FAKEOSTRACE.SA.040(1) 362 5.0T2 362 FAKEOS.FAKEOSTRACE.SA.040 1 LINE 66 3 PAGE UM MTA JULY 03, 1981 15:22:23 5.0T4 307 0 SOURCE FOR PROGRAM TO PRINT FAKEOS TRACE FILE. ASSEMBLE USING *SYSMAC. 00545/042 *FAKEOS *FAKEOSTRACE OE *FAKEOSTRACE 5.0T2 363 FAKEOS.*FAKEOSTRACE.OE.041 1 LINE 2764 2 PAGE UM MTA JULY 03, 1981 15:22:24 5.0T4 308 *FAKEOSTRACE 00545/043 *FAKEOS FAKEOSCREBLDL SA MTA:FOS.CREBLDL(1,999) 5.0T2 364 FAKEOS.FAKEOSCREBLDL.SA.042 1 LINE 68 3 PAGE UM MTA JULY 03, 1981 15:22:24 5.0T4 309 0 PROGRAM TO CREATE A DIRECTORY THAT FAKEOS WILL USE WHEN DOING A BLDL ON LINKLIB. TAKES INPUT DATA ON SCARDS, OUTPUT DIRECTORY WRITTEN ON UNIT 0. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 458/80, 458/81, 458/83, 458/85, 538/3, 737/5, 737/6, 762/6, 762/7 00545/044 *FAKEOS *FAKEOSCREBLDL OE *FAKEOSCREBLDL 5.0T2 365 FAKEOS.*FAKEOSCREBLDL.OE.043 1 SEQ 1620 1 PAGE UM MTA JULY 03, 1981 15:22:26 5.0T4 310 *FAKEOSCREBLDL 00545/045A *FAKEOS *FAKEOS OE G *FAKEOS 5.1T1 597 FAKEOS.?FAKEOS.OE.045 1 LINE 32767 17 PAGE UM MTA JULY 23, 1983 11:13:45 *FAKEOS 0 CURRENT OBJECT FOR FAKEOS. 0 Referenced by comments of: 545/11, 545/16, 545/21 00545/046A *FAKEOS MESSAGE FILE M ETC:FAKEOS.MSG 5.1T1 598 FAKEOS.MESSAGE_FILE.M.046 1 LINE 120 4 PAGE UM MTA JULY 23, 1983 11:13:46 ETC.:FAKEOS.MSG 0 ERROR MESSAGE FILE FOR FAKEOS. LINE NUMBERS IN THIS FILE ARE IMPORTANT. 00545/047 *FAKEOS OS DATA MANAGE OL ETC:FOS.IGG 5.0T2 367 FAKEOS.OS_DATA_MANAGE.OL.046 1 LINE 3668 6 PAGE UM MTA JULY 03, 1981 15:22:27 5.0T4 312 ETC.:FOS.IGG 0 LIBRARY OF OS DATA MANAGEMENT MODULES FROM REL 21.8 AND IERRCO00. >>>>>> NOTE: OBJECT HAS REP CARDS. 1 SUN SEP 08/96 15:24:55 Page 322 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00546/001A *VALIDATEFILE SA G FILE:VALIDATEFILE(1000) 5.1T1 599 VALIDATEFILE..SA.001 1 LINE 73 27 PAGE UM HELFFRICH JULY 23, 1983 11:13:47 FILE:VALIDATEFILE 0 Program to validate line files for consistency. Can be used, by users, after a system crash during which a file was open. Prompts for input. Assemble using COPY:FILE.MACROS (482/45). ******************************************************************** D5.1 version: Fixes bugs in the zerocheck option. ******************************************************************** 0 Referenced by comments of: 253/1 00546/002A *VALIDATEFILE OE G *VALIDATEFILE 5.1T1 600 VALIDATEFILE..OE.002 1 LINE 5532 4 PAGE UM HELFFRICH JULY 23, 1983 11:13:49 *VALIDATEFILE 00546/003C *VALIDATEFILE WF G FILE:VALIDATEFI.W 5.1T1 601 VALIDATEFILE..WF.003 1 LINE 69 3 PAGE UM HELFFRICH JULY 23, 1983 11:13:49 0 Writeup describing *VALIDATEFILE. Referenced by (682/1). 0 Referenced by comments of: 482/28, 682/1 00547/001 *FOREVER D *FOREVER 5.0T2 370 FOREVER..D.001 1 LINE 51 3 PAGE UM MTA JULY 03, 1981 15:22:35 5.0T4 315 *FOREVER 0 A FILE CONTAINING ABOUT 300 LINES OF JUNK, ENDING WITH "$CONTINUE WITH *FOREVER" SO THAT IT APPEARS TO CONTAIN EVEN MORE. 00548/001A *FS BASE SOURCE SA G W930:FS/BASE 5.1T1 602 FS.BASE_SOURCE.SA.001 1 LINE 73 96 PAGE UM D BODWIN JULY 23, 1983 11:13:49 0 User program to save and restore files on magnetic tape, maintaining a directory and preserving line numbers and file size information. This program is also used to generate MTS distribution tapes. Calls SNIFF subroutine (548/4). Copies COPY:DRDSECT (461/6), *GFINFODSECT (593), *SENSEDSECT (3025) and *GDINFODSECT (594). 0 Referenced by comments of: 392/1, 461/6, 548/2, 548/3, 549/1, 550/1 00548/002C *FS UPDATE UC G W930:FS/UPD 5.1T1 603 FS.UPDATE.UC.002 1 LINE 75 78 PAGE UM D BODWIN JULY 23, 1983 11:13:55 0 Update to be applied to base source (548/1) to yield current source (548/3). 0 Referenced by comments of: 548/3 1 SUN SEP 08/96 15:24:55 Page 323 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00548/003C *FS CURR SOURCE SA G W930:FS/SOUNEW 5.1T1 604 FS.CURR_SOURCE.SA.003 1 LINE 80 163 PAGE UM D BODWIN JULY 23, 1983 11:13:59 0 The result of applying the (548/2) update to the (548/1) base source. Object is in (548/5). Assemble using *PEXIT. ******************************************************************** D5.1 version: 1) Changed blocking format to be variable (8, 4, or 1 pages, depending on the density of the tape). THIS IS AN INCOMPATIBLE CHANGE AND SHOULD BE INSTALLED AS SOON AS POSSIBLE, SINCE ALL FORTHCOMING FS TAPES COMING FROM UM WILL BE WRITTEN WITH THIS NEW VERSION. 2) Updated to copy *SENSEDSECT (3025). ******************************************************************** 0 Referenced by comments of: 548/2 00548/004A *FS SNIFF SUBR SA G W930:FS.SNIFF(1,999) 5.1T1 605 FS.SNIFF_SUBR.SA.004 1 LINE 72 3 PAGE UM D BODWIN JULY 23, 1983 11:14:06 0 Subroutine to determine the amount of space required by a file. Called by *FS. Copies *GFINFODSECT (593). Assemble using *SYSMAC. 0 Referenced by comments of: 548/1, 548/6 00548/005A *FS OBJECT OE G NEW:FS 5.1T1 606 FS.OBJECT.OE.005 1 LINE 32767 14 PAGE UM D BODWIN JULY 23, 1983 11:14:06 *FS 0 Referenced by comments of: 548/3 00548/006C *FS COMMANDS C W930:MAKEFS 5.1T1 607 FS.COMMANDS.C.006 1 LINE 95 1 PAGE UM D BODWIN JULY 23, 1983 11:14:07 0 $SOURCE file for producing a new version of *FS for testing, etc. Refers to files under the UM user ID W930. The new version of *FS is placed in a file named W930:FS/OBJ (which is not distributed and which you must $CREATE before $SOURCing this file). The contents of W930:FS/OBJ should be linkeditted with the FS.SNIFF subroutine (548/4), appended with COPY:SYSDEFS and placed in *FS after testing. This file is included mostly so that the new HELP facility will be easier for you all to install. 00548/007C *FS HELP D ETC:FS.HELP 5.1T1 608 FS.HELP.D.007 1 LINE 173 9 PAGE UM D BODWIN JULY 23, 1983 11:14:07 0 Text for the *FS help facility, used with the Full Screen help facility (component 845). 1 SUN SEP 08/96 15:24:55 Page 324 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00549/001 *FSCON SA G S1559 5.0T2 VLO FSNAME=FSCON..SA.001(1) 371 5.0T2 371 FSCON..SA.001 1 LINE 80 33 PAGE UM D BODWIN JULY 28, 1977 02:43:20 5.0T4 316 0 PROGRAM TO CONVERT *FSAVE (392) TAPES TO *FS (548) FORMAT. NO LONGER REQUIRES THE FSZ SUBROUTINE. 00549/002 *FSCON OE G *FSCON 5.0T2 372 FSCON..OE.002 1 SEQ 8116 3 PAGE UM D BODWIN JULY 03, 1981 15:22:44 5.0T4 317 *FSCON 00550/001 *FSCOPY SA # (OBSOLETE) D3T4 270 FSCOPY..SA.1 1 LINE 80 30 PAGE UBC AUG. 01, 1973 23:05.32 0 Obsoleted by *FS (548). 00551/001A *FTN SA G S1099 FORTRN FSNAME=FTN.S 5.1T1 609 FTN..SA.001 1 LINE 85 51 PAGE UM HANSEN OCT. 26, 1982 16:47:52 0 THIS VERSION OF *FTN INTERFACES TO THE FORTRAN G (204) AND FORTRAN H (298) COMPILERS AND ALSO TO OVERDRIVE (667), THE FORTRAN PREPROCESSOR. IT IS LOADED INTO SHARED VM AT IPL BY PISTLE WITH THE SINGLE SYMBOL FTN DEFINED IN LCSYMBOL. THERE ARE 4 REFERENCES TO FILE NAMES IN THIS VERSION AT LINES 922 THROUGH 925. AS DISTRIBUTED, THEY ARE *FORTRANH, *FORTRANG, *FTNGTEST, AND *OVERDRIVE RESPECTIVELY. COPIES *GDINFODSECT (594). 0 Referenced by comments of: 699/1 00551/002A *FTN SHARED OBJECT OC G SEG2:FTN 5.1T1 610 FTN.SHARED_OBJECT.OC.002 1 LINE 80 13 PAGE UM HANSEN JULY 23, 1983 11:14:14 SEG2:FTN 0 LOADED INTO SHARED VM AT IPL BY PISTLE. 00551/003 *FTN OC G *FTN 5.0T2 375 FTN..OC.003 1 SEQ 24 1 PAGE UM HANSEN JULY 03, 1981 15:22:50 5.0T4 320 *FTN 0 CONTAINS ONLY THE LOADER CARDS: RIP FTN LCS LCSYMBOL LDT FTN 0 Referenced by comments of: 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 00552/001 *GASP SF G S1559 5.0T2 VLO FSNAME=GASP..SF.001(1) 376 5.0T2 376 GASP..SF.001 1 LINE 80 30 PAGE UM FLANIGAN APR. 18, 1975 08:59:55 5.0T4 321 0 FTN SOURCE FOR GASP SIMULATION PACKAGE FOR EVENT-ORIENTED DISCRETE SIMULATION. NOTE: SOURCE CONTAINS MANY "$CONTINUE WITH *GASPCOM RETURN" LINES. 0 Referenced by comments of: 552/3 1 SUN SEP 08/96 15:24:55 Page 325 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00552/002 *GASP SA G S1559 5.0T2 VLO FSNAME=GASP..SA.002(1) 377 5.0T2 377 GASP..SA.002 1 LINE 80 1 PAGE UM FLANIGAN JULY 28, 1977 02:46:12 5.0T4 322 0 ASMG SOURCE FOR GASP ERROR EXIT ROUTINE. 0 Referenced by comments of: 552/3 00552/003 *GASP OL G *GASP 5.0T2 378 GASP..OL.003 1 SEQ 6930 15 PAGE UM FLANIGAN JULY 03, 1981 15:22:54 5.0T4 323 *GASP 0 OBJECT LIBRARY BUILT FROM ASM AND FTN COMPONENTS IN (552/1) AND (552/2). 00552/004 *GASP *GASPCOM SF G GPCM *GASPCOM(0,7) 5.0T2 379 GASP.*GASPCOM.SF.004 1 LINE 80 1 PAGE UM FLANIGAN JULY 03, 1981 15:22:55 5.0T4 324 *GASPCOM 00552/005 *GASP MEMO 246 WF S1559 5.0T2 VLO FSNAME=GASP.MEMO_246.WF.005(1) 380 5.0T2 380 GASP.MEMO_246.WF.005 1 LINE 127 11 PAGE UM FLANIGAN JAN. 24, 1977 20:29:16 5.0T4 325 0 THIS IS COMPUTING CENTER MEMO 246 -- "DESCRIPTION OF MTS GASP SIMULATION SYSTEM" 00552/006 *GASP INTERNAL DESC P G S1559 5.0T2 VLO FSNAME=GASP.INTERNAL_DESC.P.006(1) 381 5.0T2 381 GASP.INTERNAL_DESC.P.006 1 LINE 80 28 PAGE UM FLANIGAN JULY 28, 1977 02:46:54 5.0T4 326 0 DESCRIPTION OF THE INTERNALS OF GASP. 00553/001 NETWORK CLS SA G S1559 5.0T2 VLO FSNAME=NETWORK_CLS..SA.001(1) 382 5.0T2 382 NETWORK_CLS..SA.001 1 LINE 80 43 PAGE UM PICKELMAN JULY 03, 1981 15:22:57 5.0T4 327 0 Command language subsystem for Merit Computer Network ($NET command). Described in "Merit Network User's Guide" in MTS Volume 4. Calls COPY subroutine (553/2) to implement the .COPY network command. Copies *GDINFODSECT (594) and *SENSEDSECT (3025). Assemble using COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 553/3 00553/002 NETWORK CLS COPY SUBR SA G S1559 5.0T2 VLO FSNAME=NETWORK_CLS.COPY_SUBR.SA.002(1) 383 5.0T2 383 NETWORK_CLS.COPY_SUBR.SA.002 1 LINE 76 38 PAGE UM PICKELMAN JULY 03, 1981 15:23:01 5.0T4 328 0 Subroutines to implement the .COPY network command. Assemble using Copy:MTS.MACROS (344/3). 0 Referenced by comments of: 553/1, 553/3 1 SUN SEP 08/96 15:24:55 Page 326 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00553/003 NETWORK CLS OE G *CLSNET 5.0T2 384 NETWORK_CLS..OE.003 1 LINE 18144 6 PAGE UM PICKELMAN JULY 03, 1981 15:23:04 5.0T4 329 *CLSNET 0 Object from (553/1) and (553/2), normally loaded into shared VM by PISTLE after IPL. 00553/004 NETWORK CLS MNET:NETCOPY OE G MNET:NETCOPY 5.0T2 385 NETWORK_CLS.MNET:NETCOPY.OE.004 1 LINE 10160 4 PAGE UM PICKELMAN JULY 03, 1981 15:23:05 5.0T4 330 0 Contains loader cards (RIP, COM, LCS,) to force reference to shared VM NETCOPY subroutine, if NET CLS is loaded in shared VM. This file is $RUN automatically when a .COPY network command (or equivalent at a non-MTS host) is issued at a remote host to copy a file to or from the local MTS host. 00553/005D NETWORK CLS NEW VERSION SQ G W226:NET 5.1T1 611 NETWORK_CLS.NEW_VERSION.SQ.005 1 LINE 68 19 PAGE UM PICKELMAN JULY 23, 1983 11:14:16 0 PLUS source for $NEWCLSNET (553/10). Contains commands at line 0 to assemble (should be changed to 0=*NEWCLSNET). Requires *CLPARSELIB (1076/11), *PLUS.SOURCELIB (1042/5), and the PLUS source libraries for this version of the Network CLS (553/8) and (553/9). 00553/006D NETWORK CLS NEW VERSION SR G W226:NET-GRAMMER 5.1T1 612 NETWORK_CLS.NEW_VERSION.SR.006 1 LINE 68 4 PAGE UM PICKELMAN JULY 23, 1983 11:14:17 0 *CLPARSER grammar for the new version of $NET CLS (553/10). 00553/007D NETWORK CLS NEW VERSION SA G W226:NET-COPY 5.1T1 613 NETWORK_CLS.NEW_VERSION.SA.007 1 LINE 88 37 PAGE UM PICKELMAN JULY 23, 1983 11:14:17 0 Assembler source for new version of $NET CLS (553/10). Contains commands at line 0 to assemble (should be changed to 0=*NEWCLSNET). Assemble using COPY:MTS.MACROS (344/3). 00553/008D NETWORK CLS NEW VERSION SQ G W226:CLS.SOURCE 5.1T1 614 NETWORK_CLS.NEW_VERSION.SQ.008 1 LINE 68 6 PAGE UM PICKELMAN JULY 23, 1983 11:14:19 0 PLUS source library for new version of $NET CLS (553/10). 0 Referenced by comments of: 553/5 00553/009D NETWORK CLS NEW VERSION SQ G W226:PLUS.QL 5.1T1 615 NETWORK_CLS.NEW_VERSION.SQ.009 1 LINE 68 3 PAGE UM PICKELMAN JULY 23, 1983 11:14:19 0 PLUS source library for new version of $NET CLS (553/10). Contains a $CONTINUE WITH *PLUS.SOURCELIB (1042/5) record. 0 Referenced by comments of: 553/5 1 SUN SEP 08/96 15:24:55 Page 327 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00553/010D NETWORK CLS NEW VERSION OC G *NEWCLSNET 5.1T1 616 NETWORK_CLS.NEW_VERSION.OC.010 1 LINE 30804 9 PAGE UM PICKELMAN JULY 23, 1983 11:14:19 *NEWCLSNET 0 Referenced by comments of: 553/5, 553/6, 553/7, 553/8, 553/9 00554/001 TABLMOD JOB PROGRAM SA G TBJP FILE:TABLMOD 5.0T2 388 TABLMOD.JOB_PROGRAM.SA.001 1 LINE 80 28 PAGE UM HELFFRICH JULY 03, 1981 15:23:08 5.0T4 333 FILE:TABLMOD 0 UMMPS JOB PROGRAM TO DISPLAY AND MODIFY INFORMATION IN THE SHARED FILE TABLE. INVOKED BY ENTERING "TABLMOD" ON THE OPERATOR'S CONSOLE. THE FOLLOWING COMMANDS ARE AVAILABLE: VERIFY VERIFYS ENTRY AND ELEMENT ALLOCATIONS ARE CONSISTANT BY CHASING THROUGH VARIOUS CHAINS IN SHARED FILE TABLE. ALSO PRINTS THE NUMBER OF OPEN FILES, MATRIX COMPUTATIONS, AND DEADLOCK DETECTIONS. TRACE PRINTS OUT THE ENTIRE SHARED FILE TABLE. EACH ENTRY CONSISTS OF A FILE NAME, JOB NUMBER, OPEN STATUS ("OPEN" OR "NOTO"), LOCK STATUS ("LOCKR", "LOCKM", OR "LOCKD"), AND WAIT STATUS ("WAITO", "WAITR", "WAITM", OR "WAITD"). LSTAT PRINTS THE INFORMATION ASSOCIATED WITH A SINGLE FILE ("LSTAT FILE FNAME") OR A SINGLE JOB ("LSTAT JOB N") IN THE SAME FORMAT AS THE TRACE COMMAND. LOCATE PRINTS THE HALF-WORD OFFSET INTO THE SHARED FILE TABLE FOR THE ENTRY ASSOCIATED WITH A PARTICULAR FILE ("LOCATE FILE FNAME"). CLEAN TAKES THE SPECIFIED JOB ("CLEAN JOB N") OFF ALL OPEN OR LOCKED AND WAITING LISTS. CLEANF SAME AS "CLEAN" EXCEPT FOR ONE FILE ONLY ("CLEANF JOB N FILE FNAME"). DEQ TAKES THE SPECIFIED JOB ("DEQ JOB N") OFF ALL WAITING LISTS. DEQF SAME AS "DEQ" EXCEPT FOR ONE FILE ONLY ("DEQF JOB N FILE FNAME"). THE TABLMOD PROGRAM TERMINATES WHEN AN END-OF-FILE IS ENTERED. COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). ASSEMBLE USING COPY:FILE.MACROS (482/45). SEE COMP (682/9) FOR A WRITEUP. 0 Referenced by comments of: 400/11, 554/3, 682/9 00554/002 TABLMOD TABLMOD JOB OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 328 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00554/003 TABLMOD MTS PROGRAM SA G # (SAME AS JOB PROGRAM) UM HELFFRICH 0 MTS PROGRAM TO ALLOW SYSTEM PROGRAMMERS TO INTERROGATE AND ALTER THE SYSTEM-WIDE SHARED FILE TABLE. TAKES THE SAME COMMANDS AS TABLMOD JOB (554/1) AS WELL AS A "DUMP" COMMAND TO DUMP THE WHOLE SHARED FILE TABLE. IT CALLS SDUMP TO DO THIS. COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). ASSEMBLE USING COPY:FILE.MACROS (482/45) STARTING AT LINE 0 TO INCLUDE THE CODE NECESSARY FOR THE MTS PROGRAM. CONTAINS A "$CONTINUE WITH W045:TABLMOD(2)" LINE. SAME AS (554/1). 00554/004 TABLMOD MTS PROGRAM OC G FILE:TABLMODMP.O 5.0T2 389 TABLMOD.MTS_PROGRAM.OC.004 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 15:23:10 5.0T4 334 FILE:TABLMODMP.O 00555/001 MESSAGE MANUAL PGM SS G S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.PGM.SS.001(1) 390 5.0T2 390 MESSAGE_MANUAL.PGM.SS.001 1 LINE 70 11 PAGE UM FRONCZAK JULY 28, 1977 02:48:53 5.0T4 335 0 SPITBOL PROGRAM TO PRODUCE MESSAGE MANUAL FROM DATA IN (555/4). RUN AS FOLLOWS: $RUN *SPITBOL SCARDS=MESSAGEPGM(5) 5=MESSAGEDATA 4=*MSOURCE* 6=*MSINK* 7=MSGMANPRT SPRINT=*PRINT* PAR=SIZE=MAX *PRINT* SHOULD BE SPECIFIED AS A TN PRINTER. THE PRINTOUT CONSISTS OF ALPHABETIZED USER MESSAGES AND ALPHABETIZED OPERATOR MESSAGES. INSTRUCTIONS ON PROGRAM USAGE MAY BE OBTAINED VIA &HELP. 00555/002 MESSAGE MANUAL SPITBLK SA G S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.SPITBLK.SA.002(1) 391 5.0T2 391 MESSAGE_MANUAL.SPITBLK.SA.002 1 LINE 79 3 PAGE UM FRONCZAK JULY 28, 1977 02:48:56 5.0T4 336 0 ROUTINE TO INTERFACE SPITBOL TO THE BLOKLETR SUBR (572). 00555/003 MESSAGE MANUAL SPITBLK OC G S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.SPITBLK.OC.003(1) 392 5.0T2 392 MESSAGE_MANUAL.SPITBLK.OC.003 1 LINE 80 1 PAGE UM FRONCZAK JULY 28, 1977 02:48:58 5.0T4 337 00555/004 MESSAGE MANUAL DATA D S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.DATA.D.004(1) 393 5.0T2 393 MESSAGE_MANUAL.DATA.D.004 1 LINE 107 52 PAGE UM FRONCZAK JULY 28, 1977 02:49:01 5.0T4 338 0 A DATA FILE DESCRIBING THE VARIOUS SYSTEM MESSAGES. THE FORMAT OF THE FILE IS AS FOLLOWS: 1. LOCATION OF MESSAGES A) MTS "FMSG" MESSAGES ARE FOUND STARTING AT THE LINE NUMBER WHICH IS THE FMSG NUMBER. B) MTS "CMSG" MESSAGES START AT LINE 2000. C) OTHER MESSAGES START AT LINE 3000. 2. FORMAT OF LINES 1 SUN SEP 08/96 15:24:55 Page 329 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 A GROUP OF CONSECTIVE LINES IN THE FILE HAS INFORMATION ABOUT A GIVEN MESSAGE. THE FIRST LINE SPECIFIES THE MESSAGE TEXT, WHILE SUCCEEDING LINES IN THE GROUP INDENTIFY THE DESTINATION, SOURCE, AND MEANING. EACH LINE IS IDENTIFIED BY ITS LEADING CHARACTERS, WHICH MUST BE UPPERCASE; THE TEXT OF MESSAGES MAYBE OF MIXED CASE. THE FOLLOWING LINE FORMATS ARE SPECIFIED (ALL COMPONENT NAMES MUST BE GIVEN IN UPPERCASE): A) MESSAGE LINE BEGINS WITH "## "; MESSAGE, STARTING IN COLUMN 4, USUALLY IN UPPERCASE WITH GENERIC PARTS IN LOWERCASE. B) TEXT ELIMINATION LINE BEGINS WITH " ELIM " FOLLOWED BY THE EXACT TEXT TO BE ELIMINATED FROM THE MESSAGE LINE FOR SORTING PURPOSES ONLY, DELIMITED BY A CHARACTER WHICH MUST NOT APPEAR IN THE ELIMINATION TEXT. FOR EXAMPLE, ELIM 'STRING' C) DESTINATION OF MESSAGE BEGINS WITH " DEST OPER" IF OPERATOR MESSAGE; NO DESTINATION LINE IF NORMAL MESSAGE. D) LOCATION OF MESSAGE TEXT BEGINS WITH " TXTLOC "; TEXT LOCATION NAME STARTING IN COLUMN 8, SUCH AS FSMG 21. FOR EXAMPLE, TXTLOC PERMIT,509,SDM51,PRMT0445. E) WHO ISSUED MESSAGE (MAY BE SEVERAL OF THESE IN A GROUP) BEGINS WITH " SOURCE "; INFORMATION STARTING IN COLUMN 9: COMPONENT NAME, COMPONENT NUMBER, LABEL, SEQUENCE ID. FOR EXAMPLE, SOURCE PERMIT,509,SDM51,PRMT0445. F) EXPLANATIONS OF MESSAGE (AS MANY LINES AS NEEDED) BEGINS WITH 3 BLANKS; TEXT STARTING IN COLUMN 4. ALL LINES ARE USER-LEVEL EXPLANATION LINES UNTIL "#S " APPEARS IN COLUMNS 1-3, IN WHICH CASE, THAT LINE AND SUBSEQUENT LINES DEFINE THE SYSTEM-LEVEL EXPLANATION. THIS FILE CURRENTLY CONTAINS COMPLETE COVERAGE OF MTS ITSELF AND MOST CLS'S. 0 Referenced by comments of: 555/1 00555/005 MESSAGE MANUAL OUTPUT P S1559 5.0T2 VLO FSNAME=MESSAGE_MANUAL.OUTPUT.P.005(1) 394 5.0T2 394 MESSAGE_MANUAL.OUTPUT.P.005 1 LINE 98 191 PAGE UM FRONCZAK JULY 28, 1977 02:49:29 5.0T4 339 0 COPY THIS OUTPUT TO A TN PRINTER FOR A COPY OF THE MESSAGE MANUAL. 00556/001A *REDUCE2 MTS MASTER S G S1669 5.0CT1 VLO FSNAME=REDUCE2.MTS_MASTER.S.001(1) 141 5.1T1 617 REDUCE2.MTS_MASTER.S.001 1 LINE 80 181 PAGE UM MTA MAR. 02, 1983 21:17:18 0 REDUCE2 is a LISP 1.5 program designed for general algebraic computations. This is the OS/360 version of REDUCE2 modified to run in either OS or MTS. The flag MTS* (which is set as part of the generation of the LISP compiler or front end) is non-NIL when running in MTS and NIL when running in OS. 1 SUN SEP 08/96 15:24:55 Page 330 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 210/1, 556/3 00556/002 *REDUCE2 OS SOURCE S G S1559 5.0T2 VLO FSNAME=REDUCE2.OS_SOURCE.S.002(1) 396 5.0T2 396 REDUCE2.OS_SOURCE.S.002 1 LINE 80 171 PAGE UM MTA JULY 03, 1981 15:23:30 5.0T4 341 0 OS/360 source for REDUCE2 (version of April 15, 1979). 0 Referenced by comments of: 556/3 00556/003A *REDUCE2 UPDATE U G S1669 5.0CT1 VLO FSNAME=REDUCE2.UPDATE.U.003(1) 142 5.1T1 618 REDUCE2.UPDATE.U.003 1 LINE 73 10 PAGE UM MTA MAR. 02, 1983 21:17:31 0 Update deck to convert OS/360 source (556/2) to OS/MTS version (556/1). This is written in the language accepted by the Utah update program (556/21). 00556/004A *REDUCE2 CHKPOINT O G ETC:RDC2.CKPT 5.1T1 619 REDUCE2.CHKPOINT.O.004 1 SEQ 80 68 PAGE UM MTA JULY 23, 1983 11:16:29 ETC.:RDC2.CKPT 0 File in LISP checkpoint format containing object for REDUCE2. This file is referenced by *REDUCE2. 00556/005A *REDUCE2 CHKPOINT O G S1669 5.0CT1 VLO FSNAME=REDUCE2.CHKPOINT.O.005(1) 144 5.1T1 620 REDUCE2.CHKPOINT.O.005 1 SEQ 80 84 PAGE UM MTA MAR. 02, 1983 21:17:36 0 Checkpoint for REDUCE including the LISP compiler. This version is needed if changes are to be made to REDUCE without regenerating it from scratch (for example it is used to add the integration package). 00556/006 *REDUCE2 *REDUCE2 C *REDUCE2 5.0T2 400 REDUCE2.*REDUCE2.C.006 1 LINE 54 1 PAGE UM MTA JULY 03, 1981 15:23:52 5.0T4 345 *REDUCE2 0 File to which users $SOURCE to invoke REDUCE2. It runs the REDUCE version of LISP and then loads the REDUCE2 checkpoint. 00556/007 *REDUCE2 UPDCOMP C S1559 5.0T2 VLO FSNAME=REDUCE2.UPDCOMP.C.007(1) 401 5.0T2 401 REDUCE2.UPDCOMP.C.007 1 LINE 62 1 PAGE UM MTA JULY 03, 1981 15:23:53 5.0T4 346 0 Commands to update and compile REDUCE2. This command file produces a checkpoint for a "test" version of REDUCE in the file "RDC2.NEW" under the id running it and a checkpoint for the production version in the scratch file "-RDC2CKPT". This should be copied into the appropriate ETC: file to install it. 00556/008 *REDUCE2 EXAMPLE S S1559 5.0T2 VLO FSNAME=REDUCE2.EXAMPLE.S.008(1) 402 5.0T2 402 REDUCE2.EXAMPLE.S.008 1 LINE 72 3 PAGE UM MTA JULY 03, 1981 15:23:53 5.0T4 347 0 Example of REDUCE2 input. This is the input that produces *REDUCE2EXAMP. 0 Referenced by comments of: 556/9 1 SUN SEP 08/96 15:24:55 Page 331 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00556/009 *REDUCE2 EXAMPLE OUTPUT P *REDUCE2EXAMP 5.0T2 403 REDUCE2.EXAMPLE_OUTPUT.P.009 1 LINE 126 7 PAGE UM MTA JULY 03, 1981 15:23:54 5.0T4 348 *REDUCE2EXAMP 0 Example of the output from *REDUCE2. Produced by feeding (556/8) to *REDUCE2. 00556/010 *REDUCE2 LISP OS/MVS SA G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_OS/MVS.SA.010(1) 404 5.0T2 404 REDUCE2.LISP_OS/MVS.SA.010 1 LINE 80 191 PAGE UM MTA JULY 03, 1981 15:23:55 5.0T4 349 0 Source for the LISP/360 interpreter (OS/360 version) as distributed with REDUCE2. 0 Referenced by comments of: 556/11 00556/011 *REDUCE2 LISP UPDATE U G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_UPDATE.U.011(1) 405 5.0T2 405 REDUCE2.LISP_UPDATE.U.011 1 LINE 74 28 PAGE UM MTA JULY 03, 1981 15:24:05 5.0T4 350 0 Update to go from OS/360 source (556/10) to version that will run in either OS or MTS depending on the values of certain conditional assembly parameters. These are as follows (all are SETB symbols): &MTS 1 to assemble an MTS version, 0 to assemble an OS/MVS version &HASHING 1 to assemble code to hash atoms onto the object list. 0 to do a linear search of the object list for a new atom. Normally one in MTS, can also be one for OS/MVS version if GETMAIN is capable of getting space for the hash table. If it can't, LISP will not run if &HASHING is one. &MORSTOR 1 to get more storage when almost out. The symbol SBLKSIZ controls when to get more and how much to get. When only SBLKSIZ/32 cells are left after a garbage collection, LISP will attempt to get up to SBLKSIZ/8 more cells (SBLKSIZ more bytes). &MORSTOR is normally on for the MTS version and SBLKSIZ defaults to 16 pages. &MORSTOR can be on for the OS/MVS version, but it probably won't do any good. If more storage has been obtained, then SETSIZE, CONDENSE, and CHKPOINT can no longer be used. A checkpoint file to be RESTOREd must fit in the original space and RESTORE discards all aditional space allocated. The other assembly parameters are the same as in the original version. The following are the changes made to LISP converting it to MTS. 1. The R= parameter on the RUN command controls the initial VM allocation for LISP, not the amount to give back for data managment routines. It will get more if needed, but if it does, CHKPOINT will no longer work. 2. The OPEN function has been changed. For exact details, contact MTA. In almost all cases in MTS, leaving the second parameter NIL will do what you want. 3. VERBOS and PREVALQT both default off. 4. *RAISE, $EOF$, and $EOL$ work as described in the Standard LISP report, except that $EOL$ is returned by READCH only if the argument to READCH is '$EOL$ so REDUCE won't blow up. 5. On input by READ, 'xxx is the same as (QUOTE xxx). Since READ 1 SUN SEP 08/96 15:24:55 Page 332 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 is used by the top level loop, this applies to input there. 6. There are several additional functions: INLNR():integer returns the internal form of the line number of the last line read. BATCH():boolean returns T if called in a batch job, NIL otherwise ATTN(U:any):NIL disables LISPs attention interrupt trap if U is NIL MTS():NIL calls MTS SQRT(U:number):number returns the square root of U (as an integer if U is an integer with an exact square root) SETPCHAR(U:char):char sets the prefix character (for input only) to U and returns the old one. This update file is written in the language accepted by the update program distributed with REDUCE (556/21). 00556/012 *REDUCE2 LISP OBJECT OE G ETC:RDC2.LISP 5.0T2 406 REDUCE2.LISP_OBJECT.OE.012 1 LINE 32767 15 PAGE UM MTA JULY 03, 1981 15:24:26 5.0T4 351 ETC.:RDC2.LISP 0 Object for MTS version of LISP. Assembled with all of &MTS, &HASHING, and &MORSTOR on. 00556/013 *REDUCE2 LISP ASSEMBLE C G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_ASSEMBLE.C.013(1) 407 5.0T2 407 REDUCE2.LISP_ASSEMBLE.C.013 1 LINE 66 1 PAGE UM MTA JULY 03, 1981 15:24:28 5.0T4 352 0 Commands to update and assemble LISP. Leaves the new object in LISP360.O. 00556/014 *REDUCE2 LISP COMPILER S G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.S.014(1) 408 5.0T2 408 REDUCE2.LISP_COMPILER.S.014 1 LINE 80 81 PAGE UM MTA JULY 03, 1981 15:24:29 5.0T4 353 0 LISP/360 compiler and front end. This is the original version distributed with REDUCE. It contains the LISP compiler and functions in standard LISP that are not in LISP360. 00556/015 *REDUCE2 LISP COMPILER U G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.U.015(1) 409 5.0T2 409 REDUCE2.LISP_COMPILER.U.015 1 LINE 63 1 PAGE UM MTA JULY 03, 1981 15:24:33 5.0T4 354 0 Update to change os compiler into version for either MTS or OS/MVS. Initializes the value of MTS* to NIL if running in OS/MVS version of LISP and to T if running in the MTS version of LISP. 00556/016 *REDUCE2 LISP COMPILER O G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.O.016(1) 410 5.0T2 410 REDUCE2.LISP_COMPILER.O.016 1 LINE 80 14 PAGE UM MTA JULY 03, 1981 15:24:34 5.0T4 355 0 Checkpointed LISP/360 front end, MTS version. LISP object format. 1 SUN SEP 08/96 15:24:55 Page 333 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00556/017 *REDUCE2 LISP COMPILER O G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.O.017(1) 411 5.0T2 411 REDUCE2.LISP_COMPILER.O.017 1 SEQ 80 29 PAGE UM MTA JULY 03, 1981 15:24:35 5.0T4 356 0 Checkpointed LISP compiler. LISP object format. 00556/018 *REDUCE2 LISP COMPILER C G S1559 5.0T2 VLO FSNAME=REDUCE2.LISP_COMPILER.C.018(1) 412 5.0T2 412 REDUCE2.LISP_COMPILER.C.018 1 LINE 68 1 PAGE UM MTA JULY 03, 1981 15:24:37 5.0T4 357 0 Commands to generate the LISP compiler in COMPILE and the front end in FEND. 00556/019 *REDUCE2 LISP DEBUG S O WATF:LISPBREAK(1) 5.0T2 413 REDUCE2.LISP_DEBUG.S.019 1 LINE 77 3 PAGE UM MTA JULY 03, 1981 15:24:38 5.0T4 358 0 This program (written in LISP) defines two functions: BREAK and UNBREAK and makes them REDUCE commands. BREAK takes a list of function names and sets a breakpoint at the entry and exit to each of them. UNBREAK takes a list of function names and resets the breakpoint at each. All functions must be previously defined. Both BREAK and UNBREAK are defined as FEXPR's so that their arguments are not evaluated. When a function which has a breakpoint set is called, the message ">>> ENTERINT name type args" is typed, where "name" is the name of the function, "type" is SUBR, FSUBR, EXPR, or FEXPR, and "args" are the names of the arguments. When the function exits, the message ">>> EXITING name" is typed. Both messages are followed by the message "LISTENING" and lines are read and passed to EVAL until "T" is entered. The atom "VALUE" will be bound to the result of the function on exit, and the arguments will be bound both times. Conditional breakpoints may be set by making one of the arguments of BREAK a list. CAR of the list is the name of the function and CADR of the list is a condition which must be true for the breakpoint to occur. The condition is tested when the function is called. Example: BREAK (FN (FN2 (EQ ARG1 1))) will always break at function FN and break at FN2 if ARG1 is 1 (assuming ARG1 is the first argument of FN2). 00556/020 *REDUCE2 UPDATE PROGRAM SF G S1559 5.0T2 VLO FSNAME=REDUCE2.UPDATE_PROGRAM.SF.020(1) 414 5.0T2 414 REDUCE2.UPDATE_PROGRAM.SF.020 1 LINE 72 4 PAGE UM MTA JULY 03, 1981 15:24:39 5.0T4 359 0 FORTRAN source for the program that updates the various parts of REDUCE. Same as the original version from Utah except that it now accepts a "./ C xxx" command and ignores it (for comments). It also echos its input commands. 00556/021 *REDUCE2 UPDATE PROGRAM OE G S1559 5.0T2 VLO FSNAME=REDUCE2.UPDATE_PROGRAM.OE.021(1) 415 5.0T2 415 REDUCE2.UPDATE_PROGRAM.OE.021 1 LINE 1692 4 PAGE UM MTA JULY 03, 1981 15:24:39 5.0T4 360 0 Referenced by comments of: 556/3, 556/11 1 SUN SEP 08/96 15:24:55 Page 334 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00556/022 *REDUCE2 PRINT PROGRAM SF O S1559 5.0T2 VLO FSNAME=REDUCE2.PRINT_PROGRAM.SF.022(1) 416 5.0T2 416 REDUCE2.PRINT_PROGRAM.SF.022 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 15:24:40 5.0T4 361 0 FORTRAN program to print the REDUCE writeups from Utah. Reads 5 and writes 6. 0 Referenced by comments of: 556/23, 556/24, 556/25, 556/26 00556/023 *REDUCE2 INSTALL GUIDE P S1559 5.0T2 VLO FSNAME=REDUCE2.INSTALL_GUIDE.P.023(1) 417 5.0T2 417 REDUCE2.INSTALL_GUIDE.P.023 1 SEQ 80 11 PAGE UM MTA JULY 03, 1981 15:25:18 5.0T4 362 0 Utah's installation guide for REDUCE. Print using (556/22). 00556/024 *REDUCE2 STANDARD LISP S1559 5.0T2 VLO FSNAME=REDUCE2.STANDARD_LISP..024(1) 418 5.0T2 418 REDUCE2.STANDARD_LISP..024 1 SEQ 80 25 PAGE UM MTA JULY 03, 1981 15:25:23 5.0T4 363 0 The "Standard LISP Report" defining a dialect of LISP to be used for implementing REDUCE. Print using (556/22). 00556/025 *REDUCE2 LISP/370 REPRT S1559 5.0T2 VLO FSNAME=REDUCE2.LISP/370_REPRT..025(1) 419 5.0T2 419 REDUCE2.LISP/370_REPRT..025 1 SEQ 80 23 PAGE UM MTA JULY 03, 1981 15:25:25 5.0T4 364 0 Report describing how LISP/370 deviates from standard LISP. Print using (556/22). 00556/026 *REDUCE2 USER'S MANUAL S1559 5.0T2 VLO FSNAME=REDUCE2.USER'S_MANUAL..026(1) 420 5.0T2 420 REDUCE2.USER'S_MANUAL..026 1 SEQ 80 33 PAGE UM MTA JULY 03, 1981 15:25:28 5.0T4 365 0 Obsolete and incomplete user's manual for REDUCE, but all Utah has produced so far. Print using (556/22). 00556/027 *REDUCE2 TUTORIAL 1 D G *RDC.LESSON1 5.0T2 421 REDUCE2.TUTORIAL_1.D.027 1 LINE 71 5 PAGE UM MTA JULY 03, 1981 15:25:29 5.0T4 366 *RDC.LESSON1 0 The first of the REDUCE tutorials written by David Stoutemyer at the University of Hawaii. Minor changes have been made to it for MTS. 00556/028 *REDUCE2 TUTORIAL 2 D G *RDC.LESSON2 5.0T2 422 REDUCE2.TUTORIAL_2.D.028 1 LINE 70 3 PAGE UM MTA JULY 03, 1981 15:25:30 5.0T4 367 *RDC.LESSON2 00556/029 *REDUCE2 TUTORIAL 3 D G *RDC.LESSON3 5.0T2 423 REDUCE2.TUTORIAL_3.D.029 1 LINE 71 5 PAGE UM MTA JULY 03, 1981 15:25:32 5.0T4 368 *RDC.LESSON3 1 SUN SEP 08/96 15:24:55 Page 335 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00556/030 *REDUCE2 TUTORIAL 4 D G *RDC.LESSON4 5.0T2 424 REDUCE2.TUTORIAL_4.D.030 1 LINE 71 8 PAGE UM MTA JULY 03, 1981 15:25:33 5.0T4 369 *RDC.LESSON4 00556/031 *REDUCE2 TUTORIAL 5 D G *RDC.LESSON5 5.0T2 425 REDUCE2.TUTORIAL_5.D.031 1 LINE 71 7 PAGE UM MTA JULY 03, 1981 15:25:34 5.0T4 370 *RDC.LESSON5 00556/032 *REDUCE2 INTEGRATION S O S1559 5.0T2 VLO FSNAME=REDUCE2.INTEGRATION.S.032(1) 426 5.0T2 426 REDUCE2.INTEGRATION.S.032 1 LINE 80 77 PAGE UM MTA JULY 03, 1981 15:25:36 5.0T4 371 0 Original source for the Cambridge integration package distributed with REDUCE. 00556/033 *REDUCE2 INTEGRATION U O S1559 5.0T2 VLO FSNAME=REDUCE2.INTEGRATION.U.033(1) 427 5.0T2 427 REDUCE2.INTEGRATION.U.033 1 LINE 12 1 PAGE UM MTA JULY 03, 1981 15:25:41 5.0T4 372 0 Deletes one line that causes trouble in the 360 version of LISP. 00556/034 *REDUCE2 INTEGRATION C O S1559 5.0T2 VLO FSNAME=REDUCE2.INTEGRATION.C.034(1) 428 5.0T2 428 REDUCE2.INTEGRATION.C.034 1 LINE 61 1 PAGE UM MTA JULY 03, 1981 15:25:42 5.0T4 373 0 Commands to generate the checkpoint file for the integration package in INT.CKPT. Assumes that REDUCE has already been generated. 00556/035 *REDUCE2 INTEGRATION O O ETC:RDC2.INTCHK 5.0T2 429 REDUCE2.INTEGRATION.O.035 1 LINE 80 100 PAGE UM MTA JULY 03, 1981 15:25:42 5.0T4 374 0 LISP checkpoint for REDUCE with the integration package. 00556/036 *REDUCE2 INTEGRATION C O UNSP:REDUCE2.INT 5.0T2 430 REDUCE2.INTEGRATION.C.036 1 LINE 55 1 PAGE UM MTA JULY 03, 1981 15:25:48 5.0T4 375 0 Commands to run REDUCE with the integration package. 00556/037 *REDUCE2 MEMO 420 WF S0672 CCMEMO 'CCMEMOS' FSNAME=M420 5.0T2 431 REDUCE2.MEMO_420.WF.037 1 LINE 73 5 PAGE UM MTA DEC. 04, 1980 09:52:53 5.0T4 376 0 THIS IS COMPUTING CENTER MEMO 420 -- "CHANGES TO *REDUCE." 00557/001 FLOATEST SA O S1559 5.0T2 VLO FSNAME=FLOATEST..SA.001(1) 432 5.0T2 432 FLOATEST..SA.001 1 LINE 80 4 PAGE UM DWB JULY 28, 1977 02:51:21 5.0T4 377 0 PROGRAM TO TEST THAT FLOATING-POINT REGISTERS AND PROGRAM MASK ARE PRESERVED ACROSS ABNORMAL PROGRAM EXITS. DESIGNED TO BE RUN BOTH BY $RUN COMMAND AND UNDER CONTROL OF SDS ($DEBUG OR $SET DEBUG=ON AND $RUN). 1 SUN SEP 08/96 15:24:55 Page 336 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00557/002 FLOATEST OC O S1559 5.0T2 VLO FSNAME=FLOATEST..OC.002(1) 433 5.0T2 433 FLOATEST..OC.002 1 LINE 80 3 PAGE UM DWB JULY 28, 1977 02:51:23 5.0T4 378 00558/001 VIRTUAL MACHINE MAIN PGM SA G S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.MAIN_PGM.SA.001(1) 434 5.0T2 434 VIRTUAL_MACHINE.MAIN_PGM.SA.001 1 LINE 72 67 PAGE UM MTA JULY 03, 1981 15:28:57 5.0T4 379 0 PROGRAM TO PROVIDE A SYSTEM/360 OR SYSTEM/370 VIRTUAL MACHINE. USES ASSEMBLY PARAMETERS TO SELECT VIRTUAL 370, 360/67, OR STANDARD 360. ANY OPTION WILL RUN ON EITHER A 360/67 OR 370 REAL MACHINE. COPIES S2301 (558/4), *CNFGINFODSECT (654), V370.S (558/2), AND OC.S (558/3). AN ADDITIONAL ASSEMBLY PARAMETER IS PROVIDED TO PRODUCE A STUDENT VIRTUAL MACHINE. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 472/1, 558/7 00558/002 VIRTUAL MACHINE V370 SUPPORT SA G S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.V370_SUPP.SA.002(1) 435 5.0T2 435 VIRTUAL_MACHINE.V370_SUPP.SA.002 1 LINE 72 10 PAGE UM MTA JULY 03, 1981 15:29:03 5.0T4 380 0 COPY SECTION CONTAINING THE 370 INSTRUCTION SIMULATION CODE. 0 Referenced by comments of: 558/1 00558/003 VIRTUAL MACHINE 3066 SUPPORT SA G S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.3066_SUPP.SA.003(1) 436 5.0T2 436 VIRTUAL_MACHINE.3066_SUPP.SA.003 1 LINE 68 6 PAGE UM MTA JULY 03, 1981 15:29:05 5.0T4 381 0 COPY SECTION CONTAINING THE 3066 SIMULATION CODE. 0 Referenced by comments of: 558/1 00558/004 VIRTUAL MACHINE 2301 SUPPORT SA G S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.2301_SUPP.SA.004(1) 437 5.0T2 437 VIRTUAL_MACHINE.2301_SUPP.SA.004 1 LINE 70 6 PAGE UM MTA JULY 03, 1981 15:29:06 5.0T4 382 0 COPY SECTION CONTAINING VIRTUAL 2301 AND 2305 DRUM SUPPORT. THE DRUM IS SIMULATED USING VIRTUAL MEMORY. 0 Referenced by comments of: 558/1 00558/005 VIRTUAL MACHINE DEVICE LIST SA G S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.DEVICE_LI.SA.005(1) 438 5.0T2 438 VIRTUAL_MACHINE.DEVICE_LI.SA.005 1 LINE 66 1 PAGE UM MTA JULY 03, 1981 15:29:07 5.0T4 383 0 DEVICE LIST FOR UM 470 I/O CONFIGURATION. COPIES V370DEV.MAC (558/6). 00558/006 VIRTUAL MACHINE DEVLIST MACROS SM O S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.DEVLIST_M.SM.006(1) 439 5.0T2 439 VIRTUAL_MACHINE.DEVLIST_M.SM.006 1 LINE 69 3 PAGE UM MTA JULY 03, 1981 15:29:08 5.0T4 384 0 MACROS, AND SOME CALLS TO THEM, TO MAKE IT EASIER TO ASSEMBLE A DEVICE LIST FOR THE VIRTUAL MACHINE. DOCUMENTATION IS INCLUDED IN THE COMMENTS. 1 SUN SEP 08/96 15:24:55 Page 337 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 558/5 00558/007 VIRTUAL MACHINE 370 OBJECT OC G S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.370_OBJEC.OC.007(1) 440 5.0T2 440 VIRTUAL_MACHINE.370_OBJEC.OC.007 1 LINE 10687 18 PAGE UM MTA JULY 03, 1981 15:29:09 5.0T4 385 0 OBJECT FOR UM VIRTUAL 370, I.E. (558/1) WITH Â&DUPLEX, Â&M67, Â&ST, AND &S370. 00558/008 VIRTUAL MACHINE WRITEUP P S1559 5.0T2 VLO FSNAME=VIRTUAL_MACHINE.WRITEUP.P.008(1) 441 5.0T2 441 VIRTUAL_MACHINE.WRITEUP.P.008 1 LINE 75 12 PAGE UM MTA JULY 03, 1981 15:29:11 5.0T4 386 0 WRITEUP TO BE COPIED TO A TN PRINTER. NOTE: WRITEUP IS NOT UP TO DATE. 00559/001 PISTLE *S2L C G MTS:TST.S2L 5.0T2 442 PISTLE.*S2L.C.001 1 LINE 109 1 PAGE UM SHERRY JULY 03, 1981 15:29:12 5.0T4 387 SEG2:*S2L 0 Command file to run PISTLE, the post-IPL system loader. Invoked by INIT:INITCMD (097/2) after IPL to load shared pieces of the system as described in SEG2:S2FILES. Runs the PRINTMAP program (559/10) to inform operators if system map changed. At UM, also uses the message system (798) to send a message to the names contained in the file "SEG2:MONITORS" (559/4) then to print a new map. 0 Referenced by comments of: 97/2, 485/40, 513/3, 798/3, 798/4, 821/17, 827/56 00559/002A PISTLE SA G W009:PISTLE.S 5.1T1 621 PISTLE..SA.002 1 LINE 124 22 PAGE UM SHERRY JULY 23, 1983 11:16:33 0 Assemble with COPY:MTS.MACROS (344/3). Copies *CNFGINFODSECT (654). ******************************************************************************** Changes since D5.0: New version allowing arbitrary low core symbol tables to be updated. See the (559/7) writeup. ******************************************************************************** 0 Referenced by comments of: 559/13, 4000/11 00559/003A PISTLE OE G SEG2:S2L 5.1T1 622 PISTLE..OE.003 1 LINE 7524 4 PAGE UM SHERRY JULY 23, 1983 11:16:35 SEG2:S2L 0 Referenced by comments of: 809/7 00559/004C PISTLE SEG2:MONITORS D SEG2:MONITORS 5.1T1 623 PISTLE.SEG2:MONITORS.D.004 1 LINE 67 1 PAGE UM MTS OGDEN JULY 23, 1983 11:16:35 SEG2:MONITORS 0 This file contains, in line 1, the names of the current fire-fighters. 1 SUN SEP 08/96 15:24:55 Page 338 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 531/15, 559/1, 864/2, 865/1 00559/005A PISTLE S2FILES D MTS:TST.S2FILES 5.1T3 340 PISTLE.S2FILES.D.005 1 LINE 48 1 PAGE UM WSG AUG. 20, 1983 19:45:22 SEG2:S2FILES 0 A list of files from which PISTLE will load programs at IPL. 0 Referenced by comments of: 809/7 00559/006C PISTLE S2FILES D MTS:TST.S2F.UM 5.1T1 624 PISTLE.S2FILES.D.006 1 LINE 48 1 PAGE UM WSG JULY 23, 1983 11:21:07 SEG2:S2FILES@UM 0 Version of SEG2:S2FILES for UM test pack. 00559/007A PISTLE WRITEUP WF W009:PISTLE.W 5.1T1 625 PISTLE.WRITEUP.WF.007 1 LINE 124 4 PAGE UM SHERRY JULY 23, 1983 11:21:08 W009:PISTLE.W 0 Referenced by comments of: 559/2 00559/008 PISTLE SETTIME SF G S1559 5.0T2 VLO FSNAME=PISTLE.SETTIME.SF.006(1) 447 5.0T2 447 PISTLE.SETTIME.SF.006 1 LINE 54 1 PAGE UM ENGLE AUG. 14, 1977 21:52:29 5.0T4 392 0 PROGRAM RUN BY *S2L TO CALL THE TIME SUBROUTINE (WITH PROTECT OFF) TO CAUSE IT TO INITIALIZE ITSELF. 00559/009 PISTLE SETTIME OC G SEG2:SETTIME 5.0T2 448 PISTLE.SETTIME.OC.007 1 LINE 146 1 PAGE UM ENGLE JULY 03, 1981 15:29:24 5.0T4 393 SEG2:SETTIME 00559/010 PISTLE PRINTMAP SA G SEG2:PRINTMAP(1000) 5.0T2 449 PISTLE.PRINTMAP.SA.008 1 LINE 69 3 PAGE UM SHERRY JULY 03, 1981 15:29:25 5.0T4 394 SEG2:PRINTMAP 0 PROGRAM TO SEE IF THE MAP PRODUCED BY PISTLE HAS CHANGED SINCE THE LAST SYSTEM RELOAD AND PRINT A MESSAGE TO THE OPERATOR IF IT HAS ADVISING THAT A NEW COPY OF THE MAP SHOULD BE PRINTED. 0 Referenced by comments of: 559/1 00559/011 PISTLE PRINTMAP OC G SEG2:PRINTMAP(1,999) 5.0T2 450 PISTLE.PRINTMAP.OC.009 1 LINE 80 3 PAGE UM SHERRY JULY 03, 1981 15:29:26 5.0T4 395 00559/012 PISTLE S2MAP D # SEG2:S2MAP UM SHERRY SEG2:S2MAP@E 0 FILE WHERE PISTLE WRITES THE SYSTEM MAP. 0 Referenced by comments of: 809/7, 1070/5 1 SUN SEP 08/96 15:24:55 Page 339 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00559/013 PISTLE LOADSVM DOC WF S1559 5.0T2 VLO FSNAME=PISTLE.LOADSVM_DOC.WF.011(1) 451 5.0T2 451 PISTLE.LOADSVM_DOC.WF.011 1 LINE 88 3 PAGE UM SHERRY APR. 05, 1980 18:13:21 5.0T4 396 0 WRITEUP DESCRIBING THE PISTLE SUBROUTINE INTERFACE LOADSVM (559/2). 00560/001 *TYPEIT C *TYPEIT 5.0T2 452 TYPEIT..C.001 1 LINE 69 2 PAGE UM LIFT JULY 03, 1981 15:29:33 5.0T4 397 *TYPEIT 0 A $SOURCE FILE WHICH CAN BE USED TO AID IN THE PREPARATION OF MATERIAL PRODUCED IN *FORMAT (308). WE HAVE ATTEMPTED TO DISTRIBUTE ALL *FORMAT MACHINE-READABLE DOCUMENTATION IN THE FORM OF DIRECT INPUT TO *FORMAT AND NOT IN THE FORM USED WITH *TYPEIT. 00561/001 *UNEDIT SA G S1559 5.0T2 VLO FSNAME=UNEDIT..SA.001(1) 453 5.0T2 453 UNEDIT..SA.001 1 LINE 80 14 PAGE UM MTA JULY 28, 1977 02:52:08 5.0T4 398 0 PROGRAM TO COMPARE THE CURRENT VERSION OF A LINE FILE WITH A PREVIOUS VERSION AND PRODUCE THE APPROPRIATE MTS EDITOR COMMANDS FOR TRANSFORMING THE OLD VERSION TO THE NEW, I.E. THIS PROGRAM PRODUCES AN "UPDATE" DECK WHICH IS IN EDITOR FORMAT RATHER THAN *UPDATE FORMAT. CALL SCANPAR SUBROUTINE (267/3). 0 Referenced by comments of: 267/3 00561/002 *UNEDIT OE G *UNEDIT 5.0T2 454 UNEDIT..OE.002 1 SEQ 2536 2 PAGE UM MTA JULY 03, 1981 15:29:35 5.0T4 399 *UNEDIT 00562/001 *UNLINKER SA G UNLK W062:UNLINKER.S 5.0T2 455 UNLINKER..SA.001 1 LINE 80 39 PAGE UM TIFFANY JULY 03, 1981 15:29:36 5.0T4 400 0 Program to change OS/VS load modules into MTS object decks. UNLINKER is documented in CCMemo 449 (251/3). 0 Referenced by comments of: 251/3, 291/1, 340/1, 341/1, 3031/1 00562/002 *UNLINKER BLKRTN SUBR SA G BLKR W062:BLK.S 5.0T2 456 UNLINKER.BLKRTN_SUBR.SA.002 1 LINE 80 34 PAGE UM TIFFANY JULY 03, 1981 15:29:38 5.0T4 401 0 Subroutine to read OS/VS IEBCOPY or IEHMOVE tapes. 0 Referenced by comments of: 291/1 00562/003 *UNLINKER OE G *UNLINKER 5.0T2 457 UNLINKER..OE.003 1 LINE 8154 10 PAGE UM TIFFANY JULY 03, 1981 15:29:40 5.0T4 402 *UNLINKER 1 SUN SEP 08/96 15:24:55 Page 340 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00563/001 CHAR MANIP SUBRS BTD SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.BTD.SA.001(1) 458 5.0T2 458 CHAR_MANIP_SUBRS.BTD.SA.001 1 LINE 80 3 PAGE UBC BRILL AUG. 01, 1973 23:11.19 5.0T4 403 0 THESE ARE THE UBC CHARACTER MANIPULATION SUBROUTINES. 00563/002 CHAR MANIP SUBRS LCOMC/COMC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.LCOMC/CO.SA.002(1) 459 5.0T2 459 CHAR_MANIP_SUBRS.LCOMC/CO.SA.002 1 LINE 80 3 PAGE UBC BRILL JULY 28, 1977 02:53:01 5.0T4 404 00563/003 CHAR MANIP SUBRS DTB SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.DTB.SA.003(1) 460 5.0T2 460 CHAR_MANIP_SUBRS.DTB.SA.003 1 LINE 80 3 PAGE UBC BRILL AUG. 01, 1973 23:11.29 5.0T4 405 00563/004 CHAR MANIP SUBRS FINDC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.FINDC.SA.004(1) 461 5.0T2 461 CHAR_MANIP_SUBRS.FINDC.SA.004 1 LINE 80 3 PAGE UBC BRILL AUG. 01, 1973 23:11.35 5.0T4 406 00563/005 CHAR MANIP SUBRS FINDST SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.FINDST.SA.005(1) 462 5.0T2 462 CHAR_MANIP_SUBRS.FINDST.SA.005 1 LINE 80 4 PAGE UBC BRILL AUG. 01, 1973 23:11.40 5.0T4 407 00563/006 CHAR MANIP SUBRS IGC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.IGC.SA.006(1) 463 5.0T2 463 CHAR_MANIP_SUBRS.IGC.SA.006 1 LINE 80 3 PAGE UBC BRILL AUG. 01, 1973 23:11.45 5.0T4 408 00563/007 CHAR MANIP SUBRS MOVEC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.MOVEC.SA.007(1) 464 5.0T2 464 CHAR_MANIP_SUBRS.MOVEC.SA.007 1 LINE 80 1 PAGE UBC BRILL AUG. 01, 1973 23:11.51 5.0T4 409 00563/008 CHAR MANIP SUBRS SETC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.SETC.SA.008(1) 465 5.0T2 465 CHAR_MANIP_SUBRS.SETC.SA.008 1 LINE 80 1 PAGE UBC BRILL AUG. 01, 1973 23:11.58 5.0T4 410 00563/009 CHAR MANIP SUBRS TRNC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.TRNC.SA.009(1) 466 5.0T2 466 CHAR_MANIP_SUBRS.TRNC.SA.009 1 LINE 80 3 PAGE UBC BRILL AUG. 01, 1973 23:12.02 5.0T4 411 00563/010 CHAR MANIP SUBRS TRNST SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.TRNST.SA.010(1) 467 5.0T2 467 CHAR_MANIP_SUBRS.TRNST.SA.010 1 LINE 80 4 PAGE UBC BRILL AUG. 01, 1973 23:12.07 5.0T4 412 00563/011 CHAR MANIP SUBRS EQUC SA S1559 5.0T2 VLO FSNAME=CHAR_MANIP_SUBRS.EQUC.SA.011(1) 468 5.0T2 468 CHAR_MANIP_SUBRS.EQUC.SA.011 1 LINE 80 1 PAGE UBC BRILL MAR. 06, 1974 22:01.57 5.0T4 413 00563/012 CHAR MANIP SUBRS OBJECT OC # (PART OF *LIBRARY) UM BRILL 0 Object part of *LIBRARY (524/1) 1 SUN SEP 08/96 15:24:55 Page 341 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00564/001 SYMBOL XREF PROGRAM # (OBSOLETE) 466 D4T2 466 SYMBOL_XREF_PROGRAM..SA.001 1 LINE 80 3 PAGE UM JULY 28, 1977 02:53:57 D4T5 78 0 PROGRAM READS ASSEMBLY SOURCE PROGRAMS FROM SCARDS AND WRITES EACH LINE WHICH CONTAINS A SEQUENCE OR SET SYMBOL ON SPUNCH WITH THE SYMBOL PREFIXED TO THE BEGINNING OF THE LINE (FOR SORTING). 00565/001 STOR PROTECT DIAGNOSTIC SA G MTS:TESTPROTECT(1,999) 5.0T2 469 STOR_PROTECT_DIAGNOSTIC..SA.001 1 LINE 70 3 PAGE UM MTA JULY 03, 1981 15:29:48 5.0T4 414 0 HARDWARE STORAGE PROTECT DIAGNOSTIC TO TEST ALL OF CORE ABOVE X'1000'. PSW RESTART WILL RERUN THE TEST, IF IT STOPS AFTER ONE LOOP (THE CURRENT VERSION LOOPS FOREVER). ASSUMES A 1052 TYPEWRITER AT ADDRESS D40; THIS MAY BE CHANGED BY PATCHING IN A NEW CONSOLE ADDRESS AT LOCATION B02. IBM DOESN'T SEEM TO PROVIDE A DIAGNOSTIC TO PERFORM THE FUNCTIONS PROVIDED BY THIS PROGRAM. THE FOLLOWING ERRORS ARE REPORTED BY NUMBER ALONG WITH THE FAILING ADDRESS AND THE ACTUAL KEY IF RELEVANT: 1. INTERRUPT ON LOAD WITH PSW KEY 2 AND STORAGE KEY 10. 2. KEY NOT EQUAL TO 14 AFTER TEST 1. 3. NO INTERRUPT ON STORE WITH PSW KEY 2 AND STORAGE KEY 10. 4. KEY NOT EQUAL TO 14 OR 16 AFTER TEST 3. (SHOULD REALLY BE 14, BUT SOME MACHINES SET IT TO 16.) 5. STORAGE CHANGED AFTER TEST 3 OR INTERRUPT LOOKING. 6. NO INTERRUPT ON LOAD WITH PSW KEY 2 AND STORAGE KEY 18. 7. KEY NOT EQUAL TO 1C OR 18 AFTER TEST 6. (SHOULD REALLY BE 18, BUT MOST MACHINES SET IT TO 1C.) 8. INTERRUPT ON LOAD WITH PSW KEY 1 AND STORAGE KEY 18. 9. KEY NOT EQUAL TO 1C AFTER TEST 8. 10. INTERRUPT ON STORE WITH PSW KEY 1 AND STORAGE KEY 18. 11. STORAGE NOT CHANGED CORRECTLY AFTER TEST 10 OR INTERRUPT LOOKING. 12. KEY NOT EQUAL TO 1E AFTER TEST 10. 13. RESET REFERENCE BIT (RRB) INSTRUCTION DOESN'T GIVE CONDITION CODE 3 AFTER TEST 12. 14. KEY NOT EQUAL TO 1A AFTER TEST 13. THE PROGRAM WILL LOOP CONTINUOUSLY. NOTHING WILL BE PRINTED EXCEPT ERROR MESSAGES, EACH OF WHICH WILL BE ACCOMPANIED BY A CONSOLE ALARM. 00565/002 STOR PROTECT DIAGNOSTIC OC G MTS:TESTPROTECT(1000) 5.0T2 470 STOR_PROTECT_DIAGNOSTIC..OC.002 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 15:29:49 5.0T4 415 0 NEEDS AN ABSOLUTE LOADER. IPL ON A REAL OR VIRTUAL MACHINE. 00566/001 *PIL MACLIB SM G S1559 5.0T2 VLO FSNAME=PIL.MACLIB.SM.001(1) 471 5.0T2 471 PIL.MACLIB.SM.001 1 SEQ 80 14 PAGE UM TIFFANY JULY 28, 1977 02:54:18 5.0T4 416 0 *PIL IS LATEST VERSION OF THE PITTSBURGH INTERPRETIVE LANGUAGE. NOTE: MACLIB IS THE ONLY MACRO LIBRARY USED IN ASSEMBLING *PIL. 1 SUN SEP 08/96 15:24:55 Page 342 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 178/1 00566/002 *PIL DSECT SA G S1559 5.0T2 VLO FSNAME=PIL.DSECT.SA.002(1) 472 5.0T2 472 PIL.DSECT.SA.002 1 SEQ 80 4 PAGE UM TIFFANY JULY 28, 1977 02:54:19 5.0T4 417 0 COMPS (566/2) THROUGH (566/10) ARE COPY SECTIONS. 0 Referenced by comments of: 566/2 00566/003 *PIL EQUS SA G S1559 5.0T2 VLO FSNAME=PIL.EQUS.SA.003(1) 473 5.0T2 473 PIL.EQUS.SA.003 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:21 5.0T4 418 00566/004 *PIL EVOUTPUT SA G S1559 5.0T2 VLO FSNAME=PIL.EVOUTPUT.SA.004(1) 474 5.0T2 474 PIL.EVOUTPUT.SA.004 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:23 5.0T4 419 00566/005 *PIL FORMDS SA G S1559 5.0T2 VLO FSNAME=PIL.FORMDS.SA.005(1) 475 5.0T2 475 PIL.FORMDS.SA.005 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:25 5.0T4 420 00566/006 *PIL KEYCODES SA G S1559 5.0T2 VLO FSNAME=PIL.KEYCODES.SA.006(1) 476 5.0T2 476 PIL.KEYCODES.SA.006 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:27 5.0T4 421 00566/007 *PIL PARTDS SA G S1559 5.0T2 VLO FSNAME=PIL.PARTDS.SA.007(1) 477 5.0T2 477 PIL.PARTDS.SA.007 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:29 5.0T4 422 00566/008 *PIL SCRDS SA G S1559 5.0T2 VLO FSNAME=PIL.SCRDS.SA.008(1) 478 5.0T2 478 PIL.SCRDS.SA.008 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:31 5.0T4 423 00566/009 *PIL STACKDS SA G S1559 5.0T2 VLO FSNAME=PIL.STACKDS.SA.009(1) 479 5.0T2 479 PIL.STACKDS.SA.009 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:33 5.0T4 424 00566/010 *PIL STEPDS SA G S1559 5.0T2 VLO FSNAME=PIL.STEPDS.SA.010(1) 480 5.0T2 480 PIL.STEPDS.SA.010 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:54:35 5.0T4 425 0 Referenced by comments of: 566/2 00566/011 *PIL PILL SA G S1559 5.0T2 VLO FSNAME=PIL.PILL.SA.011(1) 481 5.0T2 481 PIL.PILL.SA.011 1 SEQ 80 5 PAGE UM TIFFANY APR. 05, 1980 18:15:20 5.0T4 426 0 COMPS (566/11) THROUGH (566/48) ARE THE ASM SOURCE FOR *PIL. REQUIRES *CNFGINFODSECT (654) FOR ASSEMBLY. 0 Referenced by comments of: 566/11 1 SUN SEP 08/96 15:24:55 Page 343 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00566/012 *PIL READIT SA G S1559 5.0T2 VLO FSNAME=PIL.READIT.SA.012(1) 482 5.0T2 482 PIL.READIT.SA.012 1 SEQ 80 6 PAGE UM TIFFANY JULY 28, 1977 02:57:02 5.0T4 427 00566/013 *PIL TYPEIT SA G S1559 5.0T2 VLO FSNAME=PIL.TYPEIT.SA.013(1) 483 5.0T2 483 PIL.TYPEIT.SA.013 1 SEQ 80 6 PAGE UM TIFFANY JULY 28, 1977 02:57:14 5.0T4 428 00566/014 *PIL PAGEMSG SA G S1559 5.0T2 VLO FSNAME=PIL.PAGEMSG.SA.014(1) 484 5.0T2 484 PIL.PAGEMSG.SA.014 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:57:15 5.0T4 429 00566/015 *PIL CANIT SA G S1559 5.0T2 VLO FSNAME=PIL.CANIT.SA.015(1) 485 5.0T2 485 PIL.CANIT.SA.015 1 SEQ 80 2 PAGE UM TIFFANY JULY 28, 1977 02:57:17 5.0T4 430 00566/016 *PIL PIL2 SA G S1559 5.0T2 VLO FSNAME=PIL.PIL2.SA.016(1) 486 5.0T2 486 PIL.PIL2.SA.016 1 SEQ 80 11 PAGE UM TIFFANY JULY 28, 1977 02:57:34 5.0T4 431 00566/017 *PIL DSBRK SA G S1559 5.0T2 VLO FSNAME=PIL.DSBRK.SA.017(1) 487 5.0T2 487 PIL.DSBRK.SA.017 1 SEQ 80 8 PAGE UM TIFFANY JULY 28, 1977 02:57:48 5.0T4 432 00566/018 *PIL BKDOWN SA G S1559 5.0T2 VLO FSNAME=PIL.BKDOWN.SA.018(1) 488 5.0T2 488 PIL.BKDOWN.SA.018 1 SEQ 80 21 PAGE UM TIFFANY JULY 28, 1977 02:57:49 5.0T4 433 00566/019 *PIL FORMPROC SA G S1559 5.0T2 VLO FSNAME=PIL.FORMPROC.SA.019(1) 489 5.0T2 489 PIL.FORMPROC.SA.019 1 SEQ 80 44 PAGE UM TIFFANY JULY 28, 1977 02:57:53 5.0T4 434 00566/020 *PIL PILSQRT SA G S1559 5.0T2 VLO FSNAME=PIL.PILSQRT.SA.020(1) 490 5.0T2 490 PIL.PILSQRT.SA.020 1 SEQ 80 2 PAGE UM TIFFANY JULY 28, 1977 02:57:54 5.0T4 435 00566/021 *PIL PILATAN SA G S1559 5.0T2 VLO FSNAME=PIL.PILATAN.SA.021(1) 491 5.0T2 491 PIL.PILATAN.SA.021 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:57:56 5.0T4 436 00566/022 *PIL PILSINE SA G S1559 5.0T2 VLO FSNAME=PIL.PILSINE.SA.022(1) 492 5.0T2 492 PIL.PILSINE.SA.022 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:57:58 5.0T4 437 00566/023 *PIL PILLOGE SA G S1559 5.0T2 VLO FSNAME=PIL.PILLOGE.SA.023(1) 493 5.0T2 493 PIL.PILLOGE.SA.023 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:58:00 5.0T4 438 00566/024 *PIL PILETX SA G S1559 5.0T2 VLO FSNAME=PIL.PILETX.SA.024(1) 494 5.0T2 494 PIL.PILETX.SA.024 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:58:03 5.0T4 439 1 SUN SEP 08/96 15:24:55 Page 344 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00566/025 *PIL LOOKPS SA G S1559 5.0T2 VLO FSNAME=PIL.LOOKPS.SA.025(1) 495 5.0T2 495 PIL.LOOKPS.SA.025 1 SEQ 80 6 PAGE UM TIFFANY JULY 28, 1977 02:58:05 5.0T4 440 00566/026 *PIL WANT16 SA G S1559 5.0T2 VLO FSNAME=PIL.WANT16.SA.026(1) 496 5.0T2 496 PIL.WANT16.SA.026 1 SEQ 80 4 PAGE UM TIFFANY APR. 05, 1980 18:15:21 5.0T4 441 0 Copies *CNFGINFODSECT (654). 00566/027 *PIL MOVPOL SA G S1559 5.0T2 VLO FSNAME=PIL.MOVPOL.SA.027(1) 497 5.0T2 497 PIL.MOVPOL.SA.027 1 SEQ 80 4 PAGE UM TIFFANY JULY 28, 1977 02:58:09 5.0T4 442 00566/028 *PIL FORTROL SA G S1559 5.0T2 VLO FSNAME=PIL.FORTROL.SA.028(1) 498 5.0T2 498 PIL.FORTROL.SA.028 1 SEQ 80 6 PAGE UM TIFFANY JULY 28, 1977 02:58:11 5.0T4 443 00566/029 *PIL RETHEAD SA G S1559 5.0T2 VLO FSNAME=PIL.RETHEAD.SA.029(1) 499 5.0T2 499 PIL.RETHEAD.SA.029 1 SEQ 80 5 PAGE UM TIFFANY JULY 28, 1977 02:58:13 5.0T4 444 00566/030 *PIL TALPL SA G S1559 5.0T2 VLO FSNAME=PIL.TALPL.SA.030(1) 500 5.0T2 500 PIL.TALPL.SA.030 1 SEQ 80 2 PAGE UM TIFFANY JULY 28, 1977 02:58:15 5.0T4 445 00566/031 *PIL CONVERT SA G S1559 5.0T2 VLO FSNAME=PIL.CONVERT.SA.031(1) 501 5.0T2 501 PIL.CONVERT.SA.031 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:58:17 5.0T4 446 00566/032 *PIL STEPMESS SA G S1559 5.0T2 VLO FSNAME=PIL.STEPMESS.SA.032(1) 502 5.0T2 502 PIL.STEPMESS.SA.032 1 SEQ 80 2 PAGE UM TIFFANY JULY 28, 1977 02:58:19 5.0T4 447 00566/033 *PIL FUNCS SA G S1559 5.0T2 VLO FSNAME=PIL.FUNCS.SA.033(1) 503 5.0T2 503 PIL.FUNCS.SA.033 1 SEQ 80 30 PAGE UM TIFFANY JULY 28, 1977 02:58:32 5.0T4 448 00566/034 *PIL LOPL SA G S1559 5.0T2 VLO FSNAME=PIL.LOPL.SA.034(1) 504 5.0T2 504 PIL.LOPL.SA.034 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:58:43 5.0T4 449 00566/035 *PIL DELVALS SA G S1559 5.0T2 VLO FSNAME=PIL.DELVALS.SA.035(1) 505 5.0T2 505 PIL.DELVALS.SA.035 1 SEQ 80 25 PAGE UM TIFFANY JULY 28, 1977 02:58:56 5.0T4 450 00566/036 *PIL XFORMX SA G S1559 5.0T2 VLO FSNAME=PIL.XFORMX.SA.036(1) 506 5.0T2 506 PIL.XFORMX.SA.036 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:59:09 5.0T4 451 1 SUN SEP 08/96 15:24:55 Page 345 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00566/037 *PIL EXTRANS SA G S1559 5.0T2 VLO FSNAME=PIL.EXTRANS.SA.037(1) 507 5.0T2 507 PIL.EXTRANS.SA.037 1 SEQ 80 3 PAGE UM TIFFANY JULY 28, 1977 02:59:09 5.0T4 452 00566/038 *PIL TYPEPS SA G S1559 5.0T2 VLO FSNAME=PIL.TYPEPS.SA.038(1) 508 5.0T2 508 PIL.TYPEPS.SA.038 1 SEQ 80 15 PAGE UM TIFFANY JULY 28, 1977 02:59:20 5.0T4 453 00566/039 *PIL XPRES SA G S1559 5.0T2 VLO FSNAME=PIL.XPRES.SA.039(1) 509 5.0T2 509 PIL.XPRES.SA.039 1 SEQ 80 19 PAGE UM TIFFANY JULY 28, 1977 02:59:31 5.0T4 454 00566/040 *PIL MINDIR SA G S1559 5.0T2 VLO FSNAME=PIL.MINDIR.SA.040(1) 510 5.0T2 510 PIL.MINDIR.SA.040 1 SEQ 80 5 PAGE UM TIFFANY JULY 28, 1977 02:59:32 5.0T4 455 00566/041 *PIL HEADINS SA G S1559 5.0T2 VLO FSNAME=PIL.HEADINS.SA.041(1) 511 5.0T2 511 PIL.HEADINS.SA.041 1 SEQ 80 1 PAGE UM TIFFANY JULY 28, 1977 02:59:34 5.0T4 456 00566/042 *PIL STROP SA G S1559 5.0T2 VLO FSNAME=PIL.STROP.SA.042(1) 512 5.0T2 512 PIL.STROP.SA.042 1 SEQ 80 15 PAGE UM TIFFANY JULY 28, 1977 02:59:36 5.0T4 457 00566/043 *PIL SETUP SA G S1559 5.0T2 VLO FSNAME=PIL.SETUP.SA.043(1) 513 5.0T2 513 PIL.SETUP.SA.043 1 SEQ 80 6 PAGE UM TIFFANY JULY 28, 1977 02:59:38 5.0T4 458 00566/044 *PIL SPLIT SA G S1559 5.0T2 VLO FSNAME=PIL.SPLIT.SA.044(1) 514 5.0T2 514 PIL.SPLIT.SA.044 1 SEQ 80 2 PAGE UM TIFFANY JULY 28, 1977 02:59:40 5.0T4 459 00566/045 *PIL FORBREAK SA G S1559 5.0T2 VLO FSNAME=PIL.FORBREAK.SA.045(1) 515 5.0T2 515 PIL.FORBREAK.SA.045 1 SEQ 80 10 PAGE UM TIFFANY JULY 28, 1977 02:59:50 5.0T4 460 00566/046 *PIL EVAL SA G S1559 5.0T2 VLO FSNAME=PIL.EVAL.SA.046(1) 516 5.0T2 516 PIL.EVAL.SA.046 1 SEQ 80 28 PAGE UM TIFFANY JULY 28, 1977 02:59:55 5.0T4 461 00566/047 *PIL TYPARRY SA G S1559 5.0T2 VLO FSNAME=PIL.TYPARRY.SA.047(1) 517 5.0T2 517 PIL.TYPARRY.SA.047 1 SEQ 80 12 PAGE UM TIFFANY JULY 28, 1977 03:00:03 5.0T4 462 00566/048 *PIL PROCESS SA G S1559 5.0T2 VLO FSNAME=PIL.PROCESS.SA.048(1) 518 5.0T2 518 PIL.PROCESS.SA.048 1 SEQ 80 51 PAGE UM TIFFANY JULY 28, 1977 03:00:07 5.0T4 463 0 Referenced by comments of: 566/11 1 SUN SEP 08/96 15:24:55 Page 346 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00566/049 *PIL *PIL OC G *PIL 5.0T2 519 PIL.*PIL.OC.049 1 LINE 928 21 PAGE UM TIFFANY JULY 03, 1981 15:30:24 5.0T4 464 *PIL 00566/050 *PIL PLM WT G S1559 5.0T2 VLO FSNAME=PIL.PLM.WT.050(1) 520 5.0T2 520 PIL.PLM.WT.050 1 LINE 256 37 PAGE UM TIFFANY JULY 28, 1977 03:00:13 5.0T4 465 0 TEXT/360 MASTER FILE FOR WRITEUP DESCRIBING THE INTERNAL STRUCTURE OF PIL/2 FOR PROSPECTIVE DEVELOPERS. 00567/001 *1052RTN SA O MTA:1052RTN 5.0T4 372 1052RTN..SA.001 1 LINE 72 23 PAGE UM MTA AUG. 09, 1981 23:16:01 5.0T10 276 0 MTS DEVICE SUPPORT ROUTINES FOR 1052 OPERATOR'S CONSOLE. ALLOWS USE OF 1052 CONSOLE OR 2150 AS AN MTS TERMINAL. AWRITE AND HALTIO ENTRIES ADDED BUT NOT TESTED. ASSEMBLE USING COPY:MTS.MACROS (344/3). 00567/002 *1052RTN OC O *1052RTN 5.0T4 373 1052RTN..OC.002 1 LINE 80 5 PAGE UM MTA AUG. 09, 1981 23:16:05 5.0T10 277 *1052RTN 00568/001 *TIMETALLY # (OBSOLETE) D3.2T1 492 TIMETALLY..SA.01 1 LINE 80 45 PAGE UM MAR. 21, 1975 01:53:09 0 Obsoleted by SDS (600). 00569/001 PCE SNIFFER # (PART OF HASP) UM 0 Distributed as part of HASP (387/24) and (387/25). 00570/001A *MNETRTN SA G W267:MNETRTN.S(1) 5.1T1 626 MNETRTN..SA.001 1 LINE 72 51 PAGE UM EADIE JULY 23, 1983 11:21:09 0 MTS Device Support Routines for the Merit Computer Network interactive service. Assemble using *SYSMAC, COPY:MTS.MACROS (344/3) and *PEXIT (775). COPY's COPY:LLMPSEQU (087), COPY:GLOBALDEFS (1026/1) and COPY:GLOBALSETS (1026/2). 00570/002A *MNETRTN OC G *MNETRTN 5.1T1 627 MNETRTN..OC.002 1 LINE 12872 14 PAGE UM EADIE JULY 23, 1983 11:21:13 *MNETRTN 00570/003A *MNETRTN ASCII XLATE SA G S0999 5.0AT1 VLO FSNAME=MNETRTN.ASCII_XLATE.SA.003(1) 120 5.1T1 628 MNETRTN.ASCII_XLATE.SA.003 1 LINE 80 4 PAGE UM EADIE JAN. 21, 1982 23:10:07 0 MERIT ASCII/EBCDIC TRANSLATE TABLES MASCEBC AND EBCMASC WHICH ARE USED BOTH BY THE MERIT DSR AND HASP (387). 1 SUN SEP 08/96 15:24:55 Page 347 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 387/9 00570/004A *MNETRTN ASCII XLATE OC G # (PART OF HASP) UM EADIE 0 Part of SEG2:HASP (387/9). 00571/001 APL LIBRARY WS ADVANCEDE D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.ADVANCEDE.D.001(1) 524 5.0T2 524 APL_LIBRARY_WS.ADVANCEDE.D.001 1 LINE 255 6 PAGE UM HELFFRICH JULY 03, 1981 15:30:38 5.0T4 469 0 THE APL LIBRARY WORKSPACES MUST BE RESTORED AS FILES UNDER USER ID "APL." USING AS FILE NAMES THE 3 DIGIT (WITH LEADING ZEROS) LIBRARY FILE NUMBER FOLLOWED BY THE WORKSPACE NAME, I.E., USE THE SAME NAMES AS WERE USED TO GENERATE THE DISTRIBUTION TAPE. 00571/002 APL LIBRARY WS APLCOURSE D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.APLCOURSE.D.002(1) 525 5.0T2 525 APL_LIBRARY_WS.APLCOURSE.D.002 1 LINE 255 6 PAGE UM HELFFRICH JULY 03, 1981 15:30:39 5.0T4 470 00571/003 APL LIBRARY WS CLASS D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.CLASS.D.003(1) 526 5.0T2 526 APL_LIBRARY_WS.CLASS.D.003 1 LINE 255 7 PAGE UM HELFFRICH JULY 03, 1981 15:30:40 5.0T4 471 00571/004 APL LIBRARY WS NEWS D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.NEWS.D.004(1) 527 5.0T2 527 APL_LIBRARY_WS.NEWS.D.004 1 SEQ 28872 8 PAGE UM HELFFRICH JULY 03, 1981 15:30:41 5.0T4 472 00571/005 APL LIBRARY WS PLOTFORMA D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.PLOTFORMA.D.005(1) 528 5.0T2 528 APL_LIBRARY_WS.PLOTFORMA.D.005 1 LINE 255 6 PAGE UM HELFFRICH JULY 03, 1981 15:30:42 5.0T4 473 00571/006 APL LIBRARY WS TYPEDRILL D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.TYPEDRILL.D.006(1) 529 5.0T2 529 APL_LIBRARY_WS.TYPEDRILL.D.006 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:43 5.0T4 474 00571/007 APL LIBRARY WS WSFNS D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.WSFNS.D.007(1) 530 5.0T2 530 APL_LIBRARY_WS.WSFNS.D.007 1 LINE 255 3 PAGE UM HELFFRICH JULY 03, 1981 15:30:44 5.0T4 475 00571/008 APL LIBRARY WS EIGENVALUE D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.EIGENVALUE.D.008(1) 531 5.0T2 531 APL_LIBRARY_WS.EIGENVALUE.D.008 1 SEQ 12980 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:45 5.0T4 476 00571/009 APL LIBRARY WS BRFNS D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.BRFNS.D.009(1) 532 5.0T2 532 APL_LIBRARY_WS.BRFNS.D.009 1 SEQ 8044 3 PAGE UM HELFFRICH JULY 03, 1981 15:30:45 5.0T4 477 00571/010 APL LIBRARY WS CATALOG D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.CATALOG.D.010(1) 533 5.0T2 533 APL_LIBRARY_WS.CATALOG.D.010 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:46 5.0T4 478 1 SUN SEP 08/96 15:24:55 Page 348 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00571/011 APL LIBRARY WS STP1 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP1.D.011(1) 534 5.0T2 534 APL_LIBRARY_WS.STP1.D.011 1 LINE 255 9 PAGE UM HELFFRICH JULY 03, 1981 15:30:47 5.0T4 479 00571/012 APL LIBRARY WS STP2 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP2.D.012(1) 535 5.0T2 535 APL_LIBRARY_WS.STP2.D.012 1 LINE 255 6 PAGE UM HELFFRICH JULY 03, 1981 15:30:47 5.0T4 480 00571/013 APL LIBRARY WS STP3 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP3.D.013(1) 536 5.0T2 536 APL_LIBRARY_WS.STP3.D.013 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:48 5.0T4 481 00571/014 APL LIBRARY WS STP4 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP4.D.014(1) 537 5.0T2 537 APL_LIBRARY_WS.STP4.D.014 1 LINE 255 9 PAGE UM HELFFRICH JULY 03, 1981 15:30:49 5.0T4 482 00571/015 APL LIBRARY WS STP5 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP5.D.015(1) 538 5.0T2 538 APL_LIBRARY_WS.STP5.D.015 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:50 5.0T4 483 00571/016 APL LIBRARY WS STP6 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP6.D.016(1) 539 5.0T2 539 APL_LIBRARY_WS.STP6.D.016 1 LINE 255 5 PAGE UM HELFFRICH JULY 03, 1981 15:30:51 5.0T4 484 00571/017 APL LIBRARY WS STP7 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP7.D.017(1) 540 5.0T2 540 APL_LIBRARY_WS.STP7.D.017 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:52 5.0T4 485 00571/018 APL LIBRARY WS STP8 D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.STP8.D.018(1) 541 5.0T2 541 APL_LIBRARY_WS.STP8.D.018 1 LINE 255 5 PAGE UM HELFFRICH JULY 03, 1981 15:30:53 5.0T4 486 00571/019 APL LIBRARY WS COMPLEX D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.COMPLEX.D.019(1) 542 5.0T2 542 APL_LIBRARY_WS.COMPLEX.D.019 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:53 5.0T4 487 00571/020 APL LIBRARY WS INDEX D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.INDEX.D.020(1) 543 5.0T2 543 APL_LIBRARY_WS.INDEX.D.020 1 LINE 255 4 PAGE UM HELFFRICH JULY 03, 1981 15:30:54 5.0T4 488 00571/021 APL LIBRARY WS UTIL D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.UTIL.D.021(1) 544 5.0T2 544 APL_LIBRARY_WS.UTIL.D.021 1 LINE 255 3 PAGE UM HELFFRICH JULY 03, 1981 15:30:54 5.0T4 489 00571/022 APL LIBRARY WS ALGFORM D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.ALGFORM.D.022(1) 545 5.0T2 545 APL_LIBRARY_WS.ALGFORM.D.022 1 LINE 255 6 PAGE UM HELFFRICH JULY 03, 1981 15:30:55 5.0T4 490 00571/023 APL LIBRARY WS COGO D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.COGO.D.023(1) 546 5.0T2 546 APL_LIBRARY_WS.COGO.D.023 1 LINE 255 9 PAGE UM HELFFRICH JULY 03, 1981 15:30:56 5.0T4 491 1 SUN SEP 08/96 15:24:55 Page 349 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00571/024 APL LIBRARY WS COMPCENT D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.COMPCENT.D.024(1) 547 5.0T2 547 APL_LIBRARY_WS.COMPCENT.D.024 1 LINE 255 3 PAGE UM HELFFRICH JULY 03, 1981 15:30:57 5.0T4 492 00571/025 APL LIBRARY WS CW D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.CW.D.025(1) 548 5.0T2 548 APL_LIBRARY_WS.CW.D.025 1 LINE 255 7 PAGE UM HELFFRICH JULY 03, 1981 15:30:58 5.0T4 493 00571/026 APL LIBRARY WS EDIT D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.EDIT.D.026(1) 549 5.0T2 549 APL_LIBRARY_WS.EDIT.D.026 1 LINE 255 7 PAGE UM HELFFRICH JULY 03, 1981 15:30:59 5.0T4 494 00571/027 APL LIBRARY WS MATRIXALG D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.MATRIXALG.D.027(1) 550 5.0T2 550 APL_LIBRARY_WS.MATRIXALG.D.027 1 LINE 255 8 PAGE UM HELFFRICH JULY 03, 1981 15:31:00 5.0T4 495 00571/028 APL LIBRARY WS SNOBOL D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.SNOBOL.D.028(1) 551 5.0T2 551 APL_LIBRARY_WS.SNOBOL.D.028 1 SEQ 17176 5 PAGE UM HELFFRICH JULY 03, 1981 15:31:00 5.0T4 496 0 THIS SNOBOL INTERPRETER, WHICH DIDN'T WORK PREVIOUSLY, WAS FIXED BY A USER. 00571/029 APL LIBRARY WS SRADEMO D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.SRADEMO.D.029(1) 552 5.0T2 552 APL_LIBRARY_WS.SRADEMO.D.029 1 LINE 255 9 PAGE UM HELFFRICH JULY 03, 1981 15:31:01 5.0T4 497 00571/030 APL LIBRARY WS KINGDOM D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.KINGDOM.D.030(1) 553 5.0T2 553 APL_LIBRARY_WS.KINGDOM.D.030 1 SEQ 17208 5 PAGE UM HELFFRICH JULY 03, 1981 15:31:02 5.0T4 498 0 XM6 APL REWORK OF ALBERTA'S SV APL 'KINGDOM' SIMULATION GAME. 00571/031 APL LIBRARY WS TESTS D S1559 5.0T2 VLO FSNAME=APL_LIBRARY_WS.TESTS.D.031(1) 554 5.0T2 554 APL_LIBRARY_WS.TESTS.D.031 1 SEQ 3080 2 PAGE UM HELFFRICH JULY 03, 1981 15:31:03 5.0T4 499 0 WORKSPACE INTENDED FOR PROVIDING A TEST FACILITY FOR THE TRIAL OF NEW APL DEVICES. 00572/001 BLOKLETR SUBR SA G BKLT W059:BLOKLETR.S 5.0T2 555 BLOKLETR_SUBR..SA.001 1 LINE 80 11 PAGE UM VALERIO JULY 03, 1981 15:31:04 5.0T4 500 0 SUBROUTINE CALLED BY MTS TO PRODUCE BLOCKLETTERS PRINTED ON *PRINT* TAIL SHEETS. 0 Referenced by comments of: 555/2 00572/002 BLOKLETR SUBR OC G # (PART OF RESIDENT SYSTEM) UM VALERIO 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 350 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00573/001 MTS VOLUME 5 MASTER WT S0451 MTSV5 'MTS MANUALS' POSN=NEWM7.V5 5.0T2 556 MTS_VOLUME_5.MASTER.WT.001 1 SEQ 132 248 PAGE UM MANUAL APR. 05, 1980 18:17:25 5.0T5 1 0 TEXT/360 master for Volume 5 "System Services" of the UM MTS manuals, May 1983. Editor: Richard A. Salisbury 00573/002 MTS VOLUME 5 PRINT PT S0451 MTSV5 'MTS MANUALS' POSN=PRINT7.V5 5.0T2 557 MTS_VOLUME_5.PRINT.PT.002 1 SEQ 132 404 PAGE UM MANUAL APR. 05, 1980 18:17:37 5.0T5 2 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 00573/003 MTS VOLUME 5 LOADER MAP P S0451 MTSV5 'MTS MANUALS' POSN=V5.LOADERMAP.2 5.0T2 558 MTS_VOLUME_5.LOADER_MAP.P.003 1 SEQ 128 2 PAGE UM MANUAL MAY 13, 1978 17:47:12 5.0T5 3 0 PRINTED OUTPUT FOR THE EXAMPLE LOADER MAP IN VOLUME 5. 00573/004 MTS VOLUME 5 INDEX SOURCE D S0451 MTSV5 'MTS MANUALS' POSN=V5INDEXSOU.6 5.0T2 559 MTS_VOLUME_5.INDEX_SOURCE.D.004 1 SEQ 145 6 PAGE UM MANUAL APR. 05, 1980 18:17:44 5.0T5 4 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 5. 00574/001 MTS VOLUME 10 MASTER WT S0546 MTSV10 'MTS MANUALS' POSN=NEWM3.V10 5.0T2 560 MTS_VOLUME_10.MASTER.WT.001 1 SEQ 150 98 PAGE UM MANUAL JULY 03, 1981 15:34:06 5.0T5 5 0 TEXT/360 MASTER FOR VOLUME 10 "BASIC IN MTS" OF THE UM MTS MANUALS, DECEMBER 1980. EDITOR: EDWARD J. FRONCZAK 00574/002 MTS VOLUME 10 OUTPUT P S0546 MTSV10 'MTS MANUALS' POSN=VOL10DEC80 5.0T2 561 MTS_VOLUME_10.OUTPUT.P.002 1 SEQ 70 227 PAGE UM MANUAL JULY 03, 1981 15:34:28 5.0T5 6 0 THIS FILE SHOULD BE COPIED DIRECTLY TO A PRINTER. IT IS NOT A TEXT/360 PRINT FILE; IT IS THE OUTPUT FROM *PRINT WITH AN INDEX INSERTED. 00575/001 MTS VOLUME 4 MASTER WT S0616 MTSV4 'MTS MANUALS' POSN=NEWM5.V4 5.0T2 562 MTS_VOLUME_4.MASTER.WT.001 1 SEQ 132 465 PAGE UM MANUAL JULY 03, 1981 15:36:20 5.0T5 7 0 TEXT/360 MASTER FOR VOLUME 4 "TERMINALS AND TAPES" OF THE UM MTS MANUALS, DECEMBER 1980. EDITOR: RICHARD A. SALISBURY 1 SUN SEP 08/96 15:24:55 Page 351 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00575/002 MTS VOLUME 4 PRINT PT S0616 MTSV4 'MTS MANUALS' POSN=PRINT5.V4 5.0T2 563 MTS_VOLUME_4.PRINT.PT.002 1 SEQ 132 536 PAGE UM MANUAL JULY 03, 1981 15:36:35 5.0T5 8 0 TEXT/360 PRINT FILE. 00575/003 MTS VOLUME 4 INDEX SOURCE D S0616 MTSV4 'MTS MANUALS' POSN=V4INDEXSOU.5 5.0T2 564 MTS_VOLUME_4.INDEX_SOURCE.D.003 1 SEQ 120 11 PAGE UM MANUAL JULY 03, 1981 15:37:15 5.0T5 9 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 4. 00576/001 CVTOMR SA G S1559 5.0T2 VLO FSNAME=CVTOMR..SA.001(1) 565 5.0T2 565 CVTOMR..SA.001 1 LINE 80 15 PAGE UM DWB JULY 28, 1977 03:07:26 5.0T5 10 0 SUBROUTINE CALLED BY BOTH HASP (ONLY IF FIRST CARD FOLLOWING A DECK (S8) CARD IS AN OMR CARD) AND MTS (FOR ALL OTHER CONVERSION) TO CONVERT OMR CARDS TO EBCDIC. NOTE: THIS ROUTINE CURRENTLY HANDLES THE WATERLOO OMR CARD FORMAT (2-4-6 MARK IN COLUMN 1), AND THE UM MTS-AND-FORTRAN CARD (1-5-7 MARK IN COLUMN 1). 00576/002 CVTOMR OC G # (PART OF RESIDENT SYSTEM) UM DWB 0 Object part of Resident System (468). 00577/001A MACHINE CHECK RECOVERY 370 MCHCCH SA G MTA:MCHCCH(1,999) 5.1T1 629 MACHINE_CHECK_RECOVERY.37.SA.001 1 LINE 80 14 PAGE UM MTA JULY 23, 1983 11:22:36 0 370 model-independent machine and channel check handler. Assemble using COPY:SETPARM (653), *SYSMAC, MCHMAC (577/5), and COPY:MISC.MACROS (728). Copies COPY:LLMPSEQU (087), COPY:PSA (162), COPY:PCBDSECT (470), COPY:CMDAREADSECT (531/20), COPY:GLOBALS (1026/3), and COPY:BJPDSCT (650/3). ******************************************************************************** D5.0B version: 580 changes. ******************************************************************************** 0 Referenced by comments of: 577/6, 589/2, 655/4 00577/002A MACHINE CHECK RECOVERY 370 MCHCCH OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00577/003 MACHINE CHECK RECOVERY 370 LOGGER SA G S1559 5.0T2 VLO FSNAME=MACHINE_CHECK_RECOVERY.37.SA.003(1) 567 5.0T2 567 MACHINE_CHECK_RECOVERY.37.SA.003 1 LINE 80 4 PAGE UBC MTA MAR. 21, 1975 01:55:46 5.0T5 12 0 THIS IS A PROGRAM THAT PRODUCES ON SPUNCH A STANDALONE PROGRAM TO BE WRITTEN TO A TAPE AND IPL'D AFTER A HARD MACHINE CHECK. THE STANDALONE PROGRAM COPIES THE 370 MACHINE CHECK RECORD (I.E. PSA PLUS EXTENDED LOGOUT AREA) TO THE 1 SUN SEP 08/96 15:24:55 Page 352 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 SECOND FILE OF THE TAPE FROM WHICH IT WAS IPL'D. THE RECORD ON TAPE HAS THE SAME FORMAT AS NORMAL MTS MACHINE CHECK LOGOUTS. COPIES COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), AND COPY:PSA (162). THIS PROGRAM HAS NEVER BEEN USED AT UM. 00577/004 MACHINE CHECK RECOVERY 370 LOGGER OC G S1559 5.0T2 VLO FSNAME=MACHINE_CHECK_RECOVERY.37.OC.004(1) 568 5.0T2 568 MACHINE_CHECK_RECOVERY.37.OC.004 1 LINE 80 3 PAGE UBC MTA MAR. 21, 1975 01:55:49 5.0T5 13 00577/005A MACHINE CHECK RECOVERY MACROS SM G MTA:MCHMAC 5.1T1 630 MACHINE_CHECK_RECOVERY.MA.SM.005 1 LINE 72 28 PAGE UM MTA JULY 23, 1983 11:22:37 0 Macros for assembling EREP and Machine Check Recovery. ******************************************************************************** D5.0B version: 580 changes. ******************************************************************************** 0 Referenced by comments of: 531/8, 577/1, 577/8, 577/11, 589/2, 589/4, 589/5, 589/6, 589/8, 655/4 00577/006A MACHINE CHECK RECOVERY MCHSUBR SA G MTA:MCHSUBR(1,999) 5.1T1 631 MACHINE_CHECK_RECOVERY.MC.SA.006 1 LINE 69 1 PAGE UM MTA JULY 23, 1983 11:22:38 0 MCHCCH (577/1) HAS A WXTRN FOR MCHSUBR AND IF IT IS PRESENT, MCHCCH CALLS IT TO DO MODEL DEPENDENT RECOVERY FOR A MACHINE CHECK. IT CAN BE DELETED FROM THE SYSTEM IF NOT NEEDED. 0 Referenced by comments of: 577/8 00577/007A MACHINE CHECK RECOVERY MCHSUBR OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00577/008C MACHINE CHECK RECOVERY IGF00470 SA G S1644 5.0BT1 VLO FSNAME=MACHINE_CHECK_RECOVERY.IG.SA.008(1) 338 5.1T1 632 MACHINE_CHECK_RECOVERY.IG.SA.008 1 LINE 79 12 PAGE UM MTA NOV. 21, 1982 14:47:44 0 Model dependent machine check recovery for Amdahl 470. This component used to be (577/6). Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), COPY:PSA (162), and *CNFGINFODSECT (654). Assemble with MCHMAC (577/5) and COPY:SETPARM (653). 00577/009C MACHINE CHECK RECOVERY IGF00470 OC G # (PART OF THE RESIDENT SYSTEM) UM MTA 00577/010A MACHINE CHECK RECOVERY IGF00580 SA O MTA:580MCH 5.1T1 633 MACHINE_CHECK_RECOVERY.IG.SA.010 1 LINE 72 9 PAGE UM MTA JULY 23, 1983 11:29:32 0 MVS model dependent machine check code for Amdahl 5860, Version 3.0. THIS IS COPYRIGHTED AND MUST NOT BE GIVEN TO ANY THIRD PARTY. 1 SUN SEP 08/96 15:24:55 Page 353 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 577/11 00577/011A MACHINE CHECK RECOVERY IGF00580 UC O MTA:580MCH.U(1,999) 5.1T1 634 MACHINE_CHECK_RECOVERY.IG.UC.011 1 LINE 75 4 PAGE UM MTA JULY 23, 1983 11:29:33 0 Updates to turn the MVS 580 machine check module (577/10) into the MTS version. Requires COPY:GLOBALS (1026/3), COPY:PSA (162), COPY:LLMPSEQU (087), MCHMAC (577/5), and COPY:SETPARM (653). 00577/012C MACHINE CHECK RECOVERY IGF00580 OC O # (PART OF THE RESIDENT SYSTEM) UM MTA 00577/013 MACHINE CHECK RECOVERY GETLOGS SA G MTA:GETLOGS(1000) 5.0T2 571 MACHINE_CHECK_RECOVERY.GE.SA.008 1 LINE 69 3 PAGE UM MTA JULY 03, 1981 15:37:48 5.0T5 16 MTA.:GETLOGS 0 PROGRAM TO RETREIVE LOGS FROM THE CPS DISK ON AN AMDAHL 470 AND WRITE THEM (FORMATTED) ON SPRINT. WHEN RUN, IT PRINTS (ON SERCOM) THE KEY FOR ALL LOGS ON THE DISK AND ASKS WHICH ONE YOU WANT (ON GUSER). RUN WITH PROT=OFF. 00577/014 MACHINE CHECK RECOVERY GETLOGS OC G MTA:GETLOGS(1,999) 5.0T2 572 MACHINE_CHECK_RECOVERY.GE.OC.009 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 15:37:49 5.0T5 17 00577/015 MACHINE CHECK RECOVERY INIT:MCFILE D # INIT:MCFILE UM MTA INIT:MCFILE@E 0 LOG FILE USED BY THE CMDSTAT PICKUP PROGRAM (*CMD) TO SAVE TYPE 10 (MACHINE AND CHANNEL CHECK) RECORDS. 0 Referenced by comments of: 531/6, 655/3 00578/001 RSF D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=RSF 5.0T4 374 RSF.D5.0_MASTER.SA.001 1 LINE 80 90 PAGE UM MTS BURLING AUG. 09, 1981 23:16:07 5.0T10 278 0 Really shared files (RSF) portion of MTS. Copies *GFINFODSECT (593), COPY:LLMPSEQU (087), and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM (653/1), and COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 42/2, 143/1, 593/1 00578/002A RSF UPDATE UC G MTSS:RSF/UPD 5.1T1 635 RSF.UPDATE.UC.002 1 LINE 122 58 PAGE UM MTS BURLING JULY 23, 1983 11:29:33 0 *CDUPDATE input to produce current source. ********************************************************************* D5.1 updates: Contains the new system subroutines PATBUILD, PATMATCH, and PATFREE. These subroutines, which will eventually be moved out of RSF, do 1 SUN SEP 08/96 15:24:55 Page 354 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 pattern matching like the FILESTATUS command. They are used by components (852), (853), (854), (855), (856), (857), (858), and (509/10) through (509/17). ********************************************************************* 00578/003A RSF OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00578/004A RSF L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=RSF.LIST 5.1T1 636 RSF..L.004 1 LINE 133 298 PAGE UM MTS BURLING JULY 23, 1983 11:30:12 00578/005A RSF COMMENTS D G MTSS:RSF/COM 5.1T1 637 RSF.COMMENTS.D.005 1 LINE 66 1 PAGE UM MTS BURLING JULY 23, 1983 11:30:15 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00578/006C RSF MEMO 453 WF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO453.SOU 5.1T1 638 RSF.MEMO_453.WF.006 1 LINE 69 5 PAGE UM D BODWIN JUNE 06, 1983 15:28:52 0 This is Computing Center Memo 453 -- "Pattern Matching Routines." 0 Referenced by comments of: 578/7 00578/007C RSF MEMO 453 PF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO453.OUT 5.1T1 639 RSF.MEMO_453.PF.007 1 LINE 79 8 PAGE UM D BODWIN JUNE 06, 1983 15:29:02 0 Printer-ready version of (578/6). 00579/001A LOW CORE SYMBOL TABLES SYSDEFS SA G MTSS:SYSDEFS(1,999) 5.1T1 640 LOW_CORE_SYMBOL_TABLES.SY.SA.001 1 LINE 71 4 PAGE UM MTS BURLING JULY 23, 1983 11:30:28 MTSS:SYSDEFS 0 This is a low-core symbol table for the definition of symbols used for systems work, i.e. not required by user programs. To reference this symbol table, the following 3 loader cards are required at the end of an object deck: RIP SYSDEFS LCS LCSYMBOL LCS SYSDEFS Copies COPY:GLOBALS (1026/3). 0 Referenced by comments of: 682/38, 806/1 00579/002A LOW CORE SYMBOL TABLES SYSDEFS OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 355 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00579/003 LOW CORE SYMBOL TABLES COPY:SYSDEFS OC G COPY:SYSDEFS 5.0T4 378 LOW_CORE_SYMBOL_TABLES.CO.OC.003 1 LINE 24 1 PAGE UM MTS BURLING AUG. 09, 1981 23:16:22 5.0T10 282 COPY:SYSDEFS 0 Contains the 3 loader cards: RIP SYSDEFS LCS LCSYMBOL LCS SYSDEFS 0 Referenced by comments of: 9/4, 67/44, 482/62, 534/4, 616/2, 617/4, 642/15, 655/5, 682/27, 682/31, 682/33, 682/35, 682/42, 682/47, 752/5, 769/22, 804/2, 821/30, 866/2, 866/5, 1030/3, 1070/4 00579/004A LOW CORE SYMBOL TABLES CCDEFS SA G MTS:CCDEFS(1,999) 5.1T1 641 LOW_CORE_SYMBOL_TABLES.CC.SA.004 1 LINE 70 1 PAGE UM MTS BURLING JULY 23, 1983 11:30:28 MTS:CCDEFS 0 Contains source for a low core symbol table which is CC-callable from system routines. 00579/005 LOW CORE SYMBOL TABLES CCDEFS OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00579/006 LOW CORE SYMBOL TABLES COPY:CCDEFS OC G COPY:CCDEFS 5.0T4 380 LOW_CORE_SYMBOL_TABLES.CO.OC.006 1 LINE 24 1 PAGE UM MTS BURLING AUG. 09, 1981 23:16:25 5.0T10 284 COPY:CCDEFS 0 Contains 3 loader cards: RIP CCDEFS LCS LCSYMBOL LCS CCDEFS 0 Referenced by comments of: 802/6 00579/007A LOW CORE SYMBOL TABLES CCSYMBOL SA G MTS:CCSYMBOL(1,999) 5.1T1 642 LOW_CORE_SYMBOL_TABLES.CC.SA.007 1 LINE 71 1 PAGE UM MTS BURLING JULY 23, 1983 11:30:29 MTS:CCSYMBOL 0 Contains source for a low core symbol table which is CC-callable from user routines. **************************************************************************** Currently, even the user routines are only callable in system mode, but this may change if and when we agree to release the Coding Conventions to the "public" and provide entries in the GATE (4000) for the CC routines (or get rid of the GATE completely). **************************************************************************** 00579/008 LOW CORE SYMBOL TABLES CCSYMBOL OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 356 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00579/009 LOW CORE SYMBOL TABLES COPY:CCSYMBOL OC G COPY:CCSYMBOL 5.0T4 382 LOW_CORE_SYMBOL_TABLES.CO.OC.009 1 LINE 24 1 PAGE UM MTS BURLING AUG. 09, 1981 23:16:27 5.0T10 286 COPY:CCSYMBOL 0 Contains 3 loader cards: RIP CCSYMBOL LCS LCSYMBOL LCS CCSYMBOL 0 Referenced by comments of: 802/6, 1051/33, 1051/36, 1051/39, 1070/4 00579/010 LOW CORE SYMBOL TABLES COPY:DEFS OC G COPY:DEFS 5.0T4 383 LOW_CORE_SYMBOL_TABLES.CO.OC.010 1 LINE 24 1 PAGE UM MTS BURLING AUG. 09, 1981 23:16:28 5.0T10 287 COPY:DEFS 0 Contains the following loader cards: RIP SYSDEFS RIP CCSYMBOL RIP CCDEFS RIP MNTRLCS RIP MNTRPRV LCS LCSYMBOL LCS SYSDEFS LCS CCSYMBOL LCS CCDEFS LCS MNTRLCS LCSPR MNTRPRV 0 Referenced by comments of: 540/20, 682/25, 724/3, 823/75, 1079/1 00579/011A LOW CORE SYMBOL TABLES COPY:ZDEFS OC G COPY:ZDEFS 5.1T1 643 LOW_CORE_SYMBOL_TABLES.CO.OC.011 1 LINE 24 1 PAGE UM MTS BURLING JULY 23, 1983 11:30:30 COPY:ZDEFS 0 Contains ALI records to equate some of the "Z" symbols, e.g., ZREAD, to the corresponding LCSYMBOL name READ. 00579/012 LOW CORE SYMBOL TABLES COPY:MNTRDEFS OC G COPY:MNTRDEFS 5.0T4 385 LOW_CORE_SYMBOL_TABLES.CO.OC.012 1 LINE 24 1 PAGE UM MTS BURLING AUG. 09, 1981 23:16:30 5.0T10 289 COPY:MNTRDEFS 0 Contains the following loader cards: RIP SYSDEFS RIP MNTRLCS RIP MNTRPRV LCS LCSYMBOL LCS SYSDEFS LCS MNTRLCS LCSPR MNTRPRV 0 Referenced by comments of: 1051/33, 1051/39 1 SUN SEP 08/96 15:24:55 Page 357 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00580/001A *INDEX INDEX SP O INDX S0027 DISTRB FSNAME=INDEX 5.1T1 644 INDEX.INDEX.SP.001 1 LINE 80 18 PAGE UM ENGLE AUG. 26, 1982 10:59:32 0 PROGRAM TO PRODUCE MANUAL INDICES. WILL PRODUCE INDEX AS TEXT/360 INPUT, FORMAT INPUT, OR REGULAR PRINTED OUTPUT. 0 Referenced by comments of: 512/5, 573/4, 575/3, 665/3, 669/3, 675/3, 676/3, 683/3, 717/3, 733/3, 741/3, 748/3, 766/3, 805/3, 836/3, 849/3 00580/002A *INDEX INDEX UC O S0027 DISTRB FSNAME=INDEXUPD 5.1T1 645 INDEX.INDEX.UC.002 1 LINE 72 3 PAGE UM ENGLE AUG. 26, 1982 10:59:36 00580/003A *INDEX INDEX OC O S0027 DISTRB FSNAME=INDX 5.1T1 646 INDEX.INDEX.OC.003 1 LINE 80 22 PAGE UM ENGLE AUG. 26, 1982 10:59:41 0 Referenced by comments of: 580/7 00580/004C *INDEX INDXSRT SA G IDXS S0027 DISTRB FSNAME=INDXSRT 5.1T1 647 INDEX.INDXSRT.SA.004 1 LINE 80 4 PAGE UM ENGLE AUG. 26, 1982 11:00:32 0 Subroutines to interface between the INDEX program and SORT exits for indexes with large numbers of entries. 00580/005C *INDEX INDXSRT UC G # S0027 DISTRB FSNAME=INDXSRTUPD UM ENGLE 0 Updates source from previous regular distribution to current one. 00580/006C *INDEX INDXSRT OC G S0027 DISTRB FSNAME=IDXS 5.1T1 648 INDEX.INDXSRT.OC.006 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 11:00:36 0 Referenced by comments of: 580/7 00580/007C *INDEX *INDEX OE G *INDEX 5.1T1 649 INDEX.?INDEX.OE.007 1 LINE 32767 13 PAGE UM ENGLE JULY 23, 1983 11:30:59 0 Link edited combination of INDEX (580/3) and INDXSRT (580/6). Ends with a $CONTINUE WITH *PL1LIB" line. 00581/001 INDEXGT SA G # (OBSOLETE) D3T5 5 INDEXGT..SA.1 1 LINE 80 3 PAGE UM AUG. 02, 1973 00:15.05 00582/001 LIBRARY INDEX PROGRAM C # (OBSOLETE) D3T5 7 LIBRARY_INDEX_PROGRAM..C.1 1 LINE 138 1 PAGE UM AUG. 02, 1973 00:15.08 00583/001 KWIC/360 SOURCE SP S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_A.SP.001(1) 576 5.0T2 576 KWIC/360.PHASE_A.SP.001 1 LINE 80 30 PAGE UM DWB JUNE 04, 1975 22:19:07 5.0T5 21 0 Modified version of IBM program 360D-06.7.014. Paper documentation was included with Distribution 4.0 and is available upon request from Don Boettner at UM. Source for phases A through D, the SCAN2 and TRANS subroutines, and input for 1 SUN SEP 08/96 15:24:55 Page 358 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 test run as follows: Lines 1068-1083 are primary stopwords Lines 1084-1085 are secondary stopwords Lines 1086-LAST are input cards 00583/002 KWIC/360 PHASE A ET AL OC S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_A.OC.002(1) 577 5.0T2 577 KWIC/360.PHASE_A.OC.002 1 SEQ 80 7 PAGE UM DWB JULY 28, 1977 03:22:37 5.0T5 22 0 Object for Phase A, SCAN2 subroutine, and TRANS subroutine. Ends with a "$CONTINUE WITH *PL1LIB" card. 00583/003 KWIC/360 PHASE B OC S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_B.OC.004(1) 578 5.0T2 578 KWIC/360.PHASE_B.OC.004 1 SEQ 80 3 PAGE UM DWB JULY 28, 1977 03:22:39 5.0T5 23 0 Ends with a "$CONTINUE WITH *PL1LIB" card. 00583/004 KWIC/360 PHASE C OC S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_C.OC.006(1) 579 5.0T2 579 KWIC/360.PHASE_C.OC.006 1 SEQ 80 4 PAGE UM DWB JULY 28, 1977 03:22:42 5.0T5 24 0 Ends with a "$CONTINUE WITH *PL1LIB" card. 00583/005 KWIC/360 PHASE D OC S1559 5.0T2 VLO FSNAME=KWIC/360.PHASE_D.OC.008(1) 580 5.0T2 580 KWIC/360.PHASE_D.OC.008 1 SEQ 80 4 PAGE UM DWB JULY 28, 1977 03:22:44 5.0T5 25 0 Ends with a "$CONTINUE WITH *PL1LIB" card. 00583/006 KWIC/360 DOCUMENTATION # (AVAILABLE UPON REQUEST) UM SWEET 0 This is the documentation for the KWIC program. It is available from UM upon request. 00584/001 QUIC PHASE 1 SP S1559 5.0T2 VLO FSNAME=QUIC.PHASE_1.SP.001(1) 581 5.0T2 581 QUIC.PHASE_1.SP.001 1 LINE 81 35 PAGE UM DWB MAY 13, 1976 20:59:32 5.0T5 26 0 This is the IBM program 360D-06.7.022. It is used as follows: run Phase 1 (QUIC1), then *SORT (303), then Phase 2 (QUIC2). Paper documentation was enclosed with Distribution 3.0 and is available upon request from Don Boettner at UM. The source for Phase 1 is in lines 252 through 1249. The source for Phase 2 is in lines 1347 through 1496. Test data is in lines 1269 through 1320. 1 SUN SEP 08/96 15:24:55 Page 359 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00584/002 QUIC PHASE 1 OC S1559 5.0T2 VLO FSNAME=QUIC.PHASE_1.OC.002(1) 582 5.0T2 582 QUIC.PHASE_1.OC.002 1 LINE 80 21 PAGE UM DWB JULY 28, 1977 03:23:21 5.0T5 27 00584/003 QUIC PHASE 2 OC S1559 5.0T2 VLO FSNAME=QUIC.PHASE_2.OC.004(1) 583 5.0T2 583 QUIC.PHASE_2.OC.004 1 LINE 80 4 PAGE UM DWB JULY 28, 1977 03:23:22 5.0T5 28 00584/004 QUIC DOCUMENTATION # (AVAILABLE UPON REQUEST) UM SWEET 0 This is the documentation for the QUIC program. It is available from UM upon request. 00585/001A CALC CLS SA G W070:CALC.S 531 5.1T1 650 CALC_CLS..SA.001 1 LINE 100 54 PAGE UM FRONCZAK JULY 23, 1983 11:30:59 0 THIS IS THE SOURCE FOR THE MTS $CALC COMMAND. THE CALC COMMAND IS IMPLEMENTED AS A COMMAND LANGUAGE SUB-SYSTEM (CLS). ASSEMBLE USING COPY:MTS.MACROS (344/3). LINES 1,5 CONTAIN MTS COMMANDS FOR ASSEMBLY. ******************************************************************************** D5.0A changes: Contains changes for CLS one-shot lowercase text processing. ******************************************************************************** 00585/002A CALC CLS OC G *CLSCALC 5.1T1 651 CALC_CLS..OC.002 1 LINE 80 5 PAGE UM FRONCZAK JULY 23, 1983 11:31:01 *CLSCALC 00586/001A COST SUBR SA G COST S0027 DISTRB FSNAME=COST 5.1T1 652 COST_SUBR..SA.001 1 LINE 80 9 PAGE UM ENGLE AUG. 26, 1982 10:44:49 0 SUBROUTINE TO COMPUTE CURRENT COST OF RUN. (E.G. CALLED BY MTS FOR $DISPLAY $). COPIES ACCFORMAT (104/1), AND GRDEF (104/83). 00586/002C COST SUBR UC G S0027 DISTRB FSNAME=COSTUPD 5.1T1 653 COST_SUBR..UC.002 1 LINE 72 2 PAGE UM ENGLE AUG. 26, 1982 10:44:54 0 Updates source from previous regular distribution to current one. 00586/003A COST SUBR OC G # (PART OF RESIDENT SYSTEM) UM ENGLE 0 Object part of Resident System (468). 00587/001 RESEQUENCING PGM SA G MTS:RSEQ(1,999) 632 5.0T2 587 RESEQUENCING_PGM..SA.001 1 LINE 69 3 PAGE UBC HOGG DWB JULY 03, 1981 15:38:28 5.0T5 32 0 TO USE THIS PROGRAM: $RUN RSEQ SCARDS=INPUT SPUNCH=OUTPUT SERCOM=ERRORS PAR=SEQNAME 1 SUN SEP 08/96 15:24:55 Page 360 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 WHERE SEQNAME IS A 1 TO 8 CHARACTER SEQUENCE FIELD INITIALIZER. IF OMITTED, THE SEQUENCE DEFAULTS TO 00000001, 00000002, ETC. IF THE LAST CHARACTER OF SEQNAME IS 1, THE SEQUENCING TAKES PLACE AT THAT COLUMN. FOR EXAMPLE, IF PAR=BARF IS GIVEN, THE SEQUENCE IS BARF0001, BARF0002, ETC. IF PAR=BARF01 IS GIVEN, THE SEQUENCE IS BARF0100, BARF0200, ETC. SEQUENCING INTRUDES INTO THE ALPHABETIC FIELD IF NECESSARY. FOR EXAMPLE, THE SEQUENCE ID FOLLOWING BARF9999 IS BARG0000. WRITES ON SPUNCH @I TO PRESERVE INPUT LINE NUMBERS. 00587/002 RESEQUENCING PGM OC G MTS:RSEQ(1000) 5.0T2 588 RESEQUENCING_PGM..OC.002 1 LINE 80 2 PAGE UBC HOGG DWB JULY 03, 1981 15:38:30 5.0T5 33 00588/001 INTERCOM SA EAIC # (OBSOLETE) D4T2 634 INTERCOM..SA.001 1 LINE 80 13 PAGE UM FEB. 13, 1975 23:51:52 0 INTER-CPU COMMUNICATION PROGRAM USED ON 360/67 BY SUPERVISOR AND MACHINE CHECK ERROR RECOVERY. MODIFIED FROM TSS/360. 00589/001 CHANNEL CHECK RECOVERY 360/67 SA G # (OBSOLETE) D4T2 635 CHANNEL_CHECK_RECOVERY.36.SA.001 1 LINE 80 8 PAGE UM FEB. 13, 1975 23:53:49 0 360/67 I/O inboard error recording. Midified from TSS/360. 00589/002A CHANNEL CHECK RECOVERY 370 CCHSUBR SA G MTA:CCHSUBR(1,999) 5.1T1 654 CHANNEL_CHECK_RECOVERY.37.SA.002 1 LINE 72 1 PAGE UM MTA JULY 23, 1983 11:31:04 0 MCHCCH (577/1) HAS A WXTRN FOR CCHSUBR AND IF IT IS PRESENT, MCHCCH CALLS IT TO DO MODEL DEPENDENT RECOVERY FOR A CHANNEL CHECK. THIS VERSION OF CCHSUBR IS SIMPLY AN INTERFACE WHICH LOOKS AT THE MODEL NUMBER AND CHANNEL TYPE AND CALLS ONE OF IGFC60 (589/4), IGFC70 (589/5), IGFC80 (589/6), IGFC47 (589/8), OR IGFC58 (589/10). THESE ARE REFERENCED WITH WXTRNS AND MAY BE DELETED FROM THE SYSTEM IF NOT NEEDED. ASSEMBLE USING MCHMAC (577/5). 0 Referenced by comments of: 589/8 00589/003 CHANNEL CHECK RECOVERY 370 CCHSUBR OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00589/004 CHANNEL CHECK RECOVERY IGFC60 SA S1559 5.0T2 VLO FSNAME=CHANNEL_CHECK_RECOVERY.IG.SA.004(1) 590 5.0T2 590 CHANNEL_CHECK_RECOVERY.IG.SA.004 1 LINE 80 26 PAGE UM MTA NOV. 08, 1975 00:31:31 5.0T5 35 0 VS2 SUBROUTINE TO CONVERT A 2860 CHANNEL LOGOUT INTO A 370 LIMITED CHANNEL LOGOUT. ASSEMBLE USING MCHMAC (577/5). 0 Referenced by comments of: 589/2, 589/5, 589/6, 589/7, 655/4 00589/005 CHANNEL CHECK RECOVERY IGFC70 SA # (PART OF IGFC60) UM MTA 0 VS2 SUBROUTINE TO CONVERT A 2870 CHANNEL LOGOUT INTO A 370 LIMITED CHANNEL LOGOUT. 1 SUN SEP 08/96 15:24:55 Page 361 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ASSEMBLE USING MCHMAC (577/5). Part of (589/4). 0 Referenced by comments of: 589/2, 589/7, 655/4 00589/006 CHANNEL CHECK RECOVERY IGFC80 SA # (PART OF IGFC60) UM MTA 0 VS2 SUBROUTINE TO CONVERT A 2880 CHANNEL LOGOUT INTO A 370 LIMITED CHANNEL LOGOUT. ASSEMBLE USING MCHMAC (577/5). Part of (589/4). 0 Referenced by comments of: 589/2, 589/7, 655/4 00589/007 CHANNEL CHECK RECOVERY VS2CCH OC # (PART OF RESIDENT SYSTEM) UM MTA 0 OBJECT FOR (589/4), (589/5), AND (589/6). Object part of Resident System (468). 00589/008A CHANNEL CHECK RECOVERY IGFC47 SA G S0045 FSAVE3 FSNAME=470CCH(1) 117 5.1T1 655 CHANNEL_CHECK_RECOVERY.IG.SA.008 1 LINE 85 11 PAGE UM MTA JAN. 18, 1983 01:41:50 0 SUBROUTINE CALLED BY CCHSUBR (589/2) FOR CHANNEL CHECK RECOVERY IF RUNNING ON AN AMDAHL 470. THIS PROGRAM PRODUCES A LIMITED CHANNEL LOGOUT FROM A FULL LOG. ASSEMBLE USING MCHMAC (577/5). 0 Referenced by comments of: 589/2, 655/4, 655/5 00589/009A CHANNEL CHECK RECOVERY IGFC47 OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00589/010A CHANNEL CHECK RECOVERY IGFC58 SA O MTA:580CCH 5.1T1 656 CHANNEL_CHECK_RECOVERY.IG.SA.010 1 LINE 72 4 PAGE UM MTA JULY 23, 1983 11:36:07 0 Amdahl source for MVS 580 channel check module. This is Version 3.0. THIS IS COPYRIGHTED AND MUST NOT BE GIVEN TO ANY THIRD PARTY. 0 Referenced by comments of: 589/2, 589/11 00589/011A CHANNEL CHECK RECOVERY IGFC58 UC O MTA:580CCH.U(1) 5.1T1 657 CHANNEL_CHECK_RECOVERY.IG.UC.011 1 LINE 74 1 PAGE UM MTA JULY 23, 1983 11:36:07 MTA:580CCH.U 0 Updates to (589/10) to produce MTS 580 channel check recovery. Works with Version 3.0. 1 SUN SEP 08/96 15:24:55 Page 362 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00589/012C CHANNEL CHECK RECOVERY IGFC58 OC O # (PART OF THE RESIDENT SYSTEM) UM MTA 00590/001 *SPITBOL MAIN UPDATE UU G S1559 5.0T2 VLO FSNAME=SPITBOL.MAIN_UPDATE.UU.001(1) 592 5.0T2 592 SPITBOL.MAIN_UPDATE.UU.001 1 LINE 72 13 PAGE UM SWARTZ MAY 13, 1978 17:48:20 5.0T5 37 0 By contract, the source and object for SPITBOL cannot be distributed. Contact the Computer Science Dept. at Illinois Institute of Technology, Chicago, Il, USA. Update deck to bring the SPITBOL compiler and library from version 2.2.0 to 2.2.6. Copies DEFLMOD (590/3) and WORK AREA (590/4). 0 Referenced by comments of: 678/4, 798/105 00590/002 *SPITBOL XFACE UPDATE UU G S1559 5.0T2 VLO FSNAME=SPITBOL.XFACE_UPDATE.UU.002(1) 593 5.0T2 593 SPITBOL.XFACE_UPDATE.UU.002 1 LINE 72 40 PAGE UM SWARTZ MAY 13, 1978 17:48:22 5.0T5 38 0 UPDATE DECK FOR MODIFYING THE SPITBOL VERSION 2.2 INTERFACE TO RUN IN MTS AT SPITBOL VERSION LEVEL 2.2.6. COPIES DEFLMOD (590/3) AND WORK AREA (590/4). 00590/003 *SPITBOL DEFLMOD SA G S1559 5.0T2 VLO FSNAME=SPITBOL.DEFLMOD.SA.003(1) 594 5.0T2 594 SPITBOL.DEFLMOD.SA.003 1 LINE 39 1 PAGE UM SWARTZ MAY 13, 1978 17:48:26 5.0T5 39 0 COPY SECTION TO SET INSTALLATION AND COMPILER/LIBRARY GLOBAL VARIABLES. 0 Referenced by comments of: 590/1, 590/2 00590/004 *SPITBOL WORK AREA SA G S1559 5.0T2 VLO FSNAME=SPITBOL.WORK_AREA.SA.004(1) 595 5.0T2 595 SPITBOL.WORK_AREA.SA.004 1 LINE 80 3 PAGE UM SWARTZ MAY 13, 1978 17:48:27 5.0T5 40 0 COPY SECTION OF SPITBOL WORK AREA. 0 Referenced by comments of: 590/1, 590/2 00590/005 *SPITBOL ZAP CONVERT SS G S1559 5.0T2 VLO FSNAME=SPITBOL.ZAP_CONVERT.SS.005(1) 596 5.0T2 596 SPITBOL.ZAP_CONVERT.SS.005 1 LINE 72 1 PAGE UM SWARTZ JULY 28, 1977 03:34:16 5.0T5 41 0 SNOBOL PROGRAM TO CONVERT SPITBOL SUPERZAP DECKS INTO MTS COM AND REP LOADER CARDS. 00590/006 *SPITBOL *SPITBOL OC G # *SPITBOL 5.0T2 597 SPITBOL.?SPITBOL.OC.006 1 SEQ 24 1 PAGE UM SWARTZ AUG. 06, 1981 03:58:18 5.0T5 42 *SPITBOL@UM 0 LOADER CARDS TO FORCE REFERENCE TO THE SHARED VM SPITBOL. 1 SUN SEP 08/96 15:24:55 Page 363 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00590/007 *SPITBOL ETC:SPITDEFLIB OL G ETC:SPITDEFLIB 5.0T2 598 SPITBOL.ETC:SPITDEFLIB.OL.007 1 LINE 24 1 PAGE UM SWARTZ JULY 20, 1977 03:40:47 5.0T5 43 ETC:SPITDEFLIB@UM 0 LOADER CARDS USED AS A DEFAULT LIBRARY FOR THE SPITBOL LOAD FUNCTION TO FORCE REFERENCE TO EFL AND LCSYMBOLS. 00590/008 *SPITBOL *SPITERR M *SPITERR 5.0T2 599 SPITBOL.*SPITERR.M.008 1 LINE 175 4 PAGE UM SWARTZ JULY 03, 1981 15:39:36 5.0T5 44 *SPITERR@UM 0 SPITBOL ERROR MESSAGES. 00590/009A *SPITBOL *SPITDEBUG SS O *SPITDEBUG 5.1T1 658 SPITBOL.?SPITDEBUG.SS.009 1 LINE 111 4 PAGE UM SWARTZ JULY 23, 1983 11:36:08 *SPITDEBUG 0 ALLOWS CONTINUING, DISPLAYING, MODIFYING, ETC. OF DATA AFTER AN ERROR IN SPITBOL. USED BY INCLUDING "-COPY *SPITDEBUG" IN THE SPITBOL SOURCE PROGRAM. USES SUBROUTINES IN UNSP:SPITLIB (590/30). USE THE "HELP" COMMAND TO EXPLAIN FUNCTIONS. 0 Referenced by comments of: 590/32, 715/5, 1070/5 00590/010 *SPITBOL *SPITLIB OL O # *SPITLIB UM SWARTZ *SPITLIB@UM 0 *SPITLIB CANNOT BE DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. 0 Referenced by comments of: 678/3, 757/2, 798/122, 1070/6 00590/011 *SPITBOL UNSP CMD SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_CMD.SA.011(1) 601 5.0T2 601 SPITBOL.UNSP_CMD.SA.011 1 LINE 80 3 PAGE UM UNSP DEC. 23, 1975 19:33:48 5.0T5 46 0 THIS FOLLOWING SUBCOMPONENTS ARE THE SOURCE FOR THE "UNSUPPORTED" SPITBOL FUNCTION LIBRARY, UNSP:SPITLIB (590/30). THESE FUNCTIONS SHOULD NOT BE CONFUSED WITH THOSE IN *SPITLIB. 00590/012 *SPITBOL UNSP CREATE SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_CREATE.SA.012(1) 602 5.0T2 602 SPITBOL.UNSP_CREATE.SA.012 1 LINE 80 4 PAGE UM UNSP SEP. 02, 1976 12:34:35 5.0T5 47 00590/013 *SPITBOL UNSP CREPLY SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_CREPLY.SA.013(1) 603 5.0T2 603 SPITBOL.UNSP_CREPLY.SA.013 1 LINE 80 2 PAGE UM UNSP SEP. 01, 1978 08:19:41 5.0T5 48 00590/014 *SPITBOL UNSP GDINFO SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_GDINFO.SA.014(1) 604 5.0T2 604 SPITBOL.UNSP_GDINFO.SA.014 1 LINE 80 4 PAGE UM UNSP SEP. 02, 1976 12:34:40 5.0T5 49 0 ASSEMBLE USING UNSP:MACLIB (685/3). 1 SUN SEP 08/96 15:24:55 Page 364 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00590/015 *SPITBOL UNSP GETFD SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_GETFD.SA.015(1) 605 5.0T2 605 SPITBOL.UNSP_GETFD.SA.015 1 LINE 80 3 PAGE UM UNSP SEP. 02, 1976 12:34:44 5.0T5 50 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/016 *SPITBOL UNSP GUINFO SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_GUINFO.SA.016(1) 606 5.0T2 606 SPITBOL.UNSP_GUINFO.SA.016 1 LINE 80 4 PAGE UM UNSP SEP. 02, 1976 12:34:51 5.0T5 51 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/017 *SPITBOL UNSP MTSCMD SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_MTSCMD.SA.017(1) 607 5.0T2 607 SPITBOL.UNSP_MTSCMD.SA.017 1 LINE 80 3 PAGE UM UNSP DEC. 23, 1975 19:34:03 5.0T5 52 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/018 *SPITBOL UNSP READ SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_READ.SA.018(1) 608 5.0T2 608 SPITBOL.UNSP_READ.SA.018 1 LINE 80 4 PAGE UM UNSP SEP. 02, 1976 12:35:05 5.0T5 53 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/019 *SPITBOL UNSP SETPFX SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SETPFX.SA.019(1) 609 5.0T2 609 SPITBOL.UNSP_SETPFX.SA.019 1 LINE 80 3 PAGE UM UNSP JAN. 13, 1976 11:29:00 5.0T5 54 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/020 *SPITBOL UNSP SNS SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SNS.SA.020(1) 610 5.0T2 610 SPITBOL.UNSP_SNS.SA.020 1 LINE 80 3 PAGE UM UNSP SEP. 02, 1976 12:34:54 5.0T5 55 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/021 *SPITBOL UNSP WRITE SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_WRITE.SA.021(1) 611 5.0T2 611 SPITBOL.UNSP_WRITE.SA.021 1 LINE 80 4 PAGE UM UNSP SEP. 02, 1976 12:35:12 5.0T5 56 0 ASSEMBLE USING UNSP:MACLIB (685/3). 00590/022 *SPITBOL UNSP SNOOP SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SNOOP.SA.022(1) 612 5.0T2 612 SPITBOL.UNSP_SNOOP.SA.022 1 LINE 80 3 PAGE UM UNSP JULY 12, 1976 13:42:24 5.0T5 57 00590/023 *SPITBOL UNSP SPITATTN SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SPITATTN.SA.023(1) 613 5.0T2 613 SPITBOL.UNSP_SPITATTN.SA.023 1 LINE 80 5 PAGE UM UNSP NOV. 30, 1976 14:22:13 5.0T5 58 1 SUN SEP 08/96 15:24:55 Page 365 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00590/024 *SPITBOL UNSP SGETRC SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SGETRC.SA.024(1) 614 5.0T2 614 SPITBOL.UNSP_SGETRC.SA.024 1 LINE 80 1 PAGE UM UNSP SEP. 02, 1976 12:34:47 5.0T5 59 00590/025 *SPITBOL UNSP SPUTRC SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SPUTRC.SA.025(1) 615 5.0T2 615 SPITBOL.UNSP_SPUTRC.SA.025 1 LINE 80 1 PAGE UM UNSP SEP. 02, 1976 12:35:01 5.0T5 60 00590/026 *SPITBOL UNSP STI SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_STI.SA.026(1) 616 5.0T2 616 SPITBOL.UNSP_STI.SA.026 1 LINE 80 2 PAGE UM UNSP SEP. 02, 1976 12:35:09 5.0T5 61 0 "STR" IS AN ALTERNATE ENTRY. ASSEMBLE USING UNSP:MACLIB (685/3). 00590/027 *SPITBOL UNSP ITR SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_ITR.SA.027(1) 617 5.0T2 617 SPITBOL.UNSP_ITR.SA.027 1 LINE 80 1 PAGE UM UNSP SEP. 02, 1976 12:35:20 5.0T5 62 0 "RTI" IS AN ALTERNATE ENTRY. 00590/028 *SPITBOL UNSP ITS SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_ITS.SA.028(1) 618 5.0T2 618 SPITBOL.UNSP_ITS.SA.028 1 LINE 80 1 PAGE UM UNSP SEP. 02, 1976 12:35:16 5.0T5 63 0 "RTS" IS AN ALTERNATE ENTRY. 00590/029 *SPITBOL UNSP SETLIO SA G S1559 5.0T2 VLO FSNAME=SPITBOL.UNSP_SETLIO.SA.029(1) 619 5.0T2 619 SPITBOL.UNSP_SETLIO.SA.029 1 LINE 66 1 PAGE UM UNSP FEB. 23, 1979 04:51:29 5.0T5 64 0 SPITBOL ROUTINE WHICH CALLS THE MTS SETLIO SUBROUTINE. OBJECT IS IN UNSP:SPITLIB (590/30). 00590/030 *SPITBOL UNSP LIBRARY OL G UNSP:SPITLIB 5.0T2 620 SPITBOL.UNSP_LIBRARY.OL.030 1 LINE 1382 5 PAGE UM UNSP JULY 03, 1981 15:45:25 5.0T5 65 UNSP:SPITLIB 0 Referenced by comments of: 590/9, 590/11, 590/29, 590/31, 678/1, 737/15, 798/122, 1070/5 00590/031 *SPITBOL UNSP LIBRARY WF S1153 UNSP VLO FSNAME=SPITLIB.FMT 5.0T2 621 SPITBOL.UNSP_LIBRARY.WF.031 1 LINE 85 7 PAGE UM UNSP JUNE 27, 1981 22:03:02 5.0T5 66 0 A WRITEUP FOR THE ROUTINES IN UNSP:SPITLIB (590/30). 00590/032 *SPITBOL CONVSPIT SS G UNSP:CONVSPIT(1000) 5.0T2 622 SPITBOL.CONVSPIT.SS.032 1 LINE 53 1 PAGE UM UNSP JULY 03, 1981 15:45:42 5.0T5 67 0 AN INTERACTIVE SPITBOL. USES *SPITLIB (NOT DISTRIBUTED) AND *SPITDEBUG (590/9). 1 SUN SEP 08/96 15:24:55 Page 366 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00590/033 *SPITBOL CONVSPIT OE G UNSP:CONVSPIT(1,999) 5.0T2 623 SPITBOL.CONVSPIT.OE.033 1 LINE 10408 6 PAGE UM UNSP JULY 03, 1981 15:45:44 5.0T5 68 UNSP:CONVSPIT 00591/001 CFDUB SUBR SA G S1559 5.0T2 VLO FSNAME=CFDUB_SUBR..SA.001(1) 624 5.0T2 624 CFDUB_SUBR..SA.001 1 LINE 80 2 PAGE UM MTA JULY 28, 1977 03:46:29 5.0T5 69 0 SUBROUTINE TO COMPARE TWO FDUBS TO SEE IF THEY ARE ASSIGNED TO THE SAME THING. TO USE, CALL CFDUB(F1,F2) WHERE F1 AND F2 ARE CHKFDUB THINGS. RC=0 MEANS THAT THEY'RE THE SAME, RC=4 MEANS THEY'RE DIFFERENT, RC=8 MEANS THAT AT LEAST ONE IS INVALID. FOR EXAMPLE, CALL CFDUB('SPUNCH ','SPRINT ',&1,&2). 00591/002 CFDUB SUBR OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00592/001A OPERATORS MANUAL WF W225:OPRML.FMT 5.1T1 659 OPERATORS_MANUAL..WF.001 1 LINE 239 179 PAGE UM DONNELLY JULY 23, 1983 11:36:08 0 MTS OPERATOR'S MANUAL. 0 Referenced by comments of: 50/3, 387/23, 531/38, 610/1, 615/20, 615/41, 615/46, 634/1, 642/1, 642/3, 642/6, 642/14 00593/001 *GFINFODSECT SA G *GFINFODSECT 5.0T2 626 GFINFODSECT..SA.001 1 LINE 72 3 PAGE UM HELFFRICH JULY 03, 1981 15:46:58 5.0T5 71 *GFINFODSECT 0 COPY SECTION FOR DSECTS DEFINING INFORMATION REGIONS USED IN CONJUNCTION WITH THE GFINFO SUBROUTINE, PART OF RSF (578). 0 Referenced by comments of: 67/27, 465/1, 502/1, 529/1, 531/8, 548/1, 548/4, 578/1, 630/1, 826/12, 1019/5 00594/001A *GDINFODSECT SA G *GDINFODSECT 5.1T1 660 GDINFODSECT..SA.001 1 LINE 70 2 PAGE UM MTS STERKEN JULY 23, 1983 11:36:20 *GDINFODSECT 0 COPY SECTION DEFINING THE INFORMATION REGION USED IN CONJUNCTION WITH THE GDINFO SUBROUTINE. ************************************************************************** D5.0B version: Some new fields have been added. ************************************************************************** 0 Referenced by comments of: 57/1, 64/1, 101/1, 278/3, 283/1, 291/1, 314/1, 400/13, 400/14, 410/1, 485/35, 495/1, 496/1, 498/98, 506/7, 506/8, 513/1, 529/1, 531/8, 534/3, 540/10, 545/3, 545/4, 545/10, 548/1, 551/1, 553/1, 600/34, 627/1, 634/6, 636/1, 638/1, 648/1, 655/1, 655/4, 677/1, 680/1, 682/18, 706/6, 709/1, 721/1, 721/2, 721/3, 721/6, 721/9, 721/12, 721/18, 727/1, 737/3, 738/1, 746/1, 749/1, 752/1, 771/1, 813/11, 814/2, 816/2, 816/3, 823/51, 823/74, 826/8, 826/11, 862/3, 862/5, 1002/15, 1002/23, 1005/1, 1019/5, 1021/7, 1051/9, 1051/11, 1051/13, 1051/15, 1067/1, 3011/3, 3024/1 1 SUN SEP 08/96 15:24:55 Page 367 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00595/001 APL - GMRL *APLGM OE G # *APLGM 5.0T2 629 APL_-_GMRL.*APLGM.OE.002 1 SEQ 2436 2 PAGE UM JULY 03, 1981 15:47:01 5.0T5 74 *APLGM 0 This component has been removed from MTS distributions due to its low usage and stable condition. 00596/001 ZAP SA # (OBSOLETE) D3.1T1 455 ZAP..SA.1 1 LINE 80 13 PAGE UM MAR. 06, 1974 22:30.58 0 Obsoleted by RAMROD (1019) 00597/001 CHKVTOC # (PART OF FILE SYSTEM RECOVERY) UM 0 Part of File System Recovery (682/21) and (682/23) 00598/001 DASDI BASE SOURCE SA G FILE:DASDI(*F,-1) 5.0T2 721 DASDI.BASE_SOURCE.SA.001 1 LINE 80 45 PAGE UM HELFFRICH AUG. 06, 1981 04:00:11 5.0T5 166 FILE:DASDI 0 PROGRAM TO VAM2- OR VAMX-FORMAT DASDI 2311, 2314, 3330, 333B, 3340, 3344, AND 3350 DISKS. MARKS 3330-11 DISKS AS "333B" IN LABEL ACCORDING TO TSS CONVENTION. ASSEMBLE USING COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), AND *SYSMAC. INPUT DESCRIBED IN SOURCE COMMENTS. 0 Referenced by comments of: 598/2, 682/5 00598/002A DASDI UPDATE UC G FILE:DASDI(1000) 5.1T1 661 DASDI.UPDATE.UC.002 1 LINE 74 1 PAGE UM HELFFRICH JULY 23, 1983 11:36:20 0 UPDATE DECK TO BE APPLIED TO (598/1) TO YIELD CURRENT SOURCE. 00598/003A DASDI OBJECT OC G FILE:DASDI(1,999) 5.1T1 662 DASDI.OBJECT.OC.003 1 LINE 80 14 PAGE UM HELFFRICH JULY 23, 1983 11:36:22 00599/001A CHONID SA G CHON FILE:CHONID(1,999) 5.1T1 663 CHONID..SA.001 1 LINE 80 4 PAGE UM HELFFRICH JULY 23, 1983 11:36:22 FILE:CHONID 0 PROGRAM, NOT FOR GENERAL USE, TO CHANGE THE OWNERID IN THE CATALOG OF A PUBLIC FILE. USED BY SYSTEM PROGRAMMERS TO ASSIGN APPROPRIATE OWNERS TO PUBLIC FILES. IT TAKES INPUT IN THE FORM "*FILENAME USERID" AND STOPS WHEN AN END-OF-FILE IS ENTERED. ASSEMBLE USING *SYSMAC AND COPY:FILE.MACROS (482/45). SEE COMP (682/6) FOR A WRITEUP. ********************************************************************* D5.1 version: This program was changed to convert its input to uppercase. ********************************************************************* 0 Referenced by comments of: 682/6 1 SUN SEP 08/96 15:24:55 Page 368 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00599/002A CHONID OC G FILE:CHONID(1000) 5.1T1 664 CHONID..OC.002 1 LINE 80 1 PAGE UM HELFFRICH JULY 23, 1983 11:36:22 00600/001A SDS CLS CLSSOU SA G W059:SDSCLS.S 5.1T1 665 SDS_CLS.CLSSOU.SA.001 1 LINE 79 179 PAGE UM VALERIO JULY 23, 1983 11:36:22 0 SDS, the Symbolic Debugging System. (600/1) is the source for the CLS interface to SDS. It copies *CNFGINFODSECT (654), COPY:GLOBALS (1026/3), SDSCONSTANT (600/16), and SDSPSECT (600/14). Assemble using *SYSMAC, SDSMACROS (600/13), and COPY:MTS.MACROS (344/3). ********************************************************************** D5.1 version: Changed to work with (600/11). *********************************************************************** 0 Referenced by comments of: 539/9, 568/1, 600/1, 600/2, 721/18 00600/002A SDS CLS CLS OC G W059:SDSCLS 5.1T1 666 SDS_CLS.CLS.OC.002 1 LINE 80 59 PAGE UM VALERIO JULY 23, 1983 11:36:29 0 Object for (600/1). 00600/003A SDS CLS CLI SA G W059:SDSCLI.S 5.1T1 667 SDS_CLS.CLI.SA.003 1 LINE 80 85 PAGE UM VALERIO JULY 23, 1983 11:36:31 0 The SDS command language interpreter. Copies SDSBT (600/15), SDSCONSTANT (600/16), and SDSPSECT (600/14). Assamble using SDSMACROS (600/13), COPY:MTS.MACROS (344/3), and *SYSMAC. *********************************************************************** D5.1 version: Changed to work with (600/11). *********************************************************************** 00600/004A SDS CLS CLI OC G W059:SDSCLI 5.1T1 668 SDS_CLS.CLI.OC.004 1 LINE 80 35 PAGE UM VALERIO JULY 23, 1983 11:36:35 00600/005 SDS CLS IOC SA G W059:SDSIOC.S 5.0T2 730 SDS_CLS.IOC.SA.005 1 LINE 80 18 PAGE UM VALERIO JULY 03, 1981 15:48:43 5.0T5 175 0 The SDS I/O control module. Copies SDSPSECT (600/14), SDSCONSTANT (600/16), and SDSBT (600/15). Assemble using SDSMACROS (600/13), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/006 SDS CLS IOC OC G W059:SDSIOC 5.0T2 731 SDS_CLS.IOC.OC.006 1 LINE 80 14 PAGE UM VALERIO JULY 03, 1981 15:48:45 5.0T5 176 1 SUN SEP 08/96 15:24:55 Page 369 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00600/007 SDS CLS SIMULATOR SA G W059:SDSSIML.S 5.0T2 732 SDS_CLS.SIMULATOR.SA.007 1 LINE 70 30 PAGE UM VALERIO JULY 03, 1981 15:48:46 5.0T5 177 0 The SDS instruction simulator. Copies SDSPSECT (600/14) and *CNFGINFODSECT (654). Assemble using SDSMACROS (600/13) and COPY:MTS.MACROS (344/3). 00600/008 SDS CLS SIMULATOR OC G W059:SDSSIML 5.0T2 733 SDS_CLS.SIMULATOR.OC.008 1 LINE 80 18 PAGE UM VALERIO JULY 03, 1981 15:48:49 5.0T5 178 00600/009 SDS CLS EDITOR SA G W059:SDSEDTR.S 5.0T2 734 SDS_CLS.EDITOR.SA.009 1 LINE 72 38 PAGE UM VALERIO JULY 03, 1981 15:48:51 5.0T5 179 0 The SDS editor. Copies SDSBT (600/15), SDSCONSTANT (600/16), and SDSPSECT (600/14). Assemble using SDSMACROS (600/13), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/010 SDS CLS EDITOR OC G W059:SDSEDTR 5.0T2 735 SDS_CLS.EDITOR.OC.010 1 LINE 80 18 PAGE UM VALERIO JULY 03, 1981 15:48:54 5.0T5 180 00600/011C SDS CLS TIMETALLY SA G W059:SDSTTALLY.S 5.1T1 669 SDS_CLS.TIMETALLY.SA.011 1 LINE 72 28 PAGE UM VALERIO JULY 23, 1983 11:36:37 0 The SDS timetally support and exit routines. These routines handle the initilization of the timetally dsect, the construction of the timetally data structure, and the initialization and update of timetally timer values. The exit routine handles updating of the timetally data structure when a timer interrupt occurs. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), *SYSMAC, and (600/14). 0 Referenced by comments of: 600/1, 600/3 00600/012C SDS CLS TIMETALLY OC G W059:SDSTTALLY 5.1T1 670 SDS_CLS.TIMETALLY.OC.012 1 LINE 80 22 PAGE UM VALERIO JULY 23, 1983 11:36:38 0 ********************************************************************* D5.1 version: Added EQUs for existing variables. ********************************************************************* 00600/013 SDS CLS SDSMACROS SM G SDSM W059:SDSMACROS 5.0T2 736 SDS_CLS.SDSMACROS.SM.011 1 LINE 80 14 PAGE UM VALERIO JULY 03, 1981 15:48:56 5.0T5 181 0 SDS macro library. 0 Referenced by comments of: 600/1, 600/3, 600/5, 600/7, 600/9 1 SUN SEP 08/96 15:24:55 Page 370 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00600/014A SDS CLS SDSPSECT SA G W059:SDSPSECT 5.1T1 671 SDS_CLS.SDSPSECT.SA.014 1 LINE 80 38 PAGE UM VALERIO JULY 23, 1983 11:36:39 0 Copy section for SDS dsects. 0 Referenced by comments of: 600/1, 600/3, 600/5, 600/7, 600/9, 600/11 00600/015 SDS CLS SDSBT SA G W059:SDSBT 5.0T2 738 SDS_CLS.SDSBT.SA.013 1 LINE 70 3 PAGE UM VALERIO JULY 03, 1981 15:49:00 5.0T5 183 0 Copy section for branch tables. 0 Referenced by comments of: 600/3, 600/5, 600/9 00600/016 SDS CLS SDSCONSTANT SA G W059:SDSCONSTANT 5.0T2 739 SDS_CLS.SDSCONSTANT.SA.014 1 LINE 68 1 PAGE UM VALERIO JULY 03, 1981 15:49:01 5.0T5 184 0 Copy section for constants. 0 Referenced by comments of: 600/1, 600/3, 600/5, 600/9 00600/017A SDS CLS OBJECT OE G *CLSSDS 5.1T1 672 SDS_CLS.OBJECT.OE.017 1 LINE 80 162 PAGE UM VALERIO JULY 23, 1983 11:36:41 *CLSSDS 0 The SDS object is loaded into shared VM by PISTLE at IPL. 00600/018D SDS CLS TEST NUCLEUS SA O W237:SDSII.S 5.1T1 673 SDS_CLS.TEST_NUCLEUS.SA.018 1 LINE 68 6 PAGE UM VALERIO JULY 23, 1983 11:36:46 0 Components (600/18) through (600/35) comprise a test version of SDS. This subcomponent is the nucleus for SDS. It gets entered from MTS, interprets the information in the interface dsects and calls the appropriate routine. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 0 Referenced by comments of: 600/18, 821/30, 1042/1, 1042/42 00600/019D SDS CLS TEST RESET SA O W237:SDSII.RESET 5.1T1 674 SDS_CLS.TEST_RESET.SA.019 1 LINE 68 2 PAGE UM VALERIO JULY 23, 1983 11:36:48 0 The reset entry point for SDS, gets entered whenever MTS calls SDS with the CLSRSTU bit set, cleans up everything and resets some variables in the global dsect. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/020D SDS CLS TEST EDITOR SA O W237:SDSII.EDIT 5.1T1 675 SDS_CLS.TEST_EDITOR.SA.020 1 LINE 68 8 PAGE UM VALERIO JULY 23, 1983 11:36:48 0 The nucleus of the SDS Loader record Editor, contains routines for processing END, ESD, LDT, and SYM Record. Gets entered whenever 1 SUN SEP 08/96 15:24:55 Page 371 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 MTS calls SDS with the CLSEDTR bit set. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/021D SDS CLS TEST SYM ITEM SA O W237:SDSII.RTNS 5.1T1 676 SDS_CLS.TEST_SYM_ITEM.SA.021 1 LINE 72 43 PAGE UM VALERIO JULY 23, 1983 11:36:48 0 A file of all of the individual SYM record item parsers, one for each different type of SYM record item handled by SDS. Assemble using SDSII.MACROS (600/34), and *SYSMAC. 00600/022D SDS CLS TEST UNEDITOR SA O W237:SDSII.UNEDIT 5.1T1 677 SDS_CLS.TEST_UNEDITOR.SA.022 1 LINE 65 2 PAGE UM VALERIO JULY 23, 1983 11:36:50 0 The UNEDIT entry point for SDS, gets entered whenever MTS calls SDS with the CLSUNED bit set, releases the SDS symbol table and any link level specific storage in preparation for an unload or reload or return to a previous link level. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/023D SDS CLS TEST RETURN SA O W237:SDSII.RET 5.1T1 678 SDS_CLS.TEST_RETURN.SA.023 1 LINE 73 13 PAGE UM VALERIO JULY 23, 1983 11:36:50 0 The RETURN entry point for SDS, gets entered whenever MTS calls SDS with the CLSENDX or CLSINMSG bit set. Sorts out the interrupt type and takes the appropriate action, possibly printing out a message pinpointing the location of the interrupt. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/024D SDS CLS TEST CMD PROC SA O W237:SDSII.CMD 5.1T1 679 SDS_CLS.TEST_CMD_PROC.SA.024 1 LINE 73 12 PAGE UM VALERIO JULY 23, 1983 11:36:51 0 The command processing entry point for SDS, gets entered whenever MTS calls SDS with a one-shot command or when MTS calls SDS to go into command mode or from within SDS following a call to SDS with the CLSENDX bit set. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/025D SDS CLS TEST COMMANDS SA O W237:SDSII.CMDS 5.1T1 680 SDS_CLS.TEST_COMMANDS.SA.025 1 LINE 73 59 PAGE UM VALERIO JULY 23, 1983 11:36:52 0 A file of all of the individual command parsers, one for each SDS command. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/026D SDS CLS TEST SYM TBL SA S W237:SDSII.SYMTAB 5.1T1 681 SDS_CLS.TEST_SYM_TBL.SA.026 1 LINE 75 43 PAGE UM VALERIO JULY 23, 1983 11:36:54 0 A file of all of the symbol table dependent routines needed by the SDS Editor and the individual command parsers. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 372 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00600/027D SDS CLS TEST SRE PARSE SA S W237:SDSII.LEXPRS 5.1T1 682 SDS_CLS.TEST_SRE_PARSE.SA.027 1 LINE 77 22 PAGE UM VALERIO JULY 23, 1983 11:36:57 0 The SDS storage reference expression parser. Parses SDS command operands of the form S(i)+j and all of it's variant forms including indirection, recursion and block parameters. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/028D SDS CLS TEST STD OUT SA O W237:SDSII.STDOUT 5.1T1 683 SDS_CLS.TEST_STD_OUT.SA.028 1 LINE 72 24 PAGE UM VALERIO JULY 23, 1983 11:36:58 0 The SDS standard output module, contains entry points to print output for the ATTRIBUTE, DISPLAY, DUMP, FULLDISPLAY, HEXDISPLAY, PARLIST, SYMBOL and TRACE commands. Does not handle anything that resembles an error message. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3) and *SYSMAC. 00600/029D SDS CLS TEST INPUT CNV SA O W237:SDSII.INCON 5.1T1 684 SDS_CLS.TEST_INPUT_CNV.SA.029 1 LINE 72 13 PAGE UM VALERIO JULY 23, 1983 11:36:59 0 The SDS input constant conversion routine. Takes a string and returns it's value in internal form. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/030D SDS CLS TEST UTIL SA O W237:SDSII.UTIL 5.1T1 685 SDS_CLS.TEST_UTIL.SA.030 1 LINE 78 47 PAGE UM VALERIO JULY 23, 1983 11:37:00 0 A file of grungy little routines to perform tasks for the individual command parsers and various and sundry other routines that need things done that should be done in a subroutine. The home for all the routines that don't otherwise have a home. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/031D SDS CLS TEST SIM SA O W237:SDSII.SIML 5.1T1 686 SDS_CLS.TEST_SIM.SA.031 1 LINE 73 33 PAGE UM VALERIO JULY 23, 1983 11:37:02 0 The SDS intruction simulaor and support routines. The support routines set up the simulator dsect so that things take off properly when control returns to the EXEC cls. Asseble using SDSII.MACROS (600/18, COPY:MTS.MACROS (344/3), and *SYSMAC. 00600/032D SDS CLS TEST TIMETALLY SA O W237:SDSII.TTALLY 5.1T1 687 SDS_CLS.TEST_TIMETALLY.SA.032 1 LINE 72 26 PAGE UM VALERIO JULY 23, 1983 11:37:03 0 The SDS timetally support and exit routines, these routines handle the initilization of the timetally dsect the construction of the timetally data structure and the initialization and update of timetally timer values. The exit routine handles updating of the timetally data structure when a timer interrupt occurs. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3), and *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 373 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00600/033D SDS CLS TEST ASYNCH SA O W237:SDSII.ASYNCH 5.1T1 688 SDS_CLS.TEST_ASYNCH.SA.033 1 LINE 72 8 PAGE UM VALERIO JULY 23, 1983 11:37:05 0 A file of the asynchronous interrupt routines for attention and program interrupt processing. The attention interrupt processor is straight forward, the program interrupt processor dumps the entire sds data structure in a file (etc:sds.dump(*l+1) @um) and returns to MTS. Also in this file is an initial ESD list of all of the SDS entry points for program interrupt location processing. Assemble using SDSII.MACROS (600/34), COPY:MTS.MACROS (344/3) and *SYSMAC. 00600/034D SDS CLS TEST MACROS SM O W237:SDSII.MACROS 5.1T1 689 SDS_CLS.TEST_MACROS.SM.034 1 LINE 68 24 PAGE UM VALERIO JULY 23, 1983 11:37:05 0 The SDS macro library which contains in addition to lots of helpful macros, macros defining all of the dsects used by SDS. Depending on the macro used may copy *CNFGINFODSECT (654/1), *GDINFODSECT or *GDINFODSECT (594/1), *LOADINFODSECT, macros from COPY:MTS.MACROS (344/3) and *SYSMAC. 0 Referenced by comments of: 600/11, 600/18, 600/19, 600/20, 600/21, 600/22, 600/23, 600/24, 600/25, 600/26, 600/27, 600/28, 600/29, 600/30, 600/32, 600/33 00600/035D SDS CLS TEST OBJECT OE O *NEWCLSSDS 5.1T1 690 SDS_CLS.TEST_OBJECT.OE.035 1 LINE 16365 239 PAGE UM VALERIO JULY 23, 1983 11:37:06 *NEWCLSSDS 0 An assembled version of this giant mess although surely not as big a mess as the giant mess this is replacing. 0 Referenced by comments of: 600/18 00600/036D SDS CLS TEST PRNT EXIT SA O W237:PEXIT 5.1T1 691 SDS_CLS.TEST_PRNT_EXIT.SA.036 1 LINE 80 6 PAGE UM VALERIO JULY 23, 1983 11:37:15 0 An Assembler H print exit for assembling listings with lots of modules. Strips off header and trailer pages. 00600/037D SDS CLS TEST HELP/EXPL D O ETC:SDS.HELP 5.1T1 692 SDS_CLS.TEST_HELP/EXPL.D.037 1 LINE 82 63 PAGE UM VALERIO JULY 23, 1983 11:37:16 0 An SDS help/explain file, rough draft. 0 Referenced by comments of: 821/30, 1042/1, 1042/42 00601/001 SLT INSTRUCTION DIAGRAM P S1559 5.0T2 VLO FSNAME=SLT_INSTRUCTION_DIAGRAM..P.001(1) 746 5.0T2 746 SLT_INSTRUCTION_DIAGRAM..P.001 1 LINE 75 1 PAGE UM AUG. 02, 1973 00:33.08 5.0T5 191 0 Printer diagram showing operation of System/360 SLT (search list) instruction. 1 SUN SEP 08/96 15:24:55 Page 374 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00602/001 NOT-RESEQUENCER SS S1559 5.0T2 VLO FSNAME=NOT-RESEQUENCER..SS.001(1) 747 5.0T2 747 NOT-RESEQUENCER..SS.001 1 LINE 63 2 PAGE UM DWB JULY 28, 1977 03:55:16 5.0T5 192 0 PROGRAM TO PUT SEQUENCE ID ON MTS (OR ANYTHING ELSE) FOR A NEW MASTER WITHOUT CHANGING THE ID'S ON EXISTING CARDS. UNLIKE EARLIER VERSIONS, THE SEQUENCE ID DOES NOT HAVE TO BE ALL NUMERIC. USAGE: RUN UPDATE DECK AGAINST MASTER TO PRODUCE UPDATED SOURCE. THEN RUN THIS PROGRAM FEEDING THE UPDATE DECK IN ON UNIT 3 AND THE UPDATED SOURCE ON UNIT 4. OUTPUT: ON UNIT 8, THE NEW SOURCE TAPE WITH NEW ID'S INSERTED, AND ON UNIT 7 (SPUNCH IF *SPITBOL), THE NEW UPDATE DECK WITH THE NEW ID'S ON THE CARDS TO BE INSERTED. IF THIS PROGRAM CAN'T FIT THE CARDS TO BE INSERTED BETWEEN TWO EXISTING ID'S, IT WILL PRINT AN ERROR COMMENT ON UNIT 6 ALONG WITH THE PREVIOUS CARD, THE FOLLOWING CARD, AND THE NUMBER OF CARDS TO BE INSERTED. IT THEN GOES AHEAD, BUT USES "********" FOR THE ID ON THE CARDS FOR THAT INSERTION. ONE GENERALLY RUNS THIS PROGRAM TWICE-- FIRST TO FIND ALL THE PLACES THAT DON'T FIT, AND THEN FUDGES THE UPDATE DECK SLIGHTLY SO AS TO MAKE THEM FIT, THEN THE FINAL RUN. 00603/001 UC3330 # (PART OF UNIT CHECK ROUTINES) UM 0 Part of Unit Check Routines (787/8). 00604/001 PRNTCNTS # (PART OF SYSTEM WATCHERS) UM 0 Part of System Watchers (540/3). 00605/001 TWAIT SUBR D5 SOURCE SA G S1561 5.0T4 VLO FSNAME=TWAIT_SUBR.D5_SOURCE.SA.001(1) 386 5.0T4 386 TWAIT_SUBR.D5_SOURCE.SA.001 1 LINE 80 3 PAGE UM MTA AUG. 09, 1981 23:16:40 5.0T10 290 0 USER CALLABLE SUBROUTINE TO WAIT FOR A SPECIFIED REAL TIME INTERVAL AND THEN RETURN. 0 Referenced by comments of: 606/1 00605/002 TWAIT SUBR OC G SEG2:TWAIT 5.0T4 388 TWAIT_SUBR..OC.003 1 LINE 80 1 PAGE UM MTA AUG. 09, 1981 23:16:41 5.0T10 292 SEG2:TWAIT 00606/001 TICALL SUBR SA G S1559 5.0T2 VLO FSNAME=TICALL_SUBR..SA.001(1) 748 5.0T2 748 TICALL_SUBR..SA.001 1 LINE 80 3 PAGE UM MTA JULY 28, 1977 04:02:05 5.0T5 193 0 SUBROUTINE TO PROVIDE AN INTERFACE TO THE MTS TIMER INTERRUPT SUBROUTINES (605) FROM FORTRAN PROGRAMS. 00606/002 TICALL SUBR OC G # (PART OF *LIBRARY) UM MTA 0 Object part of *LIBRARY (524/1) 1 SUN SEP 08/96 15:24:55 Page 375 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00607/001 STIMER SUBR SA G S1559 5.0T2 VLO FSNAME=STIMER_SUBR..SA.001(1) 749 5.0T2 749 STIMER_SUBR..SA.001 1 LINE 80 5 PAGE UM MTA JULY 28, 1977 04:02:07 5.0T5 194 0 SUBROUTINE TO PROVIDE MTS SUPPORT FOR THE OS/ 360 STIMER AND TTIMER MACROS WHICH ARE AVAILABLE IN *SYSMAC. SEE (545/31) IN FAKEOS FOR A TEST PROGRAM. 00607/002 STIMER SUBR OC G # (PART OF *LIBRARY) UM MTA 0 Object part of *LIBRARY (524/1) 00608/001 *MVC SA G MVC W032:MVCSOU4.0 5.0T2 750 MVC..SA.001 1 LINE 80 38 PAGE UM EMERY JULY 03, 1981 15:49:21 5.0T5 195 0 RECORD REFORMATTING PROGRAM. 00608/002 *MVC OC G *MVC 5.0T2 751 MVC..OC.002 1 LINE 80 4 PAGE UM EMERY JULY 03, 1981 15:49:24 5.0T5 196 *MVC 00609/001 7330 CCW SCANNER # (OBSOLETE) D4T2 797 7330_CCW_SCANNER..SA.001 1 LINE 80 5 PAGE UM FEB. 14, 1975 00:29:06 0 360/67 PROGRAM TO SCAN ITEL 7330 DISK CHANNEL PROGRAMS TO FIND RESTART ADDRESS FOR SOFTWARE COMMAND RETRY. 00610/001A FILE SAVE TAPE COPY SA RSTR:FSTAPECOPY(1000) 5.1T1 693 FILE_SAVE_TAPE_COPY..SA.001 1 LINE 73 17 PAGE UM HELFFRICH JULY 23, 1983 11:37:19 RSTR:FSTAPECOPY 0 Program to make copies of filesave tapes, as produced by FILE SAVE. Will optionally make a listing of the files on the tape with or without copying. Does not require that output tape be physically longer than input tape. See the Operators Manual (592) for usage directions. Copies *CNFGINFODSECT (654). Assemble with the FILESAVE macros (067/35). ************************************************************************** D5.0B version: Changed to do I/O on GUSER and SERCOM and to take PAR field input for one-shot commands. ************************************************************************** 0 Referenced by comments of: 67/1 00610/002A FILE SAVE TAPE COPY OC RSTR:FSTAPECOPY(1,999) 5.1T1 694 FILE_SAVE_TAPE_COPY..OC.002 1 LINE 80 16 PAGE UM HELFFRICH JULY 23, 1983 11:37:21 00610/003A FILE SAVE TAPE COPY *FSC C *FSC 5.1T1 695 FILE_SAVE_TAPE_COPY.?FSC.C.003 1 LINE 71 1 PAGE UM HELFFRICH JULY 23, 1983 11:37:21 RSTR:*FSC 0 COMMAND FILE TO START THE FILESAVE TAPE COPY PROGRAM. INVOKED BY ENTERING 1 SUN SEP 08/96 15:24:55 Page 376 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 "MTS *FSC" ON THE OPERATOR'S CONSOLE. 00611/001 LOCKSTAT # (OBSOLETE) D4T2 802 LOCKSTAT..SA.001 1 LINE 80 6 PAGE UM AUG. 02, 1973 00:36.13 0 PROGRAM TO PRINT LOCK BYTE COUNTS AND TIMES FROM THE SUPERVISOR (045). 00612/001A LETGO SUBR SA G S0792 WSGFS FSNAME=LETGO 5.1T1 696 LETGO_SUBR..SA.001 1 LINE 80 3 PAGE UM WSG FEB. 09, 1983 11:42:12 0 Subroutine to unlock and relock files at specified intervals of real time. See writeup in MTS Volume 3. Source in lines 1,999. 00612/002A LETGO SUBR OC G # (PART OF *LIBRARY) UM WSG 0 Object part of *LIBRARY (524/1) 00613/001 LONGREAD SA S S1559 5.0T2 VLO FSNAME=LONGREAD..SA.001(1) 756 5.0T2 756 LONGREAD..SA.001 1 LINE 80 1 PAGE UM WSG AUG. 02, 1973 00:36.19 5.0T5 201 0 Program to deblock magnetic tape blocks which are up to 65534 bytes long using MTS mag tape DSR. Not for general use since it requires that the size parameter in the TAPERTN DSECT be patched. See comments in listing. 00613/002 LONGREAD OC S S1559 5.0T2 VLO FSNAME=LONGREAD..OC.002(1) 757 5.0T2 757 LONGREAD..OC.002 1 LINE 80 1 PAGE UM WSG AUG. 02, 1973 00:36.21 5.0T5 202 00614/001 START JOB # (OBSOLETE) D3T5 184 START_JOB..SA.1 1 LINE 80 1 PAGE UM AUG. 02, 1973 00:36.23 0 Obsoleted by the $SYSTEMSTATUS command. 00615/001 PLOT SYSTEM MACROS SM G W030:CCMACROS 5.0T2 758 PLOT_SYSTEM.MACROS.SM.001 1 LINE 80 3 PAGE UM LIFT JULY 03, 1981 15:49:40 5.0T5 203 0 THE UM MTS CALCOMP PLOT ROUTINES. SEVERAL OF THE SOURCE SUB-COMPONENTS OF THE PLOT SYSTEM CONSIST OF MORE THAN ONE ASSEMBLY, SO ASSEMBLE WITH PAR=B. (615/1) CONTAINS PLOT SYSTEM MACRO LIBRARY USED TO ASSEMBLE SOME OF THE ROUTINES. 0 Referenced by comments of: 615/1, 615/3 00615/002 PLOT SYSTEM PLTBGN SA G W030:PLTBGN 5.0T2 759 PLOT_SYSTEM.PLTBGN.SA.002 1 LINE 71 14 PAGE UM LIFT JULY 03, 1981 15:49:41 5.0T5 204 0 SUBROUTINE IN *PLOTSYS. ASSEMBLE USING *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 377 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 615/9 00615/003A PLOT SYSTEM ASM SA G W030:CCASM 5.1T1 697 PLOT_SYSTEM.ASM.SA.003 1 LINE 80 41 PAGE UM LIFT JULY 23, 1983 11:37:24 0 SUBROUTINES IN *PLOTSYS. ASSEMBLE USING PLOT MACROS (615/1) AND *SYSMAC. ************************************************************************** D5.0B version: PPOLY and PCIRCL added. ************************************************************************** 0 Referenced by comments of: 615/9 00615/004A PLOT SYSTEM FORT SF G W030:CCFORT 5.1T1 698 PLOT_SYSTEM.FORT.SF.004 1 LINE 76 17 PAGE UM LIFT JULY 23, 1983 11:37:26 0 Subroutines in *PLOTSYS. ************************************************************************* D5.0B version: PCIRCL changed. ************************************************************************* 0 Referenced by comments of: 615/9 00615/005 PLOT SYSTEM PSYM SA G W030:PSYM 5.0T2 762 PLOT_SYSTEM.PSYM.SA.005 1 LINE 68 14 PAGE UM LIFT JULY 03, 1981 15:49:57 5.0T5 207 0 CHARACTER GENERATION ROUTINE WHICH USES 256-CHARACTER ALPHABETS, ALLOWS SLANTING OF LETTERS, AND CHANGING PROPORTIONS AND SPACING. SEE THE INSTALLATION INSTRUCTIONS (615/23) FOR AN EXPLANATION OF THE &WHAT ASSEMBLY PARAMETER. COPIES CBDSECT (615/7). 0 Referenced by comments of: 532/1, 615/6, 615/7, 615/9, 615/16, 615/18, 615/21, 615/22, 615/48, 615/51 00615/006 PLOT SYSTEM PALPHA SA G W030:PALPHA 5.0T2 763 PLOT_SYSTEM.PALPHA.SA.006 1 LINE 68 10 PAGE UM LIFT JULY 03, 1981 15:49:59 5.0T5 208 0 THIS ROUTINE IS USED WITH PSYM (615/5). THE STANDARD ALPHABET ACTUALLY RESIDES HERE. HOWEVER, PALPHA CAN OBTAIN ALTERNATE ALPHABETS FROM ETC:PLOTALPHA (615/8) OR FROM A USER FILE. COPIES CBDSECT (615/7). 0 Referenced by comments of: 615/7, 615/8, 615/9, 615/16, 615/18, 615/21, 615/22, 615/48, 615/51 00615/007 PLOT SYSTEM CBDSECT SA G W030:CBDSECT 5.0T2 764 PLOT_SYSTEM.CBDSECT.SA.007 1 LINE 69 1 PAGE UM LIFT JULY 03, 1981 15:50:00 5.0T5 209 0 DSECT COPIED BY PSYM (615/5) AND PALPHA (615/6) WHICH DESCRIBES THE STRUCTURE 1 SUN SEP 08/96 15:24:55 Page 378 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 OF CHARACTER SETS (ALPHABETS). 0 Referenced by comments of: 615/5, 615/6 00615/008 PLOT SYSTEM ETC:PLOTALPHA D ETC:PLOTALPHA 5.0T2 765 PLOT_SYSTEM.ETC:PLOTALPHA.D.008 1 LINE 22530 53 PAGE UM LIFT JULY 03, 1981 15:50:01 5.0T5 210 ETC.:PLOTALPHA 0 A DATA FILE FOR STANDARD SYSTEM CHARACTER SETS (ALPHABETS). THE FORMAT OF THE FILE IS DESCRIBED IN THE SOURCE FOR PALPHA (615/6); THE FORMAT OF THE CHARACTER SETS IS DESCRIBED IN MTS VOLUME 11 (AUGUST 1978). 0 Referenced by comments of: 615/6, 3018/135 00615/009A PLOT SYSTEM *PLOTSYS OL G *PLOTSYS 5.1T1 699 PLOT_SYSTEM.?PLOTSYS.OL.009 1 LINE 5456 23 PAGE UM LIFT JULY 23, 1983 11:37:27 *PLOTSYS 0 OBJECT LIBRARY GENERATED FROM (615/2) + (615/3) + (615/4) + (615/5) + (615/6). 0 Referenced by comments of: 498/20, 498/67, 615/24, 615/26, 681/5, 824/5, 3018/137 00615/010A PLOT SYSTEM PLOTTER SA G W030:PLOTTER 5.1T1 700 PLOT_SYSTEM.PLOTTER.SA.010 1 LINE 72 21 PAGE UM LIFT JULY 23, 1983 11:37:27 0 Plotter routine for CalComp 936 and 1051 and ZIGZAG routine for CalComp 936 only. These routines are used to read and translate PDF's for *CCQUEUE (615/16) and SYS:CCP (615/18). See the installation instructions (615/23) for an explanation of the &WHAT assembly parameter which controls the production of different versions. Assemble using plot system macros (615/14). *************************************************************************** D5.0B version: Changed to add DELIVERY= keyword. *************************************************************************** 0 Referenced by comments of: 615/11, 615/16, 615/18, 615/21, 615/22 00615/011 PLOT SYSTEM ZIGZAG 1051 SA G W030:ZIGZAG 5.0T2 768 PLOT_SYSTEM.ZIGZAG_1051.SA.011 1 LINE 80 8 PAGE UM LIFT JULY 03, 1981 15:50:13 5.0T5 213 0 This subroutine replaces the ZIGZAG routine in (615/10) for use with the CalComp 1051 plotter. Assemble using the plot system macros (615/14). 0 Referenced by comments of: 615/22 00615/012 PLOT SYSTEM ENDPLOT SA G W030:ENDPLOT 5.0T2 769 PLOT_SYSTEM.ENDPLOT.SA.012 1 LINE 80 2 PAGE UM LIFT JULY 03, 1981 15:50:15 5.0T5 214 0 SUBROUTINE TO PRINT "END OF PLOTS ....." FOR PLOTCON (615/20). 1 SUN SEP 08/96 15:24:55 Page 379 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 615/21, 615/22 00615/013 PLOT SYSTEM TEARLINE SA G W030:TEARLINE 5.0T2 770 PLOT_SYSTEM.TEARLINE.SA.013 1 LINE 80 3 PAGE UM LIFT JULY 03, 1981 15:50:16 5.0T5 215 0 SUBROUTINE TO PUT SPACE AND DASHED LINES (TEAR HERE) BETWEEN PLOTS. IT HAS BEEN ADDED AS A SEPARATE SUBROUTINE BECAUSE THE OPERATIONS STAFF AT MICHIGAN LIKES TO VARY THIS SORT OF THING. 0 Referenced by comments of: 615/21, 615/22, 615/48 00615/014A PLOT SYSTEM MACROS SM G W030:PLOTTER.MAC 5.1T1 701 PLOT_SYSTEM.MACROS.SM.014 1 LINE 67 3 PAGE UM LIFT JULY 23, 1983 11:37:29 0 Macro library used by post-processing routines. **************************************************************************** D5.0B version: -- QLINE added. -- changed to add DELIVERY= keyword. **************************************************************************** 0 Referenced by comments of: 615/10, 615/11, 615/15, 615/17, 615/20, 615/29, 615/31, 615/38, 615/44 00615/015A PLOT SYSTEM *CCQUEUE SA G W030:CCQ 5.1T1 702 PLOT_SYSTEM.?CCQUEUE.SA.015 1 LINE 70 20 PAGE UM LIFT JULY 23, 1983 11:37:29 0 Main program for *CCQUEUE, and subroutines CCQCNCL and PLOTCOST. Copies COPY:RATEVEC (651/3), COPY:GLOBALS (1026/3), and COPY:LLMPSEQU (087). Assemble using COPY:MTS.MACROS (344/3), and plot system macros (615/14). *************************************************************************** D5.0B version: Changed to add DELIVERY= keyword. *************************************************************************** 0 Referenced by comments of: 615/16, 615/47 00615/016A PLOT SYSTEM *CCQUEUE OE G *CCQUEUE 5.1T1 703 PLOT_SYSTEM.?CCQUEUE.OE.016 1 SEQ 6616 7 PAGE UM LIFT JULY 23, 1983 11:37:30 *CCQUEUE 0 Program to queue users plots for post-processing by *CCP. Adds a line to *CCPFILE, (615/34), indicating the plot to be processed. Object from (615/15) + (615/10) + (615/5) + (615/6). 0 Referenced by comments of: 615/10 1 SUN SEP 08/96 15:24:55 Page 380 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00615/017A PLOT SYSTEM CCP SA G W030:CCP 5.1T1 704 PLOT_SYSTEM.CCP.SA.017 1 LINE 69 20 PAGE UM LIFT JULY 23, 1983 11:37:30 0 Main program for *CCP plus subroutine TAPECON. Copies COPY:GLOBALS (1026/3). Assemble using plot system macros (615/14). *************************************************************************** D5.0B version: Changed to add DELIVERY= keyword. *************************************************************************** 0 Referenced by comments of: 615/18, 615/37, 615/47 00615/018A PLOT SYSTEM CCP OE G SYS:CCP 5.1T1 705 PLOT_SYSTEM.CCP.OE.018 1 LINE 5604 5 PAGE UM LIFT JULY 23, 1983 11:37:31 SYS.:CCP 0 Post-processor program run by *CCP command file (615/19) used by the system operator to generate plot tapes. Consists of object from (615/17) + (615/10) + (615/5) + (615/6). 0 Referenced by comments of: 615/10, 615/19, 615/35 00615/019 PLOT SYSTEM *CCP C *CCP 5.0T2 776 PLOT_SYSTEM.*CCP.C.019 1 LINE 25 1 PAGE UM LIFT JULY 03, 1981 15:50:27 5.0T5 221 *CCP 0 COMMAND FILE INVOKED BY ENTERING "MTS *CCP" ON OPERATOR'S CONSOLE. USED BY THE SYSTEM OPERATOR TO GENERATE THE PLOT TAPES. RUNS THE SYS:CCP PROGRAM (615/18). 0 Referenced by comments of: 615/18, 615/31, 615/33, 615/38 00615/020A PLOT SYSTEM PLOTCON SA G W030:PLOTCON 5.1T1 706 PLOT_SYSTEM.PLOTCON.SA.020 1 LINE 70 18 PAGE UM LIFT JULY 23, 1983 11:37:31 0 Program used by the operator to plot the queued plots on the UM online plotter. See the writeup in the Operators' Manual (592). Assemble using plot system macros (615/14). *************************************************************************** D5.0B version: Changed to add DELIVERY= keyword. *************************************************************************** 0 Referenced by comments of: 615/12, 615/21, 615/22, 615/36 00615/021A PLOT SYSTEM PLOTCON OE G SYS:PLT36 5.1T1 707 PLOT_SYSTEM.PLOTCON.OE.021 1 LINE 4420 8 PAGE UM LIFT JULY 23, 1983 11:37:32 SYS.:PLT36 0 Object for (615/5), (615/6), PLOTTER (615/10), ZIGZAG (615/12), (615/13), and (615/20). This file is for use with the CalComp 936. 1 SUN SEP 08/96 15:24:55 Page 381 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00615/022A PLOT SYSTEM PLOTCON OE G SYS:PLT51 5.1T1 708 PLOT_SYSTEM.PLOTCON.OE.022 1 LINE 4368 8 PAGE UM LIFT JULY 23, 1983 11:37:33 SYS:PLT51 0 Object for (615/5), (615/6), PLOTTER only (615/10), (615/11), (615/12), (615/13), and (615/20). This file is for use with the CalComp 1051. 00615/023 PLOT SYSTEM INSTALLATION P S0876 CCGHL 'CALCOMP' FSNAME=PLOTINFO 5.0T2 780 PLOT_SYSTEM.INSTALLATION.P.023 1 LINE 71 3 PAGE UM LIFT FEB. 20, 1980 19:28:49 5.0T5 225 0 Referenced by comments of: 615/5, 615/10 00615/024 PLOT SYSTEM PDSTOMNET SA G S1559 5.0T2 VLO FSNAME=PLOT_SYSTEM.PDSTOMNET.SA.024(1) 781 5.0T2 781 PLOT_SYSTEM.PDSTOMNET.SA.024 1 LINE 76 8 PAGE UM EADIE JUNE 12, 1977 21:56:34 5.0T5 226 0 THIS IS A UTILITY TO CONVERT A PLOT DESCRIPTION SYSTEM, PDS, PLOT FILE TO A PLOT FILE IN MERIT NETWORK STANDARD FORM. CONTAINS A $CONTINUE WITH *PLOTSYS (615/9) RECORD. 00615/025 PLOT SYSTEM *PDSTOMNET OC G *PDSTOMNET 5.0T2 782 PLOT_SYSTEM.*PDSTOMNET.OC.025 1 LINE 80 3 PAGE UM EADIE JULY 03, 1981 16:02:12 5.0T5 227 *PDSTOMNET 0 ENDS WITH "$CONTINUE WITH *PLOTSYS" 00615/026 PLOT SYSTEM MNETTOPDS SA G S1559 5.0T2 VLO FSNAME=PLOT_SYSTEM.MNETTOPDS.SA.026(1) 783 5.0T2 783 PLOT_SYSTEM.MNETTOPDS.SA.026 1 LINE 89 5 PAGE UM EADIE FEB. 15, 1976 18:12:38 5.0T5 228 0 THIS IS A UTILITY TO CONVERT A MERIT NETWORK STANDARD PLOT FILE TO A PLOT DESCRIPTION (PDS) PLOT FILE. CONTAINS A $CONTINUE WITH *PLOTSYS (615/9). 00615/027 PLOT SYSTEM *MNETTOPDS OC G *MNETTOPDS 5.0T2 784 PLOT_SYSTEM.*MNETTOPDS.OC.027 1 LINE 80 3 PAGE UM EADIE JULY 03, 1981 16:02:30 5.0T5 229 *MNETTOPDS 0 ENDS WITH "$CONTINUE WITH *PLOTSYS" 00615/028 PLOT SYSTEM *CCT C *CCT 5.0T2 785 PLOT_SYSTEM.*CCT.C.028 1 LINE 23 1 PAGE UM LIFT JULY 03, 1981 16:02:30 5.0T5 230 *CCT 0 Command file used to run the CCT program (615/29). Invoked by entering "MTS *CCT" on the operators console. 00615/029 PLOT SYSTEM CCT PGM SA G S0876 CCGHL 'CALCOMP' FSNAME=CCT 5.0T2 786 PLOT_SYSTEM.CCT_PGM.SA.029 1 LINE 80 3 PAGE UM LIFT NOV. 02, 1977 12:28:11 5.0T5 231 0 Program to compute and print the time required to plot the plots currently in the plot queue (*CCPFILE). Assemble using plot system macros (615/14). 1 SUN SEP 08/96 15:24:55 Page 382 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 615/28 00615/030 PLOT SYSTEM CCT PGM OC G SYS:CCT 5.0T2 787 PLOT_SYSTEM.CCT_PGM.OC.030 1 LINE 80 1 PAGE UM LIFT JULY 03, 1981 16:03:04 5.0T5 232 SYS.:CCT 00615/031 PLOT SYSTEM PLOTTAPE SA G W030:PLOTTAPE 5.0T2 788 PLOT_SYSTEM.PLOTTAPE.SA.031 1 LINE 80 6 PAGE UM LIFT JULY 03, 1981 16:03:05 5.0T5 233 0 Program used for two functions: 1. Initializing plot tapes for use by *CCP (615/19), and 2. Constructing plot priority information in the file SYS:CCPPRIO (615/33) for use by *CCP. Assemble using PLOT SYSTEM MACROS (615/14). 00615/032 PLOT SYSTEM PLOTTAPE OC G W030:PLOTTAPE(1000) 5.0T2 789 PLOT_SYSTEM.PLOTTAPE.OC.032 1 LINE 80 3 PAGE UM LIFT JULY 03, 1981 16:03:07 5.0T5 234 00615/033 PLOT SYSTEM PRIORITY FILE D SYS.:CCPPRIO 5.0T2 790 PLOT_SYSTEM.PRIORITY_FILE.D.033 1 LINE 88 1 PAGE UM LIFT JULY 03, 1981 16:03:08 5.0T5 235 SYS.:CCPPRIO 0 FILE CONTAINING PLOT PRIORITY INFORMATION USED BY *CCP (615/19) AND *CCD (615/43). 0 Referenced by comments of: 615/31, 615/44 00615/034 PLOT SYSTEM *CCPFILE D # *CCPFILE UM LIFT SYS.:*CCPFILE@E 0 THIS IS THE SYSTEM PLOT QUEUE FILE. 0 Referenced by comments of: 615/16, 615/35 00615/035 PLOT SYSTEM BACKUPQ D # SYS:BACKUPQ UM LIFT SYS:BACKUPQ@E 0 USED BY CCP (615/18) TO BACKUP *CCPFILE (615/34). 00615/036 PLOT SYSTEM PLOTDIR D # SYS:PLOTDIR UM LIFT SYS:PLOTDIR@E 0 PLOT DIRECTORY FILE USED BY PLOTCON (615/20) TO POINT TO PLOT DATA STORED IN OTHER PERMANENT FILES, WHICH IT WILL CREATE. 1 SUN SEP 08/96 15:24:55 Page 383 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00615/037 PLOT SYSTEM PLOTREBAT D # SYS:PLOTREBAT UM LIFT SYS:PLOTREBAT@E 0 DATA WRITTEN INTO THIS FILE BY CCP (615/17) FOR CANCELLED PLOTS IS USED BY CCREBATE (632/8) TO GENERATE INPUT RECORDS FOR THE REBATE PROGRAM. 0 Referenced by comments of: 632/8 00615/038 PLOT SYSTEM CCPINIT SA G W030:CCPINIT 5.0T2 791 PLOT_SYSTEM.CCPINIT.SA.038 1 LINE 80 6 PAGE UM LIFT JULY 03, 1981 16:03:09 5.0T5 236 0 PROGRAM USED BY THE SYSTEM OPERATOR TO INITIALIZE (SET VOLUME LABEL AND IDENT FILE) PLOT TAPES FOR USE BY *CCP (615/19). INSTRUCTIONS WITHIN AND IN OPERATOR'S MANUAL. SOURCE IN LINES 1,999. ASSEMBLE USING PLOT SYSTEM MACROS (615/14). 00615/039 PLOT SYSTEM CCPINIT OC G SYS:CCPINIT 5.0T2 792 PLOT_SYSTEM.CCPINIT.OC.039 1 LINE 80 3 PAGE UM LIFT JULY 03, 1981 16:03:10 5.0T5 237 SYS.:CCPINIT 0 Referenced by comments of: 615/40 00615/040 PLOT SYSTEM *CCL C *CCL 5.0T2 793 PLOT_SYSTEM.*CCL.C.040 1 LINE 40 1 PAGE UM LIFT JULY 03, 1981 16:03:11 5.0T5 238 *CCL 0 COMMAND FILE INVOKED BY ENTERING "MTS *CCL" ON OPERATOR'S CONSOLE. USED BY THE SYSTEM OPERATOR TO INITIALIZE PLOT TAPES. RUNS THE SYS:CCPINIT PROGRAM (615/39). 00615/041 PLOT SYSTEM CCPDEFER SA G S0876 CCGHL 'CALCOMP' FSNAME=CCPDEFER 5.0T2 794 PLOT_SYSTEM.CCPDEFER.SA.041 1 LINE 80 5 PAGE UM LIFT APR. 28, 1978 20:17:20 5.0T5 239 0 PROGRAM USED BY SYSTEM OPERATOR TO TELL CCP TO PUT PLOTS FOR CERTAIN CCIDS ON "DEFERRED" PLOT TAPE. INSTRUCTIONS AND DESCRIPTIONS WITHIN, AND IN OPERATOR'S MANUAL (592). SOURCE IN LINES 1,999. 00615/042 PLOT SYSTEM CCPDEFER OC G SYS:CCPDEFER 5.0T2 795 PLOT_SYSTEM.CCPDEFER.OC.042 1 LINE 80 2 PAGE UM LIFT JULY 03, 1981 16:03:14 5.0T5 240 SYS.:CCPDEFER 0 Referenced by comments of: 615/43 00615/043 PLOT SYSTEM *CCD C *CCD 5.0T2 796 PLOT_SYSTEM.*CCD.C.043 1 LINE 37 1 PAGE UM LIFT JULY 03, 1981 16:03:16 5.0T5 241 *CCD 0 COMMAND FILE INVOKED BY ENTERING "MTS *CCD" ON OPERATOR'S CONSOLE. USED BY THE SYSTEM OPERATOR TO PUT PLOTS FOR CERTAIN CCIDS ON "DEFERRED" PLOT TAPE. RUNS THE SYS:CCPDEFER PROGRAM (615/42). 1 SUN SEP 08/96 15:24:55 Page 384 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 615/33 00615/044 PLOT SYSTEM PIDENT SA G S0876 CCGHL 'CALCOMP' FSNAME=PIDENT 5.0T2 797 PLOT_SYSTEM.PIDENT.SA.044 1 LINE 80 4 PAGE UM LIFT FEB. 19, 1979 22:09:23 5.0T5 242 0 PROGRAM TO PRINT PLOT TAPE IDENTIFICATION, INCLUDING DATE LAST USED, MINIMUM TIME BETWEEN USES, AND THE LINE IN CCPPRIO (615/33) WHICH CONTAINS THE PLOT PRIORITY INFORMATION. SOURCE IN LINES 1,999. ASSEMBLE USING PLOT SYSTEM MACROS (615/14). 0 Referenced by comments of: 615/46 00615/045 PLOT SYSTEM PIDENT OC G SYS:PIDENT 5.0T2 798 PLOT_SYSTEM.PIDENT.OC.045 1 LINE 80 1 PAGE UM LIFT JULY 03, 1981 16:03:37 5.0T5 243 SYS.:PIDENT 00615/046 PLOT SYSTEM *PLB C *PLB 5.0T2 799 PLOT_SYSTEM.*PLB.C.046 1 LINE 38 1 PAGE UM LIFT JULY 03, 1981 16:03:38 5.0T5 244 *PLB 0 COMMANDS TO RUN PIDENT (615/44) FROM OPERATOR'S CONSOLE. DOCUMENTATION IS IN THE OPERATOR'S MANUAL (592). 00615/047C PLOT SYSTEM PLOTQUIK SA G W030:PLOTQUIK 5.1T1 709 PLOT_SYSTEM.PLOTQUIK.SA.047 1 LINE 71 16 PAGE UM LIFT JULY 23, 1983 11:37:34 0 Used for plots for which the user has requested "quick turnaround" (ASAP parameter in CCQUEUE (615/15)). When *PLQ (615/49) is started by the operator, it selects ASAP plots, and plots them immediately. These plots are copied to the plot tape by CCP (615/17). See also comments at the beginning of this file. 0 Referenced by comments of: 615/48, 615/49 00615/048C PLOT SYSTEM PLOTQUIK OC G SYS:PLOTQUIK 5.1T1 710 PLOT_SYSTEM.PLOTQUIK.OC.048 1 LINE 5942 4 PAGE UM LIFT JULY 23, 1983 11:37:35 SYS:PLOTQUIK 0 Object module for PLOTQUIK (615/47). Also contains a copy of TEARLINE (object of (615/13)), and $CONTINUE WITH SYS:PSYM (615/5) and (615/6) 00615/049C PLOT SYSTEM PLOTQUIK C G *PLQ 5.1T1 711 PLOT_SYSTEM.PLOTQUIK.C.049 1 LINE 54 1 PAGE UM LIFT JULY 23, 1983 11:37:35 *PLQ 0 Operator command file to run PLOTQUIK (615/47). 0 Referenced by comments of: 615/47 00615/050C PLOT SYSTEM PLOTSTACK SA G W030:PLOTSTACK(1,999) 5.1T1 712 PLOT_SYSTEM.PLOTSTACK.SA.050 1 LINE 72 6 PAGE UM LIFT JULY 23, 1983 11:37:36 0 A program, originally from WSU, to stack plots in the "y" direction 1 SUN SEP 08/96 15:24:55 Page 385 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 in order to save paper. 0 Referenced by comments of: 615/51 00615/051C PLOT SYSTEM PLOTSTACK OE G *PLOTSTACK 5.1T1 713 PLOT_SYSTEM.PLOTSTACK.OE.051 1 LINE 13314 8 PAGE UM LIFT JULY 23, 1983 11:37:36 0 Object of (615/50) plus the objects of PSYM (615/5) and PALPHA (615/6). 00616/001A TERM USAGE STATISTICS SA G WSG:DCSTAT.S 5.1T1 714 TERM_USAGE_STATISTICS..SA.001 1 LINE 72 22 PAGE UM WSG JULY 23, 1983 11:37:37 0 Program to compute system usage by various terminal types, classes, and speeds. It reads *STATISTICS data and prints the elapsed time, CPU time, CPU VMI, and wait VMI for each type of terminal access. In addition, it also summarizes usage by class of user ID, e.g., student, faculty, research, etc. The distributed version is set up for the UM terminal/network names and UM user ID assignment scheme. The following commands are available: MTS Return control to MTS temporarily. PRINT Print the terminal and user ID class summaries for the data previously read by STAT and/or RESTORE commands. SAVE Save the data previously read by STAT and/or RESTORE commands on the file assigned to unit 0. STAT DATE=mm-dd -yy¬ ...mm-dd -yy¬¬  TIME=hh:mm...hh:mm¬ Process *STATISTICS type data from tape using the directory system (742). STAT FDname Process *STATISTICS type data from the file specified. RESTORE Read data from the file assigned to unit 0. This data must previously have been written by a SAVE command. RESET Delete the data previously read by a STAT and/or RESTORE command. STOP Stop execution of the program. $MTScommand Execute the specified MTS command. Calls the STATIO routine (617/2) and STACNVRT (500/59). Assemble using COPY:MTS.MACROS (344/3) and the usage statistics macros (617/3). 0 Referenced by comments of: 616/2 1 SUN SEP 08/96 15:24:55 Page 386 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00616/002A TERM USAGE STATISTICS OC G WSG:DCSTAT 5.1T1 715 TERM_USAGE_STATISTICS..OC.002 1 LINE 10725 8 PAGE UM WSG JULY 23, 1983 11:37:38 0 Object from (616/1) + (617/2). Also contains the following: $CONTINUE WITH LIB:STAFF RETURN (837/1) $CONTINUE WITH SYS:DIRLIB RETURN (742/5) $CONTINUE WITH COPY:SYSDEFS (579/3) 00617/001A USAGE STATISTICS STAT PGM SA G WSG:STAT.S 5.1T1 716 USAGE_STATISTICS.STAT_PGM.SA.001 1 LINE 72 8 PAGE UM WSG JULY 23, 1983 11:37:39 0 Program to print system usage for specified user id's, answerbacks, and master source device names. For each record found, the user id, project number, signon and off times, date, answerback, elapsed time, and merit connect time are printed on SPRINT and the total elapsed time for all jobs found is printed on SERCOM. The following commands are accepted: DATE mm-dd mm-dd specify date range for subsequent searches. TIME hh:mm hh:mm specify time range for subsequent searches. U userid scan for all runs for this userid. D name scan for all runs from this msource device. A answerback scan for all runs with this answerback code. N scan for all runs using Merit outbound connections. R rdcid scan for all runs from the Remote Data Concentrator with this rdcid. Note: the character "#" is used as a fill character for the matching done by the U, D, and A commands. For example "D LA##" will find all jobs on any "LA" Memorex 1270 line. The file from which the input statistics data is read may be specified in the PAR field or a tape may be specified by giving "PAR=TAPE-vol 'tape id'" where vol is the volume name of the tape to be mounted and 'tape id' is the external label. "PAR=TAPE" means the tape is unlabeled. Note: if no PAR is given, the tapes will be automatically mounted as necessary when the DATE command has been given. The TIME command is optional. If no DATE command has been given, *STATISTICS is scanned. Calls the STATIO routine (617/2) and STACNVRT (500/59). Assemble using COPY:MTS.MACROS (344/3) and the usage statistics macros (617/3). 0 Referenced by comments of: 617/4 00617/002 USAGE STATISTICS STATIO SUBR SA G W116:STATTAPE.S 5.0T2 803 USAGE_STATISTICS.STATIO_S.SA.002 1 LINE 72 16 PAGE UM YOUNG JULY 03, 1981 16:03:57 5.0T5 248 0 Routine to do I/O to statistics files. There are three EQU's at the front of this assembly for FILETBLN, TAPETBLN, and FDUBTBLN which specify the maximum number of statistics files, tapes, and tape drives the program can use. The distributed version is set for 100, 20, and 10 respectively. This routine handles all I/O and mounting of all tapes needed to satisfy the specified date/time range. Assemble using (617/3). 1 SUN SEP 08/96 15:24:55 Page 387 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 616/1, 616/2, 617/1, 617/3, 617/4 00617/003 USAGE STATISTICS MACROS SM G W116:STATLIB 5.0T2 804 USAGE_STATISTICS.MACROS.SM.003 1 LINE 72 3 PAGE UM YOUNG JULY 03, 1981 16:04:00 5.0T5 249 0 Macro library for routines calling the STATIO routines (617/2). 0 Referenced by comments of: 616/1, 617/1, 617/2 00617/004A USAGE STATISTICS OC G W108:STAT 5.1T1 717 USAGE_STATISTICS..OC.004 1 LINE 4895 5 PAGE UM WSG JULY 23, 1983 11:37:39 0 Object from (617/1) + (617/2). Also contains the following: $CONTINUE WITH LIB:STAFF RETURN (837/1) $CONTINUE WITH SYS:DIRLIB RETURN (742/5) $CONTINUE WITH COPY:SYSDEFS (579/3) 00618/001 BUFSTAT # (PART OF BUFALLOC) UM 0 Part of BUFALLOC (009/3). 00619/001 *ASMT *ASMT SM O # (NO LONGER DISTRIBUTED) 5.0T2 806 ASMT.*ASMTSYSMAC.SM.001 1 LINE 73 82 PAGE UM JULY 03, 1981 16:04:03 5.0T5 251 0 ASMT is no longer distributed. 00620/001 STAT DSECT COPY:STATDSECT SA G # (PART OF COPY:MTS.MACROS) D4T2 872 STAT_DSECT..SA. 1 LINE 80 3 PAGE UM AUG. 14, 1977 22:00:00 0 THE STAT DSECT IS AVAILABLE FROM THE STATFMT MACRO IN COPY:MTS.MACROS (344/3). 00620/002 STAT DSECT GOM STAT DSECT SG G COPY:STATDSECT.SG 5.0T2 833 STAT_DSECT.GOM_STAT_DSECT.SG.002 1 LINE 95 3 PAGE UM MTS STERKEN JULY 03, 1981 16:04:59 5.0T5 278 COPY:STATDSECT.SG 0 GOM VERSION OF *STATISTICS RECORD DSECT. 00621/001 DIRECT ACCESS ERROR LOG *DLG C *DLG 5.0T2 834 DIRECT_ACCESS_ERROR_LOG.*.C.001 1 LINE 39 1 PAGE UM MTA JULY 03, 1981 16:05:00 5.0T5 279 *DLG 0 COMMAND FILE, INVOKED AT UM AS PART OF *LAS (154), WHICH RUNS THE READ3330LOG PROGRAM (621/2) TO READ THE 3330 AND 2305 BUFFERED ERROR LOGS HOURLY. THIS FILE COULD ALSO BE SETUP TO RUN THE CONSOLE WATCH PROGRAM (621/6) IF 2314 DISKS ARE BEING USED. 0 Referenced by comments of: 621/9 1 SUN SEP 08/96 15:24:55 Page 388 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00621/002A DIRECT ACCESS ERROR LOG READ3330LOG SA G S1644 5.0BT1 VLO FSNAME=DIRECT_ACCESS_ERROR_LOG.R.SA.002(1) 398 5.1T1 718 DIRECT_ACCESS_ERROR_LOG.R.SA.002 1 LINE 72 3 PAGE UM MTA NOV. 21, 1982 15:03:54 0 WHEN FIRST RUN AND EVERY HOUR THEREAFTER, THIS PROGRAM READS THE BUFFERED HARDWARE ERROR LOG FROM EVERY PUBLIC 3330 VOLUME AND 2305 AND LOGS THE RESULTS IN THE FORM OF UC ERROR MESSAGES. COPIES COPY:CMDAREADSECT (531/20), COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND *CNFGINFODSECT (654). ASSEMBLE USING COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 621/1, 621/4, 621/6 00621/003A DIRECT ACCESS ERROR LOG READ3330LOG OE G ETC.:READ3330LOG 5.1T1 719 DIRECT_ACCESS_ERROR_LOG.R.OE.003 1 SEQ 1188 1 PAGE UM MTA JULY 23, 1983 11:37:52 ETC.:READ3330LOG 00621/004 DIRECT ACCESS ERROR LOG PRINT UC 3330 SA G MTA:PRINTUC3330(1,999) 5.0T2 837 DIRECT_ACCESS_ERROR_LOG.P.SA.004 1 LINE 57 1 PAGE UM MTA JULY 03, 1981 16:05:03 5.0T5 282 MTA.:PRINTUC3330 0 PROGRAM TO READ UNIT CHECK LOG RECORDS, AS SAVED BY READ3330LOG (621/2), OR THE UNIT CHECK ROUTINES (787). READS FROM SCARDS, PRINTS ON SPRINT. IT IGNORES ALL RECORDS THAT ARE NOT OF TYPE 4 OR 25. "PAR=ERRORS" MEANS TO PRINT ONLY THOSE RECORDS WHICH ARE REALLY ERRORS. CALLS READBFR ROUTINE (709) AND PRUC3330 (621/12). COPIES COPY:CMDAREADSECT (531/20). 0 Referenced by comments of: 621/12 00621/005 DIRECT ACCESS ERROR LOG PRINT UC 3330 OC G MTA:PRINTUC3330(1000) 5.0T2 838 DIRECT_ACCESS_ERROR_LOG.P.OC.005 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 16:05:05 5.0T5 283 00621/006 DIRECT ACCESS ERROR LOG CONSOLE WATCH SA O S1559 5.0T2 VLO FSNAME=DIRECT_ACCESS_ERROR_LOG.C.SA.006(1) 839 5.0T2 839 DIRECT_ACCESS_ERROR_LOG.C.SA.006 1 LINE 80 2 PAGE UM MTA AUG. 02, 1973 00:53.48 5.0T5 284 0 PROGRAM TO KEEP WATCHING OUTPUT PRINTED ON OPERATORS CONSOLE LOOKING FOR 2314 DISK UNIT CHECK MESSAGES AND WRITES THEM IN A FILE. READ3330LOG (621/2) IS A REPLACEMENT FOR THIS PROGRAM WHEN 3330 AND 2305 HARDWARE IS BEING USED. 0 Referenced by comments of: 621/1 00621/007 DIRECT ACCESS ERROR LOG CONSOLE WATCH OC O S1559 5.0T2 VLO FSNAME=DIRECT_ACCESS_ERROR_LOG.C.OC.007(1) 840 5.0T2 840 DIRECT_ACCESS_ERROR_LOG.C.OC.007 1 LINE 80 1 PAGE UM MTA AUG. 02, 1973 00:53.50 5.0T5 285 00621/008A DIRECT ACCESS ERROR LOG SORT AND PRINT SA G MTA:PRINTUC 5.1T1 720 DIRECT_ACCESS_ERROR_LOG.S.SA.008 1 LINE 72 13 PAGE UM MTA JULY 23, 1983 11:37:53 MTA.:PRINTUC 0 PROGRAM TO SORT AND SUMMARIZE UNIT CHECK AND BUFFERED LOG DATA FOR 3330 AND 2305. ACCEPTS PAR=2305 (TO PRINT 2305 ERRORS ONLY), OR BOTH (FOR BOTH 2305 AND 3330 ERRORS). IF NEITHER 2305 NOR BOTH IS GIVEN, IT PROMPTS. COPIES COPY:CMDAREADSECT (531/20). CALLS PRUC3330 (621/12) AND JVCT (674). IGNORES TAPE UNIT CHECK RECORDS, USE EREP (655) OR PM2 (820) FOR THEM. 1 SUN SEP 08/96 15:24:55 Page 389 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 621/12 00621/009A DIRECT ACCESS ERROR LOG SORT AND PRINT OC G MTA:PUC 5.1T1 721 DIRECT_ACCESS_ERROR_LOG.S.OC.009 1 LINE 8872 6 PAGE UM MTA JULY 23, 1983 11:37:53 MTA.:PUC 0 Has a "$CONTINUE WITH MTA:PRUC3330(1000) (621/12) + MTA:SORTE1.LETGO(1000) (621/1) + MTS:UBCDATEX RETURN" record. The reference to MTS:UBCDATEX is for the object for JVCT (674). Calls (621/10) to unlock input file periodically. 00621/010C DIRECT ACCESS ERROR LOG UNLOCK INPUT SA G MTA:SORTE1.LETGO(1,999) 5.1T1 722 DIRECT_ACCESS_ERROR_LOG.U.SA.010 1 LINE 70 1 PAGE UM MTA JULY 23, 1983 11:37:54 0 A SORTE1 exit for *SORT that calls LETGO so that the input file will be unlocked periodically. 0 Referenced by comments of: 621/9, 655/5 00621/011C DIRECT ACCESS ERROR LOG UNLOCK INPUT OC G MTA:SORTE1.LETGO(1000) 5.1T1 723 DIRECT_ACCESS_ERROR_LOG.U.OC.011 1 LINE 80 1 PAGE UM MTA JULY 23, 1983 11:37:54 00621/012 DIRECT ACCESS ERROR LOG PRUC3330 SA G MTA:PRUC3330(1,999) 5.0T2 843 DIRECT_ACCESS_ERROR_LOG.P.SA.010 1 LINE 72 4 PAGE UM MTA JULY 03, 1981 16:05:10 5.0T5 288 MTA.:PRUC3330 0 SUBROUTINE CALLED BY (621/4) AND (621/8). COPIES COPY:CMDAREADSECT (531/20). 0 Referenced by comments of: 621/4, 621/8, 621/9 00621/013 DIRECT ACCESS ERROR LOG PRUC3330 OC G MTA:PRUC3330(1000) 5.0T2 844 DIRECT_ACCESS_ERROR_LOG.P.OC.011 1 LINE 80 4 PAGE UM MTA JULY 03, 1981 16:05:11 5.0T5 289 00621/014 DIRECT ACCESS ERROR LOG INIT:UC3330LOG D # INIT:UC3330LOG UM MTA INIT:UC3330LOG@E 0 LOG FILE USED BY THE CMDSTAT PICKUP PROGRAM, *CMD (531/7), TO SAVE TYPE 4 AND TYPE 25 UNIT CHECK RECORDS. 0 Referenced by comments of: 531/6, 655/3 00622/001 FCBDSECT SA # (OBSOLETE) D3.2T2 7 FCBDSECT..SA. 1 LINE 80 4 PAGE UM MAR. 21, 1975 02:15:34 0 In COPY:MTS.MACROS (344/3) 00623/001 FDUBDSECT SA # (OBSOLETE) D3.2T2 8 FDUBDSECT..SA. 1 LINE 80 3 PAGE UM MAR. 21, 1975 02:15:37 0 In COPY:MTS.MACROS (344/3) 1 SUN SEP 08/96 15:24:55 Page 390 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00624/001 WOPTRDSECT SA # (OBSOLETE) D3.2T2 9 WOPTRDSECT..SA. 1 LINE 80 1 PAGE UM MAR. 21, 1975 02:15:39 0 In COPY:MTS.MACROS (344/3) 00625/001 *TAPEFIXER SA O S1237 TAPES 'TAPEFS' FSNAME=TAPEFIXER 5.0T2 845 TAPEFIXER..SA.001 1 LINE 73 13 PAGE UM LIFT SEP. 28, 1977 16:56:00 5.0T5 290 0 PROGRAM TO RECOVER DATA FROM A 9-TRACK LABELED TAPE WHICH HAS BEEN PARTIALLY DESTROYED OR CONTAINS UNREADABLE BLOCKS. 00625/002 *TAPEFIXER OE O *TAPEFIXER 5.0T2 846 TAPEFIXER..OE.002 1 LINE 7503 4 PAGE UM LIFT JULY 03, 1981 16:10:53 5.0T5 291 *TAPEFIXER 00626/001 ATNTRP SUBR SA G S1559 5.0T2 VLO FSNAME=ATNTRP_SUBR..SA.001(1) 847 5.0T2 847 ATNTRP_SUBR..SA.001 1 LINE 80 1 PAGE UM DWB JULY 26, 1974 09:21.43 5.0T5 292 0 SUBROUTINE TO ALLOW FORTRAN USERS TO CALL ATTNTRP. 00626/002 ATNTRP SUBR OC G # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00627/001 GDINF SUBR SA G S1559 5.0T2 VLO FSNAME=GDINF_SUBR..SA.001(1) 848 5.0T2 848 GDINF_SUBR..SA.001 1 LINE 80 3 PAGE UM DWB OCT. 12, 1980 16:04:48 5.0T5 293 0 SUBROUTINE TO ALLOW FORTRAN USERS TO CALL GDINFO. COPIES *GDINFODSECT (594). 00627/002 GDINF SUBR OC G # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 00628/001 *3284RTN DSR SA B S1559 5.0T2 VLO FSNAME=3284RTN.DSR.SA.001(1) 849 5.0T2 849 3284RTN.DSR.SA.001 1 LINE 69 2 PAGE UM OGDEN JUNE 27, 1979 05:08:41 5.0T5 294 0 DSR FOR IBM 3284, 3286, 3287, AND SIMILAR PRINTERS. USES THE TR3270 TABLES (629/12). 0 Referenced by comments of: 629/12 00628/002 *3284RTN DSR OC B *3284RTN 5.0T2 850 3284RTN.DSR.OC.002 1 LINE 80 1 PAGE UM OGDEN JULY 03, 1981 16:13:01 5.0T5 295 *3284RTN 1 SUN SEP 08/96 15:24:55 Page 391 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00628/003 *3284RTN UNIT CHECK SA G S1559 5.0T2 VLO FSNAME=3284RTN.UNIT_CHECK.SA.003(1) 851 5.0T2 851 3284RTN.UNIT_CHECK.SA.003 1 LINE 72 3 PAGE UM OGDEN JULY 03, 1981 16:13:01 5.0T5 296 0 UNIT CHECK ROUTINES FOR IBM 3284, 3286, 3287, AND SIMILAR PRINTERS. 00628/004 *3284RTN UNIT CHECK OC G # (PART OF RESIDENT SYSTEM) UM OGDEN 0 Object part of Resident System (468). 00629/001 *3270RTN SA G S1561 5.0T4 VLO FSNAME=3270RTN..SA.001(1) 389 5.0T4 389 3270RTN..SA.001 1 LINE 82 127 PAGE UBC SAYLE VALERIO SEP. 04, 1981 02:59:27 5.0T10 293 0 DSR for IBM 3277 (models 1 and 2), 3278 (models 1, 2, 3, 4 and 5), 3279, 3066, and 3036 display terminals. Uses the TR3270 tables (629/12). Assemble using COPY:MTS.MACROS (344/3) and COPY:MISC.MACROS (728). Copies *CNFGINFODSECT (654). 0 Referenced by comments of: 629/2, 629/4, 629/5, 629/12 00629/002A *3270RTN UPDATE UC G W237:3270UPD 5.1T1 724 3270RTN.UPDATE.UC.002 1 LINE 123 4 PAGE UBC SAYLE VALERIO JULY 23, 1983 11:37:54 0 UPDATE TO PRODUCE CURRENT *3270RTN SOURCE FROM base SOURCE (629/1). **************************************************************************** D5.0A changes: Includes changes for the Lee Data displays. **************************************************************************** 00629/003 *3270RTN IO3066 SA G S1561 5.0T4 VLO FSNAME=3270RTN.IO3066.SA.003(1) 391 5.0T4 391 3270RTN.IO3066.SA.003 1 LINE 80 14 PAGE UM VALERIO JUNE 27, 1979 05:09:55 5.0T10 295 0 SUBROUTINE TO SIMULATE A 3270 ON A 3066 BY INTERPRETING A 3270 CHANNEL PROGRAM. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 629/5 00629/004A *3270RTN ACTIVITY SUBR SA G S1568 OGDEN2 FSNAME=ACTIVITY.S 5.1T1 725 3270RTN.ACTIVITY_SUBR.SA.004 1 LINE 124 14 PAGE UBC SAYLE VALERIO DEC. 07, 1981 03:42:53 0 GENERATES %ACTIVITY DISPLAY. CALLED BY (629/1). COPIES COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3). ASSEMBLE USING COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 413/1, 629/5, 629/8, 647/1 1 SUN SEP 08/96 15:24:55 Page 392 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00629/005A *3270RTN OC G *3270RTN 5.1T1 726 3270RTN..OC.005 1 LINE 21244 19 PAGE UBC SAYLE VALERIO JULY 23, 1983 11:39:33 *3270RTN 0 OBJECT FOR (629/1), (629/3), AND (629/4). 00629/006 *3270RTN GRAB3270 SA G S1561 5.0T4 VLO FSNAME=3270RTN.GRAB3270.SA.006(1) 394 5.0T4 394 3270RTN.GRAB3270.SA.006 1 LINE 59 1 PAGE UBC SAYLE VALERIO DEC. 03, 1978 04:08:59 5.0T10 298 0 THIS IS THE SHARED TABLE FOR USE WITH THE %GRAB AND %FLIP COMMANDS IN THE 3270 DSR. 00629/007 *3270RTN GRAB3270 OC G SEG2:GRAB3270 5.0T4 395 3270RTN.GRAB3270.OC.007 1 LINE 80 1 PAGE UBC SAYLE VALERIO AUG. 09, 1981 23:21:21 5.0T10 299 SEG2:GRAB3270 0 THIS OBJECT SHOULD BE LOADED BY PISTLE PRIOR TO LOADING THE 3270 DSR. 00629/008A *3270RTN TEST ACTIVITY SA G S0683 OGDEN FSNAME=TACTIVITY.S 5.1T1 727 3270RTN.TEST_ACTIVITY.SA.008 1 LINE 80 2 PAGE UM VALERIO MAR. 28, 1981 01:20:41 0 A MAIN PROGRAM WHICH CALLS THE ACTIVITY SUBROUTINE (629/4) AND PRINTS THE RESULTS ON SPRINT. FOR TESTING PURPOSES ONLY. 00629/009A *3270RTN TEST ACTIVITY OC G S0683 OGDEN FSNAME=TA 5.1T1 728 3270RTN.TEST_ACTIVITY.OC.009 1 LINE 360 1 PAGE UM VALERIO MAR. 28, 1981 01:20:46 00629/010 *3270RTN *3066RTN OC G *3066RTN 5.0T4 398 3270RTN.?3066RTN.OC.010 1 LINE 24 1 PAGE UBC SAYLE VALERIO AUG. 09, 1981 23:21:37 5.0T10 302 *3066RTN 0 CONTAINS ONLY A "$CONTINUE WITH *3270RTN" RECORD. 0 Referenced by comments of: 662/1 00629/011 *3270RTN *3036RTN OC G *3036RTN 5.0T4 399 3270RTN.?3036RTN.OC.011 1 LINE 24 1 PAGE UBC SAYLE VALERIO AUG. 09, 1981 23:21:37 5.0T10 303 *3036RTN 0 CONTAINS ONLY A "$CONTINUE WITH *3270RTN" RECORD. 00629/012A *3270RTN TR3270 SA G W237:TR3270.S 5.1T1 729 3270RTN.TR3270.SA.012 1 LINE 72 4 PAGE UM VALERIO JULY 23, 1983 11:45:02 0 Provides the TR and TRT tables used by the 3270 DST (629/1), the 3284 DSR (628/1), *APC (496), the Screen Support Routines (811), and the operator job (634). ******************************************************************* D5.1 version: Now in the resident system. ******************************************************************* 1 SUN SEP 08/96 15:24:55 Page 393 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 628/1, 629/1 00629/013A *3270RTN TR3270 OC G # (PART OF RESIDENT SYSTEM) 5.0T4 401 3270RTN.TR3270.OC.013 1 LINE 80 4 PAGE UM VALERIO AUG. 09, 1981 23:21:40 5.0T10 305 00629/014 *3270RTN MEMO 419 WX S0672 CCMEMO 'CCMEMOS' FSNAME=M419 5.0T4 402 3270RTN.MEMO_419.WX.014 1 LINE 115 10 PAGE UM HARTMAN VALERIO DEC. 04, 1980 09:52:34 5.0T10 306 00630/001 TRUNCATE SA G TRUN S1153 UNSP VLO FSNAME=TRUNCATE.S 5.0T2 852 TRUNCATE..SA.001 1 LINE 80 7 PAGE UM UNSP MAR. 27, 1976 12:24:30 5.0T5 297 0 SCANS FILES ON USERS ACCOUNT AND TRUNCATES THOSE THAT NEED IT. COPIES *GFINFODSECT (593). 00630/002 TRUNCATE OE G UNSP:TRUNCATE 5.0T2 853 TRUNCATE..OE.002 1 LINE 2693 4 PAGE UM UNSP JULY 03, 1981 16:13:17 5.0T5 298 UNSP:TRUNCATE 00630/003 TRUNCATE WF S1153 UNSP VLO FSNAME=TRUNCATE.FMT 5.0T2 854 TRUNCATE..WF.003 1 LINE 67 1 PAGE UM UNSP SEP. 15, 1980 16:44:03 5.0T5 299 00631/001A ACCOUNTING CLS CLSTV SA G CLST S0027 DISTRB FSNAME=CLSTV 5.1T1 730 ACCOUNTING_CLS.CLSTV.SA.001 1 LINE 80 3 PAGE UM ENGLE AUG. 24, 1982 17:43:53 0 PROGRAM TO PRODUCE CLSTRANSVEC WHICH IS A COPY SECTION FOR ACCCLS. COPIES GRDEF (104/83). ASSEMBLE USING COPY:MTS.MACROS (344/3). 00631/002A ACCOUNTING CLS CLSTV UC G S0027 DISTRB FSNAME=CLSTVUPD 5.1T1 731 ACCOUNTING_CLS.CLSTV.UC.002 1 LINE 66 1 PAGE UM ENGLE AUG. 24, 1982 17:43:58 0 Referenced by comments of: 631/4 00631/003A ACCOUNTING CLS CLSTV OC G CLST S0027 DISTRB FSNAME=CLST 5.1T1 732 ACCOUNTING_CLS.CLSTV.OC.003 1 LINE 80 3 PAGE UM ENGLE AUG. 24, 1982 17:44:02 0 Referenced by comments of: 631/5 00631/004A ACCOUNTING CLS CLSTRANSVEC SA G S0027 DISTRB FSNAME=CLSTRANSVEC 5.1T1 733 ACCOUNTING_CLS.CLSTRANSVE.SA.004 1 LINE 19 1 PAGE UM ENGLE AUG. 24, 1982 17:45:04 0 COPY SECTION FOR ACCCLS PRODUCED BY RUNNING CLSTV (631/2). 00631/005A ACCOUNTING CLS ACCCLS SA G ACLS S0027 DISTRB FSNAME=ACCCLS 5.1T1 734 ACCOUNTING_CLS.ACCCLS.SA.005 1 LINE 80 9 PAGE UM ENGLE MAY 25, 1983 15:50:04 0 INTERFACE BETWEEN ACCOUNTING CLS CALL AND ACCMXMAT. COPIES GRDEF (104/83) AND CLSTRANSVEC (631/3). 0 Referenced by comments of: 631/22 1 SUN SEP 08/96 15:24:55 Page 394 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00631/006A ACCOUNTING CLS ACCCLS UC G S0027 DISTRB FSNAME=ACCCLSUPD 5.1T1 735 ACCOUNTING_CLS.ACCCLS.UC.006 1 LINE 72 2 PAGE UM ENGLE MAY 25, 1983 15:50:12 00631/007A ACCOUNTING CLS ACCCLS OC G ACLS S0027 DISTRB FSNAME=ACLS 5.1T1 736 ACCOUNTING_CLS.ACCCLS.OC.007 1 LINE 80 3 PAGE UM ENGLE MAY 25, 1983 15:50:19 0 Referenced by comments of: 631/24 00631/008A ACCOUNTING CLS ACCMXMAT SA G AMXM S0027 DISTRB FSNAME=ACCMXMAT 5.1T1 737 ACCOUNTING_CLS.ACCMXMAT.SA.008 1 LINE 80 92 PAGE UM ENGLE JUNE 10, 1983 16:39:35 0 ACCounting MaXimum MAinTenance (main program for ACCOUNTING CLS). The external symbol ACCLOGFL contains the name of a file (ACC:ACCLOG) into which a log is written. Copies ACCFORMAT (104/1), ACCPROJFMT (104/3), and COPY:RATEVEC (651/3). This program has a GBLB symbol &PW which, if set to 1, will cause the instructions for the PASSWORD parameter to be assembled. The message "Experimental. See W013:ACCNEWS (3/23/82)." should be changed to reflect local conditions or deleted. If &STAPRJ is set to 1, the object for ACC:DISPROJECT (104/81) is produced. 0 Referenced by comments of: 104/81, 631/22 00631/009A ACCOUNTING CLS ACCMXMAT UC G S0027 DISTRB FSNAME=ACCMXMATUPD 5.1T1 738 ACCOUNTING_CLS.ACCMXMAT.UC.009 1 LINE 72 9 PAGE UM ENGLE JUNE 10, 1983 16:39:56 0 Updates source from previous regular distribution of NEW ACCMXMAT to current distribution. 00631/010A ACCOUNTING CLS ACCMXMAT OC G S0027 DISTRB FSNAME=AMXM 5.1T1 739 ACCOUNTING_CLS.ACCMXMAT.OC.010 1 LINE 80 28 PAGE UM ENGLE FEB. 02, 1983 16:27:22 0 Referenced by comments of: 631/24 00631/011A ACCOUNTING CLS ACUSPRNT SA G AUPR S0027 DISTRB FSNAME=ACUSPRNT 5.1T1 740 ACCOUNTING_CLS.ACUSPRNT.SA.011 1 LINE 80 17 PAGE UM ENGLE FEB. 02, 1983 16:29:43 0 PRINT SUBROUTINE FOR ACCOUNTING CLS. COPIES ACCFORMAT (104/1). THIS PROGRAM USES A SETC SYMBOL &DC TO CONTROL ASSEMBLY OF DATA CELL INSTRUCTIONS. IF IT IS SET TO '0', THE DATA CELL INSTRUCTIONS WILL NOT BE ASSEMBLED. SEE THE SOURCE FOR THE VALUE TO BE USED FOR DATA CELL. 0 Referenced by comments of: 631/22 00631/012C ACCOUNTING CLS ACUSPRNT UC G S0027 DISTRB FSNAME=ACUSPRNTUPD 5.1T1 741 ACCOUNTING_CLS.ACUSPRNT.UC.012 1 LINE 67 2 PAGE UM ENGLE FEB. 02, 1983 16:29:56 0 Updates source from previous regular distribution of NEW ACUSPRNT to current one. 00631/013A ACCOUNTING CLS ACUSPRNT OC G S0027 DISTRB FSNAME=AUPR 5.1T1 742 ACCOUNTING_CLS.ACUSPRNT.OC.013 1 LINE 80 4 PAGE UM ENGLE FEB. 02, 1983 16:30:16 0 Referenced by comments of: 104/1, 631/24 1 SUN SEP 08/96 15:24:55 Page 395 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00631/014 ACCOUNTING CLS FASTIOCK SA G S1559 5.0T2 VLO FSNAME=ACCOUNTING_CLS.FASTIOCK.SA.013(1) 867 5.0T2 867 ACCOUNTING_CLS.FASTIOCK.SA.013 1 LINE 80 3 PAGE UM ENGLE DEC. 06, 1974 12:48.35 5.0T5 312 0 SUBROUTINE TO DETERMINE IF AN I/O UNIT IS "FAST." USED IN ACCOUNTING CLS. COPIES GRDEF (104/83). 0 Referenced by comments of: 104/1, 631/22 00631/015 ACCOUNTING CLS FASTIOCK OC G S1559 5.0T2 VLO FSNAME=ACCOUNTING_CLS.FASTIOCK.OC.014(1) 868 5.0T2 868 ACCOUNTING_CLS.FASTIOCK.OC.014 1 LINE 80 1 PAGE UM ENGLE DEC. 06, 1974 12:48.53 5.0T5 313 0 Referenced by comments of: 631/24 00631/016C ACCOUNTING CLS JOBTOID SA G JBID S0027 DISTRB FSNAME=JOBTOID 5.1T1 743 ACCOUNTING_CLS.JOBTOID.SA.016 1 LINE 80 2 PAGE UM ENGLE AUG. 26, 1982 17:22:35 0 Subroutine to return the signon ID associated with a given job number. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). 00631/017C ACCOUNTING CLS JOBTOID UC G # S0027 DISTRB FSNAME=JOBTOIDUPD UM ENGLE 0 Updates source from previous regular distribution to current one. 00631/018C ACCOUNTING CLS JOBTOID OC G S0027 DISTRB FSNAME=JBID 5.1T1 744 ACCOUNTING_CLS.JOBTOID.OC.018 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 17:22:42 0 Referenced by comments of: 631/22, 631/24 00631/019C ACCOUNTING CLS $ACCDUMP SA G ADMP S0027 DISTRB FSNAME=$ACCDUMP 5.1T1 745 ACCOUNTING_CLS.$ACCDUMP.SA.019 1 LINE 80 1 PAGE UM ENGLE FEB. 03, 1983 17:03:09 0 Requests a job dump from the operators. The message to the operators should be changed to something appropriate for the installation. 0 Referenced by comments of: 631/22 00631/020C ACCOUNTING CLS $ACCDUMP UC G # S0027 DISTRB FSNAME=$ACCDUMPUPD UM ENGLE 0 Updates source from previous regular distribution to current distribution. 00631/021C ACCOUNTING CLS $ACCDUMP OC G S0027 DISTRB FSNAME=ADMP 5.1T1 746 ACCOUNTING_CLS.$ACCDUMP.OC.021 1 LINE 80 1 PAGE UM ENGLE FEB. 03, 1983 17:03:36 0 Referenced by comments of: 104/82, 631/24 00631/022A ACCOUNTING CLS *CLSACC OE G *CLSACC 5.1T1 747 ACCOUNTING_CLS.?CLSACC.OE.022 1 SEQ 23224 14 PAGE UM ENGLE JULY 23, 1983 11:59:57 *CLSACC 0 ACCOUNTING CLS object. Allows project directors and instructors to distribute money, disk space, and terminal and plot time to their user 1 SUN SEP 08/96 15:24:55 Page 396 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ID's and to change expiration dates. It consists of ACCCLS (631/5) + ACCMXMAT (631/8) + GETFILE (104/130) + DIRECTRY (104/69) + TMZONEXP (834/6) + ACCIO (104/29) + LOG (104/173) + OPTFIELD (104/183) + FILENAME (104/67) + ACUSPRNT (631/11) + STATUS (104/21) + FASTIOCK (631/14) + IOLOKCK (104/140) + TIMEZONE (834/3) + $ACCDUMP (631/19) + JOBTOID (631/18) + TIMETRP (104/115) + SYSDEFS. This file must be permitted as follows: U/N,R PKEY=*SYS.GETIN 00631/023 ACCOUNTING CLS *PRJACCSTAT D MTS:TST.PRJACCST 5.0T2 870 ACCOUNTING_CLS.*PRJACCSTA.D.016 1 LINE 1 1 PAGE UM ENGLE JULY 03, 1981 16:14:57 5.0T5 315 *PRJACCSTAT 0 FILE USED TO HOLD ERROR COMMENTS FROM THE ACCOUNTING MAINTENANCE PROGRAM. SHOULD BE PERMITTED: P/N, WE PKEY=*ACC 00631/024A ACCOUNTING CLS CLSACCGEN C G S0027 DISTRB FSNAME=CLSACCGEN 5.1T1 748 ACCOUNTING_CLS.CLSACCGEN.C.024 1 LINE 111 1 PAGE UM ENGLE MAY 25, 1983 15:51:44 0 Source commands to generate the Accounting CLS object. The following files (and associated components) are referenced: ACLS (631/7), AMXM (631/10), GTFL (104/130), DIR (104/69), TZXP (834/6), AIO (104/29), LOG (104/173), OFLD (104/183), FLNM (104/67), AUPR (631/13), STATCLS (104/21), FIOC (631/15), IOLC (104/140), TZON (834/3), ADMP (631/21), JBID (631/18), TTRP (104/115), and SYSDEFS. The resulting object is placed in the file -CLSACC. 00632/001C REBATE CREBATE SA G W030:CREBATE 5.1T1 749 REBATE.CREBATE.SA.001 1 LINE 71 16 PAGE UM LIFT JULY 23, 1983 12:00:02 0 Subroutine, run under SCAN (753), to rebate charges for MTS jobs. Copies COPY:CMDAREADSECT (531/2) and COPY:RATEVEC (651/3). Assemble with COPY:MTS.MACROS (344/3) and SCAN (753/1). The writeup for CREBATE is in the SCAN writeup (753/6). *************************************************************************** D5.0B version: The old REBATE program has been replaced with this subroutine which runs under SCAN (753). *************************************************************************** 00632/002C REBATE CREBATE OC G W030:CREBATEX 5.1T1 750 REBATE.CREBATE.OC.002 1 LINE 80 7 PAGE UM LIFT JULY 23, 1983 12:00:03 0 Referenced by comments of: 632/3 00632/003A REBATE REBATE OC G ACC:REBATE 5.1T1 751 REBATE.REBATE.OC.003 1 LINE 77 1 PAGE UM LIFT JULY 23, 1983 12:00:04 ACC:REBATE 0 Contains $CONTINUE WITH W030:SCANX (753/5) + W030:CREBATEX (632/2) + ACC:ACCLIB (104/41) record. Run with PROT=OFF. 1 SUN SEP 08/96 15:24:55 Page 397 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00632/004A REBATE RBATACC SA G RBTA S0027 DISTRB FSNAME=RBATACC 5.1T1 752 REBATE.RBATACC.SA.004 1 LINE 80 6 PAGE UM ENGLE AUG. 26, 1982 12:01:23 0 SUBROUTINE CALLED BY REBATE TO COMPUTE COST OF REBATE AND TO UPDATE USERS ACCOUNTING RECORD. USED IN ACCLIB (104/47). COPIES GRDEF (104/83), COPY:RATEVEC (651/3), AND ACCFORMAT (104/1). 00632/005C REBATE RBATACC UC G S0027 DISTRB FSNAME=RBATACCUPD 5.1T1 753 REBATE.RBATACC.UC.005 1 LINE 72 3 PAGE UM ENGLE AUG. 26, 1982 12:01:31 0 Updates source from previous regular distribution to current one. 00632/006A REBATE RBATACC OC G S0027 DISTRB FSNAME=RBTA 5.1T1 754 REBATE.RBATACC.OC.006 1 LINE 80 3 PAGE UM ENGLE AUG. 26, 1982 12:01:41 0 Referenced by comments of: 104/1 00632/007A REBATE REQUEST FORM # (PART OF XEROX 9700 UM FSL -- COMP. 840/2) 5.0T2 886 REBATE.REQUEST_FORM.C.008 1 LINE 108 2 PAGE UM LIFT JULY 03, 1981 16:20:08 5.0T5 331 00632/008 REBATE CCREBATE SA G S0811 REBATE 'REBATES' FSNAME=CCREBATE 5.0T2 887 REBATE.CCREBATE.SA.009 1 LINE 59 2 PAGE UM LIFT AUG. 05, 1977 17:02:57 5.0T5 332 0 PROGRAM TO TAKE QUEUE RECORDS FROM SYS:PLOTREBAT (615/37) AND PRODUCE INPUT TO THE REBATE PROGRAM. THE OUTPUT FROM THIS PROGRAM IS WRITTEN INTO ACC:PLOTREBAT (632/10). 0 Referenced by comments of: 615/37, 632/10 00632/009 REBATE CCREBATE OC G ACC:CCREBATE 5.0T2 888 REBATE.CCREBATE.OC.010 1 LINE 80 1 PAGE UM LIFT JULY 03, 1981 16:20:10 5.0T5 333 ACC:CCREBATE 00632/010 REBATE ACC:PLOTREBAT D # ACC:PLOTREBAT UM LIFT ACC:PLOTREBAT@E 0 DATA FILE USED FOR OUTPUT FROM CCREBATE (632/8). 0 Referenced by comments of: 632/8 00633/001 *PL1SCAN IBM SOURCE SA G S0696 OSSRC6 POSN=PL552 5.0T2 889 PL1SCAN.IBM_SOURCE.SA.001 1 SEQ 80 220 PAGE UM TIFFANY JULY 03, 1981 16:24:25 5.0T5 334 0 IBM OS/360 (RELEASE 21.7) SOURCE FOR PL/I SYNTAX SCANNING PROGRAM. 00633/002 *PL1SCAN MTS UPDATE UU G S0410 MTSPL1 'PL1LIB' POSN=PL1SCANUP.D4 5.0T2 890 PL1SCAN.MTS_UPDATE.UU.002 1 SEQ 80 5 PAGE UM TIFFANY JULY 03, 1981 16:25:29 5.0T5 335 0 *IEBUPDAT DECK FOR MTS CHANGES. ASSEMBLE OUTPUT OF UPDATE USING IKM (633/3). COPIES IKMBASE (633/4). 1 SUN SEP 08/96 15:24:55 Page 398 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00633/003 *PL1SCAN IKM SM G S0410 MTSPL1 'PL1LIB' POSN=PL1SCNIKM.D4 5.0T2 891 PL1SCAN.IKM.SM.003 1 SEQ 80 19 PAGE UM TIFFANY JULY 03, 1981 16:25:31 5.0T5 336 0 Referenced by comments of: 633/2 00633/004 *PL1SCAN IKMBASE SA G S0410 MTSPL1 'PL1LIB' POSN=PL1SCNIKMBASE.D4 5.0T2 892 PL1SCAN.IKMBASE.SA.004 1 SEQ 80 10 PAGE UM TIFFANY JULY 03, 1981 16:25:33 5.0T5 337 0 A SECTION COPIED BY THE IKM002 MODULE. 0 Referenced by comments of: 633/2 00633/005 *PL1SCAN INTERFACE SA G S0410 MTSPL1 'PL1LIB' POSN=PL1SCAN.S.D4 5.0T2 893 PL1SCAN.INTERFACE.SA.005 1 SEQ 80 20 PAGE UM TIFFANY JULY 03, 1981 16:25:35 5.0T5 338 0 MTS INTERFACE MODULE. ASSEMBLE USING MACROLIB (633/6). 00633/006 *PL1SCAN MACROLIB SM G S1559 5.0T2 VLO FSNAME=PL1SCAN.MACROLIB.SM.006(1) 894 5.0T2 894 PL1SCAN.MACROLIB.SM.006 1 LINE 38 1 PAGE UM TIFFANY JULY 28, 1977 21:37:37 5.0T5 339 0 Referenced by comments of: 633/5 00633/007 *PL1SCAN OE G *PL1SCAN 5.0T2 895 PL1SCAN..OE.007 1 LINE 4032 11 PAGE UM TIFFANY JULY 03, 1981 16:25:39 5.0T5 340 *PL1SCAN 0 THIS OBJECT COULD BE LOADED INTO SHARED VM BY PISTLE IF DESIRED. 00634/001A OPERATOR JOB SA G W226:OPERATOR 5.1T1 755 OPERATOR_JOB..SA.001 1 LINE 125 88 PAGE UM PICKELMAN JULY 23, 1983 12:00:27 0 A job program to support IBM 3270 as an operator's console. For a complete description, see the section "Using the 3270 Operators' Console," in the MTS Operators' Manual (592). This subcomponent has the source for several routines, organized as a macro library. The following are included: DSOPC - A macro which generates a description of the DS3270 routines. DSDECTS - A macro which generates DSECTS describing the areas returned by the DS3270 routines. DS3270 - Some routines to help using a 3270. UPDATES - CDupdate updates for the operator job. BASE - The base source for the operator job. Copies COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), COPY:JOBSTA (413/9), and *CNFGINFODSECT (654). Assemble using COPY:SETPARM (653) and COPY:MISC.MACROS (728). At UM, the COMPILE macro in (823/24) is used to assemble these, 1 SUN SEP 08/96 15:24:55 Page 399 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 after sourcing W226:OPERATOR(0). ******************************************************************* D5.0C changes: The following are changes that have been made to the operator job since it was last distributed (D5.0). -Now it works with any 3270 and uses the full screen (e.g. 43 lines on a 3278 Mod4). -Now the field-mark may be used to indicate that the cursor should not be automatically placed on a response line. That is, when the screen is rewritten the following rules are used to determine where to put the cursor: 1. If the cursor was on a partially finished line it is put back where it was. 2. If there are any response lines which do not begin with the field-mark character, the cursor is placed in the first of these. 3. Otherwise it is placed in the request area. -A few bugs have been fixed. ******************************************************************* ******************************************************************* D5.1 version: Changed the character which inhibits cursor positioning from "Field-Mark" to "DUP" or "#". ******************************************************************* 0 Referenced by comments of: 413/1, 629/12, 634/3, 806/1 00634/002A OPERATOR JOB OC G # (PART OF RESIDENT SYSTEM) UM PICKELMAN 0 Object part of Resident System (468). 00634/003 OPERATOR JOB CONSIO SA G S1559 5.0T2 VLO FSNAME=OPERATOR_JOB.CONSIO.SA.004(1) 898 5.0T2 898 OPERATOR_JOB.CONSIO.SA.004 1 LINE 73 11 PAGE UM OGDEN JULY 03, 1981 16:25:50 5.0T5 343 0 SUBROUTINE TO DO STAND-ALONE I/O TO A 3270, 1052, OR 3066. ALSO PROVIDES INTERFACE TO OPERATOR JOB (634) IF USED. IF OPERATOR JOB IS NOT USED, CONSIO MAY BE ASSEMBLED WITH &OPERJOB=0 TO REDUCE ITS SIZE. COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND COPY:PSA (162). ASSEMBLE USING COPY:SETPARM (653) AND COPY:MISC.MACROS (728). 0 Referenced by comments of: 634/4 1 SUN SEP 08/96 15:24:55 Page 400 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00634/004C OPERATOR JOB CONSIO UC G W163:CONSIOUPD(1,999) 5.1T3 341 OPERATOR_JOB.CONSIO.UC.004 1 LINE 68 1 PAGE UM OGDEN AUG. 20, 1983 19:47:12 0 CDUPDATE input for the D5.0 base source (634/3). 00634/005A OPERATOR JOB CONSIO OC G # (PART OF RESIDENT SYSTEM) UM OGDEN 0 Object part of Resident System (468). 00634/006A OPERATOR JOB CONSOLE SA G MTS:CONSOLE(1000) 5.1T1 756 OPERATOR_JOB.CONSOLE.SA.006 1 LINE 73 4 PAGE UBC O'REILLY PICKELMAN JULY 23, 1983 12:19:10 MTS:CONSOLE 0 PROGRAM TO DISPLAY THE OPERATORS' CONSOLE ON A 3270 TYPE TERMINAL. CALLS THE SCREEN SUPPORT ROUTINES (811). COPIES *GDINFODSECT (594). ASSEMBLE USING COPY:MISC.MACROS (728). ************************************************************************* D5.0C version: Added a call to SSCNTRL to disable the screen support routines setting an attention trap on calls to SSWRIT (with the new sceen routines this was causing attentions to be ignored and so without calling SSREAD there was no way to get out of the program). ************************************************************************* ************************************************************************* D5.1 version: Fixed bugs and made minor changes. ************************************************************************* 00634/007A OPERATOR JOB CONSOLE OC G MTS:CONSOLE(1,999) 5.1T1 757 OPERATOR_JOB.CONSOLE.OC.007 1 LINE 80 4 PAGE UBC O'REILLY PICKELMAN JULY 23, 1983 12:19:11 00635/001 FSUB D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=FSUB 5.0T4 403 FSUB.D5.0_MASTER.SA.001 1 LINE 80 90 PAGE UM MTS BURLING AUG. 09, 1981 23:41:06 5.0T10 307 0 Composed of the FDGET, HOPENIT, GIVEBACK, FILE LOCKING and UNLOCKING, ETC. sections. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM (653/1). 0 Referenced by comments of: 42/2 00635/002A FSUB UPDATE UC G MTSS:FSUB/UPD 5.1T1 758 FSUB.UPDATE.UC.002 1 LINE 116 25 PAGE UM MTS BURLING JULY 23, 1983 12:19:11 0 *CDUPDATE input to produce current source. 1 SUN SEP 08/96 15:24:55 Page 401 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00635/003A FSUB OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00635/004A FSUB L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=FSUB.LIST 5.1T1 759 FSUB..L.004 1 LINE 133 269 PAGE UM MTS BURLING JULY 23, 1983 12:19:45 00635/005A FSUB COMMENTS D G MTSS:FSUB/COM 5.1T1 760 FSUB.COMMENTS.D.005 1 LINE 72 1 PAGE UM MTS BURLING JULY 23, 1983 12:19:47 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00636/001 CMDS D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=CMDS 5.0T4 406 CMDS.D5.0_MASTER.SA.001 1 LINE 80 191 PAGE UM MTS BURLING AUG. 09, 1981 23:45:28 5.0T10 310 0 MTS command processors. Copies COPY:LLMPSEQU (087), COPY:IT.DSECTS (1081/4), *GDINFODSECT (594/1), *SENSEDSECT (3025/1), COPY:GLOBALS (1026/3), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3), COPY:SETPARM (653), COPY:IT.MACROS (1081/6) and COPY:CC.MACROS (1054/3). 0 Referenced by comments of: 42/2 00636/002A CMDS UPDATE UC G MTSS:CMDS/UPD 5.1T1 761 CMDS.UPDATE.UC.002 1 LINE 79 93 PAGE UM MTS BURLING JULY 23, 1983 12:19:48 0 *CDUPDATE (1036) input to produce current source. 00636/003A CMDS OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00636/004A CMDS L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=CMDS.LIST 5.1T1 762 CMDS..L.004 1 LINE 133 640 PAGE UM MTS BURLING JULY 23, 1983 12:20:28 00636/005A CMDS COMMENTS D G MTSS:CMDS/COM 5.1T1 763 CMDS.COMMENTS.D.005 1 LINE 68 4 PAGE UM MTS BURLING JULY 23, 1983 12:20:34 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00637/001 DSRS D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=DSRS 5.0T4 409 DSRS.D5.0_MASTER.SA.001 1 LINE 80 68 PAGE UM MTS BURLING AUG. 09, 1981 23:46:05 5.0T10 313 0 MTS internal DSR's and HASP interface. Copies COPY:LLMPSEQU (087), *SENSEDSECT (3025), and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM (653/1), and COPY:MISC.MACROS (728/1) 1 SUN SEP 08/96 15:24:55 Page 402 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 42/2, 838/1 00637/002A DSRS UPDATE UC G MTSS:DSRS/UPD 5.1T1 764 DSRS.UPDATE.UC.002 1 LINE 105 43 PAGE UM MTS BURLING JULY 23, 1983 12:20:35 0 *CDUPDATE input to produce current source. 0 Referenced by comments of: 16/1 00637/003A DSRS OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00637/004A DSRS L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=DSRS.LIST 5.1T1 765 DSRS..L.004 1 LINE 133 259 PAGE UM MTS BURLING JULY 23, 1983 12:20:43 00637/005A DSRS COMMENTS D G MTSS:DSRS/COM 5.1T1 766 DSRS.COMMENTS.D.005 1 LINE 69 3 PAGE UM MTS BURLING JULY 23, 1983 12:20:45 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00638/001 USUB D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=USUB 5.0T4 413 USUB.D5.0_MASTER.SA.001 1 LINE 80 95 PAGE UM MTS BURLING AUG. 09, 1981 23:46:34 5.0T10 317 0 MTS user subroutines. Copies COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), *SENSEDSECT (3025), *CNFGINFODSECT (654), and *GDINFODSECT (594). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM (653/1). 0 Referenced by comments of: 42/2, 680/1 00638/002A USUB UPDATE UC G MTSS:USUB/UPD 5.1T1 767 USUB.UPDATE.UC.002 1 LINE 86 78 PAGE UM MTS BURLING JULY 23, 1983 12:20:46 0 *CDUPDATE input to produce current source. 0 Referenced by comments of: 821/1 00638/003A USUB OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00638/004A USUB L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=USUB.LIST 5.1T1 768 USUB..L.004 1 LINE 133 417 PAGE UM MTS BURLING JULY 23, 1983 12:21:12 00638/005A USUB COMMENTS D G MTSS:USUB/COM 5.1T1 769 USUB.COMMENTS.D.005 1 LINE 70 3 PAGE UM MTS BURLING JULY 23, 1983 12:21:16 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 1 SUN SEP 08/96 15:24:55 Page 403 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00639/001 DSRI D5.0 MASTER SA G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=DSRI 5.0T4 416 DSRI.D5.0_MASTER.SA.001 1 LINE 80 38 PAGE UM MTS BURLING AUG. 09, 1981 23:47:27 5.0T10 320 0 MTS DSR interface. Copies COPY:LLMPSEQU (087), COPY:GLOBALS (1026/3), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), and COPY:SETPARM (653/1). 0 Referenced by comments of: 42/2, 539/7 00639/002A DSRI UPDATE UC G MTSS:DSRI/UPD 5.1T1 770 DSRI.UPDATE.UC.002 1 LINE 89 56 PAGE UM MTS BURLING JULY 23, 1983 12:21:17 0 *CDUPDATE input to produce current source. 00639/003A DSRI OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00639/004A DSRI L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=DSRI.LIST 5.1T1 771 DSRI..L.004 1 LINE 133 245 PAGE UM MTS BURLING JULY 23, 1983 12:21:37 00639/005A DSRI WRITEUP WF W163:DSR.F 5.1T1 772 DSRI.WRITEUP.WF.005 1 LINE 144 15 PAGE UM MTS OGDEN JULY 23, 1983 12:21:39 0 A description of the Device Support Routine Interface (DSRI/DSR). 00639/006A DSRI TESTIO SA G MTS:TESTIO(1,999) 5.1T1 773 DSRI.TESTIO.SA.006 1 LINE 65 4 PAGE UM MTA BURLING JULY 23, 1983 12:21:40 0 TEST PROGRAM FOR DSR INTERFACE. 0 Referenced by comments of: 639/8, 639/9, 639/10, 639/11 00639/007A DSRI TESTIO OC G MTS:TESTIO(1000) 5.1T1 774 DSRI.TESTIO.OC.007 1 LINE 80 3 PAGE UM MTA BURLING JULY 23, 1983 12:21:40 00639/008A DSRI TESTIO DATA D MTS:TESTIODATA 5.1T1 775 DSRI.TESTIO_DATA.D.008 1 LINE 44 1 PAGE UM MTA BURLING JULY 23, 1983 12:21:41 0 COMMANDS TO TESTIO PROGRAM (639/6), READ ON SCARDS. 0 Referenced by comments of: 639/11 00639/009A DSRI TESTIO FILE 1 D MTS:TESTIOFILE 5.1T1 776 DSRI.TESTIO_FILE_1.D.009 1 LINE 5 1 PAGE UM MTA BURLING JULY 23, 1983 12:21:41 0 TESTIO (639/6) TEST FILE NUMBER 1. 00639/010A DSRI TESTIO FILE 2 D MTS:TESTIOFILE2 5.1T1 777 DSRI.TESTIO_FILE_2.D.010 1 LINE 5 1 PAGE UM MTA BURLING JULY 23, 1983 12:21:41 0 TESTIO (639/6) TEST FILE NUMBER 2. 1 SUN SEP 08/96 15:24:55 Page 404 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00639/011A DSRI TESTIO BASE D MTS:TESTIOBASE 5.1T1 778 DSRI.TESTIO_BASE.D.011 1 LINE 132 3 PAGE UM MTA BURLING JULY 23, 1983 12:21:42 0 EXPECTED SPRINT OUTPUT WHEN TESTIO (639/6) IS RUN USING TESTIO DATA (639/8) AS INPUT. 00639/012A DSRI COMMENTS D G MTSS:DSRI/COM 5.1T1 779 DSRI.COMMENTS.D.012 1 LINE 69 3 PAGE UM MTS BURLING JULY 23, 1983 12:21:42 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00640/001 MTS.TV SA # (OBSOLETE) D3.2T2 41 MTS.TV..SA. 1 LINE 56 1 PAGE UM MAR. 21, 1975 02:20:51 0 In COPY:MTS.MACROS (344/3) 00642/001 MERIT UTILITIES *MNS C *MNS 5.0T2 909 MERIT_UTILITIES.*MNS.C.001 1 LINE 9 1 PAGE UM WSG JULY 03, 1981 16:28:14 5.0T5 354 *MNS 0 Command file used by the operators to start the Merit terminal service after IPL. Invoked by entering "MTS *MNS" on the operator's console. Described in the Operator's Manual (592). 0 Referenced by comments of: 67/21, 642/2 00642/002A MERIT UTILITIES MNS C STRT:MNS 5.1T1 780 MERIT_UTILITIES.MNS.C.002 1 LINE 69 2 PAGE UM WSG JULY 23, 1983 12:21:42 STRT:MNS 0 Command file SOURCEd to by *MNS (642/1). 00642/003 MERIT UTILITIES *MND C *MND 5.0T2 911 MERIT_UTILITIES.*MND.C.003 1 LINE 9 1 PAGE UM WSG JULY 03, 1981 16:28:15 5.0T5 356 *MND 0 Command file used by the operators to prevent usage of the Merit network when it is down. Invoked by entering "MTS *MND" on the operator's console. Described in the Operator's Manual (592). 0 Referenced by comments of: 642/4 00642/004 MERIT UTILITIES MND C STRT:MND 5.0T2 912 MERIT_UTILITIES.MND.C.004 1 LINE 28 1 PAGE UM WSG JULY 03, 1981 16:28:16 5.0T5 357 STRT:MND 0 Command file SOURCEd to by *MND (642/3) which changes MNET:AUTH (642/5) to prevent network access. 00642/005 MERIT UTILITIES AUTHORIZATION D MNET:AUTH 5.0T2 913 MERIT_UTILITIES.AUTHORIZA.D.005 1 LINE 32 1 PAGE UM WSG JULY 03, 1981 16:28:17 5.0T5 358 MNET:AUTH 0 Data file used to control which users can use the network and at 1 SUN SEP 08/96 15:24:55 Page 405 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 what times. 0 Referenced by comments of: 642/4 00642/006A MERIT UTILITIES *MLD C *MLD 5.1T1 781 MERIT_UTILITIES.?MLD.C.006 1 LINE 17 1 PAGE UM WSG JULY 23, 1983 12:21:43 *MLD 0 Command file used by the operators to reload the Merit PDP-11. Invoked by entering "MTS *MLD" on the operator's console. Described in the Operator's Manual (592). 0 Referenced by comments of: 642/7 00642/007A MERIT UTILITIES PCP RELOAD C PCP:ANRELOAD 5.1T1 782 MERIT_UTILITIES.PCP_RELOA.C.007 1 LINE 93 1 PAGE UM WSG JULY 23, 1983 12:21:43 PCP:ANRELOAD 0 Command file SOURCEd to by *MLD (642/6) to run 11LOAD (642/8). 00642/008A MERIT UTILITIES 11LOAD SA G MNET:11LOAD(1000) 5.1T1 783 MERIT_UTILITIES.11LOAD.SA.008 1 LINE 73 28 PAGE UM KNOPPER JULY 23, 1983 12:21:44 0 Referenced by comments of: 642/7, 642/10, 715/1 00642/009 MERIT UTILITIES 11LOAD OE G MNET:11LOAD(1,999) 5.0T4 420 MERIT_UTILITIES.11LOAD.OE.012 1 LINE 80 13 PAGE UM KNOPPER AUG. 09, 1981 23:47:41 5.0T10 324 MNET:11LOAD 00642/010 MERIT UTILITIES 11LOAD WF S1561 5.0T4 VLO FSNAME=MERIT_UTILITIES.11LOAD.WF.013(1) 421 5.0T4 421 MERIT_UTILITIES.11LOAD.WF.013 1 LINE 176 3 PAGE UM KNOPPER MAR. 25, 1977 11:52:19 5.0T10 325 0 This is Merit Memo ND-77-288, a description of 11LOAD (642/8). 00642/011A MERIT UTILITIES PCP SETDATE SF G MNET:SETDATE(1000) 5.1T1 784 MERIT_UTILITIES.PCP_SETDA.SF.011 1 LINE 71 5 PAGE UM STARK JULY 23, 1983 12:21:45 0 MTS program to set the time and date in the Merit PDP-11. Commands used to compile may be found at the beginning of the file. 0 Referenced by comments of: 642/13 00642/012A MERIT UTILITIES PCP SETDATE OE G MNET:SETDATE(1,999) 5.1T1 785 MERIT_UTILITIES.PCP_SETDA.OE.012 1 LINE 6904 4 PAGE UM STARK JULY 23, 1983 12:21:46 MNET:SETDATE 00642/013A MERIT UTILITIES PCP SETDATE WF W542:SETDATE.F(1) 5.1T1 786 MERIT_UTILITIES.PCP_SETDA.WF.013 1 LINE 70 3 PAGE UM STARK JULY 23, 1983 12:21:46 0 A description of the SETDATE program (642/11). 1 SUN SEP 08/96 15:24:55 Page 406 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00642/014A MERIT UTILITIES *MUP C *MUP 5.1T1 787 MERIT_UTILITIES.?MUP.C.014 1 LINE 49 1 PAGE UM WSG JULY 23, 1983 12:21:47 *MUP 0 Command file used by the operators to determine if the Merit PDP-11 is up by running MUP (642/15). Invoked by entering "MTS *MUP" on the operator's console. Described in the Operator's Manual (592). 00642/015A MERIT UTILITIES MUP SG G MNET:MUP(1000,1199) 5.1T1 788 MERIT_UTILITIES.MUP.SG.015 1 LINE 114 3 PAGE UM STARK JULY 23, 1983 12:21:47 0 Program to determine the state of the Merit Computer Network. Calls the CHKDEV (734/3), CKMNJOBS (642/16), CKNET (642/17), and CKAUTH (642/18) subroutines. Contains commands at the beginning of the file to assemble and compile. Requires COPY:MISC.MACROS (728/1) and COPY:SYSDEFS (579/3). 0 Referenced by comments of: 642/14, 642/16, 642/17, 642/18, 642/19, 642/20, 734/3 00642/016 MERIT UTILITIES CKMNJOBS SUBR SA G MNET:MUP(1800,1999) 5.0T2 921 MERIT_UTILITIES.CKMNJOBS.SA.016 1 LINE 72 3 PAGE UM STARK JUNE 26, 1980 00:09:43 5.0T5 366 0 Subroutine called by MUP (642/15) to count the number and type of UMMPS jobs using Merit network devices. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). 0 Referenced by comments of: 642/15, 642/19 00642/017 MERIT UTILITIES CKNET SUBR SG G MNET:MUP(1200,1499) 5.0T2 922 MERIT_UTILITIES.CKNET_SUB.SG.017 1 LINE 99 2 PAGE UM STARK JULY 28, 1979 13:36:29 5.0T5 367 0 Subroutine called by MUP (642/15) which attempts to open connections across the Merit network and which returns error messages in case of failure. 0 Referenced by comments of: 642/15, 642/19 00642/018 MERIT UTILITIES CKAUTH SUBR SA G MNET:MUP(1500,1699) 5.0T2 923 MERIT_UTILITIES.CKAUTH_SU.SA.018 1 LINE 80 5 PAGE UM STARK DEC. 04, 1977 23:09:48 5.0T5 368 0 Subroutine called by MUP (642/15) which checks the file MNET:AUTH. 0 Referenced by comments of: 642/15, 642/19 00642/019A MERIT UTILITIES MUP OC G MNET:MUP(1,999) 5.1T1 789 MERIT_UTILITIES.MUP.OC.019 1 LINE 2126 4 PAGE UM STARK JULY 23, 1983 12:21:48 MNET:MUP 0 Object for (642/15), (642/16), (642/17), (642/18), and (734/3). 1 SUN SEP 08/96 15:24:55 Page 407 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00642/020 MERIT UTILITIES MUP WF S1559 5.0T2 VLO FSNAME=MERIT_UTILITIES.MUP.WF.020(1) 925 5.0T2 925 MERIT_UTILITIES.MUP.WF.020 1 LINE 97 3 PAGE UM STARK MAY 03, 1981 16:08:29 5.0T5 370 0 A description of the MUP program (642/15). 00642/021C MERIT UTILITIES SCPLOAD SA G SCP:SCPLOAD(1000) 5.1T1 790 MERIT_UTILITIES.SCPLOAD.SA.021 1 LINE 72 10 PAGE UM WSG JULY 23, 1983 12:21:48 0 Program to downline load a Merit/UMnet Secondary Communications Processor (SCP). This program is run by the sigfile for userid SCP. It reads data from the file SCP:SCPTABLE (642/23) which tells it from which files to load the SCP. It also writes the name of the SCP into the file SCP:DATELIST (not distributed) for subsequent reading by the SCP SETDATE program (642/26). After a successful reload, it also starts MTS *SDT (642/24) which will read the SCP name from SCP:DATELIST and set the time and date in the SCP after it is up and running. 0 Referenced by comments of: 642/23, 642/24 00642/022C MERIT UTILITIES SCPLOAD OE G SCP:SCPLOAD(1,999) 5.1T1 791 MERIT_UTILITIES.SCPLOAD.OE.022 1 LINE 4978 3 PAGE UM WSG JULY 23, 1983 12:21:50 00642/023C MERIT UTILITIES SCP TABLE D SCP:SCPTABLE 5.1T1 792 MERIT_UTILITIES.SCP_TABLE.D.023 1 LINE 80 3 PAGE UM WSG JULY 23, 1983 12:21:51 0 File containing a list of all UMnet SCPs and the names of the load files from which they are to be reloaded by SCPLOAD (642/21). 0 Referenced by comments of: 642/21 00642/024C MERIT UTILITIES *SDT C *SDT 5.1T1 793 MERIT_UTILITIES.?SDT.C.024 1 LINE 25 1 PAGE UM WSG JULY 23, 1983 12:21:51 0 Command file started by SCPLOAD (642/21) to run the SCP SETDATE program (642/26) to set the time and date in an SCP after it has been reloaded. 0 Referenced by comments of: 642/21, 642/25 00642/025C MERIT UTILITIES SYS:SDT C SYS:SDT 5.1T1 794 MERIT_UTILITIES.SYS:SDT.C.025 1 LINE 29 1 PAGE UM WSG JULY 23, 1983 12:21:52 0 Command file sourced to by *SDT (642/24) which runs SCP SETDATE (642/26). 00642/026C MERIT UTILITIES SCP SETDATE SG G WSG:SETDATE.SG 5.1T1 795 MERIT_UTILITIES.SCP_SETDA.SG.026 1 LINE 91 1 PAGE UM WSG JULY 23, 1983 12:21:52 0 GOM program which sets the time and date for SCPs whose names it finds in SCP:DATELIST. 0 Referenced by comments of: 642/21, 642/24, 642/25 1 SUN SEP 08/96 15:24:55 Page 408 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00642/027C MERIT UTILITIES SCP SETDATE OE G SCP:SETDATE 5.1T1 796 MERIT_UTILITIES.SCP_SETDA.OE.027 1 LINE 1450 1 PAGE UM WSG JULY 23, 1983 12:21:52 00642/028 MERIT UTILITIES TNTH SA O S1559 5.0T2 VLO FSNAME=MERIT_UTILITIES.TNTH.SA.021(1) 926 5.0T2 926 MERIT_UTILITIES.TNTH.SA.021 1 LINE 80 24 PAGE UM WSG APR. 07, 1977 21:50:14 5.0T5 371 0 Test program and BATCHDSR subroutine to receive network batch jobs. Assemble with PAR=B. 00642/029 MERIT UTILITIES TNTH OC O MNET:TNTH 5.0T2 927 MERIT_UTILITIES.TNTH.OC.022 1 LINE 80 4 PAGE UM WSG JULY 03, 1981 16:50:45 5.0T5 372 00642/030 MERIT UTILITIES THTN SA G S1559 5.0T2 VLO FSNAME=MERIT_UTILITIES.THTN.SA.023(1) 928 5.0T2 928 MERIT_UTILITIES.THTN.SA.023 1 LINE 80 7 PAGE UM WSG MAR. 03, 1977 12:42:11 5.0T5 373 0 Test program to transmit network batch jobs. 00642/031 MERIT UTILITIES THTN OC G MNET:THTN 5.0T2 929 MERIT_UTILITIES.THTN.OC.024 1 LINE 80 3 PAGE UM WSG JULY 03, 1981 16:50:46 5.0T5 374 00642/032A MERIT UTILITIES CONSOLE SG G MNET:CONSOLE(1000) 5.1T1 797 MERIT_UTILITIES.CONSOLE.SG.032 1 LINE 121 10 PAGE UM STARK JULY 23, 1983 12:21:53 0 A program that can be $RUN to send commands to, and receive output from, all of the Merit communications computers. Commands used to compile may be found at the beginning. 0 Referenced by comments of: 642/34 00642/033A MERIT UTILITIES CONSOLE OE G MNET:CONSOLE(1,999) 5.1T1 798 MERIT_UTILITIES.CONSOLE.OE.033 1 LINE 7230 6 PAGE UM STARK JULY 23, 1983 12:21:53 00642/034C MERIT UTILITIES CONSOLE WF G W542:CONSOLE.F(1) 5.1T1 799 MERIT_UTILITIES.CONSOLE.WF.034 1 LINE 71 3 PAGE UM STARK JULY 23, 1983 12:21:53 0 Documentation for (642/32). 00643/001A PAGLOAD SA G MTA:PAGLOAD(1000) 5.1T1 800 PAGLOAD..SA.001 1 LINE 70 5 PAGE UM MTA JULY 23, 1983 12:21:54 MTA.:PAGLOAD 0 A VARIABLE PAGING LOAD GENERATOR. ALSO CHECKS FOR CORRECT PAGES. A DESCRIPTION OF THE PARAMETERS IS IN THE SOURCE. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 196/1, 643/3 00643/002A PAGLOAD OC G MTA:PAGLOAD(1,999) 5.1T1 801 PAGLOAD..OC.002 1 LINE 80 3 PAGE UM MTA JULY 23, 1983 12:21:55 1 SUN SEP 08/96 15:24:55 Page 409 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00643/003 PAGLOAD *PAG C *PAG 5.0T2 934 PAGLOAD.*PAG.C.003 1 LINE 70 1 PAGE UM MTA JULY 03, 1981 16:50:51 5.0T5 379 *PAG 0 COMMAND FILE USED TO RUN THE PAGLOAD PROGRAM (643/1) TO GENERATE AN ARTIFICIAL PAGE LOAD. INVOKED BY ENTERING "MTS *PAG" ON THE OPERATORS CONSOLE. 00644/001 DISK SPACE # (OBSOLETE) D4T2 978 DISK_SPACE..SA.001 1 LINE 72 3 PAGE UBC JULY 28, 1977 21:47:24 0 Obsoleted by *DSK (073). 00645/001 UBCDSECTS SA # (OBSOLETE) D3.2T2 48 UBCDSECTS..SA. 1 LINE 71 1 PAGE UBC MAR. 21, 1975 02:21:05 0 In COPY:MTS.MACROS (344/3) 0 Referenced by comments of: 821/10 00646/001 SYSTEM DOCUMENTATION LECTURE 1 WF MTS:LECTURE1 5.0T2 935 SYSTEM_DOCUMENTATION.LECT.WF.001 1 LINE 153 8 PAGE UM MTS JULY 03, 1981 16:50:52 5.0T5 380 0 FORMAT SOURCE FOR LECTURE 1 OF THE MTS SYSTEMS LECTURES AS UPDATED TO RELECT D4 MTS (AT LEAST AS VIEWED BY DON). 00646/002C SYSTEM DOCUMENTATION SYS LEC TAPES # (AVAILABLE UPON REQUEST) UM SWEET 0 This is the audio tapes of 33 system lectures given by the UM staff during 1973. Copies of the tapes are available from UM upon request. 00646/003 SYSTEM DOCUMENTATION VOL 99 PGM SG G S1559 5.0T2 VLO FSNAME=SYSTEM_DOCUMENTATION.VOL.SG.002(1) 936 5.0T2 936 SYSTEM_DOCUMENTATION.VOL.SG.002 1 LINE 97 9 PAGE UM MTS JULY 03, 1981 16:50:53 5.0T5 381 0 A PROGRAM TO IMPLEMENT THE FINDING AND EXTRACTION OF SYSTEM INTERNAL DOCUMENTATION BASED ON THE CLASSIFICATION SCHEME PREVIOUSLY PUBLISHED IN THE MTS NEWSLETTER, NO. 37, PP. 113-119. WHEN RUN WITHOUT ANY PARAMETER, IT WILL ASK FOUR QUESTIONS VIA SERCOM/GUSER. OUTPUT FROM THE PROGRAM IS WRITTEN ON SPRINT. IT MAY ALSO BE RUN WITH A PAR= GIVING THE ANSWERS TO THE QUESTIONS SEPARATED BY COMMAS WITH MISSING ITEMS ASSUMED TO BE "ALL". IN EITHER PROMPT OR PAR= MODE, ADDITIONAL INFORMATION MAY BE SUPPLIED TO BYPASS THE REMAINING QUESTIONS. THE QUESTIONS ARE: 1. "PRINT CLASSIFICATION, DOCUMENTS, OR BOTH" RESPONSE: "C" FOR CLASSIFICATION ONLY, "D" FOR DOCUMENTS ONLY, OR "B" FOR BOTH; OR TO CONTROL PRINTING MORE PRECISELY, "C=(C|X)(U)(D)(V)" WHERE, WITH PARENS REPRESENTING OPTIONS, C MEANS PRINT CLASSIFICATION INFO, X IS SAME AS C BUT PRINTS ONLY IF THERE IS DOCUMENT INFO, U MEANS PRINT USAGE INFO, D MEANS PRINT DOCUMENT INFO, V MEANS PRINT VERSION INFO; OR 1 SUN SEP 08/96 15:24:55 Page 410 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 "(D|C)=", OR "(D|C)= ", OR "(D|C)=" 2. "GIVE CLASSIFICATION NUMBER" RESPONSE: "ALL" OR A NULL LINE, OR N OR N1-N2, WHERE N IS A CLASSIFICATION NUMBER NNN.(N(N)) 3. "ENTER USAGE NUMBER" RESPONSE: "ALL" OR A NULL LINE, /N, WHERE N IS A USAGE NUMBER, OR "?" TO GET A DESCRIPTION OF USAGE NUMBERS 4. "ENTER OTHER INFO" RESPONSE: ONE OR MORE OF THE FOLLOWING: "ALL" OR A NULL LINE, MM-DD-YY TO GET ENTRIES SINCE THE SPECIFIED DATE, D=NNNN TO GET A SPECIFIC DOCUMENT, OR V=(NNN|LAST) TO GET A SPECIFIC VERSION OR THE MOST RECENT THE DEFAULT FOR THE VERSION IS "ALL" IF CLASSIFICATION INFORMATION IS BEING OBTAINED, "LAST" IF DOCUMENTS ARE BEING EXTRACTED. 00646/004 SYSTEM DOCUMENTATION VOL 99 PGM OC G SYS:VOLUME99 5.0T2 937 SYSTEM_DOCUMENTATION.VOL.OC.003 1 LINE 80 13 PAGE UM MTS JULY 03, 1981 16:50:59 5.0T5 382 0 HAS EMBEDDED FILE NAMES FOR "SYS:INTCLASS" (646/5) AND "SYS:INTDOCDATA" (646/6). 00646/005 SYSTEM DOCUMENTATION VOL 99 CLASS D SYS:INTCLASS 5.0T2 938 SYSTEM_DOCUMENTATION.VOL.D.004 1 LINE 101 4 PAGE UM MTS JULY 03, 1981 16:51:00 5.0T5 383 0 DATA FILE CONTAINING THE CLASSIFICATION INFORMATION AND INFORMATION ABOUT THE DOCUMENTS. LINES NUMBERS IN THIS FILE ARE IMPORTANT; HAS NEGATIVE LINE NUMBERS. 0 Referenced by comments of: 646/4, 646/6 00646/006 SYSTEM DOCUMENTATION VOL 99 DOC D SYS:INTDOCDATA 5.0T2 939 SYSTEM_DOCUMENTATION.VOL.D.005 1 LINE 190 240 PAGE UM MTS JULY 03, 1981 16:51:01 5.0T5 384 0 THE "STANDARD FILE" FOR CONTAINING DOCUMENTATION; POINTED TO BY (646/5). DOCUMENTATION MAY ALSO BE IN OTHER FILES. NOTE: THIS FILE IS CURRENTLY VERY INCOMPLETE. 0 Referenced by comments of: 646/4 00646/007 SYSTEM DOCUMENTATION PROTECTION WF S1559 5.0T2 VLO FSNAME=SYSTEM_DOCUMENTATION.PROT.WF.006(1) 940 5.0T2 940 SYSTEM_DOCUMENTATION.PROT.WF.006 1 LINE 183 14 PAGE UM MTS JULY 28, 1977 21:48:18 5.0T5 385 0 DOCUMENTATION ON MTS PROTECTION OF INFORMATION IN FILES AND VM. THIS IS A PAPER PRESENTED AT THE IEEE SYMPOSIUM ON COMPUTER SECURITY AND INTEGRITY, AT THE (U.S.) NATIONAL BUREAU OF STANDARDS, MAY 1977, BY GARY PIRKOLA AND JOHN SANGUINETTI. 1 SUN SEP 08/96 15:24:55 Page 411 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00647/001A TASKSTAT SUBR SA G MTS:TASKSTAT(1000) 5.1T1 802 TASKSTAT_SUBR..SA.001 1 LINE 73 11 PAGE UM MTS STERKEN JULY 23, 1983 12:21:55 0 Re-entrant subroutine to return state of an active task as follows: CALL TASKSTAT,(JOBTABLE,CODE,INFO,PSW,DESC) JOBTABLE contains a pointer to guess what. CODE will contain a fullword integer describing the state of the task: 0 = READY 10 = DORMANT (NO CPU Q) 20 = SNARKED (MTS/TMTS ONLY) 1 = PAGE WAIT 11 = JOBSA WAIT 21 = UNUSED AT UM 2 = DASD I/O WAIT 12 = CMDSTA WAIT GETSEG WAIT AT UBC 3 = OTHER I/O WAIT (ÂDASD) 13 = OPER WAIT 22 = WAYTSUBR 4 = TIME WAIT 14 = INACTIVE JOB TABLE SLEEPSUB 5 = SVC LOCK WAIT 15 = DASD GTUNIT WAIT WAYTRTN 6 = GTUNIT WAIT (ÂDASD) 16 = HASP WAYT SLEEPRTN 7 = FILE WAIT 17 = INTERTASK WAIT 23 = UNUSED AT UM 8 = UNKNOWN WAYT 18 = INTERTASK BUSY HASP Q AT UBC 9 = IDLE 19 = UNUSED INFO will contain a fullword value depending on code. for codes 0 and 1: INFO = 0 -> NEUTRAL, 1 -> PRIV, 2 -> NON-PRIV for codes 2, 3, 6, 15: INFO = DEVICE LIST POINTER for code 5: INFO = LOCK NUMBER for codes 8, 16: INFO = WAYT FLAG for other codes: INFO = 0 PSW will contain the right half of the PSW if there is one, otherwise zero. DESC will contain a 12-byte ready-to-print description of the current state. Called by TASKS JOB (019), SSRTN (413/1), LOADCLAS (540/8), THE 3270 DSR %ACTIVITY COMMAND (629/4), PWCT PGM (540/26), and GTUNIT (540/17). The %activity command calls an alternate entry point named PREVSTAT, which requires an additional parameter (SA) which is a save area containing the task's GR0, GR1, and GR2 for the next lower local CPU queue level and uses the fourth parameter (PSW) as an inpur rather than an outpur argument. Copies COPY:LLMPSEQU (087), *CNFGINFODSECT (654), COPY:GLOBALS (1026/3), and COPY:JOBSTA (413/9). Assemble using COPY:SETPARM (653). 0 Referenced by comments of: 400/1, 413/1, 540/8, 540/17, 806/1 00647/002A TASKSTAT SUBR OC G # (PART OF RESIDENT SYSTEM) UM MTS STERKEN 0 Object part of Resident System (468). 00648/001A EDITOR PMF PROJ FILE D G EDIT:EDITPROJ 5.1T1 803 EDITOR.PMF_PROJ_FILE.D.001 1 LINE 198 6 PAGE UM D BODWIN JULY 23, 1983 12:21:56 0 This component is the MTS context Editor with pattern matching and variables. The modules in this component must be assembled with *ASMH (737) (*ASMG will give warning messages). The following components are required to assemble the Editor: COPY:ED.MACROS (648/19) *SYSMAC (225/1) COPY:MTS.MACROS (344/3) OLD:CC.MACROS (1054/4) 1 SUN SEP 08/96 15:24:55 Page 412 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 *GDINFODSECT (594/1) *CNFGINFODSECT (654/1) The following components are used for listing enhancements, and are not strictly required, but are referred to by the commands generated by various PMF procedures. *PEXIT (775) UNSP:VERLAB (812) The following additional components are required to run the Editor: MTS Macro Low-level symbol table routines (802/26) Low level Virtual File routines, now Pistled separately but still considered part of the Editor. Resident translate and translate and test tables (779/2) Screen Support Routines (811) ******************************************************************** This subcomponent is the PMF project file for the Editor. It contains procedures to assemble the pieces of the Editor, as well as various miscellaneous procedures. 0 Referenced by comments of: 812/1 00648/002A EDITOR CLS SA G EDIT:EDIT/BAS 5.1T1 804 EDITOR.CLS.SA.002 1 LINE 72 47 PAGE UM D BODWIN JULY 23, 1983 12:21:59 0 This subcomponent is the Main routine for the Editor. It acquires and initializes the global storage, processes attention and program interrupts, prints error messages, parses commands and modifiers, and calls the various parse and execute routines. This is the base source as of MTS Workshop 8. 0 Referenced by comments of: 648/27, 648/36 00648/003A EDITOR CLS UC G EDIT:EDIT/UPD 5.1T1 805 EDITOR.CLS.UC.003 1 LINE 72 6 PAGE UM D BODWIN JULY 23, 1983 12:22:01 0 *Cdupdate input to produce the current source. 00648/004A EDITOR CLS SA G EDIT:EDIT/CUR 5.1T1 806 EDITOR.CLS.SA.004 1 LINE 81 52 PAGE UM D BODWIN JULY 23, 1983 12:22:01 0 Result of applying updates to base source. 00648/005A EDITOR CMNDS A TO E SA G EDIT:CMDPNE1/BAS 5.1T1 807 EDITOR.CMNDS_A_TO_E.SA.005 1 LINE 72 38 PAGE UM D BODWIN JULY 23, 1983 12:22:04 0 This subcomponent contains the command parse and execute routines for Editor commands beginning with A through E. 1 SUN SEP 08/96 15:24:55 Page 413 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This is the base source as of MTS Workshop 8. 00648/006A EDITOR CMNDS A TO E UC G EDIT:CMDPNE1/UPD 5.1T1 808 EDITOR.CMNDS_A_TO_E.UC.006 1 LINE 69 3 PAGE UM D BODWIN JULY 23, 1983 12:22:05 0 *Cdupdate input to produce the current source 00648/007A EDITOR CMNDS A TO E SA G EDIT:CMDPNE1/CUR 5.1T1 809 EDITOR.CMNDS_A_TO_E.SA.007 1 LINE 80 38 PAGE UM D BODWIN JULY 23, 1983 12:22:05 0 Result of applying updates to base source. 00648/008A EDITOR CMNDS F TO M SA G EDIT:CMDPNE2/BAS 5.1T1 810 EDITOR.CMNDS_F_TO_M.SA.008 1 LINE 72 34 PAGE UM D BODWIN JULY 23, 1983 12:22:07 0 This subcomponent contains the command parse and execute routines for Editor commands beginning with F through M. This is the base source as of MTS Workshop 8. 0 Referenced by comments of: 648/30 00648/009A EDITOR CMNDS F TO M UC G EDIT:CMDPNE2/UPD 5.1T1 811 EDITOR.CMNDS_F_TO_M.UC.009 1 LINE 68 3 PAGE UM D BODWIN JULY 23, 1983 12:22:08 0 *Cdupdate input to produce the current source. 00648/010A EDITOR CMNDS F TO M SA G EDIT:CMDPNE2/CUR 5.1T1 812 EDITOR.CMNDS_F_TO_M.SA.010 1 LINE 80 35 PAGE UM D BODWIN JULY 23, 1983 12:22:09 0 Result of applying updates to base source. 00648/011A EDITOR CMNDS N TO Z SA G EDIT:CMDPNE3/BAS 5.1T1 813 EDITOR.CMNDS_N_TO_Z.SA.011 1 LINE 72 31 PAGE UM D BODWIN JULY 23, 1983 12:22:10 0 This subcomponent contains the command parse and execute routines for Editor commands beginning with N through Z, excluding Visual Mode commands. This is the base source as of MTS Workshop 8. 00648/012A EDITOR CMNDS N TO Z UC G EDIT:CMDPNE3/UPD 5.1T1 814 EDITOR.CMNDS_N_TO_Z.UC.012 1 LINE 69 3 PAGE UM D BODWIN JULY 23, 1983 12:22:12 0 *Cdupdate input to produce the current source. 00648/013A EDITOR CMNDS N TO Z SA G EDIT:CMDPNE3/CUR 5.1T1 815 EDITOR.CMNDS_N_TO_Z.SA.013 1 LINE 82 32 PAGE UM D BODWIN JULY 23, 1983 12:22:12 0 Results of applying updates to base source. 1 SUN SEP 08/96 15:24:55 Page 414 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00648/014 EDITOR EST SUBR SA G S1559 5.0T2 VLO FSNAME=EDITOR.EST_SUBR.SA.004(1) 944 5.0T2 944 EDITOR.EST_SUBR.SA.004 1 LINE 80 6 PAGE UM D BODWIN JUNE 30, 1977 12:31:56 5.0T5 389 0 This subcomponent contains the line number insertion estimation routine used by the Editor, *OBJUTIL, and *MACUTIL. It is used to calculate the largest "nice" increment that may be used to insert a specified number of lines between two existing lines. 0 Referenced by comments of: 721/1, 738/1, 738/3 00648/015A EDITOR EXPRESSIONS SA G EDIT:EXPRTNS/BAS 5.1T1 816 EDITOR.EXPRESSIONS.SA.015 1 LINE 72 12 PAGE UM D BODWIN JULY 23, 1983 12:22:13 0 This subcomponent contains the predefined variable routines and the beginning of an expression parser added in anticipation of MTS conditional commands. This is the base source as of MTS Workshop 8. 00648/016A EDITOR EXPRESSIONS UC G EDIT:EXPRTNS/UPD 5.1T1 817 EDITOR.EXPRESSIONS.UC.016 1 LINE 68 1 PAGE UM D BODWIN JULY 23, 1983 12:22:14 0 *Cdupdate input to produce the current source. 00648/017A EDITOR EXPRESSIONS SA G EDIT:EXPRTNS/CUR 5.1T1 818 EDITOR.EXPRESSIONS.SA.017 1 LINE 72 12 PAGE UM D BODWIN JULY 23, 1983 12:22:14 0 Result of applying updates to base source. 00648/018A EDITOR I/O SUPPORT SA G EDIT:EDIORTNS/BAS 5.1T1 819 EDITOR.I/O_SUPPORT.SA.018 1 LINE 72 48 PAGE UM D BODWIN JULY 23, 1983 12:22:15 0 This subcomponent contains the Editor File Independent I/O routines. Aliases for these routines are defined by a COM record in the Editor CLS interface. These routines may be called by user-supplied intermediate I/O routines when the Editor is called as a subroutine. This is the base source as of MTS Workshop 8. 00648/019A EDITOR I/O SUPPORT UC G EDIT:EDIORTNS/UPD 5.1T1 820 EDITOR.I/O_SUPPORT.UC.019 1 LINE 68 1 PAGE UM D BODWIN JULY 23, 1983 12:22:16 0 *Cdupdate input to produce the current source. 0 Referenced by comments of: 648/1 00648/020A EDITOR I/O SUPPORT SA G EDIT:EDIORTNS/CUR 5.1T1 821 EDITOR.I/O_SUPPORT.SA.020 1 LINE 72 48 PAGE UM D BODWIN JULY 23, 1983 12:22:16 0 Result of applying updates to base source. 1 SUN SEP 08/96 15:24:55 Page 415 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00648/021A EDITOR PATTERN SA G EDIT:PATTERN/BAS 5.1T1 822 EDITOR.PATTERN.SA.021 1 LINE 73 69 PAGE UM D BODWIN JULY 23, 1983 12:22:18 0 This subcomponent contains the Editor Pattern Matching routines. This is the base source as of MTS Workshop 8. 00648/022A EDITOR PATTERN UC G EDIT:PATTERN/UPD 5.1T1 823 EDITOR.PATTERN.UC.022 1 LINE 68 1 PAGE UM D BODWIN JULY 23, 1983 12:22:21 0 *Cdupdate input to produce the current source. 00648/023A EDITOR PATTERN SA G EDIT:PATTERN/CUR 5.1T1 824 EDITOR.PATTERN.SA.023 1 LINE 73 69 PAGE UM D BODWIN JULY 23, 1983 12:22:21 0 Result of applying updates to base source. 00648/024A EDITOR PRIMITIV PARSE SA G EDIT:PRPARSE/BAS 5.1T1 825 EDITOR.PRIMITIV_PARSE.SA.024 1 LINE 72 46 PAGE UM D BODWIN JULY 23, 1983 12:22:23 0 This subcomponent contains the Editor's primitive parsing routines. This is the base source as of MTS Workshop 8. 00648/025A EDITOR PRIMITIV PARSE UC G EDIT:PRPARSE/UPD 5.1T1 826 EDITOR.PRIMITIV_PARSE.UC.025 1 LINE 70 1 PAGE UM D BODWIN JULY 23, 1983 12:22:25 0 *Cdupdate input to produce the current source. 00648/026A EDITOR PRIMITIV PARSE SA G EDIT:PRPARSE/CUR 5.1T1 827 EDITOR.PRIMITIV_PARSE.SA.026 1 LINE 78 46 PAGE UM D BODWIN JULY 23, 1983 12:22:25 0 Result of applying updates to base source. 00648/027A EDITOR SUBROUTINES SA G EDIT:SUBRTNS/BAS 5.1T1 828 EDITOR.SUBROUTINES.SA.027 1 LINE 72 55 PAGE UM D BODWIN JULY 23, 1983 12:22:27 0 This subcomponent contains the common Editor subroutines. It was formerly a part of the Editor Main (648/2). This is the base source as of MTS Workshop 8. 00648/028A EDITOR SUBROUTINES UC G EDIT:SUBRTNS/UPD 5.1T1 829 EDITOR.SUBROUTINES.UC.028 1 LINE 70 1 PAGE UM D BODWIN JULY 23, 1983 12:22:29 0 *Cdupdate input to produce the current source. 00648/029A EDITOR SUBROUTINES SA G EDIT:SUBRTNS/CUR 5.1T1 830 EDITOR.SUBROUTINES.SA.029 1 LINE 80 55 PAGE UM D BODWIN JULY 23, 1983 12:22:29 0 Result of applying updates to base source. 1 SUN SEP 08/96 15:24:55 Page 416 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00648/030A EDITOR VIRTUAL FILES SA G EDIT:VFRTNS.S 5.1T1 831 EDITOR.VIRTUAL_FILES.SA.030 1 LINE 71 15 PAGE UM D BODWIN JULY 23, 1983 12:22:31 0 This subcomponent contains the Editor Virtual File routines, a set of routines which are used like line files, but use VM for storage. The calling sequences are similar to those used within the Editor to access the I/O support (648/8). Note: At UM, these routines are separately loaded by Pistle, since they are called by the MTS Macro Processor High-level virtual file routines. 00648/031A EDITOR VIRTUAL FILES OC G SEG2:VFRTNS 5.1T1 832 EDITOR.VIRTUAL_FILES.OC.031 1 LINE 2450 4 PAGE UM D BODWIN JULY 23, 1983 12:22:32 SEG2:VFRTNS 00648/032A EDITOR VISUAL CMND SA G EDIT:VISUAL/BAS 5.1T1 833 EDITOR.VISUAL_CMND.SA.032 1 LINE 72 35 PAGE UM D BODWIN JULY 23, 1983 12:22:33 0 This subcomponent contains the command parse and execute routines for the Editor's Visual Mode. This is the base source as of MTS Workshop 8. 00648/033A EDITOR VISUAL CMND UC G EDIT:VISUAL/UPD 5.1T1 834 EDITOR.VISUAL_CMND.UC.033 1 LINE 73 9 PAGE UM D BODWIN JULY 23, 1983 12:22:34 0 *Cdupdate input to produce the current source. 00648/034A EDITOR VISUAL CMND SA G EDIT:VISUAL/CUR 5.1T1 835 EDITOR.VISUAL_CMND.SA.034 1 LINE 82 40 PAGE UM D BODWIN JULY 23, 1983 12:22:35 0 Result of applying updates to base source. 00648/035A EDITOR CLS INTERFACE SA G EDIT:EDITCLS.S 5.1T3 342 EDITOR.CLS_INTERFACE.SA.035 1 LINE 72 4 PAGE UM D BODWIN AUG. 20, 1983 19:47:13 0 This subcomponent is the CLS interface for the MTS $EDIT command. It is called using the CLSPLAN calling conventions, and it in turn sets up to call the resident EDIT subroutine. It is responsible for parsing off any file name or one-shot command. Note: This subcomponent PUNCHES the COM card needed by PISTLE. However, since the assembler can only punch 80 characters, it is punched it two pieces, which must be concatenated before the resulting file will load properly. 0 Referenced by comments of: 648/36 00648/036A EDITOR OBJECT OC G *CLSED 5.1T1 836 EDITOR.OBJECT.OC.036 1 LINE 19482 183 PAGE UM D BODWIN JULY 23, 1983 12:22:36 *CLSED 0 This subcomponent is the file loaded into shared VM by PISTLE at IPL. It contains the object for subcomponents (648/2) through (648/35), in *OBJUTIL format. 1 SUN SEP 08/96 15:24:55 Page 417 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 648/44 00648/037A EDITOR MACROS SM G EDIT:MACROS/BAS 5.1T1 837 EDITOR.MACROS.SM.037 1 LINE 72 41 PAGE UM D BODWIN JULY 23, 1983 12:22:42 0 This subcomponent contains macros and COPY sections used by the Editor. This is the base source as of MTS Workshop 8. 00648/038A EDITOR MACROS UC G EDIT:MACROS/UPD 5.1T1 838 EDITOR.MACROS.UC.038 1 LINE 83 3 PAGE UM D BODWIN JULY 23, 1983 12:22:44 0 *Cdupdate to produce the current macro library. 00648/039A EDITOR MACROS SM G COPY:ED.MACROS 5.1T1 839 EDITOR.MACROS.SM.039 1 LINE 79 42 PAGE UM D BODWIN JULY 23, 1983 12:22:44 0 Current macro library. 0 Referenced by comments of: 802/29 00648/040A EDITOR ETC:EDEXPLAIN M ETC.:EDEXPLAIN 5.1T3 343 EDITOR.ETC:EDEXPLAIN.M.040 1 LINE 72 62 PAGE UM D BODWIN AUG. 20, 1983 19:47:15 ETC:EDEXPLAIN 0 This subcomponent contains the text used by the Editor's EXPLAIN command. This is the version brought to MTS Workshop 8 on the UBC tape. 00648/041 EDITOR EXPLAIN GEN SA G EDIT:EXPLAINGEN(1,999) 5.0T2 956 EDITOR.EXPLAIN_GEN.SA.016 1 LINE 83 3 PAGE UM D BODWIN AUG. 06, 1981 04:15:15 5.0T5 401 0 This subcomponent is the source for the program that generates the directory at the front of the explain command text file. Works like *MACGEN (293/1) except that there is an extra field which contains ending line numbers. EXPLAINGEN takes ETC:EDEXPLAIN(1000) (648/42) as SCARDS and produces the directory on SPUNCH, which should be assigned to ETC:EDEXPLAIN(1,999). 00648/042 EDITOR EXPLAIN GEN OC G EDIT:EXPLAINGEN(1000) 5.0T2 957 EDITOR.EXPLAIN_GEN.OC.017 1 LINE 80 2 PAGE UM D BODWIN AUG. 06, 1981 04:15:16 5.0T5 402 0 Referenced by comments of: 648/41 00648/043A EDITOR *ED PROGRAM SA G EDIT:EDCALLER.S 5.1T3 344 EDITOR.?ED_PROGRAM.SA.043 1 LINE 73 3 PAGE UM D BODWIN AUG. 20, 1983 19:47:18 0 This subcomponent is a program that calls the EDIT subroutine. It is useful for debugging the Editor. 1 SUN SEP 08/96 15:24:55 Page 418 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00648/044A EDITOR *ED PROGRAM OE G EDIT:ED 5.1T3 345 EDITOR.?ED_PROGRAM.OE.044 1 LINE 964 2 PAGE UM D BODWIN AUG. 20, 1983 19:47:19 0 Contains a "$CONTINUE WITH EDIT:CLSED" the contents of which are used to test new versions of *CLSED (648/36). 00648/045A EDITOR CHANGES WX EDIT:ED.CHANGES.W 5.1T1 840 EDITOR.CHANGES.WX.045 1 LINE 82 17 PAGE UM D BODWIN JULY 23, 1983 12:22:45 0 This subcomponent contains a list of changes made to the Editor since it was last distributed. Contains commands at the front to generate output in -PRINT. 00649/001 SNOBOLTIDY SA G STID S1153 UNSP VLO FSNAME=SNOBOLTIDY.S 5.0T2 961 SNOBOLTIDY..SA.001 1 LINE 80 9 PAGE UM UNSP SEP. 30, 1975 11:00:41 5.0T5 406 0 A SNOBOL4 SOURCE TIDYING PROGRAM WHICH ESTABLISHES A CORRESPONDENCE BETWEEN MTS LINE NUMBERS AND THE INTERNAL STATEMENT NUMBERS USED BY THE COMPILERS. 00649/002 SNOBOLTIDY OE G UNSP:SNOBOLTIDY 5.0T2 962 SNOBOLTIDY..OE.002 1 LINE 1382 3 PAGE UM UNSP JULY 03, 1981 16:54:06 5.0T5 407 UNSP:SNOBOLTIDY 00649/003 SNOBOLTIDY WF S1153 UNSP VLO FSNAME=SNOBOLTIDY.FMT 5.0T2 963 SNOBOLTIDY..WF.003 1 LINE 82 1 PAGE UM UNSP SEP. 15, 1980 16:43:39 5.0T5 408 00650/001A BJPMOD SA G S1568 OGDEN2 FSNAME=BJPMOD.S 5.1T1 841 BJPMOD..SA.001 1 LINE 72 4 PAGE UM OGDEN DEC. 07, 1981 03:43:02 0 SUBROUTINE CALLED BY SSRTN (413/1) TO DYNAMICALLY ADJUST THE SUPERVISOR PAGING PARAMETERS BASED ON THE SYSTEM LOAD. COPIES COPY:JOBSTA (413/9), AND COPY:BJPDSCT (650/3). 0 Referenced by comments of: 45/15, 413/1, 540/10 00650/002A BJPMOD OC G # (PART OF RESIDENT SYSTEM) UM OGDEN 0 Object part of Resident System (468). 00650/003 BJPMOD BJP DSECT SA G COPY:BJPDSCT 5.0T4 424 BJPMOD.BJP_DSECT.SA.003 1 LINE 69 1 PAGE UM OGDEN AUG. 09, 1981 23:50:52 5.0T10 328 COPY:BJPDSCT 0 DSECT FOR SUPERVISOR'S BIG JOB PARAMETER VECTOR. 0 Referenced by comments of: 413/1, 540/10, 577/1, 650/1 00651/001A RATES RATEFILEFMT SA G RTFL S0027 DISTRB FSNAME=RATEFILEFMT 5.1T1 842 RATES.RATEFILEFMT.SA.001 1 LINE 80 2 PAGE UM ENGLE AUG. 26, 1982 11:40:26 0 DESCRIBES MTS RATE LINES IN *RATEFILE. 1 SUN SEP 08/96 15:24:55 Page 419 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 651/5 00651/002A RATES RATEFILEFMT UC G S0027 DISTRB FSNAME=RATEFILEFMTUPD 5.1T1 843 RATES.RATEFILEFMT.UC.002 1 LINE 72 1 PAGE UM ENGLE AUG. 26, 1982 11:40:38 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00651/003A RATES COPY:RATEVEC SA G RATE COPY:RATEVEC 5.1T1 844 RATES.COPY:RATEVEC.SA.003 1 LINE 80 3 PAGE UM ENGLE JULY 23, 1983 12:22:49 COPY:RATEVEC 0 DSECT COPIED UNDER THE NAME "COPY:RATEVEC" TO DESCRIBE "RATEVEC" IN SHARED VM AND THE INFORMATION RETURNED BY GETRATES (651/11). 0 Referenced by comments of: 71/1, 104/22, 344/1, 615/15, 631/8, 632/1, 632/4, 651/11, 651/17, 708/1 00651/004C RATES COPY:RATEVEC UC G S0027 DISTRB FSNAME=RATEVECUPD 5.1T1 845 RATES.COPY:RATEVEC.UC.004 1 LINE 72 1 PAGE UM ENGLE AUG. 26, 1982 11:44:48 0 Updates source from previous regular distribution to current one. 00651/005A RATES RATEGEN SA G RGEN S0027 DISTRB FSNAME=RATEGEN 5.1T1 846 RATES.RATEGEN.SA.005 1 LINE 80 56 PAGE UM ENGLE AUG. 26, 1982 11:46:44 0 PROGRAM TO GENERATE *RATEFILE (651/10). EACH LINE IN *RATEFILE IS PRODUCED BY A MACRO EXPANSION. CONSEQUENTLY, MACRO CALLS MUST BE CHANGED OR ADDED AND THE PROGRAM REASSEMBLED FOR EACH CHANGE IN THE RATES. COPIES RATEFILEFMT (651/1). 0 Referenced by comments of: 651/10 00651/006A RATES RATEGEN OC G S0027 DISTRB FSNAME=RGEN 5.1T1 847 RATES.RATEGEN.OC.006 1 LINE 80 38 PAGE UM ENGLE AUG. 26, 1982 11:47:11 00651/007A RATES RATEPRNT SA G RPRT S0027 DISTRB FSNAME=RATEPRNT 5.1T1 848 RATES.RATEPRNT.SA.007 1 LINE 80 4 PAGE UM ENGLE AUG. 26, 1982 11:53:25 0 PROGRAM TO PRINT THE CONTENTS OF *RATEFILE. RATE LINES ARE PRINTED AS IF THEY FORMED A COLUMN MAJOR MATRIX CONTAINING 3 ROWS. 00651/008C RATES RATEPRNT UC G S0027 DISTRB FSNAME=RATEPRNTUPD 5.1T1 849 RATES.RATEPRNT.UC.008 1 LINE 57 1 PAGE UM ENGLE AUG. 26, 1982 11:53:32 0 Updates source from previous regular distribution to current one. 00651/009A RATES RATEPRNT OC G S0027 DISTRB FSNAME=RPRT 5.1T1 850 RATES.RATEPRNT.OC.009 1 LINE 80 1 PAGE UM ENGLE AUG. 26, 1982 11:53:36 00651/010A RATES *RATEFILE D G MTS:TST.RATEFILE 5.1T1 851 RATES.?RATEFILE.D.010 1 LINE 199 2 PAGE UM ENGLE JULY 23, 1983 12:22:53 *RATEFILE 0 FILE USED BY MTS AND BILLING FOR CHARGE RATES. DOES NOT AGREE WITH DISTRIBUTED VERSION OF RATEGEN (651/5)-- HAS EXTRA CHEAP RATES (FREE). 1 SUN SEP 08/96 15:24:55 Page 420 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 326/1, 651/5, 651/11 00651/011A RATES GETRATES SA G MTSS:GETRATES(1,999) 5.1T1 852 RATES.GETRATES.SA.011 1 LINE 67 4 PAGE UM MTS BURLING JULY 23, 1983 12:22:54 0 Subroutine to return rates given a rate number. This is the only program outside of the ACCOUNTING and BILLING programs which accesses *RATEFILE (651/10). Copies COPY:RATEVEC (651/3). 0 Referenced by comments of: 71/1, 651/3 00651/012A RATES GETRATES OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00651/013 RATES RATENBR D5 MAS SA G S1561 5.0T4 VLO FSNAME=RATES.RATENBR_D5_MAS.SA.011(1) 425 5.0T4 425 RATES.RATENBR_D5_MAS.SA.011 1 LINE 80 8 PAGE UM MTS BURLING AUG. 09, 1981 23:50:55 5.0T10 329 0 Subroutine to compute the appropriate rate number for the current job. Copies COPY:GLOBALS (1026/3), COPY:LLMPSEQU(100) (087), and *CNFGINFODSECT (654). Assemble using COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4), COPY:SETPARM (653/1) and with PAR=PEXIT=*PEXIT. 0 Referenced by comments of: 42/2, 651/20, 761/1 00651/014A RATES RATENBR UPD UC G MTSS:RNBR/UPD 5.1T1 853 RATES.RATENBR_UPD.UC.014 1 LINE 80 8 PAGE UM MTS BURLING JULY 23, 1983 12:22:54 0 *CDUPDATE input to produce current source. 00651/015A RATES RATENBR OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00651/016A RATES RATENBR COMM D G MTSS:RNBR/COM 5.1T1 854 RATES.RATENBR_COMM.D.016 1 LINE 60 1 PAGE UM MTS BURLING JULY 23, 1983 12:22:55 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 00651/017A RATES RATEVEC SA G MTSS:RATEVEC(1,999) 5.1T1 855 RATES.RATEVEC.SA.017 1 LINE 47 1 PAGE UM MTS BURLING JULY 23, 1983 12:22:55 0 Initial values for rate vector. Copies COPY:RATEVEC (651/3). ****************************************************************** Changes since D5.0: Changed because of change in accounting record format. ****************************************************************** 1 SUN SEP 08/96 15:24:55 Page 421 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00651/018A RATES RATEVEC OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00651/019 RATES DOCUMENTATION WF S1559 5.0T2 VLO FSNAME=RATES.DOCUMENTATION.WF.016(1) 974 5.0T2 974 RATES.DOCUMENTATION.WF.016 1 LINE 126 5 PAGE UM MTS BURLING SEP. 23, 1975 00:16:54 5.0T5 419 0 A writeup describing the MTS variable rates implementation. 00651/020C RATES DUMMY RATENBR SA G MTS:TST.RNBR(1,999) 5.1T3 346 RATES.DUMMY_RATENBR.SA.020 1 LINE 64 1 PAGE UM MTS BURLING AUG. 20, 1983 19:49:24 0 Dummy version of RNBRSUB (651/13) which is used on the distribution test pack to always return rate number zero (for which the rates are zero). 00651/021C RATES DUMMY RATENBR OC G # MTS:TST.RNBR(1000) UM MTS BURLING 0 This object deck is the deck called RNBR.DUMMY is the distribution RAMROD systems. 00652/001 MTS VOLUME 12 MASTER WT S1559 5.0T2 VLO FSNAME=MTS_VOLUME_12.MASTER.WT.001(1) 975 5.0T2 975 MTS_VOLUME_12.MASTER.WT.001 1 SEQ 132 108 PAGE UM MANUAL JULY 28, 1977 21:55:28 5.0T5 420 0 TEXT/360 MASTER FOR VOLUME 12 "PIL/2 IN MTS" OF THE UM MTS MANUALS, DECEMBER 1974. EDITOR: RICHARD A. SALISBURY 00652/002 MTS VOLUME 12 PRINT PT S1559 5.0T2 VLO FSNAME=MTS_VOLUME_12.PRINT.PT.002(1) 976 5.0T2 976 MTS_VOLUME_12.PRINT.PT.002 1 SEQ 132 248 PAGE UM MANUAL JULY 28, 1977 21:55:38 5.0T5 421 0 TEXT/360 PRINT FILE. 00653/001 SETPARM SM G COPY:SETPARM 5.0T2 977 SETPARM.ASMG_VERSION.SM.001 1 LINE 72 3 PAGE UM MTA AUG. 06, 1981 04:17:08 5.0T5 422 COPY:SETPARM 0 Macro library containing only the SETPARM and SETPARMH macros which generate SET statements for the COPY:GLOBALDEFS (1026/1) symbols based on the SYSPARM field given to *ASMG or *ASMH. The ASMH SETPARMH macro scans SYSPARM for NAME=tval where "NAME" is a symbol name, "t" is A, B, D, or E for SETA, SETB, SETC, or EQU assignment, and "val" is a value, possibly enclosed in quotes or parens. NAME=tval may be repeated and must be separated from previous items using a comma. For *ASMG, if a program has a SETPARM macro (after copying COPY:GLOBALS) and is assembled with PAR=SYSPARM=0001100101023UQV then additional SET statements will be generated as follows: 1 SUN SEP 08/96 15:24:55 Page 422 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 &S370 SETB 0 &OC3066 SETB 0 &CRTY SETB 0 &SIMPLEX SETB 1 &OPERJOB SETB 1 &PROT SETB 0 &AMD470 SETB 0 &BLKMPX SETB 1 &IO370 SETB 0 &NOSLT SETB 1 &OMR SETC 'NO' &JTBLPOL SETA 2 &DTBLPOL SETA 3 &INSTALL SETC 'UQV' 0 Referenced by comments of: 4/1, 5/1, 7/1, 8/1, 10/1, 42/1, 45/1, 46/1, 79/1, 135/1, 198/1, 399/1, 400/1, 464/1, 482/7, 509/1, 513/1, 531/1, 539/1, 540/1, 540/6, 577/1, 577/8, 577/11, 578/1, 634/1, 634/3, 635/1, 636/1, 637/1, 638/1, 639/1, 647/1, 651/13, 732/1, 777/1, 829/1, 1021/1, 1021/4, 1081/1, 4000/1 00654/001A *CNFGINFODSECT SA G *CNFGINFODSECT 5.1T1 856 CNFGINFODSECT..SA.001 1 LINE 72 5 PAGE UM MTA JULY 23, 1983 12:22:55 *CNFGINFODSECT 0 DSECT FOR TABLE DESCRIBING SYSTEM CONFIGURATION (E.G. CPU TYPE AND FEATURES). 0 Referenced by comments of: 1/5, 4/5, 9/1, 42/1, 46/1, 49/1, 67/27, 97/12, 101/1, 104/68, 104/158, 116/1, 135/1, 303/1, 303/6, 354/5, 360/1, 400/1, 413/1, 461/1, 482/1, 506/8, 507/2, 509/1, 513/1, 531/1, 534/3, 540/1, 540/10, 545/4, 545/15, 558/1, 559/2, 566/11, 566/26, 577/8, 600/1, 600/7, 600/34, 610/1, 621/2, 629/1, 634/1, 636/1, 638/1, 639/1, 647/1, 648/1, 651/13, 655/4, 671/3, 682/39, 682/41, 721/1, 721/11, 721/18, 729/2, 738/1, 787/5, 787/6, 787/19, 798/69, 814/4, 829/1, 1002/13, 1002/23, 1019/1, 1019/9, 1020/1, 3018/29, 3024/13 00655/001 EREP/370 DRIVER PROGRAM SA G # (SEE *VSS DRIVER PROGRAM) UM MTA 0 Source for the program to call VSS to RUN EREP. Requires *GDINFODSECT (594). This program is obtained by assembling VSS.DRIVER (1078/49) with SYSPARM=EREP. 0 Referenced by comments of: 621/8 00655/002A EREP/370 DRIVER PROGRAM OE G SYS:EREP 5.1T1 857 EREP/370.DRIVER_PROGRAM.OE.002 1 LINE 2126 3 PAGE UM MTA JULY 23, 1983 12:22:56 SYS:EREP 0 Requires ETC:VSS (1078/48) and ETC:EREPCMDS (655/3). 00655/003A EREP/370 COMMANDS C ETC:EREPCMDS 5.1T1 858 EREP/370.COMMANDS.C.003 1 LINE 67 1 PAGE UM MTA JULY 23, 1983 12:22:56 ETC:EREPCMDS 0 VSS (component 1078) commands to run EREP. Requires ETC:EREPLIB (655/6), INIT:UC3330LOG (621/14), INIT:MCFILE (577/15), ETC:CNVTEREP (655/5), and ETC:EREPLIB.580 (655/8). 1 SUN SEP 08/96 15:24:55 Page 423 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 655/2 00655/004A EREP/370 CNVTEREP SA O MTA:CNVTEREP(1,999) 5.1T1 859 EREP/370.CNVTEREP.SA.004 1 LINE 72 18 PAGE UM MTA JULY 23, 1983 12:22:57 0 Program to convert log records generated by MCHCCH (577/1), UCDISK (787/5), and UCTAPE (787/19) to a format acceptable to PM2 (820) or the IBM EREP program which is run under *VSS in MTS. Calls JVCT (674) and may call IGFC60 (589/4), IGFC70 (589/5), IGFC80 (589/6), IGFCIC, which is not distributed, or A#VCCH47 (589/8) if very old data is processed. Copies COPY:CMDAREADSECT (531/20), *GDINFODSECT (594) and *CNFGINFODSECT (654). Assemble using COPY:UC.MACROS (787/1) and MCHMAC (577/5). ******************************************************************************** D5.0C version: Changes for version 3.2 of PM2 (820). ******************************************************************************** ******************************************************************************** D5.1 version: 5.1 works with EER1400. ******************************************************************************** 00655/005A EREP/370 CNVTEREP OE O ETC:CNVTEREP 5.1T1 860 EREP/370.CNVTEREP.OE.005 1 LINE 8080 9 PAGE UM MTA JULY 23, 1983 12:22:58 ETC:CNVTEREP 0 Contains a $CONTINUE WITH MTA:470CCH+MTS:UBCDATEX+COPY:SYSDEFS record which refers to components (589/8), (674/2), and (579/3), respectively. Calls (621/10) periodically to unlock input file. 0 Referenced by comments of: 655/3, 820/10 00655/006A EREP/370 LIBRARY OV ETC:EREPLIB 5.1T1 861 EREP/370.LIBRARY.OV.006 1 LINE 18202 693 PAGE UM MTA JULY 23, 1983 12:22:59 ETC:EREPLIB 0 Object in MVS load module form for EREP, in VSS PDS format. ********************************************************************** D5.1 version: This file contains EER1400 with all the Amdahl stuff from the version 3.0 580 RMS tape and from the 8209 CONFLICT tape. The 580 stuff still doesn't really work. ************************************************************************ 0 Referenced by comments of: 655/3, 655/8 1 SUN SEP 08/96 15:24:55 Page 424 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00655/007A EREP/370 470 RMS SOURCE SA G S1403 DIV507 'RMS 6.3' POSN=MS.UPGRADE.SOURCE 5.1T1 862 EREP/370.470_RMS_SOURCE.SA.007 1 LINE 80 199 PAGE AMD MTA JULY 23, 1983 12:25:14 0 Source for the EREP modules to format 470 records. THIS MATERIAL IS COPYRIGHTED AND MAY NOT BE DISTRIBUTED TO ANY THIRD PARTY. 00655/008A EREP/370 580 LIBRARY OV B ETC:EREPLIB.580 5.1T1 863 EREP/370.580_LIBRARY.OV.008 1 LINE 7920 5 PAGE AMD MTA JULY 23, 1983 12:25:16 ETC:EREPLIB.580 0 Load module library for 11/6/82 version of IFCEO580 and IFCEI580. The ones in (655/6) don't work, at least not in MTS. THIS IS COPYRIGHTED AND MUST NOT BE GIVEN TO ANY THIRD PARTY. 0 Referenced by comments of: 655/3 00655/009 EREP/370 WRITEUP P MTA:EREPINFO 5.0T2 989 EREP/370.WRITEUP.P.012 1 LINE 70 1 PAGE UM MTA JULY 03, 1981 17:03:23 5.0T6 11 MTA:EREPINFO 0 Description of how to run EREP in MTS. 00656/001 GT40 GRAPHICS SYSTEM SYST S O S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.SYST.S.001(1) 990 5.0T2 990 GT40_GRAPHICS_SYSTEM.SYST.S.001 1 LINE 85 33 PAGE UM EADIE AUG. 12, 1976 15:57:09 5.0T6 12 0 GRAPHICS OPERATING SYSTEM FOR DEC GT40 DISPLAY. COPIES GT40 EQUS (656/2). 00656/002 GT40 GRAPHICS SYSTEM EQUS S G S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.EQUS.S.002(1) 991 5.0T2 991 GT40_GRAPHICS_SYSTEM.EQUS.S.002 1 LINE 72 1 PAGE UM EADIE APR. 03, 1975 17:27:56 5.0T6 13 0 Referenced by comments of: 656/1 00656/003 GT40 GRAPHICS SYSTEM SYST O O S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.SYST.O.003(1) 992 5.0T2 992 GT40_GRAPHICS_SYSTEM.SYST.O.003 1 LINE 55 3 PAGE UM EADIE MAY 16, 1977 17:49:15 5.0T6 14 0 HAS A "$CONTINUE WITH SBWB:LOADER RETURN" CARD TO PICK UP THE OBJECT FOR (656/4). 00656/004 GT40 GRAPHICS SYSTEM LOADER S G S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.LOAD.S.004(1) 993 5.0T2 993 GT40_GRAPHICS_SYSTEM.LOAD.S.004 1 LINE 82 3 PAGE UM EADIE AUG. 12, 1976 15:57:22 5.0T6 15 0 PROGRAM TO LOAD A DEC GT40 DISPLAY VIA TELEPHONE LINE. 0 Referenced by comments of: 656/3 1 SUN SEP 08/96 15:24:55 Page 425 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00656/005 GT40 GRAPHICS SYSTEM LOADER O G S1559 5.0T2 VLO FSNAME=GT40_GRAPHICS_SYSTEM.LOAD.O.005(1) 994 5.0T2 994 GT40_GRAPHICS_SYSTEM.LOAD.O.005 1 LINE 76 1 PAGE UM EADIE MAY 16, 1977 17:49:13 5.0T6 16 00657/001 *ASCEBCD SA G S1559 5.0T2 VLO FSNAME=ASCEBCD..SA.001(1) 995 5.0T2 995 ASCEBCD..SA.001 1 LINE 80 3 PAGE UM WSG JAN. 11, 1980 17:35:45 5.0T6 17 0 PROGRAM TO TRANSLATE ARBITRARY LENGTH RECORDS FROM ASCII TO EBCDIC USING EITHER THE MTS OR IBM ASCEBC TRANSLATE TABLE. SOURCE IN LINES 1,999. 00657/002 *ASCEBCD OC G *ASCEBCD 5.0T2 996 ASCEBCD..OC.002 1 LINE 80 1 PAGE UM WSG JULY 03, 1981 17:16:47 5.0T6 18 *ASCEBCD 00658/001 *EBCDASC SA G S1559 5.0T2 VLO FSNAME=EBCDASC..SA.001(1) 997 5.0T2 997 EBCDASC..SA.001 1 LINE 80 5 PAGE UM WSG JAN. 11, 1980 17:37:01 5.0T6 19 0 PROGRAM TO TRANSLATE ARBITRARY LENGTH RECORDS FROM EBCDIC TO ASCII USING EITHER THE MTS OR IBM ASCII TRANSLATE TABLE. SOURCE IN LINES 1,999. 00658/002 *EBCDASC OC G *EBCDASC 5.0T2 998 EBCDASC..OC.002 1 LINE 80 2 PAGE UM WSG JULY 03, 1981 17:16:49 5.0T6 20 *EBCDASC 00659/001A GOM COMPILER FTN SF G GOM:GOM.S 5.1T1 864 GOM.COMPILER_FTN.SF.001 1 LINE 103 119 PAGE UM DWB JULY 23, 1983 12:25:17 0 Compiler for "good old MAD" -- a language similar to the 7090 MAD language. This file has 75 FORTRAN modules. Source begins at lines 1000, 2000, ... 75000. "$CONTINUE WITH" files: GOM.COMMON (659/8), GOM.COMMOND (659/10), GOM.CONTAB (659/12), GOM.MATRIX (659/14), and GOM.SYMTAB (659/15). NOTE: Compiling these will produce three warning messages from the compilation of the STMTYP module, lines 31000,31999. 0 Referenced by comments of: 659/2, 659/5, 659/25, 798/39, 809/1 00659/002A GOM COMPILER FTN OC G GOM:GOM.O 5.1T1 865 GOM.COMPILER_FTN.OC.002 1 LINE 30712 171 PAGE UM DWB JULY 23, 1983 12:25:22 0 Object corresponding to (659/1), plus the object for the module whose source is in lines 1000,1999 of (659/3) since this is the only GOM module which is required. This allows checkout to be done using (659/2) + (659/6). 0 Referenced by comments of: 659/2, 659/4 00659/003A GOM COMPILER GOM SG G GOM:GOM.SG 5.1T1 866 GOM.COMPILER_GOM.SG.003 1 LINE 153 22 PAGE UM DWB JULY 23, 1983 12:25:28 0 GOM pieces of the compiler, i.e. portions of the compiler written in itself. References CNFGINFO in LCSYMBOL. "$CONTINUE WITH" files: GOM.COMMONG (659/9), 1 SUN SEP 08/96 15:24:55 Page 426 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 GOM.COMMONDG (659/11), and GOM.CONTABG (659/13). 0 Referenced by comments of: 659/2, 659/4, 659/16 00659/004A GOM COMPILER GOM OC G GOM:GOM.OG 5.1T1 867 GOM.COMPILER_GOM.OC.004 1 LINE 80 36 PAGE UM DWB JULY 23, 1983 12:25:29 0 Object corresponding to (659/3), except for the module whose source is in lines 1000,1999 of (659/3) which has its object in (659/2). 00659/005A GOM SEQUENCES SA G GOM:GOM.SEQS 5.1T1 868 GOM.SEQUENCES.SA.005 1 LINE 94 54 PAGE UM DWB JULY 23, 1983 12:25:31 0 This is not executable. The FORTRAN source pieces (659/1) treat this as a common section that is an array of halfwords. 0 Referenced by comments of: 659/6 00659/006A GOM SEQUENCES OC G GOM:GOM.SEQS.O 5.1T1 869 GOM.SEQUENCES.OC.006 1 LINE 80 40 PAGE UM DWB JULY 23, 1983 12:25:33 0 Object corresponding to (659/5). 0 Referenced by comments of: 659/2 00659/007A GOM OBJECT OE G *GOM 5.1T1 870 GOM.OBJECT.OE.007 1 LINE 32767 99 PAGE UM DWB JULY 23, 1983 12:25:35 *GOM 0 Result of running *LINKEDIT with the following commands: INCLUDE GOM.O INCLUDE GOM.SEQS.O INCLUDE GOM.SYMOPG(1000) UPDATE GOM.OG COMBINE@BC PURGE $EMPTY *GOM PUNCH *GOM NOTE: The update command in the above sequence will cause *LINKEDIT to emit a warning message to the effect that there are structural differences in the modules defining MTRXPR. This is OK. An almost all-FORTRAN version can be produced by the following *LINKEDIT commands: INCLUDE GOM.O INCLUDE GOM.SEQS.O COMBINE@BC PURGE $EMPTY *GOM PUNCH *GOM 1 SUN SEP 08/96 15:24:55 Page 427 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/008A GOM COMMON DECLAR SF G GOM:GOM.COMMON 5.1T1 871 GOM.COMMON_DECLAR.SF.008 1 LINE 71 1 PAGE UM DWB JULY 23, 1983 12:25:38 0 "$CONTINUE WITH"ed by all FORTRAN modules. Contains common definitions and common declarations. 0 Referenced by comments of: 659/1, 659/9, 659/16, 659/20 00659/009A GOM COMMON DECLAR SG G GOM:GOM.COMMONG 5.1T1 872 GOM.COMMON_DECLAR.SG.009 1 LINE 85 3 PAGE UM DWB JULY 23, 1983 12:25:38 0 GOM "copy section" equivalent to (659/8). "$CONTINUE WITH"ed by all GOM modules. 0 Referenced by comments of: 659/3, 659/16, 659/20 00659/010A GOM DEPEND DECLAR SF G GOM:GOM.COMMOND 5.1T1 873 GOM.DEPEND_DECLAR.SF.010 1 LINE 71 1 PAGE UM DWB JULY 23, 1983 12:25:38 0 "$CONTINUE WITH"ed by all modules which are character- or machine-dependent. Contains common sections and definitions. 0 Referenced by comments of: 659/1, 659/11 00659/011A GOM DEPEND DECLAR SG G GOM:GOM.COMMONDG 5.1T1 874 GOM.DEPEND_DECLAR.SG.011 1 LINE 79 1 PAGE UM DWB JULY 23, 1983 12:25:38 0 GOM equivalent of (659/10). 0 Referenced by comments of: 659/3 00659/012A GOM CON TAB DECLAR SF G GOM:GOM.CONTAB 5.1T1 875 GOM.CON_TAB_DECLAR.SF.012 1 LINE 71 1 PAGE UM DWB JULY 23, 1983 12:25:38 0 "$CONTINUE WITH"ed by those modules dealing with the constant table. Contains all definitions for constant table. 0 Referenced by comments of: 659/1, 659/13 00659/013A GOM CON TAB DECLAR SG G GOM:GOM.CONTABG 5.1T1 876 GOM.CON_TAB_DECLAR.SG.013 1 LINE 71 1 PAGE UM DWB JULY 23, 1983 12:25:39 0 GOM equivalent of (659/12). 0 Referenced by comments of: 659/3 00659/014A GOM TRIPLES TABLE SF G GOM:GOM.MATRIX 5.1T1 877 GOM.TRIPLES_TABLE.SF.014 1 LINE 38 1 PAGE UM DWB JULY 23, 1983 12:25:39 0 "$CONTINUE WITH"ed by those modules dealing with the triple table. Contains all definitions for triple table. 0 Referenced by comments of: 659/1 1 SUN SEP 08/96 15:24:55 Page 428 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/015A GOM SYM TAB DECLAR SF G GOM:GOM.SYMTAB 5.1T1 878 GOM.SYM_TAB_DECLAR.SF.015 1 LINE 69 1 PAGE UM DWB JULY 23, 1983 12:25:39 0 "$CONTINUE WITH"ed by all modules handling the symbol table. Contains all definitions for symbol table. 0 Referenced by comments of: 659/1 00659/016A GOM SYM TAB OPER SA G GOM:GOM.SYMOPG(1,999) 5.1T1 879 GOM.SYM_TAB_OPER.SA.016 1 LINE 70 4 PAGE UM DWB JULY 23, 1983 12:25:40 0 Built-in operators for GOM version of the symbol table routines in (659/3). This defines data in the common section DECOMP in (659/8) and (659/9). 00659/017A GOM SYM TAB OPER OC G GOM:GOM.SYMOPG(1000) 5.1T1 880 GOM.SYM_TAB_OPER.OC.017 1 LINE 80 13 PAGE UM DWB JULY 23, 1983 12:25:40 00659/018A GOM DATA INIT RTN SA G GOM:GOM.DIN(1,999) 5.1T1 881 GOM.DATA_INIT_RTN.SA.018 1 LINE 63 2 PAGE UM DWB JULY 23, 1983 12:25:40 0 The source for the data-initialization subroutine (entry point GOMDIN#) used in reentrant and recursive routines. This used to be generated as part of every reentrant or recursive module; it is now a separate piece, to cut the size down in cases where there are many modules, e.g. $MESSAGESYSTEM (798). 00659/019A GOM DATA INIT RTN OC G # (PART OF *LIBRARY) 4.3T1 686 GOM.DATA_INIT_RTN.OC.019 1 LINE 80 1 PAGE UM DWB APR. 05, 1980 19:35:43 4.3T3 144 0 Object part of *LIBRARY (524/1) 00659/020A GOM COPY SECT CVT SS G GOM:GOM.CONVERT 5.1T1 882 GOM.COPY_SECT_CVT.SS.020 1 LINE 70 1 PAGE UM DWB JULY 23, 1983 12:25:41 0 SNOBOL program to convert the FORTRAN copy sections (e.g. GOM.COMMON (659/8)) into the equivalent GOM copy sections (e.g. GOM.COMMONG (659/9)). 00659/021A GOM NEWS FILE P # GOM:GOMNEWS 4.3T1 687 GOM.NEWS_FILE.P.021 1 LINE 78 22 PAGE UM DWB APR. 05, 1980 19:35:47 4.3T3 145 0 Contains descriptions of recent additions to the language. 00659/022A GOM USER'S MANUAL WF GOM:GOM.MANUAL.S 5.1T1 883 GOM.USER'S_MANUAL.WF.022 1 LINE 99 59 PAGE UM MENDAL DWB JULY 23, 1983 12:25:41 0 A user's manual for GOM consisting mostly of the old 7090 MAD Manual, Chapter II with deletions, additions, and revisions for GOM. 00659/023A GOM DOCUMENTATION WF GOM:GOM.PROGWRUP 5.1T1 884 GOM.DOCUMENTATION.WF.023 1 LINE 108 4 PAGE UM DWB JULY 23, 1983 12:25:43 0 Writeup describing the structure of an object module produced by GOM. 1 SUN SEP 08/96 15:24:55 Page 429 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/024A GOM DOCUMENTATION WF GOM:GOM.LISTWRUP 5.1T1 885 GOM.DOCUMENTATION.WF.024 1 LINE 120 6 PAGE UM DWB JULY 23, 1983 12:25:43 0 Writeup describing the internals of the compiler and how to read the compiler listings. 0 Referenced by comments of: 659/25 00659/025A GOM DOCUMENTATION SS G GOM:GOM.PEEL 5.1T1 886 GOM.DOCUMENTATION.SS.025 1 LINE 74 1 PAGE UM DWB JULY 23, 1983 12:25:43 0 SNOBOL program to read through the FORTRAN source (659/1) and produce the lists of modules and what they copy that is to be attached to the end of the GOM.LISTWRUP writeup (659/24). 00659/026A GOM DOCUMENTATION P GOM:GOM.COM.DOC 5.1T1 887 GOM.DOCUMENTATION.P.026 1 LINE 70 6 PAGE UM DWB JULY 23, 1983 12:25:44 0 Contains explanation of each symbol in the GOM common sections. 00659/027A GOM READ DATA SUBR SA G GOM:GOM.RDATA(1,999) 5.1T1 888 GOM.READ_DATA_SUBR.SA.027 1 LINE 74 8 PAGE UM DWB JULY 23, 1983 12:25:44 0 Subroutine called by "READ DATA" and "READ AND PRINT DATA" statements. 00659/028A GOM READ DATA SUBR OC G # (PART OF *LIBRARY) 4.3AT1 367 GOM.READ_DATA_SUBR.OC.028 1 LINE 80 4 PAGE UM DWB OCT. 12, 1980 16:26:53 4.3AT2 30 0 Object part of *LIBRARY (524/1) 00659/029A GOM PRINT RES SUBR SA G GOM:GOM.PRSLT(1,999) 5.1T1 889 GOM.PRINT_RES_SUBR.SA.029 1 LINE 70 7 PAGE UM DWB JULY 23, 1983 12:25:44 0 Subroutine called by "PRINT RESULTS", "PRINT BCD RESULTS", and "PRINT HEX RESULTS" statements. 00659/030A GOM PRINT RES SUBR OC G # (PART OF *LIBRARY) 4.3AT1 369 GOM.PRINT_RES_SUBR.OC.030 1 LINE 80 3 PAGE UM DWB OCT. 12, 1980 16:26:56 4.3AT2 32 0 Object part of *LIBRARY (524/1) 00659/031A GOM ADAPTOR SUBR SA G GOM:GOM.ADPT 5.1T1 890 GOM.ADAPTOR_SUBR.SA.031 1 LINE 81 2 PAGE UM DWB JULY 23, 1983 12:25:45 0 An adaptor routine used with "LINKAGE=CLSMTS" routines to convert to the Coding Conventions environment. 00659/032A GOM ADAPTOR SUBR OC G # (PART OF *LIBRARY) UM DWB 0 Object part of *LIBRARY (524/1) 1 SUN SEP 08/96 15:24:55 Page 430 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/033A GOM TEST PROGRAMS C G GOM:GOM.EXAMP 5.1T1 891 GOM.TEST_PROGRAMS.C.033 1 LINE 43 1 PAGE UM DWB JULY 23, 1983 12:25:45 00659/034A GOM TEST PROGRAMS SG G DWB:TESTMAD 5.1T1 892 GOM.TEST_PROGRAMS.SG.034 1 LINE 85 6 PAGE UM DWB JULY 23, 1983 12:25:46 00659/035A GOM TEST PROGRAMS SA G GOM:GOM.PRSLT.T(1,999) 5.1T1 893 GOM.TEST_PROGRAMS.SA.035 1 LINE 50 1 PAGE UM DWB JULY 23, 1983 12:25:46 00659/036A GOM TEST PROGRAMS SG G GOM:GOM.RDATA.T 5.1T1 894 GOM.TEST_PROGRAMS.SG.036 1 LINE 37 1 PAGE UM DWB JULY 23, 1983 12:25:46 00659/037A GOM TEST PROGRAMS SG G GOM:GOM.TEST.SDS 5.1T1 895 GOM.TEST_PROGRAMS.SG.037 1 LINE 32 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/038A GOM TEST PROGRAMS SG G GOM:GOM.SIMPLE 5.1T1 896 GOM.TEST_PROGRAMS.SG.038 1 LINE 42 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/039A GOM TEST PROGRAMS SG G GOM:GOM.TEST.FN 5.1T1 897 GOM.TEST_PROGRAMS.SG.039 1 LINE 50 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/040A GOM TEST PROGRAMS SG G GOM:GOM.TEST 5.1T1 898 GOM.TEST_PROGRAMS.SG.040 1 LINE 53 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/041A GOM TEST PROGRAMS SG G GOM:GOM.TEST2 5.1T1 899 GOM.TEST_PROGRAMS.SG.041 1 LINE 41 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/042A GOM TEST PROGRAMS SG G GOM:GOM.TEST3 5.1T1 900 GOM.TEST_PROGRAMS.SG.042 1 LINE 33 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/043A GOM TEST PROGRAMS SG G GOM:GOM.TEST4 5.1T1 901 GOM.TEST_PROGRAMS.SG.043 1 LINE 45 1 PAGE UM DWB JULY 23, 1983 12:25:47 00659/044A GOM TEST PROGRAMS SG G GOM:GOM.TEST5 5.1T1 902 GOM.TEST_PROGRAMS.SG.044 1 LINE 34 1 PAGE UM DWB JULY 23, 1983 12:25:48 00659/045A GOM TEST PROGRAMS SG G GOM:GOM.TEST6 5.1T1 903 GOM.TEST_PROGRAMS.SG.045 1 LINE 30 1 PAGE UM DWB JULY 23, 1983 12:25:48 00659/046A GOM TEST PROGRAMS SG G GOM:GOM.TEST7 5.1T1 904 GOM.TEST_PROGRAMS.SG.046 1 LINE 41 1 PAGE UM DWB JULY 23, 1983 12:25:48 00659/047A GOM TEST PROGRAMS SG G GOM:GOM.TEST8 5.1T1 905 GOM.TEST_PROGRAMS.SG.047 1 LINE 30 1 PAGE UM DWB JULY 23, 1983 12:25:48 00659/048A GOM TEST PROGRAMS SG G GOM:GOM.TEST9 5.1T1 906 GOM.TEST_PROGRAMS.SG.048 1 LINE 51 1 PAGE UM DWB JULY 23, 1983 12:25:48 00659/049A GOM TEST PROGRAMS SG G GOM:GOM.TEST10 5.1T1 907 GOM.TEST_PROGRAMS.SG.049 1 LINE 24 1 PAGE UM DWB JULY 23, 1983 12:25:48 1 SUN SEP 08/96 15:24:55 Page 431 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/050A GOM TEST PROGRAMS SG G GOM:GOM.TEST11 5.1T1 908 GOM.TEST_PROGRAMS.SG.050 1 LINE 44 1 PAGE UM DWB JULY 23, 1983 12:25:49 00659/051A GOM TEST PROGRAMS SG G GOM:GOM.TEST12 5.1T1 909 GOM.TEST_PROGRAMS.SG.051 1 LINE 24 1 PAGE UM DWB JULY 23, 1983 12:25:49 00659/052A GOM TEST PROGRAMS SG G GOM:GOM.TEST13 5.1T1 910 GOM.TEST_PROGRAMS.SG.052 1 LINE 40 1 PAGE UM DWB JULY 23, 1983 12:25:49 00659/053A GOM TEST PROGRAMS SG G GOM:GOM.TEST14 5.1T1 911 GOM.TEST_PROGRAMS.SG.053 1 LINE 46 1 PAGE UM DWB JULY 23, 1983 12:25:49 00659/054A GOM TEST PROGRAMS SG G GOM:GOM.TEST15 5.1T1 912 GOM.TEST_PROGRAMS.SG.054 1 LINE 62 1 PAGE UM DWB JULY 23, 1983 12:25:49 00659/055A GOM TEST PROGRAMS SG G GOM:GOM.TEST16 5.1T1 913 GOM.TEST_PROGRAMS.SG.055 1 LINE 46 1 PAGE UM DWB JULY 23, 1983 12:25:50 00659/056A GOM TEST PROGRAMS SG G GOM:GOM.TEST17 5.1T1 914 GOM.TEST_PROGRAMS.SG.056 1 LINE 45 1 PAGE UM DWB JULY 23, 1983 12:25:50 00659/057A GOM TEST PROGRAMS SG G GOM:GOM.TEST18 5.1T1 915 GOM.TEST_PROGRAMS.SG.057 1 LINE 52 1 PAGE UM DWB JULY 23, 1983 12:25:50 00659/058A GOM TEST PROGRAMS SG G GOM:GOM.TEST19 5.1T1 916 GOM.TEST_PROGRAMS.SG.058 1 LINE 53 1 PAGE UM DWB JULY 23, 1983 12:25:50 00659/059A GOM TEST PROGRAMS SG G GOM:GOM.TEST20 5.1T1 917 GOM.TEST_PROGRAMS.SG.059 1 LINE 54 1 PAGE UM DWB JULY 23, 1983 12:25:50 00659/060A GOM TEST PROGRAMS SG G GOM:GOM.TEST21 5.1T1 918 GOM.TEST_PROGRAMS.SG.060 1 LINE 56 1 PAGE UM DWB JULY 23, 1983 12:25:51 00659/061A GOM TEST PROGRAMS SG G GOM:GOM.TEST22 5.1T1 919 GOM.TEST_PROGRAMS.SG.061 1 LINE 41 1 PAGE UM DWB JULY 23, 1983 12:25:51 00659/062A GOM TEST PROGRAMS SG G GOM:GOM.TEST23 5.1T1 920 GOM.TEST_PROGRAMS.SG.062 1 LINE 33 1 PAGE UM DWB JULY 23, 1983 12:25:51 00659/063A GOM TEST PROGRAMS SG G GOM:GOM.TEST24 5.1T1 921 GOM.TEST_PROGRAMS.SG.063 1 LINE 35 1 PAGE UM DWB JULY 23, 1983 12:25:51 00659/064A GOM TEST PROGRAMS SG G GOM:GOM.TEST25 5.1T1 922 GOM.TEST_PROGRAMS.SG.064 1 LINE 31 1 PAGE UM DWB JULY 23, 1983 12:25:51 00659/065A GOM TEST PROGRAMS SG G GOM:GOM.TEST26 5.1T1 923 GOM.TEST_PROGRAMS.SG.065 1 LINE 57 1 PAGE UM DWB JULY 23, 1983 12:25:52 00659/066A GOM TEST PROGRAMS SG G GOM:GOM.TEST27 5.1T1 924 GOM.TEST_PROGRAMS.SG.066 1 LINE 26 1 PAGE UM DWB JULY 23, 1983 12:25:52 1 SUN SEP 08/96 15:24:55 Page 432 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/067A GOM TEST PROGRAMS SG G GOM:GOM.TEST28 5.1T1 925 GOM.TEST_PROGRAMS.SG.067 1 LINE 70 1 PAGE UM DWB JULY 23, 1983 12:25:52 00659/068A GOM TEST PROGRAMS SG G GOM:GOM.TEST29 5.1T1 926 GOM.TEST_PROGRAMS.SG.068 1 LINE 34 1 PAGE UM DWB JULY 23, 1983 12:25:52 00659/069A GOM TEST PROGRAMS SG G GOM:GOM.TEST30 5.1T1 927 GOM.TEST_PROGRAMS.SG.069 1 LINE 67 1 PAGE UM DWB JULY 23, 1983 12:25:52 00659/070A GOM TEST PROGRAMS SG G GOM:GOM.TEST31 5.1T1 928 GOM.TEST_PROGRAMS.SG.070 1 LINE 62 1 PAGE UM DWB JULY 23, 1983 12:25:53 00659/071A GOM TEST PROGRAMS SG G GOM:GOM.TEST32 5.1T1 929 GOM.TEST_PROGRAMS.SG.071 1 LINE 58 1 PAGE UM DWB JULY 23, 1983 12:25:53 00659/072A GOM TEST PROGRAMS SG G GOM:GOM.TEST33 5.1T1 930 GOM.TEST_PROGRAMS.SG.072 1 LINE 66 1 PAGE UM DWB JULY 23, 1983 12:25:53 00659/073A GOM TEST PROGRAMS SG G GOM:GOM.TEST34 5.1T1 931 GOM.TEST_PROGRAMS.SG.073 1 LINE 140 1 PAGE UM DWB JULY 23, 1983 12:25:53 00659/074A GOM TEST PROGRAMS SG G GOM:GOM.TEST35 5.1T1 932 GOM.TEST_PROGRAMS.SG.074 1 LINE 74 1 PAGE UM DWB JULY 23, 1983 12:25:53 00659/075A GOM TEST PROGRAMS SG G GOM:GOM.TEST36 5.1T1 933 GOM.TEST_PROGRAMS.SG.075 1 LINE 60 1 PAGE UM DWB JULY 23, 1983 12:25:54 00659/076A GOM TEST PROGRAMS SG G GOM:GOM.TEST37 5.1T1 934 GOM.TEST_PROGRAMS.SG.076 1 LINE 61 1 PAGE UM DWB JULY 23, 1983 12:25:54 00659/077A GOM TEST PROGRAMS SG G GOM:GOM.TEST38 5.1T1 935 GOM.TEST_PROGRAMS.SG.077 1 LINE 40 1 PAGE UM DWB JULY 23, 1983 12:25:54 00659/078A GOM TEST PROGRAMS SG G GOM:GOM.TEST39 5.1T1 936 GOM.TEST_PROGRAMS.SG.078 1 LINE 57 1 PAGE UM DWB JULY 23, 1983 12:25:54 00659/079A GOM TEST PROGRAMS SG G GOM:GOM.TEST40 5.1T1 937 GOM.TEST_PROGRAMS.SG.079 1 LINE 80 1 PAGE UM DWB JULY 23, 1983 12:25:54 00659/080A GOM TEST PROGRAMS SG G GOM:GOM.TEST41 5.1T1 938 GOM.TEST_PROGRAMS.SG.080 1 LINE 67 2 PAGE UM DWB JULY 23, 1983 12:25:55 00659/081A GOM TEST PROGRAMS SG G GOM:GOM.TEST42 5.1T1 939 GOM.TEST_PROGRAMS.SG.081 1 LINE 39 1 PAGE UM DWB JULY 23, 1983 12:25:55 00659/082A GOM TEST PROGRAMS SG G GOM:GOM.TEST43 5.1T1 940 GOM.TEST_PROGRAMS.SG.082 1 LINE 38 1 PAGE UM DWB JULY 23, 1983 12:25:55 00659/083A GOM TEST PROGRAMS SG G GOM:GOM.TEST44 5.1T1 941 GOM.TEST_PROGRAMS.SG.083 1 LINE 65 2 PAGE UM DWB JULY 23, 1983 12:25:55 1 SUN SEP 08/96 15:24:55 Page 433 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00659/084A GOM TEST PROGRAMS SG G GOM:GOM.TEST45 5.1T1 942 GOM.TEST_PROGRAMS.SG.084 1 LINE 44 1 PAGE UM DWB JULY 23, 1983 12:25:55 00659/085A GOM TEST PROGRAMS SG G GOM:GOM.TEST46 5.1T1 943 GOM.TEST_PROGRAMS.SG.085 1 LINE 35 1 PAGE UM DWB JULY 23, 1983 12:25:56 00659/086A GOM TEST PROGRAMS SG G GOM:GOM.TEST47 5.1T1 944 GOM.TEST_PROGRAMS.SG.086 1 LINE 56 1 PAGE UM DWB JULY 23, 1983 12:25:56 00659/087A GOM TEST PROGRAMS SG G GOM:GOM.TEST48 5.1T1 945 GOM.TEST_PROGRAMS.SG.087 1 LINE 56 1 PAGE UM DWB JULY 23, 1983 12:25:56 00659/088A GOM TEST PROGRAMS SG G GOM:GOM.TEST49 5.1T1 946 GOM.TEST_PROGRAMS.SG.088 1 LINE 58 1 PAGE UM DWB JULY 23, 1983 12:25:56 00659/089A GOM TEST PROGRAMS SG G GOM:GOM.TEST50 5.1T1 947 GOM.TEST_PROGRAMS.SG.089 1 LINE 48 1 PAGE UM DWB JULY 23, 1983 12:25:56 00659/090A GOM TEST PROGRAMS SG G GOM:GOM.TEST51 5.1T1 948 GOM.TEST_PROGRAMS.SG.090 1 LINE 60 1 PAGE UM DWB JULY 23, 1983 12:25:57 00659/091A GOM TEST PROGRAMS SG G GOM:GOM.TEST52 5.1T1 949 GOM.TEST_PROGRAMS.SG.091 1 LINE 56 1 PAGE UM DWB JULY 23, 1983 12:25:57 00659/092A GOM TEST PROGRAMS SG G GOM:GOM.TEST53 5.1T1 950 GOM.TEST_PROGRAMS.SG.092 1 LINE 80 1 PAGE UM DWB JULY 23, 1983 12:25:57 00659/093A GOM TEST PROGRAMS SG G GOM:GOM.TEST54 5.1T1 951 GOM.TEST_PROGRAMS.SG.093 1 LINE 53 1 PAGE UM DWB JULY 23, 1983 12:25:57 00659/094A GOM TEST PROGRAMS SG G GOM:GOM.TEST55 5.1T1 952 GOM.TEST_PROGRAMS.SG.094 1 LINE 43 1 PAGE UM DWB JULY 23, 1983 12:25:57 00659/095A GOM TEST PROGRAMS SG G GOM:GOM.TEST56 5.1T1 953 GOM.TEST_PROGRAMS.SG.095 1 LINE 72 1 PAGE UM DWB JULY 23, 1983 12:25:58 00659/096A GOM TEST PROGRAMS SG G GOM:GOM.TEST57 5.1T1 954 GOM.TEST_PROGRAMS.SG.096 1 LINE 36 1 PAGE UM DWB JULY 23, 1983 12:25:58 00659/097A GOM TEST PROGRAMS SG G GOM:GOM.TEST58 5.1T1 955 GOM.TEST_PROGRAMS.SG.097 1 LINE 80 7 PAGE UM DWB JULY 23, 1983 12:25:58 00659/098A GOM TEST PROGRAMS SG G GOM:GOM.TEST59 5.1T1 956 GOM.TEST_PROGRAMS.SG.098 1 LINE 35 1 PAGE UM DWB JULY 23, 1983 12:25:58 00659/099A GOM TEST PROGRAMS SG G GOM:GOM.TEST60 5.1T1 957 GOM.TEST_PROGRAMS.SG.099 1 LINE 59 1 PAGE UM DWB JULY 23, 1983 12:25:58 00660/001 MCS-11 SUPERVISOR S G FEP:SUPER 5.0T2 1093 MCS-11.SUPERVISOR.S.001 1 LINE 84 54 PAGE UM EADIE JULY 03, 1981 17:19:17 5.0T6 115 0 This is the supervisor for the Michigan Communications Systems (MCS) for the UM PDP-11 Data Concentrator Front End. The MCS components should be assembled 1 SUN SEP 08/96 15:24:55 Page 434 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 and link-edited with *PDP11ASR (686/32) and *LINK11 (516). The supervisor copies COMMON (660/6). 0 Referenced by comments of: 660/2, 660/3, 660/17 00660/002 MCS-11 DEVICES S G FEP:DEVICES 5.0T2 1094 MCS-11.DEVICES.S.002 1 LINE 85 137 PAGE UM EADIE JULY 03, 1981 17:19:22 5.0T6 116 0 This is the DEVICES csect of MCS. It contains DSR's for all devices in the system. It should be assembled after the supervisor (660/1). Copies COMMON (660/6), SUPEREXTRN (660/7), TASKSEXTRN (660/8), and CC.EBCDIC (660/9). 0 Referenced by comments of: 660/3, 660/17 00660/003 MCS-11 TASKS S G FEP:TASKS 5.0T2 1095 MCS-11.TASKS.S.003 1 LINE 174 133 PAGE UM EADIE JULY 03, 1981 17:19:32 5.0T6 117 0 This is the TASKS csect for MCS. It contains the tasks for the system. It should be assembled after the supervisor (660/1) and DEVICES (660/2). Copies COMMON (660/6), SUPEREXTRN (660/7), DEVICESEXTRN (660/10), and CC.EBCDIC (660/9). 0 Referenced by comments of: 660/17 00660/004 MCS-11 TABLES S G FEP:TABLES 5.0T2 1096 MCS-11.TABLES.S.004 1 LINE 91 50 PAGE UM EADIE JULY 03, 1981 17:19:41 5.0T6 118 0 This is the TABLES csect for MCS. It contains the translate tables for the DSR's in the system. Copies COMMON (660/6) and CC.EBCDIC (660/9). 0 Referenced by comments of: 660/17 00660/005 MCS-11 STORAGE S G FEP:STORAGE 5.0T2 1097 MCS-11.STORAGE.S.005 1 LINE 74 1 PAGE UM EADIE JULY 03, 1981 17:19:45 5.0T6 119 0 This is the STORAGE csect for MCS. It contains storage definitions for the system. 00660/006 MCS-11 COMMON S G FEP:COMMON 5.0T2 1098 MCS-11.COMMON.S.006 1 LINE 83 23 PAGE UM EADIE JULY 03, 1981 17:19:45 5.0T6 120 0 This is the copy section for many components of MCS. It, in turn, copies WHICHCONC (660/17) to set up conditional assembly parameters for Data Concentrator B, C, or D or the Remote Data Concentrator. 0 Referenced by comments of: 660/1, 660/2, 660/3, 660/4, 660/17 1 SUN SEP 08/96 15:24:55 Page 435 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00660/007 MCS-11 SUPEREXTRN S G FEP:SUPEREXTRN 5.0T2 1099 MCS-11.SUPEREXTRN.S.007 1 LINE 84 3 PAGE UM EADIE JULY 03, 1981 17:19:47 5.0T6 121 0 This is copied by several csects to get external symbols for the supervisor. 0 Referenced by comments of: 660/2, 660/3 00660/008 MCS-11 TASKSEXTRN S G FEP:TASKSEXTRN 5.0T2 1100 MCS-11.TASKSEXTRN.S.008 1 LINE 82 1 PAGE UM EADIE JULY 03, 1981 17:19:48 5.0T6 122 0 This is copied by some csects to get external symbols for TASKS. 0 Referenced by comments of: 660/2 00660/009 MCS-11 CC.EBCDIC S G FEP:CC.EBCDIC 5.0T2 1101 MCS-11.CC.EBCDIC.S.009 1 LINE 62 1 PAGE UM EADIE JULY 03, 1981 17:19:49 5.0T6 123 0 This is copied by some csects to get EQU's for EBCDIC control characters. 0 Referenced by comments of: 660/2, 660/3, 660/4 00660/010 MCS-11 DEVICESEXTRN S G FEP:DEVICESEXTRN 5.0T2 1102 MCS-11.DEVICESEXTRN.S.010 1 LINE 82 3 PAGE UM EADIE JULY 03, 1981 17:19:50 5.0T6 124 0 This is copied by csects to get external symbols for DEVICES. 0 Referenced by comments of: 660/3 00660/011 MCS-11 CBJOB C FEP:CBJOB 5.0T2 1103 MCS-11.CBJOB.C.011 1 LINE 67 1 PAGE UM EADIE JULY 03, 1981 17:19:50 5.0T6 125 0 MTS commands to assemble and linkedit MCS for Data Concentrator B. Also at line 1000 and 1001, there are two EQUs for lengths. When assembling components in order of position in memory, this allows listing addresses to match memory addresses (i.e. no relocation needed). 00660/012 MCS-11 CCJOB C FEP:CCJOB 5.0T2 1104 MCS-11.CCJOB.C.012 1 LINE 67 1 PAGE UM EADIE JULY 03, 1981 17:19:51 5.0T6 126 0 MTS commands to assemble and linkedit MCS for Data Concentrator C. Also at line 1000 and 1001, there are two EQUs for lengths. When assembling components in order of position in memory, this allows listing addresses to match memory addresses (i.e. no relocation needed). 1 SUN SEP 08/96 15:24:55 Page 436 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00660/013 MCS-11 CDJOB C FEP:CDJOB 5.0T2 1105 MCS-11.CDJOB.C.013 1 LINE 67 1 PAGE UM EADIE JULY 03, 1981 17:19:52 5.0T6 127 0 MTS commands to assemble and linkedit MCS for Data Concentrator D. Also at line 1000 and 1001, there are two EQUs for lengths. When assembling components in order of position in memory, this allows listing addresses to match memory addresses (i.e. no relocation needed). 00660/014 MCS-11 LSIJOB C FEP:LSIJOB 5.0T2 1106 MCS-11.LSIJOB.C.014 1 LINE 71 1 PAGE UM EADIE JULY 03, 1981 17:19:52 5.0T6 128 0 MTS commands to assemble and linkedit MCS for Remote Data Concentrator. Also at line 1000 and 1001, there are two EQUs for lengths. When assembling components in order of position in memory, this allows listing addresses to match memory addresses (i.e. no relocation needed). 00660/015 MCS-11 DEBUG/LOAD S G DIAG:HCOR.S 5.0T2 1107 MCS-11.DEBUG/LOAD.S.015 1 LINE 81 30 PAGE UM EADIE JULY 03, 1981 17:19:53 5.0T6 129 0 "High core" system used in front end processor for debugging and loading. description of the program is at the front of the source. Copies HCORDATA (660/16) and "WHICHCONC", which is the same as FEP:WHICHCONC (660/17). Assemble using *11ASR (515). 0 Referenced by comments of: 660/16, 660/17 00660/016 MCS-11 HCORDATA S G DIAG:HCORDATA 5.0T2 1108 MCS-11.HCORDATA.S.016 1 LINE 80 1 PAGE UM EADIE JULY 03, 1981 17:19:57 5.0T6 130 0 Copy section used by (660/15). 0 Referenced by comments of: 660/15 00660/017 MCS-11 WHICHCONC S G FEP:WHICHCONC 5.0T2 1109 MCS-11.WHICHCONC.S.017 1 LINE 19 1 PAGE UM EADIE JULY 03, 1981 17:19:58 5.0T6 131 0 This is copied by DEBUG/LOAD (660/15) and COMMON (660/6), which is copied by the supervisor (660/1), DEVICES (660/2), TASKS (660/3), and TABLES (660/4). It contains two lines: 1) a "SPACE 1" for esthetics, and 2) "&CONC SETC '?'", where ? is "CB", "CC", "CD", or "LSI". 0 Referenced by comments of: 660/6, 660/15 1 SUN SEP 08/96 15:24:55 Page 437 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00661/001 RAMP # (NO LONGER DISTRIBUTED) D4T2 1122 RAMP.RAMPINT.S.001 1 LINE 88 76 PAGE UM JUNE 02, 1976 20:33:19 0 RAMP, the operating system for the UM PDP-8 and PDP-8E Data Concentrator front ends. It was distributed for the final time on D4.0, tape 2, files 1122 through 1135. 00662/001 *3066RTN # (SEE *3270RTN) UM 0 Part of *3270RTN (629/10). 00663/001 *SIDEDATE SX O S0564 D4T2 VLO FSNAME=SIDEDATE..SX.001(1) 1138 5.0T2 1112 SIDEDATE..SX.001 1 LINE 80 10 PAGE UM SHERRY AUG. 27, 1976 20:51:39 5.0T6 134 0 PROGRAM TO COMPARE TWO *UPDATE FILES WHICH UPDATE THE SAME BASE. IT PRINTS A RECORD OF THEIR DIFFERENCES AND MERGES THE TWO TO PRODUCE A SINGLE *UPDATE FILE. IT IS WRITTEN IN EXTENDED XPL AND MUST BE COMPILED USING *EXPL. 00663/002 *SIDEDATE OC O *SIDEDATE 5.0T2 1113 SIDEDATE..OC.002 1 LINE 240 8 PAGE UM SHERRY JULY 03, 1981 17:20:27 5.0T6 135 *SIDEDATE 0 OBJECT ALSO IN *LIBRARY. HAS A "$CONTINUE WITH *EXPLIB" LINE. CONTAINS AN INCONSEQUENTIAL REP CARD. 00664/001 PASCAL/GN COMPILER SW S PASC:99PASOS01(170001,189999) 5.0T2 1114 PASCAL/GN.COMPILER.SW.001 1 LINE 100 117 PAGE UM JULY 03, 1981 17:20:28 5.0T6 136 0 OS/360 VERSION OF PASCAL COMPILER (FROM GRENOBLE) CONVERTED TO MTS. THIS COMPILER SUPPORTS A DIALECT OF PASCAL SIMILAR TO DECUS AND MDSI PASCAL. THIS SUBCOMPONENT IS THE PASCAL SOURCE FOR THE CURRENT COMPILER. 0 Referenced by comments of: 664/2 00664/002 PASCAL/GN OBJECT OE S PASC:PAS.OS 5.0T2 1115 PASCAL/GN.OBJECT.OE.002 1 LINE 32767 52 PAGE UM JULY 03, 1981 17:21:08 5.0T6 137 0 THIS FILE CONTAINS THE OBJECT FROM (664/1). THE COMPILER REQUIRES AN ERROR MESSAGE FILE NAMED PASC:PAS.OS.E, DISTRIBUTED AS (664/5). 0 Referenced by comments of: 664/5 00664/003 PASCAL/GN XREF SW G PASC:99PASOS01(100001,109999) 33 5.0T2 1116 PASCAL/GN.XREF.SW.003 1 LINE 73 5 PAGE UM JULY 03, 1981 17:21:11 5.0T6 138 0 PASCAL SOURCE FOR A CROSS-REFERENCE PROGRAM. SEE THE COMMENTS AT THE BEGINNING OF THE SOURCE FOR USAGE INSTRUCTIONS. 1 SUN SEP 08/96 15:24:55 Page 438 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 664/4 00664/004 PASCAL/GN XREF OC G PASC:99PASOS01(90001,99999) 5.0T2 1117 PASCAL/GN.XREF.OC.004 1 LINE 80 5 PAGE UM JULY 03, 1981 17:21:39 5.0T6 139 0 THIS FILE CONTAINS THE OBJECT FOR (664/3). 00664/005 PASCAL/GN ERROR MESSAGES M PASC:PAS.OS.E 5.0T2 1118 PASCAL/GN.ERROR_MESSAGES.M.005 1 LINE 79 3 PAGE UM JULY 03, 1981 17:22:06 5.0T6 140 0 ERROR MESSAGES REFERENCED BY THE COMPILER FROM THE FILE PASC:PAS.OS (664/2). LINE NUMBERS IN THIS FILE ARE IMPORTANT. 0 Referenced by comments of: 664/2 00664/006 PASCAL/GN USER MANUAL WF PASC:99PASOS01(20001,29999) 5.0T2 1119 PASCAL/GN.USER_MANUAL.WF.006 1 LINE 107 9 PAGE UM JULY 03, 1981 17:22:07 5.0T6 141 0 PASCAL/GN USER'S MANUAL CONTAINING "HOW TO USE" INFORMATION PLUS SOME INTERNAL IMPLEMENTATION NOTES. 00665/001 MTS VOLUME 14 MASTER WT S0951 MTSV14 'MTS MANUALS' POSN=NEWM9.V14 5.0T2 1120 MTS_VOLUME_14.MASTER.WT.001 1 SEQ 132 197 PAGE UM MANUAL JULY 03, 1981 17:24:35 5.0T6 142 0 TEXT/360 master for Volume 14 "360/370 Assembler Languages in MTS" of the UM MTS manuals, issued May 1983. Editor: Richard A. Salisbury 00665/002 MTS VOLUME 14 PRINT PT S0951 MTSV14 'MTS MANUALS' POSN=PRINT9.V14 5.0T2 1121 MTS_VOLUME_14.PRINT.PT.002 1 SEQ 132 375 PAGE UM MANUAL JULY 03, 1981 17:24:52 5.0T6 143 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), which is available on request. 00665/003 MTS VOLUME 14 INDEX SOURCE D S0951 MTSV14 'MTS MANUALS' POSN=V14INDEXSOU.8 5.0T2 1122 MTS_VOLUME_14.INDEX_SOURC.D.003 1 SEQ 110 4 PAGE UM MANUAL APR. 02, 1979 00:32:20 5.0T6 144 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 14. 00666/001A AMS SUBR OVERDRIVE SOU SF G AMS S1223 TAXIR8 FSNAME=AMS_OVER.S 5.1T1 958 AMS_SUBR.OVERDRIVE_SOU.SF.001 1 LINE 80 8 PAGE UM BRILL MAY 20, 1983 12:42:00 0 Source for OVERDRIVE portion of AMS subroutine package, providing dynamic array management for FORTRAN programs. This should be processed by the OVERDRIVE preprocessor (667) and then compiled using FORTRAN-H (298). For a user writeup, see MTS Volume 3 or MTS Volume 6. 1 SUN SEP 08/96 15:24:55 Page 439 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00666/002C AMS SUBR ASM SOU SA G S1223 TAXIR8 FSNAME=AMS_ASM.S 5.1T1 959 AMS_SUBR.ASM_SOU.SA.002 1 LINE 72 1 PAGE UM BRILL MAY 20, 1983 12:42:03 0 Source for the assembler portion of the AMS subroutine package. 00666/003A AMS SUBR OBJECT OC G # (PART OF *LIBRARY) UM BRILL 0 Object part of *LIBRARY (524/1) 00667/001 OVERDRIVE S* O S1559 5.0T2 VLO FSNAME=OVERDRIVE..S*.001(1) 1127 5.0T2 1127 OVERDRIVE..S*.001 1 LINE 98 49 PAGE UM SWARTZ APR. 05, 1980 20:27:38 5.0T6 149 0 A FORTRAN PREPROCESSOR WHICH IS WRITTEN IN SNOSTORM, SEE (678). USES THE SPITBOL LOAD FUNCTION TO LOAD SUBROUTINES FROM UNSP:SPITLIB. FILE CONTAINS MTS COMMANDS AT BEGINNING FOR ASSEMBLING. 0 Referenced by comments of: 551/1, 666/1, 667/2, 822/1, 822/5, 822/9, 822/13, 822/16, 822/19, 831/1 00667/002 OVERDRIVE SS O S1559 5.0T2 VLO FSNAME=OVERDRIVE..SS.002(1) 1128 5.0T2 1128 OVERDRIVE..SS.002 1 LINE 95 53 PAGE UM SWARTZ APR. 05, 1980 20:27:47 5.0T6 150 0 INTERMEDIATE SOURCE FOR *OVERDRIVE (667/3). IN SPITBOL, AS PRODUCED FROM (667/1). 00667/003 OVERDRIVE OC O *OVERDRIVE 5.0T2 1129 OVERDRIVE..OC.003 1 LINE 32767 50 PAGE UM SWARTZ JULY 03, 1981 17:27:32 5.0T6 151 *OVERDRIVE 0 HAS A "$CONTINUE WITH *SPITLIB" CARD. 0 Referenced by comments of: 667/2 00668/001A *TAXIR FLECS SOURCE SF G TAX S1223 TAXIR8 FSNAME=TAXIR10.S 5.1T1 960 TAXIR.FLECS_SOURCE.SF.001 1 LINE 80 219 PAGE UM BRILL MAY 19, 1983 14:36:34 0 Source for the FLECS portion of the Taxir information retrieval system, version 10. It should be processed by the FLECS pre-processor (673) and then compiled using FTN-H (298) with PAR=XL (to get functions LAND, LOR, LXOR, LCOMPL, SHFTR, and SHFTL compiled inline). See (668/10) for details. 0 Referenced by comments of: 500/18, 500/21, 500/32 00668/002A *TAXIR FLECS OBJECT O G S1223 TAXIR8 FSNAME=TAXIR10.O 5.1T1 961 TAXIR.FLECS_OBJECT.O.002 1 LINE 15200 60 PAGE UM BRILL MAY 19, 1983 14:37:08 0 Object for FLECS portion of Taxir, version 10. 1 SUN SEP 08/96 15:24:55 Page 440 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00668/003A *TAXIR FLECS LISTING L G S1223 TAXIR8 FSNAME=TAXIR10.LIST 5.1T1 962 TAXIR.FLECS_LISTING.L.003 1 LINE 121 153 PAGE UM BRILL MAY 19, 1983 14:37:16 0 FLECS indented listing of Taxir, version 10. (Output listing produced by FLECS.) 00668/004A *TAXIR ASM SOURCE SA G TAX S1223 TAXIR8 FSNAME=TAXIR10.AS 5.1T1 963 TAXIR.ASM_SOURCE.SA.004 1 LINE 80 26 PAGE UM BRILL MAY 19, 1983 14:37:41 0 Source for the assembly language portion of Taxir, version 10. 00668/005A *TAXIR ASM OBJECT O G S1223 TAXIR8 FSNAME=TAXIR10.AO 5.1T1 964 TAXIR.ASM_OBJECT.O.005 1 LINE 1412 3 PAGE UM BRILL MAY 19, 1983 14:37:45 0 Object for assembler portion of Taxir, version 10. 00668/006A *TAXIR *TAXIR OE G *TAXIR 5.1T1 965 TAXIR.?TAXIR.OE.006 1 SEQ 32767 49 PAGE UM BRILL JULY 23, 1983 12:29:21 *TAXIR 0 Linkedited object module for version 10 of Taxir. 00668/007A *TAXIR ETC:TAXERRORS M ETC:TAXERRORS 5.1T1 966 TAXIR.ETC:TAXERRORS.M.007 1 LINE 72 3 PAGE UM BRILL JULY 23, 1983 12:29:23 ETC:TAXERRORS 0 File of error and broadcast messages used by Taxir, version 10. This file is read @I by Taxir, so line numbers are important. The first line number is -3. The file should be permitted READ to ALL. 00668/008A *TAXIR PRIMER WF S1223 TAXIR8 FSNAME=TAXPRIMER4.F 5.1T1 967 TAXIR.PRIMER.WF.008 1 LINE 227 85 PAGE UM BRILL MAY 19, 1983 14:37:51 0 This is the Taxir Primer, MTS version, fourth edition, Feb. 1983. It is missing art work and special characters added by hand before publication. See (668/10) for details. 00668/009C *TAXIR PMF PROJECT D G S1223 TAXIR8 FSNAME=TAXIR10.PMF 5.1T1 968 TAXIR.PMF_PROJECT.D.009 1 LINE 69 3 PAGE UM BRILL MAY 19, 1983 14:39:06 0 PMF (810) project file for Taxir, version 10. 00668/010A *TAXIR INSTALL GUIDE P G S1223 TAXIR8 FSNAME=TAXIR10.INST 5.1T1 969 TAXIR.INSTALL_GUIDE.P.010 1 LINE 69 3 PAGE UM BRILL MAY 19, 1983 14:57:19 0 Installation and maintenance guide for Taxir, version 10. 0 Referenced by comments of: 668/1, 668/8 00668/011 *TAXIR USE STAT D # ETC.:TAXIRMONITOR UM BRILL ETC.:TAXIRMONITOR@E 0 THIS IS A LINE FILE USED BY TAXIR TO RECORD USAGE STATISTICS. ITS 1 SUN SEP 08/96 15:24:55 Page 441 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 CONTENTS ARE NOT DISTRIBUTED SINCE AN EMPTY LINE FILE IS ALL THAT IS INITIALLY REQUIRED. TAXIR MAY BE USED TO ANALYZE THE ACCUMULATED USAGE STATISTICS. THE FILE SHOULD BE PERMITTED WRITE TO ALL. 00669/001 MTS VOLUME 9 MASTER WT S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.MASTER.WT.001(1) 1140 5.0T2 1140 MTS_VOLUME_9.MASTER.WT.001 1 SEQ 132 114 PAGE UM MANUAL APR. 05, 1980 20:31:27 5.0T6 162 0 TEXT/360 MASTER FOR VOLUME 9 "SNOBOL 4 IN MTS" OF THE UM MTS MANUALS, SEPTEMBER 1975, UPDATED JUNE 1979. EDITOR: RICHARD A. SALISBURY 00669/002 MTS VOLUME 9 PRINT PT S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.PRINT.PT.002(1) 1141 5.0T2 1141 MTS_VOLUME_9.PRINT.PT.002 1 SEQ 132 175 PAGE UM MANUAL APR. 05, 1980 20:31:33 5.0T6 163 0 TEXT/360 PRINT FILE. 00669/003 MTS VOLUME 9 INDEX SOURCE D S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.INDEX_SOURCE.D.003(1) 1142 5.0T2 1142 MTS_VOLUME_9.INDEX_SOURCE.D.003 1 SEQ 82 5 PAGE UM MANUAL APR. 05, 1980 20:31:36 5.0T6 164 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 9 00669/004 MTS VOLUME 9 UPDATE 1 P S1559 5.0T2 VLO FSNAME=MTS_VOLUME_9.UPDATE_1.PT.004(1) 1143 5.0T2 1143 MTS_VOLUME_9.UPDATE_1.PT.004 1 LINE 108 78 PAGE UM MANUAL APR. 05, 1980 20:31:41 5.0T6 165 0 THIS IS COMPUTING CENTER MEMO 401 -- UPDATE 1 TO MTS VOLUME 9," JUNE 1979. $COPY TO A TN PRINTER USING THE @MCC MODIFIER. 00670/001 PL1LINK SA # (OBSOLETE) D4T2 1168 PL1LINK..SA.001 1 LINE 80 6 PAGE UM JULY 28, 1977 23:01:26 0 AN EXPERIMENTAL PROGRAM TO ALLOW DYNAMIC LINKING TO PL1 SUBROUTINES. 00671/001 FILE RESTORE - FAST FASTRESTORE SA G RSTR:FASTRESTORE(1000) 5.0T2 1144 FILE_RESTORE_-_FAST.FASTR.SA.001 1 LINE 72 8 PAGE UM HELFFRICH JULY 03, 1981 17:29:27 5.0T6 166 RSTR:FASTRESTORE 0 THE FAST FILE RESTORE PROGRAMS ARE USED TO RESTORE THE ENTIRE FILE SYSTEM FROM FILE SAVE TAPES, AS QUICKLY AS POSSIBLE, ON A PAGE AT A TIME BASIS, WHEN NEW DISKS ARE BEING INSTALLED OR AFTER A MAJOR DISASTER. THEY CANNOT BE USED TO CONVERT FILE FORMATS. SEE THE COMMENTS IN THE SOURCE FOR DETAILS ON USAGE. (671/1) AND (671/3) WORK WITH FILESAVE TAPES WHEN THE ONLINE FILESAVE (067/26) IS BEING USED AND THE FILESAVE DIRECTORY "FILEDIR.MAS" IS AVAILABLE TO AID IN THE RESTORATION. (671/1) CALLS THE FASTRSTR SUBROUTINE (671/3); IT TAKES A LIST OF FILES AND AN INDICATION OF WHAT IS TO BE DONE WITH EACH AS PRODUCED BY AMALGAMATE (682/40), MOUNTS AND SCANS TAPES, AND CALLS FASTRSTR TO DO THE RESTORING. ASSEMBLE WITH THE FILE SAVE MACROS (067/35). 1 SUN SEP 08/96 15:24:55 Page 442 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 671/1, 671/3, 682/39 00671/002 FILE RESTORE - FAST FASTRESTORE OC G RSTR:FASTRESTORE(1,999) 5.0T2 1145 FILE_RESTORE_-_FAST.FASTR.OC.002 1 LINE 80 5 PAGE UM HELFFRICH JULY 03, 1981 17:29:30 5.0T6 167 0 HAS A $CONTINUE WITH RSTR:FASTRSTR+COPY:SYSDEFS RECORD. 00671/003 FILE RESTORE - FAST FASTRSTR SUBR SA G FRST RSTR:FASTRSTR(1000) 5.0T2 1146 FILE_RESTORE_-_FAST.FASTR.SA.003 1 LINE 80 23 PAGE UM HELFFRICH JULY 03, 1981 17:29:32 5.0T6 168 RSTR:FASTRSTR 0 Subroutine called by (671/1) to do fast restoring. Assemble using COPY:FILE.MACROS (482/45) and the FILESAVE macros (067/35). Copies *CNFGINFODSECT (654). 0 Referenced by comments of: 671/1 00671/004 FILE RESTORE - FAST FASTRSTR SUBR OC G RSTR:FASTRSTR(1,999) 5.0T2 1147 FILE_RESTORE_-_FAST.FASTR.OC.004 1 LINE 80 6 PAGE UM HELFFRICH JULY 03, 1981 17:29:39 5.0T6 169 00672/001 *WATBOL INSTALLATION WF S1559 5.0T2 VLO FSNAME=WATBOL.INSTALLATION.WF.001(1) 1148 5.0T2 1148 WATBOL.INSTALLATION.WF.001 1 LINE 78 1 PAGE UM SWARTZ NOV. 04, 1976 22:59:17 5.0T6 170 0 UNIVERSITY OF WATERLOO WATBOL V2L0 COBOL. THE SOURCE AND OBJECT CANNOT BE DISTRIBUTED DUE TO WATERLOO RESTRICTIONS. THIS SUB-COMPONENT DESCRIBES THE WATBOL INSTALLATION PROCEDURE FOR MTS. 0 Referenced by comments of: 672/30 00672/002 *WATBOL START.S SA G S1559 5.0T2 VLO FSNAME=WATBOL.START.S.SA.002(1) 1149 5.0T2 1149 WATBOL.START.S.SA.002 1 LINE 73 1 PAGE UM SWARTZ JULY 15, 1976 03:12:34 5.0T6 171 0 AN INSTALLATION-DEPENDENT PREFIX OF ASSEMBLER GBL'S TO BE PLACED AT THE HEAD OF MOST ALL OF THE ASSEMBLER SOURCE GENERATED BY THE FOLLOWING UPDATE DECKS. 00672/003 *WATBOL END.S SA G S1559 5.0T2 VLO FSNAME=WATBOL.END.S.SA.003(1) 1150 5.0T2 1150 WATBOL.END.S.SA.003 1 LINE 12 1 PAGE UM SWARTZ JULY 15, 1976 03:14:13 5.0T6 172 0 AN ASSEMBLER END CARD TO SUFFIX ASSEMBLIES OF SOURCE GENERATED BY THE FOLLOWING UPDATE DECKS. 00672/004 *WATBOL ACCT.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.ACCT.U.UU.004(1) 1151 5.0T2 1151 WATBOL.ACCT.U.UU.004 1 LINE 83 8 PAGE UM SWARTZ FEB. 28, 1976 13:35:59 5.0T6 173 0 Referenced by comments of: 672/24 1 SUN SEP 08/96 15:24:55 Page 443 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00672/005 *WATBOL DATFX.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.DATFX.U.UU.005(1) 1152 5.0T2 1152 WATBOL.DATFX.U.UU.005 1 LINE 72 1 PAGE UM SWARTZ FEB. 28, 1976 13:36:08 5.0T6 174 00672/006 *WATBOL DEBUG.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.DEBUG.U.UU.006(1) 1153 5.0T2 1153 WATBOL.DEBUG.U.UU.006 1 LINE 72 1 PAGE UM SWARTZ FEB. 28, 1976 13:36:20 5.0T6 175 00672/007 *WATBOL EOSTA.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.EOSTA.U.UU.007(1) 1154 5.0T2 1154 WATBOL.EOSTA.U.UU.007 1 LINE 72 1 PAGE UM SWARTZ FEB. 28, 1976 13:36:36 5.0T6 176 00672/008 *WATBOL FD.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.FD.U.UU.008(1) 1155 5.0T2 1155 WATBOL.FD.U.UU.008 1 LINE 78 3 PAGE UM SWARTZ FEB. 28, 1976 13:36:48 5.0T6 177 00672/009 *WATBOL JOBJOB.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.JOBJOB.U.UU.009(1) 1156 5.0T2 1156 WATBOL.JOBJOB.U.UU.009 1 LINE 72 4 PAGE UM SWARTZ FEB. 28, 1976 13:37:06 5.0T6 178 00672/010 *WATBOL LOADR.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.LOADR.U.UU.010(1) 1157 5.0T2 1157 WATBOL.LOADR.U.UU.010 1 LINE 72 6 PAGE UM SWARTZ FEB. 28, 1976 13:37:23 5.0T6 179 00672/011 *WATBOL MAIN.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.MAIN.U.UU.011(1) 1158 5.0T2 1158 WATBOL.MAIN.U.UU.011 1 LINE 81 17 PAGE UM SWARTZ FEB. 28, 1976 13:38:08 5.0T6 180 00672/012 *WATBOL OPEN.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.OPEN.U.UU.012(1) 1159 5.0T2 1159 WATBOL.OPEN.U.UU.012 1 LINE 72 1 PAGE UM SWARTZ NOV. 04, 1976 22:58:48 5.0T6 181 00672/013 *WATBOL RINIT.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.RINIT.U.UU.013(1) 1160 5.0T2 1160 WATBOL.RINIT.U.UU.013 1 LINE 72 3 PAGE UM SWARTZ FEB. 28, 1976 13:56:43 5.0T6 182 00672/014 *WATBOL SD.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.SD.U.UU.014(1) 1161 5.0T2 1161 WATBOL.SD.U.UU.014 1 LINE 72 4 PAGE UM SWARTZ FEB. 28, 1976 13:42:42 5.0T6 183 00672/015 *WATBOL SERVICE.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.SERVICE.U.UU.015(1) 1162 5.0T2 1162 WATBOL.SERVICE.U.UU.015 1 LINE 72 1 PAGE UM SWARTZ FEB. 28, 1976 13:54:31 5.0T6 184 00672/016 *WATBOL SYSINT.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.SYSINT.U.UU.016(1) 1163 5.0T2 1163 WATBOL.SYSINT.U.UU.016 1 LINE 72 1 PAGE UM SWARTZ FEB. 28, 1976 13:54:51 5.0T6 185 00672/017 *WATBOL DIAC.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.DIAC.U.UU.017(1) 1164 5.0T2 1164 WATBOL.DIAC.U.UU.017 1 LINE 72 4 PAGE UM SWARTZ FEB. 28, 1976 13:55:19 5.0T6 186 1 SUN SEP 08/96 15:24:55 Page 444 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00672/018 *WATBOL FORMT.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.FORMT.U.UU.018(1) 1165 5.0T2 1165 WATBOL.FORMT.U.UU.018 1 LINE 72 1 PAGE UM SWARTZ FEB. 28, 1976 13:55:51 5.0T6 187 00672/019 *WATBOL IOSUP.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.IOSUP.U.UU.019(1) 1166 5.0T2 1166 WATBOL.IOSUP.U.UU.019 1 LINE 73 18 PAGE UM SWARTZ JULY 15, 1976 03:33:59 5.0T6 188 00672/020 *WATBOL RUN.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.RUN.U.UU.020(1) 1167 5.0T2 1167 WATBOL.RUN.U.UU.020 1 LINE 75 3 PAGE UM SWARTZ FEB. 28, 1976 13:57:00 5.0T6 189 00672/021 *WATBOL SORTR.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.SORTR.U.UU.021(1) 1168 5.0T2 1168 WATBOL.SORTR.U.UU.021 1 LINE 72 7 PAGE UM SWARTZ FEB. 28, 1976 13:57:18 5.0T6 190 00672/022 *WATBOL TRAC.U UU G S1559 5.0T2 VLO FSNAME=WATBOL.TRAC.U.UU.022(1) 1169 5.0T2 1169 WATBOL.TRAC.U.UU.022 1 LINE 72 3 PAGE UM SWARTZ FEB. 28, 1976 13:57:33 5.0T6 191 00672/023 *WATBOL TIME.S SA G S1559 5.0T2 VLO FSNAME=WATBOL.TIME.S.SA.023(1) 1170 5.0T2 1170 WATBOL.TIME.S.SA.023 1 LINE 71 3 PAGE UM SWARTZ JULY 15, 1976 03:12:51 5.0T6 192 0 Referenced by comments of: 672/24 00672/024 *WATBOL MACROS SM G S1559 5.0T2 VLO FSNAME=WATBOL.MACROS.SM.024(1) 1171 5.0T2 1171 WATBOL.MACROS.SM.024 1 LINE 80 16 PAGE UM SWARTZ JULY 15, 1976 03:16:17 5.0T6 193 0 MACRO LIBRARY NEEDED TO ASSEMBLE SOURCE RESULTING FROM (672/4) THRU (672/23). 00672/025 *WATBOL OBJECT OC G # S0924 WATBOL 'WATBOL ARCHIVE' FSNAME=WAT.WATBOL UM SWARTZ 0 UNLINK-EDITED OBJECT FOR WATBOL. NOT DISTRIBUTED DUE TO WATERLOO RESTRICTIONS. 00672/026 *WATBOL OBJECT OE G # *WATBOL UM SWARTZ *WATBOL@UM 0 NOT DISTRIBUTED DUE TO WATERLOO RESTRICTIONS. *WATBOL REQUIRES THE FILE "ETC:WATPGNTLOG" EXIST FOR LOGGING. 00672/027 *WATBOL LIBRARY GEN SA G S1559 5.0T2 VLO FSNAME=WATBOL.LIBRARY_GEN.SA.027(1) 1172 5.0T2 1172 WATBOL.LIBRARY_GEN.SA.027 1 LINE 80 30 PAGE UM SWARTZ JULY 15, 1976 03:15:10 5.0T6 194 0 SOURCE FOR WATBOL LIBRARY GENERATION PROGRAM. ASSEMBLE USING *SYSMAC. 1 SUN SEP 08/96 15:24:55 Page 445 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00672/028 *WATBOL LIBRARY GEN OC G *WATBOLLIBGEN 5.0T2 1173 WATBOL.LIBRARY_GEN.OC.028 1 SEQ 80 4 PAGE UM SWARTZ JULY 03, 1981 17:30:10 5.0T6 195 *WATBOLLIBGEN 00672/029 *WATBOL LIBRARY D G *WATBOLLIB 5.0T2 1174 WATBOL.LIBRARY.D.029 1 LINE 69 4 PAGE UM SWARTZ JULY 03, 1981 17:30:11 5.0T6 196 *WATBOLLIB 0 DEFAULT UM WATBOL LIBRARY. 00672/030 *WATBOL TEST PROGRAMS S G S1559 5.0T2 VLO FSNAME=WATBOL.TEST_PROGRAMS.S.030(1) 1175 5.0T2 1175 WATBOL.TEST_PROGRAMS.S.030 1 LINE 82 49 PAGE UM SWARTZ NOV. 10, 1976 20:22:05 5.0T6 197 0 TEST PROGRAM SERIES FOR WATBOL V2L0 COMPILER. SEE (672/1) FOR INSTRUCTIONS. 00673/001 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=C.FLX 5.0T2 1176 FLECS.OREGON_SOURCE.SF.001 1 LINE 80 38 PAGE UM UNSP DEC. 16, 1974 20:57.44 5.0T6 198 0 UNIVERSITY OF OREGON'S FORTRAN PREPROCESSOR. A HARDCOPY WRITEUP AND OTHER DOCUMENTATION WAS INCLUDED WITH D4. THIS COMPONENT AND THE NEXT 10 ARE THE ORIGINAL FLECS SOURCE FROM THE UNIVERSITY OF OREGON. THEY ARE REFERRED TO AS FILES 1 THROUGH 11 IN THE MTS FLECS INSTALLATION GUIDE (673/38). 0 Referenced by comments of: 668/1, 847/1 00673/002 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=C.F4 5.0T2 1177 FLECS.OREGON_SOURCE.SF.002 1 LINE 80 42 PAGE UM UNSP DEC. 16, 1974 20:59.11 5.0T6 199 0 FILE 2 00673/003 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=SC.FLX 5.0T2 1178 FLECS.OREGON_SOURCE.SF.003 1 LINE 80 16 PAGE UM UNSP DEC. 16, 1974 20:59.41 5.0T6 200 0 FILE 3 00673/004 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=SC.F4 5.0T2 1179 FLECS.OREGON_SOURCE.SF.004 1 LINE 80 8 PAGE UM UNSP DEC. 16, 1974 21:00.25 5.0T6 201 0 FILE 4 00673/005 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=M.FLX 5.0T2 1180 FLECS.OREGON_SOURCE.SF.005 1 LINE 80 22 PAGE UM UNSP DEC. 16, 1974 21:01.13 5.0T6 202 0 FILE 5 1 SUN SEP 08/96 15:24:55 Page 446 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00673/006 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=M.F4 5.0T2 1181 FLECS.OREGON_SOURCE.SF.006 1 LINE 80 24 PAGE UM UNSP DEC. 16, 1974 21:02.06 5.0T6 203 0 FILE 6 00673/007 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=A.FLX 5.0T2 1182 FLECS.OREGON_SOURCE.SF.007 1 LINE 80 14 PAGE UM UNSP DEC. 16, 1974 21:03.11 5.0T6 204 0 FILE 7 00673/008 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=A.F4 5.0T2 1183 FLECS.OREGON_SOURCE.SF.008 1 LINE 80 14 PAGE UM UNSP DEC. 16, 1974 21:03.58 5.0T6 205 0 FILE 8 00673/009 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=L.FLX 5.0T2 1184 FLECS.OREGON_SOURCE.SF.009 1 LINE 80 13 PAGE UM UNSP DEC. 16, 1974 21:04.46 5.0T6 206 0 FILE 9 00673/010 FLECS OREGON SOURCE SF O S1153 UNSP VLO FSNAME=L.F4 5.0T2 1185 FLECS.OREGON_SOURCE.SF.010 1 LINE 80 11 PAGE UM UNSP DEC. 16, 1974 21:05.45 5.0T6 207 0 FILE 10 00673/011 FLECS OREGON SOURCE SA O S1153 UNSP VLO FSNAME=ASMFLX.S 5.0T2 1186 FLECS.OREGON_SOURCE.SA.011 1 LINE 80 13 PAGE UM UNSP DEC. 16, 1974 21:06.34 5.0T6 208 0 FILE 11 00673/012 FLECS STANDALONE XLT S O FLE S1153 UNSP VLO FSNAME=F.FLECS 5.0T2 1187 FLECS.STANDALONE_XLT.S.012 1 LINE 80 49 PAGE UM UNSP AUG. 08, 1975 14:16:20 5.0T6 209 0 FILE 12 -- FLECS SOURCE FOR 3 PART MTS STANDALONE TRANSLATOR. 00673/013 FLECS STANDALONE XLT S O S1153 UNSP VLO FSNAME=S.FLECS 5.0T2 1188 FLECS.STANDALONE_XLT.S.013 1 LINE 80 46 PAGE UM UNSP AUG. 08, 1975 14:17:31 5.0T6 210 0 FILE 13 -- ASSEMBLY SOURCE AND FORTRAN TARGET FOR MTS STANDALONE TRANSLATOR. 00673/014 FLECS STANDALONE XLT OC O S1153 UNSP VLO FSNAME=O.FLECS 5.0T2 1189 FLECS.STANDALONE_XLT.OC.014 1 LINE 240 9 PAGE UM UNSP AUG. 08, 1975 14:18:07 5.0T6 211 0 FILE 14 -- OBJECT FOR MTS STANDALONE TRANSLATOR. 1 SUN SEP 08/96 15:24:55 Page 447 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00673/015 FLECS STANDALONE XLT S O FLE1 S1153 UNSP VLO FSNAME=F.FLECS.SC 5.0T2 1190 FLECS.STANDALONE_XLT.S.015 1 LINE 80 8 PAGE UM UNSP AUG. 08, 1975 14:19:03 5.0T6 212 0 FILE 15 -- FLECS SOURCE FOR STANDALONE TRANSLATOR SUPPORT ROUTINES. Contains many $CONTINUE WITH SN99:FLX RETURN records, which refer to (673/24). 00673/016 FLECS STANDALONE XLT S O S1153 UNSP VLO FSNAME=S.FLECS.SC 5.0T2 1191 FLECS.STANDALONE_XLT.S.016 1 LINE 80 11 PAGE UM UNSP AUG. 08, 1975 14:20:41 5.0T6 213 0 FILE 16 -- ASSEMBLY SOURCE AND FORTRAN TARGET FOR STANDALONE TRANSLATOR SUPPORT ROUTINES. 00673/017 FLECS STANDALONE XLT OC O S1153 UNSP VLO FSNAME=O.FLECS.SC 5.0T2 1192 FLECS.STANDALONE_XLT.OC.017 1 LINE 244 5 PAGE UM UNSP AUG. 08, 1975 14:22:01 5.0T6 214 0 FILE 17 -- OBJECT FOR STANDALONE TRANSLATOR SUPPORT ROUTINES. 00673/018 FLECS STANDALONE XLT OE O S1153 UNSP VLO FSNAME=FLECS 5.0T2 1193 FLECS.STANDALONE_XLT.OE.018 1 SEQ 24628 9 PAGE UM UNSP AUG. 08, 1975 14:22:37 5.0T6 215 0 FILE 18 -- LINKEDITED OBJECT FOR MTS STANDALONE TRANSLATOR. 00673/019 FLECS STANDALONE XLT SF O FLE2 S1153 UNSP VLO FSNAME=COM.FLECS 5.0T2 1194 FLECS.STANDALONE_XLT.SF.019 1 LINE 80 2 PAGE UM UNSP AUG. 08, 1975 14:23:26 5.0T6 216 0 FILE 19 -- COMMON SECTIONS USED BY STANDALONE TRANSLATOR. 00673/020 FLECS FLX WRITEUP WF S1153 UNSP VLO FSNAME=F.FFIWR 5.0T2 1195 FLECS.FLX_WRITEUP.WF.020 1 LINE 244 16 PAGE UM UNSP OCT. 08, 1978 22:53:11 5.0T6 217 0 FILE 20 -- FORMAT SOURCE FOR THE FLX MTS INTERFACE WRITEUP. 00673/021 FLECS NOTES P S1153 UNSP VLO FSNAME=FLECS.NOTES 5.0T2 1196 FLECS.NOTES.P.021 1 LINE 63 1 PAGE UM UNSP MAY 22, 1977 17:34:48 5.0T6 218 0 NOTES DESCRIBING THE CHANGES BETWEEN THIS VERSION AND THE PREVIOUS REDISTRIBUTION. 00673/022 FLECS USER'S MANUAL WF S1153 UNSP VLO FSNAME=FLECS.F 5.0T2 1197 FLECS.USER'S_MANUAL.WF.022 1 LINE 183 13 PAGE UM UNSP SEP. 15, 1980 16:42:54 5.0T6 219 00673/023C FLECS SUPLMENTAL DOC # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the documentation to supplement the machine readable documentation for the FLECS FORTRAN preprocessor. Only hard copies of this component are distributed. 1 SUN SEP 08/96 15:24:55 Page 448 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00673/024 FLECS FLX SF O FLX S1153 UNSP VLO FSNAME=COM.FLX 5.0T2 1198 FLECS.FLX.SF.023 1 LINE 80 3 PAGE UM UNSP MAY 22, 1977 17:37:47 5.0T6 220 0 FILE 23 -- FORTRAN COMMON SECTIONS USED BY FLECS/FORTRAN INTERFACE. 0 Referenced by comments of: 673/15, 673/27, 673/33 00673/025 FLECS FLX S O FLX1 S1153 UNSP VLO FSNAME=F.FLX 5.0T2 1199 FLECS.FLX.S.024 1 LINE 80 50 PAGE UM UNSP MAY 22, 1977 17:40:01 5.0T6 221 0 FILE 24 -- FLECS SOURCE FOR FLXT TRANSLATOR. 0 Referenced by comments of: 673/28 00673/026 FLECS FLX S O FLX2 S1153 UNSP VLO FSNAME=F.FLX.SC 5.0T2 1200 FLECS.FLX.S.025 1 LINE 80 8 PAGE UM UNSP MAY 22, 1977 17:41:16 5.0T6 222 0 FILE 25 -- FLECS SOURCE FOR FFI/FLXT INTERFACE. 0 Referenced by comments of: 673/29 00673/027 FLECS FLX SA O FLX3 S1153 UNSP VLO FSNAME=S.FLX.AU 5.0T2 1201 FLECS.FLX.SA.026 1 LINE 80 26 PAGE UM UNSP MAY 22, 1977 17:46:03 5.0T6 223 0 FILE 26 -- ASSEMBLY SOURCE FOR FLXT UTILITY ROUTINES. COPIES FLX FORTRAN COMMON SECTIONS (673/24) AND FLX MACROS (673/32). 0 Referenced by comments of: 673/30 00673/028 FLECS FLX OC O S1153 UNSP VLO FSNAME=O.FLX 5.0T2 1202 FLECS.FLX.OC.027 1 LINE 9072 8 PAGE UM UNSP MAY 22, 1977 17:44:12 5.0T6 224 0 FILE 27 -- OBJECT FOR F.FLX (673/25). 00673/029 FLECS FLX OC O S1153 UNSP VLO FSNAME=O.FLX.SC 5.0T2 1203 FLECS.FLX.OC.028 1 LINE 1004 4 PAGE UM UNSP MAY 22, 1977 17:45:02 5.0T6 225 0 FILE 28 -- OBJECT FOR F.SC (673/26). 00673/030 FLECS FLX OC O S1153 UNSP VLO FSNAME=O.FLX.AU 5.0T2 1204 FLECS.FLX.OC.029 1 LINE 80 3 PAGE UM UNSP MAY 22, 1977 17:43:04 5.0T6 226 0 FILE 29 -- OBJECT FOR S.AU (673/27). 1 SUN SEP 08/96 15:24:55 Page 449 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00673/031 FLECS FLX OE O UNSP:FLXT 5.0T2 1205 FLECS.FLX.OE.030 1 LINE 11124 11 PAGE UM UNSP JULY 03, 1981 17:31:38 5.0T6 227 UNSP:FLXT 0 FILE 30 -- LINKEDITED OBJECT FOR FLXT, THE TRANSLATOR THAT RUNS UNDER FFI. 00673/032 FLECS FLX SA O FLX2 S1153 UNSP VLO FSNAME=FLXDEF 5.0T2 1206 FLECS.FLX.SA.031 1 LINE 80 8 PAGE UM UNSP MAY 22, 1977 17:41:57 5.0T6 228 0 FILE 31 -- MACROS AND COPY SECTIONS. 0 Referenced by comments of: 673/27, 673/33 00673/033 FLECS FLX SA O FFI S1153 UNSP VLO FSNAME=S.FFI 5.0T2 1207 FLECS.FLX.SA.032 1 LINE 80 77 PAGE UM UNSP OCT. 08, 1978 22:50:10 5.0T6 229 0 FILE 32 -- ASSEMBLY SOURCE FOR FFI. COPIES FLX FORTRAN COMMON SECTIONS (673/24) AND FLX MACROS (673/32). 00673/034 FLECS FLX OC O S1153 UNSP VLO FSNAME=O.FFI 5.0T2 1208 FLECS.FLX.OC.033 1 LINE 1956 12 PAGE UM UNSP OCT. 08, 1978 22:51:01 5.0T6 230 00673/035 FLECS FLX OE O UNSP:FLX 5.0T2 1209 FLECS.FLX.OE.034 1 LINE 1956 6 PAGE UM UNSP JULY 03, 1981 17:31:45 5.0T6 231 UNSP:FLX 0 FILE 34 -- LINKEDITED OBJECT FOR FFI. LINKS TO FLXT AND *FORTRANG OR *FORTRANH. 00673/036 FLECS EXAMPLE 1 S S FEX1 S1153 UNSP VLO FSNAME=DRKEXAMPLE 5.0T2 1210 FLECS.EXAMPLE_1.S.035 1 LINE 80 25 PAGE UM UNSP DEC. 09, 1976 22:36:39 5.0T6 232 0 FILE 35 -- EXAMPLE FLECS PROGRAMS. 00673/037 FLECS EXAMPLE 2 S S FEX2 S1153 UNSP VLO FSNAME=HBGEXAMPLE 5.0T2 1211 FLECS.EXAMPLE_2.S.036 1 LINE 80 14 PAGE UM UNSP JAN. 21, 1976 15:16:56 5.0T6 233 0 FILE 36 -- EXAMPLE FLECS PROGRAM. 00673/038 FLECS INSTALLATION WF S1153 UNSP VLO FSNAME=FLECSINSTALL.F 5.0T2 1212 FLECS.INSTALLATION.WF.037 1 LINE 145 12 PAGE UM UNSP MAY 22, 1977 17:33:57 5.0T6 234 0 FILE 37 -- FORMAT SOURCE FOR THE MTS FLECS INSTALLATION GUIDE. 0 Referenced by comments of: 673/1 1 SUN SEP 08/96 15:24:55 Page 450 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00674/001 JVCT SUBR SA G S0811 REBATE 'REBATES' FSNAME=UBCDATE 5.0T2 1213 JVCT_SUBR..SA.001 1 LINE 72 10 PAGE UBC HOGG LIFT NOV. 28, 1977 20:58:00 5.0T6 235 0 SUBROUTINE TO CONVERT FREE FORM TIME AND DATE FROM BCD TO MTS STANDARD INTERNAL TIME, I.E. MICROSECONDS SINCE 1 MARCH 1900. SEE SOURCE FOR USAGE DESCRIPTION. 0 Referenced by comments of: 621/8, 621/9, 655/4, 707/3, 753/5, 3024/31 00674/002 JVCT SUBR OC G MTS:UBCDATEX 5.0T2 1214 JVCT_SUBR..OC.002 1 LINE 80 3 PAGE UBC HOGG LIFT JULY 03, 1981 17:31:52 5.0T6 236 MTS.:UBCDATEX 0 Referenced by comments of: 655/5 00675/001 MTS VOLUME 6 MASTER WT S1559 5.0T2 VLO FSNAME=MTS_VOLUME_6.MASTER.WT.001(1) 1215 5.0T2 1215 MTS_VOLUME_6.MASTER.WT.001 1 SEQ 132 360 PAGE UM MANUAL APR. 02, 1979 00:42:17 5.0T6 237 0 TEXT/360 MASTER FOR VOLUME 6 "FORTRAN IN MTS" OF THE UM MTS MANUALS, DECEMBER 1978. EDITOR: RICHARD A. SALISBURY 00675/002 MTS VOLUME 6 PRINT PT S1559 5.0T2 VLO FSNAME=MTS_VOLUME_6.PRINT.PT.002(1) 1216 5.0T2 1216 MTS_VOLUME_6.PRINT.PT.002 1 SEQ 132 557 PAGE UM MANUAL APR. 02, 1979 00:42:31 5.0T6 238 0 TEXT/360 PRINT FILE. 00675/003 MTS VOLUME 6 INDEX SOURCE D S1559 5.0T2 VLO FSNAME=MTS_VOLUME_6.INDEX_SOURCE.D.003(1) 1217 5.0T2 1217 MTS_VOLUME_6.INDEX_SOURCE.D.003 1 SEQ 82 6 PAGE UM MANUAL APR. 02, 1979 00:42:38 5.0T6 239 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 6. 00676/001A MTS VOLUME 8 MASTER WT S0950 MTSV8 'MTS MANUALS' POSN=NEWM3.V8 5.1T1 970 MTS_VOLUME_8.MASTER.WT.001 1 LINE 132 96 PAGE UM MANUAL JULY 23, 1983 12:32:15 0 TEXT 360 master for Volume 8 "LISP and SLIP in MTS" of the UM MTS manuals, June 1976, updated February 1979 and January 1983. Editor: Richard A. Salisbury 00676/002A MTS VOLUME 8 PRINT PT S0950 MTSV8 'MTS MANUALS' POSN=PRINT3.V8 5.1T1 971 MTS_VOLUME_8.PRINT.PT.002 1 LINE 132 169 PAGE UM MANUAL JULY 23, 1983 12:32:19 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 1 SUN SEP 08/96 15:24:55 Page 451 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00676/003 MTS VOLUME 8 INDEX SOURCE D S1559 5.0T2 VLO FSNAME=MTS_VOLUME_8.INDEX_SOURCE.D.003(1) 1220 5.0T2 1220 MTS_VOLUME_8.INDEX_SOURCE.D.003 1 SEQ 68 5 PAGE UM MANUAL APR. 02, 1979 00:43:08 5.0T6 242 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 8. 00676/004 MTS VOLUME 8 UPDATE 1 P S1559 5.0T2 VLO FSNAME=MTS_VOLUME_8.UPDATE_1.PT.004(1) 1221 5.0T2 1221 MTS_VOLUME_8.UPDATE_1.PT.004 1 LINE 106 56 PAGE UM MANUAL APR. 02, 1979 00:43:09 5.0T6 243 0 THIS IS COMPUTING CENTER MEMO 399 -- "UPDATE 1 TO MTS VOLUME 8," FEBRUARY 1979. $COPY TO A TN PRINTER USING THE @MCC MODIFIER. 00676/005C MTS VOLUME 8 UPDATE 2 P W073:TNLV8.JAN83 5.1T1 972 MTS_VOLUME_8.UPDATE_2.P.005 1 LINE 79 19 PAGE UM MANUAL JULY 23, 1983 12:32:21 0 This is "Update 2 to Volume 8," January 1983. 00677/001 *ENCRYPT SA O ENCR *ENCRYPT(1000) 5.0T2 1222 ENCRYPT..SA.001 1 LINE 80 19 PAGE UM OGDEN AUG. 06, 1981 04:25:02 5.0T6 244 *ENCRYPT 0 PROGRAM TO SCRAMBLE AND UNSCRAMBLE FILES BASED ON A SECRET KEY. ASSEMBLE WITH PAR=BATCH USING OLD:CC.MACROS (1054/4) AND COPY:MTS.MACROS (344/3). COPIES *GDINFODSECT (594). THIS IS ALSO THE SOURCE FOR THE CRYPT AND CRYPTCC SUBROUTINES IN THE RESIDENT SYSTEM. 0 Referenced by comments of: 491/1 00677/002 *ENCRYPT OE O *ENCRYPT(1,999) 5.0T2 1223 ENCRYPT..OE.002 1 LINE 5350 3 PAGE UM OGDEN AUG. 06, 1981 04:25:05 5.0T6 245 0 OBJECT FOR THE *ENCRYPT MAIN PROGRAM. 00677/003 *ENCRYPT OE O SEG2:CRYPT 5.0T2 1224 ENCRYPT..OE.003 1 LINE 1958 1 PAGE UM OGDEN AUG. 06, 1981 04:25:06 5.0T6 246 SEG2:CRYPT 0 OBJECT FOR THE CRYPT AND CRYPTCC SUBROUTINES. LOADED INTO SHARED VM AT IPL BY PISTLE. 00678/001A SNOSTORM PREPROCESSOR S* G W008:SNO.S(9) 5.1T1 973 SNOSTORM.PREPROCESSOR.S?.001 1 LINE 99 25 PAGE UM SWARTZ JULY 23, 1983 12:32:22 0 SNOSTORM is a preprocessor for the SNOBOL4 language. It augments SNOBOL4 with the structures IF, LOOP, CASE, and PROC. This subcomponent is the source for the SNOSTORM preprocessor (678/3), and is written in the SNOSTORM language. For the initial installation of SNOSTORM, this file is run through SNOSTORM and an intermediate source, (678/2), which is in SPITBOL, is produced. This subcomponent uses the LOAD function to load subroutines from UNSP:SPITLIB (590/30). 1 SUN SEP 08/96 15:24:55 Page 452 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 File contains MTS commands at beginning for compiling. ********************************************************************** D5.1 version: Additions since the last release: (1) Ada style "--" comments. (2) Additional loop options. (3) Logical expression bug fixed. ********************************************************************** 0 Referenced by comments of: 667/1, 678/2, 678/3 00678/002A SNOSTORM PREPROCESSOR SS G W008:SNO.S2 5.1T1 974 SNOSTORM.PREPROCESSOR.SS.002 1 LINE 99 18 PAGE UM SWARTZ JULY 23, 1983 12:32:25 0 THIS IS THE SOURCE FOR THE SNOSTORM PREPROCESSOR, DERIVED BY RUNNING (678/1) THROUGH SNOSTORM. THIS FILE IS IN SPITBOL, AND IS USEFUL FOR "BOOTSTRAPPING" FOR THE INITIAL INSTALLATION OF SNOSTORM. 0 Referenced by comments of: 678/1, 678/3 00678/003A SNOSTORM PREPROCESSOR OC G ETC:SNOSTORM 5.1T1 975 SNOSTORM.PREPROCESSOR.OC.003 1 LINE 32767 28 PAGE UM SWARTZ JULY 23, 1983 12:32:26 ETC:SNOSTORM 0 This is the object for the SNOSTORM preprocessor (678/1) and (678/2). it Contains a "$CONTINUE WITH *SPITLIB" (590/10) record. 0 Referenced by comments of: 678/1, 678/4 00678/004 SNOSTORM MAIN PROGRAM SA G S1559 5.0T2 VLO FSNAME=SNOSTORM.MAIN_PROGRAM.SA.004(1) 1228 5.0T2 1228 SNOSTORM.MAIN_PROGRAM.SA.004 1 LINE 73 3 PAGE UM SWARTZ APR. 05, 1980 20:32:32 5.0T6 250 0 THIS IS A SMALL MAIN PROGRAM WHICH LINKS TO THE SNOSTORM PREPROCESSOR (678/3) AND THEN TO *SPITBOL (590). 0 Referenced by comments of: 678/5 00678/005 SNOSTORM *SNOSTORM OE G *SNOSTORM 5.0T2 1229 SNOSTORM.*SNOSTORM.OE.005 1 LINE 1221 1 PAGE UM SWARTZ JULY 03, 1981 17:32:42 5.0T6 251 *SNOSTORM 0 THE OBJECT OF (678/4). 00678/006A SNOSTORM TEST PGM S* O W008:SNO.T 5.1T1 976 SNOSTORM.TEST_PGM.S?.006 1 LINE 74 3 PAGE UM SWARTZ JULY 23, 1983 12:32:27 00679/001A INTRO GUIDE: INTRO TO CC WF W599:INTRCC.SOU83 5.1T2 1 INTRO_GUIDE:_INTRO_TO_CC..WF.001 1 LINE 206 81 PAGE UM MANUAL JULY 23, 1983 12:53:42 0 FORMAT SOURCE FOR "INTRODUCTION TO COMPUTING CENTER SERVICES," SEPTEMBER 1983. 1 SUN SEP 08/96 15:24:55 Page 453 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00679/002A INTRO GUIDE: INTRO TO CC PF W599:INTRCC.OUT83 5.1T2 2 INTRO_GUIDE:_INTRO_TO_CC..PF.002 1 LINE 80 103 PAGE UM MANUAL JULY 23, 1983 12:53:47 0 FORMAT PRINT FILE. 00680/001A *CKID SA G MTS:CKID.S 5.1T2 3 CKID..SA.001 1 LINE 77 9 PAGE UBC HOGG MTA JULY 23, 1983 12:53:51 0 PROGRAM TO PROVIDE ADDITONAL SIGNON SECURITY FOR ACCOUNTS WHICH ARE SHARED BY SEVERAL USERS WITHOUT REQUIRING THAT THE PASSWORD FOR THE SHARED ACCOUNT BE CHANGED REGULARLY. COPIES *GDINFODSECT (594). REQUIRES COPY:MTS.MACROS (344/3). USES THE MTS GETACCRE ROUTINE IN USUB (638) TO READ THE ACCOUNTING FILE. ************************************************************************* D5.0B version: Now has mixed case input in the access file. ************************************************************************* 0 Referenced by comments of: 814/1 00680/002A *CKID OE G *CKID 5.1T2 4 CKID..OE.002 1 LINE 2457 4 PAGE UBC HOGG MTA JULY 23, 1983 12:53:51 *CKID 0 CONTAINS PRIVATE COPIES OF TIME SUBROUTINE SO THAT THIS PROGRAM CAN BE RUN BEFORE THE POST-IPL SYSTEM IS LOADED SINCE IT USED AT UM FOR THE CCIDS INIT, SYS, STRT, RSTR, ... 00681/001 AUDIO RESP SYS - VOTRAX INSTALLATION PT S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.I.PT.001(1) 5 5.0T3 5 AUDIO_RESP_SYS_-_VOTRAX.I.PT.001 1 LINE 100 7 PAGE UM FRONCZAK SEP. 18, 1977 22:09:36 5.0T6 257 0 INSTRUCTIONS FOR THE INSTALLATION OF THE VOTRAX AUDIO RESPONSE SYSTEM WHICH USES THE VOTRAX VS-6 SPEECH SYNTHESIZER AND "TOUCH-TONE" TELEPHONE COMMUNICATION TO PROVIDE MTS INTERACTIVE FACILITIES IN CONJUNCTION WITH THE DATA CONCENTRATOR DEVICE SUPPORT ROUTINES PDP8RTN (116). COPY TO A TN PRINTER @MCC. 0 Referenced by comments of: 116/1 00681/002 AUDIO RESP SYS - VOTRAX VTRX SA G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.V.SA.002(1) 6 5.0T3 6 AUDIO_RESP_SYS_-_VOTRAX.V.SA.002 1 LINE 81 36 PAGE UM FRONCZAK APR. 05, 1980 20:32:46 5.0T6 258 0 SUBROUTINES VTRXINIT, VTRXIN, VTRXOUT, VTRXCTRL, AND VTRXCLOS WHICH ARE CALLED BY PDP8RTN (116) TO PROCESS VOTRAX I/O AND CONTROL COMMANDS. THESE ROUTINES CALL CVTPB (681/3) AND DICTINIT, DICTADD, AND DICTLOOK (681/4) AS WELL AS REFERENCING THE VOTRAX VOCABULARY (681/10). Object part of *PDP8RTN (116/2). 1 SUN SEP 08/96 15:24:55 Page 454 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00681/003 AUDIO RESP SYS - VOTRAX CVTPB SA G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.C.SA.004(1) 7 5.0T3 7 AUDIO_RESP_SYS_-_VOTRAX.C.SA.004 1 LINE 71 3 PAGE UM FRONCZAK SEP. 18, 1977 22:09:47 5.0T6 259 0 SYMBOLIC-TO-BINARY PHONEME CODE CONVERSION ROUTINE. Object part of *PDP8RTN (116/2). 0 Referenced by comments of: 681/2, 681/5 00681/004 AUDIO RESP SYS - VOTRAX DICT SA G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.D.SA.006(1) 8 5.0T3 8 AUDIO_RESP_SYS_-_VOTRAX.D.SA.006 1 LINE 81 10 PAGE UM FRONCZAK SEP. 18, 1977 22:09:48 5.0T6 260 0 MORPH DIRECTORY MANIPULATION ROUTINES. Object part of *PDP8RTN (116/2). 0 Referenced by comments of: 681/2, 681/5 00681/005 AUDIO RESP SYS - VOTRAX RVGN SA G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.SA.008(1) 9 5.0T3 9 AUDIO_RESP_SYS_-_VOTRAX.R.SA.008 1 LINE 67 9 PAGE UM FRONCZAK SEP. 18, 1977 22:09:53 5.0T6 261 0 PROGRAM TO READ A SYMBOLIC VOCABULARY FILE, E.G. *ARUVOC (681/10), AND GENERATE ASSEMBLER INPUT WHICH, WHEN ASSEMBLED, PRODUCES AN OBJECT DECK FOR THE TREE STRUCTURE VOCABULARY. THIS PROGRAM CALLS CVTPB (681/3), DICT (681/4), RVST (681/7) AND REQUIRES *PLOTSYS (615/9). 0 Referenced by comments of: 681/9, 681/10 00681/006 AUDIO RESP SYS - VOTRAX RVGN OC G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.OC.009(1) 10 5.0T3 10 AUDIO_RESP_SYS_-_VOTRAX.R.OC.009 1 LINE 80 3 PAGE UM FRONCZAK SEP. 18, 1977 22:09:54 5.0T6 262 00681/007 AUDIO RESP SYS - VOTRAX RVST SF G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.SF.010(1) 11 5.0T3 11 AUDIO_RESP_SYS_-_VOTRAX.R.SF.010 1 LINE 71 4 PAGE UM FRONCZAK SEP. 18, 1977 22:09:55 5.0T6 263 0 SUBROUTINES TO COMPUTE, PRINT, AND PLOT VOCABULARY STATISTICS. 0 Referenced by comments of: 681/5 00681/008 AUDIO RESP SYS - VOTRAX RVST OC G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.R.OC.011(1) 12 5.0T3 12 AUDIO_RESP_SYS_-_VOTRAX.R.OC.011 1 LINE 248 5 PAGE UM FRONCZAK SEP. 18, 1977 22:09:56 5.0T6 264 00681/009 AUDIO RESP SYS - VOTRAX TREEDEF SA G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.T.SA.012(1) 13 5.0T3 13 AUDIO_RESP_SYS_-_VOTRAX.T.SA.012 1 LINE 65 2 PAGE UM FRONCZAK SEP. 18, 1977 22:09:57 5.0T6 265 0 THE OUTPUT (WHICH IS ASSEMBLER SOURCE) FROM RVGN (681/5) STARTS WITH A COPY PSEUDO-OP FOR "W070:VTREEDEF" WHICH COPIES THE INITIAL PART OF THE SOURCE. 1 SUN SEP 08/96 15:24:55 Page 455 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00681/010 AUDIO RESP SYS - VOTRAX VOCABULARY D *ARUVOC 5.0T3 14 AUDIO_RESP_SYS_-_VOTRAX.V.D.013 1 LINE 95 31 PAGE UM FRONCZAK JULY 03, 1981 17:51:57 5.0T6 266 *ARUVOC 0 MORPH SYMBOLIC DIRECTORY FOR STANDARD VOTRAX VOCABULARY WHICH, WHEN RUN THROUGH RVGN (681/5), PRODUCES THE ASSEMBLER INPUT FOR THE VOCABULARY WHICH, WHEN ASSEMBLED, YIELDS THE SHARED VM VOCABULARY OBJECT WHICH IS PART OF *PDP8RTN (116/2). 0 Referenced by comments of: 681/2, 681/5 00681/011 AUDIO RESP SYS - VOTRAX VOCAB EDITOR SF G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.V.SF.015(1) 15 5.0T3 15 AUDIO_RESP_SYS_-_VOTRAX.V.SF.015 1 LINE 70 2 PAGE UM FRONCZAK SEP. 18, 1977 22:10:01 5.0T6 267 0 VOTRAX VOCABULARY LINE FILE EDITOR WITH AURAL VERIFICATION. SEE THE SOURCE FOR USAGE DIRECTIONS. 00681/012 AUDIO RESP SYS - VOTRAX VOCAB EDITOR OC G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.V.OC.016(1) 16 5.0T3 16 AUDIO_RESP_SYS_-_VOTRAX.V.OC.016 1 LINE 254 3 PAGE UM FRONCZAK SEP. 18, 1977 22:10:02 5.0T6 268 0 CONTAINS A "$CONTINUE WITH VOTRX.CVT.O" RECORD. TO USE, EXTRACT THE CSECT CVTPB FROM *PDP8RTN (116/2) AND PLACE IT IN A FILE BY THE NAME "VOTRX.CVT.O". 00681/013 AUDIO RESP SYS - VOTRAX TALK SF G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.T.SF.017(1) 17 5.0T3 17 AUDIO_RESP_SYS_-_VOTRAX.T.SF.017 1 LINE 64 1 PAGE UM FRONCZAK SEP. 18, 1977 22:10:03 5.0T6 269 0 SYMBOLIC-TO-BINARY PHONEME CODE CONVERSION PROGRAM WITH AURAL VERIFICATION. SEE THE SOURCE FOR USAGE DIRECTIONS. 00681/014 AUDIO RESP SYS - VOTRAX TALK OC G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.T.OC.018(1) 18 5.0T3 18 AUDIO_RESP_SYS_-_VOTRAX.T.OC.018 1 SEQ 340 1 PAGE UM FRONCZAK SEP. 18, 1977 22:10:04 5.0T6 270 0 CONTAINS A "$CONTINUE WITH VOTRX.CVT.O" RECORD. TO USE, EXTRACT THE CSECT CVTPB FROM *PDP8RTN (116/2) AND PLACE IT IN A FILE BY THE NAME "VOTRX.CVT.O". 00681/015 AUDIO RESP SYS - VOTRAX DSR TEST SA G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.D.SA.019(1) 19 5.0T3 19 AUDIO_RESP_SYS_-_VOTRAX.D.SA.019 1 LINE 72 8 PAGE UM FRONCZAK APR. 02, 1979 00:45:49 5.0T6 271 0 PROGRAM TO INDEPENDENTLY TEST THE VOTRAX ROUTINES WHICH ARE CALLED BY PDP8RTN (116). SEE THE SOURCE FOR USAGE DIRECTIONS. 00681/016 AUDIO RESP SYS - VOTRAX DSR TEST OC G S1560 5.0T3 VLO FSNAME=AUDIO_RESP_SYS_-_VOTRAX.D.OC.020(1) 20 5.0T3 20 AUDIO_RESP_SYS_-_VOTRAX.D.OC.020 1 LINE 80 3 PAGE UM FRONCZAK APR. 02, 1979 00:45:50 5.0T6 272 1 SUN SEP 08/96 15:24:55 Page 456 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00681/017 AUDIO RESP SYS - VOTRAX *ARUDEF D *ARUDEF 5.0T3 21 AUDIO_RESP_SYS_-_VOTRAX.*.D.021 1 LINE 10 1 PAGE UM FRONCZAK JULY 03, 1981 17:52:05 5.0T6 273 *ARUDEF 0 PUBLIC TEXT DEFINITION FILE FOR TEXT INSERTION MODE. 00682/001A FILE SYSTEM RECOVERY DOCUMENTATION WF FILE:UBC.DISK.W 5.1T2 5 FILE_SYSTEM_RECOVERY.DOCU.WF.001 1 LINE 92 7 PAGE UM HELFFRICH JULY 23, 1983 12:53:52 FILE:UBC.DISK.W 0 THIS COMPONENT CONTAINS A COLLECTION OF REFERENCE INFORMATION AND PROGRAM DESCRIPTIONS WHICH CAN BE USED TO RECOVER FROM HARDWARE AND SOFTWARE DISK DISASTERS. (682/1) IS A WRITEUP DESCRIBING THE USAGE OF THE SEVERAL PROGRAMS AND A DESCRIPTION OF THE DISK ORGANIZATION. THE FORMAT INCLUDE FUNCTION IS USED TO REFERENCE THE VARIOUS PIECES OF THIS WRITEUP (682/2) THROUGH (682/17), (724/4), AND (546/3). 0 Referenced by comments of: 482/54, 546/3, 682/1 00682/002 FILE SYSTEM RECOVERY CCATL DESC WF FILE:CCATL.W 5.0T3 23 FILE_SYSTEM_RECOVERY.CCAT.WF.002 1 LINE 93 2 PAGE UM HELFFRICH JULY 03, 1981 17:52:07 5.0T6 275 FILE:CCATL.W 0 WRITEUP DESCRIBING THE CCATL PROGRAM (442). 0 Referenced by comments of: 442/1, 682/1 00682/003 FILE SYSTEM RECOVERY PM DESC WF FILE:PM.W 5.0T3 24 FILE_SYSTEM_RECOVERY.PM_D.WF.003 1 LINE 62 2 PAGE UBC O'REILLY HELFFRICH JULY 03, 1981 17:52:08 5.0T6 276 FILE:PM.W 0 WRITEUP DESCRIBING THE PACK MAP PROGRAM (1030). 0 Referenced by comments of: 1030/1 00682/004 FILE SYSTEM RECOVERY DSKMAN DESC WF FILE:DSKMAN.W 5.0T3 25 FILE_SYSTEM_RECOVERY.DSKM.WF.004 1 LINE 73 1 PAGE UM HELFFRICH JULY 03, 1981 17:52:09 5.0T6 277 FILE:DSKMAN.W 0 WRITEUP DESCRIBING THE DSKMAN (*DSK) PROGRAM (073). 0 Referenced by comments of: 73/3 00682/005 FILE SYSTEM RECOVERY DASDI DESC WF FILE:DASDI.W 5.0T3 26 FILE_SYSTEM_RECOVERY.DASD.WF.005 1 LINE 80 2 PAGE UM HELFFRICH JULY 03, 1981 17:52:10 5.0T6 278 FILE:DASDI.W 0 WRITEUP DESCRIBING THE 3330 DASDI PROGRAM (598). 00682/006 FILE SYSTEM RECOVERY CHONID DESC WF FILE:CHONID.W 5.0T3 27 FILE_SYSTEM_RECOVERY.CHON.WF.006 1 LINE 76 1 PAGE UM HELFFRICH JULY 03, 1981 17:52:10 5.0T6 279 FILE:CHONID.W 0 WRITEUP DESCRIBING THE CHONID PROGRAM (599). 1 SUN SEP 08/96 15:24:55 Page 457 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 599/1 00682/007A FILE SYSTEM RECOVERY FM DESC WF FILE:FM.W 5.1T2 6 FILE_SYSTEM_RECOVERY.FM_D.WF.007 1 LINE 70 2 PAGE UBC HOGG HELFFRICH JULY 23, 1983 12:53:52 FILE:FM.W 0 WRITEUP DESCRIBING THE FILE MOVE PROGRAM (1020). 0 Referenced by comments of: 1020/1 00682/008A FILE SYSTEM RECOVERY CHKVTOC DESC WF FILE:CHKVTOC.W 5.1T2 7 FILE_SYSTEM_RECOVERY.CHKV.WF.008 1 LINE 73 1 PAGE UM HELFFRICH JULY 23, 1983 12:53:52 FILE:CHKVTOC.W 0 WRITEUP DESCRIBING THE CHKVTOC PROGRAM (682/21). 0 Referenced by comments of: 682/21 00682/009 FILE SYSTEM RECOVERY TABLMOD DESC WF FILE:TABLMOD.W 5.0T3 30 FILE_SYSTEM_RECOVERY.TABL.WF.009 1 LINE 76 1 PAGE UM HELFFRICH JULY 03, 1981 17:52:12 5.0T6 282 FILE:TABLMOD.W 0 WRITEUP DESCRIBING THE TABLMOD PROGRAM (554). 0 Referenced by comments of: 554/1 00682/010 FILE SYSTEM RECOVERY VNTD DESC WF FILE:VNTD.W 5.0T3 31 FILE_SYSTEM_RECOVERY.VNTD.WF.010 1 LINE 71 1 PAGE UM HELFFRICH JULY 03, 1981 17:52:13 5.0T6 283 FILE:VNTD.W 0 WRITEUP DESCRIBING THE VNTD PROGRAM (682/18). 0 Referenced by comments of: 682/18 00682/011A FILE SYSTEM RECOVERY FSTEST DESC WF FILE:FSTEST.W 5.1T2 8 FILE_SYSTEM_RECOVERY.FSTE.WF.011 1 LINE 101 4 PAGE UM HELFFRICH JULY 23, 1983 12:53:52 FILE:FSTEST.W 0 WRITEUP DESCRIBING THE FSTEST PROGRAM (482/41). 00682/012A FILE SYSTEM RECOVERY VAMREC DESC WF FILE:VAMREC.WRUP 5.1T2 9 FILE_SYSTEM_RECOVERY.VAMR.WF.012 1 LINE 104 5 PAGE SFU BENET HELFFRICH JULY 23, 1983 12:53:53 FILE:VAMREC.WRUP 0 WRITEUP DESCRIBING THE VAMREC PROGRAM (682/24). 0 Referenced by comments of: 682/24 00682/013A FILE SYSTEM RECOVERY RECOVERING WF FILE:RECOVERING 5.1T2 10 FILE_SYSTEM_RECOVERY.RECO.WF.013 1 LINE 182 7 PAGE UM HELFFRICH JULY 23, 1983 12:53:53 FILE:RECOVERING 0 DESCRIPTION OF PROCEDURES SUGGESTED FOR RECOVERING FROM DISK DISASTERS. 1 SUN SEP 08/96 15:24:55 Page 458 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 682/46 00682/014 FILE SYSTEM RECOVERY LINE FILE DESC WF FILE:DOC.DESC.LNE 5.0T3 35 FILE_SYSTEM_RECOVERY.LINE.WF.014 1 LINE 136 4 PAGE UM HELFFRICH JULY 03, 1981 17:52:19 5.0T6 287 FILE:DOC.DESC.LNE 0 DESCRIPTION OF MTS LINE FILE ORGANIZATION. 00682/015 FILE SYSTEM RECOVERY SEQ FILE DESC WF FILE:DOC.DESC.SEQ 5.0T3 36 FILE_SYSTEM_RECOVERY.SEQ.WF.015 1 LINE 130 4 PAGE UM HELFFRICH JULY 03, 1981 17:52:19 5.0T6 288 FILE:DOC.DESC.SEQ 0 DESCRIPTION OF MTS SEQ FILE ORGANIZATION. 00682/016 FILE SYSTEM RECOVERY CAT DESC WF FILE:DOC.DESC.CAT 5.0T3 37 FILE_SYSTEM_RECOVERY.CAT.WF.016 1 LINE 190 7 PAGE UM HELFFRICH JULY 03, 1981 17:52:20 5.0T6 289 FILE:DOC.DESC.CAT 0 DESCRIPTION OF MTS FILE CATALOG ORGANIZATION. 00682/017 FILE SYSTEM RECOVERY TAB DESC WF FILE:DOC.DESC.TAB 5.0T3 38 FILE_SYSTEM_RECOVERY.TAB.WF.017 1 LINE 131 5 PAGE UM HELFFRICH JULY 03, 1981 17:52:22 5.0T6 290 FILE:DOC.DESC.TAB 0 DESCRIPTION OF MTS SHARED FILE TABLE ORGANIZATION. 0 Referenced by comments of: 682/1 00682/018 FILE SYSTEM RECOVERY VNTD SA G S1560 5.0T3 VLO FSNAME=FILE_SYSTEM_RECOVERY.VNTD.SA.018(1) 39 5.0T3 39 FILE_SYSTEM_RECOVERY.VNTD.SA.018 1 LINE 80 23 PAGE UM HELFFRICH AUG. 06, 1981 05:16:40 5.0T6 291 0 PROGRAM TO VERIFY, TRACE, AND/OR DUMP THE FILE SYSTEM CATALOG. IT WILL VERIFY, TRACE, AND/OR DUMP THE ENTIRE CATALOG, A PARTICULAR USER CATALOG, OR A PARTICULAR USER FILE. SEE COMP (682/10) FOR A WRITEUP. ASSEMBLE USING *SYSMAC AND COPY:FILE.MACROS (482/45). COPIES *GDINFODSECT (594). 0 Referenced by comments of: 451/1, 682/10, 682/19, 682/28, 682/30 00682/019C FILE SYSTEM RECOVERY VNTD UC G FILE:VNTD(1000) 5.1T2 11 FILE_SYSTEM_RECOVERY.VNTD.UC.019 1 LINE 68 2 PAGE UM HELFFRICH JULY 23, 1983 12:53:53 0 Update deck, applied to (682/18), to yield current source. 00682/020A FILE SYSTEM RECOVERY VNTD OC G FILE:VNTD(1,998) 5.1T2 12 FILE_SYSTEM_RECOVERY.VNTD.OC.020 1 LINE 80 10 PAGE UM HELFFRICH JULY 23, 1983 12:53:54 FILE:VNTD 00682/021 FILE SYSTEM RECOVERY CHKVTOC SA G FILE:CHKVTOC(*F,-1) 5.0T3 41 FILE_SYSTEM_RECOVERY.CHKV.SA.020 1 LINE 72 16 PAGE UM HELFFRICH JULY 03, 1981 17:52:30 5.0T6 293 0 Program to check consistency of page assignment table (PAT) with type E's and type F's for a particular volume. Requires symbols in SYSDEFS. Assemble using COPY:FILE.MACROS (482/45) 1 SUN SEP 08/96 15:24:55 Page 459 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 and *SYSMAC. Calls VTOCREAD subroutine (067/11). See Comp. (682/8) for a writeup. 0 Referenced by comments of: 597/1, 682/8, 682/22, 682/48 00682/022C FILE SYSTEM RECOVERY CHKVTOC UC G FILE:CHKVTOC(1000) 5.1T2 13 FILE_SYSTEM_RECOVERY.CHKV.UC.022 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 12:53:55 0 Update deck, applied to (682/21), to yield current source. 00682/023A FILE SYSTEM RECOVERY CHKVTOC OC G FILE:CHKVTOC(1,999) 5.1T2 14 FILE_SYSTEM_RECOVERY.CHKV.OC.023 1 LINE 80 8 PAGE UM HELFFRICH JULY 23, 1983 12:53:55 FILE:CHKVTOC 0 CONTAINS A "$CONTINUE WITH RSTR:VTOCREAD+COPY:SYSDEFS" LINE. 0 Referenced by comments of: 597/1 00682/024A FILE SYSTEM RECOVERY VAMREC SA G FILE:VAMREC(1000) 5.1T2 15 FILE_SYSTEM_RECOVERY.VAMR.SA.024 1 LINE 74 66 PAGE SFU BENET HELFFRICH JULY 23, 1983 12:53:56 0 THE VAMREC DISK UTILITY. COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087). ASSEMBLE WITH COPY:FILE.MACROS (482/45), OLD:CC.MACROS (1054/4), COPY:UC.MACROS (787/1), AND COPY:MISC.MACROS (728). SEE COMPONENT (682/12) FOR A WRITEUP. ********************************************************************************* D5.0 CHANGES: This version is considerably changed from D4.0 and has been recoded according to coding convention standards. ********************************************************************************* ************************************************************************** D5.0B version: Fixed bugs in DASDI and FORMAT commands, and added ERRORCHECK HEAD command. ************************************************************************** 0 Referenced by comments of: 682/12, 3030/1 00682/025A FILE SYSTEM RECOVERY VAMREC OC G FILE:VAMREC(1,999) 5.1T2 16 FILE_SYSTEM_RECOVERY.VAMR.OC.025 1 LINE 22484 26 PAGE SFU BENET HELFFRICH JULY 23, 1983 12:54:01 FILE:VAMREC 0 HAS $CONTINUE WITH COPY:DEFS (579/10) RECORD. 0 Referenced by comments of: 3030/1 00682/026A FILE SYSTEM RECOVERY FIXEH SA G FILE:FIXEH(1000) 5.1T2 17 FILE_SYSTEM_RECOVERY.FIXE.SA.026 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 12:54:02 0 PROGRAM TO FIX EXTENT HEADERS IN THE CATALOG BY CLEARING THE IN-USE BITS FOR ALL SEGMENTS IN A RECORD OF THE CATALOG WHICH IS ALL ZERO. IT WILL ALSO CHECK THAT THE RECORD HEADER OF ANY NON-ZERO RECORD (WITH A SEGMENT FLAGGED AS BEING IN-USE) IS CORRECT. ASSEMBLE USING COPY:FILE.MACROS (482/45). 1 SUN SEP 08/96 15:24:55 Page 460 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00682/027A FILE SYSTEM RECOVERY FIXEH OC G FILE:FIXEH(1,999) 5.1T2 18 FILE_SYSTEM_RECOVERY.FIXE.OC.027 1 LINE 80 2 PAGE UM HELFFRICH JULY 23, 1983 12:54:02 FILE:FIXEH 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00682/028A FILE SYSTEM RECOVERY FIXCAT SA G FILE:FIXCAT(1000) 5.1T2 19 FILE_SYSTEM_RECOVERY.FIXC.SA.028 1 LINE 72 8 PAGE UM HELFFRICH JULY 23, 1983 12:54:02 0 Program to rechain catalog segments back together and add or remove master index entries as required. It takes as input, the output from VNTD (682/18) and produces as output a list of userids whose catalogs were affected. This output is then used for input to AMALGAMATE (682/39). Assemble using COPY:FILE.MACROS (482/45). 00682/029A FILE SYSTEM RECOVERY FIXCAT OC G FILE:FIXCAT(1,999) 5.1T2 20 FILE_SYSTEM_RECOVERY.FIXC.OC.029 1 LINE 80 5 PAGE UM HELFFRICH JULY 23, 1983 12:54:03 FILE:FIXCAT 00682/030A FILE SYSTEM RECOVERY FIXSD SA G FILE:FIXSD(1000) 5.1T2 21 FILE_SYSTEM_RECOVERY.FIXS.SA.030 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 12:54:04 0 PROGRAM TO FIX SHARING DESCRIPTORS BY ZEROING ANY SD WHICH IS NOT POINTED TO BY A FD OR SD. IT ALSO WILL ZERO THE PREVIOUS POINTER IN THE FD OR SD FOR ANY LOST SD. IT TAKES AS INPUT THE OUTPUT FROM VNTD (682/18) AND PROVIDES AS OUTPUT A LIST OF FILES WHICH LOST SHARING INFORMATION. THIS OUTPUT IS THEN USED FOR INPUT TO AMALGAMATE (682/39). ASSEMBLE USING COPY:FILE.MACROS (482/45). 00682/031A FILE SYSTEM RECOVERY FIXSD OC G FILE:FIXSD(1,999) 5.1T2 22 FILE_SYSTEM_RECOVERY.FIXS.OC.031 1 LINE 80 3 PAGE UM HELFFRICH JULY 23, 1983 12:54:04 FILE:FIXSD 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00682/032A FILE SYSTEM RECOVERY RECATALOG SA G RCAT FILE:RECATALOG(1000) 5.1T2 23 FILE_SYSTEM_RECOVERY.RECA.SA.032 1 LINE 80 4 PAGE UM HELFFRICH JULY 23, 1983 12:54:04 0 SUBROUTINE TO RECATALOG A FILE FROM SCRATCH. IT TAKES AS INPUT, A FILENAME AND DSCB ADDRESS. IT ALSO DETERMINES THE FILE TYPE AND SETS IT ACCORDINGLY. ASSEMBLE USING COPY:FILE.MACROS (482/45). 00682/033A FILE SYSTEM RECOVERY RECATALOG OC G FILE:RECATALOG(1,999) 5.1T2 24 FILE_SYSTEM_RECOVERY.RECA.OC.033 1 LINE 80 1 PAGE UM HELFFRICH JULY 23, 1983 12:54:05 FILE:RECATALOG 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00682/034A FILE SYSTEM RECOVERY CALLDR SA G FILE:CALLDR(1000) 5.1T2 25 FILE_SYSTEM_RECOVERY.CALL.SA.034 1 LINE 69 1 PAGE UM HELFFRICH JULY 23, 1983 12:54:05 0 PROGRAM WHICH CALLS DESTRYR TO DESTROY FILES. SEE THE SOURCE FOR USAGE DETAILS. 1 SUN SEP 08/96 15:24:55 Page 461 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00682/035A FILE SYSTEM RECOVERY CALLDR OC G FILE:CALLDR(1,999) 5.1T2 26 FILE_SYSTEM_RECOVERY.CALL.OC.035 1 LINE 80 1 PAGE UM HELFFRICH JULY 23, 1983 12:54:05 FILE:CALLDR 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00682/036 FILE SYSTEM RECOVERY FILES SA G FILE:STARFILES(1,999) 5.0T3 55 FILE_SYSTEM_RECOVERY.FILE.SA.034 1 LINE 74 4 PAGE UM HELFFRICH JULY 03, 1981 17:54:00 5.0T6 307 0 PROGRAM TO PRINT WHICH USERS FILES HAVE BEEN AFFECTED AND HOW BY A DISK CRASH. IT TAKES AS INPUT A DESCRIPTION OF THE DISASTER AND OTHER DATA IN FILE:FILELIST. SEE THE SOURCE FOR DETAILS ON THE FORMAT OF THIS FILE. THE OUTPUT FROM AMALGAMATE (682/39) IS BASICALLY WHAT IS USED TO GENERATE THIS DATA FILE WITH THE HELP OF *MVC, *COMBINE, THE EDITOR, ETC. 00682/037 FILE SYSTEM RECOVERY FILES OC G FILE:STARFILES(1000) 5.0T3 56 FILE_SYSTEM_RECOVERY.FILE.OC.035 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 17:54:01 5.0T6 308 FILE:STARFILES 0 PUT THIS IN *FILES AFTER A DISK CRASH. 00682/038 FILE SYSTEM RECOVERY FILE UPDATE OC G FILE:FILEUPD 5.0T3 57 FILE_SYSTEM_RECOVERY.FILE.OC.036 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 17:54:02 5.0T6 309 FILE:FILEUPD 0 OBJECT FOR ACCRDWRT (104/40), ACCUPDAT (104/31), AND A DUMMY PRINT ROUTINE, PLUS $CONTINUE WITHS FOR ACATALOG (104/134), ACATSUB (104/135), VTOCREAD (067/11), TEST DSACC (482/39), ACCLIB (104/47), AND SYSDEFS (579), WHICH WHEN RUN WITH UNIT ZERO ASSIGNED TO *DUMMY* AND UNIT ONE ASSIGNED TO AN EMPTY FILE WILL UPDATE THE FILE SPACE FIELDS IN THE ACCOUNTING RECORDS FOR ALL USERS (QUICKLY). CONTAINS REP CARD TO INCREASE SPEED BY KEEPING ACCOUNTING FILES LOCKED MORE. 00682/039A FILE SYSTEM RECOVERY AMALGAMATE SA G FILE:AMALGAMATE(1000) 5.1T2 27 FILE_SYSTEM_RECOVERY.AMAL.SA.039 1 LINE 72 6 PAGE UM HELFFRICH JULY 23, 1983 12:54:05 0 PROGRAM TO TAKE A LIST OF FILES AND USE "FILEDIR.MAS" TO APPEND TAPE LOCATION INFORMATION FOR USE BY FASTRESTORE (671/1). ALSO COMPARES "FILEDIR.MAS" WITH FILE SYSTEM CATALOG TO LOCATE FILES WHOSE DATA IS LOST (NOT ON ANY RESTORE TAPES) AND WHOSE SHARING INFORMATION HAS BEEN DAMAGED (ALSO NOT ON ANY RESTORE TAPES). CALLS CHKFILE (682/41). COPIES *CNFGINFODSECT (654). ASSEMBLE WITH THE FILE SAVE MACROS (067/35). NOTE: THE DIRECTORY FILES RSTR:FILEDIR.MAS, RSTR:FILEDIR.NEW, AND RSTR:TAPEDIR MUST BE PERMITTED WITH READ ACCESS TO FILE&PKEY=DISTASTER. ********************************************************************* D5.1 version: Fixed bug caused by change in user segment assignments. ********************************************************************** 0 Referenced by comments of: 682/28, 682/30, 682/36, 682/41, 682/46 1 SUN SEP 08/96 15:24:55 Page 462 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00682/040A FILE SYSTEM RECOVERY AMALGAMATE OC G FILE:AMALGAMATE(1,999) 5.1T2 28 FILE_SYSTEM_RECOVERY.AMAL.OC.040 1 LINE 80 4 PAGE UM HELFFRICH JULY 23, 1983 12:54:06 FILE:AMALGAMATE 0 HAS A "$CONTINUE WITH MTS:UBCDATEX+FILE:CHKFILE RETURN" LINE. THE PKEY OF THIS FILE SHOULD BE "DISASTER". 0 Referenced by comments of: 671/1 00682/041 FILE SYSTEM RECOVERY CHKFILE SUBR SA G FILE:CHKFILE(1000) 5.0T3 60 FILE_SYSTEM_RECOVERY.CHKF.SA.039 1 LINE 71 4 PAGE UM HELFFRICH JULY 03, 1981 17:54:06 5.0T6 312 0 ALTERNATE VERSION OF SYSTEM CHKFILE ROUTINE FOR USE BY MERGE (067/27) AND AMALGAMATE (682/39). COPIES *CNFGINFODSECT (654). ASSEMBLE USING COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 67/27, 682/39 00682/042 FILE SYSTEM RECOVERY CHKFILE SUBR OC G FILE:CHKFILE(1,999) 5.0T3 61 FILE_SYSTEM_RECOVERY.CHKF.OC.040 1 LINE 80 3 PAGE UM HELFFRICH JULY 03, 1981 17:54:07 5.0T6 313 FILE:CHKFILE 0 CONTAINS A "$CONTINUE WITH COPY:SYSDEFS" (579/3) RECORD. 00682/043A FILE SYSTEM RECOVERY CALLRELDSK SA G FILE:CALLRELDSK(1000) 5.1T2 29 FILE_SYSTEM_RECOVERY.CALL.SA.043 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 12:54:06 0 PROGRAM TO TAKE ACATSUB OUTPUT AND CALL RELDSK TO DESTROY UNCATALOGED FILES. ASSEMBLE WITH COPY:FILE.MACROS (482/45). 00682/044A FILE SYSTEM RECOVERY CALLRELDSK OC G FILE:CALLRELDSK(1,999) 5.1T2 30 FILE_SYSTEM_RECOVERY.CALL.OC.044 1 LINE 80 3 PAGE UM HELFFRICH JULY 23, 1983 12:54:07 FILE:CALLRELDSK 00682/045 FILE SYSTEM RECOVERY VAMREC-CHKVTOC SS G FILE:VAMREC->CHKV 5.0T3 64 FILE_SYSTEM_RECOVERY.VAMR.SS.043 1 LINE 66 1 PAGE UM HELFFRICH JULY 03, 1981 17:54:09 5.0T6 316 FILE:VAMREC->CHKV 0 SPITBOL PROGRAM TO TAKE DISK I/O ERROR OUTPUT FROM VAMREC AND GENERATE CHKVTOC INPUT. THIS IS TO ALLOW ONE TO LOCATE FILES WHOSE DATA PAGES ARE GIVING DATA CHECKS. 00682/046A FILE SYSTEM RECOVERY CATDSCBCOMP SA G FILE:CATDSCBCOMP(1000) 5.1T2 31 FILE_SYSTEM_RECOVERY.CATD.SA.046 1 LINE 72 9 PAGE UM HELFFRICH JULY 23, 1983 12:54:07 0 Program to verify CATALOG/DSCB consistency. It produces lists to be used with AMAlGAMATE (682/39). See (682/13) for complete instructions. Calls VTOCREAD (067/11). Copies COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 104/135 1 SUN SEP 08/96 15:24:55 Page 463 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00682/047A FILE SYSTEM RECOVERY CATDSCBCOMP OC G FILE:CATDSCBCOMP(1,999) 5.1T2 32 FILE_SYSTEM_RECOVERY.CATD.OC.047 1 LINE 80 5 PAGE UM HELFFRICH JULY 23, 1983 12:54:08 FILE:CATDSCBCOMP 0 CONTAINS $CONTINUE WITH RSTR/VTOCREAD (067/11) AND COPY:SYSDEFS (579/3) RECORDS. 00682/048C FILE SYSTEM RECOVERY *CTD C *CTD 5.1T2 33 FILE_SYSTEM_RECOVERY.?CTD.C.048 1 LINE 64 1 PAGE UM HELFFRICH JULY 23, 1983 12:54:08 *CTD 0 Operator file to run CHKVTOC (682/21) on all the disks with output to the operator's console. Invoked by entering "MTS *CTD" from the operator's console. 00683/001A MTS VOLUME 15 MASTER WT S1062 MTSV15 'MTS MANUALS' POSN=NEWM3.V15 5.1T2 34 MTS_VOLUME_15.MASTER.WT.001 1 LINE 132 156 PAGE UM MANUAL JULY 23, 1983 12:56:44 0 TEXT/360 master for Volume 15 "FORMAT and TEXT360" of the UM MTS manuals, April 1977, updated February 1979 and January 1983. Editor: Richard A. Salisbury 00683/002A MTS VOLUME 15 PRINT PT S1062 MTSV15 'MTS MANUALS' POSN=PRINT3.V15 5.1T2 35 MTS_VOLUME_15.PRINT.PT.002 1 LINE 132 271 PAGE UM MANUAL JULY 23, 1983 12:56:54 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 00683/003 MTS VOLUME 15 INDEX SOURCE D S1560 5.0T3 VLO FSNAME=MTS_VOLUME_15.INDEX_SOURC.D.003(1) 69 5.0T3 69 MTS_VOLUME_15.INDEX_SOURC.D.003 1 SEQ 147 5 PAGE UM MANUAL APR. 02, 1979 00:47:16 5.0T6 321 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 15. 00683/004 MTS VOLUME 15 UPDATE 1 P S1560 5.0T3 VLO FSNAME=MTS_VOLUME_15.UPDATE_1.PT.004(1) 70 5.0T3 70 MTS_VOLUME_15.UPDATE_1.PT.004 1 LINE 133 59 PAGE UM MANUAL APR. 02, 1979 00:47:17 5.0T6 322 0 THIS IS COMPUTING CENTER MEMO 396 -- "UPDATE 1 TO MTS VOLUME 15," FEBRUARY 1979. $COPY TO A TN PRINTER USING THE @MCC MODIFIER. 00683/005C MTS VOLUME 15 UPDATE 2 P W073:TNLV15.JAN83 5.1T2 36 MTS_VOLUME_15.UPDATE_2.P.005 1 LINE 79 18 PAGE UM MANUAL JULY 23, 1983 12:56:59 0 This is "Update 2 to Volume 15," January 1983. 00684/001 OXFORD SA G S1560 5.0T3 VLO FSNAME=OXFORD..SA.001(1) 71 5.0T3 71 OXFORD..SA.001 1 LINE 80 24 PAGE UBC HOGG DWB JULY 28, 1977 23:24:13 5.0T6 323 0 IF THIS DECK IS PRESENT IN THE RESIDENT SYSTEM, MTS WILL PRODUCE "FRED WORDS" (FOUR LETTER ENGLISH WORDS) IN THE INTERSTICES OF THE EDGELINE FOR BATCH AND 1 SUN SEP 08/96 15:24:55 Page 464 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 *PRINT* OUTPUT DESIGNED TO AID SEPARATION OF PRINTED OUTPUT. MTS HAS A WXTRN FOR OXFORD AND TESTS IT FOR ZERO TO SKIP THE CALL IF NOT PRESENT. 00684/002 OXFORD OC G S1560 5.0T3 VLO FSNAME=OXFORD..OC.002(1) 72 5.0T3 72 OXFORD..OC.002 1 LINE 80 3 PAGE UBC HOGG DWB JULY 28, 1977 23:24:15 5.0T6 324 00685/001 UNSUPPORTED SOFTWARE CATALOG P UNSP:CATALOG 5.0T3 73 UNSUPPORTED_SOFTWARE.CATA.P.001 1 LINE 68 6 PAGE UM UNSP JULY 03, 1981 17:54:35 5.0T6 325 UNSP:CATALOG 0 LIST OF UNSP FILES AVAILABLE AT UM. NOTE: NOT ALL OF THE ITEMS IN THIS LIST ARE INCLUDED IN THE DISTRIBUTION. 00685/002 UNSUPPORTED SOFTWARE SUBR LIBRARY OL O UNSP:LIBRARY 5.0T3 74 UNSUPPORTED_SOFTWARE.SUBR.OL.002 1 LINE 1382 3 PAGE UM UNSP AUG. 06, 1981 05:18:10 5.0T6 326 UNSP:LIBRARY 0 SUBROUTINE LIBRARY -- ROUTINES INCLUDED SEPARATELY. 0 Referenced by comments of: 108/1, 528/64, 685/7, 688/2, 689/2, 695/2, 765/1, 773/3, 774/3, 783/14, 784/3, 785/2, 785/3, 796/2, 796/5, 844/27, 844/28, 1052/2 00685/003A UNSUPPORTED SOFTWARE MACRO LIBRARY SM G UNSP:MACLIB 5.1T2 37 UNSUPPORTED_SOFTWARE.MACR.SM.003 1 LINE 72 4 PAGE UM UNSP MTA JULY 23, 1983 12:57:00 UNSP:MACLIB 0 MACRO LIBRARY CONTAINING CLCL, MVCL, AND SEXIT MACROS AMONG OTHERS. THESE MACROS ARE DESCRIBED IN THE (685/4) WRITEUP. 0 Referenced by comments of: 590/14, 590/15, 590/16, 590/17, 590/18, 590/19, 590/20, 590/21, 590/26, 685/4 00685/004 UNSUPPORTED SOFTWARE MACRO LIBRARY WF S1153 UNSP VLO FSNAME=MACLIB.F 5.0T3 76 UNSUPPORTED_SOFTWARE.MACR.WF.004 1 LINE 72 4 PAGE UM UNSP MTA JAN. 15, 1979 15:28:38 5.0T6 328 0 A WRITEUP DESCRIBING THE MACROS THAT ARE AVAILABLE IN UNSP:MACLIB (685/3). 0 Referenced by comments of: 685/3, 728/1 00685/005 UNSUPPORTED SOFTWARE MACRO TEST PGM SA S1560 5.0T3 VLO FSNAME=UNSUPPORTED_SOFTWARE.MACR.SA.005(1) 77 5.0T3 77 UNSUPPORTED_SOFTWARE.MACR.SA.005 1 LINE 72 2 PAGE UM UNSP MTA NOV. 02, 1979 23:04:04 5.0T6 329 0 TEST PROGRAM FOR "MIF" MACROS. COPIES COPY:GLOBALS (1026/3). ASSEMBLE, BUT DON'T RUN IT. 00685/006 UNSUPPORTED SOFTWARE NEWS P UNSP:NEWS 5.0T3 78 UNSUPPORTED_SOFTWARE.NEWS.P.006 1 LINE 69 14 PAGE UM UNSP JULY 03, 1981 17:56:01 5.0T6 330 0 LIST OF MOST CHANGES MADE TO UNSUPPORTED SOFTWARE AT UM. 1 SUN SEP 08/96 15:24:55 Page 465 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00685/007 UNSUPPORTED SOFTWARE SUBR LIBRARY P UNSP:LIBRARY.W 5.0T3 79 UNSUPPORTED_SOFTWARE.SUBR.P.007 1 LINE 73 1 PAGE UM UNSP JULY 03, 1981 17:56:03 5.0T6 331 0 A WRITEUP FOR UNSP:LIBRARY (685/2). 00686/001A MICRO CROSS-ASSEMBLER GENCODE SA G MINI:ASM.GENCODE 5.1T2 38 MICRO_CROSS-ASSEMBLER.GEN.SA.001 1 LINE 72 148 PAGE UM FRONCZAK JULY 23, 1983 12:57:01 0 M6800ASR is a cross-assembler for the Motorola M6800 microprocessor. MCS650XASR is a cross-assembler for the MOS Technology MCS6500 family of microcomputers. I8080ASR is a cross-assembler for the INTEL 8080 microprocessor. Z80ASR is a cross-assembler for the Zilog Z80 microprocessor. M6809ASR is a cross-assembler for the Motorola 6809 microprocessor. PDP11ASR is a cross-assembler for the DEC PDP11 minicomputers (models 5, 10, 20, 3(LSI), 35, and 40) These were originally written by Clark Lubbers at UM. The PDP11ASR and I8080ASR are relocatable assemblers; the others are only absolute assemblers. NOTE: All subcomponents of (686) should be assembled using *ASMH (737), OLD:CC.MACROS (1054/4), MINI:ASM.MACRO (686/23), and *SYSMAC with PAR=PEXIT=*PEXIT (775). This subcomponent is the general system- and assembler-independent code. Copies (686/22). ************************************************************************** D5.0B version: All ASM.xxxMTS modules now use the UNSP SNOOP (695/1) subroutine to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). Inserting an NCA SNOOP loader record will cause the logging to be skipped. ************************************************************************** 0 Referenced by comments of: 516/1, 686/1 00686/002A MICRO CROSS-ASSEMBLER KWIC SA G MINI:ASM.RMKWIC 5.1T2 39 MICRO_CROSS-ASSEMBLER.KWI.SA.002 1 LINE 72 13 PAGE UM FRONCZAK JULY 23, 1983 12:57:07 0 SYSTEM- AND ASSEMBLER-INDEPENDENT KEYWORD SCANNER ROUTINE. 00686/003A MICRO CROSS-ASSEMBLER SYMTAB SA G MINI:ASM.RMSYM 5.1T2 40 MICRO_CROSS-ASSEMBLER.SYM.SA.003 1 LINE 81 13 PAGE UM FRONCZAK JULY 23, 1983 12:57:08 0 SYSTEM- AND ASSEMBLER-INDEPENDENT SYMBOL TABLE ROUTINES. 0 Referenced by comments of: 848/22, 848/28, 848/147 00686/004A MICRO CROSS-ASSEMBLER SYSCODE SA G MINI:ASM.SYSCODE 5.1T2 41 MICRO_CROSS-ASSEMBLER.SYS.SA.004 1 LINE 72 26 PAGE UM FRONCZAK JULY 23, 1983 12:57:09 0 MTS-DEPENDENT, ASSEMBLER-INDEPENDENT CODE. COPIES (686/22). 1 SUN SEP 08/96 15:24:55 Page 466 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00686/005A MICRO CROSS-ASSEMBLER MACROP SA G MINI:ASM.MACROP 5.1T2 42 MICRO_CROSS-ASSEMBLER.MAC.SA.005 1 LINE 78 66 PAGE UM FRONCZAK JULY 23, 1983 12:57:11 0 SYSTEM- AND ASSEMBLER-INDEPENDENT MACRO PROCESSOR. 0 Referenced by comments of: 686/41 00686/006A MICRO CROSS-ASSEMBLER EVALEXP SA G MINI:ASM.EVALEXP 5.1T2 43 MICRO_CROSS-ASSEMBLER.EVA.SA.006 1 LINE 71 29 PAGE UM FRONCZAK JULY 23, 1983 12:57:13 0 SYSTEM- AND ASSEMBLER-INDEPENDENT, ARITHMETIC/BOOLEAN, TABLE-DRIVEN EXPRESSION SCANNER. 00686/007A MICRO CROSS-ASSEMBLER PROCCONS SA G MINI:ASM.PROCCONS 5.1T2 44 MICRO_CROSS-ASSEMBLER.PRO.SA.007 1 LINE 71 19 PAGE UM FRONCZAK JULY 23, 1983 12:57:15 0 System-independent, assembler-independent table-driven, data-typed constant evaluator. 0 Referenced by comments of: 686/40 00686/008 MICRO CROSS-ASSEMBLER BLOCK7 SA G MINI:ASM.BLOCK7 5.0T3 87 MICRO_CROSS-ASSEMBLER.BLO.SA.008 1 LINE 72 5 PAGE UM FRONCZAK JULY 03, 1981 17:56:31 5.0T6 339 0 System-independent, assembler-independent BLOCK LETTER support for the BLOCK pseudo-op. 00686/009 MICRO CROSS-ASSEMBLER M6800I SA G MINI:ASM.M6800I 5.0T3 88 MICRO_CROSS-ASSEMBLER.M68.SA.009 1 LINE 72 24 PAGE UM FRONCZAK JULY 03, 1981 17:56:32 5.0T6 340 0 M6800 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). 00686/010A MICRO CROSS-ASSEMBLER M6800MTS SA G MINI:ASM.M6800MTS 5.1T2 45 MICRO_CROSS-ASSEMBLER.M68.SA.010 1 LINE 72 4 PAGE UM FRONCZAK JULY 23, 1983 12:57:16 0 M6800 MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). ************************************************************************** D5.1 version: Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). The external reference is via WXTRN; hence, the non-presence of SNOOP will cause logging to be skipped. ************************************************************************** 00686/011 MICRO CROSS-ASSEMBLER M650XI SA G MINI:ASM.M650XI 5.0T3 90 MICRO_CROSS-ASSEMBLER.M65.SA.011 1 LINE 72 21 PAGE UM FRONCZAK JULY 03, 1981 17:56:34 5.0T6 342 0 MCS650X SYSTEM-INDEPENDENT, ASSEMBLER-INDEPENDENT CODE. COPIES (686/22). 1 SUN SEP 08/96 15:24:55 Page 467 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00686/012A MICRO CROSS-ASSEMBLER M650XMTS SA G MINI:ASM.M650XMTS 5.1T2 46 MICRO_CROSS-ASSEMBLER.M65.SA.012 1 LINE 72 3 PAGE UM FRONCZAK JULY 23, 1983 12:57:16 0 MCS650X MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). ************************************************************************** D5.1 version: Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). The external reference is via WXTRN; hence, the non-presence of SNOOP will cause logging to be skipped. ************************************************************************** 00686/013A MICRO CROSS-ASSEMBLER I8080I SA G MINI:ASM.I8080I 5.1T2 47 MICRO_CROSS-ASSEMBLER.I80.SA.013 1 LINE 72 23 PAGE UM FRONCZAK JULY 23, 1983 12:57:16 0 I8080 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). 00686/014A MICRO CROSS-ASSEMBLER I8080MTS SA G MINI:ASM.I8080MTS 5.1T2 48 MICRO_CROSS-ASSEMBLER.I80.SA.014 1 LINE 72 3 PAGE UM FRONCZAK JULY 23, 1983 12:57:17 0 I8080 MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). ************************************************************************** D5.1 version: Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). The external reference is via WXTRN; hence, the non-presence of SNOOP will cause logging to be skipped. ************************************************************************** 00686/015A MICRO CROSS-ASSEMBLER Z80I SA G MINI:ASM.Z80I 5.1T2 49 MICRO_CROSS-ASSEMBLER.Z80.SA.015 1 LINE 72 28 PAGE UM FRONCZAK JULY 23, 1983 12:57:17 0 Z80 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). 00686/016A MICRO CROSS-ASSEMBLER Z80MTS SA G MINI:ASM.Z80MTS 5.1T2 50 MICRO_CROSS-ASSEMBLER.Z80.SA.016 1 LINE 72 3 PAGE UM FRONCZAK JULY 23, 1983 12:57:20 0 Z80 MTS-DEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). ************************************************************************** D5.1 version: Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). The external reference is via WXTRN; hence, the non-presence of SNOOP will cause logging to be skipped. ************************************************************************** 00686/017A MICRO CROSS-ASSEMBLER M6809I SA G MINI:ASM.M6809I 5.1T2 51 MICRO_CROSS-ASSEMBLER.M68.SA.017 1 LINE 72 29 PAGE UM FRONCZAK JULY 23, 1983 12:57:21 0 M6809 SYSTEM-INDEPENDENT, ASSEMBLER-DEPENDENT CODE. COPIES (686/22). 1 SUN SEP 08/96 15:24:55 Page 468 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00686/018A MICRO CROSS-ASSEMBLER M6809MTS SA G MINI:ASM.M6809MTS 5.1T2 52 MICRO_CROSS-ASSEMBLER.M68.SA.018 1 LINE 72 3 PAGE UM FRONCZAK JULY 23, 1983 12:57:22 0 M6809 MTS-DEPENDENT AND ASSEMBLER-DEPENDENT CODE. COPIES (686/22). ************************************************************************** D5.1 version: Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). The external reference is via WXTRN; hence, the non-presence of SNOOP will cause logging to be skipped. ************************************************************************** 00686/019A MICRO CROSS-ASSEMBLER PDP11I SA G MINI:ASM.PDP11I 5.1T2 53 MICRO_CROSS-ASSEMBLER.PDP.SA.019 1 LINE 72 37 PAGE UM FRONCZAK JULY 23, 1983 12:57:22 0 PDP11 MTS-independent, assembler-dependent code. Copies (686/22). 00686/020A MICRO CROSS-ASSEMBLER PDP11MTS SA G MINI:ASM.PDP11MTS 5.1T2 54 MICRO_CROSS-ASSEMBLER.PDP.SA.020 1 LINE 72 4 PAGE UM FRONCZAK JULY 23, 1983 12:57:24 0 PDP11 MTS-dependent, assembler-dependent code. Copies (686/22). ************************************************************************** D5.1 version: Now uses the UNSP SNOOP subroutine (695/1) to log micro cross-assembler usage into MINI:GENASMUSELOG (686/33). The external reference is via WXTRN; hence, the non-presence of SNOOP will cause logging to be skipped. ************************************************************************** 00686/021A MICRO CROSS-ASSEMBLER MESSAGES M ETC:GENASMERR 5.1T2 55 MICRO_CROSS-ASSEMBLER.MES.M.021 1 LINE 74 4 PAGE UM FRONCZAK JULY 23, 1983 12:57:24 ETC:GENASMERR 0 ERROR MESSAGES. 00686/022A MICRO CROSS-ASSEMBLER COPY SECTION SA G MINI:ASM.DSECT 5.1T2 56 MICRO_CROSS-ASSEMBLER.COP.SA.022 1 LINE 78 13 PAGE UM FRONCZAK JULY 23, 1983 12:57:25 0 Referenced by comments of: 686/1, 686/4, 686/9, 686/10, 686/11, 686/12, 686/13, 686/14, 686/15, 686/16, 686/17, 686/18, 686/19, 686/20 00686/023A MICRO CROSS-ASSEMBLER MACRO LIB SM G MINI:ASM.MACRO 5.1T2 57 MICRO_CROSS-ASSEMBLER.MAC.SM.023 1 LINE 72 4 PAGE UM FRONCZAK JULY 23, 1983 12:57:25 0 Referenced by comments of: 686/1 00686/024A MICRO CROSS-ASSEMBLER I8080 MACS SM G COPY:I8080MACS 5.1T2 58 MICRO_CROSS-ASSEMBLER.I80.SM.024 1 LINE 80 8 PAGE UM FRONCZAK JULY 23, 1983 12:57:26 0 Default macro library for *I8080ASR (686/29) that has structured programming macros. Use the SETIF macro prior to using the others. 1 SUN SEP 08/96 15:24:55 Page 469 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 848/22, 848/28, 848/147 00686/025A MICRO CROSS-ASSEMBLER PDP11 MACS SM G COPY:PDP11MACS 5.1T2 59 MICRO_CROSS-ASSEMBLER.PDP.SM.025 1 LINE 80 7 PAGE UM FRONCZAK JULY 23, 1983 12:57:26 0 Default macro library for *PDP11ASR (686/32) that has structured programming macros. Use the SETIF macro prior to using the others. 00686/026C MICRO CROSS-ASSEMBLER M6809 MACS SM G COPY:M6809MACS 5.1T2 60 MICRO_CROSS-ASSEMBLER.M68.SM.026 1 LINE 91 8 PAGE UM FRONCZAK JULY 23, 1983 12:57:27 0 Default macro library for *M6809ASR (686/30) that has structured programming macros. Use the SETIF macro prior to using the others. 00686/027A MICRO CROSS-ASSEMBLER M6800ASR OE G *M6800ASR 5.1T2 61 MICRO_CROSS-ASSEMBLER.M68.OE.027 1 LINE 32767 23 PAGE UM FRONCZAK JULY 23, 1983 12:57:27 *M6800ASR 0 OBJECT FOR MOTOROLA M6800 MICROPROCESSOR CROSS-ASSEMBLER. 0 Referenced by comments of: 686/34 00686/028A MICRO CROSS-ASSEMBLER MCS650ASR OE G *MCS650XASR 5.1T2 62 MICRO_CROSS-ASSEMBLER.MCS.OE.028 1 LINE 32767 22 PAGE UM FRONCZAK JULY 23, 1983 12:57:29 *MCS650XASR 0 OBJECT FOR MCS TECHNOLOGY 6500 SERIES MICROCOMPUTERS CROSS-ASSEMBLER. 0 Referenced by comments of: 686/35, 848/1, 848/9 00686/029A MICRO CROSS-ASSEMBLER I8080ASR OE G *I8080ASR 5.1T2 63 MICRO_CROSS-ASSEMBLER.I80.OE.029 1 LINE 32767 22 PAGE UM FRONCZAK JULY 23, 1983 12:57:29 *I8080ASR 0 Object for INTEL 8080 microcomputer cross-assembler (relocatable). 0 Referenced by comments of: 686/24, 686/36, 756/1, 756/3, 848/143 00686/030A MICRO CROSS-ASSEMBLER Z80ASR OE G *Z80ASR 5.1T2 64 MICRO_CROSS-ASSEMBLER.Z80.OE.030 1 LINE 32767 23 PAGE UM FRONCZAK JULY 23, 1983 12:57:30 *Z80ASR 0 OBJECT FOR ZILOG Z80 MICROPROCESSOR CROSS-ASSEMBLER. 0 Referenced by comments of: 686/26, 686/37, 848/183, 848/184, 848/185, 848/186, 848/187, 848/188, 848/189, 848/190, 848/191, 848/192 00686/031A MICRO CROSS-ASSEMBLER M6809ASR OE G *M6809ASR 5.1T2 65 MICRO_CROSS-ASSEMBLER.M68.OE.031 1 LINE 32767 23 PAGE UM FRONCZAK JULY 23, 1983 12:57:31 *M6809ASR 0 OBJECT FOR MOTOROLA M6809 MICROCOMPUTER CROSS-ASSEMBLER. 0 Referenced by comments of: 686/38, 860/8, 860/9, 861/1, 861/2 1 SUN SEP 08/96 15:24:55 Page 470 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00686/032A MICRO CROSS-ASSEMBLER PDP11ASR OE G *PDP11ASR 5.1T2 66 MICRO_CROSS-ASSEMBLER.PDP.OE.032 1 LINE 32767 24 PAGE UM FRONCZAK JULY 23, 1983 12:57:32 *PDP11ASR 0 Object for DEC PDP11 series minicomputers cross-assemblers (relocatable). (686/43) is a writeup explaining the differences between *11ASR (515) and *PDP11ASR. 0 Referenced by comments of: 660/1, 686/25, 686/39, 686/43, 715/1, 715/5, 715/7, 715/10, 715/11, 715/12, 715/13, 715/14, 715/15, 715/16, 715/17, 715/18, 715/19, 715/20, 715/21, 715/22, 715/23, 715/24, 715/25, 715/26, 715/28, 715/29, 715/30, 715/31, 715/32, 715/33, 715/34, 715/35, 715/36, 715/37, 715/38, 715/39, 715/40, 715/41, 715/42, 715/46, 715/47, 715/48, 715/49, 715/50, 715/51, 715/52, 715/53, 715/54, 715/55, 715/56, 715/57, 715/58, 715/59, 715/60, 860/1, 860/2, 860/3, 860/4, 860/6, 860/7, 861/11, 861/14, 861/16, 861/20 00686/033C MICRO CROSS-ASSEMBLER LOG FILE D # MINI:GENASMUSELOG UM FRONCZAK MINI:GENASMUSELOG@E 0 Log file required by the micro cross-assemblers. If no logging is desired, an NCA SNOOP loader record may be inserted. 0 Referenced by comments of: 686/1, 686/10, 686/12, 686/14, 686/16, 686/18, 686/20 00686/034 MICRO CROSS-ASSEMBLER M6800TEST S G MINI:M6801ASRTEST 5.0T3 106 MICRO_CROSS-ASSEMBLER.M68.S.027 1 LINE 68 7 PAGE UM FRONCZAK JULY 03, 1981 17:56:58 5.0T6 358 0 Test program for *M6800ASR (686/27). To test the M6800 operation, nothing special is required. To test the M6801 operation, *M6800ASR must be run with PAR=6801. 00686/035 MICRO CROSS-ASSEMBLER MCS650XTEST S G MINI:M650XASRTEST 5.0T3 107 MICRO_CROSS-ASSEMBLER.MCS.S.028 1 LINE 68 7 PAGE UM FRONCZAK JULY 03, 1981 17:56:59 5.0T6 359 0 Test program for *MCS650XASR (686/28). 00686/036 MICRO CROSS-ASSEMBLER I8080TEST S G MINI:I8080ASRTEST 5.0T3 108 MICRO_CROSS-ASSEMBLER.I80.S.029 1 LINE 68 6 PAGE UM FRONCZAK JULY 03, 1981 17:57:00 5.0T6 360 0 Test program for *I8080ASR (686/29). 00686/037 MICRO CROSS-ASSEMBLER Z80TEST S G MINI:Z80ASRTEST 5.0T3 109 MICRO_CROSS-ASSEMBLER.Z80.S.030 1 LINE 72 24 PAGE UM FRONCZAK JULY 03, 1981 17:57:01 5.0T6 361 0 Test program for *Z80ASR (686/30). 1 SUN SEP 08/96 15:24:55 Page 471 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00686/038 MICRO CROSS-ASSEMBLER M6809TEST S G MINI:M6809ASRTEST 5.0T3 110 MICRO_CROSS-ASSEMBLER.M68.S.031 1 LINE 71 9 PAGE UM FRONCZAK JULY 03, 1981 17:57:04 5.0T6 362 0 Test program for *M6809ASR (686/31). 00686/039C MICRO CROSS-ASSEMBLER PDP11TEST S G MINI:PDP11TEST 5.1T2 67 MICRO_CROSS-ASSEMBLER.PDP.S.039 1 LINE 71 10 PAGE UM FRONCZAK JULY 23, 1983 12:57:33 0 Test program for *PDP11ASR (686/32). 00686/040A MICRO CROSS-ASSEMBLER CON-TEST SA G MINI:DCSTEST 5.1T2 68 MICRO_CROSS-ASSEMBLER.CON.SA.040 1 LINE 73 6 PAGE UM FRONCZAK JULY 23, 1983 12:57:34 0 Assembler-independent test program for the constant processor, PROCCONS (686/7). 00686/041 MICRO CROSS-ASSEMBLER MACROTEST SA G MINI:MACTEST 5.0T3 112 MICRO_CROSS-ASSEMBLER.MAC.SA.033 1 LINE 68 7 PAGE UM FRONCZAK JULY 03, 1981 17:57:06 5.0T6 364 0 *M6809ASR-dependent test program for the macro processor (686/5). 00686/042A MICRO CROSS-ASSEMBLER MANUAL WF MINI:ASM.MAN 5.1T2 69 MICRO_CROSS-ASSEMBLER.MAN.WF.042 1 LINE 117 42 PAGE UM FRONCZAK JULY 23, 1983 12:57:34 0 Manual for usage of micro processor cross-assemblers. 0 Referenced by comments of: 686/43, 686/44 00686/043C MICRO CROSS-ASSEMBLER PDP11ASR DIFFS WF MINI:PDP11DIFS 5.1T2 70 MICRO_CROSS-ASSEMBLER.PDP.WF.043 1 LINE 88 6 PAGE UM FRONCZAK JULY 23, 1983 12:57:37 0 Writeup explaining the differences between *11ASR (515) and *PDP11ASR (686/32). This information will be included in the next verson of the Cross-Assemblers Users Manual (686/42). 0 Referenced by comments of: 686/32 00686/044 MICRO CROSS-ASSEMBLER MEMO 422 WF W098:M422SOURCE 5.0T3 114 MICRO_CROSS-ASSEMBLER.MEM.WF.035 1 LINE 97 37 PAGE UM FRONCZAK JULY 03, 1981 18:06:51 5.0T6 366 0 This is Computing Center Memo 422 -- "MTS Microprocessor Cross-Assemblers User's Guide." It does not reflect all features documented in (686/42). 00686/045 MICRO CROSS-ASSEMBLER MEMO 423 PF W098:M423OUTPUT 5.0T3 115 MICRO_CROSS-ASSEMBLER.MEM.PF.036 1 LINE 71 50 PAGE UM FRONCZAK JULY 03, 1981 18:06:55 5.0T6 367 0 This is Computing Center Memo 423 -- "Zilog Z-80 and TDL Mnemonics." 1 SUN SEP 08/96 15:24:55 Page 472 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00686/046A MICRO CROSS-ASSEMBLER PMF PROJ FILE D G MINI:PMF_XASM 5.1T2 71 MICRO_CROSS-ASSEMBLER.PMF.D.046 1 LINE 192 4 PAGE UM FRONCZAK JULY 23, 1983 12:57:37 0 PMF (810) project file which facilitates management of all the cross-assemblers. The PMF command "DESCRIBE PROJECT FULLY IN DEPTH" will explain the organization. 00687/001 PAR SUBR SA O S1560 5.0T3 VLO FSNAME=PAR_SUBR..SA.001(1) 117 5.0T3 117 PAR_SUBR..SA.001 1 LINE 72 1 PAGE UM OGDEN MAR. 23, 1978 15:53:44 5.0T6 369 0 SUBROUTINE TO GIVE FORTRAN USERS ACCESS TO THE $RUN PAR STRING. 0 Referenced by comments of: 540/16, 3024/31 00687/002 PAR SUBR OC O # (PART OF *LIBRARY) UM OGDEN 0 Object part of *LIBRARY (524/1) 00688/001 TRAP SUBR SA O TRAP S1153 UNSP VLO FSNAME=TRAP.S 5.0T3 118 TRAP_SUBR..SA.001 1 LINE 80 6 PAGE UM UNSP OCT. 28, 1975 23:42:21 5.0T6 370 0 EXPANDED VERSION OF UBC'S TRAP ROUTINE WHICH ALLOWS FORTRAN USERS TO FIELD PROGRAM INTERRUPTS. 0 Referenced by comments of: 689/1 00688/002 TRAP SUBR OC O # (PART OF UNSP:LIBRARY) UM UNSP 0 Part of UNSP:LIBRARY (685/2). 00688/003 TRAP SUBR WF S1153 UNSP VLO FSNAME=PROGTRAP.FMT 5.0T3 119 TRAP_SUBR..WF.003 1 LINE 71 3 PAGE UM UNSP SEP. 15, 1980 16:43:37 5.0T6 371 00689/001 ATRAP SUBR SA O ATRA S1153 UNSP VLO FSNAME=ATRAP.S 5.0T3 120 ATRAP_SUBR..SA.001 1 LINE 80 5 PAGE UM UNSP MAR. 23, 1976 12:19:34 5.0T6 372 0 SIMILAR TO THE TRAP SUBROUTINE (688), BUT ALLOWS FORTRAN USERS TO FIELD ATTENTION INTERRUPTS. 0 Referenced by comments of: 540/16 00689/002 ATRAP SUBR OC O # (PART OF UNSP:LIBRARY) UM UNSP 0 Part of UNSP:LIBRARY (685/2). 1 SUN SEP 08/96 15:24:55 Page 473 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00689/003 ATRAP SUBR WF S1153 UNSP VLO FSNAME=ATTNTRAP.FMT 5.0T3 121 ATRAP_SUBR..WF.003 1 LINE 71 3 PAGE UM UNSP SEP. 15, 1980 16:23:39 5.0T6 373 00690/001 DISASM SA S DASM S1153 UNSP VLO FSNAME=DISASM.S 5.0T3 122 DISASM..SA.001 1 LINE 80 147 PAGE UM UNSP APR. 15, 1976 01:14:16 5.0T6 374 0 A DISASSEMBLER FROM THE IBM/SHARE CONTRIBUTED PROGRAM LIBRARY (360D-05.3.001) VIA UQV. MODIFIED BY UM. ASSEMBLE USING *SYSMAC. 00690/002 DISASM OE S UNSP:DISASM 5.0T3 123 DISASM..OE.002 1 LINE 3364 16 PAGE UM UNSP JULY 03, 1981 18:10:51 5.0T6 375 UNSP:DISASM 00690/003 DISASM P UNSP:DISASM.W 5.0T3 124 DISASM..P.003 1 LINE 67 1 PAGE UM UNSP JULY 03, 1981 18:10:52 5.0T6 376 0 VOLUME 3-TYPE USER WRITEUP. 00690/004 DISASM P S1560 5.0T3 VLO FSNAME=DISASM..P.004(1) 125 5.0T3 125 DISASM..P.004 1 LINE 61 1 PAGE UM UNSP JULY 09, 1976 12:03:21 5.0T6 377 0 NOTES ON THE INTERNALS OF DISASM. 00691/001 PFILES # (OBSOLETE) D4T3 141 UM 0 Obsoleted by $FILESTATUS command. 00692/001 SPELER SUBR # (OBSOLETE) D4T3 143 SPELER_SUBR..SA.001 1 LINE 80 5 PAGE UBC OCT. 28, 1975 23:42:33 0 SUBROUTINE TO TEST TWO STRINGS AND DETERMINE IF THE SECOND IS A LIKELY MISSPELLING OF THE FIRST; SEE CACM, VOL 13, NO 2, FEB 1970. 00693/001 TAPEDRIVES SA G TDRI S1153 UNSP VLO FSNAME=TAPEDRIVES.S 5.0T3 126 TAPEDRIVES..SA.001 1 LINE 80 6 PAGE UBC UNSP JAN. 21, 1981 18:53:43 5.0T6 378 0 Program to print the number of free 7- and 9-track tape drives, and the number of jobs in the tape queue. Copies COPY:GLOBALS+COPY:LLMPSEQU, components (1026/3) and (087), respectively. 0 Referenced by comments of: 806/1 00693/002 TAPEDRIVES OE G UNSP:TAPEDRIVES 5.0T3 127 TAPEDRIVES..OE.002 1 LINE 915 1 PAGE UBC UNSP JULY 03, 1981 18:11:34 5.0T6 379 UNSP:TAPEDRIVES 1 SUN SEP 08/96 15:24:55 Page 474 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00693/003 TAPEDRIVES *TPS C *TPS 5.0T3 128 TAPEDRIVES.*TPS.C.003 1 LINE 33 1 PAGE UBC UNSP JULY 03, 1981 18:11:35 5.0T6 380 *TPS 0 OPERATOR FILE TO RUN UNSP:TAPEDRIVES. INVOKED BY ENTERING "MTS *TPS" ON OPERATORS CONSOLE. 00693/004 TAPEDRIVES P UNSP:TAPEDRIVES.W 5.0T3 129 TAPEDRIVES..P.004 1 LINE 67 1 PAGE UBC UNSP JULY 03, 1981 18:11:35 5.0T6 381 00694/001 DOC SF O DOC S1153 UNSP VLO FSNAME=DOC.S 5.0T3 130 DOC..SF.001 1 LINE 80 5 PAGE UM UNSP OCT. 03, 1975 16:46:13 5.0T6 382 0 A PROGRAM TO HELP PRODUCE PROGRAM AND SUBROUTINE DOCUMENTATION. 0 Referenced by comments of: 694/3, 694/4, 694/5 00694/002 DOC OE O UNSP:DOC 5.0T3 131 DOC..OE.002 1 LINE 2002 3 PAGE UM UNSP JULY 03, 1981 18:11:53 5.0T6 383 UNSP:DOC 00694/003 DOC DOCCOM D UNSP:DOCCOM 5.0T3 132 DOC.DOCCOM.D.003 1 LINE 35 1 PAGE UM UNSP JULY 03, 1981 18:11:53 5.0T6 384 UNSP:DOCCOM 0 A DATA FILE REFERENCED BY (694/1). 00694/004 DOC DOCCOM2 D UNSP:DOCCOM2 5.0T3 133 DOC.DOCCOM2.D.004 1 LINE 31 1 PAGE UM UNSP JULY 03, 1981 18:11:54 5.0T6 385 UNSP:DOCCOM2 0 A DATA FILE WHICH CAN BE USED WITH (694/1). 00694/005 DOC DOCCOM3 D UNSP:DOCCOM3 5.0T3 134 DOC.DOCCOM3.D.005 1 LINE 31 1 PAGE UM UNSP JULY 03, 1981 18:11:55 5.0T6 386 UNSP:DOCCOM3 0 A DATA FILE WHICH CAN BE USED WITH (694/1). 00694/006 DOC WF S1153 UNSP VLO FSNAME=DOC.FMT 5.0T3 135 DOC..WF.006 1 LINE 90 3 PAGE UM UNSP SEP. 15, 1980 16:42:49 5.0T6 387 00695/001 SNOOP SUBR SF G SNOO S1153 UNSP VLO FSNAME=SNOOP.S 5.0T3 136 SNOOP.SUBR.SF.001 1 LINE 80 3 PAGE UM UNSP JAN. 13, 1976 11:28:21 5.0T7 1 0 THIS SUBROUTINE IS CALLED (EITHER DIRECTLY OR VIA CSNOOP) BY MOST OF THE UM "UNSUPPORTED" SOFTWARE COMPONENTS TO RECORD PROGRAM USAGE STATISTICS. 0 Referenced by comments of: 686/1, 686/10, 686/12, 686/14, 686/16, 686/18, 686/20 1 SUN SEP 08/96 15:24:55 Page 475 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00695/002 SNOOP SUBR OC G # (PART OF UNSP:LIBRARY) UM UNSP 0 Part of UNSP:LIBRARY (685/2). 00695/003 SNOOP WRITEUP WF G S1153 UNSP VLO FSNAME=SNOOP.FMT 5.0T3 137 SNOOP.WRITEUP.WF.003 1 LINE 66 1 PAGE UM UNSP SEP. 15, 1980 16:43:41 5.0T7 2 00695/004 SNOOP CSNOOP SA O CSNO S1153 UNSP VLO FSNAME=CSNOOP.S 5.0T3 138 SNOOP.CSNOOP.SA.004 1 LINE 80 1 PAGE UM UNSP JUNE 21, 1976 13:03:43 5.0T7 3 0 A "MAIN" PROGRAM WHICH CALLS THE SNOOP SUBROUTINE AND THEN CALLS THE REAL MAIN PROGRAM. 00695/005 SNOOP CSNOOP OC O UNSP:CSNOOP.O 5.0T3 139 SNOOP.CSNOOP.OC.005 1 LINE 80 1 PAGE UM UNSP JULY 03, 1981 18:13:09 5.0T7 4 UNSP:CSNOOP.O 0 Referenced by comments of: 772/2, 773/3 00696/001 CDCEBCD SA O CDCE S1153 UNSP VLO FSNAME=CDCEBCD.S 5.0T3 140 CDCEBCD..SA.001 1 LINE 80 5 PAGE UM UNSP JULY 14, 1977 21:18:49 5.0T7 5 0 PROGRAM TO DEBLOCK CDC 6000 SERIES 7-TRACK SCOPE CODED TAPES AND CONVERT THE DATA FROM CDC "CONSOLE DISPLAY CODE" INTO EBCDIC. COPIES *SENSEDSECT (3025). 00696/002 CDCEBCD OC O UNSP:CDCEBCD 5.0T3 141 CDCEBCD..OC.002 1 LINE 80 3 PAGE UM UNSP JULY 03, 1981 18:13:11 5.0T7 6 UNSP:CDCEBCD 00696/003 CDCEBCD WF S1153 UNSP VLO FSNAME=CDCEBCD.FMT 5.0T3 142 CDCEBCD..WF.003 1 LINE 68 1 PAGE UM UNSP SEP. 15, 1980 16:42:42 5.0T7 7 00697/001 SIGFILE SF G SIGF S1153 UNSP VLO FSNAME=SIGFILE.S 5.0T3 143 SIGFILE..SF.001 1 LINE 80 4 PAGE UM UNSP JULY 14, 1977 21:18:46 5.0T7 8 0 A PROGRAM, SOMEWHAT LIKE UBC'S PROFILE PROGRAM, WHICH IS DESIGNED TO BE RUN FROM SIGFILES. 00697/002 SIGFILE OE G UNSP:SIGFILE 5.0T3 144 SIGFILE..OE.002 1 LINE 4632 3 PAGE UM UNSP JULY 03, 1981 18:13:47 5.0T7 9 UNSP:SIGFILE 00698/001 LIST # (OBSOLETE) D4T3 158 LIST..SF.001 1 LINE 80 3 PAGE UM JULY 02, 1977 12:29:01 D4T7 158 0 Obsoleted by LISTER (774). 1 SUN SEP 08/96 15:24:55 Page 476 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00699/001 FTNREP SA O FTNR S1153 UNSP VLO FSNAME=FTNREP.S 5.0T3 145 FTNREP..SA.001 1 LINE 80 4 PAGE UM UNSP DEC. 01, 1976 22:00:25 5.0T7 10 0 A PROGRAM WHICH COMPILES FORTRAN SOURCE BY LINKING TO *FTN (551) AND THEN EDITS THE OBJECT INTO EXISTING OBJECT FILES BY LINKING TO OBJREP (700). 0 Referenced by comments of: 700/1 00699/002 FTNREP OE O UNSP:FTNREP 5.0T3 146 FTNREP..OE.002 1 LINE 1382 3 PAGE UM UNSP JULY 03, 1981 18:13:49 5.0T7 11 UNSP:FTNREP 00699/003 FTNREP WF S1153 UNSP VLO FSNAME=FTNREP.FMT 5.0T3 147 FTNREP..WF.003 1 LINE 82 2 PAGE UM UNSP SEP. 15, 1980 16:43:01 5.0T7 12 00700/001 OBJREP SA O OBJR S1153 UNSP VLO FSNAME=OBJREP.S 5.0T3 148 OBJREP..SA.001 1 LINE 80 16 PAGE UM UNSP OCT. 03, 1975 16:46:40 5.0T7 13 0 AN OBJECT FILE EDITOR/UPDATER WHICH IS LINKED TO BY FTNREP (699) OR CAN BE RUN DIRECTLY. NO WRITEUP IS AVAILABLE. 0 Referenced by comments of: 699/1 00700/002 OBJREP OE O UNSP:FTNRE* 5.0T3 149 OBJREP..OE.002 1 LINE 4358 3 PAGE UM UNSP JULY 03, 1981 18:14:29 5.0T7 14 UNSP:FTNRE* 00701/001A ECMD SF O S1153 UNSP VLO FSNAME=ECMD.S 5.1T2 72 ECMD..SF.001 1 LINE 94 17 PAGE UM UNSP SEP. 22, 1982 09:07:08 0 A SIMPLE COMMAND EXPANDER WHICH ALLOWS ALL MTS COMMANDS TO MAKE USE OF THE NOTATION ACCEPTED BY $FILESTATUS. CALLS THE FSTARTNS SUBROUTINE (701/2). *********************************************************************************** D5.1 changes: Now calls COMMAND instead of CMD and checks if an attention occured rather than waiting 3 seconds between commands. *********************************************************************************** 00701/002 ECMD FSTARTNS SUBR SA O S1153 UNSP VLO FSNAME=FSTARTN.S 5.0T3 151 ECMD.FSTARTNS_SUBR.SA.002 1 LINE 80 18 PAGE UM UNSP JULY 10, 1976 17:44:16 5.0T7 16 0 ROUTINES TAKEN FROM $FILESTATUS TO SCAN FILE CATALOG FOR PARTIAL FILENAMES. 0 Referenced by comments of: 701/1 1 SUN SEP 08/96 15:24:55 Page 477 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00701/003A ECMD OE O UNSP:ECMD 5.1T2 73 ECMD..OE.003 1 LINE 13064 7 PAGE UM UNSP JULY 23, 1983 12:59:40 UNSP:ECMD 00701/004 ECMD WF S1153 UNSP VLO FSNAME=ECMD.FMT 5.0T3 153 ECMD..WF.004 1 LINE 135 3 PAGE UM UNSP SEP. 15, 1980 16:42:51 5.0T7 18 00702/001 MCCTOCC SA G MCCT S1153 UNSP VLO FSNAME=MCCTOCC.S 5.0T3 154 MCCTOCC..SA.001 1 LINE 80 3 PAGE UM UNSP SEP. 30, 1975 11:00:22 5.0T7 19 0 PROGRAM TO CONVERT MACHINE CARRIAGE CONTROL TO LOGICAL CARRIAGE CONTROL. 00702/002 MCCTOCC OE G UNSP:MCCTOCC 5.0T3 155 MCCTOCC..OE.002 1 LINE 1382 3 PAGE UM UNSP JULY 03, 1981 18:15:10 5.0T7 20 UNSP:MCCTOCC 00702/003 MCCTOCC WF S1153 UNSP VLO FSNAME=MCCTOCC.FMT 5.0T3 156 MCCTOCC..WF.003 1 LINE 72 1 PAGE UM UNSP SEP. 15, 1980 16:43:30 5.0T7 21 00703/001 DIGLIB PERSYS SF G PERS S1153 UNSP VLO FSNAME=PERSYS.S 5.0T3 157 DIGLIB.PERSYS.SF.001 1 LINE 80 16 PAGE UM UNSP AUG. 30, 1976 15:52:15 5.0T7 22 0 DIGLIB IS A LIBRARY OF DEVICE INDEPENDENT GRAPHICS (DIG) SUBROUTINES. THE PERSYS ROUTINES PRODUCE COORDINATE PAIRS FOR THE STRAIGHT-LINE VECTORS FORMING A TWO-DIMENSIONAL VIEW OF A THREE-DIMENSIONAL SURFACE. 00703/002 DIGLIB PERSYS WRITEUP WF G S1153 UNSP VLO FSNAME=PERSYS.F 5.0T3 158 DIGLIB.PERSYS_WRITEUP.WF.002 1 LINE 195 15 PAGE UM UNSP AUG. 30, 1976 15:52:33 5.0T7 23 0 CONTAINS A "$CONTINUE WITH PERSYS.S(---)" RECORD. 00703/003 DIGLIB CONSYS SF G CONS S1153 UNSP VLO FSNAME=CONSYS.S 5.0T3 159 DIGLIB.CONSYS.SF.003 1 LINE 80 18 PAGE UM UNSP AUG. 30, 1976 15:51:52 5.0T7 24 0 THE CONSYS ROUTINES PRODUCE COORDINATE PAIRS FOR THE STRAIGHT-LINE VECTORS FORMING A CONTOUR MAP. 00703/004 DIGLIB CONSYS WRITEUP WF G S1153 UNSP VLO FSNAME=CONSYS.F 5.0T3 160 DIGLIB.CONSYS_WRITEUP.WF.004 1 LINE 221 17 PAGE UM UNSP AUG. 30, 1976 23:21:01 5.0T7 25 0 CONTAINS A "$CONTINUE WITH CONSYS.S(---)" RECORD. 1 SUN SEP 08/96 15:24:55 Page 478 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00703/005 DIGLIB OBJECT LIB OL G UNSP:DIGLIB 5.0T3 161 DIGLIB.OBJECT_LIB.OL.005 1 LINE 5024 7 PAGE UM UNSP JULY 03, 1981 18:16:07 5.0T7 26 UNSP:DIGLIB 00703/006 DIGLIB WF S1153 UNSP VLO FSNAME=DIGLIB.FMT 5.0T3 162 DIGLIB..WF.006 1 LINE 67 1 PAGE UM UNSP SEP. 15, 1980 16:42:45 5.0T7 27 00704/001 11PAL SIMULATOR SA SIMU S1153 UNSP VLO FSNAME=11SIMULATOR.S 5.0T3 163 11PAL.SIMULATOR.SA.001 1 LINE 80 35 PAGE UNE UNSP MAY 17, 1977 21:55:21 5.0T7 28 0 A PDP-11 ASSEMBLER AND SIMULATOR WHICH ORIGINALLY CAME FROM THE POLYTECHNIC INSTITUTE OF BROOKLYN (NEW YORK) -- ADAPTED FOR MTS BY UNE. 00704/002 11PAL ASSEMBLER SA ASSE S1153 UNSP VLO FSNAME=11ASSEMBLER.S 5.0T3 164 11PAL.ASSEMBLER.SA.002 1 LINE 80 63 PAGE UNE UNSP MAY 17, 1977 21:55:33 5.0T7 29 00704/003 11PAL MONITOR SA MONI S1153 UNSP VLO FSNAME=11MONITOR.S 5.0T3 165 11PAL.MONITOR.SA.003 1 LINE 80 14 PAGE UNE UNSP OCT. 22, 1976 12:34:15 5.0T7 30 00704/004 11PAL OBJECT OE UNSP:11PAL 5.0T3 166 11PAL.OBJECT.OE.004 1 LINE 14130 9 PAGE UNE UNSP JULY 03, 1981 18:17:02 5.0T7 31 UNSP:11PAL 00704/005 11PAL WRITEUP WF S1153 UNSP VLO FSNAME=11PAL.F 5.0T3 167 11PAL.WRITEUP.WF.005 1 LINE 95 15 PAGE UNE UNSP OCT. 22, 1976 12:33:13 5.0T7 32 00706/001 SIMSCRIPT SIM25 INSTALL WF S1153 UNSP VLO FSNAME=S25INSTALL.F 5.0T3 168 SIMSCRIPT.SIM25_INSTALL.WF.001 1 LINE 71 3 PAGE UM UNSP FEB. 26, 1981 09:32:03 5.0T7 33 0 Installation instructions for the CACI Inc. SIMSCRIPT II.5 compiler, Release 8G, as modified for use in MTS. Due to restrictions, this compiler cannot be distributed, but should be available "free" to universities once an agreement with CACI Inc. is signed. Some of the following components are versions of copyrighted CACI software converted for use with MTS. Without permission from CACI Inc., redistribution should be limited to installations receiving distributions of MTS. 00706/002 SIMSCRIPT SIM25 SPCOMP SA G S1153 UNSP VLO FSNAME=S25SPCOMP.S 5.0T3 169 SIMSCRIPT.SIM25_SPCOMP.SA.002 1 LINE 80 12 PAGE UM UNSP JAN. 04, 1979 05:19:17 5.0T7 34 0 MTS REPLACEMENTS FOR THE STANDARD CACI COMPILER ROUTINES ROPN AND RSET$R. ASSEMBLE WITH PAR=BATCH. 1 SUN SEP 08/96 15:24:55 Page 479 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00706/003 SIMSCRIPT SIM25 SPCOMP OC G S1153 UNSP VLO FSNAME=S25SPCOMP 5.0T3 170 SIMSCRIPT.SIM25_SPCOMP.OC.003 1 LINE 80 5 PAGE UM UNSP JAN. 04, 1979 05:19:20 5.0T7 35 00706/004 SIMSCRIPT SIM25 SPLIB SA G S1153 UNSP VLO FSNAME=S25SPLIB.S 5.0T3 171 SIMSCRIPT.SIM25_SPLIB.SA.004 1 LINE 80 40 PAGE UM UNSP JAN. 04, 1979 05:19:22 5.0T7 36 0 MTS REPLACEMENTS FOR THE STANDARD CACI RUN-TIME LIBRARY AND COMPILER ROUTINES RCRE, RDATE, RPUT, RRDR, RRWD, RSTP, LKAH, LERR, AND THE RUN-TIME LIBRARY ROUTINES ROPN AND RSET$R. ASSEMBLE WITH PAR=BATCH. 00706/005 SIMSCRIPT SIM25 SPLIB OC G S1153 UNSP VLO FSNAME=S25SPLIB 5.0T3 172 SIMSCRIPT.SIM25_SPLIB.OC.005 1 LINE 80 9 PAGE UM UNSP JAN. 04, 1979 05:20:34 5.0T7 37 00706/006 SIMSCRIPT SIM25 INTERFAC SA G S25I S1153 UNSP VLO FSNAME=S25INTER.S 5.0T3 173 SIMSCRIPT.SIM25_INTERFAC.SA.006 1 LINE 80 10 PAGE UM UNSP JAN. 04, 1979 05:20:57 5.0T7 38 0 THE MTS TO OS INTERFACE ROUTINES THAT ARE ADDED TO THE STANDARD CACI RUN-TIME LIBRARY AND COMPILER ROUTINES. ASSEMBLE WITH PAR=BATCH. COPIES *GDINFODSECT (594). 00706/007 SIMSCRIPT SIM25 INTERFAC OC G S1153 UNSP VLO FSNAME=S25INTER 5.0T3 174 SIMSCRIPT.SIM25_INTERFAC.OC.007 1 LINE 80 6 PAGE UM UNSP JAN. 04, 1979 05:21:07 5.0T7 39 00706/008 SIMSCRIPT SIM25 MAC SM G S1153 UNSP VLO FSNAME=S25MAC 5.0T3 175 SIMSCRIPT.SIM25_MAC.SM.008 1 LINE 80 12 PAGE UM UNSP JAN. 04, 1979 05:21:19 5.0T7 40 00706/009 SIMSCRIPT SIM25 CACI COM OC G # S1153 UNSP VLO FSNAME=S25CACICOMP UM UNSP 0 OS OBJECT AND LINKAGE EDITOR CONTROL CARDS FOR THE RELEASE 8G COMPILER AS DISTRIBUTED BY CACI. 0 Referenced by comments of: 706/10 00706/010 SIMSCRIPT LIB PATCH S G S1153 UNSP VLO FSNAME=S25UPLIB.S25 5.0T3 176 SIMSCRIPT.LIB_PATCH.S.010 1 LINE 49 1 PAGE UM UNSP FEB. 26, 1981 09:49:00 5.0T7 41 0 A replacement for the CACI subroutine RX$EV$S (a.k.a. X.EV.S) in (706/9). Note that the source will generate two object modules. One of these should be deleted. 00706/011 SIMSCRIPT LIB PATCH O G S1153 UNSP VLO FSNAME=S25UPLIB.OBJ 5.0T3 177 SIMSCRIPT.LIB_PATCH.O.011 1 LINE 272 1 PAGE UM UNSP FEB. 26, 1981 09:50:01 5.0T7 42 1 SUN SEP 08/96 15:24:55 Page 480 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00706/012 SIMSCRIPT SIM25 COMP OE G # UNSP:SIM25 UM UNSP 0 LINKEDITED OBJECT FOR THE MTS VERSION OF THE RELEASE 8G COMPILER. 0 Referenced by comments of: 706/13 00706/013 SIMSCRIPT SIM25 MAP P G # S1153 UNSP VLO FSNAME=S25MAP UM UNSP 0 MAP OUTPUT FROM *LINKEDIT (297) FOR (706/12). 00706/014 SIMSCRIPT SIM25 CACI LIB OC G # S1153 UNSP VLO FSNAME=S25CACILIB UM UNSP 0 OS OBJECT AND LINKAGE EDITOR CONTROL CARDS FOR THE RELEASE 8G RUN-TIME LIBRARY AS DISTRIBUTED BY CACI. 00706/015 SIMSCRIPT SIM25 LIB OL G # UNSP:SIM25LIB UM UNSP 0 MTS VERSION OF THE RELEASE 8G RUN-TIME LIBRARY. 00706/016 SIMSCRIPT SIM25 ERRMSGS M UNSP:SIM25ERR 5.0T3 178 SIMSCRIPT.SIM25_ERRMSGS.M.016 1 LINE 79 4 PAGE UM UNSP JULY 03, 1981 18:18:42 5.0T7 43 UNSP:SIM25ERR 0 ERROR MESSAGE FILE FOR RELEASE 8G. 00706/017 SIMSCRIPT SIM25 WRITEUP WF S1153 UNSP VLO FSNAME=SIM25.F 5.0T3 179 SIMSCRIPT.SIM25_WRITEUP.WF.017 1 LINE 69 3 PAGE UM UNSP JAN. 04, 1979 06:08:16 5.0T7 44 00706/018 SIMSCRIPT SIM25 TEST 1 S G S1153 UNSP VLO FSNAME=S2TEST1 5.0T3 180 SIMSCRIPT.SIM25_TEST_1.S.018 1 LINE 78 1 PAGE UM UNSP JAN. 09, 1979 12:28:22 5.0T7 45 0 FIRST OF THREE SIMSCRIPT SOURCE TEST PROGRAMS. 00706/019 SIMSCRIPT SIM25 TEST 2 S G S1153 UNSP VLO FSNAME=S2TEST2 5.0T3 181 SIMSCRIPT.SIM25_TEST_2.S.019 1 LINE 68 1 PAGE UM UNSP JAN. 09, 1979 12:28:28 5.0T7 46 00706/020 SIMSCRIPT SIM25 TEST 3 S G S1153 UNSP VLO FSNAME=S2TEST3 5.0T3 182 SIMSCRIPT.SIM25_TEST_3.S.020 1 LINE 68 1 PAGE UM UNSP JAN. 09, 1979 12:28:33 5.0T7 47 0 COMPILE WITH PAR=NEWIF. 00706/021 SIMSCRIPT SAMPLES S G S1153 UNSP VLO FSNAME=S25SAMPLES1 5.0T3 183 SIMSCRIPT.SAMPLES.S.021 1 LINE 80 22 PAGE UM UNSP FEB. 26, 1981 09:33:56 5.0T7 48 0 This and the following two subcomponents contain many sample SIMSCRIPT 1 SUN SEP 08/96 15:24:55 Page 481 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 programs. The documentation for these is in (706/24). 00706/022 SIMSCRIPT SAMPLES S G S1153 UNSP VLO FSNAME=S25SAMPLES2 5.0T3 184 SIMSCRIPT.SAMPLES.S.022 1 LINE 80 5 PAGE UM UNSP FEB. 26, 1981 09:34:11 5.0T7 49 00706/023 SIMSCRIPT SAMPLES S G S1153 UNSP VLO FSNAME=S25SAMPLES3 5.0T3 185 SIMSCRIPT.SAMPLES.S.023 1 LINE 80 10 PAGE UM UNSP FEB. 26, 1981 09:34:18 5.0T7 50 00706/024 SIMSCRIPT SAMPLES P S1153 UNSP VLO FSNAME=S25SAMPLES 5.0T3 186 SIMSCRIPT.SAMPLES.P.024 1 LINE 82 3 PAGE UM UNSP FEB. 26, 1981 09:33:03 5.0T7 51 0 Referenced by comments of: 706/21 00707/001 RSCAN SA O W030:RSCAN 5.0T3 187 RSCAN..SA.001 1 LINE 69 12 PAGE UM LIFT JULY 03, 1981 18:19:38 5.0T7 52 0 PROGRAM TO PRINT MTS COMMANDS FOR JOBS BASED ON USER ID, JOB NUMBER, OR MTS COMMAND NAME FOR A SET OF TIME/DATE RANGES. COPIES COPY:CMDAREADSECT (531/20). ASSEMBLE USING COPY:MTS.MACROS (344/3). RSCAN IS SLOWLY BEING REPLACE BY SCAN (753). 0 Referenced by comments of: 707/3 00707/002 RSCAN LISTCMD SUBR SA G S0811 REBATE 'REBATES' FSNAME=LISTCMD 5.0T3 188 RSCAN.LISTCMD_SUBR.SA.002 1 LINE 66 1 PAGE UM LIFT NOV. 28, 1977 20:57:17 5.0T7 53 0 SUBROUTINE TO LIST CMDSTAT TYPE 1 (MTS COMMAND) RECORDS. COPIES COPY:CMDAREADSECT (531/20). 0 Referenced by comments of: 707/3 00707/003 RSCAN OC O W030:RSCANX 5.0T3 189 RSCAN..OC.003 1 LINE 80 10 PAGE UM LIFT JULY 03, 1981 18:19:43 5.0T7 54 0 OBJECT FROM RSCAN (707/1), LISTCMD (707/2), LISTSTAT (071), AND JVCT (674). RUN WITH PROT=OFF. 00707/004 RSCAN WRITEUP WF S0811 REBATE 'REBATES' FSNAME=RSCAN.WF 5.0T3 190 RSCAN.WRITEUP.WF.004 1 LINE 94 3 PAGE UM LIFT JAN. 13, 1977 16:33:14 5.0T7 55 0 PRELIMINARY WRITEUP DESCRIBING THE USE OF RSCAN. 00708/001A CHARGE SUBR SA G CHRG S0027 DISTRB FSNAME=CHARGE 5.1T2 74 CHARGE_SUBR..SA.001 1 LINE 80 8 PAGE UM ENGLE AUG. 26, 1982 10:34:40 0 SUBROUTINE TO COMPUTE THE CHARGE FOR SPECIFIED QUANTITIES OF RESOURCES USING THE CURRENT RATES. CHARGERN IS A PRIVATE ENTRY POINT WHICH ALLOWS A SPECIFIC RATE 1 SUN SEP 08/96 15:24:55 Page 482 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 NUMBER TO BE SPECIFIED. COPIES GRDEF (104/83) AND COPY:RATEVEC (651/3). 00708/002C CHARGE SUBR UC G S0027 DISTRB FSNAME=CHARGEUPD 5.1T2 75 CHARGE_SUBR..UC.002 1 LINE 74 1 PAGE UM ENGLE AUG. 26, 1982 10:34:50 0 Updates source from previous regular distribution to current one. 00708/003A CHARGE SUBR OC G # (PART OF RESIDENT SYSTEM) UM ENGLE 0 Object part of Resident System (468). 00709/001 READBFR SUBR SA G S1560 5.0T3 VLO FSNAME=READBFR_SUBR..SA.001(1) 192 5.0T3 192 READBFR_SUBR..SA.001 1 LINE 80 3 PAGE UM MTA JULY 28, 1977 23:52:05 5.0T7 57 0 SUBROUTINE TO PROVIDE "LOCATE MODE" INPUT WHEN INPUT RECORD LENGTH IS UNKNOWN. USES GDINFO AND @NOTIFY TO ALLOCATE INPUT BUFFER. CALLED BY SELECTCMD (531/34). COPIES *GDINFODSECT (594). 0 Referenced by comments of: 531/34, 621/4, 718/2 00709/002 READBFR SUBR OC G # (PART OF *LIBRARY) UM MTA 0 Object part of *LIBRARY (524/1) 00710/001 SQUASH # (OBSOLETE) D4T3 209 SQUASH..SA.001 1 LINE 80 6 PAGE UM JULY 28, 1977 23:52:07 0 Obsoleted by *OBJUTIL (721). 00711/001A COMP CNTR PUBLICATIONS MEMO LIST P *CCMEMOS 5.1T2 76 COMP_CNTR_PUBLICATIONS.ME.P.001 1 LINE 70 3 PAGE UM WOLFSON JULY 23, 1983 13:01:49 *CCMEMOS 0 This is the list of current Computing Center Memos. 00711/002A COMP CNTR PUBLICATIONS COMP CNTR PUBS P *CCPUBLICATIONS 5.1T2 77 COMP_CNTR_PUBLICATIONS.CO.P.002 1 LINE 70 1 PAGE UM WOLFSON JULY 23, 1983 13:01:50 *CCPUBLICATIONS 0 This is the list of current Computing Center publications. 00711/003C COMP CNTR PUBLICATIONS MEMO 428 WF S0672 CCMEMO 'CCMEMOS' FSNAME=M428 5.1T2 78 COMP_CNTR_PUBLICATIONS.ME.WF.003 1 LINE 221 6 PAGE UM WOLFSON JULY 09, 1982 09:33:51 0 This is Computing Center Memo 428 -- "Basic Use of the Keypunch and Cardreader." 0 Referenced by comments of: 711/4 1 SUN SEP 08/96 15:24:55 Page 483 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00711/004C COMP CNTR PUBLICATIONS MEMO 428 PF S0672 CCMEMO 'CCMEMOS' FSNAME=M428.OUTPUT 5.1T2 79 COMP_CNTR_PUBLICATIONS.ME.PF.004 1 LINE 135 8 PAGE UM WOLFSON JULY 09, 1982 09:34:06 0 Printer-ready version of (711/3). 00711/005 COMP CNTR PUBLICATIONS INDEX FUNC SA O S0791 FMTJNK 'FORMAT' FSNAME=INDEX 5.0T3 195 COMP_CNTR_PUBLICATIONS.IN.SA.003 1 LINE 80 7 PAGE UM LIFT OCT. 10, 1977 11:14:23 5.0T7 60 0 *FORMAT INDEX AND INDEXOUT FUNCTIONS USED IN UM PUBLICATIONS. THESE ARE CALLED BY THE IND AND INDOUT FUNCTIONS (711/6) TO CONSTRUCT AN INDEX. THE CALLING SEQUENCE IS DESCRIBED IN THE SOURCE. 0 Referenced by comments of: 711/6, 711/8 00711/006 COMP CNTR PUBLICATIONS IND FUNC SG O S0791 FMTJNK 'FORMAT' FSNAME=IND 5.0T3 196 COMP_CNTR_PUBLICATIONS.IN.SG.004 1 LINE 80 4 PAGE UM LIFT OCT. 10, 1977 11:14:19 5.0T7 61 0 *FORMAT IND AND INDOUT "USER-DEFINED FUNCTIONS" USED IN UM PUBLICATIONS TO CONSTRUCT AN INDEX. THESE DIFFER FROM THE *FORMAT INDEX FUNCTION IN THAT PAGE NUMBERS ARE EXPLICITLY GIVEN AND TREATED AS CHARACTER STRINGS, AND ENTRIES ARE ALPHABETIZED WITHOUT REGARD TO UPPER OR LOWER CASE. THESE FUNCTIONS CALL INDEX AND INDEXOUT (711/5). 0 Referenced by comments of: 711/5, 711/8 00711/007 COMP CNTR PUBLICATIONS NRIGHT FUNC SF G S0791 FMTJNK 'FORMAT' FSNAME=NRIGHT 5.0T3 197 COMP_CNTR_PUBLICATIONS.NR.SF.005 1 LINE 53 1 PAGE UM LIFT MAY 16, 1977 12:33:05 5.0T7 62 0 *FORMAT NRIGHT "USER-DEFINED FUNCTION" USED IN UM PUBLICATIONS TO GO TO A RIGHT HAND PAGE, LEAVING A BLANK PAGE IF NECESSARY. 0 Referenced by comments of: 711/8 00711/008 COMP CNTR PUBLICATIONS FUNC LIB OL O ETC:FORMFUN 5.0T3 198 COMP_CNTR_PUBLICATIONS.FU.OL.006 1 LINE 1762 3 PAGE UM LIFT JULY 03, 1981 18:21:55 5.0T7 63 ETC.:FORMFUN 0 OBJECT LIBRARY OF *FORMAT "USER-DEFINED FUNCTIONS" (711/5), (711/6), AND (711/7). 0 Referenced by comments of: 461/22 00711/009 COMP CNTR PUBLICATIONS TXTF MACROS WX W278:MEMO.LAYOUT 5.0T3 199 COMP_CNTR_PUBLICATIONS.TX.WX.007 1 LINE 115 1 PAGE UM LIFT JULY 03, 1981 18:21:56 5.0T7 64 0 Referenced by comments of: 756/4 1 SUN SEP 08/96 15:24:55 Page 484 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00711/010C COMP CNTR PUBLICATIONS WKSP TXTF MACS WX WKSP:TXTFMAC 5.1T2 80 COMP_CNTR_PUBLICATIONS.WK.WX.010 1 LINE 66 1 PAGE UM LIFT JULY 23, 1983 13:05:13 0 Textform macros for workshop papers. 00711/011C COMP CNTR PUBLICATIONS WKSP FMT MACS WF WKSP:FMTMAC 5.1T2 81 COMP_CNTR_PUBLICATIONS.WK.WF.011 1 LINE 64 1 PAGE UM LIFT JULY 23, 1983 13:05:14 0 FMT macros for workshop papers. 00711/012C COMP CNTR PUBLICATIONS COMP CNTR NEWS # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the Computing Center Newsletters associated with D5.1 (Vol.11, n. 15, through Vol. 13, n. 12). Only hard copies of this component are distributed. 00711/013C COMP CNTR PUBLICATIONS COPYRIGHT OK # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the Permission to Reproduce Computing Center Publications. Only hard copies of this component are distributed. 00711/014C COMP CNTR PUBLICATIONS MTS REF SUMM # (HARD COPY ONLY DISTRIBUTED) UM SWEET 0 This is the MTS Reference Summary. Only hard copies of this component are distributed. 00712/001 *RESTORE MAIN PGM SA G RSTR:RESTORE(-10000,-1) 5.0T3 200 RESTORE.MAIN_PGM.SA.001 1 LINE 72 13 PAGE UM HELFFRICH AUG. 06, 1981 05:24:44 5.0T7 65 RSTR:RESTORE 0 User runnable program to restore files saved by the system online FILESAVE program. Calls AUTOREST (712/3), and RSTFMT2 (092/3). Assemble using the FILESAVE macros (067/35). NOTE: The directory files RSTR:FILEDIR.MAC, RSTR:FILEDIR.NEW, and RSTR:TAPEDIR accessed by this program must be permitted READ to PKEY=*RESTORE, UNLIM to RSTR, and RW to PKEY=DEADUCATDES. 0 Referenced by comments of: 67/23, 92/3, 712/2, 712/3, 712/4 00712/002C *RESTORE MAIN PGM UC G RSTR:RESTORE(1000) 5.1T2 82 RESTORE.MAIN_PGM.UC.002 1 LINE 72 5 PAGE UM HELFFRICH JULY 23, 1983 13:05:14 0 Update deck to be applied to (712/1) to yield current source. ******************************************************************** D5.1 version: Checks for validity of new file name and only allows user IDs RSTR and MTS to restore files across accounts. ******************************************************************** 1 SUN SEP 08/96 15:24:55 Page 485 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00712/003 *RESTORE AUTOREST SUBR SA G RSTR:AUTOREST(1000) 5.0T3 201 RESTORE.AUTOREST_SUBR.SA.002 1 LINE 72 6 PAGE UM HELFFRICH AUG. 06, 1981 05:25:04 5.0T7 66 RSTR:AUTOREST 0 Subroutine which takes a list of files from the main program (712/1) and mounts and scans tapes calling RSTFMT2 (092/3) to restore files. Assemble with the FILESAVE macros (067/35). 0 Referenced by comments of: 712/1, 712/4 00712/004A *RESTORE OBJECT OE G *RESTORE 5.1T2 83 RESTORE.OBJECT.OE.004 1 LINE 7068 7 PAGE UM HELFFRICH JULY 23, 1983 13:05:15 RSTR:*RESTORE 0 OBJECT FOR (712/1), (712/3), AND RSTFMT2 (092/3). NOTE: THE PKEY FOR THIS FILE MUST BE *RESTORE. 0 Referenced by comments of: 712/5 00712/005 *RESTORE *RES C *RES 5.0T3 203 RESTORE.?RES.C.004 1 LINE 64 1 PAGE UM HELFFRICH AUG. 06, 1981 05:25:08 5.0T7 68 RSTR:*RES 0 COMMAND FILE TO RUN *RESTORE (712/4) FOR THE OPERATORS. INVOKED BY ENTERING "MTS *RES" ON THE OPERATOR'S CONSOLE. 00713/001 UPTIME # (PART OF SYSTEM WATCHERS) UM 0 Part of System Watchers (540/23) and (540/24) 00714/001 INTRO GUIDE: FORMAT WF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=FMT80.SOU 5.0T3 204 INTRO_GUIDE:_FORMAT..WF.001 1 LINE 173 38 PAGE UM MANUAL SEP. 30, 1980 13:58:08 5.0T7 69 0 FORMAT SOURCE FOR "INTRODUCTION TO FORMAT," OCT. 1980, THE SECOND IN A SERIES OF MTS INTRODUCTORY GUIDES. 00714/002 INTRO GUIDE: FORMAT PF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=FMT80.OUT 5.0T3 205 INTRO_GUIDE:_FORMAT..PF.002 1 LINE 83 66 PAGE UM MANUAL SEP. 30, 1980 13:58:16 5.0T7 70 0 FORMAT PRINT FILE. 00715/001C MERIT CC SUPPORT MINOS D G K1Y9:MINOS.AN 5.1T2 84 MERIT_CC_SUPPORT.MINOS.D.001 1 LINE 32767 15 PAGE UM ROTHWELL JULY 23, 1983 13:05:16 0 -------------------------------------------------------------------- This component is the *PDP11ASR (686/32) source for the MINOS, the Merit Network Operating System, related utility programs and command files. Included is the necessary PDP-11 code for MTS (IBM/Amdahl). Anyone considering assembling these components ought to use the ID K1Y9 (it will make life a great deal easier)! 1 SUN SEP 08/96 15:24:55 Page 486 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This system runs in all Merit Communications Computers (CC), both Primary Communications Processors (PCP) and Secondary Communications Processors (SCP). -------------------------------------------------------------------- (715/1) is a core image, suitable for loading with MNET:11LOAD (642/8). 0 Referenced by comments of: 715/1, 861/13, 861/14 00715/002C MERIT CC SUPPORT MAP D G K1Y9:MAP.AN 5.1T2 85 MERIT_CC_SUPPORT.MAP.D.002 1 LINE 131 25 PAGE UM ROTHWELL JULY 23, 1983 13:05:17 0 Map output from *LINK11 (516) both by name and by value. 00715/003C MERIT CC SUPPORT TAPE D G K1Y9:TAPES.AN 5.1T2 86 MERIT_CC_SUPPORT.TAPE.D.003 1 LINE 247 14 PAGE UM ROTHWELL JULY 23, 1983 13:05:18 0 Tape image from *LINK11 (516) with first X'00' changed to X'0C' to signal high core ROM. 00715/004C MERIT CC SUPPORT TRACE OFF G K1Y9:TRACEOFF.S 5.1T2 87 MERIT_CC_SUPPORT.TRACE_OF..004 1 LINE 55 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:18 0 Dummy module to set RTSPC tracing off. See RTRACE (715/26). 00715/005C MERIT CC SUPPORT MINOS MACROS SM G K1Y9:MINOSMACS 5.1T2 88 MERIT_CC_SUPPORT.MINOS_MA.SM.005 1 LINE 100 49 PAGE UM ROTHWELL JULY 23, 1983 13:05:19 0 Macro library with copy sections, dsects and software macros for use with *PDP11ASR (686/32). Contains a $CONTINUE WITH *SPITDEBUG (590/9) record. 0 Referenced by comments of: 715/10, 715/11, 715/12, 715/13, 715/14, 715/15, 715/16, 715/17, 715/18, 715/19, 715/20, 715/21, 715/26, 715/27, 715/28, 715/29, 715/30, 715/31, 715/32, 715/33, 715/34, 715/35, 715/36, 715/37, 715/39, 715/40, 715/41, 715/42, 715/46, 715/47, 715/48, 715/49, 715/50, 715/51, 715/52, 715/53, 715/54, 715/55, 715/56, 715/57, 715/58, 715/59, 715/60, 860/1, 860/2, 860/3, 860/4, 860/5, 860/6, 860/7, 861/11, 861/14, 861/20 00715/006C MERIT CC SUPPORT ASMTIDY C O K1Y9:ASMTIDY(0,.999) 5.1T2 89 MERIT_CC_SUPPORT.ASMTIDY.C.006 1 LINE 73 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:21 0 Commands to assemble (715/7), the PDP11ASR tidier. 00715/007C MERIT CC SUPPORT ASMTIDY S* O K1Y9:ASMTIDY(1000) 5.1T2 90 MERIT_CC_SUPPORT.ASMTIDY.S?.007 1 LINE 125 11 PAGE UM ROTHWELL JULY 23, 1983 13:05:22 0 SNOSTORM source for *PDP11ASR (686/32) source code tidier. ASMTIDY tidies *PDP11ASR source code, converts syntax of some macros from old to new. Not a public file because it changes too fast and is too specialized, but possibly a good place to start for your own tidier. 0 Referenced by comments of: 715/6, 715/8 1 SUN SEP 08/96 15:24:55 Page 487 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00715/008C MERIT CC SUPPORT ASMTIDY OC O K1Y9:ASMTIDY(0,999) 5.1T2 91 MERIT_CC_SUPPORT.ASMTIDY.OC.008 1 LINE 32767 29 PAGE UM ROTHWELL JULY 23, 1983 13:05:22 0 Object of (715/7). 00715/009C MERIT CC SUPPORT HDWARE EQUS SM G K1Y9:HDWEQUS 5.1T2 92 MERIT_CC_SUPPORT.HDWARE_E.SM.009 1 LINE 89 26 PAGE UM ROTHWELL JULY 23, 1983 13:05:23 0 Hardware related dsects and copy sections. Contains descriptions of hardware registers for all peripherals used by Merit PDP-11's. 0 Referenced by comments of: 715/10, 715/11, 715/12, 715/13, 715/14, 715/15, 715/16, 715/17, 715/18, 715/19, 715/20, 715/21, 715/26, 715/27, 715/28, 715/29, 715/30, 715/31, 715/32, 715/33, 715/34, 715/35, 715/36, 715/37, 715/39, 715/40, 715/41, 715/42, 715/46, 715/47, 715/48, 715/49, 715/50, 715/51, 715/52, 715/53, 715/54, 715/55, 715/56, 715/57, 715/58, 715/59, 715/60, 860/1, 860/2, 860/3, 860/4, 860/5, 860/6, 860/7, 861/11, 861/14, 861/20 00715/010C MERIT CC SUPPORT DSECTS S G K1Y9:DSECTS.S 5.1T2 93 MERIT_CC_SUPPORT.DSECTS.S.010 1 LINE 54 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:24 0 *PDP11ASR (686/32) source that presents all the dsects, macros, and copy sections in (715/5) and (715/9). 00715/011C MERIT CC SUPPORT SCP SOU S G K1Y9:SCP.S 5.1T2 94 MERIT_CC_SUPPORT.SCP_SOU.S.011 1 LINE 83 4 PAGE UM ROTHWELL JULY 23, 1983 13:05:24 0 *PDP11ASR (686/32) source for Secondary Communications Processor (SCP) specific parameters. This module is included in all SCP systems. Copies (715/5) and (715/9). 00715/012C MERIT CC SUPPORT SYS INIT S G K1Y9:INIT.S 5.1T2 95 MERIT_CC_SUPPORT.SYS_INIT.S.012 1 LINE 88 5 PAGE UM ROTHWELL JULY 23, 1983 13:05:25 0 *PDP11ASR (686/32) source for the system initialization routines. Copies (715/5) and (715/9). 00715/013C MERIT CC SUPPORT KH V¬11 MOD S G K1Y9:KH11.S 5.1T2 96 MERIT_CC_SUPPORT.KH V¬11.S.013 1 LINE 74 5 PAGE UM ROTHWELL JULY 23, 1983 13:05:25 0 *PDP11ASR (686/32) source for the KH V¬11 device specific module, the synchronous line peripheral (developed by UNE) driver. Copies (715/5) and (715/9). 00715/014C MERIT CC SUPPORT MM16 SOU S G K1Y9:MM16.S 5.1T2 97 MERIT_CC_SUPPORT.MM16_SOU.S.014 1 LINE 82 8 PAGE UM ROTHWELL JULY 23, 1983 13:05:26 0 *PDP11ASR (686/32) source for the MM16 device specific module. Drives 6809 modules with HDLC perpherals. Copies (715/5) and (715/9). 00715/015C MERIT CC SUPPORT DL11 SOU S G K1Y9:DL11.S 5.1T2 98 MERIT_CC_SUPPORT.DL11_SOU.S.015 1 LINE 81 3 PAGE UM ROTHWELL JULY 23, 1983 13:05:26 0 *PDP11ASR (686/32) source for the DL11 device specific module. Drives the operator console and DL-11 Hermes ports. Copies (715/5) and 1 SUN SEP 08/96 15:24:55 Page 488 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (715/9). 00715/016C MERIT CC SUPPORT DZ11 SOU S G K1Y9:DZ11.S 5.1T2 99 MERIT_CC_SUPPORT.DZ11_SOU.S.016 1 LINE 84 4 PAGE UM ROTHWELL JULY 23, 1983 13:05:26 0 *PDP11ASR (686/32) source for the DZ11 device specific module. Drives DZ-11 Hermes ports. Copies (715/5) and (715/9). 00715/017C MERIT CC SUPPORT LA32 SOU S G K1Y9:LA32.S 5.1T2 100 MERIT_CC_SUPPORT.LA32_SOU.S.017 1 LINE 79 4 PAGE UM ROTHWELL JULY 23, 1983 13:05:27 0 *PDP11ASR (686/32) source for the LA32 (asynchronous line adaptor) device specific module. Copies (715/5) and (715/9). 00715/018C MERIT CC SUPPORT UMUCB S G K1Y9:UMUCB.S 5.1T2 101 MERIT_CC_SUPPORT.UMUCB.S.018 1 LINE 83 3 PAGE UM ROTHWELL JULY 23, 1983 13:05:27 0 *PDP11ASR (686/32) source for the UM-MTS host Unit Control Block. Copies (715/5) and (715/9). 00715/019C MERIT CC SUPPORT NETWORK S G K1Y9:NETWORK.S 5.1T2 102 MERIT_CC_SUPPORT.NETWORK.S.019 1 LINE 84 6 PAGE UM ROTHWELL JULY 23, 1983 13:05:27 0 *PDP11ASR (686/32) source for the network configuration tables. Contains locations (addresses) of hosts, along iwth all host and node names. Copies (715/5) and (715/9). 00715/020C MERIT CC SUPPORT ROUTE S G K1Y9:ROUTE.S 5.1T2 103 MERIT_CC_SUPPORT.ROUTE.S.020 1 LINE 84 17 PAGE UM ROTHWELL JULY 23, 1983 13:05:28 0 *PDP11ASR (686/32) source for the internodal routing module. Contains conditional assemblies for SCP. Copies (715/5) and (715/9). 00715/021C MERIT CC SUPPORT SSLC S G K1Y9:SSLC.S 5.1T2 104 MERIT_CC_SUPPORT.SSLC.S.021 1 LINE 104 16 PAGE UM ROTHWELL JULY 23, 1983 13:05:29 0 *PDP11ASR (686/32) source for the front-end routines for Devices (715/37). This part remains in unmapped memory. Contains conditional assembly for VM. Copies (715/5) and (715/9). 00715/022C MERIT CC SUPPORT END S G K1Y9:END.S 5.1T2 105 MERIT_CC_SUPPORT.END.S.022 1 LINE 64 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:29 0 *PDP11ASR (686/32) source. Sets parameters for VM or non-VM by conditional assembly. 00715/023C MERIT CC SUPPORT VMEND S G K1Y9:VMEND.S 5.1T2 106 MERIT_CC_SUPPORT.VMEND.S.023 1 LINE 77 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:30 0 *PDP11ASR (686/32) source. Defines the last VM segment and alternate start. 1 SUN SEP 08/96 15:24:55 Page 489 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00715/024C MERIT CC SUPPORT PDP S G K1Y9:PDP.S 5.1T2 107 MERIT_CC_SUPPORT.PDP.S.024 1 LINE 73 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:30 0 *PDP11ASR (686/32) source. Establishes PS handling for PDP11s. 00715/025C MERIT CC SUPPORT LSI S G K1Y9:LSI.S 5.1T2 108 MERIT_CC_SUPPORT.LSI.S.025 1 LINE 81 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:30 0 *PDP11ASR (686/32) source. Establishes PS handling for LSI11s. 00715/026C MERIT CC SUPPORT RTRACE S G K1Y9:RTRACE.S 5.1T2 109 MERIT_CC_SUPPORT.RTRACE.S.026 1 LINE 63 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:30 0 *PDP11ASR (686/32) source. Logs R0 - R5, caller's address and callee's address. RTSPC tracing handler. Copies (715/5) and (715/9). 0 Referenced by comments of: 715/4 00715/027C MERIT CC SUPPORT SSTRACE S G K1Y9:SSTRACE.S 5.1T2 110 MERIT_CC_SUPPORT.SSTRACE.S.027 1 LINE 66 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:30 0 DEVICES Continue Interrupt (CI) tracing handler. Copies (715/5) and (715/9). 00715/028A MERIT CC SUPPORT VECTORS S G K1Y9:VECTORS.S 5.1T2 111 MERIT_CC_SUPPORT.VECTORS.S.028 1 LINE 93 5 PAGE UM ROTHWELL JULY 23, 1983 13:05:30 0 *PDP11ASR (686/32) source for the low-core system vectors and parameters for the Merit PDP-11 operating system (MINOS). Copies (715/5) and (715/9). 00715/029A MERIT CC SUPPORT SYSTEM S G K1Y9:SYSTEM.S 5.1T2 112 MERIT_CC_SUPPORT.SYSTEM.S.029 1 LINE 105 60 PAGE UM ROTHWELL JULY 23, 1983 13:05:31 0 *PDP11ASR (686/32) source for the MINOS multitasking operating system and Packet Switching Network support. Copies (715/5) and (715/9). 00715/030A MERIT CC SUPPORT TAPE S G K1Y9:TAPE.S 5.1T2 113 MERIT_CC_SUPPORT.TAPE.S.030 1 LINE 75 4 PAGE UM ROTHWELL JULY 23, 1983 13:05:33 0 *PDP11ASR (686/32) source for the paper tape and communications computer (CC) hosts. Copies (715/5) and (715/9). 00715/031A MERIT CC SUPPORT TIMER S G K1Y9:TIMER.S 5.1T2 114 MERIT_CC_SUPPORT.TIMER.S.031 1 LINE 83 7 PAGE UM ROTHWELL JULY 23, 1983 13:05:33 0 *PDP11ASR (686/32) source for the MINOS interval timer support routines. Copies (715/5) and (715/9). 00715/032A MERIT CC SUPPORT PARSE S G K1Y9:PARSE.S 5.1T2 115 MERIT_CC_SUPPORT.PARSE.S.032 1 LINE 84 18 PAGE UM ROTHWELL JULY 23, 1983 13:05:34 0 *PDP11ASR (686/32) source for the MINOS CLI parser. Copies (715/5) and (715/9). 1 SUN SEP 08/96 15:24:55 Page 490 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00715/033A MERIT CC SUPPORT CMNDS S G K1Y9:CMNDS.S 5.1T2 116 MERIT_CC_SUPPORT.CMNDS.S.033 1 LINE 101 47 PAGE UM ROTHWELL JULY 23, 1983 13:05:34 0 *PDP11ASR (686/32) source for the MINOS command definitions and execution routines. Copies (715/5) and (715/9). 00715/034A MERIT CC SUPPORT NIM S G K1Y9:NIM.S 5.1T2 117 MERIT_CC_SUPPORT.NIM.S.034 1 LINE 102 51 PAGE UM ROTHWELL JULY 23, 1983 13:05:37 0 *PDP11ASR (686/32) source for the task time routines for terminal support (NIM: network interface module). Copies (715/5) and (715/9). 00715/035A MERIT CC SUPPORT NIBBLE S G K1Y9:NIBBLE.S 5.1T2 118 MERIT_CC_SUPPORT.NIBBLE.S.035 1 LINE 75 7 PAGE UM ROTHWELL JULY 23, 1983 13:05:39 0 *PDP11ASR (686/32) source for the nibble buffer management for terminal support. Copies (715/5) and (715/9). 00715/036A MERIT CC SUPPORT SSDST S G K1Y9:SSDST.S 5.1T2 119 MERIT_CC_SUPPORT.SSDST.S.036 1 LINE 89 6 PAGE UM ROTHWELL JULY 23, 1983 13:05:39 0 *PD11ASR (686/32) source for the start/stop (asynchronous) device support task (ring sniffer and hang-up detector). Copies (715/5) and (715/9). 00715/037A MERIT CC SUPPORT DEVICES S G K1Y9:DEVICES.S 5.1T2 120 MERIT_CC_SUPPORT.DEVICES.S.037 1 LINE 92 49 PAGE UM ROTHWELL JULY 23, 1983 13:05:39 0 *PDP11ASR (686/32) source for the interrupt routines for the terminal support. Copies (715/5) and (715/9). 0 Referenced by comments of: 715/21 00715/038A MERIT CC SUPPORT VERSNO S G K1Y9:VERSNO 5.1T2 121 MERIT_CC_SUPPORT.VERSNO.S.038 1 LINE 56 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:41 0 *PDP11ASR (686/32) source for the code to generate the system version number. 00715/039A MERIT CC SUPPORT MTS RARE S G K1Y9:MTSRARE.S 5.1T2 122 MERIT_CC_SUPPORT.MTS_RARE.S.039 1 LINE 89 20 PAGE UM ROTHWELL JULY 23, 1983 13:05:41 0 *PDP11ASR (686/32) source for the MTS-dependent host interface support. Copies (715/5) and (715/9). 00715/040A MERIT CC SUPPORT CDC RARE S G K1Y9:CDCRARE.S 5.1T2 123 MERIT_CC_SUPPORT.CDC_RARE.S.040 1 LINE 80 12 PAGE UM ROTHWELL JULY 23, 1983 13:05:42 0 *PDP11ASR (686/32) source for the CDC-dependent host interface support. Copies (715/5) and (715/9). 00715/041A MERIT CC SUPPORT INP S G K1Y9:INP.S 5.1T2 124 MERIT_CC_SUPPORT.INP.S.041 1 LINE 100 23 PAGE UM ROTHWELL JULY 23, 1983 13:05:43 0 *PDP11ASR (686/32) source for the Merit internodal protocol support. 1 SUN SEP 08/96 15:24:55 Page 491 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Contains conditional assembly for SCP. Copies (715/5) and (715/9). 00715/042A MERIT CC SUPPORT SDA S G K1Y9:SDA.S 5.1T2 125 MERIT_CC_SUPPORT.SDA.S.042 1 LINE 89 9 PAGE UM ROTHWELL JULY 23, 1983 13:05:44 0 *PDP11ASR (686/32) source for the Merit Synchronous Data Adapter support. Copies (715/5) and (715/9). 00715/043A MERIT CC SUPPORT LINKFILE C G K1Y9:LINK.AN 5.1T2 126 MERIT_CC_SUPPORT.LINKFILE.C.043 1 LINE 63 1 PAGE UM ROTHWELL JULY 23, 1983 13:05:45 0 MTS and *LINK11 commands to build a MINOS system for Ann Arbor node. 00715/044A MERIT CC SUPPORT EVANS SP G MNET:EVANS(1000) 5.1T2 127 MERIT_CC_SUPPORT.EVANS.SP.044 1 LINE 90 18 PAGE UM STARK JULY 23, 1983 13:05:45 0 Merit PDP-11 dump analysis program (named after Sir Arthur John Evans, 1851-1941, English archaeologist who excavated the palace of Minos). Commands used to compile may be found at the beginning of the file. Contains a $CONTINUE WITH *PL1OPTLIB (827/5). 0 Referenced by comments of: 715/45 00715/045C MERIT CC SUPPORT EVANS OC G MNET:EVANS(1,999) 5.1T2 128 MERIT_CC_SUPPORT.EVANS.OC.045 1 LINE 80 23 PAGE UM STARK JULY 23, 1983 13:05:47 0 Object for the Evans dump analyzer program (715/44). 00715/046A MERIT CC SUPPORT X25 S G K1Y9:X25.S 5.1T2 129 MERIT_CC_SUPPORT.X25.S.046 1 LINE 83 30 PAGE UM ROTHWELL JULY 23, 1983 13:05:47 0 *PDP11ASR (686/32) source for the X.25 support. Copies (715/5) and (715/9). 00715/047A MERIT CC SUPPORT AN S G K1Y9:AN.S 5.1T2 130 MERIT_CC_SUPPORT.AN.S.047 1 LINE 86 4 PAGE UM ROTHWELL JULY 23, 1983 13:05:49 0 *PDP11ASR (686/32) source for the "AN" node configuration. Copies (715/5) and (715/9). 00715/048C MERIT CC SUPPORT WSWUUCB S G K1Y9:WSWUUCB.S 5.1T2 131 MERIT_CC_SUPPORT.WSWUUCB.S.048 1 LINE 83 3 PAGE UM KNOPPER JULY 23, 1983 13:05:50 0 *PDP11ASR (686/32) source for host UCBs for two Amdahl hosts at Wayne State. Requires (715/5) and (715/9). Copies (715/5) and (715/9). 00715/049C MERIT CC SUPPORT WMURARE S G K1Y9:WMURARE.S 5.1T2 132 MERIT_CC_SUPPORT.WMURARE.S.049 1 LINE 81 37 PAGE UM KNOPPER JULY 23, 1983 13:05:50 0 *PDP11ASR (686/32) source for rare code for TOPS10 to Merit DTE-20 interface. Requires (715/5) and (715/9). 1 SUN SEP 08/96 15:24:55 Page 492 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00715/050C MERIT CC SUPPORT VAXRARE S G K1Y9:VAXRARE.S 5.1T2 133 MERIT_CC_SUPPORT.VAXRARE.S.050 1 LINE 87 11 PAGE UM KNOPPER JULY 23, 1983 13:05:52 0 *PDP11ASR (686/32) source for rare code for Unix Vax to Merit DA-11 interface. Requires (715/5) and (715/9). 00715/051C MERIT CC SUPPORT TTUCB S G K1Y9:TTUCB.S 5.1T2 134 MERIT_CC_SUPPORT.TTUCB.S.051 1 LINE 83 3 PAGE UM KNOPPER JULY 23, 1983 13:05:52 0 *PDP11ASR (686/32) source for host UCB for MTS channel interface on the "TT" node (the UM test node used for developmental purposes). Requires (715/5) and (715/9). 00715/052C MERIT CC SUPPORT TT S G K1Y9:TT.S 5.1T2 135 MERIT_CC_SUPPORT.TT.S.052 1 LINE 86 4 PAGE UM KNOPPER JULY 23, 1983 13:05:53 0 *PDP11ASR (686/32) source for the node-specific parameters for the TT node. Requires (715/5) and (715/9). 00715/053C MERIT CC SUPPORT KZ S G K1Y9:KZ.S 5.1T2 136 MERIT_CC_SUPPORT.KZ.S.053 1 LINE 86 4 PAGE UM KNOPPER JULY 23, 1983 13:05:53 0 *PDP11ASR (686/32) source for node-specific parameters for KZ (Western Michigan University) PCP. Requires (715/5) and (715/9). 00715/054C MERIT CC SUPPORT KH S G K1Y9:KH.S 5.1T2 137 MERIT_CC_SUPPORT.KH.S.054 1 LINE 86 3 PAGE UM KNOPPER JULY 23, 1983 13:05:53 0 *PDP11ASR (686/32) source for node-specific parameters for MINOS (the Merit operating system) running as the KH-11 diagnostic. Reuqires (715/5) and (715/9). 00715/055C MERIT CC SUPPORT EL S G K1Y9:EL.S 5.1T2 138 MERIT_CC_SUPPORT.EL.S.055 1 LINE 86 4 PAGE UM KNOPPER JULY 23, 1983 13:05:53 0 *PDP11ASR (686/32) source for node-specific parameters for EL (Michigan State University) PCP. Requires (715/5) and (715/9). 00715/056C MERIT CC SUPPORT DT S G K1Y9:DT.S 5.1T2 139 MERIT_CC_SUPPORT.DT.S.056 1 LINE 86 4 PAGE UM KNOPPER JULY 23, 1983 13:05:54 0 *PDP11ASR (686/32) source for node-specific parameters for DT (Wayne State University) PCP. Requires (715/5) and (715/9). 00715/057C MERIT CC SUPPORT CVUCB S G K1Y9:CVUCB.S 5.1T2 140 MERIT_CC_SUPPORT.CVUCB.S.057 1 LINE 78 2 PAGE UM KNOPPER JULY 23, 1983 13:05:54 0 *PDP11ASR (686/32) source for host unit control block for CIPRNET VAX host. Requires (715/5) and (715/9). 00715/058C MERIT CC SUPPORT CN S G K1Y9:CN.S 5.1T2 141 MERIT_CC_SUPPORT.CN.S.058 1 LINE 86 4 PAGE UM KNOPPER JULY 23, 1983 13:05:54 0 *PDP11ASR (686/32) source for node-specific parameters for CN 1 SUN SEP 08/96 15:24:55 Page 493 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (CIPRNET) PCP. Requires (715/5) and (715/9). 00715/059C MERIT CC SUPPORT CEWPUCB S G K1Y9:CEWPUCB.S 5.1T2 142 MERIT_CC_SUPPORT.CEWPUCB.S.059 1 LINE 83 3 PAGE UM KNOPPER JULY 23, 1983 13:05:55 0 *PDP11ASR (686/32) source for host UCB for 370/470/580 channel interfaces on CE. Requires (715/5) and (715/9). 00715/060C MERIT CC SUPPORT CE S G K1Y9:CE.S 5.1T2 143 MERIT_CC_SUPPORT.CE.S.060 1 LINE 86 4 PAGE UM KNOPPER JULY 23, 1983 13:05:55 0 *PDP11ASR (686/32) source for node-specific parameters for CE/AE/TN node. Requires (715/5) and (715/9). 00716/001 FILE SAVE - ONLINE # (PART OF FILE SAVE) UM 0 Part of FILE SAVE. 00717/001A MTS VOLUME 7 MASTER WT S0562 MTSV7 'MTS MANUALS' POSN=NEWM4.V7 5.1T2 144 MTS_VOLUME_7.MASTER.WT.001 1 LINE 132 234 PAGE UM MANUAL JULY 23, 1983 13:07:23 0 TEXT/360 master for Volume 7 "PL/I in MTS" of the UM MTS manuals, September 1982. Editor: Richard A. Salisbury 00717/002A MTS VOLUME 7 PRINT PT S0562 MTSV7 'MTS MANUALS' POSN=PRINT4.V7 5.1T2 145 MTS_VOLUME_7.PRINT.PT.002 1 LINE 132 332 PAGE UM MANUAL JULY 23, 1983 13:07:30 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 00717/003A MTS VOLUME 7 INDEX SOURCE D S0562 MTSV7 'MTS MANUALS' POSN=V7INDEXSOU.3 5.1T2 146 MTS_VOLUME_7.INDEX_SOURCE.D.003 1 LINE 66 5 PAGE UM MANUAL JULY 23, 1983 13:07:54 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 7. 00718/001 TURNAROUND SA O S1560 5.0T3 VLO FSNAME=TURNAROUND..SA.001(1) 256 5.0T3 256 TURNAROUND..SA.001 1 LINE 80 13 PAGE UM MTA JULY 28, 1977 23:57:58 5.0T7 121 0 PROGRAM TO PRINT HISTOGRAMS OF BATCH TURNAROUND TIMES FROM CMDSTAT DATA. CONTAINS THE HASP TABLES WHICH ARE USED TO COMPUTE JOB PRIORITIES FROM TIME ESTIMATES AND PAGES PRINTED. THESE TABLES MAY NEED TO BE CHANGED SO AS TO AGREE WITH THE HASP TABLES USED AT EACH INSTALLATION. THE PROGRAM ALSO GIVES SPECIAL TREATMENT TO HASP REMOTE 18 (NUBS AT UM). COPIES COPY:CMDAREADSECT (531/20). 1 SUN SEP 08/96 15:24:55 Page 494 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00718/002 TURNAROUND OC O S1560 5.0T3 VLO FSNAME=TURNAROUND..OC.002(1) 257 5.0T3 257 TURNAROUND..OC.002 1 LINE 80 4 PAGE UM MTA JULY 28, 1977 23:57:59 5.0T7 122 0 HAS A "$CONTINUE WITH MTA:READBFR(1000)+*ANALYSIS(-600,-401) RETURN" CARD WHICH REFERS TO COMPS (709) AND (140/7). 00719/001 IEBUPDTE SIMULATOR SA G S1560 5.0T3 VLO FSNAME=IEBUPDTE_SIMULATOR..SA.001(1) 258 5.0T3 258 IEBUPDTE_SIMULATOR..SA.001 1 LINE 80 16 PAGE UM MTA JULY 28, 1977 23:58:01 5.0T7 123 0 PROGRAM TO APPLY UPDATES INTENDED FOR THE OS IEBUPDTE PROGRAM. UNIT 0 MUST BE ASSIGNED TO A LABELED INPUT TAPE, UNIT 1 TO A LABELED OUTPUT TAPE, BOTH OF WHICH MUST BE FORMAT FB WITH A LRECL OF 80. THE PROGRAM USES THE INPUT TAPE DSNAMES AS MODULE NAMES. CONTROL CARDS ARE READ FROM SCARDS; A RECORD OF WHAT WAS UPDATED IN PRODUCED ON SPRINT. ON ANY ERROR, THE PROGRAM PRINTS THE INPUT, OLD MASTER POSITION, AND NEW MASTER POSITION ON SERCOM AND THEN CALLS MTS. IF RESTARTED, IT ATTEMPTS TO IGNORE THE ERROR AND CONTINUE PROCESSING. FOR INPUT (FROM SCARDS), IF COLUMNS 1 AND 2 ARE NOT "./" THEN THE INPUT RECORD IS A DATA CARDS AND IS ADDED TO THE TAPE ON UNIT 1 IN SEQUENCE USING COLUMNS 73-80. IF COLUMNS 1 AND 2 ARE "./" THEN THE INPUT RECORD IS A CONTROL CARD AS FOLLOWS: ./ ADD NAME=X ADDS A NEW MODULE AFTER THE CURRENT ONE ON UNIT 1. ./ CHANGE NAME=X UPDATES X FROM UNIT 0 TO UNIT 1 COPYING ALL MODULES BEFORE IT. ./ REPL NAME=X REPLACE X. POSITION UNIT 0 AFTER IT, COPYING ALL MODULES BEFORE IT. ./ DELETE SEQ1=S1 SEQ2=S2 S1 AND S2 MUST BE ALL NUMERIC. THE SEQ2 PARAMETER IS OPTIONAL. ./ ENDUP 00719/002 IEBUPDTE SIMULATOR OC G S1560 5.0T3 VLO FSNAME=IEBUPDTE_SIMULATOR..OC.002(1) 259 5.0T3 259 IEBUPDTE_SIMULATOR..OC.002 1 LINE 80 5 PAGE UM MTA JULY 28, 1977 23:58:03 5.0T7 124 00720/001 LKEDCONV SA O S1560 5.0T3 VLO FSNAME=LKEDCONV..SA.001(1) 260 5.0T3 260 LKEDCONV..SA.001 1 LINE 80 60 PAGE SFU BENET MTA JULY 28, 1977 23:58:06 5.0T7 125 0 A LARGE PROGRAM TO AID IN CONVERTING OS/VS OBJECT LIBRARIES (EITHER FROM *UNLINKER OR AS OS LINK EDITOR INPUT) FOR USE IN MTS. COMMENTS IN THE SOURCE DESCRIBE HOW TO USE IT. 00720/002 LKEDCONV OC O S1560 5.0T3 VLO FSNAME=LKEDCONV..OC.002(1) 261 5.0T3 261 LKEDCONV..OC.002 1 LINE 80 12 PAGE SFU BENET MTA JULY 28, 1977 23:58:18 5.0T7 126 00721/001A *OBJUTIL MAIN SA G W067:OBJUTIL.S 5.1T2 147 OBJUTIL.MAIN.SA.001 1 LINE 78 23 PAGE UM SHERRY JULY 23, 1983 13:07:54 0 OBJECT FILE EDITOR MAIN PROGRAM. CALLS THE EDITOR EST SUBROUTINE (648/14). 1 SUN SEP 08/96 15:24:55 Page 495 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 THE NEGATIVE LINES CONTAIN COMMANDS TO ASSEMBLE IT. COPIES *GDINFODSECT (594), *LOADINFODSECT (001/4), AND *CNFGINFODSECT (654). ASSEMBLE WITH *ASMH (737) USING THE OBJUTIL MACROS (721/14) AND (721/15) AND *SYSMAC. THE SYSPARM ASSEMBLY PARAMETER MAY BE USED TO SET THE VALUES OF THE GLOBAL SET SYMBOLS, FOR EXAMPLE, SYSPARM='SNOOP=0,LOGERR=1,SHARE=UM' IF SNOOP=1, STATISTICS RECORDS ARE WRITTEN TO A FILE NAMED ETC:OBJUTIL.STAT. IF LOGERR=1, PGNTS ARE LOGGED TO A FILE NAMED ETC:OBJUTIL.ERR. IF SHARE=UQV, ALBERTA'S UPDATES WILL BE INCLUDED. ALL OBJUTIL ROUTINES ARE ASSEMBLED USING THE ASMH LISTING POSTPROCESSOR PEXIT (775/1), WHICH REQUIRES THE ASSEMBLY PARAMETER PAR=PEXIT=*PEXIT (775). EACH SOURCE FILE CONTAINS AN "ASMEDIT" MACRO CALL TO SUPPORT THIS POSTPROCESSOR. ******************************************************************************** D5.0B version: - A couple of bugs with the DISPLAY command fixed. - Object module naming convention changed to support PL/I Optimizing Compiler (813) object decks. ******************************************************************************** 0 Referenced by comments of: 98/1, 316/1, 389/1, 495/2, 496/23, 528/39, 710/1, 721/14, 721/16, 821/7, 821/8, 821/9, 821/10, 821/11, 821/26 00721/002 *OBJUTIL COMMANDS SA G W067:OBJU.CMD.S 5.0T3 263 OBJUTIL.COMMANDS.SA.002 1 LINE 84 40 PAGE UM SHERRY JULY 03, 1981 18:42:16 5.0T7 128 0 COMMAND PROCESSOR ROUTINES. NEGATIVE LINE NUMBER RANGE CONTAINS $RUN COMMAND TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT (594), AND *SYSMAC. 00721/003A *OBJUTIL PARSE SA G W067:OBJU.PARSE.S 5.1T2 148 OBJUTIL.PARSE.SA.003 1 LINE 78 11 PAGE UM SHERRY JULY 23, 1983 13:07:56 0 ROUTINES FOR PARSING COMMAND LINES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15) *GDINFODSECT (594), AND *SYSMAC. 00721/004 *OBJUTIL PATCH SA G W067:OBJU.PATCH.S 5.0T3 265 OBJUTIL.PATCH.SA.004 1 LINE 69 4 PAGE UM SHERRY JULY 03, 1981 18:42:23 5.0T7 130 0 ROUTINES TO GENERATE REP CARDS. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15), AND *SYSMAC. 00721/005 *OBJUTIL PRINTER SA G W067:OBJU.PRINT.S 5.0T3 266 OBJUTIL.PRINTER.SA.005 1 LINE 68 6 PAGE UM SHERRY JULY 03, 1981 18:42:24 5.0T7 131 0 ROUTINES TO FORMAT AND PRINT OUTPUT LINES. NEGATIVE LINE NUMBER RANGE 1 SUN SEP 08/96 15:24:55 Page 496 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACRO LIBRARIES (721/14) AND (721/15) AND *SYSMAC. 00721/006A *OBJUTIL READSUBR SA G W067:OBJU.READ.S 5.1T2 149 OBJUTIL.READSUBR.SA.006 1 LINE 83 23 PAGE UM SHERRY JULY 23, 1983 13:07:57 0 ROUTINES THAT READ OBJECT FILES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT (594), AND *SYSMAC. 00721/007 *OBJUTIL STORAGE SA G W067:OBJU.STOR.S 5.0T3 268 OBJUTIL.STORAGE.SA.007 1 LINE 72 5 PAGE UM SHERRY JULY 03, 1981 18:42:32 5.0T7 133 0 STORAGE ALLOCATION ROUTINES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15) AND *SYSMAC. 00721/008 *OBJUTIL SYMTABLE SA G W067:OBJU.SYMT.S 5.0T3 269 OBJUTIL.SYMTABLE.SA.008 1 LINE 72 8 PAGE UM SHERRY JULY 03, 1981 18:42:33 5.0T7 134 0 SYMBOL TABLE MANAGEMENT ROUTINES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15) AND *SYSMAC. 00721/009 *OBJUTIL WRITING SA G W067:OBJU.WRIT.S 5.0T3 270 OBJUTIL.WRITING.SA.009 1 LINE 83 19 PAGE UM SHERRY JULY 03, 1981 18:42:35 5.0T7 135 0 ROUTINES TO WRITE OBJECT FILES. NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE IT. USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT (594), AND *SYSMAC. 00721/010 *OBJUTIL IOCVT SUBR SA G W067:OBJU.IOCVT.S 5.0T3 271 OBJUTIL.IOCVT_SUBR.SA.010 1 LINE 77 16 PAGE UM SHERRY JULY 03, 1981 18:42:40 5.0T7 136 0 I/O CONVERSION ROUTINES FOR THE DISPLAY, MODIFY, AND SCAN COMMANDS. SHOULD BE ASSEMBLED WITH *SYSMAC. 00721/011 *OBJUTIL OPTIMIZE SUBR SA G W067:OPTIMIZE.S 5.0T3 272 OBJUTIL.OPTIMIZE_SUBR.SA.011 1 LINE 101 15 PAGE UM SHERRY JULY 03, 1981 18:42:43 5.0T7 137 0 A RE-ENTRANT ROUTINE TO OPTIMIZE OBJECT MODULES FOR OBJUTIL. THIS IS A NEW VERSION WITH A SLIGHTLY CHANGED CALLING SEQUENCE. SEE THE SOURCE COMMENTS FOR DETAILS. ASSEMBLE WITH OBJUTIL MISC MACROS (721/15). COPIES *CNFGINFODSECT (654). 00721/012 *OBJUTIL MISC RTNS SA G W067:OBJU.RTN.S 5.0T3 273 OBJUTIL.MISC_RTNS.SA.012 1 LINE 72 11 PAGE UM SHERRY JULY 03, 1981 18:42:45 5.0T7 138 0 MISCELLANEOUS SUBROUTINES. THE NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE. USES THE OBJUTIL MACROS (721/14) AND (721/15), *GDINFODSECT 1 SUN SEP 08/96 15:24:55 Page 497 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (594), AND *SYSMAC. 00721/013 *OBJUTIL EOBJUTIL SA G W067:OBJU.END.S 5.0T3 274 OBJUTIL.EOBJUTIL.SA.013 1 LINE 70 1 PAGE UM SHERRY JULY 03, 1981 18:42:47 5.0T7 139 0 This file contains the source for a null csect called "EOBJUTIL" that is loaded as the last control section of OBJUTIL in shared VM. It is used to mark the end of OBJUTIL for computing symbolic addresses within the program in the event of a fatal termination. 00721/014 *OBJUTIL OBJUTIL MACROS SM G W067:OBJU.MAC 5.0T3 275 OBJUTIL.OBJUTIL_MACROS.SM.014 1 LINE 72 25 PAGE UM SHERRY JULY 03, 1981 18:42:48 5.0T7 140 0 OBJECT FILE EDITOR MACROS. CONTAINS ROUTINE LINKAGE MACROS, MACROS THAT WERE FORMERLY IN THE SOURCE OF OBJUTIL (721/1), AND SEVERAL COPY SECTIONS INCLUDING THE PSECT DEFINITION, AND DATA STRUCTURE DSECTS. 0 Referenced by comments of: 1/9, 721/1, 721/2, 721/3, 721/4, 721/5, 721/6, 721/7, 721/8, 721/9, 721/12, 721/18, 722/1, 757/1 00721/015 *OBJUTIL MISC MACROS SM G W067:MAC 5.0T3 276 OBJUTIL.MISC_MACROS.SM.015 1 LINE 72 12 PAGE UM SHERRY JULY 03, 1981 18:42:53 5.0T7 141 0 MISCELLANEOUS MACROS. 0 Referenced by comments of: 1/5, 354/5, 721/1, 721/2, 721/3, 721/4, 721/5, 721/6, 721/7, 721/8, 721/9, 721/11, 721/12, 721/18, 722/1, 746/1, 747/4, 749/1, 757/1, 775/1 00721/016A *OBJUTIL SHARED OBJECT OE G SEG2:OBJUTIL 5.1T2 150 OBJUTIL.SHARED_OBJECT.OE.016 1 LINE 20107 76 PAGE UM SHERRY JULY 23, 1983 13:07:58 SEG2:OBJUTIL 0 OBJECT FOR THE OBJECT FILE EDITOR. LOADED INTO SHARED VM BY PISTLE. DO NOT CHANGE THE ORDER OF THE OBJECT MODULES IN THIS FILE. A TABLE USED BY LOGERR IN (721/1) DEPENDS ON IT. 00721/017 *OBJUTIL *OBJUTIL OC G *OBJUTIL 5.0T3 278 OBJUTIL.*OBJUTIL.OC.017 1 LINE 24 1 PAGE UM SHERRY JULY 03, 1981 18:43:00 5.0T7 143 *OBJUTIL 0 CONTAINS THE APPROPRIATE LOADER CARDS TO FORCE A REFERENCE TO THE SHARED VM OBJUTIL. 0 Referenced by comments of: 721/18 00721/018 *OBJUTIL OBJDUMP SA O W067:OBJU.DUMP.S(1,999) 5.0T3 279 OBJUTIL.OBJDUMP.SA.018 1 LINE 72 8 PAGE UM SHERRY JULY 03, 1981 18:43:01 5.0T7 144 0 STAND-ALONE PROGRAM USED WITH SDS (600) TO PRODUCE A SYMBOLIC DUMP FROM INFORMATION LOGGED BY *OBJUTIL (721/17) UPON FATAL TERMINATION. COMMENTS 1 SUN SEP 08/96 15:24:55 Page 498 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 IN THE SOURCE FILE DESCRIBE THE USE OF THIS PROGRAM. THE NEGATIVE LINE NUMBER RANGE CONTAINS COMMANDS TO ASSEMBLE. USES THE OBJUTIL MACROS (721/14) AND (721/15), OLD:CC.MACROS (1054/4), *CNFGINFODSECT (654), *GDINFODSECT (594), AND *SYSMAC. ASSEMBLE WITH PAR=TEST. THE OBJECT FOR THIS ROUTINE CAN BE USED VIA $DEBUG DIRECTLY OR XCTL'D TO BY THE PROGRAM DUMPLOAD (721/19). 0 Referenced by comments of: 721/22 00721/019 *OBJUTIL DUMPLOAD SA O W067:OBJU.DUMP.S(1000,1999) 5.0T3 280 OBJUTIL.DUMPLOAD.SA.019 1 LINE 69 1 PAGE UM SHERRY JULY 03, 1981 18:43:09 5.0T7 145 0 Driver program that loads GTSP (721/20) and XCTL's to OBJDUMP in OBJU.DUMPLIB (721/22). Requires *SYSMAC. Assemble with PAR=TEST. 0 Referenced by comments of: 721/18, 721/21 00721/020 *OBJUTIL GTSP SA O W067:OBJU.DUMP.S(2000,2999) 5.0T3 281 OBJUTIL.GTSP.SA.020 1 LINE 68 1 PAGE UM SHERRY JULY 03, 1981 18:43:12 5.0T7 146 0 GETSPACE intercept used by (721/21) in XCTLing to OBJU.DUMPLIB (721/22). Requires *SYSMAC. Assemble with PAR=TEST. 0 Referenced by comments of: 721/19 00721/021 *OBJUTIL OBJDUMP OE O W067:OBJU.DUMP 5.0T3 282 OBJUTIL.OBJDUMP.OE.021 1 LINE 428 1 PAGE UM SHERRY JULY 03, 1981 18:43:15 5.0T7 147 0 OBJECT FOR DUMPLOAD (721/19). THIS PROGRAM MUST BE RUN FROM SDS AS: $DEB OBJU.DUMP 0=ETC:OBJUTIL.ERR SPRINT=*PRINT* SET ECHO=OFF OUTPUT=*PRINT* RUN THE FILE ETC:OBJUTIL.ERR, IF IT EXISTS, IS USED TO COLLECT ERRORS. THIS PROGRAM DOES AN XCTL TO THE ROUTINE OBJDUMP IN (721/22). 0 Referenced by comments of: 721/20 00721/022 *OBJUTIL OBJU.DUMPLIB OL O W067:OBJU.DUMPLIB 5.0T3 283 OBJUTIL.OBJU.DUMPLIB.OL.022 1 LINE 3088 8 PAGE UM SHERRY JULY 03, 1981 18:43:16 5.0T7 148 0 Object library containing OBJDUMP and GTSP which is XCTL'd to by (721/18). 0 Referenced by comments of: 721/19, 721/20, 721/21 1 SUN SEP 08/96 15:24:55 Page 499 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00721/023 *OBJUTIL EXPLAIN FILE M ETC:OBJUTILEXP 5.0T3 284 OBJUTIL.EXPLAIN_FILE.M.023 1 LINE 74 22 PAGE UM SHERRY JULY 03, 1981 18:43:17 5.0T7 149 ETC.:OBJUTILEXP 0 EXPLAIN COMMAND MESSAGES. LINE NUMBERS IN THIS FILE ARE IMPORTANT. 00721/024 *OBJUTIL TEST DECK D W067:OBJUTIL.T 5.0T3 285 OBJUTIL.TEST_DECK.D.024 1 LINE 57 3 PAGE UM SHERRY JULY 03, 1981 18:43:19 5.0T7 150 0 THIS FILE CONTAINS SEVERAL TEST STREAMS FOR CHECKING THE OBJECT FILE EDITOR. IT IS USED AS FOLLOWS: $RUN *OBJUTIL SCARDS=OBJUTIL.T THE RESULTING OUTPUT IS INSPECTED TO VERIFY THE PROGRAM'S CORRECTNESS. 00721/025 *OBJUTIL CHANGES WX W067:OBJUTIL.CX 5.0T3 286 OBJUTIL.CHANGES.WX.025 1 LINE 76 6 PAGE UM SHERRY JULY 03, 1981 18:43:20 5.0T7 151 0 *TEXTFORM WRITEUP DESCRIBING THE LATEST VERSION OF THE OBJECT FILE EDITOR, INCLUDING BUG FIXES AND NEW FEATURES. 00722/001 BLOCKHEADER SA O W009:BLKHDR.S 5.0T3 287 BLOCKHEADER..SA.001 1 LINE 116 5 PAGE UM SHERRY JULY 03, 1981 18:43:22 5.0T7 152 0 PROGRAM TO PRODUCE BLOCKLETTER HEADERS FOR PRINTED LISTINGS. WRITES ON SPRINT (DEFAULTING TO *PRINT*). ACCEPTS THE FOLLOWING PARAMETERS IN THE PAR FIELD: HEADER=STRING, CENTER=STRING, FOOTER=STRING, MCC|LCC (MACHINE LOGICAL CARRIAGE CONTROL), AND EJECT (WHICH PRODUCES A PAGE EJECT AFTER THE LAST HEADING). STRING MUST BE < 10 CHARACTERS AND MAY BE ONE OF THE FOLLOWING SPECIAL CODES WHICH CAUSE AN APPROPRIATE TEXT SUBSTITUTION: = MTS VERSION CODE = CURRENT DATE AS "MM/DD/YY" = CURRENT MONTH SPELLED OUT = CURRENT YEAR SPELLED OUT = CURRENT TIME SPELLED OUT = CURRENT DATE AS "MMMDDYY" ASSEMBLE USING THE *OBJUTIL MACROS (721/14) AND (721/15) WITH PAR=PEXIT=*PEXIT. 0 Referenced by comments of: 531/16 00722/002 BLOCKHEADER OE O W009:BLKHDR 5.0T3 288 BLOCKHEADER..OE.002 1 LINE 1982 3 PAGE UM SHERRY JULY 03, 1981 18:43:23 5.0T7 153 W009:BLKHDR 1 SUN SEP 08/96 15:24:55 Page 500 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00723/001A FNAMETRT SA G MTSS:FNAMETRT(1000) 5.1T2 151 FNAMETRT..SA.001 1 LINE 72 1 PAGE UM MTS BURLING JULY 23, 1983 13:08:02 0 Translate table used by FName to decide what characters are legal in file names. 00723/002A FNAMETRT OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 00724/001 DISKCOPY SA G S1560 5.0T3 VLO FSNAME=DISKCOPY..SA.001(1) 290 5.0T3 290 DISKCOPY..SA.001 1 LINE 78 31 PAGE UM HELFFRICH AUG. 06, 1981 05:26:32 5.0T7 155 0 Program to copy the contents of page-formatted disks to disk or tape. instructions appear as comments at the beginning of the program. Assemble using COPY:FILE.MACROS (482/45), OLD:CC.MACROS (1054/4), COPY:UC.MACROS (787/1), and *SYSMAC. The program will not work with 2311 and 2314 disks because a unit check routine interface for them has not been developed. It will not work for 3370-type disks either because the type of channel program is different. 0 Referenced by comments of: 724/3 00724/002A DISKCOPY UC G FILE:DISKCOPY(1000) 5.1T2 152 DISKCOPY..UC.002 1 LINE 68 3 PAGE UM HELFFRICH JULY 23, 1983 13:08:04 0 Update to be applied to previously distributed source to yield current source. ********************************************************************** D5.1 version: Now asks for confirmation before a volume swap is done. This is to give you a chance to abort if the copy goes badly due to equipment problems. ********************************************************************** 00724/003A DISKCOPY OC G FILE:DISKCOPY(1,999) 5.1T2 153 DISKCOPY..OC.003 1 LINE 32732 30 PAGE UM HELFFRICH JULY 23, 1983 13:08:06 FILE:DISKCOPY 0 Object for (724/1). Uses the UBC subtasking monitor (1058) and references symbols in COPY:DEFS (579/10). 00724/004C DISKCOPY WRITEUP WF G FILE:DISKCOPY.W 5.1T2 154 DISKCOPY.WRITEUP.WF.004 1 LINE 78 1 PAGE UM HELFFRICH JULY 23, 1983 13:08:07 0 DISKCOPY writeup, based on UBC DISK. 0 Referenced by comments of: 482/28, 682/1 1 SUN SEP 08/96 15:24:55 Page 501 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00725/001 ACCFORMAT SA # (OBSOLETE) RD16T1 217 ACCFORMAT..SA. 1 LINE 80 4 PAGE UM JULY 12, 1979 23:16:57 0 Now part of COPY:MTS.MACROS (344/3). 00726/001 CNFGSOU SA # (OBSOLETE) D4T3 315 CNFGSOU..SA.001 1 LINE 80 3 PAGE UM JULY 28, 1977 23:59:24 00727/001A *FTNTIDY MAIN SA G W062:FTNTIDY.S(1000,4999) 5.1T2 155 FTNTIDY.MAIN.SA.001 1 LINE 76 49 PAGE UM TIFFANY JULY 23, 1983 13:08:07 0 Replacement program for *TIDY (229) and *FRISK (533). Assemble using the FTNTIDY MACLIB (727/8). Copies *GDINFODSECT (594). >>> NOTE: *FTNTIDY currently understands FORTRAN 77 (subject to changes); e.g., it properly indents if ... elseif ... endif. No attempt is made to process input for preprocessors such as OVERDRIVE, FLECS, RATFOR, and structured WATFIV. ******************************************************************************** D5.0A version: Implements new parameter CONTCHAR='c' which specifies the continuation character in column 6. ******************************************************************************** ******************************************************************************** D5.0B version: Changed to convert mixed case input. ******************************************************************************** ******************************************************************************** D5.1 version: Modified so variables beginning with "H" are not treated as Holleriths. ******************************************************************************** 0 Referenced by comments of: 229/1, 533/1 00727/002 *FTNTIDY LBLGEN SA G W062:FTNTIDY.S(5000,5999) 5.0T3 293 FTNTIDY.LBLGEN.SA.002 1 LINE 72 4 PAGE UM TIFFANY JULY 03, 1981 18:44:15 5.0T7 158 0 SUBROUTINE TO GENERATE OR RETRIEVE LABELS. ASSEMBLE USING THE FTNTIDY MACLIB (727/8). 00727/003 *FTNTIDY STMTVM SA G W062:FTNTIDY.S(6000,6999) 5.0T3 294 FTNTIDY.STMTVM.SA.003 1 LINE 72 4 PAGE UM TIFFANY JULY 03, 1981 18:44:36 5.0T7 159 0 SUBROUTINE TO INITIALIZE, READ, AND WRITE A VIRTUAL MEMORY I/O FILE. 1 SUN SEP 08/96 15:24:55 Page 502 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00727/004A *FTNTIDY SWAPLBL SA G W062:FTNTIDY.S(7000,8999) 5.1T2 156 FTNTIDY.SWAPLBL.SA.004 1 LINE 72 15 PAGE UM TIFFANY JULY 23, 1983 13:08:12 0 SUBROUTINE TO SWAP LABELS AND TIDY FORTRAN STATEMENTS. ASSEMBLE USING THE FTNTIDY MACLIB (727/8). ********************************************************************* D5.1 version: Changed since D5.0A. ********************************************************************* 00727/005 *FTNTIDY FCNTABLE SA G W062:FTNTIDY.S(9000,9999) 5.0T3 296 FTNTIDY.FCNTABLE.SA.005 1 LINE 72 4 PAGE UM TIFFANY JULY 03, 1981 18:45:27 5.0T7 161 0 A TABLE OF FORTRAN FUNCTIONS. ASSEMBLE USING THE FTNTIDY MACLIB (727/8). 00727/006 *FTNTIDY SPRINT SA G W062:FTNTIDY.S(10000,10999) 5.0T3 297 FTNTIDY.SPRINT.SA.006 1 LINE 72 4 PAGE UM TIFFANY JULY 03, 1981 18:45:47 5.0T7 162 0 FTNTIDY'S OWN SUBROUTINE SPRINT. CALLS SPRINT#. 00727/007A *FTNTIDY FTNREAD SA G W062:FTNTIDY.S(11000,11999) 5.1T2 157 FTNTIDY.FTNREAD.SA.007 1 LINE 72 9 PAGE UM TIFFANY JULY 23, 1983 13:08:14 0 AN INPUT ROUTINE THAT EDITS SOURCE ACCORDING TO LINE, EDITED, IBM, OR LONG FORMAT. ASSEMBLE USING THE FTNTIDY MACLIB (727/8). ******************************************************************************** D5.0B version: Changed to convert mixed case input. ******************************************************************************** 00727/008A *FTNTIDY MACLIB SM G W062:FTNTIDYMAC 5.1T2 158 FTNTIDY.MACLIB.SM.008 1 LINE 72 6 PAGE UM TIFFANY JULY 23, 1983 13:08:15 0 Referenced by comments of: 727/1, 727/2, 727/4, 727/5, 727/7 00727/009A *FTNTIDY OE G *FTNTIDY 5.1T2 159 FTNTIDY..OE.009 1 LINE 10756 10 PAGE UM TIFFANY JULY 23, 1983 13:08:15 *FTNTIDY 00728/001A MISC.MACROS SM G COPY:MISC.MACROS 5.1T2 160 MISC.MACROS..SM.001 1 LINE 72 7 PAGE UM MTA JULY 23, 1983 13:08:16 COPY:MISC.MACROS 0 Contains various miscellaneous system macros including CONSDSCT (the CONSIO dsect used by the OPERATOR job, CONSIO subroutine, and CONFIG job), IPLTVDCT used by IPLREAD and CONFIG, the MIF macros, the SVCEQU, LOCKSVC, and UNLKSVC macros. Documentation for the MIF macros is available in (685/4). 1 SUN SEP 08/96 15:24:55 Page 503 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 4/5, 8/1, 21/1, 45/1, 46/1, 67/10, 79/1, 354/5, 400/1, 509/1, 515/1, 540/8, 577/1, 598/1, 629/1, 634/1, 634/3, 634/6, 637/1, 642/15, 682/24, 732/1, 769/1, 769/4, 769/7, 769/13, 769/16, 769/19, 769/22, 769/30, 770/1, 777/1, 787/15, 787/17, 787/19, 790/2, 790/4, 806/1, 811/2, 818/1, 838/1, 864/2, 866/1, 1051/31, 1051/37, 1058/15, 3024/1, 4000/1 00729/001 FIND LABEL *FLB C *FLB 5.0T3 302 FIND_LABEL.*FLB.C.001 1 LINE 47 1 PAGE UM WSG JULY 03, 1981 18:46:35 5.0T7 167 *FLB 0 Command file used by the operators to run the FNDLBL program (729/2). Invoked by entering MTS *FLB on the operator's console. 0 Referenced by comments of: 135/1 00729/002 FIND LABEL FNDLBL PGM SA G S1560 5.0T3 VLO FSNAME=FIND_LABEL.FNDLBL_PGM.SA.002(1) 303 5.0T3 303 FIND_LABEL.FNDLBL_PGM.SA.002 1 LINE 72 4 PAGE UM WSG JULY 03, 1981 18:46:35 5.0T7 168 0 Program to read a tape, printing out the volume label and density. Source in lines 1,999. Assemble using the PRINTDUMP macros (400/16). Copies *CNFGINFODSECT (654). 0 Referenced by comments of: 729/1 00729/003 FIND LABEL FNDLBL PGM OC G SYS:FNDLBL 5.0T3 304 FIND_LABEL.FNDLBL_PGM.OC.003 1 LINE 80 3 PAGE UM WSG JULY 03, 1981 18:46:37 5.0T7 169 SYS.:FNDLBL 00730/001 TSS UTILITIES OC G MTS:TSS/REL3.UTL 5.0T3 305 TSS_UTILITIES..OC.001 1 LINE 80 34 PAGE UM MTA JULY 03, 1981 18:46:37 5.0T7 170 0 IPL-able decks for TSS Release 3 utilities (DASDI, DUMP/RESTORE, and VAM2 utilities). Modified IBM object to allow all 16 channels. 00731/001 CHECKFE SUBR SA G S1560 5.0T3 VLO FSNAME=CHECKFE_SUBR..SA.001(1) 306 5.0T3 306 CHECKFE_SUBR..SA.001 1 LINE 80 4 PAGE UM OGDEN MAY 22, 1979 07:40:40 5.0T7 171 0 SUBROUTINE CALLED BY SSRTN (413/1) TO CHECK THE STATUS OF THE DATA CONCENTRATORS AND THE MERIT PDP-11, STORE THE STATUS CODE IN THE JOBSTA VECTOR, AND, OPTIONALLY, START AN MTS JOB IF "BAD" STATUS IS RETURNED. CALLS THE FESNIFF SUBROUTINE (731/3). COPIES COPY:JOBSTA (413/9). 0 Referenced by comments of: 413/1, 731/3 00731/002 CHECKFE SUBR OC G # (PART OF RESIDENT SYSTEM) UM OGDEN 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 504 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00731/003 CHECKFE SUBR FESNIFF SUBR SA G S1560 5.0T3 VLO FSNAME=CHECKFE_SUBR.FESNIFF_SUBR.SA.003(1) 307 5.0T3 307 CHECKFE_SUBR.FESNIFF_SUBR.SA.003 1 LINE 72 3 PAGE UM OGDEN OCT. 02, 1980 00:42:28 5.0T7 172 0 Subroutine called by CHECKFE (731/1) and CHKDEV (734/3) to actually determine the status of one of the Data Concentrators or the Merit PDP-11. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU(100) (087). 0 Referenced by comments of: 731/1, 734/3 00731/004 CHECKFE SUBR FESNIFF SUBR OC G # (PART OF RESIDENT SYSTEM) UM OGDEN 0 Object part of Resident System (468). 00731/005 CHECKFE SUBR *FIXFEP C *FIXFEP 5.0T3 308 CHECKFE_SUBR.*FIXFEP.C.005 1 LINE 20 1 PAGE UM OGDEN JULY 03, 1981 18:48:02 5.0T7 173 *FIXFEP 0 OPERATOR FILE STARTED AUTOMATICALLY BY CHECKFE WHEN IT DETECTS SOMETHING ABNORMAL WITH ONE OF THE FRONT END PROCESSORS. $SOURCES TO SYS:FIXFEP (731/6). 0 Referenced by comments of: 731/6 00731/006 CHECKFE SUBR SYS:FIXFEP C SYS:FIXFEP 5.0T3 309 CHECKFE_SUBR.SYS:FIXFEP.C.006 1 LINE 84 1 PAGE UM OGDEN JULY 03, 1981 18:48:03 5.0T7 174 SYS:FIXFEP 0 COMMAND FILE $SOURCED TO BY (731/5). $RUNS SYS:HUH (734/4). 0 Referenced by comments of: 731/5 00731/007 CHECKFE SUBR SYS:FIXLOG D # SYS:FIXLOG UM OGDEN SYS:FIXLOG@E 0 LOG FILE USED BY SYS:FIXFEP. 00732/001A STOR SA G W170:STOR(*F,-1) 5.1T2 161 STOR..SA.001 1 LINE 73 23 PAGE UM HELFFRICH JULY 23, 1983 13:08:17 W170:STOR 0 STORAGE ALLOCATION ROUTINES (WHICH ARE INDEPENDENT OF MTS). COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU(100) (087). ASSEMBLE USING COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4), COPY:MISC.MACROS (728), AND COPY:SETPARM (653). 0 Referenced by comments of: 41/1, 732/2 00732/002C STOR UPDATE UC G W170:STOR(10000) 5.1T2 162 STOR.UPDATE.UC.002 1 LINE 70 3 PAGE UM HELFFRICH JULY 23, 1983 13:08:19 0 Update deck to be applied to (732/1) to yield current source. 1 SUN SEP 08/96 15:24:55 Page 505 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00732/003A STOR OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 0 Referenced by comments of: 732/4 00732/004A STOR TEST PROGRAM SA G W170:STOR.DUMP(1000) 5.1T2 163 STOR.TEST_PROGRAM.SA.004 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 13:08:20 W170:STOR.DUMP 0 TEST PROGRAM TO BE $DEBUGGED WITH (732/3) TO TEST IT. STORAGE REQUESTS CAN BE SIMULATED BY CHANGING REGISTER CONTENTS AND GOING TO THE ROUTINE ENTRY POINT. A CALL TO ROUTINE STORDUMP CAN BE SET UP TO DUMP THE RESULTANT CONTROL BLOCK STRUCTURE. SEE COMMENTS IN LISTING. 00732/005A STOR TEST PROGRAM OC G W170:STOR.DUMP(1,999) 5.1T2 164 STOR.TEST_PROGRAM.OC.005 1 LINE 80 3 PAGE UM HELFFRICH JULY 23, 1983 13:08:20 00732/006A STOR DUMP PROGRAM SA O W170:STOR.VERIFY(1005) 5.1T2 165 STOR.DUMP_PROGRAM.SA.006 1 LINE 72 5 PAGE UM HELFFRICH JULY 23, 1983 13:08:20 0 This program will read a dump tape and check storage control blocks for consistency. 00732/007A STOR DUMP PROGRAM OC O W170:STOR.VERIFY(1,999) 5.1T2 166 STOR.DUMP_PROGRAM.OC.007 1 LINE 80 4 PAGE UM HELFFRICH JULY 23, 1983 13:08:21 0 Contains a "$CONTINUE WITH MTS:PRINTDUMP" (400/17) record. 00733/001 INTRO GUIDE: TERMINALS WF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TERM81.SOU 5.0T3 315 INTRO_GUIDE:_TERMINALS..WF.001 1 LINE 102 44 PAGE UM MANUAL APR. 28, 1981 15:22:57 5.0T7 180 0 FORMAT SOURCE FOR "INTRODUCTION TO TERMINALS," FEB. 1981. 00733/002 INTRO GUIDE: TERMINALS PF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TERM81.OUT 5.0T3 316 INTRO_GUIDE:_TERMINALS..PF.002 1 LINE 97 96 PAGE UM MANUAL APR. 28, 1981 15:24:27 5.0T7 181 0 FORMAT PRINT FILE. 00733/003 INTRO GUIDE: TERMINALS INDEX D S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TERM81.INDEX 5.0T3 317 INTRO_GUIDE:_TERMINALS.IN.D.003 1 LINE 100 4 PAGE UM MANUAL APR. 28, 1981 15:25:37 5.0T7 182 0 INPUT TO *INDEX (580) FOR THE INDEX. 00734/001A HUH *HUH C *HUH 5.1T2 167 HUH.?HUH.C.001 1 LINE 63 1 PAGE UM OGDEN JULY 23, 1983 13:08:21 *HUH 0 COMMAND FILE USED BY THE OPERATORS TO RUN THE HUH PROGRAM (734/2). INVOKED BY ENTERING "MTS *HUH" ON THE OPERATORS CONSOLE. 1 SUN SEP 08/96 15:24:55 Page 506 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00734/002 HUH HUH PGM SG G S1560 5.0T3 VLO FSNAME=HUH.HUH_PGM.SG.002(1) 319 5.0T3 319 HUH.HUH_PGM.SG.002 1 LINE 106 1 PAGE UM OGDEN MAY 22, 1979 07:40:38 5.0T7 184 0 PROGRAM WHICH CALLS THE CHKDEV SUBROUTINE (734/3) TO DETERMINE THE STATUS OF THE THREE DATA CONCENTRATORS AND THE MERIT PDP-11. 0 Referenced by comments of: 734/1, 734/3, 734/4 00734/003 HUH CHKDEV SUBR SA G MNET:MUP(1700,1799) 5.0T3 320 HUH.CHKDEV_SUBR.SA.003 1 LINE 80 3 PAGE UM OGDEN MAY 22, 1979 07:40:42 5.0T7 185 0 SUBROUTINE CALLED BY MUP (642/15) AND HUH (734/2) TO DETERMINE THE STATE OF THE MERIT PDP-11 OR ONE OF THE DATA CONCENTRATORS AND TO RETURN THE STATE AND AN ASSOCIATED TEXT STRING. CALLS FESNIFF (731/3). 0 Referenced by comments of: 642/15, 642/19, 731/3, 734/2, 734/4 00734/004 HUH SYS.:HUH OC G SYS:HUH 5.0T3 321 HUH.SYS.:HUH.OC.004 1 LINE 1182 3 PAGE UM OGDEN APR. 06, 1980 12:37:27 5.0T7 186 SYS:HUH 0 OBJECT FOR HUH (734/2) AND CHKDEV (734/3). 0 Referenced by comments of: 731/6 00735/001 RESOURCES FILEDEF D DBME:RES.FD 5.0T3 322 RESOURCES.FILEDEF.D.001 1 LINE 84 9 PAGE UM MERIT JULY 03, 1981 18:48:49 5.0T7 187 0 THE FILE DEFINITION FOR THE SPIRES FILE DBME.RESOURCES, A CATALOG OF PROGRAMS, SUBROUTINES, AND DATA FILES AVAILABLE AT MICHIGAN COLLEGES AND UNIVERSITIES (UM, WSU, MSU, AND WMU). THIS FILE SHOULD BE USED WITH SPIRES 5.0 OR LATER VERSIONS ONLY AND SHOULD NOT BE RENUMBERED. ALWAYS COPY @-IC. 00735/002 RESOURCES NOTES WF S1560 5.0T3 VLO FSNAME=RESOURCES.NOTES.WF.002(1) 323 5.0T3 323 RESOURCES.NOTES.WF.002 1 LINE 69 2 PAGE UM MERIT MAY 03, 1981 16:09:04 5.0T7 188 0 NOTES ON INSTALLING DBME.RESOURCES. 00735/003 RESOURCES /A FILE D DBME:RESOURCES/A 5.0T3 324 RESOURCES./A_FILE.D.003 1 LINE 2048 1104 PAGE UM MERIT JULY 03, 1981 18:49:16 5.0T7 189 0 THE /A FILE FOR DBME.RESOURCES. 00735/004 RESOURCES /Q FILE D DBME:RESOURCES/Q 5.0T3 325 RESOURCES./Q_FILE.D.004 1 LINE 2048 3 PAGE UM MERIT JULY 03, 1981 18:50:23 5.0T7 190 0 THE /Q FILE FOR DBME.RESOURCES. 1 SUN SEP 08/96 15:24:55 Page 507 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00735/005 RESOURCES FORMATS D DBME:RES.FORMATS 5.0T3 326 RESOURCES.FORMATS.D.005 1 LINE 126 16 PAGE UM MERIT JULY 03, 1981 18:50:23 5.0T7 191 0 THE FORMATS ASSOCIATED WITH DBME.RESOURCES. THIS FILE IS ORGANIZED BY 1000S. 00735/006 RESOURCES THESAURUS D DBME:RES.THE 5.0T3 327 RESOURCES.THESAURUS.D.006 1 LINE 87 8 PAGE UM MERIT JULY 03, 1981 18:50:25 5.0T7 192 0 BATCH INPUT USED TO BUILD THE THESAURUS ASSOCIATED WITH THE SPIRES SUBFILE RES-SUBJECTS. 00735/007 RESOURCES RES-SUBCHK D DBME:RES.SUBCHK 5.0T3 328 RESOURCES.RES-SUBCHK.D.007 1 LINE 113 11 PAGE UM MERIT JULY 03, 1981 18:50:26 5.0T7 193 0 BATCH INPUT USED TO BUILD THE SPIRES SUBFILE RES-SUBCHK. 00735/008 RESOURCES JUG SUB. CODES P DBME:RES.SUBJECT 5.0T3 329 RESOURCES.JUG_SUB._CODES.P.008 1 LINE 72 6 PAGE UM MERIT JULY 03, 1981 18:50:29 5.0T7 194 0 A "READABLE" LIST OF THE MODIFIED JOINT USERS GROUP (JUG) SUBJECT CODES. 00736/001 PLM PASS 0 SF O PLMO S1153 UNSP VLO FSNAME=PLM80.S 5.0T3 330 PLM.PASS_0.SF.001 1 LINE 80 1 PAGE UM UNSP DEC. 19, 1977 11:41:29 5.0T7 195 0 THE INTEL PL/M CROSS COMPILER (VERSION 2) FOR THE 8080 MICROPROCESSOR. THIS IS A SHORT FORTRAN PROGRAM THAT SETS UP SOME DEFAULT I/O UNIT ASSIGNMENTS BY CALLING FTNCMD AND THEN LINKS TO PASS1 (736/3) AND PASS2 (736/5) OF THE COMPILER. 00736/002 PLM PASS 0 OE O UNSP:PLM 5.0T3 331 PLM.PASS_0.OE.002 1 LINE 1162 1 PAGE UM UNSP JULY 03, 1981 18:50:54 5.0T7 196 00736/003 PLM PASS 1 SF O # S1153 UNSP VLO FSNAME=PLM81.S UM UNSP 0 PASS 1 OF VERSION 2 OF INTEL'S PL/M CROSS COMPILER. NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. 0 Referenced by comments of: 736/1 00736/004 PLM PASS 1 OE O # UNSP:PLM81 UM UNSP 1 SUN SEP 08/96 15:24:55 Page 508 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00736/005 PLM PASS 2 SF O # S1153 UNSP VLO FSNAME=PLM82.S UM UNSP 0 PASS 2 OF VERSION 2 OF INTEL'S PL/M CROSS COMPILER. NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. 0 Referenced by comments of: 736/1 00736/006 PLM PASS 2 OE O # UNSP:PLM82 UM UNSP 00736/007 PLM SAMPLE PGM S G UNSP:PLM.SAMPLE 5.0T3 332 PLM.SAMPLE_PGM.S.007 1 LINE 72 1 PAGE UM UNSP JULY 03, 1981 18:51:08 5.0T7 197 0 A SAMPLE PLM PROGRAM. 00736/008 PLM WF S1153 UNSP VLO FSNAME=PLM.FMT 5.0T3 333 PLM..WF.008 1 LINE 69 3 PAGE UM UNSP SEP. 15, 1980 16:43:33 5.0T7 198 00737/001 *ASMH BASIC MATERIAL O O # S0858 'ASMH PTF 21' FMT=FB(3440,80) 1 UM J BODWIN 0 IBM ASMH PROGRAM PRODUCT ASSEMBLER, WHICH CANNOT BE DISTRIBUTED, BUT MUST BE OBTAINED DIRECTLY FROM IBM. THE MTS DISTRIBUTION CONSISTS ONLY OF DOCUMENTATION AND COMMANDS, PROGRAMS, AND UPDATES TO THE IBM SOURCE TO INSTALL ASMH IN MTS. COMPONENTS (737/1) - (737/9) ARE THE OS VERSION WHICH IS INTENDED TO BE USED UNDER *FAKEOS TO ASSEMBLE THE MTS VERSION, WHICH BEGINS WITH COMPONENT (737/10). (737/1), THE BASIC MATERIAL, IS THE IBM SUPPLIED TAPE FOR PTF 21 ASMH. THE PAPER LABEL ON THE IBM TAPE HAS THE FOLLOWING FORM: *************************** **** 5734-AS1 **** *** *** ** LICEN-PROGRAM IBM PROPERTY ** * COPYRIGHT 1970 IBM CORP. * * * * F0021 PF02 * * 987-G3-30 ***** V05 M00 * * 5806171 *** *** 9TR/1600 * * #0535 ** ** B0064 * ***************** ***************** *************************************************************************** ASMH is written in ASMH. The update decks, together with the ASMH source from IBM, produce an ASMH source program. This program provides many extensions to the standard IBM ASMH. Unfortunately, the source program itself depends on some of these extensions (or, more correctly, the source program uses *SYSMAC which requires some 1 SUN SEP 08/96 15:24:55 Page 509 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 of the extensions). This means that it is NOT possible to assemble the extended ASMH unless you already have the extended ASMH. This only poses a problem for NEW MTS installations (old MTS installations should already have a working version of *ASMH that will assemble itself). This problem is apparently several years old and there are no plans to fix it before Release 2 of ASMH is distributed. Anyone who runs into this problem should contact UM for assistance. *************************************************************************** 0 Referenced by comments of: 511/1, 648/1, 686/1, 721/1, 737/1, 810/13, 822/2, 822/6, 822/11, 822/20 00737/002 *ASMH OS INFO WF S1560 5.0T3 VLO FSNAME=ASMH.OS_INFO.WF.002(1) 334 5.0T3 334 ASMH.OS_INFO.WF.002 1 LINE 98 2 PAGE UM J BODWIN MAY 13, 1978 18:24:21 5.0T7 199 0 COMPUTING CENTER INTERNAL STAFF MEMO DESCRIBING THE USE OF ASMH UNDER *FAKEOS. 00737/003 *ASMH INVOKER SA G S1560 5.0T3 VLO FSNAME=ASMH.INVOKER.SA.003(1) 335 5.0T3 335 ASMH.INVOKER.SA.003 1 LINE 71 3 PAGE UM J BODWIN MAY 13, 1978 18:24:22 5.0T7 200 0 PROGRAM TO INVOKE *FAKEOS TO RUN THE OS VERSION OF ASMH. CONTAINS $CONTINUE WITH FAKEOS.GBLS (545/20) AND *GDINFODSECT (594) RECORDS. THE OBJECT PROGRAM USES NEW:ASMHSYSMAC (737/9), -ASMH#UT1, &ASMHID:ASMHLIB (737/7), AND &ASMHID:ASMHBLDL (737/6). 0 Referenced by comments of: 737/6, 737/7 00737/004 *ASMH INVOKER OE G S1560 5.0T3 VLO FSNAME=ASMH.INVOKER.OE.004(1) 336 5.0T3 336 ASMH.INVOKER.OE.004 1 SEQ 853 1 PAGE UM J BODWIN MAY 13, 1978 18:24:23 5.0T7 201 00737/005 *ASMH BLDL INPUT D S1560 5.0T3 VLO FSNAME=ASMH.BLDL_INPUT.D.005(1) 337 5.0T3 337 ASMH.BLDL_INPUT.D.005 1 LINE 60 1 PAGE UM J BODWIN MAY 13, 1978 18:24:24 5.0T7 202 0 INPUT TO *FAKEOSCREBLDL (545/43) FOR ASMH OS OBJECT DECKS. 00737/006 *ASMH BLDL D S1560 5.0T3 VLO FSNAME=ASMH.BLDL.D.006(1) 338 5.0T3 338 ASMH.BLDL.D.006 1 SEQ 250 1 PAGE UM J BODWIN MAY 13, 1978 18:24:25 5.0T7 203 0 OUTPUT FROM *FAKEOSCREBLDL (545/43) FOR OS VERSION OF ASMH. USED BY ASMHINVK (737/3). 0 Referenced by comments of: 737/3 00737/007 *ASMH OS LIBRARY OL O # ETC:ASMHLIB UM J BODWIN 0 OBJECT LIBRARY VERSION OF OS ASMH. USED BY ASMHINVK (737/3). THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS. 1 SUN SEP 08/96 15:24:55 Page 510 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 737/3 00737/008 *ASMH BLOCK MACROS SS O S1560 5.0T3 VLO FSNAME=ASMH.BLOCK_MACROS.SS.008(1) 339 5.0T3 339 ASMH.BLOCK_MACROS.SS.008 1 LINE 70 1 PAGE UM J BODWIN MAR. 09, 1978 22:41:24 5.0T7 204 0 PROGRAM TO BLOCK A MACRO LIBRARY FOR THE OS VERSION OF ASMH. THIS MAKES IT RUN FASTER AND ALLOWS LARGER LIBRARIES BY USING FEWER LINE NUMBERS. USES UNSP:SPITLIB. 00737/009 *ASMH SYSMAC SM G S1560 5.0T3 VLO FSNAME=ASMH.SYSMAC.SM.009(1) 340 5.0T3 340 ASMH.SYSMAC.SM.009 1 LINE 4000 98 PAGE UM J BODWIN MAY 13, 1978 18:26:10 5.0T7 205 0 VERSION OF *SYSMAC FOR OS ASMH. THIS AGREED WITH *SYSMAC WHEN IT WAS PRODUCED EXCEPT FOR A FEW CHANGES WHICH WORK ONLY IN THE MTS VERSION OF ASMH. 0 Referenced by comments of: 737/1, 737/3, 737/20 00737/010 *ASMH OPTNL MATERIAL SM O # S0991 'ASMH SOURCE' FMT=FB(3440,80) 1 UM J BODWIN 0 SOURCE FOR THE ASMH MACRO LIBRARY. THIS DOES NOT QUITE AGREE WITH THE OBJECT IN THE BASIC MATERIAL. THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS. THE PAPER LABEL ON THE IBM TAPE HAS THE FOLLOWING FORM: *************************** **** 5734-AS1 **** *** *** ** LICEN-PROGRAM IBM PROPERTY ** * COPYRIGHT 1970 IBM CORP. * * * * 7029 OPTIONAL * * 043-G4-46 ***** V05 M00 * * 5806171 *** *** 9TR/1600 * * #0694 ** ** B0634 * ***************** ***************** 0 Referenced by comments of: 737/1, 737/23 00737/011 *ASMH OPTNL MATERIAL SA O # S0991 'ASMH SOURCE' FMT=FB(3440,80) 2 UM J BODWIN 0 SOURCE FOR THE OS VERSION OF ASMH. THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS. 0 Referenced by comments of: 737/15 00737/012 *ASMH INFO WF S1560 5.0T3 VLO FSNAME=ASMH.INFO.WF.012(1) 341 5.0T3 341 ASMH.INFO.WF.012 1 LINE 140 4 PAGE UM J BODWIN MAY 13, 1978 18:26:16 5.0T7 206 0 MEMO TO COMPUTING CENTER STAFF DESCRIBING THE MTS (NOT *FAKEOS) VERSION OF *ASMH. 0 Referenced by comments of: 737/13 1 SUN SEP 08/96 15:24:55 Page 511 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/013 *ASMH INFO2 WF S1560 5.0T3 VLO FSNAME=ASMH.INFO2.WF.013(1) 342 5.0T3 342 ASMH.INFO2.WF.013 1 LINE 80 2 PAGE UM J BODWIN NOV. 01, 1978 02:17:47 5.0T7 207 0 ADDENDUM TO (737/12). 00737/014 *ASMH INFO3 WX S1560 5.0T3 VLO FSNAME=ASMH.INFO3.WX.014(1) 343 5.0T3 343 ASMH.INFO3.WX.014 1 LINE 106 5 PAGE UM J BODWIN NOV. 02, 1979 22:27:02 5.0T7 208 0 A MEMO GIVING DETAILS ABOUT RECENT CHANGES TO *ASMH. 00737/015 *ASMH UTILITY SS O ASMH:UTIL 5.0T3 344 ASMH.UTILITY.SS.015 1 LINE 117 4 PAGE UM J BODWIN JULY 03, 1981 18:53:42 5.0T7 209 ASMH:UTIL 0 SPITBOL PROGRAM AND MTS COMMANDS TO MAKE ASSEMBLING LESS THAN ALL OF *ASMH POSSIBLE. $SOURCE TO IT AND SAY HELP FOR EXPLANATION. IT KEEPS A LOG OF CHANGES IN ASMHLOG. IT ASSUMES THE MACRO UPDATE HAS BEEN DONE. THE FOLLOWING FILES ARE REFERENCED: SYS:ASMHMASTER (737/11), WATF:ASMHMACLIB (737/25), ASMHDIR (737/16), ASMHUPD (737/18), ASMHUPDBUGS (737/19), ASMHUPDMTS (737/20), ASMHUPDNUM (737/21), ASMHUPDEXTEN (737/22), ASMHOBJ (737/29), VARIOUS SCRATCH FILES, UNSP:SPITLIB (590/30), ASMHLOG, AND *CDUPDATE (1036/2). 0 Referenced by comments of: 737/16 00737/016A *ASMH DIR D ASMH:DIR 5.1T2 168 ASMH.DIR.D.016 1 LINE 315 3 PAGE UM J BODWIN JULY 23, 1983 13:08:22 ASMH:DIR 0 DIRECTORY OF LOCATION OF *ASMH COMPONENTS USED BY ASMHUTIL (737/15). 0 Referenced by comments of: 737/15 00737/017 *ASMH INSTALL C ASMH:INSTALL 5.0T3 346 ASMH.INSTALL.C.017 1 LINE 50 1 PAGE UM J BODWIN JULY 03, 1981 18:53:45 5.0T7 211 ASMH:INSTALL 0 COMMANDS TO CREATE A NEW VERSION OF SEG2:ASMH IN -SEG2. 00737/018 *ASMH FIRST UPDATE UC G ASMH:UPD 5.0T3 347 ASMH.FIRST_UPDATE.UC.018 1 LINE 51 3 PAGE UM J BODWIN JULY 03, 1981 18:53:46 5.0T7 212 ASMH:UPD 0 Update to get rid of the ./ cards and irrelevant components in the source on the IBM tape. Must be the first update applied. The others should work in any order, but may not. The order used here is BUGS, MTS, NUM, and EXTEN. Has $CONTINUE WITHs to ASMHUPDBUGS (737/19), ASMHUPDMTS (737/20), ASMHUPDNUM (737/21), and ASMHUPDEXTEN (737/22). 0 Referenced by comments of: 737/15 1 SUN SEP 08/96 15:24:55 Page 512 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/019 *ASMH BUGS UPDATE UC G ASMH:UPDBUGS 5.0T3 348 ASMH.BUGS_UPDATE.UC.019 1 LINE 71 21 PAGE UM J BODWIN JULY 03, 1981 18:53:47 5.0T7 213 ASMH:UPDBUGS 0 Update to fix bugs and clean up ASMH, including several speed improvements. 0 Referenced by comments of: 737/15, 737/18 00737/020 *ASMH MTS UPDATE UC G ASMH:UPDMTS 5.0T3 349 ASMH.MTS_UPDATE.UC.020 1 LINE 73 29 PAGE UM J BODWIN JULY 03, 1981 18:53:50 5.0T7 214 ASMH:UPDMTS 0 Update to make ASMH work in MTS. Three " COPY *GDINFODSECT" statements in this file must be changed to " COPY GDDSECT" for the first assembly of ASMH (under *FAKEOS) since the OS version restricts copy section names to eight-character identifiers. Also, a macro library containing ASMHSYSMAC (737/9), ASMHMACLIB (737/25), and GDDSECT, must be built, since only one macro library is allowed by the OS version. 0 Referenced by comments of: 737/15, 737/18 00737/021 *ASMH NUM UPDATE UC G ASMH:UPDNUM 5.0T3 350 ASMH.NUM_UPDATE.UC.021 1 LINE 70 6 PAGE UM J BODWIN JULY 03, 1981 18:53:54 5.0T7 215 ASMH:UPDNUM 0 Update to add NUM option. 0 Referenced by comments of: 737/15, 737/18 00737/022 *ASMH EXTEN OPTION UC G ASMH:UPDEXTEN 5.0T3 351 ASMH.EXTEN_OPTION.UC.022 1 LINE 72 12 PAGE UM J BODWIN JULY 03, 1981 18:53:56 5.0T7 216 ASMH:UPDEXTEN 0 Update to add features controlled by EXTEN option. 0 Referenced by comments of: 737/15, 737/18 00737/023 *ASMH MACRO UPDATE UC G ASMH:MACUPD 5.0T3 352 ASMH.MACRO_UPDATE.UC.023 1 LINE 78 25 PAGE UM J BODWIN JULY 03, 1981 18:53:58 5.0T7 217 ASMH:MACUPD 0 Update to produce the MTS macro library from the IBM source (737/10). 0 Referenced by comments of: 737/25 00737/024A *ASMH NEW UPDATES UC G ASMH:UPDNEW 5.1T2 169 ASMH.NEW_UPDATES.UC.024 1 LINE 78 90 PAGE UM J BODWIN JULY 23, 1983 13:08:23 ASMH:UPDNEW 0 Post D4.1 updates, in chronological order, to ASMH. *************************************************************************** ASMH is written in ASMH. The update decks, together with the ASMH 1 SUN SEP 08/96 15:24:55 Page 513 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 source from IBM, produce an ASMH source program. This program provides many extensions to the standard IBM ASMH. Unfortunately, the source program itself depends on some of these extensions (or, more correctly, the source program uses *SYSMAC which requires some of the extensions). This means that it is NOT possible to assemble the extended ASMH unless you already have the extended ASMH. This only poses a problem for NEW MTS installations (old MTS installations should already have a working version of *ASMH that will assemble itself). This problem is apparently several years old and there are no plans to fix it before Release 2 of ASMH is distributed. Anyone who runs into this problem should contact UM for assistance. *************************************************************************** 00737/025 *ASMH MACRO LIBRARY SM G # ASMH:MACLIB UM J BODWIN 0 OUTPUT FROM (737/23) UPDATE. 0 Referenced by comments of: 737/15, 737/20, 737/28 00737/026 *ASMH MAIN PGM SA G ASMH:MAIN(1,999) 5.0T3 354 ASMH.MAIN_PGM.SA.026 1 LINE 38 1 PAGE UM J BODWIN JULY 03, 1981 18:54:09 5.0T7 219 ASMH:MAIN 0 MAIN PROGRAM TO CALL IEV90. THIS PLUS IEV60 AND IEV61 ARE IN *ASMH. THE REST MAY BE EITHER THERE OR IN SHARED VM. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 737/30 00737/027 *ASMH MAIN PGM OC G ASMH:MAIN(1000) 5.0T3 355 ASMH.MAIN_PGM.OC.027 1 LINE 80 1 PAGE UM J BODWIN JULY 03, 1981 18:54:10 5.0T7 220 0 ENDS WITH A "$CONTINUE WITH MTA:ASMHOBJ" RECORD. 00737/028 *ASMH OPTIONS ASMBLY SA G S1560 5.0T3 VLO FSNAME=ASMH.OPTIONS_ASMBLY.SA.028(1) 356 5.0T3 356 ASMH.OPTIONS_ASMBLY.SA.028 1 LINE 49 1 PAGE UM J BODWIN MAY 13, 1978 18:27:02 5.0T7 221 0 SOURCE FOR THE "SYSGEN OPTIONS" ASSEMBLY WHICH PRODUCES IEV61 WITH LOCAL OPTIONS. ASSEMBLE USING ASMHMACLIB (737/25). 00737/029 *ASMH OBJECT OC G # ASMH:OBJ UM J BODWIN 0 FULL OBJECT WITH SYM CARDS. THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS. 0 Referenced by comments of: 737/15 1 SUN SEP 08/96 15:24:55 Page 514 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/030 *ASMH *ASMH OE G # *ASMH UM J BODWIN *ASMH@UM 0 COMBINED AND PURGED OBJECT OF ASMHMAIN (737/26), IEV60, AND IEV61. THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS. 0 Referenced by comments of: 163/13, 775/1, 775/2 00737/031A *ASMH SHARED VM OBJ OE G # SEG2:ASMH UM J BODWIN SEG2:ASMH@UM 0 OBJECT WITHOUT SYM CARDS FOR THE SHARED VM PART OF ASMH. IT INCLUDES ALL MODULES EXCEPT IEV60 AND IEV61. THIS FILE CANNOT BE DISTRIBUTED DUE TO IBM COPYRIGHT RESTRICTIONS. 00737/032 *ASMH TEST PGM #1 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#1.SA.032(1) 357 5.0T3 357 ASMH.TEST_PGM_#1.SA.032 1 LINE 54 1 PAGE UM J BODWIN APR. 17, 1981 16:57:28 5.0T7 222 0 PROGRAM TO TEST SS INSTRUCTIONS. 00737/033 *ASMH TEST PGM #2 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#2.SA.033(1) 358 5.0T3 358 ASMH.TEST_PGM_#2.SA.033 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 16:58:57 5.0T7 223 0 PROGRAM TO TEST NEW SYSTEM SET SYMBOLS. START AT LINE *F. 00737/034 *ASMH TEST PGM #3 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#3.SA.034(1) 359 5.0T3 359 ASMH.TEST_PGM_#3.SA.034 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 16:59:13 5.0T7 224 0 PROGRAM TO TEST LITERALS IN EQU STATEMENTS AND EXPRESSIONS. 00737/035 *ASMH TEST PGM #4 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#4.SA.035(1) 360 5.0T3 360 ASMH.TEST_PGM_#4.SA.035 1 LINE 76 1 PAGE UM J BODWIN APR. 17, 1981 16:59:26 5.0T7 225 0 PROGRAM TO TEST LINE NUMBER PRINTING. START AT LINE *F. 00737/036 *ASMH TEST PGM #5 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#5.SA.036(1) 361 5.0T3 361 ASMH.TEST_PGM_#5.SA.036 1 LINE 77 1 PAGE UM J BODWIN APR. 17, 1981 17:26:11 5.0T7 226 0 PROGRAM TO TEST COPY AND LIBRARY MACROS. START AT LINE 10 AND ASSIGN 0 TO THIS FILE TOO. 00737/037 *ASMH TEST PGM #6 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#6.SA.037(1) 362 5.0T3 362 ASMH.TEST_PGM_#6.SA.037 1 LINE 70 1 PAGE UM J BODWIN APR. 17, 1981 17:27:02 5.0T7 227 0 PROGRAM TO TEST OPDEF, INSTSET, AND 360/67 INSTRUCTIONS. 1 SUN SEP 08/96 15:24:55 Page 515 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/038 *ASMH TEST PGM #7 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#7.SA.038(1) 363 5.0T3 363 ASMH.TEST_PGM_#7.SA.038 1 LINE 58 1 PAGE UM J BODWIN APR. 17, 1981 17:27:21 5.0T7 228 0 PROGRAM TO TEST NULL TYPE C CONSTANTS IN DC OR DS STATEMENTS. 00737/039 *ASMH TEST PGM #8 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#8.SA.039(1) 364 5.0T3 364 ASMH.TEST_PGM_#8.SA.039 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:27:42 5.0T7 229 0 PROGRAM TO TEST "*NNN" ON LCLC OR GBLC DECLARATIONS. 00737/040 *ASMH TEST PGM #9 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#9.SA.040(1) 365 5.0T3 365 ASMH.TEST_PGM_#9.SA.040 1 LINE 63 1 PAGE UM J BODWIN APR. 17, 1981 17:27:56 5.0T7 230 0 PROGRAM TO TEST ILLEGAL USE OF & THAT BLOWS THE OS VERSION. START AT LINE 10 AND ASSIGN 0 TO THIS FILE. 00737/041 *ASMH TEST PGM #10 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#10.SA.041(1) 366 5.0T3 366 ASMH.TEST_PGM_#10.SA.041 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:28:15 5.0T7 231 0 PROGRAM TO TEST INNER MACRO DEFINITION. 00737/042 *ASMH TEST PGM #11 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#11.SA.042(1) 367 5.0T3 367 ASMH.TEST_PGM_#11.SA.042 1 LINE 72 3 PAGE UM J BODWIN APR. 17, 1981 17:28:24 5.0T7 232 0 PROGRAM TO TEST ORDINARY SYMBOLS IN CONDITIONAL ASSEMBLY. 00737/043 *ASMH TEST PGM #12 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#12.SA.043(1) 368 5.0T3 368 ASMH.TEST_PGM_#12.SA.043 1 LINE 59 1 PAGE UM J BODWIN APR. 17, 1981 17:28:49 5.0T7 233 0 PROGRAM TO TEST SYM CARDS. 00737/044 *ASMH TEST PGM #13 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#13.SA.044(1) 369 5.0T3 369 ASMH.TEST_PGM_#13.SA.044 1 LINE 72 3 PAGE UM J BODWIN APR. 17, 1981 17:29:01 5.0T7 234 0 PROGRAM TO TEST MACRO PARAMETER SCANNING. 00737/045 *ASMH TEST PGM #14 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#14.SA.045(1) 370 5.0T3 370 ASMH.TEST_PGM_#14.SA.045 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:29:15 5.0T7 235 0 PROGRAM TO TEST SERCOM OUTPUT. 00737/046 *ASMH TEST PGM #15 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#15.SA.046(1) 371 5.0T3 371 ASMH.TEST_PGM_#15.SA.046 1 LINE 28 1 PAGE UM J BODWIN APR. 17, 1981 17:30:47 5.0T7 236 0 PROGRAM TO TEST INTERMEDIATE TEXT FILE AND PRINT ONLY TEXT. 1 SUN SEP 08/96 15:24:55 Page 516 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/047 *ASMH TEST PGM #16 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#16.SA.047(1) 372 5.0T3 372 ASMH.TEST_PGM_#16.SA.047 1 LINE 45 1 PAGE UM J BODWIN APR. 17, 1981 17:29:45 5.0T7 237 0 PROGRAM TO TEST REDEFINITION OF MACROS. 00737/048 *ASMH TEST PGM #17 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#17.SA.048(1) 373 5.0T3 373 ASMH.TEST_PGM_#17.SA.048 1 LINE 61 1 PAGE UM J BODWIN APR. 17, 1981 17:30:00 5.0T7 238 0 PROGRAM TO TEST AREAD. 00737/049 *ASMH TEST PGM #18 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#18.SA.049(1) 374 5.0T3 374 ASMH.TEST_PGM_#18.SA.049 1 LINE 53 1 PAGE UM J BODWIN APR. 17, 1981 17:30:11 5.0T7 239 0 PROGRAM TO TEST MSGLEVEL PARAMETER AND SERCOM OUTPUT. RUN WITH MSGLEVEL=9. 00737/050 *ASMH TEST PGM #19 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#19.SA.050(1) 375 5.0T3 375 ASMH.TEST_PGM_#19.SA.050 1 LINE 75 1 PAGE UM J BODWIN APR. 17, 1981 17:30:24 5.0T7 240 0 PROGRAM TO TEST CONTINUATION AT FUNNY PLACES WHICH DON'T WORK IN OS VERSION. 00737/051 *ASMH TEST PGM #20 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#20.SA.051(1) 376 5.0T3 376 ASMH.TEST_PGM_#20.SA.051 1 LINE 28 1 PAGE UM J BODWIN APR. 17, 1981 17:30:47 5.0T7 241 0 PROGRAM TO TEST REPRO. 00737/052 *ASMH TEST PGM #21 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#21.SA.052(1) 377 5.0T3 377 ASMH.TEST_PGM_#21.SA.052 1 LINE 74 2 PAGE UM J BODWIN APR. 17, 1981 17:31:02 5.0T7 242 0 PROGRAM TO TEST MNOTE AND PUNCH. 00737/053 *ASMH TEST PGM #22 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#22.SA.053(1) 378 5.0T3 378 ASMH.TEST_PGM_#22.SA.053 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:31:17 5.0T7 243 0 PROGRAM TO TEST TITLE, EJECT, SPACE, AND PRINT. 00737/054 *ASMH TEST PGM #23 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#23.SA.054(1) 379 5.0T3 379 ASMH.TEST_PGM_#23.SA.054 1 LINE 39 1 PAGE UM J BODWIN APR. 17, 1981 17:31:32 5.0T7 244 0 PROGRAM TO TEST RS AND SI INSTRUCTIONS. 00737/055 *ASMH TEST PGM #24 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#24.SA.055(1) 380 5.0T3 380 ASMH.TEST_PGM_#24.SA.055 1 LINE 61 1 PAGE UM J BODWIN APR. 17, 1981 17:31:45 5.0T7 245 0 PROGRAM TO TEST ADCONS IN DSECTS. 1 SUN SEP 08/96 15:24:55 Page 517 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/056 *ASMH TEST PGM #25 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#25.SA.056(1) 381 5.0T3 381 ASMH.TEST_PGM_#25.SA.056 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:32:06 5.0T7 246 0 PROGRAM TO TEST TYPE X, B, AND C CONSTANTS. 00737/057 *ASMH TEST PGM #26 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#26.SA.057(1) 382 5.0T3 382 ASMH.TEST_PGM_#26.SA.057 1 LINE 37 1 PAGE UM J BODWIN APR. 17, 1981 17:32:21 5.0T7 247 0 PROGRAM TO TEST EJECT AT BOTTOM OF PAGE WHICH GIVES A BLANK PAGE IN OS VERSION. 00737/058 *ASMH TEST PGM #27 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#27.SA.058(1) 383 5.0T3 383 ASMH.TEST_PGM_#27.SA.058 1 LINE 64 1 PAGE UM J BODWIN APR. 17, 1981 17:32:45 5.0T7 248 0 PROGRAM TO TEST TRUNCATED SETC EXPRESSIONS. 00737/059 *ASMH TEST PGM #28 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#28.SA.059(1) 384 5.0T3 384 ASMH.TEST_PGM_#28.SA.059 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:33:01 5.0T7 249 0 PROGRAM TO TEST BLANK CARDS WITH AND WITHOUT LABELS. 00737/060 *ASMH TEST PGM #29 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#29.SA.060(1) 385 5.0T3 385 ASMH.TEST_PGM_#29.SA.060 1 LINE 55 1 PAGE UM J BODWIN APR. 17, 1981 17:33:10 5.0T7 250 0 PROGRAM TO TEST LENGTH ATTRIBUTE WITH LITERALS, SET SYMBOLS, AND PARAMETERS. 00737/061 *ASMH TEST PGM #30 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#30.SA.061(1) 386 5.0T3 386 ASMH.TEST_PGM_#30.SA.061 1 LINE 54 1 PAGE UM J BODWIN APR. 17, 1981 17:33:24 5.0T7 251 0 PROGRAM TO TEST TITLES WITH SET SYMBOLS AND IN MACROS. 00737/062 *ASMH TEST PGM #31 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#31.SA.062(1) 387 5.0T3 387 ASMH.TEST_PGM_#31.SA.062 1 LINE 67 1 PAGE UM J BODWIN APR. 17, 1981 17:33:45 5.0T7 252 0 PROGRAM TO TEST MHELP 8 OUTPUT. 00737/063 *ASMH TEST PGM #32 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#32.SA.063(1) 388 5.0T3 388 ASMH.TEST_PGM_#32.SA.063 1 LINE 65 1 PAGE UM J BODWIN APR. 17, 1981 17:34:03 5.0T7 253 0 PROGRAM TO TEST UNREFERENCED DXD'S. 00737/064 *ASMH TEST PGM #33 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#33.SA.064(1) 389 5.0T3 389 ASMH.TEST_PGM_#33.SA.064 1 LINE 66 1 PAGE UM J BODWIN APR. 17, 1981 17:34:18 5.0T7 254 0 PROGRAM TO TEST EXPRESSIONS IN Q TYPE CONSTANTS. 1 SUN SEP 08/96 15:24:55 Page 518 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/065 *ASMH TEST PGM #34 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#34.SA.065(1) 390 5.0T3 390 ASMH.TEST_PGM_#34.SA.065 1 LINE 72 4 PAGE UM J BODWIN APR. 17, 1981 17:34:33 5.0T7 255 0 PROGRAM TO TEST ORG AND LOCTR. CONTAINS SEVERAL ASSEMBLIES. 00737/066 *ASMH TEST PGM #35 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#35.SA.066(1) 391 5.0T3 391 ASMH.TEST_PGM_#35.SA.066 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:34:46 5.0T7 256 0 PROGRAM TO TEST TRAILING COMMAS ON VARIOUS ASSEMBLER STATEMENTS. 00737/067 *ASMH TEST PGM #36 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#36.SA.067(1) 392 5.0T3 392 ASMH.TEST_PGM_#36.SA.067 1 LINE 58 1 PAGE UM J BODWIN APR. 17, 1981 17:35:16 5.0T7 257 0 TEST PROGRAM FOR PEXIT SUBROUTINE AND PARAMETER AND OCTL. INTENDED TO BE USED WITH (737/68). 00737/068 *ASMH PEXIT TEST SA G S1560 5.0T3 VLO FSNAME=ASMH.PEXIT_TEST.SA.068(1) 393 5.0T3 393 ASMH.PEXIT_TEST.SA.068 1 LINE 80 1 PAGE UM J BODWIN APR. 17, 1981 17:37:23 5.0T7 258 0 SAMPLE PEXIT SUBROUTINE WHICH WRITES ITS PARAMETERS AND LINE AS UNIT 19. FILE CONTAINS BOTH SOURCE AND OBJECT. 0 Referenced by comments of: 737/67 00737/069 *ASMH TEST PGM #37 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#37.SA.070(1) 394 5.0T3 394 ASMH.TEST_PGM_#37.SA.070 1 LINE 47 1 PAGE UM J BODWIN APR. 17, 1981 17:35:44 5.0T7 259 0 TEST "_" AS AN ALPHEBETIC CHARACTER 00737/070 *ASMH TEST PGM #38 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#38.SA.071(1) 395 5.0T3 395 ASMH.TEST_PGM_#38.SA.071 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:36:09 5.0T7 260 0 TEST CHANGES TO PASS 2 UNDEFINED SYMBOL PROCESSING 00737/071 *ASMH TEST PGM #39 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#39.SA.072(1) 396 5.0T3 396 ASMH.TEST_PGM_#39.SA.072 1 LINE 71 3 PAGE UM J BODWIN APR. 17, 1981 17:36:34 5.0T7 261 0 TEST RELOCATABLE AND QUALIFIED USINGS 00737/072 *ASMH TEST PGM #40 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#40.SA.073(1) 397 5.0T3 397 ASMH.TEST_PGM_#40.SA.073 1 LINE 64 2 PAGE UM J BODWIN APR. 17, 1981 17:36:47 5.0T7 262 0 TEST PASS2 ERRORS 1 SUN SEP 08/96 15:24:55 Page 519 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00737/073 *ASMH TEST PGM #41 SA G S1560 5.0T3 VLO FSNAME=ASMH.TEST_PGM_#41.SA.074(1) 398 5.0T3 398 ASMH.TEST_PGM_#41.SA.074 1 LINE 72 1 PAGE UM J BODWIN APR. 17, 1981 17:37:04 5.0T7 263 0 TEST ERROR MESSAGES DURING LOOK AHEAD. 00737/074 *ASMH CALLER SA G S1560 5.0T3 VLO FSNAME=ASMH.CALLER.SA.075(1) 399 5.0T3 399 ASMH.CALLER.SA.075 1 LINE 67 1 PAGE UM J BODWIN MAY 13, 1978 18:27:36 5.0T7 264 0 PROGRAM TO TEST DYNAMIC INVOCATION OF ASMH. ASSEMBLE USING *SYSMAC. 00737/075 *ASMH CALLER OC G S1560 5.0T3 VLO FSNAME=ASMH.CALLER.OC.076(1) 400 5.0T3 400 ASMH.CALLER.OC.076 1 LINE 80 1 PAGE UM J BODWIN MAY 13, 1978 18:27:37 5.0T7 265 00738/001A *MACUTIL SOURCE SA G W062:MACUTIL.S 5.1T2 170 MACUTIL.SOURCE.SA.001 1 LINE 72 38 PAGE UM TIFFANY JULY 23, 1983 13:08:27 0 *MACUTIL was adapted from *OBJUTIL with many modifications for macros instead of object modules; the command language is similar to that of *OBJUTIL. The program is reentrant and may be loaded into shared VM. *MACUTIL calls the Editor EST subroutine (648/14). Commands to assemble are at negative line numbers. Assemble using the MACUTIL macros (738/8) and *SYSMAC. Copies *LOADINFODSECT (001/4), *GDINFODSECT (594) and *CNFGINFODSECT (654). The system parameters may be specified in the assembly parameter SYSPARM, e.g., SYSPARM='SNOOP=YES,CCID=ETC.' The system parameters are: SNOOP= gather statistics in the file MACUTIL.STAT under user ID ccid. The default is yes. LOGERR= log fatal errors in the file MACUTIL.ERR under user ID ccid. The default is yes. CCID=xxxx user ID for the explain file MACULILEXP, the statistics file MACUTIL.STAT, and the logerr file MACUTIL.ERR. The default for ccid is ETC. 0 Referenced by comments of: 344/3, 738/2, 1051/3, 1079/21 00738/002C *MACUTIL SUBRS SA G W062:MAC.SUBR.S 5.1T2 171 MACUTIL.SUBRS.SA.002 1 LINE 74 56 PAGE UM TIFFANY JULY 23, 1983 13:08:29 0 Subroutines used by *MACUTIL. Requires MACLIB (738/8). *********************************************************************** D5.0B version: The source for *MACUTIL has been divided into two parts: (738/1) and (738/2). *********************************************************************** 0 Referenced by comments of: 738/2 1 SUN SEP 08/96 15:24:55 Page 520 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00738/003A *MACUTIL OBJECT OE G *MACUTIL 5.1T2 172 MACUTIL.OBJECT.OE.003 1 LINE 24917 15 PAGE UM TIFFANY JULY 23, 1983 13:08:32 *MACUTIL 0 CONTAINS EDITOR EST SUBROUTINE (648/14). 00738/004 *MACUTIL WRITEUP WT W062:MACUTIL.W 5.0T3 403 MACUTIL.WRITEUP.WT.003 1 LINE 124 13 PAGE UM TIFFANY JULY 03, 1981 19:02:42 5.0T7 268 00738/005 *MACUTIL GENEXPLAIN SS G W062:GENEXPLAIN.S 5.0T3 404 MACUTIL.GENEXPLAIN.SS.004 1 LINE 90 3 PAGE UM TIFFANY JULY 03, 1981 19:02:46 5.0T7 269 0 SPITBOL SOURCE FOR PROGRAM TO GENERATE EXPLAIN MESSAGE FILE (738/7) FROM TEXT360 PRINT FILE. 0 Referenced by comments of: 738/7 00738/006 *MACUTIL GENEXPLAIN OE G W062:GENEXPLAIN 5.0T3 405 MACUTIL.GENEXPLAIN.OE.005 1 LINE 18216 9 PAGE UM TIFFANY JULY 03, 1981 19:02:47 5.0T7 270 0 SPITBOL OBJECT FOR GENEXPLAIN. 00738/007 *MACUTIL EXPLAIN M ETC:MACUTILEXP 5.0T3 406 MACUTIL.EXPLAIN.M.006 1 LINE 75 15 PAGE UM TIFFANY JULY 03, 1981 19:02:48 5.0T7 271 ETC.:MACUTILEXP 0 EXPLAIN MESSAGE FILE GENERATED BY GENEXPLAIN (738/5). 0 Referenced by comments of: 738/5 00738/008A *MACUTIL MACLIB SM G W062:MACU.MAC 5.1T2 173 MACUTIL.MACLIB.SM.008 1 LINE 73 24 PAGE UM TIFFANY JULY 23, 1983 13:08:33 0 MACRO LIBRARY FOR *MACUTIL. 0 Referenced by comments of: 738/1, 738/2 00739/001 *LOGPURGE SG G S1560 5.0T3 VLO FSNAME=LOGPURGE..SG.001(1) 408 5.0T3 408 LOGPURGE..SG.001 1 LINE 118 3 PAGE UM ENGLE APR. 20, 1981 13:07:26 5.0T7 273 0 PROGRAM TO PURGE LINES FROM A LOG FILE AFTER A SPECIFIED RETENTION PERIOD. REQUIRES THE DATE OF THE RECORD, WHICH MAY BE MM/DD/YY, OR DAYS, MINUTES, SECONDS, OR MICROSECONDS SINCE 1 MARCH 1900, TO BE IN A FIXED POSITION IN EACH RECORD. SEE SOURCE FOR RUN INSTRUCTIONS. 0 Referenced by comments of: 104/196, 739/4 1 SUN SEP 08/96 15:24:55 Page 521 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00739/002 *LOGPURGE UC G # S0027 DISTRB FSNAME=LOGPURGEUPD 5.0T3 409 LOGPURGE..UC.002 1 LINE 118 1 PAGE UM ENGLE APR. 20, 1981 13:08:06 5.0T7 274 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00739/003 *LOGPURGE OC G S1560 5.0T3 VLO FSNAME=LOGPURGE..OC.003(1) 410 5.0T3 410 LOGPURGE..OC.003 1 LINE 80 4 PAGE UM ENGLE APR. 20, 1981 13:08:11 5.0T7 275 00739/004 *LOGPURGE OE G *LOGPURGE 5.0T3 411 LOGPURGE..OE.004 1 LINE 2086 2 PAGE UM ENGLE JULY 03, 1981 19:03:08 5.0T7 276 *LOGPURGE 0 LINKEDITED COMBINATION OF (739/1) AND *LCS (164). 00739/005 *LOGPURGE SYS:PURGE OC SYS:PURGE 5.0T3 412 LOGPURGE.SYS:PURGE.OC.005 1 LINE 31 1 PAGE UM OGDEN JULY 03, 1981 19:03:09 5.0T7 277 SYS:PURGE 0 This contains a $CONTINUE with *LOGPURGE record and $CONTINUE WITH SEG2:CFE and $CONTINUE WITH SEG2:TIME records. These two time routines are normally post-IPL loaded. This file allows them work during IPL. Used by *CLN (531/6). 0 Referenced by comments of: 531/6 00740/001 *CKSIG SG G S1560 5.0T3 VLO FSNAME=CKSIG..SG.001(1) 413 5.0T3 413 CKSIG..SG.001 1 LINE 78 9 PAGE UM ENGLE FEB. 04, 1981 13:58:25 5.0T7 278 0 PROGRAM TO AUTHENTICATE A SIGNON BY CHECKING ANY OF THE FOLLOWING: TIME OF SIGNON, DAY OF THE WEEK, GUINFO ITEMS, OR SNS DATA FOR *MSOURCE*. RECORDING THE SIGNON IN A LOG FILE AND, FOR PROJECT NUMBERS STARTING WITH "W", REQUESTING VERIFICATION FROM OPER IF THE SIGNON WOULD OTHERWISE FAIL ARE OPTIONAL. SEE SOURCE FOR RUN INSTRUCTIONS. 0 Referenced by comments of: 740/4 00740/002 *CKSIG UC G # S1560 5.0T3 VLO FSNAME=CKSIG..UC.002(1) 414 5.0T3 414 CKSIG..UC.002 1 LINE 70 1 PAGE UM ENGLE FEB. 04, 1981 13:58:40 5.0T7 279 0 UPDATES SOURCE FROM PREVIOUS REGULAR DISTRIBUTION TO CURRENT DISTRIBUTION. 00740/003 *CKSIG OC G S1560 5.0T3 VLO FSNAME=CKSIG..OC.003(1) 415 5.0T3 415 CKSIG..OC.003 1 LINE 80 14 PAGE UM ENGLE FEB. 04, 1981 13:59:29 5.0T7 280 00740/004 *CKSIG OE G *CKSIG 5.0T3 416 CKSIG..OE.004 1 LINE 8804 6 PAGE UM ENGLE JULY 03, 1981 19:03:30 5.0T7 281 *CKSIG 0 LINKEDITED COMBINATION OF (740/1) AND *LCS (164). 1 SUN SEP 08/96 15:24:55 Page 522 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00741/001 MTS VOLUME 16 MASTER WT S1163 MTSV16 'MTS MANUALS' POSN=NEWM3.V16 5.0T3 417 MTS_VOLUME_16.MASTER.WT.001 1 SEQ 132 285 PAGE UM MANUAL JULY 03, 1981 19:06:39 5.0T7 282 0 TEXT/360 MASTER FOR VOLUME 16 "ALGOL W IN MTS" OF THE UM MTS MANUALS, SEPT. 1980. 0 Referenced by comments of: 528/1 00741/002 MTS VOLUME 16 PRINT PT S1163 MTSV16 'MTS MANUALS' POSN=PRINT3.V16 5.0T3 418 MTS_VOLUME_16.PRINT.PT.002 1 SEQ 132 536 PAGE UM MANUAL JULY 03, 1981 19:07:01 5.0T7 283 0 TEXT/360 PRINT FILE. 00741/003 MTS VOLUME 16 INDEX SOURCE D S1163 MTSV16 'MTS MANUALS' POSN=V16INDEXSOU.2 5.0T3 419 MTS_VOLUME_16.INDEX_SOURC.D.003 1 SEQ 51 16 PAGE UM MANUAL JULY 03, 1981 19:07:49 5.0T7 284 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 16. 00742/001 TAPE DIRECTORY MAIN PGM SG G W044:TAPEDIR.S 5.0T3 420 TAPE_DIRECTORY.MAIN_PGM.SG.001 1 LINE 130 15 PAGE UM SALISBURY JULY 03, 1981 19:07:51 5.0T7 285 0 CONVERSATIONAL PROGRAM TO CREATE AND MAINTAIN A TAPE DIRECTORY. THE USE OF THIS PROGRAM IS DESCRIBED BY COMPONENT (742/6). 0 Referenced by comments of: 50/6, 616/1, 742/3, 742/4 00742/002 TAPE DIRECTORY KWFCN FUNCTION SG G W044:TAPEDIR.SF 5.0T3 421 TAPE_DIRECTORY.KWFCN_FUNC.SG.002 1 LINE 90 3 PAGE UM SALISBURY JULY 03, 1981 19:08:03 5.0T7 286 0 SOURCE FOR THE KWSCAN FUNCTION, "KWFCN". 0 Referenced by comments of: 742/4 00742/003 TAPE DIRECTORY DIRECTORY FUNC SG G W044:DIRLIB.S 5.0T3 422 TAPE_DIRECTORY.DIRECTORY.SG.003 1 LINE 126 14 PAGE UM SALISBURY JULY 03, 1981 19:08:04 5.0T7 287 0 SUBROUTINE LIBRARY USED TO ACCESS A TAPE DIRECTORY. MAY BE USED AS A STAND-ALONE SUBROUTINE LIBRARY (THERE ARE MANY ENTRY POINTS) OR IN CONJUNCTION WITH THE TAPE DIRECTORY PROGRAM (742/1). 0 Referenced by comments of: 742/4, 742/5 00742/004 TAPE DIRECTORY OBJECT OC G SYS:DIRPROGRAM 5.0T3 423 TAPE_DIRECTORY.OBJECT.OC.004 1 LINE 80 28 PAGE UM SALISBURY JULY 03, 1981 19:08:18 5.0T7 288 SYS.:DIRPROGRAM 0 OBJECT OF (742/1), (742/2), AND (742/3). CONTAINS A $CONTINUE WITH SYS:DIRLIB (742/5) RECORD. 1 SUN SEP 08/96 15:24:55 Page 523 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00742/005 TAPE DIRECTORY DIRECTORY FUNC OC G SYS:DIRLIB 5.0T3 424 TAPE_DIRECTORY.DIRECTORY.OC.005 1 LINE 80 18 PAGE UM SALISBURY JULY 03, 1981 19:08:20 5.0T7 289 SYS.:DIRLIB 0 OBJECT OF (742/3), WHICH MAY BE USED SEPARATELY FOR EASY REFERENCE BY OTHER SYSTEM COMPONENTS. THE USE OF THIS PROGRAM IS DESCRIBED BY (742/6). 0 Referenced by comments of: 50/4, 616/2, 617/4, 742/4, 753/5 00742/006 TAPE DIRECTORY WRITEUP WT W044:DIR.WRITEUP 5.0T3 425 TAPE_DIRECTORY.WRITEUP.WT.006 1 LINE 93 15 PAGE UM SALISBURY JULY 03, 1981 19:08:22 5.0T7 290 0 DESCRIPTION OF THE TAPE DIRECTORY PROGRAM AND FUNCTIONS. 0 Referenced by comments of: 742/1, 742/5, 742/7 00742/007 TAPE DIRECTORY WRITEUP PT W044:DIR.PRINT 5.0T3 426 TAPE_DIRECTORY.WRITEUP.PT.007 1 LINE 132 31 PAGE UM SALISBURY JULY 03, 1981 19:08:24 5.0T7 291 0 LINE PRINTER OUTPUT FOR (742/6). COPY TO A TN PRINTER @MCC. 00743/001 HARDWARE CONFIG PLOT SF G CNFG W032:CONFIGPLOT 5.0T3 427 HARDWARE_CONFIG_PLOT..SF.001 1 LINE 80 49 PAGE UM EMERY JULY 03, 1981 19:08:27 5.0T7 292 0 THIS IS THE FORTRAN SOURCE FOR THE MACHINE CONFIGURATION PLOT GENERATION PROGRAM. IT CONSISTS OF A MAIN PROGRAM, WHICH IS STRONGLY INSTALLATION DEPENDENT, AND VARIOUS SUBROUTINES THAT ARE INSTALLATION INDEPENDENT. NO ATTEMPT IS MADE TO ISOLATE THE INSTALLATION DEPENDENCIES FROM THE PROGRAM BY PUTTING THEM IN AN AUXILIARY INPUT FILE. CONSEQUENTLY, ANY INSTALLATION WISHING TO USE THIS PROGRAM WILL HAVE TO MODIFY AND RECOMPILE IT TO SUIT THE LOCAL CONFIGURATION. 00744/001 DAVE.GENLIB MAIN S* O S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.MAIN.S*.001(1) 428 5.0T3 428 DAVE.GENLIB.MAIN.S*.001 1 LINE 93 5 PAGE UM BRILL APR. 06, 1980 13:09:43 5.0T7 293 0 MAIN PROGRAM, WRITTEN IN *SNOSTORM, TO ANALYZE FORTRAN SUBROUTINES, E. G., THOSE IN *LIBRARY (524/1), CALLED BY PROGRAMS FREQUENTLY ANALYZED THROUGH *DAVE (765). THIS FILE ALSO CONTAINS COMMANDS TO COMPILE IT. 0 Referenced by comments of: 744/5 00744/002 DAVE.GENLIB ASM SUBRS SA O S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.ASM_SUBRS.SA.002(1) 429 5.0T3 429 DAVE.GENLIB.ASM_SUBRS.SA.002 1 LINE 67 1 PAGE UM BRILL APR. 06, 1980 13:09:46 5.0T7 294 0 ASSEMBLY LANGUAGE SUBROUTINES. THIS FILE ALSO CONTAINS COMMANDS TO ASSEMBLE IT. 0 Referenced by comments of: 744/4, 744/5 1 SUN SEP 08/96 15:24:55 Page 524 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00744/003 DAVE.GENLIB FTN SUBRS SF O S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.FTN_SUBRS.SF.003(1) 430 5.0T3 430 DAVE.GENLIB.FTN_SUBRS.SF.003 1 LINE 81 3 PAGE UM BRILL APR. 06, 1980 13:09:48 5.0T7 295 0 FORTRAN LANGUAGE SUBROUTINES. THIS FILE ALSO CONTAINS THE COMMANDS TO COMPILE IT. 0 Referenced by comments of: 744/4, 744/5 00744/004 DAVE.GENLIB SUBR LIB OL O S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.SUBR_LIB.OL.004(1) 431 5.0T3 431 DAVE.GENLIB.SUBR_LIB.OL.004 1 LINE 1424 4 PAGE UM BRILL APR. 06, 1980 13:09:51 5.0T7 296 0 OBJECT OF (744/2) AND (744/3). 00744/005 DAVE.GENLIB *DAVE.GENLIB OE O *DAVE.GENLIB 5.0T3 432 DAVE.GENLIB.*DAVE.GENLIB.OE.005 1 LINE 80 16 PAGE UM BRILL JULY 03, 1981 19:09:02 5.0T7 297 *DAVE.GENLIB 0 OBJECT OF (744/1), (744/2), AND (744/3). HAS A $CONTINUE WITH *SPITLIB RECORD. 0 Referenced by comments of: 744/6, 744/7 00744/006 DAVE.GENLIB *LIBRARY DESCR D S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.*LIBRARY_DESC.D.006(1) 433 5.0T3 433 DAVE.GENLIB.*LIBRARY_DESC.D.006 1 LINE 74 12 PAGE UM BRILL APR. 06, 1980 13:09:56 5.0T7 298 0 DATA USED BY *DAVE.GENLIB (744/5) FOR CREATING DAVE.EXT (744/7). THE DATA CONSISTS OF DESCRIPTIONS, IN FORMAT SUITABLE FOR INPUT TO *DAVE.GENLIB, OF ALL OF THE FORTRAN-CALLABLE SUBROUTINES IN *LIBRARY (524/1). 0 Referenced by comments of: 744/7 00744/007 DAVE.GENLIB DAVE.EXT D ETC:DAVE.EXT 5.0T3 434 DAVE.GENLIB.DAVE.EXT.D.007 1 LINE 2660 7 PAGE UM BRILL JULY 03, 1981 19:11:28 5.0T7 299 ETC:DAVE.EXT 0 EXTERNAL SUBROUTINE LIBRARY REQUIRED BY *DAVE (765/2). DAVE.EXT IS CREATED BY *DAVE.GENLIB (744/5) USING THE (744/6) DATA. 0 Referenced by comments of: 744/6, 765/2 00744/008 DAVE.GENLIB MEMO 402 WF S1560 5.0T3 VLO FSNAME=DAVE.GENLIB.MEMO_402.WF.008(1) 435 5.0T3 435 DAVE.GENLIB.MEMO_402.WF.008 1 LINE 70 3 PAGE UM BRILL JULY 13, 1979 11:27:39 5.0T7 300 0 THIS IS COMPUTING CENTER MEMO 402 -- "*DAVE.GENLIB". 00745/001 *LALRGEN SP G ALWB:LALRGEN.S 5.0T3 436 LALRGEN..SP.001 1 LINE 85 32 PAGE UM J BODWIN JULY 03, 1981 19:11:30 5.0T7 301 0 SOURCE FOR AN LALR(1) PARSE TABLE GENERATOR. COMPILE WITH 1 SUN SEP 08/96 15:24:55 Page 525 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 PAR=SORMGIN=(2,72,1),MACRO. 0 Referenced by comments of: 1080/1 00745/002 *LALRGEN OE G *LALRGEN 5.0T3 437 LALRGEN..OE.002 1 LINE 32767 20 PAGE UM J BODWIN JULY 03, 1981 19:11:34 5.0T7 302 *LALRGEN 0 THIS FILE IS OBTAINED FROM THE PL/1 OBJECT AS FOLLOWS: $RUN *LINKEDIT INCLUDE LALRGEN.O RENAME IHESAPC IHESAPE INCLUDE@SLI *PL1LIB INCLUDE@SLI *LIBRARY INCLUDE *LCS COMBINE PUNCH LALRGEN.L STOP 00746/001A COMPARE SA G W062:COMPARE.S 5.1T2 174 COMPARE..SA.001 1 LINE 103 45 PAGE UM TIFFANY JULY 23, 1983 13:08:34 0 A fast comparison program. Assemble using macros in order: the COMPARE macros (746/3), OBJUTIL miscellaneous macros (721/15), and *SYSMAC with PEXIT=*PEXIT (775). Copies *GDINFODSECT (594). 00746/002A COMPARE OE G *COMPARE 5.1T2 175 COMPARE..OE.002 1 LINE 16828 6 PAGE UM TIFFANY JULY 23, 1983 13:08:36 *COMPARE 00746/003A COMPARE PROC.MAC SM G W062:PROC.MAC 5.1T2 176 COMPARE.PROC.MAC.SM.003 1 LINE 73 14 PAGE UM TIFFANY JULY 23, 1983 13:08:36 0 Contains macros PROC, ENDPROC, RETURN, INVOKE, etc., used by the assembly of compare program. ********************************************************************** D5.1 version: New macro, SETBIT, added. ********************************************************************** 0 Referenced by comments of: 746/1, 749/1 00746/004 COMPARE WRITEUP WF W062:COMPARE.ITEM 5.0T3 441 COMPARE.WRITEUP.WF.004 1 LINE 71 1 PAGE UM TIFFANY JULY 03, 1981 19:11:54 5.0T7 306 0 This is a writeup describing the feature which allows *COMPARE to produces CDUPDATE control commands. This feature is not documented in the MTS Volume 2 *COMPARE writeup. 1 SUN SEP 08/96 15:24:55 Page 526 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00747/001 SIDELABEL S G S1560 5.0T3 VLO FSNAME=SIDELABEL..S.001(1) 442 5.0T3 442 SIDELABEL..S.001 1 LINE 88 3 PAGE UM J BODWIN JULY 12, 1979 23:17:44 5.0T7 307 0 OVERDRIVE source for SIDELABEL, a program to label the edge of printouts. 0 Referenced by comments of: 747/3, 811/2, 811/4, 811/6, 811/8 00747/002 SIDELABEL SF G S1560 5.0T3 VLO FSNAME=SIDELABEL..SF.002(1) 443 5.0T3 443 SIDELABEL..SF.002 1 LINE 72 3 PAGE UM J BODWIN JULY 12, 1979 23:17:46 5.0T7 308 0 FORTRAN source for SIDELABEL. 0 Referenced by comments of: 747/3 00747/003 SIDELABEL OE G S1560 5.0T3 VLO FSNAME=SIDELABEL..OE.003(1) 444 5.0T3 444 SIDELABEL..OE.003 1 LINE 2290 2 PAGE UM J BODWIN JULY 12, 1979 23:17:46 5.0T7 309 0 Object of (747/1) and (747/2). 0 Referenced by comments of: 498/1, 747/4, 747/5 00747/004 SIDELABEL EDGER SA G W067:EDGER(1000) 5.0T3 445 SIDELABEL.EDGER.SA.004 1 LINE 72 4 PAGE UM SHERRY JULY 03, 1981 19:11:56 5.0T7 310 0 An interface to ALWB:SIDELABEL (747/3) to bypass the extra scan SIDELABEL must make to count the number of pages in a listing. Assemble with the (721/15) macros with PAR=BATCH,PEXIT=*PEXIT. When $RUN, a page estimate must be specified in the PAR field, e.g., PAR=PAGES=120. Program is documented in the source comments beginning at line 1022. 00747/005 SIDELABEL EDGER OC G W067:EDGER(1,999) 5.0T3 446 SIDELABEL.EDGER.OC.005 1 LINE 1160 2 PAGE UM SHERRY JULY 03, 1981 19:11:58 5.0T7 311 0 Contains a $CONTINUE WITH ALWB:SIDELABEL (747/3) record. 0 Referenced by comments of: 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 00748/001 INTRO GUIDE: MTS WF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=MTS.SOU(2) 5.0T3 447 INTRO_GUIDE:_MTS..WF.001 1 LINE 154 119 PAGE UM MANUAL AUG. 18, 1980 15:44:18 5.0T7 312 0 FORMAT SOURCE FOR "INTRODUCTION TO MTS," SEPTEMBER 1980. 00748/002 INTRO GUIDE: MTS PF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=MTS.OUT(2) 5.0T3 448 INTRO_GUIDE:_MTS..PF.002 1 LINE 81 165 PAGE UM MANUAL AUG. 18, 1980 15:46:28 5.0T7 313 0 FORMAT PRINT FILE. 1 SUN SEP 08/96 15:24:55 Page 527 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00748/003 INTRO GUIDE: MTS INDEX D S0702 MTS.UG 'MTS USER GUIDES' FSNAME=MTS.INDEX80 5.0T3 449 INTRO_GUIDE:_MTS.INDEX.D.003 1 LINE 140 11 PAGE UM MANUAL AUG. 18, 1980 15:58:57 5.0T7 314 0 INPUT TO *INDEX (580) FOR THE INDEX TO "INTRODUCTION TO MTS." 00749/001 MACSCAN SA G W062:MACSCAN.S 5.0T3 450 MACSCAN..SA.001 1 LINE 74 17 PAGE UM UNSP TIFFANY JULY 03, 1981 19:12:42 5.0T7 315 0 Program to scan assembly language programs and list macros and copy sections used. Assemble with the following macro libraries: 2=W062:PROC.MAC (746/3), the (721/15) *OBJUTIL macros, and *SYSMAC, with PEXIT=*PEXIT. Copies *GDINFODSECT (594). 00749/002 MACSCAN OE G UNSP:MACSCAN 5.0T3 451 MACSCAN..OE.002 1 LINE 5698 6 PAGE UM UNSP TIFFANY JULY 03, 1981 19:12:55 5.0T7 316 UNSP:MACSCAN 00749/003 MACSCAN 360 INSTS D UNSP:MACSCAN.360 5.0T3 452 MACSCAN.360_INSTS.D.003 1 LINE 74 1 PAGE UM UNSP TIFFANY JULY 03, 1981 19:12:56 5.0T7 317 UNSP:MACSCAN.360 0 A LIST OF 360 INSTRUCTIONS READ BY MACSCAN AT EXECUTION TIME. 00749/004 MACSCAN 370 INSTS D UNSP:MACSCAN.370 5.0T3 453 MACSCAN.370_INSTS.D.004 1 LINE 74 1 PAGE UM UNSP TIFFANY JULY 03, 1981 19:12:57 5.0T7 318 UNSP:MACSCAN.370 0 A LIST OF 370 INSTRUCTIONS READ BY MACSCAN AT EXECUTION TIME. 00749/005 MACSCAN WRITEUP WF W062:MACSCAN.W 5.0T3 454 MACSCAN.WRITEUP.WF.005 1 LINE 81 1 PAGE UM UNSP TIFFANY JULY 03, 1981 19:12:58 5.0T7 319 0 FORMAT SOURCE FOR MACSCAN WRITEUP. 00750/001 XREF SS O S1153 UNSP VLO FSNAME=XREF.S 5.0T3 455 XREF..SS.001 1 LINE 101 3 PAGE UBC BALLARD UNSP DEC. 20, 1978 23:16:56 5.0T7 320 0 A GENERAL CROSS REFERENCE PROGRAM WRITTEN AT UBC. AT UM, THIS PROGRAM IS CLASSIFIED AS UNSUPPORTED SOFTWARE. 00750/002 XREF OC O UNSP:XREF 5.0T3 456 XREF..OC.002 1 LINE 80 7 PAGE UBC BALLARD UNSP JULY 03, 1981 19:13:12 5.0T7 321 UNSP:XREF 0 HAS A $CONTINUE WITH *SPITLIB CARD. 1 SUN SEP 08/96 15:24:55 Page 528 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00751/001 ILLBEBACK SG G S1153 UNSP VLO FSNAME=ILLBEBACK.S 5.0T3 457 ILLBEBACK..SG.001 1 LINE 76 1 PAGE UM UNSP JAN. 02, 1979 17:18:11 5.0T7 322 0 PROGRAM TO LOCK A TERMINAL SESSION. 00751/002 ILLBEBACK OC G UNSP:ILLBEBACK 5.0T3 458 ILLBEBACK..OC.002 1 LINE 80 1 PAGE UM UNSP JULY 03, 1981 19:13:14 5.0T7 323 UNSP:ILLBEBACK 00751/003 ILLBEBACK WRITEUP WF S1153 UNSP VLO FSNAME=ILLBEBACK.F 5.0T3 459 ILLBEBACK.WRITEUP.WF.003 1 LINE 67 1 PAGE UM UNSP JAN. 09, 1979 16:52:07 5.0T7 324 00752/001A HASP LOG COLLECTION PGM SA O W116:HSP.COLLCT.S 5.1T2 177 HASP_LOG.COLLECTION_PGM.SA.001 1 LINE 75 42 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:37 0 At UM, this program is started after a system reload to examine files created by CMDSTAT (531/1) with names of the form HASPLOGxxxxx. These files contain all information currently outputted to the HASP log printer. The program condenses the information and places it into files having names of the form HSyymmddhh where yymmddhh is the time the file is created. Normally there is only one HSyymmdhh file for each day. The program destroys the HASPLOGxxxxx files as they are processed. The HSyymmddhh files are kept for 7 days and then destroyed. In addition to the above files, the program also maintains the following files: UNKHSPMSGS -- all hasp messages that can not currently be handled by the collection program are recorded here. HSDEVTBLES -- used for internal bookkeeping and to let the retrieval program know which HSyymmddhh files are available. The program also requires that this file exist so that it can keep track of the next job on the printer, the punch, etc. HLOGPRV -- the HASPLOG collection program calls the MTS CHKFILE subroutine (part of the resident system) to get sharing descriptors that the ID which is running the program has to this file. A user's access determines the amount and type of information he can have returned by HASPLOG. The collection program assumes it is being run under the same IC as the CMDSTAT program. To start the program some HASPLOGxxxxx files must be available as well as empty files of the following names: HS78010100, UNKHSPMSGS, and HSDEVTBLES. Assemble with PAR=BATCH. Uses HSP.MACLIB (752/7). Copies *GFINFODSECT (594). ******************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 529 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 D5.0A version: Note: This is a new version of HASPLOG and is incompatible with the old version's HSyymmddhh files. A conversion program (752/9) is supplied to convert these files to the new format. ******************************************************************************** 0 Referenced by comments of: 387/19, 752/3, 752/4, 752/7 00752/002A HASP LOG COLLECTION PGM OC O SYS:HLOG 5.1T2 178 HASP_LOG.COLLECTION_PGM.OC.002 1 LINE 17412 6 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:39 00752/003 HASP LOG *HLG C *HLG 5.0T3 462 HASP_LOG.*HLG.C.003 1 LINE 36 1 PAGE UM UNSP YOUNG JULY 03, 1981 19:13:23 5.0T7 327 *HLG 0 COMMAND FILE TO RUN THE HASP LOG COLLECTION PROGRAM (752/1). INVOKED BY ENTERING "MTS *HLG" ON THE OPERATOR'S CONSOLE. 0 Referenced by comments of: 531/8 00752/004A HASP LOG RETRIEVAL PGM SA O W116:HSP.RETRIV.S 5.1T2 179 HASP_LOG.RETRIEVAL_PGM.SA.004 1 LINE 73 29 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:40 0 PROVIDES INTERACTIVE RETRIEVAL OF INFORMATION ABOUT HASP JOBS. USES FILES WITH NAMES OF THE FORM HSYYMMDDHH AS BUILT BY THE COLLECTION PROGRAM (752/1) AND USES THE FILE HSDEVTBLES AS MAINTAINED BY THE COLLECTION PROGRAM TO DETERMINE WHICH HSYYMMDDHH FILES ARE AVAILABLE. THIS PROGRAM ASSUMES THAT THE COLLECTION PROGRAM IS BEING RUN UNDER THE USER ID SYS. IF IT IS TO RUN UNDER AN ID OTHER THAN SYS, ALL REFERENCES OF THE FORM "SYS:FDNAME" MUST BE REPLACED WITH ONE OF THE FORM "USERID:FDNAME" WHERE "USERID" IS THE USER ID OF THE TASK RUNNING THE COLLECTION PROGRAM. ASSEMBLE WITH PAR=BATCH. USES HSP.MACLIB (752/7). 0 Referenced by comments of: 752/7 00752/005A HASP LOG RETRIEVAL PGM OC O UNSP:HASPLOG 5.1T2 180 HASP_LOG.RETRIEVAL_PGM.OC.005 1 LINE 10595 6 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:41 0 REFERENCES IN COPY:SYSDEFS (579/3) MUST BE APPENDED TO THE END. 00752/006 HASP LOG RETRIEVAL DOC P UNSP:HASPLOG.W 5.0T3 465 HASP_LOG.RETRIEVAL_DOC.P.006 1 LINE 84 3 PAGE UM UNSP YOUNG JULY 03, 1981 19:13:28 5.0T7 330 0 WRITEUP DESCRIBING THE USE OF THE RETRIEVAL PROGRAM. 00752/007A HASP LOG MACRO LIB SM G W116:HSP.MACLIB 5.1T2 181 HASP_LOG.MACRO_LIB.SM.007 1 LINE 72 13 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:42 0 MACRO LIBRARY USED BY (752/1) AND (752/4). 0 Referenced by comments of: 752/1, 752/4, 752/9 1 SUN SEP 08/96 15:24:55 Page 530 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00752/008C HASP LOG P G W116:HSP.SECURITY 5.1T2 182 HASP_LOG..P.008 1 LINE 67 1 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:42 0 Description of the HASPLOG security feature. 00752/009C HASP LOG CONVERSION PGM SA G W116:HSP.UPDATE(-1000,-1) 5.1T2 183 HASP_LOG.CONVERSION_PGM.SA.009 1 LINE 72 3 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:43 0 This program is used to update the HSyymmddhh files to a new format. To run this program issue $RUN HSP.UPDATE 0=xxxx@ÂTRIM 1=yyyy@ÂTRIM where "xxxx" is the old HSyymmddhh file and "yyyy" is the new HSyymmddhh file. Refers to (752/7). 0 Referenced by comments of: 752/1 00752/010C HASP LOG CONVERSION PGM OC G W116:HSP.UPDATE(1) 5.1T2 184 HASP_LOG.CONVERSION_PGM.OC.010 1 LINE 80 1 PAGE UM UNSP YOUNG JULY 23, 1983 13:08:43 00753/001A SCAN MAIN PGM SA O W030:SCAN 5.1T2 185 SCAN.MAIN_PGM.SA.001 1 LINE 71 14 PAGE UM LIFT JULY 23, 1983 13:08:43 0 MAIN CSECT OF PROGRAM TO SEARCH STATISTICS TAPES FOR RECORDS. SEARCH CRITERIA MAY BE SPECIFIED IN COMMANDS OR BY WRITING SUBROUTINES SCAN WILL USE. COPIES COPY:CMDAREADSECT (531/20). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND SCAN MACROS (753/4). ******************************************************************************* D5.0B version: Commands REBATE, SET added. Implementation is still far from complete (e. g., searching for CMDSTAT records needs to be added), but what is implemented works. ******************************************************************************* 0 Referenced by comments of: 71/1, 632/1, 707/1, 753/4, 753/5 00753/002 SCAN CSTAT SUBR SA O W030:CSTAT(1,999) 5.0T3 468 SCAN.CSTAT_SUBR.SA.002 1 LINE 67 4 PAGE UM LIFT JULY 03, 1981 19:13:38 5.0T7 333 0 SUBROUTINE FOR SCAN TO HANDLE THE STA COMMAND. ASSEMBLE USING SCAN MACROS (753/4). 0 Referenced by comments of: 753/4, 753/5 00753/003 SCAN CCOPY SUBR SA O W030:CCOPY(1,999) 5.0T3 469 SCAN.CCOPY_SUBR.SA.003 1 LINE 69 5 PAGE UM LIFT JULY 03, 1981 19:13:39 5.0T7 334 0 SUBROUTINE FOR SCAN TO HANDLE COPY AND LIST COMMANDS. ASSEMBLE USING COPY:MTS.MACROS (344/3) AND SCAN MACROS (753/4). 1 SUN SEP 08/96 15:24:55 Page 531 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 COPIES COPY:CMDAREADSECT (531/20). 0 Referenced by comments of: 753/4, 753/5 00753/004A SCAN MACRO LIBRARY SM O W030:SCANDS 5.1T2 186 SCAN.MACRO_LIBRARY.SM.004 1 LINE 79 3 PAGE UM LIFT JULY 23, 1983 13:08:44 0 MACRO LIBRARY USED BY (753/1), (753/2), AND (753/3). 0 Referenced by comments of: 753/1, 753/2, 753/3 00753/005A SCAN OBJECT OC O W030:SCANX 5.1T2 187 SCAN.OBJECT.OC.005 1 LINE 80 16 PAGE UM LIFT JULY 23, 1983 13:08:45 0 Object of SCAN main program (753/1), CSTAT subroutine (753/2), LISTSTAT (071), CCOPY subroutine (753/3), and JVCT subroutine (674). Has $CONTINUE WITH SYS:DIRLIB (742/5) and LIB:STAFF (837) records. 0 Referenced by comments of: 632/3 00753/006A SCAN WRITEUP WX W030:SCAN.W(1,999) 5.1T2 188 SCAN.WRITEUP.WX.006 1 LINE 80 4 PAGE UM LIFT JULY 23, 1983 13:08:45 0 WRITEUP FOR SCAN. DESCRIBES ONLY WHAT'S ACTUALLY IMPLEMENTED. 0 Referenced by comments of: 632/1 00753/007A SCAN WRITEUP PX W030:SCAN.W(1000) 5.1T2 189 SCAN.WRITEUP.PX.007 1 LINE 76 1 PAGE UM LIFT JULY 23, 1983 13:08:46 00754/001 F8ASR SF O S1153 UNSP VLO FSNAME=F8ASR.S 5.0T3 474 F8ASR..SF.001 1 LINE 79 25 PAGE UM UNSP JUNE 23, 1978 20:42:24 5.0T7 339 0 FORTRAN SOURCE FOR A MOSTEK F8 CROSS-ASSEMBLER. COPIES OF THE "MOSTEK F8 MICROPROCESSOR SOFTWARE SUPPORT OPERATIONS MANUAL: FORTRAN IV CROSS ASSEMBLER" (10 PAGES) ARE AVAILABLE UPON REQUEST. 00754/002 F8ASR OE O UNSP:F8ASR 5.0T3 475 F8ASR..OE.002 1 LINE 11980 7 PAGE UM UNSP JULY 03, 1981 19:13:50 5.0T7 340 UNSP:F8ASR 00754/003 F8ASR WF S1560 5.0T3 VLO FSNAME=F8ASR..WF.003(1) 476 5.0T3 476 F8ASR..WF.003 1 LINE 143 10 PAGE UM UNSP APR. 02, 1979 01:10:36 5.0T7 341 0 THIS IS THE "MOSTEK F8 MICROPROCESSOR SOFTWARE SUPPORT OPERATIONS MANUAL: FORTRAN IV CROSS ASSEMBLER" (10 PAGES). 1 SUN SEP 08/96 15:24:55 Page 532 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00755/001 UM FEP HARDWARE LAM PGM S G FEP.:LAM 5.0T3 477 UM_FEP_HARDWARE.LAM_PGM.S.001 1 LINE 81 24 PAGE UM TOKARSKI JULY 03, 1981 19:14:30 5.0T7 342 0 THIS COMPONENT CONTAINS SOFTWARE RELATED TO THE UM DATA CONCENTRATORS (FRONT END PROCESSORS). SOURCE FOR LINE ADAPTER MICROPROCESSOR PROGRAM. ASSEMBLE USING *11ASR (515). 00755/002 UM FEP HARDWARE LAM DESC WF S0767 'SAVETAPE' FSNAME=LAMMAN.S 5.0T3 478 UM_FEP_HARDWARE.LAM_DESC.WF.002 1 LINE 120 36 PAGE UM TOKARSKI JAN. 17, 1979 10:02:27 5.0T7 343 0 MANUAL DESCRIBING LAM HARDWARE AND PROGRAM. 00755/003A UM FEP HARDWARE CHAN XFACE PGM S G DIAG:IF360PGM 5.1T2 190 UM_FEP_HARDWARE.CHAN_XFAC.S.003 1 LINE 87 11 PAGE UM HUSAK JULY 23, 1983 13:08:46 0 MICROPROGRAM FOR 360-CHANNEL-TO-PDP-11-INTERFACE. ASSEMBLE USING *11ASR (515). 00755/004A UM FEP HARDWARE CHAN XFACE MAN WF S0767 'SAVETAPE' FSNAME=360MANUAL 5.1T2 191 UM_FEP_HARDWARE.CHAN_XFAC.WF.004 1 LINE 156 64 PAGE UM HUSAK MAR. 07, 1974 08:55.40 0 MANUAL DESCRIBING CHANNEL INTERFACE PROGRAM. 00756/001 ONTEL SOFTWARE OP/MCP S G CRT:OPSOU 5.0T3 481 ONTEL_SOFTWARE.OP/MCP.S.001 1 LINE 170 72 PAGE UM CASHMAN JULY 03, 1981 19:18:42 5.0T7 346 0 SOURCE FOR THE UM ONTEL TERMINAL MICROPROCESS SOFTWARE. THIS SOFTWARE IS COPYRIGHTED, BUT USE BY ANY INSTALLATION RECEIVING DISTRIBUTIONS OF MTS IS ALLOWED SUBJECT TO THE FOLLOWING CONDITIONS: 1) THE COPYRIGHT NOTICE MUST BE INCLUDED IN ALL COPIES. 2) USE MUST BE NOT BE FOR PROFIT. 3) REDISTRIBUTION OF THE SOFTWARE OUTSIDE OF THE MTS COMMUNITY REQUIRES WRITTEN PERMISSION FROM THE UOFM COMPUTING CENTER. THERE ARE VARIOUS CONDITIONAL ASSEMBLY PARAMETERS: 1) OPTION='ROM' -- TO RUN IN ROM MEMORY OPTION='RAM' -- TO RUN IN RAM MEMORY OPTION='DOS' -- TO RUN IN RAM UNDER ONTEL'S DISK SYSTEM 2) MACHIN='OP1' -- TO RUN IN OP-1 MACHINE MACHIN='OPR' -- TO RUN IN OP-1R MACHINE 3) MCP=0 -- USES THE STANDARD DATA CONCENTRATOR PROTOCOL MCP=1 -- USES THE MICHIGAN COMMUNICATIONS PROTOCOL 4) KEY='ONT' -- THE STANDARD ONTEL KEYBOARD LAYOUT KEY='327' -- COURIER-TYPE KEYBOARD LAYOUT 5) SIZE=N -- WHERE N IS THE SIZE OF MEMORY FOR DOS VERSION SIZE=4 -- FOR ROM VERSION WHICH FITS IN 4K OF ROM MEMORY 1 SUN SEP 08/96 15:24:55 Page 533 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 6) STARPR=0 -- NO EXTRA CODE STARPR=1 -- GENERATE CODE TO DUMP BUFFER TO MTS (%DUMP) 7) DEBUG=ON -- LINK TO RESIDENT KENOBI MONITOR (756/2) DEBUG=OFF -- NO LINK TO MONITOR ASSEMBLE USING I8080ASR (686/29). COPIES OP/COMMENTS (756/3). 0 Referenced by comments of: 756/3 00756/002 ONTEL SOFTWARE KENOBI S G CRT:KENOBI 5.0T3 482 ONTEL_SOFTWARE.KENOBI.S.002 1 LINE 118 31 PAGE UM CASHMAN JULY 03, 1981 19:18:48 5.0T7 347 0 SOURCE FOR THE ONTEL DEBUGGING MONITOR. THE FOLLOWING ARE CONDITIONAL ASSEMBLY PARAMETERS: 1) OPTION='ROM' -- TO RUN IN ROM MEMORY OPTION='RAM' -- TO RUN IN RAM MEMORY 2) DEBUG=ON -- KENOBI IS ENTERED FROM 3270 EMULATOR DEBUG=OFF -- MONITOR IS STAND-ALONE 0 Referenced by comments of: 756/1 00756/003 ONTEL SOFTWARE COMMENTS S G CRT:OP/COMMENTS 5.0T3 483 ONTEL_SOFTWARE.COMMENTS.S.003 1 LINE 61 1 PAGE UM CASHMAN JULY 03, 1981 19:18:52 5.0T7 348 0 Used to print a short comment describing an option of the ONTEL program in OPSOU (756/1). COPY'ed by *I8080ASR (686/29). 0 Referenced by comments of: 756/1 00756/004 ONTEL SOFTWARE MEMO 415 WX S1560 5.0T3 VLO FSNAME=ONTEL_SOFTWARE.MEMO_415.WX.004(1) 484 5.0T3 484 ONTEL_SOFTWARE.MEMO_415.WX.004 1 LINE 92 10 PAGE UM HARTMAN MAR. 26, 1980 09:41:24 5.0T7 349 0 THIS IS COMPUTING CENTER MEMO 415 -- "INTRODUCTION TO THE ONTEL TERMINAL." REQUIRES THE (711/9) TEXTFORM MACROS. COMPONENT (756/5) CONTAINS TABLES TO BE INSERTED ON PAGE 15 FF. REQUIRES OTHER HAND INSERTED DIAGRAMS, WHICH MAY BE OBTAINED FROM THE COMPUTING CENTER PUBLICATIONS OFFICE. 0 Referenced by comments of: 756/5 00756/005 ONTEL SOFTWARE MEMO 415 P S1560 5.0T3 VLO FSNAME=ONTEL_SOFTWARE.MEMO_415.P.005(1) 485 5.0T3 485 ONTEL_SOFTWARE.MEMO_415.P.005 1 LINE 81 5 PAGE UM HARTMAN MAR. 26, 1980 09:47:11 5.0T7 350 0 CONTAINS DIAGRAM TO BE INSERTED ON PAGE 15 FF. OF (756/4). 0 Referenced by comments of: 756/4 1 SUN SEP 08/96 15:24:55 Page 534 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00756/006C ONTEL SOFTWARE MEMO 441 WF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO441.1.SO 272 5.1T2 192 ONTEL_SOFTWARE.MEMO_441.WF.006 1 LINE 75 3 PAGE UM HARTMAN MAY 04, 1983 16:57:14 0 This is Computing Center Memo 441 -- " Ontel Terminal Program-Function Key Reference Sheet." 0 Referenced by comments of: 756/7 00756/007C ONTEL SOFTWARE MEMO 441 PF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO441.2.OU 273 5.1T2 193 ONTEL_SOFTWARE.MEMO_441.PF.007 1 LINE 140 3 PAGE UM HARTMAN MAY 04, 1983 16:57:40 0 This is the printer-ready version of (756/6). 00757/001 SPITPAR SA G S1560 5.0T3 VLO FSNAME=SPITPAR..SA.001(1) 486 5.0T3 486 SPITPAR..SA.001 1 LINE 72 1 PAGE UM UNSP SHERRY JAN. 19, 1979 00:39:56 5.0T7 351 0 A MAIN PROGRAM FOR USE WITH SPITBOL PROGRAMS WHICH ALLOWS THEM TO BE RUN WITH OR WITHOUT THE SEMICOLON IN THE PAR FIELD. ASSEMBLE USING *OBJUTIL MACROS (721/14) AND (721/15). 00757/002 SPITPAR OC G UNSP:SPITPAR 5.0T3 487 SPITPAR..OC.002 1 LINE 96 1 PAGE UM UNSP SHERRY JULY 03, 1981 19:18:57 5.0T7 352 UNSP:SPITPAR 0 Has a $CONTINUE WITH *SPITLIB (590/10) card. 00758/001 SOFTCHK SA G S1560 5.0T3 VLO FSNAME=SOFTCHK..SA.001(1) 488 5.0T3 488 SOFTCHK..SA.001 1 LINE 72 3 PAGE UM MTA JULY 03, 1981 19:18:58 5.0T7 353 0 SOFTCHK JOB PROGRAM TO ENABLE OR DISABLE SOFT MACHINE CHECKS. 00758/002 SOFTCHK OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00759/001 G11 JOB SA G S1560 5.0T3 VLO FSNAME=G11_JOB..SA.001(1) 489 5.0T3 489 G11_JOB..SA.001 1 LINE 70 2 PAGE UM MTA JAN. 19, 1981 22:18:16 5.0T7 354 0 LOADS THE CHARACTER AND FORMS CONTROL BUFFERS OF A 3211 PRINTER FOR THE G11 PRINT TRAIN. ASSUMES 6 LINES PER INCH ON 11 INCH PAPER UNLESS THE "8LPI" PARAMETER IS GIVEN, IN WHICH CASE IT ASSUMES 8 LINES PER INCH ON 8.5 INCH PAPER. 00759/002 G11 JOB OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 535 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/001 BENCHMARK - BATCH SCR C BNCH:BATCH.SCR 5.0T3 490 BENCHMARK_-_BATCH.SCR.C.001 1 LINE 76 1 PAGE UQV OGDEN JULY 03, 1981 19:19:58 5.0T7 355 BNCH:BATCH.SCR 0 MTS COMMAND FILE TO RUN A BATCH BENCHMARK. 00760/002 BENCHMARK - BATCH BATCH SUBMIT SF O BNCH:SUBMIT.S 5.0T3 491 BENCHMARK_-_BATCH.BATCH_S.SF.002 1 LINE 80 4 PAGE UQV OGDEN JULY 03, 1981 19:19:59 5.0T7 356 BNCH:SUBMIT.S 0 PROGRAM TO SUBMIT JOBS TO *BATCH* OR SOME OTHER FDNAME ADDING SIGNON COMMANDS AND PASSWORDS. READS A DRIVER FILE. SEE (760/4) FOR AN EXAMPLE. SEE THE SOURCE CODE FOR COMMENTS EXPLAINING THE FORMAT. 0 Referenced by comments of: 760/4, 760/5, 760/20 00760/003 BENCHMARK - BATCH SUBMIT OC O BNCH:SUBMIT 5.0T3 492 BENCHMARK_-_BATCH.SUBMIT.OC.003 1 LINE 2956 4 PAGE UQV OGDEN JULY 03, 1981 19:20:00 5.0T7 357 BNCH:SUBMIT 00760/004 BENCHMARK - BATCH BATCH DRIVER D BNCH:DRIVER 5.0T3 493 BENCHMARK_-_BATCH.BATCH_D.D.004 1 LINE 60 2 PAGE UQV OGDEN JULY 03, 1981 19:20:01 5.0T7 358 BNCH:DRIVER 0 SAMPLE DRIVER FILE FOR BATCH SUBMIT PROGRAM (760/2). 0 Referenced by comments of: 760/2 00760/005 BENCHMARK - BATCH BM00 JOB C BNCH:BM00 5.0T3 494 BENCHMARK_-_BATCH.BM00_JO.C.005 1 LINE 78 2 PAGE UQV OGDEN JULY 03, 1981 19:20:02 5.0T7 359 BNCH:BM00 0 BATCH JOB THAT CAN BE SUBMITTED USING SUBMIT (760/2). ONCE KNOWN AS SUN OR SUP. 00760/006 BENCHMARK - BATCH BM00 DATA SF O BNCH:ADEPT.F 5.0T3 495 BENCHMARK_-_BATCH.BM00_DA.SF.006 1 LINE 77 19 PAGE UQV OGDEN JULY 03, 1981 19:20:02 5.0T7 360 BNCH:ADEPT.F 0 DATA FILE USED BY BM00 JOB. 00760/007 BENCHMARK - BATCH BM00 DATA OC O BNCH:AX 5.0T3 496 BENCHMARK_-_BATCH.BM00_DA.OC.007 1 LINE 240 1 PAGE UQV OGDEN JULY 03, 1981 19:20:04 5.0T7 361 BNCH:AX 0 DATA FILE USED BY BM00 JOB. 00760/008 BENCHMARK - BATCH BM00 DATA OC O BNCH:CHOLX 5.0T3 497 BENCHMARK_-_BATCH.BM00_DA.OC.008 1 LINE 80 9 PAGE UQV OGDEN JULY 03, 1981 19:20:05 5.0T7 362 BNCH:CHOLX 0 DATA FILE USED BY BM00 JOB. 1 SUN SEP 08/96 15:24:55 Page 536 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/009 BENCHMARK - BATCH BM00 DATA OC O BNCH:CX 5.0T3 498 BENCHMARK_-_BATCH.BM00_DA.OC.009 1 SEQ 80 2 PAGE UQV OGDEN JULY 03, 1981 19:20:06 5.0T7 363 BNCH:CX 0 DATA FILE USED BY BM00 JOB. 00760/010 BENCHMARK - BATCH BM00 DATA D O BNCH:ELASTODATA 5.0T3 499 BENCHMARK_-_BATCH.BM00_DA.D.010 1 LINE 80 1 PAGE UQV OGDEN JULY 03, 1981 19:20:08 5.0T7 364 BNCH:ELASTODATA 0 DATA FILE USED BY BM00 JOB. 00760/011 BENCHMARK - BATCH BM00 DATA OC O BNCH:ELASTOPLAST 5.0T3 500 BENCHMARK_-_BATCH.BM00_DA.OC.011 1 SEQ 28240 39 PAGE UQV OGDEN JULY 03, 1981 19:20:09 5.0T7 365 BNCH:ELASTOPLAST 0 DATA FILE USED BY BM00 JOB. 00760/012 BENCHMARK - BATCH BM00 DATA SP O BNCH:GOMOKU.P 5.0T3 501 BENCHMARK_-_BATCH.BM00_DA.SP.012 1 LINE 80 4 PAGE UQV OGDEN JULY 03, 1981 19:20:12 5.0T7 366 BNCH:GOMOKU.P 0 DATA FILE USED BY BM00 JOB. 00760/013 BENCHMARK - BATCH BM00 SUBR LIB OL O BNCH:LIBRARY 5.0T3 502 BENCHMARK_-_BATCH.BM00_SU.OL.013 1 SEQ 13728 187 PAGE UQV OGDEN JULY 03, 1981 19:20:13 5.0T7 367 BNCH:LIBRARY 0 SUBROUTINE LIBRARY USED BY BM00 JOB. 00760/014 BENCHMARK - BATCH BM00 DATA OC O BNCH:PLOT 5.0T3 503 BENCHMARK_-_BATCH.BM00_DA.OC.014 1 SEQ 240 7 PAGE UQV OGDEN JULY 03, 1981 19:20:18 5.0T7 368 BNCH:PLOT 0 DATA FILE USED BY BM00 JOB. 00760/015 BENCHMARK - BATCH BM00 DATA D O BNCH:PLOTDATA 5.0T3 504 BENCHMARK_-_BATCH.BM00_DA.D.015 1 LINE 40 1 PAGE UQV OGDEN JULY 03, 1981 19:20:19 5.0T7 369 BNCH:PLOTDATA 0 DATA FILE USED BY BM00 JOB. 00760/016 BENCHMARK - BATCH BM00 DATA OC O BNCH:PRPLOT 5.0T3 505 BENCHMARK_-_BATCH.BM00_DA.OC.016 1 SEQ 4554 9 PAGE UQV OGDEN JULY 03, 1981 19:20:20 5.0T7 370 BNCH:PRPLOT 0 DATA FILE USED BY BM00 JOB. 00760/017 BENCHMARK - BATCH BM00 DATA SP O BNCH:STAT.P 5.0T3 506 BENCHMARK_-_BATCH.BM00_DA.SP.017 1 LINE 85 10 PAGE UQV OGDEN JULY 03, 1981 19:20:21 5.0T7 371 BNCH:STAT.P 0 DATA FILE USED BY BM00 JOB. 1 SUN SEP 08/96 15:24:55 Page 537 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/018 BENCHMARK - BATCH BM00 DATA SC O BNCH:WATBOL.C 5.0T3 507 BENCHMARK_-_BATCH.BM00_DA.SC.018 1 LINE 81 14 PAGE UQV OGDEN JULY 03, 1981 19:20:23 5.0T7 372 BNCH:WATBOL.C 0 DATA FILE USED BY BM00 JOB. 00760/019 BENCHMARK - BATCH BM00 DATA SA O BNCH:3270.BENCH.S 5.0T3 508 BENCHMARK_-_BATCH.BM00_DA.SA.019 1 LINE 80 92 PAGE UQV OGDEN JULY 03, 1981 19:20:24 5.0T7 373 BNCH:3270.BENCH.S 0 DATA FILE USED BY BM00 JOB. 00760/020 BENCHMARK - BATCH BM01 JOB SF O BNCH:BM01 5.0T3 509 BENCHMARK_-_BATCH.BM01_JO.SF.020 1 LINE 80 17 PAGE UQV OGDEN JULY 03, 1981 19:20:30 5.0T7 374 BNCH:BM01 0 THE FOLLOWING 49 FILES, BM01-BM26 AND BN01-BN51, ARE BATCH JOBS THAT CAN BE SUBMITTED USING SUBMIT (760/2). ONCE KNOWN AS SAN OR SAP. 00760/021 BENCHMARK - BATCH BM04 JOB SF O BNCH:BM04 5.0T3 510 BENCHMARK_-_BATCH.BM04_JO.SF.021 1 LINE 74 7 PAGE UQV OGDEN JULY 03, 1981 19:20:33 5.0T7 375 BNCH:BM04 00760/022 BENCHMARK - BATCH BM05 JOB SF O BNCH:BM05 5.0T3 511 BENCHMARK_-_BATCH.BM05_JO.SF.022 1 LINE 80 17 PAGE UQV OGDEN JULY 03, 1981 19:20:34 5.0T7 376 BNCH:BM05 00760/023 BENCHMARK - BATCH BM06 JOB SF O BNCH:BM06 5.0T3 512 BENCHMARK_-_BATCH.BM06_JO.SF.023 1 LINE 71 2 PAGE UQV OGDEN JULY 03, 1981 19:20:36 5.0T7 377 BNCH:BM06 00760/024 BENCHMARK - BATCH BM08 JOB SF O BNCH:BM08 5.0T3 513 BENCHMARK_-_BATCH.BM08_JO.SF.024 1 LINE 73 6 PAGE UQV OGDEN JULY 03, 1981 19:20:37 5.0T7 378 BNCH:BM08 00760/025 BENCHMARK - BATCH BM09 JOB SF O BNCH:BM09 5.0T3 514 BENCHMARK_-_BATCH.BM09_JO.SF.025 1 LINE 77 1 PAGE UQV OGDEN JULY 03, 1981 19:20:38 5.0T7 379 BNCH:BM09 00760/026 BENCHMARK - BATCH BM11 JOB SF O BNCH:BM11 5.0T3 515 BENCHMARK_-_BATCH.BM11_JO.SF.026 1 LINE 73 7 PAGE UQV OGDEN JULY 03, 1981 19:20:38 5.0T7 380 BNCH:BM11 00760/027 BENCHMARK - BATCH BM12 JOB SF O BNCH:BM12 5.0T3 516 BENCHMARK_-_BATCH.BM12_JO.SF.027 1 LINE 69 1 PAGE UQV OGDEN JULY 03, 1981 19:20:40 5.0T7 381 BNCH:BM12 00760/028 BENCHMARK - BATCH BM13 JOB SF O BNCH:BM13 5.0T3 517 BENCHMARK_-_BATCH.BM13_JO.SF.028 1 LINE 72 3 PAGE UQV OGDEN JULY 03, 1981 19:20:40 5.0T7 382 BNCH:BM13 1 SUN SEP 08/96 15:24:55 Page 538 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/029 BENCHMARK - BATCH BM14 JOB SP O BNCH:BM14 5.0T3 518 BENCHMARK_-_BATCH.BM14_JO.SP.029 1 LINE 74 2 PAGE UQV OGDEN JULY 03, 1981 19:20:41 5.0T7 383 BNCH:BM14 00760/030 BENCHMARK - BATCH BM18 JOB SF O BNCH:BM18 5.0T3 519 BENCHMARK_-_BATCH.BM18_JO.SF.030 1 LINE 71 2 PAGE UQV OGDEN JULY 03, 1981 19:20:42 5.0T7 384 BNCH:BM18 00760/031 BENCHMARK - BATCH BM19 JOB SF O BNCH:BM19 5.0T3 520 BENCHMARK_-_BATCH.BM19_JO.SF.031 1 LINE 69 1 PAGE UQV OGDEN JULY 03, 1981 19:20:43 5.0T7 385 BNCH:BM19 00760/032 BENCHMARK - BATCH BM20 JOB SF O BNCH:BM20 5.0T3 521 BENCHMARK_-_BATCH.BM20_JO.SF.032 1 LINE 72 3 PAGE UQV OGDEN JULY 03, 1981 19:20:44 5.0T7 386 BNCH:BM20 00760/033 BENCHMARK - BATCH BM21 JOB SC O BNCH:BM21 5.0T3 522 BENCHMARK_-_BATCH.BM21_JO.SC.033 1 LINE 80 4 PAGE UQV OGDEN JULY 03, 1981 19:20:45 5.0T7 387 BNCH:BM21 00760/034 BENCHMARK - BATCH BM23 JOB SP O BNCH:BM23 5.0T3 523 BENCHMARK_-_BATCH.BM23_JO.SP.034 1 LINE 73 17 PAGE UQV OGDEN JULY 03, 1981 19:20:45 5.0T7 388 BNCH:BM23 00760/035 BENCHMARK - BATCH BM26 JOB SP O BNCH:BM26 5.0T3 524 BENCHMARK_-_BATCH.BM26_JO.SP.035 1 LINE 73 11 PAGE UQV OGDEN JULY 03, 1981 19:20:47 5.0T7 389 BNCH:BM26 00760/036 BENCHMARK - BATCH BN01 JOB SF O BNCH:BN01 5.0T3 525 BENCHMARK_-_BATCH.BN01_JO.SF.036 1 LINE 80 58 PAGE UQV OGDEN JULY 03, 1981 19:20:49 5.0T7 390 BNCH:BN01 00760/037 BENCHMARK - BATCH BN02 JOB SF O BNCH:BN02 5.0T3 526 BENCHMARK_-_BATCH.BN02_JO.SF.037 1 LINE 80 1 PAGE UQV OGDEN JULY 03, 1981 19:20:53 5.0T7 391 BNCH:BN02 00760/038 BENCHMARK - BATCH BN03 JOB SF O BNCH:BN03 5.0T3 527 BENCHMARK_-_BATCH.BN03_JO.SF.038 1 LINE 76 9 PAGE UQV OGDEN JULY 03, 1981 19:20:54 5.0T7 392 BNCH:BN03 00760/039 BENCHMARK - BATCH BN04 JOB SF O BNCH:BN04 5.0T3 528 BENCHMARK_-_BATCH.BN04_JO.SF.039 1 LINE 73 2 PAGE UQV OGDEN JULY 03, 1981 19:20:56 5.0T7 393 BNCH:BN04 00760/040 BENCHMARK - BATCH BN05 JOB SF O BNCH:BN05 5.0T3 529 BENCHMARK_-_BATCH.BN05_JO.SF.040 1 LINE 80 1 PAGE UQV OGDEN JULY 03, 1981 19:20:57 5.0T7 394 BNCH:BN05 00760/041 BENCHMARK - BATCH BN06 JOB SF O BNCH:BN06 5.0T3 530 BENCHMARK_-_BATCH.BN06_JO.SF.041 1 LINE 73 7 PAGE UQV OGDEN JULY 03, 1981 19:20:57 5.0T7 395 BNCH:BN06 1 SUN SEP 08/96 15:24:55 Page 539 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/042 BENCHMARK - BATCH BN07 JOB SF O BNCH:BN07 5.0T3 531 BENCHMARK_-_BATCH.BN07_JO.SF.042 1 LINE 73 2 PAGE UQV OGDEN JULY 03, 1981 19:20:58 5.0T7 396 BNCH:BN07 00760/043 BENCHMARK - BATCH BN08 JOB SF O BNCH:BN08 5.0T3 532 BENCHMARK_-_BATCH.BN08_JO.SF.043 1 LINE 59 1 PAGE UQV OGDEN JULY 03, 1981 19:20:59 5.0T7 397 BNCH:BN08 00760/044 BENCHMARK - BATCH BN09 JOB SF O BNCH:BN09 5.0T3 533 BENCHMARK_-_BATCH.BN09_JO.SF.044 1 LINE 80 4 PAGE UQV OGDEN JULY 03, 1981 19:21:00 5.0T7 398 BNCH:BN09 00760/045 BENCHMARK - BATCH BN10 JOB SF O BNCH:BN10 5.0T3 534 BENCHMARK_-_BATCH.BN10_JO.SF.045 1 LINE 80 3 PAGE UQV OGDEN JULY 03, 1981 19:21:01 5.0T7 399 BNCH:BN10 00760/046 BENCHMARK - BATCH BN11 JOB SF O BNCH:BN11 5.0T3 535 BENCHMARK_-_BATCH.BN11_JO.SF.046 1 LINE 78 6 PAGE UQV OGDEN JULY 03, 1981 19:21:01 5.0T7 400 BNCH:BN11 00760/047 BENCHMARK - BATCH BN12 JOB SF O BNCH:BN12 5.0T3 536 BENCHMARK_-_BATCH.BN12_JO.SF.047 1 LINE 69 2 PAGE UQV OGDEN JULY 03, 1981 19:21:02 5.0T7 401 BNCH:BN12 00760/048 BENCHMARK - BATCH BN13 JOB SF O BNCH:BN13 5.0T3 537 BENCHMARK_-_BATCH.BN13_JO.SF.048 1 LINE 73 3 PAGE UQV OGDEN JULY 03, 1981 19:21:03 5.0T7 402 BNCH:BN13 00760/049 BENCHMARK - BATCH BN15 JOB SF O BNCH:BN15 5.0T3 538 BENCHMARK_-_BATCH.BN15_JO.SF.049 1 LINE 59 1 PAGE UQV OGDEN JULY 03, 1981 19:21:04 5.0T7 403 BNCH:BN15 00760/050 BENCHMARK - BATCH BN16 JOB SF O BNCH:BN16 5.0T3 539 BENCHMARK_-_BATCH.BN16_JO.SF.050 1 LINE 75 3 PAGE UQV OGDEN JULY 03, 1981 19:21:05 5.0T7 404 BNCH:BN16 00760/051 BENCHMARK - BATCH BN17 JOB SF O BNCH:BN17 5.0T3 540 BENCHMARK_-_BATCH.BN17_JO.SF.051 1 LINE 80 2 PAGE UQV OGDEN JULY 03, 1981 19:21:06 5.0T7 405 BNCH:BN17 00760/052 BENCHMARK - BATCH BN30 JOB SF O BNCH:BN30 5.0T3 541 BENCHMARK_-_BATCH.BN30_JO.SF.052 1 LINE 80 4 PAGE UQV OGDEN JULY 03, 1981 19:21:06 5.0T7 406 BNCH:BN30 00760/053 BENCHMARK - BATCH BN31 JOB SF O BNCH:BN31 5.0T3 542 BENCHMARK_-_BATCH.BN31_JO.SF.053 1 LINE 71 4 PAGE UQV OGDEN JULY 03, 1981 19:21:07 5.0T7 407 BNCH:BN31 00760/054 BENCHMARK - BATCH BN32 JOB SF O BNCH:BN32 5.0T3 543 BENCHMARK_-_BATCH.BN32_JO.SF.054 1 LINE 80 6 PAGE UQV OGDEN JULY 03, 1981 19:21:08 5.0T7 408 BNCH:BN32 1 SUN SEP 08/96 15:24:55 Page 540 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/055 BENCHMARK - BATCH BN33 JOB SF O BNCH:BN33 5.0T3 544 BENCHMARK_-_BATCH.BN33_JO.SF.055 1 LINE 72 3 PAGE UQV OGDEN JULY 03, 1981 19:21:09 5.0T7 409 BNCH:BN33 00760/056 BENCHMARK - BATCH BN34 JOB SF O BNCH:BN34 5.0T3 545 BENCHMARK_-_BATCH.BN34_JO.SF.056 1 LINE 72 3 PAGE UQV OGDEN JULY 03, 1981 19:21:10 5.0T7 410 BNCH:BN34 00760/057 BENCHMARK - BATCH BN35 JOB SF O BNCH:BN35 5.0T3 546 BENCHMARK_-_BATCH.BN35_JO.SF.057 1 LINE 72 4 PAGE UQV OGDEN JULY 03, 1981 19:21:11 5.0T7 411 BNCH:BN35 00760/058 BENCHMARK - BATCH BN36 JOB SF O BNCH:BN36 5.0T3 547 BENCHMARK_-_BATCH.BN36_JO.SF.058 1 LINE 72 2 PAGE UQV OGDEN JULY 03, 1981 19:21:12 5.0T7 412 BNCH:BN36 00760/059 BENCHMARK - BATCH BN37 JOB SF O BNCH:BN37 5.0T3 548 BENCHMARK_-_BATCH.BN37_JO.SF.059 1 LINE 80 9 PAGE UQV OGDEN JULY 03, 1981 19:21:12 5.0T7 413 BNCH:BN37 00760/060 BENCHMARK - BATCH BN38 JOB SF O BNCH:BN38 5.0T3 549 BENCHMARK_-_BATCH.BN38_JO.SF.060 1 LINE 80 25 PAGE UQV OGDEN JULY 03, 1981 19:21:13 5.0T7 414 BNCH:BN38 00760/061 BENCHMARK - BATCH BN39 JOB SF O BNCH:BN39 5.0T3 550 BENCHMARK_-_BATCH.BN39_JO.SF.061 1 LINE 80 15 PAGE UQV OGDEN JULY 03, 1981 19:21:15 5.0T7 415 BNCH:BN39 00760/062 BENCHMARK - BATCH BN40 JOB SF O BNCH:BN40 5.0T3 551 BENCHMARK_-_BATCH.BN40_JO.SF.062 1 LINE 80 14 PAGE UQV OGDEN JULY 03, 1981 19:21:17 5.0T7 416 BNCH:BN40 00760/063 BENCHMARK - BATCH BN41 JOB SF O BNCH:BN41 5.0T3 552 BENCHMARK_-_BATCH.BN41_JO.SF.063 1 LINE 80 5 PAGE UQV OGDEN JULY 03, 1981 19:21:18 5.0T7 417 BNCH:BN41 00760/064 BENCHMARK - BATCH BN42 JOB SF O BNCH:BN42 5.0T3 553 BENCHMARK_-_BATCH.BN42_JO.SF.064 1 LINE 72 4 PAGE UQV OGDEN JULY 03, 1981 19:21:19 5.0T7 418 BNCH:BN42 00760/065 BENCHMARK - BATCH BN43 JOB SF O BNCH:BN43 5.0T3 554 BENCHMARK_-_BATCH.BN43_JO.SF.065 1 LINE 72 3 PAGE UQV OGDEN JULY 03, 1981 19:21:20 5.0T7 419 BNCH:BN43 00760/066 BENCHMARK - BATCH BN44 JOB SF O BNCH:BN44 5.0T3 555 BENCHMARK_-_BATCH.BN44_JO.SF.066 1 LINE 72 4 PAGE UQV OGDEN JULY 03, 1981 19:21:21 5.0T7 420 BNCH:BN44 00760/067 BENCHMARK - BATCH BN50 JOB SC O BNCH:BN50 5.0T3 556 BENCHMARK_-_BATCH.BN50_JO.SC.067 1 LINE 73 21 PAGE UQV OGDEN JULY 03, 1981 19:21:22 5.0T7 421 BNCH:BN50 1 SUN SEP 08/96 15:24:55 Page 541 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00760/068 BENCHMARK - BATCH BN51 JOB WF O BNCH:BN51 5.0T3 557 BENCHMARK_-_BATCH.BN51_JO.WF.068 1 LINE 80 4 PAGE UQV OGDEN JULY 03, 1981 19:21:24 5.0T7 422 BNCH:BN51 00761/001 HARDWIRED TERMINALS *HWTERM SA G S1560 5.0T3 VLO FSNAME=HARDWIRED_TERMINALS.*HWTE.SA.001(1) 558 5.0T3 558 HARDWIRED_TERMINALS.*HWTE.SA.001 1 LINE 65 1 PAGE UM OGDEN NOV. 16, 1979 14:21:13 5.0T7 423 0 SOURCE FOR CSECT WHICH DEFINES THE LOCATION AND DEFAULT *...* ROUTING FOR HARDWIRED TERMINALS. IN THIS WAY, HARDWIRED TERMINALS LOCATED IN THE VICINITY OF RJE STATIONS CAN HAVE *...* OUTPUT ROUTED APPROPRIATELY BY DEFAULT. IN ADDITION, HARDWIRED "EXPRESS" TERMINALS CAN BE IDENTIFIED SO THAT USERS OF SUCH TERMINALS CAN BE AUTOMATICALLY REMINDED BY MTS AFTER 5 MINUTES THAT THE TERMINAL IS RESERVED FOR EXPRESS USE. AS DISTRIBUTED, THIS CSECT CONTAINS NO IDENTIFIED HARDWIRED TERMINALS; EACH INSTALLATION HAVING TERMINALS WHICH SHOULD BE IDENTIFIED FOR THESE PURPOSES SHOULD REASSEMBLE. AT MICHIGAN, INFORMATION FROM THIS TABLE IS ALSO USED TO IDENTIFY "HIGH-SPEED LINES" IN RATENUMBER (651/13). ASSEMBLE USING COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 761/3 00761/002 HARDWIRED TERMINALS *HWTERM OC G MTS:TST.HWTERM 5.0T3 559 HARDWIRED_TERMINALS.*HWTE.OC.002 1 LINE 80 1 PAGE UM OGDEN JULY 03, 1981 19:21:25 5.0T7 424 *HWTERM 0 THIS FILE IS NORMALLY LOADED INTO SHARED VM AFTER IPL BY PISTLE. 00761/003 HARDWIRED TERMINALS HWTPRINT SA G S1560 5.0T3 VLO FSNAME=HARDWIRED_TERMINALS.HWTPR.SA.003(1) 560 5.0T3 560 HARDWIRED_TERMINALS.HWTPR.SA.003 1 LINE 72 1 PAGE UM OGDEN APR. 06, 1980 13:22:56 5.0T7 425 0 PROGRAM TO PRINT THE CONTENTS OF THE HARDWIRED TERMINAL TABLE (761/1) CURRENTLY IN USE. CALLS RJECHECK SUBROUTINE (IN HASP). ASSEMBLE USING COPY:MTS.MACROS (344/3). 00761/004 HARDWIRED TERMINALS HWTPRINT OC G S1560 5.0T3 VLO FSNAME=HARDWIRED_TERMINALS.HWTPR.OC.004(1) 561 5.0T3 561 HARDWIRED_TERMINALS.HWTPR.OC.004 1 LINE 80 1 PAGE UM OGDEN APR. 06, 1980 13:22:59 5.0T7 426 00762/001A FIDS COMMAND FILE C MTA:FIDSCMD 5.1T2 194 FIDS.COMMAND_FILE.C.001 1 LINE 95 1 PAGE UM MTA JULY 23, 1983 13:14:13 MTA:FIDSCMD@UM 0 COMMANDS TO RUN THE MEMOREX FAULT ISOLATION DIAGNOSTIC SYSTEM, FIDS, IN MTS. IT WILL READ INITIALIZATION STATEMENTS, INCLUDING AT LEAST ONE CONFIG STATEMENT, FOLLOWED BY ENDC, AND THEN WAIT FOR INPUT. SEE THE (762/8) WRITEUP. 1 SUN SEP 08/96 15:24:55 Page 542 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00762/002A FIDS MAIN PROGRAM OE # ETC:FIDS.MAIN UM MTA 0 THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT IS THE MAIN PROGRAM OF FIDS. 00762/003A FIDS LIBRARY OL # ETC:FIDS.LIB UM MTA 0 THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT IS A LIBRARY OF FIDS MODULES SET UP TO RUN IN MTS. CORRESPONDS TO (762/4). CONTAINS REP CARDS TO MAKE FIDS WORK IN *FAKEOS (545): REP 00078E 019003D004,4100B7C0,41100040,5000B7C0,D201B7E2C124,9200B7DF REP 0007A8 010A3B,D203C160B7C8,9803D004,95FFB7DF,0787,47F07004 REP 0007C0 0100000000,00000001 REPLACES UCB SEARCH WITH A CALL TO SVC 59. EQUIVALENT TO STM R0,R3,4(RD) LA R0,PARS LA R1,X'40' "GET DEVICE" CODE FOR SVC 59 ST R0,PARS MVC PARS+34(2),X'124'(RC) BUILD A FAKE OLTEP DEVTAB ENTRY MVI PARS+31,0 SVC 59 MVC X'160'(4,RC),PARS+8 THE UCB ADDRESS LM R0,R3,4(RD) CLI PARS+31,255 BER R7 GOT IT B 4(0,R7) NOT AVAILABLE PARS DC F'0,1' 00762/004A FIDS OS OBJECT OC # S0938 FSAVE2 VLO FSNAME=FIDS.FILE2(4) 758 UM MTA 0 THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT IS OS LINKEDIT INPUT FOR FIDS, COPIED FROM FILE 2 OF THE MEMOREX TAPE. THIS IS VERSION 2.7 OF FIDS. 0 Referenced by comments of: 762/3 00762/005A FIDS EXIT ROUTINE OC # S0938 FSAVE2 VLO FSNAME=FIDS.FILE3(4) 759 UM MTA 0 THIS SUBCOMPONENT IS NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. IT IS THE OBJECT FOR AN EXIT ROUTINE USED BY OS FIDS TO GET CONTROL IN SUPERVISOR STATE. IT IS NOT USED IN MTS OR MVS. 00762/006A FIDS BLDL D ETC:FIDS.BLDL 5.1T2 195 FIDS.BLDL.D.006 1 SEQ 250 1 PAGE UM MTA JULY 23, 1983 13:14:14 ETC:FIDS.BLDL 0 BLDL FILE FOR FIDS. OUTPUT FROM *FAKEOSCREBLDL (545/43). 1 SUN SEP 08/96 15:24:55 Page 543 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 762/7 00762/007A FIDS BLDL INPUT D S0938 FSAVE2 VLO FSNAME=FIDS.BLDLIN(2) 760 5.1T2 196 FIDS.BLDL_INPUT.D.007 1 LINE 60 2 PAGE UM MTA MAY 21, 1982 22:12:34 0 INPUT TO *FAKEOSCREBLDL (545/43) TO CREATE (762/6). 00762/008 FIDS WRITEUP WF S1560 5.0T3 VLO FSNAME=FIDS.WRITEUP.WF.009(1) 565 5.0T3 565 FIDS.WRITEUP.WF.009 1 LINE 67 1 PAGE UM MTA APR. 02, 1979 01:26:59 5.0T7 430 0 INSTRUCTIONS FOR RUNNING FIDS IN MTS. 0 Referenced by comments of: 762/1 00763/001 BLDGPLOT SOURCE SF G S0409 'BLDGPLOT' FSNAME=BPRGM 5.0T3 566 BLDGPLOT.SOURCE.SF.001 1 LINE 77 22 PAGE UM EMERY JAN. 03, 1980 13:11:10 5.0T7 431 0 THIS IS THE FORTRAN SOURCE PROGRAM FOR THE UM COMPUTING CENTER BUILDING PLOT. EXECUTION OF THE OBJECT VERSION (763/2) UTILIZES 3 INPUT FILES THAT ARE ASSIGNED TO LOGICAL I/O UNITS 2, 3, AND 4. THE PLOT DESCRIPTION IS DIRECTED TO LOGICAL I/O UNIT 9. THE FIRST INPUT FILE CONTAINS STRUCTURAL INFORMATION ABOUT THE BUILDING, THE SECOND CONTAINS PHYSICAL DESCRIPTIONS OF THE SIZE OF VARIOUS COMPUTER COMPONENTS AND FURNITURE ITEMS, AND THE THIRD CONTAINS INFORMATION ON WHICH COMPONENT IS INSTALLED AT A GIVEN BUILDING LOCATION FOR A SPECIFIED TIME PERIOD. 0 Referenced by comments of: 763/2 00763/002 BLDGPLOT OBJECT OC G S0409 'BLDGPLOT' FSNAME=BOBJ 5.0T3 567 BLDGPLOT.OBJECT.OC.002 1 LINE 9522 22 PAGE UM EMERY MAR. 12, 1979 12:39:46 5.0T7 432 0 OBJECT FOR BLDGPLOT PROGRAM (763/1). 0 Referenced by comments of: 763/1 00763/003 BLDGPLOT WALLS D S0409 'BLDGPLOT' FSNAME=BWALLS 5.0T3 568 BLDGPLOT.WALLS.D.003 1 LINE 81 24 PAGE UM EMERY JAN. 03, 1980 13:15:27 5.0T7 433 0 THIS IS THE DATA FILE ASSIGNED TO LOGICAL I/O UNIT 2 WHEN PRODUCING A PLOT OF THE UM COMPUTING CENTER BUILDING. IT CONTAINS STRUCTURAL INFORMATION ON THE WALLS, WINDOWS, ELECTRICAL SERVICE OUTLETS, TELEPHONE SERVICE OUTLETS, ETC. 00763/004 BLDGPLOT DEVICES D S0409 'BLDGPLOT' FSNAME=BDEV 5.0T3 569 BLDGPLOT.DEVICES.D.004 1 LINE 94 5 PAGE UM EMERY JAN. 03, 1980 13:17:52 5.0T7 434 0 THIS IS THE DATA FILE ASSIGNED TO LOGICAL I/O UNIT 3 WHEN PRODUCING A PLOT OF THE UM COMPUTING CENTER BUILDING. IT CONTAINS INFORMATION ABOUT THE SIZE OF VARIOUS COMPUTER COMPONENTS, TERMINALS, FURNITURE ITEMS, ETC. WHEN APPROPRIATE IT ALSO CONTAINS INFORMATION ABOUT THE LOCATION OF CABLE CUTOUTS IN COMPUTER 1 SUN SEP 08/96 15:24:55 Page 544 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 COMPONENTS. 00763/005 BLDGPLOT DATA D S0409 'BLDGPLOT' FSNAME=BDATA 5.0T3 570 BLDGPLOT.DATA.D.005 1 LINE 79 33 PAGE UM EMERY MAR. 09, 1979 12:13:34 5.0T7 435 0 THIS IS THE DATA FILE ASSIGNED TO LOGICAL I/O UNIT 4 WHEN PRODUCING A PLOT OF THE UM COMPUTING CENTER BUILDING. IT CONTAINS INFORMATION ON WHICH COMPUTER COMPONENT, DESK, TERMINAL, BOOKCASE, ETC. WAS "INSTALLED" AT A PARTICULAR LOCATION IN THE BUILDING FOR A SPECIFIED TIME PERIOD. 0 Referenced by comments of: 763/6 00763/006 BLDGPLOT LABELS D S0409 'BLDGPLOT' FSNAME=BLABEL 5.0T3 571 BLDGPLOT.LABELS.D.006 1 LINE 80 3 PAGE UM EMERY JAN. 03, 1980 13:22:05 5.0T7 436 0 THIS FILE MAY BE ASSIGNED TO LOGICAL I/O UNIT 4 WHEN PRODUCING A PLOT OF THE UM COMPUTING CENTER BUILDING. THE FILE CONTAINS INFORMATION DESCRIBING THE CONTENT AND LOCATION OF LABELS THAT SHOULD APPEAR IN THE PLOT. WHEN APPROPRIATE IT MAY BE CONCATENATED TO THE DATA FILE (763/5). 00764/001 APPEND # (OBSOLETE) 4.3T2 70 APPEND..SS.001 1 LINE 80 1 PAGE UM JAN. 03, 1979 14:01:22 0 Obsoleted by *COMBINE (771). 00765/001A DAVE/M MAIN SF G W169:DAVE.MAIN.S 5.1T2 197 DAVE/M.MAIN.SF.001 1 LINE 72 12 PAGE UM BRILL JULY 23, 1983 13:19:02 0 DAVE/M is the University of Michigan's version of DAVE, a software tool for gathering information about global data flow in FORTRAN programs, and for identifying the anomalous use of data in these programs. A test version can be loaded by a secret PAR field command. See listing for details. DAVE was developed by the University of Colorado. This is the main program for DAVE/M. Copies UNSP:LIBRARY (685/2). ********************************************************************* D5.1 version: Changed to change reference from W234:DAVE.STAT to ETC:DAVE.STAT (765/21) and to remove reference to W234:MAILBOX. ********************************************************************** 0 Referenced by comments of: 744/1, 765/2, 765/3, 765/5, 765/7, 765/9, 765/13 00765/002A DAVE/M *DAVE OE G *DAVE 5.1T2 198 DAVE/M.?DAVE.OE.002 1 LINE 19309 9 PAGE UM BRILL JULY 23, 1983 13:19:03 *DAVE 0 OBJECT OF (765/1). DYNAMICALLY LOADS PHASE0 (765/3), PHASE1 (765/5), PHASE2 (765/7), PHASE3 (765/9) AND DAVE.SUB (765/13). CALLS DAVE.EXT (744/7). 1 SUN SEP 08/96 15:24:55 Page 545 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 744/7 00765/003 DAVE/M PHASE0 SF G S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE0.SF.003(1) 574 5.0T3 574 DAVE/M.PHASE0.SF.003 1 LINE 73 28 PAGE UM BRILL APR. 06, 1980 13:28:06 5.0T7 439 0 SOURCE CODE FOR PHASE 0, WHICH CHECKS FOR PROPER SYNTAX. DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1). 0 Referenced by comments of: 765/2 00765/004 DAVE/M PHASE0 OE G ETC:DAVE.0 5.0T3 575 DAVE/M.PHASE0.OE.004 1 LINE 22894 8 PAGE UM BRILL JULY 03, 1981 19:24:36 5.0T7 440 ETC:DAVE.0 00765/005 DAVE/M PHASE1 SF G S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE1.SF.005(1) 576 5.0T3 576 DAVE/M.PHASE1.SF.005 1 LINE 73 93 PAGE UM BRILL APR. 06, 1980 13:28:11 5.0T7 441 0 SOURCE CODE FOR PHASE 1, THE PARSER. DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1). 0 Referenced by comments of: 765/2 00765/006 DAVE/M PHASE1 OE G ETC:DAVE.1 5.0T3 577 DAVE/M.PHASE1.OE.006 1 LINE 32767 22 PAGE UM BRILL JULY 03, 1981 19:24:41 5.0T7 442 ETC:DAVE.1 00765/007 DAVE/M PHASE2 SF G S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE2.SF.007(1) 578 5.0T3 578 DAVE/M.PHASE2.SF.007 1 LINE 73 100 PAGE UM BRILL APR. 06, 1980 13:28:43 5.0T7 443 0 SOURCE CODE FOR PHASE 2, THE ANALYZER. DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1). 0 Referenced by comments of: 765/2 00765/008 DAVE/M PHASE2 OE G ETC:DAVE.2 5.0T3 579 DAVE/M.PHASE2.OE.008 1 LINE 32767 32 PAGE UM BRILL JULY 03, 1981 19:24:47 5.0T7 444 ETC:DAVE.2 00765/009 DAVE/M PHASE3 SF G S1560 5.0T3 VLO FSNAME=DAVE/M.PHASE3.SF.009(1) 580 5.0T3 580 DAVE/M.PHASE3.SF.009 1 LINE 75 29 PAGE UM BRILL APR. 06, 1980 13:29:05 5.0T7 445 0 SOURCE CODE FOR PHASE 3, THE OUTPUT PHASE. DYNAMICALLY LOADED BY THE MAIN PROGRAM (765/1). 0 Referenced by comments of: 765/2 1 SUN SEP 08/96 15:24:55 Page 546 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00765/010 DAVE/M PHASE3 OE G ETC:DAVE.3 5.0T3 581 DAVE/M.PHASE3.OE.010 1 LINE 32767 16 PAGE UM BRILL JULY 03, 1981 19:24:50 5.0T7 446 ETC:DAVE.3 00765/011 DAVE/M ASM SUBRS SA G S1560 5.0T3 VLO FSNAME=DAVE/M.ASM_SUBRS.SA.011(1) 582 5.0T3 582 DAVE/M.ASM_SUBRS.SA.011 1 LINE 72 5 PAGE UM BRILL APR. 06, 1980 13:29:15 5.0T7 447 0 DAVE ASSEMBLER LANGUAGE SUBROUTINES. 0 Referenced by comments of: 765/13 00765/012 DAVE/M FTN SUBRS SF G S1560 5.0T3 VLO FSNAME=DAVE/M.FTN_SUBRS.SF.012(1) 583 5.0T3 583 DAVE/M.FTN_SUBRS.SF.012 1 LINE 73 46 PAGE UM BRILL APR. 06, 1980 13:29:17 5.0T7 448 0 DAVE FORTRAN LANGUAGE SUBROUTINES. 0 Referenced by comments of: 765/13 00765/013 DAVE/M SUBR LIB OL G ETC:DAVESUB 5.0T3 584 DAVE/M.SUBR_LIB.OL.013 1 LINE 32767 17 PAGE UM BRILL JULY 03, 1981 19:24:54 5.0T7 449 ETC:DAVESUB 0 OBJECT OF (765/11) AND (765/12). DYMANICALLY LOADED BY THE MAIN PROGRAM (765/1). 0 Referenced by comments of: 765/2 00765/014 DAVE/M DAVE.CMD C S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE.CMD.C.014(1) 585 5.0T3 585 DAVE/M.DAVE.CMD.C.014 1 LINE 64 1 PAGE UM BRILL APR. 06, 1980 13:29:26 5.0T7 450 0 COMMANDS TO CONSTRUCT A DAVE/M SYSTEM. WHEN THIS FILE IS SOURCED TO, THE FORTRAN COMPILER PRODUCES ERROR MESSAGES WHICH SHOULD BE IGNORED. DAVE.CMD.LIST (765/15) IS THE OUTPUT GENERATED BY SOURCING TO THIS FILE. 0 Referenced by comments of: 765/15 00765/015 DAVE/M DAVE.CMD.LIST L S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE.CMD.LIST.L.015(1) 586 5.0T3 586 DAVE/M.DAVE.CMD.LIST.L.015 1 LINE 96 9 PAGE UM BRILL APR. 06, 1980 13:29:28 5.0T7 451 0 OUTPUT GENERATED WHEN (765/14) IS SOURCED TO. 0 Referenced by comments of: 765/14 00765/016 DAVE/M DATA BASE SF G S1560 5.0T3 VLO FSNAME=DAVE/M.DATA_BASE.SF.016(1) 587 5.0T3 587 DAVE/M.DATA_BASE.SF.016 1 LINE 73 22 PAGE UM BRILL APR. 06, 1980 13:29:30 5.0T7 452 0 SOURCE FOR THE PROGRAM USED TO GENERATE DAVE.INIT (765/19), AN INTERNAL DATA BASE USED BY DAVE/M. 1 SUN SEP 08/96 15:24:55 Page 547 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 765/17, 765/19 00765/017 DAVE/M DATA BASE OE G S1560 5.0T3 VLO FSNAME=DAVE/M.DATA_BASE.OE.017(1) 588 5.0T3 588 DAVE/M.DATA_BASE.OE.017 1 LINE 3160 14 PAGE UM BRILL APR. 06, 1980 13:29:33 5.0T7 453 0 OBJECT OF (765/16). 0 Referenced by comments of: 765/18 00765/018 DAVE/M DATA BASE D S1560 5.0T3 VLO FSNAME=DAVE/M.DATA_BASE.D.018(1) 589 5.0T3 589 DAVE/M.DATA_BASE.D.018 1 LINE 67 4 PAGE UM BRILL APR. 06, 1980 13:29:35 5.0T7 454 0 INPUT DATA TO BE FED TO (765/17) TO CREATE (765/19). 0 Referenced by comments of: 765/19 00765/019 DAVE/M DATA BASE D ETC:DAVE.INIT 5.0T3 590 DAVE/M.DATA_BASE.D.019 1 LINE 3256 2 PAGE UM BRILL JULY 03, 1981 19:25:00 5.0T7 455 ETC:DAVE.INIT 0 THIS IS THE DATA BASE PRODUCED BY THE DAVE/M DATA BASE PROGRAM (765/16), FROM DATA IN (765/18). DAVE.INIT IS USED TO INITIALIZE DAVE/M. 0 Referenced by comments of: 765/16, 765/18 00765/020 DAVE/M TEST PROG SF G S1560 5.0T3 VLO FSNAME=DAVE/M.TEST_PROG.SF.020(1) 591 5.0T3 591 DAVE/M.TEST_PROG.SF.020 1 LINE 72 3 PAGE UM BRILL APR. 06, 1980 13:29:40 5.0T7 456 0 THIS IS A TEST PROGRAM FOR THE DAVE/M SYSTEM. 00765/021 DAVE/M DAVE.STAT D # ETC:DAVE.STAT UM BRILL ETC:DAVE.STAT 0 THIS IS THE LOG FILE WHICH IS REQUIRED BY DAVE/M. AT MICHIGAN, IT IS CALLED ETC:DAVE.STAT. THIS NAME MAY BE CHANGED BY OTHER INSTALLATIONS. 0 Referenced by comments of: 765/1 00765/022 DAVE/M MEMO 394 WF S1560 5.0T3 VLO FSNAME=DAVE/M.MEMO_394.WF.022(1) 592 5.0T3 592 DAVE/M.MEMO_394.WF.022 1 LINE 84 12 PAGE UM BRILL MAY 09, 1979 16:33:53 5.0T7 457 0 THIS IS COMPUTING CENTER MEMO 394 -- "*DAVE". 00765/023 DAVE/M KNOWN BUGS P S1560 5.0T3 VLO FSNAME=DAVE/M.KNOWN_BUGS.P.023(1) 593 5.0T3 593 DAVE/M.KNOWN_BUGS.P.023 1 LINE 67 1 PAGE UM BRILL APR. 06, 1980 13:30:17 5.0T7 458 0 DESCRIPTION OF THE TWO KNOWN BUGS IN DAVE/M. REFERENCES (765/24) AS AN EXAMPLE. 1 SUN SEP 08/96 15:24:55 Page 548 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00765/024 DAVE/M DAVE_BUG1 SF S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE_BUG1.SF.024(1) 594 5.0T3 594 DAVE/M.DAVE_BUG1.SF.024 1 LINE 26 1 PAGE UM BRILL APR. 06, 1980 13:30:20 5.0T7 459 0 A PROGRAM WHICH CAUSES DAVE/M TO FAIL. 0 Referenced by comments of: 765/23 00765/025 DAVE/M DAVE.INTERNAL P S1560 5.0T3 VLO FSNAME=DAVE/M.DAVE.INTERNAL.P.025(1) 595 5.0T3 595 DAVE/M.DAVE.INTERNAL.P.025 1 LINE 61 3 PAGE UM BRILL APR. 06, 1980 13:30:22 5.0T7 460 0 A BRIEF INSTALLATION GUIDE FOR DAVE/M. 00766/001A INTRO GUIDE: MAG TAPES WF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.SOU 5.1T2 199 INTRO_GUIDE:_MAG_TAPES..WF.001 1 LINE 148 61 PAGE UM MANUAL AUG. 31, 1982 21:32:17 0 FORMAT source for "Introduction to Magnetic Tapes," January 1982. 00766/002A INTRO GUIDE: MAG TAPES PF S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.OUT 5.1T2 200 INTRO_GUIDE:_MAG_TAPES..PF.002 1 LINE 137 86 PAGE UM MANUAL AUG. 31, 1982 21:32:33 0 FORMAT PRINT FILE. 00766/003A INTRO GUIDE: MAG TAPES D S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.IDX 5.1T2 201 INTRO_GUIDE:_MAG_TAPES..D.003 1 LINE 60 6 PAGE UM MANUAL AUG. 31, 1982 21:32:27 0 INPUT TO *INDEX (580) FOR THE INDEX TO "INTRODUCTION TO MAGNETIC TAPES." 00766/004C INTRO GUIDE: MAG TAPES P S0702 MTS.UG 'MTS USER GUIDES' FSNAME=TAPE82.FIG11 5.1T2 202 INTRO_GUIDE:_MAG_TAPES..P.004 1 LINE 130 1 PAGE UM MANUAL AUG. 31, 1982 21:32:43 0 Output file for Figure 11 of "Introduction to Magnetic Tapes." 00767/001 SIGLOG SA O S1153 UNSP VLO FSNAME=SIGLOG.S 5.0T3 599 SIGLOG..SA.001 1 LINE 72 4 PAGE UM UNSP AUG. 31, 1979 01:00:49 5.0T7 464 0 SIGLOG IS A PROGRAM INTENDED TO BE RUN FROM A SIGFILE, WHICH RECORDS INFORMATION (DATE, TIME, CCID, ETC.) IN A FILE EACH TIME IT IS RUN, OR WHICH PRINTS A SORTED COPY OF SUCH A FILE. 00767/002 SIGLOG OE O UNSP:SIGLOG 5.0T3 600 SIGLOG..OE.002 1 LINE 2819 2 PAGE UM UNSP JULY 03, 1981 19:25:15 5.0T7 465 UNSP:SIGLOG 00767/003 SIGLOG P UNSP:SIGLOG.W 5.0T3 601 SIGLOG..P.003 1 LINE 76 3 PAGE UM UNSP JULY 03, 1981 19:25:16 5.0T7 466 0 A PRINT FILE CONTAINING A DESCRIPTION OF THE SIGLOG PROGRAM. 1 SUN SEP 08/96 15:24:55 Page 549 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00768/001 SIGCHECK$ SA O S1153 UNSP VLO FSNAME=SIGCHECK$.S 5.0T3 602 SIGCHECK$..SA.001 1 LINE 72 4 PAGE UM UNSP AUG. 31, 1979 00:59:45 5.0T7 467 0 A PROGRAM DESIGNED TO BE RUN FROM A SIGFILE, WHICH PUTS A MESSAGE IN A FILE IF THE ACCOUNT BALANCE IS BELOW A SPECIFIED LEVEL. 00768/002 SIGCHECK$ OE O UNSP:SIGCHECK$ 5.0T3 603 SIGCHECK$..OE.002 1 LINE 2318 1 PAGE UM UNSP JULY 03, 1981 19:25:18 5.0T7 468 UNSP:SIGCHECK$ 00768/003 SIGCHECK$ P UNSP:SIGCHECK$.W 5.0T3 604 SIGCHECK$..P.003 1 LINE 77 3 PAGE UM UNSP JULY 03, 1981 19:25:20 5.0T7 469 0 A PRINT FILE CONTAINING A DESCRIPTION OF THE SIGCHECK$ PROGRAM. 00769/001A DISK MANAGER MAIN SA G DMGR:DM.MAIN(-10000,-1) 5.1T2 203 DISK_MANAGER.MAIN.SA.001 1 LINE 72 5 PAGE UM HELFFRICH JULY 23, 1983 13:22:01 0 This is the Disk Manager as run at UM. The Disk Manager is a central task providing disk I/O and locking services for tasks run under UMMPS (045). It is similiar in nature to the PDP, the Paging Drum Processor (044), except that the Disk Manager provides disk I/O services as opposed to paging services. This subcomponent is the main program of the MTS Disk Manager for use as an absolute task. Requires COPY:DM.MACROS (769/29), OLD:CC.MACROS (1054/4), COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), and COPY:MNTR.MACROS (1058/30). 0 Referenced by comments of: 80/1, 482/7, 812/1, 818/1 00769/002A DISK MANAGER MAIN UC G DMGR:DM.MAIN(1000) 5.1T2 204 DISK_MANAGER.MAIN.UC.002 1 LINE 68 1 PAGE UM HELFFRICH JULY 23, 1983 13:22:02 0 Update deck to be applied to previously distributed source to yield current source. 00769/003A DISK MANAGER MAIN OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00769/004A DISK MANAGER DISPATCH SA G DMGR:DM.DISPATCH(-10000,-1) 5.1T2 205 DISK_MANAGER.DISPATCH.SA.004 1 LINE 72 15 PAGE UM HELFFRICH JULY 23, 1983 13:22:02 0 This is the dispatch module of the Disk Manager, which does the following things: 1) adds and deletes disk drives 2) sends requests to LOCKMNGR (769/10) for lock and unlock processing 3) sorts requests from the supervisor and those received back from the LOCKMNGR to the appropriate DISKLING subtask (769/7) 4) requests page-in operations of supervisor (045) for DISKLINGS 1 SUN SEP 08/96 15:24:55 Page 550 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 5) posts finished requests to supervisor (045). Requires COPY:DM.MACROS (769/22), OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), COPY:MISC.MACROS (728), COPY:UC.MACROS (787/1), and COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 769/7 00769/005A DISK MANAGER DISPATCH UC G DMGR:DM.DISPATCH(1000) 5.1T2 206 DISK_MANAGER.DISPATCH.UC.005 1 LINE 91 27 PAGE UM HELFFRICH JULY 23, 1983 13:22:04 0 Update deck to be applied to previously distributed source to yield current source. 00769/006A DISK MANAGER DISPATCH OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00769/007A DISK MANAGER DISK INTERFACE SA G DMGR:DM.DISKXF(-10000,-1) 5.1T2 207 DISK_MANAGER.DISK_INTERFA.SA.007 1 LINE 72 26 PAGE UM HELFFRICH JULY 23, 1983 13:22:05 0 This is the disk interface of the Disk Manager. It contains the DISKLING, IOMNGR, LOGMNGR and DUCKMNGR subtasks. These subtasks perform the functions listed below. DISKLING: 1) schedules I/O operations to be done from requests for the disk drive. It services and gives them to IOMNGR subtask (see below) 2) asks for page-in operations of DISPATCH (769/4) 3) posts completed requests to DISPATCH IOMNGR: performs actual I/O and waits for device end for its disk drive (there is one such subtask for each disk drive) LOGMNGR: performs read buffered logs for all paths to disks once an hour DUCKMNGR: performs disk unit check error recovery Requires COPY:DM.MACROS (769/26), OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), and COPY:UC.MACROS (787/1). 0 Referenced by comments of: 769/4 00769/008A DISK MANAGER DISK INTERFACE UC G DMGR:DM.DISKXF(1000) 5.1T2 208 DISK_MANAGER.DISK_INTERFA.UC.008 1 LINE 91 6 PAGE UM HELFFRICH JULY 23, 1983 13:22:06 0 Update deck to be applied to previously distributed source to yield current source. 1 SUN SEP 08/96 15:24:55 Page 551 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00769/009A DISK MANAGER DISK INTERFACE OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00769/010A DISK MANAGER LOCKING SA G DMGR:DM.LOCK(-10000,-1) 5.1T2 209 DISK_MANAGER.LOCKING.SA.010 1 LINE 72 26 PAGE UM HELFFRICH JULY 23, 1983 13:22:07 0 These are the locking routines and the LOCKMNGR subtask, which locks and unlocks pages and volumes for requests. Requires COPY:DM.MACROS (769/21), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACORS (1058/30), COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 769/4 00769/011A DISK MANAGER LOCKING UC G DMGR:DM.LOCK(1000) 5.1T2 210 DISK_MANAGER.LOCKING.UC.011 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 13:22:10 0 Update deck to be applied to previously distributed source to yield current source. 00769/012A DISK MANAGER LOCKING OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00769/013A DISK MANAGER INTERTASK XFAC SA G DMGR:DM.ITSKXF(-10000,-1) 5.1T2 211 DISK_MANAGER.INTERTASK_XF.SA.013 1 LINE 72 23 PAGE UM HELFFRICH JULY 23, 1983 13:22:10 0 This is the Intertask (1081) Interface. It waits for messages on the intertask network for "Disk Manager Control" and processes the requests in those messages. Requires COPY:DM.MACROS (769/25), OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), COPY:FILE.MACROS (482/45), and COPY:MISC.MACROS (728). 00769/014A DISK MANAGER INTERTASK XFAC UC G DMGR:DM.ITSKXF(1000) 5.1T2 212 DISK_MANAGER.INTERTASK_XF.UC.014 1 LINE 82 5 PAGE UM HELFFRICH JULY 23, 1983 13:22:11 0 Update deck to be applied to previously distributed source to yield current source. 00769/015A DISK MANAGER INTERTASK XFAC OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00769/016A DISK MANAGER MISCELLANEOUS SA G DMGR:DM.MISC(-10000,-1) 5.1T2 213 DISK_MANAGER.MISCELLANEOU.SA.016 1 LINE 72 4 PAGE UM HELFFRICH JULY 23, 1983 13:22:12 0 This subcomponent consists of miscellaneous subtasks and routines, including the EXITMNGR which waits for task exits from the supervisor (045) and creates other static tasks. Requires COPY:FILE.MACROS (482/45), COPY:MISC.MACROS (728), COPY:MNTR.MACROS (1058/30), COPY:DM.MACROS (769/22), and OLD:CC.MACROS (1054/4). 1 SUN SEP 08/96 15:24:55 Page 552 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00769/017A DISK MANAGER MISCELLANEOUS UC G DMGR:DM.MISC(1000) 5.1T2 214 DISK_MANAGER.MISCELLANEOU.UC.017 1 LINE 91 1 PAGE UM HELFFRICH JULY 23, 1983 13:22:12 0 Update deck to be applied to previously distributed source to yield current source. 00769/018A DISK MANAGER MISCELLANEOUS OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00769/019A DISK MANAGER MONITOR RTNS SA O DMGR:DM.MNTR(-10000,-1) 5.1T2 215 DISK_MANAGER.MONITOR_RTNS.SA.019 1 LINE 72 10 PAGE UM HELFFRICH JULY 23, 1983 13:22:12 0 Disk Manager-specific code to provide the Subtasking Monitor (1058) function of allocating and deallocating disk drives. Assemble using OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), COPY:MISC.MACROS (728), COPY:FILE.MACROS (482/45), and COPY:DM.MACROS (769/24). 00769/020A DISK MANAGER MONITOR RTNS UC O DMGR:DM.MNTR(1000) 5.1T2 216 DISK_MANAGER.MONITOR_RTNS.UC.020 1 LINE 71 1 PAGE UM HELFFRICH JULY 23, 1983 13:22:13 0 Update deck to be applied to previously distributed source to yield current source. 00769/021A DISK MANAGER MONITOR RTNS OC O # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 0 Referenced by comments of: 769/10, 769/30 00769/022A DISK MANAGER DMGRSTAT JOB SA G DMGR:DM.STATJOB(-10000,-1) 5.1T2 217 DISK_MANAGER.DMGRSTAT_JOB.SA.022 1 LINE 72 29 PAGE UM HELFFRICH JULY 23, 1983 13:22:13 0 This is the job program used to communicate with the Disk Manager. It provides for status and control of the Disk Manager via Intertask (1081). It also may be run as an MTS program. The entry is DMMTSPGM and should be listed in COPY:SYSDEFS (579/3). Assemble with COPY:IT.MACROS (1081/6), OLD:CC.MACROS (1054/4), COPY:MISC.MACROS (728), COPY:FILE.MACROS (482/45), and COPY:DM.MACROS (769/22). Copies COPY:IT.DSECTS (1081/4). 0 Referenced by comments of: 769/4, 769/16, 769/22 00769/023A DISK MANAGER DMGRSTAT JOB UC G DMGR:DM.STATJOB(1000) 5.1T2 218 DISK_MANAGER.DMGRSTAT_JOB.UC.023 1 LINE 80 6 PAGE UM HELFFRICH JULY 23, 1983 13:22:15 0 Update deck to be applied to previously distributed source to yield current source. 00769/024A DISK MANAGER DMGRSTAT JOB OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 553 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 769/19 00769/025A DISK MANAGER DMGRSTAT JOB WF G DMGR:DM.STATJOB.W 5.1T2 219 DISK_MANAGER.DMGRSTAT_JOB.WF.025 1 LINE 68 5 PAGE UM HELFFRICH JULY 23, 1983 13:22:16 0 This is the writeup for the Disk Manager Stat Job. The file contains lines at the front to run *FORMAT (308) on it. 0 Referenced by comments of: 769/13 00769/026 DISK MANAGER DMGRSTAT JOB OC G DMGR:STAT 5.0T3 614 DISK_MANAGER.DMGRSTAT_JOB.OC.018 1 LINE 24 1 PAGE UM HELFFRICH JULY 03, 1981 19:25:40 5.0T7 479 DMGR:STAT 0 RIP and LCS cards required to load the MTS version of the stat program from shared memory. 0 Referenced by comments of: 769/7 00769/027A DISK MANAGER MACROS SM G DMGR:DM.MACROS(-10000,-1) 5.1T2 220 DISK_MANAGER.MACROS.SM.027 1 LINE 72 29 PAGE UM HELFFRICH JULY 23, 1983 13:22:16 0 Base source for macro library for the Disk Manager. 00769/028A DISK MANAGER MACROS UC G DMGR:DM.MACROS(1000) 5.1T2 221 DISK_MANAGER.MACROS.UC.028 1 LINE 72 6 PAGE UM HELFFRICH JULY 23, 1983 13:22:18 0 Update deck to be applied to the previously distributed source to yield current source. 00769/029A DISK MANAGER MACROS SM G COPY:DM.MACROS 5.1T2 222 DISK_MANAGER.MACROS.SM.029 1 LINE 72 32 PAGE UM HELFFRICH JULY 23, 1983 13:22:18 COPY:DM.MACROS 0 Disk Manager macro library. 0 Referenced by comments of: 10/1, 42/1, 45/1, 400/1, 482/4, 482/7, 769/1, 818/1, 829/1 00769/030 DISK MANAGER FAKE DMGR SA G DMGR:FAKEDMGR(1,999) 5.0T3 621 DISK_MANAGER.FAKE_DMGR.SA.025 1 LINE 72 3 PAGE UM HELFFRICH JULY 03, 1981 19:26:02 5.0T7 486 0 Fake version of the Disk Manager which should be run if the real Disk Manager dies in a way that is non-restartable. This job program accepts incoming disk I/O requests and posts them as imcomplete back to the issuing task. Requires COPY:DM.MACROS (769/21), COPY:FILE.MACROS (482/45) and COPY:MISC:MACROS (728). 00769/031 DISK MANAGER FAKE DMGR OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 554 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00770/001 DTYPE SA S DTYP MTS:DTYPE(2000) 5.0T3 622 DTYPE..SA.001 1 LINE 80 3 PAGE UM MTA JULY 03, 1981 19:26:03 5.0T8 1 MTS:DTYPE 0 A GLP THAT ALLOWS YOU TO CHANGE THE TYPE OF A GIVEN DEVICE (USUALLY TO OR FROM TYPE "TEST"). COPIES COPY:LLMPSEQU (087) AND COPY:GLOBALS (1026/3). REQUIRES COPY:MTS.MACROS (344/3) AND COPY:MISC.MACROS (728). 00770/002 DTYPE OC S MTS:DTYPE(1000,1999) 5.0T3 623 DTYPE..OC.002 1 LINE 80 1 PAGE UM MTA JULY 03, 1981 19:26:04 5.0T8 2 00771/001A *COMBINE SA G W226:COMBINE.ASM 5.1T2 223 COMBINE..SA.001 1 LINE 78 34 PAGE UM PICKELMAN JULY 23, 1983 13:22:20 0 PROGRAM TO COMBINE RECORDS OR PORTIONS OF RECORDS FROM SEVERAL FILES. COPIES *GDINFODSECT (594). ORIGINALLY WRITTEN BY JASON HALM AT UBC. ********************************************************************** D5.1 version: 1) Full command name is COMMANDS not COMMAND. 2) Pattern elements are translated to upper case. 3) The lowercase version of PAR field is used, but not when called as a subroutine. 4) Settings are not reset when called as a subroutine. 5) Callers attention exit is restored before return. ********************************************************************** 0 Referenced by comments of: 764/1 00771/002A *COMBINE OE G *COMBINE 5.1T2 224 COMBINE..OE.002 1 LINE 11328 8 PAGE UM PICKELMAN JULY 23, 1983 13:22:21 *COMBINE 00772/001 COUNTW SF O S1153 UNSP VLO FSNAME=COUNTW.FTN 5.0T3 627 COUNTW..SF.001 1 LINE 77 8 PAGE UM UNSP OCT. 06, 1979 04:41:28 5.0T8 6 0 A PROGRAM TO SCAN A FILE AND PRINT SOME STATISTICS AND A LIST OF ALL THE WORDS FOUND. WRITTEN BY JOHN COULTHARD AND ALAN MILLER AT UBC. USES UBC LIBRARY ( NOT DISTRIBUTED ). 00772/002 COUNTW OE O UNSP:COUNTW 5.0T3 628 COUNTW..OE.002 1 LINE 20832 8 PAGE UM UNSP JULY 03, 1981 19:31:43 5.0T8 7 UNSP:COUNTW 0 MODIFIED CSNOOP.O (695/5). LINKEDITED OBJECT OF COUNTW, ROUTINES FROM UBC LIBRARY, AND A 1 SUN SEP 08/96 15:24:55 Page 555 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00772/003 COUNTW WF S1153 UNSP VLO FSNAME=COUNTW.F 5.0T3 629 COUNTW..WF.003 1 LINE 106 8 PAGE UM UNSP OCT. 15, 1979 18:41:10 5.0T8 8 00773/001 CONCORD FORTRAN SOU SF O S1153 UNSP VLO FSNAME=CONCORD.FTN 5.0T3 630 CONCORD.FORTRAN_SOU.SF.001 1 LINE 68 4 PAGE UM UNSP OCT. 06, 1979 04:44:29 5.0T8 9 0 A PROGRAM TO PRINT CONCORDANCES OF MTS FILE. USES THE CONCORD ASSEMBLER ROUTINES (773/2), SOME OF WHICH HAVE THE SAME NAMES AS SOME CHARACTER MANIPULATION ROUTINES IN *LIBRARY (524/1), BUT DIFFERENT FUNCTIONS. ORIGINALLY WRITTEN BY JOHN COULTHARD AT UBC. MODIFIED AT UM SO THAT IT DOESN'T USE ROUTINES NOT AVAILABLE HERE. 0 Referenced by comments of: 773/3 00773/002 CONCORD ASSEMBLY SOU SA O S1153 UNSP VLO FSNAME=CONCORD.ASM 5.0T3 631 CONCORD.ASSEMBLY_SOU.SA.002 1 LINE 72 3 PAGE UM UNSP OCT. 06, 1979 04:43:32 5.0T8 10 0 Referenced by comments of: 773/1, 773/3 00773/003 CONCORD OE O UNSP:CONCORD 5.0T3 632 CONCORD..OE.003 1 LINE 3264 3 PAGE UM UNSP JULY 03, 1981 19:31:48 5.0T8 11 UNSP:CONCORD 0 LINKEDITED OBJECT OF FORTRAN AND ASSEMBLER SOURCE, (773/1) AND (773/2), AND A MODIFIED VERSION OF CSNOOP.O (695/5). USES UNSP:LIBRARY (685/2). 00773/004 CONCORD WF O S1153 UNSP VLO FSNAME=CONCORD.F 5.0T3 633 CONCORD..WF.004 1 LINE 67 3 PAGE UM UNSP OCT. 06, 1979 04:44:46 5.0T8 12 00774/001 LISTER PLUS SOURCE SQ O S1560 5.0T3 VLO FSNAME=LISTER.PLUS_SOURCE.SQ.001(1) 634 5.0T3 634 LISTER.PLUS_SOURCE.SQ.001 1 LINE 82 26 PAGE UBC HAYWARD UNSP MAY 06, 1980 14:40:01 5.0T8 13 0 This program provides facilities for multicolumn listing, titles, etc., and user-callable subroutines. For details, see the writeup (774/7). Requires (774/5) for assembly. 0 Referenced by comments of: 698/1, 774/5 00774/002 LISTER ASM SOURCE SA O S1560 5.0T3 VLO FSNAME=LISTER.ASM_SOURCE.SA.002(1) 635 5.0T3 635 LISTER.ASM_SOURCE.SA.002 1 LINE 68 9 PAGE UBC HAYWARD UNSP MAY 06, 1980 14:40:06 5.0T8 14 0 ASSEMBLER SOURCE FOR VARIOUS INTERFACING ROUTINES. 1 SUN SEP 08/96 15:24:55 Page 556 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00774/003 LISTER OE O S1560 5.0T3 VLO FSNAME=LISTER..OE.003(1) 636 5.0T3 636 LISTER..OE.003 1 LINE 32767 14 PAGE UBC HAYWARD UNSP JULY 03, 1981 19:34:06 5.0T8 15 UNSP:LISTER 0 Contains a $CONTINUE WITH UNSP:LIBRARY (685/2) record. 0 Referenced by comments of: 774/6 00774/004 LISTER GRAMMAR D O S1560 5.0T3 VLO FSNAME=LISTER.GRAMMAR.D.004(1) 637 5.0T3 637 LISTER.GRAMMAR.D.004 1 LINE 73 5 PAGE UBC HAYWARD UNSP MAY 06, 1980 14:40:07 5.0T8 16 0 GRAMMAR, INPUT TO THE *CLPARSER (1076), FOR LISTER OPTIONS SPECIFICATION. 00774/005 LISTER SOU LIB SQ O S1560 5.0T3 VLO FSNAME=LISTER.SOU_LIB.SQ.005(1) 638 5.0T3 638 LISTER.SOU_LIB.SQ.005 1 LINE 139 5 PAGE UBC HAYWARD UNSP MAY 06, 1980 14:40:09 5.0T8 17 0 PLUS SOURCE LIBRARY REQUIRED TO COMPILE (774/1). 0 Referenced by comments of: 774/1 00774/006 LISTER CMDS C O S1560 5.0T3 VLO FSNAME=LISTER.CMDS.C.006(1) 639 5.0T3 639 LISTER.CMDS.C.006 1 LINE 134 4 PAGE UBC HAYWARD UNSP MAY 06, 1980 14:40:11 5.0T8 18 0 COMMAND FILE TO PRODUCE (774/3) BY COMPILING/ASSEMBLING ITS VARIOUS PARTS. 00774/007 LISTER WF S1560 5.0T3 VLO FSNAME=LISTER..WF.007(1) 640 5.0T3 640 LISTER..WF.007 1 LINE 85 15 PAGE UBC HAYWARD UNSP JULY 17, 1980 02:03:40 5.0T8 19 0 FMT SOURCE FOR UBC WRITEUP DESCRIBING THIS VERSION OF LISTER. REQUIRES COPY:JONMACLIBFMT (308/18). THIS IS A PRELIMINARY VERSION AND HAS NOT YET BEEN RELEASED AT UBC. 0 Referenced by comments of: 774/1 00775/001A PEXIT SA G W067:PEXIT.S 5.1T2 225 PEXIT..SA.001 1 LINE 114 27 PAGE UM SHERRY JULY 23, 1983 13:22:22 0 This is a print exit routine to be used with Assembler H (737/30). It post-processes the listings produced by Assembler H to insert level numbers for the structured programming macros in *SYSMAC among other things. See the writeup in (775/3) for a description of what it does and how to use it. Uses the OBJUTIL MISC macros (721/15) and *SYSMAC. Assemble with *ASMH with PAR=PEXIT=*PEXIT, using COPY:CC.MACROS (1054/3). ******************************************************************************** D5.0A version: A couple of bugs fixed. 1 SUN SEP 08/96 15:24:55 Page 557 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ******************************************************************************** 0 Referenced by comments of: 135/1, 291/1, 314/1, 498/1, 570/1, 648/1, 686/1, 721/1, 746/1, 813/11 00775/002A PEXIT OE G *PEXIT 5.1T2 226 PEXIT..OE.002 1 LINE 10078 4 PAGE UM SHERRY JULY 23, 1983 13:22:24 *PEXIT 0 OBJECT LOADED BY *ASMH (737/30) IF PAR=PEXIT=*PEXIT IS SPECIFIED. 00775/003 PEXIT WX W067:PEXIT.WX 5.0T3 643 PEXIT..WX.003 1 LINE 77 3 PAGE UM SHERRY JULY 03, 1981 19:34:24 5.0T8 22 0 TEXTFORM WRITEUP DESCRIBING THE ASSEMBLER H PRINT EXIT PEXIT. 0 Referenced by comments of: 775/1, 775/4 00775/004 PEXIT PX W067:PEXIT.DOC 5.0T3 644 PEXIT..PX.004 1 LINE 76 4 PAGE UM SHERRY JULY 03, 1981 19:34:24 5.0T8 23 0 Print file corresponding to (775/3). 00776/001 *PFORT # (NOT DISTRIBUTED) UM BRILL 0 THE PFORT VERIFIER, DEVELOPED BY BELL LABORATORIES, CHECKS FORTRAN PROGRAMS FOR ADHERENCE TO PFORT, A PORTABLE SUBSET OF THE 1966 VERSION OF AMERICAN NATIONAL STANDARD FORTRAN. UM ACQUIRED PFORT FROM BELL LABS AND MODIFIED IT TO RUN IN MTS. PFORT IS A PROPRIETARY PROGRAM AND HENCE, MAY NOT BE DISTRIBUTED. ANY INSTALLATION DESIRING PFORT MUST REQUEST IT FROM BELL LABS AND PAY THEIR FEE. THE PFORT YOU GET WILL BE A MORE RECENT VERSION THAN THE ONE WE HAVE. IF YOU SHOULD WISH TO SEE THE CHANGES WE MADE, WE WILL SEND YOU A COPY OF THEM, BUT BE WARNED THAT THEY CANNOT BE APPLIED TO THE VERSION OF PFORT YOU'LL GET FROM BELL LABS. AT BEST, OUR CHANGES CAN GIVE YOU A ROUGH IDEA OF THE MODIFICATIONS WE MADE. WE WILL ALSO SEND YOU A COPY OF COMPUTING CENTER MEMO 406, "*PFORT," SHOULD YOU REQUEST ONE. WE DO NOT DISTRIBUTE THIS MEMO BECAUSE IT IS BASED LARGELY ON BELL LABS' COPYRIGHTED DOCUMENT. 00777/001 STARTUP/SHUTDOWN SA G S1560 5.0T3 VLO FSNAME=STARTUP/SHUTDOWN..SA.001(1) 645 5.0T3 645 STARTUP/SHUTDOWN..SA.001 1 LINE 71 3 PAGE UM MTS OGDEN OCT. 12, 1980 16:50:22 5.0T8 24 0 THE STARTUP AND SHUTDOWN JOB PROGRAMS. ASSEMBLE USING COPY:MISC.MACROS (728), COPY:SETPARM (653), COPY:MTS.MACROS (344/3). COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). 1 SUN SEP 08/96 15:24:55 Page 558 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00777/002 STARTUP/SHUTDOWN OC G # (PART OF RESIDENT SYSTEM) UM MTS OGDEN 0 Object part of Resident System (468). 00778/001 SIGNONM SA G S1560 5.0T3 VLO FSNAME=SIGNONM..SA.001(1) 646 5.0T3 646 SIGNONM..SA.001 1 LINE 71 1 PAGE UM MTS OGDEN APR. 06, 1980 13:37:14 5.0T8 25 0 THE SIGNONM (SIGNON MESSAGE) JOB PROGRAM, RECENTLY MOVED OUT OF CMDS AND INTO AN ASSEMBLY OF ITS OWN. ASSEMBLE USING COPY:MISC.MACROS. 00778/002 SIGNONM OC G # (PART OF RESIDENT SYSTEM) UM MTS OGDEN 0 Object part of Resident System (468). 00779/001C TRANSLATE TABLES RESIDENT SA G MTSS:TRTABLS.RES(1000) 5.1T2 227 TRANSLATE_TABLES.RESIDENT.SA.001 1 LINE 68 2 PAGE UM MTS BURLING JULY 23, 1983 13:22:24 0 TRANSLATE TABLES USED BY MANY PARTS OF THE SYSTEM. THIS PORTION IS IN THE RESIDENT SYSTEM. 00779/002C TRANSLATE TABLES RESIDENT OE G # (PART OF THE RESIDENT SYSTEM) 5.0T3 648 TRANSLATE_TABLES..O.002 1 LINE 2560 3 PAGE UM MTS BURLING JULY 03, 1981 19:35:00 5.0T8 27 0 OBJECT FOR THE TRANSLATE AND TRANSLATE AND TEST TABLES LOADED BY THE SEGMENT 2 LOADER. 0 Referenced by comments of: 648/1 00779/003A TRANSLATE TABLES SEG2 SA G MTSS:TRTABLS.SEG2(1000) 5.1T2 228 TRANSLATE_TABLES.SEG2.SA.003 1 LINE 69 4 PAGE UM MTS BURLING JULY 23, 1983 13:22:26 0 Translate tables used by many parts of the system. This portion is loaded by PISTLE. 00779/004A TRANSLATE TABLES SEG2 OC G SEG2:TRTABLES 5.1T2 229 TRANSLATE_TABLES.SEG2.OC.004 1 LINE 1280 1 PAGE UM MTS BURLING JULY 23, 1983 13:22:26 SEG2:TRTABLES 00780/001 MESS STUDENT VERS SF O S1073 UNSP FSNAME=MESS3SBSOR 5.0T3 649 MESS.STUDENT_VERS.SF.001 1 LINE 72 10 PAGE UM UNSP DEC. 21, 1974 14:06.40 5.0T8 28 0 THIS COMPONENT IS THE MICHIGAN EXPERIMENTAL SIMULATION SUPERVISOR, MESS, A GENERAL SUPERVISOR FOR COMPUTER-SIMULATED EXPERIMENTS. MESS WAS DEVELOPED AT THE UNIVERSITY OF MICHIGAN HIGHWAY SAFETY RESEARCH INSTITUTE BY RICHARD HALSTEAD-NUSSLOCH, ALONG WITH DANA MAIN AND ROBERT L STOUT. IT IS USED BY THE MESS EXPR-SIM EXPERIMENTS (780/13) - (780/33), A COLLECTION OF EXPERIMENTS WHICH SIMULATE VARIOUS PSYCHOLOGICAL EXPERIMENTS. IT IS VERY GENERAL AND COULD BE USED FOR OTHER TYPES OF EXPERIMENTS. 1 SUN SEP 08/96 15:24:55 Page 559 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 THIS SUBCOMPONENT CONTAINS THE SOURCE FOR THE "STUDENT" VERSION OF MESS. USES THE MESS LIBRARY (780/10). 00780/002 MESS STUDENT VERS OE O UNSP:EXPR_MESS3SB 5.0T3 650 MESS.STUDENT_VERS.OE.002 1 LINE 10454 6 PAGE UM UNSP JULY 03, 1981 19:43:03 5.0T8 29 UNSP:EXPR_MESS3SB 00780/003 MESS INSTRUCT VERS SF O S1073 UNSP FSNAME=MESS3PSOR 5.0T3 651 MESS.INSTRUCT_VERS.SF.003 1 LINE 72 16 PAGE UM UNSP MAY 31, 1975 17:51:05 5.0T8 30 0 THIS IS THE SOURCE FOR THE "INSTRUCTORS'" VERSION OF MESS. USES THE MESS LIBRARY (780/10). 0 Referenced by comments of: 780/13, 780/16, 780/19, 780/22, 780/25, 780/28, 780/31 00780/004 MESS INSTRUCT VERS OE O UNSP:EXPR_MESS3P 5.0T3 652 MESS.INSTRUCT_VERS.OE.004 1 LINE 18282 9 PAGE UM UNSP JULY 03, 1981 19:43:07 5.0T8 31 UNSP:EXPR_MESS3P 00780/005 MESS CARD VERSION SF O S1073 UNSP FSNAME=MESS3SCSOR 5.0T3 653 MESS.CARD_VERSION.SF.005 1 LINE 72 10 PAGE UM UNSP DEC. 21, 1974 13:58.50 5.0T8 32 0 THIS IS THE SOURCE FOR THE "CARD" VERSION OF MESS. IT USES ONLY FORMATTED READS OF RECORDS UP TO 80 CHARACTER IN LENGTH. NOT NEEDED ON MTS. 00780/006 MESS CARD VERSION OC O S1153 UNSP VLO FSNAME=MESS3SCOBJ 5.0T3 654 MESS.CARD_VERSION.OC.006 1 LINE 14220 7 PAGE UM UNSP FEB. 20, 1980 05:40:11 5.0T8 33 00780/007 MESS FORMAT RTNS SF O S1073 UNSP FSNAME=FPOUTSOR 5.0T3 655 MESS.FORMAT_RTNS.SF.007 1 LINE 72 5 PAGE UM UNSP MAY 31, 1975 17:52:58 5.0T8 34 0 GENERAL FORMATTING ROUTINES USED BY MESS. 0 Referenced by comments of: 780/10 00780/008 MESS NUM & STAT RTN SF O S1073 UNSP FSNAME=LIBSOR 5.0T3 656 MESS.NUM_&_STAT_RTN.SF.008 1 LINE 74 8 PAGE UM UNSP MAY 31, 1975 17:50:48 5.0T8 35 0 NUMERICAL AND STATISTICAL ROUTINES USED BY MESS. 0 Referenced by comments of: 780/10 00780/009 MESS AUX RTNS SF O S1073 UNSP FSNAME=AUXSOR 5.0T3 657 MESS.AUX_RTNS.SF.009 1 LINE 75 13 PAGE UM UNSP MAY 31, 1975 17:46:53 5.0T8 36 0 MISCELLANEOUS AUXILIARY ROUTINES USED BY MESS. 1 SUN SEP 08/96 15:24:55 Page 560 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 780/10 00780/010 MESS LIBRARY OL O UNSP:EXPR_MESSLIB 5.0T3 658 MESS.LIBRARY.OL.010 1 LINE 5912 13 PAGE UM UNSP JULY 03, 1981 19:43:17 5.0T8 37 UNSP:EXPR_MESSLIB 0 THE MESS LIBRARY. CONTAINS THE OBJECT OF (780/7), (780/8), AND (780/9). 0 Referenced by comments of: 780/1, 780/3 00780/011 MESS INSTALL P S1153 UNSP VLO FSNAME=EXPR.COMMENTS 5.0T3 659 MESS.INSTALL.P.011 1 LINE 67 1 PAGE UM UNSP DEC. 13, 1979 02:26:07 5.0T8 38 0 A BRIEF INTRODUCTION TO MESS AND THE EXPR-SIM EXPERIMENTS (780/13) - (780/33), INTENDED FOR INSTALLATIONS RECEIVING THIS DISTRIBUTION. THE FOLLOWING DOCUMENTATION IS AVAILABLE FOR MESS AND EXPER-SIM: PROGRAMMER'S GUIDE TO MESS VERSION 3-P, 3-SB, AND 3-SC, BY ROBERT L. STOUT EXPR-SIM ON MICHIGAN EXPERIMENTAL SIMULATION SUPERVISOR (MESS), REVISED EDITION, BY DANA B. MAIN AND RICHARD HALSTEAD-NUSSLOCH IF YOU ARE INTERESTED IN RECEIVING XEROX COPIES OF THESE DOCUMENTS, SEND YOUR REQUEST TO: ELIZABETH SWEET COMPUTING CENTER UNIVERSITY OF MICHIGAN 1075 BEAL AVE. ANN ARBOR, MI 48109 00780/012 MESS WRITEUP P UNSP:EXPR.W 5.0T3 660 MESS.WRITEUP.P.012 1 LINE 70 1 PAGE UM UNSP JULY 03, 1981 19:43:25 5.0T8 39 0 CONTAINS A DIRECTORY TO THE MESS AND EXPR-SIM (780/13) - (780/33) FILES AT UM. 00780/013 MESS EXPR-SIM DEMO O O UNSP:EXPR.DEMO 5.0T3 661 MESS.EXPR-SIM_DEMO.O.013 1 LINE 15804 21 PAGE UM UNSP JULY 03, 1981 19:43:26 5.0T8 40 UNSP:EXPR.DEMO 0 A DEMONSTRATION GENERATED USING (780/14) AND (780/15). THIS FILE CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/15) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/14). 1 SUN SEP 08/96 15:24:55 Page 561 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 780/1, 780/11, 780/12, 780/15 00780/014 MESS EXPR-SIM DEMO SF O S1073 UNSP FSNAME=DEMO2SOR 5.0T3 662 MESS.EXPR-SIM_DEMO.SF.014 1 LINE 72 4 PAGE UM UNSP DEC. 21, 1974 14:26.35 5.0T8 41 0 THIS IS THE MODEL PROGRAM FOR A DEMONSTRATION EXPERIMENT. 0 Referenced by comments of: 780/13 00780/015 MESS EXPR-SIM DEMO D S1073 UNSP FSNAME=DEMO2DAT1 5.0T3 663 MESS.EXPR-SIM_DEMO.D.015 1 LINE 64 1 PAGE UM UNSP DEC. 21, 1974 14:27.08 5.0T8 42 0 THIS IS THE DATA FOR (780/13). 0 Referenced by comments of: 780/13 00780/016 MESS EXPR-SIM DOPE O O UNSP:EXPR.DOPE 5.0T3 664 MESS.EXPR-SIM_DOPE.O.016 1 LINE 15800 20 PAGE UM UNSP JULY 03, 1981 19:43:33 5.0T8 43 UNSP:EXPR.DOPE 0 THIS IS AN EXPERIMENT ENTITLED "DRUG OBSERVATIONS: PROGRAM FOR EXPERIMENTS." IT WAS GENERATED USING (780/17) AND (780/18). THIS FILE CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/18) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/17). 00780/017 MESS EXPR-SIM DOPE SF O S1073 UNSP FSNAME=DOPESOR 5.0T3 665 MESS.EXPR-SIM_DOPE.SF.017 1 LINE 79 5 PAGE UM UNSP MAY 31, 1975 17:47:55 5.0T8 44 0 Referenced by comments of: 780/16 00780/018 MESS EXPR-SIM DOPE D S1073 UNSP FSNAME=DOPEDAT1 5.0T3 666 MESS.EXPR-SIM_DOPE.D.018 1 LINE 54 1 PAGE UM UNSP DEC. 21, 1974 14:23.37 5.0T8 45 0 Referenced by comments of: 780/16 00780/019 MESS EXPR IMPRINT O O UNSP:EXPR.IMPRINT 5.0T3 667 MESS.EXPR_IMPRINT.O.019 1 LINE 15800 18 PAGE UM UNSP JULY 03, 1981 19:43:40 5.0T8 46 UNSP:EXPR.IMPRINT 0 AN EXPERIMENT ON IMPRINTING GENERATED USING (780/20) AND (780/21). THIS FILE CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/21) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/20). 1 SUN SEP 08/96 15:24:55 Page 562 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00780/020 MESS EXPR IMPRINT SF O S1073 UNSP FSNAME=IMPSOR 5.0T3 668 MESS.EXPR_IMPRINT.SF.020 1 LINE 72 3 PAGE UM UNSP DEC. 21, 1974 14:06.06 5.0T8 47 0 Referenced by comments of: 780/19 00780/021 MESS EXPR IMPRINT D S1073 UNSP FSNAME=IMPDAT1 5.0T3 669 MESS.EXPR_IMPRINT.D.021 1 LINE 63 1 PAGE UM UNSP DEC. 21, 1974 14:22.37 5.0T8 48 0 Referenced by comments of: 780/19 00780/022 MESS EXPR MOTIV O O UNSP:EXPR.MOTIVE 5.0T3 670 MESS.EXPR_MOTIV.O.022 1 LINE 15800 19 PAGE UM UNSP JULY 03, 1981 19:43:49 5.0T8 49 UNSP:EXPR.MOTIVE 0 AN EXPERIMENT ON MOTIVATION IN ROUTINE TASKS, GENERATED USING (780/23) AND (780/24). CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/24) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/23). 00780/023 MESS EXPR MOTIV SF O S1073 UNSP FSNAME=MOTSOR 5.0T3 671 MESS.EXPR_MOTIV.SF.023 1 LINE 71 3 PAGE UM UNSP DEC. 21, 1974 14:09.42 5.0T8 50 0 Referenced by comments of: 780/22 00780/024 MESS EXPR MOTIV D S1073 UNSP FSNAME=MOTDAT1 5.0T3 672 MESS.EXPR_MOTIV.D.024 1 LINE 71 1 PAGE UM UNSP DEC. 21, 1974 14:08.33 5.0T8 51 0 Referenced by comments of: 780/22 00780/025 MESS EXPR-SIM RATS O O UNSP:EXPR.RATS 5.0T3 673 MESS.EXPR-SIM_RATS.O.025 1 LINE 15804 21 PAGE UM UNSP JULY 03, 1981 19:43:56 5.0T8 52 UNSP:EXPR.RATS 0 AN EXPERIMENT ENTITLED "RATS: SELF-STIMULATION SIMULATION", GENERATED BY (780/26) AND (780/27). THIS FILE CONTAINS A VARIETY OF THINGS, INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/27) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/26). 00780/026 MESS EXPR-SIM RATS SF O S1073 UNSP FSNAME=RATSSOR 5.0T3 674 MESS.EXPR-SIM_RATS.SF.026 1 LINE 75 5 PAGE UM UNSP MAY 31, 1975 17:48:33 5.0T8 53 0 Referenced by comments of: 780/25 1 SUN SEP 08/96 15:24:55 Page 563 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00780/027 MESS EXPR-SIM RATS D S1073 UNSP FSNAME=RATSDAT1 5.0T3 675 MESS.EXPR-SIM_RATS.D.027 1 LINE 52 1 PAGE UM UNSP DEC. 21, 1974 14:16.50 5.0T8 54 0 Referenced by comments of: 780/25 00780/028 MESS EXPR-SIM SCHIZ O O UNSP:EXPR.SCHIZ 5.0T3 676 MESS.EXPR-SIM_SCHIZ.O.028 1 LINE 15800 16 PAGE UM UNSP JULY 03, 1981 19:44:02 5.0T8 55 UNSP:EXPR.SCHIZ 0 AN EXPERIMENT ENTITLED "THE ETIOLOGY OF SCHIZOPHRENIA", GENERATED USING (780/29) AND (780/30). THIS FILE CONTAINS A VARIETY OF THINGS, INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/30) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/29). 00780/029 MESS EXPR-SIM SCHIZ SF O S1073 UNSP FSNAME=SCHIZSOR 5.0T3 677 MESS.EXPR-SIM_SCHIZ.SF.029 1 LINE 72 1 PAGE UM UNSP DEC. 21, 1974 14:10.48 5.0T8 56 0 Referenced by comments of: 780/28 00780/030 MESS EXPR-SIM SCHIZ D S1073 UNSP FSNAME=SCHIZDAT1 5.0T3 678 MESS.EXPR-SIM_SCHIZ.D.030 1 LINE 67 1 PAGE UM UNSP DEC. 21, 1974 14:10.18 5.0T8 57 0 Referenced by comments of: 780/28 00780/031 MESS EXPR SOC FAC O O UNSP:EXPR.SOCFAC 5.0T3 679 MESS.EXPR_SOC_FAC.O.031 1 LINE 15800 19 PAGE UM UNSP JULY 03, 1981 19:44:09 5.0T8 58 UNSP:EXPR.SOCFAC 0 AN EXPERIMENT IN SOCIAL FACILITATION, GENERATED USING (780/32) AND (780/33). CONTAINS A VARIETY OF THINGS INCLUDING MTS COMMANDS SO THAT IT MAY BE $SOURCED TO, THE SIMULATION DATA, THE RESULT OF RUNNING THE DATA FILE (780/33) THROUGH THE INSTRUCTOR'S VERSION OF MESS (780/3), AND THE OBJECT OF THE FORTRAN MODEL PROGRAM (780/32). 00780/032 MESS EXPR SOC FAC SF O S1073 UNSP FSNAME=SFACSOR 5.0T3 680 MESS.EXPR_SOC_FAC.SF.032 1 LINE 69 4 PAGE UM UNSP SEP. 07, 1973 14:40.51 5.0T8 59 0 Referenced by comments of: 780/31 00780/033 MESS EXPR SOC FAC D S1073 UNSP FSNAME=SFACDAT1 5.0T3 681 MESS.EXPR_SOC_FAC.D.033 1 LINE 76 1 PAGE UM UNSP SEP. 07, 1973 14:42.30 5.0T8 60 0 Referenced by comments of: 780/1, 780/11, 780/12, 780/31 00781/001A PASCAL VALIDATION SUITE TAPE DESC P # S0759 PVSFS VLO FSNAME=SUITE.CHARSET UM PICKELMAN 0 THE PASCAL VALIDATION SUITE IS A SET OF OVER 300 PASCAL PROGRAMS DESIGNED TO 1 SUN SEP 08/96 15:24:55 Page 564 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 TEST A COMPILER'S COMPLIANCE WITH THE DRAFT PASCAL STANDARD (SEE THE PASCAL NEWS, NO. 16, OCT. 1979). THE SUITE ITSELF CANNOT BE DISTRIBUTED, BUT MAY BE OBTAINED FROM THE FOLLOWING DISTRIBUTORS: NORTH AMERICA: EUROPE: RICHARD J. CICHELLI DR. B. WICHMANN ANPA RESEARCH INSTITUTE NATIONAL PHYSICS LABORATORY BOX 598 TEDDINGTON, TW11 0LW EASTON, PA 18042 MIDDLESEX U.S.A. ENGLAND THIS SUBCOMPONENT CONTAINS A DESCRIPTION OF THE PASCAL VALIDATION SUITE DISTRIBUTION TAPE. ******************************************************************** D5.0B version: This is version 3.0 of the Pascal Validation Suite. ******************************************************************** 0 Referenced by comments of: 792/1 00781/002A PASCAL VALIDATION SUITE SKELETON SW G # S0759 PVSFS VLO FSNAME=SUITE.SKELETON UM PICKELMAN 0 A PROGRAM TO LIST, SELECT, OR ADD COMMANDS TO RUN THE TEST PROGRAMS. 00781/003A PASCAL VALIDATION SUITE DOCUMENTATION P # S0759 PVSFS VLO FSNAME=SUITE.DOCUMENTATION UM PICKELMAN 0 A DESCRIPTION OF THE PASCAL VALIDATION SUITE. 0 Referenced by comments of: 781/5 00781/004A PASCAL VALIDATION SUITE STANDARD P # S0759 PVSFS VLO FSNAME=SUITE.STANDARD UM PICKELMAN 0 THE VERSION OF THE DRAFT PASCAL STANDARD TO WHICH THE PASCAL VALIDATION SUITE CORRESPONDS. 00781/005C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.QUALITY UM PICKELMAN 0 Component (781/5) throught (781/11) are the Pascal Validation Suite test programs. Each subcomponent has one class of tests, as explained in the documentation (781/3). 0 Referenced by comments of: 781/5 1 SUN SEP 08/96 15:24:55 Page 565 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00781/006C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.LEVEL 1 UM PICKELMAN 00781/007C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.IMPDEF UM PICKELMAN 00781/008C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.EXTEN UM PICKELMAN 00781/009C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.ERROR UM PICKELMAN 00781/010C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.DEVIANCE UM PICKELMAN 00781/011C PASCAL VALIDATION SUITE SUITE SW G # S0759 PVSFS VLO FSNAME=SUITE.CONFORM UM PICKELMAN 0 Referenced by comments of: 781/5 00782/001 PASCAL/SB OS/COMMENTS P O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/COMMENTS.P.001(1) 685 5.0T3 685 PASCAL/SB.OS/COMMENTS.P.001 1 LINE 91 16 PAGE UM UNSP OCT. 20, 1979 19:26:23 5.0T8 64 0 THIS IS THE STONY BROOK PASCAL COMPILER, RELEASE 3.1. COMPONENTS INCLUDE MODULES OF THE OS VERSION AS RECEIVED FROM STONY BROOK (782/1) - (782/35) AND THOSE MODIFIED FOR THE MTS VERSION (782/36) - (782/64). (782/1) IS THE DESCRIPTION, FROM STONY BROOK, OF THE OS VERSION. OTHER COMPONENTS WHICH MAY BE HELPFUL IN INSTALLING PASCAL/SB ARE (782/36) AND (782/37). TO INSTALL THE SYSTEM AS RUN AT MICHIGAN, RESTORE COMPONENTS (782/52), (782/55), AND (782/58); ALONG WITH (782/38) AND (782/39) WHICH ARE WRITEUPS; AND (792/3), (792/4), AND (792/5) WHICH ARE TEST PROGRAMS. THE STONY BROOK PASCAL COMPILER IS COPYRIGHTED, HOWEVER THERE ARE NO RESTRICTIONS UPON ITS USE. IF THE COMPILER IS REDISTRIBUTED THERE CAN BE NO FEE FOR ANY OF THE SOFTWARE OR DOCUMENTATION FURNISHED BY STONY BROOK. 0 Referenced by comments of: 782/1, 792/1 00782/002 PASCAL/SB OS/OMONITOR SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OMONITOR.SA.002(1) 686 5.0T3 686 PASCAL/SB.OS/OMONITOR.SA.002 1 LINE 80 41 PAGE UM UNSP OCT. 20, 1979 19:26:26 5.0T8 65 0 THIS IS THE PASCAL/SB OVERLAY MONITOR, A MUTATION OF XPLSM WHICH SUPPORTS THE MULTIPASS ARCHITECTURE OF THE STONY BROOK PASCAL 360 COMPILER. 0 Referenced by comments of: 782/3, 782/4, 782/12, 782/15, 782/17, 782/19, 782/21 1 SUN SEP 08/96 15:24:55 Page 566 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/003 PASCAL/SB OS/OMONITOR SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OMONITOR.SA.003(1) 687 5.0T3 687 PASCAL/SB.OS/OMONITOR.SA.003 1 LINE 80 37 PAGE UM UNSP OCT. 20, 1979 19:28:22 5.0T8 66 0 A VERSION OF THE OVERLAY MONITOR (782/2) THAT USES COREFILES AND A "STEP LIB". 00782/004 PASCAL/SB OS/OMONITOR SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OMONITOR.SA.004(1) 688 5.0T3 688 PASCAL/SB.OS/OMONITOR.SA.004 1 LINE 80 39 PAGE UM UNSP OCT. 20, 1979 19:26:39 5.0T8 67 0 THIS FILE CONTAINS A SMALL VERSION OF (782/2). IT IS LOADED IN CONJUNCTION WITH OBJECT MODULES PRODUCED BY THE PASCAL LINKER (782/20) AND PROVIDES THE RUNTIME ENVIRONMENT NEEDED BY THE DIAGNOSTICS PACKAGE, PMD. 0 Referenced by comments of: 782/7 00782/005 PASCAL/SB OS/CORE FILE SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/CORE_FILE.SA.005(1) 689 5.0T3 689 PASCAL/SB.OS/CORE_FILE.SA.005 1 LINE 72 5 PAGE UM UNSP OCT. 20, 1979 19:26:31 5.0T8 68 0 THIS FILE CONTAINS THE ASSEMBLER SOURCE ROUTINE THAT SIMULATES OS/360 QSAM FILES BY USING LINKED, IN-CORE STORAGE BLOCKS. 00782/006 PASCAL/SB OS/RMONITOR SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/RMONITOR.SA.006(1) 690 5.0T3 690 PASCAL/SB.OS/RMONITOR.SA.006 1 LINE 80 41 PAGE UM UNSP OCT. 20, 1979 19:26:33 5.0T8 69 0 THIS FILE CONTAINS THE SOURCE CODE FOR THE PASCAL RUN MONITOR, WHICH LOADS PASCAL PROGRAMS AND PROVIDES THE RUN-TIME ENVIRONMENT NEEDED FOR THEIR EXECUTION. 0 Referenced by comments of: 782/7, 782/8 00782/007 PASCAL/SB OS/RMONITOR SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/RMONITOR.SA.007(1) 691 5.0T3 691 PASCAL/SB.OS/RMONITOR.SA.007 1 LINE 80 36 PAGE UM UNSP OCT. 20, 1979 19:28:29 5.0T8 70 0 THE RELEASE 2 VERSION OF THE RUN MONITOR (782/6). THIS IS USED BY THE (782/4) VERSION OF THE OVERLAY MONITOR. IT SHOULD BE POSSIBLE TO GET AN EQUIVALENT VERSION BY SETTING &INCORE TO 1 AND &ISEXT TO 0, BUT THIS HASN'T BEEN CHECKED. 00782/008 PASCAL/SB OS/RMONITOR U O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/RMONITOR.U.008(1) 692 5.0T3 692 PASCAL/SB.OS/RMONITOR.U.008 1 LINE 63 1 PAGE UM UNSP JAN. 22, 1980 14:49:27 5.0T8 71 0 AN EDIT XPL (782/32) UPDATE TO THE RUN MONITOR (782/6). 00782/009 PASCAL/SB OS/OBJECT OL O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/OBJECT.OL.009(1) 693 5.0T3 693 PASCAL/SB.OS/OBJECT.OL.009 1 LINE 80 17 PAGE UM UNSP OCT. 20, 1979 19:26:43 5.0T8 72 0 THIS FILE CONTAINS LOAD MODULES TO PROVIDE THE EXECUTION ENVIRONMENTS FOR THE STONY BROOK PASCAL COMPILER AND FOR COMPILED PASCAL PROGRAMS. 1 SUN SEP 08/96 15:24:55 Page 567 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/010 PASCAL/SB OS/PASS1 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1.SX.010(1) 694 5.0T3 694 PASCAL/SB.OS/PASS1.SX.010 1 LINE 80 68 PAGE UM UNSP OCT. 20, 1979 19:26:46 5.0T8 73 0 THIS FILE CONTAINS THE SOURCE CODE FOR PASS 1 OF THE STONY BROOK PASCAL 360 COMPILER. PASS 1 IS RESPONSIBLE FOR LEXICAL AND SYNTACTIC ANALYSIS OF PASCAL PROGRAMS AND PRODUCES ABSTRACT SYTAX TREES AS OUTPUT. 0 Referenced by comments of: 782/11, 782/12, 782/22, 782/23, 782/40 00782/011 PASCAL/SB OS/PASS1 U O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1.U.011(1) 695 5.0T3 695 PASCAL/SB.OS/PASS1.U.011 1 LINE 80 1 PAGE UM UNSP OCT. 20, 1979 19:28:34 5.0T8 74 0 AN EDITXPL (782/32) UPDATE TO PASS 1 (782/10). 00782/012 PASCAL/SB OS/PASS1 O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1.O.012(1) 696 5.0T3 696 PASCAL/SB.OS/PASS1.O.012 1 LINE 7200 32 PAGE UM UNSP OCT. 20, 1979 19:26:52 5.0T8 75 0 THIS IS THE OBJECT OF (782/10) WHICH CAN BE USED BY (782/2) AND OTHER VERSIONS OF THE XPL SUBMONITOR. 00782/013 PASCAL/SB OS/PASS2 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2.SX.013(1) 697 5.0T3 697 PASCAL/SB.OS/PASS2.SX.013 1 LINE 80 97 PAGE UM UNSP OCT. 20, 1979 19:26:55 5.0T8 76 0 THIS FILE CONTAINS THE SOURCE CODE FOR PASS 2 OF THE STONY BROOK PASCAL 360 COMPILER. PASS 2 IS RESPONSIBLE FOR TYPE CHECKING, AND GENERATING SYMBOLIC TRIPLES SUITABLE FOR INTERPRTATION OR FURTHER PROCESSING BY A CODE GENERATOR. 0 Referenced by comments of: 782/14, 782/15, 782/24, 782/25, 782/41 00782/014 PASCAL/SB OS/PASS2 U O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2.U.014(1) 698 5.0T3 698 PASCAL/SB.OS/PASS2.U.014 1 LINE 80 4 PAGE UM UNSP OCT. 20, 1979 19:28:27 5.0T8 77 0 AN EDITXPL (782/32) UPDATE TO PASS 2 (782/13). 00782/015 PASCAL/SB OS/PASS2 O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2.O.015(1) 699 5.0T3 699 PASCAL/SB.OS/PASS2.O.015 1 LINE 7200 40 PAGE UM UNSP OCT. 20, 1979 19:27:07 5.0T8 78 0 THIS IS THE OBJECT OF (782/13), WHICH CAN BE USED BY (782/2) AND OTHER VERSIONS OF THE XPL SUBMONITOR. 00782/016 PASCAL/SB OS/PASS3 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS3.SX.016(1) 700 5.0T3 700 PASCAL/SB.OS/PASS3.SX.016 1 LINE 80 55 PAGE UM UNSP OCT. 20, 1979 19:27:12 5.0T8 79 0 THIS FILE CONTAINS THE SOURCE CODE FOR PASS 3 OF THE STONY BROOK PASCAL 360 COMPILER. IT TAKES AS INPUT THE SYMBOLIC TRIPLES GENERATED BY PASS 2 AND GENERATES MACHINE CODE FOR IBM 360/370 COMPUTERS. 1 SUN SEP 08/96 15:24:55 Page 568 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 782/17, 782/42 00782/017 PASCAL/SB OS/PASS3 O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS3.O.017(1) 701 5.0T3 701 PASCAL/SB.OS/PASS3.O.017 1 LINE 7200 32 PAGE UM UNSP OCT. 20, 1979 19:27:18 5.0T8 80 0 THIS IS THE OBJECT OF (782/16), WHICH CAN BE USED BY (782/2) AND OTHER VERSIONS OF THE XPL SUBMONITOR. 00782/018 PASCAL/SB OS/PMD SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PMD.SX.018(1) 702 5.0T3 702 PASCAL/SB.OS/PMD.SX.018 1 LINE 80 15 PAGE UM UNSP OCT. 20, 1979 19:27:22 5.0T8 81 0 THIS FILE CONTAINS THE SOURCE CODE FOR THE POST-MORTEM ANALYSIS ROUTINES, PMD. 0 Referenced by comments of: 782/19, 782/43 00782/019 PASCAL/SB OS/PMD O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PMD.O.019(1) 703 5.0T3 703 PASCAL/SB.OS/PMD.O.019 1 LINE 7200 12 PAGE UM UNSP OCT. 20, 1979 19:27:25 5.0T8 82 0 THIS IS THE OBJECT OF (782/18), WHICH CAN BE USED BY (782/2) AND OTHER VERSIONS OF THE XPL SUBMONITOR. 00782/020 PASCAL/SB OS/LINKER SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/LINKER.SX.020(1) 704 5.0T3 704 PASCAL/SB.OS/LINKER.SX.020 1 LINE 80 20 PAGE UM UNSP OCT. 20, 1979 19:27:28 5.0T8 83 0 THIS FILE CONTAINS THE SOURCE CODE FOR THE STONY BROOK PASCAL LINKER. 0 Referenced by comments of: 782/4, 782/21, 782/44 00782/021 PASCAL/SB OS/LINKER O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/LINKER.O.021(1) 705 5.0T3 705 PASCAL/SB.OS/LINKER.O.021 1 LINE 7200 21 PAGE UM UNSP OCT. 20, 1979 19:27:34 5.0T8 84 0 THIS IS THE OBJECT OF (782/20), WHICH CAN BE USED BY (782/2) AND OTHER VERSIONS OF THE XPL SUBMONITOR. 00782/022 PASCAL/SB OS/PASS1S U O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1S.U.022(1) 706 5.0T3 706 PASCAL/SB.OS/PASS1S.U.022 1 LINE 80 3 PAGE UM UNSP OCT. 20, 1979 19:27:37 5.0T8 85 0 THIS FILE CONTAINS AN UPDATE TO (782/10) TO PRODUCE PASS1S, THE "STUDENT" VERSION OF THE COMPILER, IMPLEMENTING ONLY STANDARD PASCAL. THE UPDATE SHOULD BE APPLIED USING OS/EDITXPL (782/32). 0 Referenced by comments of: 782/23 1 SUN SEP 08/96 15:24:55 Page 569 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/023 PASCAL/SB OS/PASS1S O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS1S.O.023(1) 707 5.0T3 707 PASCAL/SB.OS/PASS1S.O.023 1 LINE 7200 30 PAGE UM UNSP OCT. 20, 1979 19:27:39 5.0T8 86 0 THIS FILE CONTAINS THE XPL OBJECT OF PASS1 (782/10), AS UPDATED BY (782/22). 00782/024 PASCAL/SB OS/PASS2S U O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2S.U.024(1) 708 5.0T3 708 PASCAL/SB.OS/PASS2S.U.024 1 LINE 80 3 PAGE UM UNSP OCT. 20, 1979 19:27:43 5.0T8 87 0 THIS FILE CONTAINS AN UPDATE TO (782/13) TO PRODUCE PASS2S, IMPLEMENTING ONLY STANDARD PASCAL. THIS UPDATE SHOULD BE APPLIED USING OS/EDITXPL (782/32). 0 Referenced by comments of: 782/25 00782/025 PASCAL/SB OS/PASS2S O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PASS2S.O.025(1) 709 5.0T3 709 PASCAL/SB.OS/PASS2S.O.025 1 LINE 7200 35 PAGE UM UNSP OCT. 20, 1979 19:27:45 5.0T8 88 0 THIS FILE CONTAINS THE XPL OBJECT OF PASS2 (782/13), AS UPDATED BY (782/24). 00782/026 PASCAL/SB OS/BNCHMARK SW O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/BNCHMARK.SW.026(1) 710 5.0T3 710 PASCAL/SB.OS/BNCHMARK.SW.026 1 LINE 80 12 PAGE UM UNSP OCT. 20, 1979 19:27:49 5.0T8 89 0 A SET OF TEST PROGRAMS AND JCL TO TEST PASCAL/SB. 00782/027 PASCAL/SB OS/XPLSM SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XPLSM.SA.027(1) 711 5.0T3 711 PASCAL/SB.OS/XPLSM.SA.027 1 LINE 80 38 PAGE UM UNSP OCT. 20, 1979 19:27:52 5.0T8 90 0 THIS FILE CONTAINS AN ASSEMBLY LANGUAGE VERSION OF THE XPL SUBMONITOR, XPLSM FOR USE WITH (782/29). 00782/028 PASCAL/SB OS/XCOM4 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XCOM4.SX.028(1) 712 5.0T3 712 PASCAL/SB.OS/XCOM4.SX.028 1 LINE 80 51 PAGE UM UNSP OCT. 20, 1979 19:28:01 5.0T8 91 0 THIS FILE CONTAINS THE SOURCE FOR XCOM4, SEE (782/29). 0 Referenced by comments of: 782/29 00782/029 PASCAL/SB OS/XCOM4 O O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XCOM4.O.029(1) 713 5.0T3 713 PASCAL/SB.OS/XCOM4.O.029 1 LINE 7200 30 PAGE UM UNSP OCT. 20, 1979 19:27:58 5.0T8 92 0 THIS IS THE OBJECT OF XPL (782/28) THAT HAS BEEN USED TO COMPILE THE STONY BROOK PASCAL COMPILER. 0 Referenced by comments of: 782/27, 782/28 1 SUN SEP 08/96 15:24:55 Page 570 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/030 PASCAL/SB OS/XPLIB SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XPLIB.SX.030(1) 714 5.0T3 714 PASCAL/SB.OS/XPLIB.SX.030 1 LINE 80 1 PAGE UM UNSP OCT. 20, 1979 19:28:07 5.0T8 93 0 THIS FILE CONTAINS THE SOURCE FOR COMPACTIFY, THE XPL PROCEDURE WHICH IS AUTOMATICALLY CONCATENATED ON TO THE FRONT OF EVERY XPL PROGRAM. 00782/031 PASCAL/SB OS/XPLXREF SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/XPLXREF.SX.031(1) 715 5.0T3 715 PASCAL/SB.OS/XPLXREF.SX.031 1 LINE 80 9 PAGE UM UNSP OCT. 20, 1979 19:28:09 5.0T8 94 0 THIS FILE CONTAINS THE XPL SOURCE FOR A CROSS-REFERENCE LISTINGS PROGRAM FOR XPL SOURCE. 00782/032 PASCAL/SB OS/EDITXPL SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/EDITXPL.SX.032(1) 716 5.0T3 716 PASCAL/SB.OS/EDITXPL.SX.032 1 LINE 80 3 PAGE UM UNSP OCT. 20, 1979 19:28:13 5.0T8 95 0 THIS FILE CONTAINS THE XPL SOURCE FOR A CARD-IMAGE EDITOR, TO BE USED TO EDIT UPDATE PATCHES INTO THE PASCAL COMPILER SOURCE FILES. 0 Referenced by comments of: 782/8, 782/11, 782/14, 782/22, 782/24, 782/59 00782/033 PASCAL/SB OS/EDITXPL OC O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/EDITXPL.OC.033(1) 717 5.0T3 717 PASCAL/SB.OS/EDITXPL.OC.033 1 LINE 7200 5 PAGE UM UNSP OCT. 20, 1979 19:28:15 5.0T8 96 00782/034 PASCAL/SB OS/REFORMAT SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/REFORMAT.SA.034(1) 718 5.0T3 718 PASCAL/SB.OS/REFORMAT.SA.034 1 LINE 80 10 PAGE UM UNSP OCT. 20, 1979 19:28:17 5.0T8 97 0 THIS FILE CONTAINS THE SOURCE OF A UTILITY PROGRAM THAT CAN BE USED TO REFORMAT XPL OBJECT MODULES ONTO A DISK. 00782/035 PASCAL/SB OS/PREFIX SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.OS/PREFIX.SX.035(1) 719 5.0T3 719 PASCAL/SB.OS/PREFIX.SX.035 1 LINE 80 11 PAGE UM UNSP OCT. 20, 1979 19:28:20 5.0T8 98 0 THIS FILE CONTAINS A COMMON PREFIX EDITOR, A UTILITY PROGRAM DESIGNED TO BE USED IN CONJUNCTION WITH THE SEPARATE COMPILATION OF PASCAL PROGRAM MODULES. 0 Referenced by comments of: 782/1 00782/036 PASCAL/SB NOTES P O S1560 5.0T3 VLO FSNAME=PASCAL/SB.NOTES.P.036(1) 720 5.0T3 720 PASCAL/SB.NOTES.P.036 1 LINE 67 3 PAGE UM UNSP AUG. 12, 1980 17:59:11 5.0T8 99 0 INTERNAL DOCUMENTATION, WITH REFERENCES, FOR PASCAL/SB. NOT YET VERY COMPLETE. 0 Referenced by comments of: 782/1 1 SUN SEP 08/96 15:24:55 Page 571 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/037 PASCAL/SB INSTALL C O S1560 5.0T3 VLO FSNAME=PASCAL/SB.INSTALL.C.037(1) 721 5.0T3 721 PASCAL/SB.INSTALL.C.037 1 LINE 235 3 PAGE UM UNSP SEP. 22, 1980 15:05:22 5.0T8 100 0 A SOURCE FILE WHICH WILL LINK THE VARIOUS FILES TO FORM SHARED VM AND PRIVATE VM VERSIONS OF THE COMPILER, LINKER, AND RUNTIME SUPPORT. THE OBJECT FILES ARE CREATED BY SOURCING TO THE SOURCE FILES DIRECTLY. 0 Referenced by comments of: 782/1 00782/038 PASCAL/SB USERS MANUAL WF O S1560 5.0T3 VLO FSNAME=PASCAL/SB.USERS_MANUAL.WF.038(1) 722 5.0T3 722 PASCAL/SB.USERS_MANUAL.WF.038 1 LINE 127 35 PAGE UM UNSP NOV. 22, 1979 05:15:49 5.0T8 101 0 USER-LEVEL DOCUMENTATION FOR PASCAL/SB. NOT YET MODIFIED FOR MTS. 0 Referenced by comments of: 782/1, 782/39 00782/039 PASCAL/SB USERS MANUAL P S1560 5.0T3 VLO FSNAME=PASCAL/SB.USERS_MANUAL.P.039(1) 723 5.0T3 723 PASCAL/SB.USERS_MANUAL.P.039 1 LINE 85 8 PAGE UM UNSP JULY 03, 1981 19:48:52 5.0T8 102 0 MTS UPDATES TO THE PASCAL/SB USER'S MANUAL (782/38). 0 Referenced by comments of: 782/1 00782/040 PASCAL/SB PASS 1 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASS_1.SX.040(1) 724 5.0T3 724 PASCAL/SB.PASS_1.SX.040 1 LINE 105 67 PAGE UM UNSP AUG. 16, 1980 08:32:09 5.0T8 103 0 THIS IS COMPONENT (782/10), AS MODIFIED FOR MTS. 00782/041 PASCAL/SB PASS 2 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASS_2.SX.041(1) 725 5.0T3 725 PASCAL/SB.PASS_2.SX.041 1 LINE 113 98 PAGE UM UNSP MAR. 18, 1981 12:15:46 5.0T8 104 0 THIS IS COMPONENT (782/13), AS MODIFIED FOR MTS. 00782/042 PASCAL/SB PASS 3 SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASS_3.SX.042(1) 726 5.0T3 726 PASCAL/SB.PASS_3.SX.042 1 LINE 88 56 PAGE UM UNSP MAR. 15, 1981 12:18:07 5.0T8 105 0 THIS IS COMPONENT (782/16), AS MODIFIED FOR MTS. 00782/043 PASCAL/SB PMD SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.PMD.SX.043(1) 727 5.0T3 727 PASCAL/SB.PMD.SX.043 1 LINE 80 13 PAGE UM UNSP SEP. 22, 1980 15:02:45 5.0T8 106 0 THIS IS COMPONENT (782/18), AS MODIFIED FOR MTS. 1 SUN SEP 08/96 15:24:55 Page 572 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/044 PASCAL/SB LINKER SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.LINKER.SX.044(1) 728 5.0T3 728 PASCAL/SB.LINKER.SX.044 1 LINE 91 22 PAGE UM UNSP MAR. 12, 1981 02:27:52 5.0T8 107 0 THIS IS COMPONENT (782/20), AS MODIFIED FOR MTS. 00782/045 PASCAL/SB XPL SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.XPL.SX.045(1) 729 5.0T3 729 PASCAL/SB.XPL.SX.045 1 LINE 68 6 PAGE UM UNSP AUG. 12, 1980 17:40:15 5.0T8 108 0 XPL subroutines used by PASCAL/SB including miscellaneous subroutines useful when programming in XPL. 00782/046 PASCAL/SB ASM SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.ASM.SA.046(1) 730 5.0T3 730 PASCAL/SB.ASM.SA.046 1 LINE 102 10 PAGE UM UNSP AUG. 12, 1980 17:35:37 5.0T8 109 0 ASSEMBLY LANGUAGE SUBROUTINES USED BY PASCAL/SB. USES THE (782/48) PASCAL MACRO LIBRARY. 0 Referenced by comments of: 782/48, 782/61 00782/047 PASCAL/SB PASTIME SA O S1560 5.0T3 VLO FSNAME=PASCAL/SB.PASTIME.SA.047(1) 731 5.0T3 731 PASCAL/SB.PASTIME.SA.047 1 LINE 86 21 PAGE UM UNSP MAR. 07, 1981 17:13:42 5.0T8 110 0 THE RUNTIME SUPPORT FOR PASCAL/SB PROGRAMS. USES THE (782/48) PASCAL MACRO LIBRARY. 00782/048 PASCAL/SB MACRO LIB SM O S1560 5.0T3 VLO FSNAME=PASCAL/SB.MACRO_LIB.SM.048(1) 732 5.0T3 732 PASCAL/SB.MACRO_LIB.SM.048 1 LINE 62 1 PAGE UM UNSP AUG. 12, 1980 17:37:07 5.0T8 111 0 A MACRO LIBRARY FOR USE BY THE ASSEMBLER ROUTINES (782/46). 0 Referenced by comments of: 782/46, 782/47 00782/049 PASCAL/SB LIBRARY OL O S1560 5.0T3 VLO FSNAME=PASCAL/SB.LIBRARY.OL.049(1) 733 5.0T3 733 PASCAL/SB.LIBRARY.OL.049 1 LINE 32767 117 PAGE UM UNSP MAR. 18, 1981 12:25:03 5.0T8 112 0 AN OBJECT LIBRARY WITH MODULES FOR EVERYTHING EXCEPT THE 3 EXPL MAIN PROGRAMS (782/50), (782/53), AND (782/56), WHICH ALL HAVE TO HAVE THE SAME NAME. 00782/050 PASCAL/SB MAIN PROGRAM SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.MAIN_PROGRAM.SX.050(1) 734 5.0T3 734 PASCAL/SB.MAIN_PROGRAM.SX.050 1 LINE 91 3 PAGE UM UNSP AUG. 12, 1980 17:41:59 5.0T8 113 0 XPL MAIN PROGRAM FOR THE COMPILER. 0 Referenced by comments of: 782/49, 782/51 1 SUN SEP 08/96 15:24:55 Page 573 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00782/051 PASCAL/SB MAIN PROGRAM OC O S1560 5.0T3 VLO FSNAME=PASCAL/SB.MAIN_PROGRAM.OC.051(1) 735 5.0T3 735 PASCAL/SB.MAIN_PROGRAM.OC.051 1 LINE 32767 21 PAGE UM UNSP AUG. 12, 1980 17:42:22 5.0T8 114 0 OBJECT OF (782/50). 00782/052 PASCAL/SB PASCAL OBJECT OE O UNSP:PAS.SB 5.0T3 736 PASCAL/SB.PASCAL_OBJECT.OE.052 1 LINE 32767 127 PAGE UM UNSP JULY 03, 1981 19:51:11 5.0T8 115 UNSP:PAS.SB 0 LINKEDITED PASCAL COMPILER, READY TO BE $RUN. LOGS USAGE STATISTICS IN UNSP:STATS, IF PRESENT, AND INTERRUPTS IN UNSP:PAS.SB.LOG (782/61). 0 Referenced by comments of: 782/1 00782/053 PASCAL/SB RUN SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.RUN.SX.053(1) 737 5.0T3 737 PASCAL/SB.RUN.SX.053 1 LINE 64 1 PAGE UM UNSP JUNE 16, 1980 13:22:55 5.0T8 116 0 XPL MAIN PROGRAM FOR RUNTIME SUPPORT, PMD. 0 Referenced by comments of: 782/49 00782/054 PASCAL/SB RUN OE O S1560 5.0T3 VLO FSNAME=PASCAL/SB.RUN.OE.054(1) 738 5.0T3 738 PASCAL/SB.RUN.OE.054 1 LINE 11060 5 PAGE UM UNSP JUNE 16, 1980 13:23:05 5.0T8 117 00782/055 PASCAL/SB RUN OE O UNSP:PAS.SB.RUN 5.0T3 739 PASCAL/SB.RUN.OE.055 1 LINE 22816 14 PAGE UM UNSP JULY 03, 1981 19:51:27 5.0T8 118 UNSP:PAS.SB.RUN 0 LINKEDITED VERSION OF RUNTIME SUPPORT, READY TO BE RUN WITH A PASCAL OBJECT MODULE. 0 Referenced by comments of: 782/1, 784/3 00782/056 PASCAL/SB LINK SX O S1560 5.0T3 VLO FSNAME=PASCAL/SB.LINK.SX.056(1) 740 5.0T3 740 PASCAL/SB.LINK.SX.056 1 LINE 63 1 PAGE UM UNSP FEB. 10, 1980 17:27:59 5.0T8 119 0 XPL MAIN PROGRAM FOR THE LINKER. 0 Referenced by comments of: 782/49 00782/057 PASCAL/SB LINK OE O S1560 5.0T3 VLO FSNAME=PASCAL/SB.LINK.OE.057(1) 741 5.0T3 741 PASCAL/SB.LINK.OE.057 1 LINE 440 1 PAGE UM UNSP FEB. 10, 1980 17:27:25 5.0T8 120 00782/058 PASCAL/SB LINK OE O UNSP:PAS.SB.LINK 5.0T3 742 PASCAL/SB.LINK.OE.058 1 LINE 32767 24 PAGE UM UNSP JULY 03, 1981 19:51:57 5.0T8 121 UNSP:PAS.SB.LINK 0 LINKEDITED VERSION OF THE LINKER. $RUN THIS TO COMBINE NON-STANDARD MODULES, FORMING STANDARD ONES. 1 SUN SEP 08/96 15:24:55 Page 574 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 782/1 00782/059 PASCAL/SB EDITXPL UC G S1560 5.0T3 VLO FSNAME=PASCAL/SB.EDITXPL.UC.059(1) 743 5.0T3 743 PASCAL/SB.EDITXPL.UC.059 1 LINE 84 1 PAGE UM UNSP FEB. 25, 1980 09:57:47 5.0T8 122 0 A CDUPDATE TO THE STONY BROOK UPDATE PROGRAM EDITXPL (782/32), WHICH CONVERTS IT TO EXPL AND MTS. OBJECT IS IN (782/60). 00782/060 PASCAL/SB EDITXPL OC O S1560 5.0T3 VLO FSNAME=PASCAL/SB.EDITXPL.OC.060(1) 744 5.0T3 744 PASCAL/SB.EDITXPL.OC.060 1 LINE 2540 3 PAGE UM UNSP FEB. 25, 1980 09:55:17 5.0T8 123 0 HAS A $CONTINUE WITH *EXPLIB (495/2) RECORD. 0 Referenced by comments of: 782/59 00782/061 PASCAL/SB LOG D # UNSP:PAS.SB.LOG UM UNSP UNSP:PAS.SB.LOG 0 THIS IS THE LOG FILE FOR PASCAL/SB. IN THE DISTRIBUTED VERSION OF PASCAL/SB, THE LOG FILE, NAMED UNSP:PAS.SB.LOG, MUST BE CREATED. TO CHANGE THIS, USERRLOG IN (782/46) MUST BE ALTERED. 0 Referenced by comments of: 782/52 00782/062 PASCAL/SB TM1.1 WF S1560 5.0T3 VLO FSNAME=PASCAL/SB.TM1.1.WF.062(1) 745 5.0T3 745 PASCAL/SB.TM1.1.WF.062 1 LINE 73 5 PAGE UM UNSP SEP. 13, 1979 01:59:59 5.0T8 124 0 THIS IS PASCAL TECHNICAL MEMO 1.1: "THE STONY BROOK PASCAL/360 COMPILER," A 7-PAGE OVERVIEW OF THE COMPILER. 00782/063 PASCAL/SB TM5.1 WF S1560 5.0T3 VLO FSNAME=PASCAL/SB.TM5.1.WF.063(1) 746 5.0T3 746 PASCAL/SB.TM5.1.WF.063 1 LINE 136 12 PAGE UM UNSP SEP. 13, 1979 02:00:11 5.0T8 125 0 THIS IS PASCAL TECHNICAL MEMO 5.1: "DOCUMENTATION OF INTERNAL STRUCTURE," A 16-PAGE DESCRIPTION OF PASS 1. 00782/064 PASCAL/SB TM5.2 WF S1560 5.0T3 VLO FSNAME=PASCAL/SB.TM5.2.WF.064(1) 747 5.0T3 747 PASCAL/SB.TM5.2.WF.064 1 LINE 84 31 PAGE UM UNSP SEP. 13, 1979 02:00:26 5.0T8 126 0 THIS IS PASCAL TECHNICAL MEMO 5.2: "PASS 2 - SEMANTIC ANALYSIS AND GENERATION OF SYMBOLIC TRIPLES," A 50-PAGE DESCRIPTION OF PASS 2 AND THE TRIPLES USED BY PASS 3. 0 Referenced by comments of: 782/1 1 SUN SEP 08/96 15:24:55 Page 575 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00783/001 PASCAL/8000 OS/JCL O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/JCL..001(1) 748 5.0T3 748 PASCAL/8000.OS/JCL..001 1 LINE 80 10 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:12:25 5.0T8 127 0 THIS IS THE AUSTRIALIAN ATOMIC ENERGY COMMISSION PASCAL/8000 COMPILER, WHICH HAS BEEN MODIFIED TO RUN IN MTS. COMPONENTS (783/1) THROUGH (783/10) ARE THE COMPONENTS OF THE OS VERSION; (783/11) THROUGH (783/22) ARE COMPONENTS OF THE MTS VERSION. THIS COMPONENT CONTAINS OS JCL AND COMMENTS. 0 Referenced by comments of: 783/1, 792/1 00783/002 PASCAL/8000 OS/LINK SW O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/LINK.SW.002(1) 749 5.0T3 749 PASCAL/8000.OS/LINK.SW.002 1 LINE 111 85 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:17:04 5.0T8 128 0 OS OBJECT-MODULE-PRODUCING COMPILER. 0 Referenced by comments of: 783/8 00783/003 PASCAL/8000 OS/ASM SA O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/ASM.SA.003(1) 750 5.0T3 750 PASCAL/8000.OS/ASM.SA.003 1 LINE 80 172 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:15:18 5.0T8 129 0 OS RUNTIME SUPPORT. 00783/004 PASCAL/8000 OS/OBJECT OL O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/OBJECT.OL.004(1) 751 5.0T3 751 PASCAL/8000.OS/OBJECT.OL.004 1 LINE 80 52 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:13:01 5.0T8 130 0 OS LIBRARY WITH OBJECT FOR THE STANDARD COMPILER AND RUNTIME SUPPORT. 00783/005 PASCAL/8000 OS/CMPGO SW O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/CMPGO.SW.005(1) 752 5.0T3 752 PASCAL/8000.OS/CMPGO.SW.005 1 LINE 111 80 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:15:56 5.0T8 131 0 OS COMPILE-AND-GO COMPILER AND NONSTANDARD OBJECT MODULE. 0 Referenced by comments of: 783/8 00783/006 PASCAL/8000 OS/CMP1 OC O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/CMP1.OC.006(1) 753 5.0T3 753 PASCAL/8000.OS/CMP1.OC.006 1 LINE 1024 24 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:13:30 5.0T8 132 0 FILE 1, NONSTANDARD OBJECT, FOR COMPILE AND GO COMPILER. 00783/007 PASCAL/8000 OS/CMP2 OC O S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/CMP2.OC.007(1) 754 5.0T3 754 PASCAL/8000.OS/CMP2.OC.007 1 LINE 80 1 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:14:09 5.0T8 133 0 FILE 2 FOR COMPILE AND GO COMPILER. 1 SUN SEP 08/96 15:24:55 Page 576 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00783/008 PASCAL/8000 OS/ERRORS M S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/ERRORS.M.008(1) 755 5.0T3 755 PASCAL/8000.OS/ERRORS.M.008 1 LINE 75 3 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:14:30 5.0T8 134 0 ERROR MESSAGE FILE USED BY BOTH PASCAL/8000 OS COMPILERS (783/2) AND (783/5). 00783/009 PASCAL/8000 EDITOR SW O S1560 5.0T3 VLO FSNAME=PASCAL/8000.EDITOR.SW.009(1) 756 5.0T3 756 PASCAL/8000.EDITOR.SW.009 1 LINE 72 4 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:17:43 5.0T8 135 0 AN UPDATING PROGRAM. 00783/010 PASCAL/8000 OS/MANUAL P S1560 5.0T3 VLO FSNAME=PASCAL/8000.OS/MANUAL.P.010(1) 757 5.0T3 757 PASCAL/8000.OS/MANUAL.P.010 1 LINE 74 44 PAGE RPI ABDALI UNSP JUNE 08, 1979 00:18:01 5.0T8 136 0 A WRITEUP FOR THE OS VERSION OF PASCAL/8000. 0 Referenced by comments of: 783/1 00783/011 PASCAL/8000 COMMENTS P S1560 5.0T3 VLO FSNAME=PASCAL/8000.COMMENTS.P.011(1) 758 5.0T3 758 PASCAL/8000.COMMENTS.P.011 1 LINE 68 1 PAGE RPI ABDALI UNSP FEB. 10, 1980 17:48:32 5.0T8 137 0 THIS IS A VERY BRIEF DESCRIPTION OF THE AUSTRALIAN ATOMIC ENERGY COMMISSION PASCAL/8000 COMPILER, AND THE MTS VERSION THEREOF. SEE ALSO COMP (783/12). 0 Referenced by comments of: 783/1 00783/012 PASCAL/8000 INSTALL.INFO P S1560 5.0T3 VLO FSNAME=PASCAL/8000.INSTALL.INFO.P.012(1) 759 5.0T3 759 PASCAL/8000.INSTALL.INFO.P.012 1 LINE 74 5 PAGE RPI ABDALI UNSP JUNE 17, 1980 16:00:35 5.0T8 138 0 A DESCRIPTION AND INSTALLATION INSTRUCTIONS FOR THE MTS VERSION OF PASCAL/8000. 0 Referenced by comments of: 783/11 00783/013 PASCAL/8000 COMPILER SW O S1560 5.0T3 VLO FSNAME=PASCAL/8000.COMPILER.SW.013(1) 760 5.0T3 760 PASCAL/8000.COMPILER.SW.013 1 LINE 80 87 PAGE RPI ABDALI UNSP JUNE 17, 1980 16:01:50 5.0T8 139 0 MTS VERSION OF THE PASCAL/8000 COMPILER. 00783/014 PASCAL/8000 COMPILER UC O S1560 5.0T3 VLO FSNAME=PASCAL/8000.COMPILER.UC.014(1) 761 5.0T3 761 PASCAL/8000.COMPILER.UC.014 1 LINE 66 3 PAGE RPI ABDALI UNSP JUNE 17, 1980 16:17:30 5.0T8 140 0 AN UPDATE DECK FOR LOCAL CHANGES. ADDS A CALL TO SNOOP IN UNSP:LIBRARY (685/2) TO RECORD USAGE STATISTICS IN THE FILE UNSP:STATS, IF IT EXISTS. COMPILE WITH PAR=;C=1024 AND T=15 ON AN AMDAHL V/7. 0 Referenced by comments of: 783/20 1 SUN SEP 08/96 15:24:55 Page 577 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00783/015 PASCAL/8000 COMPILER OE O UNSP:PAS.8000 5.0T3 762 PASCAL/8000.COMPILER.OE.015 1 LINE 32767 34 PAGE RPI ABDALI UNSP JULY 03, 1981 19:54:02 5.0T8 141 UNSP:PAS.8000 0 CONTAINS A $CONTINUE WITH UNSP:PAS.8000.RUN (783/19) RECORD. 00783/016 PASCAL/8000 RUNMACLIB SM O S1560 5.0T3 VLO FSNAME=PASCAL/8000.RUNMACLIB.SM.016(1) 763 5.0T3 763 PASCAL/8000.RUNMACLIB.SM.016 1 LINE 73 3 PAGE RPI ABDALI UNSP MAR. 09, 1979 22:10:53 5.0T8 142 0 Referenced by comments of: 783/17 00783/017 PASCAL/8000 RUNTIME SA O S1560 5.0T3 VLO FSNAME=PASCAL/8000.RUNTIME.SA.017(1) 764 5.0T3 764 PASCAL/8000.RUNTIME.SA.017 1 LINE 73 47 PAGE RPI ABDALI UNSP JUNE 17, 1980 16:14:37 5.0T8 143 0 THE RUNTIME SUPPORT. ASSEMBLE WITH PAR=BATCH. USES THE (783/16) MACRO LIBRARY. 00783/018 PASCAL/8000 RUNTIME UC G S1560 5.0T3 VLO FSNAME=PASCAL/8000.RUNTIME.UC.018(1) 765 5.0T3 765 PASCAL/8000.RUNTIME.UC.018 1 LINE 68 1 PAGE RPI ABDALI UNSP JUNE 17, 1980 16:17:50 5.0T8 144 00783/019 PASCAL/8000 RUNTIME OE O UNSP:PAS.8000.RUN 5.0T3 766 PASCAL/8000.RUNTIME.OE.019 1 LINE 14284 6 PAGE RPI ABDALI UNSP JULY 03, 1981 19:55:20 5.0T8 145 UNSP:PAS.8000.RUN 0 Referenced by comments of: 783/15 00783/020 PASCAL/8000 ERROR MSGS M O UNSP:PAS.8000.ERR 5.0T3 767 PASCAL/8000.ERROR_MSGS.M.020 1 LINE 75 3 PAGE RPI ABDALI UNSP JULY 03, 1981 19:55:22 5.0T8 146 UNSP:PAS.8000.ERR 0 ERROR MESSAGES USED BY THE (783/14) COMPILER. 00783/021 PASCAL/8000 MANUAL P O S1560 5.0T3 VLO FSNAME=PASCAL/8000.MANUAL.P.021(1) 768 5.0T3 768 PASCAL/8000.MANUAL.P.021 1 LINE 78 51 PAGE RPI ABDALI UNSP JUNE 17, 1980 16:16:23 5.0T8 147 0 USER LEVEL DESCRIPTION OF THE PASCAL/8000 SYSTEM AND HOW TO USE IT. 00783/022 PASCAL/8000 TEST SW G S1560 5.0T3 VLO FSNAME=PASCAL/8000.TEST.SW.022(1) 769 5.0T3 769 PASCAL/8000.TEST.SW.022 1 LINE 89 9 PAGE RPI ABDALI UNSP SEP. 08, 1979 20:06:13 5.0T8 148 0 SOURCE FILE CONTAINING PASCAL PROGRAMS AND MTS COMMANDS TO TEST THE COMPILER. 0 Referenced by comments of: 783/1 00784/001 CRLFASCEBC SW G S1153 UNSP VLO FSNAME=CRLFASCEBC.PAS 5.0T3 770 CRLFASCEBC..SW.001 1 LINE 64 1 PAGE UM UNSP FEB. 14, 1980 16:04:59 5.0T8 149 0 THIS PROGRAM CONVERTS STREAM-ORIENTED ASCII FILES WITH EMBEDDED CARRIAGE 1 SUN SEP 08/96 15:24:55 Page 578 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 CONTROL TO RECORD-ORIENTED EBCDIC FILES WITH CARRIAGE CONTROL CHARACTERS IN COLUMN 1. THE ASCII CHARACTERS , , AND ARE DELETED AND APPROPRIATE CARRIAGE CONTROL CHARACTERS ARE ADDED. COMPONENT (784/4) CONTAINS A WRITEUP. 0 Referenced by comments of: 784/2, 784/3 00784/002 CRLFASCEBC SUBROUTINE SA G S1153 UNSP VLO FSNAME=CRLFASCEBC.ASM 5.0T3 771 CRLFASCEBC.SUBROUTINE.SA.002 1 LINE 62 1 PAGE UM UNSP FEB. 14, 1980 16:05:51 5.0T8 150 0 SUBROUTINE CALLED FROM (784/1) TO DO THE ACTUAL TRANSLATION. 0 Referenced by comments of: 784/3 00784/003 CRLFASCEBC OC G UNSP:CRLFASCEBC 5.0T3 772 CRLFASCEBC..OC.003 1 LINE 1358 2 PAGE UM UNSP JULY 03, 1981 19:55:52 5.0T8 151 UNSP:CRLFASCEBC 0 OBJECT OF (784/1) AND (784/2). CONTAINS A $CONTINUE WITH UNSP:LIBRARY (685/2) AND A $CONTINUE WITH UNSP:PAS.SB.RUN (782/55) RECORD. 00784/004 CRLFASCEBC WRITEUP P UNSP:CRLFASCEBC.W 5.0T3 773 CRLFASCEBC.WRITEUP.P.004 1 LINE 71 1 PAGE UM UNSP JULY 03, 1981 19:55:53 5.0T8 152 0 Referenced by comments of: 784/1 00785/001 SOUNDEX SF G S1153 UNSP VLO FSNAME=SOUNDEX.FTN 5.0T3 774 SOUNDEX..SF.001 1 LINE 68 1 PAGE UM UNSP FEB. 14, 1980 16:03:28 5.0T8 153 0 THE SOUNDEX SYSTEM IS BASED ON AN ALGORITHM WHICH ENCODES NAMES INTO A FOUR-CHARACTER CODE SO THAT SIMILAR SOUNDING NAMES ARE ENCODED INTO SIMILAR CODES. IT IS USEFUL WHEN EXACT SPELLING OF NAMES IS NOT KNOWN, FOR EXAMPLE, IN AIRLINE RESERVATION SYSTEMS. THIS SUBCOMPONENT CONTAINS A PROGRAM TO READ A LIST OF NAMES AND ENCODE THEM. 0 Referenced by comments of: 785/2 00785/002 SOUNDEX OE G UNSP:SOUNDEX 5.0T3 775 SOUNDEX..OE.002 1 LINE 730 1 PAGE UM UNSP JULY 03, 1981 19:55:54 5.0T8 154 UNSP:SOUNDEX 0 OBJECT OF (785/1). CONTAINS A $CONTINUE WITH UNSP:LIBRARY (685/2) RECORD. 00785/003 SOUNDEX SUBROUTINE SA G S1153 UNSP VLO FSNAME=SOUNDEX.ASM 5.0T3 776 SOUNDEX.SUBROUTINE.SA.003 1 LINE 72 2 PAGE UM UNSP FEB. 14, 1980 16:02:39 5.0T8 155 0 SUBROUTINE TO ENCODE NAMES USING THE SOUNDEX ALGORITHM. OBJECT IS IN UNSP:LIBRARY (685/2). 1 SUN SEP 08/96 15:24:55 Page 579 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00785/004 SOUNDEX WRITEUP P UNSP:SOUNDEX.W 5.0T3 777 SOUNDEX.WRITEUP.P.004 1 LINE 70 1 PAGE UM UNSP JULY 03, 1981 19:55:56 5.0T8 156 00786/001 CONSTANTS D UNSP:CONSTANTS 5.0T3 778 CONSTANTS..D.001 1 LINE 126 2 PAGE UM UNSP JULY 03, 1981 19:55:57 5.0T8 157 0 A LIST OF COMMONLY SEEN CONSTANTS, EACH CONVERTED IN VARIOUS WAYS. 00787/001A UNIT CHECK ROUTINES MACROS SM G COPY:UC.MACROS 5.1T2 230 UNIT_CHECK_ROUTINES.MACRO.SM.001 1 LINE 72 4 PAGE UM HELFFRICH JULY 23, 1983 13:22:28 COPY:UC.MACROS 0 This subcomponent is the Unit Check Routines macro library. 0 Referenced by comments of: 23/1, 79/1, 135/1, 621/4, 655/4, 682/24, 724/1, 769/4, 769/7, 787/3, 787/5, 787/6, 787/8, 787/9, 787/19, 787/21, 1058/3, 1058/5, 1058/7, 1058/9, 1079/18 00787/002C UNIT CHECK ROUTINES MACROS SM G FILE:UCMACROS(-10000,-1) 5.1T2 231 UNIT_CHECK_ROUTINES.MACRO.SM.002 1 LINE 72 4 PAGE UM HELFFRICH JULY 23, 1983 13:22:28 0 Base source for unit check macros. 0 Referenced by comments of: 787/3 00787/003C UNIT CHECK ROUTINES MACROS UC G FILE:UCMACROS(1000) 5.1T2 232 UNIT_CHECK_ROUTINES.MACRO.UC.003 1 LINE 69 1 PAGE UM HELFFRICH JULY 23, 1983 13:22:28 0 Update deck to be applied to (787/2) to produce input to *MACUTIL to yield (787/1). 00787/004A UNIT CHECK ROUTINES DESIGN PAPER WT W170:UC.DESIGNPAPER 5.1T2 233 UNIT_CHECK_ROUTINES.DESIG.WT.004 1 LINE 140 7 PAGE UM HELFFRICH JULY 23, 1983 13:22:28 0 ARCHITECTURAL DESCRIPTION OF UNIT CHECK ROUTINE INTERFACE AND CHARACTERISTICS. 00787/005A UNIT CHECK ROUTINES UCDISK SM G FILE:UCDISK(-10000,-1) 5.1T2 234 UNIT_CHECK_ROUTINES.UCDIS.SM.005 1 LINE 72 20 PAGE UM HELFFRICH JULY 23, 1983 13:22:29 FILE:UCDISK 0 Base source for subtasking monitor (1058) compatible unit check routines for 3330, 3350, 2301, and 2305 devices. Assemble using COPY:UC.MACROS (787/1). Copies COPY:CMDAREADSECT (531/20) and *CNFGINFODSECT (654). 0 Referenced by comments of: 655/4, 787/6, 787/8 00787/006C UNIT CHECK ROUTINES UCDISK UC G FILE:UCDISK(1000) 5.1T2 235 UNIT_CHECK_ROUTINES.UCDIS.UC.006 1 LINE 72 6 PAGE UM HELFFRICH JULY 23, 1983 13:22:30 0 Update deck, to be applied to (787/5) to produce current source. Assemble with COPY:UC.MACROS (787/1). Copies COPY:CMDAREADSECT (531/19) and *CNFGINFODSECT (654). 1 SUN SEP 08/96 15:24:55 Page 580 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00787/007A UNIT CHECK ROUTINES UCDISK OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00787/008A UNIT CHECK ROUTINES UC3330 SA G FILE:UC3330(-10000,-1) 5.1T2 236 UNIT_CHECK_ROUTINES.UC333.SA.008 1 LINE 72 4 PAGE UM HELFFRICH JULY 23, 1983 13:22:31 FILE:UC3330 0 Base source for front-end to the UCDIST routines (787/5) to make them compatible with the old style routines in DISKUC (787/11). Copies COPY:UC.MACROS (787/1). 0 Referenced by comments of: 603/1, 787/9 00787/009C UNIT CHECK ROUTINES UC3330 UC G FILE:UC3330(1000) 5.1T2 237 UNIT_CHECK_ROUTINES.UC333.UC.009 1 LINE 70 1 PAGE UM HELFFRICH JULY 23, 1983 13:22:31 0 Update deck to be applied to (787/8) to yield current source. Uses COPY:UC.MACROS (787/1). 00787/010A UNIT CHECK ROUTINES UC3330 OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00787/011 UNIT CHECK ROUTINES DISKUC SA G FILE:DASDUC(1000) 5.0T3 783 UNIT_CHECK_ROUTINES.DASDU.SA.007 1 LINE 72 9 PAGE UM HELFFRICH JULY 03, 1981 19:56:07 5.0T8 162 0 "OLD-STYLE" 2311/2314/2321/2301 UNIT CHECK ROUTINES. 0 Referenced by comments of: 787/8 00787/012 UNIT CHECK ROUTINES DISKUC OC G FILE:DASDUC(1,999) 5.0T3 784 UNIT_CHECK_ROUTINES.DASDU.OC.008 1 LINE 80 3 PAGE UM HELFFRICH JULY 03, 1981 19:56:08 5.0T8 163 FILE:DASDUC 00787/013A UNIT CHECK ROUTINES 3330 TESTER SA O FILE:UCDISK.TEST(1000) 5.1T2 238 UNIT_CHECK_ROUTINES.3330.SA.013 1 LINE 72 3 PAGE UM HELFFRICH JULY 23, 1983 13:22:31 0 TEST PROGRAM TO DEBUG NEW VERSIONS OF 3330 COMPATIBLE UNIT CHECK ROUTINES. ASSEMBLE USING OLD:CC.MACROS (1054/4). COPIES COPY:CMDAREADSECT (531/20). 00787/014A UNIT CHECK ROUTINES 3330 TESTER OC O FILE:UCDISK.TEST(1,998) 5.1T2 239 UNIT_CHECK_ROUTINES.3330.OC.014 1 LINE 80 6 PAGE UM HELFFRICH JULY 23, 1983 13:22:32 00787/015 UNIT CHECK ROUTINES UC3330 TESTER SA O FILE:UC3330.TEST(1000) 5.0T3 787 UNIT_CHECK_ROUTINES.UC333.SA.011 1 LINE 72 3 PAGE UM HELFFRICH JULY 03, 1981 19:56:11 5.0T8 166 0 TEST PROGRAM TO DEBUG NEW VERSIONS OF UC3330. ASSEMBLE USING OLD:CC.MACROS (1054/4) AND COPY:MISC.MACROS (728). COPIES COPY:CMDAREADSECT (531/20). 1 SUN SEP 08/96 15:24:55 Page 581 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00787/016 UNIT CHECK ROUTINES UC3330 TESTER OC O FILE:UC3330.TEST(1,998) 5.0T3 788 UNIT_CHECK_ROUTINES.UC333.OC.012 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 19:56:12 5.0T8 167 00787/017 UNIT CHECK ROUTINES SYNCH TV RTNS SA G W170:UCSYNC(1000) 5.0T3 789 UNIT_CHECK_ROUTINES.SYNCH.SA.013 1 LINE 70 3 PAGE UM HELFFRICH JULY 03, 1981 19:56:13 5.0T8 168 W170:UCSYNC 0 Synchronous, i.e., non-Subtasking Monitor (1058), unit check transfer vector routines. Requires COPY:MISC.MACROS (728). 00787/018 UNIT CHECK ROUTINES SYNCH TV RTNS OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00787/019 UNIT CHECK ROUTINES TAPE UNIT CHCK SA G TAPE:UCTAPE(1000) 5.0T3 790 UNIT_CHECK_ROUTINES.TAPE.SA.015 1 LINE 72 22 PAGE UM HELFFRICH AUG. 06, 1981 05:35:55 5.0T8 169 TAPE:UCTAPE 0 2400 and 3400 series tape unit check routines. Assemble with COPY:UC.MACROS (787/1), OLD:CC.MACROS (1054/4), and COPY:MISC.MACROS (728). Copies COPY:GLOBALS (1026/3), COPY:CMDAREADSECT (531/20) and *CNFGINFODSECT (654/1). 0 Referenced by comments of: 12/1, 23/1, 388/1, 655/4, 787/21 00787/020 UNIT CHECK ROUTINES TAPE UNIT CHCK OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 D5.0 versions of HASPLING (388), TPMOVE (023), STAT JOB (079) and TAPERTN (135) require these unit check routines. Object part of Resident System (468). 00787/021 UNIT CHECK ROUTINES UCTAPE TESTER SA G TAPE:UCTAPE.TEST(1000) 5.0T3 791 UNIT_CHECK_ROUTINES.UCTAP.SA.017 1 LINE 72 3 PAGE UM HELFFRICH JULY 03, 1981 19:56:45 5.0T8 170 0 Test program to debug new versions of (787/19). Assemble with OLD:CC.MACROS (1054/4) and COPY:UC.MACROS (787/1). Copies COPY:CMDAREADSECT (531/20). 00787/022 UNIT CHECK ROUTINES UCTAPE TESTER OC G TAPE:UCTAPE.TEST(1,999) 5.0T3 792 UNIT_CHECK_ROUTINES.UCTAP.OC.018 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 19:56:46 5.0T8 171 00788/001 DUMMY CLS SOURCE SA G S1560 5.0T3 VLO FSNAME=DUMMY_CLS.SOURCE.SA.001(1) 793 5.0T3 793 DUMMY_CLS.SOURCE.SA.001 1 LINE 55 1 PAGE UM MTS OGDEN APR. 06, 1980 13:58:32 5.0T8 172 0 THIS IS A SIMPLE CLS TO PRINT THE FOLLOWING MESSAGE FOR UNIMPLEMENTED COMMANDS: "THIS COMMAND IS NOT YET IMPLEMENTED" 1 SUN SEP 08/96 15:24:55 Page 582 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00788/002 DUMMY CLS *CLSNEW OC G # MTS:TST.CLSDUMMY UM MTS OGDEN *CLSNEW 0 FOR TESTING NEW CLS'S. 00788/003 DUMMY CLS *CLSNEW2 OC G # MTS:TST.CLSDUMMY UM MTS OGDEN *CLSNEW2 0 FOR TESTING NEW CLS'S. 00788/004 DUMMY CLS *CLSNEW3 OC G # MTS:TST.CLSDUMMY UM MTS OGDEN *CLSNEW3 0 FOR TESTING NEW CLS'S. 00789/001 SHUTDOWN MESSAGE *SDM C *SDM 5.0T3 794 SHUTDOWN_MESSAGE.*SDM.C.001 1 LINE 63 1 PAGE UM MTS WSG JULY 03, 1981 19:57:12 5.0T8 173 *SDM 0 Operator file to put in shutdown message for UM Data Concentrators and Merit computer network. 00789/002A SHUTDOWN MESSAGE SYS:SDM SG G S1644 5.0BT1 VLO FSNAME=SHUTDOWN_MESSAGE.SYS:SDM.SG.002(1) 573 5.1T2 240 SHUTDOWN_MESSAGE.SYS:SDM.SG.002 1 LINE 77 1 PAGE UM MTS WSG NOV. 21, 1982 19:07:41 0 Program to read a shutdown message from the operators' console and place it in the Data Concentrators. 00789/003A SHUTDOWN MESSAGE SYS:SDM OC G SYS:SDM 5.1T2 241 SHUTDOWN_MESSAGE.SYS:SDM.OC.003 1 LINE 1516 1 PAGE UM MTS WSG JULY 23, 1983 13:28:04 SYS:SDM 00789/004 SHUTDOWN MESSAGE SYS:MSDM SG G S1560 5.0T3 VLO FSNAME=SHUTDOWN_MESSAGE.SYS:MSDM.SG.004(1) 797 5.0T3 797 SHUTDOWN_MESSAGE.SYS:MSDM.SG.004 1 LINE 77 1 PAGE UM MTS WSG OCT. 13, 1980 08:27:47 5.0T8 176 0 Program to read a shutdown message from the operators' console and to place it in the Merit computer network PCPs. 00789/005 SHUTDOWN MESSAGE SYS:MSDM OC G SYS:MSDM 5.0T3 798 SHUTDOWN_MESSAGE.SYS:MSDM.OC.005 1 LINE 1082 1 PAGE UM MTS WSG JULY 03, 1981 19:57:47 5.0T8 177 00790/001 VAMX CONVERSION DESCRIPTION WF S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.DESCRIPTI.WF.001(1) 799 5.0T3 799 VAMX_CONVERSION.DESCRIPTI.WF.001 1 LINE 76 3 PAGE UM HELFFRICH JULY 03, 1981 19:57:48 5.0T8 178 0 WRITEUP DESCRIBING PROCEDURE TO BE FOLLOWED TO CONVERT VAM2 OR OLD-STYLE VAMX PACKS TO THE NEW VAMX FORMAT. THIS SHOULD BE LOOKED AT BEFORE ATTEMPTING TO USE THE CONVERSION PROGRAMS. 1 SUN SEP 08/96 15:24:55 Page 583 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 790/2, 790/4, 790/5, 790/7 00790/002 VAMX CONVERSION PAT/DSCB CONV SA O S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.PAT/DSCB.SA.002(1) 800 5.0T3 800 VAMX_CONVERSION.PAT/DSCB.SA.002 1 LINE 79 6 PAGE UM HELFFRICH JULY 03, 1981 19:57:48 5.0T8 179 0 THIS IS THE SOURCE, ADAPTED FROM (790/4), TO CONVERT OLD-STYLE VAMX OR VAM2 TO NEW STYLE VAMX FORMAT. ASSEMBLE USING COPY:FILE.MACROS (482/45) AND COPY:MISC.MACROS (728). WARNING: THIS PROGRAM HAS NEVER BEEN USED TO COMPLETELY CONVERT AN OLD-STYLE VAMX PACK OR A VAM2 PACK TO A NEW-STYLE PACK. SEE (790/1). 0 Referenced by comments of: 790/4 00790/003 VAMX CONVERSION PAT/DSCB CONV OC O S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.PAT/DSCB.OC.003(1) 801 5.0T3 801 VAMX_CONVERSION.PAT/DSCB.OC.003 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 19:57:49 5.0T8 180 00790/004 VAMX CONVERSION PAT/DSCB CONV SA G S1431 4.3T2 VLO FSNAME=VAMX_CONVERSION.PAT/DSCB.SA.004(1) 281 5.0T3 802 VAMX_CONVERSION.PAT/DSCB.SA.004 1 LINE 79 5 PAGE UM HELFFRICH APR. 06, 1980 13:58:57 5.0T8 181 0 SOURCE FOR THE VERSION OF THE PROGRAM USED BY UM TO CONVERT FROM V2 TO VX FORMAT. (790/2) WAS ADAPTED FROM THIS PROGRAM. SEE (790/1) FOR DETAILS. ASSEMBLE USING COPY:FILE.MACROS (482/45) AND COPY:MISC.MACROS (728). 0 Referenced by comments of: 790/2 00790/005 VAMX CONVERSION CATALOG CONV SA O S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.CATALOG_C.SA.005(1) 803 5.0T3 803 VAMX_CONVERSION.CATALOG_C.SA.005 1 LINE 72 10 PAGE UM HELFFRICH JULY 03, 1981 19:57:51 5.0T8 182 0 THIS IS THE SOURCE, ADAPTED FROM (790/7) TO CONVERT OLD-STYLE VAMX OR VAM2 TO NEW STYLE VAMX FORMAT. SEE (790/1) FOR FURTHER DETAILS. ASSEMBLE USING COPY:FILE.MACROS (482/45). WARNING: THIS PROGRAM HAS NEVER BEEN USED TO COMPLETELY CONVERT AN OLD-STYLE VAMX PACK OR A VAM2 PACK TO A NEW-STYLE PACK. SEE (790/1). 0 Referenced by comments of: 790/7 00790/006 VAMX CONVERSION CATALOG CONV OC O S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.CATALOG_C.OC.006(1) 804 5.0T3 804 VAMX_CONVERSION.CATALOG_C.OC.006 1 LINE 80 4 PAGE UM HELFFRICH JULY 03, 1981 19:57:53 5.0T8 183 00790/007 VAMX CONVERSION CATALOG CONV SA G S1560 5.0T3 VLO FSNAME=VAMX_CONVERSION.CATALOG_C.SA.007(1) 805 5.0T3 805 VAMX_CONVERSION.CATALOG_C.SA.007 1 LINE 72 10 PAGE UM HELFFRICH APR. 06, 1980 13:59:05 5.0T8 184 0 SOURCE FOR THE VERSION OF THE PROGRAM USED BY UM TO CONVERT FROM V2 TO VX FORMAT. (790/5) WAS ADAPTED FROM THIS PROGRAM. SEE (790/1) FOR DETAILS. ASSEMBLE USING COPY:FILE.MACROS (482/45). 1 SUN SEP 08/96 15:24:55 Page 584 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 790/5 00791/001A DEFAULT SA G S1527 ALGOLW 'ARCHIVE 37 5.1T2 242 DEFAULT..SA.001 1 LINE 96 3 PAGE UM J BODWIN JUNE 11, 1982 15:39:33 0 ROUTINES PAGSLFT AND TIMELFT WHICH RETURN THE MTS PAGE AND TIME LIMITS, THE MINIMUM OF LOCAL AND GLOBAL, OR 0 IF NO LIMIT IS IN EFFECT. ASSEMBLE USING *SYSMAC. 0 Referenced by comments of: 528/2 00791/002A DEFAULT OC G S1527 ALGOLW 'ARCHIVE' 60 5.1T2 243 DEFAULT..OC.002 1 LINE 80 2 PAGE UM J BODWIN JUNE 11, 1982 15:47:55 00792/001 PASCAL FILES ERRORS SW G S1560 5.0T3 VLO FSNAME=PASCAL_FILES.ERRORS.SW.001(1) 808 5.0T3 808 PASCAL_FILES.ERRORS.SW.001 1 LINE 81 17 PAGE UM PICKELMAN APR. 24, 1980 03:15:05 5.0T8 187 0 THIS COMPONENT CONTAINS FILES FOR USE WITH THE VARIOUS PASCAL COMPILERS DISTRIBUTED BY MICHIGAN. SEE ALSO THE PASCAL VALIDATION SUITE (781) AND THE PASCAL COMPILERS: PASCAL/SB (782), PASCAL/UBC (1052), PASCAL/8000 (783), AND PASCAL/SLAC (793). THIS SUBCOMPONENT CONTAINS SEVERAL PROGRAMS TO TEST A PASCAL COMPILER'S ERROR RECOVERY. SEE "PASCAL SYNTAX ERRORS DATA BASE" BY G. DAVID RIPLEY, APRIL 19, 1979, AVAILABLE FROM: PAUL PICKELMANN COMPUTING CENTER UNIVERSITY OF MICHIGAN 1075 BEAL AVE. ANN ARBOR, MI 48109 00792/002 PASCAL FILES ERRORS SW O S1560 5.0T3 VLO FSNAME=PASCAL_FILES.ERRORS.SW.002(1) 809 5.0T3 809 PASCAL_FILES.ERRORS.SW.002 1 LINE 64 1 PAGE UM PICKELMAN JULY 03, 1981 19:58:34 5.0T8 188 0 MORE PROGRAMS TO TEST A PASCAL COMPILER'S ERROR RECOVERY. 00792/003 PASCAL FILES TEST SW O S1560 5.0T3 VLO FSNAME=PASCAL_FILES.TEST.SW.003(1) 810 5.0T3 810 PASCAL_FILES.TEST.SW.003 1 LINE 90 48 PAGE UM PICKELMAN NOV. 22, 1979 05:40:15 5.0T8 189 0 SEVERAL PASCAL PROGRAMS TO TEST PASCAL/SB. 0 Referenced by comments of: 782/1, 792/4, 792/5 00792/004 PASCAL FILES TEST D O S1560 5.0T3 VLO FSNAME=PASCAL_FILES.TEST.D.004(1) 811 5.0T3 811 PASCAL_FILES.TEST.D.004 1 LINE 68 1 PAGE UM PICKELMAN SEP. 13, 1979 01:58:42 5.0T8 190 0 DATA FOR USE WITH (792/3). 0 Referenced by comments of: 782/1, 792/5 1 SUN SEP 08/96 15:24:55 Page 585 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00792/005 PASCAL FILES TEST C O S1560 5.0T3 VLO FSNAME=PASCAL_FILES.TEST.C.005(1) 812 5.0T3 812 PASCAL_FILES.TEST.C.005 1 LINE 48 3 PAGE UM PICKELMAN FEB. 10, 1980 17:29:45 5.0T8 191 0 SOURCE FILE TO TEST THE COMPILER. $CONTINUES WITH (792/3) AND (792/4). 0 Referenced by comments of: 782/1 00793/001 PASCAL/SLAC WRITEUP P S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.WRITEUP.P.001(1) 814 5.0T3 814 PASCAL/SLAC.WRITEUP.P.001 1 LINE 79 35 PAGE UM UNSP FEB. 10, 1980 18:09:49 5.0T8 193 0 This is the Stanford Pascal compiler. Pascal/UBC (1052) was based on an earlier version of this, but they are totally different. The compiler is basically the P4 compiler. An assembler is provided which transforms Pcode into 360/370 assembler or object modules. The Pascal/SLAC system runs under *FAKEOS (545), but is not currently installed at UM. It came to UM by way of Curt Hill at the University of Nebraska. This compiler is copyrighted, but nonprofit use, modification and redistribution are spcifically allowed so long as the copyright notice is included and no fees are charged. S. Hazeghi of the Computation Research Group at the Stanford Linear Accelerator Center, Stanford, CA 94305 would like to be kept informed of any modifications to the compiler. This subcomponent is a writeup describing the installation and use of the Stanford Pascal compiler and associated programs. 0 Referenced by comments of: 792/1 00793/002 PASCAL/SLAC COMPILER SW O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.COMPILER.SW.002(1) 815 5.0T3 815 PASCAL/SLAC.COMPILER.SW.002 1 LINE 80 71 PAGE UM UNSP FEB. 10, 1980 18:01:17 5.0T8 194 0 THIS IS THE SOURCE FOR THE STANFORD PASCAL COMPILER. IT PRODUCES PCODE WHICH IS ASSEMBLED WITH THE PCODE ASSEMBLER (793/5). 00793/003 PASCAL/SLAC COMPILER OE O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.COMPILER.OE.003(1) 816 5.0T3 816 PASCAL/SLAC.COMPILER.OE.003 1 LINE 32767 21 PAGE UM UNSP FEB. 10, 1980 18:01:37 5.0T8 195 00793/004 PASCAL/SLAC MESSAGES M O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MESSAGES.M.004(1) 817 5.0T3 817 PASCAL/SLAC.MESSAGES.M.004 1 LINE 67 3 PAGE UM UNSP FEB. 10, 1980 18:30:34 5.0T8 196 0 THE TEXT OF THE SYSTEM ERROR MESSAGES USED BY THE COMPILER AND POSSIBLY BY OTHER PARTS OF THE SYSTEM. 1 SUN SEP 08/96 15:24:55 Page 586 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00793/005 PASCAL/SLAC PCODE ASSMBLER SW O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PCODE_ASSMBLE.SW.005(1) 818 5.0T3 818 PASCAL/SLAC.PCODE_ASSMBLE.SW.005 1 LINE 80 49 PAGE UM UNSP FEB. 10, 1980 18:06:54 5.0T8 197 0 THE PCODE ASSEMBLER. HAS AN OPTION TO PRODUCE OBJECT MODULES OR 360/370 ASSEMBLER. 0 Referenced by comments of: 793/2, 793/7, 793/9, 793/10 00793/006 PASCAL/SLAC PCODE ASSMBLER OE O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PCODE_ASSMBLE.OE.006(1) 819 5.0T3 819 PASCAL/SLAC.PCODE_ASSMBLE.OE.006 1 LINE 32767 16 PAGE UM UNSP FEB. 10, 1980 18:07:24 5.0T8 198 00793/007 PASCAL/SLAC MACLIB SM O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MACLIB.SM.007(1) 820 5.0T3 820 PASCAL/SLAC.MACLIB.SM.007 1 LINE 65 1 PAGE UM UNSP FEB. 10, 1980 18:21:10 5.0T8 199 0 MACROS NEEDED TO ASSEMBLE THE CODE PRODUCED BY THE PCODE ASSEMBLER (793/5). 00793/008 PASCAL/SLAC MONITOR SA O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MONITOR.SA.008(1) 821 5.0T3 821 PASCAL/SLAC.MONITOR.SA.008 1 LINE 73 36 PAGE UM UNSP FEB. 10, 1980 18:04:06 5.0T8 200 0 THE RUNTIME SUPPORT. HAS A CONDITIONAL ASSEMBLY OPTION, &SYSTEM, WHICH PRODUCES A SMALLER VERSION USED WITH "SYSTEM" PROGRAMS (COMPILER, PROFILER, ETC.) BY ELIMINATING ERROR CHECKING, ETC. HAS A WEAK REFERENCE TO SNAPSHOT DUMP (793/11). 00793/009 PASCAL/SLAC MONITOR OE O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MONITOR.OE.009(1) 822 5.0T3 822 PASCAL/SLAC.MONITOR.OE.009 1 LINE 80 5 PAGE UM UNSP FEB. 10, 1980 18:04:34 5.0T8 201 0 OBJECT OF THE MONITOR (793/5), &SYSTEM=0. 00793/010 PASCAL/SLAC MONITOR OE O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.MONITOR.OE.010(1) 823 5.0T3 823 PASCAL/SLAC.MONITOR.OE.010 1 LINE 80 5 PAGE UM UNSP FEB. 10, 1980 18:04:58 5.0T8 202 0 SYSTEM OBJECT OF THE MONITOR (793/5), &SYSTEM=1. 00793/011 PASCAL/SLAC SNAPSHOT SW O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.SNAPSHOT.SW.011(1) 824 5.0T3 824 PASCAL/SLAC.SNAPSHOT.SW.011 1 LINE 80 10 PAGE UM UNSP FEB. 10, 1980 18:15:22 5.0T8 203 0 THE SYMBOLIC DUMP PACKAGE. IT MAY BE CALLED BY USER PROGRAMS, OR THE SYSTEM IN CASE OF A RUN ERROR. 0 Referenced by comments of: 793/8 1 SUN SEP 08/96 15:24:55 Page 587 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00793/012 PASCAL/SLAC SNAPSHOT OE O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.SNAPSHOT.OE.012(1) 825 5.0T3 825 PASCAL/SLAC.SNAPSHOT.OE.012 1 LINE 73 7 PAGE UM UNSP FEB. 10, 1980 18:15:39 5.0T8 204 00793/013 PASCAL/SLAC PROFILE SW O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PROFILE.SW.013(1) 826 5.0T3 826 PASCAL/SLAC.PROFILE.SW.013 1 LINE 80 5 PAGE UM UNSP FEB. 10, 1980 18:14:30 5.0T8 205 0 THE PROFILER, WHEN USED WITH THE $F+ COMPILER OPTION, PRODUCES A LISTING OF THE PROGRAM WITH EXECUTION COUNTS FOR EACH STATEMENT. 00793/014 PASCAL/SLAC PROFILE OE O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.PROFILE.OE.014(1) 827 5.0T3 827 PASCAL/SLAC.PROFILE.OE.014 1 LINE 13836 5 PAGE UM UNSP FEB. 10, 1980 18:14:59 5.0T8 206 00793/015 PASCAL/SLAC TESTLIB SW O S1560 5.0T3 VLO FSNAME=PASCAL/SLAC.TESTLIB.SW.015(1) 828 5.0T3 828 PASCAL/SLAC.TESTLIB.SW.015 1 LINE 80 351 PAGE UM UNSP FEB. 10, 1980 18:45:20 5.0T8 207 0 SEVERAL TEST AND UTILITY PROGRAMS WHICH COME WITH THE STANFORD PASCAL COMPILER. SEVERAL OF THESE MAY BE USEFUL WITH OTHER PASCAL COMPILERS OR PERHAPS BY THEMSELVES. 00794/001A *SDL COMPILER SS G WSG:SDL.COMP.SS 5.1T2 244 SDL.COMPILER.SS.001 1 LINE 124 9 PAGE UM WSG JULY 23, 1983 13:29:48 0 The survey definition language (SDL) consists of a compiler, written in SPITBOL, which will compile a survey definition, written in SDL, producing an object deck which, when run with a run-time interpreter, will conduct the specified survey interactively for a terminal user. The compiler reads the survey definition on SCARDS and produces an object deck on SPUNCH followed by a "$CONTINUE WITH *SDLLIB" line. The compiler dynamically loads three external routines (794/4) from the file *SDLLIB (794/6). ********************************************************************** Changes since D5.0: 1. Added the READ statement to allow manipulation of existing data records. 2. Added the WRITE statement as a synonym for OUTPUT which has been removed from the documentation. 3. Changed the compiler so that it links to ASMH directly to produce an object deck, rather than requiring the user to assemble the compiler output. 4. Compiler error messages now give the MTS line number of the statement in error. 5. Added IF/ELSEIF/ESLE/ENDIF constructs. 6. READ statement modified to use the field value as a binary line number if the field is exactly four characters long and if its character value does not constitute a valid MTS line number. 7. Released for general use with the addition of user documentation (794/7). 1 SUN SEP 08/96 15:24:55 Page 588 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ********************************************************************** 0 Referenced by comments of: 794/3, 794/9 00794/002 *SDL SIZE150 SA G S0792 WSGFS FSNAME=SIZE150 5.0T3 830 SURVEY_GENERATOR.SIZE150.SA.002 1 LINE 80 1 PAGE UM WSG AUG. 29, 1980 12:06:01 5.0T8 209 0 Program to call a SPITBOL object module with PAR=SIZE=150. It avoids having to require the user of *SDL to specify PAR=SIZE=150 when running the compiler. Source at lines 1,999; object at 1000. 0 Referenced by comments of: 461/12, 794/3 00794/003A *SDL COMPILER OE G *SDL 5.1T2 245 SDL.COMPILER.OE.003 1 LINE 21444 10 PAGE UM WSG JULY 23, 1983 13:29:49 *SDL 0 Object for (794/2) and (794/1). Ends with a "$CONTINUE WITH *SPITLIB" line. 00794/004C *SDL COMPILER RTNS SA G WSG:SDL.LIB.SA 5.1T2 246 SDL.COMPILER_RTNS.SA.004 1 LINE 69 2 PAGE UM WSG JULY 23, 1983 13:29:50 0 Source for three external routines used by the compiler: (1) SDLCRE makes sure that file -SDL.I.SA is empty. This file is used by the compiler to store the assembly language code it produces. (2) SDLINP reads input from SCARDS and returns it to the compiler with the line number (in external form) prefixed to the beginning of each record. (3) SDLASM links to ASMH to assemble the generated program. The object for these routines is in *SDLLIB (794/6). 0 Referenced by comments of: 794/1, 794/6 00794/005A *SDL INTERPRETER SG G WSG:SDL.LIB.SG 5.1T2 247 SDL.INTERPRETER.SG.005 1 LINE 96 8 PAGE UM WSG JULY 23, 1983 13:29:50 0 GOM source for the SDL interpreter. The object for the interpreter is in *SDLLIB (794/6). 0 Referenced by comments of: 794/6 00794/006A *SDL LIBRARY OE G *SDLLIB 5.1T2 248 SDL.LIBRARY.OE.006 1 LINE 16288 7 PAGE UM WSG JULY 23, 1983 13:29:51 *SDLLIB 0 *SDL library consisting of object from the compiler external routines (794/4) and the run-time interpreter (794/5). 1 SUN SEP 08/96 15:24:55 Page 589 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 794/1, 794/4, 794/5 00794/007C *SDL MEMO 452 WF S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO452.SOU 5.1T2 249 SDL.MEMO_452.WF.007 1 LINE 78 10 PAGE UM WSG JUNE 06, 1983 15:28:26 0 This is Computing Center Memo 452 -- "Survey Definition Language: SDL." 0 Referenced by comments of: 794/1, 794/8 00794/008C *SDL MEMO 452 PF S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO452.OUT 5.1T2 250 SDL.MEMO_452.PF.008 1 LINE 71 12 PAGE UM WSG JUNE 06, 1983 15:28:39 0 Printer-ready version of (794/7). 00794/009 *SDL UM SURV DES #1 S G S0792 WSGFS FSNAME=SURV80.S1 5.0T3 834 SURVEY_GENERATOR.UM_SURV.S.006 1 LINE 94 9 PAGE UM WSG AUG. 29, 1980 12:36:16 5.0T8 213 0 This file is an example of a fairly large survey description; it is the February 1980 General User Survey taken at UM. If you wish to try this survey, you should first change the file name on the OUTPUT statement which appears near the end of the survey description to the name of an appropriate file where the data record produced by running the survey may be written. You should then compile the description using (794/1) and run the resulting object deck. 0 Referenced by comments of: 794/10, 794/11 00794/010 *SDL UM SURV DES #2 S G S0792 WSGFS FSNAME=SURV80.S2 5.0T3 835 SURVEY_GENERATOR.UM_SURV.S.007 1 LINE 94 5 PAGE UM WSG AUG. 29, 1980 12:37:01 5.0T8 214 0 This survey description is for the same survey as (794/9), but it has much of the verbosity removed so that it can be easily used to enter responses from printed copies of the survey. To retain a unique identity to each written survey response, they were numbered as received and the number placed in the data record in the field used for the MTS user id in the online version. In this way, it was possible to go back to the written response later to verify that the data was entered correctly and to ensure that the same survey was not tabulated more than once. The responses to the printed surveys were entered by members of the secretarial staff. 00794/011 *SDL UM SURV PRINT WF S0792 WSGFS FSNAME=SURV80.WF 5.0T3 836 SURVEY_GENERATOR.UM_SURV.WF.008 1 LINE 76 7 PAGE UM WSG AUG. 29, 1980 12:37:28 5.0T8 215 0 FORMAT source for the printed version of the same survey as (794/9). 00794/012 *SDL UM SURV MIDAS C S0792 WSGFS FSNAME=SURV80.MIDAS 5.0T3 837 SURVEY_GENERATOR.UM_SURV.C.009 1 LINE 68 1 PAGE UM WSG AUG. 29, 1980 12:38:19 5.0T8 216 0 MTS and MIDAS commands to analyze the data from the 1980 UM General User Survey. It also runs the SURVEY.CVT program (794/13) to extract the MIDAS 1 SUN SEP 08/96 15:24:55 Page 590 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 results and convert them to a FORMAT macro suitable for inclusion in a writeup describing the results of the survey. 00794/013 *SDL SURVEY.CVT PGM SS S0792 WSGFS FSNAME=SURVEY.CVT 5.0T3 838 SURVEY_GENERATOR.SURVEY.C.SS.010 1 LINE 128 1 PAGE UM WSG AUG. 29, 1980 12:33:00 5.0T8 217 0 SPITBOL program to scan through MIDAS output looking for specific numerical results and converting them into a FORMAT macro which can be included in a writeup describing the results of the analysis. 0 Referenced by comments of: 794/12 00794/014 *SDL UM SURV RESULT WF S0792 WSGFS FSNAME=SURV80.RESULTS.WF 5.0T3 839 SURVEY_GENERATOR.UM_SURV.WF.011 1 LINE 109 10 PAGE UM WSG AUG. 29, 1980 12:41:13 5.0T8 218 0 FORMAT source for the results of the analysis of the UM 1980 General User Survey. 00795/001 CANREPLY DUMMY SA G UNSP:CANREPLY(*F,0) 5.0T3 840 CANREPLY_DUMMY..SA.001 1 LINE 22 1 PAGE UM UNSP JULY 03, 1981 20:01:19 5.0T8 219 0 THIS IS A DUMMY VERSION OF CANREPLY, DISTRIBUTED AS A PART OF MTS, THAT ALWAYS RETURNS FALSE. IT IS INTENDED FOR TESTING PROGRAMS WITH BATCH OPTIONS FROM A TERMINAL. 00795/002 CANREPLY DUMMY O G UNSP:CANREPLY(1) 5.0T3 841 CANREPLY_DUMMY..O.002 1 LINE 80 1 PAGE UM UNSP JULY 03, 1981 20:01:20 5.0T8 220 00795/003 CANREPLY DUMMY WF S1153 UNSP VLO FSNAME=CANREPLY.FMT 5.0T3 842 CANREPLY_DUMMY..WF.003 1 LINE 67 1 PAGE UM UNSP SEP. 15, 1980 16:24:26 5.0T8 221 00796/001 ENCODE/DECODE ENCODE SA G S1153 UNSP VLO FSNAME=ENCODE.ASM 5.0T3 843 ENCODE/DECODE.ENCODE.SA.001 1 LINE 70 4 PAGE UM UNSP SEP. 15, 1980 16:42:53 5.0T8 222 0 THIS COMPONENT CONTAINS MODIFIED VERSIONS OF *ENCODE (543) AND *DECODE (541) FOR USE WITH REMOTE MINICOMPUTERS. THIS SUBCOMPONENT CONTAINS THE SOURCE FOR THE MODIFIED *ENCODE. 00796/002 ENCODE/DECODE ENCODE OC G UNSP:ENCODE 5.0T3 844 ENCODE/DECODE.ENCODE.OC.002 1 LINE 1040 1 PAGE UM UNSP JULY 03, 1981 20:01:28 5.0T8 223 0 Contains a $CONTINUE WITH UNSP:LIBRARY (685/2) record. 0 Referenced by comments of: 796/3 1 SUN SEP 08/96 15:24:55 Page 591 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00796/003 ENCODE/DECODE ENCODE P UNSP:ENCODE.W 5.0T3 845 ENCODE/DECODE.ENCODE.P.003 1 LINE 75 1 PAGE UM UNSP JULY 03, 1981 20:01:29 5.0T8 224 0 A DESCRIPTION OF THE USE OF UNSP:ENCODE (796/2). 00796/004 ENCODE/DECODE DECODE SA G S1153 UNSP VLO FSNAME=DECODE.ASM 5.0T3 846 ENCODE/DECODE.DECODE.SA.004 1 LINE 77 3 PAGE UM UNSP SEP. 15, 1980 16:42:44 5.0T8 225 0 THIS SUBCOMPONENT CONTAINS THE SOURCE FOR THE MODIFIED *DECODE (541). 00796/005 ENCODE/DECODE DECODE OC G UNSP:DECODE 5.0T3 847 ENCODE/DECODE.DECODE.OC.005 1 LINE 664 1 PAGE UM UNSP JULY 03, 1981 20:01:30 5.0T8 226 0 Contains a $CONTINUE WITH UNSP:LIBRARY (685/2) record. 0 Referenced by comments of: 796/6 00796/006 ENCODE/DECODE DECODE P G UNSP:DECODE.W 5.0T3 848 ENCODE/DECODE.DECODE.P.006 1 LINE 75 1 PAGE UM UNSP JULY 03, 1981 20:01:31 5.0T8 227 0 A DESCRIPTION OF THE USE OF UNSP:DECODE (796/5). 00796/007 ENCODE/DECODE NOTE P G UNSP:ENCODE/DE.W 5.0T3 849 ENCODE/DECODE.NOTE.P.007 1 LINE 71 3 PAGE UM UNSP JULY 03, 1981 20:01:32 5.0T8 228 0 A NOTE DESCRIBING THE USE OF ENCODE AND DECODE AT UM'S SPACE PHYSICS RESEARCH LAB. 00797/001 TRANSLATION ROUTINES # (NOW IN SEG2:TRTABLES -- COMP. 779/4) 5.0T3 850 TRANSLATION_ROUTINES..SA.001 1 LINE 68 1 PAGE UM MAY 22, 1981 07:53:37 5.0T8 229 0 SUBROUTINES FOR USE FROM FORTRAN AND PASCAL WHICH TRANSLATE BUFFERS USING THE STANDARD TRANSLATION TABLES CASECONV, ASCEBC, AND EBCASC. 00798/001A MESSAGE SYSTEM INSTALL NOTES WF G MAIL:DIST.NOTES 5.1T2 251 MESSAGE_SYSTEM.INSTALL_NO.WF.001 1 LINE 84 5 PAGE UM STERKEN JULY 23, 1983 13:29:59 0 This is the official version of $MESSAGESYSTEM. It is now fully supported and may be released to users. The MESSAGESYSTEM requires *USERDIRECTORY. It will make it much easier to install the MESSAGESYSTEM if the CCID "MAIL" is created. Subcomponents of the MESSAGESYSTEM should be restored to the file names used on this distribution. Documentation for the MESSAGESYSTEM may be found in Memo 444 (798/119) and MTS Volume 1 (504). This subcomponent contains installation notes for $MESSAGESYSTEM. 1 SUN SEP 08/96 15:24:55 Page 592 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ***************************************************************************** D5.0C version: This subcomponent contains the instructions for the installing the D5.0C version of $MESSAGESYSTEM. ***************************************************************************** 0 Referenced by comments of: 559/1, 659/18, 798/9 00798/002A MESSAGE SYSTEM CHANGES WF G MAIL:DIST.CHANGES 5.1T2 252 MESSAGE_SYSTEM.CHANGES.WF.002 1 LINE 72 4 PAGE UM STERKEN JULY 23, 1983 13:30:00 0 Log of $MESSAGESYSTEM changes since the last distribution. 00798/003A MESSAGE SYSTEM *CLSMESSAGESYS OE G *CLSMESSAGESYS 5.1T2 253 MESSAGE_SYSTEM.?CLSMESSAG.OE.003 1 LINE 12219 38 PAGE UM STERKEN JULY 23, 1983 13:30:00 *CLSMESSAGESYS 0 The MESSAGESYSTEM CLS object module. This file is loaded into shared VM by PISTLE (559). Should be permitted U/R, U MAIL. Contains $CONTINUE WITHS to *MESSSUBS (798/4) and SEG2:TIME (360). 0 Referenced by comments of: 798/4, 798/16, 798/21, 798/43 00798/004A MESSAGE SYSTEM *MESSSUBS OE G *MESSSUBS 5.1T2 254 MESSAGE_SYSTEM.?MESSSUBS.OE.004 1 LINE 32767 44 PAGE UM STERKEN JULY 23, 1983 13:30:02 *MESSSUBS 0 MESSAGESYSTEM Subroutine Interface object module. This file is loaded into shared VM by PISTLE (559). Should be permitted U/R, U MAIL. *MESSSUBS should be loaded before *CLSMESSAGESYS (798/3) by PISTLE (559). Contains a $CONTINUE WITH *LIBRARY (524/1) record. 0 Referenced by comments of: 798/3, 798/16, 798/21, 798/41, 798/43 00798/005A MESSAGE SYSTEM MSG CLS OE G MAIL:MESSCLS 5.1T2 255 MESSAGE_SYSTEM.MSG_CLS.OE.005 1 LINE 12219 38 PAGE UM STERKEN JULY 23, 1983 13:30:03 0 A complete set of $MESSAGESYSTEM CLS object modules. (798/10) and (798/11) are command files which may be used to compile this component. (798/17) is a command file for linkediting it. 0 Referenced by comments of: 798/16, 798/17 00798/006A MESSAGE SYSTEM SUBR INTERFACE OE G MAIL:MESSSUB 5.1T2 256 MESSAGE_SYSTEM.SUBR_INTER.OE.006 1 LINE 10343 53 PAGE UM STERKEN JULY 23, 1983 13:30:04 0 A complete set of $MESSAGESYSTEM subroutine interface object modules. (798/12) and (798/13) are command files which may be used to compile this subcomponent. (798/18) is a command file for linkediting it. 0 Referenced by comments of: 798/16, 798/18 1 SUN SEP 08/96 15:24:55 Page 593 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/007A MESSAGE SYSTEM *MSGUTIL OE G *MSGUTIL 5.1T2 257 MESSAGE_SYSTEM.?MSGUTIL.OE.007 1 LINE 32767 56 PAGE UM STERKEN JULY 23, 1983 13:30:06 *MSGUTIL 0 Public file version of MSGUTIL (798/8). Loaded by (798/19). This file should be permitted U/N, R (PKEY=*MTS.RUN, PKEY=*MTS.FILESTA), with PKEY=*MSGUTIL. 0 Referenced by comments of: 798/14, 798/15, 798/19, 798/20, 798/23, 798/77, 798/79, 798/81, 798/83, 798/98 00798/008A MESSAGE SYSTEM MSGUTIL OE G MAIL:MSGUTIL 5.1T2 258 MESSAGE_SYSTEM.MSGUTIL.OE.008 1 LINE 16715 67 PAGE UM STERKEN JULY 23, 1983 13:30:08 MAIL:MSGUTIL 0 Linkedited object of the $MESSAGESYSTEM utilities. (798/14) and (798/15) are command files which may be used to compile/assemble these components. (798/20) is a command file for linkeditting it. 0 Referenced by comments of: 798/7 00798/009A MESSAGE SYSTEM *MESSAGES D G # MTS.:TST.MESSAGES UM STERKEN MAIL:*MESSAGES 0 This is the default system message file, which is not distributed. The distribution notes (798/1) contain instructions for setting up this message file. It should be permitted U/N, RW (PKEY=*SYS.MESSAGE). 0 Referenced by comments of: 798/110 00798/010A MESSAGE SYSTEM CLS COMPILE C G MAIL:CLS.COMPILE 5.1T2 259 MESSAGE_SYSTEM.CLS_COMPIL.C.010 1 LINE 118 1 PAGE UM STERKEN JULY 23, 1983 13:30:10 0 A command file to be $SOURCEd to for compiling all the CLS components. Listings are sent to *PRINT*. 0 Referenced by comments of: 798/5 00798/011A MESSAGE SYSTEM CLS COMPILE C G MAIL:CLS.XCOMPILE 5.1T2 260 MESSAGE_SYSTEM.CLS_COMPIL.C.011 1 LINE 118 1 PAGE UM STERKEN JULY 23, 1983 13:30:11 0 A command file to be $SOURCEd to for compiling all the CLS components. No listings are sent to *PRINT*. 0 Referenced by comments of: 798/5 00798/012A MESSAGE SYSTEM SUBR COMPILE C G MAIL:SUB.COMPILE 5.1T2 261 MESSAGE_SYSTEM.SUBR_COMPI.C.012 1 LINE 118 1 PAGE UM STERKEN JULY 23, 1983 13:30:11 0 A command file to be $SOURCEd to for compiling all the MSG subroutine components. Listings are sent to *PRINT*. 0 Referenced by comments of: 798/6 1 SUN SEP 08/96 15:24:55 Page 594 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/013A MESSAGE SYSTEM SUBR COMPILE C G MAIL:SUB.XCOMPILE 5.1T2 262 MESSAGE_SYSTEM.SUBR_COMPI.C.013 1 LINE 118 1 PAGE UM STERKEN JULY 23, 1983 13:30:11 0 A command file to be $SOURCEd to for compiling all the MSG subroutine components. No listings are sent to *PRINT*. 0 Referenced by comments of: 798/6 00798/014A MESSAGE SYSTEM UTIL COMPILE C G MAIL:UTIL.COMPILE 5.1T2 263 MESSAGE_SYSTEM.UTIL_COMPI.C.014 1 LINE 122 1 PAGE UM STERKEN JULY 23, 1983 13:30:11 0 A command file to be $SOURCEd to for compiling all the *MSGUTIL (798/7) components. Listings are sent to *PRINT*. 0 Referenced by comments of: 798/8 00798/015A MESSAGE SYSTEM UTIL COMPILE C G MAIL:UTIL.XCOMPILE 5.1T2 264 MESSAGE_SYSTEM.UTIL_COMPI.C.015 1 LINE 122 1 PAGE UM STERKEN JULY 23, 1983 13:30:12 0 A command file to be $SOURCEd to for compiling all the *MSGUTIL (798/7) components. No listings are sent to *PRINT*. 0 Referenced by comments of: 798/8 00798/016A MESSAGE SYSTEM LOAD SEG2 C G MAIL:SO.LOADSEG2 5.1T2 265 MESSAGE_SYSTEM.LOAD_SEG2.C.016 1 LINE 66 2 PAGE UM STERKEN JULY 23, 1983 13:30:12 0 A command file to be $SOURCEd to for loading a new $MESSAGESYSTEM in shared memory. (798/3) and (798/4) are updated. It is assumed that (798/5) and (798/6) are already set up. 0 Referenced by comments of: 798/41 00798/017A MESSAGE SYSTEM LINK CLS C G MAIL:SO.LINKCLS 5.1T2 266 MESSAGE_SYSTEM.LINK_CLS.C.017 1 LINE 91 1 PAGE UM STERKEN JULY 23, 1983 13:30:12 0 A command file to be $SOURCEd to for linkediting all the CLS components. The linkedited deck is placed in (798/5). 0 Referenced by comments of: 798/5 00798/018A MESSAGE SYSTEM LINK SUBR C G MAIL:SO.LINKSUB 5.1T2 267 MESSAGE_SYSTEM.LINK_SUBR.C.018 1 LINE 104 1 PAGE UM STERKEN JULY 23, 1983 13:30:12 0 A command file to be $SOURCEd to for linkediting all the MSG subroutine subcomponents. The linkedited deck is placed in (798/6). 0 Referenced by comments of: 798/6 00798/019A MESSAGE SYSTEM LOAD SUBR C G MAIL:SO.LOADUTIL 5.1T2 268 MESSAGE_SYSTEM.LOAD_SUBR.C.019 1 LINE 55 1 PAGE UM STERKEN JULY 23, 1983 13:30:12 0 A command file to be $SOURCEd to for installing a new version of *MSGUTIL (798/7) in the file *MSGUTIL. 1 SUN SEP 08/96 15:24:55 Page 595 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 798/7 00798/020A MESSAGE SYSTEM LINK UTIL C G MAIL:SO.LINKUTIL 5.1T2 269 MESSAGE_SYSTEM.LINK_UTIL.C.020 1 LINE 129 1 PAGE UM STERKEN JULY 23, 1983 13:30:13 0 A command file to be $SOURCEd to for linkediting all the *MSGUTIL components. The linkedited deck is placed in *MSGUTIL (798/7). 0 Referenced by comments of: 798/8 00798/021A MESSAGE SYSTEM TEST CLS C G MAIL:SO.CLSTEST 5.1T2 270 MESSAGE_SYSTEM.TEST_CLS.C.021 1 LINE 68 1 PAGE UM STERKEN JULY 23, 1983 13:30:13 0 This is a command file to be $SOURCEd to for $DEBUGging a test version of the complete MESSAGESYSTEM: CLS, *CLSMESSAGESYS (798/3), and subroutines, *MESSSUBS (798/4). Contains a $CONTINUE WITH MAIL:STDTV.0 (798/25) record. 0 Referenced by comments of: 798/24 00798/022A MESSAGE SYSTEM TEST CLS C G MAIL:SO.CLSTEST2 5.1T2 271 MESSAGE_SYSTEM.TEST_CLS.C.022 1 LINE 42 1 PAGE UM STERKEN JULY 23, 1983 13:30:13 0 A command file to be $SOURCEd to for $DEBUGging just the CLS (using the resident message subroutines). Contains a $CONTINUE WITH MAIL:STDTV.O (798/25) record. 00798/023A MESSAGE SYSTEM TEST UTIL C G MAIL:SO.UTILTEST 5.1T2 272 MESSAGE_SYSTEM.TEST_UTIL.C.023 1 LINE 133 1 PAGE UM STERKEN JULY 23, 1983 13:30:13 0 A command file to be $SOURCEd to for $DEBUGging a test version of *MSGUTIL (798/7). Contains a $CONTINUE WITH MAIL:STDTV.O (798/25) record. 0 Referenced by comments of: 798/122 00798/024C MESSAGE SYSTEM STDTV SA G MAIL:STDTV.S 5.1T2 273 MESSAGE_SYSTEM.STDTV.SA.024 1 LINE 123 1 PAGE UM STERKEN JULY 23, 1983 13:30:14 0 Alternate version of CLS Tranfer Vector used for debugging $MESSAGE under SDS as a user program. See (798/21). Assemble with (798/108), COPY:MTS.MACROS (344/3), *SYSMAC and with PAR=PEXIT=*PEXIT,BATCH,TEST. 00798/025C MESSAGE SYSTEM STDTV OC G MAIL:STDTV.O 5.1T2 274 MESSAGE_SYSTEM.STDTV.OC.025 1 LINE 80 3 PAGE UM STERKEN JULY 23, 1983 13:30:14 0 Referenced by comments of: 798/21, 798/22, 798/23 00798/026A MESSAGE SYSTEM LIST C G MAIL:SO.FILELIST 5.1T2 275 MESSAGE_SYSTEM.LIST.C.026 1 LINE 140 3 PAGE UM STERKEN JULY 23, 1983 13:30:14 0 A command file to be $SOURCEd to for printing source listings of all of the source components of the MESSAGESYSTEM. 1 SUN SEP 08/96 15:24:55 Page 596 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/027A MESSAGE SYSTEM MAIN SG G MAIL:CLS.MAIN.S 5.1T2 276 MESSAGE_SYSTEM.MAIN.SG.027 1 LINE 111 17 PAGE UM STERKEN JULY 23, 1983 13:30:14 0 This is the main program for the $MESSAGESYSTEM CLS. 00798/028A MESSAGE SYSTEM MAIN OC G MAIL:CLS.MAIN.O 5.1T2 277 MESSAGE_SYSTEM.MAIN.OC.028 1 LINE 3731 26 PAGE UM STERKEN JULY 23, 1983 13:30:16 00798/029A MESSAGE SYSTEM CLS CMDS SG G MAIL:CLS.CMDS.S 5.1T2 278 MESSAGE_SYSTEM.CLS_CMDS.SG.029 1 LINE 147 37 PAGE UM STERKEN JULY 23, 1983 13:30:17 0 The CLS commands. 00798/030A MESSAGE SYSTEM CLS CMDS OC G MAIL:CLS.CMDS.O 5.1T2 279 MESSAGE_SYSTEM.CLS_CMDS.OC.030 1 LINE 10760 55 PAGE UM STERKEN JULY 23, 1983 13:30:21 00798/031A MESSAGE SYSTEM CLS UTIL SG G MAIL:CLS.UTIL.S 5.1T2 280 MESSAGE_SYSTEM.CLS_UTIL.SG.031 1 LINE 217 60 PAGE UM STERKEN JULY 23, 1983 13:30:24 0 Miscellaneous utility routines used throughout the CLS. 00798/032A MESSAGE SYSTEM CLS UTIL OC G MAIL:CLS.UTIL.O 5.1T2 281 MESSAGE_SYSTEM.CLS_UTIL.OC.032 1 LINE 11667 120 PAGE UM STERKEN JULY 23, 1983 13:30:28 00798/033A MESSAGE SYSTEM CLS KWS XFACE SA G MAIL:CLS.KWS.S 5.1T2 282 MESSAGE_SYSTEM.CLS_KWS_XF.SA.033 1 LINE 127 36 PAGE UM STERKEN JULY 23, 1983 13:30:32 0 Interface to KWSCAN (040) for CLS commands. Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. 00798/034A MESSAGE SYSTEM CLS KWS XFACE OC G MAIL:CLS.KWS.O 5.1T2 283 MESSAGE_SYSTEM.CLS_KWS_XF.OC.034 1 LINE 4315 21 PAGE UM STERKEN JULY 23, 1983 13:30:35 00798/035A MESSAGE SYSTEM CLS ASMB RTNS SA G MAIL:CLS.ASM.S 5.1T2 284 MESSAGE_SYSTEM.CLS_ASMB_R.SA.035 1 LINE 127 6 PAGE UM STERKEN JULY 23, 1983 13:30:36 0 Miscellaneous assembly routines used by the CLS. Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. 00798/036A MESSAGE SYSTEM CLS ASMB RTNS OC G MAIL:CLS.ASM.O 5.1T2 285 MESSAGE_SYSTEM.CLS_ASMB_R.OC.036 1 LINE 80 5 PAGE UM STERKEN JULY 23, 1983 13:30:36 00798/037A MESSAGE SYSTEM CLS DRIVER SG G MAIL:CLSDRIVER.S 5.1T2 286 MESSAGE_SYSTEM.CLS_DRIVER.SG.037 1 LINE 102 1 PAGE UM STERKEN JULY 23, 1983 13:30:36 0 Used for $DEBUGging $MESSAGESYSTEM. Fakes CLS environment. 1 SUN SEP 08/96 15:24:55 Page 597 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/038A MESSAGE SYSTEM CLS DRIVER OC G MAIL:CLSDRIVER.O 5.1T2 287 MESSAGE_SYSTEM.CLS_DRIVER.OC.038 1 LINE 80 2 PAGE UM STERKEN JULY 23, 1983 13:30:37 00798/039A MESSAGE SYSTEM ENTRY SA G MAIL:CLSINTF.S 5.1T2 288 MESSAGE_SYSTEM.ENTRY.SA.039 1 LINE 98 3 PAGE UM STERKEN JULY 23, 1983 13:30:37 0 The "real" entry point to $MESSAGESYSTEM. Sets up the stack environment for GOM (659). 00798/040A MESSAGE SYSTEM ENTRY OC G MAIL:CLSINTF.O 5.1T2 289 MESSAGE_SYSTEM.ENTRY.OC.040 1 LINE 80 3 PAGE UM STERKEN JULY 23, 1983 13:30:37 00798/041A MESSAGE SYSTEM MSGSUB TV SA G MAIL:MESSSUBS.S 5.1T2 290 MESSAGE_SYSTEM.MSGSUB_TV.SA.041 1 LINE 75 1 PAGE UM STERKEN JULY 23, 1983 13:30:37 0 Transfer vector placed at the front of *MESSSUBS (798/4) by (798/16). This is the entry point to *MESSSUBS. It allows MTS to find all of the subroutines with one call during $SIGNON processing. 00798/042A MESSAGE SYSTEM MSGSUB TV OC G MAIL:MESSSUBS.O 5.1T2 291 MESSAGE_SYSTEM.MSGSUB_TV.OC.042 1 LINE 80 1 PAGE UM STERKEN JULY 23, 1983 13:30:38 00798/043A MESSAGE SYSTEM MSGLCS SA G MAIL:MESSLCS.S 5.1T2 292 MESSAGE_SYSTEM.MSGLCS.SA.043 1 LINE 60 1 PAGE UM STERKEN JULY 23, 1983 13:30:38 0 Low-core symbol table included in *MESSSUBS (798/4). Contains entries to locate common subroutines needed by both the CLS, *CLSMESSAGESYS (798/3), and the subroutines, *MESSSUBS (798/4). 00798/044A MESSAGE SYSTEM MSGLCS OC G MAIL:MESSLCS.O 5.1T2 293 MESSAGE_SYSTEM.MSGLCS.OC.044 1 LINE 80 2 PAGE UM STERKEN JULY 23, 1983 13:30:38 00798/045A MESSAGE SYSTEM MSGOPEN SG G MAIL:MSGOPEN.S 5.1T2 294 MESSAGE_SYSTEM.MSGOPEN.SG.045 1 LINE 101 2 PAGE UM STERKEN JULY 23, 1983 13:30:38 0 The MSGOPEN subroutine. 00798/046A MESSAGE SYSTEM MSGOPEN OC G MAIL:MSGOPEN.O 5.1T2 295 MESSAGE_SYSTEM.MSGOPEN.OC.046 1 LINE 612 4 PAGE UM STERKEN JULY 23, 1983 13:30:38 00798/047A MESSAGE SYSTEM MSGCTL SG G MAIL:MSGCTL.S 5.1T2 296 MESSAGE_SYSTEM.MSGCTL.SG.047 1 LINE 130 49 PAGE UM STERKEN JULY 23, 1983 13:30:39 0 The MSGCTL subroutine. 00798/048A MESSAGE SYSTEM MSGCTL OC G MAIL:MSGCTL.O 5.1T2 297 MESSAGE_SYSTEM.MSGCTL.OC.048 1 LINE 10343 87 PAGE UM STERKEN JULY 23, 1983 13:30:43 00798/049A MESSAGE SYSTEM MSGINF SG G MAIL:MSGINF.S 5.1T2 298 MESSAGE_SYSTEM.MSGINF.SG.049 1 LINE 114 14 PAGE UM STERKEN JULY 23, 1983 13:30:46 0 The MSGINF subroutine. 0 Referenced by comments of: 798/109 1 SUN SEP 08/96 15:24:55 Page 598 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/050A MESSAGE SYSTEM MSGINF OC G MAIL:MSGINF.O 5.1T2 299 MESSAGE_SYSTEM.MSGINF.OC.050 1 LINE 9563 9 PAGE UM STERKEN JULY 23, 1983 13:30:47 00798/051A MESSAGE SYSTEM MSGGET SG G MAIL:MSGGET.S 5.1T2 300 MESSAGE_SYSTEM.MSGGET.SG.051 1 LINE 107 3 PAGE UM STERKEN JULY 23, 1983 13:30:48 0 The MSGGET subroutine. 00798/052A MESSAGE SYSTEM MSGGET OC G MAIL:MSGGET.O 5.1T2 301 MESSAGE_SYSTEM.MSGGET.OC.052 1 LINE 80 6 PAGE UM STERKEN JULY 23, 1983 13:30:48 00798/053A MESSAGE SYSTEM MSGPUT SG G MAIL:MSGPUT.S 5.1T2 302 MESSAGE_SYSTEM.MSGPUT.SG.053 1 LINE 107 3 PAGE UM STERKEN JULY 23, 1983 13:30:48 0 The MSGPUT subroutine. 00798/054A MESSAGE SYSTEM MSGPUT OC G MAIL:MSGPUT.O 5.1T2 303 MESSAGE_SYSTEM.MSGPUT.OC.054 1 LINE 80 7 PAGE UM STERKEN JULY 23, 1983 13:30:48 00798/055A MESSAGE SYSTEM MSGGUI SG G MAIL:MSGGUI.S 5.1T2 304 MESSAGE_SYSTEM.MSGGUI.SG.055 1 LINE 97 2 PAGE UM STERKEN JULY 23, 1983 13:30:49 0 The MSGGUI subroutine. 00798/056A MESSAGE SYSTEM MSGGUI OC G MAIL:MSGGUI.O 5.1T2 305 MESSAGE_SYSTEM.MSGGUI.OC.056 1 LINE 80 5 PAGE UM STERKEN JULY 23, 1983 13:30:49 00798/057A MESSAGE SYSTEM MSGCUI SG G MAIL:MSGCUI.S 5.1T2 306 MESSAGE_SYSTEM.MSGCUI.SG.057 1 LINE 97 2 PAGE UM STERKEN JULY 23, 1983 13:30:49 0 The MSGCUI subroutine. 00798/058A MESSAGE SYSTEM MSGCUI OC G MAIL:MSGCUI.O 5.1T2 307 MESSAGE_SYSTEM.MSGCUI.OC.058 1 LINE 80 5 PAGE UM STERKEN JULY 23, 1983 13:30:50 00798/059A MESSAGE SYSTEM MSGRCV SG G MAIL:MSGRCV.S 5.1T2 308 MESSAGE_SYSTEM.MSGRCV.SG.059 1 LINE 34 1 PAGE UM STERKEN JULY 23, 1983 13:30:50 0 The MSGRCV subroutine (not written yet). 00798/060A MESSAGE SYSTEM MSGRCV OC G MAIL:MSGRCV.O 5.1T2 309 MESSAGE_SYSTEM.MSGRCV.OC.060 1 LINE 34 1 PAGE UM STERKEN JULY 23, 1983 13:30:50 00798/061A MESSAGE SYSTEM MSGSND SG G MAIL:MSGSND.S 5.1T2 310 MESSAGE_SYSTEM.MSGSND.SG.061 1 LINE 34 1 PAGE UM STERKEN JULY 23, 1983 13:30:50 0 The MSGSND subroutine (not written yet). 00798/062A MESSAGE SYSTEM MSGSND OC G MAIL:MSGSND.O 5.1T2 311 MESSAGE_SYSTEM.MSGSND.OC.062 1 LINE 34 1 PAGE UM STERKEN JULY 23, 1983 13:30:50 1 SUN SEP 08/96 15:24:55 Page 599 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/063A MESSAGE SYSTEM MSGDSP SG G MAIL:MSGDSP.S 5.1T2 312 MESSAGE_SYSTEM.MSGDSP.SG.063 1 LINE 34 1 PAGE UM STERKEN JULY 23, 1983 13:30:50 0 The MSGDSP subroutine (not written yet). 00798/064A MESSAGE SYSTEM MSGDSP OC G MAIL:MSGDSP.O 5.1T2 313 MESSAGE_SYSTEM.MSGDSP.OC.064 1 LINE 34 1 PAGE UM STERKEN JULY 23, 1983 13:30:51 00798/065A MESSAGE SYSTEM SUBR UTILS SG G MAIL:SUB.UTIL.S 5.1T2 314 MESSAGE_SYSTEM.SUBR_UTILS.SG.065 1 LINE 202 62 PAGE UM STERKEN JULY 23, 1983 13:30:51 0 Miscellaneous utility routines used by the MSG subroutines. 00798/066A MESSAGE SYSTEM SUBR UTILS OC G MAIL:SUB.UTIL.O 5.1T2 315 MESSAGE_SYSTEM.SUBR_UTILS.OC.066 1 LINE 4196 167 PAGE UM STERKEN JULY 23, 1983 13:30:55 00798/067A MESSAGE SYSTEM SUB KWS XFACE SA G MAIL:SUB.KWS.S 5.1T2 316 MESSAGE_SYSTEM.SUB_KWS_XF.SA.067 1 LINE 127 24 PAGE UM STERKEN JULY 23, 1983 13:31:01 0 Interface to KWSCAN (040) for the MSG subroutines. Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. 00798/068A MESSAGE SYSTEM SUB KWS XFACE OC G MAIL:SUB.KWS.O 5.1T2 317 MESSAGE_SYSTEM.SUB_KWS_XF.OC.068 1 LINE 6772 11 PAGE UM STERKEN JULY 23, 1983 13:31:03 00798/069A MESSAGE SYSTEM SUB ASMB RTNS SA G MAIL:SUB.ASM.S 5.1T2 318 MESSAGE_SYSTEM.SUB_ASMB_R.SA.069 1 LINE 127 16 PAGE UM STERKEN JULY 23, 1983 13:31:03 0 Miscellaneous assembly routines used by the MSG subroutines. The "real" entry points for all the MSG subroutines, little adaptor routines that set up the stack environment, are in the file. Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. Copies *CNFGINFODSECT (654/1). 00798/070A MESSAGE SYSTEM SUB ASMB RTNS OC G MAIL:SUB.ASM.O 5.1T2 319 MESSAGE_SYSTEM.SUB_ASMB_R.OC.070 1 LINE 80 9 PAGE UM STERKEN JULY 23, 1983 13:31:04 00798/071A MESSAGE SYSTEM LIST MNGMNT SG G MAIL:LISTMNGMNT.S 5.1T2 320 MESSAGE_SYSTEM.LIST_MNGMN.SG.071 1 LINE 125 13 PAGE UM STERKEN JULY 23, 1983 13:31:05 0 Miscellaneous list management routines used by the MSG subroutines. 00798/072A MESSAGE SYSTEM LIST MNGMNT O G MAIL:LISTMNGMNT.O 5.1T2 321 MESSAGE_SYSTEM.LIST_MNGMN.O.072 1 LINE 80 28 PAGE UM STERKEN JULY 23, 1983 13:31:06 00798/073A MESSAGE SYSTEM COMMON UTIL SG G MAIL:COM.UTIL.S 5.1T2 322 MESSAGE_SYSTEM.COMMON_UTI.SG.073 1 LINE 208 25 PAGE UM STERKEN JULY 23, 1983 13:31:07 0 Miscellaneous utility routines used by both the CLS and the MSG subroutines. 1 SUN SEP 08/96 15:24:55 Page 600 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/074A MESSAGE SYSTEM COMMON UTIL OC G MAIL:COM.UTIL.O 5.1T2 323 MESSAGE_SYSTEM.COMMON_UTI.OC.074 1 LINE 4808 44 PAGE UM STERKEN JULY 23, 1983 13:31:08 00798/075A MESSAGE SYSTEM COMMON ASMB SA G MAIL:COM.ASM.S 5.1T2 324 MESSAGE_SYSTEM.COMMON_ASM.SA.075 1 LINE 127 12 PAGE UM STERKEN JULY 23, 1983 13:31:10 0 Miscellaneous assembly routines used by both the CLS and the MSG subroutines. Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087/1). 0 Referenced by comments of: 19/1 00798/076A MESSAGE SYSTEM COMMON ASMB OC G MAIL:COM.ASM.O 5.1T2 325 MESSAGE_SYSTEM.COMMON_ASM.OC.076 1 LINE 363 8 PAGE UM STERKEN JULY 23, 1983 13:31:11 00798/077A MESSAGE SYSTEM MSGUTIL MAIN SG G MAIL:MUTIL.MAIN.S 5.1T2 326 MESSAGE_SYSTEM.MSGUTIL_MA.SG.077 1 LINE 104 4 PAGE UM STERKEN JULY 23, 1983 13:31:12 0 "Main program" for *MSGUTIL (798/7). 00798/078A MESSAGE SYSTEM MSGUTIL MAIN OC G MAIL:MUTIL.MAIN.O 5.1T2 327 MESSAGE_SYSTEM.MSGUTIL_MA.OC.078 1 LINE 80 11 PAGE UM STERKEN JULY 23, 1983 13:31:12 00798/079A MESSAGE SYSTEM MSGUTIL UTIL SG G MAIL:MUTIL.UTIL.S 5.1T2 328 MESSAGE_SYSTEM.MSGUTIL_UT.SG.079 1 LINE 212 53 PAGE UM STERKEN JULY 23, 1983 13:31:13 0 Command processors and miscellaneous utility routines for *MSGUTIL (798/7). 00798/080A MESSAGE SYSTEM MSGUTIL UTIL OC G MAIL:MUTIL.UTIL.O 5.1T2 329 MESSAGE_SYSTEM.MSGUTIL_UT.OC.080 1 LINE 80 127 PAGE UM STERKEN JULY 23, 1983 13:31:17 00798/081A MESSAGE SYSTEM MSGUTIL KWS SA G MAIL:MUTIL.KWS.S 5.1T2 330 MESSAGE_SYSTEM.MSGUTIL_KW.SA.081 1 LINE 131 9 PAGE UM STERKEN JULY 23, 1983 13:31:22 0 Miscellaneous KWSCAN (040) interface routines for *MSGUTIL (798/7). Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. 00798/082A MESSAGE SYSTEM MSGUTIL KWS OC G MAIL:MUTIL.KWS.O 5.1T2 331 MESSAGE_SYSTEM.MSGUTIL_KW.OC.082 1 LINE 80 6 PAGE UM STERKEN JULY 23, 1983 13:31:22 00798/083A MESSAGE SYSTEM MSGUTIL ASMB SA G MAIL:MUTIL.ASM.S 5.1T2 332 MESSAGE_SYSTEM.MSGUTIL_AS.SA.083 1 LINE 152 7 PAGE UM STERKEN JULY 23, 1983 13:31:23 0 Miscellaneous assembly routines for *MSGUTIL (798/7). Assemble with the MESSAGESYSTEM macros (798/108) and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT,BATCH,TEST. Contains commands beginning at line 0 for assembly. 1 SUN SEP 08/96 15:24:55 Page 601 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/084A MESSAGE SYSTEM MSGUTIL ASMB OC G MAIL:MUTIL.ASM.O 5.1T2 333 MESSAGE_SYSTEM.MSGUTIL_AS.OC.084 1 LINE 80 5 PAGE UM STERKEN JULY 23, 1983 13:31:23 00798/085A MESSAGE SYSTEM CLS DECLARE SG G MAIL:CLS.DECLS 5.1T2 334 MESSAGE_SYSTEM.CLS_DECLAR.SG.085 1 LINE 59 1 PAGE UM STERKEN JULY 23, 1983 13:31:23 0 "$CONTINUE WITH" file used to include all the standard declarations needed by the CLS subcomponents. 00798/086A MESSAGE SYSTEM CLS GLOBALS SG G MAIL:CLS.GLOBAL 5.1T2 335 MESSAGE_SYSTEM.CLS_GLOBAL.SG.086 1 LINE 74 5 PAGE UM STERKEN JULY 23, 1983 13:31:24 0 DECLARATION OF GLOBAL AREA MCLS. 00798/087A MESSAGE SYSTEM CLS LOCAL SG G MAIL:CLS.LOCAL 5.1T2 336 MESSAGE_SYSTEM.CLS_LOCAL.SG.087 1 LINE 86 5 PAGE UM STERKEN JULY 23, 1983 13:31:24 0 Miscellaneous declarations needed by various CLS commands. This file should not be renumbered. 00798/088A MESSAGE SYSTEM CLS MISC SG G MAIL:CLS.MISC 5.1T2 337 MESSAGE_SYSTEM.CLS_MISC.SG.088 1 LINE 71 1 PAGE UM STERKEN JULY 23, 1983 13:31:24 0 Miscellaneous dynamic record definitions needed by the CLS. 00798/089A MESSAGE SYSTEM CLS CONSTANT SG G MAIL:CLS.CONSTANT 5.1T2 338 MESSAGE_SYSTEM.CLS_CONSTA.SG.089 1 LINE 91 3 PAGE UM STERKEN JULY 23, 1983 13:31:24 0 Miscellaneous constant declarations needed by the CLS. 00798/090A MESSAGE SYSTEM SUBR DECLARE SG G MAIL:SUB.DECLS 5.1T2 339 MESSAGE_SYSTEM.SUBR_DECLA.SG.090 1 LINE 59 1 PAGE UM STERKEN JULY 23, 1983 13:31:25 0 "$CONTINUE WITH" file used to include all the standard declarations needed by the MSG subroutine components. 00798/091A MESSAGE SYSTEM SUBR GLOBAL SG G MAIL:SUB.GLOBAL 5.1T2 340 MESSAGE_SYSTEM.SUBR_GLOBA.SG.091 1 LINE 73 5 PAGE UM STERKEN JULY 23, 1983 13:31:25 0 Declaration of global area MSUB (for the MSG subroutines). 00798/092A MESSAGE SYSTEM SUBR MISC SG G MAIL:SUB.MISC 5.1T2 341 MESSAGE_SYSTEM.SUBR_MISC.SG.092 1 LINE 87 6 PAGE UM STERKEN JULY 23, 1983 13:31:25 0 Miscellaneous dynamic record definitions needed by MSG subroutines. 00798/093A MESSAGE SYSTEM SUBR CNSTNT SG G MAIL:SUB.CONSTANT 5.1T2 342 MESSAGE_SYSTEM.SUBR_CNSTN.SG.093 1 LINE 86 2 PAGE UM STERKEN JULY 23, 1983 13:31:25 0 Miscellaneous constant declarations needed by the MSG subroutines. 1 SUN SEP 08/96 15:24:55 Page 602 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/094A MESSAGE SYSTEM COMMON MISC SG G MAIL:COM.MISC 5.1T2 343 MESSAGE_SYSTEM.COMMON_MIS.SG.094 1 LINE 92 3 PAGE UM STERKEN JULY 23, 1983 13:31:26 0 Miscellaneous dynamic record definitions needed by both the CLS and the MSG subroutines. 00798/095A MESSAGE SYSTEM COMMON GLOBAL SG G MAIL:COM.GLOBAL 5.1T2 344 MESSAGE_SYSTEM.COMMON_GLO.SG.095 1 LINE 77 1 PAGE UM STERKEN JULY 23, 1983 13:31:26 0 Global area definitions for the common subroutines used by both the CLS and the MSG subroutines. 00798/096A MESSAGE SYSTEM MISC CONSTANT SG G MAIL:COM.CONSTANT 5.1T2 345 MESSAGE_SYSTEM.MISC_CONST.SG.096 1 LINE 92 3 PAGE UM STERKEN JULY 23, 1983 13:31:26 0 Miscellaneous constant declarations needed by both the CLS and the MSG subroutines. 00798/097A MESSAGE SYSTEM GOM DECLARE SG G MAIL:GOM.DECLS 5.1T2 346 MESSAGE_SYSTEM.GOM_DECLAR.SG.097 1 LINE 96 3 PAGE UM STERKEN JULY 23, 1983 13:31:27 0 Miscellaneous declarations (e.g. for the CLS transfer vector) needed for every GOM procedure. 00798/098A MESSAGE SYSTEM *MSGUTIL DOC WF MAIL:FMT.MESSNOTES 5.1T2 347 MESSAGE_SYSTEM.?MSGUTIL_D.WF.098 1 LINE 94 16 PAGE UM STERKEN JULY 23, 1983 13:31:27 0 *FORMAT (308) source for the *MSGUTIL (798/7) documentation. Also contains notes for $MESSAGESYSTEM installers at other MTS sites. ***************************************************************************** D5.0C version: This is not quite up-to-date. ***************************************************************************** 00798/099A MESSAGE SYSTEM SUBR DOC WF G MAIL:FMT.MSGSUBS 5.1T2 348 MESSAGE_SYSTEM.SUBR_DOC.WF.099 1 LINE 178 25 PAGE UM STERKEN JULY 23, 1983 13:31:28 0 *FORMAT (308) source for the current MSG subroutine documentation. 00798/100A MESSAGE SYSTEM EXPLAIN FILE D G MAIL:EXPLAINFILE 5.1T2 349 MESSAGE_SYSTEM.EXPLAIN_FI.D.100 1 LINE 74 18 PAGE UM STERKEN JULY 23, 1983 13:31:30 MAIL:EXPLAINFILE 0 Text used by the EXPLAIN command. Should be permitted as follows: U/N, R (PKEY=*SYS.MESSAGE, PKEY=*MESSAGESYST). 00798/101A MESSAGE SYSTEM CLS MSG SKEL D G MAIL:MCLS.SKELS 5.1T2 350 MESSAGE_SYSTEM.CLS_MSG_SK.D.101 1 LINE 185 4 PAGE UM STERKEN JULY 23, 1983 13:31:30 MAIL:MCLS.SKELS 0 Message "skeletons" for generating CLS messages. Should be permitted U/R. 1 SUN SEP 08/96 15:24:55 Page 603 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/102A MESSAGE SYSTEM MSG SUBR SKEL D G MAIL:MSUB.SKELS 5.1T2 351 MESSAGE_SYSTEM.MSG_SUBR_S.D.102 1 LINE 136 4 PAGE UM STERKEN JULY 23, 1983 13:31:31 MAIL:MSUB.SKELS 0 Message "skeletons" for generating MSG subroutine messages. Should be permitted U/R. 00798/103A MESSAGE SYSTEM CLS DUMPS D G # MAIL:MCLS.DUMPS UM STERKEN MAIL:MCLS.DUMPS@E 0 File to which dumps for the CLS are written. Should be permitted as follows: U/N, WE PKEY=*MESSAGESYST. 00798/104A MESSAGE SYSTEM SUBR DUMPS D G # MAIL:MSUB.DUMPS UM STERKEN MAIL:MSUB.DUMPS@E 0 File to which dumps for the MSG subroutine are written. Should be permitted as follows: U/N, WE PKEY=*SYS.MESSAGE. 00798/105A MESSAGE SYSTEM GEN VM SKEL S* G MAIL:GENVMSKEL 5.1T2 352 MESSAGE_SYSTEM.GEN_VM_SKE.S?.105 1 LINE 80 14 PAGE UM STERKEN JULY 23, 1983 13:31:31 0 GLP to generate an "in-core" list of frequently used messages. To run the program: $SOURCE MCLS.SKEL(0) see (798/106) $SOURCE MSUB.SKEL(0) see (798/107) Contains a $CONTINUE WITH *SPITLIB (590/1). 0 Referenced by comments of: 798/106, 798/107 00798/106A MESSAGE SYSTEM MCLSSKEL OC G MAIL:MCLSSKEL 5.1T2 353 MESSAGE_SYSTEM.MCLSSKEL.OC.106 1 LINE 80 3 PAGE UM STERKEN JULY 23, 1983 13:31:32 0 Generated by (798/105). 0 Referenced by comments of: 798/105 00798/107A MESSAGE SYSTEM MSUBSKEL OC G MAIL:MSUBSKEL 5.1T2 354 MESSAGE_SYSTEM.MSUBSKEL.OC.107 1 LINE 80 3 PAGE UM STERKEN JULY 23, 1983 13:31:32 0 Generated by (798/105). 0 Referenced by comments of: 798/105 00798/108A MESSAGE SYSTEM MACLIB SM G MAIL:MSG.MACLIB 5.1T2 355 MESSAGE_SYSTEM.MACLIB.SM.108 1 LINE 72 6 PAGE UM STERKEN JULY 23, 1983 13:31:32 0 Macro library used by the CLS and MSG subroutine assembly routines. 0 Referenced by comments of: 798/24, 798/33, 798/35, 798/67, 798/69, 798/75, 798/81, 798/83 1 SUN SEP 08/96 15:24:55 Page 604 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/109A MESSAGE SYSTEM *MSGINFDSECT SA G *MSGINFDSECT 5.1T2 356 MESSAGE_SYSTEM.?MSGINFDSE.SA.109 1 LINE 67 2 PAGE UM STERKEN JULY 23, 1983 13:31:33 *MSGINFDSECT 0 An assembly DSECT describing the information in the "msginfo" parameter of the MSGINF subroutine (798/49). 00798/110A MESSAGE SYSTEM *MSG C G *MSG 5.1T2 357 MESSAGE_SYSTEM.?MSG.C.110 1 LINE 88 1 PAGE UM STERKEN JULY 23, 1983 13:31:33 *MSG 0 Operator file run every night at 2 am by the Clock Watcher (816) to purge old messages from *MESSAGES (798/9). Keeps a log in the file MAIL:MSG.LOG (798/111). *MSG must be permitted U/R, R PKEY=*JUNK (the *JUNK is necessary). 0 Referenced by comments of: 798/111 00798/111A MESSAGE SYSTEM *MSG LOG D G # MAIL:MSG.LOG UM STERKEN MAIL:MSG.LOG@E 0 Log file written to by *MSG (798/110). 0 Referenced by comments of: 798/110, 798/112 00798/112C MESSAGE SYSTEM MSGLOG OC G MAIL:MSGLOG 5.1T2 358 MESSAGE_SYSTEM.MSGLOG.OC.112 1 LINE 866 4 PAGE RPI SCHWARTZ STERKEN JULY 23, 1983 13:31:34 0 MSGLOG is a GLP used to print statistics gleaned from MAIL:MSG.LOG (798/111), the log file produced by *MSG. It was written by Gary Schwartz at RPI. To use: $RUN MSGLOG SCARDS=MSG.LOG 00798/113C MESSAGE SYSTEM MSGLOG SQ G MAIL:MSGLOG.SQ 5.1T2 359 MESSAGE_SYSTEM.MSGLOG.SQ.113 1 LINE 140 4 PAGE RPI SCHWARTZ STERKEN JULY 23, 1983 13:31:34 0 Plus source for MSGLOG program. 00798/114C MESSAGE SYSTEM MSGLOG S G MAIL:MSGLOG.GRM 5.1T2 360 MESSAGE_SYSTEM.MSGLOG.S.114 1 LINE 87 1 PAGE RPI SCHWARTZ STERKEN JULY 23, 1983 13:31:34 0 MSGLOG grammar for CLPARSER. 00798/115C MESSAGE SYSTEM MSGLOG C G MAIL:MSGLOG.MAKE 5.1T2 361 MESSAGE_SYSTEM.MSGLOG.C.115 1 LINE 87 1 PAGE RPI SCHWARTZ STERKEN JULY 23, 1983 13:31:34 0 $SOURCE file which can be used to compile and install a new version of MSGLOG. 00798/116A MESSAGE SYSTEM REMOTE.DIR D G MAIL:REMOTE.DIR 5.1T2 362 MESSAGE_SYSTEM.REMOTE.DIR.D.116 1 LINE 81 3 PAGE UM STERKEN JULY 23, 1983 13:31:35 0 This file is a directory of remote site mailbox names. The name assignments used here should be uniform for all MTS sites. Check with Jim Sterken or Gavin Eadie before making changes. 1 SUN SEP 08/96 15:24:55 Page 605 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/117A MESSAGE SYSTEM MSGOFDAY D G MAIL:MSGOFDAY 5.1T2 363 MESSAGE_SYSTEM.MSGOFDAY.D.117 1 LINE 65 1 PAGE UM STERKEN JULY 23, 1983 13:31:35 0 This file contains, at line 100, the "message of the day" for $MESSAGESYSTEM to print on entry. If this file doesn't exist, or if line 100 is null, no message is printed. 00798/118A MESSAGE SYSTEM CHANGE LOG P G MAIL:CHANGES.LOG 5.1T2 364 MESSAGE_SYSTEM.CHANGE_LOG.P.118 1 LINE 69 5 PAGE UM STERKEN JULY 23, 1983 13:31:35 0 Contains a list of recent changes to $MESSAGE in reverse chronological order. 00798/119A MESSAGE SYSTEM MEMO 444 WF W073:MEMO444.SOU 5.1T2 365 MESSAGE_SYSTEM.MEMO_444.WF.119 1 LINE 68 14 PAGE UM MANUAL JULY 23, 1983 13:31:35 0 This is CCMemo 444, "Introduction to the MTS Message System." 0 Referenced by comments of: 798/1, 798/120 00798/120C MESSAGE SYSTEM MEMO 444 PF W073:MEMO444.OUT 5.1T2 366 MESSAGE_SYSTEM.MEMO_444.PF.120 1 LINE 70 14 PAGE UM MANUAL JULY 23, 1983 13:31:36 0 Printer-ready version of (798/119). 00798/121C MESSAGE SYSTEM ARCHIVE CLEAN S* G MTA:CLEAN.MSG(1000) 5.1T2 367 MESSAGE_SYSTEM.ARCHIVE_CL.S?.121 1 LINE 122 9 PAGE UM MTA JULY 23, 1983 13:31:37 0 Source for a program that reads a $MESS archive file on SCARDS and writes a cleaned up version on SPUNCH. If PAR=LINE=n is given then "n" is an MTS line number in internal form and the program writes each message group starting at an integral line number greater than or equal to "n". 0 Referenced by comments of: 798/122, 798/123, 798/124 00798/122C MESSAGE SYSTEM ARCHIVE CLEAN OC G MTA:CLEAN.MSG(1,999) 5.1T2 368 MESSAGE_SYSTEM.ARCHIVE_CL.OC.122 1 LINE 80 21 PAGE UM MTA JULY 23, 1983 13:31:39 MTA:CLEAN.MSG@UM 0 Object of (798/121). Requires MTA:SPITTIME(1000) (798/23), UNSP:SPITLIB (590/30), and *SPITLIB (590/10). 00798/123C MESSAGE SYSTEM ARCHIVE CLEAN C G MTA:CLEAN.MSG(0,.999) 5.1T2 369 MESSAGE_SYSTEM.ARCHIVE_CL.C.123 1 LINE 79 1 PAGE UM MTA JULY 23, 1983 13:31:39 0 Commands to compile (798/121). 00798/124C MESSAGE SYSTEM SPITTIME SA O MTA:SPITTIME(1,999) 5.1T2 370 MESSAGE_SYSTEM.SPITTIME.SA.124 1 LINE 72 1 PAGE UM MTA JULY 23, 1983 13:31:39 0 Assembly language interface between CLEAN.MSG (798/121) and the (808) time routines. 1 SUN SEP 08/96 15:24:55 Page 606 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00798/125C MESSAGE SYSTEM SPITTIME OC O MTA:SPITTIME(1000) 5.1T2 371 MESSAGE_SYSTEM.SPITTIME.OC.125 1 LINE 80 2 PAGE UM MTA JULY 23, 1983 13:31:40 MTA:SPITTIME@UM 00799/001A PAGESTAT SW G W034:PAGESTAT.S 5.1T3 347 PAGESTAT..SW.001 1 LINE 81 14 PAGE UM OGDEN AUG. 20, 1983 19:49:25 0 PASCAL/VS (823) source for a statistics analyzing program. The PAGESTAT program should be $RUN concatenated with the READSTAT subroutine (799/3). Uses stat item 19 in the Supervisor (045). Requires the *ANALYSIS histogram subroutine (140/7). 0 Referenced by comments of: 799/3 00799/002A PAGESTAT OC G W034:PAGESTAT 5.1T3 348 PAGESTAT..OC.002 1 LINE 80 10 PAGE UM OGDEN AUG. 20, 1983 19:49:26 0 Contains a $CONTINUE WITH UNSP:PAS.BC.LIB (1052/8) record. 00799/003 PAGESTAT READSTAT SUBR SA G S1560 5.0T3 VLO FSNAME=PAGESTAT.READSTAT_SUBR.SA.003(1) 854 5.0T3 854 PAGESTAT.READSTAT_SUBR.SA.003 1 LINE 70 3 PAGE UM OGDEN JULY 03, 1981 20:10:40 5.0T8 233 0 Subroutine required by (799/1). 0 Referenced by comments of: 799/1 00799/004 PAGESTAT READSTAT SUBR OC G S1560 5.0T3 VLO FSNAME=PAGESTAT.READSTAT_SUBR.OC.004(1) 855 5.0T3 855 PAGESTAT.READSTAT_SUBR.OC.004 1 LINE 80 1 PAGE UM OGDEN JULY 03, 1981 20:10:40 5.0T8 234 00800/001 CHKPAR CHKPAR SUBR SA G S1560 5.0T3 VLO FSNAME=CHKPAR.CHKPAR_SUBR.SA.001(1) 856 5.0T3 856 CHKPAR.CHKPAR_SUBR.SA.001 1 LINE 68 4 PAGE UBC MEIR OGDEN JAN. 28, 1981 20:39:43 5.0T8 235 0 This is the source for the CHKPAR subroutine which was written at UBC. It has been modified at UM to add some more BPI instructions to allow it to cope with calls that don't follow OS-type-I(S) calling sequences completely (e.g., don't set the VL bit). 00800/002 CHKPAR CHKPAR SUBR OC G # (PART OF *LIBRARY) UBC MEIR OGDEN 0 Object part of *LIBRARY (524/1) 00800/003 CHKPAR ERRSUB SUBR SA G S1560 5.0T3 VLO FSNAME=CHKPAR.ERRSUB_SUBR.SA.003(1) 857 5.0T3 857 CHKPAR.ERRSUB_SUBR.SA.003 1 LINE 72 2 PAGE UBC MEIR OGDEN JAN. 28, 1981 20:39:54 5.0T8 236 0 ERRSUB is a replacement for a FORTRAN routine written at UBC. It was written to avoid using FTNCMD to EQUATE 99=SERCOM and to deal with routine names greater that 6 characters. 1 SUN SEP 08/96 15:24:55 Page 607 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00800/004 CHKPAR ERRSUB SUBR OC G # (PART OF *LIBRARY) UBC MEIR OGDEN 0 Object part of *LIBRARY (524/1) 00801/001 NPAR SA G S1560 5.0T3 VLO FSNAME=NPAR..SA.001(1) 858 5.0T3 858 NPAR..SA.001 1 LINE 68 2 PAGE UBC MEIR OGDEN JAN. 28, 1981 20:40:25 5.0T8 237 0 The NPAR subroutine was written at UBC. It has been modified at UM to add some BPI instructions to allow the routines to cope with calls that don't follow OS-type-I(S) calling sequences completely (e.g., don't set the VL bit). 00801/002 NPAR OC G # (PART OF *LIBRARY) UBC MEIR OGDEN 0 Object part of *LIBRARY (524/1) 00802/001C COMMAND MACROS PLUS SOURCE SQ G DWB:MACRO.S 5.1T2 372 COMMAND_MACROS.PLUS_SOURC.SQ.001 1 LINE 248 134 PAGE UM DWB JULY 23, 1983 13:31:40 0 This file contains all of the PLUS source definitions for the command language extensions (the declarations are in (802/2)). Lines 0 to .999 contain commands to run the test facility (802/18) and the Storage Monitor (833/2). Lines 1 to 2 of this file contain the commands to recompile all the modules in the file at once. The source itself starts at line 10. Uses the Plus source library in DWB:MACRO.SQL (802/2) and COPY:MTS*SQL (344/4). ********************************************************************** D5.1 version: To avoid occasional Freespace Mousetrap dumps which occur in the case that that last operation processed in an expession is subscription (e.g., DISPLAY VALUE(ARRAY(1)) ), delete lines 26015 and 26016 (which both contain FREE_DESCRIPTOR (...); ), recompile the module in lines 26000,26999 and replace in file MACRO.O (802/3). Then rebuild *MACRTNS (802/7) using this. ********************************************************************** 0 Referenced by comments of: 802/3, 823/21 00802/002C COMMAND MACROS PLUS SOU LIB SQ G DWB:MACRO.SQL 5.1T2 373 COMMAND_MACROS.PLUS_SOU_L.SQ.002 1 LINE 163 32 PAGE UM DWB JULY 23, 1983 13:31:50 0 This is the source library containing global and routine declarations. 0 Referenced by comments of: 802/1 1 SUN SEP 08/96 15:24:55 Page 608 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00802/003C COMMAND MACROS PLUS OBJECT OC G DWB:MACRO.O 5.1T2 374 COMMAND_MACROS.PLUS_OBJEC.OC.003 1 LINE 9960 110 PAGE UM DWB JULY 23, 1983 13:31:52 0 Object code resulting from compiling (802/1). 0 Referenced by comments of: 802/1, 802/6 00802/004C COMMAND MACROS ASSEMBLER SOU SA G DWB:MACRO.SA(0,999) 5.1T2 375 COMMAND_MACROS.ASSEMBLER.SA.004 1 LINE 107 11 PAGE UM DWB JULY 23, 1983 13:31:56 0 Lines 0-.999 contain commands to assemble. Lines 1-999 contain source for three separate modules for 1) BREAKD, 2) FILESSET and FILESGET, and 3) LMULT. Requires OLD:CC.MACROS (1054/4). Must be assembled with PAR=BATCH. 0 Referenced by comments of: 802/5 00802/005C COMMAND MACROS ASSEMBLER OBJ OC G DWB:MACRO.SA(1000) 5.1T2 376 COMMAND_MACROS.ASSEMBLER.OC.005 1 LINE 80 3 PAGE UM DWB JULY 23, 1983 13:31:57 0 Object of (802/4). 0 Referenced by comments of: 802/6 00802/006C COMMAND MACROS BUILD G DWB:MACRTNS 5.1T2 377 COMMAND_MACROS.BUILD..006 1 LINE 104 1 PAGE UM DWB JULY 23, 1983 13:31:58 0 Source to line 0 to build *MACRTNS (802/7), which is where MTS loads the macro processor from. Lines 1-999 contains the source and line 1000 et seq. the object for a small module that must be first. The files copied into *MACRTNS are MACRTN(1000) (must be first), MACRO.O (802/3), MACRO.SA(1000) (802/5), and EXPLAIN.O (802/9). Refers to the symbol table routines (802/25) and (802/26), and virtual file routines (802/29) to (802/32) via COPY:CCDEFS (579/6) and COPY:CCSYMBOL (579/9). 00802/007C COMMAND MACROS *MACRTNS OC G *MACRTNS 5.1T2 378 COMMAND_MACROS.?MACRTNS.OC.007 1 LINE 9960 116 PAGE UM DWB JULY 23, 1983 13:31:58 *MACRTNS 0 Object file that MTS loads for the macro processor. 0 Referenced by comments of: 802/1, 802/6 00802/008C COMMAND MACROS EXPLAIN SA G DWB:EXPLAIN.S 5.1T2 379 COMMAND_MACROS.EXPLAIN.SA.008 1 LINE 68 15 PAGE UM DWB JULY 23, 1983 13:32:02 0 Very butchered version of UBC HELP used for the EXPLAIN metacommand. The data file is ETC:MACRO.H (802/10). 1 SUN SEP 08/96 15:24:55 Page 609 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 802/9 00802/009C COMMAND MACROS EXPLAIN OC G DWB:EXPLAIN.O 5.1T2 380 COMMAND_MACROS.EXPLAIN.OC.009 1 LINE 80 4 PAGE UM DWB JULY 23, 1983 13:32:03 0 Object from assembly EXPLAIN.S (802/8). 0 Referenced by comments of: 802/6 00802/010C COMMAND MACROS EXPLAIN D G ETC:MACRO.H 5.1T2 381 COMMAND_MACROS.EXPLAIN.D.010 1 LINE 78 23 PAGE UM DWB JULY 23, 1983 13:32:03 0 Explain data file in UBC HELP format for use by the macro processor's EXPLAIN metacommand. 0 Referenced by comments of: 802/8 00802/011C COMMAND MACROS TEST PGM G DWB:MACRO.TEST 5.1T2 382 COMMAND_MACROS.TEST_PGM..011 1 LINE 151 3 PAGE UM DWB JULY 23, 1983 13:32:05 0 Simple test program for single (bug fixing) use with Command Macro Processor running as routine under SDS and with storage allocation traced by the storage monitor routines (833/2). Testing via a prebuilt set of test sequences is done with the Command Macro Processor test facility, (802/18). Lines 0 to .999 contain commands to source to for starting the thing off; source of driver is in lines 1 t0 999; object of driver is in lines 1000 et seq.; assorted historical test data is in the negative line number range. Usually used by copying the DEBUG command at line 0 and deleting the SCARDS= specification before entering it as a command. 00802/012C COMMAND MACROS DOCUMENTATION WF G DWB:CMDMACDOCU 5.1T2 383 COMMAND_MACROS.DOCUMENTAT.WF.012 1 LINE 119 26 PAGE UM DWB JULY 23, 1983 13:32:05 0 *FORMAT source for the reference document, an earlier version of which appeared as paper I-1 in the 1982 (UM) Workshop VII Proceedings. 0 Referenced by comments of: 802/13 00802/013C COMMAND MACROS DOCUMENTATION PF G DWB:CMDMACDOCU.P 5.1T2 384 COMMAND_MACROS.DOCUMENTAT.PF.013 1 LINE 64 29 PAGE UM DWB JULY 23, 1983 13:32:06 0 Printer-ready output file from *FORMAT for (802/12) documentation. 00802/014C COMMAND MACROS DOCUMENTATION D G DWB:MACRO.SYSSYM 5.1T2 385 COMMAND_MACROS.DOCUMENTAT.D.014 1 LINE 46 3 PAGE UM DWB JULY 23, 1983 13:32:08 0 Alphabetical list of predefined system symbols and their category of use (operator, command, built-in function,...). 1 SUN SEP 08/96 15:24:55 Page 610 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00802/015C COMMAND MACROS CHECK FILE D G MTS:CMD_MAC_OK 5.1T2 386 COMMAND_MACROS.CHECK_FILE.D.015 1 LINE 70 1 PAGE UM STERKEN JULY 23, 1983 13:32:08 MTS:CMD_MAC_OK 0 This file is checked by the $SET MACROS=ON command. If the user had READ access, s/he is allowed to use the command macros. 00802/016C COMMAND MACROS TEST FACILITY SW O MAC:TESTER.S(1,999) 5.1T2 387 COMMAND_MACROS.TEST_FACIL.SW.016 1 LINE 13 1 PAGE UM PICKELMAN JULY 23, 1983 13:32:09 0 Subcomponents (802/16) through (802/23) are the Command Macro Processor test facility. This facility uses the file MAC:TESTS (802/19)) which has the test data, and which in turn uses subcomponents (802/20) through (802/23). If these files are moved to another CCID, several file names will have to be changed. The program could use several imporovements, but it does work. The source contains a short (and out-of-date) description. 0 Referenced by comments of: 802/16 00802/017C COMMAND MACROS TEST FACILITY SA O MAC:TESTER.S(2000) 5.1T2 388 COMMAND_MACROS.TEST_FACIL.SA.017 1 LINE 68 2 PAGE UM PICKELMAN JULY 23, 1983 13:32:10 0 This is the assembler portion of the source for the Command Macro Processor test facility. 00802/018C COMMAND MACROS TEST FACILITY O O MAC:TESTER 5.1T2 389 COMMAND_MACROS.TEST_FACIL.O.018 1 LINE 7716 4 PAGE UM PICKELMAN JULY 23, 1983 13:32:10 0 Requires *PASCALVSLIB (823/7). 0 Referenced by comments of: 802/1, 802/11 00802/019C COMMAND MACROS TEST FACILITY D MAC:TESTS 5.1T2 390 COMMAND_MACROS.TEST_FACIL.D.019 1 LINE 311 81 PAGE UM PICKELMAN JULY 23, 1983 13:32:10 0 Test data for the Command Macro Processor test facility. ***************************************************************************** D5.1 version: Changed since D5.0C. ***************************************************************************** 0 Referenced by comments of: 802/16 00802/020C COMMAND MACROS TEST FACILITY D MAC:TESTFILES1 5.1T2 391 COMMAND_MACROS.TEST_FACIL.D.020 1 LINE 66 1 PAGE UM PICKELMAN JULY 23, 1983 13:32:14 0 Referenced by comments of: 802/16 1 SUN SEP 08/96 15:24:55 Page 611 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00802/021C COMMAND MACROS TEST FACILITY D MAC:TESTFILES2 5.1T2 392 COMMAND_MACROS.TEST_FACIL.D.021 1 LINE 65 1 PAGE UM PICKELMAN JULY 23, 1983 13:32:14 00802/022C COMMAND MACROS TEST FACILITY D MAC:TESTLIB1 5.1T2 393 COMMAND_MACROS.TEST_FACIL.D.022 1 LINE 44 1 PAGE UM PICKELMAN JULY 23, 1983 13:32:14 00802/023C COMMAND MACROS TEST FACILITY D MAC:TESTLIB2 5.1T2 394 COMMAND_MACROS.TEST_FACIL.D.023 1 LINE 13 1 PAGE UM PICKELMAN JULY 23, 1983 13:32:14 0 Referenced by comments of: 802/16 00802/024C COMMAND MACROS LIBRARY C G MAC:LIB 5.1T2 395 COMMAND_MACROS.LIBRARY.C.024 1 LINE 67 3 PAGE UM PICKELMAN JULY 23, 1983 13:32:14 0 A library of generally useful command macros. "EXPLAIN MAC:LIB" and ">SET CMDMACLIB=MAC:LIB" and for more information. Some of these use the program MAC:HELPER to do things which are difficult, impossible, and/or inefficient with macros. 00802/025A COMMAND MACROS LOW LEVEL SYM SQ G EDIT:LOWSYM*SQ 5.1T2 396 COMMAND_MACROS.LOW_LEVEL.SQ.025 1 LINE 70 7 PAGE UM BURLING JULY 23, 1983 13:32:15 0 This is a preliminary version of the MTS Command Macro facility symbol table routines. Uses COPY:MTS*SQL (344/4) and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 802/6 00802/026A COMMAND MACROS LOW LEVEL SYM OC G SEG2:MM.LOWSYM 5.1T2 397 COMMAND_MACROS.LOW_LEVEL.OC.026 1 LINE 386 5 PAGE UM BURLING JULY 23, 1983 13:32:17 SEG2:MM.LOWSYM 0 Referenced by comments of: 648/1, 802/6 00802/027C COMMAND MACROS LOW LEVEL SYM WF G EDIT:LOWSYM*WF 5.1T2 398 COMMAND_MACROS.LOW_LEVEL.WF.027 1 LINE 71 5 PAGE UM BURLING JULY 23, 1983 13:32:17 0 *FORMAT input for a writeup describing the low-level symbol table routines. 0 Referenced by comments of: 802/28 00802/028C COMMAND MACROS LOW LEVEL SYM PF G EDIT:LOWSYM*W 5.1T2 399 COMMAND_MACROS.LOW_LEVEL.PF.028 1 LINE 71 6 PAGE UM BURLING JULY 23, 1983 13:32:18 0 Printer-ready version of (802/27). 00802/029C COMMAND MACROS VIRTFILE SA G EDIT:MM.VF.S 5.1T2 400 COMMAND_MACROS.VIRTFILE.SA.029 1 LINE 72 9 PAGE UM BURLING JULY 23, 1983 13:32:18 0 This is the high-level interface to the low-level virtual file routines used by the editor. Uses OLD:CC.MACROS (1054/4) and the editor macro library (648/39). 0 Referenced by comments of: 802/6 1 SUN SEP 08/96 15:24:55 Page 612 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00802/030C COMMAND MACROS VIRTFILE OC G SEG2:VIRTFILE 5.1T2 401 COMMAND_MACROS.VIRTFILE.OC.030 1 LINE 788 3 PAGE UM BURLING JULY 23, 1983 13:32:19 SEG2:VIRTFILE 00802/031C COMMAND MACROS VIRTFILE WF G EDIT:MM.VF.WF 5.1T2 402 COMMAND_MACROS.VIRTFILE.WF.031 1 LINE 76 5 PAGE UM BURLING JULY 23, 1983 13:32:19 0 *FORMAT (308) source for writeup describing high-level virtual file routines. 00802/032C COMMAND MACROS VIRTFILE PF G EDIT:MM.VF.W 5.1T2 403 COMMAND_MACROS.VIRTFILE.PF.032 1 LINE 72 8 PAGE UM BURLING JULY 23, 1983 13:32:19 0 Print file. 0 Referenced by comments of: 802/6 00803/001A INDIRECT COST TABLE SA G MTS:ICOSTTAB(1,999) 5.1T2 404 INDIRECT_COST_TABLE..SA.001 1 LINE 73 1 PAGE UM MTS OGDEN JULY 23, 1983 13:32:20 0 Contains the source for the Indirect Cost Table used by TSA. It is optional and if omitted it is assumed there are no indirect costs. 00803/002A INDIRECT COST TABLE OC G # (PART OF RESIDENT SYSTEM) UM MTS OGDEN 0 Object part of Resident System (468). 00804/001 EXITDUMP SA G MTS:EXITDUMP(1000) 5.0T3 863 EXITDUMP..SA.001 1 LINE 71 4 PAGE UM MTS OGDEN JULY 03, 1981 20:10:55 5.0T8 242 0 A program to enable and disable the MTS debugging jobdump in ERRRTN. Copies *LOADINFODSECT (001/4). 00804/002 EXITDUMP OC G MTS:EXITDUMP(1,999) 5.0T3 864 EXITDUMP..OC.002 1 LINE 80 5 PAGE UM MTS OGDEN JULY 03, 1981 20:10:56 5.0T8 243 0 Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. 00805/001A MTS VOLUME 17 MASTER WT S1497 MTSV17 'MTS MANUALS' POSN=NEWM2.V17 5.1T2 405 MTS_VOLUME_17.MASTER.WT.001 1 LINE 132 132 PAGE UM MANUAL JULY 23, 1983 13:33:15 0 TEXT/360 MASTER FOR VOLUME 17, "INTEGRATED GRAPHICS SYSTEM," OF THE UM MTS MANUALS, DECEMBER 1980, UPDATED MARCH 1983. EDITOR: RICHARD A. SALISBURY 00805/002A MTS VOLUME 17 PRINT PT S1497 MTSV17 'MTS MANUALS' POSN=PRINT2.V17 5.1T2 406 MTS_VOLUME_17.PRINT.PT.002 1 LINE 132 249 PAGE UM MANUAL JULY 23, 1983 13:33:20 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 1 SUN SEP 08/96 15:24:55 Page 613 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00805/003 MTS VOLUME 17 INDEX SOURCE D S1497 MTSV17 'MTS MANUALS' POSN=V17INDEXSOU 5.0T3 867 MTS_VOLUME_17.INDEX_SOURC.D.003 1 SEQ 58 7 PAGE UM MANUAL JULY 03, 1981 20:11:46 5.0T8 246 0 INPUT TO *INDEX (580) FOR INDEX TO VOLUME 17. 00805/004 MTS VOLUME 17 FIGURES D S1497 MTSV17 'MTS MANUALS' POSN=V17FIGS 5.0T3 868 MTS_VOLUME_17.FIGURES.D.004 1 SEQ 154 6 PAGE UM MANUAL JULY 03, 1981 20:11:49 5.0T8 247 0 PLOT DESCRIPTION FILE (PDS) FOR FIGURES FOR MTS VOLUME 17. 00805/005C MTS VOLUME 17 FIGURES D S1497 MTSV17 'MTS MANUALS' POSN=V17FIGS.UPD1 5.1T2 407 MTS_VOLUME_17.FIGURES.D.005 1 LINE 154 1 PAGE UM MANUAL JULY 23, 1983 13:33:33 0 Plot Description file (PDS) for figures for Update 1 of MTS Volume 17. 00805/006C MTS VOLUME 17 UPDATE 1 D W073:TNLV17.MAR83 5.1T2 408 MTS_VOLUME_17.UPDATE_1.D.006 1 LINE 77 26 PAGE UM MANUAL JULY 23, 1983 13:33:33 0 This is "Update 1 to MTS Volume 17," March 1983. 00806/001 TAPE QUEUE SA G TAPE:TAPEQ.S 5.0T3 869 TAPE_QUEUE..SA.001 1 LINE 144 17 PAGE UM SHERRY JULY 03, 1981 20:11:50 5.0T8 248 0 Routine called by the MOUNT CLS (101/1) to queue 9TP tape mount requests. Requires D5.0 versions of MOUNT (101), *TAPERTN (135), TASKSTAT (647), SSRTN (413/1), SYSTEM STATUS CLS (413/5), SUPERVISOR (045), OPERATOR JOB (634), UNSP:TAPEDRIVES (693), and SYSDEFS (579). Uses SVC lock number 6 to update shared VM data structure. Defines the entry points MNTQUEUE, MNTQREL, MNTQSTAT, MNTQINFO. The comments in the source file describe the calling sequences and usage. Assemble using OLD:CC.MACROS (1054/4), COPY:MISC.MACROS (728), and COPY:MTS.MACROS (344/3), with PAR=PEXIT=*PEXIT. Copies COPY:GLOBALSETS (1026/2), COPY:LLMPSEQU (087), COPY:JOBSTA (413/9), and COPY:MNTQINFDSECT (806/3). 0 Referenced by comments of: 806/3 00806/002 TAPE QUEUE OE G SEG2:TAPEQ 5.0T3 870 TAPE_QUEUE..OE.002 1 LINE 3396 2 PAGE UM SHERRY JULY 03, 1981 20:12:15 5.0T8 249 SEG2:TAPEQ 0 Object for the tape queueing routines. Loaded into shared VM after IPL by PISTLE, using the IPLCS modifier to resolve WX references by SSRTN (413/1). 00806/003 TAPE QUEUE DSECTS SA G COPY:MNTQINFDSECT 5.0T3 871 TAPE_QUEUE.DSECTS.SA.003 1 LINE 72 1 PAGE UM SHERRY JULY 03, 1981 20:12:16 5.0T8 250 0 Dsects describing information returned by the MNTQSTAT and MNTQINFO entry points of TAPEQ. Copied by TAPEQ (806/1), MOUNT CLS (101/1), and SSRTN 1 SUN SEP 08/96 15:24:55 Page 614 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (413/1). 0 Referenced by comments of: 101/1, 413/1, 806/1 00807/001A PGFCONVERT SW G PAGE:FONTCONV.S 5.1T2 409 PGFCONVERT..SW.001 1 LINE 88 6 PAGE UM SHERRY JULY 23, 1983 13:33:35 0 A program to convert files for use with the Xerox 9700. Emits $**$ PAGEPR commands unchanged. Documentation for this program is in CCMemo 429 (839/18). ******************************************************************************** D5.0B version: Converted to use *PASCAL/VS compiler (823). ******************************************************************************** 00807/002A PGFCONVERT OE G *PAGEFONTCONVERT 5.1T2 410 PGFCONVERT..OE.002 1 LINE 10194 4 PAGE UM SHERRY JULY 23, 1983 13:33:36 0 Contains a $CONTINUE WITH *PASCALVS.LIB (823/7) record. 00808/001A TIME ROUTINES SA S W116:TIM.REL.2 5.1T2 411 TIME_ROUTINES..SA.001 1 LINE 78 114 PAGE UM YOUNG JULY 23, 1983 13:33:37 0 This is the source for Howard Young's general-purpose time/date routines, described in the MTS Development Workshop V Proceedings. Assemble with PAR=BATCH and 2=TIM.MACRO (808/3). Should be edited to change the name of the message file (set to W116:TIM.MSG). 0 Referenced by comments of: 798/124, 809/3, 809/7, 816/4, 816/5 00808/002A TIME ROUTINES OC S SEG2:TIM.RTNS 5.1T2 412 TIME_ROUTINES..OC.002 1 LINE 32767 14 PAGE UM YOUNG JULY 23, 1983 13:33:42 SEG2:TIM.RTNS 00808/003A TIME ROUTINES MACROS SM S W116:TIM.MACRO 5.1T2 413 TIME_ROUTINES.MACROS.SM.003 1 LINE 73 5 PAGE UM YOUNG JULY 23, 1983 13:33:43 0 Referenced by comments of: 808/1 00808/004C TIME ROUTINES WRITEUP P S W116:TIM.WRIT.C 5.1T2 414 TIME_ROUTINES.WRITEUP.P.004 1 LINE 69 21 PAGE UM YOUNG JULY 23, 1983 13:33:43 00808/005A TIME ROUTINES MESSAGES M S W116:TIM.MSG 5.1T2 415 TIME_ROUTINES.MESSAGES.M.005 1 LINE 80 3 PAGE UM YOUNG JULY 23, 1983 13:33:44 00809/001A CREP MAIN PGM SG G CREP:CREP.S 5.1T2 416 CREP.MAIN_PGM.SG.001 1 LINE 131 33 PAGE UM FRONCZAK JULY 23, 1983 13:33:44 0 CREP, the Controlled File Replacement and Annotation Facility, monitors and controls the replacement of public, SEG2:, NEW:, COPY:, etc., object and data files as well as resident, post-IPL system components. (809/16) is a writeup 1 SUN SEP 08/96 15:24:55 Page 615 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 describing the organization and file access requirements. This subcomponent is a GOM main program, which INCLUDEs program common and various dynamic record definitions, subcomponents (809/8) through (809/12). ******************************************************************************** D5.0A version: Requires the D5.0A version of *GOM (659). ******************************************************************************** 0 Referenced by comments of: 809/7 00809/002A CREP SUBRS SG G CREP:CREPEXSUBS.S 5.1T2 417 CREP.SUBRS.SG.002 1 LINE 111 35 PAGE UM FRONCZAK JULY 23, 1983 13:33:46 0 These are the CREP GOM subroutines. INCLUDEs program common and various dynamic record definitions, subcomponents (809/8) through (809/12). 0 Referenced by comments of: 809/7 00809/003A CREP KWS SUBR SA G CREP:CREPKWS.S 5.1T2 418 CREP.KWS_SUBR.SA.003 1 LINE 99 26 PAGE UM FRONCZAK JULY 23, 1983 13:33:47 0 CREP's keyword scan interface for CREP command processing. Assemble using COPY:MTS.MACROS (344/3). ******************************************************************** D5.0C version: Now uses the TIME/DATE subroutines in shared VM - component (808) - and has been updated to accept the TIME/DATE extended exploded format to handle time zones. ******************************************************************** 0 Referenced by comments of: 809/7 00809/004A CREP RWCK SUBRS SA G CREP:CREPRWCKSM.S 5.1T2 419 CREP.RWCK_SUBRS.SA.004 1 LINE 111 1 PAGE UM FRONCZAK JULY 23, 1983 13:33:49 0 Subroutines to support REWIND# calls and compute backup file checksums. Assemble using COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 809/7 00809/005A CREP SPANBREAK SUBR SA G CREP:SPANBREAK.S 5.1T2 420 CREP.SPANBREAK_SUBR.SA.005 1 LINE 76 4 PAGE UM FRONCZAK JULY 23, 1983 13:33:49 0 SPAN and BREAK functions to assist CREP command processing. 0 Referenced by comments of: 809/7 1 SUN SEP 08/96 15:24:55 Page 616 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00809/006A CREP MCHPAT SUBR SA G CREP:BLDMCHPAT.S 5.1T2 421 CREP.MCHPAT_SUBR.SA.006 1 LINE 103 18 PAGE UM FRONCZAK JULY 23, 1983 13:33:50 0 Extended version of $FILESTATUS "?" pattern support. Used for the CREP STATUS command file name pattern processing. Assemble using COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 809/7 00809/007A CREP OBJECT OE G MTS:CREP 5.1T2 422 CREP.OBJECT.OE.007 1 LINE 32767 34 PAGE UM FRONCZAK JULY 23, 1983 13:33:51 MTS:CREP 0 This is the object of (809/1), (809/2), (809/3), (809/4), (809/5), (809/6), and (808/1). SEG2:S2L (559/3) is dynamically loaded when post-IPL components are being processed. CREP references SEG2:S2FILES (559/5), SEG2:S2MAP (559/12), ETC:CREPHELP (809/13), MTS:CREPDIR (809/14), and MTS:CREPLOG (809/15). 0 Referenced by comments of: 809/14, 809/15 00809/008A CREP COMMON SG G CREP:MAINCOMM.S 5.1T2 423 CREP.COMMON.SG.008 1 LINE 92 3 PAGE UM FRONCZAK JULY 23, 1983 13:33:53 0 GOM COMMON definitions. "INCLUDEd" in various CREP routines. 0 Referenced by comments of: 809/1, 809/2 00809/009A CREP CMD DRC SG G CREP:CMDDRC.S 5.1T2 424 CREP.CMD_DRC.SG.009 1 LINE 78 4 PAGE UM FRONCZAK JULY 23, 1983 13:33:53 0 GOM dynamic record definitions for CREP's commands. "INCLUDEd" in various CREP routines. 00809/010A CREP FILE STRUC DRC SG G CREP:CFNDRC.S 5.1T2 425 CREP.FILE_STRUC_DRC.SG.010 1 LINE 74 1 PAGE UM FRONCZAK JULY 23, 1983 13:33:53 0 GOM dynamic record definitions for CREP's internal file information structure. "INCLUDEd" in various CREP routines. 00809/011A CREP DIRLOG DRC SG G CREP:DIRLOGDRC.S 5.1T2 426 CREP.DIRLOG_DRC.SG.011 1 LINE 78 3 PAGE UM FRONCZAK JULY 23, 1983 13:33:53 0 GOM dynamic record definitions for the CREP directory and log files. "INCLUDEd" in various CREP routines. 00809/012A CREP GD/GFINFO DRC SG G CREP:INFDRC.S 5.1T2 427 CREP.GD/GFINFO_DRC.SG.012 1 LINE 71 3 PAGE UM FRONCZAK JULY 23, 1983 13:33:54 0 GOM dynamic record definitions of GDINFO/GFINFO information. "INCLUDEd" in various CREP routines. 0 Referenced by comments of: 809/1, 809/2 1 SUN SEP 08/96 15:24:55 Page 617 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00809/013A CREP HELP FILE D G ETC:CREPHELP 5.1T2 428 CREP.HELP_FILE.D.013 1 LINE 78 5 PAGE UM FRONCZAK JULY 23, 1983 13:33:54 ETC:CREPHELP 0 The CREP help file. Line numbers in this file are important. 0 Referenced by comments of: 809/7 00809/014 CREP DIRECTORY FILE D G # MTS:CREPDIR UM FRONCZAK MTS:CREPDIR@E 0 This is the directory file required by CREP (809/7). 0 Referenced by comments of: 809/7 00809/015 CREP LOG FILE D G # MTS:CREPLOG UM FRONCZAK MTS:CREPLOG@E 0 This is the log file required by CREP (809/7). 0 Referenced by comments of: 809/7 00809/016 CREP SYS WRUP P G CREP:CREPSYSORG 5.0T3 891 CREP.SYS_WRUP.P.016 1 LINE 107 3 PAGE UM FRONCZAK JULY 03, 1981 20:12:57 5.0T8 270 0 System programmer writeup describing the CREP system organization and file access requirements. 0 Referenced by comments of: 809/1 00809/017A CREP USER WRUP WT G CREP:PAPER.CREP 5.1T2 429 CREP.USER_WRUP.WT.017 1 LINE 140 10 PAGE UM FRONCZAK JULY 23, 1983 13:33:55 0 TEXT360 source for the CREP user writeup. 0 Referenced by comments of: 809/18 00809/018A CREP WRUP GEN C G CREP:T360CREP 5.1T2 430 CREP.WRUP_GEN.C.018 1 LINE 104 1 PAGE UM FRONCZAK JULY 23, 1983 13:33:56 0 TEXT360 procedure to produce the CREP user writeup from (809/17). 00810/001A PMF INSTALLATION P PMF:INSTAL.NOTES 5.1T2 431 PMF.INSTALLATION.P.001 1 LINE 69 3 PAGE UM HANSEN JULY 23, 1983 13:33:56 0 The Project Management Facility (PMF) is a software tool to help users organize and document the components (source, object, listings, data, etc.) and procedures (commands) used in the development and installation of large scale software packages. This subcomponent contains the directions for installing and maintaining 1 SUN SEP 08/96 15:24:55 Page 618 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 the PMF. 0 Referenced by comments of: 387/40, 668/9, 686/46, 810/4, 821/1, 821/3, 821/6, 828/1, 847/11 00810/002A PMF WRITEUP WF PMF:WRITEUP.S 5.1T2 432 PMF.WRITEUP.WF.002 1 LINE 82 18 PAGE UM HANSEN JULY 23, 1983 13:33:57 0 *FORMAT (308) source for the PMF writeup. 00810/003A PMF WRITEUP PF PMF:WRITEUP 5.1T2 433 PMF.WRITEUP.PF.003 1 LINE 69 20 PAGE UM HANSEN JULY 23, 1983 13:33:58 0 Printer-ready copy of the PMF writeup. Allow 30 pages to print. 00810/004A PMF CLS OE O *CLSPMF 5.1T2 434 PMF.CLS.OE.004 1 LINE 32767 35 PAGE UM HANSEN JULY 23, 1983 13:34:00 *CLSPMF 0 The complete, linkeditted object for the PMF. This component may reference several other files during execution. See the installation notes (810/1) for details. 0 Referenced by comments of: 810/5, 810/8 00810/005A PMF RUN OC O PMF:RUN.CURRENT 5.1T2 435 PMF.RUN.OC.005 1 LINE 11274 97 PAGE UM HANSEN JULY 23, 1983 13:34:01 0 $RUNable version of the PMF. This component, with selected csects from the libraries referenced, was linkeditted to create *CLSPMF (810/4). Refers to the Full Screen Help facility (845/6). 00810/006A PMF ETC:PMF.HELP M G ETC:PMF.HELP 5.1T2 436 PMF.ETC:PMF.HELP.M.006 1 LINE 109 19 PAGE UM HANSEN JULY 23, 1983 13:34:05 ETC:PMF.HELP 0 The primary HELP file referenced by the PMF CLS. This file has $CONTINUE WITHs to itself, so it should be restored to the same name. 00810/007A PMF ETC:PMF.LOG D # ETC:PMF.LOG UM HANSEN ETC:PMF.LOG@E 0 A place to put PMF usage statistics. This file must be a line file, permitted WE (PKEY=*#PMF, PKEY=*#CLS), but it is not necessary for PMF execution. 00810/008A PMF MAP D PMF:MAP.CURRENT 5.1T2 437 PMF.MAP.D.008 1 LINE 101 3 PAGE UM HANSEN JULY 23, 1983 13:34:06 0 The map produced by linkeditting the test version (810/15) to produce the CLS (810/4). 1 SUN SEP 08/96 15:24:55 Page 619 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00810/009A PMF SOURCE LIB SQ G PMF:SOURCELIB 5.1T2 438 PMF.SOURCE_LIB.SQ.009 1 LINE 97 16 PAGE UM HANSEN JULY 23, 1983 13:34:06 0 The PLUS source library used for compiling the PLUS procedures for the PMF. 00810/010A PMF SOURCE SQ O PMF:PMF.SQ 5.1T2 439 PMF.SOURCE.SQ.010 1 LINE 136 51 PAGE UM HANSEN JULY 23, 1983 13:34:07 0 PLUS source for most of the PMF, excluding command processing, subtasking, and storage management. References Full Screen Help Facility (845/5). 00810/011A PMF CORE SQ O PMF:PMF.CORE 5.1T2 440 PMF.CORE.SQ.011 1 LINE 106 12 PAGE UM HANSEN JULY 23, 1983 13:34:09 0 PLUS source for the PMF procedure dealing with subtasking and storage management. 00810/012A PMF CMD SQ O PMF:PMF.CMD 5.1T2 441 PMF.CMD.SQ.012 1 LINE 118 37 PAGE UM HANSEN JULY 23, 1983 13:34:10 0 PLUS source for the PMF command processor. 00810/013A PMF ASM CODE SA O PMF:PMF.ASM 5.1T2 442 PMF.ASM_CODE.SA.013 1 LINE 72 9 PAGE UM HANSEN JULY 23, 1983 13:34:12 0 Source for the ASMH (737) parts of the PMF. 00810/014A PMF GRAMMAR D O PMF:GRAMMAR 5.1T2 443 PMF.GRAMMAR.D.014 1 LINE 91 9 PAGE UM HANSEN JULY 23, 1983 13:34:13 0 The grammar for use with *CLPARSER. 00810/015A PMF CLSTEST SA O PMF:CLSTEST.SA 5.1T2 444 PMF.CLSTEST.SA.015 1 LINE 66 1 PAGE UM HANSEN JULY 23, 1983 13:34:13 0 Source for yet another CLS test driver. 0 Referenced by comments of: 810/8 00810/016A PMF CLSTEST OC O PMF:CLSTEST.OA 5.1T2 445 PMF.CLSTEST.OC.016 1 LINE 80 4 PAGE UM HANSEN JULY 23, 1983 13:34:14 0 Object for yet another CLS test driver. 0 Referenced by comments of: 810/18 00810/017A PMF PROJECT FILE D PMF:PMFX 5.1T2 446 PMF.PROJECT_FILE.D.017 1 LINE 164 9 PAGE UM HANSEN JULY 23, 1983 13:34:14 0 The PMF project file describing the PMF itself. 0 Referenced by comments of: 810/18 1 SUN SEP 08/96 15:24:55 Page 620 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00810/018A PMF MISC D PMF:MISC 5.1T2 447 PMF.MISC.D.018 1 LINE 34 1 PAGE UM HANSEN JULY 23, 1983 13:34:14 0 This file is used by the PMF when using the PMF project file (810/17). It contains miscellaneous data used by PMF procedures. Also contains $CONTINUE WITH PMF:CLSTEST.OA (810/16) record. 00811/001A SCREEN SUPPORT ROUTINES SOURCE LIB SQ S CRT:SS.SOURCELIB 5.1T2 448 SCREEN_SUPPORT_ROUTINES.S.SQ.001 1 LINE 137 11 PAGE UM CASHMAN JULY 23, 1983 13:34:15 0 The screen support routines provide device independent support for 3270 type displays, and Ontels running the OP/VIS software. Support for other terminals can be added. The screen support routines are often called the "9112" routines because their design followed proposals taken from papers 12 and 91 at the RPI MTS workshop in 1980. These routines are still under active development at UM. They have not been released to the public, but are used by the MTS editor and several internal programs. Before making extensive changes to these routines or attempting to add support for new devices please check with Brian Cashman at UM. This subcomponent is the PLUS source library for all screen support routines. Provides all necessary global variable, data structure, and subroutine declarations. 0 Referenced by comments of: 461/2, 496/4, 496/7, 629/12, 634/6, 648/1, 811/4, 811/6, 811/8, 812/1 00811/002A SCREEN SUPPORT ROUTINES ASM ROUTINES SA S CRT:SS.ASMRTNS.S 5.1T2 449 SCREEN_SUPPORT_ROUTINES.A.SA.002 1 LINE 142 8 PAGE UM CASHMAN JULY 23, 1983 13:34:17 0 Assembler source to interface device-independent screen support routines to the real world. Uses the Version Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE to assemble. Requires COPY:MTS.MACROS (344/3), OLD:CC.MACROS (1054/4), and COPY:MISC.MACROS (728). ********************************************************************** D5.1 version: Assembly commands contains reference to COPY:CC.MACROS, which should be changed to OLD:CC.MACROS. ********************************************************************** 0 Referenced by comments of: 811/3 00811/003A SCREEN SUPPORT ROUTINES ASM ROUTINES OC S CRT:SS.ASM.O 5.1T2 450 SCREEN_SUPPORT_ROUTINES.A.OC.003 1 LINE 80 5 PAGE UM CASHMAN JULY 23, 1983 13:34:17 0 Object produced by assembling (811/2). 1 SUN SEP 08/96 15:24:55 Page 621 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00811/004A SCREEN SUPPORT ROUTINES DI ROUTINES SQ S CRT:SS.DIRTNS.S 5.1T2 451 SCREEN_SUPPORT_ROUTINES.D.SQ.004 1 LINE 173 44 PAGE UM CASHMAN JULY 23, 1983 13:34:18 0 PLUS source for screen support device-independent routines. Uses the Version Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE to compile. Requires (811/1) and (1042/7). 0 Referenced by comments of: 811/5 00811/005A SCREEN SUPPORT ROUTINES DI ROUTINES OC S CRT:SS.DI.O 5.1T2 452 SCREEN_SUPPORT_ROUTINES.D.OC.005 1 LINE 2840 17 PAGE UM CASHMAN JULY 23, 1983 13:34:22 0 Object produced by compiling (811/4). 00811/006A SCREEN SUPPORT ROUTINES EURONET DDR SQ S CRT:SS.EURONET.S 5.1T2 453 SCREEN_SUPPORT_ROUTINES.E.SQ.006 1 LINE 107 22 PAGE UM CASHMAN JULY 23, 1983 13:34:23 0 PLUS source for Euronet (ONTEL) device-dependent routines. Uses the Version Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE to compile. Requires (811/1) and (1042/7). 0 Referenced by comments of: 811/7, 811/9 00811/007A SCREEN SUPPORT ROUTINES EURONET DDR OC S CRT:SS.EURONET.O 5.1T2 454 SCREEN_SUPPORT_ROUTINES.E.OC.007 1 LINE 2716 10 PAGE UM CASHMAN JULY 23, 1983 13:34:24 0 Object produced by compiling (811/6). Due to external name conflicts with the IBM 3270 DDR (811/8), this should be linkeditted to remove all entry points except DDRONTEL. 00811/008A SCREEN SUPPORT ROUTINES 3270 DDR SQ S CRT:SS.3270.S 5.1T2 455 SCREEN_SUPPORT_ROUTINES.3.SQ.008 1 LINE 232 11 PAGE UM CASHMAN JULY 23, 1983 13:34:24 0 PLUS source for IBM 3270 device-dependent routines. Uses the Version Labeler (812) and SIDELABEL (747) for listing enhancements. $SOURCE to compile. Requires (811/1) and (1042/7). 0 Referenced by comments of: 811/7, 811/9 00811/009A SCREEN SUPPORT ROUTINES 3270 DDR OC S CRT:SS.3270.O 5.1T2 456 SCREEN_SUPPORT_ROUTINES.3.OC.009 1 LINE 992 7 PAGE UM CASHMAN JULY 23, 1983 13:34:25 0 Object produced by compiling (811/8). Due to external name conflicts with the EURONET DDR (811/6), this should be linkeditted to remove all entry points except DDR3270. 00811/010A SCREEN SUPPORT ROUTINES OBJECT OE S SEG2:SCREENRTNS 5.1T2 457 SCREEN_SUPPORT_ROUTINES.O.OE.010 1 LINE 10692 24 PAGE UM CASHMAN JULY 23, 1983 13:34:25 SEG2:SCREENRTNS 0 This is the object for the screen support routines. It contains all the device-independent components and DDRs. The DDRs should have their internal subroutine names purged to prevent loader conflicts. 1 SUN SEP 08/96 15:24:55 Page 622 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00811/011A SCREEN SUPPORT ROUTINES WRITEUP WF S CRT:SS.WRITEUP.W 5.1T2 458 SCREEN_SUPPORT_ROUTINES.W.WF.011 1 LINE 135 5 PAGE UM CASHMAN JULY 23, 1983 13:34:26 0 *FORMAT input used to generate Screen Support Routines writeup. $SOURCE to produce a writeup. 00811/012C SCREEN SUPPORT ROUTINES MEMO 451 WF W599:SCREENDOC 5.1T2 459 SCREEN_SUPPORT_ROUTINES.M.WF.012 1 LINE 70 12 PAGE UM GLUSKI JULY 23, 1983 13:34:27 0 This is Computing Center Memo 451 -- "Screen Support Routines." ************************************************************** D5.1 version: This is a draft copy and is STILL BEING REVISED. ************************************************************** 00811/013C SCREEN SUPPORT ROUTINES MEMO 451 PF W599:OUTPUT 5.1T2 460 SCREEN_SUPPORT_ROUTINES.M.PF.013 1 LINE 70 18 PAGE UM GLUSKI JULY 23, 1983 13:34:28 00812/001 VERSION LABELER SG G UNSP:ÂVERLAB.S 5.0T3 923 VERSION_LABELER..SG.001 1 LINE 161 3 PAGE UM UNSP BURLING JULY 03, 1981 20:16:11 5.0T8 302 0 This program provides listing enhancements; it was formerly distributed, on D4.0, as a part of *IG (498). It is used by the Disk Manager (769), *IG (498), the editor (648) and the Screen Support Routines (811). 0 Referenced by comments of: 498/1, 648/1, 811/2, 811/4, 811/6, 811/8, 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 00812/002 VERSION LABELER OC G UNSP:VERLAB 5.0T3 924 VERSION_LABELER..OC.002 1 LINE 1904 3 PAGE UM UNSP BURLING JULY 03, 1981 20:16:12 5.0T8 303 00812/003 VERSION LABELER WRITEUP P UNSP:VERLAB.W 5.0T3 925 VERSION_LABELER.WRITEUP.P.003 1 LINE 69 1 PAGE UM UNSP BURLING JULY 03, 1981 20:16:14 5.0T8 304 00813/001A PL1 OPTIMIZING COMPILER INSTALL NOTES WF PL1:OPTINSTALL 5.1T2 461 PL1_OPTIMIZING_COMPILER.I.WF.001 1 LINE 68 6 PAGE UM TIFFANY JULY 23, 1983 13:34:29 0 Writeup describing how to install the PL1 Optimizing Compiler. 0 Referenced by comments of: 233/1, 496/4, 496/5, 721/1 00813/002A PL1 OPTIMIZING COMPILER OBJECT OE G # *PL1OPT UM TIFFANY 0 Object of the PL1 Optimizing Compiler. Due to IBM copyrights restrictions, the object cannot be distributed. ******************************************************************* 1 SUN SEP 08/96 15:24:55 Page 623 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 D5.0B version: Now includes VSLOAD (813/10). ******************************************************************* 0 Referenced by comments of: 813/10, 813/12, 813/14 00813/003A PL1 OPTIMIZING COMPILER ETC:OPTPL1LINK OL G # ETC:PL1OPTLINK UM TIFFANY 0 Link library for the PL1 Optimizing Compiler. Due to IBM copyright restrictions, this cannot be distributed. ******************************************************************* D5.0B version: Now a *VSS PDS load library. ******************************************************************* 0 Referenced by comments of: 813/9, 813/13, 813/15, 813/16, 813/17, 813/18, 813/19, 813/20, 813/21, 813/22, 813/23, 813/24, 813/25, 813/26, 813/27, 813/28, 813/29, 813/30, 813/31, 813/38, 813/40, 813/41, 813/43, 813/44, 813/45, 813/46, 813/47, 813/48, 813/49, 813/53, 813/54, 813/55, 813/56 00813/004C PL1 OPTIMIZING COMPILER ETC:PL1OPTLOG D G # ETC:PL1OPTLOG UM TIFFANY 0 A file on which the PL/I Optimizing Compiler logs all program interrupts. 0 Referenced by comments of: 506/12 00813/005 PL1 OPTIMIZING COMPILER PPOPTIONS SM G # PL1:PPOPTIONS UM TIFFANY 0 Macro library to assemble (813/17) and (813/18). Due to IBM copyright restrictions, this cannot be distributed. This comes from options macros, file 2 on either the installation tape or the PTF tape, with copy sections PLIX1 and PLIX2 renamed as PLIXOPB and PLIXOPC respectively. 0 Referenced by comments of: 813/17, 813/18 00813/006A PL1 OPTIMIZING COMPILER MACLIB SM G # PL1:PL1OPTMAC UM TIFFANY 0 Main macro library for PL1 Optimizing Compiler. Due to IBM copyright restrictions, this cannot be distributed. See (813/7) for the MTS update to the IBM version. 0 Referenced by comments of: 813/7, 813/14, 813/15, 813/16, 813/19, 813/20, 813/21, 813/22, 813/23, 813/24, 813/25, 813/26, 813/27, 813/28, 813/29, 813/30, 813/31, 813/32, 813/33, 813/34, 813/35, 813/36, 813/37, 813/38, 813/39, 813/40, 813/41, 813/42, 813/43, 813/44, 813/45, 813/46, 813/47, 813/48, 813/49, 813/50, 813/51, 813/52, 813/53, 813/54, 813/55, 813/56 1 SUN SEP 08/96 15:24:55 Page 624 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00813/007A PL1 OPTIMIZING COMPILER MACLIB UPD UC G PL1:PL1OPTMAC.UP 5.1T2 462 PL1_OPTIMIZING_COMPILER.M.UC.007 1 LINE 64 4 PAGE UM TIFFANY JULY 23, 1983 13:34:31 0 *CDUPDATE (1036) input to IBM's version of the compiler macros (813/6). Run (506/8) on *CDUPDATE output with SPUNCH=PL1OPTMAC (813/6) to get the macro library. ******************************************************************* D5.0B version: Changed from D5.0A. ******************************************************************* 0 Referenced by comments of: 813/6 00813/008 PL1 OPTIMIZING COMPILER LOADMAC SM G S1516 'PL1 OPTIMIZER' FSNAME=LOADMAC 5.0T3 929 PL1_OPTIMIZING_COMPILER.L.SM.008 1 LINE 33 1 PAGE UM TIFFANY MAR. 30, 1981 20:49:55 5.0T8 308 0 Macros to simulate LOAD, DELETE, LINK, and XCTL. 0 Referenced by comments of: 813/14, 813/15, 813/27, 813/28, 813/45, 813/55 00813/009C PL1 OPTIMIZING COMPILER VSLOAD SA G PL1:VSLOAD.S 5.1T2 463 PL1_OPTIMIZING_COMPILER.V.SA.009 1 LINE 80 10 PAGE UM TIFFANY JULY 23, 1983 13:34:31 0 Loading routines for *VSS PDS load library like ETC:PL1OPTLINK (813/3). ********************************************************************* D5.1 version: Changed because in OS/VS macros LOAD and DELETE do not requre R13. ********************************************************************** 00813/010C PL1 OPTIMIZING COMPILER VSLOAD OC G PL1:VSLOAD 5.1T2 464 PL1_OPTIMIZING_COMPILER.V.OC.010 1 LINE 2873 4 PAGE UM TIFFANY JULY 23, 1983 13:34:32 0 Object of (813/13), part of *PL1OPT (813/2). 0 Referenced by comments of: 813/2 00813/011 PL1 OPTIMIZING COMPILER FIND SA G S1516 'PL1 OPTIMIZER' FSNAME=FIND.S 5.0T3 934 PL1_OPTIMIZING_COMPILER.F.SA.013 1 LINE 68 5 PAGE UM TIFFANY MAR. 30, 1981 20:50:52 5.0T8 313 0 Module to find the source for the corresponding %INCLUDE statements. Assemble with PEXIT=*PEXIT (775). Copies *GDINFODSECT (594). 00813/012 PL1 OPTIMIZING COMPILER FIND OC G S1516 'PL1 OPTIMIZER' FSNAME=FIND 5.0T3 935 PL1_OPTIMIZING_COMPILER.F.OC.014 1 LINE 2045 3 PAGE UM TIFFANY MAR. 30, 1981 20:50:46 5.0T8 314 0 Install this into PL1:OPTIMIZER (813/2). 1 SUN SEP 08/96 15:24:55 Page 625 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00813/013 PL1 OPTIMIZING COMPILER IEL0UA LKED D G S1516 'PL1 OPTIMIZER' FSNAME=UA.LKED 5.0T3 936 PL1_OPTIMIZING_COMPILER.I.D.015 1 LINE 66 1 PAGE UM TIFFANY MAR. 13, 1981 14:13:40 5.0T8 315 0 This is the *LINKEDIT (297) input to produce from the assembled sources IEL0UA1 and IEL0UA2 the compiler phases IEL0UA, IEL0UAY, IEL0UAC, IEL0UAE, and IEL0UAT in ETC:OPTPL1LINK (813/3). 0 Referenced by comments of: 813/10, 813/55 00813/014A PL1 OPTIMIZING COMPILER IEL0AA UC G S1516 'PL1 OPTIMIZER' FSNAME=AA.UP 5.1T2 465 PL1_OPTIMIZING_COMPILER.I.UC.014 1 LINE 70 4 PAGE UM TIFFANY MAY 02, 1983 11:26:30 0 *CDUPDATE (1036) input for the source IEL0AA. Assemble with (813/6) and (813/8). Install into *PL1OPT (813/2). 00813/015A PL1 OPTIMIZING COMPILER IEL0AE UC G S1516 'PL1 OPTIMIZER' FSNAME=AE.UP 5.1T2 466 PL1_OPTIMIZING_COMPILER.I.UC.015 1 LINE 67 5 PAGE UM TIFFANY MAY 02, 1983 11:26:31 0 *CDUPDATE (1036) input for the source IEL0AE. Assemble with (813/6) and (813/8). Install into phase IEL0AE in ETC:PL1OPTLINK (813/3). 00813/016 PL1 OPTIMIZING COMPILER IEL0AI SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0AI must be assembled with (813/6) due to change in (813/6). Install into phase IEL0AI in ETC:PL1OPTLINK (813/3). This subcomponent is included only as a reminder that IEL0AI must be assembled. There is no MTS update required. 00813/017 PL1 OPTIMIZING COMPILER IEL0AS SA G S1516 'PL1 OPTIMIZER' FSNAME=AS.S 5.0T3 939 PL1_OPTIMIZING_COMPILER.I.SA.019 1 LINE 72 1 PAGE UM TIFFANY MAR. 30, 1981 20:51:24 5.0T8 318 0 Assemble with (813/5). Install into phase IEL0AS in ETC:PL1OPTLINK (813/3). 0 Referenced by comments of: 813/5 00813/018 PL1 OPTIMIZING COMPILER IEL0AT SA G S1516 'PL1 OPTIMIZER' FSNAME=AT.S 5.0T3 940 PL1_OPTIMIZING_COMPILER.I.SA.020 1 LINE 72 1 PAGE UM TIFFANY MAR. 30, 1981 20:51:31 5.0T8 319 0 Assemble with (813/5). Install into phase IEL0AT in ETC:PL1OPTLINK (813/3). 0 Referenced by comments of: 813/5 00813/019A PL1 OPTIMIZING COMPILER IEL0BA UC G S1516 'PL1 OPTIMIZER' FSNAME=BA.UP 5.1T2 467 PL1_OPTIMIZING_COMPILER.I.UC.019 1 LINE 68 3 PAGE UM TIFFANY MAY 02, 1983 11:26:34 0 *CDUPDATE (1036) input for source IEL0BA. Assemble with (813/6). Install object into phase IEL0BA in ETC:PL1OPTLINK (813/3). 1 SUN SEP 08/96 15:24:55 Page 626 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00813/020A PL1 OPTIMIZING COMPILER IEL0CA UC G S1516 'PL1 OPTIMIZER' FSNAME=CA.UP 5.1T2 468 PL1_OPTIMIZING_COMPILER.I.UC.020 1 LINE 63 1 PAGE UM TIFFANY MAY 02, 1983 11:26:35 0 *CDUPDATE (1036) input for source IEL0CA. Assemble with (813/6). Install object into phases IEL0CA1, IEL0CB, IEL0CC in ETC:PL1OPTLINK (813/3). Do not install in IEL0CA. 00813/021 PL1 OPTIMIZING COMPILER IEL0CA1 UC G S1516 'PL1 OPTIMIZER' FSNAME=CA1.UP 5.0T3 943 PL1_OPTIMIZING_COMPILER.I.UC.023 1 LINE 59 1 PAGE UM TIFFANY MAR. 30, 1981 20:51:58 5.0T8 322 0 *CDUPDATE (1036) input for source IEL0CA1. Assemble with (813/6). Install into phase IEL0CA1 in ETC:PL1OPTLINK (813/3). 00813/022A PL1 OPTIMIZING COMPILER IEL0CB UC G S1516 'PL1 OPTIMIZER' FSNAME=CB.UP 5.1T2 469 PL1_OPTIMIZING_COMPILER.I.UC.022 1 LINE 54 1 PAGE UM TIFFANY MAY 02, 1983 11:26:37 0 *CDUPDATE (1036) input for source IEL0CB. Assemble with (813/6). Install into phase IEL0CB in ETC:PL1OPTLINK (813/3). 00813/023 PL1 OPTIMIZING COMPILER IEL0CB2 UC G S1516 'PL1 OPTIMIZER' FSNAME=CB2.UP 5.0T3 945 PL1_OPTIMIZING_COMPILER.I.UC.025 1 LINE 43 1 PAGE UM TIFFANY MAR. 30, 1981 20:52:17 5.0T8 324 0 *CDUPDATE (1036) input for source IEL0CB2. Assemble with (813/6). Install into phase IEL0CB in ETC:PL1OPTLINK (813/3). 00813/024 PL1 OPTIMIZING COMPILER IEL0CC UC G S1516 'PL1 OPTIMIZER' FSNAME=CC.UP 5.0T3 946 PL1_OPTIMIZING_COMPILER.I.UC.026 1 LINE 56 1 PAGE UM TIFFANY MAR. 30, 1981 20:52:22 5.0T8 325 0 *CDUPDATE (1036) input for source IEL0CC. Assemble with (813/6). Install into phase IEL0CC in ETC:PL1OPTLINK (813/3). 00813/025 PL1 OPTIMIZING COMPILER IEL0CC2 UC G S1516 'PL1 OPTIMIZER' FSNAME=CC2.UP 5.0T3 947 PL1_OPTIMIZING_COMPILER.I.UC.027 1 LINE 44 1 PAGE UM TIFFANY MAR. 30, 1981 20:52:32 5.0T8 326 0 *CDUPDATE (1036) input for source IEL0CC2. Assemble with (813/6). Install into phase IEL0CC in ETC:PL1OPTLINK (813/3). 00813/026 PL1 OPTIMIZING COMPILER IEL0CE1 SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0CE1 must be assembled with (813/6). Install into phase IEL0CE in ETC:PL1OPTLINK (813/3). Required due to change in (813/6). This subcomponent is included only as a reminder that IEL0CE1 must be assembled. There is no MTS update required. 00813/027 PL1 OPTIMIZING COMPILER IEL0CI1 SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0CI1 must be assembled with LOADMAC (813/8) and (813/6). Install 1 SUN SEP 08/96 15:24:55 Page 627 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 into phase IEL0CI in ETC:PL1OPTLINK (813/3). Assembly required due to change in (813/6). This subcomponent is included only as a reminder that IEL0CI1 must be assembled. There is no MTS update required. 00813/028 PL1 OPTIMIZING COMPILER IEL0CR UC G S1516 'PL1 OPTIMIZER' FSNAME=CR.UP 5.0T3 948 PL1_OPTIMIZING_COMPILER.I.UC.030 1 LINE 36 1 PAGE UM TIFFANY MAR. 13, 1981 14:16:53 5.0T8 327 0 *CDUPDATE (1036) input for source IEL0CR. Assemble with (813/6) and (813/8). Install into phase IEL0CA in ETC:PL1OPTLINK (813/3). 00813/029A PL1 OPTIMIZING COMPILER IEL0EA1 UC G S1516 'PL1 OPTIMIZER' FSNAME=EA1.UP 5.1T2 470 PL1_OPTIMIZING_COMPILER.I.UC.029 1 LINE 63 1 PAGE UM TIFFANY MAY 02, 1983 11:26:42 0 *CDUPDATE (1036) input for source IEL0EA1. Assemble with (813/6). Install into phase IEL0EA in ETC:PL1OPTLINK (813/3). 00813/030A PL1 OPTIMIZING COMPILER IEL0EA2 UC G S1516 'PL1 OPTIMIZER' FSNAME=EA2.UP 5.1T2 471 PL1_OPTIMIZING_COMPILER.I.UC.030 1 LINE 68 1 PAGE UM TIFFANY MAY 02, 1983 11:26:43 0 *CDUPDATE (1036) input for source IEL0EA2. Assemble with (813/6). Install into phase IEL0EA in ETC:PL1OPTLINK (813/3). 00813/031A PL1 OPTIMIZING COMPILER IEL0EA3 UC G S1516 'PL1 OPTIMIZER' FSNAME=EA3.UP 5.1T2 472 PL1_OPTIMIZING_COMPILER.I.UC.031 1 LINE 67 1 PAGE UM TIFFANY MAY 02, 1983 11:26:44 0 *CDUPDATE (1036) input for source IEL0EA3. Assemble with (813/6). Install into phase IEL0EA in ETC:PL1OPTLINK (813/3). 00813/032C PL1 OPTIMIZING COMPILER IEL0EE1 SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0EE1 needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0EE. Requires the (813/6) macro library. 00813/033C PL1 OPTIMIZING COMPILER IEL0EI SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0EI needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0EI. Requires the (813/6) macro library. 00813/034C PL1 OPTIMIZING COMPILER IEL0IA SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0IA needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0IA. Requires the (813/6) macro library. 00813/035C PL1 OPTIMIZING COMPILER IEL0ID SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0ID needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0ID. Requires the (813/6) macro library. 1 SUN SEP 08/96 15:24:55 Page 628 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00813/036C PL1 OPTIMIZING COMPILER IEL0IE1 SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0IE1 needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0IE. Requires the (813/6) macro library. 00813/037C PL1 OPTIMIZING COMPILER IEL0II1 SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0II1 needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0II. Requires the (813/6) macro library. 00813/038 PL1 OPTIMIZING COMPILER IEL0IK SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0IK must be assembled with (813/6). Install into phase IEL0IK in ETC:PL1OPTLINK (813/3). Assembly required due to change in (813/6). This subcomponent is included only as a reminder that IEL0IK must be assembled. There is no MTS update required. 00813/039C PL1 OPTIMIZING COMPILER IEL0IM SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Assemble the source. The object for PTF070 was no good. Requires the (813/6) macro library. 00813/040C PL1 OPTIMIZING COMPILER KQ.UP UC G S1516 'PL1 OPTIMIZER' FSNAME=KQ.UP 5.1T2 473 PL1_OPTIMIZING_COMPILER.K.UC.040 1 LINE 65 1 PAGE UM TIFFANY MAY 02, 1983 11:26:45 0 *CDUPDATE (1036) input for source IEL0KQ. Assemble with (813/6). Install into phase IEL0KQ in ETC:PL1OPTLINK (813/3). 00813/041 PL1 OPTIMIZING COMPILER IEL0KV UC G S1516 'PL1 OPTIMIZER' FSNAME=KV.UP 5.0T3 952 PL1_OPTIMIZING_COMPILER.I.UC.035 1 LINE 42 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:15 5.0T8 331 0 *CDUPDATE (1036) input for source IEL0KV. Assemble with (813/6). Install into phase IEL0KV in ETC:PL1OPTLINK (813/3). 00813/042C PL1 OPTIMIZING COMPILER IEL0PI SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0PI needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0PI. Requires the (813/6) macro library. 00813/043 PL1 OPTIMIZING COMPILER IEL0OE UC G S1516 'PL1 OPTIMIZER' FSNAME=OE.UP 5.0T3 953 PL1_OPTIMIZING_COMPILER.I.UC.036 1 LINE 66 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:21 5.0T8 332 0 *CDUPDATE (1036) input for source IEL0OE. Assemble with (813/6). Install into phase IEL0OE in ETC:PL1OPTLINK (813/3). 1 SUN SEP 08/96 15:24:55 Page 629 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00813/044C PL1 OPTIMIZING COMPILER IEL0OI UC G S1516 'PL1 OPTIMIZER' FSNAME=OI.UP 5.1T2 474 PL1_OPTIMIZING_COMPILER.I.UC.044 1 LINE 61 1 PAGE UM TIFFANY MAY 02, 1983 11:26:48 0 *CDUPDATE (1036) input for source IEL0OI. Assemble with (813/6). Install into phase IEL0OI in ETC:PL1OPTLINK (813/3). 00813/045 PL1 OPTIMIZING COMPILER IEL0PA UC G S1516 'PL1 OPTIMIZER' FSNAME=PA.UP 5.0T3 954 PL1_OPTIMIZING_COMPILER.I.UC.037 1 LINE 60 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:28 5.0T8 333 0 *CDUPDATE (1036) input for source IEL0PA. Assemble with (813/6) and (813/8). Install into phase IEL0PA in ETC:PL1OPTLINK (813/3). 00813/046 PL1 OPTIMIZING COMPILER IEL0PAL2 UC G S1516 'PL1 OPTIMIZER' FSNAME=PAL2.UP 5.0T3 955 PL1_OPTIMIZING_COMPILER.I.UC.038 1 LINE 60 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:36 5.0T8 334 0 *CDUPDATE (1036) input for source IEL0PAL2. Assemble with (813/6). Install into phase IEL0PAL2 in ETC:PL1OPTLINK (813/3). This deletes a reference to IEAXPALL, an extended precision simulator. 00813/047 PL1 OPTIMIZING COMPILER IEL0PAL3 UC G S1516 'PL1 OPTIMIZER' FSNAME=PAL3.UP 5.0T3 956 PL1_OPTIMIZING_COMPILER.I.UC.039 1 LINE 60 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:43 5.0T8 335 0 *CDUPDATE (1036) input for source IEL0PAL3. Assemble with (813/6). Install into phase IEL0PAL3 in ETC:PL1OPTLINK (813/3). This deletes a reference to IEAXPALL, an extended precision simulator. 00813/048 PL1 OPTIMIZING COMPILER IEL0PAL5 UC G S1516 'PL1 OPTIMIZER' FSNAME=PAL5.UP 5.0T3 957 PL1_OPTIMIZING_COMPILER.I.UC.040 1 LINE 60 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:50 5.0T8 336 0 *CDUPDATE (1036) input for source IEL0PAL5. Assemble with (813/6). Install into phase IEL0PAL5 in ETC:PL1OPTLINK (813/3). This deletes a reference to IEAXPALL, an extended precision simulator. 00813/049C PL1 OPTIMIZING COMPILER QA.UP UC G S1516 'PL1 OPTIMIZER' FSNAME=QA.UP 5.1T2 475 PL1_OPTIMIZING_COMPILER.Q.UC.049 1 LINE 64 1 PAGE UM TIFFANY MAY 02, 1983 11:27:12 0 *CDUPDATE (1036) input for the source IEL0QA. Assemble with (813/6). Install into phase IEL0QA in ETC:PL1OPTLINK (813/3). 00813/050C PL1 OPTIMIZING COMPILER IEL0QE SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IELOQE needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0QE. Requires the (813/6) macro library. 00813/051C PL1 OPTIMIZING COMPILER IEL0QI SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0QI needs to be assembled to kill a fetch protect in XBRIC routines. Install into phase IEL0QI. Requires the (813/6) macros for 1 SUN SEP 08/96 15:24:55 Page 630 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 assembly. 00813/052C PL1 OPTIMIZING COMPILER S.UP UC G S1516 'PL1 OPTIMIZER' FSNAME=S.UP 5.1T2 476 PL1_OPTIMIZING_COMPILER.S.UC.052 1 LINE 60 1 PAGE UM TIFFANY MAY 02, 1983 11:27:13 0 *CDUPDATE (1036) input for source IEL0S. Assemble into phases IEL0SA, IEL0SC, IEL0SD, IEL0SQ. Assemble using the (813/6) macros. 00813/053A PL1 OPTIMIZING COMPILER IEL0SI UC G S1516 'PL1 OPTIMIZER' FSNAME=SI.UP 5.1T2 477 PL1_OPTIMIZING_COMPILER.I.UC.053 1 LINE 67 1 PAGE UM TIFFANY MAY 02, 1983 11:27:14 0 *CDUPDATE (1036) input for source IEL0SI. Assemble with (813/6). Install into phase IEL0SI in ETC:PL1OPTLINK (813/3). 00813/054 PL1 OPTIMIZING COMPILER IEL0SM UC G S1516 'PL1 OPTIMIZER' FSNAME=SM.UP 5.0T3 959 PL1_OPTIMIZING_COMPILER.I.UC.042 1 LINE 56 1 PAGE UM TIFFANY MAR. 13, 1981 14:17:56 5.0T8 338 0 *CDUPDATE (1036) input for source IEL0SM. Assemble with (813/6). Install into phase IE0SM in ETC:PL1OPTLINK (813/3). 00813/055 PL1 OPTIMIZING COMPILER IEL0UA1 UC G S1516 'PL1 OPTIMIZER' FSNAME=UA1.UP 5.0T3 960 PL1_OPTIMIZING_COMPILER.I.UC.043 1 LINE 34 1 PAGE UM TIFFANY MAR. 13, 1981 14:18:05 5.0T8 339 0 *CDUPDATE (1036) input for source IEL0UA1. Assemble with (813/6) and (813/8). Use (813/13) to generate various compiler phases and then install them into ETC:PL1OPTLINK (813/3). 00813/056 PL1 OPTIMIZING COMPILER IEL0UE1 SA G # (NOT DISTRIBUTED) UM TIFFANY 0 Source IEL0UE1 must be assembled with (813/6) due to a change in (813/6). Install into phase IEL0UE in ETC:PL1OPTLINK (813/3). This subcomponent is included only as a reminder that IEL0UE1 must be assembled. There is no MTS update required. 00813/057C PL1 OPTIMIZING COMPILER OPTSYM SP G PL1:OPTSYM.S 5.1T2 478 PL1_OPTIMIZING_COMPILER.O.SP.057 1 LINE 76 36 PAGE UM TIFFANY JULY 23, 1983 13:36:42 0 A program -- which isn't a part of the compiler -- that reads the compiler output listing and produces ASMH-like SYM records for debugging. 00813/058C PL1 OPTIMIZING COMPILER OPTSYM O G PL1:OPTSYM 5.1T2 479 PL1_OPTIMIZING_COMPILER.O.O.058 1 LINE 32767 23 PAGE UM TIFFANY JULY 23, 1983 13:36:46 0 Contains a $CONTINUE WITH *PL1OPTLIB (827/5) record. 00814/001A DUMP TAPE PROCESSING WRITEUP P DUMP:DUMP.DOC 5.1T2 480 DUMP_TAPE_PROCESSING.WRIT.P.001 1 LINE 68 4 PAGE UM STERKEN JULY 23, 1983 13:36:46 0 At UM, we have a rotating crew of "fire fighters" who 1 SUN SEP 08/96 15:24:55 Page 631 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 are charged with keeping MTS up and running. One of the jobs fire-fighters must do is process job-dumps. This involves printing job-dump listings, routing them to the appropriate person, and releasing dump tapes. In an attempt to organize this work, we've set up user ID "DUMP" as a place to keep track of all of this. User ID "DUMP" has a "known" password: "DUMP". Its sigfile uses *CKID (680) to screen interactive users, and in batch mode it always runs DUMP:DUMP.BATCH (814/10) which prints listings of all recent job-dumps. Whenever a job-dump has occurred, the operators use operator job *DMP (814/8) to log the dump. *DMP runs DUMP:DUMPER (814/3), which logs the dump and submits a *BATCH* job to print the listing. The receipt number is placed in file DUMP:TAPES (814/7). This subcomponent contains further details on the processing of dump tapes and fire-fighting duties in general. 0 Referenced by comments of: 814/2, 814/9 00814/002A DUMP TAPE PROCESSING DUMPER SA G DUMP:DUMPER.S 5.1T2 481 DUMP_TAPE_PROCESSING.DUMP.SA.002 1 LINE 72 4 PAGE UM STERKEN JULY 23, 1983 13:36:48 0 Program used to print jobdumps via MTS:PRINTDUMP (400/17). See (814/1) for details. Copies *SENSEDSECT (3025) and *GDINFODSECT (594). 0 Referenced by comments of: 814/3 00814/003A DUMP TAPE PROCESSING DUMPER OC G DUMP:DUMPER 5.1T2 482 DUMP_TAPE_PROCESSING.DUMP.OC.003 1 LINE 3332 4 PAGE UM STERKEN JULY 23, 1983 13:36:49 DUMP:DUMPER 0 Object of (814/2). Has a $CONTINUE WITH DUMP:DMPMSG (814/5) record. 0 Referenced by comments of: 814/1, 814/4, 814/6, 814/7, 814/8 00814/004A DUMP TAPE PROCESSING DMPMSG SA G DUMP:DMPMSG.S 5.1T2 483 DUMP_TAPE_PROCESSING.DMPM.SA.004 1 LINE 85 3 PAGE UM STERKEN JULY 23, 1983 13:36:49 0 A subroutine used by (814/3) to read job-dump tape headers. Copies *CNFGINFODSECT (654). Assemble using the PRINTDUMP macros (400/16). 00814/005A DUMP TAPE PROCESSING DMPMSG OC G DUMP:DMPMSG 5.1T2 484 DUMP_TAPE_PROCESSING.DMPM.OC.005 1 LINE 80 2 PAGE UM STERKEN JULY 23, 1983 13:36:49 DUMP:DMPMSG 0 Referenced by comments of: 814/3, 814/10 1 SUN SEP 08/96 15:24:55 Page 632 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00814/006 DUMP TAPE PROCESSING LOG D # DUMP:LOG UM STERKEN DUMP:LOG@E 0 All dumps are logged in this file by (814/3). 00814/007 DUMP TAPE PROCESSING LOG D # DUMP:TAPES UM STERKEN DUMP:TAPES@E 0 File used by (814/3) to log a line for each active, unreleased dump tape. 0 Referenced by comments of: 814/1 00814/008 DUMP TAPE PROCESSING *DMP C G *DMP 5.0T3 966 DUMP_TAPE_PROCESSING.*DMP.C.008 1 LINE 51 1 PAGE UM STERKEN JULY 03, 1981 20:19:31 5.0T8 345 *DMP 0 Operator job which runs (814/3) to log job dumps. 0 Referenced by comments of: 814/1 00814/009A DUMP TAPE PROCESSING BATCH DUMP SA G DUMP:DUMP.BATCH.S 5.1T2 485 DUMP_TAPE_PROCESSING.BATC.SA.009 1 LINE 144 4 PAGE UM STERKEN JULY 23, 1983 13:36:50 0 Program to print job dumps via MTS:PRINTDUMP (400/17). It is run from the sigfile (814/12) of the user ID "DUMP" in batch mode. See (814/1) for details. 00814/010A DUMP TAPE PROCESSING BATCH DUMP OC G DUMP:DUMP.BATCH 5.1T2 486 DUMP_TAPE_PROCESSING.BATC.OC.010 1 LINE 80 5 PAGE UM STERKEN JULY 23, 1983 13:36:50 DUMP:DUMP.BATCH 0 Contains a $CONTINUE WITH DUMP:DMPMSG (814/5) record. 0 Referenced by comments of: 814/1, 814/11 00814/011A DUMP TAPE PROCESSING BATCH DUMP D DUMP:DUMP.CMDS 5.1T2 487 DUMP_TAPE_PROCESSING.BATC.D.011 1 LINE 68 1 PAGE UM STERKEN JULY 23, 1983 13:36:50 DUMP:DUMP.CMDS 0 Contains commands for MTS:PRINTDUMP (400/17) used by (814/10). This file should not be renumbered. 00814/012A DUMP TAPE PROCESSING SIGFILE C DUMP:SIGFILE 5.1T2 488 DUMP_TAPE_PROCESSING.SIGF.C.012 1 LINE 29 1 PAGE UM STERKEN JULY 23, 1983 13:36:50 DUMP:SIGFILE 0 Sigfile for user ID "DUMP". 0 Referenced by comments of: 814/9 1 SUN SEP 08/96 15:24:55 Page 633 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00815/001A SIDEBYSIDE SBSPROG SG G S0027 DISTRB FSNAME=SBSPROG 5.1T2 489 SIDEBYSIDE.SBSPROG.SG.001 1 LINE 117 3 PAGE UM ENGLE ENGLE FEB. 07, 1983 16:44:46 0 Program to place consecutive print pages in a side-by-side format, taking logical carriage control into account. 0 Referenced by comments of: 815/4, 815/7 00815/002A SIDEBYSIDE SBSPROG UC S0027 DISTRB FSNAME=SBSPROGUPD 5.1T2 490 SIDEBYSIDE.SBSPROG.UC.002 1 LINE 117 1 PAGE UM ENGLE ENGLE FEB. 07, 1983 16:44:52 0 Updates source from previous regular distribution to current distribution. 0 Referenced by comments of: 815/7 00815/003A SIDEBYSIDE SBSPROG OC G S0027 DISTRB FSNAME=SBSP 5.1T2 491 SIDEBYSIDE.SBSPROG.OC.003 1 LINE 80 4 PAGE UM ENGLE ENGLE FEB. 07, 1983 16:45:14 00815/004A SIDEBYSIDE SIDBYSID SG G S0027 DISTRB FSNAME=SIDBYSID 5.1T2 492 SIDEBYSIDE.SIDBYSID.SG.004 1 LINE 114 5 PAGE UM ENGLE ENGLE AUG. 26, 1982 12:14:36 0 Subroutine called by SBSPROG (815/1) to do most of the work. 00815/005A SIDEBYSIDE SIDBYSID UC G S0027 DISTRB FSNAME=SIDBYSIDUPD 5.1T2 493 SIDEBYSIDE.SIDBYSID.UC.005 1 LINE 68 1 PAGE UM ENGLE ENGLE AUG. 26, 1982 12:14:43 0 Updates source from previous regular distribution to current distribution. 00815/006A SIDEBYSIDE SIDBYSID OC G S0027 DISTRB FSNAME=SBS 5.1T2 494 SIDEBYSIDE.SIDBYSID.OC.006 1 LINE 80 6 PAGE UM ENGLE ENGLE AUG. 26, 1982 12:16:47 00815/007A SIDEBYSIDE OE G *SIDEBYSIDE 5.1T2 495 SIDEBYSIDE..OE.007 1 LINE 9588 4 PAGE UM ENGLE JULY 23, 1983 13:37:33 *SIDEBYSIDE 0 Linkeditted version of SBSPROG (815/1) and SIDBYSID (815/2). 00816/001A CLOCKWATCHER MASTER TASK SA O W116:CLK.REL.2 5.1T2 496 CLOCKWATCHER.MASTER_TASK.SA.001 1 LINE 95 20 PAGE UM YOUNG JULY 23, 1983 13:37:33 0 This is the Clockwatcher task. It is used to start up specific tasks at specific times. Requires the (816/15) macro library and SYS:CLK.MASTER (816/7), SYS:CLK.DAILY (816/8), SYS:CLK.UNATTEND (816/9), SYS:CLK.AUDIT (816/10) and SYS:CLK.PGNT (816/11). 0 Referenced by comments of: 798/110, 816/2, 816/3 00816/002A CLOCKWATCHER AUTOSTART SA O W116:AUTO.REL.2 5.1T2 497 CLOCKWATCHER.AUTOSTART.SA.002 1 LINE 73 77 PAGE UM YOUNG JULY 23, 1983 13:37:34 0 This is the submission program for the Clockwatcher. Besides the files CLK.MASTER, CLK.DAILY, CLK.UNATTEND, CLK.AUDIT, and CLK:PGNT, which 1 SUN SEP 08/96 15:24:55 Page 634 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 are required for the master task (816/1), AUTOSTART requires: CLK.HELP - (816/6) CLK.PRIV - (816/12) W116:AUTO.DOC.C - (816/17) This file does not need to be permitted in any special way, but it should belong to the same ID (at UM, we use SYS.) as the files required by the master task. When the system first comes up, only the owner of CLK.PRIV will have full AUTOSTART capabilities. Requires the (816/15) macro library and *GDINFODSECT (594). 0 Referenced by comments of: 816/3, 816/16, 816/17 00816/003A CLOCKWATCHER COMMON RTNS SA O W116:AC.REL.2 5.1T2 498 CLOCKWATCHER.COMMON_RTNS.SA.003 1 LINE 73 37 PAGE UM YOUNG JULY 23, 1983 13:37:38 0 Source for routines common to autostart (816/2) and Clockwatcher (816/1). Requires the (816/15) macro library, *GDINFODSECT (594/1), and *SENSEDSECT (3025). 00816/004A CLOCKWATCHER MASTER TASK OE O SYS:CLOCKWATCHER 5.1T2 499 CLOCKWATCHER.MASTER_TASK.OE.004 1 LINE 32767 23 PAGE UM YOUNG JULY 23, 1983 13:37:40 SYS:CLOCKWATCHER 0 Contains a linkedited version of the UM time routines (808). Should have a PKEY=*AUTOSTART. 0 Referenced by comments of: 816/13, 816/14 00816/005A CLOCKWATCHER AUTOSTART OE O *AUTOSTART 5.1T2 500 CLOCKWATCHER.AUTOSTART.OE.005 1 LINE 32767 32 PAGE UM YOUNG JULY 23, 1983 13:37:41 *AUTOSTART 0 Contains a linkedited version of the UM time routines (808). Should have a PKEY=*AUTOSTART. 0 Referenced by comments of: 816/12, 844/29, 844/30, 864/1, 865/1 00816/006A CLOCKWATCHER AUTOSTART M SYS:CLK.HELP 5.1T2 501 CLOCKWATCHER.AUTOSTART.M.006 1 LINE 71 12 PAGE UM YOUNG JULY 23, 1983 13:37:42 SYS:CLK.HELP 0 File containing messages used by *AUTOSTART's HELP facility. Should be permitted READ to PKEY=*AUTOSTART. References files "W116:AUTO.DOC.C" (816/17) and "W116:CCMEMO.444.C" (816/16). These names should be edited when they are changed locally. 0 Referenced by comments of: 816/2 1 SUN SEP 08/96 15:24:55 Page 635 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00816/007C CLOCKWATCHER SYS:CLK.MASTER D O # SYS:CLK.MASTER UM YOUNG SYS:CLK.MASTER@E 0 Holds run information for jobs controlled by the clockwatcher. 0 Referenced by comments of: 816/1 00816/008C CLOCKWATCHER SYS:CLK.DAILY D O # SYS:CLK.DAILY UM YOUNG SYS:CLK.DAILY@E 0 Holds run schedules for the current day. 0 Referenced by comments of: 816/1 00816/009C CLOCKWATCHER CLK.UNATTEND D O # SYS:CLK.UNATTEND UM YOUNG SYS:CLK.UNATTEND@E 0 Holds run schedules for jobs delayed due to anattended mode. 0 Referenced by comments of: 816/1 00816/010C CLOCKWATCHER SYS:CLK.AUDIT D O # SYS:CLK.AUDIT UM YOUNG SYS:CLK.AUDIT@E 0 Traces the clockwatcher's actions. 0 Referenced by comments of: 816/1 00816/011C CLOCKWATCHER SYS:CLK.PGNT D O # SYS:CLK.PGNT UM YOUNG SYS:CLK.PGNT@E 0 Dump file used in case of Clockwatcher PGNT. 0 Referenced by comments of: 816/1 00816/012C CLOCKWATCHER SYS:CLK.PRIV D O # SYS:CLK.PRIV UM YOUNG SYS:CLK.PRIV@E 0 Used to give users access to special features of the AUTOSTART program (816/5). When the system first comes up, only the owner of CLK.PRIV will have full AUTOSTART capabilities. Version on the test pack will be permitted like it is at UM. 0 Referenced by comments of: 816/2 1 SUN SEP 08/96 15:24:55 Page 636 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00816/013A CLOCKWATCHER *CLK C *CLK 5.1T2 502 CLOCKWATCHER.?CLK.C.013 1 LINE 51 1 PAGE UM YOUNG JULY 23, 1983 13:37:43 *CLK 0 Operator file containing commands used to start up the Clockwatcher (816/4). 00816/014A CLOCKWATCHER *CLR C *CLR 5.1T2 503 CLOCKWATCHER.?CLR.C.014 1 LINE 35 1 PAGE UM YOUNG JULY 23, 1983 13:37:43 *CLR 0 Operator file containing commands used to restart the Clockwatcher (816/4). 00816/015A CLOCKWATCHER MACLIB SM O W116:AC.MACRO 5.1T2 504 CLOCKWATCHER.MACLIB.SM.015 1 LINE 72 7 PAGE UM YOUNG JULY 23, 1983 13:37:43 0 Copy section globals contain some set symbols you may wish to change: &SYSID - Owner of Clockwatcher &SYSPROJ - Project ID of Clockwatcher's owner &CLKID - Person who gets informed of *PRINT* number of audit file when it's dumped &DOCFILE - Online documentation file for special features &FIGHTER - Controls whether or not special persons get informed of Clockwatcher problems &MONITOR - Name of file that contains, on line 1, persons' names, separated by commas, who get informed if clockwatcher encounters certain problems. 0 Referenced by comments of: 816/1, 816/2, 816/3 00816/016A CLOCKWATCHER AUTOSTART P W116:CCMEMO.444.C 5.1T2 505 CLOCKWATCHER.AUTOSTART.P.016 1 LINE 69 8 PAGE UM YOUNG JULY 23, 1983 13:37:44 0 Documentation for the AUTOSTART (816/2) program. Should be permitted READ OTHERS. NOTE: This is not CCMemo 444. 0 Referenced by comments of: 816/6 00816/017A CLOCKWATCHER AUTOSTART P W116:AUTO.DOC.C 5.1T2 506 CLOCKWATCHER.AUTOSTART.P.017 1 LINE 69 11 PAGE UM YOUNG JULY 23, 1983 13:37:45 0 Additional documentation for the AUTOSTART (816/2) program. Should be permitted UNLIM SYS&PKEY=*AUTOSTART. 0 Referenced by comments of: 816/2, 816/6 00817/001 PAGE PRINTER # (OBSOLETE) 5.0T3 984 PAGE_PRINTER..SQ.001 1 LINE 221 7 PAGE UM JULY 03, 1981 20:20:13 5.0T8 363 0 Obsolete program to send copy via the Merit Network to Wayne State for printing on the Xerox 9700 Page Printer. 1 SUN SEP 08/96 15:24:55 Page 637 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00818/001A PATHDEVICE SA G DMGR:PATHDEV(-10000,-1) 5.1T2 507 PATHDEVICE..SA.001 1 LINE 71 3 PAGE UM HELFFRICH JULY 23, 1983 13:37:45 0 Subroutine which will successively return all paths to a device, and whether each path is online or not. Used by the Disk Manager (769) and SSRTN (413/1). Contains commands which may be $SOURCEd to for assembly. Requires COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:DM.MACROS (769/29), COPY:CC.MACROS (1054/3), COPY:FILE.MACROS (482/45), COPY:MNTR.MACROS (1058/30), and COPY:MISC.MACROS (728/1). 0 Referenced by comments of: 413/1 00818/002A PATHDEVICE UC G DMGR:PATHDEV(1000) 5.1T2 508 PATHDEVICE..UC.002 1 LINE 68 1 PAGE UM HELFFRICH JULY 23, 1983 13:37:46 0 Update to be applied to previously distributed source to yield current source. 00818/003A PATHDEVICE OC G # (PART OF RESIDENT SYSTEM) UM HELFFRICH 0 Object part of Resident System (468). 00819/001 T11 JOB SA G S1560 5.0T3 VLO FSNAME=T11_JOB..SA.001(1) 990 5.0T3 990 T11_JOB..SA.001 1 LINE 70 3 PAGE UM MTA APR. 25, 1981 01:23:41 5.0T8 369 0 Job program to load a 3211 character set and FCB for a T11 print train. Accepts same parameters as P11 (1027). 00819/002 T11 JOB OC G # (PART OF RESIDENT SYSTEM) UM MTA 0 Object part of Resident System (468). 00820/001A PM2 MACROS CM G ETC:PM2.MAC 5.1T2 509 PM2.MACROS.OE.001 1 LINE 201 4 PAGE UM MTA JULY 23, 1983 13:37:46 ETC:PM2.MAC 0 PM2 is STC's program to format and print disk, tape, and 4305 errors. It is copyrighted and therefore cannot be distributed. These components have been used with version 3.2 of PM2. 0 Referenced by comments of: 621/8, 655/4 00820/002A PM2 LIBRARY OL G # ETC:PM2.LIB.3.2 UM MTA 0 Load module for version 3.2 of PM2. Produced by MTS link editor. Not distributed due to copyright restrictions. 1 SUN SEP 08/96 15:24:55 Page 638 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00820/003A PM2 HISTORY FILE D # ETC:PM2.H.3.2 UM MTA ETC:PM2.H.3.2@E 0 VSS simulated BDAM file that is used to contain a historical record of the last 3 months of errors for each device known to PM2. Built by STCPM2FE using information about the local installation's configuration. 00820/004A PM2 HISTORY FILE D # ETC:PM2.H.3.2.O UM MTA ETC:PM2.H.3.2.O@E 0 Previous history file. PM2 maintains a three-level push-down of history files. This is level 2. 00820/005A PM2 HISTORY FILE D # ETC:PM2.H.3.2.VO UM MTA ETC:PM2.H.3.2.VO@E 0 Level 3 of the history file push-down. 00820/006A PM2 VOLUME HISTORY D # ETC:PM2.V.3.2 UM MTA ETC:PM2.V.3.2@E 0 File containing a record of tape errors by tape volume. Top level of a three-level push-down. 00820/007A PM2 VOLUME HISTORY D # ETC:PM2.V.3.2.O UM MTA ETC:PM2.V.3.2.O@E 0 Level 2 of the push-down. 00820/008A PM2 VOLUME HISTORY D # ETC:PM2.V.3.2.VO UM MTA ETC:PM2.V.3.2.VO@E 0 Level 3 of the push-down. 00820/009A PM2 UM CONFIG D MTA:PM2.CONFIG 5.1T2 510 PM2.UM_CONFIG.D.009 1 LINE 48 1 PAGE UM MTA JULY 23, 1983 13:37:47 0 Input to STCPM2FE to produce the PM2 history file for the UM configuration. 00820/010A PM2 CNVTEREP CTL D ETC:PM2.CTL 5.1T2 511 PM2.CNVTEREP_CTL.D.010 1 LINE 88 1 PAGE UM MTA JULY 23, 1983 13:37:47 ETC:PM2.CTL 0 Contains 3 lines read by CNVTEREP (655/5) to tell it how and what to convert to LOGREC format for PM2. 1 SUN SEP 08/96 15:24:55 Page 639 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00820/011A PM2 OBJECT OC # S1657 'PM2 3.2' FMT=FS(3200,80) POSN=*4* UM MTA 0 Object for PM2. Not distributed due to copyright restrictions. 00820/012A PM2 OS JCL # S1657 'PM2 3.2' FMT=FS(3200,80) POSN=*5* UM MTA 0 OS JCL for running PM2 in OS/VS. Not distributed due to copyright restrictions. 00820/013A PM2 WRITEUP WF MTA:PM2.W 5.1T2 512 PM2.WRITEUP.WF.013 1 LINE 69 3 PAGE UM MTA JULY 23, 1983 13:37:48 0 Instructions for running PM2 in MTS. 00821/001A USERDIRECTORY PLUS SOURCE SQ O W494:UD.SQ 5.1T2 513 USERDIRECTORY.PLUS_SOURCE.SQ.001 1 LINE 86 93 PAGE UM TIFFANY JULY 23, 1983 13:37:48 0 This file is all of the PLUS sources for the *USERDIRECTORY program (821/15) and the search subroutines (821/17). It is recommended that it be manipulated with the Program Management Facility, or PMF (810), using the project file in (821/25). To compile, simply issue the following PMF command: COMPILE PLUSROUTINES The PLUS macro libraries needed are: UD.SQL (821/3) COPY:MTS*SQL (344/4) COPY:FILE*SQL (482/65) *PLUS.SOURCELIB (1042/5) *CLPARSELIB (1076/11) This list of PMF modules in this file is described in lines 1001 through 1999. These lines can be referenced as a PMF module S/INDEX_NOTES. ************************************************************************* D5.0C version: A new PMF module has been added to this file: S/DATE_CONVERSION (in lines 65001 through 65999). The purpose is to convert dates of the form "02-11-83" to readable dates "Feb11/83" and vice versa. This requires a change to the MTS subroutine CHECKPW with an optional parameter, expiration date. Changes are indicated in an update to MTSS:USUB/UPD (638/2) and to a macro Checkpw_Procedure_Type in the file COPY:MTS*SQL (344/4). Here is a list of changes already made to the program and the routines: (1) Dates for CREATEDATE, LASTMODDATE, and LASTSETDATE are now shown as mmmdd/yy", e.g., Feb11/83. (2) New versions of *USERDIRECTORY and *UDROUTINES no longer read the accounting records just to check if a signon ID exists. Another routine CHECKPW is called instead. 1 SUN SEP 08/96 15:24:55 Page 640 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (3) Master directory managers can display name entries showing owner IDs that are either expired or missing. (4) MURDER command no longer exists. It has been renamed PURGE. (5) When an owner ID of a name entry is changed, the owner in the access line is also updated. (6) A couple of commands such as HIGH_WATER have been eliminated. (7) When issuing $SET NAME=..., LASTMODDATE is no longer updated. (8) PURGE command (formerly MURDER) now really eliminates the name IDs. Previously, some name information lines were shortenend rather than deleted. (9) Various typos on output lines were corrected. (10) Demand_perfection control bit renamed Verify_Name. Two new control bits, Exact_Match and Only_One_Nameid, have been added. (11) New UDGET item COMPLETENAME, which returns the full names as well as all nicknames has been added. (12) An UDSRCH bug that returned a group belonging to an owner ID even if Required_Individual bit is on has been fixed. (13) A group can now have just one name. Previously, at least two names were required. (14) A bug in READ_VAR macro that caused some phonetics or IDs to be replaced by new phonetics or IDs has been fixed. Previously, due to missing phonetics, users were able to add duplicate names. (15) A new entry PHCODE has been added to PHONCODE for the sake of non-PLUS programs. (16) There were some addressing interrupts in the $MESSAGESYSTEM invoking UD routines after $UNLOAD or $RUN command. Thanks especially to impertinent PLUS statements "%INCLUDE (GETSPACE):", which should be removed from both the source and the source library. (17) A new program CHKDIR, which can check both master directory and name libraries, has been added. (18) A new subroutine UDSCAN, written in assembly language, is available for the dead file stuff. Some forthcoming changes which we'd like to add but still don't have time: (1) Add "DISPLAY EACH GROUP", to show all groups. Currently, one must use "DISPLAY EACH NAMEID=$?" for the master directory or "DISPLAY EACH NAMEID=_?" for the name libraries. (2) Convert all the local times to GMT times. To my knowledge, subroutine TIMEZONM isn't satisfactory. (3) Add a subcommand mode for Do you mean "John Doe"? indicating the complete name, business phone, business address, and owner ID. (4) Scrap the abbreviation scheme. *USERDIRECTORY considers abbreviations as single letters optionally followed by a period. "Mr.", "Dr.", etc. don't qualify as abbreviations. In addition, it is also possible two duplicate names can be entered in the *USERDIRECTORY database: "John A. Doe" and "John A Doe". (5)* Allow a user to change the owner when the old owner ID is either expired or missing. (* - Done as of D5.1) (6) Incorporate remote names as "foreigners". 1 SUN SEP 08/96 15:24:55 Page 641 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 (7) P=W? is printed as P=W?$. thanks to the parser *ccid*. (8) Allow relative operators for CREATEDATE, LASTMODDATE, LASTSETDATE, etc. Someday, the deadfile owner may issue: PURGE DESTROYED LASTSETDATE<=Jan01/82 ************************************************************************ D5.1 version: (1) A new PMF module has been added to this file: S/CMD_CLAIM (lines 66001 - 66999) It is useful for users to claim ownership of name entries belonging to expired signon IDs. (2) An alias can now point to a group in the master directory. (3) The FIND command is now a synonym for DISPLAY. (4) Two more help texts, CLAIM and DUPLICATES have been added. (5) All known bugs have been fixed. ************************************************************************ 0 Referenced by comments of: 821/3, 821/19, 846/15 00821/002C USERDIRECTORY INSTALL WRUP WF G W494:INSTALL.WF 5.1T2 514 USERDIRECTORY.INSTALL_WRU.WF.002 1 LINE 70 10 PAGE UM TIFFANY JULY 23, 1983 13:37:52 0 Contains instructions for installing and maintaining *USERDIRECTORY as well as *UDROUTINES. 00821/003A USERDIRECTORY DECLARATIONS SQ O W494:UD.SQL 5.1T2 515 USERDIRECTORY.DECLARATION.SQ.003 1 LINE 71 22 PAGE UM TIFFANY JULY 23, 1983 13:37:53 0 This contains the PLUS source library for the PLUS routines in (821/1). It can be manipulated using the PMF (810) and the project file (821/25). Contains a "$CONTINUE WITH PARSETYPES RETURN" (821/4). ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/1, 821/4 00821/004A USERDIRECTORY PARSER TYPES SQ O W494:PARSETYPES 5.1T2 516 USERDIRECTORY.PARSER_TYPE.SQ.004 1 LINE 70 3 PAGE UM TIFFANY JULY 23, 1983 13:37:54 0 This file contains the declarations produced by putting PMF modules CMD_SYNTAX (821/7) and NAME_SYNTAX (821/8) through the Parser (1076). This file is referenced by subcomponent (821/3). It contains the declarations for the semantic actions performed in the name-lookup routines and the command language parsers. Lines 1,999 refer to CMD_SYNTAX and lines 1001,1999 refer to NAME_SYNTAX. 1 SUN SEP 08/96 15:24:55 Page 642 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/3, 821/7, 821/8 00821/005C USERDIRECTORY UD PLUS SOULIB SQ G W494:PLUS.SQL 5.1T2 517 USERDIRECTORY.UD_PLUS_SOU.SQ.005 1 LINE 68 3 PAGE UM TIFFANY JULY 23, 1983 13:37:54 0 Several macros and definitions are copied from *PLUS.SOURCELIB (1042/5) with various %INCLUDE statements removed so that instead of external references, system subroutines are referenced from either STDTV or CLSTV. 00821/006A USERDIRECTORY PHONCODE SA O W494:PHONCODE.S 5.1T2 518 USERDIRECTORY.PHONCODE.SA.006 1 LINE 72 6 PAGE UM TIFFANY JULY 23, 1983 13:37:54 0 This is the source for the string-to-phonetic-code conversion routine. Accessible through the PMF (810) as the module PHONCODE/CURR. To assemble, simply issue the PMF command: ASSEMBLE PHONCODE The object is in file UD.LIB (821/13). 0 Referenced by comments of: 821/39 00821/007A USERDIRECTORY COMMAND SYNTAX S O W494:CMDSYN.S 5.1T2 519 USERDIRECTORY.COMMAND_SYN.S.007 1 LINE 68 12 PAGE UM TIFFANY JULY 23, 1983 13:37:54 0 This is the *CLPARSER (1076) source for the command language of *USERDIRECTORY (821/15). It is the PMF module CMD_SYNTAX/CURR. Issue the PMF command: PARSEGEN CMD_SYNTAX This will invoke *CLPARSEGEN with input in CMD_SYN.S (821/7) with two outputs, an object in file -LOAD and PLUS declarations in file PARSERTYPES (821/4). The object is then put into file UD.LIB (821/13) by *OBJUTIL (721). ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/4, 821/7 1 SUN SEP 08/96 15:24:55 Page 643 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00821/008A USERDIRECTORY NAME SYNTAX S O W494:NAMESYN.S 5.1T2 520 USERDIRECTORY.NAME_SYNTAX.S.008 1 LINE 71 2 PAGE UM TIFFANY JULY 23, 1983 13:37:55 0 This is the *CLPARSER (1076) source for the routine which parses names in *USERDIRECTORY (821/15) and for the CLS/user-callable routines (821/17). This is the PMF module NAME_SYNTAX. Issue the following PMF command: PARSEGEN NAME_SYNTAX This will invoke *CLPARSEGEN with input as this subcomponent and two outputs, an object in file -LOAD and PLUS declarations in file PARSERTYPES (821/4). The object is placed in file UD.LIB (821/13) by *OBJUTIL (721). 0 Referenced by comments of: 821/4 00821/009A USERDIRECTORY CHROFFCT SA O W494:CHROFFCT.S 5.1T2 521 USERDIRECTORY.CHROFFCT.SA.009 1 LINE 68 2 PAGE UM TIFFANY JULY 23, 1983 13:37:55 0 This routine counts the number of different characters given two name strings. To assemble, just issue the PMF command: ASSEMBLE CHROFFCT The object is placed in the file UD.LIB (821/13) by the program *OBJUTIL (721). 00821/010A USERDIRECTORY UDSYMS SA O W494:UDSYMS.S 5.1T2 522 USERDIRECTORY.UDSYMS.SA.010 1 LINE 80 4 PAGE UM TIFFANY JULY 23, 1983 13:37:56 0 Contains the UDSYMS transfer vector and interface code for each of the name-search subroutines. This is the PMF module UDSYMS/CURR. To assemble, just issue the following command: ASSEMBLE UDSYMS The object is placed by the program *OBJUTIL (721) in the file UD.LIB (821/13). Requires *CNFGINFODSECT (645/1). ********************************************************************** D5.1 version: Changed to do the actual unlinking of UD stuff and add the code to call FPSECTX. ********************************************************************** 00821/011A USERDIRECTORY SETATTN SA O W494:SETATTN.S 5.1T2 523 USERDIRECTORY.SETATTN.SA.011 1 LINE 68 1 PAGE UM TIFFANY JULY 23, 1983 13:37:56 0 This contains an attention-interrupt handling routine for use by 1 SUN SEP 08/96 15:24:55 Page 644 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 both the command processor for *USERDIRECTORY (821/15) and the name-search subroutines (821/17). This is the PMF module SETATTN. To assemble, just issue the following PMF command: ASSEMBLE SETATTN The object is placed by the program *OBJUTIL (721) in the file UD.LIB (821/13). 00821/012A USERDIRECTORY STORDUMP SA O W494:STORDUMP.S 5.1T2 524 USERDIRECTORY.STORDUMP.SA.012 1 LINE 68 4 PAGE UM TIFFANY JULY 23, 1983 13:37:56 0 This routine is not currently used in the production version of *USERDIRECTORY. It is sometimes used as an aid in debugging it. Calls the system routine SCANSTOR to dump the entire storage of the program. 00821/013A USERDIRECTORY OBJECT OL O W494:UD.LIB 5.1T2 525 USERDIRECTORY.OBJECT.OL.013 1 LINE 17386 81 PAGE UM TIFFANY JULY 23, 1983 13:37:56 0 This file contains an object library of all the routines used in *USERDIRECTORY (821/15) and *UDROUTINES (821/17). ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/6, 821/7, 821/8, 821/9, 821/10, 821/11, 821/15, 821/17, 821/30, 821/33 00821/014A USERDIRECTORY PROGRAM OL O W494:PROGRAM 5.1T2 526 USERDIRECTORY.PROGRAM.OL.014 1 LINE 17386 61 PAGE UM TIFFANY JULY 23, 1983 13:37:59 0 This is the *USERDIRECTORY program that has all relevant modules including SYM records. To debug, issue from a privileged CCID: $DEBUG PROGRAM PKEY=*USERDIRECTO To generate the program, just issue the following PMF command: INSTALL COMBINE=NO ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/31 00821/015A USERDIRECTORY *USERDIRECTORY OE O *USERDIRECTORY 5.1T2 527 USERDIRECTORY.?USERDIRECT.OE.015 1 LINE 32767 25 PAGE UM TIFFANY JULY 23, 1983 13:38:02 *USERDIRECTORY 0 This is the object for the *USERDIRECTORY program. It is built 1 SUN SEP 08/96 15:24:55 Page 645 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 from the object library (821/13) with the PMF command "INSTALL". *UDROUTINES must be pistle-loaded for it to work. ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/1, 821/7, 821/8, 821/11, 821/13, 821/16, 821/20, 821/21, 821/24 00821/016A USERDIRECTORY UD.MAP D O W494:UD.MAP 5.1T2 528 USERDIRECTORY.UD.MAP.D.016 1 LINE 105 4 PAGE UM TIFFANY JULY 23, 1983 13:38:03 0 This is a map produced by *LINKEDIT (297) for (821/15). 00821/017A USERDIRECTORY *UDROUTINES OE O *UDROUTINES 5.1T2 529 USERDIRECTORY.?UDROUTINES.OE.017 1 LINE 32767 17 PAGE UM TIFFANY JULY 23, 1983 13:38:03 *UDROUTINES 0 This is the object for the name-search routines and should be loaded into shared VM at IPL by PISTLE (559). It contains the entry point UDSYMS, which is a transfer vector for the name-search routines. This is formed from the object file UD.LIB (821/13) using the PMF command "UD.INSTALL". ********************************************************************** D5.1 version: Revised since D5.0C. ********************************************************************** 0 Referenced by comments of: 821/1, 821/8, 821/11, 821/13, 821/18, 821/27 00821/018A USERDIRECTORY UDRTNS.MAP D O W494:UDRTNS.MAP 5.1T2 530 USERDIRECTORY.UDRTNS.MAP.D.018 1 LINE 105 3 PAGE UM TIFFANY JULY 23, 1983 13:38:04 0 This is a map produced by *LINKEDIT for *UDROUTINES (821/17). 00821/019A USERDIRECTORY INSTALLER C O W494:UD.INSTALL 5.1T2 531 USERDIRECTORY.INSTALLER.C.019 1 LINE 69 1 PAGE UM TIFFANY JULY 23, 1983 13:38:04 0 This source file is used to copy *USERDIRECTORY from *NEWUSERDIRECTORY, copy *UDROUTINES from *NEWUDROUTINES, and save the current sources onto a tape. It uses all relevant files in the component (821). 00821/020A USERDIRECTORY MASTER FILE D O # *USERDIR.MASTER UM TIFFANY *USERDIR.MASTER@E 0 This file is the master data base for the system user-directory. It is constructed by *USERDIRECTORY (821/15). To initialize this file, $EMPTY it. 1 SUN SEP 08/96 15:24:55 Page 646 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 It should be permitted as follows: $Permit *USERDIR.MASTER none others, rw (others&pkey=*sys.ud?,ccid&pkey=*userdirecto) where "ccid" is the user id allowed to manage the master directory. If your installation still contains *MTSUSERS files et al., these files must be converted by a $SOURCE file (821/36) with both old and new versions of the *USERDIRECTORY program. 0 Referenced by comments of: 821/36 00821/021A USERDIRECTORY HELP FILE D O ETC:UD.HELP 5.1T2 532 USERDIRECTORY.HELP_FILE.D.021 1 LINE 70 18 PAGE UM TIFFANY JULY 23, 1983 13:38:05 ETC:UD.HELP 0 This file contains the help library for *USERDIRECTORY (821/15). ********************************************************************** D5.1 version: Has two new entries: DUPLICATES and CLAIM. ********************************************************************** 00821/022C USERDIRECTORY SCANLOG SA G W494:SCANLOG.S 5.1T2 533 USERDIRECTORY.SCANLOG.SA.022 1 LINE 74 11 PAGE UM TIFFANY JULY 23, 1983 13:38:06 0 A program to scan the log file (821/24) produced by *USERDIRECTORY. 00821/023C USERDIRECTORY SCANLOG O G W494:SCANLOG 5.1T2 534 USERDIRECTORY.SCANLOG.O.023 1 LINE 4476 6 PAGE UM TIFFANY JULY 23, 1983 13:38:07 00821/024A USERDIRECTORY LOG FILE D O # ETC:UD.LOG UM TIFFANY ETC:UD.LOG@E 0 This file logs all the lines entered by any user to *USERDIRECTORY (821/15). It must be periodically copied into another file or onto a tape and emptied, since otherwise it will fill up and prevent *USERDIRECTORY from working. See LOG.COPY (821/37) for this process. 0 Referenced by comments of: 821/22, 821/37 00821/025A USERDIRECTORY PROJECT FILE D O W494:UD 5.1T2 535 USERDIRECTORY.PROJECT_FIL.D.025 1 LINE 133 8 PAGE UM TIFFANY JULY 23, 1983 13:38:07 0 This is the PMF project file for the UserDirectory routines. Documentation for the PMF modules and procedures is available in the project. ********************************************************************** D5.1 version: A new PMF module, S/CMD_CLAIM has been added. 1 SUN SEP 08/96 15:24:55 Page 647 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ********************************************************************** 0 Referenced by comments of: 821/1, 821/3 00821/026A USERDIRECTORY LKED SOURCE D O W494:LINKCMDS 5.1T2 536 USERDIRECTORY.LKED_SOURCE.D.026 1 LINE 41 1 PAGE UM TIFFANY JULY 23, 1983 13:38:08 0 *LINKEDIT (297) and *OBJUTIL (721) commands used by the PMF INSTALL and UD.INSTALL commands. The PMF modules referenced in this file are: lines 1,99 LINKCMDS/INSTALL *LINKEDIT commands for installation of *USERDIRECTORY. lines 101,199 LINKCMDS/PISTLE Loader records to be placed at start of new *UDROUTINES. lines 201,299 LINKCMDS/UD.INSTALL *LINKEDIT commands for installation of new *UDROUTINES. lines 301,399 LINKCMDS/ENDJUNK Loader records to be placed at end of new *UDROUTINES. lines 401,499 LINKCMDS/INSTALL.OBJUTIL This is used by the PMF INSTALL procedure. UD.LIB is simply copied over to a loader library with UDSYMS deleted. lines 501,599 LINKCMDS/NOCOMBINE This is essentially same as LINKCMDS/INSTALL except no COMBINING is performed. This allows $DEBUGING *USERDIRECTORY. 00821/027A USERDIRECTORY ROUTINES DOC WF O W494:UDRTNS.DOC 5.1T2 537 USERDIRECTORY.ROUTINES_DO.WF.027 1 LINE 73 8 PAGE UM TIFFANY JULY 23, 1983 13:38:08 0 This is a draft writeup for the *UDROUTINES (821/17). 00821/028A USERDIRECTORY NEW PROGRAM OE G # *NEWUSERDIRECTORY UM TIFFANY 0 This contains the test version of *USERDIRECTORY as generated by the PMF INSTALL command. 00821/029A USERDIRECTORY NEW ROUTINES OE G # *NEWUDROUTINES UM TIFFANY 0 This file contains the test version of the UserDirectory search routines. To use this file instead of the pistle-loaded version of the search routines, use $SET VERSION(UDSYMS)=NEW. 00821/030A USERDIRECTORY FULLDEBUGGER C O W494:FULLDEBUG 5.1T2 538 USERDIRECTORY.FULLDEBUGGE.C.030 1 LINE 66 1 PAGE UM TIFFANY JULY 23, 1983 13:38:08 0 This is a source file that runs SDS with the object contained in 1 SUN SEP 08/96 15:24:55 Page 648 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 UD.LIB (821/13). Requires PROT=OFF so that the user directory routines will run. Contains a $CONTINUE WITH COPY:SYSDEFS (579/3) record. Change "W494" in the file to your CCID. ******************************************************************* D5.1 version: Requires the new version of SDS (600/18) through (600/37). ******************************************************************* 00821/031A USERDIRECTORY DEBUGGER C O W494:DEBUG 5.1T2 539 USERDIRECTORY.DEBUGGER.C.031 1 LINE 38 1 PAGE UM TIFFANY JULY 23, 1983 13:38:09 0 This is a source file that runs SDS with the program (821/14). PROT=OFF is not required. Change in the file all occurrences of "W494" to your CCID. 00821/032A USERDIRECTORY SETNAME SOURCE SQ G W494:UD.SETNAME.S 5.1T2 540 USERDIRECTORY.SETNAME_SOU.SQ.032 1 LINE 100 2 PAGE UM TIFFANY JULY 23, 1983 13:38:09 0 This contains the PLUS source for a simple driver that tests the $SET NAME subroutine, UDSETNAM. To compile, issue $SOURCE UD.SETNAME.S(0). 00821/033A USERDIRECTORY SETNAME OBJECT O G W494:UD.SETNAME.O 5.1T2 541 USERDIRECTORY.SETNAME_OBJ.O.033 1 LINE 2288 3 PAGE UM TIFFANY JULY 23, 1983 13:38:09 0 This contains the object for the UDSETNAM subroutines. Requires the object library UD.LIB (821/13) for debugging. 00821/034A USERDIRECTORY CHECK ROUTINES SP G W494:UDUTIL.S 5.1T2 542 USERDIRECTORY.CHECK_ROUTI.SP.034 1 LINE 70 9 PAGE UM TIFFANY JULY 23, 1983 13:38:09 0 This is a program compiled by PL/I Optimizing compiler to help verify the User Directory routines. This implements the commands: OPEN to call UDOPEN SET item_name to call UDSET and set the item name GET item_name to call UDGET and get the item name SEARCH to call UDSRCH CLOSE to call UDCLOS DUMP n to dump "n" bytes of the value "n" defaults to 4. STOP to stop the program MTS to call MTS, usually to change the value via SDS $... to issue MTS command COMMENT just a comment DEBUG ÈON|OFF¼ to set debug switch on or off, usually to 1 SUN SEP 08/96 15:24:55 Page 649 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 show how an input line is broken into words. 0 Referenced by comments of: 821/35 00821/035A USERDIRECTORY CHECK ROUTINES O G W494:UDUTIL 5.1T2 543 USERDIRECTORY.CHECK_ROUTI.O.035 1 LINE 13796 8 PAGE UM TIFFANY JULY 23, 1983 13:38:10 0 The object of the program (821/34). Contains a $CONTINUE WITH *PL1OPTLIB. 00821/036A USERDIRECTORY CONVERSION C O W494:NEWDIR 5.1T2 544 USERDIRECTORY.CONVERSION.C.036 1 LINE 197 3 PAGE UM TIFFANY JULY 23, 1983 13:38:10 0 This is a source file that dumps the contents of the old *MTSUSERS file (assuming that the *USERDIRECTORY contains the old version of the program), then converts to a series of ADD commands for the new version of *USERDIRECTORY. The new version of *USERDIRECTORY stores its information in the file *USERDIR.MASTER (821/20). Then, all files beginning with *MTSUSERS... can be destroyed when the new version of the USERDIRECTORY program is in public use. 0 Referenced by comments of: 821/20 00821/037A USERDIRECTORY LOG COPY C O W494:LOG.COPY 5.1T2 545 USERDIRECTORY.LOG_COPY.C.037 1 LINE 153 1 PAGE UM TIFFANY JULY 23, 1983 13:38:11 0 This is a source file that copies the contents of ETC:UD.LOG (821/24) into another file of name LOG.ddmmmyy where "dd" is the day of month, "mmm" the name of month, and "yy" the year. Then, the file ETC:UD.LOG is emptied. This is usually done per month. 0 Referenced by comments of: 821/24 00821/038C USERDIRECTORY CHKDIR SP G W494:CHKDIR.S 5.1T2 546 USERDIRECTORY.CHKDIR.SP.038 1 LINE 77 21 PAGE UM TIFFANY JULY 23, 1983 13:38:11 0 A source program to check out the master directory or name libraries for things such as "missing phonetics." 00821/039C USERDIRECTORY CHKDIR O G W494:CHKDIR 5.1T2 547 USERDIRECTORY.CHKDIR.O.039 1 LINE 32767 18 PAGE UM TIFFANY JULY 23, 1983 13:38:12 0 Requires the PHONCODE (821/6) object and *PL1OPTLIB (827/5). 00821/040C USERDIRECTORY UDSCAN SA G W494:UDSCAN(1,999) 5.1T2 548 USERDIRECTORY.UDSCAN.SA.040 1 LINE 67 3 PAGE UM TIFFANY JULY 23, 1983 13:38:13 0 A subroutine that may be called in the dead-file cleanup. See RSTR:SCANFILES (502). 0 Referenced by comments of: 502/1 1 SUN SEP 08/96 15:24:55 Page 650 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00821/041C USERDIRECTORY UDSCAN O G W494:UDSCAN(1000) 5.1T2 549 USERDIRECTORY.UDSCAN.O.041 1 LINE 1349 3 PAGE UM TIFFANY JULY 23, 1983 13:38:13 00822/001 FLOPPY DISK SUPPORT MAIN SF G FLOP:FTST 5.0T3 997 FLOPPY_DISK_SUPPORT.MAIN.SF.001 1 LINE 98 15 PAGE UM CASHMAN JULY 03, 1981 20:21:54 5.0T8 376 0 $SOURCE FLOP:FTST. FORTRAN source for main program. Uses *OVERDRIVE (667) and *FTN (551/3). Also assembles FLOP:FTSTASMH (822/2). VERLAB (812) and EDGER (747/5) are used for listing control. Requires FLOP:FLPCOM (822/3). 0 Referenced by comments of: 822/2 00822/002 FLOPPY DISK SUPPORT MAIN SA G FLOP:FTSTASMH 5.0T3 998 FLOPPY_DISK_SUPPORT.MAIN.SA.002 1 LINE 68 3 PAGE UM CASHMAN JULY 03, 1981 20:21:56 5.0T8 377 0 Assembled with FLOP:FTST (822/1). *ASMH (737) source support routines for main program. 0 Referenced by comments of: 822/1 00822/003 FLOPPY DISK SUPPORT MAIN SF G FLOP:FLPCOM 5.0T3 999 FLOPPY_DISK_SUPPORT.MAIN.SF.003 1 LINE 68 1 PAGE UM CASHMAN JULY 03, 1981 20:21:57 5.0T8 378 0 Common definitions for all floppy routines. 0 Referenced by comments of: 822/1, 822/5, 822/9, 822/13, 822/16, 822/19 00822/004 FLOPPY DISK SUPPORT MAIN OC G FLOP:FLOPPY 5.0T3 1000 FLOPPY_DISK_SUPPORT.MAIN.OC.004 1 LINE 2814 12 PAGE UM CASHMAN JULY 03, 1981 20:21:58 5.0T8 379 0 Main program object. This will load the object of the particular floppy disk directory support routine. 0 Referenced by comments of: 848/25 00822/005 FLOPPY DISK SUPPORT CP/M SF G FLOP:CPM.S 5.0T3 1001 FLOPPY_DISK_SUPPORT.CP/M.SF.005 1 LINE 87 18 PAGE UM CASHMAN JULY 03, 1981 20:22:01 5.0T8 380 0 CP/M directory type support routines source code. Uses *OVERDRIVE (667) and *FTN (551/3). Also assembles (822/6). Uses VERLAB (812) and EDGER (747/5) for listing enhancements. Requires FLOP:CPM.EQU (822/7) and FLOP:FLPCOM (822/3). 00822/006 FLOPPY DISK SUPPORT CP/M SA G FLOP:CPMASMH 5.0T3 1002 FLOPPY_DISK_SUPPORT.CP/M.SA.006 1 LINE 71 3 PAGE UM CASHMAN JULY 03, 1981 20:22:08 5.0T8 381 0 CP/M support routines *ASMH (737) source. 0 Referenced by comments of: 822/5 1 SUN SEP 08/96 15:24:55 Page 651 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00822/007 FLOPPY DISK SUPPORT CP/M SF G FLOP:CPM.EQU 5.0T3 1003 FLOPPY_DISK_SUPPORT.CP/M.SF.007 1 LINE 53 1 PAGE UM CASHMAN JULY 03, 1981 20:22:09 5.0T8 382 0 CP/M directory type specific common block definitions. 0 Referenced by comments of: 822/5 00822/008 FLOPPY DISK SUPPORT CP/M OC G FLOP:CPMLIB 5.0T3 1004 FLOPPY_DISK_SUPPORT.CP/M.OC.008 1 LINE 2508 13 PAGE UM CASHMAN JULY 03, 1981 20:22:10 5.0T8 383 0 Object for CP/M directory type support. 00822/009 FLOPPY DISK SUPPORT ICOM SF G FLOP:ICOM.S 5.0T3 1005 FLOPPY_DISK_SUPPORT.ICOM.SF.009 1 LINE 87 12 PAGE UM CASHMAN JULY 03, 1981 20:22:11 5.0T8 384 0 FORTRAN source for ICOM directory type support. $SOURCE ICOM.S. Also assembles ICOMASMH (822/11). Uses *OVERDRIVE (667) and *FTN (551/3). Uses VERLAB (812) and EDGER (747/5) for listing enhancements. Requires FLOP:ICOM.EQU (822/10) and FLOP:FLPCOM (822/3). 00822/010 FLOPPY DISK SUPPORT ICOM SF G FLOP:ICOM.EQU 5.0T3 1006 FLOPPY_DISK_SUPPORT.ICOM.SF.010 1 LINE 61 1 PAGE UM CASHMAN JULY 03, 1981 20:22:15 5.0T8 385 0 ICOM directory type specific common block definitions. 0 Referenced by comments of: 822/9 00822/011 FLOPPY DISK SUPPORT ICOM SA G FLOP:ICOMASMH 5.0T3 1007 FLOPPY_DISK_SUPPORT.ICOM.SA.011 1 LINE 71 3 PAGE UM CASHMAN JULY 03, 1981 20:22:16 5.0T8 386 0 *ASMH (737) source for ICOM directory type support routines. 0 Referenced by comments of: 822/9, 822/13 00822/012 FLOPPY DISK SUPPORT ICOM OC G FLOP:ICOMLIB 5.0T3 1008 FLOPPY_DISK_SUPPORT.ICOM.OC.012 1 LINE 3438 10 PAGE UM CASHMAN JULY 03, 1981 20:22:17 5.0T8 387 0 Object for ICOM directory type support routines. 00822/013 FLOPPY DISK SUPPORT RT11 SF G FLOP:RT11.S 5.0T3 1009 FLOPPY_DISK_SUPPORT.RT11.SF.013 1 LINE 87 17 PAGE UM CASHMAN JULY 03, 1981 20:22:18 5.0T8 388 0 RT11 directory type source. Uses *OVERDRIVE (667) and *FTN (551/3). Also assembles ICOMASMH (822/11). VERLAB (812) and EDGER (747/5) are used for listing control. Requires FLOP:RT11EQU (822/14) and FLOP:FLPCOM (822/3). 1 SUN SEP 08/96 15:24:55 Page 652 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00822/014 FLOPPY DISK SUPPORT RT11 SF G FLOP:RT11.EQU 5.0T3 1010 FLOPPY_DISK_SUPPORT.RT11.SF.014 1 LINE 48 1 PAGE UM CASHMAN JULY 03, 1981 20:22:23 5.0T8 389 0 RT11 directory type specific common block definitions. 0 Referenced by comments of: 822/13 00822/015 FLOPPY DISK SUPPORT RT11 OC G FLOP:RT11LIB 5.0T3 1011 FLOPPY_DISK_SUPPORT.RT11.OC.015 1 LINE 1654 12 PAGE UM CASHMAN JULY 03, 1981 20:22:24 5.0T8 390 0 Object for RT11 directory type support. 00822/016 FLOPPY DISK SUPPORT IBM SF G FLOP:IBM.S 5.0T3 1012 FLOPPY_DISK_SUPPORT.IBM.SF.016 1 LINE 85 14 PAGE UM CASHMAN JULY 03, 1981 20:22:25 5.0T8 391 0 IBM directory type support source code. $SOURCE IBM.S. Uses *OVERDRIVE (667) and *FTN (551/3). VERLAB (812) and EDGER (747/5) are used for listing control. Requires FLOP:IBM.EQU (822/17) and FLOP:FLPCOM (822/3). 00822/017 FLOPPY DISK SUPPORT IBM SF G FLOP:IBM.EQU 5.0T3 1013 FLOPPY_DISK_SUPPORT.IBM.SF.017 1 LINE 56 1 PAGE UM CASHMAN JULY 03, 1981 20:22:29 5.0T8 392 0 IBM directory type specific common block definitions. 0 Referenced by comments of: 822/16, 822/19 00822/018 FLOPPY DISK SUPPORT IBM OC G FLOP:IBMLIB 5.0T3 1014 FLOPPY_DISK_SUPPORT.IBM.OC.018 1 LINE 3342 11 PAGE UM CASHMAN JULY 03, 1981 20:22:30 5.0T8 393 0 Object for IBM directory type support routines. 00822/019 FLOPPY DISK SUPPORT NONE SF G FLOP:NONE.S 5.0T3 1015 FLOPPY_DISK_SUPPORT.NONE.SF.019 1 LINE 87 3 PAGE UM CASHMAN JULY 03, 1981 20:22:32 5.0T8 394 0 Default directory type source code. $SOURCE NONE.S. Uses *OVERDRIVE (667) and *FTN (551/3). VERLAB (812) and EDGER (747/5) are used for listing control. Requires FLOP:IBM.EQU (822/17) and FLOP:FLPCOM (822/3). 00822/020 FLOPPY DISK SUPPORT NONE SA G FLOP:NONEASMH 5.0T3 1016 FLOPPY_DISK_SUPPORT.NONE.SA.020 1 LINE 68 1 PAGE UM CASHMAN JULY 03, 1981 20:22:32 5.0T8 395 0 *ASMH (737) default directory type. 1 SUN SEP 08/96 15:24:55 Page 653 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00822/021 FLOPPY DISK SUPPORT NONE OE G FLOP:NONELIB 5.0T3 1017 FLOPPY_DISK_SUPPORT.NONE.OE.021 1 LINE 490 4 PAGE UM CASHMAN JULY 03, 1981 20:22:33 5.0T8 396 0 Object for default directory type support routines. 00822/022 FLOPPY DISK SUPPORT DSECT SA G *FLOPDSECT 5.0T3 1018 FLOPPY_DISK_SUPPORT.DSECT.SA.022 1 LINE 71 1 PAGE UM CASHMAN AUG. 06, 1981 05:41:18 5.0T8 397 *FLOPDSECT 0 DSECT for floppy disk SNS data. 00823/001A PASCAL/VS INSTALL NOTES P G PVS:NOTES 5.1T2 550 PASCAL/VS.INSTALL_NOTES.P.001 1 LINE 70 11 PAGE UM PICKELMAN JULY 23, 1983 13:38:13 0 IBM's PASCAL/VS compiler, program number 5796-PNQ. Since it is proprietary, most subcomponents cannot be distributed. However, (823/20) will generate them from the IBM distribution tape. This subcomponent has a list of things that need to be done, and problems with the compiler. ******************************************************************************** D5.0A changes: 1) Converted from Release 2.0 to Release 2.1. 2) %INCLUDE now works. ******************************************************************************** ******************************************************************************** D5.0B version: New features added, mostly in the I/O system. These changes are too numerous to list, but are documented in (823/5). ******************************************************************************** ******************************************************************************** D5.1 version: Changed since D5.0C. ******************************************************************************** 0 Referenced by comments of: 799/1, 807/1, 825/1 00823/002C PASCAL/VS UPDATES UC G PVS:CHANGES 5.1T2 551 PASCAL/VS.UPDATES.UC.002 1 LINE 183 18 PAGE UM PICKELMAN JULY 23, 1983 13:38:14 0 ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 654 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00823/003A PASCAL/VS MEMO 436 WX S0759 PVSFS VLO FSNAME=CCMEMO 5.1T2 552 PASCAL/VS.MEMO_436.WX.003 1 LINE 103 44 PAGE UM PICKELMAN JULY 11, 1983 15:51:08 0 This is Computing Center Memo 436 -- "PASCAL/VS in MTS." Requires the (823/4) macros. ********************************************************************** D5.1 version: This memo was converted from TEXTEDIT source, as distributed on D5.0C, to TEXTFORM source. This was done because TEXTEDIT is supported by the UM Statistical Research Laboratory and thus is not distributed. ********************************************************************** 0 Referenced by comments of: 823/4 00823/004C PASCAL/VS MEMO 436 WX S0759 PVSFS VLO FSNAME=CCMEMO.MACS 5.1T2 553 PASCAL/VS.MEMO_436.WX.004 1 LINE 90 3 PAGE UM PICKELMAN JULY 11, 1983 15:51:37 0 TEXTFORM macros required by (823/3). 0 Referenced by comments of: 823/3 00823/005A PASCAL/VS MEMO 436 P *PASCALVS.W 5.1T2 554 PASCAL/VS.MEMO_436.P.005 1 LINE 66 45 PAGE UM PICKELMAN JULY 23, 1983 13:42:27 0 This is the printer ready version of Computing Center Memo 436, "PASCAL/VS in MTS." 0 Referenced by comments of: 823/1 00823/006A PASCAL/VS DRIVER OE G *PASCALVS 5.1T2 555 PASCAL/VS.DRIVER.OE.006 1 LINE 3844 3 PAGE UM PICKELMAN JULY 23, 1983 13:42:29 *PASCALVS@UM 0 The PASCAL/VS compiler. Actually just a small program which links to ETC:PASVS*COMP (823/14), ETC:PASVS*OPT (823/15), and ETC:PASVS*TRAN (823/16). This is the linkedited object of (823/7), and (823/28). 0 Referenced by comments of: 823/27, 866/5 00823/007A PASCAL/VS RUNTIME OL G *PASCALVSLIB 5.1T2 556 PASCAL/VS.RUNTIME.OL.007 1 LINE 144 1 PAGE UM PICKELMAN JULY 23, 1983 13:42:30 *PASCALVSLIB 0 The runtime support library for programs compiled with PASCAL/VS. Same as (823/66) but without SYM records. 0 Referenced by comments of: 802/18, 807/2, 823/6, 823/26, 825/2, 848/14, 848/15 1 SUN SEP 08/96 15:24:55 Page 655 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00823/008C PASCAL/VS PASCALVSLIB O O SEG2:PASCALVSLIB 5.1T2 557 PASCAL/VS.PASCALVSLIB.O.008 1 LINE 13412 46 PAGE UM PICKELMAN JULY 23, 1983 13:42:30 SEG2:PASCALVSLIB 0 ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 00823/009C PASCAL/VS PASCALVSCOMP O O SEG2:PASCALVSCOMP 5.1T2 558 PASCAL/VS.PASCALVSCOMP.O.009 1 LINE 43 1 PAGE UM PICKELMAN JULY 23, 1983 13:42:32 SEG2:PASCALVSCOMP@UM 0 Contains a $CONTINUE WITH ETC:PASVS*COMP (823/14) RETURN record. 00823/010C PASCAL/VS PASCALVSOPT O O SEG2:PASCALVSOPT 5.1T2 559 PASCAL/VS.PASCALVSOPT.O.010 1 LINE 42 1 PAGE UM PICKELMAN JULY 23, 1983 13:42:32 SEG2:PASCALVSOPT@UM 0 Contains a $CONTINUE WITH ETC:PASVS*OPT (823/15) RETURN record. 00823/011C PASCAL/VS PASCALVSTRAN O O SEG2:PASCALVSTRAN 5.1T2 560 PASCAL/VS.PASCALVSTRAN.O.011 1 LINE 43 1 PAGE UM PICKELMAN JULY 23, 1983 13:42:32 SEG2:PASCALVSTRAN@UM 0 Contains a $CONTINUE WITH ETC:PASVS*TRAN (823/16) RETURN record. 00823/012A PASCAL/VS COMPILER M G # ETC:PASVS*MESS UM PICKELMAN ETC:PASVS*MESS@UM 0 The compiler's error messages. Due to copyright restrictions this subcomponent cannot be distributed. 0 Referenced by comments of: 823/14, 823/77 00823/013C PASCAL/VS COMPILER D G # ETC:PASVS*EXPL UM PICKELMAN ETC:PASVS*EXPL@UM 0 An explanation of error messages to go with error messages in the summary at the end of the compilation. Text is organized in 64-character lines terminated with a $ENDFILE. Text is indexed by error number. 00823/014A PASCAL/VS COMPILER OE G # ETC:PASVS*COMP UM PICKELMAN ETC:PASVS*COMP@UM 0 Pass1, the "compiler." Converts PASCAL into "UCODE." Requires ETC:PASVS*MESS (823/12). Due to copyright restrictions this subcomponent cannot be distributed. ************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 656 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/6, 823/9 00823/015A PASCAL/VS OPTIMIZER OE G # ETC:PASVS*OPT UM PICKELMAN ETC:PASVS*OPT@UM 0 Pass 2, the "optimizer." Converts UCODE to better UCODE. Not distributed due to copyright restrictions. 0 Referenced by comments of: 823/6, 823/10 00823/016A PASCAL/VS TRANSLATOR OE G # ETC:PASVS*TRAN UM PICKELMAN ETC:PASVS*TRAN@UM 0 Pass3, the "translator." Converts "UCODE" into an S/370 object module. Due to copyright restrictions this subcomponent cannot be distributed. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/6, 823/11 00823/017C PASCAL/VS TEST SW O PVS:TESTALL 5.1T2 561 PASCAL/VS.TEST.SW.017 1 LINE 90 19 PAGE UM PICKELMAN JULY 23, 1983 13:42:32 0 Test program, which should eventually test all of Pascal/VS. It needs some work. 00823/018C PASCAL/VS NEW/DISPOSE OC S0759 PVSFS VLO FSNAME=NEW/DISPOSE 5.1T2 562 PASCAL/VS.NEW/DISPOSE.OC.018 1 LINE 524 2 PAGE UM PICKELMAN JULY 11, 1983 15:52:22 0 Has several alternate versions of the NEW and DISPOSE procedures. These are useful for catching programs which break rules in ways Pascal/VS doesn't catch. 00823/019C PASCAL/VS INSTALL C S0759 PVSFS VLO FSNAME=INSTALL 5.1T2 563 PASCAL/VS.INSTALL.C.019 1 LINE 80 6 PAGE UM PICKELMAN JULY 11, 1983 15:52:36 0 Source file to install Pascal/VS from the IBM distribution tape. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 657 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00823/020A PASCAL/VS INSTALL C G S0759 PVSFS VLO FSNAME=VS.INSTALL 5.1T2 564 PASCAL/VS.INSTALL.C.020 1 LINE 80 6 PAGE UM PICKELMAN JULY 11, 1983 15:52:44 0 A source file to install PASCAL/VS from the IBM distribution tape. It will also generate all of the subcomponents which cannot be distributed. Includes a list of other subcomponents required. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/1 00823/021A PASCAL/VS INSTALL C S0759 PVSFS VLO FSNAME=VS.CMDMAC 5.1T2 565 PASCAL/VS.INSTALL.C.021 1 LINE 184 4 PAGE UM PICKELMAN DEC. 22, 1982 17:37:26 0 A source file which uses the MTS Command Macros (802) to set up things for installing or maintaining PASCAL/VS. Requires (823/71). ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 00823/022C PASCAL/VS INSTALL C S0759 PVSFS VLO FSNAME=CMDMAC 5.1T2 566 PASCAL/VS.INSTALL.C.022 1 LINE 179 4 PAGE UM PICKELMAN FEB. 16, 1983 01:56:22 0 ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/27 00823/023A PASCAL/VS INSTALL C S0759 PVSFS VLO FSNAME=VS.CMDMACLIB 5.1T2 567 PASCAL/VS.INSTALL.C.023 1 LINE 133 4 PAGE UM PICKELMAN JULY 11, 1983 15:53:02 0 Command Macros ($NEW), component 802, to aid in installing and maintaining PASCAL/VS. 00823/024C PASCAL/VS INSTALL C S0759 PVSFS VLO FSNAME=CMDMACLIB 5.1T2 568 PASCAL/VS.INSTALL.C.024 1 LINE 133 4 PAGE UM PICKELMAN JULY 11, 1983 15:52:56 0 ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 658 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 634/1, 823/27 00823/025A PASCAL/VS INSTALL SW G S0759 PVSFS VLO FSNAME=VS.LIBUILD 5.1T2 569 PASCAL/VS.INSTALL.SW.025 1 LINE 68 4 PAGE UM PICKELMAN JAN. 03, 1982 01:13:13 0 A program similar to *IEHMOVE (291), but different. Used to copy the source from the IBM distribution tape to an MTS file. 0 Referenced by comments of: 823/26 00823/026A PASCAL/VS INSTALL OE G S0759 PVSFS VLO FSNAME=VS*LIBUILD 5.1T2 570 PASCAL/VS.INSTALL.OE.026 1 LINE 32767 16 PAGE UM PICKELMAN JAN. 03, 1982 01:13:58 0 Linkedited version of (823/25) and (823/7). 00823/027A PASCAL/VS DRIVER SW G S0759 PVSFS VLO FSNAME=VS.PASCAL 5.1T2 571 PASCAL/VS.DRIVER.SW.027 1 LINE 70 7 PAGE UM PICKELMAN NOV. 08, 1982 21:00:30 0 Source for (823/6). See (823/22) and (823/24) for location of %INCLUDEs. 00823/028A PASCAL/VS DRIVER OE G S0759 PVSFS VLO FSNAME=VS/PASCAL 5.1T2 572 PASCAL/VS.DRIVER.OE.028 1 LINE 2914 4 PAGE UM PICKELMAN NOV. 08, 1982 21:02:56 0 Requires (823/66). 0 Referenced by comments of: 823/6 00823/029A PASCAL/VS COMPILER SW G # S0759 PVSFS VLO FSNAME=VS#COMPILE UM PICKELMAN 0 The compiler. Not distributed due to copyright restrictions. Requires (823/34). 00823/030A PASCAL/VS COMPILER SW G # S0759 PVSFS VLO FSNAME=VSCOMPILE 5.1T2 573 PASCAL/VS.COMPILER.UC.031 1 LINE 78 9 PAGE UM PICKELMAN JULY 11, 1983 15:53:15 0 Updates for several of the compiler (823/30) modules, for use in MTS. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/33 1 SUN SEP 08/96 15:24:55 Page 659 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00823/032A PASCAL/VS COMPILER SW G # S0759 PVSFS VLO FSNAME=VSÂCOMPILE UM PICKELMAN 0 The compiler modules used in IBM systems, but not in MTS. Not distributed due to copyright restriction. 00823/033A PASCAL/VS COMPILER OC G # S0759 PVSFS VLO FSNAME=VS/COMPILE UM PICKELMAN 0 Object of compiler with (823/31) updates applied. Not distributed due to copyright restrictions. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 00823/034A PASCAL/VS COMPILER SW G # S0759 PVSFS VLO FSNAME=VS#MACCOMP UM PICKELMAN 0 INCLUDES used by the compiler. Not distributed due to copyright restrictions. 0 Referenced by comments of: 823/29 00823/035A PASCAL/VS COMPILER SW G # S0759 PVSFS VLO FSNAME=VSMACCOMP 5.1T2 574 PASCAL/VS.COMPILER.UC.036 1 LINE 57 1 PAGE UM PICKELMAN NOV. 08, 1982 21:03:13 0 Updates to the compiler INCLUDE sections (823/35), for use in MTS. 0 Referenced by comments of: 823/37 00823/037A PASCAL/VS COMPILER SW G # S0759 PVSFS VLO FSNAME=VS%MACCOMP UM PICKELMAN 0 The compiler INCLUDES updated for MTS, i.e, VSMACCOMP (823/36) applied. Not distributed due to copyright restriction. 00823/038A PASCAL/VS OPTIMIZER SW G # S0759 PVSFS VLO FSNAME=VS#OPTIMIZE UM PICKELMAN 0 The optimizer. Not distributed due to copyright restriction. 0 Referenced by comments of: 823/41 1 SUN SEP 08/96 15:24:55 Page 660 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00823/039A PASCAL/VS OPTIMIZER SW G # S0759 PVSFS VLO FSNAME=VSOPTIMIZE 5.1T2 575 PASCAL/VS.OPTIMIZE.UC.040 1 LINE 71 3 PAGE UM PICKELMAN NOV. 08, 1982 21:03:21 0 Updates for several of the optimizer modules (823/39), for use in MTS. 0 Referenced by comments of: 823/41 00823/041A PASCAL/VS OPTIMIZER O G # S0759 PVSFS VLO FSNAME=VS/OPTIMIZE UM PICKELMAN 0 Object of VS#OPTIMIZE (823/38) and VSOPTIMIZE (823/40) applied. Not distributed due to copyright restriction. 00823/042A PASCAL/VS OPTIMIZER SW G # S0759 PVSFS VLO FSNAME=VS#MACOPT UM PICKELMAN 0 INCLUDE sections used by the optimizer. Not distributed due to copyright restriction. 00823/043A PASCAL/VS TRANSLATOR SW G # S0759 PVSFS VLO FSNAME=VS#TRANSLATE UM PICKELMAN 0 The translator. Not distributed due to copyright restrictions. Requires (823/47). 00823/044A PASCAL/VS TRANSLATOR SW G # S0759 PVSFS VLO FSNAME=VSTRANSLATE 5.1T2 576 PASCAL/VS.TRANSLATOR.UC.045 1 LINE 71 4 PAGE UM PICKELMAN JULY 11, 1983 15:53:35 0 Updates for several of the translator modules, for use in MTS. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/46 1 SUN SEP 08/96 15:24:55 Page 661 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00823/046A PASCAL/VS TRANSLATOR OC G # S0759 PVSFS VLO FSNAME=VS/TRANSLATE UM PICKELMAN 0 Object of the translator with (823/45) updates applied. Not distributed due to copyright restrictions. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 00823/047A PASCAL/VS TRANSLATOR SW G # S0759 PVSFS VLO FSNAME=VS#MACTRAN UM PICKELMAN 0 Includes used by the translator. Not distributed due to copyright restrictions. 0 Referenced by comments of: 823/43 00823/048C PASCAL/VS TRANSLATOR SW G # S0759 PVSFS VLO FSNAME=VSMACTRAN UM PICKELMAN 0 Updates for translator includes (823/48). 0 Referenced by comments of: 823/50 00823/050C PASCAL/VS TRANSLATOR SW G # S0759 PVSFS VLO FSNAME=VS%MACTRAN UM PICKELMAN 0 The translator includes with updates applied, i.e., (823/48) with (823/49) applied. Not distributed due to copyright restrictions. 00823/051A PASCAL/VS RUNTIME SA G S0759 PVSFS VLO FSNAME=VS.MTS 5.1T2 577 PASCAL/VS.RUNTIME.SA.051 1 LINE 72 48 PAGE UM PICKELMAN JULY 11, 1983 15:53:54 0 MTS version of several of the system interface routines. Object is in (823/66). These have been totally rewritten for MTS. Requires *GDINFODSECT (594/1). ************************************************************************** D5.1 version: Changed since D5.0C. 1 SUN SEP 08/96 15:24:55 Page 662 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ************************************************************************** 0 Referenced by comments of: 823/66 00823/052A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VS#RUN UM PICKELMAN 0 The PASCAL runtime support routines. Not distributed due to copyright restrictions. Requires (823/61). 0 Referenced by comments of: 823/66 00823/053A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VSRUN 5.1T2 578 PASCAL/VS.RUNTIME.UC.054 1 LINE 72 6 PAGE UM PICKELMAN JULY 11, 1983 15:54:04 0 Updates to the runtime routines (823/53) for use in MTS. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 00823/055A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VSÂRUN UM PICKELMAN 0 The runtime modules used in IBM systems, but not in MTS. Not distributed due to copyright restriction. 00823/056A PASCAL/VS RUNTIME SA G # S0759 PVSFS VLO FSNAME=VS#ASM UM PICKELMAN 0 The assembler runtime support routines. Not distributed due to copyright restrictions. Requires (823/61). 0 Referenced by comments of: 823/58, 823/66 00823/057A PASCAL/VS RUNTIME SA G # S0759 PVSFS VLO FSNAME=VSASM 5.1T2 579 PASCAL/VS.RUNTIME.UC.058 1 LINE 68 4 PAGE UM PICKELMAN NOV. 08, 1982 21:03:05 0 Updates to (823/56) for those routines which are changed only slightly for MTS. 0 Referenced by comments of: 823/66 00823/059A PASCAL/VS RUNTIME SA G # S0759 PVSFS VLO FSNAME=VSÂASM UM PICKELMAN 0 The assembler modules used in IBM systems, but not in MTS. Not distributed due to copyright restriction. 00823/060A PASCAL/VS DEBUGGER UC G S0759 PVSFS VLO FSNAME=VS>DEBUG 5.1T2 580 PASCAL/VS.DEBUGGER.UC.060 1 LINE 70 3 PAGE UM PICKELMAN JULY 11, 1983 15:54:14 0 Updates for the debugger modules (823/68), for use in MTS. ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 00823/061A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VS#MACRUN UM PICKELMAN 0 INCLUDE sections used by the runtime support. Not distributed due to copyright restrictions. 0 Referenced by comments of: 823/52, 823/56 00823/062A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VSMACRUN 5.1T2 581 PASCAL/VS.RUNTIME.UC.063 1 LINE 68 1 PAGE UM PICKELMAN NOV. 08, 1982 21:03:17 0 Updates to the runtime INCLUDES (823/62), for use in MTS. 0 Referenced by comments of: 823/64 00823/064A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VS%MACRUN UM PICKELMAN 0 The runtime INCLUDES updated for MTS, i.e, VSMACRUN (823/63) applied. 1 SUN SEP 08/96 15:24:55 Page 664 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Not distributed due to copyright restriction. 00823/065A PASCAL/VS RUNTIME SW G # S0759 PVSFS VLO FSNAME=VSÂMACRUN UM PICKELMAN 0 The runtime INCLUDES used in IBM systems, but not in MTS. Not distributed due to copyright restriction. 00823/066A PASCAL/VS RUNTIME OL G S0759 PVSFS VLO FSNAME=VS/LIB 5.1T2 582 PASCAL/VS.RUNTIME.OL.066 1 LINE 13412 46 PAGE UM PICKELMAN JULY 11, 1983 15:54:19 0 Object of (823/51), (823/56), (823/52) with updates (823/58) applied, and (823/67). ************************************************************************** D5.1 version: Changed since D5.0C. ************************************************************************** 0 Referenced by comments of: 823/7, 823/28, 823/51 00823/067A PASCAL/VS DEBUGGER SW G # S0759 PVSFS VLO FSNAME=VS#DEBUG UM PICKELMAN 0 Source for the debugger. Not distribute due to copyright restrictions. Requires (823/69). 0 Referenced by comments of: 823/66 00823/068A PASCAL/VS DEBUGGER SW G # S0759 PVSFS VLO FSNAME=VSFNT UM SHERRY 0 Xerox licensed landscape font, Scientific 10 containing math and Greek characters. Used by *PGF(34). 0 Referenced by comments of: 3048/1 00842/002C XEROX 9700 UM FONT A06S0P XT G # PAGE:A06S0P>FNT UM SHERRY 0 Xerox licensed portrait font, Scientific 10 containing math and Greek characters. Used by *PGF(14). 1 SUN SEP 08/96 15:24:55 Page 692 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00842/003C XEROX 9700 UM FONT L01ALA XT G PAGE:L01ALA>FNT 5.1T2 768 XEROX_9700_UM_FONT.L01ALA.XT.003 1 LINE 512 3 PAGE UM SHERRY JULY 23, 1983 14:04:14 0 Landscape 13.6 cpi font containing ALA characters not in the TN character set. Used by *PGF(33). Based on UQV font L01ALA but with new diacritics and several characters modified. 00842/004C XEROX 9700 UM FONT L01BOD XT G PAGE:L01BOD>FNT 5.1T2 769 XEROX_9700_UM_FONT.L01BOD.XT.004 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:14 0 Landscape 13.6 cpi bold font containing TN character set in the 1200 print style. Used by *PGF lines 23 and 33. 00842/005C XEROX 9700 UM FONT L01ITD XT G PAGE:L01ITD>FNT 5.1T2 770 XEROX_9700_UM_FONT.L01ITD.XT.005 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:14 0 Landscape 13.6 italic font containing most of the TN character set in the 1200 print style. 00842/006C XEROX 9700 UM FONT L0112D XT G PAGE:L0112D>FNT 5.1T2 771 XEROX_9700_UM_FONT.L0112D.XT.006 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:15 0 Landscape 13.6 medium font containing TN character set in the 1200 print style. Used by *PGF lines 23 and 33. 00842/007C XEROX 9700 UM FONT L05ALA XT G PAGE:L05ALA>FNT 5.1T2 772 XEROX_9700_UM_FONT.L05ALA.XT.007 1 LINE 512 3 PAGE UM SHERRY JULY 23, 1983 14:04:15 0 Landscape 10 cpi font containing ALA characters not in the TN character set. Used by *PGF(34). Created from P08ALA by rotation. 00842/008C XEROX 9700 UM FONT L05DWB XT G PAGE:L05DWB>FNT 5.1T2 773 XEROX_9700_UM_FONT.L05DWB.XT.008 1 LINE 512 6 PAGE UM SHERRY JULY 23, 1983 14:04:15 0 This landscape 10 cpi italic font is the same as L051TD with the addition of 5 special characters used to make the Workshop VIII logo. 00842/009C XEROX 9700 UM FONT PR224A XT G PAGE:PR224A>FNT 5.1T2 774 XEROX_9700_UM_FONT.PR224A.XT.009 1 LINE 512 8 PAGE UM SHERRY JULY 23, 1983 14:04:15 0 Landscape 24 pt bold porportioned font in the Press Roman print style. This is the same as Xerox's font with the addition of a ':'. Used in one of UM's test formats. 00842/010C XEROX 9700 UM FONT PR224B XT G PAGE:PR224B>FNT 5.1T2 775 XEROX_9700_UM_FONT.PR224B.XT.010 1 LINE 512 6 PAGE UM SHERRY JULY 23, 1983 14:04:16 0 Portrait 24 pt bold porportional font in the Press Roman print style. This is the same as Xerox's font with the addition of a ':'. Used in one of UM's test formats. 1 SUN SEP 08/96 15:24:55 Page 693 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00842/011C XEROX 9700 UM FONT P06ALA XT G PAGE:P06ALA>FNT 5.1T2 776 XEROX_9700_UM_FONT.P06ALA.XT.011 1 LINE 512 3 PAGE UM SHERRY JULY 23, 1983 14:04:16 0 Portrait 13.6 cpi font containing ALA characters not in the TN character set. Used by *PGF(15). Created from L01ALA by rotation. 00842/012C XEROX 9700 UM FONT P06BOD XT G PAGE:P06BOD>FNT 5.1T2 777 XEROX_9700_UM_FONT.P06BOD.XT.012 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:16 0 Portrait 13.6 cpi bold font in the 1200 print style. Used by *PGF(5) and *PGF(15). 00842/013C XEROX 9700 UM FONT P0612D XT G PAGE:P0612D>FNT 5.1T2 778 XEROX_9700_UM_FONT.P0612D.XT.013 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:16 0 Portrait 13.6 cpi medium font in the 1200 print style. Used by *PGF lines 5 and 15. 00842/014C XEROX 9700 UM FONT P08ALA XT G PAGE:P08ALA>FNT 5.1T2 779 XEROX_9700_UM_FONT.P08ALA.XT.014 1 LINE 512 3 PAGE UM SHERRY JULY 23, 1983 14:04:17 0 Portrait 10 cpi font containing ALA characters not in the TN character set. Used by *PGF(14). Based on UQV font P08ALA but with new diacritics and several characters modified. 00842/015C XEROX 9700 UM FONT P08DWB XT G PAGE:P08DWB>FNT 5.1T2 780 XEROX_9700_UM_FONT.P08DWB.XT.015 1 LINE 512 6 PAGE UM SHERRY JULY 23, 1983 14:04:17 0 This portrait 10 cpi italic font is the same as P08ITD with the addition of 5 special characters used to make the Workshop VIII logo. 00842/016C XEROX 9700 UM FONT P08ITD XT G PAGE:P08ITD>FNT 5.1T2 781 XEROX_9700_UM_FONT.P08ITD.XT.016 1 LINE 512 6 PAGE UM SHERRY JULY 23, 1983 14:04:17 0 Portrait 10 cpi italic font containing most of the TN characters. 00842/017C XEROX 9700 UM FONT P08TAD XT G PAGE:P08TAD>FNT 5.1T2 782 XEROX_9700_UM_FONT.P08TAD.XT.017 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:18 0 Portrait 10 cpi normal font containing the TN character set in Titan 10 print style. Used by *PGF line 4 and 14. 00842/018C XEROX 9700 UM FONT P08TBD XT G PAGE:P08TBD>FNT 5.1T2 783 XEROX_9700_UM_FONT.P08TBD.XT.018 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:18 0 Portrait 10 cpi bold font containing the TN character set in the Titan 10 print style. Used by *PGF lines 2, 4, and 14. 00842/019C XEROX 9700 UM FONT P08UMA XT G PAGE:P08UMA>FNT 5.1T2 784 XEROX_9700_UM_FONT.P08UMA.XT.019 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:18 0 The portrait 12 cpi font was set up to print UM's documentation. It is based on the UQV P08UMA with the addition of a few ASCII characters. 1 SUN SEP 08/96 15:24:55 Page 694 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Used by *PGF(12). 00842/020C XEROX 9700 UM FONT P0812D XT G PAGE:P0812D>FNT 5.1T2 785 XEROX_9700_UM_FONT.P0812D.XT.020 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:18 0 Portrait 10 cpi normal font contains the TN character set in the 1200 print style, san serif. Used by *PGF(2). 00842/021C XEROX 9700 UM FONT P1012D XT G PAGE:P1012D>FNT 5.1T2 786 XEROX_9700_UM_FONT.P1012D.XT.021 1 LINE 512 3 PAGE UM SHERRY JULY 23, 1983 14:04:19 0 Portrait 17.6 cpi normal font containing the TN character set. Used by *PGF(3) for a "two-up" format and by *PGF(13). 00842/022C XEROX 9700 UM FONT SS115P XT G PAGE:SS115P>FNT 5.1T2 787 XEROX_9700_UM_FONT.SS115P.XT.022 1 LINE 512 6 PAGE UM SHERRY JULY 23, 1983 14:04:19 0 Portrait 15 pt proportional font containing most of the TN characters. Used by a test format. This font was obtained externally. 00842/023C XEROX 9700 UM FONT ULFN01 XT G PAGE:ULFN01>FNT 5.1T2 788 XEROX_9700_UM_FONT.ULFN01.XT.023 1 LINE 512 6 PAGE UM SHERRY JULY 23, 1983 14:04:19 0 Landscape 13.6 cpi font containing the UBC extended character set. Used by *PGF(30). 00842/024C XEROX 9700 UM FONT UMXTNL XT G PAGE:UMXTNL>FNT 5.1T2 789 XEROX_9700_UM_FONT.UMXTNL.XT.024 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:20 0 Landscape 13.6 cpi font containing the TN characters plus a few ASCII characters in the 1200 print style. This was created from L0112D and is the default 9700 font at UM. Used by *PGF(20). 00842/025C XEROX 9700 UM FONT UN110L XT G PAGE:UN110L>FNT 5.1T2 790 XEROX_9700_UM_FONT.UN110L.XT.025 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:20 0 UQV's landscape 10 pt proportional font containing most of the TN characters in the Univers print style. Used by *PGF(31). 00842/026C XEROX 9700 UM FONT UN110P XT G PAGE:UN110P>FNT 5.1T2 791 XEROX_9700_UM_FONT.UN110P.XT.026 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:20 0 UQV's portrait 10 pt proportional font containing most of the TN characters in the Univers print style. Used by *PGF(11). 00842/027C XEROX 9700 UM FONT UN210L XT G PAGE:UN210L>FNT 5.1T2 792 XEROX_9700_UM_FONT.UN210L.XT.027 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:20 0 UQV's landscape 10 pt bold proportional font containing most of the TN characters in the Univers print style. Used by *PGF(31). 1 SUN SEP 08/96 15:24:55 Page 695 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00842/028C XEROX 9700 UM FONT UN210P XT G PAGE:UN210P>FNT 5.1T2 793 XEROX_9700_UM_FONT.UN210P.XT.028 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:21 0 UQV's portrait 10 pt bold proportional font containing most of the TN characters in the Univers print style. Used by *PGF(11). 00842/029C XEROX 9700 UM FONT UN510L XT G PAGE:UN510L>FNT 5.1T2 794 XEROX_9700_UM_FONT.UN510L.XT.029 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:21 0 UQV's landscape 10 pt italic proportional font containing most of the TN characters in the Univers print style. Used by *PGF(31). 00842/030C XEROX 9700 UM FONT UN510P XT G PAGE:UN510P>FNT 5.1T2 795 XEROX_9700_UM_FONT.UN510P.XT.030 1 LINE 512 5 PAGE UM SHERRY JULY 23, 1983 14:04:21 0 UQV's portrait 10 pt italic proportional font containing most of the TN characters in the Univers print style. Used by *PGF(11). 00842/031C XEROX 9700 UM FONT UPFN01 XT G PAGE:UPFN01>FNT 5.1T2 796 XEROX_9700_UM_FONT.UPFN01.XT.031 1 LINE 512 7 PAGE UM SHERRY JULY 23, 1983 14:04:22 0 Portrait 10 cpi font containing the UBC extended character set. Used by *PGF(10). 00842/032C XEROX 9700 UM FONT 1247DL XT G PAGE:1247DL>FNT 5.1T2 797 XEROX_9700_UM_FONT.1247DL.XT.032 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:22 0 UQV's landscape 13.6 cpi APL font containing the 1403 APL characters that are different from the TN character set. Used by *PGF(23). 00842/033C XEROX 9700 UM FONT 1247DP XT G PAGE:1247DP>FNT 5.1T2 798 XEROX_9700_UM_FONT.1247DP.XT.033 1 LINE 512 4 PAGE UM SHERRY JULY 23, 1983 14:04:22 0 UQV's portrait 10 cpi APL font containing the 1403 APL characters that are different from the TN character set. Used by *PGF(4). 00843/001C LOG COMMAND CLS SQ G CLS:LOG*SQ 5.1T2 799 LOG_COMMAND.CLS.SQ.001 1 LINE 67 4 PAGE UM BURLING JULY 23, 1983 14:04:22 0 Plus source for $LOG CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:LOG*SRL (843/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 00843/002C LOG COMMAND GRAMMAR SR G CLS:LOG*SR 5.1T2 800 LOG_COMMAND.GRAMMAR.SR.002 1 LINE 75 1 PAGE UM BURLING JULY 23, 1983 14:04:23 0 This is the *CLSPARSEGEN input to produce the parser tables used by the $LOG CLS. 0 Referenced by comments of: 843/3 1 SUN SEP 08/96 15:24:55 Page 696 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00843/003C LOG COMMAND DECLARATIONS SQ G CLS:LOG*SRL 5.1T2 801 LOG_COMMAND.DECLARATIONS.SQ.003 1 LINE 63 1 PAGE UM BURLING JULY 23, 1983 14:04:23 0 This is the declarations file produced by $RUNning *CLPARSEGEN using (843/2) as input. 0 Referenced by comments of: 843/1 00843/004C LOG COMMAND OBJECT OL G *CLSLOG 5.1T2 802 LOG_COMMAND.OBJECT.OL.004 1 LINE 1852 6 PAGE UM BURLING JULY 23, 1983 14:04:24 *CLSLOG 0 Complete object for $LOG CLS. This file is post-IPL loaded into shared VM. 00843/005C LOG COMMAND HELP FILE D G ETC.:LOG.HELP 5.1T2 803 LOG_COMMAND.HELP_FILE.D.005 1 LINE 68 1 PAGE UM BURLING JULY 23, 1983 14:04:24 ETC:LOG.HELP@E 0 This is the file used by the parser in response to HELP commands, and to generate some of the $LOG error messages. 00844/001A *GENDOC *GENDOC OE G *GENDOC 5.1T2 804 GENDOC.?GENDOC.OE.001 1 LINE 32767 21 PAGE UM MENDAL JULY 23, 1983 14:04:25 0 The *GENDOC on-line documentation system provides sets of databases and a command language that allows a user to generate MTS documentation in a simple, straightforward, and efficient manner. In addition, GENDOC provides easy to understand diagnostics and an on-line help facility. GENDOC is best used in conversational mode, but batch use is also allowed. The GENDOC system focuses on many database sets. Each set contains two very important databases: a "query" database and a document database. ************************************************************************ D5.1 version: This is version 3.0 of the *GENDOC online documentation system. Three database sets are being distributed on D5.1: GDOC -- the default, system documentation COUN -- consultant's documentation MCP -- Microcomputer Communications Programs documentation ************************************************************************ 0 Referenced by comments of: 844/2, 844/7, 844/11, 844/12, 844/15, 844/18, 844/21, 844/22, 844/23, 844/45, 844/46, 844/47, 844/49, 844/52, 844/53, 844/54, 844/55, 844/57, 844/60 00844/002A *GENDOC CREATE OBJ C G GDOC:GENDOC.NWOBJ 5.1T2 805 GENDOC.CREATE_OBJ.C.002 1 LINE 67 4 PAGE UM MENDAL JULY 23, 1983 14:04:26 0 Contains commands to be used to install a new version in (844/1), (844/8), (844/28) and (844/31). 1 SUN SEP 08/96 15:24:55 Page 697 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 844/7 00844/003A *GENDOC MEMO 445A WF G GDOC:GENDOC.W.S 5.1T2 806 GENDOC.MEMO_445A.WF.003 1 LINE 68 5 PAGE UM MENDAL JULY 23, 1983 14:04:29 0 This is Computing Center Memo 445A, "The *GENDOC On-Line Documentation Facility." This file contains commands at negative line numbers to place output in the file *GENDOC.W (844/4). 0 Referenced by comments of: 844/4 00844/004A *GENDOC MEMO 445A PF G *GENDOC.W 5.1T2 807 GENDOC.MEMO_445A.PF.004 1 LINE 68 7 PAGE UM MENDAL JULY 23, 1983 14:04:29 0 This is the print file for (844/3). 0 Referenced by comments of: 844/3 00844/005A *GENDOC *GENDOCNEWS P G *GENDOCNEWS 5.1T2 808 GENDOC.?GENDOCNEWS.P.005 1 LINE 68 9 PAGE UM MENDAL JULY 23, 1983 14:04:30 0 Information file for recent changes, additions, etc. to *GENDOC. 00844/006C *GENDOC DESIGN GUIDE P G GDOC:GENDOC.INT.W 5.1T2 809 GENDOC.DESIGN_GUIDE.P.006 1 LINE 68 8 PAGE UM MENDAL JULY 23, 1983 14:04:31 0 Contains documentation on how GENDOC was designed and implemented. Should give an insight into how GENDOC works and how it should be maintained. 00844/007A *GENDOC SOURCE SB G GDOC:GENDOC.S 5.1T2 810 GENDOC.SOURCE.SB.007 1 LINE 102 37 PAGE UM MENDAL JULY 23, 1983 14:04:31 0 *ALGOLW source for *GENDOC (844/1) and the test version (844/8). File contains commands at beginning for assembly of the test version with ATTN run time support (844/9). (844/2) may be used to place object in *GENDOC. 00844/008A *GENDOC TEST OBJ O G GDOC:GENDOC 5.1T2 811 GENDOC.TEST_OBJ.O.008 1 LINE 32767 21 PAGE UM MENDAL JULY 23, 1983 14:04:33 0 Object code for latest untested version of *GENDOC. May contain a $CONTINUE WITH record for (844/10), depending on when the last version was installed. 0 Referenced by comments of: 844/2, 844/7, 844/11, 844/12, 844/15, 844/18, 844/45, 844/46, 844/47, 844/49, 844/53, 844/54, 844/55, 844/57 00844/009A *GENDOC ATTN SUBR SG G GDOC:GENDOC.ATN.S 5.1T2 812 GENDOC.ATTN_SUBR.SG.009 1 LINE 91 1 PAGE UM MENDAL JULY 23, 1983 14:04:34 0 Source for ATTN run time subroutines for GENDOC. File contains commands to assemble, which write object into (844/10). 1 SUN SEP 08/96 15:24:55 Page 698 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 844/7 00844/010A *GENDOC ATTN SUBR OC G GDOC:GENDOC.ATN.O 5.1T2 813 GENDOC.ATTN_SUBR.OC.010 1 LINE 550 1 PAGE UM MENDAL JULY 23, 1983 14:04:34 0 Referenced by comments of: 844/8, 844/9 00844/011A *GENDOC DOCUMENTS D G GDOC:GENDOC.OUTPT 5.1T2 814 GENDOC.DOCUMENTS.D.011 1 LINE 152 7225 PAGE UM MENDAL JULY 23, 1983 14:04:34 0 *GENDOC documents data base. Referenced by (844/31), (844/1), and (844/8). Line numbers in this file are extremely important. Referenced by the GDOC database-set only. Contains $CONTINUE WITHs to MCP:PROGRAM.LIST (848/156), MCP:TRS1/3.DOC (848/197) and to other line number ranges in this file. 00844/012A *GENDOC HELP D G GDOC:GENDOC.ONL.W 5.1T2 815 GENDOC.HELP.D.012 1 LINE 68 120 PAGE UM MENDAL JULY 23, 1983 14:12:35 0 On-line help facility for *GENDOC (the "query" data base). Line numbers in this file are extremely important. References (844/36). Referenced by (844/1), (844/8), and (844/31). Referenced by the GDOC database-set only. 0 Referenced by comments of: 844/36 00844/013C *GENDOC INIT FILE D G GDOC:GENDOC.CMDS 5.1T2 816 GENDOC.INIT_FILE.D.013 1 LINE 8 1 PAGE UM MENDAL JULY 23, 1983 14:12:41 0 Initialization file for *GENDOC (all command forms). 00844/014C *GENDOC INIT FILE D G GDOC:GENDOC.CPTS 5.1T2 817 GENDOC.INIT_FILE.D.014 1 LINE 14 1 PAGE UM MENDAL JULY 23, 1983 14:12:41 0 Initialization file for *GENDOC (all help concepts). 00844/015C *GENDOC INIT FILE D G GDOC:GENDOC.DOCS 5.1T2 818 GENDOC.INIT_FILE.D.015 1 LINE 37 11 PAGE UM MENDAL JULY 23, 1983 14:12:41 0 Initialization file for (844/1), (844/8), and (844/31) (all GDOC database-set document names). 0 Referenced by comments of: 844/16 00844/016C *GENDOC INIT FILE P G GDOC:GENDOC.DOCS2 5.1T2 819 GENDOC.INIT_FILE.P.016 1 LINE 37 11 PAGE UM MENDAL JULY 23, 1983 14:12:42 0 Same as GENDOC.DOCS (844/15), but arranged in numerical order. 00844/017C *GENDOC INIT FILE D G GDOC:GENDOC.GENS 5.1T2 820 GENDOC.INIT_FILE.D.017 1 LINE 38 1 PAGE UM MENDAL JULY 23, 1983 14:12:43 0 Initialization file for *GENDOC (all generics). Referenced by the GDOC database-set only. 1 SUN SEP 08/96 15:24:55 Page 699 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00844/018C *GENDOC INIT FILE D G GDOC:GENDOC.NUMS 5.1T2 821 GENDOC.INIT_FILE.D.018 1 LINE 26 1 PAGE UM MENDAL JULY 23, 1983 14:12:43 0 Initialization file for (844/1), (844/8), and (844/31). Line numbers in this file are important. Referenced by the GDOC database-set only. 00844/019C *GENDOC STAT FILE P G GDOC:GENDOC.STATS 5.1T2 822 GENDOC.STAT_FILE.P.019 1 LINE 55 6 PAGE UM MENDAL JULY 23, 1983 14:12:43 0 Updated statistics file on *GENDOC usage. Referenced by (844/29). 00844/020A *GENDOC LOG FILE D G # GDOC:GENDOC.SNOOP UM MENDAL 0 If this file exists, *GENDOC uses it for logging information. 0 Referenced by comments of: 844/27, 844/28 00844/021C *GENDOC LOG FILE D G # GDOC:GENDOC.USTAT UM MENDAL 0 Log file for usage statistics. Referenced by (844/28) and (844/1). Line numbers in this file are important. Line -10 should contain information as to when the last version of *GENDOC was installed. 00844/022C *GENDOC LOG FILE D G # GDOC:GENDOC.CSTAT UM MENDAL 0 A log file for *GENDOC command statistics. Referenced by (844/1) and (844/28). Line numbers in this file are important. 00844/023C *GENDOC LOG FILE D G # GDOC:GENDOC.DSTAT UM MENDAL 0 Log file for *GENDOC documents produced. Computes and maintains statistics for the GDOC database-set only. Referenced by (844/1) and (844/28). Line numbers in this file are important. 00844/024C *GENDOC LOG FILE D G # GDOC:GENDOC.ERRS UM MENDAL 0 Error logging file for *GENDOC errors. Only errors related to the GDOC database-set are logged in this file. 00844/025C *GENDOC LOG FILE D G # GDOC:GENDOC.DB.SN UM MENDAL 0 Log file for GENDOC.DB (844/31) usage. Doesn't have to exist for GENDOC.DB to run. 00844/026C *GENDOC LOG FILE D G # GDOC:GENDOC.DB.ER UM MENDAL 0 Error logging file for GENDOC.DB (844/31) errors. Logs only errors 1 SUN SEP 08/96 15:24:55 Page 700 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 related to the GDOC database-set. This file need not exist in order for GENDOC to run. 00844/027C *GENDOC STATS ANAL SB G GDOC:GENDOC.STS.S 5.1T2 823 GENDOC.STATS_ANAL.SB.027 1 LINE 102 4 PAGE UM MENDAL JULY 23, 1983 14:12:43 0 *ALGOLW (528) source code for *GENDOC statistics analysis program. Contains commands in negative line number range to produce object code in (844/28). Uses UNSP:LIBRARY(1,10) (685/2) to log in file GDOC:GENDOC.SNOOP (844/20). 00844/028C *GENDOC STATS ANAL OE G GDOC:GENDOC.STS.O 5.1T2 824 GENDOC.STATS_ANAL.OE.028 1 LINE 15062 5 PAGE UM MENDAL JULY 23, 1983 14:12:44 0 Object code for *GENDOC statistics analysis. Referenced by (844/29). Uses UNSP:LIBRARY(1,10) (685/2) to log in file GDOC:GENDOC.SNOOP (844/20). 0 Referenced by comments of: 844/2, 844/21, 844/22, 844/23, 844/27, 844/52, 844/60 00844/029C *GENDOC STATS GEN C G GDOC:GENDOC.*AUTO 5.1T2 825 GENDOC.STATS_GEN.C.029 1 LINE 71 1 PAGE UM MENDAL JULY 23, 1983 14:12:44 0 MTS *BATCH* file for use with *AUTOSTART (816/5). Used to generate a hard copy listing of *GENDOC statistics weekly. 0 Referenced by comments of: 844/19, 844/28 00844/030C *GENDOC SCHEDULE D G GDOC:GENDOC.SCHED 5.1T2 826 GENDOC.SCHEDULE.D.030 1 LINE 61 1 PAGE UM MENDAL JULY 23, 1983 14:12:44 0 Schedule file for use with *AUTOSTART (816/5) to generate a weekly *BATCH* job of *GENDOC statistics. 00844/031C *GENDOC OBJECT OE G GDOC:GENDOC.DB 5.1T2 827 GENDOC.OBJECT.OE.031 1 LINE 32767 22 PAGE UM MENDAL JULY 23, 1983 14:12:44 0 Object code for *GENDOC database updating facility. 0 Referenced by comments of: 844/2, 844/11, 844/12, 844/15, 844/18, 844/25, 844/26, 844/32, 844/33, 844/34, 844/35, 844/39, 844/42, 844/43, 844/45, 844/46, 844/47, 844/49, 844/51, 844/53, 844/54, 844/55, 844/57, 844/59 00844/032C *GENDOC DB SOU SB G GDOC:GENDOC.DB.S 5.1T2 828 GENDOC.DB_SOU.SB.032 1 LINE 106 37 PAGE UM MENDAL JULY 23, 1983 14:12:45 0 *ALGOLW (528) source code for GENDOC.DB (844/31). 00844/033C *GENDOC DB RUN TIME OC G GDOC:GENDOC.DB.A 5.1T2 829 GENDOC.DB_RUN_TIME.OC.033 1 LINE 550 1 PAGE UM MENDAL JULY 23, 1983 14:12:47 0 ATTN run time object for GENDOC.DB (844/31). 1 SUN SEP 08/96 15:24:55 Page 701 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00844/034C *GENDOC DB HELP D G GDOC:GENDOC.DB.HQ 5.1T2 830 GENDOC.DB_HELP.D.034 1 LINE 68 11 PAGE UM MENDAL JULY 23, 1983 14:12:47 0 Online help facility for GENDOC.DB (844/31). Line numbers in this file are extremely important. 0 Referenced by comments of: 844/39 00844/035C *GENDOC DB INIT D G GDOC:GENDOC.DB.C 5.1T2 831 GENDOC.DB_INIT.D.035 1 LINE 13 1 PAGE UM MENDAL JULY 23, 1983 14:12:48 0 Initialization file for GENDOC.DB (844/31) (all command forms). 00844/036C *GENDOC CHANGES P G GDOC:NEWVERSION 5.1T2 832 GENDOC.CHANGES.P.036 1 LINE 65 1 PAGE UM MENDAL JULY 23, 1983 14:12:48 0 Contains a hard-copy format list of changes for the current version of *GENDOC. This file is referenced in line range (20002,20002.999) of (844/12). **************************************************************** D5.1 version: The current version of *GENDOC is 3.0. **************************************************************** 0 Referenced by comments of: 844/12 00844/037C *GENDOC BENCHMARKS P G GDOC:GENDOC.BENCH 5.1T2 833 GENDOC.BENCHMARKS.P.037 1 LINE 68 8 PAGE UM MENDAL JULY 23, 1983 14:12:48 0 File containing the statistics obtained from running GENDOC benchmarks. 00844/038C *GENDOC NEW DB C G GDOC:GENDOC.NEWDB 5.1T2 834 GENDOC.NEW_DB.C.038 1 LINE 99 3 PAGE UM MENDAL JULY 23, 1983 14:12:49 0 $SOURCE file to be used to install new database-sets in GENDOC. There are instructions in the file for proper use. 00844/039C *GENDOC DB - NEW VERS P G GDOC:DBNEWVERSION 5.1T2 835 GENDOC.DB_-_NEW_VERS.P.039 1 LINE 65 1 PAGE UM MENDAL JULY 23, 1983 14:12:50 0 Contains hard-copy format list of changes for current version of GDOC:GENDOC.DB (844/31). This file is referenced in line range (20002,20002.999) of (844/34) 00844/040C *GENDOC MAGIC NOS. D G GDOC:GENDOC.MNUM 5.1T2 836 GENDOC.MAGIC_NOS..D.040 1 LINE 60 1 PAGE UM MENDAL JULY 23, 1983 14:12:50 0 Initialization file of "master=systemwide" magic numbers. Line numbers in this file are important. 1 SUN SEP 08/96 15:24:55 Page 702 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00844/041C *GENDOC DATABASES D G GDOC:GENDOC.DBS 5.1T2 837 GENDOC.DATABASES.D.041 1 LINE 5 1 PAGE UM MENDAL JULY 23, 1983 14:12:50 0 Initialization file containing all the legal database signon IDs. 00844/042C *GENDOC DB CONCEPTS D G GDOC:GENDOC.DBCPT 5.1T2 838 GENDOC.DB_CONCEPTS.D.042 1 LINE 14 1 PAGE UM MENDAL JULY 23, 1983 14:12:50 0 Initialization file for GDOC:GENDOC.DB (844/31) (all concepts). 00844/043C *GENDOC DB DOC WF O GDOC:GENDOC.DB.WS 5.1T2 839 GENDOC.DB_DOC.WF.043 1 LINE 68 8 PAGE UM MENDAL JULY 23, 1983 14:12:50 0 This is the documentation for the GDOC:GENDOC.DB (844/31) program. Contains commands at negative line numbers to place output in a file called "GDOC:GENDOC.DB.W" (844/44). 0 Referenced by comments of: 844/44 00844/044C *GENDOC DB DOC PF O GDOC:GENDOC.DB.W 5.1T2 840 GENDOC.DB_DOC.PF.044 1 LINE 68 10 PAGE UM MENDAL JULY 23, 1983 14:12:51 0 Printer-ready output for (844/43). 0 Referenced by comments of: 844/43 00844/045C *GENDOC COUN OUTPT D G COUN:GENDOC.OUTPT 5.1T2 841 GENDOC.COUN_OUTPT.D.045 1 LINE 132 55 PAGE UM MENDAL JULY 23, 1983 14:12:52 0 *GENDOC COUN documents data base. Referenced by (844/1), (844/8) and (844/31). Line numbers in this file are extremely important. Referenced by the COUN database-set only. 00844/046C *GENDOC COUN ONL.W D G COUN:GENDOC.ONL.W 5.1T2 842 GENDOC.COUN_ONL.W.D.046 1 LINE 68 5 PAGE UM MENDAL JULY 23, 1983 14:12:56 0 On-line help facility for *GENDOC (the "query" data base). Line numbers in this file are extremely important. Referenced by (844/1), (844/8), and (844/31). Referenced by the COUN database-set only. Contains a $CONTINUE WITH to GDOC:GENDOC.ONL.W at line range (5005,5005.999). 00844/047C *GENDOC COUN NUMS D G COUN:GENDOC.NUMS 5.1T2 843 GENDOC.COUN_NUMS.D.047 1 LINE 26 1 PAGE UM MENDAL JULY 23, 1983 14:12:56 0 Initialization file for (844/1), (844/8), and (844/31). Line numbers in this file are important. Referenced by the COUN database-set only. 00844/048C *GENDOC COUN GENS D G COUN:GENDOC.GENS 5.1T2 844 GENDOC.COUN_GENS.D.048 1 LINE 37 1 PAGE UM MENDAL JULY 23, 1983 14:12:56 0 Initialization file for *GENDOC (all generics). Referenced by the COUN database-set only. 1 SUN SEP 08/96 15:24:55 Page 703 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00844/049C *GENDOC COUN DOCS D G COUN:GENDOC.DOCS 5.1T2 845 GENDOC.COUN_DOCS.D.049 1 LINE 37 1 PAGE UM MENDAL JULY 23, 1983 14:12:56 0 Initialization file for (844/1), (844/8), and (844/31) (all COUN database-set document names). 00844/050C *GENDOC COUN ERRS D G COUN:GENDOC.ERRS 5.1T2 846 GENDOC.COUN_ERRS.D.050 1 LINE ? 1 PAGE UM MENDAL JULY 23, 1983 14:12:56 0 Error logging file for *GENDOC errors. Only errors related to the COUN database-set are logged in this file. ********************************************************************** D5.1 version: This is an empty file. ********************************************************************** 00844/051C *GENDOC COUN DB.ER D G COUN:GENDOC.DB.ER 5.1T2 847 GENDOC.COUN_DB.ER.D.051 1 LINE 102 1 PAGE UM MENDAL JULY 23, 1983 14:12:57 0 Error logging file for GENDOC.DB (844/31) errors. Logs only errors related to the COUN database-set. This file need not exist in order for GENDOC to run. 00844/052C *GENDOC COUN DSTAT D G COUN:GENDOC.DSTAT 5.1T2 848 GENDOC.COUN_DSTAT.D.052 1 LINE 17 1 PAGE UM MENDAL JULY 23, 1983 14:12:57 0 Log file for *GENDOC documents produced. Computes and maintains statistics for the COUN database-set only. Referenced by (844/1) and (844/28). Line numbers in this file are important. 00844/053C *GENDOC MCP OUTPUT D G MCP:GENDOC.OUTPT 5.1T2 849 GENDOC.MCP_OUTPUT.D.053 1 LINE 68 1 PAGE UM MENDAL JULY 23, 1983 14:12:57 0 *GENDOC MCP documents data base. Referenced by (844/1), (844/8) and (844/31). Line numbers in this file are extremely important. Referenced by the MCP database-set only. Contains many $CONTINUE WITH lines to various MCP subcomponents -- see (848). 00844/054C *GENDOC MCP ONL.W D G MCP:GENDOC.ONL.W 5.1T2 850 GENDOC.MCP_ONL.W.D.054 1 LINE 73 5 PAGE UM MENDAL JULY 23, 1983 14:12:58 0 On-line help facility for *GENDOC (the "query" data base). Line numbers in this file are extremely important. Referenced by (844/1), (844/8), and (844/31). Referenced by the MCP database-set only. Contains a $CONTINUE WITH to GDOC:GENDOC.ONL.W at line range (5005,5005.999). 00844/055C *GENDOC MCP NUMS D G MCP:GENDOC.NUMS 5.1T2 851 GENDOC.MCP_NUMS.D.055 1 LINE 26 1 PAGE UM MENDAL JULY 23, 1983 14:12:58 0 Initialization file for (844/1), (844/8), and (844/31). Line numbers in this file are important. Referenced by the MCP database-set only. 1 SUN SEP 08/96 15:24:55 Page 704 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00844/056C *GENDOC MCP GENS D G MCP:GENDOC.GENS 5.1T2 852 GENDOC.MCP_GENS.D.056 1 LINE 37 1 PAGE UM MENDAL JULY 23, 1983 14:12:58 0 Initialization file for *GENDOC (all generics). Referenced by the MCP database-set only. 00844/057C *GENDOC MCP DOCS D G MCP:GENDOC.DOCS 5.1T2 853 GENDOC.MCP_DOCS.D.057 1 LINE 37 1 PAGE UM MENDAL JULY 23, 1983 14:12:58 0 Initialization file for (844/1), (844/8), and (844/31) (all MCP database-set document names). 00844/058C *GENDOC MCP ERRS D G MCP:GENDOC.ERRS 5.1T2 854 GENDOC.MCP_ERRS.D.058 1 LINE ? 1 PAGE UM MENDAL JULY 23, 1983 14:12:59 0 Error logging file for *GENDOC errors. Only errors related to the MCP database-set are logged in this file. ********************************************************************** D5.1 version: This is an empty file. ********************************************************************** 00844/059C *GENDOC MCP DB.ER D G MCP:GENDOC.DB.ER 5.1T2 855 GENDOC.MCP_DB.ER.D.059 1 LINE ? 1 PAGE UM MENDAL JULY 23, 1983 14:12:59 0 Error logging file for GENDOC.DB (844/31) errors. Logs only errors related to the MCP database-set. This file need not exist in order for GENDOC to run. ********************************************************************** D5.1 version: This is an empty file. ********************************************************************** 00844/060C *GENDOC MCP DSTAT D G MCP:GENDOC.DSTAT 5.1T2 856 GENDOC.MCP_DSTAT.D.060 1 LINE 15 1 PAGE UM MENDAL JULY 23, 1983 14:12:59 0 Log file for *GENDOC documents produced. Computes and maintains statistics for the MCP database-set only. Referenced by (844/1) and (844/28). Line numbers in this file are important. 00845/001C FULL SCREEN HELP PMF PROJ FILE D HELP:FSHELP_PROJ 5.1T2 857 FULL_SCREEN_HELP.PMF_PROJ.D.001 1 LINE 120 3 PAGE UM HANSEN JULY 23, 1983 14:12:59 0 Full Screen Help, or FS Help, is a program designed to provide a crude full screen help facility using a help file format based on that used by *CLPARSER. This subcomponent is the PMF project file (see component 810), for the Full Screen Help subroutines. 1 SUN SEP 08/96 15:24:55 Page 705 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ******************************************************************** D5.0C version: This version of Full Screen Help should not be considered final in design or operation. ******************************************************************** 0 Referenced by comments of: 845/2, 1089/3 00845/002C FULL SCREEN HELP SOURCE SQ O HELP:FSHELP.S 5.1T2 858 FULL_SCREEN_HELP.SOURCE.SQ.002 1 LINE 118 16 PAGE UM HANSEN JULY 23, 1983 14:13:00 0 The source for various parts of FSHELP and FSHELPER. Use the PMF and the PMF project file (845/1) to separate the pieces, if needed. 00845/003C FULL SCREEN HELP OBJECT OC O HELP:FSHELP 5.1T2 859 FULL_SCREEN_HELP.OBJECT.OC.003 1 LINE 12062 5 PAGE UM HANSEN JULY 23, 1983 14:13:01 00845/004C FULL SCREEN HELP FSHELPER OE O HELP:FSHELPER 5.1T2 860 FULL_SCREEN_HELP.FSHELPER.OE.004 1 LINE 15446 6 PAGE UM HANSEN JULY 23, 1983 14:13:01 0 The object of the FSHELPER program used to inspect the FSHELP text files. 00845/005C FULL SCREEN HELP SOU LIB SQ G HELP:FSHELP.SQL 5.1T2 861 FULL_SCREEN_HELP.SOU_LIB.SQ.005 1 LINE 69 1 PAGE UM HANSEN JULY 23, 1983 14:13:01 0 The PLUS source library for programs using FSHELP. 0 Referenced by comments of: 810/10, 1089/9 00845/006C FULL SCREEN HELP OBJ OE O SEG2:FSHELP 5.1T2 862 FULL_SCREEN_HELP.OBJ.OE.006 1 LINE 12062 5 PAGE UM HANSEN JULY 23, 1983 14:13:02 SEG2:FSHELP 0 The linkedited object module for FSHELP subroutines. 0 Referenced by comments of: 387/38, 810/5, 1079/1 00845/007C FULL SCREEN HELP DOCUMENTATION WF HELP:FSHELP.FMT 5.1T2 863 FULL_SCREEN_HELP.DOCUMENT.WF.007 1 LINE 84 4 PAGE UM HANSEN JULY 23, 1983 14:13:02 0 This is the *FORMAT source for the FSHELP documentation. 00845/008C FULL SCREEN HELP DOCUMENTATION PF HELP:FSHELP.DOC 5.1T2 864 FULL_SCREEN_HELP.DOCUMENT.PF.008 1 LINE 65 4 PAGE UM HANSEN JULY 23, 1983 14:13:02 0 Printer ready form of the FSHELP documentation. About 6 pages. 00846/001C NETMAIL GOSSIP W G W267:NETMAIL.READ 5.1T2 865 NETMAIL.GOSSIP.W.001 1 LINE 70 8 PAGE UM EADIE JULY 23, 1983 14:13:03 0 Read this first. It explains EVERYTHING! 1 SUN SEP 08/96 15:24:55 Page 706 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00846/002C NETMAIL INSTALL C G W267:NETMAIL.MAKE 5.1T2 866 NETMAIL.INSTALL.C.002 1 LINE 143 3 PAGE UM EADIE JULY 23, 1983 14:13:03 0 This subcomponent contains commands to install NETMAIL. 00846/003C NETMAIL SOURCE SQ G W267:NETMAIL.SQ 5.1T2 867 NETMAIL.SOURCE.SQ.003 1 LINE 231 21 PAGE UM EADIE JULY 23, 1983 14:13:03 0 This subcomponent contains the source code for NETMAIL. 00846/004C NETMAIL GRAMMAR SR G W267:NETMAIL.SR 5.1T2 868 NETMAIL.GRAMMAR.SR.004 1 LINE 83 4 PAGE UM EADIE JULY 23, 1983 14:13:05 0 This subcomponent contains the source of the NETMAIL grammar. 00846/005C NETMAIL XPORT SQ G W267:XPORT.SQL 5.1T2 869 NETMAIL.XPORT.SQ.005 1 LINE 91 1 PAGE UM EADIE JULY 23, 1983 14:13:05 0 This subcomponent contains the source library for the NETMAIL 'tranport service'. 00846/006C NETMAIL XPORT SQ G W267:XPORT.SQ 5.1T2 870 NETMAIL.XPORT.SQ.006 1 LINE 112 1 PAGE UM EADIE JULY 23, 1983 14:13:05 0 This subcomponent contains the source of the NETMAIL 'transport service.' 0 Referenced by comments of: 846/16 00846/007C NETMAIL NETWORK SQ G W267:NETWORK.SQL 5.1T2 871 NETMAIL.NETWORK.SQ.007 1 LINE 67 1 PAGE UM EADIE JULY 23, 1983 14:13:05 0 This subcomponent contains the source library for the network-dependent NETMAIL I/O. 00846/008C NETMAIL NETWORK SQ G W267:MERIT.SQ 5.1T2 872 NETMAIL.NETWORK.SQ.008 1 LINE 87 1 PAGE UM EADIE JULY 23, 1983 14:13:06 0 This subcomponent contains the source for the Merit network-dependent NETMAIL I/O. 00846/009C NETMAIL NETMAIL OC G W267:NETMAIL> 5.1T2 873 NETMAIL.NETMAIL.OC.009 1 LINE 3436 23 PAGE UM EADIE JULY 23, 1983 14:13:06 0 This subcomponent contains object for NETMAIL, the transport service, and the Merit network I/O. There is a slight chance this file will be $RUNable at your site without change (see NETMAIL.READ). 00846/010C NETMAIL RFC_821 W G S1669 5.0CT1 VLO FSNAME=NETMAIL.RFC_821.W.010(1) 596 5.1T2 874 NETMAIL.RFC_821.W.010 1 LINE 74 39 PAGE UM EADIE MAR. 02, 1983 22:28:38 0 This subcomponent contains ARPA protocol document RFC821. 1 SUN SEP 08/96 15:24:55 Page 707 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00846/011C NETMAIL RFC_822 W G S1669 5.0CT1 VLO FSNAME=NETMAIL.RFC_822.W.011(1) 597 5.1T2 875 NETMAIL.RFC_822.W.011 1 LINE 73 33 PAGE UM EADIE MAR. 02, 1983 22:28:43 0 This subcomponent contains ARPA protocol document RFC822. 00846/012C NETMAIL FORUM P G W267:NETMAIL.CONF 5.1T2 876 NETMAIL.FORUM.P.012 1 LINE 87 190 PAGE UM EADIE JULY 23, 1983 14:23:56 0 *FORUM conference (NET-MAIL) in printer ready form. 00846/013C NETMAIL BOXCHECK G W267:BOX_CHECK 5.1T2 877 NETMAIL.BOXCHECK..013 1 LINE 5116 9 PAGE UM EADIE JULY 23, 1983 14:24:07 0 This subcomponent contains source (starting at line 1000) and object for a grungy little program to print a summary of the contents of a remote mailbox. 00846/014C NETMAIL HOST TABLE D G POST:HOST-TABLE 5.1T2 878 NETMAIL.HOST_TABLE.D.014 1 LINE 22 1 PAGE UM EADIE JULY 23, 1983 14:24:08 0 This file contains directives for each remote mailbox to indicate (i) the $MOUNT parameter and (ii) the text to be written to the mounted device in order to start up the remote (slave) netmail program. 00846/015C NETMAIL EXTRAS SQ G W267:NETMAIL.XTRA 5.1T2 879 NETMAIL.EXTRAS.SQ.015 1 LINE 92 3 PAGE UM EADIE JULY 23, 1983 14:24:08 0 Contains a site name checking routine and grammar which will eventually be a part of *Userdirectory (821). 00846/016C NETMAIL MMDF SQ O W267:NETMAIL.MMDF 5.1T2 880 NETMAIL.MMDF.SQ.016 1 LINE 181 8 PAGE UM EADIE JULY 23, 1983 14:24:08 0 This subcomponent could replace XPORT.SQ (846/6) to implement the CSNET protocol called "PhoneNet". This code needs work in the error detection and correction areas. 00847/001C PROFORT FLECS SOURCE SF G S1223 TAXIR8 FSNAME=PROF.S 68 5.1T2 881 PROFORT.FLECS_SOURCE.SF.001 1 LINE 73 60 PAGE UM BRILL FEB. 10, 1983 13:49:54 0 Source for FLECS portion of PROFORT, the FORTRAN Execution Profiler. This should be processed by the FLECS preprocessor (673) and then compiled using FORTRAN-H (298) with PAR=XL. 0 Referenced by comments of: 847/3, 847/4 00847/002C PROFORT FLECS LISTING L G S1223 TAXIR8 FSNAME=PROF.F 69 5.1T2 882 PROFORT.FLECS_LISTING.L.002 1 LINE 121 97 PAGE UM BRILL FEB. 10, 1983 13:50:10 0 Indented listing of FLECS portion of PROFORT (output listing produced by FLECS). 1 SUN SEP 08/96 15:24:55 Page 708 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00847/003C PROFORT FLECS OBJECT 1 O G S1223 TAXIR8 FSNAME=PROF.O 70 5.1T2 883 PROFORT.FLECS_OBJECT_1.O.003 1 LINE 11324 35 PAGE UM BRILL FEB. 10, 1983 13:50:46 0 Object for most of FLECS portion of PROFORT, that is, object for (847/1), line number range 1 to 10700. 00847/004C PROFORT FLECS OBJECT 2 O G S1223 TAXIR8 FSNAME=PROFTNG.O 71 5.1T2 884 PROFORT.FLECS_OBJECT_2.O.004 1 LINE 472 1 PAGE UM BRILL FEB. 10, 1983 13:52:30 0 Object for balance of FLECS portion of PROFORT, that is, object for (847/1), line number range 11001 to 11400. 00847/005C PROFORT ASM SOURCE SA G S1223 TAXIR8 FSNAME=PROFASM.S 72 5.1T2 885 PROFORT.ASM_SOURCE.SA.005 1 LINE 72 7 PAGE UM BRILL FEB. 10, 1983 13:52:40 0 Source for assembler portion of PROFORT. 00847/006C PROFORT ASM OBJECT O G S1223 TAXIR8 FSNAME=PROFASM.O 73 5.1T2 886 PROFORT.ASM_OBJECT.O.006 1 LINE 1140 2 PAGE UM BRILL FEB. 10, 1983 13:52:50 0 Object for assembler portion of PROFORT. 00847/007C PROFORT *PROFORT OE G *PROFORT 5.1T2 887 PROFORT.?PROFORT.OE.007 1 SEQ 32767 30 PAGE UM BRILL JULY 23, 1983 14:25:23 *PROFORT 0 Linkedited object module for PROFORT. 00847/008C PROFORT MEMO 426 WF S0672 CCMEMO 'CCMEMOS' FSNAME=M426SOU 234 5.1T2 888 PROFORT.MEMO_426.WF.008 1 LINE 165 12 PAGE UM BRILL NOV. 18, 1981 14:35:34 0 This is UM Computing Center Memo 426, "*PROFORT - A FORTRAN Execution Profiler." 0 Referenced by comments of: 847/9 00847/009C PROFORT MEMO 426 PF S0672 CCMEMO 'CCMEMOS' FSNAME=M426OUT 233 5.1T2 889 PROFORT.MEMO_426.PF.009 1 LINE 135 13 PAGE UM BRILL NOV. 18, 1981 14:35:12 0 Printer-ready version of (847/8). Contains a $CONTINUE WITH UNSP:PGF record, which should be changed to $CONTINUE WITH *PGF (839/7). 00847/010C PROFORT INSTALL GUIDE P G S1223 TAXIR8 FSNAME=PROF.I 76 5.1T2 890 PROFORT.INSTALL_GUIDE.P.010 1 LINE 68 3 PAGE UM BRILL FEB. 10, 1983 13:53:38 0 Installation and maintenance guide for PROFORT. 00847/011C PROFORT PMF PROJECT D G S1223 TAXIR8 FSNAME=PROF.P 77 5.1T2 891 PROFORT.PMF_PROJECT.D.011 1 LINE 110 4 PAGE UM BRILL FEB. 10, 1983 13:53:45 0 PMF (810) project file for PROFORT. 1 SUN SEP 08/96 15:24:55 Page 709 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00847/012C PROFORT TEST DATA SF G S1223 TAXIR8 FSNAME=PROF.SAMPLE 78 5.1T2 892 PROFORT.TEST_DATA.SF.012 1 LINE 59 1 PAGE UM BRILL FEB. 10, 1983 13:54:00 0 Sample FORTRAN program to test PROFORT. 00848/001C MICRO COMM PGMS APPLE ASSEMBLE C G MCP:APPLE.ASSEMB 5.1T2 893 MICRO_COMM_PGMS.APPLE_ASS.C.001 1 LINE 91 1 PAGE UM HERSEY JULY 23, 1983 14:25:52 0 Component 848 is the Micro Communication Programs, or MCP, which were written at the University of Michigan for various microprocessors. These are propprietary programs for internal CC use only and are distributed under the following conditions: - The programs will be distributed to users only after a signed license agreement (see below) has been returned to UM. - The terms of the license agreement will be followed. ********************************************************************* D5.1 version: Unfortunately, our lawyers are still working on the license agreement, so we are sending all of these programs to all MTS installations. Until the license agreements are signed, we request that you do not distribute any MCP programs to users without obtaining permission from the UM Computing Center. We will send the agreements for you to sign as soon as our lawyers have them ready. ********************************************************************* ---------------------------------------------------------------------- This subcomponent contains a source file to assemble the APPLE MCP program, called "AMIE" (848/6). Contains $CONTINUE WITHs for many APPLE MCP subcomponents, (848/1) through (848/11), and many M650X MCP subcomponents, (848/122) through (848/138). Refers to *MCS650XASR (686/28). 0 Referenced by comments of: 844/53, 848/1, 848/9 00848/002C MICRO COMM PGMS APPLE CONSOLE SA O MCP:APPLE.CIO 5.1T2 894 MICRO_COMM_PGMS.APPLE_CON.SA.002 1 LINE 68 12 PAGE UM HERSEY JULY 23, 1983 14:25:52 0 Source for the APPLE hardware-specific console I/O routine for AMIE (848/6). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/003C MICRO COMM PGMS APPLE CP/M KEY SA B MCP:APPLE.CP/M.L 5.1T2 895 MICRO_COMM_PGMS.APPLE_CP/.SA.003 1 LINE 73 2 PAGE UM HERSEY JULY 23, 1983 14:25:53 0 APPLE CP/M lower case keyboard driver. To be assembled by itself and installed on CP/M system disk. 1 SUN SEP 08/96 15:24:55 Page 710 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/004C MICRO COMM PGMS APPLE DOC PF G MCP:APPLE.DOC 5.1T2 896 MICRO_COMM_PGMS.APPLE_DOC.PF.004 1 LINE 78 5 PAGE UM HERSEY JULY 23, 1983 14:25:54 0 Public APPLE MCP documentation. Will eventually be a CCMemo. 0 Referenced by comments of: 848/5 00848/005C MICRO COMM PGMS APPLE DOC WF G MCP:APPLE.DOC.S 5.1T2 897 MICRO_COMM_PGMS.APPLE_DOC.WF.005 1 LINE 70 4 PAGE UM HERSEY JULY 23, 1983 14:25:54 0 Source for APPLE.DOC (848/4). Contains commands at the beginning of the file for assembly. 00848/006C MICRO COMM PGMS APPLE AMIE O G MCP:APPLE.DOS 5.1T2 898 MICRO_COMM_PGMS.APPLE_AMI.O.006 1 LINE 65 13 PAGE UM HERSEY JULY 23, 1983 14:25:54 0 Object for APPLE DOS operating system MCP program, "AMIE". 0 Referenced by comments of: 848/1, 848/2 00848/007C MICRO COMM PGMS APPLE HRD DESC D G MCP:APPLE.HRD 5.1T2 899 MICRO_COMM_PGMS.APPLE_HRD.D.007 1 LINE 128 1 PAGE UM HERSEY JULY 23, 1983 14:25:55 0 APPLE Hardware description file. (HARDWARE) on distribution disks. 00848/008C MICRO COMM PGMS APPLE INIT O G MCP:APPLE.INIT 5.1T2 900 MICRO_COMM_PGMS.APPLE_INI.O.008 1 LINE 65 11 PAGE UM HERSEY JULY 23, 1983 14:25:55 0 APPLE hardware configuration program. (MCPINIT) object on distribution disks. 0 Referenced by comments of: 848/9 00848/009C MICRO COMM PGMS APPLE INIT ASM C G MCP:APPLE.INIT.S 5.1T2 901 MICRO_COMM_PGMS.APPLE_INI.C.009 1 LINE 92 1 PAGE UM HERSEY JULY 23, 1983 14:25:56 0 File containing MTS commands to assemble (848/8). Refers to *MCS650XASR (686/28). Contains $CONTINUE WITHs for some APPLE subcomponents, (848/1) through (848/11,) and some M650X subcomponents, (848/122) through (848/138). 00848/010C MICRO COMM PGMS APPLE I/O RTNS SA G MCP:APPLE.SYSTM 5.1T2 902 MICRO_COMM_PGMS.APPLE_I/O.SA.010 1 LINE 71 29 PAGE UM HERSEY JULY 23, 1983 14:25:56 0 Operating-system dependent I/O routines, which mostly do file I/O. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/011C MICRO COMM PGMS APPLE VRSN SA G MCP:APPLE.VRSN 5.1T2 903 MICRO_COMM_PGMS.APPLE_VRS.SA.011 1 LINE 85 1 PAGE UM HERSEY JULY 23, 1983 14:25:57 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 1 SUN SEP 08/96 15:24:55 Page 711 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 848/1 00848/012C MICRO COMM PGMS ATTNTRAP O G MCP:ATTNTRAP 5.1T2 904 MICRO_COMM_PGMS.ATTNTRAP.O.012 1 LINE 80 1 PAGE UM HERSEY JULY 23, 1983 14:25:57 0 Attention trap subroutine for MCP:COPY (848/17). 0 Referenced by comments of: 848/13, 848/20, 848/140 00848/013C MICRO COMM PGMS ATTNTRAP SA G MCP:ATTNTRAP.S 5.1T2 905 MICRO_COMM_PGMS.ATTNTRAP.SA.013 1 LINE 67 1 PAGE UM HERSEY JULY 23, 1983 14:25:58 0 Source for (848/12). Contains commands at the beginning of the file for assembly. 00848/014C MICRO COMM PGMS BIN2HEX O G MCP:BIN2HEX 5.1T2 906 MICRO_COMM_PGMS.BIN2HEX.O.014 1 LINE 80 2 PAGE UM HERSEY JULY 23, 1983 14:25:58 0 Converts BINARY file to INTEL HEX format. Has a $CONTINUE WITH *PASCALVSLIB (823/7) record. 0 Referenced by comments of: 848/16 00848/015C MICRO COMM PGMS BIN2HEX BAT C G MCP:BIN2HEX.BAT 5.1T2 907 MICRO_COMM_PGMS.BIN2HEX_B.C.015 1 LINE 96 1 PAGE UM HERSEY JULY 23, 1983 14:25:58 0 $SOURCE for COMPILE and LINK. Requires *PASCALVS; contains $CONTINUE WITH *PASCALVSLIB (823/7). References (848/47). 00848/016C MICRO COMM PGMS BIN2HEX PAS SW G MCP:BIN2HEX.PAS 5.1T2 908 MICRO_COMM_PGMS.BIN2HEX_P.SW.016 1 LINE 62 1 PAGE UM HERSEY JULY 23, 1983 14:25:58 0 This contains PASCAL/VS source for (848/14). 00848/017C MICRO COMM PGMS COPY O G MCP:COPY 5.1T2 909 MICRO_COMM_PGMS.COPY.O.017 1 LINE 10602 4 PAGE UM HERSEY JULY 23, 1983 14:25:58 0 MTS program run by %TELECOPY command. 0 Referenced by comments of: 848/12, 848/20, 848/139 00848/018C MICRO COMM PGMS COPY DOC PF G MCP:COPY.DOC 5.1T2 910 MICRO_COMM_PGMS.COPY_DOC.PF.018 1 LINE 78 7 PAGE UM HERSEY JULY 23, 1983 14:25:59 0 This is the documentation for MCP:COPY. It will eventually be a CCMemo. 00848/019C MICRO COMM PGMS COPY DOC WF G MCP:COPY.DOC.S 5.1T2 911 MICRO_COMM_PGMS.COPY_DOC.WF.019 1 LINE 79 6 PAGE UM HERSEY JULY 23, 1983 14:25:59 0 Source for MCP:COPY.DOC. Contains commands at the beginning of the file for assembly. 1 SUN SEP 08/96 15:24:55 Page 712 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/020C MICRO COMM PGMS COPY SOU SQ G MCP:COPY.S 5.1T2 912 MICRO_COMM_PGMS.COPY_SOU.SQ.020 1 LINE 74 12 PAGE UM HERSEY JULY 23, 1983 14:26:00 0 Source for (848/17). Contains commands at the beginning of the file for assembly. Has $CONTINUE WITH MCP:ATTNTRAP (848/12) record. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/021C MICRO COMM PGMS CP/M OBJ O G MCP:CP/M 5.1T2 913 MICRO_COMM_PGMS.CP/M_OBJ.O.021 1 LINE 59 13 PAGE UM HERSEY JULY 23, 1983 14:26:00 0 Referenced by comments of: 848/22, 848/28, 848/147 00848/022C MICRO COMM PGMS CP/M ASSEMBLE C G MCP:CP/M.ASSEMB 5.1T2 914 MICRO_COMM_PGMS.CP/M_ASSE.C.022 1 LINE 117 1 PAGE UM HERSEY JULY 23, 1983 14:26:01 0 $SOURCE file for assembling the CP/M operating system. Requires *Z80ASR (686/3) and COPY:I8080MACS (686/24). Contains $CONTINUE WITHs for various CP/M MCP subcomponents, (848/21) through (848/68), and various I8080 MCP subcomponents, (848/51) through (848/68). 00848/023C MICRO COMM PGMS CP/M DOC PF G MCP:CP/M.DOC 5.1T2 915 MICRO_COMM_PGMS.CP/M_DOC.PF.023 1 LINE 78 10 PAGE UM HERSEY JULY 23, 1983 14:26:01 0 Public CP/M documentation. Will eventually be a CCMemo. 0 Referenced by comments of: 848/24 00848/024C MICRO COMM PGMS CP/M DOC WF G MCP:CP/M.DOC.S 5.1T2 916 MICRO_COMM_PGMS.CP/M_DOC.WF.024 1 LINE 71 9 PAGE UM HERSEY JULY 23, 1983 14:26:01 0 Source for public CP/M documentation (848/23). Contains commands at the beginning of the file for assembly. 00848/025C MICRO COMM PGMS CP/M FLOPPY C G MCP:CP/M.FLOPPY 5.1T2 917 MICRO_COMM_PGMS.CP/M_FLOP.C.025 1 LINE 67 1 PAGE UM HERSEY JULY 23, 1983 14:26:02 0 Commands to generate an 8" CP/M MCP distribution floppy disk. Requires FLOP:FLOPPY (822/4). 00848/026C MICRO COMM PGMS CP/M HARD DESC D G MCP:CP/M.HRD 5.1T2 918 MICRO_COMM_PGMS.CP/M_HARD.D.026 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:26:02 0 Hardware description file for the CP/M operating system. 00848/027C MICRO COMM PGMS CP/M INIT O G MCP:CP/M.INIT 5.1T2 919 MICRO_COMM_PGMS.CP/M_INIT.O.027 1 LINE 59 6 PAGE UM HERSEY JULY 23, 1983 14:26:03 0 CP/M hardware configuration program object. 0 Referenced by comments of: 848/28 1 SUN SEP 08/96 15:24:55 Page 713 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/028C MICRO COMM PGMS CP/M INIT.AS C G MCP:CP/M.INIT.AS 5.1T2 920 MICRO_COMM_PGMS.CP/M_INIT.C.028 1 LINE 127 1 PAGE UM HERSEY JULY 23, 1983 14:26:03 0 $SOURCE file for assembling the CP/M INIT program (848/27). Requires *Z80ASR (686/3) and COPY:I8080MACS (686/24). Contains $CONTINUE WITHs for various CP/M MCP subcomponents, (848/21) through (848/68), and various I8080 MCP subcomponents, (848/51) through (848/68). 00848/029C MICRO COMM PGMS CP/M KEY DEF D G MCP:CP/M.KEY 5.1T2 921 MICRO_COMM_PGMS.CP/M_KEY.D.029 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:26:03 0 File containing the keyboard function definition data for CP/M. 00848/030C MICRO COMM PGMS CP/M SERIAL IO SA G MCP:CP/M.SIO 5.1T2 922 MICRO_COMM_PGMS.CP/M_SERI.SA.030 1 LINE 72 4 PAGE UM HERSEY JULY 23, 1983 14:26:03 0 Serial I/O CP/M-specific routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/031C MICRO COMM PGMS CP/M I/O RTNS SA G MCP:CP/M.SYSTM 5.1T2 923 MICRO_COMM_PGMS.CP/M_I/O.SA.031 1 LINE 68 1 PAGE UM HERSEY JULY 23, 1983 14:26:04 0 Operating system dependent I/O routines. Has $CONTINUE WITHs to MCP:CP/M.S1 (848/32), MCP:CP/M.S2 (848/33), and MCP:CP/M.S3 (848/34). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/032C MICRO COMM PGMS CP/M I/O RTNS SA G MCP:CP/M.S1 5.1T2 924 MICRO_COMM_PGMS.CP/M_I/O.SA.032 1 LINE 68 1 PAGE UM HERSEY JULY 23, 1983 14:26:04 0 Operating system dependent I/O routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/31, 848/36, 848/149 00848/033C MICRO COMM PGMS CP/M I/O RTNS SA G MCP:CP/M.S2 5.1T2 925 MICRO_COMM_PGMS.CP/M_I/O.SA.033 1 LINE 68 4 PAGE UM HERSEY JULY 23, 1983 14:26:04 0 Operating system dependent I/O routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/31, 848/36, 848/149 00848/034C MICRO COMM PGMS CP/M I/O RTNS SA G MCP:CP/M.S3 5.1T2 926 MICRO_COMM_PGMS.CP/M_I/O.SA.034 1 LINE 76 12 PAGE UM HERSEY JULY 23, 1983 14:26:04 0 Operating system dependent I/O routines. 1 SUN SEP 08/96 15:24:55 Page 714 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/31, 848/36, 848/149 00848/035C MICRO COMM PGMS CP/M VRSN SA G MCP:CP/M.VRSN 5.1T2 927 MICRO_COMM_PGMS.CP/M_VRSN.SA.035 1 LINE 68 1 PAGE UM HERSEY JULY 23, 1983 14:26:05 0 Source containing CP/M version date and heading. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/036C MICRO COMM PGMS CP/M Z80 SERIO SA G MCP:CP/M.Z80SIO 5.1T2 928 MICRO_COMM_PGMS.CP/M_Z80.SA.036 1 LINE 67 5 PAGE UM HERSEY JULY 23, 1983 14:26:06 0 Serial I/O Z80-specific routines. Has $CONTINUE WITHs to MCP:CP/M.S1 (848/32), MCP:CP/M.S2 (848/33), and MCP:CP/M.S3 (848/34). Provided to users as an example. 00848/037C MICRO COMM PGMS DOCUMENT PF G MCP:DOCUMENT 5.1T2 929 MICRO_COMM_PGMS.DOCUMENT.PF.037 1 LINE 70 11 PAGE UM HERSEY JULY 23, 1983 14:26:06 0 Documents the MCP protocol. 0 Referenced by comments of: 848/38 00848/038C MICRO COMM PGMS DOCUMENT WF G MCP:DOCUMENT.S 5.1T2 930 MICRO_COMM_PGMS.DOCUMENT.WF.038 1 LINE 69 9 PAGE UM HERSEY JULY 23, 1983 14:26:06 0 Source for (848/37). Contains commands at the beginning of the file for assembly. 00848/039C MICRO COMM PGMS EXAMPLE PF G MCP:EXAMPLE 5.1T2 931 MICRO_COMM_PGMS.EXAMPLE.PF.039 1 LINE 135 13 PAGE UM HERSEY JULY 23, 1983 14:26:07 0 Example conversations. 0 Referenced by comments of: 848/40 00848/040C MICRO COMM PGMS EXAMPLE WF G MCP:EXAMPLE.S 5.1T2 932 MICRO_COMM_PGMS.EXAMPLE.WF.040 1 LINE 107 4 PAGE UM HERSEY JULY 23, 1983 14:26:08 0 *FORMAT source for (848/39). Contains commands at the beginning of the file for assembly. 00848/041C MICRO COMM PGMS FMT LIB WF G MCP:FMT.LIB 5.1T2 933 MICRO_COMM_PGMS.FMT_LIB.WF.041 1 LINE 84 24 PAGE UM HERSEY JULY 23, 1983 14:26:08 0 FORMAT macros for the various MCP documents. 1 SUN SEP 08/96 15:24:55 Page 715 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/042C MICRO COMM PGMS FMT MEMO MED WF G MCP:FMT.MEMO.M 5.1T2 934 MICRO_COMM_PGMS.FMT_MEMO.WF.042 1 LINE 90 3 PAGE UM HERSEY JULY 23, 1983 14:26:09 0 FORMAT macros for the various MCP documents. 00848/043C MICRO COMM PGMS FMT MEMO SHORT WF G MCP:FMT.MEMO.S 5.1T2 935 MICRO_COMM_PGMS.FMT_MEMO.WF.043 1 LINE 90 3 PAGE UM HERSEY JULY 23, 1983 14:26:10 0 FORMAT macros for the various MCP documents. 0 Referenced by comments of: 848/196 00848/044C MICRO COMM PGMS HUFFIN SW G MCP:HUFFIN 5.1T2 936 MICRO_COMM_PGMS.HUFFIN.SW.044 1 LINE 252 3 PAGE UM HERSEY JULY 23, 1983 14:26:10 0 Public domain program for APPLE DOS to/from Pascal P-system. 00848/045C MICRO COMM PGMS IBMPC BIOS O G MCP:IBMPC.BIOS 5.1T2 937 MICRO_COMM_PGMS.IBMPC_BIO.O.045 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:26:10 0 Interrupt driven serial I/O driver for IBM PC. 00848/046C MICRO COMM PGMS IBMPC CONSOLE SA G MCP:IBMPC.CIO 5.1T2 938 MICRO_COMM_PGMS.IBMPC_CON.SA.046 1 LINE 75 3 PAGE UM HERSEY JULY 23, 1983 14:26:10 0 IBM PC console I/O. 00848/047C MICRO COMM PGMS IBMPC DOS O G MCP:IBMPC.DOS 5.1T2 939 MICRO_COMM_PGMS.IBMPC_DOS.O.047 1 LINE 225 15 PAGE UM HERSEY JULY 23, 1983 14:26:11 0 Object for the IBM PC DOS operating system, "WINDOW". 0 Referenced by comments of: 848/15 00848/048C MICRO COMM PGMS IBMPC HARD D G MCP:IBMPC.HRD 5.1T2 940 MICRO_COMM_PGMS.IBMPC_HAR.D.048 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:26:11 0 Hardware description file for the IBM PC. 00848/049C MICRO COMM PGMS IBMPC KEY D G MCP:IBMPC.KEY 5.1T2 941 MICRO_COMM_PGMS.IBMPC_KEY.D.049 1 LINE 225 3 PAGE UM HERSEY JULY 23, 1983 14:26:12 0 IBM PC Keyboard function definition data file. 00848/050C MICRO COMM PGMS IBMPC LNK RESP C G MCP:IBMPC.LNK 5.1T2 942 MICRO_COMM_PGMS.IBMPC_LNK.C.050 1 LINE 11 1 PAGE UM HERSEY JULY 23, 1983 14:26:12 0 IBM PC linker response data file. 00848/051C MICRO COMM PGMS I8080 CONSTANT SA G MCP:I8080.CONSTA 5.1T2 943 MICRO_COMM_PGMS.I8080_CON.SA.051 1 LINE 69 5 PAGE UM HERSEY JULY 23, 1983 14:26:12 0 Constant declarations for I8080 progams. 1 SUN SEP 08/96 15:24:55 Page 716 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/22, 848/28, 848/147, 848/183, 848/184 00848/052C MICRO COMM PGMS I8080 CONVRS SA G MCP:I8080.CONVRS 5.1T2 944 MICRO_COMM_PGMS.I8080_CON.SA.052 1 LINE 69 16 PAGE UM HERSEY JULY 23, 1983 14:26:13 0 I8080 conversation buffer management routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/053C MICRO COMM PGMS I8080 DISK SA G MCP:I8080.DISK 5.1T2 945 MICRO_COMM_PGMS.I8080_DIS.SA.053 1 LINE 68 11 PAGE UM HERSEY JULY 23, 1983 14:26:13 0 I8080 disk file copy routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/054C MICRO COMM PGMS I8080 DOC PF G MCP:I8080.DOC 5.1T2 946 MICRO_COMM_PGMS.I8080_DOC.PF.054 1 LINE 79 9 PAGE UM HERSEY JULY 23, 1983 14:26:14 0 MCP I8080 public documentation. This is the printer-ready output. Will eventually be a CCMemo. 00848/055C MICRO COMM PGMS I8080 DOC WF G MCP:I8080.DOC.S 5.1T2 947 MICRO_COMM_PGMS.I8080_DOC.WF.055 1 LINE 79 9 PAGE UM HERSEY JULY 23, 1983 14:26:14 0 FORMAT source for I8080 public documentation. Contains commands at the beginning of the file for assembly. 00848/056C MICRO COMM PGMS I8080 INIT SA G MCP:I8080.INIT 5.1T2 948 MICRO_COMM_PGMS.I8080_INI.SA.056 1 LINE 77 17 PAGE UM HERSEY JULY 23, 1983 14:26:15 0 Source for the I8080 hardware configuration program. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/057C MICRO COMM PGMS I8080 INSIDE WF G MCP:I8080.INSIDE 5.1T2 949 MICRO_COMM_PGMS.I8080_INS.WF.057 1 LINE 69 10 PAGE UM HERSEY JULY 23, 1983 14:26:16 0 Description of machine/operating system dependent routines required by I8080 MCP program -- similar requirements for other MCP programs. 00848/058C MICRO COMM PGMS I8080 I/O UTIL SA G MCP:I8080.IOUTIL 5.1T2 950 MICRO_COMM_PGMS.I8080_I/O.SA.058 1 LINE 68 9 PAGE UM HERSEY JULY 23, 1983 14:26:16 0 I8080 utility routines for serial I/O, called by routines in I8080.SIO (848/64). This source file is copyrighted. Please do not redistribute to any third 1 SUN SEP 08/96 15:24:55 Page 717 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 party without the permission of the University of Michigan. 0 Referenced by comments of: 848/184 00848/059C MICRO COMM PGMS I8080 KEYBRD SA G MCP:I8080.KEYBRD 5.1T2 951 MICRO_COMM_PGMS.I8080_KEY.SA.059 1 LINE 72 16 PAGE UM HERSEY JULY 23, 1983 14:26:17 0 I8080 keyboard routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/060C MICRO COMM PGMS I8080 MCP SA G MCP:I8080.MCP 5.1T2 952 MICRO_COMM_PGMS.I8080_MCP.SA.060 1 LINE 68 26 PAGE UM HERSEY JULY 23, 1983 14:26:17 0 I8080 MCP protocol routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/061C MICRO COMM PGMS I8080 PARSER SA G MCP:I8080.PARSE 5.1T2 953 MICRO_COMM_PGMS.I8080_PAR.SA.061 1 LINE 68 5 PAGE UM HERSEY JULY 23, 1983 14:26:19 0 I8080 command parse utility subroutines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/062C MICRO COMM PGMS I8080 PERMIT C G MCP:I8080.PERMIT 5.1T2 954 MICRO_COMM_PGMS.I8080_PER.C.062 1 LINE 34 1 PAGE UM HERSEY JULY 23, 1983 14:26:19 0 Command file for permitting access to I8080 source files. 00848/063C MICRO COMM PGMS I8080 POLL SA G MCP:I8080.POLL 5.1T2 955 MICRO_COMM_PGMS.I8080_POL.SA.063 1 LINE 68 3 PAGE UM HERSEY JULY 23, 1983 14:26:19 0 High-level I8080 polling routines (main program). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/064C MICRO COMM PGMS I8080 SERIAL SA G MCP:I8080.SIO 5.1T2 956 MICRO_COMM_PGMS.I8080_SER.SA.064 1 LINE 75 27 PAGE UM HERSEY JULY 23, 1983 14:26:20 0 Serial I/O I8080-specific routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/58 1 SUN SEP 08/96 15:24:55 Page 718 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/065C MICRO COMM PGMS I8080 STATS SA G MCP:I8080.STATS 5.1T2 957 MICRO_COMM_PGMS.I8080_STA.SA.065 1 LINE 68 5 PAGE UM HERSEY JULY 23, 1983 14:26:21 0 I8080 statistics printing routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/066C MICRO COMM PGMS I8080 TELEPRNT SA G MCP:I8080.TLPRNT 5.1T2 958 MICRO_COMM_PGMS.I8080_TEL.SA.066 1 LINE 70 7 PAGE UM HERSEY JULY 23, 1983 14:26:21 0 Teleprinter routines. Machine -independent console I/O for line-oriented terminals. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/067C MICRO COMM PGMS I8080 UTIL SA G MCP:I8080.UTIL 5.1T2 959 MICRO_COMM_PGMS.I8080_UTI.SA.067 1 LINE 68 13 PAGE UM HERSEY JULY 23, 1983 14:26:22 0 I8080 low-level utility routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/068C MICRO COMM PGMS I8080 VARS SA G MCP:I8080.VARS 5.1T2 960 MICRO_COMM_PGMS.I8080_VAR.SA.068 1 LINE 68 13 PAGE UM HERSEY JULY 23, 1983 14:26:23 0 Variable descriptions for I8080 programs. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/22, 848/28, 848/147, 848/183 00848/069C MICRO COMM PGMS I8086 BIOS SA G MCP:I8086.BIOS 5.1T2 961 MICRO_COMM_PGMS.I8086_BIO.SA.069 1 LINE 77 8 PAGE UM HERSEY JULY 23, 1983 14:26:23 0 Example serial I/O bios for WINDOW (source). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/112 00848/070C MICRO COMM PGMS I8086 CHARS SA G MCP:I8086.CHARS 5.1T2 962 MICRO_COMM_PGMS.I8086_CHA.SA.070 1 LINE 68 1 PAGE UM HERSEY JULY 23, 1983 14:26:24 0 Character name EQUATES for I8086 programs. 00848/071C MICRO COMM PGMS I8086 CMD PRS SA G MCP:I8086.CMD 5.1T2 963 MICRO_COMM_PGMS.I8086_CMD.SA.071 1 LINE 78 6 PAGE UM HERSEY JULY 23, 1983 14:26:24 0 I8086 command parsing tables. 1 SUN SEP 08/96 15:24:55 Page 719 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/072C MICRO COMM PGMS I8086 CONSTANT SA G MCP:I8086.CONSTA 5.1T2 964 MICRO_COMM_PGMS.I8086_CON.SA.072 1 LINE 74 4 PAGE UM HERSEY JULY 23, 1983 14:26:24 0 Constant declarations for I8086 programs. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/073C MICRO COMM PGMS I8086 CONVRS SA G MCP:I8086.CONVRS 5.1T2 965 MICRO_COMM_PGMS.I8086_CON.SA.073 1 LINE 77 6 PAGE UM HERSEY JULY 23, 1983 14:26:25 0 Conversation buffer management routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/074C MICRO COMM PGMS I8086 DISK SA G MCP:I8086.DISK 5.1T2 966 MICRO_COMM_PGMS.I8086_DIS.SA.074 1 LINE 71 7 PAGE UM HERSEY JULY 23, 1983 14:26:25 0 I8086 disk file copy routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/075C MICRO COMM PGMS I8086 DOC PF G MCP:I8086.DOC 5.1T2 967 MICRO_COMM_PGMS.I8086_DOC.PF.075 1 LINE 72 51 PAGE UM HERSEY JULY 23, 1983 14:26:26 0 Printer-ready output for I8086 public documentation. Will eventually be a CCMemo. 00848/076C MICRO COMM PGMS I8086 DOC WF G MCP:I8086.DOC.S 5.1T2 968 MICRO_COMM_PGMS.I8086_DOC.WF.076 1 LINE 84 25 PAGE UM HERSEY JULY 23, 1983 14:26:28 0 FORMAT source for I8086 documentation. Contains commands at the beginning of the file for assembly. 00848/077C MICRO COMM PGMS I8086 INFO SA G MCP:I8086.INFO 5.1T2 969 MICRO_COMM_PGMS.I8086_INF.SA.077 1 LINE 71 7 PAGE UM HERSEY JULY 23, 1983 14:26:29 0 Routines to print the I8086 HELP information. Information comes from program internal tables. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/078C MICRO COMM PGMS I8086 INIT SA G MCP:I8086.INIT 5.1T2 970 MICRO_COMM_PGMS.I8086_INI.SA.078 1 LINE 127 18 PAGE UM HERSEY JULY 23, 1983 14:26:30 0 Source for the I8086 hardware configuration program. 1 SUN SEP 08/96 15:24:55 Page 720 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/079C MICRO COMM PGMS I8086 KEYBRD SA G MCP:I8086.KEYBRD 5.1T2 971 MICRO_COMM_PGMS.I8086_KEY.SA.079 1 LINE 101 8 PAGE UM HERSEY JULY 23, 1983 14:26:31 0 I8086 keyboard routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/080C MICRO COMM PGMS I8086 MACROS SA G MCP:I8086.MACROS 5.1T2 972 MICRO_COMM_PGMS.I8086_MAC.SA.080 1 LINE 75 3 PAGE UM HERSEY JULY 23, 1983 14:26:31 0 Structured macros. 00848/081C MICRO COMM PGMS I8086 MCP SA G MCP:I8086.MCP 5.1T2 973 MICRO_COMM_PGMS.I8086_MCP.SA.081 1 LINE 77 10 PAGE UM HERSEY JULY 23, 1983 14:26:31 0 I8086 MCP protocol routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/082C MICRO COMM PGMS I8086 PARSE SA G MCP:I8086.PARSE 5.1T2 974 MICRO_COMM_PGMS.I8086_PAR.SA.082 1 LINE 72 6 PAGE UM HERSEY JULY 23, 1983 14:26:32 0 I8086 command parse utility subroutines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/083C MICRO COMM PGMS I8086 PFS SA G MCP:I8086.PFS 5.1T2 975 MICRO_COMM_PGMS.I8086_PFS.SA.083 1 LINE 78 20 PAGE UM HERSEY JULY 23, 1983 14:26:32 0 I8086 function key semantic routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/084C MICRO COMM PGMS I8086 POLL SA G MCP:I8086.POLL 5.1T2 976 MICRO_COMM_PGMS.I8086_POL.SA.084 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:34 0 I8086 high-level polling routines (main program). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/085C MICRO COMM PGMS I8086 ROUTER SA G MCP:I8086.ROUTER 5.1T2 977 MICRO_COMM_PGMS.I8086_ROU.SA.085 1 LINE 78 6 PAGE UM HERSEY JULY 23, 1983 14:26:34 0 I8086 routines to route messages from host to various processes. This source file is copyrighted. Please do not redistribute to any third 1 SUN SEP 08/96 15:24:55 Page 721 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 party without the permission of the University of Michigan. 00848/086C MICRO COMM PGMS I8086 SCREEN SA G MCP:I8086.SCREEN 5.1T2 978 MICRO_COMM_PGMS.I8086_SCR.SA.086 1 LINE 78 6 PAGE UM HERSEY JULY 23, 1983 14:26:35 0 Teleprinter routines. Machine-independent console I/O for full-screen oriented terminals. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/087C MICRO COMM PGMS I8086 SIO SA G MCP:I8086.SIO 5.1T2 979 MICRO_COMM_PGMS.I8086_SIO.SA.087 1 LINE 78 14 PAGE UM HERSEY JULY 23, 1983 14:26:35 0 Serial-I/O I8086-specific routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/088C MICRO COMM PGMS I8086 DATA RAT SA G MCP:I8086.8253 5.1T2 980 MICRO_COMM_PGMS.I8086_DAT.SA.088 1 LINE 75 1 PAGE UM HERSEY JULY 23, 1983 14:26:36 0 Data rate divisor chip routine for Intel 8253. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/108 00848/089C MICRO COMM PGMS I8086 DATA RAT SA G MCP:I8086.1941 5.1T2 981 MICRO_COMM_PGMS.I8086_DAT.SA.089 1 LINE 71 1 PAGE UM HERSEY JULY 23, 1983 14:26:36 0 Data rate divisor chip routine for Western Digital 1941. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/090C MICRO COMM PGMS I8086 DATA RAT SA G MCP:I8086.X16 5.1T2 982 MICRO_COMM_PGMS.I8086_DAT.SA.090 1 LINE 71 1 PAGE UM HERSEY JULY 23, 1983 14:26:37 0 Data rate divisor chip routine for no divisor chip. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/091C MICRO COMM PGMS I8086 DATA RAT SA G MCP:I8086.ZCTC 5.1T2 983 MICRO_COMM_PGMS.I8086_DAT.SA.091 1 LINE 71 1 PAGE UM HERSEY JULY 23, 1983 14:26:37 0 Data rate divisor chip routine for Zilog Z80CTC. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 1 SUN SEP 08/96 15:24:55 Page 722 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/092C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.2661 5.1T2 984 MICRO_COMM_PGMS.I8086_SIO.SA.092 1 LINE 78 4 PAGE UM HERSEY JULY 23, 1983 14:26:37 0 Serial I/O chip routines for: Synertek 2651 PCI and Motorola 2661 EPCI. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/093C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.6551 5.1T2 985 MICRO_COMM_PGMS.I8086_SIO.SA.093 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:38 0 Serial I/O chip routines for Synertek 6551. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/094C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.6850 5.1T2 986 MICRO_COMM_PGMS.I8086_SIO.SA.094 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:38 0 Serial I/O chip routines for Motorola 6850 ACIA. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/095C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.8250 5.1T2 987 MICRO_COMM_PGMS.I8086_SIO.SA.095 1 LINE 78 3 PAGE UM HERSEY JULY 23, 1983 14:26:39 0 Serial I/O chip routines for INS 8250. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/096C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.8251 5.1T2 988 MICRO_COMM_PGMS.I8086_SIO.SA.096 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:39 0 Serial I/O chip routines for 8251. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/097C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.8530 5.1T2 989 MICRO_COMM_PGMS.I8086_SIO.SA.097 1 LINE 78 3 PAGE UM HERSEY JULY 23, 1983 14:26:40 0 Serial I/O chip routines for Zilog 8530. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/098C MICRO COMM PGMS I8086 SIO CHIP SA G MCP:I8086.ZSIO 5.1T2 990 MICRO_COMM_PGMS.I8086_SIO.SA.098 1 LINE 78 3 PAGE UM HERSEY JULY 23, 1983 14:26:40 0 Serial I/O chip routines for Zilog Z80SIO. 1 SUN SEP 08/96 15:24:55 Page 723 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/099C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.AM3H 5.1T2 991 MICRO_COMM_PGMS.I8086_SIO.SA.099 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:41 0 Serial I/O board routines for Alpha Micro 300. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/100C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.CAT2 5.1T2 992 MICRO_COMM_PGMS.I8086_SIO.SA.100 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:41 0 Serial I/O board routines for Apple CAT II. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/101C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.DJOK 5.1T2 993 MICRO_COMM_PGMS.I8086_SIO.SA.101 1 LINE 71 2 PAGE UM HERSEY JULY 23, 1983 14:26:42 0 Serial I/O board routines for Morrow Disk Jockey. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/102C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.DSPW 5.1T2 994 MICRO_COMM_PGMS.I8086_SIO.SA.102 1 LINE 76 3 PAGE UM HERSEY JULY 23, 1983 14:26:42 0 Serial I/O board routines for IBM DisplayWriter. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/103C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.MDSW 5.1T2 995 MICRO_COMM_PGMS.I8086_SIO.SA.103 1 LINE 78 3 PAGE UM HERSEY JULY 23, 1983 14:26:43 0 Serial I/O board routines for Morrow Designs Switch Board. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/104C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.PMMI 5.1T2 996 MICRO_COMM_PGMS.I8086_SIO.SA.104 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:43 0 Serial I/O board routines for PMMI-300. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 1 SUN SEP 08/96 15:24:55 Page 724 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/105C MICRO COMM PGMS I8086 SIO BDS SA G MCP:I8086.TURT 5.1T2 997 MICRO_COMM_PGMS.I8086_SIO.SA.105 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:44 0 Serial I/O board routines for Cromeco Tuart. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/106C MICRO COMM PGMS I8086 SPEC SIO SA G MCP:I8086.CSTM 5.1T2 998 MICRO_COMM_PGMS.I8086_SPE.SA.106 1 LINE 71 3 PAGE UM HERSEY JULY 23, 1983 14:26:44 0 Serial I/O board routines for Custom Serial I/O. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/107C MICRO COMM PGMS I8086 SPEC SIO SA G MCP:I8086.MDOS 5.1T2 999 MICRO_COMM_PGMS.I8086_SPE.SA.107 1 LINE 78 3 PAGE UM HERSEY JULY 23, 1983 14:26:45 0 Serial I/O board routines for MSDOS 2.0 COMn:. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/108 00848/108C MICRO COMM PGMS I8086 SIO OL G MCP:I8086.SIOLIB 5.1T2 1000 MICRO_COMM_PGMS.I8086_SIO.OL.108 1 LINE 64 9 PAGE UM HERSEY JULY 23, 1983 14:26:45 0 Serial I/O - chip dependent routines (MS-LIB library). Object of (848/88) through (848/107). 00848/109C MICRO COMM PGMS I8086 UTIL SA G MCP:I8086.UTIL 5.1T2 1001 MICRO_COMM_PGMS.I8086_UTI.SA.109 1 LINE 71 5 PAGE UM HERSEY JULY 23, 1983 14:26:46 0 Low level I8086 utility routines. 0 Referenced by comments of: 848/112 00848/110C MICRO COMM PGMS I8086 VBLD SA O MCP:I8086.VBLD 5.1T2 1002 MICRO_COMM_PGMS.I8086_VBL.SA.110 1 LINE 98 13 PAGE UM HERSEY JULY 23, 1983 14:26:46 0 Visual mode data structure builder and keyboard handler routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/111C MICRO COMM PGMS I8086 VSCRN SA G MCP:I8086.VSCRN 5.1T2 1003 MICRO_COMM_PGMS.I8086_VSC.SA.111 1 LINE 77 4 PAGE UM HERSEY JULY 23, 1983 14:26:47 0 Visual mode screen handler routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 1 SUN SEP 08/96 15:24:55 Page 725 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/112C MICRO COMM PGMS MSDOS ASSEMBLE C G MCP:MSDOS.ASSEMB 5.1T2 1004 MICRO_COMM_PGMS.MSDOS_ASS.C.112 1 LINE 56 1 PAGE UM HERSEY JULY 23, 1983 14:26:48 0 File containing MTS commands to be sourced to in order to assemble the current version of the MSDOS MCP routines. Contains $CONTINUE WITHs for many I8086 MCP subcomponents, (848/69) through (848/109), and MSDOS MCP subcomponents, (848/112) through (848/121). 0 Referenced by comments of: 848/112 00848/113C MICRO COMM PGMS MSDOS CONSOLE SA G MCP:MSDOS.CIO 5.1T2 1005 MICRO_COMM_PGMS.MSDOS_CON.SA.113 1 LINE 77 4 PAGE UM HERSEY JULY 23, 1983 14:26:48 0 MSDOS console I/O routines for CRT console version of WINDOW. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/114 00848/114C MICRO COMM PGMS MSDOS CRT O G MCP:MSDOS.CRT 5.1T2 1006 MICRO_COMM_PGMS.MSDOS_CRT.O.114 1 LINE 225 16 PAGE UM HERSEY JULY 23, 1983 14:26:49 0 CRT console version of WINDOW. Object of (848/113). 00848/115C MICRO COMM PGMS MSDOS DOC PF G MCP:MSDOS.DOC 5.1T2 1007 MICRO_COMM_PGMS.MSDOS_DOC.PF.115 1 LINE 78 9 PAGE UM HERSEY JULY 23, 1983 14:26:49 0 Printer-ready MSDOS public documentation. Will eventually be a CCMemo. 00848/116C MICRO COMM PGMS MSDOS DOC WF G MCP:MSDOS.DOC.S 5.1T2 1008 MICRO_COMM_PGMS.MSDOS_DOC.WF.116 1 LINE 68 9 PAGE UM HERSEY JULY 23, 1983 14:26:50 0 FORMAT source for MSDOS public documentation. Contains commands at the beginning of the file for assembly. 00848/117C MICRO COMM PGMS MSDOS HARD D G MCP:MSDOS.HRD 5.1T2 1009 MICRO_COMM_PGMS.MSDOS_HAR.D.117 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:26:50 0 MSDOS hardware description file. 00848/118C MICRO COMM PGMS MSDOS INIT O G MCP:MSDOS.INIT 5.1T2 1010 MICRO_COMM_PGMS.MSDOS_INI.O.118 1 LINE 225 4 PAGE UM HERSEY JULY 23, 1983 14:26:51 0 Object for MSDOS hardware configuration program. 00848/119C MICRO COMM PGMS MSDOS KEY FUNC D G MCP:MSDOS.KEY 5.1T2 1011 MICRO_COMM_PGMS.MSDOS_KEY.D.119 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:26:51 0 MSDOS keyboard function definition data file. 1 SUN SEP 08/96 15:24:55 Page 726 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/120C MICRO COMM PGMS MSDOS MLB SA G MCP:MSDOS.MLB 5.1T2 1012 MICRO_COMM_PGMS.MSDOS_MLB.SA.120 1 LINE 70 3 PAGE UM HERSEY JULY 23, 1983 14:26:51 0 I8086 constants relating to MSDOS operating system calls. 00848/121C MICRO COMM PGMS MSDOS I/O RTNS SA G MCP:MSDOS.SYSTM 5.1T2 1013 MICRO_COMM_PGMS.MSDOS_I/O.SA.121 1 LINE 105 10 PAGE UM HERSEY JULY 23, 1983 14:26:52 0 Operating-system dependent I/O routines, mostly for file I/O. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/112 00848/122C MICRO COMM PGMS M650X CONSTANT SA G MCP:M650X.CONSTA 5.1T2 1014 MICRO_COMM_PGMS.M650X_CON.SA.122 1 LINE 71 5 PAGE UM HERSEY JULY 23, 1983 14:26:52 0 Constant declarations for M650X programs. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/1, 848/9 00848/123C MICRO COMM PGMS M650X CONVRS SA G MCP:M650X.CONVRS 5.1T2 1015 MICRO_COMM_PGMS.M650X_CON.SA.123 1 LINE 68 5 PAGE UM HERSEY JULY 23, 1983 14:26:53 0 M650X conversation buffer management routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/124C MICRO COMM PGMS M650X DISK SA G MCP:M650X.DISK 5.1T2 1016 MICRO_COMM_PGMS.M650X_DIS.SA.124 1 LINE 68 7 PAGE UM HERSEY JULY 23, 1983 14:26:53 0 M650X disk file copy routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/125C MICRO COMM PGMS M650X DOC PF G MCP:M650X.DOC 5.1T2 1017 MICRO_COMM_PGMS.M650X_DOC.PF.125 1 LINE 78 10 PAGE UM HERSEY JULY 23, 1983 14:26:54 0 Printer-ready version of M650X public documentation. Will eventually be a CCMemo. 00848/126C MICRO COMM PGMS M650X DOC WF G MCP:M650X.DOC.S 5.1T2 1018 MICRO_COMM_PGMS.M650X_DOC.WF.126 1 LINE 68 9 PAGE UM HERSEY JULY 23, 1983 14:26:54 0 FORMAT source for M650X public documentation. Contains commands at the beginning of the file for assembly. 1 SUN SEP 08/96 15:24:55 Page 727 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/127C MICRO COMM PGMS M650X INIT SA G MCP:M650X.INIT 5.1T2 1019 MICRO_COMM_PGMS.M650X_INI.SA.127 1 LINE 77 27 PAGE UM HERSEY JULY 23, 1983 14:26:55 0 Source for M650X hardware configuration program. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/128C MICRO COMM PGMS M650X I/O UTIL SA G MCP:M650X.IOUTIL 5.1T2 1020 MICRO_COMM_PGMS.M650X_I/O.SA.128 1 LINE 70 5 PAGE UM HERSEY JULY 23, 1983 14:26:56 0 M650X utility routines for serial I/O. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/129C MICRO COMM PGMS M650X KEYBRD SA G MCP:M650X.KEYBRD 5.1T2 1021 MICRO_COMM_PGMS.M650X_KEY.SA.129 1 LINE 75 19 PAGE UM HERSEY JULY 23, 1983 14:26:57 0 M650X keyboard routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/130C MICRO COMM PGMS M650X LOADER SA G MCP:M650X.LOADER 5.1T2 1022 MICRO_COMM_PGMS.M650X_LOA.SA.130 1 LINE 68 3 PAGE UM HERSEY JULY 23, 1983 14:26:57 0 MCP source routines. M650X converts INTEL hex into APPLE binary. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/131C MICRO COMM PGMS M650X MCP SA G MCP:M650X.MCP 5.1T2 1023 MICRO_COMM_PGMS.M650X_MCP.SA.131 1 LINE 68 17 PAGE UM HERSEY JULY 23, 1983 14:26:58 0 MCP M650X prototype routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/132C MICRO COMM PGMS M650X PARSER SA G MCP:M650X.PARSE 5.1T2 1024 MICRO_COMM_PGMS.M650X_PAR.SA.132 1 LINE 78 8 PAGE UM HERSEY JULY 23, 1983 14:26:59 0 M650X command parse utility subroutines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/133C MICRO COMM PGMS M650X PERMIT C G MCP:M650X.PERMIT 5.1T2 1025 MICRO_COMM_PGMS.M650X_PER.C.133 1 LINE 39 1 PAGE UM HERSEY JULY 23, 1983 14:26:59 0 Command file for permitting access to M650X source files. 1 SUN SEP 08/96 15:24:55 Page 728 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/134C MICRO COMM PGMS M650X POLL SA G MCP:M650X.POLL 5.1T2 1026 MICRO_COMM_PGMS.M650X_POL.SA.134 1 LINE 68 3 PAGE UM HERSEY JULY 23, 1983 14:26:59 0 High-level M650X polling routines (main program). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/135C MICRO COMM PGMS M650X SCREEN SA G MCP:M650X.SCREEN 5.1T2 1027 MICRO_COMM_PGMS.M650X_SCR.SA.135 1 LINE 78 13 PAGE UM HERSEY JULY 23, 1983 14:26:59 0 Teleprinter routines. Machine independent console I/O for full-screen oriented terminals. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/136C MICRO COMM PGMS M650X SERIAL SA G MCP:M650X.SIO 5.1T2 1028 MICRO_COMM_PGMS.M650X_SER.SA.136 1 LINE 70 11 PAGE UM HERSEY JULY 23, 1983 14:27:00 0 Serial I/O M650X-specific routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/137C MICRO COMM PGMS M650X UTIL SA G MCP:M650X.UTIL 5.1T2 1029 MICRO_COMM_PGMS.M650X_UTI.SA.137 1 LINE 68 4 PAGE UM HERSEY JULY 23, 1983 14:27:01 0 M650X low-level utility routines. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/138C MICRO COMM PGMS M650X VARS SA G MCP:M650X.VARS 5.1T2 1030 MICRO_COMM_PGMS.M650X_VAR.SA.138 1 LINE 72 9 PAGE UM HERSEY JULY 23, 1983 14:27:01 0 M650X variable descriptions. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/1, 848/9 00848/139C MICRO COMM PGMS NEW COPY O G MCP:NEW.COPY 5.1T2 1031 MICRO_COMM_PGMS.NEW_COPY.O.139 1 LINE 23014 8 PAGE UM HERSEY JULY 23, 1983 14:27:02 0 Version of MCP:COPY (848/17) used by PDP11 programs. 00848/140C MICRO COMM PGMS NEW COPY SOU SQ G MCP:NEW.COPY.S 5.1T2 1032 MICRO_COMM_PGMS.NEW_COPY.SQ.140 1 LINE 80 12 PAGE UM HERSEY JULY 23, 1983 14:27:02 0 Contains commands at the beginning of the file for assembly. Has $CONTINUE WITH MCP:ATTNTRAP (848/12) record. 1 SUN SEP 08/96 15:24:55 Page 729 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/141C MICRO COMM PGMS NEW DOC PF G MCP:NEW.DOC 5.1T2 1033 MICRO_COMM_PGMS.NEW_DOC.PF.141 1 LINE 70 12 PAGE UM HERSEY JULY 23, 1983 14:27:03 00848/142C MICRO COMM PGMS NEW DOC WF G MCP:NEW.DOC.S 5.1T2 1034 MICRO_COMM_PGMS.NEW_DOC.WF.142 1 LINE 68 10 PAGE UM HERSEY JULY 23, 1983 14:27:03 0 Contains commands at the beginning of the file for assembly. 00848/143C MICRO COMM PGMS ONTEL EIATAP SA G MCP:ONTEL/EIATAP 5.1T2 1035 MICRO_COMM_PGMS.ONTEL_EIA.SA.143 1 LINE 82 20 PAGE UM HERSEY JULY 23, 1983 14:27:04 0 Requires *I8080ASR (686/29). Contains commands at the beginning of the file for assembly. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/144C MICRO COMM PGMS ONTEL TAP DOC WF G MCP:ONTEL/TAP.F 5.1T2 1036 MICRO_COMM_PGMS.ONTEL_TAP.WF.144 1 LINE 63 1 PAGE UM HERSEY JULY 23, 1983 14:27:05 0 Contains commands at the beginning of the file for assembly. 00848/145C MICRO COMM PGMS ONTEL TAP DOC PF G MCP:ONTEL/TAP.W 5.1T2 1037 MICRO_COMM_PGMS.ONTEL_TAP.PF.145 1 LINE 70 1 PAGE UM HERSEY JULY 23, 1983 14:27:05 00848/146C MICRO COMM PGMS OSBORNE O G MCP:OSBORNE 5.1T2 1038 MICRO_COMM_PGMS.OSBORNE.O.146 1 LINE 59 11 PAGE UM HERSEY JULY 23, 1983 14:27:05 0 Referenced by comments of: 848/147 00848/147C MICRO COMM PGMS OSBORNE ASSMBL C G MCP:OSBORNE.ASSE 5.1T2 1039 MICRO_COMM_PGMS.OSBORNE_A.C.147 1 LINE 123 1 PAGE UM HERSEY JULY 23, 1983 14:27:06 0 $SOURCE file for assembling the OSBORNE operating system. Requires *Z80ASR (686/3) and COPY:I8080MACS (686/24). Contains $CONTINUE WITHs for various CP/M MCP subcomponents, (848/21) through (848/68), various I8080 MCP subcomponents, (848/51) through (848/68), and various OSBORNE MCP subcomponents, (848/146) through (848/149). 00848/148C MICRO COMM PGMS OSBORNE SERIAL SA G MCP:OSBORNE.SIO 5.1T2 1040 MICRO_COMM_PGMS.OSBORNE_S.SA.148 1 LINE 68 5 PAGE UM HERSEY JULY 23, 1983 14:27:06 0 Serial I/O Osborne-specific routines. 00848/149C MICRO COMM PGMS OSBORNE I/O SA G MCP:OSBORNE.SYST 5.1T2 1041 MICRO_COMM_PGMS.OSBORNE_I.SA.149 1 LINE 65 1 PAGE UM HERSEY JULY 23, 1983 14:27:07 0 Operating system dependent I/O routines, mostly for file I/O. Has $CONTINUE WITHs for MCP:CP/M.S1 (848/32), MCP:CP/M.S2 (848/33), and MCP:CP/M.S3 (848/34). 1 SUN SEP 08/96 15:24:55 Page 730 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 848/147 00848/150C MICRO COMM PGMS PDP11 DOC PF G MCP:PDP11.DOC 5.1T2 1042 MICRO_COMM_PGMS.PDP11_DOC.PF.150 1 LINE 78 8 PAGE UM HERSEY JULY 23, 1983 14:27:07 0 Printer-ready version of the MCP PDP11 public documentation. Will eventually be a CCMemo. 00848/151C MICRO COMM PGMS PDP11 DOC WF G MCP:PDP11.DOC.S 5.1T2 1043 MICRO_COMM_PGMS.PDP11_DOC.WF.151 1 LINE 73 7 PAGE UM HERSEY JULY 23, 1983 14:27:07 0 FORMAT source for the MCP PDP11 public documentation. Contains commands at the beginning of the file for assembly. 00848/152C MICRO COMM PGMS PDP11 SA G MCP:PDP11.MAC 5.1T2 1044 MICRO_COMM_PGMS.PDP11.SA.152 1 LINE 72 46 PAGE UM HERSEY JULY 23, 1983 14:27:08 0 Machine independent part of source for PDP11 MCP program. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/153, 848/164, 848/165, 848/171 00848/153C MICRO COMM PGMS PLUS COMMENT P G MCP:PLUS.COMMENT 5.1T2 1045 MICRO_COMM_PGMS.PLUS_COMM.L.153 1 LINE 68 5 PAGE UM HERSEY JULY 23, 1983 14:27:11 0 Comments about (848/152). 00848/154C MICRO COMM PGMS PLUS LISTING L G MCP:PLUS.LISTING 5.1T2 1046 MICRO_COMM_PGMS.PLUS_LIST.L.154 1 LINE 130 59 PAGE UM HERSEY JULY 23, 1983 14:27:11 0 MCP terminal program written in PLUS (no file copying). Can run on PDP11. 0 Referenced by comments of: 848/156 00848/155C MICRO COMM PGMS MEMO 443 WF G MCP:PROGRAM.S 5.1T2 1047 MICRO_COMM_PGMS.MEMO_443.WF.155 1 LINE 96 12 PAGE UM HERSEY JULY 23, 1983 14:27:14 0 This is Computing Center Memo 443 -- "MCP Communications Programs for Micros." Contains commands at the beginning of the file for assembly. 00848/156C MICRO COMM PGMS MEMO 443 PF G MCP:PROGRAM.LIST 5.1T2 1048 MICRO_COMM_PGMS.MEMO_443.PF.156 1 LINE 71 12 PAGE UM HERSEY JULY 23, 1983 14:27:15 0 Printer-ready version of (848/154). 0 Referenced by comments of: 844/11 1 SUN SEP 08/96 15:24:55 Page 731 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/157C MICRO COMM PGMS PROTECT C G MCP:PROTECT 5.1T2 1049 MICRO_COMM_PGMS.PROTECT.C.157 1 LINE 37 1 PAGE UM HERSEY JULY 23, 1983 14:27:15 00848/158C MICRO COMM PGMS PUFFIN1 SW G MCP:PUFFIN1 5.1T2 1050 MICRO_COMM_PGMS.PUFFIN1.SW.158 1 LINE 78 5 PAGE UM HERSEY JULY 23, 1983 14:27:16 0 Public domain APPLE DOS to P-system transfer. 00848/159C MICRO COMM PGMS PUFFIN2 SW G MCP:PUFFIN2 5.1T2 1051 MICRO_COMM_PGMS.PUFFIN2.SW.159 1 LINE 78 4 PAGE UM HERSEY JULY 23, 1983 14:27:16 0 Public domain APPLE DOS to P-system transfer. 00848/160C MICRO COMM PGMS PUFFIN3 SW G MCP:PUFFIN3 5.1T2 1052 MICRO_COMM_PGMS.PUFFIN3.SW.160 1 LINE 65 2 PAGE UM HERSEY JULY 23, 1983 14:27:17 0 Public domain APPLE DOS to P-system transfer. 00848/161C MICRO COMM PGMS RSTS CMD C G MCP:RSTS.CMD 5.1T2 1053 MICRO_COMM_PGMS.RSTS_CMD.C.161 1 LINE 40 1 PAGE UM HERSEY JULY 23, 1983 14:27:17 0 Source file to assemble, link, etc. on RSTS rather that on MTS. 00848/162C MICRO COMM PGMS RSTS DOC PF G MCP:RSTS.DOC 5.1T2 1054 MICRO_COMM_PGMS.RSTS_DOC.PF.162 1 LINE 78 4 PAGE UM HERSEY JULY 23, 1983 14:27:17 0 Printer-ready RSTS public documentation. Will eventually be a CCMemo. 00848/163C MICRO COMM PGMS RSTS DOC WF G MCP:RSTS.DOC.S 5.1T2 1055 MICRO_COMM_PGMS.RSTS_DOC.WF.163 1 LINE 67 4 PAGE UM HERSEY JULY 23, 1983 14:27:18 0 *FORMAT source for RSTS public documentation. Contains commands at the beginning of the file for assembly. 00848/164C MICRO COMM PGMS RSTS MACROS SA G MCP:RSTS.MAC 5.1T2 1056 MICRO_COMM_PGMS.RSTS_MACR.SA.164 1 LINE 71 14 PAGE UM HERSEY JULY 23, 1983 14:27:18 0 Operating system dependent part of PDP11 MCP program (848/152) for RSTS operating system. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/165C MICRO COMM PGMS RSTS PDP O G MCP:RSTS.PDP 5.1T2 1057 MICRO_COMM_PGMS.RSTS_PDP.O.165 1 LINE 128 4 PAGE UM HERSEY JULY 23, 1983 14:27:19 0 Object for a PDP-11.MAC assembly (848/152) for RT11 operating system. 00848/166C MICRO COMM PGMS RSX11M LNK RES C G MCP:RSX11M.BLD 5.1T2 1058 MICRO_COMM_PGMS.RSX11M_LN.C.166 1 LINE 44 1 PAGE UM HERSEY JULY 23, 1983 14:27:19 0 RSX11M linker response data file. 1 SUN SEP 08/96 15:24:55 Page 732 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/167C MICRO COMM PGMS RSX11M CMD PRS C G MCP:RSX11M.CMD 5.1T2 1059 MICRO_COMM_PGMS.RSX11M_CM.C.167 1 LINE 52 1 PAGE UM HERSEY JULY 23, 1983 14:27:19 0 RSX11M command parsing tables. 00848/168C MICRO COMM PGMS RSX11M DOC PF G MCP:RSX11M.DOC 5.1T2 1060 MICRO_COMM_PGMS.RSX11M_DO.PF.168 1 LINE 78 4 PAGE UM HERSEY JULY 23, 1983 14:27:19 0 Printer-ready RSX11M public documentation. Will eventually be a CCMemo. 00848/169C MICRO COMM PGMS RSX11M DOC WF G MCP:RSX11M.DOC.S 5.1T2 1061 MICRO_COMM_PGMS.RSX11M_DO.WF.169 1 LINE 67 4 PAGE UM HERSEY JULY 23, 1983 14:27:20 0 *FORMAT source for RSX11M public documentation. Contains commands at the beginning of the file for assembly. 00848/170C MICRO COMM PGMS RSX11M MACROS SA G MCP:RSX11M.MAC 5.1T2 1062 MICRO_COMM_PGMS.RSX11M_MA.SA.170 1 LINE 74 12 PAGE UM HERSEY JULY 23, 1983 14:27:20 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/171C MICRO COMM PGMS RSX11M PDP O G MCP:RSX11M.PDP 5.1T2 1063 MICRO_COMM_PGMS.RSX11M_PD.O.171 1 LINE 100 4 PAGE UM HERSEY JULY 23, 1983 14:27:21 0 Object for a PDP-11.MAC (848/152) assembly for RSX11M operating system. 00848/172C MICRO COMM PGMS RSX11M PERMIT C G MCP:RSX11M.PERMI 5.1T2 1064 MICRO_COMM_PGMS.RSX11M_PE.C.172 1 LINE 33 1 PAGE UM HERSEY JULY 23, 1983 14:27:21 0 Command file for permitting access to RSX11M source files. 00848/173C MICRO COMM PGMS RT11 CMD C G MCP:RT11.CMD 5.1T2 1065 MICRO_COMM_PGMS.RT11_CMD.C.173 1 LINE 40 1 PAGE UM HERSEY JULY 23, 1983 14:27:21 0 "Directions" for ASM & LINK of RT11 MCP. 00848/174C MICRO COMM PGMS RT11 DOC PF G MCP:RT11.DOC 5.1T2 1066 MICRO_COMM_PGMS.RT11_DOC.PF.174 1 LINE 78 4 PAGE UM HERSEY JULY 23, 1983 14:27:22 0 Printer-ready RT11 public documentation. Will eventually be a CCMemo. 00848/175C MICRO COMM PGMS RT11 DOC WF G MCP:RT11.DOC.S 5.1T2 1067 MICRO_COMM_PGMS.RT11_DOC.WF.175 1 LINE 66 3 PAGE UM HERSEY JULY 23, 1983 14:27:22 0 *FORMAT source for RT11 public documentation. Contains commands at the beginning of the file for assembly. 00848/176C MICRO COMM PGMS RT11 SA G MCP:RT11.MAC 5.1T2 1068 MICRO_COMM_PGMS.RT11.SA.176 1 LINE 68 10 PAGE UM HERSEY JULY 23, 1983 14:27:22 0 Operating system dependent part of PDP11 MCP for RT11 operating system. 1 SUN SEP 08/96 15:24:55 Page 733 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/177C MICRO COMM PGMS RT11 PDP O G MCP:RT11.PDP 5.1T2 1069 MICRO_COMM_PGMS.RT11_PDP.O.177 1 LINE 128 5 PAGE UM HERSEY JULY 23, 1983 14:27:22 0 Object for a PDP-11.MAC assembly for RT11 operating system. 00848/178C MICRO COMM PGMS RT11 PERMIT C G MCP:RT11.PERMIT 5.1T2 1070 MICRO_COMM_PGMS.RT11_PERM.C.178 1 LINE 31 1 PAGE UM HERSEY JULY 23, 1983 14:27:23 0 Command file for permitting access to RT11 source files. 00848/179C MICRO COMM PGMS SPDOS SOU SA G MCP:SPDOS.S 5.1T2 1071 MICRO_COMM_PGMS.SPDOS_SOU.SA.179 1 LINE 68 10 PAGE UM HERSEY JULY 23, 1983 14:27:23 0 Operating system dependent part for I8080 MCP under XYCOM'S SPDOS (possibly useful as an example). This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/180C MICRO COMM PGMS STICKER PF G MCP:STICKER.O 5.1T2 1072 MICRO_COMM_PGMS.STICKER.PF.180 1 LINE 104 4 PAGE UM HERSEY JULY 23, 1983 14:27:24 00848/181C MICRO COMM PGMS STICKER PF G MCP:STICKER.P 5.1T2 1073 MICRO_COMM_PGMS.STICKER.PF.181 1 LINE 104 26 PAGE UM HERSEY JULY 23, 1983 14:27:24 0 Contains commands at the beginning of the file for assembly. 00848/182C MICRO COMM PGMS STICKER WF G MCP:STICKER.S 5.1T2 1074 MICRO_COMM_PGMS.STICKER.WF.182 1 LINE 74 4 PAGE UM HERSEY JULY 23, 1983 14:27:25 0 Contains commands at the beginning of the file for assembly. 00848/183C MICRO COMM PGMS TRS-80 I/III C G MCP:TRS1/3.ASM 5.1T2 1075 MICRO_COMM_PGMS.TRS-80_I/.C.183 1 LINE 120 1 PAGE UM FRONCZAK JULY 23, 1983 14:27:25 0 $SOURCE command procedure to assemble the MCP for the TRS-80 Models I/III using *Z80ASR (686/30). Contains $CONTINUE WITHs to various MCP I8080 subcomponents, (848/51) through (848/68), TRS1/3 MCP subcomponents, (848/183) through (848/197), and TRS80.SIO (848/191). 0 Referenced by comments of: 848/183, 848/194 00848/184C MICRO COMM PGMS TRS-80 I/III C G MCP:TRS1/3I.ASM 5.1T2 1076 MICRO_COMM_PGMS.TRS-80_I/.C.184 1 LINE 126 1 PAGE UM FRONCZAK JULY 23, 1983 14:27:26 0 $SOURCE command procedure to assemble the MCP initialization program (MCPINIT) for the TRS-80 Models I/III using *Z80ASR (686/30). 1 SUN SEP 08/96 15:24:55 Page 734 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Contains $CONTINUE WITHs for MCP:I8080.CONSTA (848/51), MCP:TRS1/3.SYSTM (848/185), MCP:I8080.IOUTIL (848/58), and MCP:TRS1/3.INI.S (848/192). 0 Referenced by comments of: 848/195 00848/185C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.SYSTM 5.1T2 1077 MICRO_COMM_PGMS.TRS-80_I/.SA.185 1 LINE 69 1 PAGE UM FRONCZAK JULY 23, 1983 14:27:26 0 *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for disk I/O, keyboard and screen support for MCP. Contains $CONTINUE WITHs to MCP:TRS1/3.S1 (848/186), MCP:TRS1/3.S2 (848/187), and MCP:TRS1/3.S3 (848/188). This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/184 00848/186C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.S1 5.1T2 1078 MICRO_COMM_PGMS.TRS-80_I/.SA.186 1 LINE 77 3 PAGE UM FRONCZAK JULY 23, 1983 14:27:26 0 *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for subroutine locations and macros. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/185 00848/187C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.S2 5.1T2 1079 MICRO_COMM_PGMS.TRS-80_I/.SA.187 1 LINE 68 4 PAGE UM FRONCZAK JULY 23, 1983 14:27:27 0 *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for the PC/MTS/MCP interaction. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/185 00848/188C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.S3 5.1T2 1080 MICRO_COMM_PGMS.TRS-80_I/.SA.188 1 LINE 79 13 PAGE UM FRONCZAK JULY 23, 1983 14:27:27 0 *Z80ASR (686/30) TRSDOS/NEWDOS-dependent code, primarily for disk I/O, keyboard, and screen support for MCP. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/185 1 SUN SEP 08/96 15:24:55 Page 735 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/189C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.VRSN 5.1T2 1081 MICRO_COMM_PGMS.TRS-80_I/.SA.189 1 LINE 68 1 PAGE UM FRONCZAK JULY 23, 1983 14:27:28 0 *Z80ASR (686/30) MCP-dependent code for MCP version definition. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/190C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.SIO 5.1T2 1082 MICRO_COMM_PGMS.TRS-80_I/.SA.190 1 LINE 72 4 PAGE UM FRONCZAK JULY 23, 1983 14:27:28 0 *Z80ASR (686/30) MCP-dependent code for handling general serial I/O port support. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/191C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS80.SIO 5.1T2 1083 MICRO_COMM_PGMS.TRS-80_I/.SA.191 1 LINE 78 5 PAGE UM FRONCZAK JULY 23, 1983 14:27:28 0 *Z80ASR (686/30) serial I/O dependent routines to support MCP SIO conventions. Handles Z80 serial I/O and Western Digital 1602 A and B UARS. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/183 00848/192C MICRO COMM PGMS TRS-80 I/III SA G MCP:TRS1/3.INI.S 5.1T2 1084 MICRO_COMM_PGMS.TRS-80_I/.SA.192 1 LINE 76 17 PAGE UM FRONCZAK JULY 23, 1983 14:27:29 0 *Z80ASR (686/30) MCP-dependent code to interactively parameterize the HARDWARE file component (848/193) for the user's MCP operation. This source code is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 0 Referenced by comments of: 848/184 00848/193C MICRO COMM PGMS TRS-80 I/III D G MCP:TRS1/3.HRD 5.1T2 1085 MICRO_COMM_PGMS.TRS-80_I/.D.193 1 LINE 64 1 PAGE UM FRONCZAK JULY 23, 1983 14:27:30 0 Z80 TRSDOS/NEWDOS/MCP-dependent HARDWARE parameter MCP file which is distributed on Models I and III TRSDOS diskettes to users. 0 Referenced by comments of: 848/192 00848/194C MICRO COMM PGMS TRS-80 I/III OC G MCP:TRS1/3 5.1T2 1086 MICRO_COMM_PGMS.TRS-80_I/.OC.194 1 LINE 244 6 PAGE UM FRONCZAK JULY 23, 1983 14:27:30 0 Z80 MCP communications program (MCP) object code resulting from using (848/183). This is distributed on Model I and III TRSDOS diskettes to users. 1 SUN SEP 08/96 15:24:55 Page 736 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/195C MICRO COMM PGMS TRS80 I/III OC G MCP:TRS1/3.INIT 5.1T2 1087 MICRO_COMM_PGMS.TRS80_I/I.OC.195 1 LINE 244 4 PAGE UM FRONCZAK JULY 23, 1983 14:27:30 0 Z80 MCP initialization program (MCPINIT) object code resulting from using (848/184). This is distributed on Models I and III TRSDOS diskettes to users. 00848/196C MICRO COMM PGMS MEMO 446 WF G MCP:TRS1/3.DOC.S 5.1T2 1088 MICRO_COMM_PGMS.MEMO_446.WF.196 1 LINE 108 6 PAGE UM FRONCZAK JULY 23, 1983 14:27:31 0 This is Computing Center Memo 446 -- "The TRS-80 Models I/III MCP Program Documentation." Contains MTS commands to run *FORMAT on the writeup input which follows in the file. $SOURCE to generate CCMemo 446, which documents the current TRS-80 Models I/III TRSDOS/NEWDOS/MCP implementation. Contains INCLUDE MCP:FMT.MEMO.S (848/43). 0 Referenced by comments of: 848/197 00848/197C MICRO COMM PGMS MEMO 446 PF G MCP:TRS1/3.DOC 5.1T2 1089 MICRO_COMM_PGMS.MEMO_446.PF.197 1 LINE 71 7 PAGE UM FRONCZAK JULY 23, 1983 14:27:31 0 This is the printer-ready version of (848/196). 0 Referenced by comments of: 844/11, 848/183 00848/198C MICRO COMM PGMS V9000 DOS O G MCP:V9000.DOS 5.1T2 1090 MICRO_COMM_PGMS.V9000_DOS.O.198 1 LINE 225 10 PAGE UM HERSEY JULY 23, 1983 14:27:32 0 Object for WINDOW DOS operating system on Victor 9000. 00848/199C MICRO COMM PGMS V9000 HRD D G MCP:V9000.HRD 5.1T2 1091 MICRO_COMM_PGMS.V9000_HRD.D.199 1 LINE 225 1 PAGE UM HERSEY JULY 23, 1983 14:27:32 0 Victor 9000 hardware description file. 00848/200C MICRO COMM PGMS V9000 KEY FUNC D G MCP:V9000.KEY 5.1T2 1092 MICRO_COMM_PGMS.V9000_KEY.D.200 1 LINE 64 1 PAGE UM HERSEY JULY 23, 1983 14:27:32 0 Victor 9000 keyboard function definition data file. 00848/201C MICRO COMM PGMS XXDRV LNK RESP C G MCP:XXDRV.BLD 5.1T2 1093 MICRO_COMM_PGMS.XXDRV_LNK.C.201 1 LINE 68 1 PAGE UM HERSEY JULY 23, 1983 14:27:33 0 XXDRV linker response data file. 00848/202C MICRO COMM PGMS XXDRV CMD PRS C G MCP:XXDRV.CMD 5.1T2 1094 MICRO_COMM_PGMS.XXDRV_CMD.C.202 1 LINE 74 1 PAGE UM HERSEY JULY 23, 1983 14:27:33 0 RSX11M XXDRV assembly and build command file. 1 SUN SEP 08/96 15:24:55 Page 737 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00848/203C MICRO COMM PGMS XXDRV MACROS SA G MCP:XXDRV.MAC 5.1T2 1095 MICRO_COMM_PGMS.XXDRV_MAC.SA.203 1 LINE 68 10 PAGE UM HERSEY JULY 23, 1983 14:27:33 0 RSX11M XXDRV device driver code. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00848/204C MICRO COMM PGMS XXDRV OBJ O G MCP:XXDRV.OBJ 5.1T2 1096 MICRO_COMM_PGMS.XXDRV_OBJ.O.204 1 LINE 150 2 PAGE UM HERSEY JULY 23, 1983 14:27:33 0 RSX11M object. 00848/205C MICRO COMM PGMS XXTAB MACROS SA G MCP:XXTAB.MAC 5.1T2 1097 MICRO_COMM_PGMS.XXTAB_MAC.SA.205 1 LINE 70 3 PAGE UM HERSEY JULY 23, 1983 14:27:34 0 RSX11M tables. This source file is copyrighted. Please do not redistribute to any third party without the permission of the University of Michigan. 00849/001C MTS VOLUME 19 MASTER WT S1029A MTSV19 'MTS MANUALS' POSN=NEWM1.V19 5.1T2 1098 MTS_VOLUME_19.MASTER.WT.001 1 LINE 132 134 PAGE UM MANUAL JULY 23, 1983 14:30:03 0 TEXT/360 master for Volume 19, "Tapes and Floppy Disks" of the UM MTS manuals, February 1983. 00849/002C MTS VOLUME 19 PRINT PT S1029A MTSV19 'MTS MANUALS' POSN=PRINT1.V19 5.1T2 1099 MTS_VOLUME_19.PRINT.PT.002 1 LINE 132 179 PAGE UM MANUAL JULY 23, 1983 14:30:08 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 00849/003C MTS VOLUME 19 INDEX SOURCE D S1029A MTSV19 'MTS MANUALS' POSN=V19INDEXSOU 5.1T2 1100 MTS_VOLUME_19.INDEX_SOURC.D.003 1 LINE 75 3 PAGE UM MANUAL JULY 23, 1983 14:30:19 0 Input to *INDEX (580) for index to Volume 19. 00850/001C MERIT STAT PGMS SPSSSTATS S G W542:SPSSSTATS 5.1T2 1101 MERIT_STAT_PGMS.SPSSSTATS.S.001 1 LINE 111 4 PAGE UM STARK JULY 23, 1983 14:30:19 0 Command file to be run under SPSS at MSU. To use this file, type $SOURCE SPSSSTATS. Produces Merit monthly statistics for all connection types. Accesses monthly DSR logging files from Merit primary hosts. The format of the logging files is described in (850/15). This file contains $CONTINUE WITH records for the logging files, whose names have the form W542:xxSTAT.mm-yy, where xx is the Merit node, mm is a two-digit month, and yy is a two-digit year, e.g. "W542:UMSTAT.06-83 (the UM statistics for June 1983). 0 Referenced by comments of: 850/15 1 SUN SEP 08/96 15:24:55 Page 738 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00850/002C MERIT STAT PGMS LAPROG SF G W542:LAPROG(1000) 5.1T2 1102 MERIT_STAT_PGMS.LAPROG.SF.002 1 LINE 106 12 PAGE UM STARK JULY 23, 1983 14:30:22 0 Program to produce assorted usage statistics for Merit TL and X3 connection types. Accesses monthly DSR logging files produced by Merit primary hosts. The format of the logging files is described in (850/15). Commands used to compile may be found at the beginning of the file. 0 Referenced by comments of: 850/15 00850/003C MERIT STAT PGMS LAPROG OC G W542:LAPROG(1,999) 5.1T2 1103 MERIT_STAT_PGMS.LAPROG.OC.003 1 LINE 10766 5 PAGE UM STARK JULY 23, 1983 14:30:22 0 To use this file, type $SOURCE LAPROG(3000). (Those lines are saved with the source code for this object module.) 00850/004C MERIT STAT PGMS USERSTATS SA G W542:USERSTATS(1000) 5.1T2 1104 MERIT_STAT_PGMS.USERSTATS.SA.004 1 LINE 95 7 PAGE UM STARK JULY 23, 1983 14:30:23 0 Program to produce user statistics from Merit monthly DSR logging files. (Logging files are produced by all Merit primary hosts. The format of these logging files is described in (850/15).) Commands used to assemble may be found at the beginning of this file. Also uses input from (850/13) and from line 10,000 onward in this file. Commands used to run may be found in (850/13). Requires the (850/14) macro library. 0 Referenced by comments of: 850/13, 850/14, 850/15 00850/005C MERIT STAT PGMS USERSTATS OC G W542:USERSTATS(1,999) 5.1T2 1105 MERIT_STAT_PGMS.USERSTATS.OC.005 1 LINE 1948 3 PAGE UM STARK JULY 23, 1983 14:30:23 00850/006C MERIT STAT PGMS TELSTATS SA G W542:TELSTATS(1000) 5.1T2 1106 MERIT_STAT_PGMS.TELSTATS.SA.006 1 LINE 103 24 PAGE UM STARK JULY 23, 1983 14:30:23 0 Program to produce Telenet statistics from Merit monthly DSR logging files. (Logging files are produced by all Merit primary hosts. The format of these logging files is described in (850/15).) Commands used to assemble may be found at the beginning of the file. Also uses input from (850/13) and from line 10,000 onward in this file. Also uses input from (850/12). Commands to run may be found in (850/13). Requires the (850/14) macro library. 0 Referenced by comments of: 850/8, 850/9, 850/10, 850/11, 850/12, 850/13, 850/14, 850/15 00850/007C MERIT STAT PGMS TELSTATS OC G W542:TELSTATS(1,999) 5.1T2 1107 MERIT_STAT_PGMS.TELSTATS.OC.007 1 LINE 4277 7 PAGE UM STARK JULY 23, 1983 14:30:25 00850/008C MERIT STAT PGMS MSIDS D G W542:MSIDS 5.1T2 1108 MERIT_STAT_PGMS.MSIDS.D.008 1 LINE 109 1 PAGE UM STARK JULY 23, 1983 14:30:25 0 Used by (850/6). Contains lists of MSU user IDs for rebate purposes. 1 SUN SEP 08/96 15:24:55 Page 739 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00850/009C MERIT STAT PGMS UMIDS D G W542:UMIDS 5.1T2 1109 MERIT_STAT_PGMS.UMIDS.D.009 1 LINE 344 1 PAGE UM STARK JULY 23, 1983 14:30:25 0 Used by (850/6). Contains lists of UM user IDs for rebate purposes. 00850/010C MERIT STAT PGMS WMIDS D G W542:WMIDS 5.1T2 1110 MERIT_STAT_PGMS.WMIDS.D.010 1 LINE 96 1 PAGE UM STARK JULY 23, 1983 14:30:25 0 Used by (850/6). Contains lists of WMU user IDs for rebate purposes. 00850/011C MERIT STAT PGMS WUIDS D G W542:WUIDS 5.1T2 1111 MERIT_STAT_PGMS.WUIDS.D.011 1 LINE 149 1 PAGE UM STARK JULY 23, 1983 14:30:26 0 Used by (850/6). Contains lists of WSU user IDs for rebate purposes. 00850/012C MERIT STAT PGMS AREACODES D G W542:AREACODES 5.1T2 1112 MERIT_STAT_PGMS.AREACODES.D.012 1 LINE 31 1 PAGE UM STARK JULY 23, 1983 14:30:26 0 Used by (850/6). Contains list of Telenet geographic locations, arranged by area codes. 0 Referenced by comments of: 850/6 00850/013C MERIT STAT PGMS RUNSTATS C G W542:RUNSTATS 5.1T2 1113 MERIT_STAT_PGMS.RUNSTATS.C.013 1 LINE 131 1 PAGE UM STARK JULY 23, 1983 14:30:26 0 MTS commands to $RUN USERSTATS (850/4) and $RUN TELSTATS (850/6). 0 Referenced by comments of: 850/4, 850/6 00850/014C MERIT STAT PGMS MACLIB SM G W542:MACLIB 5.1T2 1114 MERIT_STAT_PGMS.MACLIB.SM.014 1 LINE 73 7 PAGE UM STARK JULY 23, 1983 14:30:26 0 Macro library used in assembling USERSTATS (850/4) and TELSTATS (850/6). 0 Referenced by comments of: 850/4, 850/6 00850/015C MERIT STAT PGMS STAT.DOC P G W542:STAT.DOC 5.1T2 1115 MERIT_STAT_PGMS.STAT.DOC.P.015 1 LINE 119 3 PAGE UM STARK JULY 23, 1983 14:30:27 0 Description of monthly DSR logging files, which are produced by Merit primary hosts. Logging files are used by SPSSSTATS (850/1), LAPROG (850/2), USERSTATS (850/4), and TELSTATS (850/6). See also the Merit network design memo ND-83-307 (not distributed). This file is in a format ready to be run through *PAGEPR. 0 Referenced by comments of: 850/1, 850/2, 850/4, 850/6 00851/001C COMMAND SERVICE SOURCE SQ G CLS:CMDSERV*SQ 5.1T2 1116 COMMAND_SERVICE.SOURCE.SQ.001 1 LINE 68 25 PAGE UM BURLING JULY 23, 1983 14:30:27 0 Plus source for service routines used by new CLSs (see components (852) through (858) and (509)). Contains CLS entry/exit code and various other useful services. See the (851/7) writeup for details. 1 SUN SEP 08/96 15:24:55 Page 740 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Compile with CLS:CMDSERV*SQL (851/4), CLS:CMDSERV*SRL (851/3), COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), *CLPARSELIB (1076/11), and PLUS:SOURCEL*SQL (1042/5). 0 Referenced by comments of: 509/14, 851/3, 851/4, 851/5 00851/002C COMMAND SERVICE GRAMMAR SR G CLS:CMDSERV*SR 5.1T2 1117 COMMAND_SERVICE.GRAMMAR.SR.002 1 LINE 68 3 PAGE UM BURLING JULY 23, 1983 14:30:28 0 *Clparser (1076/6) grammar used by the command service routines. 0 Referenced by comments of: 851/3, 851/5 00851/003C COMMAND SERVICE DECLARATIONS SQ G CLS:CMDSERV*SRL 5.1T2 1118 COMMAND_SERVICE.DECLARATI.SQ.003 1 LINE 76 1 PAGE UM BURLING JULY 23, 1983 14:30:29 0 Declarations generated by *Clparsegen (1076/1) using (851/2) as input. Used to compile (851/1). 0 Referenced by comments of: 509/10, 843/1, 851/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1086/1 00851/004C COMMAND SERVICE PLUS LIB SQ G CLS:CMDSERV*SQL 5.1T2 1119 COMMAND_SERVICE.PLUS_LIB.SQ.004 1 LINE 68 4 PAGE UM BURLING JULY 23, 1983 14:30:29 0 Plus definitions for the command service routines. Used to compile (851/1) and any other programs that use the service routines. 0 Referenced by comments of: 851/1, 852/1 00851/005C COMMAND SERVICE OBJECT OC G SEG2:CMDSERV 5.1T2 1120 COMMAND_SERVICE.OBJECT.OC.005 1 LINE 1662 17 PAGE UM BURLING JULY 23, 1983 14:30:30 SEG2:CMDSERV 0 Object for (851/1) and (851/2). 00851/006C COMMAND SERVICE WRITEUP WF G CLS:CMDSERV*W 5.1T2 1121 COMMAND_SERVICE.WRITEUP.WF.006 1 LINE 83 4 PAGE UM BURLING JULY 23, 1983 14:30:30 0 Writeup describing the command service routines, and also how to write a Plus CLS. 0 Referenced by comments of: 851/7 00851/007C COMMAND SERVICE WRITEUP PF G CLS:CMDSERV*WP 5.1T2 1122 COMMAND_SERVICE.WRITEUP.PF.007 1 LINE 69 5 PAGE UM BURLING JULY 23, 1983 14:30:31 0 Printer-ready version of (851/6). 0 Referenced by comments of: 851/1 00852/001C COPY COMMAND SOURCE SQ G CLS:COPY*SQ 5.1T2 1123 COPY_COMMAND.SOURCE.SQ.001 1 LINE 68 6 PAGE UM BURLING JULY 23, 1983 14:30:31 0 Plus source for $COPY CLS. Compile with COPY:MTS*SQL (344/4), 1 SUN SEP 08/96 15:24:55 Page 741 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/4), CLS:COPY*SRL (852/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 851/1, 852/3, 852/4 00852/002C COPY COMMAND GRAMMAR SR G CLS:COPY*SR 5.1T2 1124 COPY_COMMAND.GRAMMAR.SR.002 1 LINE 67 1 PAGE UM BURLING JULY 23, 1983 14:30:31 0 *Clparser (1076/6) grammar used by $COPY CLS. 0 Referenced by comments of: 852/4 00852/003C COPY COMMAND DECLARATIONS SQ G CLS:COPY*SRL 5.1T2 1125 COPY_COMMAND.DECLARATIONS.SQ.003 1 LINE 64 1 PAGE UM BURLING JULY 23, 1983 14:30:31 0 Declarations generated by *Clparsegen (1076/1) using (852/3) as input. Used to compile (852/1). 0 Referenced by comments of: 852/1, 852/3 00852/004C COPY COMMAND OBJECT OC G *NEWCLSCOPY 5.1T2 1126 COPY_COMMAND.OBJECT.OC.004 1 LINE 4296 3 PAGE UM BURLING JULY 23, 1983 14:30:32 *NEWCLSCOPY 0 Object for (852/1) and (852/2). 00853/001C CREATE COMMAND SOURCE SQ G CLS:CREATE*SQ 5.1T2 1127 CREATE_COMMAND.SOURCE.SQ.001 1 LINE 74 5 PAGE UM BURLING JULY 23, 1983 14:30:32 0 Plus source for $CREATE CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:CREATE*SRL (853/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 853/3, 853/4 00853/002C CREATE COMMAND GRAMMAR SR G CLS:CREATE*SR 5.1T2 1128 CREATE_COMMAND.GRAMMAR.SR.002 1 LINE 73 1 PAGE UM BURLING JULY 23, 1983 14:30:32 0 *Clparser (1076/6) grammar used by CREATE CLS. 0 Referenced by comments of: 853/3, 853/4 00853/003C CREATE COMMAND DECLARATIONS SQ G CLS:CREATE*SRL 5.1T2 1129 CREATE_COMMAND.DECLARATIO.SQ.003 1 LINE 66 1 PAGE UM BURLING JULY 23, 1983 14:30:32 0 Declarations generated by *Clparsegen (1076/1) using (853/2) as input. Used to compile (853/1). 0 Referenced by comments of: 853/1 1 SUN SEP 08/96 15:24:55 Page 742 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00853/004C CREATE COMMAND OBJECT OC G *NEWCLSCREATE 5.1T2 1130 CREATE_COMMAND.OBJECT.OC.004 1 LINE 4616 3 PAGE UM BURLING JULY 23, 1983 14:30:33 *NEWCLSCREATE 0 Object for (853/1) and (853/2). 00854/001C DESTROY COMMAND SOURCE SQ G CLS:DESTROY*SQ 5.1T2 1131 DESTROY_COMMAND.SOURCE.SQ.001 1 LINE 76 6 PAGE UM BURLING JULY 23, 1983 14:30:33 0 Plus source for $DESTROY CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:DESTROY*SRL (854/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 854/3, 854/4 00854/002C DESTROY COMMAND GRAMMAR SR G CLS:DESTROY*SR 5.1T2 1132 DESTROY_COMMAND.GRAMMAR.SR.002 1 LINE 62 1 PAGE UM BURLING JULY 23, 1983 14:30:33 0 *CLPARSER (1076/6) grammar for $DESTROY CLS. 0 Referenced by comments of: 854/3, 854/4 00854/003C DESTROY COMMAND DECLARATIONS SQ G CLS:DESTROY*SRL 5.1T2 1133 DESTROY_COMMAND.DECLARATI.SQ.003 1 LINE 67 1 PAGE UM BURLING JULY 23, 1983 14:30:34 0 Declarations generated by *CLPARSEGEN (1076/1) using (854/2) as input. Used to compile (854/1). 0 Referenced by comments of: 854/1 00854/004C DESTROY COMMAND OBJECT OC G *NEWCLSDESTROY 5.1T2 1134 DESTROY_COMMAND.OBJECT.OC.004 1 LINE 4272 3 PAGE UM BURLING JULY 23, 1983 14:30:34 *NEWCLSDESTROY 0 Object for (854/1) and (854/2). 00855/001C DUPLICATE COMMAND SOURCE SQ G CLS:DUP*SQ 5.1T2 1135 DUPLICATE_COMMAND.SOURCE.SQ.001 1 LINE 79 12 PAGE UM BURLING JULY 23, 1983 14:30:34 0 Plus source for $DUPLICATE CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:DUP*SRL (855/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 855/3, 855/4 00855/002C DUPLICATE COMMAND GRAMMAR SR G CLS:DUP*SR 5.1T2 1136 DUPLICATE_COMMAND.GRAMMAR.SR.002 1 LINE 66 1 PAGE UM BURLING JULY 23, 1983 14:30:35 0 *CLPARSER (1076/6) grammar for $DUPLICATE CLS. 0 Referenced by comments of: 855/3, 855/4 1 SUN SEP 08/96 15:24:55 Page 743 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00855/003C DUPLICATE COMMAND DECLARATIONS SQ G CLS:DUP*SRL 5.1T2 1137 DUPLICATE_COMMAND.DECLARA.SQ.003 1 LINE 69 1 PAGE UM BURLING JULY 23, 1983 14:30:35 0 Declarations generated by *CLPARSEGEN (1076/1) using (855/2) as input. Used to compile (855/1). 0 Referenced by comments of: 855/1 00855/004C DUPLICATE COMMAND OBJECT OC G *CLSDUPLICATE 5.1T2 1138 DUPLICATE_COMMAND.OBJECT.OC.004 1 LINE 9848 4 PAGE UM BURLING JULY 23, 1983 14:30:35 *CLSDUPLICATE 0 Object for (855/1) and (855/2). 00856/001C EMPTY COMMAND SOURCE SQ G CLS:EMPTY*SQ 5.1T2 1139 EMPTY_COMMAND.SOURCE.SQ.001 1 LINE 76 5 PAGE UM BURLING JULY 23, 1983 14:30:35 0 Plus source for $EMPTY CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:EMPTY*SRL (856/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 856/3, 856/4 00856/002C EMPTY COMMAND GRAMMAR SR G CLS:EMPTY*SR 5.1T2 1140 EMPTY_COMMAND.GRAMMAR.SR.002 1 LINE 71 1 PAGE UM BURLING JULY 23, 1983 14:30:35 0 *Clparser (1076/6) grammar for $EMPTY CLS. 0 Referenced by comments of: 856/3, 856/4 00856/003C EMPTY COMMAND DECLARATIONS SQ G CLS:EMPTY*SRL 5.1T2 1141 EMPTY_COMMAND.DECLARATION.SQ.003 1 LINE 65 1 PAGE UM BURLING JULY 23, 1983 14:30:36 0 Declarations generated by *CLPARSEGEN (1076/1) using (856/2) as input. Used to compile (856/1). 0 Referenced by comments of: 856/1 00856/004C EMPTY COMMAND OBJECT OC G *NEWCLSEMPTY 5.1T2 1142 EMPTY_COMMAND.OBJECT.OC.004 1 LINE 3560 3 PAGE UM BURLING JULY 23, 1983 14:30:36 *NEWCLSEMPTY 0 Object for (856/1) and (856/2). 00857/001C RENAME COMMAND SOURCE SQ G CLS:RENAME*SQ 5.1T2 1143 RENAME_COMMAND.SOURCE.SQ.001 1 LINE 77 8 PAGE UM BURLING JULY 23, 1983 14:30:36 0 Plus source for $RENAME CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:RENAME*SRL (857/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 857/3, 857/4 1 SUN SEP 08/96 15:24:55 Page 744 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00857/002C RENAME COMMAND GRAMMAR SR G CLS:RENAME*SR 5.1T2 1144 RENAME_COMMAND.GRAMMAR.SR.002 1 LINE 66 1 PAGE UM BURLING JULY 23, 1983 14:30:36 0 *Clparser (1076/6) grammar for $RENAME CLS. 0 Referenced by comments of: 857/3, 857/4 00857/003C RENAME COMMAND DECLARATIONS SQ G CLS:RENAME*SRL 5.1T2 1145 RENAME_COMMAND.DECLARATIO.SQ.003 1 LINE 66 1 PAGE UM BURLING JULY 23, 1983 14:30:37 0 Declarations generated by *CLPARSEGEN (1076/1) using (857/2) as input. Used to compile (857/1). 0 Referenced by comments of: 857/1 00857/004C RENAME COMMAND OBJECT OC G *NEWCLSRENAME 5.1T2 1146 RENAME_COMMAND.OBJECT.OC.004 1 LINE 6344 3 PAGE UM BURLING JULY 23, 1983 14:30:37 *NEWCLSRENAME 0 Object for (857/1) and (857/2). 00858/001C TRUNCATE COMMAND SOURCE SQ G CLS:TRUNCATE*SQ 5.1T2 1147 TRUNCATE_COMMAND.SOURCE.SQ.001 1 LINE 76 6 PAGE UM BURLING JULY 23, 1983 14:30:37 0 Plus source for $TRUNCATE CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:TRUNCATE*SRL (858/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). 0 Referenced by comments of: 578/2, 851/1, 858/3, 858/4 00858/002C TRUNCATE COMMAND GRAMMAR SR G CLS:TRUNCATE*SR 5.1T2 1148 TRUNCATE_COMMAND.GRAMMAR.SR.002 1 LINE 76 1 PAGE UM BURLING JULY 23, 1983 14:30:38 0 *Clparser (1076/6) grammar for $TRUNCATE CLS. 0 Referenced by comments of: 858/3, 858/4 00858/003C TRUNCATE COMMAND DECLARATIONS SQ G CLS:TRUNCATE*SRL 5.1T2 1149 TRUNCATE_COMMAND.DECLARAT.SQ.003 1 LINE 68 1 PAGE UM BURLING JULY 23, 1983 14:30:38 0 Declarations generated by *CLPARSEGEN (1076/1) using (858/2) as input. Used to compile (858/1). 0 Referenced by comments of: 858/1 00858/004C TRUNCATE COMMAND OBJECT OC G *NEWCLSTRUNCATE 5.1T2 1150 TRUNCATE_COMMAND.OBJECT.OC.004 1 LINE 4086 3 PAGE UM BURLING JULY 23, 1983 14:30:38 *NEWCLSTRUNCATE 0 Object for (858/1) and (858/2). 1 SUN SEP 08/96 15:24:55 Page 745 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00859/001C *NIM SOURCE SA # (WE CAN'T FIND IT) UM STERKEN 00859/002C *NIM OBJECT OC G *NIM 5.1T2 1151 NIM.OBJECT.OC.002 1 LINE 255 1 PAGE UM STERKEN JULY 23, 1983 14:30:38 *NIM 00860/001C MERIT CC UTILITIES HICORE MONITOR S G K1YX:PROM.S 5.1T2 1152 MERIT_CC_UTILITIES.HICORE.S.001 1 LINE 86 34 PAGE UM HUSAK JULY 23, 1983 14:30:38 0 *PDP11ASR (686/32) source for the Merit PDP-11 high core monitor / loader / EPROM program used in PCPs and SCPs. Requires MINOSMACS (715/5) and HDWEQUS (715/9). 0 Referenced by comments of: 860/2, 860/4, 860/6 00860/002C MERIT CC UTILITIES FLOPPY S O K1YX:FLOPPY.S 5.1T2 1153 MERIT_CC_UTILITIES.FLOPPY.S.002 1 LINE 85 17 PAGE UM HUSAK JULY 23, 1983 14:30:40 0 *PDP11ASR (686/32) source for PDP-11 standalone RX02 floppy disk utility. Requires MINOSMACS (715/5), HDWEQUS (715/9) and the high core monitor (860/1). 0 Referenced by comments of: 860/3 00860/003C MERIT CC UTILITIES RXO2 BOOT S S K1YX:BOOT.S 5.1T2 1154 MERIT_CC_UTILITIES.RXO2_B.S.003 1 LINE 79 3 PAGE UM HUSAK JULY 23, 1983 14:30:41 0 *PDP11ASR (686/32) source for RX02 bootstrap block. Uses unique directory format supported by FLOPPY (860/2). Requires MINOSMACS (715/5) and HDWEQUS (715/9). 00860/004C MERIT CC UTILITIES DIS 11 S S K1YX:DIS11 5.1T2 1155 MERIT_CC_UTILITIES.DIS_11.S.004 1 LINE 83 25 PAGE UM HUSAK JULY 23, 1983 14:30:41 0 *PDP11ASR (686/32) source for a PDP-11 resident dissassembler. Requires MINOSMACS (715/5), HDWEQUS (715/9), and the high core monitor (860/1). 00860/005C MERIT CC UTILITIES CHNL DIAG JOG C G K1YX:CHNLDIAG.JOB 5.1T2 1156 MERIT_CC_UTILITIES.CHNL_D.C.005 1 LINE 66 1 PAGE UM HUSAK JULY 23, 1983 14:30:42 0 $SOURCE file to generate diagnostic for the IBM-channel to DEC-unibus interface, designed by Joe Gersch. Requires MINOSMACS (715/5), HDWEQUS (715/9), (860/6) and (860/7). 00860/006C MERIT CC UTILITIES OFFLIN CHLDIAG S B K1YX:CHNLDIAG.S 5.1T2 1157 MERIT_CC_UTILITIES.OFFLIN.S.006 1 LINE 90 21 PAGE UM HUSAK JULY 23, 1983 14:30:42 0 *PDP11ASR (686/32) source for diagnostic program for channel interface, offline version. Requires MINOSMACS (715/5), HDWEQUS (715/9), and the high core monitor (860/1). 0 Referenced by comments of: 860/5 1 SUN SEP 08/96 15:24:55 Page 746 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00860/007C MERIT CC UTILITIES ONLINE CHLDIAG S B K1YX:CHNLDIAG.X.S 5.1T2 1158 MERIT_CC_UTILITIES.ONLINE.S.007 1 LINE 76 5 PAGE UM HUSAK JULY 23, 1983 14:30:43 0 *PDP11ASR (686/32) source for online portion of the channel interface diagnostic. Not completely compatible with the latest I/F microcode. Requires MINOSMACS (715/5) and HDWEQUS (715/9). 0 Referenced by comments of: 860/5 00860/008C MERIT CC UTILITIES HDLC PROD S O MM16:HDLCPROD.S 5.1T2 1159 MERIT_CC_UTILITIES.HDLC_P.S.008 1 LINE 99 19 PAGE UM CASHMAN JULY 23, 1983 14:30:44 0 *M6809ASR (686/31) source for MM16 CPU configured for HDLC. Requires MM16EQUS (860/9). 00860/009C MERIT CC UTILITIES MM16 EQUS S G MM16:MM16EQUS 5.1T2 1160 MERIT_CC_UTILITIES.MM16_E.S.009 1 LINE 91 22 PAGE UM CASHMAN JULY 23, 1983 14:30:45 0 *M6809ASR (686/31) equates for CPU card. 0 Referenced by comments of: 860/8, 861/1, 861/2 00861/001C MERIT UMNET HARDWARE 6809 MON/DEBUG S G MM16:6809MON 5.1T2 1161 MERIT_UMNET_HARDWARE.6809.S.001 1 LINE 73 2 PAGE UM CASHMAN JULY 23, 1983 14:30:46 0 *M6809ASR (686/31) source for standalone 6809 monitor/debugger. This is the MM16-dependent portion. Requires (860/9) and (861/2). 0 Referenced by comments of: 861/2 00861/002C MERIT UMNET HARDWARE 6809 MON CODE S O MM16:6809MONCODE 5.1T2 1162 MERIT_UMNET_HARDWARE.6809.S.002 1 LINE 72 33 PAGE UM CASHMAN JULY 23, 1983 14:30:46 0 *M6809ASR (686/31) source for standalone 6809 monitor/debugger. This is the MM16-independent portion. Requires (860/9) and (861/1). 0 Referenced by comments of: 861/1 00861/003C MERIT UMNET HARDWARE MM16 BACKPLANE S G MM16:MM16.WW 5.1T2 1163 MERIT_UMNET_HARDWARE.MM16.S.003 1 LINE 223 10 PAGE UM HUSAK JULY 23, 1983 14:30:48 0 *WIREWRAP (306) source for MM16 microcomputer multiplexor unibus backplane. 00861/004C MERIT UMNET HARDWARE BLOCK MICRO S G K1YU:BLKMICRO 5.1T2 1164 MERIT_UMNET_HARDWARE.BLOC.S.004 1 LINE 88 11 PAGE UM HUSAK JULY 23, 1983 14:30:48 0 *11ASR (515) source for microprogram of channel interface (designed by Joe Gersch) when running on a block multiplexor channel. Uses command retry. 1 SUN SEP 08/96 15:24:55 Page 747 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00861/005C MERIT UMNET HARDWARE BYTE MICRO S G K1YU:BYTEMICRO 5.1T2 1165 MERIT_UMNET_HARDWARE.BYTE.S.005 1 LINE 90 11 PAGE UM HUSAK JULY 23, 1983 14:30:49 0 *11ASR (515) source for microprogram of channel interface when used on a four-byte multiplexor channel. 00861/006C MERIT UMNET HARDWARE UCPWW S G K1YU:ITWW 5.1T2 1166 MERIT_UMNET_HARDWARE.UCPW.S.006 1 LINE 161 9 PAGE UM HUSAK JULY 23, 1983 14:30:50 0 *WIREWRAP (306) source for Merit interval timer / display panel / EPROM interface. Contains a $CONTINUE WITH *WWICMAC (306/30). 00861/007C MERIT UMNET HARDWARE 470WW S G K1YU:470WW 5.1T2 1167 MERIT_UMNET_HARDWARE.470W.S.007 1 LINE 191 22 PAGE UM HUSAK JULY 23, 1983 14:30:50 0 *WIREWRAP (306) source for IBM to unibus interface designed by Joe Gersch. ECO level to allow working on block multiplexor channel. Contains a $CONTINUE WITH *WWICMAC (306/30). 00861/008C MERIT UMNET HARDWARE CHNL XFACE MAN WF S K1YU:360MANUAL 5.1T2 1168 MERIT_UMNET_HARDWARE.CHNL.WF.008 1 LINE 197 65 PAGE UM HUSAK JULY 23, 1983 14:30:52 0 *FORMAT (308) source for channel interface manual. Does not include revisions for ECOs to work on block multiplexor channel. 00861/009C MERIT UMNET HARDWARE PROM MAKE SA G DIAG:PROMMAKE.S 5.1T2 1169 MERIT_UMNET_HARDWARE.PROM.SA.009 1 LINE 68 4 PAGE UM HUSAK JULY 23, 1983 14:30:54 0 *ASMH source for DEC absolute loader to INTEL hex converter GLP. Assumes two 2708's. 0 Referenced by comments of: 861/10 00861/010C MERIT UMNET HARDWARE PROM MAKE OC G DIAG:PROMMAKE.O 5.1T2 1170 MERIT_UMNET_HARDWARE.PROM.OC.010 1 LINE 80 1 PAGE UM HUSAK JULY 23, 1983 14:30:55 0 Object for (861/9). Good for ROM burners. 00861/011C MERIT UMNET HARDWARE MM DIAG S S K1YY:UN062.MMD(1) 5.1T2 1171 MERIT_UMNET_HARDWARE.MM_D.S.011 1 LINE 110 38 PAGE UM KNOPPER JULY 23, 1983 14:30:55 0 *PDP11ASR (686/32) source for MM16 diagnostic. This is probably the source for (861/12). Caveat emptor! Requires (715/5) and (715/9). 00861/012C MERIT UMNET HARDWARE MM DIAG B S MM16:MMDIAG.T 5.1T2 1172 MERIT_UMNET_HARDWARE.MM_D.B.012 1 LINE 80 9 PAGE UM KNOPPER JULY 23, 1983 14:30:57 0 Tape image for MM16 diagnostic. ********************************************************************** D5.1 version: This is the version we've been using for months, but it needs work. ********************************************************************** 1 SUN SEP 08/96 15:24:55 Page 748 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 861/11 00861/013C MERIT UMNET HARDWARE KHV-11 DIAG C O K1Y9:LINK.KHT 5.1T2 1173 MERIT_UMNET_HARDWARE.KHV-.C.013 1 LINE 63 1 PAGE UM HUSAK JULY 23, 1983 14:30:58 0 Command file to *LINK11 together KHV-11 diagnostic program. Requires the Merit CC support (715). 00861/014C MERIT UMNET HARDWARE KHV-11 DIAG S G K1YU:KHT.S 5.1T2 1174 MERIT_UMNET_HARDWARE.KHV-.S.014 1 LINE 105 11 PAGE UM HUSAK JULY 23, 1983 14:30:59 0 *PDP11ASR (686/32) source for KHV-11 diagnostic module. Requires the Merit CC support (715), especially (715/5) and (715/9). 00861/015C MERIT UMNET HARDWARE KHV-11 DIAG B G K1YU:KHT.O 5.1T2 1175 MERIT_UMNET_HARDWARE.KHV-.B.015 1 LINE 256 3 PAGE UM HUSAK JULY 23, 1983 14:30:59 0 PDP-11 object module for KHV-11 diagnostic command language. 00861/016C MERIT UMNET HARDWARE KHV-11 DIAG S G K1YU:KHTSA.S 5.1T2 1176 MERIT_UMNET_HARDWARE.KHV-.S.016 1 LINE 106 4 PAGE UM HUSAK JULY 23, 1983 14:31:00 0 *PDP11ASR (686/32) source for KHV-11 diagnostic command language standalone routines. Requires (861/20). 00861/017C MERIT UMNET HARDWARE KHV-11 DIAG B G K1YU:KHTSA.O 5.1T2 1177 MERIT_UMNET_HARDWARE.KHV-.B.017 1 LINE 256 3 PAGE UM HUSAK JULY 23, 1983 14:31:00 0 PDP-11 object for standalone portion of KHV-11 diagnostic. 00861/018C MERIT UMNET HARDWARE KHV-11 DIAG B G K1Y9:MINOS.KHT 5.1T2 1178 MERIT_UMNET_HARDWARE.KHV-.B.018 1 LINE 32767 13 PAGE UM HUSAK JULY 23, 1983 14:31:00 0 Core image of KHV-11 diagnostic program. 00861/019C MERIT UMNET HARDWARE KHV-11 DIAG B G K1Y9:TAPES.KHT 5.1T2 1179 MERIT_UMNET_HARDWARE.KHV-.B.019 1 LINE 247 13 PAGE UM HUSAK JULY 23, 1983 14:31:01 0 DEC absolute loader format version of KHV-11 diagnostic. 00861/020C MERIT UMNET HARDWARE SKEL LIB S O K1YU:SKEL.LIB 5.1T2 1180 MERIT_UMNET_HARDWARE.SKEL.S.020 1 LINE 81 15 PAGE UM HUSAK JULY 23, 1983 14:31:01 0 *PDP11ASR (686/32) source library for writing diagnostic routines, particularly the KHV ones. Requires (715/5) and (715/9). 0 Referenced by comments of: 861/16 00862/001C COBOL - VS SA G W116:VS.COBOL 5.1T2 1181 COBOL_-_VS..SA.001 1 LINE 72 4 PAGE UM YOUNG JULY 23, 1983 14:31:02 0 Source for VS COBOL compiler interface. 0 Referenced by comments of: 862/2 1 SUN SEP 08/96 15:24:55 Page 749 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00862/002C COBOL - VS OC G *COBOLVS 5.1T2 1182 COBOL_-_VS..OC.002 1 LINE 80 5 PAGE UM YOUNG JULY 23, 1983 14:31:03 0 Object of (862/1). Contains a $CONTINUE WITH ETC:VSS record which should be changed to refer to *VSS (1078/48). 0 Referenced by comments of: 862/9 00862/003C COBOL - VS SA G W116:VS.COBOL.E2 5.1T2 1183 COBOL_-_VS..SA.003 1 LINE 76 8 PAGE UM YOUNG JULY 23, 1983 14:31:04 0 Source for interface to run compiled COBOL/VS programs. Copies *GDINFODSECT (594). 0 Referenced by comments of: 862/4 00862/004C COBOL - VS OC G *COBOLVSRUN 5.1T2 1184 COBOL_-_VS..OC.004 1 LINE 4452 3 PAGE UM YOUNG JULY 23, 1983 14:31:04 0 Object of (862/3). Contains a $CONTINUE WITH ETC:VSS record which should be changed to refer to *VSS ( 1078/48). 0 Referenced by comments of: 862/7, 862/8 00862/005C COBOL - VS SA G W116:VS.LINK.E 5.1T2 1185 COBOL_-_VS..SA.005 1 LINE 73 9 PAGE UM YOUNG JULY 23, 1983 14:31:04 0 Source for interface to run IBM linkage editor. Copies *GDINFODSECT (594). 0 Referenced by comments of: 862/6 00862/006C COBOL - VS OC G *COBLINKEDIT 5.1T2 1186 COBOL_-_VS..OC.006 1 LINE 4672 4 PAGE UM YOUNG JULY 23, 1983 14:31:05 0 Object for (862/5). Contains a $CONTINUE WITH *VSS (1078/48) record. Uses ETC:SYS1.LINKLIB (1078/61). 00862/007C COBOL - VS OL G # ETC:VSCOBOL.LIB2 UM YOUNG 0 VSS library version of VS COBOL library. Used by *COBOLVSRUN (862/4). NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. 00862/008C COBOL - VS OL G # ETC:VSCOBOL.LIB UM YOUNG 0 MTS library version of VS COBOL library. Used by *COBOLVSRUN (862/4). NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. 1 SUN SEP 08/96 15:24:55 Page 750 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00862/009C COBOL - VS OC G # ETC:VSCOBOL.COMP UM YOUNG 0 IBM VS COBOL compiler used by *COBOLVS (862/2). NOT DISTRIBUTED DUE TO COPYRIGHT RESTRICTIONS. 00862/010C COBOL - VS MEMO 439 WF G W116:CCMEMO.439 5.1T2 1187 COBOL_-_VS.MEMO_439.WF.010 1 LINE 100 17 PAGE UM YOUNG JULY 23, 1983 14:31:05 0 This is Computing Center Memo 439 -- "IBM VS COBOL under MTS." 0 Referenced by comments of: 862/11 00862/011C COBOL - VS MEMO 439 PF S0672 CCMEMO 'CCMEMOS' FSNAME=M439.OUTPUT 5.1T2 1188 COBOL_-_VS.MEMO_439.PF.011 1 LINE 70 23 PAGE UM YOUNG OCT. 13, 1982 12:42:51 0 This is the printer-ready version of (862/10). 00863/001C TELL-A-GRAF # (SOFTWARE NOT DISTRIBUTED) UM WHIPPLE 0 TELL-A-GRAF is a proprietary software product of ISSCO. It is a standalone program for doing two-dimensional computer graphics. TELL-A-GRAF is not distributed by UM due to copyright restrictions. 00863/002C TELL-A-GRAF MEMO 450 WF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO450.SOU 5.1T2 1189 TELL-A-GRAF.MEMO_450.WF.002 1 LINE 225 10 PAGE UM WHIPPLE MAY 04, 1983 17:01:32 0 This is Computing Center Memo 450 -- "TELL-A-GRAF in MTS." 0 Referenced by comments of: 863/3 00863/003C TELL-A-GRAF MEMO 450 PF G S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO450.OUT 5.1T2 1190 TELL-A-GRAF.MEMO_450.PF.003 1 LINE 72 12 PAGE UM WHIPPLE MAY 04, 1983 17:01:11 0 Printer-ready version of (863/2). 00864/001C RELEASE/HOLD BATCH *RHB C G *RHB 5.1T2 1191 RELEASE/HOLD_BATCH.?RHB.C.001 1 LINE 54 1 PAGE UM MTA JULY 23, 1983 14:31:36 SYS:*RHB 0 An operator job controlled by *AUTOSTART (816/5) which issues appropriate HASP $RELEASE and $HOLD commands for different rate groups based on data in the file SYS:AUTOHASP.CTL (864/4). 0 Referenced by comments of: 864/2, 864/4 00864/002C RELEASE/HOLD BATCH MTA:AUTOHASP SA G MTA:AUTOHASP(*F,999) 5.1T2 1192 RELEASE/HOLD_BATCH.MTA:AU.SA.002 1 LINE 107 3 PAGE UM MTA JULY 23, 1983 14:31:36 0 Source for program run by *RHB (864/1). Uses SEG2:MONITORS (559/4). Assemble with COPY:MISC.MACROS (728/1) with PAR=TEST,PEXIT=*PEXIT. 1 SUN SEP 08/96 15:24:55 Page 751 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 864/3 00864/003C RELEASE/HOLD BATCH SYS:AUTOHASP OC G SYS:AUTOHASP 5.1T2 1193 RELEASE/HOLD_BATCH.SYS:AU.OC.003 1 LINE 1474 3 PAGE UM MTA JULY 23, 1983 14:31:37 SYS:AUTOHASP 0 Object of (864/2). 00864/004C RELEASE/HOLD BATCH AUTOHASP.CTL D G SYS:AUTOHASP.CTL 5.1T2 1194 RELEASE/HOLD_BATCH.AUTOHA.D.004 1 LINE 33 1 PAGE UM MTA JULY 23, 1983 14:31:37 0 Used by *RHB (864/1). 0 Referenced by comments of: 864/1 00865/001C *DUMPSYSPGNTS *DUMPSYSPGNTS C G *DUMPSYSPGNTS 5.1T2 1195 DUMPSYSPGNTS.?DUMPSYSPGNT.C.001 1 LINE 68 1 PAGE UM BURLING JULY 23, 1983 14:31:37 *DUMPSYSPGNTS 0 Operator file controlled by *AUTOSTART (816/5) which prints the system program interrupt log. Refers to SEG2:MONITORS (559/4). 0 Referenced by comments of: 865/5 00865/002C *DUMPSYSPGNTS SOURCE SA G DUMP:PGNTPRINT(1000) 5.1T2 1196 DUMPSYSPGNTS.SOURCE.SA.002 1 LINE 72 3 PAGE UM BURLING JULY 23, 1983 14:31:37 0 This is the source file for the program run by *DUMPSYSPGNTS. Copies COPY:CMDAREADSECT (531/2). 0 Referenced by comments of: 865/3 00865/003C *DUMPSYSPGNTS OBJECT OC G DUMP:PGNTPRINT(1,999) 5.1T2 1197 DUMPSYSPGNTS.OBJECT.OC.003 1 LINE 80 4 PAGE UM BURLING JULY 23, 1983 14:31:39 DUMP:PGNTPRINT 0 Object of (865/2). 00865/004C *DUMPSYSPGNTS D G # DUMP:CMDSTATTYP24 UM BURLING DUMP:CMDSTATTYP24@E 0 File containing the system program interrupt log. 00865/005C *DUMPSYSPGNTS D G # DUMP:PGNTRECEIPTS UM BURLING DUMP:PGNTRECEIPTS@E 0 File containing the receipt numbers for jobs printed by *DUMPSYSPGNTS (865/1). 1 SUN SEP 08/96 15:24:55 Page 752 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00866/001C RESPONSE TIME DATA SOURCE SA G W034:RTDC.S 5.1T3 352 RESPONSE_TIME_DATA.SOURCE.SA.001 1 LINE 71 8 PAGE UM MTS OGDEN AUG. 20, 1983 19:49:29 0 Assembler source for the response time data collection area and routines. Assemble using *SYSMAC, COPY:MTS.MACROS (344/3), OLD.:CC.MACROS (1054/4), COPY:MISC.MACROS (728/1) and *PEXIT. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQUS (087). 00866/002C RESPONSE TIME DATA OBJECT OC G SEG2:RTDC 5.1T3 353 RESPONSE_TIME_DATA.OBJECT.OC.002 1 LINE 80 2 PAGE UM MTS OGDEN AUG. 20, 1983 19:49:29 SEG2:RTDC 0 Object for response time data collection area and routines, normally loaded into shared VM using Pistle. Contains a $CW for COPY:SYSDEFS (579/3). 00866/003C RESPONSE TIME DATA CONTROL PGM SW G W034:RESPONSE.S(1,999) 5.1T3 354 RESPONSE_TIME_DATA.CONTRO.SW.003 1 LINE 92 6 PAGE UM MTS OGDEN AUG. 20, 1983 19:49:30 0 PascalVS program to enable, disable and control response time data collection using the data collection routines and area. 0 Referenced by comments of: 866/4, 866/5 00866/004C RESPONSE TIME DATA CONTROL DATA P SA G W034:RESPONSE.S(1000) 5.1T3 355 RESPONSE_TIME_DATA.CONTRO.SA.004 1 LINE 62 1 PAGE UM MTS OGDEN AUG. 20, 1983 19:49:31 0 An assembler routine to read CMDSTAT type 28 records. Used by the above Pascal program (866/3). Assemble using *SYSMAC. Copies COPY:CMDAREADSECT (531/2). 0 Referenced by comments of: 866/5 00866/005C RESPONSE TIME DATA CONTROL OBJ OC G W034:RESPONSE 5.1T3 356 RESPONSE_TIME_DATA.CONTRO.OC.005 1 LINE 15046 6 PAGE UM MTS OGDEN AUG. 20, 1983 19:49:31 0 Object of the Pascal program (866/3) and the assembler subroutine (866/4). Contains a $CW line for *PASCALVSLIB (823/6) and COPY:SYSDEFS (579/3). 00867/001 MTS VOLUME 13 (NEW) WT S1666 MTSV13 'MTS MANUALS' POSN=NEWM1.V13 UM MANUAL 0 TEXT/360 input for Volume 13 "Symbolic Debugging System" of the UM MTS manuals (in publication). Editor: Richard A. Salisbury Note: this is a different manual than the original MTS Volume 13 (510) "Data Concentrator User's Guide" which is obsolete. 0 Referenced by comments of: 510/1 1 SUN SEP 08/96 15:24:55 Page 753 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 00867/002 MTS VOLUME 13 (NEW) PT S1666 MTSV13 'MTS MANUALS' POSN=PRINT1.V13 UM MANUAL 0 TEXT/360 print file. There is also a Xerox 9700 print file (which is slightly modified from the TEXT/360 print file), available on request. 01000/001 INTERACTIVE_FORTRAN INSTALL.PROC WF G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.INSTA.WF.001(1) 1042 5.0T3 1042 INTERACTIVE_FORTRAN.INSTA.WF.001 1 LINE 80 2 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:20:35 5.0T8 421 0 Description of the procedure for installing INTERACTIVE FORTRAN. ******************************************************************* D5.0 version: This is the Spring 1981 version which includes: -- many bug fixes. -- /RERUN command, which reissues the last /RUN command. -- /SET AUTOLINE=ON command which causes the FORTRAN source statement to be displayed along with the usual information whenever a suspension occurs. -- changes to the error printer so that lines longer than the screen width are split at a blank and printed on two lines. Also, in batch error messages are emphasized in the manner in which FORTRAN I/O messages are emphasized. ********************************************************************* 01000/002 INTERACTIVE_FORTRAN *IF SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.*IF.SA.002(1) 1043 5.0T3 1043 INTERACTIVE_FORTRAN.*IF.SA.002 1 LINE 72 9 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:20:36 5.0T8 422 0 ASSEMBLER source code for routine which calls IF. May require local mods - read the comments in this module carefully. 0 Referenced by comments of: 1000/5, 1000/6, 1000/7 01000/003A INTERACTIVE_FORTRAN *IF OE G *IF 5.1T2 1198 INTERACTIVE_FORTRAN.?IF.OE.003 1 LINE 32767 54 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:39 *IF 0 This is the user-runnable *IF object. Lines 1,999 contain the IF calling routine. If *IF is to be loaded into shared memory, lines 1,999 should be placed in *IF with two cards appended: LCS LCSYMBOL LDT Lines 1000,*L should be placed in SEG2:IF following a COM.IF record, and the LDT card should be removed. Lines 1000,*L have been squashed, combined, and purged by the linkage editor. 1 SUN SEP 08/96 15:24:55 Page 754 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01000/004 INTERACTIVE_FORTRAN MACLIB SM G FORT:IF.MACLIB 5.0T3 1045 INTERACTIVE_FORTRAN.MACLI.SM.004 1 LINE 83 66 PAGE UBC O'REILLY HANSEN JULY 03, 1981 20:26:48 5.0T8 424 0 Macro library containing macros and copy sections used by all IF modules; command streams for assembling any component may be found in the negative line number area of each source file. All copy sections (except the interpreter dsects) have been included in this macro library. Any IF module can be assembled by using *ASMH and specifying 0=*SYSMAC and 2=MACLIB. 01000/005A INTERACTIVE_FORTRAN ELMQQSV M G ETC:IF.ELMQQSV 5.1T2 1199 INTERACTIVE_FORTRAN.ELMQQ.M.005 1 LINE 138 46 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:41 ETC:IF.ELMQQSV 0 IF error message file - must be implemented @i. The negative line number region of this file contains a series of messages which are printed when a dump occurs -- these messages should be changed to suit the installation. The error message file is formatted as follows: TERSE messages : lines 1-4999 NORMAL messages : lines 5000-9999 LONG messages : lines 10000-14999 VERBOSE messages : lines 15000-19999 If you change a message, be sure to change all 4 verbosities. See the comments in *IF (1000/2) for more information. Line -1 of this file should be changed to contain the local person to contact in case of a problem. 01000/006A INTERACTIVE_FORTRAN ETC:IF.DUMP D G # ETC:IF.DUMP RD15 452 INTERACTIVE_FORTRAN.DUMPS.M.06 1 SEQ 72 3 PAGE UBC O'REILLY HANSEN AUG. 30, 1978 22:31:50 ETC:IF.DUMP@E 0 File which collects dump information (program interrupts in IF). See the comments in *IF (1000/2) for more information. Note this must be a sequential file; the other auxiliary files are line files. Dumps are actually only program interrupts in IF, and usually occur as the result of a user program clobbering IF control information. You may see several pieces of information appended to the first line of the dump: "EXT" - means that an external routine was called at least once, which adds weight to the hypothesis that the dump was caused by a bug in an external routine, rather than by a bug in IF. "ARG" - means that the "/SET ARGCHK=ON" feature was enabled and was used at least once, which also adds weight to the hypothesis that the dump was not caused by a 1 SUN SEP 08/96 15:24:55 Page 755 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 bug in IF. Dumps are logged to this file by the MDEBUG subcomponent (1000/20). 01000/007A INTERACTIVE_FORTRAN EXPLAIN M G ETC:IF.EXPLAIN 5.1T2 1200 INTERACTIVE_FORTRAN.EXPLA.M.007 1 LINE 79 23 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:43 ETC:IF.EXPLAIN 0 IF command explain file; see the comments in *IF (1000/2) for further information. This file is generated by using the FORMAT source for the IF manual (1000/9) as a database. Note that the description of /SET ALIGN=ON,OFF has been added to the explanation of the /SET command (do a /EXPLAIN /SET). 01000/008A INTERACTIVE_FORTRAN ETC:IF.STAT D G # ETC:IF.STAT RD15 454 INTERACTIVE_FORTRAN.STATIS.M.08 1 LINE 62 109 PAGE UBC O'REILLY HANSEN AUG. 30, 1978 22:31:53 ETC:IF.STAT@E 0 Use statistics collection file; note that line 0 of this file may contain a message to be displayed upon invocation of IF (this facility existed before the loader supported "MSG" cards). If line 0 does contain an invocation message, the file should be permitted RWEXP OTHERS; if line 0 does not contain an invocation message, the file should be permitted WEXP OTHERS. 0 Referenced by comments of: 1000/37, 1000/39 01000/009 INTERACTIVE_FORTRAN WRITEUP WF G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.WRITE.WF.009(1) 1048 5.0T3 1048 INTERACTIVE_FORTRAN.WRITE.WF.009 1 LINE 93 58 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:21:28 5.0T8 427 0 This is the FORMAT source for the IF writeup. 0 Referenced by comments of: 1000/7 01000/010 INTERACTIVE_FORTRAN WRITEUP PF G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.WRITE.PF.010(1) 1049 5.0T3 1049 INTERACTIVE_FORTRAN.WRITE.PF.010 1 LINE 117 101 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:21:38 5.0T8 428 0 This is the IF writeup, suitable for copying to a printer. 01000/011A INTERACTIVE_FORTRAN TEST.VERSION OC G FORT:IF.TEST 5.1T2 1201 INTERACTIVE_FORTRAN.TEST..OC.011 1 LINE 2104 3 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:44 0 Test version of IF. All of the object modules comprising the re-entrant processor, source in (1000/12) through (1000/32) and (1000/35), are in this file. They are squashed but not combined or purged so that individual csects are still accessible and replaceable. A shared VM version of IF is created by COMBINing and PURGing the object decks in this file using the LINKAGE EDITOR (297). 1 SUN SEP 08/96 15:24:55 Page 756 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01000/012A INTERACTIVE_FORTRAN DIRECT SA G FORT:IF.DIRECT 5.1T2 1202 INTERACTIVE_FORTRAN.DIREC.SA.012 1 LINE 78 35 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:44 0 MAIN COMMAND PROCESSOR; APPEARS IN |MAP AS DIR. 0 Referenced by comments of: 1000/11 01000/013 INTERACTIVE_FORTRAN EL SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.EL.SA.013(1) 1052 5.0T3 1052 INTERACTIVE_FORTRAN.EL.SA.013 1 LINE 72 25 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:22:39 5.0T8 431 0 Error message printer; appears in |MAP as EL. 01000/014 INTERACTIVE_FORTRAN GSC SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.GSC.SA.014(1) 1053 5.0T3 1053 INTERACTIVE_FORTRAN.GSC.SA.014 1 LINE 79 36 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:22:41 5.0T8 432 0 Semantic code generator; appears in |MAP as GENCODE. 01000/015 INTERACTIVE_FORTRAN IFRD SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.IFRD.SA.015(1) 1054 5.0T3 1054 INTERACTIVE_FORTRAN.IFRD.SA.015 1 LINE 72 18 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:22:44 5.0T8 433 0 Free format input routine; appears in |MAP as IFRDCODE. 01000/016 INTERACTIVE_FORTRAN INT SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.INT.SA.016(1) 1055 5.0T3 1055 INTERACTIVE_FORTRAN.INT.SA.016 1 LINE 72 226 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:22:46 5.0T8 434 0 The interpreter. Appears in |MAP as INTE. 01000/017 INTERACTIVE_FORTRAN IS SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.IS.SA.017(1) 1056 5.0T3 1056 INTERACTIVE_FORTRAN.IS.SA.017 1 LINE 80 43 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:05 5.0T8 435 0 Semantic checking routine; appears in |MAP as SIMLATOR. 01000/018 INTERACTIVE_FORTRAN LEX SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.LEX.SA.018(1) 1057 5.0T3 1057 INTERACTIVE_FORTRAN.LEX.SA.018 1 LINE 79 28 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:08 5.0T8 436 0 Lexical scanner; appears in |MAP as LEX. 01000/019 INTERACTIVE_FORTRAN LIN SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.LIN.SA.019(1) 1058 5.0T3 1058 INTERACTIVE_FORTRAN.LIN.SA.019 1 LINE 79 26 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:11 5.0T8 437 0 Lexical scanner input routine; appears in |MAP as LIN. 1 SUN SEP 08/96 15:24:55 Page 757 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01000/020 INTERACTIVE_FORTRAN MDEBUG SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.MDEBU.SA.020(1) 1059 5.0T3 1059 INTERACTIVE_FORTRAN.MDEBU.SA.020 1 LINE 80 31 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:13 5.0T8 438 0 Built-in SDS-like debugging facility; documentation is a separate component (1000/33). Has BREAKPOINTs, ATPOINTs, and an instruction simulator much like SDS. Appears in |MAP as MDG. 0 Referenced by comments of: 1000/6, 1000/33 01000/021 INTERACTIVE_FORTRAN MON SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.MON.SA.021(1) 1060 5.0T3 1060 INTERACTIVE_FORTRAN.MON.SA.021 1 LINE 80 15 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:17 5.0T8 439 0 Compiler monitor; contains entry point named "IF". appears in |MAP as MON. 01000/022 INTERACTIVE_FORTRAN OUT SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.OUT.SA.022(1) 1061 5.0T3 1061 INTERACTIVE_FORTRAN.OUT.SA.022 1 LINE 79 31 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:19 5.0T8 440 0 Another command processor; appears in |MAP as SUBOUT. Note: This module copies the interpreter dsects. 01000/023 INTERACTIVE_FORTRAN PARSE SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.PARSE.SA.023(1) 1062 5.0T3 1062 INTERACTIVE_FORTRAN.PARSE.SA.023 1 LINE 79 49 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:23 5.0T8 441 0 The parser; appears in |MAP as PARSER. 01000/024 INTERACTIVE_FORTRAN SCOM SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SCOM.SA.024(1) 1063 5.0T3 1063 INTERACTIVE_FORTRAN.SCOM.SA.024 1 LINE 72 23 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:27 5.0T8 442 0 COMMON routine; appears in |MAP as SCOM#. 01000/025 INTERACTIVE_FORTRAN SEQV SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SEQV.SA.025(1) 1064 5.0T3 1064 INTERACTIVE_FORTRAN.SEQV.SA.025 1 LINE 79 18 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:30 5.0T8 443 0 EQUIVALENCE routine; appears in |MAP as SEQV#. 01000/026 INTERACTIVE_FORTRAN SIM SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SIM.SA.026(1) 1065 5.0T3 1065 INTERACTIVE_FORTRAN.SIM.SA.026 1 LINE 78 19 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:32 5.0T8 444 0 compilation monitor; appears in |MAP as SIM. 01000/027 INTERACTIVE_FORTRAN SLABEL SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.SLABE.SA.027(1) 1066 5.0T3 1066 INTERACTIVE_FORTRAN.SLABE.SA.027 1 LINE 72 10 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:33 5.0T8 445 0 Label checking routine; appears in |MAP as SLABEL. 1 SUN SEP 08/96 15:24:55 Page 758 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01000/028A INTERACTIVE_FORTRAN SPACE SA G FORT:IF.CORE 5.1T2 1203 INTERACTIVE_FORTRAN.SPACE.SA.028 1 LINE 78 19 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:46 0 Virtual memory management; appears in |MAP as CORE. 01000/029A INTERACTIVE_FORTRAN SYMBOL SA G FORT:IF.SYMBOL 5.1T2 1204 INTERACTIVE_FORTRAN.SYMBO.SA.029 1 LINE 104 32 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:46 0 Symbol table routines; appears in |MAP as SYMBOL. 01000/030 INTERACTIVE_FORTRAN TPUT SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.TPUT.SA.030(1) 1069 5.0T3 1069 INTERACTIVE_FORTRAN.TPUT.SA.030 1 LINE 80 22 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:39 5.0T8 448 0 Interface to operating system; 99% of system dependency is gated through this module. In fact, IF runs under TSS. Appears in |MAP as TPUT. 01000/031A INTERACTIVE_FORTRAN XLOADER SA G FORT:IF.XLOADER 5.1T2 1205 INTERACTIVE_FORTRAN.XLOAD.SA.031 1 LINE 86 95 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:48 0 IF's external loader and interface to UMLOAD. Appears in |MAP as XLD. 01000/032 INTERACTIVE_FORTRAN FUNCTIONS SA G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.FUNCT.SA.032(1) 1071 5.0T3 1071 INTERACTIVE_FORTRAN.FUNCT.SA.032 1 LINE 80 7 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:55 5.0T8 450 0 Code for ELEMENTARY FUNCTIONS not found in EFL (525); these are typically the "in-line" FORTRAN functions. This also serves as the error monitor for EFL. IF uses the standard system EFL library (525) and standard system FORTRAN I/O support (1002). 0 Referenced by comments of: 1000/11 01000/033 INTERACTIVE_FORTRAN MDEBUG WF G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.MDEBU.WF.033(1) 1072 5.0T3 1072 INTERACTIVE_FORTRAN.MDEBU.WF.033 1 LINE 89 8 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:56 5.0T8 451 0 Documentation for MDEBUG, the IF SDS-like debugging facility (1000/20). 0 Referenced by comments of: 1000/20 01000/034 INTERACTIVE_FORTRAN CALLINGIF WF G S1560 5.0T3 VLO FSNAME=INTERACTIVE_FORTRAN.CALLI.WF.034(1) 1073 5.0T3 1073 INTERACTIVE_FORTRAN.CALLI.WF.034 1 LINE 87 4 PAGE UBC O'REILLY HANSEN FEB. 26, 1981 10:23:57 5.0T8 452 0 WRITEUP DESCRIBING HOW TO CALL RESIDENT IF AS A SUBROUTINE. 01000/035A INTERACTIVE_FORTRAN EDITOR SA G FORT:IF.EDITOR 5.1T2 1206 INTERACTIVE_FORTRAN.EDITO.SA.035 1 LINE 81 31 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:52 0 This is the interface to the MTS editor. NOTE: The ED.MAC component (1000/36) is required as an additional macro 1 SUN SEP 08/96 15:24:55 Page 759 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 library to assemble this component. 0 Referenced by comments of: 1000/11, 1000/36 01000/036A INTERACTIVE_FORTRAN ED.MAC SM G FORT:IF.ED.MAC 5.1T2 1207 INTERACTIVE_FORTRAN.ED.MA.SM.036 1 LINE 72 26 PAGE UBC O'REILLY HANSEN JULY 23, 1983 14:31:53 0 Old version of structured macros that are required to assemble the EDITOR subcomponent (1000/35). 0 Referenced by comments of: 1000/35 01000/037A INTERACTIVE_FORTRAN STATSCAN SQ O FORT:IF.STATSCAN(1000,2999) 5.1T2 1208 INTERACTIVE_FORTRAN.STATS.SQ.037 1 LINE 117 12 PAGE UM HANSEN JULY 23, 1983 14:31:55 0 PLUS source for a program to summarize information in the IF statistics file (1000/8). Refers to (1000/8) and (1000/40). It is self-describing with a HELP command. 0 Referenced by comments of: 1000/38, 1000/39 01000/038A INTERACTIVE_FORTRAN STATSCAN SA O FORT:IF.STATHELPS 5.1T2 1209 INTERACTIVE_FORTRAN.STATS.SA.038 1 LINE 64 1 PAGE UM HANSEN JULY 23, 1983 14:31:56 0 Assembly source for the HELP subroutine used by (1000/37). 0 Referenced by comments of: 1000/39 01000/039A INTERACTIVE_FORTRAN STATSCAN OC O FORT:IF.STATSCAN(1,999) 5.1T2 1210 INTERACTIVE_FORTRAN.STATS.OC.039 1 LINE 4076 13 PAGE UM HANSEN JULY 23, 1983 14:31:56 0 Object for (1000/37) and (1000/38). Refers to (1000/8) and (1000/40). Contains a $CONTINUE WITH *PLUS.OBJLIB (1042/64) record. 0 Referenced by comments of: 1000/40 01000/040 INTERACTIVE_FORTRAN STATSCAN D O FORT:IF.STATHELP 5.0T3 1079 INTERACTIVE_FORTRAN.STATS.D.040 1 LINE 65 1 PAGE UM HANSEN JULY 03, 1981 20:28:25 5.0T8 458 0 The HELP file used by (1000/39). 0 Referenced by comments of: 1000/37, 1000/39 01002/001A FIX USER_OBJECT OC G S1644 5.0BT1 VLO FSNAME=FIX.USER_OBJECT.OC.001(1) 848 5.1T2 1211 FIX.USER_OBJECT.OC.001 1 LINE 32767 20 PAGE UBC TIFFANY NOV. 21, 1982 22:31:44 0 This is the unlinked object file containing SYM records. This file should not be used for the shared VM load as it does not include the necessary low core symbol table nor the COM record for PISTLE. ------------------- MAY 1979 UBC COMMENTS --------------- This is VERSION 1.9 of FIX. 1 SUN SEP 08/96 15:24:55 Page 760 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This distribution does NOT include WSU's extended precision updates. This version sent with the following GLOBAL symbols set: &ID = 'ETC.' &SEP = ':' &FILEPFX = 'NEW.' We had hoped that this would be our official version, but it isn't yet. It has been our test version since May 13, 1979 and is scheduled to become permanent on Aug. 1, 1979. **************************************************************************** This is the UM version. **************************************************************************** 0 Referenced by comments of: 422/1, 1000/32, 3023/9 01002/002A FIX SHARED_OBJECT OE G SEG2:FIX 5.1T2 1212 FIX.SHARED_OBJECT.OE.002 1 LINE 32767 51 PAGE UBC STEVENS TIFFANY JULY 23, 1983 14:32:33 SEG2:FIX 0 This is the linkeditted version containing all necessary items for inclusion as the resident version. ------------------- May 1979 --------------- 01002/003A FIX MESSAGE M G ETC:FIX.MESSAGES 5.1T2 1213 FIX.MESSAGE.M.003 1 LINE 190 6 PAGE UBC STEVENS TIFFANY JULY 23, 1983 14:32:35 ETC:FIX.MESSAGES 0 This is the message file for all FIX error messages. The name of this file is determined by the setting of items in the GLOBALS copy section: FDNAME=&ID.&SEP.&FILEPFX.MESSAGES. This is an indexed file and must be restored @I. ------------------- May 1979 --------------- Some of the messages have been changed to upper/lower case. This will continue as time permits. **************************************************************************** This is the UM version. **************************************************************************** 01002/004A FIX EXPLAIN D G ETC:FIX.EXPLAIN 5.1T2 1214 FIX.EXPLAIN.D.004 1 LINE 70 8 PAGE UBC STEVENS TIFFANY JULY 23, 1983 14:32:36 ETC:FIX.EXPLAIN 0 This file contains the text for the EXPLAIN command. The name of this file is determined by the setting of items in the GLOBALS copy section: FDNAME=&ID.&SEP.&FILEPFX.EXPLAIN. This is an indexed file and must be restored @I. 1 SUN SEP 08/96 15:24:55 Page 761 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ------------------- May 1979 --------------- **************************************************************************** This is the UM version. **************************************************************************** ***************************************************************************** D5.0 changes, already distributed on D4.3A: Text is now in mixed case. ***************************************************************************** 01002/005A FIX FIX_PSECT SA G ETC:FIX.FIODSCT 5.1T2 1215 FIX.FIX_PSECT.SA.005 1 LINE 72 11 PAGE UBC STEVENS TIFFANY JULY 23, 1983 14:32:36 ETC:FIX.FIODSCT 0 The main FIX PSECT. Required as a separate file for system dumps for mnemonic dumping via PRDSCT. The name of this file is determined by the setting of items in the GLOBALS copy section: FDNAME=&ID.&SEP.&FILEPFX.FIODSCT. ------------------- May 1979 --------------- 0 Referenced by comments of: 1002/12, 1002/28, 3023/9, 3023/11 01002/006A FIX UNIT_PSECT SA G ETC:FIX.UNITDSCT 5.1T2 1216 FIX.UNIT_PSECT.SA.006 1 LINE 72 3 PAGE UBC STEVENS TIFFANY JULY 23, 1983 14:32:37 ETC:FIX.UNITDSCT 0 The FIX unit dsect. Required as a separate file for system dumps for mnemonic dumping via PRDSCT. The name of this file is determined by the setting of items in the GLOBALS copy section: FDNAME=&ID.&SEP.&FILEPFX.UNITDSCT. ------------------- May 1979 --------------- 0 Referenced by comments of: 1002/12 01002/007 FIX NEWS P S1560 5.0T3 VLO FSNAME=FIX.NEWS.P.007(1) 1086 5.0T3 1086 FIX.NEWS.P.007 1 LINE 63 2 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:45:37 5.0T8 465 0 The UBC news file regarding changes in the FORTRAN status. ------------------- May 1979 --------------- 01002/008 FIX DOCUMENTATION WF B S1560 5.0T3 VLO FSNAME=FIX.DOCUMENTATION.WF.008(1) 1087 5.0T3 1087 FIX.DOCUMENTATION.WF.008 1 LINE 145 72 PAGE UBC STEVENS TIFFANY FEB. 23, 1981 19:29:39 5.0T8 466 0 The UBC document describing FIX. ------------------- May 1979 --------------- 1 SUN SEP 08/96 15:24:55 Page 762 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01002/009 FIX DOCUMENTATION PF B S1560 5.0T3 VLO FSNAME=FIX.DOCUMENTATION.PF.009(1) 1088 5.0T3 1088 FIX.DOCUMENTATION.PF.009 1 LINE 132 103 PAGE UBC STEVENS TIFFANY FEB. 23, 1981 19:29:44 5.0T8 467 0 The print ready version of the UBC documentation. ------------------- May 1979 --------------- 01002/010 FIX INTERNAL_DOC WF G S1560 5.0T3 VLO FSNAME=FIX.INTERNAL_DOC.WF.010(1) 1089 5.0T3 1089 FIX.INTERNAL_DOC.WF.010 1 LINE 80 30 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:45:59 5.0T8 468 0 The *FMT source for the internal documentation describing how FIX is put together. ------------------- May 1979 --------------- 01002/011 FIX INTERNAL_DOC PF G S1560 5.0T3 VLO FSNAME=FIX.INTERNAL_DOC.PF.011(1) 1090 5.0T3 1090 FIX.INTERNAL_DOC.PF.011 1 LINE 69 41 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:04 5.0T8 469 0 The print ready version of the internal documentation. ------------------- May 1979 --------------- 01002/012A FIX MACRO_LIBRARY SM G S1644 5.0BT1 VLO FSNAME=FIX.MACRO_LIBRARY.SM.012(1) 854 5.1T2 1217 FIX.MACRO_LIBRARY.SM.012 1 LINE 73 16 PAGE UBC STEVENS TIFFANY NOV. 21, 1982 22:32:05 0 The macro library to be used with all assemblies. Only two copy sections are not included here - FIODSCT (1002/5) and UNITDSCT (1002/6). These should be restored as separate files. ------------------- May 1979 --------------- The copy section GLOBALS has been updated for other installations as per their requests. We have not had any requests from RPI or Brazil in this regard and have not yet added these - hopefully we can add one as "standard", perhaps UM?, and reduce the number of different types. A new macro ADRYTEST has been added to test the addressability of a given address. Used mainly by FIODEBUG. **************************************************************************** This is the UM version. **************************************************************************** ************************************************************************** D5.0 version: New return code added for LOADF: -5: Loading aborted by attention interrupt. ************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 763 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1002/13, 1002/14, 1002/15, 1002/16, 1002/17, 1002/18, 1002/19, 1002/20, 1002/21, 1002/22, 1002/23, 1002/25, 1002/27, 1002/28, 3023/9 01002/013 FIX INIT SA G S1560 5.0T3 VLO FSNAME=FIX.INIT.SA.013(1) 1092 5.0T3 1092 FIX.INIT.SA.013 1 LINE 87 6 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:17 5.0T8 471 0 The PSECT initializer routine. This routine contains the entry points FIXINIT, UINIT, and UINITI. The first call to FIXINIT causes the PSECT to be initialized, FIXINITI, including the default &ID as specified in the GLOBALS copy section. If your defaults are the same as UBC, except for &ID then just re-assemble this module and replace in the distributed object module. The PSECT may also be re-initialized via a call to FIXINITI. The code to acquire and initialize a unit dsect is also contained in this module, UINIT. The entry FIXEND is called to restore all necessary things before returning to the FORTRAN program. Currently this consists of restoring the floating point registers. Dependent on the setting of the assembly flag &DEBUG, this module also collects statistics of usage. This was useful during the growing stage of FIX. All source routines which STEVENS is responsible for will have untidied Assembler source lines except for new releases. The purpose of this is to leave an "audit" trail of changes made to the particular routine. This is my own "checkpoint" feature which few, if any, others use. If it bothers you, I will send only tidied source in the future. ------------------- May 1979 --------------- ******************************************************************************** Copies *CNFGINFODSECT (654). Assemble using the FIX MACRO LIBRARY (1002/12). ******************************************************************************** 0 Referenced by comments of: 1002/28 01002/014 FIX FTN_TRANSFER SA G S1560 5.0T3 VLO FSNAME=FIX.FTN_TRANSFER.SA.014(1) 1093 5.0T3 1093 FIX.FTN_TRANSFER.SA.014 1 LINE 81 17 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:18 5.0T8 472 0 This is the FIX version of IBM's IBCOM#. The initial transfer vector is included along with the code to perform unformatted I/O. The define file entry DIOCS# is also included in this module. Programs which store information in the area after the initial transfer vector, e.g. SNOBOL, will not work with a resident version of FIX. They will have to run with a non-resident version of FIX. Space has been left in the transfer vector for those routines which use this area for various purposes. 1 SUN SEP 08/96 15:24:55 Page 764 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Two extra words have been added to the transfer vector: 1. An entry for IF, Interactive Fortran. 2. An entry for STOP from the error monitor. As well, the FTNX branch has been added to the table. This should be the first loaded routine. On program interrupts, ERRMON uses the address of IBCOM and end of ERRMON to determine if the interrupt occurred in FIX. Most FORTRAN I/O calls are made to this module via a transfer vector. Only calls not made are NAMELIST, DEBUG, FTNCMD. ------------------- May 1979 --------------- ******************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). ******************************************************************** 0 Referenced by comments of: 1002/28 01002/015 FIX UNIT_CONTROL SA G S1560 5.0T3 VLO FSNAME=FIX.UNIT_CONTROL.SA.015(1) 1094 5.0T3 1094 FIX.UNIT_CONTROL.SA.015 1 LINE 83 21 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:21 5.0T8 473 0 This is the source code for the FIX version of IBM's FIOCS# known as the "UNIT CONTROL ROUTINES", UCR. Calls to UCR are via direct calls rather than IBM's transfer vector method. All I/O to FORTRAN units is done through this module. Processing of $ENDFILE records is determined by the &ENDFILE global symbol in the GLOBALS copy section. ------------------- May 1979 --------------- The following changes have been made to the unit control routines since the last distribution: 1. Problems with indexed I/O and concatenated files have forced us to disallow this feature to users. All indexed I/O is now done with explicit and implicit concatenation turned off. 2. A check has been made for no error message returned by GDINFO on an error return from READ or WRITE; the TAPE DSR returns no message for RC=4 on write. **************************************************************************** Copies *GDINFODSECT (594). Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 0 Referenced by comments of: 1002/28 1 SUN SEP 08/96 15:24:55 Page 765 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01002/016 FIX FORMAT_IO SA G S1560 5.0T3 VLO FSNAME=FIX.FORMAT_IO.SA.016(1) 1095 5.0T3 1095 FIX.FORMAT_IO.SA.016 1 LINE 72 32 PAGE UBC BUCKLAND TIFFANY JUNE 29, 1979 14:46:23 5.0T8 474 0 The module for decoding compiled formats and performing the necessary conversions. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 01002/017 FIX VARIABLE_FMT SA G S1560 5.0T3 VLO FSNAME=FIX.VARIABLE_FMT.SA.017(1) 1096 5.0T3 1096 FIX.VARIABLE_FMT.SA.017 1 LINE 72 16 PAGE UBC BUCKLAND TIFFANY JUNE 29, 1979 14:46:28 5.0T8 475 0 The module for decoding variable formats. List-directed I/O implemented here by checking for "*" as first character of the format. If true, then flag set to call LSTDIO instead of FINIT. The format is saved to be able to check for duplicate calls with the same format to save decoding time. Only one level save. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 01002/018 FIX MISCELLANEOUS SA G S1560 5.0T3 VLO FSNAME=FIX.MISCELLANEOUS.SA.018(1) 1097 5.0T3 1097 FIX.MISCELLANEOUS.SA.018 1 LINE 78 11 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:30 5.0T8 476 0 This source file contains a number of small miscellaneous routines. UM's original SETxxx routines are mostly implemented as dummy routines. IBM's SLITE/SLITET/DVCHK/OVFLOW are also included. FIX's space allocation/de-allocation routines are included here as well as the routine to decode the initial FORTRAN parameter list. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 0 Referenced by comments of: 1002/28 01002/019 FIX LIST_DIRECTED SA G S1560 5.0T3 VLO FSNAME=FIX.LIST_DIRECTED.SA.019(1) 1098 5.0T3 1098 FIX.LIST_DIRECTED.SA.019 1 LINE 72 21 PAGE UBC BUCKLAND TIFFANY JUNE 29, 1979 14:46:31 5.0T8 477 0 The module for implementing FTNH-X list-directed I/O. Control is passed to 1 SUN SEP 08/96 15:24:55 Page 766 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 this routine from IBCOM# if a variable format which contains an "*" as the first character is detected. Provision is made to call this routine if using FTNX via the LDFIO# entry point, contained in IBCOM, for "true" list directed I/O. Both calls yield identical results. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 0 Referenced by comments of: 1002/28 01002/020 FIX NAMELIST SA G S1560 5.0T3 VLO FSNAME=FIX.NAMELIST.SA.020(1) 1099 5.0T3 1099 FIX.NAMELIST.SA.020 1 LINE 91 27 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:37 5.0T8 478 0 The module for implementing NAMELIST read and NAMELIST write statements. Two types of NAMELIST formats are supported - IBM fixed format and UBC's free format. 1. IBM format is assumed (input) if "&" found in col. 2 of the first record. 2. FREE format is assumed otherwise. Blanks and commas serve as delimiters in this case. Either format may be set via the appropriate SET command in FTNCMD. ------------------- May 1979 --------------- The following changes have been made to NAMELIST since the last distribution: 1. The number of subscripts is now checked for correctness. Two new error messages have been added for this purpose: too few subscripts specified, too many specified. 2. The output field width of real numbers has been increased to 16.8 from 16.7 to allow maximum values to be read in correctly. **************************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 0 Referenced by comments of: 1002/28 01002/021 FIX DEBUG SA G S1560 5.0T3 VLO FSNAME=FIX.DEBUG.SA.021(1) 1100 5.0T3 1100 FIX.DEBUG.SA.021 1 LINE 81 11 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:42 5.0T8 479 0 The module for the FORTRAN DEBUG package which has been implemented in much the same manner as IBM. Exceptions are: 1. When an output line must be saved then space is acquired for each output line rather than in chunks and cramming. 1 SUN SEP 08/96 15:24:55 Page 767 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 2. Undefined values are detected and printed as "U"'s. 3. SUBTRACE feature extended to print the name of the routine. 4. DISPLAY command uses a special entry point into NAMELIST to print the data. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACRO LIBRARY (1002/12). **************************************************************************** 01002/022 FIX LLXU_FORTRAN SA G S1560 5.0T3 VLO FSNAME=FIX.LLXU_FORTRAN.SA.022(1) 1101 5.0T3 1101 FIX.LLXU_FORTRAN.SA.022 1 LINE 91 13 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:46:43 5.0T8 480 0 The module for dynamic linking in FORTRAN written by UM. Depending on the setting of the merge flag in the loading call, FIX either obtains a fresh PSECT or uses the current one. Since UBC has not released the full calls to the system loader routines, only a subset of these calls are available to FORTRAN users. This option is controlled by the &LLXUX global symbol in copy section GLOBALS. ------------------- May 1979 --------------- The following changes have been made to LLXUF since the last distribution: 1. Conditional assembly statements have been corrected to yield proper code for those who use &LLXUX=1. 2. LOADF return codes are now defined via a global SETC array to allow each installation to have their own. Unfortunately, UBC had documented them differently than UM and in fact, differently than implemented. This led to 3 separate sets. Assemble using the FIX MACROS (1002/12). 0 Referenced by comments of: 1002/28 01002/023 FIX ERROR_MONITOR SA G S1560 5.0T3 VLO FSNAME=FIX.ERROR_MONITOR.SA.023(1) 1102 5.0T3 1102 FIX.ERROR_MONITOR.SA.023 1 LINE 85 102 PAGE UBC BUCKLAND TIFFANY JUNE 29, 1979 14:46:45 5.0T8 481 0 The main part of the FORTRAN I/O error monitor. The error monitor is called via FTNCMD, user call, or from within FIX, error call. It is called initially by FIXINIT to set up the program interrupt exit unless one has already been set up. The subroutine DEFAULTS is called to initialize the default setting of undefined units. Whenever an error occurs, the table contained in the ERROR_TABLE is referenced to determine the actions required by this error. This should be the last module in the object file so that the determination of whether an interrupt occurred within FIX. IBCOM# should be the first one. 1 SUN SEP 08/96 15:24:55 Page 768 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ------------------- May 1979 --------------- The following changes have been made to FIODEBUG since the last distribution: 1. The check for legal space has been made more rigorous so that programs running in an unprotected system don't think that segment 0 is addressable, e.g. virtual machines. 2. SET SEMIFREE=ON/OFF has been added to allow turning off the default "free-format" input. 3. Abbreviations have been standardized. 4. FTNCMD multiple substitution bug fixed. 5. QUERY command returns FDname with trailing blank. 6. The system now prints MAP/GRs/FPRs instead of ERRMON. 7. A reasonable message is issued when intervening actions prevent prompting for replacement of an input line with an error. 8. A bug in the printing of a variable format in the debug output was fixed. ******************************************************************** Copies *GDINFODSECT (594) and *CNFGINFODSECT (654). Assemble using the FIX MACROS (1002/12). ******************************************************************** 0 Referenced by comments of: 1002/28 01002/024 FIX UNIT_DEFAULTS SA G S1560 5.0T3 VLO FSNAME=FIX.UNIT_DEFAULTS.SA.024(1) 1103 5.0T3 1103 FIX.UNIT_DEFAULTS.SA.024 1 LINE 49 1 PAGE UBC BUCKLAND TIFFANY JUNE 29, 1979 14:47:00 5.0T8 482 0 The subroutine to the error monitor to set unit defaults. The current status of this is to set the following defaults: unit 5 - *SOURCE* unit 6 - *SINK* ------------------- May 1979 --------------- 0 Referenced by comments of: 1002/28 01002/025 FIX ERROR_TABLE SA G S1560 5.0T3 VLO FSNAME=FIX.ERROR_TABLE.SA.025(1) 1104 5.0T3 1104 FIX.ERROR_TABLE.SA.025 1 LINE 64 2 PAGE UBC BUCKLAND TIFFANY JUNE 29, 1979 14:47:01 5.0T8 483 0 The external error table, to allow adding/changing of errors without needing to re-assemble the whole error monitor. To change the action of one or more errors, make the appropriate change(s) to the error macro call in MACLIB and re-assemble this module. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACROS (1002/12). **************************************************************************** 1 SUN SEP 08/96 15:24:55 Page 769 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01002/026 FIX DUMP SA G S1560 5.0T3 VLO FSNAME=FIX.DUMP.SA.026(1) 1105 5.0T3 1105 FIX.DUMP.SA.026 1 LINE 72 7 PAGE UBC O'REILLY TIFFANY DEC. 07, 1978 11:04:22 5.0T8 484 0 SOURCE TO IMPLEMENT FORTRAN DUMP/PDUMP. RESIDES IN THE GENERAL LIBRARY AS IT IS NOT USED VERY MUCH. 0 Referenced by comments of: 1002/28 01002/027 FIX LCS_SOURCE SA G S1560 5.0T3 VLO FSNAME=FIX.LCS_SOURCE.SA.027(1) 1106 5.0T3 1106 FIX.LCS_SOURCE.SA.027 1 LINE 84 1 PAGE UBC STEVENS TIFFANY JUNE 29, 1979 14:47:02 5.0T8 485 0 The source for generating the low core symbol table for all required FIX entry points. There is room at the end for an extra 12 entry points if required for patching purposes. ------------------- May 1979 --------------- **************************************************************************** Assemble using the FIX MACROS (1002/12). **************************************************************************** 01002/028A FIX UM_UPDATES UC G W062:FIX.UP 5.1T2 1218 FIX.UM_UPDATES.UC.028 1 LINE 68 6 PAGE UBC STEVENS TIFFANY JULY 23, 1983 14:32:39 0 This file contains UM'S updates to the various subcomponents of UBC'S FIX and the FIX MACRO LIBRARY. Current subcomponents which are updated include: 1. MISCELLANEOUS (1002/18) 2. MACRO_LIBRARY (1002/12) 3. ERROR_MONITOR (1002/23) 4. UNIT_CONTROL (1002/15) 5. LLXU_FORTRAN (1002/22) ********************************************************************** D5.0B version: 6. DUMP (1002/26) 7. FIODSCT (1002/5) 8. DEFAULTS (1002/24) 9. IBCOM (1002/14) 10. LISTDIV (1002/19) 11. NAMELIST (1002/20) 12. INIT (1002/13) ********************************************************************** 01003/001 TAPEAID # (NOT DISTRIBUTED) UBC 0 This component, which is not currently installed at UM, is a general utility program for interactive manipulation of tapes. 1 SUN SEP 08/96 15:24:55 Page 770 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01005/001 FREAD SUBR FREAD# SA G S1560 5.0T3 VLO FSNAME=FREAD_SUBR.FREAD#.SA.001(1) 1108 5.0T3 1108 FREAD_SUBR.FREAD#.SA.001 1 LINE 77 52 PAGE UBC STEVENS TIFFANY JUNE 15, 1977 09:37:11 5.0T8 487 0 THIS IS THE REENTRANT PART OF FREAD, THE FREE FORMAT INPUT FACILITY. COPIES THE FREAD.COPY COPY SECTION (1005/5) AND *GDINFODSECT (594). 0 Referenced by comments of: 1005/3, 1005/5 01005/002 FREAD SUBR FREAD# OC G SEG2:FREAD 5.0T3 1109 FREAD_SUBR.FREAD#.OC.002 1 LINE 80 11 PAGE UBC STEVENS TIFFANY JULY 03, 1981 20:37:28 5.0T8 488 SEG2:FREAD 0 THIS OBJECT IS NORMALLY LOADED INTO SHARED VM AT IPL BY PISTLE. 01005/003 FREAD SUBR FREAD SA G S1560 5.0T3 VLO FSNAME=FREAD_SUBR.FREAD.SA.003(1) 1110 5.0T3 1110 FREAD_SUBR.FREAD.SA.003 1 LINE 77 3 PAGE UBC STEVENS TIFFANY MAY 12, 1977 16:17:34 5.0T8 489 0 THIS IS THE NON-REENTRANT PART OF FREAD WHICH INTERFACES TO THE REENTRANT PART (1005/1). COPIES THE FREAD.COPY COPY SECTION (1005/5). 0 Referenced by comments of: 1005/5 01005/004 FREAD SUBR FREAD OC G # (PART OF *LIBRARY) UBC STEVENS TIFFANY 0 Object part of *LIBRARY (524/1) 01005/005 FREAD SUBR FREAD.COPY SA G S1560 5.0T3 VLO FSNAME=FREAD_SUBR.FREAD.COPY.SA.005(1) 1111 5.0T3 1111 FREAD_SUBR.FREAD.COPY.SA.005 1 LINE 72 4 PAGE UBC STEVENS TIFFANY JUNE 13, 1977 11:51:56 5.0T8 490 0 COPY SECTION USED BY (1005/1) AND (1005/3). 0 Referenced by comments of: 1005/1, 1005/3 01006/001 PRDSCT SA S1560 5.0T3 VLO FSNAME=PRDSCT..SA.001(1) 1112 5.0T3 1112 PRDSCT..SA.001 1 LINE 83 21 PAGE UBC STEVENS TIFFANY MAY 13, 1978 18:28:15 5.0T8 491 0 Routine to print a formatted dump of a dsect. ***************************************************************************** Should be assembled using the UBC Macros, which are no longer distributed by UM. The version found on D4.0 tape D4T3, file 421 is the correct version to use. ***************************************************************************** 01006/002 PRDSCT OE ETC:FIX.PRDSCT 5.0T3 1113 PRDSCT..OE.002 1 LINE 5843 3 PAGE UBC STEVENS TIFFANY JULY 03, 1981 20:37:32 5.0T8 492 ETC:FIX.PRDSCT 1 SUN SEP 08/96 15:24:55 Page 771 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01007/001 ROBJ # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO REPLACE OBJECT MODULES BY NAME. 01008/001 PATCH # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO PATCH OBJECT MODULES FREE-FORMAT OR REP RECORD INPUT. 01009/001 RUN # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO EXECUTE PROGRAMS FROM A LIBRARY OF PROGRAMS, SO THAT USERS NEED TO MAINTAIN ONLY A SINGLE FILE OF PROGRAMS. THIS IN TURN DECREASES THE NUMBER OF FILES TO MAINTAIN AND REMEMBER. 01011/001 ALIST # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN ASSEMBLY/FORTRAN LIST PROGRAM. 01012/001 UNITS D5.0 JOB PGM SA G S1561 5.0T4 VLO FSNAME=UNITS.D5.0_JOB_PGM.SA.001(1) 554 5.0T4 554 UNITS.D5.0_JOB_PGM.SA.001 1 LINE 80 36 PAGE UBC BERRYMAN MTA AUG. 10, 1981 00:05:44 5.0T11 128 0 JOB PROGRAM INTERFACE FOR THE UNITS JOB AND A SUBROUTINE CALLED BY IT AND ALSO BY THE MTS UNITS PROGRAM (1012/3). COPIES COPY:GLOBALS (1026/3) AND COPY:LLMPSEQU (087). ASSEMBLE USING DMPLST.MACROS (400/16). 0 Referenced by comments of: 490/1, 1012/4 01012/002A UNITS UPDATE UC G MTA:UNITS.U 5.1T2 1219 UNITS.UPDATE.UC.002 1 LINE 105 3 PAGE UBC BERRYMAN MTA JULY 23, 1983 14:32:39 0 Update to bring D5.0 UNITS to current. *************************************************************** D5.0C version: Bug fixed. *************************************************************** 01012/003A UNITS JOB PROGRAM OC G # (PART OF RESIDENT SYSTEM) D4T3 396 UNITS.JOB_PROGRAM.OC.002 1 LINE 80 6 PAGE UBC BERRYMAN MTA JULY 29, 1977 00:11:35 0 Object part of Resident System (468). 0 Referenced by comments of: 1012/1 1 SUN SEP 08/96 15:24:55 Page 772 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01012/004A UNITS MTS PROGRAM SA G MTA:UNITS.MTS.S 5.1T2 1220 UNITS.MTS_PROGRAM.SA.004 1 LINE 69 3 PAGE UBC BERRYMAN MTA JULY 23, 1983 14:32:40 0 MTS PROGRAM TO FORMAT PARAMETERS AND CALL THE UNITS SUBROUTINE (1012/1). 01012/005A UNITS MTS PROGRAM OE G MTA:UNITS.O 5.1T2 1221 UNITS.MTS_PROGRAM.OE.005 1 LINE 1119 2 PAGE UBC BERRYMAN MTA JULY 23, 1983 14:32:40 MTA.:UNITS.O 0 MUST BE RUN WITH PROT=OFF UNLESS A SET OF TABLES IS CONCATENATED WITH IT. 01012/006A UNITS WRITEUP WF MTA:UNITS.W 5.1T2 1222 UNITS.WRITEUP.WF.006 1 LINE 72 3 PAGE UBC BERRYMAN MTA JULY 23, 1983 14:32:40 0 Description of input to UNITS and most messages it prints. 01014/001 MARKIV # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A DATA MANAGEMENT REPORT GENERATION PROGRAM. 01015/001 ROTOF # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO REORDER LINES IN A SEQUENTIAL FILE AND TO REORDER FILES ON A TAPE. 01016/001 STEVENS MACRO LIB SM S1560 5.0T3 VLO FSNAME=STEVENS_MACRO_LIB..SM.001(1) 1114 5.0T3 1114 STEVENS_MACRO_LIB..SM.001 1 LINE 73 20 PAGE UBC STEVENS DWB AUG. 30, 1978 22:42:26 5.0T8 493 0 MACROS NEEDED BY *APC (496). 01019/001A RAMROD SR BASE SA G MTS:RAMROD.SR.50 5.1T2 1223 RAMROD.SR_BASE.SA.001 1 LINE 72 53 PAGE UBC MTA JULY 23, 1983 14:32:41 0 Base source for service routines for RAMROD. Assemble using RAMROD MACROS (1019/10) and COPY:MTS.MACROS (344/3). Copies *CNFGINFODSECT (654). 0 Referenced by comments of: 596/1, 1019/2, 1019/3, 1019/11 01019/002A RAMROD SR SOU SA G MTS:RAMROD.SR.S 5.1T2 1224 RAMROD.SR_SOU.SA.002 1 LINE 80 61 PAGE UBC MTA JULY 23, 1983 14:32:44 0 Current source for service routines. Obtained by applying updates (1019/3) to base source (1019/1). 0 Referenced by comments of: 1019/3 1 SUN SEP 08/96 15:24:55 Page 773 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01019/003C RAMROD SR UPD UC G MTS:RAMROD.SR.U 5.1T2 1225 RAMROD.SR_UPD.UC.003 1 LINE 100 11 PAGE UBC MTA JULY 23, 1983 14:32:47 0 Updates to apply to base source (1019/1) to obtain current source (1019/2) for service routines. 0 Referenced by comments of: 1019/2 01019/004A RAMROD SR OBJ OC G MTS:RAMROD.SR.O 5.1T2 1226 RAMROD.SR_OBJ.OC.004 1 LINE 80 27 PAGE UBC MTA JULY 23, 1983 14:32:47 01019/005A RAMROD INTERPRET BASE SA G MTS:RAMROD.CS.50 5.1T2 1227 RAMROD.INTERPRET_BASE.SA.005 1 LINE 80 88 PAGE UM MTA JULY 23, 1983 14:32:49 0 Source for the RAMROD command language interpreter. Requires the existence of a file, presently named MTS:RAMRODLOG (1019/17) by default, but setable, which is permitted at least write-extend for its transaction log. It also requires an explain file (1019/12). All filenames of this sort are assembly parameters. Copies *GFINFODSECT (593) and *GDINFODSECT (594). Assemble using RAMROD.MACROS (1019/10). 0 Referenced by comments of: 1019/6, 1019/7, 1019/11 01019/006A RAMROD INTERPRET SOU SA G MTS:RAMROD.CS.S 5.1T2 1228 RAMROD.INTERPRET_SOU.SA.006 1 LINE 79 99 PAGE UM MTA JULY 23, 1983 14:32:53 0 Current source for INTERPRET. Obtained by applying updates (1019/7) to base source (1019/5). 0 Referenced by comments of: 1019/7 01019/007C RAMROD INTERPRET UPD UC G MTS:RAMROD.CS.U 5.1T2 1229 RAMROD.INTERPRET_UPD.UC.007 1 LINE 102 11 PAGE UM MTA JULY 23, 1983 14:32:57 0 Update to apply to base source (1019/5) to obtain current source (1019/6) for INTERPRET. 0 Referenced by comments of: 1019/6 01019/008A RAMROD INTERPRET OBJ OC G MTS:RAMROD.CS.O 5.1T2 1230 RAMROD.INTERPRET_OBJ.OC.008 1 LINE 80 48 PAGE UM MTA JULY 23, 1983 14:32:58 01019/009A RAMROD GSFS G MTS:RAMROD.GSFS 5.1T2 1231 RAMROD.GSFS..009 1 LINE 93 4 PAGE UBC MTA JULY 23, 1983 14:33:00 MTS:RAMROD.GSFS 0 Source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands (lines 0 - .999) for interface to GETSPACE/FREESPACE that allows multiple segment requests. Copies *CNFGINFODSECT (654). ********************************************************************** D5.0B version: Minor bug fixed. 1 SUN SEP 08/96 15:24:55 Page 774 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ********************************************************************** ********************************************************************** D5.1 version: Now contains source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands. ********************************************************************** 0 Referenced by comments of: 67/3, 67/4, 1079/1 01019/010A RAMROD MACROS SM G MTS:RAMROD.MACS 5.1T2 1232 RAMROD.MACROS.SM.010 1 LINE 72 4 PAGE UBC MTA JULY 23, 1983 14:33:00 0 These macros and copy sections are used for both the command language interpreter and the service module. 0 Referenced by comments of: 1019/1, 1019/5, 1019/13 01019/011A RAMROD OBJECT OC G MTS:RAMROD 5.1T2 1233 RAMROD.OBJECT.OC.011 1 LINE 32767 20 PAGE UBC MTA JULY 23, 1983 14:33:00 MTS.:RAMROD 0 Contains the linkedited object for the command language interpreter (1019/5) and the service module (1019/1). Use (1019/18) and (1019/19) to produce RAMROD. 01019/012A RAMROD EXPLAIN M MTS:RAMRODEXP 5.1T2 1234 RAMROD.EXPLAIN.M.012 1 LINE 81 3 PAGE UBC MTA JULY 23, 1983 14:33:01 MTS.:RAMRODEXP 0 Explain file for RAMROD. As distributed, RAMROD expects this file to be named MTS:RAMRODEXP. NOTE: Line numbers in this file are important and the file starts at line 0. 0 Referenced by comments of: 1019/5 01019/013A RAMROD DUMP G MTS:RAMROD.DMP 5.1T2 1235 RAMROD.DUMP..013 1 LINE 123 15 PAGE UBC MTA JULY 23, 1983 14:33:02 MTS.:RAMROD.DMP 0 Source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands(lines 0 - .999) for RAMROD file directory dump program. Assemble using RAMROD macros (1019/10). ********************************************************************** D5.1 version: Now contains source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands. ********************************************************************** 1 SUN SEP 08/96 15:24:55 Page 775 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01019/014A RAMROD NOTEPOINT G MTS:RAMROD.NP 5.1T2 1236 RAMROD.NOTEPOINT..014 1 LINE 103 4 PAGE UBC MTA JULY 23, 1983 14:33:02 0 Source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands (lines 0 - .999) for module to process note/point information for sequential ROD files. ********************************************************************** D5.1 version: Now contains source (lines 1000 - *L), object (lines 1 - 999) and $SOURCE commands. ********************************************************************** 01019/015A RAMROD INTRO WF S0999 5.0AT1 VLO FSNAME=RAMROD.INTRO.WF.014(1) 693 5.1T2 1237 RAMROD.INTRO.WF.015 1 LINE 79 4 PAGE UBC MTA MAR. 22, 1976 14:33:16 0 Introduction to RAMROD and IPL READER (1021). Relevant mainly to installations converting from pre-IPLREADER versions of RAMROD. 0 Referenced by comments of: 1021/1 01019/016A RAMROD WRITEUP WF MTS:RAMROD.W 5.1T2 1238 RAMROD.WRITEUP.WF.016 1 LINE 145 11 PAGE UBC MTA JULY 23, 1983 14:36:11 MTS.:RAMROD.W 0 Writeup describing the RAMROD utility. ********************************************************************** D5.1 version: Updated for D5.1. ********************************************************************** 01019/017A RAMROD MTS:RAMRODLOG D # MTS:RAMRODLOG UBC MTA MTS:RAMRODLOG@E 0 RAMROD log file. 0 Referenced by comments of: 1019/5 01019/018C RAMROD COMPILE C MTS:RAMROD.COMPILE 5.1T2 1239 RAMROD.COMPILE.C.018 1 LINE 118 1 PAGE UM MTA JULY 23, 1983 14:36:12 0 $SOURCE file to compile components and apply updates. 0 Referenced by comments of: 1019/11 01019/019C RAMROD LINK C MTS:RAMROD.LINK 5.1T2 1240 RAMROD.LINK.C.019 1 LINE 95 1 PAGE UM MTA JULY 23, 1983 14:36:13 0 $SOURCE file to linkedit and install a new version of RAMROD. 1 SUN SEP 08/96 15:24:55 Page 776 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1019/11 01020/001 FILE MOVE SA G FILE:FM.S 5.0T3 1125 FILE_MOVE..SA.001 1 LINE 106 12 PAGE UBC HOGG HELFFRICH AUG. 06, 1981 05:44:34 5.0T8 504 FILE:FM.S 0 Program to move files from a production file system to a test pack. See the description of this program in (682/7). Assemble using COPY:FILE.MACROS (482/45). Copies *CNFGINFODSECT (654). 0 Referenced by comments of: 461/26, 682/7, 3024/37, 3024/40 01020/002 FILE MOVE OC G FILE:FM 5.0T3 1126 FILE_MOVE..OC.002 1 LINE 5498 5 PAGE UBC HOGG HELFFRICH AUG. 06, 1981 05:44:40 5.0T8 505 FILE:FM 01021/001 IPL READER 5.0 IPLBOOT SA G S1561 5.0T4 VLO FSNAME=IPL_READER.5.0_IPLBOOT.SA.001(1) 559 5.0T4 559 IPL_READER.5.0_IPLBOOT.SA.001 1 LINE 80 32 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:25 5.0T11 133 0 SEE COMP (1019/15) FOR AN INTRODUCTORY WRITEUP ON RAMROD AND THE IPL READER. THIS IS A BOOTSTRAP PROGRAM FOR THE IPLREADER. COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND COPY:PSA (162). ASSEMBLE USING COPY:SETPARM (653) AND COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 4/5, 1019/15, 1021/7 01021/002 IPL READER IPLBOOT UPD UC G MTS:IPLBOOT.S(*F,-1) 5.0T4 560 IPL_READER.IPLBOOT_UPD.UC.002 1 LINE 72 10 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:26 5.0T11 134 MTS:IPLBOOT.S 0 UPDATE TO PRODUCE THE CURRENT VERSION OF IPLBOOT, BASED ON THE D4.2 SOURCE. 01021/003 IPL READER IPLBOOT OC G MTS:IPLBOOT.O 5.0T4 561 IPL_READER.IPLBOOT.OC.003 1 LINE 80 3 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:31 5.0T11 135 MTS.:IPLBOOT.O 01021/004 IPL READER 5.0 IPLREAD SA G S1561 5.0T4 VLO FSNAME=IPL_READER.5.0_IPLREAD.SA.004(1) 562 5.0T4 562 IPL_READER.5.0_IPLREAD.SA.004 1 LINE 80 116 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:34 5.0T11 136 0 MAIN PART OF IPL READER. COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU (087), AND COPY:PSA (162). ASSEMBLE USING COPY:SETPARM (653) AND COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 1021/7 01021/005 IPL READER IPLREAD UPD UC G MTS:IPLREAD.S(*F,-1) 5.0T4 563 IPL_READER.IPLREAD_UPD.UC.005 1 LINE 76 9 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:37 5.0T11 137 MTS:IPLREAD.S 0 UPDATE TO PRODUCE THE CURRENT VERSION OF IPLREAD, BASED ON THE D4.2 SOURCE. 1 SUN SEP 08/96 15:24:55 Page 777 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01021/006 IPL READER IPLREAD OC G MTS:IPLREAD.O 5.0T4 564 IPL_READER.IPLREAD.OC.006 1 LINE 80 9 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:45 5.0T11 138 MTS.:IPLREAD.O 01021/007 IPL READER 5.0 IPLINIT SA G S1561 5.0T4 VLO FSNAME=IPL_READER.5.0_IPLINIT.SA.007(1) 565 5.0T4 565 IPL_READER.5.0_IPLINIT.SA.007 1 LINE 80 29 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:06:47 5.0T11 139 0 PROGRAM TO WRITE IPLBOOT (1021/1), IPLREAD (1021/4), AND UMLOAD (001/1) ON A DISK OR TAPE IN SELF LOADING FORM. COPIES *GDINFODSECT (594). ASSEMBLE USING COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 1021/10 01021/008A IPL READER IPLINIT UPD UC G MTS:IPLINIT.S(*F,-1) 5.1T2 1241 IPL_READER.IPLINIT_UPD.UC.008 1 LINE 72 11 PAGE UBC O'REILLY MTA JULY 23, 1983 14:36:13 MTS.:IPLINIT.S 0 UPDATE TO PRODUCE THE CURRENT VERSION OF IPLINIT, BASED ON THE D4.0 SOURCE. 01021/009A IPL READER IPLINIT OC G MTS:IPLINIT.O 5.1T2 1242 IPL_READER.IPLINIT.OC.009 1 LINE 80 10 PAGE UBC O'REILLY MTA JULY 23, 1983 14:36:14 MTS.:IPLINIT.O 0 OBJECT REQUIRES IPLGTUM (1021/10) AND RSTR:VTOCREAD (067/11) TO RUN. MUST BE RUN WITH PROT=OFF. 01021/010 IPL READER IPLGTUM SA G S1561 5.0T4 VLO FSNAME=IPL_READER.IPLGTUM.SA.010(1) 568 5.0T4 568 IPL_READER.IPLGTUM.SA.010 1 LINE 72 3 PAGE UBC O'REILLY MTA JULY 29, 1977 00:14:25 5.0T11 142 0 SUBROUTINE TO LOAD UMLOAD (001/1) FOR IPLINIT (1021/7). 0 Referenced by comments of: 1021/9 01021/011 IPL READER IPLGTUM OC G MTS:IPLGTUM.O 5.0T4 569 IPL_READER.IPLGTUM.OC.011 1 LINE 80 1 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:10:00 5.0T11 143 MTS.:IPLGTUM.O 01021/012A IPL READER WRITEUP WF MTS:IPLREAD.W 5.1T2 1243 IPL_READER.WRITEUP.WF.012 1 LINE 71 8 PAGE UBC O'REILLY MTA JULY 23, 1983 14:36:15 MTS.:IPLREAD.W 0 DESCRIPTION OF IPL READER. 01023/001A MSG ROUTINE SA W267:MSG.S 5.1T2 1244 MSG_ROUTINE..SA.001 1 LINE 80 62 PAGE UBC SAYLE EADIE JULY 23, 1983 14:36:15 0 Source for MSG routine. This is a reentrant general-purpose message routine with a variety of features. The routine is mainly designed to be used with macros and is designed to be resident. Consequently, it references CMDSUB rather than CMD and ZWRITEE rather than WRITE etc. For non-resident use, all that must be done is to change these references to their external counterparts. 1 SUN SEP 08/96 15:24:55 Page 778 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Assemble using *SYSMAC OLD:CC.MACROS (1054/4). COPY's *LOADINFODSECT (001/4). 0 Referenced by comments of: 1/5, 101/3 01023/002A MSG ROUTINE OC # (PART OF RESIDENT SYSTEM) UBC SAYLE EADIE 0 Object part of Resident System (468). 01023/003 MSG ROUTINE PICTURE SA G S1560 5.0T3 VLO FSNAME=MSG_ROUTINE.PICTURE.SA.003(1) 1128 5.0T3 1128 MSG_ROUTINE.PICTURE.SA.003 1 LINE 72 6 PAGE UBC SAYLE EADIE JULY 03, 1981 20:46:08 5.0T8 507 0 "PICTURE" PROCESSING CSECT FOR MSG ROUTINE. ASSEMBLE USING *SYSMAC AND OLD:CC.MACROS (1054/4). 01024/001 UBC MACROS SM # (NOT DISTRIBUTED) D4T3 421 UBC_MACROS..SM. 1 LINE 73 10 PAGE UBC STEVENS JULY 29, 1977 00:14:36 0 UBC COMPUTING CENTRE STAFF MACRO LIBRARY. THIS COMPONENT IS NOT DISTRIBUTED BY UM. 01025/001 LCS_PRINTER # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE WHICH ALLOWS ONE TO LIST THE CONTENTS OF VARIOUS LOW-CORE SYMBOL TABLES. 01026/001A GLOBAL SYSTEM PARS GLOBALDEFS SA G COPY:GLOBALDEFS 5.1T2 1245 GLOBAL_SYSTEM_PARS.GLOBAL.SA.001 1 LINE 80 2 PAGE UM MTA JULY 23, 1983 14:36:18 COPY:GLOBALDEFS 0 CONTAINS GBL DEFINITIONS FOR: &S370 SYSTEM/370 -- MUST BE ON &OC3066 3066 CONSOLE PRESENT &CRTY ITEL 7830 COMMAND RETRY -- MUST BE OFF &SIMPLEX SINGLE PROCESSOR -- MUST BE ON &OPERJOB OPERATOR JOB BEING USED &PROT PROTECTION &AMD470 AMDAHL 470 &BLKMPX BLOCK MULTIPLEXOR CHANNEL -- MUST BE ON &IO370 370 I/O INSTRUCTIONS -- MUST BE ON &NOSLT NO SEARCH LIST INSTRUCTION -- MUST BE ON &OMR 2501 OMR FEATURE &JTBLPOL POOL ENTRIES IN JOB TABLE &DTBLPOL POOL ENTRIES IN DEVICE TABLE &LFILENM LENGTH OF FILE NAMES &NDC NO DATA CELL &SPELC SPELLING CORRECTION &SPELCP SPELLING CORRECTION PROMPT 1 SUN SEP 08/96 15:24:55 Page 779 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 &BRCPRNT BATCH RC PRINT &TRCPRNT TERM RC PRINT &BEBM DEFAULT BATCH EXEC BEGINS MSG &BETM DEFAULT BATCH EXEC TERM MSG &TEBM DEFAULT TERM EXEC BEGINS MSG &TETM DEFAULT TERM EXEC TERM MSG &INSTALL THE INSTALLATION'S SHARE CODE &SYSPROJ INITIAL SUBSTRINGS FOR THOSE PROJECTS THAT BELONG TO SYSTEM PROGRAMMERS. &IPLPROJ INITIAL SUBSTRINGS FOR THOSE PROJECTS FOR WHICH THE ACCOUNTING RECORD IN USE BIT CAN BE IGNORED. &UQVNTPT ON IF USING UQV NOTE/POINT FORMAT FOR SEQUENTIAL FILES &TTALLY ON TO GET SYSTEM TIME TALLY &OLTEPATN ON TO GET OLTEP ATTENTION KLUDGE IN UMMPS 0 Referenced by comments of: 42/1, 45/1, 101/1, 116/1, 135/1, 400/1, 545/3, 570/1, 653/1, 829/1 01026/002A GLOBAL SYSTEM PARS GLOBALSETS SA G COPY:GLOBALSETS 5.1T2 1246 GLOBAL_SYSTEM_PARS.GLOBAL.SA.002 1 LINE 80 1 PAGE UM MTA JULY 23, 1983 14:36:18 COPY:GLOBALSETS 0 THIS FILE DEFINES VALUES FOR THE SYMBOLS IN GLOBALDEFS AS APPROPRIATE FOR THE UM AMDAHL 470 VERSION OF MTS. 0 Referenced by comments of: 42/1, 45/1, 101/1, 116/1, 135/1, 387/1, 387/2, 387/3, 387/4, 387/5, 387/7, 387/8, 387/27, 387/30, 387/32, 387/35, 400/1, 545/3, 570/1, 806/1, 829/1, 1070/1 01026/003 GLOBAL SYSTEM PARS GLOBALS SA G COPY:GLOBALS 5.0T3 1131 GLOBAL_SYSTEM_PARS.GLOBAL.SA.003 1 LINE 37 1 PAGE UM MTA JULY 03, 1981 20:46:10 5.0T8 510 COPY:GLOBALS 0 CONTAINS: $CONTINUE WITH COPY:GLOBALDEFS RETURN $CONTINUE WITH COPY:GLOBALSETS RETURN 0 Referenced by comments of: 5/1, 7/1, 8/1, 9/1, 9/3, 10/1, 19/1, 21/1, 24/1, 40/1, 44/1, 46/1, 79/1, 80/1, 87/1, 162/1, 198/1, 353/2, 354/1, 354/5, 388/1, 399/1, 400/5, 400/15, 413/1, 464/1, 482/4, 482/7, 500/51, 507/2, 509/1, 513/1, 531/1, 531/8, 539/1, 540/1, 540/3, 540/6, 540/8, 540/10, 540/12, 540/17, 540/26, 545/15, 554/1, 554/3, 577/1, 577/3, 577/8, 577/11, 578/1, 579/1, 600/1, 615/15, 615/17, 621/2, 629/4, 631/16, 634/1, 634/3, 635/1, 636/1, 637/1, 638/1, 639/1, 642/16, 647/1, 651/13, 682/24, 685/5, 693/1, 731/3, 732/1, 770/1, 777/1, 787/19, 798/75, 818/1, 866/1, 1012/1, 1021/1, 1021/4, 1079/18, 1081/1, 1081/12, 1081/13, 1081/14, 1081/15, 1081/16, 3024/1, 4000/1 01027/001 P11 JOB SA G S1560 5.0T3 VLO FSNAME=P11_JOB..SA.001(1) 1132 5.0T3 1132 P11_JOB..SA.001 1 LINE 70 2 PAGE UBC MTA JAN. 19, 1981 22:18:38 5.0T8 511 0 JOB PROGRAM TO LOAD THE CHARACTER AND CARRIAGE CONTROL BUFFERS OF A 3211 PRINTER FOR THE P11 PRINT TRAIN. LOADS FCB FOR 6 LINES PER INCH ON 11 INCH PAPER UNLESS THE "8LPI" PARAMETER IS GIVEN, IN WHICH CASE IT LOADS FOR 8 LINES PER INCH ON 8.5 INCH PAPER. 1 SUN SEP 08/96 15:24:55 Page 780 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 819/1 01027/002 P11 JOB OC G # (PART OF RESIDENT SYSTEM) D4T3 427 P11_JOB..OC.002 1 LINE 80 1 PAGE UBC MTA MAR. 15, 1975 16:00:44 0 Object part of Resident System (468). 01028/001 STAND-ALONE DUMP IPL MODULE SA S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.IPL_MODU.SA.001(1) 1133 5.0T3 1133 STAND-ALONE_DUMP.IPL_MODU.SA.001 1 LINE 72 5 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:44:58 5.0T8 512 0 ASSEMBLER SOURCE FOR STAND-ALONE DUMP PROGRAM. THIS VERSION, JAN 1977, REPLACES THE PREVIOUS VERSION, WHICH WAS FROM IBM. THE SOURCE INCLUDES INSTRUCTIONS FOR GENERATING AN IPL-ABLE STAND-ALONE DUMP TAPE FROM THE OBJECT. THE DUMPS PRODUCED BY THIS PROGRAM ARE FORMATTED DIFFERENTLY FROM THOSE PRODUCED BY THE IBM STAND-ALONE DUMP PROGRAM. A VERSION OF THE STAND-ALONE DUMP PRINT PROGRAM THAT SUPPORTS THIS NEW FORMAT IS INCLUDED IN (1028/3) THROUGH (1028/9). NOTE: THIS PROGRAM HAS NEVER BEEN USED AT UM. IT WON'T WORK ON A MACHINE WITH 16 MEGABYTES OF REAL MEMORY. 0 Referenced by comments of: 1028/2 01028/002 STAND-ALONE DUMP IPL MODULE OC S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.IPL_MODU.OC.002(1) 1134 5.0T3 1134 STAND-ALONE_DUMP.IPL_MODU.OC.002 1 LINE 80 1 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:00 5.0T8 513 0 OBJECT FOR THE STAND-ALONE DUMP PROGRAM. THIS IS THE ASSEMBLER OUTPUT, UN-DIDDLED FOR IPL'ING FROM. SEE (1028/1) FOR DIDDLING INSTRUCTIONS. 01028/003 STAND-ALONE DUMP MAIN SP S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.MAIN.SP.003(1) 1135 5.0T3 1135 STAND-ALONE_DUMP.MAIN.SP.003 1 LINE 88 4 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:01 5.0T8 514 0 PL/1 SOURCE FOR MAIN PROGRAM OF STAND-ALONE DUMP PRINTER. COMPLETE PROGRAM CONSISTS OF THE MAIN PROGRAM, THE PL/1-TO-PRTRACE INTERFACE PSD.PT, A VERSION OF PRTRACE (337) OF YOUR CHOICE, AND THE TIME-CONVERTING SUBROUTINE PSD.CT. A COMPLETE LINKEDITED LOAD MODULE IS IN (1028/9). 0 Referenced by comments of: 1028/1 01028/004 STAND-ALONE DUMP MAIN OC S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.MAIN.OC.004(1) 1136 5.0T3 1136 STAND-ALONE_DUMP.MAIN.OC.004 1 LINE 80 9 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:06 5.0T8 515 01028/005 STAND-ALONE DUMP PSD.PT SA S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.PT.SA.005(1) 1137 5.0T3 1137 STAND-ALONE_DUMP.PSD.PT.SA.005 1 LINE 61 1 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:03 5.0T8 516 0 SOURCE FOR THE PL/1-TO-PRTRACE INTERFACE FOR THE STAND-ALONE DUMP PRINT PROGRAM. 1 SUN SEP 08/96 15:24:55 Page 781 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01028/006 STAND-ALONE DUMP PSD.PT OC S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.PT.OC.006(1) 1138 5.0T3 1138 STAND-ALONE_DUMP.PSD.PT.OC.006 1 LINE 80 1 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:09 5.0T8 517 01028/007 STAND-ALONE DUMP PSD.CT SA S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.CT.SA.007(1) 1139 5.0T3 1139 STAND-ALONE_DUMP.PSD.CT.SA.007 1 LINE 72 1 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:04 5.0T8 518 0 SOURCE FOR THE TIME-CONVERTING SUBROUTINE USED BY THE STAND-ALONE DUMP PRINTER. 01028/008 STAND-ALONE DUMP PSD.CT OC S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.PSD.CT.OC.008(1) 1140 5.0T3 1140 STAND-ALONE_DUMP.PSD.CT.OC.008 1 LINE 80 1 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:12 5.0T8 519 01028/009 STAND-ALONE DUMP COMPLETE PROG OE S1560 5.0T3 VLO FSNAME=STAND-ALONE_DUMP.COMPLETE.OE.009(1) 1141 5.0T3 1141 STAND-ALONE_DUMP.COMPLETE.OE.009 1 SEQ 10118 8 PAGE UBC O'REILLY MTA JAN. 31, 1977 10:45:13 5.0T8 520 0 LINKEDITED VERSION OF THE STAND-ALONE-DUMP PRINT PROGRAM INCLUDING ALL THE REQUIRED JUNK AND A $CONTINUE WITH *PL1LIB. 0 Referenced by comments of: 1028/1, 1028/3 01030/001 PACK MAP BASE SOURCE SA G FILE:PM(*F,-1) 5.0T3 1142 PACK_MAP.BASE_SOURCE.SA.001 1 LINE 80 26 PAGE UBC O'REILLY HELFFRICH JULY 03, 1981 20:47:24 5.0T8 521 FILE:PM 0 PROGRAM TO PRINT COMPLETE MAP OF A PAGE-FORMATTED DISK PACK. FOR INSTRUCTIONS ON USAGE, SEE COMMENTS AT BEGINNING OF THE SOURCE. CALLS VTOCREAD (067/11) AND THE SORT SUBROUTINE (303/5). ASSEMBLE USING COPY:FILE.MACROS (482/45). SEE COMP (682/3) FOR A WRITEUP. 0 Referenced by comments of: 682/3, 1030/2 01030/002A PACK MAP UPDATE UC G FILE:PM(1000) 5.1T2 1247 PACK_MAP.UPDATE.UC.002 1 LINE 70 1 PAGE UBC O'REILLY HELFFRICH JULY 23, 1983 14:36:19 0 UPDATE DECK FOR (1030/1) TO YIELD CURRENT SOURCE. 01030/003A PACK MAP OC G FILE:PM(0,999) 5.1T2 1248 PACK_MAP..OC.003 1 LINE 82 5 PAGE UBC O'REILLY HELFFRICH JULY 23, 1983 14:36:20 0 OBJECT FOR PACKMAP. CONTAINS "$CONTINUE WITH RSTR:VTOCREAD+COPY:SYSDEFS" (067/11) AND (579/3) RECORD. 01031/001 FO # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE "FILE OPTIMIZER" PROGRAM, WHICH WAS WRITTEN TO OPTIMIZE THE AMOUNT OF FILE SPACE USED BY A FILE. 1 SUN SEP 08/96 15:24:55 Page 782 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01032/001 BCPL INSTALL_GUIDE P O S1560 5.0T3 VLO FSNAME=BCPL.INSTALL_GUIDE.P.001(1) 1145 5.0T3 1145 BCPL.INSTALL_GUIDE.P.001 1 LINE 79 1 PAGE UNE HEAL UNSP AUG. 02, 1979 19:01:38 5.0T9 1 0 THIS VERSION OF BCPL, WRITTEN AT UNE, IS DERIVED FROM A RECENT VERSION OF THE CAMBRIDGE COMPILER. THE LIBRARY HAS BEEN COMPLETELY REWRITTEN ALMOST ENTIRELY IN BCPL, AND INCLUDES VARIOUS MTS-SPECIFIC FEATURES SUCH AS ACCESS TO LINE NUMBERS. THIS COMPILER CAN GENERATE AN INTERNAL SYMBOL TABLE, WHICH IS USED BY A LIBRARY POST-MORTEM ROUTINE TO GIVE SYMBOLIC DUMPS. VARIOUS UTILITIES ARE PROVIDED, SUCH AS A SOURCE RE-FORMATTER, TIDY (1032/16), A CROSS-REFERENCE PROGRAM (1032/18) THAT HANDLES SCOPES CORRECTLY, AND AN INTERACTIVE DEBUGGING SYSTEM (1032/12). THE INSTALLATION GUIDE (1032/1) TELLS HOW TO INSTALL AND RECOMPILE THE VARIOUS SUBCOMPONENTS OF THE SYSTEM. See the NOTE (1032/23) describing the partial fix to the problem caused by the movement of the MTS user memory segment from 6 to 8. 0 Referenced by comments of: 1032/1 01032/002 BCPL CHANGELOG P O S1560 5.0T3 VLO FSNAME=BCPL.CHANGELOG.P.002(1) 1146 5.0T3 1146 BCPL.CHANGELOG.P.002 1 LINE 74 1 PAGE UNE HEAL UNSP AUG. 02, 1979 19:02:20 5.0T9 2 0 A CHRONOLOGICAL LIST OF CHANGES TO THE UNE BCPL SYSTEM. (THIS IS ONE OF THE COMPONENTS SENT FROM UNE, AND DETAILS THE CHANGES THAT WERE MADE AT NEWCASTLE, NOT THE CHANGES MADE AT UM.) 01032/003 BCPL COMMENTS P S1560 5.0T3 VLO FSNAME=BCPL.COMMENTS.P.003(1) 1147 5.0T3 1147 BCPL.COMMENTS.P.003 1 LINE 66 1 PAGE UM UNSP DEC. 08, 1979 20:00:45 5.0T9 3 0 A BRIEF DESCRIPTION OF THE CHANGES BETWEEN UNE AND UM (MOSTLY FILENAMES). 01032/004 BCPL INSTALL C S1560 5.0T3 VLO FSNAME=BCPL.INSTALL.C.004(1) 1148 5.0T3 1148 BCPL.INSTALL.C.004 1 LINE 94 3 PAGE UM UNSP DEC. 08, 1979 20:00:49 5.0T9 4 0 THE COMMANDS USED TO INSTALL BCPL AT UM. 01032/005 BCPL COMPILER S O UNSP:BCPL.COMPILER 5.0T3 1149 BCPL.COMPILER.S.005 1 LINE 117 48 PAGE UNE HEAL UNSP AUG. 02, 1979 19:01:42 5.0T9 5 0 CONTAINS ALL THE COMPILER MODULES (WRITTEN IN BCPL), AND THEIR ASSOCIATED HEADER FILES, AS A 'PDS' WHERE LINES 1-99 CONTAIN THE MODULE NAME, AND THE CORRESPONDING LINE NUMBER RANGE FOR THE SOURCE. TO COMPILE, THE HEADER FILES MUST BE EXTRACTED INTO REAL MTS FILES, IN ORDER THAT THE 'GET' COMMANDS WILL WORK. 1 SUN SEP 08/96 15:24:55 Page 783 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 0 Referenced by comments of: 1032/14 01032/006 BCPL COMPILER OE O S1560 5.0T3 VLO FSNAME=BCPL.COMPILER.OE.006(1) 1150 5.0T3 1150 BCPL.COMPILER.OE.006 1 LINE 9496 20 PAGE UNE HEAL UNSP JULY 03, 1981 20:47:47 5.0T9 6 UNSP:BCPL.COMPILER 0 OBJECT OF THE COMPILER - $CONTINUES WITH USNP:BCPL.LIBRARY (1032/7). 01032/007 BCPL LIBRARY S O S1560 5.0T3 VLO FSNAME=BCPL.LIBRARY.S.007(1) 1151 5.0T3 1151 BCPL.LIBRARY.S.007 1 LINE 124 48 PAGE UNE HEAL UNSP AUG. 02, 1979 19:02:02 5.0T9 7 0 SOURCE OF LIBRARY AS A 'PDS'. WRITTEN IN BCPL. 0 Referenced by comments of: 1032/6, 1032/8, 1032/10, 1032/11 01032/008 BCPL LIBRARY UC O S1153 UNSP VLO FSNAME=BCPL.BCPLSYS 5.0T3 1152 BCPL.LIBRARY.UC.008 1 LINE 62 1 PAGE UM UNSP DEC. 08, 1979 20:00:42 5.0T9 8 0 AN UPDATE TO SECTION BCPLSYS IN THE LIBRARY SOURCE (1032/7). USES GPSECT IN THE RESIDENT SYSTEM TO GET AROUND PROTECTION-INDUCED CHANGES IN SCANSTOR (ALSO IN THE RESIDENT SYSTEM). 0 Referenced by comments of: 1032/11 01032/009 BCPL LIBRARY S O UNSP:BCPL.LIBHDR 5.0T3 1153 BCPL.LIBRARY.S.009 1 LINE 57 2 PAGE UNE HEAL UNSP JULY 03, 1981 20:47:51 5.0T9 9 UNSP:BCPL.LIBHDR 0 HEADER FILE FOR LIBRARY, WRITTEN IN BCPL. 0 Referenced by comments of: 1032/11 01032/010 BCPL LIBRARY S O UNSP:BCPL.STREAMH 5.0T3 1154 BCPL.LIBRARY.S.010 1 LINE 90 2 PAGE UNE HEAL UNSP JULY 03, 1981 20:47:52 5.0T9 10 UNSP:BCPL.STREAMH 0 HEADER GIVING INTERNAL STRUCTURE OF BCPL STREAMS - NEEDED BY UNSP:BCPL.LIBRARY (1032/7) AND ADVANCED USERS ONLY. WRITTEN IN BCPL. 0 Referenced by comments of: 1032/11 01032/011 BCPL LIBRARY OL O UNSP:BCPL.LIBRARY 5.0T3 1155 BCPL.LIBRARY.OL.011 1 LINE 14056 12 PAGE UNE HEAL UNSP JULY 03, 1981 20:47:54 5.0T9 11 UNSP:BCPL.LIBRARY 0 BCPL LIBRARY, THE LINKEDITED OBJECT OF (1032/7), (1032/8), (1032/9), AND (1032/10). CONTAINS SECTIONS BCPLSYS, BCPLIO, BCPLRLIB, BCPLBLIB, BCPLFLIB, AND BCPLMISC. ALSO CONTAINS BCPLPM AND GLOBUSE, WHICH ARE USED BY THE DEBUGGER (1032/12), BUT FOR WHICH WE DID NOT RECEIVE SOURCE FROM UNE. 1 SUN SEP 08/96 15:24:55 Page 784 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1032/13, 1032/17, 1032/19, 1032/21 01032/012 BCPL DEBUGGER S O S1560 5.0T3 VLO FSNAME=BCPL.DEBUGGER.S.012(1) 1156 5.0T3 1156 BCPL.DEBUGGER.S.012 1 LINE 91 19 PAGE UNE HEAL UNSP AUG. 02, 1979 19:01:51 5.0T9 12 0 SOURCE OF DEBUGGING SYSTEM, WRITTEN IN BCPL. 0 Referenced by comments of: 1032/1, 1032/11, 1032/14, 1032/21 01032/013 BCPL DEBUGGER OE O UNSP:BCPL.DEBUG 5.0T3 1157 BCPL.DEBUGGER.OE.013 1 LINE 14328 9 PAGE UNE HEAL UNSP JULY 03, 1981 20:47:57 5.0T9 13 UNSP:BCPL.DEBUG 0 WORKING OBJECT OF THE DEBUGGER. $CONTINUES WITH UNSP:BCPL.LIBRARY (1032/11). 01032/014 BCPL BCPLOPTS S O S1560 5.0T3 VLO FSNAME=BCPL.BCPLOPTS.S.014(1) 1158 5.0T3 1158 BCPL.BCPLOPTS.S.014 1 LINE 92 7 PAGE UNE HEAL UNSP AUG. 02, 1979 19:02:20 5.0T9 14 0 SET OF ROUTINES BORROWED FROM LEXICAL ANALYSER IN THE COMPILER (1032/5) FOR READING USER OPTIONS IN PROGRAMS. WRITTEN IN BCPL. USED BY THE DEBUGGER (1032/12). 01032/015 BCPL MACROS SM O S1560 5.0T3 VLO FSNAME=BCPL.MACROS.SM.015(1) 1159 5.0T3 1159 BCPL.MACROS.SM.015 1 LINE 80 13 PAGE UNE HEAL UNSP AUG. 02, 1979 19:02:00 5.0T9 15 0 MACRO LIBRARY FOR USE IN ASSEMBLING THE ASSEMBLER PARTS OF THE LIBRARY - I. E., BCPLSYS, BCPLFLIB, BCPLRLIB. 01032/016 BCPL TIDY S O S1560 5.0T3 VLO FSNAME=BCPL.TIDY.S.016(1) 1160 5.0T3 1160 BCPL.TIDY.S.016 1 LINE 100 21 PAGE UNE HEAL UNSP AUG. 02, 1979 19:02:12 5.0T9 16 0 SOURCE OF SOURCE RE-FORMATTER PROGRAM, TIDY. WRITTEN IN BCPL. 0 Referenced by comments of: 1032/1, 1032/17, 1032/21 01032/017 BCPL TIDY OE O UNSP:BCPL.TIDY 5.0T3 1161 BCPL.TIDY.OE.017 1 LINE 6640 8 PAGE UNE HEAL UNSP JULY 03, 1981 20:48:01 5.0T9 17 UNSP:BCPL.TIDY 0 OBJECT OF (1032/16). $CONTINUES WITH UNSP:BCPL.LIBRARY (1032/11). 01032/018 BCPL XREFFER S O S1560 5.0T3 VLO FSNAME=BCPL.XREFFER.S.018(1) 1162 5.0T3 1162 BCPL.XREFFER.S.018 1 LINE 101 16 PAGE UNE HEAL UNSP AUG. 02, 1979 19:02:17 5.0T9 18 0 SOURCE FOR THE BCPL CROSS-REFERENCER. WRITTEN IN BCPL. 0 Referenced by comments of: 1032/1, 1032/21 1 SUN SEP 08/96 15:24:55 Page 785 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01032/019 BCPL XREFFER OE O UNSP:BCPL.XREF 5.0T3 1163 BCPL.XREFFER.OE.019 1 LINE 6488 6 PAGE UNE HEAL UNSP JULY 03, 1981 20:48:04 5.0T9 19 UNSP:BCPL.XREF 0 OBJECT OF THE BCPL CROSS-REFERENCER. $CONTINUES WITH UNCP:BCPL.LIBRARY (1032/11). 01032/020 BCPL MANUAL P O S1560 5.0T3 VLO FSNAME=BCPL.MANUAL.P.020(1) 1164 5.0T3 1164 BCPL.MANUAL.P.020 1 LINE 74 25 PAGE UNE HEAL UNSP AUG. 02, 1979 19:01:55 5.0T9 20 0 THIS IS A PRINT FILE CONTAINING THE BCPL MANUAL WRITTEN AT CAMBRIDGE, WHICH DESCRIBES BCPL WITH OS DEPENDENCIES. 01032/021 BCPL USERGUIDE WX O S1560 5.0T3 VLO FSNAME=BCPL.USERGUIDE.WX.021(1) 1165 5.0T3 1165 BCPL.USERGUIDE.WX.021 1 LINE 111 12 PAGE UNE HEAL UNSP AUG. 02, 1979 19:01:49 5.0T9 21 0 TEXTFORM SOURCE OF A MANUAL ENTITLED 'HOW TO USE BCPL IN MTS.' THIS MANUAL IS A GUIDE TO THE USE OF BCPL IN MTS, AND MTS-SPECIFIC PARTS OF THE LIBRARY (1032/11). IT ALSO CONTAINS DOCUMENTATION FOR THE DEBUGGER (1032/12), XREF (1032/18), AND TIDY PROGRAMS (1032/16). THE TEXTFORM LAYOUT USED TO PRODUCE THIS AT UNE WAS NOT DISTRIBUTED, SO A PRINT FILE (1032/22) IS ALSO BEING INCLUDED. 0 Referenced by comments of: 1032/22 01032/022 BCPL USERGUIDE P O UNSP:BCPL.W 5.0T3 1166 BCPL.USERGUIDE.P.022 1 LINE 80 38 PAGE UNE HEAL UNSP JULY 03, 1981 20:48:08 5.0T9 22 0 A PRINT FILE FOR (1032/21). 0 Referenced by comments of: 1032/21 01032/023C BCPL NOTE P W358:BLIB.NOTE 5.1T3 357 BCPL.NOTE.P.023 1 LINE 82 1 PAGE UNE HEAL UNSP AUG. 20, 1983 19:50:39 0 A print file which explains the changes needed to the BCPL run-time library following the changes to the MTS user memory segment map. 0 Referenced by comments of: 1032/1 01032/024C BCPL NEW BCPLIO S W358:B.NEWIO 5.1T3 358 BCPL.NEW_BCPLIO.S.024 1 LINE 124 15 PAGE UNE HEAL UNSP AUG. 20, 1983 19:50:40 0 New source for the Section BCPLIO required because of the MTS change moving the first user memory segment from 6 to 8. 0 Referenced by comments of: 1032/25 1 SUN SEP 08/96 15:24:55 Page 786 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01032/025C BCPL NEW LIBRARY OL W358:B.NEWLIB 5.1T3 359 BCPL.NEW_LIBRARY.OL.025 1 LINE 14056 12 PAGE UNE HEAL UNSP AUG. 20, 1983 19:50:40 0 New run-time library containing the modified BCPLIO (1032/24). 01033/001 COURSEWRITER # (NOT INSTALLED AT UM) D4T3 458 COURSEWRITER.COURSES.M.001 1 LINE 74 1 PAGE UBC OSTERLIN JUNE 04, 1976 10:38:04 0 THE MTS IMPLEMENTATION OF COURSEWRITER WAS NOT DONE BY THE UBC COMPUTING CENTRE, BUT BY BILL WEBB OF THE UBC DEPARTMENT OF ANIMAL RESOURCE ECOLOGY. THERE IS CURRENTLY NOT A WORKING VERSION OF COURSEWRITER INSTALLED AT MICHIGAN. 01034/001 MACEDIT # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A GENERAL PURPOSE ASSEMBLER UTILITY PROGRAM. 01035/001 LANGUAGE # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE LANGUAGES DATA BASE FOR ALL LANGUAGES AVAILABLE AT UBC. 01036/001A CONTEXT-DIRECTED UPDATE OBJECT OE G *CDUPDATE 5.1T2 1249 CONTEXT-DIRECTED_UPDATE.O.OE.001 1 LINE 32767 15 PAGE UBC BALLARD SHERRY JULY 23, 1983 14:49:41 *CDUPDATE 0 The complete CDUPDATE program consists of the object for the PLUS program, the parser tables generated by *CLPARSEGEN (1076/1), together with the loader records needed to include the shared VM CLPARSER and Plus runtime libraries (*CLPARSER (1076/6) and *PLUS.OBJLIB (1042/64) at UM). It can be produced with *LINKEDIT via the following commands: INCLUDE object-for-CDUPDATE INCLUDE object-for-tables (COMBINE) if desired PUNCH CDUPDATE (I would prefer that you do not purge external symbols from the object module, although it may be combined. The external symbols will appear in the error message resulting from bugs in CDUPDATE, and are very useful to me in interpreting problems.) Note that the distributed object has PLUS run-time checking enabled. A further 10-15% reduction in CPU use can be obtained by compiling everything with %Check:=False specified. For the present, however, I would recommend leaving the checking enabled. ****************************************************************************** D5.0B version: 1 SUN SEP 08/96 15:24:55 Page 787 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This is the complete linkedited object for CDUPDATE version 2.3. This is functionally the same as version 2.2, as distributed on D5.0. It has been modified to use the new version of *CLPARSER and to fix a couple of minor bugs. The object as distributed still has the default version set to 2.15, which means that /EDIT commands will behave the new way, but will issue a message for any edits that would have been incompatible with version 2.0. To change the default version, change the constant DEFAULT_VERSION at line 836 in (1036/2) to the value 2300 (for version=2.3). (It may also be set to 2000 to obtain the same behavior as in version 2.0). ****************************************************************************** 0 Referenced by comments of: 308/21, 400/6, 636/2, 813/7, 813/14, 813/15, 813/19, 813/20, 813/21, 813/22, 813/23, 813/24, 813/25, 813/28, 813/29, 813/30, 813/31, 813/40, 813/41, 813/43, 813/44, 813/45, 813/46, 813/47, 813/48, 813/49, 813/52, 813/53, 813/54, 813/55, 829/2, 1054/2, 4200/1 01036/002A CONTEXT-DIRECTED UPDATE SOURCE SQ G W067:CDUPDATE.S 5.1T2 1250 CONTEXT-DIRECTED_UPDATE.S.SQ.002 1 LINE 88 75 PAGE UBC BALLARD SHERRY JULY 23, 1983 14:49:42 0 PLUS source for CDUPDATE program. This includes declarations generated by the analyzer for the grammar. If the grammar is changed, the appropriate lines of this file must be changed also. Compiling this program requires the parser library - specify 0=*CLPARSELIB+*PLUS.SOURCELIB (comps. (1076/11) and (1042/5) or local equivalent) 0 Referenced by comments of: 737/15, 1036/1 01036/003A CONTEXT-DIRECTED UPDATE GRAMMAR SR G W067:CDUPDATE.G 5.1T2 1251 CONTEXT-DIRECTED_UPDATE.G.SR.003 1 LINE 88 6 PAGE UBC BALLARD SHERRY JULY 23, 1983 14:49:45 0 Grammar, input to *CLPARSEGEN (1076/1), defining CDUPDATE commands etc. 01036/004A CONTEXT-DIRECTED UPDATE WRITEUP WF W067:CDUPDATE.WF 5.1T2 1252 CONTEXT-DIRECTED_UPDATE.W.WF.004 1 LINE 106 16 PAGE UBC BALLARD SHERRY JULY 23, 1983 14:49:45 0 Writeup describing CDUPDATE, based on a UBC writeup. It describes the changes provided by versions 2.2 and 2.3, and also has improved descriptions of the /BUFFER command (which wasn't too well understood in the last version), and some examples. Note that it is in *FORMAT (308) this time. It uses STAF:FMTLIB (here referred to by its UM name of COPY:JONMACLIBFMT (308/18). Note: A revised version of this writeup is being distributed as CCMemo 434 (1036/6). 1 SUN SEP 08/96 15:24:55 Page 788 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01036/005A CONTEXT-DIRECTED UPDATE WRITEUP PF W067:CDUPDATE.P 5.1T2 1253 CONTEXT-DIRECTED_UPDATE.W.PF.005 1 LINE 69 20 PAGE UBC BALLARD SHERRY JULY 23, 1983 14:49:46 0 $COPY-able writeup for CDUPDATE, 28 pages. 01036/006C CONTEXT-DIRECTED UPDATE MEMO 434 WF W273:MEMO434.SOU 5.1T2 1254 CONTEXT-DIRECTED_UPDATE.M.WF.006 1 LINE 112 19 PAGE UBC SHERRY JULY 23, 1983 14:49:47 0 This is Computing Center Memo 434, "UBC CDUPDATE." 0 Referenced by comments of: 1036/4, 1036/7 01036/007C CONTEXT-DIRECTED UPDATE MEMO 434 PF S0672 CCMEMO 'CCMEMOS' FSNAME=MEMO434.OUT 5.1T2 1255 CONTEXT-DIRECTED_UPDATE.M.PF.007 1 LINE 70 20 PAGE UBC SHERRY MAY 04, 1983 16:56:38 0 Printer-ready version of (1036/6). 01037/001 FORTRAN MESSAGE ROUTINE # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A FORTRAN-CALLABLE MESSAGE ROUTINE. 01038/001A REPORT GENERATOR DESCRIP SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.DESCRIP.SA.001(1) 5.1T2 1256 REPORT_GENERATOR.DESCRIP.SA.001 1 LINE 81 23 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:19 0 Phase 1 of RG which performs the following functions: 1. data initialization , parameter scanning 2. process ITEM , ENTRY , and FIELD commands See the internal documentation manual for older changes to various parts of the actual code of this and other source subcomponents. Component (1038/11) is unchanged since last saved Feb 14, 1977. 01038/002A REPORT GENERATOR COMPILE SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.COMPILE.SA.002(1) 5.1T2 1257 REPORT_GENERATOR.COMPILE.SA.002 1 LINE 80 28 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:24 0 Phase 2 of RG which performs the following functions: 1 - process EXTRACT , ORDER , TABLE , CALL , TITLE , PRINT commands 2 - generate appropriate blocks of data defining the required operation. 01038/003A REPORT GENERATOR ACTION SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.ACTION.SA.003(1) 5.1T2 1258 REPORT_GENERATOR.ACTION.SA.003 1 LINE 80 22 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:31 0 Phase 3 of RG which performs the following functions: reads the data file and transfers the extracted data records to the temporary sequential file -TEMPNAME. 01038/004A REPORT GENERATOR PRINT SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.PRINT.SA.004(1) 5.1T2 1259 REPORT_GENERATOR.PRINT.SA.004 1 LINE 80 22 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:37 0 Phase 4 of RG which performs the following functions: PRINT prints the required reports. PRINT , TITLE , CALL , TABLE all are handled here. 1 SUN SEP 08/96 15:24:55 Page 789 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01038/005A REPORT GENERATOR OVERFLOW SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.OVERFLOW.SA.005(1) 5.1T2 1260 REPORT_GENERATOR.OVERFLOW.SA.005 1 LINE 80 9 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:44 0 External subroutines to handle overflow and capitalization for PRINT. Made external because of base register problems and use of registers. 01038/006A REPORT GENERATOR SUBROUTINES SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.SUBROUTI.SA.006(1) 5.1T2 1261 REPORT_GENERATOR.SUBROUTI.SA.006 1 LINE 80 23 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:46 0 Subroutines used by RG - all called by " BALR LINK,LINK " SCAN - get another field SSCAN - " " " ( special field) GNUMBER - get a numeric field GFIELD - get a field FNAME - insure field is a legal field NUM - convert a field to numeric 01038/007A REPORT GENERATOR DATA SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.DATA.SA.007(1) 5.1T2 1262 REPORT_GENERATOR.DATA.SA.007 1 LINE 78 1 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:53 0 Generates the PSECT as a CSECT to define all required constants. 01038/008A REPORT GENERATOR OUTPUT SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.OUTPUT.SA.008(1) 5.1T2 1263 REPORT_GENERATOR.OUTPUT.SA.008 1 LINE 80 5 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:51 0 Routine to output error comments (mark) and output formatting to SPRINT and echoing of input lines if requested. 01038/009A REPORT GENERATOR INSERT_SORT SA O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.INSERT_S.SA.009(1) 5.1T2 1264 REPORT_GENERATOR.INSERT_S.SA.009 1 LINE 80 22 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:54 0 Insertion sort added for greater efficiency. Acquires sorting tree space in pieces independently of RG's space management and statistics; hence memory usage reported by RG is often much less than before. This sort is general-purpose and can be used outside RG. The initial source comment serves as documentation. 01038/010A REPORT GENERATOR MACLIB SM O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.MACLIB.SM.010(1) 5.1T2 1265 REPORT_GENERATOR.MACLIB.SM.010 1 LINE 72 20 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:37:58 0 Macro library used by all RG source routines. 01038/011 REPORT GENERATOR INTERNAL DOC WF O S1560 5.0T3 VLO FSNAME=REPORT_GENERATOR.INTERNAL.WF.012(1) 5.0T3 1187 REPORT_GENERATOR.INTERNAL.WF.012 1 LINE 81 8 PAGE UBC BUCKLAND RIOLO FEB. 14, 1977 08:58:39 5.0T9 43 0 Requires "NO SUPER" and "NO KEYPUNCH" control FORMAT control cards. Uses JONMACLIB (308/18). ************************************************************************ This subcomponent is unchanged since last saved Feb 14, 1977. ************************************************************************ 1 SUN SEP 08/96 15:24:55 Page 790 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1038/1 01038/012C REPORT GENERATOR MEMO 437 WF W273:MEMO437.SOU 5.1T2 1266 REPORT_GENERATOR.MEMO_437.WF.012 1 LINE 89 70 PAGE UBC BUCKLAND RIOLO JULY 23, 1983 14:58:11 0 This is Computing Center Memo 437 -- "UBC RG: The Report Generator." (It is a revised version of the UBC writeup.) 0 Referenced by comments of: 1038/13 01038/013C REPORT GENERATOR MEMO 437 PF W273:MEMO437.OUT 5.1T2 1267 REPORT_GENERATOR.MEMO_437.PF.013 1 LINE 72 85 PAGE UM RIOLO JULY 23, 1983 14:58:14 0 This is the printer-ready version of (1038/12). 01038/014A REPORT GENERATOR OBJECT OC O *RG 5.1T2 1268 REPORT_GENERATOR.OBJECT.OC.014 1 LINE 9719 14 PAGE UBC BUCKLAND RIOLO JULY 23, 1983 14:58:17 *RG 0 ----------------- The following items are the major changes from previous versions: - *COMMENT command allowed in master file descriptions; - Output record lengths of greater than 132 characters supported; - "PRINT ALL FIELDS WITH FIELDNAME" added for debugging purposes. This prints each fieldname and its contents; - "REST ARE SAME" phrase allowed in the DECODE command; - New parameters added: . NOCONTROL which does not use carriage control on output, . SIZE=N to set the number of pages of VM to use; - Macros may be terminate by "$ENDFILE" and may be nested up to five levels; - "WHEN FIELDNAME CHANGES" phrase supported in the PRINT command; - TABLE command now supports titles; -------------78-08-24-------- Several bugs fixed. -------------78-12-01-------- (See also UBC's November/78 Newsletter) - Several more bugs fixed; - No more arithmetic operators (+-*/) in field names; - No more field starting columns > 256: - String may now terminate fields, e.g. FIELD FIRST IS TERMINATED BY 'DIVIDER' - 'ORDER PERMUTED' now treats any initial alphabetic character including lowercase as starting new word; - No more null literals in 'WHEN' specifications; - New date "SYSCHARDATE" in 'MMM DD, 19YY' form; - 'PRINT ALL FIELDS WITH OVERFLOW' now allowed; - Capitalization now recognizes all standard sentence ends. ----------------- *********************************************************************************** D5.0A version: A major new release of RG. Important new and improved features: 1 SUN SEP 08/96 15:24:55 Page 791 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 - general conversion to handle mixed-case input, output, messages; - continuation of runs after recoverable errors detected; - improved diagnostic and statistical messages; - generalization of SKIPWORDS parameter; - raising of maximum field length to 32,767; - totalling in tables; - default sorting of upper and lower case alphabetics equivalently; - multiple permuted fields in a single ORDER; - allowing arbitrarily many called routines; - multiple titles for a single PRINT; - more flexible control of when titles are printed; - printing elsewhere than on SPRINT; - printing the component parts of a SYSKEY if desired; - printing with right justification if desired; - new WHEN conditions in PRINTs (according to whether or not a field contains a string, is greater than or less than a quantity, or is alphabetic or numeric); - nesting of WHEN conditions; UBC Technical Note TN159 (published May 1/81, 21 pages) gives full details, including things not mentioned above. If the file RG1.:STATSMSGS exists, runs are now monitored statistically. *********************************************************************************** 01038/015A REPORT GENERATOR TEST PROGRAMS C S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.TEST_PRO.C.015(1) 5.1T2 1269 REPORT_GENERATOR.TEST_PRO.C.015 1 LINE 349 49 PAGE UBC BUCKLAND RIOLO APR. 21, 1981 14:54:50 0 A series of test programs to test out your version of RG under CCID=RG1. $SOURCE the file to perform the tests. 0 Referenced by comments of: 1038/17 01038/016A REPORT GENERATOR UM EXAMPLE C W280:RG.EXAMPLE 5.1T2 1270 REPORT_GENERATOR.UM_EXAMP.C.016 1 LINE 128 3 PAGE UBC BUCKLAND RIOLO JULY 23, 1983 14:58:20 0 A file that can be $SOURCEd to to produce a sample RG run. 01038/017C REPORT GENERATOR COMPARER OC O S0999 5.0AT1 VLO FSNAME=REPORT_GENERATOR.COMPARER.OC.017(1) 5.1T2 1271 REPORT_GENERATOR.COMPARER.OC.017 1 LINE 80 7 PAGE UBC BUCKLAND RIOLO APR. 16, 1981 13:38:52 0 Comparison program used in (1038/15); compares contents of units 1 and 2 for equality, and reports differences. 01039/001 READPAGE # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A DISK UTILITY TO READ ANY PAGE ON ANY VOLUME ANY NUMBER OF TIMES. 01040/001 DISK # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN UMMPS JOB TO LOCK A PUBLIC VOLUME SO THAT IT CAN BE MOVED TO ANOTHER DRIVER, OR POSSIBLY ANOTHER CONTROL UNIT. 1 SUN SEP 08/96 15:24:55 Page 792 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01041/001 RESOURCE MANAGER DSP LIBRARY OL O TMTS:DSPLIBRARY 5.0T3 1192 RESOURCE_MANAGER.DSP_LIBR.OL.001 1 LINE 5438 21 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:24 5.0T9 48 TMTS:DSPLIBRARY 0 Object library containing DSPs and DSP support routines. This library contains: The DSP PRV initialization routines (1041/2); the DSP expanded form message table (1041/3); the DSP interface (1041/4); the DSP service routines (1041/5); the Intertask line DSP (1041/6); the intertask node DSP (1041/7); and the DSP table (1041/8). The Subtasking Monitor (1058) is required to run DSPs. 0 Referenced by comments of: 1042/1, 1051/1, 1051/33, 1051/36, 1051/39, 1079/1 01041/002 RESOURCE MANAGER DSP PRV INIT SA O TMTS:DSPPRV(1000) 5.0T3 1193 RESOURCE_MANAGER.DSP_PRV.SA.002 1 LINE 79 3 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:26 5.0T9 49 0 Pseudo-register initialization for the DSP portion of the transfer vector. Also contains LCS and LCSPR tables for DSP-related routines. Assemble with COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and the DSP macros (1041/9). 0 Referenced by comments of: 1041/1 01041/003 RESOURCE MANAGER DSP EFMS SA O TMTS:DSPEFMS(1000) 5.0T3 1194 RESOURCE_MANAGER.DSP_EFMS.SA.003 1 LINE 67 3 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:27 5.0T9 50 0 DSP expanded-form messages. Assemble with COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1041/1 01041/004 RESOURCE MANAGER DSP INTERFACE SA O TMTS:DSPINTERFACE(1000) 5.0T3 1195 RESOURCE_MANAGER.DSP_INTE.SA.004 1 LINE 79 18 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:28 5.0T9 51 0 DSP interface routine. Assemble with COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and the DSP macros (1041/9). 0 Referenced by comments of: 1041/1 01041/005 RESOURCE MANAGER DSP SRVC RTNS SA O TMTS:DSPSERV(1000) 5.0T3 1196 RESOURCE_MANAGER.DSP_SRVC.SA.005 1 LINE 70 10 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:34 5.0T9 52 0 DSP service routines. Assemble with COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), COPY:FILE.MACROS (482/45), and the DSP macros (1041/9). 0 Referenced by comments of: 1041/1 1 SUN SEP 08/96 15:24:55 Page 793 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01041/006 RESOURCE MANAGER ITSK LINE DSP SA O TMTS:DSPITLN(1000) 5.0T3 1197 RESOURCE_MANAGER.ITSK_LIN.SA.006 1 LINE 78 13 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:35 5.0T9 53 0 The intertask line DSP. Assemble with OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), and the DSP macros (1041/9). 0 Referenced by comments of: 1041/1 01041/007 RESOURCE MANAGER ITSK NODE DSP SA O TMTS:DSPITSK(1000) 5.0T3 1198 RESOURCE_MANAGER.ITSK_NOD.SA.007 1 LINE 78 14 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:38 5.0T9 54 0 The intertask node DSP. Assemble with OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), and the DSP macros (1041/9). 0 Referenced by comments of: 1041/1 01041/008 RESOURCE MANAGER DSP TABLE SA O TMTS:DSPTABLE(1000) 5.0T3 1199 RESOURCE_MANAGER.DSP_TABL.SA.008 1 LINE 72 1 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:41 5.0T9 55 0 The DSP table. Contains entries only for the intertask line and node DSPs. Assemble with the DSP macros (1041/9). 0 Referenced by comments of: 1041/1 01041/009 RESOURCE MANAGER DSP MACROS SM O DMGR:DSP.MACROS 5.0T3 1200 RESOURCE_MANAGER.DSP_MACR.SM.009 1 LINE 78 8 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:42 5.0T9 56 0 DSP macro library. 0 Referenced by comments of: 1041/2, 1041/4, 1041/5, 1041/6, 1041/7, 1041/8, 1051/9, 1051/17, 1051/31, 1051/37 01041/010 RESOURCE MANAGER MSG EXPANSION SA G DMGR:MNTRMMSG(1000) 5.0T3 1201 RESOURCE_MANAGER.MSG_EXPA.SA.010 1 LINE 68 13 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:44 5.0T9 57 0 This is the message expand routine, used to expand canonical form messages. Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1051/1, 1051/33, 1051/39, 1079/1 01041/011 RESOURCE MANAGER MSG EXPANSION OC O DMGR:MNTRMMSG(1,999) 5.0T3 1202 RESOURCE_MANAGER.MSG_EXPA.OC.011 1 LINE 80 6 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:47 5.0T9 58 0 Object for 1041/10. 1 SUN SEP 08/96 15:24:55 Page 794 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01041/012 RESOURCE MANAGER RM ROUTINES SA O DMGR:MNTRMETC(1000) 5.0T3 1203 RESOURCE_MANAGER.RM_ROUTI.SA.012 1 LINE 70 4 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:49 5.0T9 59 0 Resource Manager service routines: RMGTFILE, RMFRFILE, RMMESSG, RMMSGOUT. Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and COPY:FILE.MACROS (482/45). 01041/013 RESOURCE MANAGER RM ROUTINES OC O DMGR:MNTRMETC(1,999) 5.0T3 1204 RESOURCE_MANAGER.RM_ROUTI.OC.013 1 LINE 80 3 PAGE UBC BOWLER HELFFRICH JULY 03, 1981 20:54:50 5.0T9 60 0 Object for 1041/12. 01041/014 RESOURCE MANAGER PLUS LIBRARY SQ O RMGR:RMGR#SQL 5.0BT2 32 RESOURCE_MANAGER.PLUS_LIB.SQ.014 1 LINE 70 51 PAGE UBC BALLARD BURLING NOV. 29, 1982 15:36:44 0 Current version of library of PLUS definitions for Resource Manager routines data structures. Distributed here in case it contains anything of interest. 01042/001A PLUS/470 COMPILER OE G *PLUS 5.1T3 1 PLUS/470.COMPILER.OE.001 1 LINE 32767 83 PAGE UBC BALLARD BURLING JULY 23, 1983 15:14:22 *PLUS 0 ******************************************************************* * P L U S * * copyright 1982 Alan Ballard and Paul Whaley * * * * The PLUS compiler should not be distributed without * * permission from the authors. * * * ******************************************************************* This is the current, complete, linkeditted version of the compiler. It refers to files PLUS:PLUSMESSAGES (1042/4), *PLUS.SOURCELIB (1042/5) and PLUS:PLUSLOG (the PLUS compiler statistics file, which is not distributed). See installation notes (1042/3) for details. This is version 24/15 of the compiler, required by most pieces of the Resource Manager (1041). See NEWS file (1042/75) for changes since previous distribution. Note that the writeup has not been updated. ******************************************************************** D5.1 version: This is the version of the compiler included with the first Resource Manager distribution. 1 SUN SEP 08/96 15:24:55 Page 795 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 UM version: Contains a re-compiled VERSION (1042/11) for UM and a new version of SDS_SYMS (1042/42) that will generate SYM cards with dsect names greater than 8 characters long. The compiler option %TEST must be set to 2 to force this action; only the new version of SDS, (600/18) through (600/37), will correctly process these SYM cards. ******************************************************************** 01042/002A PLUS/470 COMPILER OC G PLUS:PLUS> 5.1T3 2 PLUS/470.COMPILER.OC.002 1 LINE 12760 125 PAGE UBC BALLARD BURLING JULY 23, 1983 15:14:25 0 This is the current, complete unlinkeditted version 24/15 of the compiler. This version references PLUS:PLUSMESSAGE> rather than PLUS:PLUSMESSAGES. See installation notes (1042/3) for details. ******************************************************************** 5.0B version: Contains re-compiled versions of CONST TAB (1042/45), OBJ_GEN (1042/47), and OBJ_EMIT (1042/48). ******************************************************************** 01042/003A PLUS/470 INSTALL NOTES P S0093A RMDIST FSNAME=PLUS/470.INSTALL_NOTES.P.002(1) 5.1T3 3 PLUS/470.INSTALL_NOTES.P.003 1 LINE 76 4 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:21 0 ************************************* * Instructions for installing PLUS. * ************************************* Minor revisions since previous distribution. 0 Referenced by comments of: 1042/1, 1042/2 01042/004A PLUS/470 MESSAGES M G PLUS:PLUSMESSAGES 5.1T3 4 PLUS/470.MESSAGES.M.004 1 LINE 147 8 PAGE UBC BALLARD BURLING JULY 23, 1983 15:14:43 0 Message file accessed by the compiler. Install as ccid:PLUSMESSAGES for linkeditted version of compiler, and as ccid:PLUSMESSAGE> for the test version of the compiler, if used. This also includes messages specific to the PLUS-11 compiler. PLUS-11 references a copy in the file PLUS:PLUSMSG11. See installation notes (1050/3) for details. 0 Referenced by comments of: 1042/1 1 SUN SEP 08/96 15:24:55 Page 796 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/005A PLUS/470 SOURCELIB SQ G *PLUS.SOURCELIB 5.1T3 5 PLUS/470.SOURCELIB.SQ.005 1 LINE 91 65 PAGE UBC BALLARD BURLING JULY 23, 1983 15:14:43 0 This is the source library assumed if unit 0 is not specified when running the compiler. The library contains a number of useful declarations. Basically, the contents are: a) Some useful types such as Integer, Boolean, etc. b) Definitions of some 370/470 machine characteristics, such as the word size, the operation codes, etc. c) Declarations for the standard run-time support and other useful routines in shared VM at UBC (or *PLUS.OBJLIB (1042/64)). d) Declarations for most of the MTS system subroutines. There have been various additions and changes since the last distribution. ******************************************************************** D5.1 version: This is the current UM library. ******************************************************************** 0 Referenced by comments of: 67/1, 67/3, 67/5, 67/7, 482/69, 509/10, 509/14, 553/5, 553/9, 802/25, 821/1, 821/5, 839/1, 839/2, 843/1, 851/1, 852/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1036/2, 1042/1, 1042/50, 1042/56, 1042/67, 1042/72, 1042/73, 1042/82, 1042/87, 1076/2, 1076/9, 1080/19, 1084/2, 1086/1, 1089/9 01042/006C PLUS/470 SOURCELIB SQ G PLUS:SOURCEL#SQL 5.1T3 6 PLUS/470.SOURCELIB.SQ.006 1 LINE 71 61 PAGE UBC BALLARD BURLING JULY 23, 1983 15:14:46 0 ******************************************************************** D5.1 version: This is the base source as distributed with the first Resource Manager distribution. ******************************************************************** 0 Referenced by comments of: 1042/7 01042/007C PLUS/470 SOURCELIB UC G PLUS:SOURCEL*UQL 5.1T3 7 PLUS/470.SOURCELIB.UC.007 1 LINE 91 9 PAGE UM BURLING JULY 23, 1983 15:14:49 0 ********************************************************************** D5.1 version: These are the updates used to produce the current UM library from (1042/6). ********************************************************************** 0 Referenced by comments of: 811/4, 811/6, 811/8 1 SUN SEP 08/96 15:24:55 Page 797 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/008 PLUS/470 LISTING L G S1644 5.0BT1 VLO FSNAME=PLUS/470.LISTING.L.007(1) 898 5.0BT1 898 PLUS/470.LISTING.L.007 1 LINE 138 1156 PAGE UBC BALLARD BURLING JULY 26, 1982 20:04:27 0 Complete source listing of compiler. $COPY to printer (TN, if available) with PAGES=1300. This is a listing of version 24. There have been a few minor changes to the source since the listing was produced (a result of fixing the bugs that inevitably showed up after preparing it for distribution). (Note... if you want a listing of just a part of the compiler, you may find it more convenient to restore the source for the part you're interested in and compile it. 1300 pages is unwieldy, even two-sided!) ********************************************************************** D5.1 version: These listings have not changed since D5.0B. They weren't included in the Resource Manager distribution. ********************************************************************** 01042/009A PLUS/470 SOURCE S G S0093A RMDIST FSNAME=PLUS/470.SOURCE.S.005(1) 5.1T3 8 PLUS/470.SOURCE.S.009 1 LINE 41 1 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:27 0 Components (1042/9) to (1042/48) are PLUS source for the compiler. See installation notes for instructions on compiling any of these. This subcomponent contains just a series of $CONTINUE WITH's specifying all the files (under id SUEN, at UBC) constituting the compiler. It is used by the compiler rebuilding job (1042/78). 0 Referenced by comments of: 1042/9 01042/010A PLUS/470 MAIN SQ G S0093A RMDIST FSNAME=PLUS/470.MAIN.SQ.006(1) 5.1T3 9 PLUS/470.MAIN.SQ.010 1 LINE 68 8 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:27 0 Compiler main program and initialization/termination. 01042/011A PLUS/470 VERSION SQ G S0093A RMDIST FSNAME=PLUS/470.VERSION.SQ.007(1) 5.1T3 10 PLUS/470.VERSION.SQ.011 1 LINE 68 4 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:28 0 This routine performs some initialization that differs between versions, and may be different for different MTS installations. Currently, it mainly allows setting the default compiler options, and the names of the files used. See installation notes for further information. 0 Referenced by comments of: 1042/1 1 SUN SEP 08/96 15:24:55 Page 798 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/012A PLUS/470 TRAP SQ G S0093A RMDIST FSNAME=PLUS/470.TRAP.SQ.008(1) 5.1T3 11 PLUS/470.TRAP.SQ.012 1 LINE 81 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:28 0 Compiler program interrupt handler. 01042/013A PLUS/470 TABLE RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.TABLE_RTNS.SQ.009(1) 5.1T3 12 PLUS/470.TABLE_RTNS.SQ.013 1 LINE 81 10 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:28 0 Routines used by compiler to allocate and maintain variable-size arrays and tables. 01042/014A PLUS/470 STRING SQ G S0093A RMDIST FSNAME=PLUS/470.STRING.SQ.010(1) 5.1T3 13 PLUS/470.STRING.SQ.014 1 LINE 68 7 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:29 0 Compiler string-table processing routines. 01042/015A PLUS/470 MESSAGE RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.MESSAGE_RTNS.SQ.011(1) 5.1T3 14 PLUS/470.MESSAGE_RTNS.SQ.015 1 LINE 68 3 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:29 0 Routines which build and print compiler messages. 01042/016A PLUS/470 CONVERT SQ G S0093A RMDIST FSNAME=PLUS/470.CONVERT.SQ.012(1) 5.1T3 15 PLUS/470.CONVERT.SQ.016 1 LINE 68 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:30 0 Various routines which convert things to character strings, mostly for printing in messages. 01042/017A PLUS/470 CONST RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.CONST_RTNS.SQ.013(1) 5.1T3 16 PLUS/470.CONST_RTNS.SQ.017 1 LINE 68 7 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:30 0 Constant processing routines. 01042/018A PLUS/470 I/O RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.I/O_RTNS.SQ.014(1) 5.1T3 17 PLUS/470.I/O_RTNS.SQ.018 1 LINE 68 12 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:31 0 I/O interfacing routines. 01042/019A PLUS/470 INCLUDE RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.INCLUDE_RTNS.SQ.015(1) 5.1T3 18 PLUS/470.INCLUDE_RTNS.SQ.019 1 LINE 68 8 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:32 0 Routines for processing source libraries, %Include. 01042/020A PLUS/470 SCANNER SQ G S0093A RMDIST FSNAME=PLUS/470.SCANNER.SQ.016(1) 5.1T3 19 PLUS/470.SCANNER.SQ.020 1 LINE 68 14 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:32 0 Input scanner. 01042/021A PLUS/470 PARAGRAPHER SQ G S0093A RMDIST FSNAME=PLUS/470.PARAGRAPHER.SQ.017(1) 5.1T3 20 PLUS/470.PARAGRAPHER.SQ.021 1 LINE 68 14 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:33 0 Source paragrapher. 1 SUN SEP 08/96 15:24:55 Page 799 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/022A PLUS/470 PARSER SQ G S0093A RMDIST FSNAME=PLUS/470.PARSER.SQ.018(1) 5.1T3 21 PLUS/470.PARSER.SQ.022 1 LINE 68 8 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:34 0 Input parser. This is driven by tables generated by the UBC LALR(1) analyzer (1080). 0 Referenced by comments of: 1080/7 01042/023A PLUS/470 SYMBOL_TABLE SQ G S0093A RMDIST FSNAME=PLUS/470.SYMBOL_TABLE.SQ.019(1) 5.1T3 22 PLUS/470.SYMBOL_TABLE.SQ.023 1 LINE 95 8 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:35 0 Symbol table processing routines. 01042/024C PLUS/470 XREF SQ G S0093A RMDIST FSNAME=PLUS/470.XREF.SQ.020(1) 5.1T3 23 PLUS/470.XREF.SQ.024 1 LINE 68 11 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:35 0 Routines used to produce the cross reference. See the news file for description of the cross reference options. 01042/025A PLUS/470 EXTERN SQ G S0093A RMDIST FSNAME=PLUS/470.EXTERN.SQ.021(1) 5.1T3 24 PLUS/470.EXTERN.SQ.025 1 LINE 68 10 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:36 0 Pass 1 semantics for compilation units (procedures, globals). 01042/026A PLUS/470 EXTNAME SQ G S0093A RMDIST FSNAME=PLUS/470.EXTNAME.SQ.022(1) 5.1T3 25 PLUS/470.EXTNAME.SQ.026 1 LINE 69 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:37 0 Routines which maintain a table of external names for cross-checking if two routines/globals result in same ESDname. 01042/027A PLUS/470 MACRO SEM SQ G S0093A RMDIST FSNAME=PLUS/470.MACRO_SEM.SQ.023(1) 5.1T3 26 PLUS/470.MACRO_SEM.SQ.027 1 LINE 68 7 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:37 0 Pass 1 semantics for macro definition and expansion. 01042/028A PLUS/470 TYPE SEM SQ G S0093A RMDIST FSNAME=PLUS/470.TYPE_SEM.SQ.024(1) 5.1T3 27 PLUS/470.TYPE_SEM.SQ.028 1 LINE 78 27 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:38 0 Pass 1 semantics for processing type definitions. 01042/029C PLUS/470 ALLOC SQ G S0093A RMDIST FSNAME=PLUS/470.ALLOC.SQ.025(1) 5.1T3 28 PLUS/470.ALLOC.SQ.029 1 LINE 68 3 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:40 0 Routines to manage the allocation table. 01042/030A PLUS/470 VARIABLE SQ G S0093A RMDIST FSNAME=PLUS/470.VARIABLE.SQ.026(1) 5.1T3 29 PLUS/470.VARIABLE.SQ.030 1 LINE 120 18 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:40 0 Pass 1 semantics for processing variables. 1 SUN SEP 08/96 15:24:55 Page 800 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/031A PLUS/470 DECL SEM SQ G S0093A RMDIST FSNAME=PLUS/470.DECL_SEM.SQ.027(1) 5.1T3 30 PLUS/470.DECL_SEM.SQ.031 1 LINE 68 10 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:41 0 Pass 1 semantics for processing declarations. 01042/032A PLUS/470 STATEMENT SEM SQ G S0093A RMDIST FSNAME=PLUS/470.STATEMENT_SEM.SQ.028(1) 5.1T3 31 PLUS/470.STATEMENT_SEM.SQ.032 1 LINE 68 4 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:42 0 Pass 1 semantics for processing statements. 01042/033A PLUS/470 EXPR SEM SQ G S0093A RMDIST FSNAME=PLUS/470.EXPR_SEM.SQ.029(1) 5.1T3 32 PLUS/470.EXPR_SEM.SQ.033 1 LINE 68 52 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:42 0 Pass 1 semantics for processing expressions. 01042/034C PLUS/470 COMP VARS SQ G S0093A RMDIST FSNAME=PLUS/470.COMP_VARS.SQ.030(1) 5.1T3 33 PLUS/470.COMP_VARS.SQ.034 1 LINE 68 9 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:45 0 Pass 1 routines used for processing compiler variables and compiler procedures. 01042/035C PLUS/470 INLINE SQ G S0093A RMDIST FSNAME=PLUS/470.INLINE.SQ.031(1) 5.1T3 34 PLUS/470.INLINE.SQ.035 1 LINE 67 4 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:46 0 Pass 1 routines for processing the INLINE function. 01042/036A PLUS/470 CONTROL SEM SQ G S0093A RMDIST FSNAME=PLUS/470.CONTROL_SEM.SQ.032(1) 5.1T3 35 PLUS/470.CONTROL_SEM.SQ.036 1 LINE 68 7 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:46 0 Pass 1 semantics for processing control structures. 01042/037A PLUS/470 TREE RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.TREE_RTNS.SQ.033(1) 5.1T3 36 PLUS/470.TREE_RTNS.SQ.037 1 LINE 68 9 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:46 0 Pass 1 routines used to build intermediate code tree. 01042/038A PLUS/470 ERROR SEM SQ G S0093A RMDIST FSNAME=PLUS/470.ERROR_SEM.SQ.034(1) 5.1T3 37 PLUS/470.ERROR_SEM.SQ.038 1 LINE 68 3 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:47 0 Pass 1 error recovery semantics. 01042/039A PLUS/470 VIRTUAL SQ G S0093A RMDIST FSNAME=PLUS/470.VIRTUAL.SQ.035(1) 5.1T3 38 PLUS/470.VIRTUAL.SQ.039 1 LINE 68 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:47 0 Routines to process "virtual registers". 01042/040A PLUS/470 STREAM SQ G S0093A RMDIST FSNAME=PLUS/470.STREAM.SQ.036(1) 5.1T3 39 PLUS/470.STREAM.SQ.040 1 LINE 68 6 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:48 0 Routines for maintaining the "stream code" array. 01042/041A PLUS/470 TEMP RTNS SQ G S0093A RMDIST FSNAME=PLUS/470.TEMP_RTNS.SQ.037(1) 5.1T3 40 PLUS/470.TEMP_RTNS.SQ.041 1 LINE 68 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:48 0 Temporary management routines. 1 SUN SEP 08/96 15:24:55 Page 801 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/042A PLUS/470 SDS SYMS SQ G PLUS:SDS_SYMS*SQ 5.1T3 41 PLUS/470.SDS_SYMS.SQ.042 1 LINE 74 5 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:06 0 Routines to generate SYM records from symbol and variable table information. ********************************************************************** D5.1 version: Specifying %TEST=2 will cause generation of SYM cards with full-length dsect names. The new version of SDS, (600/18) through (600/37), can use these. ********************************************************************** 0 Referenced by comments of: 1042/1 01042/043A PLUS/470 STREAM GEN SQ G S0093A RMDIST FSNAME=PLUS/470.STREAM_GEN.SQ.039(1) 5.1T3 42 PLUS/470.STREAM_GEN.SQ.043 1 LINE 68 50 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:49 0 Pass which tours the tree and produces "stream code". 01042/044A PLUS/470 STREAM UT SQ G S0093A RMDIST FSNAME=PLUS/470.STREAM_UT.SQ.040(1) 5.1T3 43 PLUS/470.STREAM_UT.SQ.044 1 LINE 68 24 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:52 0 Auxiliary routines used by stream code generation. 01042/045A PLUS/470 CONST TABLE SQ G S0093A RMDIST FSNAME=PLUS/470.CONST_TABLE.SQ.041(1) 5.1T3 44 PLUS/470.CONST_TABLE.SQ.045 1 LINE 74 16 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:54 0 Routines which manage the constant table used for constants emitted during code generation. 0 Referenced by comments of: 1042/2 01042/046A PLUS/470 STREAM OPT SQ G S0093A RMDIST FSNAME=PLUS/470.STREAM_OPT.SQ.042(1) 5.1T3 45 PLUS/470.STREAM_OPT.SQ.046 1 LINE 68 11 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:58 0 Optimization performed on the stream code. (Currently, combination of "virtual registers", redundant branch removal, unreachable code removal) 01042/047A PLUS/470 OBJECT GEN SQ G S0093A RMDIST FSNAME=PLUS/470.OBJECT_GEN.SQ.043(1) 5.1T3 46 PLUS/470.OBJECT_GEN.SQ.047 1 LINE 68 32 PAGE UBC BALLARD BURLING MAY 05, 1983 08:24:58 0 Routines which tour stream code and produce object code. 0 Referenced by comments of: 1042/2 01042/048A PLUS/470 OBJECT EMIT SQ G S0093A RMDIST FSNAME=PLUS/470.OBJECT_EMIT.SQ.044(1) 5.1T3 47 PLUS/470.OBJECT_EMIT.SQ.048 1 LINE 68 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:01 0 Routines which emit object code by calling object module building routines (1042/66). 1 SUN SEP 08/96 15:24:55 Page 802 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1042/2, 1042/9 01042/049A PLUS/470 OBJECT LIST SQ G S0093A RMDIST FSNAME=PLUS/470.OBJECT_LIST.SQ.045(1) 5.1T3 48 PLUS/470.OBJECT_LIST.SQ.049 1 LINE 68 6 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:01 0 Routines which produce the listing of emitted object code. 01042/050A PLUS/470 PLUSLIB SQ G S0093A RMDIST FSNAME=PLUS/470.PLUSLIB.SQ.046(1) 5.1T3 49 PLUS/470.PLUSLIB.SQ.050 1 LINE 39 1 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:02 0 Source library used to compile any of the PLUS compiler source components. This file simply contains $CONTINUE WITH's for the actual libraries used, namely SUEN:PARSDECLLIB (1042/55) PLUS:LALRPARSE*SL (1080/3) PLUS:OBJRTNS*SL (1042/68) SUEN:GLOBALLIB (1042/51) SUEN:PROCDECLLIB(1042/51) *PLUS.SOURCELIB (1042/5) 01042/051A PLUS/470 GLOBALLIB SQ G S0093A RMDIST FSNAME=PLUS/470.GLOBALLIB.SQ.047(1) 5.1T3 50 PLUS/470.GLOBALLIB.SQ.051 1 LINE 82 34 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:02 0 PLUS library containing global blocks, types, etc. that are required by more than one of the source files. 0 Referenced by comments of: 1042/50 01042/052A PLUS/470 PROCDECLLIB SQ G S0093A RMDIST FSNAME=PLUS/470.PROCDECLLIB.SQ.048(1) 5.1T3 51 PLUS/470.PROCDECLLIB.SQ.052 1 LINE 68 39 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:04 0 Library containing procedure declarations for all procedures constituting the PLUS compiler. 01042/053A PLUS/470 GRAMMAR S G S0093A RMDIST FSNAME=PLUS/470.GRAMMAR.S.049(1) 5.1T3 52 PLUS/470.GRAMMAR.S.053 1 LINE 179 5 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:07 0 Grammar for PLUS used as input to the LALR analyzer (1080) to produce the distributed parser tables (1042/54). The convention is used that non-terminals are surrounded by quotes. 0 Referenced by comments of: 1080/1 01042/054A PLUS/470 PARSER TABLES OC G S0093A RMDIST FSNAME=PLUS/470.PARSER_TABLES.OC.050(1) 5.1T3 53 PLUS/470.PARSER_TABLES.OC.054 1 LINE 12760 6 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:08 0 Parser tables generated by UBC LALR (1080) from PLUS grammar. 0 Referenced by comments of: 1042/53 1 SUN SEP 08/96 15:24:55 Page 803 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/055A PLUS/470 PARSER DECLS SQ G S0093A RMDIST FSNAME=PLUS/470.PARSER_DECLS.SQ.051(1) 5.1T3 54 PLUS/470.PARSER_DECLS.SQ.055 1 LINE 165 3 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:08 0 PLUS source library generated by UBC LALR (1080) containing declarations for production names, symbol names, table sizes. 0 Referenced by comments of: 1042/50 01042/056A PLUS/470 RESIDENT LIB OC G SEG2:PLUS.RESLIB 5.1T3 55 PLUS/470.RESIDENT_LIB.OC.056 1 LINE 255 11 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:16 SEG2:PLUS.RESLIB 0 Object code for the PLUS library routines which are in the resident system at UBC. The source for these is in PLUS:RESLIB*SQ (1042/57). This consists of routines which are system and environment independent. Declarations for all routines in the library are in the default source library, *PLUS.SOURCELIB (1042/5). Documentation for these routines is in (1042/73). Note... these routines and those in SEG2:PLUS.SEG2LIB (1042/60) may be combined to form *PLUS.OBJLIB (1042/64) if they are not to be in shared VM. Also, note that the entry point names of all these routines have been changed from the previous version. Many have also been changed to use R-type parameters. This is accomplished through changes in the declarations in *PLUS.SOURCELIB. See the news file for further details. 0 Referenced by comments of: 498/139, 498/145, 1042/64, 1080/17 01042/057A PLUS/470 RESIDENT LIB SQ G PLUS:RESLIB*SQ 5.1T3 56 PLUS/470.RESIDENT_LIB.SQ.057 1 LINE 73 23 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:16 0 Current UM source for PLUS library routines in resident system. 0 Referenced by comments of: 1042/56 01042/058A PLUS/470 RESIDENT LIB SQ G PLUS:RESLIB#SQ 5.1T3 57 PLUS/470.RESIDENT_LIB.SQ.058 1 LINE 73 23 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:17 0 ******************************************************************** D5.1 version: This is the base source as distributed with the first Resource Manager distribution. ******************************************************************** 1 SUN SEP 08/96 15:24:55 Page 804 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1042/59 01042/059C PLUS/470 RESIDENT LIB UC G PLUS:RESLIB*UQ 5.1T3 58 PLUS/470.RESIDENT_LIB.UC.059 1 LINE 68 1 PAGE UM BURLING JULY 23, 1983 15:15:18 0 Updates used to produce current UM source for resident library from (1042/58). 01042/060A PLUS/470 SEG2 LIB OC G SEG2:PLUS.SEG2LIB 5.1T3 59 PLUS/470.SEG2_LIB.OC.060 1 LINE 5636 12 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:18 SEG2:PLUS.SEG2LIB 0 Routines which are pistled into shared VM (entries in CCSYMBOL) at UBC. 0 Referenced by comments of: 1042/56, 1042/64, 1089/16 01042/061A PLUS/470 SEG2 LIB SQ G PLUS:SEG2LIB*SQ 5.1T3 60 PLUS/470.SEG2_LIB.SQ.061 1 LINE 88 32 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:19 0 Current UM source for the PLUS library routines which are post-ipl loaded. 01042/062C PLUS/470 SEG2 LIB SQ G PLUS:SEG2LIB#SQ 5.1T3 61 PLUS/470.SEG2_LIB.SQ.062 1 LINE 88 15 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:20 0 ******************************************************************** D5.1 version: This is the base source as distributed with the first Resource Manager distribution. ******************************************************************** 0 Referenced by comments of: 1042/63 01042/063C PLUS/470 SEG2 LIB UC G PLUS:SEG2LIB*UQ 5.1T3 62 PLUS/470.SEG2_LIB.UC.063 1 LINE 68 18 PAGE UM BURLING JULY 23, 1983 15:15:21 0 Updates used to produce current UM source for SEG2 library from (1042/62). 01042/064C PLUS/470 *PLUS.OBJLIB OC G *PLUS.OBJLIB 5.1T3 63 PLUS/470.?PLUS.OBJLIB.OC.064 1 LINE 24 1 PAGE UM BURLING JULY 23, 1983 15:15:22 *PLUS.OBJLIB 0 Contains loader cards to force reference to PISTLEd PLUS run-time libraries, (1042/56) and (1042/60). 0 Referenced by comments of: 1000/39, 1036/1, 1042/5, 1042/56, 1089/2 01042/065A PLUS/470 ENDJUNK OC S0093A RMDIST FSNAME=PLUS/470.ENDJUNK.OC.056(1) 5.1T3 64 PLUS/470.ENDJUNK.OC.065 1 LINE 24 1 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:13 0 Loader records that reference CCSYMBOL and the PLUS low core PRV. Normally, these are generated automatically by the PLUS compiler. See 1 SUN SEP 08/96 15:24:55 Page 805 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 NEWS file. 01042/066 PLUS/470 LIBRARY L G S1644 5.0BT1 VLO FSNAME=PLUS/470.LIBRARY.L.060(1) 951 5.0BT1 951 PLUS/470.LIBRARY.L.060 1 LINE 132 137 PAGE UBC BALLARD BURLING JULY 26, 1982 20:06:59 0 Listing of PLUS library routines. $COPY with PAGES=250. 0 Referenced by comments of: 1042/48 01042/067A PLUS/470 OBJECT RTNS SQ G PLUS:OBJRTNS*SQ 5.1T3 65 PLUS/470.OBJECT_RTNS.SQ.067 1 LINE 68 14 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:23 0 Routines that can be used to build and punch MTS object modules. These have been separated out from the PLUS compiler so they can used by other programs too. Currently, they are used by the UBC LALR analyzer (1080) and by *CLPARSER (1076) as well as both PLUS compilers. The routines require some storage management routines. A set are provided in PLUS:MISC*OL (1042/89), although these are not used by the PLUS compiler, which has its own. The PLUS compiler also does not use the routine Punch_Record which is included in this file. To compile these routines, unit 0 must specify the following three libraries: PLUS:OBJRTNS*SL (1042/68) PLUS:MISC*SL (1042/88) *PLUS.SOURCELIB (1042/5) There have been a few minor changes since the RD5.0A distribution. 0 Referenced by comments of: 1042/68, 1042/87 01042/068A PLUS/470 OBJECT RTNS SQ G PLUS:OBJRTNS*SQL 5.1T3 66 PLUS/470.OBJECT_RTNS.SQ.068 1 LINE 68 3 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:24 0 Library containing declarations for the object module routines (1042/67). This library is required to compile the routines or to compile any program using the routines. 0 Referenced by comments of: 1042/50, 1042/67, 1076/2, 1080/19 01042/069A PLUS/470 OBJECT RTNS OL G PLUS:OBJRTNS*OL 5.1T3 67 PLUS/470.OBJECT_RTNS.OL.069 1 LINE 806 4 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:24 0 Object library containing the PLUS object module routines. This version compiled for use with the new PLUS library routines. 1 SUN SEP 08/96 15:24:55 Page 806 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1076/1, 1080/13, 1080/17 01042/070A PLUS/470 WRITEUP WF G S0093A RMDIST FSNAME=PLUS/470.WRITEUP.WF.060(1) 5.1T3 68 PLUS/470.WRITEUP.WF.070 1 LINE 144 68 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:15 0 FMT source for PLUS writeup. Contains reference to STAF:FMTLIB at line 1, which will need changing elsewhere. (STAF:FMTLIB is the former JON:MACLIB -- at UM it's (308/18).) It isn't included with this distribution, because previous distributions should still be O.K.) The writeup corresponds to version 22 of PLUS/470, version 10 of PLUS-11. It has NOT been updated for the latest round of changes. See the NEWS file for details of the latest changes. 0 Referenced by comments of: 1042/81, 1042/84 01042/071A PLUS/470 WRITEUP PF G S0093A RMDIST FSNAME=PLUS/470.WRITEUP.PF.061(1) 5.1T3 69 PLUS/470.WRITEUP.PF.071 1 LINE 78 85 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:37 0 $COPYable form of PLUS writeup. Allow 130 pages, TN printer. 01042/072A PLUS/470 LIB WRITEUP WF G S0093A RMDIST FSNAME=PLUS/470.LIB_WRITEUP.WF.062(1) 5.1T3 70 PLUS/470.LIB_WRITEUP.WF.072 1 LINE 135 50 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:45 0 FMT source for writeup describing *PLUS.SOURCELIB (1042/5) contents. Note this is now in FMT. It references STAF:FMTLIB, formerly known as JON:MACLIB (308/18) at UM. This has not been updated for the current version. There are a few additions to the library that are therefore undocumented. 01042/073A PLUS/470 LIB WRITEUP PF G S0093A RMDIST FSNAME=PLUS/470.LIB_WRITEUP.PF.063(1) 5.1T3 71 PLUS/470.LIB_WRITEUP.PF.073 1 LINE 74 65 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:50 0 $COPYable form of writeup for *PLUS.SOURCELIB (1042/5). Allow 130 pages, TN printer. 0 Referenced by comments of: 1042/56 01042/074 PLUS/470 BUGLIST P S1644 5.0BT1 VLO FSNAME=PLUS/470.BUGLIST.P.068(1) 959 5.0BT1 959 PLUS/470.BUGLIST.P.068 1 LINE 68 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:20 0 Description of known bugs in the current (version 24) compiler. 01042/075A PLUS/470 NEWS P G S0093A RMDIST FSNAME=PLUS/470.NEWS.P.064(1) 5.1T3 72 PLUS/470.NEWS.P.075 1 LINE 74 8 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:56 0 News file for PLUS. 1 SUN SEP 08/96 15:24:55 Page 807 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This describes the changes that have been made since the RD5.0A (version 22) distribution of PLUS. The PLUS writeup does not include these changes, so this is a required supplement to the manual. 0 Referenced by comments of: 1042/1 01042/076 PLUS/470 WORKLIST P S1644 5.0BT1 VLO FSNAME=PLUS/470.WORKLIST.P.070(1) 961 5.0BT1 961 PLUS/470.WORKLIST.P.070 1 LINE 63 4 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:22 0 This is a file containing a list of things we hope to do with PLUS. This is intended for use by the PLUS implementors, and is probably not very comprehensible to anyone else, but may give some idea of current plans. 01042/077 PLUS/470 CHANGELOG P S1644 5.0BT1 VLO FSNAME=PLUS/470.CHANGELOG.P.071(1) 962 5.0BT1 962 PLUS/470.CHANGELOG.P.071 1 LINE 73 17 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:23 0 This file contains a history of (almost) all changes to the compiler since the first (D4.2) distribution. It is mainly of interest to the compiler implementors, since the NEWS file details the changes that are visible to users of PLUS. 01042/078A PLUS/470 REBUILD CMDS C S0093A RMDIST FSNAME=PLUS/470.REBUILD_CMDS.C.065(1) 5.1T3 73 PLUS/470.REBUILD_CMDS.C.078 1 LINE 157 3 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:57 0 This file contains a complete sample batch job to rebuild the PLUS compiler from scratch. It compiles the entire compiler, then verifies the compilation by using it to compile itself again. It also rebuilds the library. This procedure is used at UBC when installing a new version. It will need changing for use elsewhere. See installation notes, and $COMMENT lines in the command file. 0 Referenced by comments of: 1042/9 01042/079A PLUS/470 INSTALL CMDS C S0093A RMDIST FSNAME=PLUS/470.INSTALL_CMDS.C.066(1) 5.1T3 74 PLUS/470.INSTALL_CMDS.C.079 1 LINE 68 1 PAGE UBC BALLARD BURLING MAY 05, 1983 08:25:57 0 Batch job used after generating a new private version of the PLUS compiler and library (as with SUEN:REBUILD.C), to install it as the new public version, producing appropriate backup etc. It will need changes for use elsewhere. 1 SUN SEP 08/96 15:24:55 Page 808 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/080 PLUS/470 COMPARE SS S1644 5.0BT1 VLO FSNAME=PLUS/470.COMPARE.SS.074(1) 965 5.0BT1 965 PLUS/470.COMPARE.SS.074 1 LINE 62 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:26 0 This is a SPITBOL GLP which we use in bootstrapping a new version of the compiler, to verify that the first compilation and the second one resulted in the same object decks. It just compares the two files, ignoring END records. Note: This program will probably require changing if it is to be used elsewhere since it uses a library routine MTSLNR() which probably isn't in anybody else's Spitbol in order to get the source line number of lines read. Unchanged since D4.2 distribution of PLUS. 01042/081A PLUS/470 LIB GENERATOR OE G PLUS:LIBGEN 5.1T3 75 PLUS/470.LIB_GENERATOR.OE.081 1 LINE 1404 6 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:34 0 A PLUS GLP that can be used to generate a PLUS source library from an old library, or from a file with library members but no directory. This is useful for initially creating a library, or for cleaning up the line-numbers, recreating it if accidently renumbered etc. This is self-contained link-edited object. The program consists of PLUS source (1042/82) and a CLPARSER grammar (1042/83). The complete object requires *CLPARSER (1076/5) and PLUS:MISC*OL (1042/89) in addition to PLUS library routines. For documentation, see the current PLUS writeup (1042/70). 01042/082A PLUS/470 LIB GENERATOR SQ G PLUS:LIBGEN*SQ 5.1T3 76 PLUS/470.LIB_GENERATOR.SQ.082 1 LINE 68 7 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:34 0 PLUS source for library generator. Compile with following libraries: *CLPARSELIB (1076/10) PLUS:MISC*SL (1042/88) *PLUS.SOURCELIB (1042/5) 0 Referenced by comments of: 1042/81 01042/083A PLUS/470 LIB GENERATOR SR G PLUS:LIBGEN*SR 5.1T3 77 PLUS/470.LIB_GENERATOR.SR.083 1 LINE 76 1 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:35 0 Grammar used by library generator. This is in the form expected by *CLPARSEGEN (1076/1). 0 Referenced by comments of: 1042/81 1 SUN SEP 08/96 15:24:55 Page 809 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01042/084 PLUS/470 LIB LISTER OE G S1644 5.0BT1 VLO FSNAME=PLUS/470.LIB_LISTER.OE.078(1) 969 5.0BT1 969 PLUS/470.LIB_LISTER.OE.078 1 LINE 9930 4 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:29 0 This is a GLP that may be used to list a PLUS source library, one member per page, with titles. It is described in PLUS writeup (1042/70). This is self-contained link-edited object. (Note... a new version has been produced by a student at UBC. It produces multiple members per page and has various other improvements, but isn't yet ready for distribution. I expect to include it on the next PLUS distribution.) 01042/085 PLUS/470 LIB LISTER SQ G S1644 5.0BT1 VLO FSNAME=PLUS/470.LIB_LISTER.SQ.079(1) 970 5.0BT1 970 PLUS/470.LIB_LISTER.SQ.079 1 LINE 68 4 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:30 0 Complete source for the library listing GLP. 01042/086 PLUS/470 EXAMPLE SQ G S1644 5.0BT1 VLO FSNAME=PLUS/470.EXAMPLE.SQ.080(1) 971 5.0BT1 971 PLUS/470.EXAMPLE.SQ.080 1 LINE 68 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:08:30 0 Simple example of PLUS program that performs Towers of Hanoi. 0 Referenced by comments of: 1084/2 01042/087A PLUS/470 MISC RTNS SQ G PLUS:MISC*SQ 5.1T3 78 PLUS/470.MISC_RTNS.SQ.087 1 LINE 82 7 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:35 0 This is source for a collection of auxiliary PLUS subroutines that are getting used in various places, but which we don't think belong in the standard PLUS library support. The routines currently in this file are: 1) various procedures for allocating arrays and linked lists. 2) a routine to do FILESTATUS-like file name generation. The array and list routines, or substitutes for them, are required by the object module punching routines (1042/67). (Note the compiler provides substitutes -- it does not use these ones.) Compile with 0=MISC*SL+*PLUS.SOURCELIB (1042/88) (1042/5) This file was formerly called PLUS:UTILITY*S. 0 Referenced by comments of: 1042/89, 1089/2 01042/088A PLUS/470 MISC RTNS SQ G PLUS:MISC*SQL 5.1T3 79 PLUS/470.MISC_RTNS.SQ.088 1 LINE 68 8 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:35 0 PLUS Source library containing the declarations for the above routines. 1 SUN SEP 08/96 15:24:55 Page 810 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Also includes some macros for kludging floating-point operations from PLUS. This library is used when compiling the routines, or by any program that calls the routines. This library was formerly called PLUS:UTILITY*SL 0 Referenced by comments of: 1042/67, 1042/82, 1042/87, 1076/2, 1089/9 01042/089A PLUS/470 MISC RTNS OL G PLUS:MISC*OL 5.1T3 80 PLUS/470.MISC_RTNS.OL.089 1 LINE 1994 5 PAGE UBC BALLARD BURLING JULY 23, 1983 15:15:36 0 Object library containing the miscellaneous routines from (1042/87). This version has been recompiled for use with the new PLUS library. 0 Referenced by comments of: 1042/67, 1042/81, 1076/1 01042/090 PLUS/470 STATSCAN OE O S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.OE.084(1) 975 5.0BT1 975 PLUS/470.STATSCAN.OE.084 1 LINE 32767 18 PAGE UM BURLING JULY 26, 1982 20:08:33 0 This is a program to scan through the log file produced by the PLUS compiler (PLUS:PLUSLOG) and allow one to find out some things about the use. Documentation is provided by the HELP command. Requires the file PLUS:STATSCANHELP (1042/93). 0 Referenced by comments of: 1042/93 01042/091 PLUS/470 STATSCAN SQ O S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.SQ.085(1) 976 5.0BT1 976 PLUS/470.STATSCAN.SQ.085 1 LINE 115 13 PAGE UM BURLING JULY 26, 1982 20:08:34 0 PLUS source for log-file scanner. To compile, requires Clparser library (1076/11) and *PLUS.SOURCELIB. 01042/092 PLUS/470 STATSCAN S O S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.S.086(1) 977 5.0BT1 977 PLUS/470.STATSCAN.S.086 1 LINE 84 3 PAGE UM BURLING JULY 26, 1982 20:08:35 0 Grammar for log-file scanner command language (input to *CLPARSEGEN). 01042/093 PLUS/470 STATSCAN D O S1644 5.0BT1 VLO FSNAME=PLUS/470.STATSCAN.D.087(1) 978 5.0BT1 978 PLUS/470.STATSCAN.D.087 1 LINE 68 2 PAGE UM BURLING JULY 26, 1982 20:08:36 0 Help file used by HELP command when running PLUS:STATSCAN (1042/90). 0 Referenced by comments of: 1042/90 1 SUN SEP 08/96 15:24:55 Page 811 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01043/001 JVCT # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO CONVERT A BCD TIME/DATE TO JULIAN MICROSECONDS SINCE MARCH 1, 1900. 01044/001 JMSBTDR # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO CONVERT FROM JULIAN MICROSECONDS TO BINARY GREGORIAN TIME, A FORMAT IN WHICH EACH COMPONENT OF THE TIME (YEAR, MONTH, DAY, HOUR, MINUTE, AND SO ON) HAS ITS OWN FULLWORD. 01045/001 BTDJMSR # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO CONVERT FROM BINARY GREGORIAN TIME TO STANDARD MTS JULIAN MICROSECONDS. 01046/001 DAYDAT # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO CONVERT MM-DD-YY TO MMM DD, YYYY. 01047/001 PRINTER DSR # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A NEW 1403/1443 PRINTER DSR. 01048/001 S # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO PRINT THE NEAREST RESIDENT SYMBOL GIVEN AN ADDRESS OR THE ADDRESS NEAREST A GIVEN SYMBOL. 01049/001 PRINT_MODIFIERS # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO PRINT THE INTEGER/HEXADECIMAL EQUIVALENTS OF A GIVEN SET OF MODIFIERS. 01050/001C PLUS-11 COMPILER OC O PLUS:PLUS11 5.1T3 81 PLUS-11.COMPILER.OC.001 1 LINE 32767 86 PAGE UBC FOX EADIE JULY 23, 1983 15:15:36 0 ********************************************************************** D5.1 version: Version 12/4 of the PLUS-11 compiler. PLUS-11 is a cross compiler, running under MTS, generating code for PDP-11's. 1 SUN SEP 08/96 15:24:55 Page 812 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This file contains references to the files PLUS:PLUSLOG11, PLUS:PLUSMSG11 (1052/2) and PLUS:SOURCELIB11 (1050/3), which may need changing with the editor for use elsewhere. The object modules produced by PLUS-11 are in the form of input to LINK11 (516/2). ********************************************************************** 0 Referenced by comments of: 516/1 01050/002C PLUS-11 MESSAGES M O PLUS:PLUSMSG11 5.1T3 82 PLUS-11.MESSAGES.M.002 1 LINE 147 8 PAGE UBC FOX EADIE JULY 23, 1983 15:15:39 0 This is the message file used by installed PLUS-11 compiler. 01050/003C PLUS-11 SOURCELIB SQ O PLUS:SOURCELIB11 5.1T3 83 PLUS-11.SOURCELIB.SQ.003 1 LINE 68 4 PAGE UBC FOX EADIE JULY 23, 1983 15:15:39 0 ********************************************************************** D5.1 version: This is the default source-library used by PLUS-11 if no library is specified on the $RUN command. ********************************************************************** 0 Referenced by comments of: 1042/4, 1050/1 01050/004C PLUS-11 LIBRARY OC PLUS:OBJLIB11 5.1T3 84 PLUS-11.LIBRARY.OC.004 1 LINE 80 4 PAGE UBC FOX EADIE JULY 23, 1983 15:15:39 0 Referenced by comments of: 1050/5, 1050/6 01050/005C PLUS-11 LIBRARY SQ S0999 5.0AT1 VLO FSNAME=PLUS-11.LIBRARY.SQ.009(1) 729 5.1T3 85 PLUS-11.LIBRARY.SQ.005 1 LINE 74 6 PAGE UBC FOX EADIE JAN. 22, 1982 17:52:15 0 PLUS source for routines in PLUS:OBJLIB11 (1050/4). 01050/006C PLUS-11 LIBRARY SA S0999 5.0AT1 VLO FSNAME=PLUS-11.LIBRARY.SA.010(1) 730 5.1T3 86 PLUS-11.LIBRARY.SA.006 1 LINE 69 9 PAGE UBC FOX EADIE JAN. 22, 1982 17:52:17 0 *11ASR source for code in PLUS:OBJLIB11 (1050/4). 01050/007C PLUS-11 EXAMPLE SQ S0999 5.0AT1 VLO FSNAME=PLUS-11.EXAMPLE.SQ.011(1) 731 5.1T3 87 PLUS-11.EXAMPLE.SQ.007 1 LINE 103 7 PAGE UBC BALLARD EADIE JAN. 22, 1982 17:52:19 0 Sample PLUS-11 program for finding word-squares. 01050/008C PLUS-11 EXAMPLE SQ S0999 5.0AT1 VLO FSNAME=PLUS-11.EXAMPLE.SQ.012(1) 732 5.1T3 88 PLUS-11.EXAMPLE.SQ.008 1 LINE 65 1 PAGE UBC BALLARD EADIE JAN. 22, 1982 17:52:21 0 Sample PLUS-11 program to perform Towers of Hanoi. 1 SUN SEP 08/96 15:24:55 Page 813 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01051/001A VIRTUAL I/O OBJECT OL O TMTS:VDVLIBRARY 5.1T3 89 VIRTUAL_I/O.OBJECT.OL.001 1 LINE 7940 47 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:15:45 TMTS:VDVLIBRARY 0 This component contains routines used to implement virtual devices. It is used by the UBC Virtual Machine (component 1079), VSS (component 1078), and other components. The virtual channel and device object is present in a loader library format for applications which need to use only a subset of the devices which can be simulated. Note that in order to use virtual 2501 reader or virtual 3270, the Resource Manager Intertask line and node DSPs are used, and hence the object for the DSP library (1041/1), the CFM routine (1041/10), and the Subtasking Monitor (1058) must also be present. 0 Referenced by comments of: 1051/36, 1051/39, 1078/44, 1079/1 01051/002A VIRTUAL I/O MACROS SA O TMTS:VDVMACBASE(-10000,-1) 5.1T3 90 VIRTUAL_I/O.MACROS.SA.002 1 LINE 80 20 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:15:48 0 Base source for virtual I/O macro library. 01051/003A VIRTUAL I/O MACROS UC O TMTS:VDVMACBASE(1000) 5.1T3 91 VIRTUAL_I/O.MACROS.UC.003 1 LINE 68 1 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:15:49 0 Update deck to be applied to the previously distributed source to yield the current source. Running *MACUTIL (738) on this produces the library in (1051/4). 01051/004A VIRTUAL I/O MACROS SM O TMTS:VDVMACROS 5.1T3 92 VIRTUAL_I/O.MACROS.SM.004 1 LINE 72 20 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:15:49 0 Macro library used for assembling the virtual channel, I/O devices, and disk file simulator. 0 Referenced by comments of: 1051/3, 1051/5, 1051/7, 1051/9, 1051/11, 1051/13, 1051/15, 1051/17, 1051/19, 1051/21, 1051/23, 1051/25, 1051/27, 1051/29, 1051/31, 1051/34, 1051/37, 1051/42 01051/005A VIRTUAL I/O VCHANNEL SA O TMTS:VDVCHANNEL(-10000,-1) 5.1T3 93 VIRTUAL_I/O.VCHANNEL.SA.005 1 LINE 80 39 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:15:50 0 This routine is the virtual channel, which simulates a subset of the IBM 370 I/O channel functions. Assemble with OLD:CC.MACROS (1054/4) and the Virtual I/O macros (1051/4). 01051/006A VIRTUAL I/O VCHANNEL UC O TMTS:VDVCHANNEL(1000) 5.1T3 94 VIRTUAL_I/O.VCHANNEL.UC.006 1 LINE 68 1 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:15:53 0 Update deck to be applied to the previously distributed source to yield the current source. 1 SUN SEP 08/96 15:24:55 Page 814 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01051/007A VIRTUAL I/O VDV1052 SA O TMTS:VDV1052(-10000,-1) 5.1T3 95 VIRTUAL_I/O.VDV1052.SA.007 1 LINE 79 7 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:54 0 Routine to simulate a 1052 device or equivalent. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). 0 Referenced by comments of: 1051/37 01051/008A VIRTUAL I/O VDV1052 UC O TMTS:VDV1052(1000) 5.1T3 96 VIRTUAL_I/O.VDV1052.UC.008 1 LINE 72 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:54 0 Update deck to be applied to the previously distributed source to yield the current source. 01051/009A VIRTUAL I/O VDV3270 SA O TMTS:VDV3270(-10000,-1) 5.1T3 97 VIRTUAL_I/O.VDV3270.SA.009 1 LINE 78 12 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:54 0 Routine to simulate an IBM 3270 device using intertask to talk to a program running in another task. The other program simulates the device using 3270 binary I/O. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), the UBC Virtual Machine macros (1079/22), and the DSP macros (1041/9). Copies *GDINFODSECT (594). 01051/010A VIRTUAL I/O VDV3270 UC O TMTS:VDV3270(1000) 5.1T3 98 VIRTUAL_I/O.VDV3270.UC.010 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:55 0 Update deck to be applied to the previously distributed source to yield the current source. 01051/011A VIRTUAL I/O VDV1403 SA O TMTS:VDV1403(-10000,-1) 5.1T3 99 VIRTUAL_I/O.VDV1403.SA.011 1 LINE 72 10 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:55 0 Routine to simulate an IBM 1403 device or equivalent. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). Copies *GDINFODSECT (594). 01051/012A VIRTUAL I/O VDV1403 UC O TMTS:VDV1403(1000) 5.1T3 100 VIRTUAL_I/O.VDV1403.UC.012 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:56 0 Update deck to be applied to previously distributed source to yield current source. 01051/013A VIRTUAL I/O VDV2540 SA O TMTS:VDV2540(-10000,-1) 5.1T3 101 VIRTUAL_I/O.VDV2540.SA.013 1 LINE 78 9 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:56 0 Routine to simulate an IBM 2540 device or equivalent. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). Copies *GDINFODSECT (594). 01051/014A VIRTUAL I/O VDV2540 UC O TMTS:VDV2540(1000) 5.1T3 102 VIRTUAL_I/O.VDV2540.UC.014 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:57 0 Update deck to be applied to the previously distributed source to yield the 1 SUN SEP 08/96 15:24:55 Page 815 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 current source. 01051/015A VIRTUAL I/O VDV3420 SA O TMTS:VDV3420(-10000,-1) 5.1T3 103 VIRTUAL_I/O.VDV3420.SA.015 1 LINE 72 13 PAGE UBC WHALEY HELFFRICH JULY 23, 1983 15:15:57 0 Routine to simulate an IBM 3420 device or equivalent. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). Copies *GDINFODSECT (594). 01051/016A VIRTUAL I/O VDV3420 UC O TMTS:VDV3420(1000) 5.1T3 104 VIRTUAL_I/O.VDV3420.UC.016 1 LINE 68 1 PAGE UBC WHALEY HELFFRICH JULY 23, 1983 15:15:58 0 Update deck to be applied to the previously distributed source to yield the current source. 01051/017A VIRTUAL I/O VDV2501 SA O TMTS:VDV2501(-10000,-1) 5.1T3 105 VIRTUAL_I/O.VDV2501.SA.017 1 LINE 72 16 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:15:58 0 This is a special virtual device that accepts file names from an intertask network and submits the contents of the file to the virtual machine as if it were a card deck put in a 2501 reader device. The virtual device was written to allow jobs to be submitted to an operating system running in the virtual machine. See notes at the front of the component. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), the UBC Virtual Machine macros (1079/22), and the DSP macros (1041/9). 0 Referenced by comments of: 1051/31 01051/018A VIRTUAL I/O VDV2501 UC O TMTS:VDV2501(1000) 5.1T3 106 VIRTUAL_I/O.VDV2501.UC.018 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:01 0 Update deck to be applied to previously distributed source to yield current source. 01051/019A VIRTUAL I/O VDV2701 SA O TMTS:VDV2701(-10000,-1) 5.1T3 107 VIRTUAL_I/O.VDV2701.SA.019 1 LINE 68 7 PAGE UBC O'REILLY HELFFRICH JULY 23, 1983 15:16:01 0 Routine to simulate 2701/PDA as used by UBC's Front End Processors. Calls the virtual PDP/11 (1051/21). Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). 0 Referenced by comments of: 1051/21 01051/020A VIRTUAL I/O VDV2701 UC O TMTS:VDV2701(1000) 5.1T3 108 VIRTUAL_I/O.VDV2701.UC.020 1 LINE 68 1 PAGE UBC O'REILLY HELFFRICH JULY 23, 1983 15:16:02 0 Update deck to be applied to previously distributed source to yield current source. 01051/021A VIRTUAL I/O VDVUBCFEP SA S TMTS:VDVUBCFEP(-10000,-1) 5.1T3 109 VIRTUAL_I/O.VDVUBCFEP.SA.021 1 LINE 68 19 PAGE UBC O'REILLY HELFFRICH JULY 23, 1983 15:16:02 0 Routine to simulate communication with a UBC PDP11/40 FEP using UBC's FEP protocol. Called by the virtual 2701 routines (1051/19). Assemble with 1 SUN SEP 08/96 15:24:55 Page 816 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and COPY:FECP.LIB*M, which was not distributed by UBC. 0 Referenced by comments of: 1051/19 01051/022A VIRTUAL I/O VDVUBCFEP UC S TMTS:VDVUBCFEP(1000) 5.1T3 110 VIRTUAL_I/O.VDVUBCFEP.UC.022 1 LINE 68 1 PAGE UBC O'REILLY HELFFRICH JULY 23, 1983 15:16:03 0 Update deck to be applied to previously distributed source to yield current source. 01051/023A VIRTUAL I/O VDVDASD SA O TMTS:VDVDASD(-10000,-1) 5.1T3 111 VIRTUAL_I/O.VDVDASD.SA.023 1 LINE 81 16 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:04 0 This routine interprets CCWs for IBM 3330 and 3350 device types and calls the disk file simulator (1051/27) to do the actual simulation. Assemble using OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). 01051/024A VIRTUAL I/O VDVDASD UC O TMTS:VDVDASD(1000) 5.1T3 112 VIRTUAL_I/O.VDVDASD.UC.024 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:06 0 Update deck to be applied to previously distributed source to yield current source. 01051/025A VIRTUAL I/O VDV2305 SA O TMTS:VDV2305(-10000,-1) 5.1T3 113 VIRTUAL_I/O.VDV2305.SA.025 1 LINE 72 15 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:06 0 This routine interprets CCWs for IBM 2305 devices and calls the disk file simulator (1051/27) to do the actual simulation. Assemble using OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). 01051/026A VIRTUAL I/O VDV2305 UC O TMTS:VDV2305(1000) 5.1T3 114 VIRTUAL_I/O.VDV2305.UC.026 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:07 0 Update deck to be applied to previously distributed source to yield current source. 01051/027A VIRTUAL I/O VDVDFS SA O TMTS:VDVDFS(-10000,-1) 5.1T3 115 VIRTUAL_I/O.VDVDFS.SA.027 1 LINE 80 59 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:16:07 0 Disk file simulator routines. Used by 1051/12 and 1051/13. These routines simulate 3330-type disk devices using a line file data structure which must by initialized by the preformat program (1051/36). Assemble using OLD:CC.MACROS (1054/4) and the Virtual I/O macros (1051/4). 0 Referenced by comments of: 1051/23, 1051/25 01051/028A VIRTUAL I/O VDVDFS UC O TMTS:VDVDFS(1000) 5.1T3 116 VIRTUAL_I/O.VDVDFS.UC.028 1 LINE 68 1 PAGE UBC BERRYMAN HELFFRICH JULY 23, 1983 15:16:11 0 Update deck to be applied to previously distributed source to yield current source. 1 SUN SEP 08/96 15:24:55 Page 817 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01051/029A VIRTUAL I/O VDV3370 SA O TMTS:VDV3370(-10000,-1) 5.1T3 117 VIRTUAL_I/O.VDV3370.SA.029 1 LINE 72 15 PAGE RPI MCKENNEY HELFFRICH JULY 23, 1983 15:16:11 0 This routine simulates an IBM 3370 disk. Assemble with OLD:CC.MACROS (1054/4), the Virtual I/O macros (1051/4), and the UBC Virtual Machine macros (1079/22). 01051/030A VIRTUAL I/O VDV3370 UC O TMTS:VDV3370(1000) 5.1T3 118 VIRTUAL_I/O.VDV3370.UC.030 1 LINE 68 1 PAGE RPI MCKENNEY HELFFRICH JULY 23, 1983 15:16:12 0 Update deck to be applied to previously distributed source to yield current source. 01051/031A VIRTUAL I/O 2501 SUBMIT SA O TMTS:VDV2501SLAVE(-10000,-1) 5.1T3 119 VIRTUAL_I/O.2501_SUBMIT.SA.031 1 LINE 72 5 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:12 0 This is a test program to submit file names, or jobs, over an intertask network to the virtual 2501 reader (1051/17). Assemble using OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), and the DSP macros (1041/9), the UBC Virtual Machine macros (1079/22), the virtual I/O macros (1051/4), COPY:IT:MACROS (1081/6), and COPY:MISC.MACROS (728). Copies COPY:IT.DSECTS (1081/4). 0 Referenced by comments of: 1051/33 01051/032A VIRTUAL I/O 2501 SUBMIT UC O TMTS:VDV2501SLAVE(1000) 5.1T3 120 VIRTUAL_I/O.2501_SUBMIT.UC.032 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:13 0 Update deck to be applied to previously distributed source to yield current source. 01051/033A VIRTUAL I/O 2501 SUBMIT OC O TMTS:VDV2501SLAVE(1,999) 5.1T3 121 VIRTUAL_I/O.2501_SUBMIT.OC.033 1 LINE 80 5 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:13 0 Object for (1051/31). Must be run with the Subtasking Monitor (1058). Contains $CONTINUE WITH TMTS:DSPLIBRARY (1041/1) + DMGR:MNTRMMSG (1041/10) + COPY:CCSYMBOLS (579/12) + COPY:CCSYMBOL (579/9). 01051/034A VIRTUAL I/O PREFMT SA O TMTS:VDVPREFMT(-10000,-1) 5.1T3 122 VIRTUAL_I/O.PREFMT.SA.034 1 LINE 69 4 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:13 0 Program that calls the disk file simulator routines to write standard record 0 on each track of an empty virtual disk file. It also contains an option to format an empty virtual disk file for use as a 2305 paging device. Assemble with OLD:CC.MACROS (1054/4) and the Virtual I/O macros (1051/4). 0 Referenced by comments of: 1051/36 01051/035A VIRTUAL I/O PREFMT UC O TMTS:VDVPREFMT(1000) 5.1T3 123 VIRTUAL_I/O.PREFMT.UC.035 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:13 0 Update deck to be applied to previously distributed source to yield current source. 1 SUN SEP 08/96 15:24:55 Page 818 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01051/036A VIRTUAL I/O PREFMT OC O TMTS:VDVPREFMT(1,999) 5.1T3 124 VIRTUAL_I/O.PREFMT.OC.036 1 LINE 80 3 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:14 0 Object for (1051/34). Must be run along with (1051/1) and the DSP library (1041/1). Requires COPY:CCSYMBOL (579/9). 0 Referenced by comments of: 1051/27 01051/037 VIRTUAL I/O 3270 SLAVE SA G TMTS:VDV3270SLAVE(-10000,-1) 5.0T3 1331 VIRTUAL_I/O.3270_SLAVE.SA.020 1 LINE 72 9 PAGE UBC BOWLER HELFFRICH AUG. 06, 1981 05:48:13 5.0T9 187 0 Companion program to (1051/7). See (1079/23) for description. This program talks over an intertask line to the virtual 3270 device in the virtual machine and simulates a 3270 using binary I/O to the *MSOURCE* device. Assemble using OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), the DSP macros (1041/9), the UBC Virtual Machine macros (1079/22), the Virtual I/O macros (1051/4), COPY:IT.MACROS (1081/6), and COPY:MISC.MACROS (728). Copies COPY:IT.DSECTS (1081/4). 01051/038C VIRTUAL I/O 3270 SLAVE UC G TMTS:VDV3270SLAVE(1000) 5.1T3 125 VIRTUAL_I/O.3270_SLAVE.UC.038 1 LINE 72 3 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:14 0 Update deck to be applied to previously distributed source to yield current source. 01051/039A VIRTUAL I/O 3270 SLAVE OC G TMTS:VDV3270SLAVE(1,999) 5.1T3 126 VIRTUAL_I/O.3270_SLAVE.OC.039 1 LINE 80 8 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:14 0 Requires the Virtual I/O routines (1051/1), the Subtasking Monitor (1058), the Resource Manager DSP library (1041/1), the CFM routine (1041/10), COPY:MNTRDEFS (579/12), and COPY:CCSYMBOL (579/9). 01051/040C VIRTUAL I/O MSOURCE 3270 SA G TMTS:VDVM3270(-10000,-1) 5.1T3 127 VIRTUAL_I/O.MSOURCE_3270.SA.040 1 LINE 73 9 PAGE UM BOWLER HELFFRICH JULY 23, 1983 15:16:15 0 Simulates 3270 on a 3270 device when the device is MSOURCE. 0 Referenced by comments of: 1051/41 01051/041C VIRTUAL I/O MSOURCE 3270 UC G TMTS:VDVM3270(1000) 5.1T3 128 VIRTUAL_I/O.MSOURCE_3270.UC.041 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:16:17 0 Update deck, when applied to (1051/40), yields current source. 01051/042C VIRTUAL I/O VDV3805 SA G TMTS:VDV3805(-10000,-1) 5.1T3 129 VIRTUAL_I/O.VDV3805.SA.042 1 LINE 72 6 PAGE UM HELFFRICH JULY 23, 1983 15:16:17 0 Simulator for an INTEL 3805/3825. Assemble with OLD:CC.MACROS (1054/4) and the virtual I/O macros (1051/4). 0 Referenced by comments of: 1051/43 1 SUN SEP 08/96 15:24:55 Page 819 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01051/043C VIRTUAL I/O VDV3805 UC G TMTS:VDV3805(1000) 5.1T3 130 VIRTUAL_I/O.VDV3805.UC.043 1 LINE 68 1 PAGE UM HELFFRICH JULY 23, 1983 15:16:18 0 Update deck to be applied to (1051/42) to yield current source. 01052/001 PASCAL/UBC COMPILER SW O S1560 5.0T3 VLO FSNAME=PASCAL/UBC.COMPILER.SW.001(1) 1333 5.0T3 1333 PASCAL/UBC.COMPILER.SW.001 1 LINE 94 198 PAGE UBC JOLLIFFE UNSP NOV. 19, 1979 15:25:53 5.0T9 189 0 This is the source for the UBC Pascal compiler. Subcomponent (1052/2) is an update to this source for three local changes. This component contains several copyright notices, but UBC places no special restrictions on its use other than those normally associated with distributions of MTS. Subcomponents (1052/11) and (1052/12) contain further information about how to install the system. 0 Referenced by comments of: 792/1, 793/1, 1052/3 01052/002 PASCAL/UBC COMPILER UC G S1560 5.0T3 VLO FSNAME=PASCAL/UBC.COMPILER.UC.002(1) 1334 5.0T3 1334 PASCAL/UBC.COMPILER.UC.002 1 LINE 68 1 PAGE UBC JOLLIFFE UNSP FEB. 25, 1980 09:52:52 5.0T9 190 0 THE UM UPDATES TO THE COMPILER. THE NAME OF THE RUNTIME LIBRARY (1052/8) IS "UNSP:PAS.BC.LIB". THE NAME OF THE ERROR STATISTICS FILE (1052/10) IS "UNSP:PAS.BC.ERR". CALLS SNOOP IN UNSP:LIBRARY (685/2) TO RECORD USAGE IN THE FILE UNSP:STATS, IF IT EXISTS. 0 Referenced by comments of: 1050/1, 1052/1, 1052/3 01052/003 PASCAL/UBC COMPILER OE O UNSP:PAS.BC 5.0T3 1335 PASCAL/UBC.COMPILER.OE.003 1 LINE 32767 73 PAGE UBC JOLLIFFE UNSP JULY 03, 1981 20:59:07 5.0T9 191 UNSP:PAS.BC 0 THIS IS THE LINKEDITED OBJECT OF THE PASCAL COMPILER (1052/1), WITH THE (1052/2) UPDATE APPLIED, AND THE RUNTIME SUPPORT LIBRARY (1052/8). 01052/004 PASCAL/UBC MONITOR SRC SA O S1560 5.0T3 VLO FSNAME=PASCAL/UBC.MONITOR_SRC.SA.004(1) 1336 5.0T3 1336 PASCAL/UBC.MONITOR_SRC.SA.004 1 LINE 73 36 PAGE UBC JOLLIFFE UNSP NOV. 19, 1979 15:14:11 5.0T9 192 0 THIS FILE CONTAINS THE RUNTIME LIBRARY ASSEMBLER SOURCE MODULES. THESE ROUTINES DO LOW LEVEL I/O AND PASCAL PROGRAM INITIALIZATION. THE OBJECT OF THIS SUBCOMPONENT IS IN THE (1052/8) LIBRARY. 0 Referenced by comments of: 1052/8 1 SUN SEP 08/96 15:24:55 Page 820 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01052/005 PASCAL/UBC MONITOR UPD UC G S1560 5.0T3 VLO FSNAME=PASCAL/UBC.MONITOR_UPD.UC.005(1) 1337 5.0T3 1337 PASCAL/UBC.MONITOR_UPD.UC.005 1 LINE 63 1 PAGE UM UNSP APR. 24, 1980 03:59:22 5.0T9 193 0 Referenced by comments of: 1052/8 01052/006 PASCAL/UBC LIB SRC SW O S1560 5.0T3 VLO FSNAME=PASCAL/UBC.LIB_SRC.SW.006(1) 1338 5.0T3 1338 PASCAL/UBC.LIB_SRC.SW.006 1 LINE 94 14 PAGE UBC JOLLIFFE UNSP NOV. 19, 1979 15:25:17 5.0T9 194 0 THIS FILE CONTAINS THE RUNTIME LIBRARY (1052/8) SOURCE MODULES, WRITTEN IN PASCAL. MOST OF THE ROUTINES ARE HIGH LEVEL I/O ROUTINES. 0 Referenced by comments of: 1052/8 01052/007 PASCAL/UBC DEBUG SRC SW O S1560 5.0T3 VLO FSNAME=PASCAL/UBC.DEBUG_SRC.SW.007(1) 1339 5.0T3 1339 PASCAL/UBC.DEBUG_SRC.SW.007 1 LINE 82 58 PAGE UBC JOLLIFFE UNSP NOV. 19, 1979 15:25:24 5.0T9 195 0 THIS FILE CONTAINS THE SOURCE CODE, WRITTEN IN PASCAL, FOR THE PASCAL POST-MORTEM ANALYSIS (PMD) PACKAGE. 0 Referenced by comments of: 1052/8, 1052/9 01052/008 PASCAL/UBC RUNTIME LIB OL O UNSP:PAS.BC.LIB 5.0T3 1340 PASCAL/UBC.RUNTIME_LIB.OL.008 1 LINE 5846 50 PAGE UBC JOLLIFFE UNSP JULY 03, 1981 21:00:42 5.0T9 196 UNSP:PAS.BC.LIB 0 THIS IS THE PASCAL RUNTIME LIBRARY. IT CONTAINS THE OBJECT OF (1052/4) WITH THE (1052/5) UPDATE APPLIED, (1052/6), AND (1052/7). COMPONENT (1052/12) CONTAINS COMMANDS TO ASSEMBLE THE LIBRARY. 0 Referenced by comments of: 799/2, 1052/2, 1052/3, 1052/4, 1052/6, 1052/9, 1052/12 01052/009 PASCAL/UBC DEBUG.LOAD OC O UNSP:PAS.BC.DEBUG 5.0T3 1341 PASCAL/UBC.DEBUG.LOAD.OC.009 1 LINE 30 1 PAGE UBC JOLLIFFE UNSP JULY 03, 1981 21:00:46 5.0T9 197 UNSP:PAS.BC.DEBUG 0 THIS FILE CONTAINS ONLY AN ENT RECORD AND A $CONTINUE WITH UNSP:PAS.BC.LIB RECORD. IT IS LOADED BY THE RUNTIME LIBRARY (1052/8) WHEN THE DEBUGGER (1052/7) IS CALLED. 01052/010 PASCAL/UBC ERRORLOG D S1560 5.0T3 VLO FSNAME=PASCAL/UBC.ERRORLOG.D.010(1) 1342 5.0T3 1342 PASCAL/UBC.ERRORLOG.D.010 1 LINE 76 4 PAGE UBC JOLLIFFE UNSP NOV. 19, 1979 15:26:49 5.0T9 198 0 IF THIS FILE IS CREATED WITH THE NAME 'UNSP:PAS.BC.ERR' AND WITH THE GIVEN FORMAT, THE COMPILER WILL RECORD STATISTICS ABOUT THE ERROR MESSAGES IT ISSUES. IF THE FILE DOESN'T EXIST, NO LOGGING IS DONE. AS DISTRIBUTED, THE ERROR COUNTS ARE ZERO. THE LINE NUMBERS IN THIS FILE ARE IMPORTANT, SINCE IT ALSO CONTAINS THE TEXT OF THE ERROR MESSAGES IN THE NEGATIVE LINE NUMBER RANGE. 0 Referenced by comments of: 1052/2 1 SUN SEP 08/96 15:24:55 Page 821 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01052/011 PASCAL/UBC COMMENTS P S1560 5.0T3 VLO FSNAME=PASCAL/UBC.COMMENTS.P.011(1) 1343 5.0T3 1343 PASCAL/UBC.COMMENTS.P.011 1 LINE 68 3 PAGE UBC JOLLIFFE UNSP FEB. 10, 1980 17:43:44 5.0T9 199 0 THIS FILE CONTAINS A DESCRIPTION OF SOME OF THE FILES ON THE PASCAL DISTRIBUTION TAPE RECEIVED FROM UBC. 0 Referenced by comments of: 1052/1 01052/012 PASCAL/UBC INSTALL C S1560 5.0T3 VLO FSNAME=PASCAL/UBC.INSTALL.C.012(1) 1344 5.0T3 1344 PASCAL/UBC.INSTALL.C.012 1 LINE 79 3 PAGE UM UNSP DEC. 04, 1979 06:42:18 5.0T9 200 0 THESE ARE THE MTS COMMANDS USED TO INSTALL PASCAL/UBC AT UM. THERE ARE SOME INSTALLATION-DEPENDENCIES (LIKE TAPE RACK NUMBERS) WHICH WILL NEED TO BE CHANGED AT OTHER INSTALLATION. CONTAINS A $CONTINUE WITH UNSP:PAS.BC.LIB (1052/8) RECORD. 0 Referenced by comments of: 1052/1, 1052/8 01052/013 PASCAL/UBC MANUAL P UNSP:PAS.BC.W 5.0T3 1345 PASCAL/UBC.MANUAL.P.013 1 LINE 71 80 PAGE UBC JOLLIFFE UNSP JULY 03, 1981 21:01:33 5.0T9 201 0 "PASCAL/UBC USER'S GUIDE" (SEPT. 1979 EDITION). 01053/001 *NUMLIB # (NOT DISTRIBUTED) UBC 01054/001 CODING CONVENTIONS D5.0 MASTER SM G S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=CC_MACROS 5.0T3 1346 CODING_CONVENTIONS.D5.0_M.SM.001 1 LINE 80 104 PAGE UM MTS MTA AUG. 06, 1981 05:49:49 5.0T9 202 0 Base source for the new MTS Coding Conventions macro library. 01054/002A CODING CONVENTIONS UPDATE UC G MTSS:CCMACRO/UPD 5.1T3 131 CODING_CONVENTIONS.UPDATE.UC.002 1 LINE 140 84 PAGE UM MTS MTA JULY 23, 1983 15:16:19 0 MTS commands and *CDUPDATE input to produce the current source. The updated source, when run through *MACUTIL, will produce the macro library OLD:CC.MACROS (1054/4). All changes to the Coding Convention Macros should be made using *CDUPDATE (1036) and Mike Alexander at UM should be kept informed. **************************************************************************** D5.0B version: Post D5.0 updates start at line 1969. **************************************************************************** **************************************************************************** D5.1 version: 1 SUN SEP 08/96 15:24:55 Page 822 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 The macros have been changed to require a stack descriptor rooted in global storage. This change is incompatible with the previous coding convention macros. A description of the new features may be found in the MTS Workshop VII Proceedings. **************************************************************************** 01054/003A CODING CONVENTIONS COPY:CC.MACROS SM G COPY:CC.MACROS 5.1T3 132 CODING_CONVENTIONS.COPY:C.SM.003 1 LINE 72 79 PAGE UM MTS MTA JULY 23, 1983 15:16:25 COPY:CC.MACROS 0 Referenced by comments of: 42/1, 198/1, 354/1, 464/1, 513/1, 539/1, 578/1, 635/1, 636/1, 637/1, 638/1, 639/1, 775/1, 818/1, 829/1, 1054/4, 4000/1 01054/004A CODING CONVENTIONS OLD:CC.MACROS SM G OLD:CC.MACROS 5.1T3 133 CODING_CONVENTIONS.OLD:CC.SM.004 1 LINE 72 67 PAGE UM MTS MTA JULY 23, 1983 15:16:29 OLD:CC.MACROS 0 Source for the old version of CC macros. This is the last version which does not use stack descriptors. It is provided for (most) programs which use the coding convention macros and which have not been converted to the new macros COPY:CC.MACROS (1054/3). 0 Referenced by comments of: 1/5, 79/1, 101/1, 135/1, 354/5, 400/1, 400/5, 400/13, 458/89, 498/1, 540/26, 648/1, 651/13, 677/1, 682/24, 686/1, 721/18, 724/1, 732/1, 769/1, 769/4, 769/7, 769/10, 769/13, 769/16, 769/19, 769/22, 787/13, 787/15, 787/19, 787/21, 802/4, 802/29, 806/1, 811/2, 866/1, 1023/1, 1023/3, 1041/2, 1041/3, 1041/4, 1041/5, 1041/6, 1041/7, 1041/10, 1041/12, 1051/5, 1051/7, 1051/9, 1051/11, 1051/13, 1051/15, 1051/17, 1051/19, 1051/21, 1051/23, 1051/25, 1051/27, 1051/29, 1051/31, 1051/34, 1051/37, 1051/42, 1054/2, 1058/1, 1058/3, 1058/5, 1058/7, 1058/9, 1058/11, 1058/13, 1058/15, 1058/18, 1058/21, 1058/26, 1067/2, 1070/3, 1079/2, 1079/4, 1079/6, 1079/8, 1079/10, 1079/12, 1079/14, 1079/16, 1079/18 01054/005 CODING CONVENTIONS WRITEUP WF W163:CC.W 5.0T3 1349 CODING_CONVENTIONS.WRITEU.WF.004 1 LINE 96 10 PAGE UM MTS OGDEN AUG. 06, 1981 05:50:04 5.0T9 205 0 Writeup describing coding conventions and the coding convention macros. 01055/001 UBC FEP (PDP-11) # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE UBC FRONT-END PROCESSOR SOFTWARE. 01056/001 MM # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE MESSAGE MULTIPLEXOR. 01057/001 UBC FEPDSR # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE UBC FRONT-END PROCESSOR DSR. 1 SUN SEP 08/96 15:24:55 Page 823 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01058/001A SUBTASKING MONITOR MNTR SA G DMGR:MNTMNTR(-10000,-1) 5.1T3 134 SUBTASKING_MONITOR.MNTR.SA.001 1 LINE 72 29 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:28 0 Subtasking Monitor initialization and management routines. Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 724/3, 769/19, 787/5, 787/17, 1041/1, 1051/1, 1051/33, 1051/39, 1058/17, 1079/1 01058/002A SUBTASKING MONITOR MNTR UC G DMGR:MNTMNTR(1000) 5.1T3 135 SUBTASKING_MONITOR.MNTR.UC.002 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:31 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/003A SUBTASKING MONITOR WAIT SA G DMGR:MNTWAIT(-10000,-1) 5.1T3 136 SUBTASKING_MONITOR.WAIT.SA.003 1 LINE 72 25 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:31 0 Subtasking Monitor wait routines. Requires COPY:MNTR.MACROS (1058/25), OLD:CC.MACROS (1054/4), and COPY:UC.MACROS (787/1). 0 Referenced by comments of: 1058/15, 1058/21 01058/004A SUBTASKING MONITOR WAIT UC G DMGR:MNTWAIT(1000) 5.1T3 137 SUBTASKING_MONITOR.WAIT.UC.004 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:33 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/005A SUBTASKING MONITOR SERV SA G DMGR:MNTSERV(-10000,-1) 5.1T3 138 SUBTASKING_MONITOR.SERV.SA.005 1 LINE 72 13 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:33 0 Subtasking Monitor service routines, including STRTIO, HALTIO, SENDIT, CNCLIT and DVSTAT. These routines may also be user in a non-monitor environment. Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and COPY:UC.MACROS (787/1). 01058/006A SUBTASKING MONITOR SERV UC G DMGR:MNTSERV(1000) 5.1T3 139 SUBTASKING_MONITOR.SERV.UC.006 1 LINE 72 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:34 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/007A SUBTASKING MONITOR PRVI SA G DMGR:MNTPRV(-10000,-1) 5.1T3 140 SUBTASKING_MONITOR.PRVI.SA.007 1 LINE 72 4 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:34 0 Pseudo-register vector initialization routine and LCSPR table. Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and COPY:UC.MACROS (787/1). 1 SUN SEP 08/96 15:24:55 Page 824 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01058/008A SUBTASKING MONITOR PRVI UC G DMGR:MNTPRV(1000) 5.1T3 141 SUBTASKING_MONITOR.PRVI.UC.008 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:35 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/009A SUBTASKING MONITOR UNND SA G DMGR:MNTUNND(-10000,-1) 5.1T3 142 SUBTASKING_MONITOR.UNND.SA.009 1 LINE 72 12 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:35 0 Subtasking Monitor routines to allocate/de-allocate real devices, and intertask networks and nodes. Also include are the routines to do this in an MTS environment. Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and COPY:UC.MACROS (787/1). 01058/010A SUBTASKING MONITOR UNND UC G DMGR:MNTUNND(1000) 5.1T3 143 SUBTASKING_MONITOR.UNND.UC.010 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:36 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/011A SUBTASKING MONITOR ONUNIT SA G DMGR:MNTONUNIT(-10000,-1) 5.1T3 144 SUBTASKING_MONITOR.ONUNIT.SA.011 1 LINE 71 5 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:37 0 Subtasking monitor routines to specify and invoke PGNT and MSG units. Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4). 01058/012A SUBTASKING MONITOR ONUNIT UC G DMGR:MNTONUNIT(1000) 5.1T3 145 SUBTASKING_MONITOR.ONUNIT.UC.012 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:37 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/013A SUBTASKING MONITOR GSFS SA G DMGR:MNTGTFR(-10000,-1) 5.1T3 146 SUBTASKING_MONITOR.GSFS.SA.013 1 LINE 72 18 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:37 0 Subtasking monitor space allocation/de-allocation routines. Requires COPY:MNTR.MACROS (1058/30) and OLD:CC.MACROS (1054/4). 01058/014A SUBTASKING MONITOR GSFS UC G DMGR:MNTGTFR(1000) 5.1T3 147 SUBTASKING_MONITOR.GSFS.UC.014 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:39 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/015A SUBTASKING MONITOR MTS WAIT SA G DMGR:MNTMTWAIT(-10000,-1) 5.1T3 148 SUBTASKING_MONITOR.MTS_WA.SA.015 1 LINE 71 2 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:39 0 This is the MTS version of the RMWAIT routine, which is part of WAIT (1058/3). MTS WAIT needs to be loaded past the symbol 'ENDOFMTS' in order for ATTN and timer interrupts to occur. Since MTS suppresses all such interrupts below 'ENDOFMTS', a version of the monitor in real memory, segment 0, is 1 SUN SEP 08/96 15:24:55 Page 825 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 mostly uninterruptable if it ever waits. Requires COPY:MNTR.MACROS (1058/30), OLD:CC.MACROS (1054/4), and COPY:MISC.MACROS (728). 0 Referenced by comments of: 1058/17 01058/016A SUBTASKING MONITOR MTS WAIT UC G DMGR:MNTMTWAIT(1000) 5.1T3 149 SUBTASKING_MONITOR.MTS_WA.UC.016 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:40 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/017A SUBTASKING MONITOR MONITOR OBJ OC G # (PART OF RESIDENT SYSTEM) UBC BOWLER HELFFRICH 0 The object for (1058/1) through (1058/15). These are separate RAMROD decks of the same name as the source. Note that the object for (1058/15) must come after the RAMROD deck "MTS" in order to function properly. Object part of Resident System (468). 0 Referenced by comments of: 1058/27 01058/018A SUBTASKING MONITOR MDUMP SA G DMGR:MNTDUMP(-10000,-1) 5.1T3 150 SUBTASKING_MONITOR.MDUMP.SA.018 1 LINE 73 10 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:40 0 Routine to produce a formatted dump of subtasking monitor control blocks when running in an MTS environment. Requires COPY:MNTR.MACROS (1058/18) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1058/18 01058/019A SUBTASKING MONITOR MDUMP UC G DMGR:MNTDUMP(1000) 5.1T3 151 SUBTASKING_MONITOR.MDUMP.UC.019 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:40 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/020A SUBTASKING MONITOR MDUMP OC G DMGR:MNTDUMP(1,999) 5.1T3 152 SUBTASKING_MONITOR.MDUMP.OC.020 1 LINE 80 11 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:41 0 Referenced by comments of: 1058/27 01058/021A SUBTASKING MONITOR SYNCH WAIT SA O DMGR:MNTSYNCWAIT(-10000,-1) 5.1T3 153 SUBTASKING_MONITOR.SYNCH.SA.021 1 LINE 72 6 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:41 0 Monitor subroutines which can replace the asynchronous wait routines (1058/3) if synchronous operation is desired. Doing this means the monitor need not be running, that is, MNTINIT or MNTMTSI need not be called. Requires COPY:MNTR.MACROS (1058/21) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1058/21 1 SUN SEP 08/96 15:24:55 Page 826 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01058/022A SUBTASKING MONITOR SYNCH WAIT UC O DMGR:MNTSYNCWAIT(1000) 5.1T3 154 SUBTASKING_MONITOR.SYNCH.UC.022 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:42 0 Update deck to be applied to the previously distributed source to yield the current source. 01058/023A SUBTASKING MONITOR SYNCH WAIT OC O DMGR:MNTSYNCWAIT(1,999) 5.1T3 155 SUBTASKING_MONITOR.SYNCH.OC.023 1 LINE 80 4 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:42 01058/024A SUBTASKING MONITOR DOCUMENTATION WF DMGR:MNTWRITEUP(-10000,-1) 5.1T3 156 SUBTASKING_MONITOR.DOCUME.WF.024 1 LINE 89 21 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:42 0 Writeup describing the Subtasking Monitor. Requires COPY:JONMACLIBFMT (308/18). 01058/025A SUBTASKING MONITOR DOCUMENTATION PF DMGR:MNTWRITEUP(1,*L) 5.1T3 157 SUBTASKING_MONITOR.DOCUME.PF.025 1 LINE 69 33 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:44 0 Referenced by comments of: 1058/3 01058/026 SUBTASKING MONITOR TEST PROGRAM SA G DMGR:MNTTEST(1000) 5.0T3 1365 SUBTASKING_MONITOR.TEST_P.SA.017 1 LINE 71 6 PAGE UBC BOWLER HELFFRICH AUG. 06, 1981 05:50:59 5.0T9 221 0 Test program for Subtasking Monitor. It is strongly recommended that you run this program to assure yourself that the monitor is properly installed. Requires COPY:MNTR.MACROS (1058/26) and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1058/26 01058/027 SUBTASKING MONITOR TEST PROGRAM OC G DMGR:MNTTEST(1,999) 5.0T3 1366 SUBTASKING_MONITOR.TEST_P.OC.018 1 LINE 80 7 PAGE UBC BOWLER HELFFRICH AUG. 06, 1981 05:51:02 5.0T9 222 0 To use this, the object must be run along with (1058/20) and the resident system monitor object (1058/17). 01058/028A SUBTASKING MONITOR MACROS SM G DMGR:MNTMACROS(-10000,-1) 5.1T3 158 SUBTASKING_MONITOR.MACROS.SM.028 1 LINE 73 23 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:46 0 Subtasking monitor macro library base source. 0 Referenced by comments of: 1058/30 01058/029A SUBTASKING MONITOR MACROS UC G DMGR:MNTMACROS(1000) 5.1T3 159 SUBTASKING_MONITOR.MACROS.UC.029 1 LINE 68 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:47 0 Update deck to be applied to the previously distributed source to yield the current source. 0 Referenced by comments of: 1058/30 1 SUN SEP 08/96 15:24:55 Page 827 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01058/030A SUBTASKING MONITOR MNTR MACROS SM G COPY:MNTR.MACROS 5.1T3 160 SUBTASKING_MONITOR.MNTR_M.SM.030 1 LINE 73 23 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:17:47 COPY:MNTR.MACROS 0 The macros and copy sections associated with the Subtasking Monitor. Results from creating a macro library from the results of applying (1058/29) to (1058/28). 0 Referenced by comments of: 400/1, 769/1, 769/4, 769/7, 769/10, 769/13, 769/16, 769/19, 818/1, 1041/2, 1041/3, 1041/4, 1041/5, 1041/6, 1041/7, 1041/10, 1041/12, 1051/31, 1051/37, 1058/1, 1058/5, 1058/7, 1058/9, 1058/11, 1058/13, 1058/15, 1079/2, 1079/4, 1079/6, 1079/8, 1079/10, 1079/12, 1079/14, 1079/18 01059/001 GENERAL_TRANSLATOR # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A GENERAL TRANSLATING ROUTINE WHICH OBSOLETES *EBCASC, *ASCEBC, *BCDEBCD, AND *EBCBCD, AS WELL AS PROVIDING SOME NEW TRANSLATING FEATURES. 01060/001 FILE_CREATE # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A ROUTINE TO ATTEMPT TO CREATE ONE OR MORE FILES AND TO CAUSE THE USER TO BE SIGNED OFF IF ANY OF THE FILE CREATE ATTEMPTS FAIL. 01061/001 PROFILE # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, ESTABLISHES DEFAULTS FROM A SIGFILE. 01062/001 UBC FEP INTERFACE # (NOT DISTRIBUTED) UBC 01064/001 PDADSR # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A RUDIMENTARY DSR WHICH WILL COMMUNICATE WITH UBC'S PDP-11 FEP OVER THE SINGLE-ADDRESS 2701 INTERFACE. 01065/001 UBC FEP LOAD & DUMP # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS THE ROM BOOTSTRAP LOADER FOR THE UBC PDP-11S. 01066/001 SWAT # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE MTS DEBUGGING MONITOR. 1 SUN SEP 08/96 15:24:55 Page 828 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01067/001 TAPESHARE MAIN PGM SA G S1237 TAPES 'TAPEFS' FSNAME=TAPESHARE 5.0T3 1368 TAPESHARE.MAIN_PGM.SA.001 1 LINE 80 5 PAGE UBC WHALEY UNSP MAY 06, 1980 13:19:56 5.0T9 224 0 Program to allow users to control which of their tapes can be read from, or optionally written on, by other users. This UM version of TAPESHARE parses rack names by using the initial non-numeric part of the name (prefixed by "ETC.:TAPE") as the name of a file which contains the data indicating tape access restrictions. For example, for rack name "C1000" TAPESHARE will access file ETC.:TAPEC to see if C1000 can be mounted by the requesting user (and in what way). If the file in question does not exist (no such files exist on the distributed test pack), then access to the tape is always allowed. If the file does exist, but is not accessible by the user trying to mount the tape, then the mount is not allowed. The main program calls TSHARESUB (1067/2). Copies *GDINFODSECT (594). 0 Referenced by comments of: 1067/4 01067/002 TAPESHARE TSHARESUB SA G S1237 TAPES 'TAPEFS' FSNAME=TSHARESUB 5.0T3 1369 TAPESHARE.TSHARESUB.SA.002 1 LINE 73 44 PAGE UBC WHALEY UNSP MAY 06, 1980 13:19:10 5.0T9 225 0 Subroutine that does most of the work. Installations may want to change the following things before using: 1) list of privileged IDs 2) "PRJNO" and "P" might be changed to "DEPT" and "D" Assemble using OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1067/1, 1067/4 01067/003 TAPESHARE ATTNQ SA G S1237 TAPES 'TAPEFS' FSNAME=TS.ATTNQ 5.0T3 1370 TAPESHARE.ATTNQ.SA.003 1 LINE 80 2 PAGE UBC WHALEY UNSP DEC. 22, 1978 13:26:17 5.0T9 226 0 ATTENTION TRAPPING ROUTINES FOR USE BY INSTALLATIONS WHICH DO NOT HAVE UBC'S ATTNQ, ATTNTEST, AND ATTNNOQ. SOURCE IN LINES 1,999. 0 Referenced by comments of: 1067/4 01067/004 TAPESHARE OE G UNSP:TAPESHARE 5.0T3 1371 TAPESHARE..OE.004 1 LINE 14788 5 PAGE UBC WHALEY UNSP JULY 03, 1981 21:04:10 5.0T9 227 UNSP:TAPESHARE 0 LINKEDITED OBJECT OF TAPESHARE (1067/1), TSHARESUB (1067/2), AND ATTNQ (1067/3). 0 Referenced by comments of: 1067/8 1 SUN SEP 08/96 15:24:55 Page 829 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01067/005 TAPESHARE CHECK SUBR SA G S1237 TAPES 'TAPEFS' FSNAME=TSCHECK 5.0T3 1372 TAPESHARE.CHECK_SUBR.SA.005 1 LINE 80 6 PAGE UBC WHALEY UNSP AUG. 19, 1980 12:19:48 5.0T9 228 0 Subroutine called by MOUNT (101) to check access to a tape. MOUNT has a WXTRN for it. Object is in *CLSMOUNT (101/1). Assemble using COPY:MTS.MACROS (344/3). 0 Referenced by comments of: 101/1, 101/2, 101/3 01067/006 TAPESHARE CHECK SUBR OC G # (PART OF *CLSMOUNT) UBC WHALEY UNSP 0 Part of *CLSMOUNT (101/2) 01067/007 TAPESHARE TSHELP D ETC:TSHELP 5.0T3 1373 TAPESHARE.TSHELP.D.007 1 LINE 70 3 PAGE UBC WHALEY UNSP JULY 03, 1981 21:04:16 5.0T9 229 ETC.:TSHELP 0 TEXT FOR TAPESHARE'S HELP COMMAND. 01067/008 TAPESHARE TSHAREID D # ETC.:TSHAREID UBC WHALEY UNSP ETC.:TSHAREID@E 0 DATA FILE USED BY UNSP:TAPESHARE (1067/4) WHICH LISTS THE TAPES OWNED BY EACH USER. THIS FILE IS EMPTY ON THE TEST PACK, WHICH MEANS THAT THERE ARE NO TAPES OWNED BY ANYBODY AND IF TAPES ARE ADDED, THE CORRESPONDING ETC:TAPEx FILE(S) MUST BE CREATED FIRST. USER ID "MTS." MAY BE USED TO PERFORM SUCH TAPE LIBRARIAN FUNCTIONS. 01067/009 TAPESHARE TSMANUAL P S1237 TAPES 'TAPEFS' FSNAME=TS.LIBRMANUAL 5.0T3 1374 TAPESHARE.TSMANUAL.P.009 1 LINE 76 4 PAGE UBC WHALEY UNSP DEC. 22, 1978 13:03:50 5.0T9 230 0 TAPESHARE MANUAL FOR TAPE LIBRARIAN. INCLUDES PRIVILEGED COMMANDS. 01067/010 TAPESHARE WRITEUP WT S1237 TAPES 'TAPEFS' FSNAME=TS.V2WRITEUP 5.0T3 1375 TAPESHARE.WRITEUP.WT.010 1 LINE 71 3 PAGE UBC WHALEY UNSP JULY 02, 1979 22:14:34 5.0T9 231 0 VOLUME 2 STYLE USER WRITEUP. 01067/011 TAPESHARE WRITEUP PT UNSP:TAPESHARE.W 5.0T3 1376 TAPESHARE.WRITEUP.PT.011 1 LINE 84 4 PAGE UBC WHALEY UNSP JULY 03, 1981 21:04:26 5.0T9 232 UNSP:TAPESHARE.W 01067/012 TAPESHARE *TSH C *TSH 5.0T3 1377 TAPESHARE.*TSH.C.012 1 LINE 68 1 PAGE UBC WHALEY UNSP JULY 03, 1981 21:04:28 5.0T9 233 *TSH 0 OPERATOR FILE TO RUN UNSP:TAPESHARE. INVOKED BY ENTERING "MTS *TSH" ON OPERATORS CONSOLE. 1 SUN SEP 08/96 15:24:55 Page 830 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01069/001 FAKE MM # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT INSTALLED AT MICHIGAN, IS A UTILITY WRITTEN TO TEST THE UBC FEP PROTOCOL. 01070/001 SYSTEM TIMETALLY TTTABLES SA G MTS:TTTABLES(1,999) 5.0T3 1378 SYSTEM_TIMETALLY.TTTABLES.SA.001 1 LINE 68 1 PAGE UM MTS OGDEN JULY 03, 1981 21:04:29 5.0T9 234 MTS:TTTABLES 0 Fixed storage and tables describing the timetally bins. Used by CONFIG (046) and UMMPS (045) if &TTALLY=1 in COPY:GLOBALSETS (1026/2). 01070/002 SYSTEM TIMETALLY TTTABLES OC G # (PART OF RESIDENT SYSTEM) UM MTS OGDEN 0 May be removed from the resident system even if CONFIG (046) and UMMPS (045) are assembled with &TTALLY=1. Object part of Resident System (468). 01070/003 SYSTEM TIMETALLY TTPRINT SA O MTS:TTPRINT(1000) 5.0T3 1379 SYSTEM_TIMETALLY.TTPRINT.SA.003 1 LINE 73 4 PAGE UM MTS OGDEN JULY 03, 1981 21:04:29 5.0T9 235 0 Program to print the results of the system timetally. Requires an object deck produced by TTMAP (1070/5). Requires COPY:UMMPS.MACROS (045/14), COPY:MTS.MACROS (344/3), and OLD:CC.MACROS (1054/4). 0 Referenced by comments of: 1070/5, 1070/8 01070/004 SYSTEM TIMETALLY TTPRINT OC O MTS:TTPRINT(1,999) 5.0T3 1380 SYSTEM_TIMETALLY.TTPRINT.OC.004 1 LINE 80 5 PAGE UM MTS OGDEN JULY 03, 1981 21:04:31 5.0T9 236 MTS:TTPRINT 0 Contains a $CONTINUE WITH COPY:CCSYMBOL+COPY:SYSDEFS reference to (579/9) and (579/3). 01070/005A SYSTEM TIMETALLY TTMAP SS G MTS:TTMAP(1000) 5.1T3 161 SYSTEM_TIMETALLY.TTMAP.SS.005 1 LINE 68 1 PAGE UM MTS OGDEN JULY 23, 1983 15:17:49 0 Program to read SEG2:S2MAP (559/12) and produce an object file for use with TTPRINT (1070/3). Uses *SPITDEBUG (590/9) and the ITS routine from UNSP:SPITLIB (590/30). 0 Referenced by comments of: 1070/3, 1070/8 01070/006A SYSTEM TIMETALLY TTMAP OC G MTS:TTMAP(1,999) 5.1T3 162 SYSTEM_TIMETALLY.TTMAP.OC.006 1 LINE 80 11 PAGE UM MTS OGDEN JULY 23, 1983 15:17:49 MTS:TTMAP 0 Contains a $CONTINUE WITH *SPITLIB (590/10). 1 SUN SEP 08/96 15:24:55 Page 831 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01070/007 SYSTEM TIMETALLY TTRESULTS P S1560 5.0T3 VLO FSNAME=SYSTEM_TIMETALLY.TTRESULT.P.007(1) 1383 5.0T3 1383 SYSTEM_TIMETALLY.TTRESULT.P.007 1 LINE 122 95 PAGE UM MTS OGDEN MAR. 28, 1981 00:25:47 5.0T9 239 0 Sample results from the system timetally at UM. 01070/008C SYSTEM TIMETALLY TT CMD FILE C MTS:TT.SO 5.1T3 360 SYSTEM_TIMETALLY.TT_CMD_F.C.008 1 LINE 68 1 PAGE UM MTS OGDEN AUG. 20, 1983 19:50:41 MTS:TT.SO 0 Command file to be $SOURCEd to in order to produce the system timetally. Uses MTS:TTMAP (1070/5), MTS:TTPRINT (1070/3), and MTA:PRNTCNTS (540/3). 01071/001 3066_JOB # (NOT DISTRIBUTED) UBC 01072/001 UBC TAPE CATALOGUE # (NOT DISTRIBUTED) UBC 01073/001 SENSE.DATA.INTERPRETER # (NOT DISTRIBUTED) UBC 01074/001 DYNAMIC_STORAGE # (NOT DISTRIBUTED) UBC 01075/001 TAPE_REPORT # (NOT DISTRIBUTED) UBC 01076/001C *CLPARSER CLPARSEGEN OE G *CLPARSEGEN 5.1T3 163 CLPARSER.CLPARSEGEN.OE.001 1 LINE 32767 11 PAGE UBC BALLARD BURLING JULY 23, 1983 15:17:50 0 This is complete, linkedited parse table generator (grammar analyzer). The complete object can be produced via the following *LINKEDIT commands: $run *linkedit set symsave=off include clpgen*oq (1076/3) include clpgen*or (1076/5) include@sli plus:objrtns>ol (1042/69) include@sli plus:misc>ol (1042/89) include seg2:clparser _pprodnm combine Note that if CLPARSER and the PLUS library are not in shared vm, then they should be included@SLI also. Also, not that if CLPARSER *is* in shared VM, the module _PPRODNM must be included into CLPARSEGEN (because it isn't entered into CCSYMBOL at UBC, being an internal entry of CLPARSER that shouldn't be referenced except by CLPARSEGEN.) There have been a few bug fixes since the RD5.0A version. 1 SUN SEP 08/96 15:24:55 Page 832 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 0 Referenced by comments of: 509/12, 509/16, 774/4, 821/4, 821/7, 821/8, 839/5, 851/3, 852/3, 853/3, 854/3, 855/3, 856/3, 857/3, 858/3, 1036/1, 1036/3, 1042/67, 1042/83, 1086/3 01076/002C *CLPARSER CLPGEN SOURCE SQ G S1644 5.0BT1 VLO FSNAME=CLPARSER.CLPGEN_SOURCE.SQ.002(1) 994 5.1T3 164 CLPARSER.CLPGEN_SOURCE.SQ.002 1 LINE 75 36 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:15 0 PLUS source for the parser table generator. Compile this with the following libraries (concatenate together on unit 0): *CLPARSELIB (1076/11) PLUS:OBJRTNS*SL (1042/68) PLUS:MISC*SL (1042/88) *PLUS.SOURCELIB (1042/5) See 1076/1 for description of all the pieces that make up *CLPARSEGEN. 01076/003C *CLPARSER CLPGEN OBJECT OC G S1644 5.0BT1 VLO FSNAME=CLPARSER.CLPGEN_OBJECT.OC.003(1) 995 5.1T3 165 CLPARSER.CLPGEN_OBJECT.OC.003 1 LINE 5692 21 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:18 0 Object for CLPARSEGEN PLUS source. 0 Referenced by comments of: 1076/1 01076/004A *CLPARSER CLPGEN GRAMMAR SR G S1644 5.0BT1 VLO FSNAME=CLPARSER.CLPGEN_GRAMMAR.S.004(1) 996 5.1T3 166 CLPARSER.CLPGEN_GRAMMAR.SR.004 1 LINE 80 5 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:19 0 Grammar (input to *CLPARSEGEN) defining the analyzer input language. 01076/005A *CLPARSER GRAMMAR OBJ OC G S1644 5.0BT1 VLO FSNAME=CLPARSER.GRAMMAR_OBJ.OC.005(1) 997 5.1T3 167 CLPARSER.GRAMMAR_OBJ.OC.005 1 LINE 5478 3 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:20 0 Object code generated by current version of *CLPARSEGEN from the current CLPARSEGEN grammar. 0 Referenced by comments of: 1042/81, 1076/1 01076/006A *CLPARSER PARSER OC G *CLPARSER 5.1T3 168 CLPARSER.PARSER.OC.006 1 LINE 24 1 PAGE UBC BALLARD BURLING JULY 23, 1983 15:18:22 0 CLPARSER is post-IPL loaded into shared VM at UBC. Hence this file now contains only the loader records needed to reference the PLUS-callable entries in CCSYMBOL. 0 Referenced by comments of: 498/145, 509/11, 509/15, 851/2, 852/2, 853/2, 854/2, 855/2, 856/2, 857/2, 858/2, 1036/1, 1086/2 1 SUN SEP 08/96 15:24:55 Page 833 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01076/007A *CLPARSER PARSER OC G SEG2:CLPARSER 5.1T3 169 CLPARSER.PARSER.OC.007 1 LINE 3782 13 PAGE UBC BALLARD BURLING JULY 23, 1983 15:18:23 SEG2:CLPARSER 0 Object file containing the parser and associated routines. There have been various bug fixes, especially in the area of syntax error correction, since the last (RD5.0A) version. This contains the object generated by compiling (1076/9), assembling (1076/10) and the tables generated by *CLPARSEGEN for the system terminals grammar (1076/13) and the parser internal grammar (1076/12). There are three COM records at the beginning, containing the entry names for .. the system terminals .. the FORTRAN callable routines .. the PLUS/Coding Conventions callable routines. The first two sets are entered into LCSYMBOL, and the third into CCSYMBOL. Thus the Pistle control line is ... SEG2:CLPARSER LCS=(LCSYMBOL,LCSYMBOL,CCSYMBOL) Note that if this is done, Fortran routines can use the parser without needing to reference CCSYMBOL. (1076/8) contains commands to build SEG2:CLPARSER from the pieces. Note the file CODE:PARSE.HELP which was referenced by the D5.0 version is no longer needed. 01076/008C *CLPARSER OBJUTIL CMDS C S1644 5.0BT1 VLO FSNAME=CLPARSER.OBJUTIL_CMDS..008(1) 1000 5.1T3 170 CLPARSER.OBJUTIL_CMDS.C.008 1 LINE 191 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:23 0 This is a $SOURCE file to generate SEG2:CLPARSER, including the required COM records. It just contains... $destroy clparser*o $create clparser*o size=50p $copy *source* clparser*o COM *INTEGER *HEXEGER *LINMBER *REAL *STRING *QUORING *PRIRING *HEXRING *SIMNAME *QUANAME *FDNAME *CCID *PROJECT *BLANKS *ENDLINE *ENDFILE *MORE *TO_LANK *HELMAND *HELP *TRACE *PUSH *MESSAGE COM CPCURP CPARSE CPGET CPGSTK CPHELP CPINIT CPINM CPRSET CPSET CPTERM CPGSS COM CPINITCC CPINMCC CPARSECC CPSETCC CPGETCC CPGSTKCC CPRSETCC CPTERMCC CPHELPCC CPCURPCC CPCTXTCC CPPTXTCC CPLTTCC CPGSSCC $ENDFILE $run *objutil 0=clparser*o(*l+1) set symsave=off add clp*oq add clp*or add clpsys*or add clp*oa add *ccsymbol 1 SUN SEP 08/96 15:24:55 Page 834 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 stop $endfile 0 Referenced by comments of: 1076/7 01076/009A *CLPARSER PARSER SRC SQ G PLUS:CLP*SQ 5.1T3 171 CLPARSER.PARSER_SRC.SQ.009 1 LINE 77 72 PAGE UBC BALLARD BURLING JULY 23, 1983 15:18:24 0 PLUS source for the parser and associated routines. Compile this with 0=*CLPARSELIB+*PLUS.SOURCELIB (1076/11) (1042/5) ********************************************************************* D5.1 changes (based on D5.0B base, which is the same as the Workshop 8 base): 52) Fixed bug in Scan_Table. 53) Fixed problems with Adjust_Stack_Positions (buffer swap wrong). 54) Fixed problem with HELP/INCLUDE. 55) Fixed bug in Scan_Table and Print_Trace (missing cases). 56) Allow error message to be set from a semantic routine. ********************************************************************* 0 Referenced by comments of: 1076/7 01076/010C *CLPARSER PARSER INTF SA G S1644 5.0BT1 VLO FSNAME=CLPARSER.PARSER_INTF.SA.010(1) 1002 5.1T3 172 CLPARSER.PARSER_INTF.SA.010 1 LINE 69 7 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:28 0 Assembler source for routines which provide S-type interface to the parser routines. Assemble with coding-conventions macro library. (This will be eliminated, eventually, by using PLUS's new linkage options to write these routines in PLUS.) 0 Referenced by comments of: 1042/82, 1076/7 01076/011A *CLPARSER PARSER LIB SQ G *CLPARSELIB 5.1T3 173 CLPARSER.PARSER_LIB.SQ.011 1 LINE 68 8 PAGE UBC BALLARD BURLING JULY 23, 1983 15:18:28 0 This is a PLUS source library containing definitions of the various parser routines and types. It is required to compile the parser and any PLUS program using the parser. 0 Referenced by comments of: 509/10, 509/14, 553/5, 821/1, 839/1, 839/2, 843/1, 851/1, 852/1, 853/1, 854/1, 855/1, 856/1, 857/1, 858/1, 1036/2, 1042/91, 1076/2, 1076/9, 1084/2, 1086/1, 1089/9 1 SUN SEP 08/96 15:24:55 Page 835 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01076/012C *CLPARSER PARSER GRAMM SR G S1644 5.0BT1 VLO FSNAME=CLPARSER.PARSER_GRAMM.S.012(1) 1004 5.1T3 174 CLPARSER.PARSER_GRAMM.SR.012 1 LINE 68 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:30 0 Grammar defining productions used internally by the parser... e.g., for processing help file directory, YES/NO repsponses etc. 0 Referenced by comments of: 1076/7 01076/013A *CLPARSER SYS TERMINALS SR G S1644 5.0BT1 VLO FSNAME=CLPARSER.SYS_TERMINALS.S.013(1) 1005 5.1T3 175 CLPARSER.SYS_TERMINALS.SR.013 1 LINE 94 3 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:31 0 Grammar defining syntax of system terminals. The goals in this grammar define the system terminals to be allowed. Each goal MUST be of the form goal entry "*xxx" is whatever. The analyzer (CLPARSEGEN) determines the legal system terminal names from the copy of the system-terminals table that is loaded with it. If is a goal in the system terminals table loaded with *CLPARSEGEN, then it will recognize *xxx* as a legal system terminal. It will assume *xxx is the external symbol to which a reference should be generated. 0 Referenced by comments of: 1076/7 01076/014A *CLPARSER WRITEUP WF S1644 5.0BT1 VLO FSNAME=CLPARSER.WRITEUP.WF.014(1) 1006 5.1T3 176 CLPARSER.WRITEUP.WF.014 1 LINE 114 58 PAGE UBC BALLARD BURLING JULY 26, 1982 20:12:32 0 Source for writeup on the parser. It is now in FMT. Requires STAF:FMTLIB (formerly known as JON:MACLIB). 01076/015A *CLPARSER WRITEUP PF S1644 5.0BT1 VLO FSNAME=CLPARSER.WRITEUP.PF.015(1) 1007 5.1T3 177 CLPARSER.WRITEUP.PF.015 1 LINE 70 73 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:31 0 $COPYable form of parser writeup. Allow 110 pages, TN printer. Revision bars indicate changes since previous version. 01076/016C *CLPARSER EXAMPLE 1 SR S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_1.S.016(1) 1008 5.1T3 178 CLPARSER.EXAMPLE_1.SR.016 1 LINE 64 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:37 0 This and following files are the source for the three examples used in the writeup. All are variations of a program to evaluate simple arithmetic expressions. This is grammar for use with PLUS program. 1 SUN SEP 08/96 15:24:55 Page 836 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01076/017C *CLPARSER EXAMPLE 1 SQ S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_1.SQ.017(1) 1009 5.1T3 179 CLPARSER.EXAMPLE_1.SQ.017 1 LINE 68 2 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:38 0 PLUS source. 01076/018C *CLPARSER EXAMPLE 1 D S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_1.D.018(1) 1010 5.1T3 180 CLPARSER.EXAMPLE_1.D.018 1 LINE 64 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:39 0 Help file used by example program. 01076/019C *CLPARSER EXAMPLE 2 SR S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_2.S.019(1) 1011 5.1T3 181 CLPARSER.EXAMPLE_2.SR.019 1 LINE 73 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:40 0 Grammar for use with Fortran program. 01076/020C *CLPARSER EXAMPLE 2 SF S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_2.SF.020(1) 1012 5.1T3 182 CLPARSER.EXAMPLE_2.SF.020 1 LINE 62 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:40 0 Fortran example 01076/021C *CLPARSER EXAMPLE 3 SR S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.S.021(1) 1013 5.1T3 183 CLPARSER.EXAMPLE_3.SR.021 1 LINE 66 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:41 0 Separate compilation example. First part of grammar. 01076/022C *CLPARSER EXAMPLE 3 SR S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.S.022(1) 1014 5.1T3 184 CLPARSER.EXAMPLE_3.SR.022 1 LINE 58 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:42 0 Separate compilation example. Second part of grammar. 01076/023C *CLPARSER EXAMPLE 3 SQ S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.SQ.023(1) 1015 5.1T3 185 CLPARSER.EXAMPLE_3.SQ.023 1 LINE 68 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:42 0 Separate compilation example. First part of source. 01076/024C *CLPARSER EXAMPLE 3 SQ S1644 5.0BT1 VLO FSNAME=CLPARSER.EXAMPLE_3.SQ.024(1) 1016 5.1T3 186 CLPARSER.EXAMPLE_3.SQ.024 1 LINE 65 1 PAGE UBC BALLARD BURLING JULY 26, 1982 20:15:43 0 Separate compilation example -- second part of source. 01077/001 SETUP SOURCE SQ G S1153 UNSP VLO FSNAME=SIGSETUP.PLUS 5.0T3 1398 SETUP.SOURCE.SQ.001 1 LINE 121 22 PAGE UBC BALLARD UNSP SEP. 19, 1980 13:01:02 5.0T9 254 0 Program for selective execution of MTS commands and device commands (of most use in SIGFILES). Commands in lines 0 through 0.9 indicate how this component should be installed. Needs GRAMMAR (1077/3) and the PLUS supervisor library (045/16). 1 SUN SEP 08/96 15:24:55 Page 837 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01077/002 SETUP OBJECT OE G UNSP:SIGSETUP 5.0T3 1399 SETUP.OBJECT.OE.002 1 LINE 32767 11 PAGE UBC BALLARD UNSP JULY 03, 1981 21:05:11 5.0T9 255 UNSP:SIGSETUP 0 CONTAINS A "$CONTINUE WITH *LIBRARY" RECORD. 01077/003 SETUP GRAMMAR D S1153 UNSP VLO FSNAME=SIGSETUP.GRAMMER 5.0T3 1400 SETUP.GRAMMAR.D.003 1 LINE 100 3 PAGE UBC BALLARD UNSP SEP. 19, 1980 13:01:54 5.0T9 256 0 Referenced by comments of: 1077/1 01077/004 SETUP WRITEUP WF S1153 UNSP VLO FSNAME=SIGSETUP.F 5.0T3 1401 SETUP.WRITEUP.WF.004 1 LINE 99 5 PAGE UBC BALLARD UNSP AUG. 12, 1980 16:51:17 5.0T9 257 0 Requires COPY:JONMACLIBFMT (308/18). 01077/005 SETUP EXAMPLE D UNSP:SIGSETUP.EX 5.0T3 1402 SETUP.EXAMPLE.D.005 1 LINE 66 1 PAGE UM UNSP JULY 03, 1981 21:05:17 5.0T9 258 01078/001 *VSS MAIN SA O S1561 5.0T4 VLO FSNAME=VSS.MAIN.SA.011(1) 582 5.0T4 582 VSS.MAIN.SA.011 1 LINE 72 17 PAGE UD BELL YOUNG SEP. 10, 1980 10:41:51 5.0T11 156 0 + The following source decks are from UBC in Dec/79. 0 Referenced by comments of: 1078/2, 1078/3, 1078/4 01078/002C *VSS MAIN UC O S1405 W8UMC FSNAME=VSS.MAIN.UC.007(1) 5.1T3 187 VSS.MAIN.UC.002 1 LINE 79 9 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:01 0 Workshop 8 update, from UBC, to (1078/1). 0 Referenced by comments of: 1078/3 01078/003C *VSS MAIN UC O W116:V.MAI.UNE.UC 5.1T3 188 VSS.MAIN.UC.003 1 LINE 62 3 PAGE UD BELL YOUNG JULY 23, 1983 15:22:31 0 Unofficial version of Durham update to (1078/1). Apply after (1078/2). 0 Referenced by comments of: 1078/4 01078/004C *VSS MAIN UC O W116:V.MAI.UM.UC 5.1T3 189 VSS.MAIN.UC.004 1 LINE 73 4 PAGE UM YOUNG JULY 23, 1983 15:22:32 0 UM update to (1078/1). Apply after (1078/3). 01078/005 *VSS COMMANDS SA O S1561 5.0T4 VLO FSNAME=VSS.COMMANDS.SA.012(1) 583 5.0T4 583 VSS.COMMANDS.SA.012 1 LINE 77 46 PAGE UD BELL YOUNG SEP. 10, 1980 10:41:53 5.0T11 157 0 Referenced by comments of: 1078/6, 1078/7, 1078/8 1 SUN SEP 08/96 15:24:55 Page 838 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01078/006C *VSS COMMANDS UC O S1405 W8UMC FSNAME=VSS.CMDS.UC.004(1) 5.1T3 190 VSS.COMMANDS.UC.006 1 LINE 79 15 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:15:55 0 Workshop 8 update, from UBC, to (1078/5). 0 Referenced by comments of: 1078/7 01078/007C *VSS COMMANDS UC O W116:V.CMD.UNE.UC 5.1T3 191 VSS.COMMANDS.UC.007 1 LINE 72 8 PAGE UD BELL YOUNG JULY 23, 1983 15:22:34 0 Unofficial version of Durham update to (1078/5). Apply after (1078/6). 0 Referenced by comments of: 1078/8 01078/008C *VSS COMMANDS UC O W116:V.CMD.UM.UC 5.1T3 192 VSS.COMMANDS.UC.008 1 LINE 72 2 PAGE UM YOUNG JULY 23, 1983 15:22:35 0 UM update to (1078/5). Apply after (1078/7). 01078/009 *VSS SERV SA O S1561 5.0T4 VLO FSNAME=VSS.SERV.SA.013(1) 584 5.0T4 584 VSS.SERV.SA.013 1 LINE 72 47 PAGE UD BELL YOUNG SEP. 10, 1980 10:41:57 5.0T11 158 0 Referenced by comments of: 1078/10, 1078/11, 1078/13 01078/010C *VSS SERV UC O S1405 W8UMC FSNAME=VSS.SERV.UC.010(1) 5.1T3 193 VSS.SERV.UC.010 1 LINE 85 30 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:04 0 Workshop 8 update, from UBC, to (1078/9). 0 Referenced by comments of: 1078/11 01078/011C *VSS SERV UC O W116:V.SRV.UNE.UC 5.1T3 194 VSS.SERV.UC.011 1 LINE 72 4 PAGE UD BELL YOUNG JULY 23, 1983 15:22:38 0 Unofficial version of Durham update to (1078/9). Apply after (1078/10). 0 Referenced by comments of: 1078/12, 1078/13 01078/012C *VSS SERV UC O W116:V.SRV.UM.UC# 5.1T3 195 VSS.SERV.UC.012 1 LINE 53 1 PAGE UM YOUNG JULY 23, 1983 15:22:38 0 Fix to (1078/11). Apply with (1078/11). 01078/013C *VSS SERV UC O W116:V.SRV.UM.UC 5.1T3 196 VSS.SERV.UC.013 1 LINE 73 14 PAGE UM YOUNG JULY 23, 1983 15:22:38 0 UM update to (1078/9). Apply after (1078/11) and (1079/12). 1 SUN SEP 08/96 15:24:55 Page 839 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01078/014 *VSS SVCS SA O S1561 5.0T4 VLO FSNAME=VSS.SVCS.SA.014(1) 585 5.0T4 585 VSS.SVCS.SA.014 1 LINE 73 75 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:01 5.0T11 159 0 Referenced by comments of: 1078/15, 1078/16, 1078/17 01078/015C *VSS SVCS UC O S1405 W8UMC FSNAME=VSS.SVCS.UC.011(1) 5.1T3 197 VSS.SVCS.UC.015 1 LINE 82 43 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:07 0 Workshop 8 update, from UBC, to (1078/14). 0 Referenced by comments of: 1078/16 01078/016C *VSS SVCS UC O W116:V.SVC.UNE.UC 5.1T3 198 VSS.SVCS.UC.016 1 LINE 72 17 PAGE UD BELL YOUNG JULY 23, 1983 15:22:40 0 Unofficial version of Durham update to (1078/14). Apply after (1078/15). 0 Referenced by comments of: 1078/17 01078/017C *VSS SVCS UC O W116:V.SVC.UM.UC 5.1T3 199 VSS.SVCS.UC.017 1 LINE 80 17 PAGE UM YOUNG JULY 23, 1983 15:22:42 0 UM update to (1078/14). Apply after (1078/16). 01078/018 *VSS BDAM SA O S1561 5.0T4 VLO FSNAME=VSS.BDAM.SA.015(1) 586 5.0T4 586 VSS.BDAM.SA.015 1 LINE 71 9 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:07 5.0T11 160 0 Referenced by comments of: 1078/19 01078/019C *VSS BDAM UC O S1405 W8UMC FSNAME=VSS.BDAM.UC.002(1) 5.1T3 200 VSS.BDAM.UC.019 1 LINE 72 3 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:15:53 0 Workshop 8 update, from UBC, to (1078/18). 01078/020 *VSS QSAM SA O S1561 5.0T4 VLO FSNAME=VSS.QSAM.SA.016(1) 587 5.0T4 587 VSS.QSAM.SA.016 1 LINE 72 11 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:08 5.0T11 161 0 Referenced by comments of: 1078/21, 1078/22, 1078/24 01078/021C *VSS QSAM UC O S1405 W8UMC FSNAME=VSS.QSAM.UC.008(1) 5.1T3 201 VSS.QSAM.UC.021 1 LINE 75 11 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:02 0 Workshop 8 update, from UBC, to (1078/20). 0 Referenced by comments of: 1078/22 01078/022C *VSS QSAM UC O W116:V.QSM.UNE.UC 5.1T3 202 VSS.QSAM.UC.022 1 LINE 71 8 PAGE UD BELL YOUNG JULY 23, 1983 15:22:47 0 Unofficial version of Durham update to (1078/20). Apply after (1078/21). 1 SUN SEP 08/96 15:24:55 Page 840 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1078/23, 1078/24 01078/023C *VSS QSAM UC O W116:V.QSM.UM.UC# 5.1T3 203 VSS.QSAM.UC.023 1 LINE 56 1 PAGE UM YOUNG JULY 23, 1983 15:22:47 0 Fix to (1078/22). Apply with (1078/22). 0 Referenced by comments of: 1078/24 01078/024C *VSS QSAM UC O W116:V.QSM.UM.UC 5.1T3 204 VSS.QSAM.UC.024 1 LINE 72 3 PAGE UM YOUNG JULY 23, 1983 15:22:48 0 UM update to (1078/20). Apply after (1078/22) and (1078/23). 01078/025 *VSS BSAM SA O S1561 5.0T4 VLO FSNAME=VSS.BSAM.SA.017(1) 588 5.0T4 588 VSS.BSAM.SA.017 1 LINE 74 12 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:09 5.0T11 162 0 Referenced by comments of: 1078/26, 1078/27, 1078/28 01078/026C *VSS BSAM UC O S1405 W8UMC FSNAME=VSS.BSAM.UC.003(1) 5.1T3 205 VSS.BSAM.UC.026 1 LINE 76 10 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:15:54 0 Workshop 8 update, from UBC, to (1078/25). 0 Referenced by comments of: 1078/27 01078/027C *VSS BSAM UC O W116:V.BSM.UNE.UC 5.1T3 206 VSS.BSAM.UC.027 1 LINE 66 1 PAGE UD BELL YOUNG JULY 23, 1983 15:22:50 0 Unofficial version of Durham update to (1078/25). Apply after (1078/26). 0 Referenced by comments of: 1078/28 01078/028C *VSS BSAM UC O W116:V.BSM.UM.UC 5.1T3 207 VSS.BSAM.UC.028 1 LINE 66 1 PAGE UM YOUNG JULY 23, 1983 15:22:50 0 UM updates to (1078/25). Apply after (1078/27). 01078/029 *VSS RESIDENT ROUTI SA O S1561 5.0T4 VLO FSNAME=VSS.RESIDENT_ROUTI.SA.018(1) 589 5.0T4 589 VSS.RESIDENT_ROUTI.SA.018 1 LINE 68 4 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:10 5.0T11 163 0 Referenced by comments of: 1078/30, 1078/31 01078/030C *VSS RESIDENT ROUTI UC O S1405 W8UMC FSNAME=VSS.RESR.UC.009(1) 5.1T3 208 VSS.RESIDENT_ROUTI.UC.030 1 LINE 79 5 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:03 0 Workshop 8 updates, from UBC, to (1078/29). 0 Referenced by comments of: 1078/31 1 SUN SEP 08/96 15:24:55 Page 841 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01078/031C *VSS RESIDENT ROUTI UC O W116:V.RSR.UM.UC 5.1T3 209 VSS.RESIDENT_ROUTI.UC.031 1 LINE 68 1 PAGE UM YOUNG JULY 23, 1983 15:22:51 0 UM updates to (1078/29). Apply after (1078/30). 01078/032 *VSS KEYS SA O S1561 5.0T4 VLO FSNAME=VSS.KEYS.SA.019(1) 590 5.0T4 590 VSS.KEYS.SA.019 1 LINE 72 16 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:23 5.0T11 164 0 + Dec/79 source for VSS Keyed-file routines used by ISAM support. ASDFASDF 0 Referenced by comments of: 1078/33 01078/033C *VSS KEYS UC O S1405 W8UMC FSNAME=VSS.KEYS.UC.006(1) 5.1T3 210 VSS.KEYS.UC.033 1 LINE 83 8 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:15:59 0 Workshop 8 updates, from UBC, to (1078/32). 01078/034 *VSS ISAM SA O S1561 5.0T4 VLO FSNAME=VSS.ISAM.SA.020(1) 591 5.0T4 591 VSS.ISAM.SA.020 1 LINE 72 9 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:31 5.0T11 165 0 + (B)ISAM simulation - OPEN, READ/WRITE, SETL, ESETL. 0 Referenced by comments of: 1078/35 01078/035C *VSS ISAM UC O S1405 W8UMC FSNAME=VSS.ISAM.UC.005(1) 5.1T3 211 VSS.ISAM.UC.035 1 LINE 78 14 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:15:57 0 Workshop 8 updates, from UBC, to (1078/34). 01078/036 *VSS XCP SA O S1561 5.0T4 VLO FSNAME=VSS.XCP.SA.021(1) 592 5.0T4 592 VSS.XCP.SA.021 1 LINE 72 34 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:11 5.0T11 166 0 + Virtual channel. (May have changed component number since RD16.) + Same as that available at the Workshop. NOT the same as that + distributed by UBC in May/80 (Maybe someday...); + but distributed under this component since this version is the + one VSS still expects. 0 Referenced by comments of: 1078/38, 1078/44 01078/037 *VSS DISK SIM SA O S1561 5.0T4 VLO FSNAME=VSS.DISK_SIM.SA.022(1) 593 5.0T4 593 VSS.DISK_SIM.SA.022 1 LINE 80 58 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:14 5.0T11 167 0 + Disk file simulation routines. Same as that for UBC Virtual + Machine, circa Sep/79. NOT the same as that distributed for + the Virtual Machine in May/80. (Maybe someday..); + but this version is the one VSS still expects. 0 Referenced by comments of: 1078/39 1 SUN SEP 08/96 15:24:55 Page 842 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01078/038 *VSS VIRTUAL DISK R SA O S1561 5.0T4 VLO FSNAME=VSS.VIRTUAL_DISK_R.SA.023(1) 594 5.0T4 594 VSS.VIRTUAL_DISK_R.SA.023 1 LINE 72 14 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:24 5.0T11 168 0 + Virtual disk routines, suitable for connecting to the + virtual channel (1078/36). Same as that for the UBC Virtual + Machine, circa Sep/79. NOT the same as that distributed by + UBC for the Virtual Machine in May/80, but is the one + VSS still expects at this point. 01078/039 *VSS DFS MACROS SM O S1561 5.0T4 VLO FSNAME=VSS.DFS_MACROS.SM.024(1) 595 5.0T4 595 VSS.DFS_MACROS.SM.024 1 LINE 74 11 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:28 5.0T11 169 0 + Macros for Disk File Simulation routines (1078/37). + Same as that for the UBC Virtual Machine, circa Sep/79. + NOT the same as that distributed by UBC for the Virtual + Machine in May/80, but is the version VSS currently + expects (which is why this one appears under this component). 01078/040A *VSS MACROS SM O S1405 W8UMC FSNAME=VSS.LIBRARY.SA.023(1) 5.1T3 212 VSS.MACROS.SM.040 1 LINE 72 16 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:36 0 Workshop 8 version, from UBC, of the VSS macro library. 0 Referenced by comments of: 1078/41, 1078/42, 1078/43 01078/041A *VSS MACROS UC O S1405 W8UMC FSNAME=VSS.MAC.UC.012(1) 5.1T3 213 VSS.MACROS.UC.041 1 LINE 83 5 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:16:10 0 Workshop 8 updates, from UBC, to (1078/40). 0 Referenced by comments of: 1078/42 01078/042C *VSS MACROS UC O W116:V.MAC.UNE.UC 5.1T3 214 VSS.MACROS.UC.042 1 LINE 78 4 PAGE UD BELL YOUNG JULY 23, 1983 15:23:05 0 Unofficial version of Durham update to (1078/40). Apply after (1078/41). 0 Referenced by comments of: 1078/43 01078/043C *VSS MACROS UC O W116:V.MAC.UM.UC 5.1T3 215 VSS.MACROS.UC.043 1 LINE 71 3 PAGE UM YOUNG JULY 23, 1983 15:23:05 0 UM updates to (1078/40). Apply after (1078/42). 01078/044 *VSS XCP MACROS SM O S1561 5.0T4 VLO FSNAME=VSS.XCP_MACROS.SM.027(1) 598 5.0T4 598 VSS.XCP_MACROS.SM.027 1 LINE 68 10 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:32 5.0T11 172 0 + Macros for virtual channel (1078/36). Same as those for + the UBC Virtual Machine, circa Sep/79. + NOT the same as those distributed by UBC for the Virtual + Machine in May/80, but is the version that VSS still 1 SUN SEP 08/96 15:24:55 Page 843 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 + expects, so it is included under this component, rather than + (1051). 01078/045 *VSS VSMACROS SM O S1561 5.0T4 VLO FSNAME=VSS.VSMACROS.SM.028(1) 599 5.0T4 599 VSS.VSMACROS.SM.028 1 LINE 72 359 PAGE UD BELL YOUNG SEP. 10, 1980 10:42:33 5.0T11 173 0 + A more-or-less version of the OS public macros, taken + from CMS release 5.0 (I think). 01078/046 *VSS FAKE MSGCC SA O MTA:FAKEMSGCC(1,999) 5.0T4 608 VSS.FAKE_MSGCC.SA.037 1 LINE 59 1 PAGE UM MTA AUG. 10, 1981 00:15:08 5.0T11 182 0 Source (all 6 lines of it) for a fake version of MSGCC that calls MSG. This is required because all the stacks used by VSS (and it uses an impressive number of them) are only 2048 bytes long (which length is hand coded in various obscure dark corners of VSS) and this is too short to call MSGCC. 01078/047C *VSS UNITCB SA MTA:VSS.UNITCB 5.1T3 216 VSS.UNITCB.SA.047 1 LINE 68 2 PAGE UM MTA JULY 23, 1983 15:23:06 0 Source for a table used by one of the UNE changes to VSS. 01078/048A *VSS OBJECT OE O *VSS 5.1T3 217 VSS.OBJECT.OE.048 1 LINE 32767 44 PAGE UD BELL YOUNG JULY 23, 1983 15:23:06 *VSS 0 *VSS object, with SYM cards. 0 Referenced by comments of: 655/2, 823/74, 823/75, 823/78, 824/1, 862/2, 862/4, 862/6 01078/049A *VSS DRIVER PROGRAM SA O MTA:VSS.DRIVER 5.1T3 218 VSS.DRIVER_PROGRAM.SA.049 1 LINE 72 9 PAGE UM MTA JULY 23, 1983 15:23:07 0 Source for a driver program to call VSS to run various programs. Assemble with PAR=SYSPARM=pgm-name where "pgm-name" may be "EREP", "VSFTN", or "NASTRAN" to get a driver program appropriate to each of these programs. This program reads commands from a file whose name is selected depending on the value of SYSPARM and passes them to VSSCMD. In addition to the commands recognized by VSS it also recognizes two commands: DEFAULT UNIT=Fdname defaults MTS I/O unit "UNIT" to "FDname" LINK FDname (PAR=param) links to "FDname". This allows one to run MTS programs not in DAT mode. If no SYSPARM is given, it defaults to NASTRAN. The object for each version of this is with the appropriate component. 0 Referenced by comments of: 655/1, 824/1 1 SUN SEP 08/96 15:24:55 Page 844 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01078/050 *VSS CONVERT PDS SA O MTA:VSS.CNVTPDS(1,999) 5.0T4 611 VSS.CONVERT_PDS.SA.040 1 LINE 72 3 PAGE UM MTA AUG. 10, 1981 00:15:15 5.0T11 185 0 Program to convert an old format VSS PDS to the new format in which the directory is stored exactly like it would be in VS. Assign unit 0 to the line file containing the old format PDS. 01078/051 *VSS CONVERT PDS OC O MTA:VSS.CNVTPDS(1000) 5.0T4 612 VSS.CONVERT_PDS.OC.041 1 LINE 80 4 PAGE UM MTA AUG. 10, 1981 00:15:16 5.0T11 186 MTA:VSS.CNVTPDS 01078/052A *VSS COMPRESS PDS SA MTA:VSS.COMPRESS(1000) 5.1T3 219 VSS.COMPRESS_PDS.SA.052 1 LINE 72 3 PAGE UM MTA JULY 23, 1983 15:23:08 MTA:VSS.COMPRESS 0 Program to delete lines from a VSS PDS that are no longer referenced by the directory. 01078/053A *VSS COMPRESS PDS OC MTA:VSS.COMPRESS(1,999) 5.1T3 220 VSS.COMPRESS_PDS.OC.053 1 LINE 80 3 PAGE UM MTA JULY 23, 1983 15:23:09 01078/054A *VSS PDS BUILD SQ O S1405 W8UMC FSNAME=VSS.VSSPDSBUILD.SQ.027(1) 5.1T3 221 VSS.PDS_BUILD.SQ.054 1 LINE 71 9 PAGE UBC BOWLER YOUNG JULY 26, 1982 20:17:19 0 Comments from the source: Build a VSS partitioned data set. Input format is member-definition member-definition . . . (end-of-file) where "member-definition" is /MEMBER=member-name (first record of member) (second record of member) . . . /END-MEMBER (this is optional.) where "member-name" is an eight-or-fewer-character name. Additionally, the command /ALIAS=member-name may appear anywhere inside a member-definition. A L S O , the IBM IEBUPDTTE commands ./ ADD ...,MEMBER=member-name,... ./ ADD ...,NAME=member-name,... may be used instead of /MEMBER commands. Also, ./ ALIAS ...,MEMBER=member-name,... ./ ALIAS ...,NAME=member-name,... 1 SUN SEP 08/96 15:24:55 Page 845 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 may be used instead of /ALIAS. Also, /. ENDUP will be treated as an end-of-file on input. */ Probably reads SCARDS and writes 0 or SPUNCH? ********************************************************************* D5.1 version: This is the Workshop 8 version, from UBC, of VSSPDPBUILD. ********************************************************************** 0 Referenced by comments of: 251/3 01078/055A *VSS PDS BUILD OC O *VSSPDSBUILD 5.1T3 222 VSS.PDS_BUILD.OC.055 1 LINE 2178 6 PAGE UM YOUNG JULY 23, 1983 15:23:17 *VSSPDSBUILD 0 Referenced by comments of: 1078/56 01078/056C *VSS PDS BUILD WF O W116:VSSPDS.WRT.F 5.1T3 223 VSS.PDS_BUILD.WF.056 1 LINE 72 1 PAGE UBC BOWLER YOUNG JULY 23, 1983 15:23:18 0 Workshop 8 version, from UBC, of the writeup for *VSSPDSBUILD (1078/55). VSSPDSBUILD is also documented in CCMemo 449 (251/3). 0 Referenced by comments of: 1078/57 01078/057C *VSS PDS BUILD PF O W116:VSSPDS.WRT.C 5.1T3 224 VSS.PDS_BUILD.PF.057 1 LINE 69 1 PAGE UBC BOWLER YOUNG JULY 23, 1983 15:23:19 0 Printer-ready version of (1078/56). 01078/058 *VSS LOG FILE D O # ETC:VSSLOG UD BELL YOUNG ETC:VSSLOG@E 0 One line for each use of VSS. Don't let it fill up since VSS apparently dies when it is full. 01078/059C *VSS MEMO 448 WF O W116:VSS.WRIT.WF 5.1T3 225 VSS.MEMO_448.WF.059 1 LINE 108 26 PAGE UBC BOWLER YOUNG JULY 23, 1983 15:23:19 0 This is Computing Center Memo 448 -- "VSS: OS/VS Simulator." It is the Workshop 8 version, from UBC, of writeup describing *VSS. Does not include changes from UD or UM. 0 Referenced by comments of: 1078/60 1 SUN SEP 08/96 15:24:55 Page 846 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01078/060C *VSS MEMO 448 PF O W116:VSS.WRIT.PF 5.1T3 226 VSS.MEMO_448.PF.060 1 LINE 80 32 PAGE UBC YOUNG YOUNG JULY 23, 1983 15:23:20 MTA:VSS.WRITEUP 0 Printer-ready version of (1078/59). 01078/061A *VSS MVS LINKLIB O G ETC:SYS1.LINKLIB 5.1T3 227 VSS.MVS_LINKLIB.O.061 1 LINE 32767 1570 PAGE UM MTA JULY 23, 1983 15:23:21 ETC:SYS1.LINKLIB 0 This is a VSS PDS containing a copy of SYS1.LINKLIB from MVS. It contains many utility programs that can be run in VSS, although some particularly useful ones won't (e.g., AMBSPZAP). It was created from file 9 on tape M8ERES of the MVS 3.8E IPO distribution by *IEHMOVE. It contains all members of SYS1.LINKLIB. Also contains a member created from FOS.IERRCO00 plus MTS SORT that can be used like MVS SORT. 0 Referenced by comments of: 824/2, 862/6, 1078/62 01078/062C *VSS MVS SORT INTF SA G MTA:FOS.IERRCO00 5.1T3 228 VSS.MVS_SORT_INTF.SA.062 1 LINE 138 28 PAGE UM MTA JULY 23, 1983 15:24:35 0 Source for interface program to allow MTS SORT to be used in VSS. Object is in (1078/61) and also in (1078/63). ********************************************************************** D5.1 version: This program was inadvertantly included twice in D5.1. It is also (545/17) through (545/19). ********************************************************************** 0 Referenced by comments of: 545/17, 1078/63 01078/063C *VSS MVS SORT INTF O G MTA:VSS.SORT 5.1T3 229 VSS.MVS_SORT_INTF.O.063 1 LINE 72 9 PAGE UM MTA JULY 23, 1983 15:24:36 0 Object of (1078/62) ready to be fed into MTS link editor. 0 Referenced by comments of: 545/17, 1078/62 01079/001A VIRTUAL MACHINE - UBC OBJECT OC G TMTS:VMN 5.1T3 230 VIRTUAL_MACHINE_-_UBC.OBJ.OC.001 1 LINE 24927 62 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:36 TMTS:VMN 0 Virtual Machine program based on the Subtasking Monitor. This version derives from the UBC version of May 1981 from the Vancouver Workshop. This version of the virtual machine does not need to be run with PROT=OFF unless privileged services are being requested, such as the attachment of real devices to the virtual machine. This version uses the UMMPS virtual machine support for >1Mb virtual machines. 1 SUN SEP 08/96 15:24:55 Page 847 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 This virtual machine also requires the Virtual I/O component (1051) and almost needless to say, the Subtasking Monitor (1058) along with the Resource Manager CFM routines (1041/10). This file should have a pkey of TMTS:VMN. Contains $CONTINUE WITH lines for: Virtual I/O library (1051/1), DSP library (1041/1), big fake GETSPACE routine (1019/9), COPY:DEFS (579/10), and HELP:FSHELP (845/6). 01079/002A VIRTUAL MACHINE - UBC MAIN SA G TMTS:VM_MAIN(-10000,-1) 5.1T3 231 VIRTUAL_MACHINE_-_UBC.MAI.SA.002 1 LINE 79 18 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:38 0 Initialization and main subtask. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). 01079/003A VIRTUAL MACHINE - UBC MAIN UC G TMTS:VM_MAIN(1000) 5.1T3 232 VIRTUAL_MACHINE_-_UBC.MAI.UC.003 1 LINE 77 5 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:40 0 Update deck to be applied to the previously distributed source to yield the current source. 01079/004A VIRTUAL MACHINE - UBC CMND SA O TMTS:VM_CMND(-10000,-1) 5.1T3 233 VIRTUAL_MACHINE_-_UBC.CMN.SA.004 1 LINE 79 50 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:40 0 Command reader and processing routines. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). 01079/005A VIRTUAL MACHINE - UBC CMND UC O TMTS:VM_CMND(1000) 5.1T3 234 VIRTUAL_MACHINE_-_UBC.CMN.UC.005 1 LINE 73 14 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:44 0 Update deck to be applied to the previously distributed source to yield the current source. ******************************************************************* D5.0C version: Uses Full Screen Help facilities (component 845) for its HELP command. ******************************************************************* ******************************************************************* D5.1 version: - Fixes TRACE command bugs. - Adds 3805 device type. - Fixes Full Screen Help bugs. ******************************************************************* 01079/006A VIRTUAL MACHINE - UBC PRIV SA G TMTS:VM_PRIV(-10000,-1) 5.1T3 235 VIRTUAL_MACHINE_-_UBC.PRI.SA.006 1 LINE 80 21 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:45 0 Privileged instruction simulation. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). 1 SUN SEP 08/96 15:24:55 Page 848 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01079/007A VIRTUAL MACHINE - UBC PRIV UC G TMTS:VM_PRIV(1000) 5.1T3 236 VIRTUAL_MACHINE_-_UBC.PRI.UC.007 1 LINE 72 29 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:47 0 Update deck to be applied to the previously distributed source to yield the current source. ********************************************************************** D5.1 version: - Fixes bug in TCH trace output. - Fixes bug in TIO trace output. ********************************************************************** 01079/008A VIRTUAL MACHINE - UBC SERV SA O TMTS:VM_SERV(-10000,-1) 5.1T3 237 VIRTUAL_MACHINE_-_UBC.SER.SA.008 1 LINE 79 25 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:48 0 Service subroutines. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). 01079/009A VIRTUAL MACHINE - UBC SERV UC O TMTS:VM_SERV(1000) 5.1T3 238 VIRTUAL_MACHINE_-_UBC.SER.UC.009 1 LINE 72 6 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:50 0 Update deck to be applied to the previously distributed source to yield the current source. ********************************************************************* D5.1 version: - Fix TRACE command bugs. ********************************************************************* 01079/010A VIRTUAL MACHINE - UBC SUBT SA O TMTS:VM_SUBT(-10000,-1) 5.1T3 239 VIRTUAL_MACHINE_-_UBC.SUB.SA.010 1 LINE 79 10 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:50 0 Subtasks for timers and I/O devices. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). ********************************************************************* D5.1 version: - Fix bug in UC processing on real devices. ********************************************************************** 01079/011A VIRTUAL MACHINE - UBC SUBT UC O TMTS:VM_SUBT(1000) 5.1T3 240 VIRTUAL_MACHINE_-_UBC.SUB.UC.011 1 LINE 68 2 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:51 0 Update deck to be applied to the previously distributed source to yield the current source. 01079/012A VIRTUAL MACHINE - UBC VDEV SA O TMTS:VM_VDEV(-10000,-1) 5.1T3 241 VIRTUAL_MACHINE_-_UBC.VDE.SA.012 1 LINE 79 6 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:51 0 Virtual device device-dependent interface. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). 1 SUN SEP 08/96 15:24:55 Page 849 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 ********************************************************************** D5.1 version: - Fix bug in CCW tracing. ********************************************************************** 0 Referenced by comments of: 1078/13 01079/013A VIRTUAL MACHINE - UBC VDEV UC O TMTS:VM_VDEV(1000) 5.1T3 242 VIRTUAL_MACHINE_-_UBC.VDE.UC.013 1 LINE 68 3 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:52 0 Update deck to be applied to the previously distributed source to yield the current source. 01079/014A VIRTUAL MACHINE - UBC VM370SIM SA O TMTS:VM_VM370SIM(-10000,-1) 5.1T3 243 VIRTUAL_MACHINE_-_UBC.VM3.SA.014 1 LINE 79 10 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:52 0 Diagnose instruction simulation routine for simulating a pseudo-VM/370 environment. Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), and COPY:MNTR.MACROS (1058/30). 01079/015A VIRTUAL MACHINE - UBC VM370SIM UC O TMTS:VM_VM370SIM(1000) 5.1T3 244 VIRTUAL_MACHINE_-_UBC.VM3.UC.015 1 LINE 72 4 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:54 0 Update deck to be applied to the previously distributed source to yield the current source. 01079/016A VIRTUAL MACHINE - UBC MODL SA G TMTS:VM_MODL(-10000,-1) 5.1T3 245 VIRTUAL_MACHINE_-_UBC.MOD.SA.016 1 LINE 72 4 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:54 0 Virtual machine model-dependent routines. This assembly is intended to contain the virtual machine routines that are model-dependent, specifically, the routines that do machine check logouts and simulation of non-VM/370 diagnose instructions. Assemble with the UBC Virtual Machine macros (1079/22) and OLD:CC.MACROS (1054/4). 01079/017A VIRTUAL MACHINE - UBC MODL UC G TMTS:VM_MODL(1000) 5.1T3 246 VIRTUAL_MACHINE_-_UBC.MOD.UC.017 1 LINE 74 1 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:55 0 Update deck to be applied to the previously distributed source to yield the current source. 01079/018A VIRTUAL MACHINE - UBC GETD SA O TMTS:VM_GETD(-10000,-1) 5.1T3 247 VIRTUAL_MACHINE_-_UBC.GET.SA.018 1 LINE 77 4 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:55 0 This is a special routine called by the virtual machine when attaching a disk. Its function is to determine if the disk belongs to the MTS file system. Copies COPY:GLOBALS (1026/3) and COPY:LLMPSEQU (087). Assemble with the UBC Virtual Machine macros (1079/22), OLD:CC.MACROS (1054/4), COPY:MNTR.MACROS (1058/30), COPY:FILE.MACROS (482/45), and COPY:UC.MACROS (787/1). 1 SUN SEP 08/96 15:24:55 Page 850 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01079/019A VIRTUAL MACHINE - UBC GETD UC O TMTS:VM_GETD(1000) 5.1T3 248 VIRTUAL_MACHINE_-_UBC.GET.UC.019 1 LINE 68 2 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:55 0 Update deck to be applied to the previously distributed source to yield the current source. 01079/020A VIRTUAL MACHINE - UBC MACLIB SA G TMTS:VM_MACBASE(-10000,-1) 5.1T3 249 VIRTUAL_MACHINE_-_UBC.MAC.SA.020 1 LINE 80 12 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:56 0 Base source for virtual machine macro library. 01079/021A VIRTUAL MACHINE - UBC MACLIB UC G TMTS:VM_MACBASE(1000) 5.1T3 250 VIRTUAL_MACHINE_-_UBC.MAC.UC.021 1 LINE 70 6 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:57 0 Update deck to be applied to the previously distributed source to yield the current source. After being made into a macro library by *MACUTIL (738), this becomes (1079/22). 01079/022A VIRTUAL MACHINE - UBC MACLIB SM G TMTS:VM_MACROS 5.1T3 251 VIRTUAL_MACHINE_-_UBC.MAC.SM.022 1 LINE 72 16 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:57 0 UBC Virtual Machine macros. 0 Referenced by comments of: 1051/7, 1051/9, 1051/11, 1051/13, 1051/15, 1051/17, 1051/19, 1051/23, 1051/25, 1051/29, 1051/31, 1051/37, 1079/2, 1079/4, 1079/6, 1079/8, 1079/10, 1079/12, 1079/14, 1079/16, 1079/18, 1079/21 01079/023A VIRTUAL MACHINE - UBC WRITEUP WF TMTS:VM_WRITEUP(10000) 5.1T3 252 VIRTUAL_MACHINE_-_UBC.WRI.WF.023 1 LINE 86 19 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:24:58 0 *FORMAT (308) source for the UBC Virtual Machine writeup. 0 Referenced by comments of: 1051/37, 1079/24 01079/024A VIRTUAL MACHINE - UBC WRITEUP PF G TMTS:VM_WRITEUP(1,9999) 5.1T3 253 VIRTUAL_MACHINE_-_UBC.WRI.PF.024 1 LINE 71 27 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:25:00 0 $COPYable writeup produced by running *FORMAT (308) on (1079/23). 01079/025A VIRTUAL MACHINE - UBC HELP FILE D G ETC:VM_HELP 1416 5.1T3 254 VIRTUAL_MACHINE_-_UBC.HEL.D.025 1 LINE 127 10 PAGE UBC BOWLER HELFFRICH JULY 23, 1983 15:25:01 ETC:VM_HELP 0 Help file accessed by virtual machine HELP command. Must be permitted READ to PKEY=TMTS:VMN. ******************************************************************** D5.0C version: New help file format for Full Screen Help (component 845). ******************************************************************** 1 SUN SEP 08/96 15:24:55 Page 851 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01080/001 UBC LALR WRITEUP WF S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_WRITEUP.WF.083(1) 1287 5.0T3 1287 PLUS_470.LALR_WRITEUP.WF.083 1 LINE 66 3 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:05 5.0T9 143 0 LALR (1080/1) - (1080/20), a program similar to *LALRGEN (745), produces syntax tables, and some auxiliary PLUS declarations from a BNF grammar. The grammar must be LALR(1). It is the only LALR(1) grammar UBC knows of that will correctly process the PLUS grammar (1042/53). UBC hopes to rewrite the lookahead algorithm sometime to use the efficient calculation described in SIGPLAN Symposium on Compiler Construction, SIGPLAN Notices, Vol. 14, number 8. This subcomponent contains FMT source for brief notes describing input and output from LALR. It assumes the reader is familiar with similar programs. Uses COPY:JONMACLIBFMT (308/18). 0 Referenced by comments of: 1042/22, 1042/53, 1042/54, 1042/55, 1042/67, 1080/1 01080/002 UBC LALR WRITEUP PF S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_WRITEUP.PF.084(1) 1288 5.0T3 1288 PLUS_470.LALR_WRITEUP.PF.084 1 LINE 69 3 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:13 5.0T9 144 0 $COPYable writeup for LALR (5 pages) 01080/003A UBC LALR DECLAR SQ O S1644 5.0BT1 VLO FSNAME=UBC_LALR.DECLAR.SQ.003(1) 1043 5.1T3 255 UBC_LALR.DECLAR.SQ.003 1 LINE 68 1 PAGE UBC WHALEY BURLING JULY 26, 1982 20:18:00 0 PLUS source library containing the definition of the parser tables. 0 Referenced by comments of: 1042/50, 1080/19 01080/004 UBC LALR SOURCE S O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SOURCE.S.086(1) 1290 5.0T3 1290 PLUS_470.LALR_SOURCE.S.086 1 LINE 35 1 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:20 5.0T9 146 0 Components (1080/5) to (1080/14) are PLUS source for the LALR analyzer. This file contains just a series of $CONTINUE WITH's specifying all the files constituting the analyzer. The pieces of the analyzer may be compiled independently or all concatenated together and compiled at once. Compiling any of the pieces requires several PLUS source libraries. Component (1080/19) $CONTINUES WITH all the required libraries. 01080/005 UBC LALR MAIN SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_MAIN.SQ.087(1) 1291 5.0T3 1291 PLUS_470.LALR_MAIN.SQ.087 1 LINE 68 4 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:26 5.0T9 147 0 LALR main program and initialization and some auxiliary procedures. 1 SUN SEP 08/96 15:24:55 Page 852 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 1080/4, 1080/17 01080/006 UBC LALR INPUT SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_INPUT.SQ.088(1) 1292 5.0T3 1292 PLUS_470.LALR_INPUT.SQ.088 1 LINE 68 4 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:36 5.0T9 148 0 Input reading and scanning components. 01080/007 UBC LALR PARSER SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_PARSER.SQ.089(1) 1293 5.0T3 1293 PLUS_470.LALR_PARSER.SQ.089 1 LINE 68 4 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:48 5.0T9 149 0 LALR analyzer input parser. This file contains the procedures to parse and recover from syntax errors in the input to LALR. It serves as an example of the structure of the parser required by the tables generated by LALR. The PLUS compiler has its own version (1042/22). 01080/008 UBC LALR PRINT SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_PRINT.SQ.090(1) 1294 5.0T3 1294 PLUS_470.LALR_PRINT.SQ.090 1 LINE 68 6 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:51 5.0T9 150 0 This component produces listing of the grammar, and other printed output produced by LALR. 01080/009 UBC LALR LR0 SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_LR0.SQ.091(1) 1295 5.0T3 1295 PLUS_470.LALR_LR0.SQ.091 1 LINE 68 5 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:55 5.0T9 151 0 Procedures to produce the LR(0) machine from the grammar. 01080/010 UBC LALR SLR1 SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SLR1.SQ.092(1) 1296 5.0T3 1296 PLUS_470.LALR_SLR1.SQ.092 1 LINE 68 3 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:09:58 5.0T9 152 0 Procedures to try SLR(1) lookahead. 01080/011 UBC LALR LALR1 SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_LALR1.SQ.093(1) 1297 5.0T3 1297 PLUS_470.LALR_LALR1.SQ.093 1 LINE 68 8 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:01 5.0T9 153 0 Procedures to try LALR(1) lookahead. 01080/012 UBC LALR MATRX GEN SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_MATRX_GEN.SQ.094(1) 1298 5.0T3 1298 PLUS_470.LALR_MATRX_GEN.SQ.094 1 LINE 68 7 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:15 5.0T9 154 0 LALR generates tables which represent the parser in a matrix form (intended to improve parser speed at some 1 SUN SEP 08/96 15:24:55 Page 853 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 cost in space). These procedures compute the matrix representation. 01080/013 UBC LALR PUNCH SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_PUNCH.SQ.095(1) 1299 5.0T3 1299 PLUS_470.LALR_PUNCH.SQ.095 1 LINE 68 7 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:18 5.0T9 155 0 Routines to generate object module from the matrix representation. The routines in component (1042/69) are used. 01080/014 UBC LALR MEMBER SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_MEMBER.SQ.096(1) 1300 5.0T3 1300 PLUS_470.LALR_MEMBER.SQ.096 1 LINE 67 2 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:22 5.0T9 156 0 These routines generate an output PLUS library containing declarations for use when writing programs to use the parser tables. 0 Referenced by comments of: 1080/4, 1080/17 01080/015 UBC LALR GRAMMAR S O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_GRAMMAR.S.097(1) 1301 5.0T3 1301 PLUS_470.LALR_GRAMMAR.S.097 1 LINE 56 1 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:25 5.0T9 157 0 Simple grammar in the form required by LALR defining the input to LALR. 0 Referenced by comments of: 1080/16, 1080/17, 1080/18 01080/016 UBC LALR GRAMMAR OC O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_GRAMMAR.OC.098(1) 1302 5.0T3 1302 PLUS_470.LALR_GRAMMAR.OC.098 1 LINE 136 1 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:28 5.0T9 158 0 Syntax tables generated by LALR for the grammar in (1080/15). This object deck is part of LALR. 01080/017 UBC LALR OBJECT OE O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_OBJECT.OE.099(1) 1303 5.0T3 1303 PLUS_470.LALR_OBJECT.OE.099 1 LINE 32767 17 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:08:54 5.0T9 159 0 This is the complete, linkeditted object for the UBC LALR analyzer. The complete program consists of: object from (1080/5) through (1080/14) object generated by LALR from grammar (1080/15) object module routines (1042/69) (INCLUDE@SLI) NEW:PLUS.OBJLIB (1042/56) (INCLUDE@SLI) 1 SUN SEP 08/96 15:24:55 Page 854 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01080/018 UBC LALR DECLS SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_DECLS.SQ.100(1) 1304 5.0T3 1304 PLUS_470.LALR_DECLS.SQ.100 1 LINE 71 1 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:31 5.0T9 160 0 PLUS source library generated by LALR from the grammar in (1080/15). 0 Referenced by comments of: 1080/19 01080/019 UBC LALR SOU LIB SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SOU_LIB.SQ.101(1) 1305 5.0T3 1305 PLUS_470.LALR_SOU_LIB.SQ.101 1 LINE 39 1 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:34 5.0T9 161 0 This file just contains $CONTINUE WITH's for the set of libraries required to compile any of the files constituting the analyzer. These are: LALR*SL (1080/20) LALRDECL*SL (1080/18) PLUS:LALRPARSE*SL (1080/3) PLUS:OBJRTNS*SL (1042/68) PLUS:SOURCELIB (1042/5) 0 Referenced by comments of: 1080/4 01080/020 UBC LALR SOU LIB SQ O S1560 5.0T3 VLO FSNAME=PLUS_470.LALR_SOU_LIB.SQ.102(1) 1306 5.0T3 1306 PLUS_470.LALR_SOU_LIB.SQ.102 1 LINE 68 7 PAGE UBC WHALEY BURLING SEP. 27, 1979 22:10:38 5.0T9 162 0 PLUS source library containing declarations required by more than one of the files constituting LALR. 0 Referenced by comments of: 1080/1, 1080/19 01081/001 INTERTASK SA G S1561 5.0T4 VLO FSNAME=INTERTASK..SA.001(1) 617 5.0T4 617 INTERTASK..SA.001 1 LINE 80 76 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:16:48 5.0T11 191 0 SUBROUTINE CALLED BY UMMPS (045/1) TO HANDLE THE INTERTASK SVC. COPIES LLMPSEQU (087), COPY:GLOBALS (1026/3), COPY:IT.DSECTS (1081/4), COPY:PSA (162), AND COPY:IT.COPY_SECT (1081/5). ASSEMBLE WITH COPY:UMMPS.MACROS (045/14) AND COPY:IT.MACROS (1081/6) AND COPY:SETPARM (653). 0 Referenced by comments of: 400/15, 769/13, 769/22, 1081/5 01081/002A INTERTASK UC G MTA:IT.U 5.1T3 256 INTERTASK..UC.002 1 LINE 87 2 PAGE UBC O'REILLY MTA JULY 23, 1983 15:25:17 0 Update to D5.0 version to produce current version. 01081/003A INTERTASK OC G # (PART OF RESIDENT SYSTEM) UBC O'REILLY MTA 0 Object part of Resident System (468). 1 SUN SEP 08/96 15:24:55 Page 855 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01081/004 INTERTASK COPY SECTION 1 SA G COPY:IT.DSECTS 5.0T4 619 INTERTASK.COPY_SECTION_1.SA.004 1 LINE 72 7 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:16:51 5.0T11 193 COPY:IT.DSECTS 0 THIS IS A COPY SECTION THAT SHOULD BE COPIED BY ANY ASSEMBLER PROGRAM THAT USES INTERTASK. IT CONTAINS EQUATES FOR THE VARIOUS INTERTASK OPERATION CODES AND FLAGS, AND ALSO CONTAINS A VARIETY OF DSECTS INTENDED TO BE USED WITH THE SEND, SET EXIT, LIST, AND SENSE OPERATIONS. THE INTERTASK MACROS (1081/6) REQUIRE THE EQUATES IN THIS COPY SECTION. 0 Referenced by comments of: 388/1, 636/1, 769/22, 829/1, 1051/31, 1051/37, 1081/1, 1081/9, 1081/12, 1081/13, 1081/14, 1081/15, 1081/16, 1081/22, 1081/24, 1081/26 01081/005A INTERTASK COPY SECTION 2 SM G COPY:IT.COPY_SECT 5.1T3 257 INTERTASK.COPY_SECTION_2.SM.005 1 LINE 71 7 PAGE UBC O'REILLY MTA JULY 23, 1983 15:25:18 COPY:IT.COPY_SECT 0 THIS IS A COPY SECTION THAT IS COPIED ONLY BY THE INTERTASK SUBROUTINE (1081/1) AND PRINTDUMP ITDUMP SUBR (400/15). IT DEFINES DATA STRUCTURES INTERNAL TO INTERTASK. 0 Referenced by comments of: 400/15, 1081/1 01081/006 INTERTASK MACROS SA G COPY:IT.MACROS 5.0T4 621 INTERTASK.MACROS.SA.006 1 LINE 72 19 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:16:54 5.0T11 195 COPY:IT.MACROS 0 MACROS TO CALL INTERTASK SVC. 0 Referenced by comments of: 636/1, 769/22, 1051/31, 1051/37, 1081/1, 1081/4, 1081/13, 1081/14, 1081/15, 1081/16 01081/007 INTERTASK WRITEUP WF S1561 5.0T4 VLO FSNAME=INTERTASK.WRITEUP.WF.007(1) 622 5.0T4 622 INTERTASK.WRITEUP.WF.007 1 LINE 96 19 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:42:24 5.0T11 196 0 A WRITEUP DESCRIBING HOW TO USE INTERTASK. 0 Referenced by comments of: 1081/8 01081/008 INTERTASK WRITEUP PF S1561 5.0T4 VLO FSNAME=INTERTASK.WRITEUP.PF.008(1) 623 5.0T4 623 INTERTASK.WRITEUP.PF.008 1 LINE 71 22 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:42:32 5.0T11 197 0 PRINT FILE FOR (1081/7). 01081/009 INTERTASK JOB PROGRAM SA G S1561 5.0T4 VLO FSNAME=INTERTASK.JOB_PROGRAM.SA.009(1) 624 5.0T4 624 INTERTASK.JOB_PROGRAM.SA.009 1 LINE 76 11 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:22:06 5.0T11 198 0 THIS IS THE SOURCE CODE FOR THE INTERTASK JOB PROGRAM. THE JOB PROGRAM DOES NOT PROCESS JOB PARAMETERS, BUT RATHER READS COMMANDS DIRECTLY FROM THE CONSOLE. CURRENTLY, THERE ARE ONLY 2 COMMANDS: LIST AND SENSE. 1 SUN SEP 08/96 15:24:55 Page 856 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 LIST FUNCTION: TO OBTAIN A LIST OF THE NAMES OF ALL NETWORKS IN EXISTENCE. THE LIST COMMAND DOES NOT TAKE PARAMETERS. SENSE NET-NAME FUNCTION: TO SENSE A PARTICULAR NETWORK. THE NETWORK NAME MUST BE SPECIFIED. A SUMMARY OF THE INFORMATION IN THE NETWORK CONTROL BLOCK AND ONE LINE OF INFORMATION PER NODE IS PRINTED. THE INFORMATION IN THE SUMMARY IS SELF-EXPLANATORY. THE INFORMATION IN THE NODE DESCRIPTORS IS LARGELY SELF-EXPLANATORY EXCEPT, PERHAPS, FOR THE INFORMATION APPEARING UNDER THE COLUMN HEADING "STATUS". THIS INFORMATION APPEARS AS A SERIES OF LETTERS; THE LETTERS SHOULD BE INTERPRETED AS FOLLOWS: D -> MEANS NODE HAS BEEN DELETED X -> MEANS NODE HAS AN EXIT SET S -> MEANS EXIT IS SYNCHRONOUS Q -> MEANS NODE HAS A NONEMPTY QUEUE OF MSGS, RECEIPTS, AND NOTIFICATIONS B -> MEANS NODE HAS BEEN BLASTED THE OPTIONAL MODIFIERS ARE: NOHEADER -> TO SUPPRESS THE PRINTING OF THE SUMMARY OF THE INFORMATION FROM THE NETWORK CONTROL BLOCK NONODES -> TO SUPPRESS THE PRINTING OF THE INDIVIDUAL NODE DESCRIPTORS NOTE THAT THIS PROGRAM IS ALSO RUNNABLE DIRECTLY AS A NORMAL MTS PROGRAM. REQUIRES COPY:IT.DSECTS (1081/4). 01081/010 INTERTASK JOB PROGRAM OC G # (PART OF RESIDENT SYSTEM) UBC O'REILLY MTA 0 Object part of Resident System (468). 01081/011 INTERTASK JOB PROGRAM OC G MTS:IT 5.0T4 625 INTERTASK.JOB_PROGRAM.OC.011 1 LINE 24 1 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:22:08 5.0T11 199 MTS:IT 0 Contains loader control cards to run the IT job program with an MTS RUN command. 1 SUN SEP 08/96 15:24:55 Page 857 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01081/012 INTERTASK ITX SA G S1561 5.0T4 VLO FSNAME=INTERTASK.ITX.SA.012(1) 626 5.0T4 626 INTERTASK.ITX.SA.012 1 LINE 69 13 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:29 5.0T11 200 0 THIS IS THE SOURCE CODE FOR THE INTERTASK EXERCISER MONITOR. THE INTERTASK EXERCISER IS A FACILITY FOR STARTING UP AN ARBITRARY NUMBER OF REAL TASKS WHICH USE THE INTERTASK FACILITY. WHAT NETWORKS ARE CREATED AND WHICH INTERTASK OPERATIONS ARE USED IS DEFINED BY THE SET OF REPERTOIRE ROUTINES WHICH ARE LOADED ALONG WITH THE INTERTASK EXERCISER MONITOR. THE PURPOSE OF THE MONITOR IS TO DETERMINE WHICH REPERTOIRE ROUTINES ARE LOADED, AND TO CONTROL THEIR EXECUTION (WHICH MAY BE OVERLAPPED IF REPERTOIRE ROUTINES CHOOSE TO DO THINGS ASYNCHRONOUSLY). IN ESSENCE, THE MONITOR IS A REPERTOIRE ROUTINE DISPATCHER. THE MONITOR IS COMMAND DRIVEN. THERE ARE CURRENTLY 3 COMMANDS: MTS, STOP, AND EXECUTE. FOR A DESCRIPTION OF THESE COMMANDS, REFER TO THE SOURCE LISTING. REQUIRES THE MSG MACROS IN *SYSMAC, COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4). 0 Referenced by comments of: 1081/17, 1081/20 01081/013 INTERTASK ITX #001 SA G S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#001.SA.013(1) 627 5.0T4 627 INTERTASK.ITX_#001.SA.013 1 LINE 80 9 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:41 5.0T11 201 0 THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #001. THIS ROUTINE ONLY USES SYNCHRONOUS INTERTASK OPERATIONS. REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6), COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4). 01081/014 INTERTASK ITX #002 SA G S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#002.SA.014(1) 628 5.0T4 628 INTERTASK.ITX_#002.SA.014 1 LINE 80 9 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:45 5.0T11 202 0 THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #002. THIS ROUTINE ONLY USES ASYNCHRONOUS INTERTASK OPERATIONS. REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6), COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4). 01081/015 INTERTASK ITX #003 SA G S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#003.SA.015(1) 629 5.0T4 629 INTERTASK.ITX_#003.SA.015 1 LINE 80 10 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:52 5.0T11 203 0 THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #003. THIS ROUTINE ONLY USES ASYNCHRONOUS INTERTASK OPERATIONS AND USES RANDOM MESSAGE 1 SUN SEP 08/96 15:24:55 Page 858 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 LENGTHS AND EXIT BUFFER LENGTHS. REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6), COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4). 01081/016 INTERTASK ITX #004 SA G S1561 5.0T4 VLO FSNAME=INTERTASK.ITX_#004.SA.016(1) 630 5.0T4 630 INTERTASK.ITX_#004.SA.016 1 LINE 80 11 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:56 5.0T11 204 0 THIS IS THE SOURCE CODE FOR THE REPERTOIRE ROUTINE #004. THIS ROUTINE ONLY USES ASYNCHRONOUS INTERTASK OPERATIONS, USES RANDOM MESSAGE LENGTHS AND EXIT BUFFER LENGTHS, AND EXERCISES A FEW OF THE OTHER MORE OBSCURE INTERTASK OPERATIONS LIKE CANCEL MESSAGE, CANCEL EXIT, AND CHANGE NODE ACCESS. REQUIRES THE MSG MACROS IN *SYSMAC, COPY:IT.MACROS (1081/6), COPY:GLOBALS (1026/3), AND COPY:IT.DSECTS (1081/4). 0 Referenced by comments of: 1081/17 01081/017 INTERTASK ITX OC G SYS:ITX 5.0T4 631 INTERTASK.ITX.OC.017 1 LINE 80 17 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:22:14 5.0T11 205 SYS:ITX 0 OBJECT FOR (1081/12) THROUGH (1081/16) AND (1081/21). NOTE: THIS ALL CAME FROM UBC55 AND THE SOURCE AND OBJECT DO NOT AGREE, BUT THIS FILE WORKS. CONTAINS REP CARDS. 01081/018 INTERTASK ITX C *ITX 5.0T4 632 INTERTASK.ITX.C.018 1 LINE 24 1 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:22:15 5.0T11 206 *ITX 0 COMMAND FILE TO START 5 TASKS RUNNING ITX FOR 5000 CALLS TO EACH #NNN ROUTINE. USES SYS:ITXCMD (1081/19). 01081/019 INTERTASK ITX C SYS:ITXCMD 5.0T4 633 INTERTASK.ITX.C.019 1 LINE 44 1 PAGE UBC O'REILLY MTA AUG. 10, 1981 00:22:16 5.0T11 207 SYS:ITXCMD 0 Referenced by comments of: 1081/18 01081/020 INTERTASK GETMSG SA G S1561 5.0T4 VLO FSNAME=INTERTASK.GETMSG.SA.020(1) 634 5.0T4 634 INTERTASK.GETMSG.SA.020 1 LINE 68 4 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:14 5.0T11 208 0 THIS IS THE SOURCE CODE FOR A UTILITY PROGRAM WHICH WILL RETURN AN ERROR MESSAGE GIVEN GR0 AND GR1 FROM AN INTERTASK OPERATION. THE CODE IS REENTRANT AND IS INTENDED SOME DAY TO BE PART OF THE RESIDENT SYSTEM. SEE THE SOURCE LISTING FOR DETAILS. CURRENTLY, IT IS USED BY INTERTASK ITX (1081/12). 1 SUN SEP 08/96 15:24:55 Page 859 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01081/021 INTERTASK GETMSG OC G S1561 5.0T4 VLO FSNAME=INTERTASK.GETMSG.OC.021(1) 635 5.0T4 635 INTERTASK.GETMSG.OC.021 1 LINE 80 3 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:15 5.0T11 209 0 Referenced by comments of: 1081/17 01081/022 INTERTASK XITPTR SA G S1561 5.0T4 VLO FSNAME=INTERTASK.XITPTR.SA.022(1) 636 5.0T4 636 INTERTASK.XITPTR.SA.022 1 LINE 71 4 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:17 5.0T11 210 0 THIS IS THE SOURCE CODE FOR A UTILITY WHICH WILL PRINT THE CONTENTS OF AN EXIT BUFFER IN A READABLE FORMAT. THIS PROGRAM IS INTENDED TO BE USED FOR DEBUGGING PROGRAMS THAT USE INTERTASK. COPIES COPY:IT.DSECTS (1081/4). ASSEMBLE USING THE MSG MACROS IN *SYSMAC. 01081/023 INTERTASK XITPTR OC G S1561 5.0T4 VLO FSNAME=INTERTASK.XITPTR.OC.023(1) 637 5.0T4 637 INTERTASK.XITPTR.OC.023 1 LINE 80 3 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:19 5.0T11 211 01081/024 INTERTASK SNSPTR SA G S1561 5.0T4 VLO FSNAME=INTERTASK.SNSPTR.SA.024(1) 638 5.0T4 638 INTERTASK.SNSPTR.SA.024 1 LINE 68 3 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:21 5.0T11 212 0 THIS IS THE SOURCE CODE FOR A UTILITY WHICH WILL PRINT THE CONTENTS OF A BUFFER AS RETURNED BY AN INTERTASK SENSE OPERATION IN A READABLE FORMAT. THIS PROGRAM IS INTENDED TO BE USED FOR DEBUGGING PROGRAMS THAT USE INTERTASK. COPIES COPY:IT.DSECTS (1081/4). ASSEMBLE USING THE MSG MACROS IN *SYSMAC. 01081/025 INTERTASK SNSPTR OC G S1561 5.0T4 VLO FSNAME=INTERTASK.SNSPTR.OC.025(1) 639 5.0T4 639 INTERTASK.SNSPTR.OC.025 1 LINE 80 3 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:23 5.0T11 213 01081/026 INTERTASK LSTPTR SA G S1561 5.0T4 VLO FSNAME=INTERTASK.LSTPTR.SA.026(1) 640 5.0T4 640 INTERTASK.LSTPTR.SA.026 1 LINE 68 2 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:25 5.0T11 214 0 THIS IS THE SOURCE CODE FOR A UTILITY WHICH WILL PRINT THE CONTENTS OF A BUFFER AS RETURNED BY AN INTERTASK LIST OPERATION IN A READABLE FORMAT. THIS PROGRAM IS INTENDED TO BE USED FOR DEBUGGING PROGRAMS THAT USE INTERTASK. COPIES COPY:IT.DSECTS (1081/4). ASSEMBLE USING THE MSG MACROS IN *SYSMAC. 01081/027 INTERTASK LSTPTR OC G S1561 5.0T4 VLO FSNAME=INTERTASK.LSTPTR.OC.027(1) 641 5.0T4 641 INTERTASK.LSTPTR.OC.027 1 LINE 80 1 PAGE UBC O'REILLY MTA AUG. 31, 1977 13:43:27 5.0T11 215 01082/001 INDIRECT/RCMSG ROUTINES # (NOT DISTRIBUTED) UBC 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A SET OF SUBROUTINES USED BY THE UBC MAIL SYSTEM. THE SUBROUTINES PROVIDE ERROR MESSAGES FOR MOST OF THE MAIL SYSTEM (OS-CALLABLE) SUBROUTINES. 1 SUN SEP 08/96 15:24:55 Page 860 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01083/001C MESSAGE FACILITY SOURCE SA G S0999 5.0AT1 VLO FSNAME=MESSAGE_FACILITY.SOURCE.SA.001(1) 747 5.1T3 258 MESSAGE_FACILITY.SOURCE.SA.001 1 LINE 72 9 PAGE UBC EADIE JAN. 22, 1982 18:01:45 0 This component is a task-independent version of the subtasking monitor Canonical Form Message (CFM) expansion facility. This message expansion facility has been installed at U-M and will be used to emit messages, warnings etc. from the MTS job in a more rational manner. The code has been modified slightly from the Monitor release and comments are solicited. There is some description of how to use the facility in (1083/3). ********************************************************************** D5.1 version: No use is made of this facility yet. ********************************************************************** 01083/002C MESSAGE FACILITY OBJECT G # (RESIDENT SYSTEM) UBC EADIE 01083/003C MESSAGE FACILITY WRITEUP WP G S0999 5.0AT1 VLO FSNAME=MESSAGE_FACILITY.WRITEUP.WP.003(1) 748 5.1T3 259 MESSAGE_FACILITY.WRITEUP.WP.003 1 LINE 68 7 PAGE UBC EADIE JAN. 22, 1982 18:01:47 0 Referenced by comments of: 1083/1 01084/001C TIME (UBC) OBJECT OL G PLUS:TIME*OL 5.1T3 260 TIME_?UBC?.OBJECT.OL.001 1 LINE 5020 19 PAGE BALLARD EADIE JULY 23, 1983 15:25:21 0 ----(D5.1)--------------------------------------------------------- This is a set of time-and-date routine written in PLUS to convert between various forms of time and a 'canonical form'. The routines include general forms of input and output. Note that this library is NOT configured to be loaded in shared VM -- the pseudo registers for this are not included. 0 Referenced by comments of: 1089/2 01084/002C TIME (UBC) SOURCE SQ G PLUS:TIME*SQ 5.1T3 261 TIME_?UBC?.SOURCE.SQ.002 1 LINE 103 30 PAGE BALLARD EADIE JULY 23, 1983 15:25:23 0 ----(D5.1)--------------------------------------------------------- The source of the PLUS TIME routines. Compile with *PLUS and 0=PLUS:TIME*SQL (1084/3) PLUS:MISC*SQL (1042/86) *CLPARSELIB (1076/11) *PLUS.SOURCELIB (1042/5) 1 SUN SEP 08/96 15:24:55 Page 861 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01084/003C TIME (UBC) SOURCELIB SL G PLUS:TIME*SQL 5.1T3 262 TIME_?UBC?.SOURCELIB.SL.003 1 LINE 68 5 PAGE BALLARD EADIE JULY 23, 1983 15:25:24 0 ----(D5.1)--------------------------------------------------------- The sourcelibrary for the PLUS TIME routines. 0 Referenced by comments of: 1084/2, 1089/9 01084/004C TIME (UBC) GRAMMAR SR G PLUS:TIME*SR 5.1T3 263 TIME_?UBC?.GRAMMAR.SR.004 1 LINE 68 6 PAGE BALLARD EADIE JULY 23, 1983 15:25:25 0 ----(D5.1)--------------------------------------------------------- The grammar for the PLUS TIME routines. 01084/005C TIME (UBC) WRITEUP PF G S1663 UBC86 159 5.1T3 264 TIME_?UBC?.WRITEUP.PF.005 1 LINE 78 13 PAGE BALLARD EADIE FEB. 04, 1983 11:08:05 0 ----(D5.1)--------------------------------------------------------- A $COPY'able writeup for the PLUS TIME routines. 01084/006C TIME (UBC) BUILDER C G PLUS:TIME.MAKE 5.1T3 265 TIME_?UBC?.BUILDER.C.006 1 LINE 135 1 PAGE BALLARD EADIE JULY 23, 1983 15:27:14 0 ----(D5.1)--------------------------------------------------------- A little file to be $SOURCE'd to rebuild the file PLUS:TIME*OL 01086/001C LIST COMMAND SOURCE SQ G CLS:LIST*SQ 5.1T3 266 LIST_COMMAND.SOURCE.SQ.001 1 LINE 202 36 PAGE UM KRAUSE JULY 23, 1983 15:27:14 0 Plus source for $LIST CLS. Compile using COPY:MTS*SQL (344/4), COPY:FILE*SQL (482/65), CLS:CMDSERV*SQL (851/3), CLS:LIST*SRL (1086/3), *CLPARSELIB (1076/11), and *PLUS.SOURCELIB (1042/5). ********************************************************************** D5.1 version: This version has a bug which can be fixed by adding the following line to the procedure Initialize_List, after line 1073: Shared_Gdinfo_Ptr:=Null; ********************************************************************** 0 Referenced by comments of: 1086/3, 1086/4 01086/002C LIST COMMAND GRAMMAR SR G CLS:LIST*SR 5.1T3 267 LIST_COMMAND.GRAMMAR.SR.002 1 LINE 75 8 PAGE UM KRAUSE JULY 23, 1983 15:27:17 0 *CLParser (1076/6) grammar for the LIST command language. 0 Referenced by comments of: 1086/3, 1086/4 1 SUN SEP 08/96 15:24:55 Page 862 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01086/003C LIST COMMAND DECLARATIONS SQ G CLS:LIST*SRL 5.1T3 268 LIST_COMMAND.DECLARATIONS.SQ.003 1 LINE 73 1 PAGE UM KRAUSE JULY 23, 1983 15:27:17 0 Declarations generated by *CLParsegen (1076/1) using (1086/2) as input. Used to compile (1086/1). 0 Referenced by comments of: 1086/1 01086/004C LIST COMMAND OBJECT OC G *NEWCLSLIST 5.1T3 269 LIST_COMMAND.OBJECT.OC.004 1 LINE 6742 24 PAGE UM KRAUSE JULY 23, 1983 15:27:18 *NEWCLSLIST 0 Object for (1086/1) and (1086/2). Requires ETC:LISTHELP (1086/5). 0 Referenced by comments of: 1086/5 01086/005C LIST COMMAND HELP FILE D G ETC:LISTHELP 5.1T3 270 LIST_COMMAND.HELP_FILE.D.005 1 LINE 68 8 PAGE UM KRAUSE JULY 23, 1983 15:27:19 ETC:LISTHELP 0 Help file referenced by (1086/4). 0 Referenced by comments of: 1086/4 01089/001C *FORUM INSTALLATION P G S1663 UBC86 163 5.1T3 271 FORUM.INSTALLATION.P.001 1 LINE 72 4 PAGE UBC BALLARD EADIE FEB. 04, 1983 11:08:27 0 ----(D5.1)--------------------------------------------------------- Instructions for installing and maintaining *FORUM. ***************** P L E A S E R E A D T H E M ***************** Revised for Version 0.9 - changes indicated by revision bars. (Includes notes on the differences between V0.9 & V0.8) 0 Referenced by comments of: 1089/4 01089/002C *FORUM PROGRAM OE G *FORUM 5.1T3 272 FORUM.PROGRAM.OE.002 1 LINE 32767 22 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:21 0 ----(D5.1)--------------------------------------------------------- *FORUM is not post-IPL loaded at UM -- this is a version which has been link-editted: Continues with: PLUS:TIME*OL (1084/1) PLUS:MISC*OL (1042/87) *PLUS.OBJLIB (1042/64) 01089/003C *FORUM HELP FILE D G ETC.:FORUM*H 5.1T3 273 FORUM.HELP_FILE.D.003 1 LINE 182 14 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:22 0 ----(D5.1)--------------------------------------------------------- 1 SUN SEP 08/96 15:24:55 Page 863 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 The FORUM help file. It has been reformatted for use with the Full Screen Help facility (845). 01089/004C *FORUM WRITEUP WF O W267:FORUM*WF 5.1T3 274 FORUM.WRITEUP.WF.004 1 LINE 127 14 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:22 0 ----(D5.1)--------------------------------------------------------- This is the FORMAT (308) source for FORUM. It makes use of the FORMAT macros in COPY:JONMACLIBFMT (308/18). There have been several changes to *FORUM since this writeup was produced. They are mostly documented in the help file. ----(Version 0.8)-------------------------------------------------- The following changes correspond to version 0.8, as distributed in at Workshop VIII... 1) A number of minor changes to the command syntax. 2) New display operands... DISPLAY CONFERENCE NAME DISPLAY CONFERENCE BLURB 3) New select operand PRINT/SELECT EXCLUDED 4) DESTROY conference-name 5) PURGE CONFERENCE (which removes deleted and replaced items from the conference file. 6) The output produced now includes a carriage control character (normally a blank), so it can be copied to a printer without having to remember the "@-CC". 7) The DISPLAY and PRINT commands now accept an operand OUTPUT=Fdname or ON Fdname to allow redirecting the output to a file, *PRINT*, etc. The commands don't do special formatting for the printer at present, except that: - if entire discussions are being printed ( PRINT ALL ), then each discussion will start a new page. - if discussions from more than one conference are printed with a single PRINT command, then each conference will start a new page. E.g., PRINT ALL TITLES will print the titles for each conference on a new page. The output operand may appear either before on after other command operands: 1 SUN SEP 08/96 15:24:55 Page 864 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 PRINT CONF USER-FORUM ALL ON *PRINT* DISPLAY OUTPUT=*PRINT PARTICIPANTS 8) The format of responses has been changed to include the author on the first line instead of the last. 9) You can now use *FORUM from more than one ID without having to join from each ID. To do so, you must permit your participant file Read-Write to the other ID's you wish to use, then specify ID=ccid in the PAR field of the $RUN command, were ccid is the id containing the participant file. That is, if your participant file is under id BALR, and you wish to use it from id AB1, then - from ID BALR: $PERMIT FORUM.PART RW AB1 (BALR can continue to run *FORUM as usual) - from ID AB1: $RUN *FORUM PAR=ID=BALR (will access the participant file under BALR, instead of under AB1.) A conference name may still be specified in the PAR field as before, either before or after the ID= operand, with a separating comma. 10) The following change is mainly of interest at UBC. It is now possible to use the test version of the file editor when editing discussions in *FORUM. This provides visual editing at most FEP terminals and some other new features. Unfortunately, FORUM has no way to determine whether the TEST editor has been selected in MTS, so it is necessary to use the following FORUM command: SET VERSION(EDIT)=TEST to tell FORUM to use the test editor. (The test editor has subroutine entry point EDITTEST at UBC to make this possible.) The following are not documented in the writeup or the help file... DISPLAY STATISTICS The FORUM management commands, described in the installation notes (1089/1) ----(Version 0.9)-------------------------------------------------- The following changes correspond to version 0.9 and are new with this version... 1. A few bugs have been fixed. 1 SUN SEP 08/96 15:24:55 Page 865 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 2. The heading for discussions and responses now indicates the number of lines. 3. If you try to enter an item with lines longer than the usual terminal width (about 80 characters), FORUM will suggest you shorten the lines. 4. If you print an item with lines that are longer than the output width of the terminal the long lines will be wrapped onto multiple screen lines. 5. The command NEXT has been implemented as a shorthand for "PRINT NEXT". It allows no operands. The command RETRIEVE has been implemented as a synonym for "SELECT". These two changes provide a small step in the direction of compatibility with the $MESSAGE command syntax. 6. DISPLAY PARTICIPANT "name" may now be followed by the operand CONFERENCES to determine what conferences the specified person belongs to. 7. DISPLAY CONFERENCE conference-name may now be used to find out what access you have to a specified conference. 8. There have been a few changes in the interaction of multiple conferences. Unless you have gone into single conference mode with the CONF command, or belong to only one conference, you will always be prompted for a conference name when you start a discussion. If you are in single-conference mode and issue a JOIN command, the active conference will be changed to the conference joined. I.e., the effect will be the same as if you issued a JOIN command followed by a CONF command. 9. This version of FORUM includes an *experimental* full screen help facility. I've installed it in FORUM to try to get some experience with it. I don't plan to make any changes to the program, but will relay any comments to the author. Unfortunately, due to problems with UBC's full-screen support at network and front-end terminals, this is currently available only at 3270-type terminals. To invoke this facility, you must issue the FORUM command SET FSHELP=ON before entering "HELP" or "?". (You could put this SET command in a "forum profile" to cause it to be issued each time you run *FORUM. (Enter "? FORUMPROFILE" for information about forumprofiles. ) Hopefully, the operation of the full-screen help is self- explanatory. 1 SUN SEP 08/96 15:24:55 Page 866 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Please note that this IS experimental, and may change considerably or be removed completely in future versions of FORUM. ----(Version 0.9+)------------------------------------------------- A new command was added for managers to allow the total removal of a discussion without leaving ANY trace (previously, the title line of a discussion could never be removed). The command is "PURGE DISCUSSION " where is the number of the discussion to be removed. 0 Referenced by comments of: 1089/5, 1089/6 01089/005C *FORUM WRITEUP PF O S1663 UBC86 168 5.1T3 275 FORUM.WRITEUP.PF.005 1 LINE 75 17 PAGE UBC BALLARD EADIE FEB. 04, 1983 11:18:41 0 ----(D5.1)--------------------------------------------------------- Print-ready writeup for FORUM. Output from (1089/4). 01089/006C *FORUM MEMO 447 PF O # (NOT DISTRIBUTED) UBC BALLARD EADIE 0 Computing Center Memo 447, "UBC FORUM (*FORUM)," is an earlier version of (1089/4), and thus is not distributed. 01089/007C *FORUM GRAMMAR SR G W267:FORUM*SR 5.1T3 276 FORUM.GRAMMAR.SR.007 1 LINE 77 9 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:26 0 ----(D5.1)--------------------------------------------------------- Grammar (input to *CLPARSER version 2) for FORUM commands. 0 Referenced by comments of: 1089/8 01089/008C *FORUM SEMANTIC DECLS SQ G W267:FORUMSEM*SQL 5.1T3 277 FORUM.SEMANTIC_DECLS.SQ.008 1 LINE 72 3 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:26 0 ----(D5.1)--------------------------------------------------------- Declarations generated by *CLPARSEGEN from (1089/7). 0 Referenced by comments of: 1089/9 01089/009C *FORUM SOURCE LIBRARY SQ G W267:FORUM*SQL 5.1T3 278 FORUM.SOURCE_LIBRARY.SQ.009 1 LINE 68 17 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:26 0 ----(D5.1)--------------------------------------------------------- Source library used for all *FORUM compilations. Line 0 contains a series of '$continue withs' for all the libraries 1 SUN SEP 08/96 15:24:55 Page 867 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 required by *FORUM, so *PLUS can be run with 0=FORUM*SQL(0). The libraries required are: FORUMSEM*SQL (1089/8) FORUM*SQL (1089/9) HELP:FSHELP.SQL (845/5) *CLPARSELIB (1076/11) PLUS:MISC*SQL (1042/88) PLUS:TIME*SQL (1084/3) *PLUS.SOURCELIB (1042/5) 0 Referenced by comments of: 1089/9 01089/010C *FORUM MAIN PROG SQ G W267:FOR.MAIN*SQ 5.1T3 279 FORUM.MAIN_PROG.SQ.010 1 LINE 68 9 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:27 0 ----(D5.1)--------------------------------------------------------- Main program and initialization. 01089/011C *FORUM SEMANTIC RTNS SQ G W267:FOR.SEM*SQ 5.1T3 280 FORUM.SEMANTIC_RTNS.SQ.011 1 LINE 84 15 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:28 0 ----(D5.1)--------------------------------------------------------- Semantic routines called from parser. 01089/012C *FORUM COMMAND RTNS SQ G W267:FOR.CMD*SQ 5.1T3 281 FORUM.COMMAND_RTNS.SQ.012 1 LINE 73 27 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:28 0 ----(D5.1)--------------------------------------------------------- Command processing routines called from semantic routines for some commands. 01089/013C *FORUM SERVICE RTNS SQ G W267:FOR.SERV*SQ 5.1T3 282 FORUM.SERVICE_RTNS.SQ.013 1 LINE 68 14 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:29 0 ----(D5.1)--------------------------------------------------------- Various service routines called from command processing and the semantic routines. 01089/014C *FORUM FILE RTNS SQ G W267:FOR.FILE*SQ 5.1T3 283 FORUM.FILE_RTNS.SQ.014 1 LINE 95 14 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:30 0 ----(D5.1)--------------------------------------------------------- Routines which obtain various FORUM data items from the various files used by *FORUM. These are the only routines which have any detailed knowledge of how the data is stored. 1 SUN SEP 08/96 15:24:55 Page 868 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 01089/015C *FORUM SYSTEM INTF SQ G W267:FOR.SYS*SQ 5.1T3 284 FORUM.SYSTEM_INTF.SQ.015 1 LINE 70 8 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:31 0 ----(D5.1)--------------------------------------------------------- Various system interfacing routines. Most, but by no means all, systems services are invoked from within this unit. 01089/016C *FORUM MESSAGE RTNS SQ G W267:FOR.MES*SQ 5.1T3 285 FORUM.MESSAGE_RTNS.SQ.016 1 LINE 68 5 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:31 0 ----(D5.1)--------------------------------------------------------- Message formatting routine used by *FORUM. These routines will not be used in the next version of FORUM. The new MESSAGE routines in the PLUS runtime library (1042/60) will be used instead. 01089/017C *FORUM STRING RTNS SQ G W267:FOR.STRING*S 5.1T3 286 FORUM.STRING_RTNS.SQ.017 1 LINE 67 2 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:31 0 ----(D5.1)--------------------------------------------------------- A couple of trivial string processing routines used by FORUM. 01089/018C *FORUM PMF FILE D G W267:FORUM_ 5.1T3 287 FORUM.PMF_FILE.D.018 1 LINE 113 3 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:32 0 ----(D5.1)--------------------------------------------------------- This is a trivial PMF file that I use to maintain *FORUM. It uses the PMF just as a source of command-procedures, and makes no use of the subfiles capabilities. The procedures I (Gavin) use to regenerate FORUM are: REBUILD ... compiles the grammar and the source and puts all the object into the file FORUM*O (which should be created first). LINK ... link edits FORUM*O to the file FORUM>. FIX ... edits some ccids etc in FORUM> from the test usage to the production usage. 01089/019C *FORUM LINKEDIT CMDS D G W267:FOR.LINK*C 5.1T3 288 FORUM.LINKEDIT_CMDS.D.019 1 LINE 28 1 PAGE UBC BALLARD EADIE JULY 23, 1983 15:27:32 0 ----(D5.1)--------------------------------------------------------- ****************** D O N O T R E N U M B E R ****************** 1 SUN SEP 08/96 15:24:55 Page 869 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Is used by the PMF procedure LINK. 02001/001 UNEMAIL # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A MAIL SYSTEM WRITTEN FOR SIGFILE USE. 02002/001 DIABLO # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO DRIVE A DIABLO PRINTER. 02004/001 NUNET # (NOT DISTRIBUTED) UNE 02005/001 PRIVATE_DISKS # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE UNE PRIVATE DISK SCHEME. 02006/001 *TOTPAGES # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, LISTS FREE SPACE ON A NAMED VOLUME, OR ON ALL PUBLIC DISKS IF NO PARAMETER IS GIVEN. 02008/001 DEVSNIFF # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS PART OF UNE'S IPL SEQUENCE. IT NOTES PRIVATE VOLUMES ALREADY MOUNTED AT IPL IN SHARED STORAGE TABLE. 02013/001 ASM.PREP # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN ASSEMBLER PREPROCESSOR. 02015/001 LONG # (NOT DISTRIBUTED) UNE 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PACKAGE TO DO INTEGER ARITHMETIC ON VERY LARGE NUMBERS. 03003/001 SPIRES # (NOT DISTRIBUTED ON D5.1) UM STERKEN 0 ******************************************************************** D5.1 comments: 1 SUN SEP 08/96 15:24:55 Page 870 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 UQV is the official MTS SPIRES distributor. SPIRES is not included in D5.1 because of timing considerations having to do with the imminent arrival of a new distribution from Alberta. All D5.1 components which require SPIRES should work with the latest distibution you received from Alberta. ******************************************************************** 03006/001 *PL1SYN # (NOT DISTRIBUTED) UQV 03007/001 APLUTIL # (NOT DISTRIBUTED) UQV 03011/001 *FLOWCHART IBM SOURCE SA O S1560 5.0T3 VLO FSNAME=FLOWCHART.IBM_SOURCE.SA.001(1) 1417 5.0T3 1417 FLOWCHART.IBM_SOURCE.SA.001 1 SEQ 80 387 PAGE UQV WARD DWB OCT. 10, 1974 12:28.56 5.0T9 273 0 THIS IS THE SOURCE FOR THE IBM FLOWCHARTING PROGRAM. IT DOES NOT FLOWCHART ANYTHING AUTOMATICALLY; YOU HAVE TO TELL IT (VIA ITS INPUT LANGUAGE) WHAT KIND OF BOXES TO DRAW AND HOW THEY ARE TO BE CONNECTED. SEE THE BRIEF DESCRIPTION IN MTS VOLUME 2. FOR MORE COMPLETE INFORMATION, SEE IBM FORM GH20-0293. 0 Referenced by comments of: 3011/2, 3011/3 03011/002A *FLOWCHART MTS UPDATE UU O S1644 5.0BT1 VLO FSNAME=FLOWCHART.MTS_UPDATE.UU.002(1) 1045 5.1T3 289 FLOWCHART.MTS_UPDATE.UU.002 1 LINE 72 41 PAGE UQV WARD DWB NOV. 21, 1982 23:14:35 0 *UPDATE DECK TO PRODUCE MTS VERSION OF FLOWCHART FROM ORIGINAL IBM SOURCE (3011/1). ************************************************************************* D5.0A version: Changed Oct. 15 1982 to replace X'00' in file names of files it creates to C'#'. ************************************************************************* 0 Referenced by comments of: 3011/3 03011/003A *FLOWCHART MTS SOURCE SA O S1644 5.0BT1 VLO FSNAME=FLOWCHART.MTS_SOURCE.SA.003(1) 1046 5.1T3 290 FLOWCHART.MTS_SOURCE.SA.003 1 LINE 80 359 PAGE UQV WARD DWB NOV. 21, 1982 23:14:48 0 RESULT OF APPLYING ABOVE UPDATE (3011/2) TO IBM SOURCE (3011/1). COPIES *GDINFODSECT (594). 0 Referenced by comments of: 3011/4 03011/004A *FLOWCHART OBJECT OC O S1644 5.0BT1 VLO FSNAME=FLOWCHART.OBJECT.OC.004(1) 1047 5.1T3 291 FLOWCHART.OBJECT.OC.004 1 LINE 80 53 PAGE UQV WARD DWB NOV. 21, 1982 23:15:43 0 OBJECT FROM ASSEMBLY OF MTS SOURCE (3011/3). 0 Referenced by comments of: 3011/5 1 SUN SEP 08/96 15:24:55 Page 871 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03011/005A *FLOWCHART MTS OBJECT OE O *FLOWCHART 5.1T3 292 FLOWCHART.MTS_OBJECT.OE.005 1 LINE 25588 18 PAGE UQV WARD DWB JULY 23, 1983 15:27:42 *FLOWCHART 0 LINK-EDITED RESULT FROM ABOVE OBJECT (3011/4). 03011/006 *FLOWCHART TEST 1 D S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_1.D.006(1) 1422 5.0T3 1422 FLOWCHART.TEST_1.D.006 1 LINE 72 1 PAGE UQV WARD DWB JULY 03, 1981 21:07:24 5.0T9 278 0 THIS COMPONENT AND THE NEXT 5 ARE *FLOWCHART TEST PROGRAMS. 03011/007 *FLOWCHART TEST 2 D S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_2.D.007(1) 1423 5.0T3 1423 FLOWCHART.TEST_2.D.007 1 LINE 62 1 PAGE UQV WARD DWB JULY 03, 1981 21:07:25 5.0T9 279 03011/008 *FLOWCHART TEST 3 D S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_3.D.008(1) 1424 5.0T3 1424 FLOWCHART.TEST_3.D.008 1 LINE 75 1 PAGE UQV WARD DWB JULY 03, 1981 21:07:26 5.0T9 280 03011/009 *FLOWCHART TEST 4 D S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_4.D.009(1) 1425 5.0T3 1425 FLOWCHART.TEST_4.D.009 1 LINE 68 1 PAGE UQV WARD DWB JULY 03, 1981 21:07:27 5.0T9 281 03011/010 *FLOWCHART TEST 5 D S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_5.D.010(1) 1426 5.0T3 1426 FLOWCHART.TEST_5.D.010 1 LINE 62 1 PAGE UQV WARD DWB JULY 03, 1981 21:07:27 5.0T9 282 03011/011 *FLOWCHART TEST 6 D S1560 5.0T3 VLO FSNAME=FLOWCHART.TEST_6.D.011(1) 1427 5.0T3 1427 FLOWCHART.TEST_6.D.011 1 LINE 72 4 PAGE UQV WARD DWB JULY 03, 1981 21:07:28 5.0T9 283 03012/001 TYPESET # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT IS NOT CURRENTLY INSTALLED AT MICHIGAN.Y 03013/001 ALGOL68C # (NOT INSTALLED AT UM) D4T3 690 ALGOL68C.COMPILER.OE.001 1 SEQ 32767 45 PAGE UQV MAILLOUX OCT. 11, 1976 08:56:32 0 THIS VERSION OF ALGOL68C WAS RECEIVED AT UM FROM UQV IN OCT/76 AND IS VERSION 242 OF THE ALGOL68C COMPILER, WHICH WAS OBTAINED FROM CAMBRIDGE, ENGLAND. NOTE: THIS VERSION HAS NOT BEEN INSTALLED AT UM AS OF 1 APR/81. 03014/001 UQV FEP # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE 360 SIDEY OF THE UQV FRONT END DSR. 1 SUN SEP 08/96 15:24:55 Page 872 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03016/001 APLSV # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE SV VERSION OF APL. 03017/001 *DES # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE DATA ENTRY SYSTEM, A HOME-GROWN VERSION OF VIDEO 370. 03018/001 TEXTFORM DESIGN SPECS WF # (NOT DISTRIBUTED BY UQV) UQV TXTFGROUP LIFT 0 TEXTFORM is a registered trademark of the University of Alberta. TEXTFORM is copyrighted by the University of Alberta. Redistribution to installations other than those receiving distributions of MTS requires written permission. This is the final version of the TEXTFORM design specifications. The members of the "TXTFGROUP" are: Grant Crawford Dave Holberton Earl Culham Debbie Reinhart ****************************************************************** This is TEXTFORM version 1.1. ****************************************************************** 0 Referenced by comments of: 828/2, 3018/2 03018/002 TEXTFORM DESIGN SPECS PF # (NOT DISTRIBUTED BY UQV) UQV TXTFGROUP LIFT 0 Printer copy of (3018/1). 03018/003 TEXTFORM RESTORE C TXTF:CREATES 5.0T4 1 TEXTFORM.RESTORE.C.003 1 LINE 73 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:17:07 5.0T9 284 0 For installations installing TEXTFORM for the first time: Component (3018/5), the Internals Manual, should be printed, and the section entitled "Installation Guide" should be read before proceeding further. For installations who already have TEXTFORM running: Component (3018/5), the Internals Manual, lines 1 to 1278 should be printed. However you may print the whole manual 1 SUN SEP 08/96 15:24:55 Page 873 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 if you wish since it has been updated since Version .97. Read the section entitled "Installation Guide" before proceeding further. There are changes. 03018/004 TEXTFORM INTERNALS WX S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.INTERNALS.WX.004 5.0T4 2 TEXTFORM.INTERNALS.WX.004 1 LINE 255 306 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:49:56 5.0T9 285 0 This is the PLM - set up for the 1403. The first few lines of the file contain notes on the options available, but what you need (the whole thing) is produced by the defaults. 0 Referenced by comments of: 3018/5, 3018/12, 3018/61, 3018/81, 3018/123, 3018/124, 3018/125, 3018/126, 3018/155, 3018/160, 3018/161, 3018/162 03018/005 TEXTFORM INTERNALS PX S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.INTERNALS.PX.005 5.0T4 3 TEXTFORM.INTERNALS.PX.005 1 LINE 108 1036 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:50:48 5.0T9 286 0 Print file for (3018/4) - about 1000 pages of TN. The Table of Contents is at the end of the print file. 0 Referenced by comments of: 3018/3 03018/006 TEXTFORM INTRODUCTION WX S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.INTRODUCTION.WX.006 5.0T4 4 TEXTFORM.INTRODUCTION.WX.006 1 LINE 229 56 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:53:00 5.0T9 287 0 The INTRODUCTION manual - set up for the 1403. 03018/007 TEXTFORM USERS WX S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.USERS.WX.007 5.0T4 5 TEXTFORM.USERS.WX.007 1 LINE 236 58 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:54:31 5.0T9 288 0 The USERS manual - set up for the 1403. 03018/008 TEXTFORM REFERENCE WX S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.REFERENCE.WX.008 5.0T4 6 TEXTFORM.REFERENCE.WX.008 1 LINE 210 49 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:55:40 5.0T9 289 0 The REFERENCE manual - set up for the 1403. (Note - Due to a bug in the handling of large structures, it will not run successfully.) 03018/009 TEXTFORM LAYOUT_DEF WX # (NOT AVAILABLE YET) UQV TXTFGROUP LIFT 0 The layout definition manual will go here. 1 SUN SEP 08/96 15:24:55 Page 874 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/010 TEXTFORM *TEXTFORM OE G *TEXTFORM 5.0T4 7 TEXTFORM.*TEXTFORM.OE.010 1 LINE 9440 69 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:17:51 5.0T9 290 *TEXTFORM 0 TEXTFORM object. 0 Referenced by comments of: 3018/14, 3018/15, 3018/16, 3018/17, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/42, 3018/47, 3018/49, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/63, 3018/64, 3018/66, 3018/77, 3018/115, 3018/116, 3018/117 03018/011 TEXTFORM TXTFMSGS M ETC:TXTFMSGS 5.0T4 8 TEXTFORM.TXTFMSGS.M.011 1 LINE 88 7 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:17:55 5.0T9 291 ETC:TXTFMSGS 0 ERROR MESSAGES. 03018/012 TEXTFORM AMWID SA G TXTF:AMWID.S 5.0T4 9 TEXTFORM.AMWID.SA.012 1 LINE 80 16 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:17:56 5.0T9 292 0 PROGRAM FOR BUILDING AM748 PHOTOTYPESETTER WIDTH TABLES. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/013 TEXTFORM AM748N SA G TXTF:AM748N.S 5.0T4 10 TEXTFORM.AM748N.SA.013 1 LINE 80 54 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:17:58 5.0T9 293 0 AM748 PHOTOTYPESETTER OUTPUT DEVICE PROCESSOR (OD). COPIES GBLC (3018/120), GBLS (3018/22), AND XODTGETM (3018/144). OBJECT IN TXTFODS (3018/156). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/014 TEXTFORM ATPAC SA G TXTF:ATPAC.S 5.0T4 11 TEXTFORM.ATPAC.SA.014 1 LINE 80 11 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:05 5.0T9 294 0 CONTAINS THE ATEXEC, ATERASE, ATINS, ATRAINS, ATRAERS, ECQSTRG, AND EXDG SUBROUTINES FOR AT-POINT PROCESSING. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/015 TEXTFORM CHPAC SA G TXTF:CHPAC.S 5.0T4 12 TEXTFORM.CHPAC.SA.015 1 LINE 80 36 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:06 5.0T9 295 0 CONTAINS THE GETVAL, RETVAL, SETATTR, SETVAL, GETPV, SECHG, PSVTAB, ASSIGN, HCHANGE, AND ERSVTAB SUBROUTINES FOR SYMBOL TABLE PROCESSING. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 1 SUN SEP 08/96 15:24:55 Page 875 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/016 TEXTFORM CONVPAC SA G TXTF:CONVPAC.S 5.0T4 13 TEXTFORM.CONVPAC.SA.016 1 LINE 80 46 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:09 5.0T9 296 0 CONTAINS SUBROUTINES FOR CASE, LANGUAGE, STRING, AND NUMBER CONVERSION. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/017 TEXTFORM CWKDAY SA G TXTF:CWKDAY.S 5.0T4 14 TEXTFORM.CWKDAY.SA.017 1 LINE 80 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:13 5.0T9 297 0 CONTAINS DATA AND TIME SUBROUTINE. OBJECT IN (3018/77) AND *TEXTFORM (3018/10). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/77 03018/018 TEXTFORM DEVPAC SA G TXTF:DEVPAC.S 5.0T4 15 TEXTFORM.DEVPAC.SA.018 1 LINE 80 12 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:14 5.0T9 298 0 COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). OBJECT IN *TEXTFORM (3018/10). 03018/019 TEXTFORM EXPAC SA G TXTF:EXPAC.S 5.0T4 16 TEXTFORM.EXPAC.SA.019 1 LINE 80 74 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:15 5.0T9 299 0 CONTAINS THE TXTFDRVR, GCI, PARSER, COMDEXEC SUBROUTINES AND FRIENDS. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/152 03018/020 TEXTFORM EXPRPAC SA G TXTF:EXPRPAC.S 5.0T4 17 TEXTFORM.EXPRPAC.SA.020 1 LINE 80 27 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:21 5.0T9 300 0 CONTAINS THE EVALUATE, EXPREV, AND EXEVAL SUBROUTINES FOR EXPRESSION EVALUATION. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/021 TEXTFORM FUNPAC SA G TXTF:FUNPAC.S 5.0T4 18 TEXTFORM.FUNPAC.SA.021 1 LINE 80 34 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:23 5.0T9 301 0 TEXTFORM FUNCTIONS. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 1 SUN SEP 08/96 15:24:55 Page 876 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/022 TEXTFORM GBLS SA G TXTF:GBLS 5.0T4 19 TEXTFORM.GBLS.SA.022 1 LINE 80 7 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:27 5.0T9 302 0 COPY SECTION OF GLOBAL SYMBOLS INCLUDING INSTALLATION OPTIONS. COPIES GBLD (3018/119). COPIED BY MANY TEXTFORM SUBCOMPONENTS. 0 Referenced by comments of: 3018/13, 3018/14, 3018/15, 3018/16, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/24, 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34, 3018/35, 3018/36, 3018/37, 3018/38, 3018/41, 3018/42, 3018/44, 3018/45, 3018/46, 3018/47, 3018/48, 3018/49, 3018/50, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/115, 3018/116, 3018/117, 3018/136, 3018/137, 3018/147, 3018/149, 3018/151, 3018/152, 3018/158, 3018/171 03018/023 TEXTFORM GFDSTAR SA G TXTF:GFDSTAR.S 5.0T4 20 TEXTFORM.GFDSTAR.SA.023 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:28 5.0T9 303 0 CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON TEXTFORM REFERENCED/LOADED FILES. THIS IS THE PUBLIC FILE (OWNER ETC:) VERSION. COPIES GBLC (3018/120) AND GBLS (3018/22). OBJECT IN (3018/66) AND *TEXTFORM (3018/10). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/66 03018/024 TEXTFORM GFDN SA G TXTF:GFDN.S 5.0T4 21 TEXTFORM.GFDN.SA.024 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:29 5.0T9 304 0 CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON TEXTFORM REFERENCED/LOADED FILES. THIS IS THE NEW: VERSION. COPIES GBLC (3018/120) AND GBLS (3018/22). OBJECT IN (3018/67). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/67 03018/025 TEXTFORM GFDO SA G TXTF:GFDO.S 5.0T4 22 TEXTFORM.GFDO.SA.025 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:29 5.0T9 305 0 CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON TEXTFORM REFERENCED/LOADED FILES. THIS IS THE OLD: VERSION. COPIES GBLC (3018/120) AND GBLS (3018/22). OBJECT IN (3018/65). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/65 03018/026 TEXTFORM GFDT SA G TXTF:GFDT.S 5.0T4 23 TEXTFORM.GFDT.SA.026 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:30 5.0T9 306 0 CONTAINS THE GFD, RUNNER, AND LOADMOD SUBROUTINES TO PUT PROPER CCID ON TEXTFORM REFERENCED/LOADED FILES. THIS IS THE TXTF: VERSION. COPIES (3018/120) AND GBLS (3018/22). OBJECT IN (3018/68). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 1 SUN SEP 08/96 15:24:55 Page 877 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 3018/68 03018/027 TEXTFORM GOPAC SA G TXTF:GOPAC.S 5.0T4 24 TEXTFORM.GOPAC.SA.027 1 LINE 80 23 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:30 5.0T9 307 0 CONTAINS THE TXTFINIT AND TXTFTERM SUBROUTINES TO INITIALIZE AND TERMINATE TEXTFORM. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/028 TEXTFORM HYPAC SA G TXTF:HYPAC.S 5.0T4 25 TEXTFORM.HYPAC.SA.028 1 LINE 80 56 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:33 5.0T9 308 0 CONTAINS HYPHENATION SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/029 TEXTFORM INTRFACE SA G TXTF:INTRFACE.S 5.0T4 26 TEXTFORM.INTRFACE.SA.029 1 LINE 80 8 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:37 5.0T9 309 0 CONTAINS THE INTERFACE TO SYSTEM SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES *CNFGINFODSECT (654), GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/030 TEXTFORM LISTPAC SA G TXTF:LISTPAC.S 5.0T4 27 TEXTFORM.LISTPAC.SA.030 1 LINE 80 10 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:39 5.0T9 310 0 CONTAINS THE LISTER, ALTLIST, CHLIST, CR, AND XREFIT SUBROUTINES FOR SOURCE LISTING. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/031 TEXTFORM MACPAC SA G TXTF:MACPAC.S 5.0T4 28 TEXTFORM.MACPAC.SA.031 1 LINE 80 47 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:40 5.0T9 311 0 CONTAINS THE TXTFINPT SUBROUTINE AND FRIENDS FOR INPUT GETTING, AND THE ROUTINES FOR, IF, WHILE, EXECUTE PROCESSING, ETC. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/032 TEXTFORM NPP SA G TXTF:NPP.S 5.0T4 29 TEXTFORM.NPP.SA.032 1 LINE 80 56 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:44 5.0T9 312 0 CONTAINS THE PAGEPROC SUBROUTINE FOR PAGE PROCESSING. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 1 SUN SEP 08/96 15:24:55 Page 878 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/033 TEXTFORM NUCLEUS CSECT SA G TXTF:NUCLEUS.S 5.0T4 30 TEXTFORM.NUCLEUS_CSECT.SA.033 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:48 5.0T9 313 0 THIS IS THE NUCLEUS CSECT WHICH CONTAINS ALL OF THE VALUES THAT TEXTFORM NEEDS TO KEEP TRACK OF WHAT'S WHAT. COPIES THE NUCLEUS DSECT (3018/118), GBLC (3018/120), AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/034 TEXTFORM OD.AJ832 SA G TXTF:OD.AJ832.S 5.0T4 31 TEXTFORM.OD.AJ832.SA.034 1 LINE 80 31 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:49 5.0T9 314 0 THE OUTPUT DEVICE PROCESSOR FOR THE ANDERSON-JACOBSON 832 TERMINAL. OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND XODTGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/035 TEXTFORM OD.DECWR SA G TXTF:OD.DECWR.S 5.0T4 32 TEXTFORM.OD.DECWR.SA.035 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:53 5.0T9 315 0 THE OUTPUT DEVICE PROCESSOR FOR THE DECWRITER TERMINAL. OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), OD.1403.M (3018/40), AND XODTGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/40 03018/036 TEXTFORM OD.DOC SA G TXTF:OD.DOC.S 5.0T4 33 TEXTFORM.OD.DOC.SA.036 1 LINE 86 22 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:54 5.0T9 316 0 CONTAINS THE ODDOC SUBROUTINE WHICH PRODUCES OUTPUT DEVICE AND FONT DESCRIPTIONS. USES TXTF.ODW (3018/58) AS DATA. OBJECT IN (3018/162). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/58, 3018/162 03018/037 TEXTFORM OD.SKEL SA G TXTF:OD.SKEL.S 5.0T4 34 TEXTFORM.OD.SKEL.SA.037 1 LINE 80 14 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:56 5.0T9 317 0 SKELETON FOR OUTPUT DEVICE PROCESSORS. USEFUL AS A BASIS FOR WRITING AN OD. COPIES XODTGETM (3018/144), GBLC (3018/120), AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/038 TEXTFORM OD.TBLGEN SA G TXTF:OD.TBLGEN.S 5.0T4 35 TEXTFORM.OD.TBLGEN.SA.038 1 LINE 80 29 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:18:58 5.0T9 318 0 CONTAINS THE GENTAB SUBROUTINE WHICH PRODUCES OUTPUT DEVICE PROCESSOR WIDTH TABLES. COPIES GBLS (3018/22), AND GBLC (3018/120). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). OBJECT IN (3018/160). 1 SUN SEP 08/96 15:24:55 Page 879 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 3018/57, 3018/91, 3018/95, 3018/96, 3018/97, 3018/98, 3018/99, 3018/100, 3018/101, 3018/104, 3018/106, 3018/109, 3018/124, 3018/138, 3018/139, 3018/140, 3018/141, 3018/142, 3018/143, 3018/150, 3018/159, 3018/160 03018/039 TEXTFORM OD.1403.D SA G TXTF:OD.1403.D.S 5.0T4 36 TEXTFORM.OD.1403.D.SA.039 1 LINE 81 7 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:01 5.0T9 319 0 DSECTS FOR OUTPUT DEVICE PROCESSORS FOR IBM 1403-COMPATIBLE PRINTERS. COPIED BY (3018/40) AND (3018/43). LINE NUMBERS IN THIS FILE ARE IMPORTANT. 0 Referenced by comments of: 3018/40, 3018/43 03018/040 TEXTFORM OD.1403.M SA G TXTF:OD.1403.M.S 5.0T4 37 TEXTFORM.OD.1403.M.SA.040 1 LINE 81 57 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:02 5.0T9 320 0 CODE FOR OUTPUT DEVICE PROCESSORS FOR IBM 1403-COMPATIBLE PRINTERS. COPIES (3018/39). COPIED BY (3018/35), (3018/41), (3018/44), (3018/45), AND (3018/46). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/35, 3018/39, 3018/41, 3018/44, 3018/45, 3018/46 03018/041 TEXTFORM OD.1403 SA G TXTF:OD.1403.S 5.0T4 38 TEXTFORM.OD.1403.SA.041 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:10 5.0T9 321 0 OUTPUT DEVICE PROCESSOR FOR IBM 1403. OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), XODTGETM (3018/144), AND OD.1403.M (3018/40). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/40 03018/042 TEXTFORM ODM SA G TXTF:ODM.S 5.0T4 39 TEXTFORM.ODM.SA.042 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:11 5.0T9 322 0 CONTAINS TXTFODCM, THE OUTPUT DEVICE LOADER. OBJECT IN *TEXTFORM (3018/10). COPIES GBLS (3018/22) AND ODPD.M (3018/43). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/43, 3018/147 03018/043 TEXTFORM ODPD.M SA G TXTF:ODPD.M.S 5.0T4 40 TEXTFORM.ODPD.M.SA.043 1 LINE 80 20 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:11 5.0T9 323 0 COPIES (3018/39). COPIED BY ODM (3018/42) AND PDM (3018/47). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/39, 3018/42, 3018/47 1 SUN SEP 08/96 15:24:55 Page 880 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/044 TEXTFORM OSOD.1403 SA G TXTF:OSOD.1403.S 5.0T4 41 TEXTFORM.OSOD.1403.SA.044 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:13 5.0T9 324 0 IBM 1403 PRINTER OUTPUT DEVICE PROCESSOR FOR OS. COPIES OD.1403.M (3018/40). OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND XODTGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/40 03018/045 TEXTFORM OSPD.1403 SA G TXTF:OSPD.1403.S 5.0T4 42 TEXTFORM.OSPD.1403.SA.045 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:13 5.0T9 325 0 IBM 1403 PRINTER PROOF DEVICE PROCESSOR FOR OS. COPIES OD.1403.M (3018/40), XODTGETM.S (3018/144), GBLS (3018/22), AND GBLC (3018/120). OBJECT IN TXTFODS (3018/156). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/40 03018/046 TEXTFORM PD.1403 SA G TXTF:PD.1403.S 5.0T4 43 TEXTFORM.PD.1403.SA.046 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:14 5.0T9 326 0 IBM 1403 PRINTER PROOF DEVICE PROCESSOR. COPIES OD.1403.M (3018/40), XODTGETM.S (3018/144), GBLS (3018/22), AND GBLC (3018/120). OBJECT IN TXTFODS (3018/156). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/40 03018/047 TEXTFORM PDM SA G TXTF:PDM.S 5.0T4 44 TEXTFORM.PDM.SA.047 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:15 5.0T9 327 0 CONTAINS TXTFPDCM, THE PROOF DEVICE LOADER. COPIES GBLS (3018/22), GBLC (3018/120), AND ODPD.M (3018/43). OBJECT IN *TEXTFORM (3018/10). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/43, 3018/147 03018/048 TEXTFORM PPEXT SA G TXTF:PPEXT.S 5.0T4 45 TEXTFORM.PPEXT.SA.048 1 LINE 80 16 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:15 5.0T9 328 0 CONTAINS THE CALLPUSH AND CALLPOP SUBROUTINES TO CALL PUSH AND POP, AND PPUNDO, THE INTERNAL PAGE DUMPER. COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/049 TEXTFORM PPPAC SA G TXTF:PPPAC.S 5.0T4 46 TEXTFORM.PPPAC.SA.049 1 LINE 80 40 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:17 5.0T9 329 0 CONTAINS THE PAGE AND TEXT PROCESSING SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 1 SUN SEP 08/96 15:24:55 Page 881 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/050 TEXTFORM PROOF SA G TXTF:PROOF.S 5.0T4 47 TEXTFORM.PROOF.SA.050 1 LINE 81 53 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:21 5.0T9 330 0 IBM 1403 PRINTER PROOF DEVICE PROCESSOR FOR THE AM748 AND APS5 PHOTOTYPESETTERS. OBJECT IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND XODTGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/051 TEXTFORM SCPAC SA G TXTF:SCPAC.S 5.0T4 48 TEXTFORM.SCPAC.SA.051 1 LINE 81 67 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:26 5.0T9 331 0 CONTAINS MANY SUBROUTINES FOR COMMAND PROCESSING, ETC. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/052 TEXTFORM SSPAC SA G TXTF:SSPAC.S 5.0T4 49 TEXTFORM.SSPAC.SA.052 1 LINE 80 14 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:33 5.0T9 332 0 CONTAINS THE REPACK, CRECHECK, DESCHECK, TSKIP, CONVMSG, FIXFDUBS, AND SATRACE SUBROUTINES (MISCELLANEOUS UTILITIES). OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/053 TEXTFORM STPAC SA G TXTF:STPAC.S 5.0T4 50 TEXTFORM.STPAC.SA.053 1 LINE 80 49 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:34 5.0T9 333 0 CONTAINS THE ATXRSYMB AND READSYMB SUBROUTINES AND FRIENDS FOR SYMBOL TABLE AND LAYOUT PROCESSING. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/054 TEXTFORM SYSPAC SA G TXTF:SYSPAC.S 5.0T4 51 TEXTFORM.SYSPAC.SA.054 1 LINE 72 18 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:39 5.0T9 334 0 CONTAINS THE ERROR, TIMER, ATTN, AND PGNT SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/055 TEXTFORM TEXTFORM SA G TXTF:TEXTFORM.S 5.0T4 52 TEXTFORM.TEXTFORM.SA.055 1 LINE 80 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:41 5.0T9 335 0 CONTAINS TEXTFORM, THE MAIN CSECT. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 1 SUN SEP 08/96 15:24:55 Page 882 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/056 TEXTFORM TP SA G TXTF:TP.S 5.0T4 53 TEXTFORM.TP.SA.056 1 LINE 80 32 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:42 5.0T9 336 0 CONTAINS TEXTPROC, THE TEXT PROCESSOR. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/057 TEXTFORM ODT.TN.IWD D G TXTF:ODT.TN.IWD 5.0T4 54 TEXTFORM.ODT.TN.IWD.D.057 1 LINE 65 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:45 5.0T9 337 0 CONTAINS WIDTH TABLES, INPUT TO GENTAB (3018/38) FOR THE IBM 1403 PRINTER OUTPUT DEVICE PROCESSOR, TN PRINT TRAIN. 03018/058 TEXTFORM TXTF.ODW D G TXTF:TXTF.ODW 5.0T4 55 TEXTFORM.TXTF.ODW.D.058 1 LINE 118 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:46 5.0T9 338 0 DESCRIPTIONS OF OUTPUT DEVICES AND FONTS. USED BY OD.DOC (3018/36). 0 Referenced by comments of: 3018/36 03018/059 TEXTFORM MACROS SM G TXTF:MACROS 5.0T4 56 TEXTFORM.MACROS.SM.059 1 LINE 81 96 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:19:47 5.0T9 339 0 MOST TEXTFORM SUBCOMPONENTS REQUIRE THIS MACRO LIBRARY FOR ASSEMBLY. 0 Referenced by comments of: 3018/12, 3018/13, 3018/14, 3018/15, 3018/16, 3018/17, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/24, 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34, 3018/35, 3018/36, 3018/37, 3018/38, 3018/40, 3018/41, 3018/42, 3018/43, 3018/44, 3018/45, 3018/46, 3018/47, 3018/48, 3018/49, 3018/50, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/79, 3018/115, 3018/116, 3018/117, 3018/128, 3018/136, 3018/137, 3018/147, 3018/149, 3018/151, 3018/152, 3018/158 03018/060 TEXTFORM DSECTS SM G TXTF:DSECTS 5.0T4 57 TEXTFORM.DSECTS.SM.060 1 LINE 80 46 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:00 5.0T9 340 0 MOST TEXTFORM SUBCOMPONENTS REQUIRE THIS DSECT LIBRARY FOR ASSEMBLY. 0 Referenced by comments of: 3018/12, 3018/13, 3018/14, 3018/15, 3018/16, 3018/17, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/24, 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34, 3018/35, 3018/36, 3018/37, 3018/38, 3018/40, 3018/41, 3018/42, 3018/43, 3018/44, 3018/45, 3018/46, 3018/47, 3018/48, 3018/49, 3018/50, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/79, 3018/115, 3018/116, 3018/117, 3018/128, 3018/136, 3018/137, 3018/147, 3018/149, 3018/151, 3018/152, 3018/158, 3018/171 03018/061 TEXTFORM SYMBIN D G TXTF:SYMBIN 5.0T4 58 TEXTFORM.SYMBIN.D.061 1 LINE 255 21 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:06 5.0T9 341 0 TEXTFORM INPUT TO BUILD THE SYMBOL TABLE ("ENVIRONMENT") IN (3018/63). SEE THE INTERNALS MANUAL (3018/4) FOR INSTRUCTIONS. 1 SUN SEP 08/96 15:24:55 Page 883 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/062 TEXTFORM BOOTSYMB D G TXTF:BOOTSYMB 5.0T4 59 TEXTFORM.BOOTSYMB.D.062 1 LINE 4096 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:08 5.0T9 342 0 THE BOOTSTRAP SYMBOL TABLE (, , ). 03018/063 TEXTFORM ENVIRONMENT D G ETC:TXTFENVIR 5.0T4 60 TEXTFORM.ENVIRONMENT.D.063 1 LINE 32000 19 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:08 5.0T9 343 ETC:TXTFENVIR 0 THE SYMBOL TABLE USED IN RUNNING *TEXTFORM (3018/10). 0 Referenced by comments of: 3018/61 03018/064 TEXTFORM TXTFLAYOUTS D G ETC:TXTFLAYOUTS 5.0T4 61 TEXTFORM.TXTFLAYOUTS.D.064 1 LINE 252 68 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:09 5.0T9 344 ETC:TXTFLAYOUTS 0 THE LAYOUTS USED BY *TEXTFORM (3018/10). 03018/065 TEXTFORM GFDO OC G TXTF:GFDO.O 5.0T4 62 TEXTFORM.GFDO.OC.065 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:14 5.0T9 345 0 OBJECT OF (3018/25). 0 Referenced by comments of: 3018/25 03018/066 TEXTFORM GFDSTAR OC G TXTF:GFDSTAR.O 5.0T4 63 TEXTFORM.GFDSTAR.OC.066 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:15 5.0T9 346 0 OBJECT OF (3018/23). THIS IS THE VERSION IN *TEXTFORM (3018/10). 0 Referenced by comments of: 3018/23 03018/067 TEXTFORM GFDN OC G TXTF:GFDN.O 5.0T4 64 TEXTFORM.GFDN.OC.067 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:16 5.0T9 347 0 OBJECT OF (3018/24). 0 Referenced by comments of: 3018/24 03018/068 TEXTFORM GFDT OC G TXTF:GFDT.O 5.0T4 65 TEXTFORM.GFDT.OC.068 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:17 5.0T9 348 0 OBJECT OF (3018/26). 0 Referenced by comments of: 3018/26 1 SUN SEP 08/96 15:24:55 Page 884 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/069 TEXTFORM NEWOLD C TXTF:NEWOLD 5.0T4 66 TEXTFORM.NEWOLD.C.069 1 LINE 85 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:18 5.0T9 349 0 COMMANDS TO CREATE A VERSION OF TEXTFORM UNDER OLD:, FROM THE PUBLIC FILE VERSION. 03018/070 TEXTFORM NEWPUB C TXTF:NEWPUB 5.0T4 67 TEXTFORM.NEWPUB.C.070 1 LINE 45 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:19 5.0T9 350 0 COMMANDS TO COPY THE FILE TXTF:TEXTFORM TO *TEXTFORM AND MAKE AN ENTRY TO THE FILE LINKLOG. 03018/071 TEXTFORM NEWSTAR C TXTF:NEWSTAR 5.0T4 68 TEXTFORM.NEWSTAR.C.071 1 LINE 85 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:19 5.0T9 351 0 COMMANDS TO CREATE THE PUBLIC FILE VERSION OF TEXTFORM FROM THE NEW: VERSION. 03018/072 TEXTFORM NEWNEW C TXTF:NEWNEW 5.0T4 69 TEXTFORM.NEWNEW.C.072 1 LINE 81 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:20 5.0T9 352 0 COMMANDS TO CREATE A VERSION OF TEXTFORM UNDER NEW: FROM FILES UNDER TXTF:. 03018/073 TEXTFORM PERCOLATE C # TXTF:PERCOLATE UQV TXTFGROUP LIFT 0 This file is not distributed because it is full of $EXEC commands which none of you have. 03018/074 TEXTFORM LIB C G S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.LIB.C.075 5.0T4 70 TEXTFORM.LIB.C.074 1 LINE 75 1 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:59:40 5.0T9 353 03018/075 TEXTFORM LINK C S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.LINK.C.076 5.0T4 71 TEXTFORM.LINK.C.075 1 LINE 40 1 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:59:41 5.0T9 354 03018/076 TEXTFORM XCSYMB C S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.XCSYMB.C.077 5.0T4 72 TEXTFORM.XCSYMB.C.076 1 LINE 29 1 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:59:41 5.0T9 355 0 COMMANDS TO COPY ENVIR2 --> TXTFENVIR --> OLDENVIR (THE SYMBOL TABLE). 03018/077 TEXTFORM CWKDAY OC G TXTF:CWKDAY.O 5.0T4 73 TEXTFORM.CWKDAY.OC.077 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:38 5.0T9 356 0 OBJECT OF (3018/17). ALSO INCLUDED IN *TEXTFORM (3018/10). 0 Referenced by comments of: 3018/17 1 SUN SEP 08/96 15:24:55 Page 885 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/078 TEXTFORM LOGJOB C S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.LOGJOB.C.079 5.0T4 74 TEXTFORM.LOGJOB.C.078 1 LINE 111 1 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 21:59:43 5.0T9 357 0 COMMANDS TO *FS TO SAVE ETC:TXTFLOG (3018/163). 0 Referenced by comments of: 3018/79, 3018/163 03018/079 TEXTFORM LOG SA G TXTF:LOG.S 5.0T4 75 TEXTFORM.LOG.SA.079 1 LINE 69 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:40 5.0T9 358 0 PROGRAM WHICH DECIDES WHEN TO START LOGJOB (3018/78). READS (3018/78). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/80 03018/080 TEXTFORM LOG OC G TXTF:LOG.O 5.0T4 76 TEXTFORM.LOG.OC.080 1 LINE 80 2 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:40 5.0T9 359 0 OBJECT OF (3018/79). 03018/081 TEXTFORM LAY.SKEL D G TXTF:LAY.SKEL 5.0T4 77 TEXTFORM.LAY.SKEL.D.081 1 LINE 229 6 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:41 5.0T9 360 0 A SKELETON, OR SAMPLE, FOR BUILDING LAYOUTS. SEE "HOW TO BUILD A LAYOUT" IN THE INTERNALS MANUAL (3018/4). 03018/082 TEXTFORM LAY.THES D G TXTF:LAY.THES 5.0T4 78 TEXTFORM.LAY.THES.D.082 1 LINE 197 6 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:43 5.0T9 361 0 THE THESIS LAYOUT. 03018/083 TEXTFORM LAY.TUT D G TXTF:LAY.TUT 5.0T4 79 TEXTFORM.LAY.TUT.D.083 1 LINE 229 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:44 5.0T9 362 0 THE TUTORIAL LAYOUT. 03018/084 TEXTFORM LAY.NEWS D G TXTF:LAY.NEWS 5.0T4 80 TEXTFORM.LAY.NEWS.D.084 1 LINE 136 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:45 5.0T9 363 0 THE NEWSLETTER LAYOUT. 03018/085 TEXTFORM LAY.OUT D G TXTF:LAY.OUT 5.0T4 81 TEXTFORM.LAY.OUT.D.085 1 LINE 198 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:45 5.0T9 364 0 This used to be Layout REPORT, but it is now Layout OUTLINE. 1 SUN SEP 08/96 15:24:55 Page 886 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/086 TEXTFORM LAY.REF D G TXTF:LAY.REF 5.0T4 82 TEXTFORM.LAY.REF.D.086 1 LINE 229 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:46 5.0T9 365 0 THE REFERENCE LAYOUT. 03018/087 TEXTFORM LAY.TECH D G TXTF:LAY.TECH 5.0T4 83 TEXTFORM.LAY.TECH.D.087 1 LINE 229 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:47 5.0T9 366 0 THE TECHNICAL LAYOUT. 03018/088 TEXTFORM LAY.UBC D G TXTF:LAY.UBC 5.0T4 84 TEXTFORM.LAY.UBC.D.088 1 LINE 188 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:48 5.0T9 367 0 LAYOUT UBC. 03018/089 TEXTFORM LAY.UM D O TXTF:LAY.UM 5.0T4 85 TEXTFORM.LAY.UM.D.089 1 LINE 158 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:48 5.0T9 368 0 LAYOUT UM. THIS NEEDS SOME CHANGES, BUT IT DOES WORK. 03018/090 TEXTFORM HYPHDICT D G ETC:TXTFHYPHDICT 5.0T4 86 TEXTFORM.HYPHDICT.D.090 1 LINE 22 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:49 5.0T9 369 ETC:TXTFHYPHDICT 0 THE HYPHENATION DICTIONARY. 03018/091 TEXTFORM WIDTHS D G ETC:TXTFWIDS 5.0T4 87 TEXTFORM.WIDTHS.D.091 1 LINE 1702 192 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:20:51 5.0T9 370 ETC:TXTFWIDS 0 WIDTH TABLES "LIBRARY" FOR OUTPUT PROCESSORS, AS CREATED BY TBLGEN (3018/38). 0 Referenced by comments of: 3018/171 03018/092 TEXTFORM FUNCDEFS D G TXTF:SYSFUNCS 5.0T4 88 TEXTFORM.FUNCDEFS.D.092 1 LINE 137 8 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:00 5.0T9 371 03018/093 TEXTFORM NEWOBJ OC G TXTF:NEWSYS 5.0T4 89 TEXTFORM.NEWOBJ.OC.093 1 LINE 33 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:01 5.0T9 372 0 CONTAINS A COM CARD, AND $CONTINUE WITHS FOR THE OBJECT MODULES IN TEXTFORM. USED BY BUILD (3018/111). 03018/094 TEXTFORM BUILD.SUPP C TXTF:BUILD.SUPP 5.0T4 90 TEXTFORM.BUILD.SUPP.C.094 1 LINE 129 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:02 5.0T9 373 0 REFERS TO "*FORTG". 1 SUN SEP 08/96 15:24:55 Page 887 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/095 TEXTFORM ODT.AJ.IWD D TXTF:ODT.AJ.IWD 5.0T4 91 TEXTFORM.ODT.AJ.IWD.D.095 1 LINE 58 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:03 5.0T9 374 0 GENTAB (3018/38) INPUT FOR ANDERSON-JACOBSON 832 TERMINAL WIDTH/INTERNAL TABLES. 03018/096 TEXTFORM ODT.ALA.IWD D TXTF:ODT.ALA.IWD 5.0T4 92 TEXTFORM.ODT.ALA.IWD.D.096 1 LINE 65 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:04 5.0T9 375 0 GENTAB (3018/38) INPUT FOR IBM 1403 PRINTER ALA PRINT TRAIN WIDTH/INTERNAL TABLES. 03018/097 TEXTFORM ODT.AMM.IWD D TXTF:ODT.AMM.IWD 5.0T4 93 TEXTFORM.ODT.AMM.IWD.D.097 1 LINE 107 22 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:04 5.0T9 376 0 GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER MATH DISK WIDTH/INTERNAL TABLES. 03018/098 TEXTFORM ODT.AMS.IWD D TXTF:ODT.AMS.IWD 5.0T4 94 TEXTFORM.ODT.AMS.IWD.D.098 1 LINE 79 17 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:06 5.0T9 377 0 GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER SCHOOLBOOK DISK WIDTH/INTERNAL TABLES. 03018/099 TEXTFORM ODT.AMT.IWD D TXTF:ODT.AMT.IWD 5.0T4 95 TEXTFORM.ODT.AMT.IWD.D.099 1 LINE 79 15 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:08 5.0T9 378 0 GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER TIMES-ROMAN DISK WIDTH/INTERNAL TABLES. 03018/100 TEXTFORM ODT.AMU.IWD D TXTF:ODT.AMU.IWD 5.0T4 96 TEXTFORM.ODT.AMU.IWD.D.100 1 LINE 79 17 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:10 5.0T9 379 0 GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER UNIVERS DISK WIDTH/INTERNAL TABLES. 03018/101 TEXTFORM ODT.APL.IWD D TXTF:ODT.APL.IWD 5.0T4 97 TEXTFORM.ODT.APL.IWD.D.101 1 LINE 67 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:11 5.0T10 1 0 GENTAB (3018/38) INPUT FOR IBM 1403 PRINTER APL PRINT TRAIN WIDTH/INTERNAL TABLES. 03018/102 TEXTFORM ODT.CHK D TXTF:ODT.CHK 5.0T4 98 TEXTFORM.ODT.CHK.D.102 1 LINE 86 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:12 5.0T10 2 1 SUN SEP 08/96 15:24:55 Page 888 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/103 TEXTFORM ODT.CHSPCN D # TXTF:ODT.CHSPCN UQV TXTFGROUP LIFT 0 No longer required. 03018/104 TEXTFORM ODT.DECWR.IW D TXTF:ODT.DECWR.IW 5.0T4 99 TEXTFORM.ODT.DECWR.IW.D.104 1 LINE 65 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:13 5.0T10 3 0 GENTAB (3018/38) INPUT FOR DECWRITER TERMINAL WIDTH/INTERNAL TABLES. 03018/105 TEXTFORM ODT.DSECT.CH C TXTF:ODT.DSECT.CH 5.0T4 100 TEXTFORM.ODT.DSECT.CH.C.105 1 LINE 71 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:14 5.0T10 4 0 COMMANDS TO GENERATE WIDTH AND INTERNAL TABLES FOR OUTPUT DEVICE AND PROOF PROCESSORS. DTC302 TERMINAL SUPPORT IS NOT YET INCLUDED. CONTAINS MANY $CONTINUE WITH RECORDS FOR TEXTFORM SOURCE COMPONENTS (SOME OF WHICH HAVE NOT BEEN DISTRIBUTED BY UQV). 03018/106 TEXTFORM ODT.P1403M.I D TXTF:ODT.P1403M.I 5.0T4 101 TEXTFORM.ODT.P1403M.I.D.106 1 LINE 65 10 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:15 5.0T10 5 0 GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR IBM 1403 PRINTER PROOF DEVICE PROCESSOR FOR AM748 PHOTOTYPESETTER MATH DISK. 03018/107 TEXTFORM ODT.P1403S.I D # TXTF:ODT.P1403S.I UQV TXTFGROUP LIFT 0 This information is now included in (3018/109). 03018/108 TEXTFORM ODT.P1403T.I D # TXTF:ODT.P1403T.I UQV TXTFGROUP LIFT 0 This information is now included in (3018/109). 03018/109 TEXTFORM ODT.P1403U.I D TXTF:ODT.P1403U.I 5.0T4 102 TEXTFORM.ODT.P1403U.I.D.109 1 LINE 68 7 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:16 5.0T10 6 0 GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR IBM 1403 PRINTER PROOF DEVICE PROCESSOR FOR AM748 PHOTOTYPESETTER DISKS. 0 Referenced by comments of: 3018/107, 3018/108 03018/110 TEXTFORM PERMITS C TXTF:PERMITS 5.0T4 103 TEXTFORM.PERMITS.C.110 1 LINE 70 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:17 5.0T10 7 0 COMMANDS TO CREATE AND PERMIT FILES NEEDED FOR A NEW: VERSION OF TEXTFORM. 1 SUN SEP 08/96 15:24:55 Page 889 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/111 TEXTFORM BUILD C TXTF:BUILD 5.0T4 104 TEXTFORM.BUILD.C.111 1 LINE 679 8 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:18 5.0T10 8 0 Command file to assemble all of TEXTFORM. 0 Referenced by comments of: 3018/93 03018/112 TEXTFORM PUBLISH CRSE WX TXTF:PUB.OUT 5.0T4 105 TEXTFORM.PUBLISH_CRSE.WX.112 1 LINE 121 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:19 5.0T10 9 0 MATERIAL FOR COMPUTER ASSISTED PUBLISHING WITH TEXTFORM COURSE. 03018/113 TEXTFORM AM CHAR TEST WX TXTF:AMCST 5.0T4 106 TEXTFORM.AM_CHAR_TEST.WX.113 1 LINE 124 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:19 5.0T10 10 0 AM748 PHOTOTYPESETTER DESCRIPTION. 03018/114 TEXTFORM APS CHAR TEST WX TXTF:APSCST 5.0T4 107 TEXTFORM.APS_CHAR_TEST.WX.114 1 LINE 132 7 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:20 5.0T10 11 0 APS5 PHOTOTYPESETTER DESCRIPTION. 03018/115 TEXTFORM CMDPAC SA G TXTF:CMDPAC.S 5.0T4 108 TEXTFORM.CMDPAC.SA.115 1 LINE 80 20 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:21 5.0T10 12 0 INTERNAL PAGE COMMAND BUILDER SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/116 TEXTFORM PPDPAC SA G TXTF:PPDPAC.S 5.0T4 109 TEXTFORM.PPDPAC.SA.116 1 LINE 80 18 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:23 5.0T10 13 0 LOGICAL BACKSPACE, TABLE PRINTER, AND OTHER SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/117 TEXTFORM LPPAC SA G TXTF:LPPAC.S 5.0T4 110 TEXTFORM.LPPAC.SA.117 1 LINE 80 48 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:25 5.0T10 14 0 TABLE AND LOGICAL PAGE SUBROUTINES. OBJECT IN *TEXTFORM (3018/10). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/118 TEXTFORM NUCLEUS DSECT SA G TXTF:NUCLEUS 5.0T4 111 TEXTFORM.NUCLEUS_DSECT.SA.118 1 LINE 81 35 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:28 5.0T10 15 0 CONTAINS THE NUCLEUS DSECT, WHICH IS COPIED BY MOST PARTS OF TEXTFORM 1 SUN SEP 08/96 15:24:55 Page 890 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 VIA THE TENTER MACRO. 0 Referenced by comments of: 3018/33 03018/119 TEXTFORM GBLD SA G TXTF:GBLD 5.0T4 112 TEXTFORM.GBLD.SA.119 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:33 5.0T10 16 0 CONTAINS GLOBAL SYMBOL DEFINITIONS, WHICH ARE COPIED BY MANY TEXTFORM SUBCOMPONENTS. 0 Referenced by comments of: 3018/22, 3018/120 03018/120 TEXTFORM GBLC SA G TXTF:GBLC 5.0T4 113 TEXTFORM.GBLC.SA.120 1 LINE 80 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:34 5.0T10 17 0 COMMENTS DESCRIBING SYMBOLS IN GBLD (3018/119). THIS IS COPIED BY MANY TEXTFORM SUBCOMPONENTS. 0 Referenced by comments of: 3018/13, 3018/14, 3018/15, 3018/16, 3018/18, 3018/19, 3018/20, 3018/21, 3018/23, 3018/24, 3018/25, 3018/26, 3018/27, 3018/28, 3018/29, 3018/30, 3018/31, 3018/32, 3018/33, 3018/34, 3018/35, 3018/36, 3018/37, 3018/38, 3018/41, 3018/44, 3018/45, 3018/46, 3018/47, 3018/48, 3018/49, 3018/50, 3018/51, 3018/52, 3018/53, 3018/54, 3018/55, 3018/56, 3018/115, 3018/116, 3018/117, 3018/136, 3018/137, 3018/147, 3018/149, 3018/151, 3018/152, 3018/158 03018/121 TEXTFORM FILES C S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.FILES.C.124 5.0T4 114 TEXTFORM.FILES.C.121 1 LINE 70 1 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 22:01:19 5.0T10 18 0 PROTOTYPE FOR COMMAND FILE TO COPY FILES BETWEEN NEW:, OLD:, AND ETC:. USE $EDIT TO PUT IN THE IDS. 03018/122 TEXTFORM XCWID C S1245 TXTFV1 'TXTFRMV1' FSNAME=TEXTFORM.XCWID.C.125 5.0T4 115 TEXTFORM.XCWID.C.122 1 LINE 72 1 PAGE UQV TXTFGROUP LIFT FEB. 20, 1979 22:01:19 5.0T10 19 0 COMMANDS TO COPY TXTFWIDS --> TXTFWIDS --> OLDTWIDS (THE WIDTH TABLES). 03018/123 TEXTFORM APSWID D TXTF:APS.WID.D 5.0T4 116 TEXTFORM.APSWID.D.123 1 LINE 400 11 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:48 5.0T10 20 0 CHARACTER WIDTHS FOR THE APS5 PHOTOTYPESETTER. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 03018/124 TEXTFORM APSWID C TXTF:APSWID.C 5.0T4 117 TEXTFORM.APSWID.C.124 1 LINE 98 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:49 5.0T10 21 0 COMMANDS TO CREATE GENTAB (3018/38) INPUT FOR THE APS5 PHOTOTYPESETTER. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 1 SUN SEP 08/96 15:24:55 Page 891 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/125 TEXTFORM APSCOM D TXTF:APSKOM.C 5.0T4 118 TEXTFORM.APSCOM.D.125 1 LINE 93 8 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:21:50 5.0T10 22 0 APS5 PHOTOTYPESETTER CHARACTER NAMES. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 03018/126 TEXTFORM APSMERGE SF G S1561 5.0T4 VLO FSNAME=TEXTFORM.APSMERGE.SF.126(1) 119 5.0T4 119 TEXTFORM.APSMERGE.SF.126 1 LINE 80 17 PAGE UQV TXTFGROUP LIFT FEB. 29, 1980 10:02:13 5.0T10 23 0 PROGRAM USED IN CONSTRUCTING APS5 PHOTOTYPESETTER WIDTH/INTERNAL TABLES. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 0 Referenced by comments of: 3018/153 03018/127 TEXTFORM APSDUMP SF G TXTF:APSDMP.FS 5.0T4 120 TEXTFORM.APSDUMP.SF.127 1 LINE 58 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:13 5.0T10 24 03018/128 TEXTFORM APSDUMP SA G TXTF:APSDMP.S 5.0T4 121 TEXTFORM.APSDUMP.SA.128 1 LINE 72 7 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:14 5.0T10 25 0 ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/129 TEXTFORM APSREPAGE SF G S1561 5.0T4 VLO FSNAME=TEXTFORM.APSREPAGE.SF.129(1) 122 5.0T4 122 TEXTFORM.APSREPAGE.SF.129 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT FEB. 29, 1980 10:02:19 5.0T10 26 03018/130 TEXTFORM LAY.APA D TXTF:LAY.APA 5.0T4 123 TEXTFORM.LAY.APA.D.130 1 LINE 248 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:16 5.0T10 27 0 LAYOUT APA. 03018/131 TEXTFORM LAY.JPAL D TXTF:LAY.JPAL 5.0T4 124 TEXTFORM.LAY.JPAL.D.131 1 LINE 223 4 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:17 5.0T10 28 0 LAYOUT JPALEON. 03018/132 TEXTFORM LAY.NUM D TXTF:LAY.NUM 5.0T4 125 TEXTFORM.LAY.NUM.D.132 1 LINE 250 6 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:17 5.0T10 29 0 LAYOUT NUMERATE. (LOCATION OF DOCUMENTATION UNKNOWN.) 03018/133 TEXTFORM LAY.SPI D TXTF:LAY.SPI 5.0T4 126 TEXTFORM.LAY.SPI.D.133 1 LINE 229 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:18 5.0T10 30 0 LAYOUT SPIRES. 1 SUN SEP 08/96 15:24:55 Page 892 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/134 TEXTFORM LAY.THENUM D TXTF:LAY.THENUM 5.0T4 127 TEXTFORM.LAY.THENUM.D.134 1 LINE 197 6 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:19 5.0T10 31 0 LAYOUT THESISNUMERATE. 03018/135 TEXTFORM LISTCALCHARS SF G S1561 5.0T4 VLO FSNAME=TEXTFORM.LISTCALCHARS.SF.135(1) 128 5.0T4 128 TEXTFORM.LISTCALCHARS.SF.135 1 LINE 73 4 PAGE UQV TXTFGROUP LIFT FEB. 29, 1980 10:02:33 5.0T10 32 0 PROGRAM TO PRODUCE WIDTH/INTERNAL TABLES FOR THE CALCOMP OUPUT DEVICE PROCESSOR (3018/137). READS ETC:PLOTALPHA (615/8). 0 Referenced by comments of: 3018/155 03018/136 TEXTFORM OD.APS5 SA G TXTF:OD.APS5.S 5.0T4 129 TEXTFORM.OD.APS5.SA.136 1 LINE 81 56 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:21 5.0T10 33 0 OUTPUT DEVICE PROCESSOR FOR THE APS5 PHOTOTYPESETTER. OBJECT IS IN TXTFODS (3018/156). COPIES GBLC (3018/120), GBLS (3018/22), AND XODGETM (3018/144). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/137 TEXTFORM OD.CALCOMP SA G TXTF:OD.CALCOMP.S 5.0T4 130 TEXTFORM.OD.CALCOMP.SA.137 1 LINE 80 28 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:26 5.0T10 34 0 CALCOMP OUTPUT DEVICE PROCESSOR. USES UM'S PLOTSYS (615/9); OTHER INSTALLATIONS MAY HAVE TO MAKE MINOR CHANGES SO THAT IT WILL WORK. COPIES XODGETM (3018/144), GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/135 03018/138 TEXTFORM ODT.AMC.IWD D TXTF:ODT.AMC.IWD 5.0T4 131 TEXTFORM.ODT.AMC.IWD.D.138 1 LINE 79 16 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:28 5.0T10 35 0 GENTAB (3018/38) INPUT FOR AM748 PHOTOTYPESETTER CHELMSFORD DISK WIDTH/INTERNAL TABLES. 03018/139 TEXTFORM ODT.CALC.ID D TXTF:ODT.CALC.ID 5.0T4 132 TEXTFORM.ODT.CALC.ID.D.139 1 LINE 91 37 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:30 5.0T10 36 0 GENTAB (3018/38) INPUT FOR CALCOMP OUTPUT DEVICE PROCESSOR INTERNAL TABLES. 03018/140 TEXTFORM ODT.SKEL.IWD D TXTF:ODT.SKEL.IWD 5.0T4 133 TEXTFORM.ODT.SKEL.IWD.D.140 1 LINE 65 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:33 5.0T10 37 0 GENTAB (3018/38) INPUT FOR SKELETON OR SAMPLE WIDTH/INTERNAL TABLES. USEFUL WHEN WRITING A NEW OUTPUT DEVICE PROCESSOR. 1 SUN SEP 08/96 15:24:55 Page 893 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/141 TEXTFORM ODT.APS.ID D TXTF:ODT.APS.ID 5.0T4 134 TEXTFORM.ODT.APS.ID.D.141 1 LINE 56 192 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:34 5.0T10 38 0 GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR APS5 PHOTOTYPESETTER OUTPUT DEVICE PROCESSOR. 03018/142 TEXTFORM ODT.APS.WD D TXTF:ODT.APS.WD 5.0T4 135 TEXTFORM.ODT.APS.WD.D.142 1 LINE 56 188 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:46 5.0T10 39 0 GENTAB (3018/38) INPUT FOR WIDTH TABLES FOR APS5 PHOTOTYPESETTER OUTPUT DEVICE PROCESSOR. 03018/143 TEXTFORM ODT.PAPS.IWD D TXTF:ODT.PAPS.IWD 5.0T4 136 TEXTFORM.ODT.PAPS.IWD.D.143 1 LINE 73 19 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:57 5.0T10 40 0 GENTAB (3018/38) INPUT FOR INTERNAL TABLES FOR IBM 1403 PRINTER PROOF DEVICE FOR APS5 OUTPUT DEVICE PROCESSOR. 03018/144 TEXTFORM ODPDTESTMACS SA G TXTF:XODTGETM.S 5.0T4 137 TEXTFORM.ODPDTESTMACS.SA.144 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:27:59 5.0T10 41 0 THIS IS A FILE WHICH CURRENTLY CONTAINS ONLY COMMENTS, BUT WHICH IS INTENDED TO CONTAIN MACROS AND/OR COPY SECTIONS COPIED BY OUTPUT DEVICE AND PROOF DEVICE PROCESSORS. 0 Referenced by comments of: 3018/13, 3018/34, 3018/35, 3018/37, 3018/41, 3018/44, 3018/45, 3018/46, 3018/50, 3018/136, 3018/137 03018/145 TEXTFORM AJDITTO SF G S1561 5.0T4 VLO FSNAME=TEXTFORM.AJDITTO.SF.145(1) 138 5.0T4 138 TEXTFORM.AJDITTO.SF.145 1 LINE 71 4 PAGE UQV TXTFGROUP LIFT FEB. 29, 1980 10:03:53 5.0T10 42 0 AN *DITTO-LIKE PROGRAM FOR TEXTFORM OUTPUT TO THE ANDERSON-JACOBSON 832 TERMINAL. 0 Referenced by comments of: 3018/146 03018/146 TEXTFORM AJDITTO WX S1561 5.0T4 VLO FSNAME=TEXTFORM.AJDITTO.WX.146(1) 139 5.0T4 139 TEXTFORM.AJDITTO.WX.146 1 LINE 144 3 PAGE UQV TXTFGROUP LIFT FEB. 29, 1980 10:03:55 5.0T10 43 0 DOCUMENTATION FOR (3018/145). 03018/147 TEXTFORM WIDCONV SA G TXTF:WIDCONV.S 5.0T4 140 TEXTFORM.WIDCONV.SA.147 1 LINE 80 20 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:06 5.0T10 44 0 FUNCTION WHICH TAKES WIDTH/INTERNAL TABLES AND ADDS DIRECTORY INFORMATION REQUIRED BY TXTFODCM (3018/42) AND TXTFPDCM (3018/47). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) 1 SUN SEP 08/96 15:24:55 Page 894 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/148, 3018/149, 3018/161 03018/148 TEXTFORM WIDCONV D TXTF:WCONV.D 5.0T4 141 TEXTFORM.WIDCONV.D.148 1 LINE 681 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:08 5.0T10 45 0 DATA FOR WIDCONV (3018/147). 03018/149 TEXTFORM WIDPAC SA O TXTF:WIDPAC.S 5.0T4 142 TEXTFORM.WIDPAC.SA.149 1 LINE 80 22 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:09 5.0T10 46 0 CPRDNET (ETC.) USED BY WIDCONV (3018/147). COPIES GBLC (3018/120), AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 03018/150 TEXTFORM ODT.CALC.WD D TXTF:ODT.CALC.WD 5.0T4 143 TEXTFORM.ODT.CALC.WD.D.150 1 LINE 95 37 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:11 5.0T10 47 0 GENTAB (3018/38) INPUT FOR CALCOMP OUTPUT DEVICE PROCESSOR WIDTH TABLES. 03018/151 TEXTFORM FNCHI SA G TXTF:FNCHI.S 5.0T4 144 TEXTFORM.FNCHI.SA.151 1 LINE 80 23 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:14 5.0T10 48 0 CONTAINS THE FONTINFO AND CHARINFO SUBROUTINES TO GET FONT OR CHARACTER INFORMATION. OBJECT IN TXTFFNS (3018/157). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/157 03018/152 TEXTFORM GETDATA SA G TXTF:GTXTDAT.S 5.0T4 145 TEXTFORM.GETDATA.SA.152 1 LINE 80 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:16 5.0T10 49 0 CONTAINS THE GTXTDAT SUBROUTINES TO READ TEXT FROM GUSER AND PASS IT TO TXTFDRVR, IN (3018/19). OBJECT IN TXTFFNS (3018/157). COPIES GBLC (3018/120) AND GBLS (3018/22). ASSEMBLE WITH 2=MACROS (3018/59) AND 3=DSECTS (3018/60). 0 Referenced by comments of: 3018/157 03018/153 TEXTFORM APS.DCT.D D TXTF:APS.DCT.D 5.0T4 146 TEXTFORM.APS.DCT.D.D.153 1 LINE 279 5 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:17 5.0T10 50 0 DATA TO APSMERG (3018/126). 03018/154 TEXTFORM CALCWID C TXTF:CALCWID.C 5.0T4 147 TEXTFORM.CALCWID.C.154 1 LINE 80 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:18 5.0T10 51 1 SUN SEP 08/96 15:24:55 Page 895 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/155 TEXTFORM CALC.ID D TXTF:CALC.ID 5.0T4 148 TEXTFORM.CALC.ID.D.155 1 LINE 85 45 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:19 5.0T10 52 0 DATA TO LISTCALCHARS (3018/135). SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 03018/156 TEXTFORM TXTFODS OL O ETC:TXTFODS 5.0T4 149 TEXTFORM.TXTFODS.OL.156 1 LINE 10130 23 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:23 5.0T10 53 ETC:TXTFODS 0 OBJECT OF ALL OUTPUT DEVICE PROCESSORS. 0 Referenced by comments of: 3018/13, 3018/34, 3018/35, 3018/41, 3018/44, 3018/45, 3018/46, 3018/50, 3018/136, 3018/158 03018/157 TEXTFORM TXTFFNS OL G ETC:TXTFFNS 5.0T4 150 TEXTFORM.TXTFFNS.OL.157 1 LINE 2128 3 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:25 5.0T10 54 ETC:TXTFFNS 0 CONTAINS THE FONTINFO, CHARINFO AND TXTDAT SUBROUTINES. SOURCE IN (3018/151) AND (3018/152). 0 Referenced by comments of: 3018/151, 3018/152 03018/158 TEXTFORM OD.DTC302 SA O TXTF:OD.DTC302.S 5.0T4 151 TEXTFORM.OD.DTC302.SA.158 1 LINE 72 18 PAGE UM LIFT JULY 03, 1981 21:28:26 5.0T10 55 0 OUTPUT DEVICE PROCESSOR FOR A DTC302 AND DIABLO 1620 "DAISY-WHEEL" TERMINALS AND NEC SPINWRITER S520. HAS 1/60TH INCH HORIZONTAL. THE FOLLOWING FEATURES ARE NOT YET IMPLEMENTED: SUBSCRIPTS, SUPERSCRIPTS, 1/48TH INCH VERTICAL UNIT, SPECIAL CHARACTERS, MID-PAGE WHEEL CHANGES, AND OTHERS. SEE ASSEMBLY PARAMETER &WHICH TO GET TERMINAL TYPE. OBJECT IN TXTFODS (3018/156). ASSEMBLE USING *ASMH WITH 2=MACROS (3018/59), 3=DSECTS (3018/60). COPIES GBLC (3018/120) AND GBLS (3018/22). 03018/159 TEXTFORM DTC302 TABLES D TXTF:WIDDTC302 5.0T4 152 TEXTFORM.DTC302_TABLES.D.159 1 LINE 64 1 PAGE UM LIFT JULY 03, 1981 21:28:28 5.0T10 56 0 WIDTH TABLES FOR DTC302. PROCESS WITH TBLGEN (3018/38). NEEDS IMPROVEMENTS, BUT USABLE AS IS. 03018/160 TEXTFORM OD.TBLGEN OC G TXTF:OD.TBLGEN.O 5.0T4 153 TEXTFORM.OD.TBLGEN.OC.160 1 LINE 80 14 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:29 5.0T10 57 0 OBJECT OF (3018/38). EXECUTES AS A TEXTFORM FUNCTION. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 0 Referenced by comments of: 3018/38 1 SUN SEP 08/96 15:24:55 Page 896 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/161 TEXTFORM WIDCONV OC G TXTF:WIDCONV.O 5.0T4 154 TEXTFORM.WIDCONV.OC.161 1 LINE 80 10 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:30 5.0T10 58 0 OBJECT OF (3018/147). EXECUTES AS A TEXTFORM FUNCTION. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 03018/162 TEXTFORM OD.DOC OC G TXTF:OD.DOC.O 5.0T4 155 TEXTFORM.OD.DOC.OC.162 1 LINE 80 10 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:32 5.0T10 59 0 OBJECT OF (3018/36). EXECUTES AS A TEXTFORM FUNCTION. SEE THE INTERNALS MANUAL (3018/4) FOR A DESCRIPTION. 0 Referenced by comments of: 3018/36 03018/163 TEXTFORM TXTFLOG D # ETC:TXTFLOG UQV TXTFGROUP LIFT ETC:TXTFLOG@E 0 LOG FILE WRITTEN BY *TEXTFORM FOR EACH RUN OF *TEXTFORM BY A USER. CONTENTS SAVED ON TAPE BY WEEKLY PROCEDURE. SEE LOGJOB (3018/78). THIS SHOULD BE PERMITTED WE (PKEY=NEW:TEXTFORM,PKEY=*TEXTFORM,PKEY=OLD:TEXTFORM). 0 Referenced by comments of: 3018/78, 3018/164, 3018/166, 3018/167 03018/164 TEXTFORM LOG SA G TXTF:LOG.S 5.0T4 156 TEXTFORM.LOG.SA.164 1 LINE 69 3 PAGE UM LIFT LIFT JULY 03, 1981 21:28:33 5.0T10 60 0 THIS IS THE LOGSAVING PROGRAM DEVELOPED AND USED BY UM. IT DETERMINES IF ETC:TXTFLOG (3018/163), THE TEXTFORM STATISTICS FILE, SHOULD BE SAVED, BASED ON THE TIME OF THE LAST SAVE. IF THE PROGRAM DETERMINES THAT THE STATISTICS FILE SHOULD BE SAVED, IT SUBMITS A BATCH JOB, (3018/169, WHICH WILL RUN THE LOGSAVE PROGRAM, (3018/167), TO SAVE THE STATISTICS FILE ON TAPE. IT ALSO REPORTS ERRORS WHICH OCCURRED WHILE SAVING ETC:TXTFLOG. 03018/165 TEXTFORM LOG OC G TXTF:LOG.O 5.0T4 157 TEXTFORM.LOG.OC.165 1 LINE 80 2 PAGE UM LIFT LIFT JULY 03, 1981 21:28:34 5.0T10 61 03018/166 TEXTFORM LOGJOB C G TXTF:LOGSAVEJOB 5.0T4 158 TEXTFORM.LOGJOB.C.166 1 LINE 53 1 PAGE UM LIFT LIFT JULY 03, 1981 21:28:35 5.0T10 62 0 BATCH JOB TO SAVE ETC:TXTFLOG (3018/163), THE TEXTFORM STATISTICS FILE, ON TAPE. THESE COMMANDS RUN THE LOGSAVE PROGRAM (3018/167). NEGATIVE LINE NUMBERS CONTAIN INFORMATION USED BY LOGSAVE. THE PASSWORD MUST BE SUPPLIED ON LINE 2 AND THE MOUNT COMMAND ON LINE -1 MUST BE MODIFIED BEFORE IT IS ACTUALLY USED. 0 Referenced by comments of: 3018/167 1 SUN SEP 08/96 15:24:55 Page 897 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/167 TEXTFORM LOGSAVE SA G S1561 5.0T4 VLO FSNAME=TEXTFORM.LOGSAVE.SA.167(1) 159 5.0T4 159 TEXTFORM.LOGSAVE.SA.167 1 LINE 67 4 PAGE UM LIFT LIFT FEB. 29, 1980 10:08:11 5.0T10 63 0 PROGRAM TO SAVE ETC:TXTFLOG (3018/163), THE TEXTFORM STATISTICS FILE, ON TAPE. THE PROGRAM IS RUN BY COMMANDS IN (3018/166). 0 Referenced by comments of: 3018/164, 3018/166 03018/168 TEXTFORM LOGSAVE OC G S1561 5.0T4 VLO FSNAME=TEXTFORM.LOGSAVE.OC.168(1) 160 5.0T4 160 TEXTFORM.LOGSAVE.OC.168 1 LINE 80 2 PAGE UM LIFT LIFT FEB. 29, 1980 10:08:12 5.0T10 64 03018/169 TEXTFORM BUGS P TXTF:TEXTFORM.BUG 5.0T4 161 TEXTFORM.BUGS.P.169 1 LINE 68 1 PAGE UQV TXTFGROUP LIFT JULY 03, 1981 21:28:58 5.0T10 65 0 LIST OF SOME VERSION 1 BUGS. 03018/170 TEXTFORM INSTNOTES WX S1561 5.0T4 VLO FSNAME=TEXTFORM.INSTNOTES.WX.170(1) 162 5.0T4 162 TEXTFORM.INSTNOTES.WX.170 1 LINE 89 4 PAGE UM LIFT FEB. 29, 1980 10:08:27 5.0T10 66 0 NOTES COMPILED WHILE INSTALLING VERSION 1 OF TEXTFORM AT UM. 03018/171 TEXTFORM WIDUTIL SA S TXTF:WIDUTIL 5.0T4 163 TEXTFORM.WIDUTIL.SA.171 1 LINE 72 14 PAGE UM LIFT JULY 03, 1981 21:29:02 5.0T10 67 0 OBJUTIL FOR OUTPUT PROCESSOR WIDTH TABLE LIBRARIES, E.G., ETC:TXTFWIDS (3018/91). THIS IS A STAND-ALONE PROGRAM. ASSEMBLE WITH 2=DSECTS (3018/60). COPIES GBLS (3018/22). THIS IS A PRELIMINARY VERSION. 03018/172 TEXTFORM WIDUTIL OC S TXTF:WIDUTILX 5.0T4 164 TEXTFORM.WIDUTIL.OC.172 1 LINE 80 5 PAGE UM LIFT JULY 03, 1981 21:29:05 5.0T10 68 03018/173 TEXTFORM WIDUTIL WX TXTF:WWIDUTIL 5.0T4 165 TEXTFORM.WIDUTIL.WX.173 1 LINE 72 4 PAGE UM LIFT JULY 03, 1981 21:29:06 5.0T10 69 0 USAGE AND INTERNALS WRITEUP FOR THE PRELIMINARY VERSION OF WIDUTIL. 03018/174 TEXTFORM MACROS WX S COPY:JONMACLIBTXT 5.0T4 166 TEXTFORM.MACROS.WX.174 1 LINE 143 7 PAGE UBC DUKE UNSP JULY 03, 1981 21:29:06 5.0T10 70 0 THIS FILE CONTAINS A LARGE NUMBER OF TEXTFORM MACROS, ETC. DEVELOPED BY JON NIGHTINGALE AND TINA DUKE TO CORRESPOND TO JON:MACLIB WHICH IS DISTRIBUTED BY UM AS (308/18), FOR PRODUCING DOCUMENTS IN UBC STYLE. THIS IS A PRELIMINARY VERSION. 1 SUN SEP 08/96 15:24:55 Page 898 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03018/175 TEXTFORM LAY.TYNE D O S1561 5.0T4 VLO FSNAME=TEXTFORM.LAY.TYNE.D.175(1) 167 5.0T4 167 TEXTFORM.LAY.TYNE.D.175 1 LINE 160 9 PAGE UNE HUNTER LIFT FEB. 09, 1980 16:08:43 5.0T10 71 0 NUMAC documentation group standards layout. 03018/176 TEXTFORM LAY.DEE D O S1561 5.0T4 VLO FSNAME=TEXTFORM.LAY.DEE.D.176(1) 168 5.0T4 168 TEXTFORM.LAY.DEE.D.176 1 LINE 187 9 PAGE UNE HUNTER LIFT FEB. 09, 1980 16:08:49 5.0T10 72 0 NUMAC general layout with numbered headings. 03019/001 VAM748 # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO SIMULATE THE AM748 ON A LINE PRINTER. 03020/001 FASTSET # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO CONVERT EBCDIC TEXT (PLUS A BUNCH OF CONTROLS) TO AM748 PHOTOTYPESETTER INPUT. 03021/001 SETUP-DECK MAKER # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO GENERATE SETUP DECKS USING VARYING CARD STOCKS. 03023/001 *ASSIST SERVICE MODULE SA G S1561 5.0T4 VLO FSNAME=ASSIST.SERVICE_MODULE.SA.001(1) 169 5.0T4 169 ASSIST.SERVICE_MODULE.SA.001 1 LINE 80 143 PAGE UQV J BODWIN J BODWIN JUNE 22, 1977 22:07:17 5.0T10 73 0 BASE SOURCE FOR ASSIST SERVICE MODULE (I.E., I/O, MAIN PROGRAM, INTERRUPTS, ETC.). ASSEMBLE WITH ASSISTMACLIB (3023/10). 0 Referenced by comments of: 309/1, 3023/2, 3023/10 03023/002 *ASSIST SERVICE MODULE UU G S1561 5.0T4 VLO FSNAME=ASSIST.SERVICE_MODULE.UU.002(1) 170 5.0T4 170 ASSIST.SERVICE_MODULE.UU.002 1 LINE 72 30 PAGE UQV J BODWIN J BODWIN DEC. 17, 1978 15:40:57 5.0T10 74 0 UPDATE TO BE APPLIED TO (3023/1) TO YIELD SERVICE MODULE SOURCE. ASSEMBLE UPDATED SOURCE USING ASSISTMACLIB (3023/10). 0 Referenced by comments of: 3023/11 03023/003 *ASSIST ASSEMBLER SA G S1561 5.0T4 VLO FSNAME=ASSIST.ASSEMBLER.SA.003(1) 171 5.0T4 171 ASSIST.ASSEMBLER.SA.003 1 LINE 80 185 PAGE UQV J BODWIN J BODWIN JUNE 22, 1977 22:07:35 5.0T10 75 0 BASE SOURCE FOR ASSEMBLER OF THE ASSIST PACKAGE. 1 SUN SEP 08/96 15:24:55 Page 899 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 Referenced by comments of: 3023/4, 3023/10 03023/004 *ASSIST ASSEMBLER UU G S1561 5.0T4 VLO FSNAME=ASSIST.ASSEMBLER.UU.004(1) 172 5.0T4 172 ASSIST.ASSEMBLER.UU.004 1 LINE 72 7 PAGE UQV J BODWIN J BODWIN DEC. 17, 1978 15:41:04 5.0T10 76 0 UPDATE TO BE APPLIED TO (3023/3) TO YIELD ASSEMBLER SOURCE. ASSEMBLE UPDATED SOURCE USING ASSISTMACLIB (3023/10). 0 Referenced by comments of: 3023/11 03023/005 *ASSIST MACRO PHASE SA G S1561 5.0T4 VLO FSNAME=ASSIST.MACRO_PHASE.SA.005(1) 173 5.0T4 173 ASSIST.MACRO_PHASE.SA.005 1 LINE 80 139 PAGE UQV J BODWIN J BODWIN JUNE 22, 1977 22:07:59 5.0T10 77 0 BASE SOURCE FOR MACRO PROCESSOR OF ASSIST PACKAGE. 0 Referenced by comments of: 3023/6, 3023/10 03023/006 *ASSIST MACRO PHASE UU G S1561 5.0T4 VLO FSNAME=ASSIST.MACRO_PHASE.UU.006(1) 174 5.0T4 174 ASSIST.MACRO_PHASE.UU.006 1 LINE 72 1 PAGE UQV J BODWIN J BODWIN DEC. 17, 1978 15:41:09 5.0T10 78 0 UPDATE TO BE APPLIED TO (3023/5) TO YIELD MACRO PROCESSOR SOURCE. ASSEMBLE UPDATED SOURCE USING ASSISTMACLIB (3023/10). 0 Referenced by comments of: 3023/11 03023/007 *ASSIST SIMULATOR SA G S1561 5.0T4 VLO FSNAME=ASSIST.SIMULATOR.SA.007(1) 175 5.0T4 175 ASSIST.SIMULATOR.SA.007 1 LINE 80 74 PAGE UQV J BODWIN J BODWIN FEB. 12, 1979 16:01:18 5.0T10 79 0 Referenced by comments of: 3023/8 03023/008 *ASSIST SIMULATOR UU G S1561 5.0T4 VLO FSNAME=ASSIST.SIMULATOR.UU.008(1) 176 5.0T4 176 ASSIST.SIMULATOR.UU.008 1 LINE 72 5 PAGE UQV J BODWIN J BODWIN DEC. 17, 1978 15:41:37 5.0T10 80 0 UPDATE TO BE APPLIED TO (3023/7) TO YIELD SIMULATOR SOURCE. 0 Referenced by comments of: 3023/11 03023/009 *ASSIST INTERFACE SA G S1561 5.0T4 VLO FSNAME=ASSIST.INTERFACE.SA.009(1) 177 5.0T4 177 ASSIST.INTERFACE.SA.009 1 LINE 80 5 PAGE UM J BODWIN DEC. 17, 1978 15:50:37 0 Interface to FIX (1002) for Assist I/O. Copies GLOBALS from FIX macro library (1002/12) and FIODSECT (1002/5). 0 Referenced by comments of: 3023/11 1 SUN SEP 08/96 15:24:55 Page 900 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03023/010 *ASSIST MACRO LIB SM G S1561 5.0T4 VLO FSNAME=ASSIST.MACRO_LIB.SM.010(1) 178 5.0T4 178 ASSIST.MACRO_LIB.SM.010 1 LINE 80 108 PAGE UQV J BODWIN J BODWIN DEC. 18, 1978 15:22:02 5.0T10 82 0 MACRO LIBRARY USED BY UPDATED (3023/1), (3023/3), AND (3023/5). INCLUDES THE OLD, NO LONGER DISTRIBUTED, SOURCE1 (SUNDRIES) AS A COPY SECTION. OLD SOURCE1 UPDATES INCLUDED. 0 Referenced by comments of: 3023/1, 3023/2, 3023/4, 3023/6, 3023/11 03023/011A *ASSIST *ASSIST OE G *ASSIST 5.1T3 293 ASSIST.?ASSIST.OE.011 1 SEQ 28760 16 PAGE UQV J BODWIN J BODWIN JULY 23, 1983 15:27:44 *ASSIST 0 CURRENT, LINKEDITED ASSIST OBJECT COMPRISED OF OBJECT FROM (3023/2), (3023/4), (3023/6), (3023/8), (3023/9), AND (3023/10). THE SYSTEM MACRO LIBRARY FEATURE (3023/6) REFERENCES THE FILE *ASSISTMAC (3023/12). HAS A $CONTINUE WITH *LIBRARY RECORD. ********************************************************************** D5.1 version: This is included in D5.1 because it was reassembled with FIODSECT (1002/5). ********************************************************************** 0 Referenced by comments of: 3023/12 03023/012 *ASSIST *ASSISTMAC SM *ASSISTMAC 5.0T4 180 ASSIST.*ASSISTMAC.SM.012 1 LINE 72 5 PAGE UQV J BODWIN J BODWIN JULY 03, 1981 21:31:22 5.0T10 84 *ASSISTMAC 0 ASSIST "SYSTEM" MACRO LIBRARY, REFERENCED BY (3023/11). 0 Referenced by comments of: 3023/11 03023/013 *ASSIST TEST PROGRAMS SA S1561 5.0T4 VLO FSNAME=ASSIST.TEST_PROGRAMS.SA.013(1) 181 5.0T4 181 ASSIST.TEST_PROGRAMS.SA.013 1 LINE 73 9 PAGE UQV J BODWIN J BODWIN JUNE 10, 1977 13:20:14 5.0T10 85 0 TEST PROGRAMS TO EXERCISE ALL FEATURES OF ASSIST. 03024/001A BENCHMARK - TERMINAL DSR SA G BNCH:DSR.S 5.1T3 294 BENCHMARK_-_TERMINAL.DSR.SA.001 1 LINE 114 33 PAGE UM OGDEN JULY 23, 1983 15:27:44 BNCH:DSR.S 0 BENCHMARK DSR. ALLOWS SIMULATION OF MANY TERMINAL USERS ENTERING INPUT AS SPECIFIED IN *SCRIPTN AT A SPECIFIED TYPING RATE WITH SPECIFIED "THINK" TIMES AND WITH OUTPUT (THROWN AWAY) AT A SPECIFIED RATE. COPIES COPY:GLOBALS (1026/3), COPY:LLMPSEQU(100) (087), COPY:CDCADSECT (3024/24), *GDINFODSECT (594), *SENSEDSECT (3025), and COPY:BNCHSTATDSCT (3024/99). ASSEMBLE USING COPY:MTS.MACROS (344/3) AND COPY:MISC.MACROS (728). 0 Referenced by comments of: 3024/5, 3024/22, 3024/30, 3024/99 1 SUN SEP 08/96 15:24:55 Page 901 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/002A BENCHMARK - TERMINAL DSR OC G *BNCHRTN 5.1T3 295 BENCHMARK_-_TERMINAL.DSR.OC.002 1 LINE 8064 7 PAGE UM OGDEN JULY 23, 1983 15:27:46 *BNCHRTN 03024/003A BENCHMARK - TERMINAL MONITOR SA G BNCH:MONITOR.S 5.1T3 296 BENCHMARK_-_TERMINAL.MONI.SA.003 1 LINE 72 10 PAGE UM OGDEN JULY 23, 1983 15:27:46 BNCH:MONITOR.S 0 PROGRAM TO CONTROL BENCHMARK RUNS. COPIES COPY:CDCADSECT (3024/24) AND COPY:JOBSTA (413/9). 0 Referenced by comments of: 3024/22, 3024/27, 3024/29 03024/004A BENCHMARK - TERMINAL MONITOR OC G BNCH:MONITOR 5.1T3 297 BENCHMARK_-_TERMINAL.MONI.OC.004 1 LINE 4782 6 PAGE UM OGDEN JULY 23, 1983 15:27:47 BNCH:MONITOR 03024/005 BENCHMARK - TERMINAL ANALYSIS SF O BNCH:ANALYSIS.S 5.0T4 186 BENCHMARK_-_TERMINAL.ANAL.SF.005 1 LINE 73 3 PAGE UM OGDEN JULY 03, 1981 21:31:35 5.0T10 90 BNCH:ANALYSIS.S 0 PROGRAM TO PRINT THE DATA COLLECTED BY (3024/1). 03024/006 BENCHMARK - TERMINAL ANALYSIS OC O BNCH:ANALYSIS 5.0T4 187 BENCHMARK_-_TERMINAL.ANAL.OC.006 1 LINE 1668 4 PAGE UM OGDEN JULY 03, 1981 21:31:36 5.0T10 91 BNCH:ANALYSIS 03024/007A BENCHMARK - TERMINAL SCRIPT POINTER D *SCRIPTPTRFILE 5.1T3 298 BENCHMARK_-_TERMINAL.SCRI.D.007 1 LINE 24 1 PAGE UM OGDEN JULY 23, 1983 15:27:47 *SCRIPTPTRFILE 0 DATA FILE USED BY MTS TO MAP THE PSEUDO-DEVICE NAMES *SN* INTO SCRIPT FILE NAMES. 03024/008A BENCHMARK - TERMINAL SCRIPT 1 C *SCRIPT1 5.1T3 299 BENCHMARK_-_TERMINAL.SCRI.C.008 1 LINE 90 3 PAGE UM OGDEN JULY 23, 1983 15:27:48 *SCRIPT1 0 SCRIPT WHICH USES EDITOR FAST INSERT MODE. 03024/009A BENCHMARK - TERMINAL SCRIPT 2 C *SCRIPT2 5.1T3 300 BENCHMARK_-_TERMINAL.SCRI.C.009 1 LINE 52 1 PAGE UM OGDEN JULY 23, 1983 15:27:48 *SCRIPT2 0 SCRIPT WHICH USES THE EDITOR. 03024/010A BENCHMARK - TERMINAL SCRIPT 3 C *SCRIPT3 5.1T3 301 BENCHMARK_-_TERMINAL.SCRI.C.010 1 LINE 56 1 PAGE UM OGDEN JULY 23, 1983 15:27:48 *SCRIPT3 0 SCRIPT WHICH ENTERS, COMPILES, AND RUNS THE ETEST (COMPUTE E TO 2500 DECIMAL PLACES) PROGRAM. 1 SUN SEP 08/96 15:24:55 Page 902 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/011A BENCHMARK - TERMINAL SCRIPT 4 C *SCRIPT4 5.1T3 302 BENCHMARK_-_TERMINAL.SCRI.C.011 1 LINE 58 1 PAGE UM OGDEN JULY 23, 1983 15:27:48 *SCRIPT4 0 INTERACTIVE FORTRAN (IF) SCRIPT. 03024/012A BENCHMARK - TERMINAL SCRIPT 5 C *SCRIPT5 5.1T3 303 BENCHMARK_-_TERMINAL.SCRI.C.012 1 LINE 85 1 PAGE UM OGDEN JULY 23, 1983 15:27:48 *SCRIPT5 0 ASSEMBLER SCRIPT. 03024/013 BENCHMARK - TERMINAL SCRIPT 5 DATA SA BNCH:WSG.TAPE 5.0T4 194 BENCHMARK_-_TERMINAL.SCRI.SA.013 1 LINE 72 47 PAGE UM OGDEN JULY 03, 1981 21:31:41 5.0T10 98 BNCH:WSG.TAPE 0 ASSEMBLY SOURCE FOR PROGRAM ASSEMBLED BY SCRIPT 5. REQUIRES (3024/100), (3024/101), AND (3024/103). COPIES *CNFGINFODSECT (654). 0 Referenced by comments of: 3024/100, 3024/101, 3024/102, 3024/103 03024/014A BENCHMARK - TERMINAL SCRIPT 6 C *SCRIPT6 5.1T3 304 BENCHMARK_-_TERMINAL.SCRI.C.014 1 LINE 40 1 PAGE UM OGDEN JULY 23, 1983 15:27:49 *SCRIPT6 0 FAST FOURIER TRANSFORM SCRIPT. 03024/015 BENCHMARK - TERMINAL SCRIPT 6 PGM SF G S1561 5.0T4 VLO FSNAME=BENCHMARK_-_TERMINAL.SCRI.SF.015(1) 196 5.0T4 196 BENCHMARK_-_TERMINAL.SCRI.SF.015 1 LINE 71 6 PAGE UM OGDEN AUG. 28, 1975 17:00:57 5.0T10 100 0 DOUBLE PRECISION FFT PROGRAM IN FTN H WHICH IS RUN BY SCRIPT 6. 0 Referenced by comments of: 3024/16, 3024/17 03024/016 BENCHMARK - TERMINAL SCRIPT 6 PGM OE G BNCH:FFT.HD 5.0T4 197 BENCHMARK_-_TERMINAL.SCRI.OE.016 1 SEQ 1440 2 PAGE UM OGDEN JULY 03, 1981 21:31:50 5.0T10 101 BNCH:FFT.HD 0 Object of (3024/15). 0 Referenced by comments of: 3024/17 03024/017 BENCHMARK - TERMINAL SCRIPT 6 DATA D BNCH:FFT.DATA 5.0T4 198 BENCHMARK_-_TERMINAL.SCRI.D.017 1 LINE 11 1 PAGE UM OGDEN JULY 03, 1981 21:31:51 5.0T10 102 BNCH:FFT.DATA 0 DATA FOR SCRIPT 6 FFT PROGRAM (3024/15). Data for Script 6 FFT program (3024/16). 1 SUN SEP 08/96 15:24:55 Page 903 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/018A BENCHMARK - TERMINAL SCRIPT 7 C *SCRIPT7 5.1T3 305 BENCHMARK_-_TERMINAL.SCRI.C.018 1 LINE 64 1 PAGE UM OGDEN JULY 23, 1983 15:27:49 *SCRIPT7 0 BIG FORTRAN SCRIPT. 03024/019 BENCHMARK - TERMINAL SCRIPT 7 PGM SF G BNCH:SCRIPT7PGM 5.0T4 200 BENCHMARK_-_TERMINAL.SCRI.SF.019 1 LINE 72 4 PAGE UM OGDEN JULY 03, 1981 21:31:53 5.0T10 104 BNCH:SCRIPT7PGM 0 PROGRAM USED BY SCRIPT 7. 03024/020A BENCHMARK - TERMINAL SCRIPT 8 C *SCRIPT8 5.1T3 306 BENCHMARK_-_TERMINAL.SCRI.C.020 1 LINE 69 1 PAGE UM OGDEN JULY 23, 1983 15:27:49 *SCRIPT8 0 TAXIR SCRIPT. 03024/021 BENCHMARK - TERMINAL SCRIPT 8 DATA D BNCH:USE.T 5.0T4 202 BENCHMARK_-_TERMINAL.SCRI.D.021 1 LINE 32764 92 PAGE UM OGDEN JULY 03, 1981 21:31:54 5.0T10 106 BNCH:USE.T 03024/022 BENCHMARK - TERMINAL COMM AREA SA G BNCH:SEG2.S 5.0T4 204 BENCHMARK_-_TERMINAL.COMM.SA.023 1 LINE 69 1 PAGE UM OGDEN JULY 03, 1981 21:32:00 5.0T10 108 BNCH:SEG2.S 0 COMMUNICATIONS AREA USED BY BNCH:DSR.S (3024/1) AND BNCH:MONITOR.S (3024/3). MUST BE LOADED INTO SHARED VM PRIOR TO RUNNING BNCH:MONITOR. COPIES COPY:CDCADSECT (3024/24). 03024/023 BENCHMARK - TERMINAL COMM AREA OC G BNCH:SEG2 5.0T4 205 BENCHMARK_-_TERMINAL.COMM.OC.024 1 LINE 80 4 PAGE UM OGDEN JULY 03, 1981 21:32:01 5.0T10 109 BNCH:SEG2 03024/024 BENCHMARK - TERMINAL CDCADSECT SA G COPY:CDCADSECT 5.0T4 206 BENCHMARK_-_TERMINAL.CDCA.SA.025 1 LINE 60 1 PAGE UM OGDEN JULY 03, 1981 21:32:02 5.0T10 110 COPY:CDCADSECT 0 COPY SECTION DESCRIBING THE FORMAT OF AN ENTRY IN THE COMMUNICATIONS AREA. 0 Referenced by comments of: 3024/1, 3024/3, 3024/22 03024/025 BENCHMARK - TERMINAL SOURCE FILE C BNCH:SCR 5.0T4 207 BENCHMARK_-_TERMINAL.SOUR.C.026 1 LINE 76 2 PAGE UM OGDEN JULY 03, 1981 21:32:03 5.0T10 111 BNCH:SCR 0 COMMAND FILE TO RUN A TERMINAL BENCHMARK. 0 Referenced by comments of: 3024/26, 3024/27 03024/026C BENCHMARK - TERMINAL MACROS CM G BNCH:MACROS 5.1T3 307 BENCHMARK_-_TERMINAL.MACR.CM.026 1 LINE 75 4 PAGE UM OGDEN JULY 23, 1983 15:27:49 BNCH:MACROS 0 Command macro library to perform benchmarks. Much better than (3024/25). 1 SUN SEP 08/96 15:24:55 Page 904 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/027 BENCHMARK - TERMINAL START COMMANDS D BNCH:CMDS 5.0T4 208 BENCHMARK_-_TERMINAL.STAR.D.027 1 LINE 9 1 PAGE UM OGDEN JULY 03, 1981 21:32:03 5.0T10 112 BNCH:CMDS 0 BNCH:MONITOR (3024/3) START COMMANDS, USED BY BNCH:SCR (3024/25). 03024/028 BENCHMARK - TERMINAL TEST SCRIPTS C BNCH:TEST 5.0T4 209 BENCHMARK_-_TERMINAL.TEST.C.028 1 LINE 62 1 PAGE UM OGDEN JULY 03, 1981 21:32:04 5.0T10 113 BNCH:TEST 0 COMMAND FILE TO PRODUCE A PRINTED COPY OF THE EXECUTION OF ONE OF THE SCRIPTS TO CHECK THAT IT WORKS CORRECTLY. 03024/029 BENCHMARK - TERMINAL MON WRITEUP WF BNCH:MONITOR.F 5.0T4 210 BENCHMARK_-_TERMINAL.MON.WF.029 1 LINE 129 5 PAGE UM OGDEN JULY 03, 1981 21:32:05 5.0T10 114 BNCH:MONITOR.F 0 WRITEUP DESCRIBING BNCH:MONITOR (3024/3). 03024/030 BENCHMARK - TERMINAL DSR WRITEUP WF BNCH:DSR.F 5.0T4 211 BENCHMARK_-_TERMINAL.DSR.WF.030 1 LINE 97 6 PAGE UM OGDEN JULY 03, 1981 21:32:06 5.0T10 115 BNCH:DSR.F 0 WRITEUP DESCRIBING THE BENCHMARK DSR (3024/1). 03024/031 BENCHMARK - TERMINAL STATSUM SG G BNCH:STATSUM.S 5.0T4 212 BENCHMARK_-_TERMINAL.STAT.SG.031 1 LINE 104 3 PAGE UM OGDEN JULY 03, 1981 21:32:07 5.0T10 116 BNCH:STATSUM.S 0 PROGRAM TO READ *STATISTICS DATA AND PRODUCE MEAN, SD, MIN, AND MAX FIGURES BY SCRIPT FOR CPU TIME, VMI, WAIT VMI, AND ELAPSED TIME. CALLS THE PAR SUBR (687/1), THE JVCT SUBR (674), AND THE BECORI SUBR WHICH IS PART OF NAAS:IMSL (NOT CURRENTLY DISTRIBUTED). 03024/032 BENCHMARK - TERMINAL STATSUM OE G BNCH:STATSUM 5.0T4 213 BENCHMARK_-_TERMINAL.STAT.OE.032 1 LINE 3770 5 PAGE UM OGDEN JULY 03, 1981 21:32:08 5.0T10 117 BNCH:STATSUM 03024/033 BENCHMARK - TERMINAL BNCH:STATS D # BNCH:STATS UM OGDEN BNCH:STATS@E 0 FILE USED TO COLLECT DATA DURING BENCHMARK RUNS. 03024/034 BENCHMARK - TERMINAL BNCH:OUTPUT D # BNCH:OUTPUT UM OGDEN BNCH:OUTPUT@E 0 FILE USED TO SAVE OUTPUT WHILE TESTING BENCHMARK SCRIPTS. 1 SUN SEP 08/96 15:24:55 Page 905 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/035 BENCHMARK - TERMINAL BNCH:TSTATS D # BNCH:TSTATS UM OGDEN BNCH:TSTATS@E 0 FILE USED TO SAVE DSR STATISTICS WHILE TESTING BENCHMARK SCRIPTS. 03024/036C BENCHMARK - TERMINAL BNCH:TSTATS D # BNCH:TAXIRSTATS UM OGDEN BNCH:TAXIRSTATS@E 03024/037 BENCHMARK - TERMINAL CRE FM INPUT C BNCH:CREFMINPUT 459 5.0T4 214 BENCHMARK_-_TERMINAL.CRE.C.036 1 LINE 67 1 PAGE UM OGDEN JULY 03, 1981 21:32:08 5.0T10 118 BNCH:CREFMINPUT 0 COMMAND FILE THAT MAY BE $SOURCED TO TO CREATE FILEMOVE (1020) INPUT AS THE FIRST STEP IN MOVING FROM A ONE-PACK TO A MULTI-PACK SYSTEM. 03024/038 BENCHMARK - TERMINAL LISTFILES SA G BNCH:LISTFILES.S 460 5.0T4 215 BENCHMARK_-_TERMINAL.LIST.SA.037 1 LINE 72 2 PAGE UM OGDEN JULY 03, 1981 21:32:09 5.0T10 119 BNCH:LISTFILES.S 0 PROGRAM TO PROCURE A LIST OF ALL FILES IN THE FILE SYSTEM ON SPUNCH. ASSEMBLE USING COPY:FILE.MACROS (482/45). 0 Referenced by comments of: 3024/40 03024/039 BENCHMARK - TERMINAL LISTFILES OC G BNCH:LISTFILES 5.0T4 216 BENCHMARK_-_TERMINAL.LIST.OC.038 1 LINE 80 1 PAGE UM OGDEN JULY 03, 1981 21:32:10 5.0T10 120 BNCH:LISTFILES 03024/040 BENCHMARK - TERMINAL ASSIGNVOL SS G BNCH:ASSIGNVOL.S 5.0T4 217 BENCHMARK_-_TERMINAL.ASSI.SS.039 1 LINE 66 1 PAGE UM OGDEN JULY 03, 1981 21:32:11 5.0T10 121 BNCH:ASSIGNVOL.S 0 PROGRAM WHICH TAKES A VOLUME NAME PREFIX AND MAXIMUM VOLUME NUMBER PLUS THE FILE LIST PRODUCED BY THE LISTFILE PROGRAM (3024/38) AND PROCURES OUTPUT THAT CAN BE USED AS INPUT TO FILEMOVE (1020). 03024/041 BENCHMARK - TERMINAL ASSIGNVOL OC G BNCH:ASSIGNVOL 5.0T4 218 BENCHMARK_-_TERMINAL.ASSI.OC.040 1 LINE 80 4 PAGE UM OGDEN JULY 03, 1981 21:32:12 5.0T10 122 BNCH:ASSIGNVOL 0 HAS A $CONTINUE WITH *SPITLIB CARD. 03024/042 BENCHMARK - TERMINAL OC # BNCH:ANOV. UM OGDEN BNCH:ANOV.@UM 0 Subcomponents (3024/42) through (3024/94) are MIDAS files (not MIDAS input) used by (3024/95) through (3024/97). They cannot be distributed due to Stat Lab restrictions. 0 Referenced by comments of: 3024/42 1 SUN SEP 08/96 15:24:55 Page 906 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/043 BENCHMARK - TERMINAL OC # BNCH:AUTO. UM OGDEN BNCH:AUTO.@UM 03024/044 BENCHMARK - TERMINAL OE # BNCH:CANO. UM OGDEN BNCH:CANO.@UM 03024/045 BENCHMARK - TERMINAL OE # BNCH:CLUS. UM OGDEN BNCH:CLUS.@UM 03024/046 BENCHMARK - TERMINAL OC # BNCH:CODE. UM OGDEN BNCH:CODE.@UM 03024/047 BENCHMARK - TERMINAL OE # BNCH:COMP. UM OGDEN BNCH:COMP.@E 03024/048 BENCHMARK - TERMINAL D # BNCH:CONTROL UM OGDEN BNCH:CONTROL@UM 03024/049 BENCHMARK - TERMINAL OE # BNCH:CORR. UM OGDEN BNCH:CORR.@UM 03024/050 BENCHMARK - TERMINAL OC # BNCH:COVA. UM OGDEN BNCH:COVA.@UM 03024/051 BENCHMARK - TERMINAL OC # BNCH:CROS. UM OGDEN BNCH:CROS.@UM 03024/052 BENCHMARK - TERMINAL OC # BNCH:DESC. UM OGDEN BNCH:DESC.@UM 03024/053 BENCHMARK - TERMINAL OE # BNCH:DISC. UM OGDEN BNCH:DISC.@UM 03024/054 BENCHMARK - TERMINAL OE # BNCH:DISP. UM OGDEN BNCH:DISP.@UM 03024/055 BENCHMARK - TERMINAL OE # BNCH:DIST. UM OGDEN BNCH:DIST.@UM 1 SUN SEP 08/96 15:24:55 Page 907 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/056 BENCHMARK - TERMINAL OE # BNCH:DOCUMENTOR UM OGDEN BNCH:DOCUMENTOR@UM 03024/057 BENCHMARK - TERMINAL OE # BNCH:DUMP UM OGDEN BNCH:DUMP 03024/058 BENCHMARK - TERMINAL D # BNCH:ERRORS UM OGDEN BNCH:ERRORS 03024/059 BENCHMARK - TERMINAL OC # BNCH:FACT. UM OGDEN BNCH:FACT.@UM 03024/060 BENCHMARK - TERMINAL OE # BNCH:GENE. UM OGDEN BNCH:GENE.@UM 03024/061 BENCHMARK - TERMINAL OE # BNCH:HIST. UM OGDEN BNCH:HIST.@UM 03024/062 BENCHMARK - TERMINAL OC # BNCH:ICOMP UM OGDEN BNCH:ICOMP 03024/063 BENCHMARK - TERMINAL OC # BNCH:KSAM. UM OGDEN BNCH:KSAM.@UM 03024/064 BENCHMARK - TERMINAL OE # BNCH:MANO. UM OGDEN BNCH:MANO.@UM 03024/065 BENCHMARK - TERMINAL OE # BNCH:MCOR. UM OGDEN BNCH:MCOR.@UM 03024/066 BENCHMARK - TERMINAL OE # BNCH:MIDAS UM OGDEN BNCH:MIDAS@UM 03024/067 BENCHMARK - TERMINAL OE # BNCH:MISS. UM OGDEN BNCH:MISS.@UM 03024/068 BENCHMARK - TERMINAL OC # BNCH:ONEW. UM OGDEN BNCH:ONEW.@UM 1 SUN SEP 08/96 15:24:55 Page 908 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/069 BENCHMARK - TERMINAL OE # BNCH:OSIR. UM OGDEN BNCH:OSIR.@UM 03024/070 BENCHMARK - TERMINAL OE # BNCH:PAIR. UM OGDEN BNCH:PAIR.@UM 03024/071 BENCHMARK - TERMINAL OC # BNCH:PLOT. UM OGDEN BNCH:PLOT.@UM 03024/072 BENCHMARK - TERMINAL OC # BNCH:POLY. UM OGDEN BNCH:POLY.@UM 03024/073 BENCHMARK - TERMINAL OC # BNCH:PRIN. UM OGDEN BNCH:PRIN.@UM 03024/074 BENCHMARK - TERMINAL OE # BNCH:PROF. UM OGDEN BNCH:PROF.@UM 03024/075 BENCHMARK - TERMINAL OE # BNCH:RCOR. UM OGDEN BNCH:RCOR.@UM 03024/076 BENCHMARK - TERMINAL OE # BNCH:READ. UM OGDEN BNCH:READ.@UM 03024/077 BENCHMARK - TERMINAL OC # BNCH:REGR. UM OGDEN BNCH:REGR.@UM 03024/078 BENCHMARK - TERMINAL OC # BNCH:ROTA. UM OGDEN BNCH:ROTA.@UM 03024/079 BENCHMARK - TERMINAL OE # BNCH:RPAI. UM OGDEN BNCH:RPAI.@UM 03024/080 BENCHMARK - TERMINAL OE # BNCH:SAVE. UM OGDEN BNCH:SAVE.@UM 03024/081 BENCHMARK - TERMINAL OE # BNCH:SCAT. UM OGDEN BNCH:SCAT.@UM 1 SUN SEP 08/96 15:24:55 Page 909 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/082 BENCHMARK - TERMINAL OE # BNCH:SELE. UM OGDEN BNCH:SELE.@UM 03024/083 BENCHMARK - TERMINAL OE # BNCH:SEPA. UM OGDEN BNCH:SEPA.@UM 03024/084 BENCHMARK - TERMINAL OC # BNCH:SETXY UM OGDEN BNCH:SETXY 03024/085 BENCHMARK - TERMINAL OC # BNCH:SIMU. UM OGDEN BNCH:SIMU.@UM 03024/086 BENCHMARK - TERMINAL OE # BNCH:SPEC. UM OGDEN BNCH:SPEC.@UM 03024/087 BENCHMARK - TERMINAL OE # BNCH:STUD. UM OGDEN BNCH:STUD.@UM 03024/088 BENCHMARK - TERMINAL D # BNCH:TALENT* UM OGDEN BNCH:TALENT*@UM 03024/089 BENCHMARK - TERMINAL OC # BNCH:TIME UM OGDEN BNCH:TIME 03024/090 BENCHMARK - TERMINAL OE # BNCH:TRAN. UM OGDEN BNCH:TRAN.@UM 03024/091 BENCHMARK - TERMINAL OC # BNCH:TSQU. UM OGDEN BNCH:TSQU.@UM 03024/092 BENCHMARK - TERMINAL OC # BNCH:TWOS. UM OGDEN BNCH:TWOS.@UM 03024/093 BENCHMARK - TERMINAL OE # BNCH:TWOW. UM OGDEN BNCH:TWOW.@UM 03024/094 BENCHMARK - TERMINAL OC # BNCH:WRIT. UM OGDEN BNCH:WRIT.@UM 0 Referenced by comments of: 3024/42 1 SUN SEP 08/96 15:24:55 Page 910 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/095A BENCHMARK - TERMINAL MIDAS SCRIPTS C *SCRIPT9 5.1T3 308 BENCHMARK_-_TERMINAL.MIDA.C.095 1 LINE 47 1 PAGE UM OGDEN JULY 23, 1983 15:27:50 *SCRIPT9 0 Requires (3024/98). 0 Referenced by comments of: 3024/42, 3024/98 03024/096A BENCHMARK - TERMINAL MIDAS SCRIPTS C *SCRIPTA 5.1T3 309 BENCHMARK_-_TERMINAL.MIDA.C.096 1 LINE 48 1 PAGE UM OGDEN JULY 23, 1983 15:27:50 *SCRIPTA 03024/097A BENCHMARK - TERMINAL MIDAS SCRIPTS C *SCRIPTB 5.1T3 310 BENCHMARK_-_TERMINAL.MIDA.C.097 1 LINE 47 1 PAGE UM OGDEN JULY 23, 1983 15:27:50 *SCRIPTB 0 Referenced by comments of: 3024/42 03024/098 BENCHMARK - TERMINAL MIDAS DATA D BNCH:MIDAS_1_DATA 5.0T4 222 BENCHMARK_-_TERMINAL.MIDA.D.097 1 LINE 1232 4 PAGE UM OGDEN JULY 03, 1981 21:32:16 5.0T10 126 BNCH:MIDAS_1_DATA 0 A data file required by *SCRIPT1M (3024/95). 0 Referenced by comments of: 3024/95 03024/099 BENCHMARK - TERMINAL COPY SECTION SA COPY:BNCHSTATDSCT 5.0T4 223 BENCHMARK_-_TERMINAL.COPY.SA.098 1 LINE 68 1 PAGE UM OGDEN JULY 03, 1981 21:32:17 5.0T10 127 COPY:BNCHSTATDSCT 0 A copy section used by the Terminal Benchmark DSR (3024/1). It describes the statistics record produced by (3024/1). 0 Referenced by comments of: 3024/1 03024/100 BENCHMARK - TERMINAL GLOBALDEFS SA BNCH:GLOBALDEFS 5.0T4 224 BENCHMARK_-_TERMINAL.GLOB.SA.099 1 LINE 80 1 PAGE UM OGDEN JULY 03, 1981 21:32:18 5.0T10 128 BNCH:GLOBALDEFS 0 Required by (3024/13). 0 Referenced by comments of: 3024/13, 3024/102 03024/101 BENCHMARK - TERMINAL GLOBALSETS SA BNCH:GLOBALSETS 5.0T4 225 BENCHMARK_-_TERMINAL.GLOB.SA.100 1 LINE 80 1 PAGE UM OGDEN JULY 03, 1981 21:32:19 5.0T10 129 BNCH:GLOBALSETS 0 Required by (3024/13). 0 Referenced by comments of: 3024/13, 3024/102 1 SUN SEP 08/96 15:24:55 Page 911 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03024/102 BENCHMARK - TERMINAL GLOBALS SA BNCH:GLOBALS 5.0T4 226 BENCHMARK_-_TERMINAL.GLOB.SA.101 1 LINE 37 1 PAGE UM OGDEN JULY 03, 1981 21:32:20 5.0T10 130 BNCH:GLOBALS 0 Required by (3024/13). Contains $CONTINUE WITHs to BNCH:GLOBALDEFS (3024/100) and BNCH:GLOBALSETS (3024/101). 03024/103 BENCHMARK - TERMINAL LLMPSEQU SA BNCH:LLMPSEQU 5.0T4 227 BENCHMARK_-_TERMINAL.LLMP.SA.102 1 LINE 72 9 PAGE UM OGDEN JULY 03, 1981 21:32:21 5.0T10 131 BNCH:LLMPSEQU 0 Required by (3024/13). 0 Referenced by comments of: 3024/13 03025/001A *SENSEDSECT SA G *SENSEDSECT 5.1T3 311 SENSEDSECT..SA.001 1 LINE 80 4 PAGE UM MTS SHERRY JULY 23, 1983 15:27:50 *SENSEDSECT 0 UQV DSECT FOR MAG TAPE SNS DATA -- NOW EXTENDED BY UM TO ADD SNS DATA FOR *...*. ****************************************************************************** D5.0A changes: Contains page printer changes. ****************************************************************************** 0 Referenced by comments of: 101/1, 135/1, 291/1, 314/1, 340/1, 489/1, 496/1, 513/1, 545/3, 548/1, 548/3, 553/1, 636/1, 637/1, 638/1, 696/1, 814/2, 816/3, 826/8, 826/11, 3024/1 03028/001 PATCHSYS # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO DYNAMICALLY PATCH THE SYSTEM AT POST-IPL TIME. 03030/001 VAMREC # (PART OF FILE SYSTEM RECOVERY) UQV 0 Part of File System Recovery, (682/24) and (682/25) 03031/001 LKED CONVERTER # (OBSOLETED BY VSS) UQV 0 THIS IS A PROGRAM THAT WILL READ OS LINKAGE EDITOR INPUT OR THE COMBINED OBJECT AND MEMBER-RECORD FILES OUTPUT BY *UNLINKER (562). 03036/001 C+ # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE C+ SYSTEM PROGRAMMING LANGUAGE. 1 SUN SEP 08/96 15:24:55 Page 912 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03037/001 METRIC # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM FOR DISPLAYING INFORMATION ABOUT SYSTEM ACTIVITY. 03038/001 MOVECAT # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A FILE SYSTEM UTILITY FOR MAKING AN EXACT COPY OF THE FILE SYSTME CATALOG. 03043/001 FILE RELOCATE # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A SMALL UTILITY TO MOVE FILES FROM ONE PACK TO ANOTHER, USED BY THE OPERATIONS STAFF AT UQV. 03045/001 SCB DOCUMENTOR # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE SYSTEM CONTROL BLOCK DESCRIPTOR SYSTEM. 03046/001 XEROX 9700 UQV JSL # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE UQV JOBS DESCRIPTION SOURCE FOR THE XEROX 9700. SEE COMPONENT (841) FOR THE UM VERSION. 03047/001 XEROX 9700 UQV FSL # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE UQV FORMS LANGUAGE SOURCE FILES FOR THE XEROX 9700. SEE COMPONENT (840) FOR THE UM VERSION. 03048/001 XEROX 9700 UQV FONT # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE XEROX 9700 FONTS. SEE COMPONENT (842) FOR THE UM VERSION. 03050/001 PAGE PRINTER SUBRTN # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT IS NOT CURRENTLY INSTALLED AT MICHIGAN. 03051/001 PAGE PRINTER TBLS # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT IS NOT CURRENTLY INSTALLED AT MICHIGAN. 1 SUN SEP 08/96 15:24:55 Page 913 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 03053/001 FPAPRTN # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE DSR FOR THE FLOATING POINT SYSTEMS 190L ARRAY PROCESSOR. 03054/001 APSUB # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A NEW PART OF MTS TO DEAL WITH THE ARRAY PROCESSOR. 03055/001 AP SOFTWARE # (NOT DISTRIBUTED) UQV 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS UPDATES TO FLOATING POINT SYSTEMS SOFTWARE. 03062/001C SPLIT & COMBINE SPLIT SA G W267:SPLIT.SA 5.1T3 312 SPLIT_&_COMBINE.SPLIT.SA.001 1 LINE 72 5 PAGE UQV ENGLEY EADIE JULY 23, 1983 15:27:51 0 SPLIT and COMBINE are two programs written originally at UQV to convert and unconvert, respectively, files to a form which can be readily transported over networks. The conversion accounts for long lines, line numbers, non-printing characters and erroneous trimming of blanks. 03062/002C SPLIT & COMBINE SPLIT OC G W267:SPLIT 5.1T3 313 SPLIT_&_COMBINE.SPLIT.OC.002 1 LINE 1702 1 PAGE UQV ENGLEY EADIE JULY 23, 1983 15:27:52 03062/003C SPLIT & COMBINE COMBINE SA G W267:COMBINE.SA 5.1T3 314 SPLIT_&_COMBINE.COMBINE.SA.003 1 LINE 72 8 PAGE UQV ENGLEY EADIE JULY 23, 1983 15:27:52 03062/004C SPLIT & COMBINE COMBINE OC G W267:COMBINE 5.1T3 315 SPLIT_&_COMBINE.COMBINE.OC.004 1 LINE 2490 4 PAGE UQV ENGLEY EADIE JULY 23, 1983 15:27:52 04000/001 GATE D5.0 MASTER SA G GATE S1504 MTSD5S 'MTS D5.0 SOURCE' POSN=GATE 5.0T4 642 GATE.D5.0_MASTER.SA.001 1 LINE 80 22 PAGE UM MTS BURLING AUG. 10, 1981 00:22:42 5.0T11 216 0 GATE, which replaces LCSYMBOL (043), is an interface from user programs to MTS-provided subroutines. It defines LCSYMBOL and furnishes the entry points for all user-callable system subroutines which must run in system mode -- i.e., those which require access to the MTS system segment (currently segment 7) or issue privileged SVCs. This component also provides the return point for these subroutines. At the entry (port), an MC instruction is used to switch to system mode; at the return, another MC is used and the return is made to the original caller in user mode. Copies COPY:LLMPSEQU (087) and COPY:GLOBALS (1026/3). Assemble using COPY:MTS.MACROS (344/3), COPY:CC.MACROS (1054/3), COPY:SETPARM (653/1), and COPY:MISC.MACROS (728/1). 0 Referenced by comments of: 42/2, 43/1, 354/7, 509/3, 579/7, 4000/10 1 SUN SEP 08/96 15:24:55 Page 914 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/002A GATE UPDATE UC G MTSS:GATE/UPD 5.1T3 316 GATE.UPDATE.UC.002 1 LINE 76 19 PAGE UM MTS BURLING JULY 23, 1983 15:27:53 0 *CDUPDATE input to produce current source. 0 Referenced by comments of: 4000/5 04000/003A GATE OC G # (PART OF RESIDENT SYSTEM) UM MTS BURLING 0 Object part of Resident System (468). 04000/004A GATE L S0194A MTSCL 'MTS D5.1 LISTINGS' POSN=GATE.LIST 5.1T3 317 GATE..L.004 1 LINE 133 112 PAGE UM MTS BURLING JULY 23, 1983 15:28:21 04000/005C GATE TGATE UPDATE UC G MTSS:TGATE/UPD 5.1T3 361 GATE.TGATE_UPDATE.UC.005 1 LINE 68 1 PAGE UM MTS BURLING AUG. 20, 1983 19:50:42 0 This update is used in conjunction with the GATE update (4000/2) to produce the TGATE deck used with TMTS. 04000/006A GATE COMMENTS D G MTSS:GATE/COM 5.1T3 318 GATE.COMMENTS.D.006 1 LINE 69 1 PAGE UM MTS BURLING JULY 23, 1983 15:28:23 0 This file contains annotation about changes to this subcomponent. It is fed to Ramrod as annotation for this deck. 04000/007C GATE PORT WRITEUP WF G MTSS:PORT*WF 5.1T3 319 GATE.PORT_WRITEUP.WF.007 1 LINE 71 6 PAGE UM BURLING JULY 23, 1983 15:28:23 0 *FORMAT source for writeup describing how to add a PORT to the GATE assembly. 0 Referenced by comments of: 4000/8 04000/008C GATE PORT WRITEUP PF G MTSS:PORT*W 5.1T3 320 GATE.PORT_WRITEUP.PF.008 1 LINE 69 9 PAGE UM BURLING JULY 23, 1983 15:28:24 0 Print-ready version of (4000/7). 04000/009 GATE STAT FILES P S1561 5.0T4 VLO FSNAME=GATE.STAT_FILES.P.005(1) 229 5.0T4 229 GATE.STAT_FILES.P.005 1 LINE 73 3 PAGE UM HELFFRICH SEP. 27, 1978 00:00:43 5.0T10 133 0 SUBCOMPONENTS (4000/9) THROUGH (4000/50) COMPRISE THE UNIVERSITY OF MICHIGAN GATE STATISTICS COLLECTION FACILITY. STAT FILES (4000/9) IS A PRINT FILE CONTAINING A LIST OF ALL FILES, TOGETHER WITH A DESCRIPTION OF THEIR CONTENTS, WHICH MAKE UP THE COLLECTION FACILITY. 0 Referenced by comments of: 4000/9 1 SUN SEP 08/96 15:24:55 Page 915 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/010 GATE STAT UPDATE UC G S1561 5.0T4 VLO FSNAME=GATE.STAT_UPDATE.UC.006(1) 230 5.0T4 230 GATE.STAT_UPDATE.UC.006 1 LINE 68 3 PAGE UM HELFFRICH SEP. 27, 1978 00:00:45 5.0T10 134 0 CONTAINS UPDATE DECKS FOR APPLYING THE GATE STATISTICS COLLECTION FACILITY TO THE GATE (4000/1). ALSO UPDATES THE GATE SOURCE TO WORK WITH ASSEMBLER H. 04000/011 GATE STATON SA G S1561 5.0T4 VLO FSNAME=GATE.STATON.SA.007(1) 231 5.0T4 231 GATE.STATON.SA.007 1 LINE 69 3 PAGE UM HELFFRICH SEP. 27, 1978 00:00:47 5.0T10 135 0 CONTAINS ASSEMBLY LANGUAGE SOURCE FOR THE STATON PROGRAM, WHICH ACTIVATES THE COUNTERS IN THE GATE. STATON CALLS THE LOADSVM SUBROUTINE ENTRY POINT TO PISTLE (559/2). 04000/012 GATE STATON OC G S1561 5.0T4 VLO FSNAME=GATE.STATON.OC.008(1) 232 5.0T4 232 GATE.STATON.OC.008 1 LINE 80 1 PAGE UM HELFFRICH SEP. 27, 1978 00:00:49 5.0T10 136 0 04000/013 GATE GATESTAT CSECT SA G S1561 5.0T4 VLO FSNAME=GATE.GATESTAT_CSECT.SA.009(1) 233 5.0T4 233 GATE.GATESTAT_CSECT.SA.009 1 LINE 72 1 PAGE UM HELFFRICH SEP. 27, 1978 00:00:51 5.0T10 137 0 THIS IS THE ASSEMBLY LANGUAGE SOURCE FOR THE GATESTAT CSECT, WHICH IS LOADED INTO SHARED VM TO PROVIDE A PLACE FOR THE GATE TO MAINTAIN ITS USE COUNTERS. 04000/014 GATE GATESTAT CSECT OC G S1561 5.0T4 VLO FSNAME=GATE.GATESTAT_CSECT.OC.010(1) 234 5.0T4 234 GATE.GATESTAT_CSECT.OC.010 1 LINE 80 3 PAGE UM HELFFRICH SEP. 27, 1978 00:00:53 5.0T10 138 04000/015 GATE STATOFF SA G S1561 5.0T4 VLO FSNAME=GATE.STATOFF.SA.011(1) 235 5.0T4 235 GATE.STATOFF.SA.011 1 LINE 68 2 PAGE UM HELFFRICH SEP. 27, 1978 00:00:55 5.0T10 139 0 THIS IS THE ASSEMBLY LANGUAGE SOURCE FOR THE STATOFF PROGRAM, WHICH IS USED TO DEACTIVATE THE USE COUNTERS IN THE GATE. COPIES COPY:SYSDEFS. 04000/016 GATE STATOFF OC G S1561 5.0T4 VLO FSNAME=GATE.STATOFF.OC.012(1) 236 5.0T4 236 GATE.STATOFF.OC.012 1 LINE 80 1 PAGE UM HELFFRICH SEP. 27, 1978 00:00:57 5.0T10 140 04000/017 GATE STAT REC MAIN SF G S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_MAIN.SF.013(1) 237 5.0T4 237 GATE.STAT_REC_MAIN.SF.013 1 LINE 63 1 PAGE UM HELFFRICH SEP. 27, 1978 00:00:59 5.0T10 141 0 FORTRAN SOURCE FOR THE MAIN PROGRAM OF THE GATE STATISTICS RECORDING SYSTEM. 0 Referenced by comments of: 4000/39, 4000/41, 4000/43 1 SUN SEP 08/96 15:24:55 Page 916 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/018 GATE STAT REC MAIN OC G S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_MAIN.OC.014(1) 238 5.0T4 238 GATE.STAT_REC_MAIN.OC.014 1 LINE 90 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:01 5.0T10 142 04000/019 GATE GETUSR SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.GETUSR_SUBR.SF.015(1) 239 5.0T4 239 GATE.GETUSR_SUBR.SF.015 1 LINE 68 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:03 5.0T10 143 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM GETUSR SUBROUTINE, WHICH GETS PARAMETER VALUES FROM THE USER. USES COMMON AREAS FROM FTN COMMON (4000/39). 04000/020 GATE GETUSR SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.GETUSR_SUBR.OE.016(1) 240 5.0T4 240 GATE.GETUSR_SUBR.OE.016 1 LINE 692 2 PAGE UM HELFFRICH SEP. 27, 1978 00:01:05 5.0T10 144 04000/021 GATE INIT SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.INIT_SUBR.SF.017(1) 241 5.0T4 241 GATE.INIT_SUBR.SF.017 1 LINE 67 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:07 5.0T10 145 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM INIT SUBROUTINE. THIS SUBROUTINE PROMPTS THE USER FOR RUN-TIME PARAMETER VALUES, INITIALIZES THE SYMBOL TABLE, AND WRITES THE HEADER FOR MIDAS OUTPUT. USES COMMON AREAS FROM FTN COMMON (4000/39). 04000/022 GATE INIT SUBR OC G S1561 5.0T4 VLO FSNAME=GATE.INIT_SUBR.OC.018(1) 242 5.0T4 242 GATE.INIT_SUBR.OC.018 1 LINE 166 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:09 5.0T10 146 04000/023 GATE PUTHDR SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.PUTHDR_SUBR.SF.019(1) 243 5.0T4 243 GATE.PUTHDR_SUBR.SF.019 1 LINE 61 2 PAGE UM HELFFRICH SEP. 27, 1978 00:01:11 5.0T10 147 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM PUTHDR SUBROUTINE, WHICH PUTS OUT A HEADER IN THE MIDAS STATISTICS FILE. THE HEADER INCLUDES A TIME STAMP AND MIDAS RUN AND READ COMMANDS. USES COMMON AREAS DEFINED BY FTN COMMON (4000/39). 04000/024 GATE PUTHDR SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.PUTHDR_SUBR.OE.020(1) 244 5.0T4 244 GATE.PUTHDR_SUBR.OE.020 1 LINE 1332 2 PAGE UM HELFFRICH SEP. 27, 1978 00:01:14 5.0T10 148 04000/025 GATE PUTMID SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.PUTMID_SUBR.SF.021(1) 245 5.0T4 245 GATE.PUTMID_SUBR.SF.021 1 LINE 60 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:16 5.0T10 149 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM PUTMID SUBROUTINE, WHICH PUTS OUT USE STATISTICS IN MIDAS-COMPATIBLE FORMAT. USES COMMON AREAS DEFINED BY FTN COMMON (4000/39). 1 SUN SEP 08/96 15:24:55 Page 917 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/026 GATE PUTMID SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.PUTMID_SUBR.OE.022(1) 246 5.0T4 246 GATE.PUTMID_SUBR.OE.022 1 LINE 340 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:18 5.0T10 150 04000/027 GATE PUTUSR SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.PUTUSR_SUBR.SF.023(1) 247 5.0T4 247 GATE.PUTUSR_SUBR.SF.023 1 LINE 63 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:20 5.0T10 151 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM PUTUSR SUBROUTINE, WHICH PUTS OUT USE STATISTICS ON A TERMINAL. USES COMMON AREA DEFINED BY FTN COMMON (4000/39). 04000/028 GATE PUTUSR SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.PUTUSR_SUBR.OE.024(1) 248 5.0T4 248 GATE.PUTUSR_SUBR.OE.024 1 LINE 348 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:22 5.0T10 152 04000/029 GATE SAMPLE SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.SAMPLE_SUBR.SF.025(1) 249 5.0T4 249 GATE.SAMPLE_SUBR.SF.025 1 LINE 67 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:24 5.0T10 153 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM SAMPLE SUBROUTINE, WHICH SETS UP TIMER INTERRUPTS AND EXAMINES AND WRITES OUT USE COUNTERS FOR EACH TIME PERIOD. USES COMMON AREAS DEFINED BY FTN COMMON (4000/39). 04000/030 GATE SAMPLE SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.SAMPLE_SUBR.OE.026(1) 250 5.0T4 250 GATE.SAMPLE_SUBR.OE.026 1 LINE 630 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:26 5.0T10 154 04000/031 GATE TBLDEF SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.TBLDEF_SUBR.SF.027(1) 251 5.0T4 251 GATE.TBLDEF_SUBR.SF.027 1 LINE 65 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:28 5.0T10 155 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM TBLDEF SUBROUTINE, WHICH INITIALIZES THE SYMBOL TABLES USING ONLY THOSE ROUTINES WHOSE COUNTERS HAVE BEEN INCREMENTED FROM THEIR INITIAL VALUES. USES COMMON AREAS DEFINED BY FTN COMMON (4000/39). 04000/032 GATE TBLDEF SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.TBLDEF_SUBR.OE.028(1) 252 5.0T4 252 GATE.TBLDEF_SUBR.OE.028 1 LINE 394 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:30 5.0T10 156 04000/033 GATE TBLUSR SUBR SF G S1561 5.0T4 VLO FSNAME=GATE.TBLUSR_SUBR.SF.029(1) 253 5.0T4 253 GATE.TBLUSR_SUBR.SF.029 1 LINE 68 2 PAGE UM HELFFRICH SEP. 27, 1978 00:01:32 5.0T10 157 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM TBLUSR SUBROUTINE, WHICH READS FROM THE USER A LIST OF ROUTINES TO MONITOR. IT INITIALIZES THE TABLES BASED ON THIS LIST. USES COMMON AREAS DEFINED BY FTN COMMON (4000/39). 04000/034 GATE TBLUSR SUBR OE G S1561 5.0T4 VLO FSNAME=GATE.TBLUSR_SUBR.OE.030(1) 254 5.0T4 254 GATE.TBLUSR_SUBR.OE.030 1 LINE 856 2 PAGE UM HELFFRICH SEP. 27, 1978 00:01:34 5.0T10 158 0 Referenced by comments of: 4000/39 1 SUN SEP 08/96 15:24:55 Page 918 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/035 GATE DBLMATH SUBR SA G S1561 5.0T4 VLO FSNAME=GATE.DBLMATH_SUBR.SA.031(1) 255 5.0T4 255 GATE.DBLMATH_SUBR.SA.031 1 LINE 72 3 PAGE UM HELFFRICH SEP. 27, 1978 00:01:36 5.0T10 159 0 SOURCE FOR THE GATE STATISTICS RECORDING SYSTEM DOUBLE-WORD MATH ROUTINES. 04000/036 GATE DBLMATH SUBR OC G S1561 5.0T4 VLO FSNAME=GATE.DBLMATH_SUBR.OC.032(1) 256 5.0T4 256 GATE.DBLMATH_SUBR.OC.032 1 LINE 80 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:38 5.0T10 160 04000/037 GATE GETSTAT SUBR SA G S1561 5.0T4 VLO FSNAME=GATE.GETSTAT_SUBR.SA.033(1) 257 5.0T4 257 GATE.GETSTAT_SUBR.SA.033 1 LINE 73 8 PAGE UM HELFFRICH SEP. 27, 1978 00:01:40 5.0T10 161 0 SOURCE FOR SEVERAL LOW-LEVEL STATISTICS ACCESS ROUTINES, WHICH ARE USED BY THE GATE STATISTICS RECORDING SYSTEM TO ACCESS THE COUNTS OF GATE ACTIVITY. COPIES COPY:JOBSTA (413/9). 04000/038 GATE GETSTAT SUBR OC G S1561 5.0T4 VLO FSNAME=GATE.GETSTAT_SUBR.OC.034(1) 258 5.0T4 258 GATE.GETSTAT_SUBR.OC.034 1 LINE 80 3 PAGE UM HELFFRICH SEP. 27, 1978 00:01:43 5.0T10 162 0 Referenced by comments of: 4000/41, 4000/43 04000/039 GATE FTN COMMON SF G S1561 5.0T4 VLO FSNAME=GATE.FTN_COMMON.SF.035(1) 259 5.0T4 259 GATE.FTN_COMMON.SF.035 1 LINE 66 2 PAGE UM HELFFRICH SEP. 27, 1978 00:01:45 5.0T10 163 0 SOURCE FOR FORTRAN COMMON AREA DEFINITIONS USED BY ALL FORTRAN SUBROUTINES (4000/17) THROUGH (4000/34) IN THE GATE STATISTICS RECORDING SYSTEM. 0 Referenced by comments of: 4000/19, 4000/21, 4000/23, 4000/25, 4000/27, 4000/29, 4000/31, 4000/33, 4000/40, 4000/42 04000/040 GATE STAT REC USER SF G S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_USER.SF.036(1) 260 5.0T4 260 GATE.STAT_REC_USER.SF.036 1 LINE 52 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:47 5.0T10 164 0 SOURCE FOR FORTRAN BLOCK DATA WHICH ASSIGNS LOGICAL I/O UNITS FOR CONVENIENT USE FROM A TERMINAL. USES COMMON AREAS FROM FTN COMMON (4000/39). 0 Referenced by comments of: 4000/41 04000/041 GATE STAT REC USER OC G S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_USER.OC.037(1) 261 5.0T4 261 GATE.STAT_REC_USER.OC.037 1 LINE 72 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:49 5.0T10 165 0 OBJECT FILE FOR THE GATE STATISTICS RECORDING SYSTEM (4000/17) THROUGH (4000/38) IN A FORM WHICH CAN BE $RUN. THE OBJECT FOR (4000/40) IS INCLUDED, ALONG WITH $CONTINUE WITHS FOR ALL OTHER FILES IN THE GATE STATISTICS RECORDING SYSTEM (4000/17) THROUGH (4000/38) AND A "$CONTINUE WITH COPY:SYSDEFS RETURN" LINE. 0 Referenced by comments of: 4000/43 1 SUN SEP 08/96 15:24:55 Page 919 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/042 GATE STAT REC OPER SF G S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_OPER.SF.038(1) 262 5.0T4 262 GATE.STAT_REC_OPER.SF.038 1 LINE 52 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:51 5.0T10 166 0 SOURCE FOR FORTRAN BLOCK DATA WHICH ASSIGNS LOGICAL I/O UNITS FOR USE WITH *GSA (4000/44). USES COMMON AREAS FROM FTN COMMON (4000/39). 04000/043 GATE STAT REC OPER OC G S1561 5.0T4 VLO FSNAME=GATE.STAT_REC_OPER.OC.039(1) 263 5.0T4 263 GATE.STAT_REC_OPER.OC.039 1 LINE 72 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:53 5.0T10 167 0 OBJECT FILE FOR THE GATE STATISTICS RECORDING SYSTEM (4000/17) THROUGH (4000/38) IN A FORM WHICH CAN BE $RUN. SAME AS (4000/41) EXCEPT THAT I/O UNITS ARE ASSIGNED FOR USE WITH *GSA. 04000/044 GATE *GSA C S1561 5.0T4 VLO FSNAME=GATE.*GSA.C.040(1) 264 5.0T4 264 GATE.*GSA.C.040 1 LINE 77 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:55 5.0T10 168 0 COMMAND FILE TO ACTIVATE THE GATE STATISTICS COLLECTION SYSTEM. CONTAINS A "$CONTINUE WITH MTS:GS.STATPARS RETURN" LINE. 0 Referenced by comments of: 4000/42, 4000/48 04000/045 GATE LOCK D # SYS:GS.LOCK UM HELFFRICH 0 EMPTY FILE USED BY *GSA. 04000/046 GATE NEWSTAT D # SYS:GS.NEWSTAT UM HELFFRICH 0 EMPTY FILE USED BY *GSA. 04000/047 GATE OLDSTAT D # SYS:GS.OLDSTAT UM HELFFRICH 0 EMPTY FILE USED BY *GSA. 04000/048 GATE STAT PARAMS D S1561 5.0T4 VLO FSNAME=GATE.STAT_PARAMS.D.044(1) 265 5.0T4 265 GATE.STAT_PARAMS.D.044 1 LINE 56 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:58 5.0T10 169 0 CONTAINS PARAMETERS READ BY THE STATISTICS RECORDING SYSTEM WHEN IT IS STARTED BY USING THE OPERATOR FILE *GSA (4000/44). CONTAINS A LIST OF PARAMETERS NORMALLY SUPPLIED BY THE USER IF THE STATISTICS RECORDING IS RUN FROM A TERMINAL. 04000/049 GATE *GSD C S1561 5.0T4 VLO FSNAME=GATE.*GSD.C.045(1) 266 5.0T4 266 GATE.*GSD.C.045 1 LINE 55 1 PAGE UM HELFFRICH SEP. 27, 1978 00:01:59 5.0T10 170 0 COMMAND FILE TO DEACTIVATE THE GATE STATISTICS COLLECTION SYSTEM. 1 SUN SEP 08/96 15:24:55 Page 920 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04000/050 GATE WRITEUP WF S1561 5.0T4 VLO FSNAME=GATE.WRITEUP.WF.046(1) 267 5.0T4 267 GATE.WRITEUP.WF.046 1 LINE 97 9 PAGE UM HELFFRICH SEP. 27, 1978 00:02:01 5.0T10 171 0 STRUCTURAL DESCRIPTION AND USER'S GUIDE TO THE GATESTAT GATE STATISTICS COLLECTION SYSTEM. 0 Referenced by comments of: 4000/9 04001/001 NONPRIV KWIC # (NOT DISTRIBUTED) WSU 0 THIS COMPONENT IS NOT INSTALLED AT MICHIGAN. 04003/001 DUMPER # (NOT DISTRIBUTED) WSU 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO DUMP THE DUMPS FROM THE PAGING DISK TO TAPE, WHICH IS INPUT TO THE PRINTDUMP PROGRAM (400). 04009/001 ACCESS # (NOT DISTRIBUTED) WSU 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A SUBROUTINE TO RETURN ACCESS INFORMATION ABOUT A FILE. 04010/001 SVMR # (NOT DISTRIBUTED) WSU 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS GETSVM, FEESVM, AND SCANSVM, STORAGE MANAGEMENT SUBROUTINES FOR SHARED VIRTUAL MEMORY. 0 Referenced by comments of: 4011/1 04011/001 SVMTABLE # (NOT DISTRIBUTED) WSU 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS THE CONTROL BLOCK FOR SVMR (4010). 04014/001 WHIZBANG # (NOT DISTRIBUTED) WSU 0 THIS COMPONENT IS NOT INSTALLED AT MICHIGAN. 04200/001 UNCDUPDATE # (NOT DISTRIBUTED) RPI 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO COMPARE TWO FILES AND OUTPUT THEIR DIFFERENCES IN THE FORM OF *CDUPDATE (1036) CONTROL STATEMENTS AND INSERTION RECORDS. 1 SUN SEP 08/96 15:24:55 Page 921 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 04201/001 RPI REMOTE OPCONSOLE # (NOT DISTRIBUTED) RPI 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE RPI REMOTE OPERATOR'S CONSOLE PROGRAM. 04222/001 FILE MOVER # (NOT DISTRIBUTED) RPI 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM TO MOVE FILES FROM ONE VOLUME TO ANOTHER. 04240/001 STUDENT IPL ROUTINE # (NOT DISTRIBUTED) RPI 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS AN IPL LOADER FOR USE WITH ST360 (472). 04241/001 3277 SCREEN I/O ROUTINE # (NOT DISTRIBUTED) RPI 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, CONTAINS SUBROUTINES TO CREATE SCREEN FIELDS, READ SCREEN FIELDS, UPDATE SCREEN FIELDS, AND INTERCEPT THE ATTENTION KEYS. 04242/001 LCLPRINT # (NOT DISTRIBUTED) RPI 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS A PROGRAM WHICH SUPPORTS THE COURIER 8700 PRINTERS AS NON-SPOOLED PRINT-STATIONS AT REMOTE TERMINAL SITES. 04401/001 PN3203 JOB # (NOT DISTRIBUTED) SFU 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS THE JOB THAT LOADS THE UCSB AND FCB BUFFERS FOR THE 3203-4 PRINTER WITH A PN PRINT TRAIN. 04403/001 DIVMIXED # (NOT DISTRIBUTED) SFU 0 THIS COMPONENT, WHICH IS NOT CURRENTLY INSTALLED AT MICHIGAN, IS USED TO PERFORM MIXED PRECISION DIVISION WHEN A NORMAL DIVISION FAILS. 04404/001 APL - VS # (NOT DISTRIBUTED) SFU FRONCZAK 0 SFU is the MTS distributor for VS APL. 04404/002C APL - VS MEMO 435 WF APLI:APL.VSMEMO 5.1T3 321 APL_-_VS.MEMO_435.WF.002 1 LINE 93 23 PAGE UM FRONCZAK JULY 23, 1983 15:28:24 0 This is the FORMAT source for Computing Center Memo 435 -- 1 SUN SEP 08/96 15:24:55 Page 922 0 Num R Component Name Subname Type G Seq ID S Location File +_________ _________________________ ______________ ____ _ ______ _ ___________________________________________________________ ____ 6250 tape-file FS Name Ver FType LRECL Size DevT Inst Person Local Per Date Time + ______________ ________________________________ ___ _____ _____ ____ ____ ____ _________ _________ ______________ ________ 1600 tape-file Disk Name + ______________ _____________________ 0 "MTS VS APL User's Guide." This source requires a lot of massaging to produce (4404/3), but it is included in the distribution in case anyone wants it anyway. 04404/003C APL - VS MEMO 435 PF G S0672 CCMEMO 'CCMEMOS' FSNAME=M435.OUTPUT 5.1T3 322 APL_-_VS.MEMO_435.PF.003 1 LINE 71 28 PAGE SFU FRONCZAK OCT. 13, 1982 12:29:52 0 This is the printer-ready version of Computing Center Memo 435 -- "MTS VS APL User's Guide." 0 Referenced by comments of: 4404/2