.; [XXX,YYY]FLETKB.CMD		MAO	30-APR-80
.ENABLE SUBSTITUTION
.ENABLE GLOBAL
.;
.; INDIRECT FILE TO CREATE FLE.BLD AND BUILD FLE.TSK
.;
.; REVISIONS
.;
.IFNDF $DV .ASKS $DV WHICH DEVICE ARE FLECS FILES ON
.IFNDF $UIC .ASKS $UIC WHICH UIC ARE FLECS FILES UNDER
.SETS DIR "'$DV''$UIC'"
SET /UIC='$UIC'
TIM
;
; DELETE OLD VERSIONS OF .BLD, .MAP, .TSK
PIP 'DIR'FLE.BLD;*,FLE.MAP;*,FLE.TSK;*/DE
;
; CREATE NEW VERSION OF .BLD
.OPEN 'DIR'FLE.BLD
.ENABLE DATA
'DIR'FLE/FP,'DIR'FLE/-SP='DIR'M,A,L,FSUB
'DIR'FLERSX
/
;LIBR=F4PRES:RO		;FCS AND/OR FORTRAN RESIDENT LIBRARY
ACTFIL=4
UNITS=5
ASG=TI:1		;FOR COMMAND LINE INPUT (.GCML)
ASG=TI:2		;FOR ERROR MESSAGES
ASG=SY:3		;FOR FTN FILE
ASG=SY:4		;FOR FLL FILE
ASG=SY:5		;FOR FLX FILE
TASK=...FLE
//
.DISABLE DATA
.CLOSE
;
; BUILD TASK
TIM
TKB @'DIR'FLE.BLD
TIM
.;
.; END OF FILE FLETKB.CMD