Trailing-Edge
-
PDP-10 Archives
-
ap-c796e-sb
-
jobdat.ctl
There are 25 other files named jobdat.ctl in the archive. Click here to see a list.
;JOB%1(20) TO MAKE JOBDAT.REL FROM JOBDAT.MAC
;SUBMIT WITH COMMAND .SUBMIT JOBDAT/RESTART:1
;
;REQUIRED FILES: (LATEST RELEASED VERSIONS)
;[10,7] PIP.SHR
; DIRECT.SHR
; COMPIL.SHR
; MACRO.SHR
; CREF.SHR
;[SELF] JOBDAT.MAC
; JBT???.RND ;DOC FILE
;
;OUTPUT:
; JOBDAT.REL
; JOBDAT.UNV
; JOBDAT CREF LISTING
; JOBDAT.LOG
; JBT???.DOC ;DOC FILE
;
;
;MAKE A RECORD OF WHAT IS BEING USED
.SET WATCH VERSION
.IF (ERROR) ;TOUGH LUCK
.ASSIGN DEC SYS
.ASSIGN DEC UNV
.ASSIGN DEC REL
.ASSIGN DSK LPT
.DIRECT/CHECKSUM JOBDAT.MAC,JBT*.RND,JOBDAT.CTL
;
;COMPILE JOBDAT TO OBTAIN JOBDAT.REL PRODUCING CREF FILE
.COMPILE /CREF /COMPILE JOBDAT.MAC
;MAKE TEMP FILE TO FORCE UNIVERSALS
.COPY UNV.MAC=TTY:
%..UNV==0
;COMPILE AGAIN TO GET JOBDAT.UNV
.COMPILE UNV.MAC+JOBDAT.MAC
.DIRECT/CHECKSUM JOBDAT.REL,JOBDAT.UNV
.COPY JOBDAT.TMP=JBT???.RND
.R RUNOFF
*JOBDAT.DOC=JOBDAT.TMP
;PRODUCE SOURCE LISTING AND TELL OPERATOR
.CREF
.PLEASE JOBDAT SUCCESSFUL
;
%FIN:
.DELETE *.TMP
.KJOB/F