Trailing-Edge
-
PDP-10 Archives
-
BB-T573C-DD_1986
-
35,1414/tu161.ctl
There is 1 other file named tu161.ctl in the archive. Click here to see a list.
;%005 17 JAN 77 TONY J IACOBONE
;.SUB TU161.CTL[35,1414]/TIME:1::/UNIQ:0,/OUT:0
;
;
;*******BATCH JOB TO RUN DDTUG ON MTA1 (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 MTA1
;
;
.RU DIAMON
-
S
DDTUG
0
MTA1
1
0
1
R
^C
.PLEASE MTA1 FINISHED 1 HR OF DDTUG. CLEAN XPORT.
.QUE INP:=TU160.CTL[35,1414]/TIME/UNIQ:0,/OUT:0
.PRI TU161.LOG
%ERR::
.PLEASE ERROR IN TU161.CTL-- DDTUG STOPPING
.PRI TU161.LOG
%TERR::
.PLEASE MTA1 ELAPSED RUNTIME EXCEEDED 1 HR. GOING TO NEXT DRIVE
.QUE INP:=TU160[35,1414]/TIME/UNIQ:0,/OUT:0
.PRI TU161.LOG
%FIN::