Google
 

Trailing-Edge - PDP-10 Archives - BB-T573C-DD_1986 - 35,1414/syr24.ctl
There is 1 other file named syr24.ctl in the archive. Click here to see a list.
;%001 JAN 25 1979 TONY J IACOBONE
;.SUB SYR24[35,1414]/TIME/UNIQ:0,/OUT:ERROR
;
;***BATCH JOB TO RUN SYSERR EVERY 24 HOURS
;***BRIEF1.LST IS LEFT ON DSKB[1,2] AFTER FIRST 24 HOURS
;***SUM1.LST IS LEFT ON DSKB[1,2] AFTER FIRST 24 HOURS
;***BRIEF2.LST IS LEFT ON DSKB[1,2] AFTER 48 HOURS
;***SUM2.LST IS LEFT ON DSKB[1,2] AFTER 48 HOURS
;
;
ERR1::
.R SYSERR
*DSKB:BRIEF1.LST=SYS:/ALL/BR/BEG:-1D
*DSKB:SUM1.LST=SYS:/ALLSUM/BEG:-1D
*^C
;
.PRI BRIEF1.LST,SUM1.LST
;
.PLEASE SYSERR RUN FOR LAST 24 HOURS
.PLEASE READ BRIEF1.LST AND SUM1.LST ON DSKB
.SUB SYR24[35,1414]/TIME/TAG:ERR2/UNIQ:0/AFTER:+23:30:,/OUT:ERROR
;
;
.GOTO DONE
;
ERR2::
.R SYSERR
*DSKB:BRIEF2.LST=SYS:/ALL/BR/BEG:-1D
*DSKB:SUM2.LST=SYS:/ALLSUM/BEG:-1D
*^C
;
.PRI BRIEF2.LST,SUM2.LST
;
.PLEASE ********************************************
.PLEASE SYSERR RUN FOR LAST 24 HOURS
.PLEASE READ BRIEF2.LST AND SUM2.LST ON DSKB
.PLEASE ********************************************
;
;**DO NOT REQUEUE THIS JOB. STOP.ATO WILL
;**DO A COMPLETE 72 HOUR SYSERR IN DETAIL
;
%ERR::
%CERR::
.PLEASE ???????????????????????????????????????????????
.PLEASE ???????????????????????????????????????????????
.PLEASE ERROR IN SYR24.CTL. READ SYR24.LOG
.PLEASE ???????????????????????????????????????????????
.PLEASE ???????????????????????????????????????????????
DONE::
%FIN::