z/OS环境下PL/I程序无法识别SYSIN2 DD语句的问题求助

API 探路者

2026-6-12

PL/I程序无法识别JCL中的SYSIN2 DD语句（IBM0204S ONCODE=84）

我编写了一个简单的PL/I程序，用于计算存储在PDS成员中数值的平均值。程序编译和执行流程正常，但无法识别JCL中定义的SYSIN2 DD语句，触发报错信息IBM0204S ONCODE=84，提示未找到对应FILE=SYSIN2的DD语句或CMS FILEDEF。

PL/I代码

AVERAGE: PROCEDURE OPTIONS(MAIN);

  DECLARE SYSIN2 FILE INPUT EXTERNAL ENVIRONMENT(SYSIN2);
  DECLARE A FLOAT; 
  DECLARE B FLOAT; 
  DECLARE C FLOAT; 
  DECLARE D FLOAT; 
  DECLARE E FLOAT;
  DECLARE SUM FLOAT; 
  DECLARE AVERAGE_GRADE FLOAT;

  GET FILE(SYSIN2) LIST(A, B, C, D, E); 

  SUM = A + B + C + D + E;
  AVERAGE_GRADE = SUM / 5;

  PUT LIST ('The average is ', AVERAGE_GRADE);

 END AVERAGE;

JCL代码

//PLITEST JOB (ACCT),'PL/I TEST',CLASS=A,MSGCLASS=A,NOTIFY=&SYSUID

//* COMPILE STEP

//COMPILE EXEC PROC=IBMZCPLG,REGION=64M

//SYSIN DD DSN=Z74114.PLI(AVERAGE),DISP=SHR

//SYSPRINT DD SYSOUT=*

//SYSLMOD DD DSN=Z74114.LOAD(AVERAGE),DISP=SHR

//* RUN STEP

//RUN EXEC PGM=AVERAGE

//STEPLIB DD DSN=Z74114.LOAD,DISP=SHR

//SYSIN2 DD DSN=Z74114.SOURCE(AVERAGE),DISP=SHR

//SYSPRINT DD SYSOUT=*

报错信息（翻译后）

IBM0204S ONCODE=84 因未使用对应（FILE=SYSIN2）的DD语句或CMS FILEDEF，触发UNDEFINEDFILE条件。

排查与解决步骤

验证数据集有效性：确认Z74114.SOURCE(AVERAGE)数据集存在，且执行用户拥有读权限。可通过ISPF 3.4或LISTDS命令检查。
确认加载模块版本：确保Z74114.LOAD(AVERAGE)是最新编译的版本，避免旧版本未声明SYSIN2导致报错。重新执行编译步骤，确保编译无错误。
检查编译日志：查看COMPILE步骤的SYSPRINT输出，确认SYSIN2文件声明无语法错误，编译过程无警告。
调整文件声明：尝试移除PL/I中文件声明的EXTERNAL关键字，修改后重新编译执行：
```
DECLARE SYSIN2 FILE INPUT ENVIRONMENT(SYSIN2);
```
核对JCL语法：确认RUN步骤中SYSIN2 DD语句拼写正确，无多余空格（JCL不区分大小写，但需与PL/I声明的名称一致）。