Easytrieve A010无效的文件参考

时间:2013-09-03 07:10:53

标签: jcl easytrieve

我在easytrieve prog的这行中得到了错误。

JOB INPUT NULL MASTER-FILE

GET DATAPRM      <~~~~~~~ LINE 59

DO WHILE NO EOF DATAPRM
    ...

    GET DATAPRM
END-DO


..
59******A010 INVALID FILE REFERENCE - DATAPRM

..

我有像这样的DLBL ..

//DLBL DATAPRM, 'DATAPRM.SAM'

我正在尝试使用输入文件DATAPRM(卡)通过数据填充主文件..正在读取记录(我假设我的计数器正在移动)但不幸的是,在它终止程序之前,错误发生..也许EOF?

1 个答案:

答案 0 :(得分:0)

你的程序没有停止。不只是在您展示的代码中,而且在任何地方。或者如果你这样做,它是有条件的,条件不符合。

Easytrieve Plus实现“自动循环”。通常使用在JOB语句中命名的文件,但是当指定NULL时,它只是从JOB中的最后一个语句循环到JOB再次。

在你的DO中进入EOF后,你需要在完成其他所有操作后停止。现在发生的事情是你得到EOF,离开DO,再次骑车到顶部(JOB),然后在EOF之后进行GET,所以******A010 INVALID FILE REFERENCE - DATAPRM