Trailing-Edge
-
PDP-10 Archives
-
BB-T573C-DD_1986
-
35,1414/tu160.ctl
There is 1 other file named tu160.ctl in the archive. Click here to see a list.
;%005 17 JAN 77 TONY J IACOBONE
;.SUB TU160.CTL[35,1414]/TIME:1::/UNIQ:0,/OUT:0
;
;
;*******BATCH JOB TO RUN DDTUG ON MTA0 (TU16)
;*******DIAG WILL RUN ONLY ONE TRANSPORT AT A TIME.
;
;
.DAY
.NOERROR
.DEL *.TMP
.SET HPQ 1
;
;
;****SET UP LIBRARY IN ORDER TO RUN DIAG FRON [1,2]
;
;
.R SETSRC
C /LIB:[6,10]
^C
;
;
.ERROR
.AS MTA0
;
;
.RU DIAMON
-
S
DDTUG
0
MTA0
1
0
0
R
^C
.PLEASE MTA0 FINISHED 1 HR OF DDTUG. CLEAN XPORT.
.QUE INP:=TU161.CTL[35,1414]/TIME/UNIQ:0,/OUT:0
.PRI TU160.LOG
%ERR::
.PLEASE ERROR IN TU160.CTL-- DDTUG STOPPING
.PRI TU160.LOG
%TERR::
.PLEASE MTA0 ELAPSED RUNTIME EXCEEDED 1 HR. GOING TO NEXT DRIVE
.QUE INP:=TU161[35,1414]/TIME/UNIQ:0,/OUT:0
.PRI TU160.LOG
%FIN::