.; [1,6]SUB.CMD
.;		B. Z. Lederman	Bankers Trust Co.
.;
.;	28-Nov-84	Identify the number of outstanding LASTFIL.ACC
.;			files and submit one batch job for each.
.;
	.ENABLE SUBSTITUTION

PIP SUB.TMP;*/DE/NM
SRD SUB.TMP/CM=LASTFIL.ACC;*

	.OPENR #1 SUB.TMP
	.IF <FILERR> = <SUCCES> .GOTO READ
;
;	Could not open SUB.TMP list file. There may be no LASTFIL.ACC files.
;
	.EXIT	<ERROR>
.READ:
	.READ #1 A
	.IF <FILERR> <> <SUCCES> .GOTO END
	.IF A <> "LASTFIL" .GOTO END

SUB /NOPRINT=PROCESS.BAT

	.GOTO READ

.END: