我正在从 PDS 成员传递 SYSIN,在 Cobol 程序中我是使用来自 SYSIN 的 Accept 变量的值,给出 U4038 错误

I'm passing SYSIN from PDS member and in Cobol program I am the value using Accept variable from SYSIN giving U4038 error

我在尝试使用 PDS 成员的 SYSIN 读取输入值时遇到以下错误。

//SYSIN DD DSN=SYSGEN.DEVL.GBUYVC.GDPR.CODE(PFMA342X),DISP=SHR

在 Cobol 中,我在下面提到了 accept 语句:

ACCEPT W-QUOTE-CURRENT-YEAR FROM SYSIN.

提交作业时出现以下错误

Error: open of DISPLAY or ACCEPT file with environment name SYSIN was unsuccessful.

有人可以帮助我了解我哪里做错了吗?

您好,感谢您抽出宝贵时间提供宝贵意见。

实际上在 JCL 中我使用了一个不接受 SYSIN 的 Proc,所以我删除了那个 PROC 并简单地执行了 JCL 就像

//STEP01 EXEC PGM=progname,
//SYSIN DD DSN=Datasetname,DISP=SHR 

这样就成功了