.ENABLE SUBSTITUTION
;
;	BUILD THE DOCUMENTATION FOR FILES SPEC IN 'P1'.LIS
;
;	BUILD FILE DOCUMENTATION FROM FILE 'P1'
;				IN ACCOUNT 'P2'
;
.IFNDF P2 .GOTO OY
.SETS DESUIC P2
.ENABLE QUIET
.SETS DEFDEV ""
.SETS DEFUIC ""
.SETS DEFEXT ""
@FNAMEPARS/LO 'P1'
.SETS FNAM FILE+".BAT"
.OPEN 'FNAM'
.DATA $JOB
.DATA $@GO 'DESUIC'
.DATA $@MAKDOC 'P1'
.DATA $EOJ
.CLOSE
SUBMIT 'FNAM'/DE
.EXIT
.OY:
.OPEN TI:
.ENABLE DATA

	DESTINATION ACCOUNT NOT SPECIFIED

.DISABLE DATA
.CLOSE