;[123,230]F4P123X30.CMD	21-JAN-77	N.S.
; SKELETON FILE IS [123,30]F4P123X30.SKC
;
; REVISION RECORD:
; 20-JAN-77  ADD DESCRIPTIVE COMMENTS 	N.S.
; 21-JAN-77 ALPHABETIZE ROUTINES (N.S.)
; 6-DEC-77 (MK)	CHANGE FROM 11D BATCH TO 11D INDIRECT MCR
; 26-JAN-78 (MAO) ADD COMRD, COMWR AND QXUP FROM FLECS OUTPUT
;
TIM
SET /UIC=[123,30]
; COMPILE COMRD (READ FILE QXDAT.DAT)
PIP OU:[123,30]COMRD.OBJ;*/DE
F4P OU:[123,30]COMRD,LS:[123,30]COMRD/LI:0/-SP=OU:[123,30]COMRD
PIP LS:[123,30]COMRD.FLL/AP=LS:[123,30]COMRD.LST
PIP OU:[123,30]COMRD.FTN;*,LS:[123,30]COMRD.LST;*/DE
; COMPILE COMWR (WRITE QXDAT.DAT)
PIP OU:[123,30]COMWR.OBJ;*/DE
F4P OU:[123,30]COMWR,LS:[123,30]COMWR/LI:0/-SP=OU:[123,30]COMWR
PIP LS:[123,30]COMWR.FLL/AP=LS:[123,30]COMWR.LST
PIP OU:[123,30]COMWR.FTN;*,LS:[123,30]COMWR.LST;*/DE
;  COMPILE DATESS (WRITE DATE ON STORAGE SCOPE)
PIP OU:[123,30]DATESS.OBJ;*,LS:[123,30]DATESS.LST;*/DE
F4P OU:[123,30]DATESS,LS:[123,30]DATESS/-SP=IN:[123,30]DATESS/-TR
;  COMPILE DGRID (DRAW GRID ON STORAGE SCOPE)
PIP OU:[123,30]DGRID.OBJ;*,LS:[123,30]DGRID.LST;*/DE
F4P OU:[123,30]DGRID,LS:[123,30]DGRID/-SP=IN:[123,30]DGRID/-TR
; COMPILE EVPARS (EVENT PARSER)
PIP OU:[123,30]EVPARS.OBJ;*,LS:[123,30]EVPARS.LST;*/DE
F4P OU:[123,30]EVPARS,LS:[123,30]EVPARS/-SP=IN:[123,30]EVPARS/-TR
; COMPILE MCRREQ (REQUEST MCR - D ONLY)
PIP OU:[123,230]MCRREQ.OBJ;*,LS:[123,230]MCRREQ.LST;*/DE
F4P OU:[123,230]MCRREQ,LS:[123,230]MCRREQ/-SP=IN:[123,230]MCRREQ/-TR
; COMPILE PUTEVT (WRITE USER EVENT TO Q-TAPE)
PIP OU:[123,30]PUTEVT.OBJ;*,LS:[123,30]PUTEVT.LST;*/DE
F4P OU:[123,30]PUTEVT,LS:[123,30]PUTEVT/-SP=IN:[123,30]PUTEVT/-TR
; COMPILE QLKTST (TEST DATA ACQUISITION LOCK)
PIP OU:[123,30]QLKTST.OBJ;*,LS:[123,30]QLKTST.LST;*/DE
F4P OU:[123,30]QLKTST,LS:[123,30]QLKTST/-SP=IN:[123,30]QLKTST/-TR
; COMPILE QXUP (UPDATE QXDAT.DAT)
PIP OU:[123,30]QXUP.OBJ;*/DE
F4P OU:[123,30]QXUP,LS:[123,30]QXUP/LI:0/-SP=OU:[123,30]QXUP
PIP LS:[123,30]QXUP.FLL/AP=LS:[123,30]QXUP.LST
PIP OU:[123,30]QXUP.FTN;*,LS:[123,30]QXUP.LST;*/DE
;  COMPILE SCALE (WRITE SCALE ON STORAGE SCOPE)
PIP OU:[123,30]SCALE.OBJ;*,LS:[123,30]SCALE.LST;*/DE
F4P OU:[123,30]SCALE,LS:[123,30]SCALE/-SP=IN:[123,30]SCALE/-TR
; COMPILE VALEVT (CHECK EVENT NUMBERS FOR Q COMMANDS)
PIP OU:[123,30]VALEVT.OBJ;*,LS:[123,30]VALEVT.LST;*/DE
F4P OU:[123,30]VALEVT,LS:[123,30]VALEVT/-SP=IN:[123,30]VALEVT/-TR
;  COMPILE WRTSS (WRITE TEXT ON STORAGE SCOPE)
PIP OU:[123,30]WRTSS.OBJ;*,LS:[123,30]WRTSS.LST;*/DE
F4P OU:[123,30]WRTSS,LS:[123,30]WRTSS/-SP=IN:[123,30]WRTSS/-TR