Trailing-Edge
-
PDP-10 Archives
-
ap-c796e-sb
-
opr.ato
There are 4 other files named opr.ato in the archive. Click here to see a list.
; TURN ON TRANSACTION LOG
:TLOG
; BRING UP DAEMON WHICH WILL DETACH
; THIS IS DONE HERE BEFORE ANY OTHER JOBS
; IN CASE THEY NEED TO MAKE FACT OR LONG
; SLEEP ENTRIES
:SLOGIN 1/2
:SILENCE
R DAEMON
; BRING UP TWO OMOUNTS TO PROCESS FILE AND MOUNT
; REQUESTS. GIVE THEM DTA1 AND DTA2
:SLOGIN 1/2
:SILENCE
:DEFINE M1=
M1-ASSIGN DTA1
M1-G SYS:OMOUNT
M1-START
M1-KILL:MOUNT
:REVIVE
M1-START
:SLOGIN 1/2
:SILENCE
:DEFINE M2=
M2-ASSIGN DTA2
M2-G SYS:OMOUNT
M2-START
M2-KILL:MOUNT
:REVIVE
M2-START
; BRING UP CDRSTK TO HANDLE BATCH INPUT
; ONE IS NEEDED FOR EACH CENTRAL CARD READER
; IT SHOULD COME UP QUICKLY SO OPERATOR CAN
; FEED CARDS AFTER A RELOAD
:SLOGIN 1/2
:SILENCE
:DEFINE C=
C-R CDRSTK
:REVIVE
C-START
; BRING UP BATCON NEXT SO BATCH JOBS CAN GET
; BUSY RESTARTING OR CLEANING UP
; ANY SCHEDULING COMMANDS SHOULD BE INCLUDED AFTER
; THE RUN AND BEFORE THE :REV
:SLOGIN 1/2
:SILENCE
:DEFINE B=
B-R BATCON
:REVIVE
B-START
; BRING UP THE SPOOLERS TO HANDLE SYSTEM OUTPUT
; QUEUES. ANY SCHEDULING COMMANDS SHOULD BE
; INCLUDED AFTER THE RUN AND BEFORE THE :REV
:SLOGIN 1/2
:SILENCE
:DEFINE L=
L-R LPTSPL
:REVIVE
L-START
:SLOGIN 1/2
:SILENCE
:DEFINE PT=
PT-R PTPSPL
:REVIVE
PT-START
:SLOGIN 1/2
:SILENCE
:DEFINE CP=
CP-R CDPSPL
:REVIVE
CP-START
:SLOGIN 1/2
:SILENCE
:DEFINE PL=
PL-R PLTSPL
; LOCK PLOT OUTPUT BECAUSE THERE ARE NO
; HEADERS YET. LOCKING WILL STOP THE SPOOLER
; BETWEEN JOBS.
PL-LOCK /SET
:REVIVE
PL-START