结束文件

END FILE 在 INPUT PROGRAM—END INPUT PROGRAM 结构中用于指示程序在实际迂到文件末尾之前停止读取数据。 END FILE 可以与 END CASE 配合使用，通过使程序延迟文件结束处理直到它读取了多个数据文件来并置原始数据文件。 END FILE 还可以与 LOOP 和 END CASE 配合使用，以在不输入任何数据的情况下生成数据。

END FILE

示例

INPUT PROGRAM.
DATA LIST FILE=PRICES /YEAR 1-4 QUARTER 6 PRICE 8-12(2).
DO IF (YEAR GE 1881).  /*Stop reading before 1881
END FILE.
END IF.
END INPUT PROGRAM.