NEW file.
INPUT PROGRAM.
LOOP id=1 TO 1000.
	END CASE.
END LOOP.
END FILE.
END INPUT PROGRAM.
EXECUTE.