在子程序

Question

让我说我从JCL执行COBOL程序，使用SYSIN DD提供数据。

如果该程序然后CALLs COBOL子程序，并且输入中仍有一些数据可用，那么子程序是否能够使用ACCEPT语句读取它们？

或者只能从JCL调用的运行单元的主程序访问SYSIN？

编辑：我认为这将是一个糟糕的编码习惯。我不打算使用它，也不需要我知道的更好的替代方案（例如从主数据中读取输入设备数据并通过它们LINKAGE将其传递给子程序）

实际上我不是在编写COBOL代码，而是在研究/处理它，所以我对＆＃34;极端情况＆＃34;感兴趣行为，以改善我对COBOL语义的理解。

Answer 1

您可以在主程序上使用ACCEPT。如果要发送信息，则应使用副本。