Question

我试图了解我在JCL文件中出错的地方。这是我的代码如下：

//MULTG013       JOB  1,NOTIFY=&SYSUID
//STEP1           EXEC PGM=ICEGENER
//SYSUT1        DD DSN=UNTG013.DATAIN(AUTODATA),DISP=SHR
//SYSUT2        DD DSN=UNTG013.DATAOUT(MULTIOUT),DISP=SHR
//SYSPRINT      DD SYSOUT=*
//SYSIN         DD DUMMY
//STEP2           EXEC PGM=IDCAMS
//SYSPRINT      DD SYSOUT=*
//SYSIN         DD *
    DELETE      UNTG013.DATAIN(AUTONEW)
/*
//STEP3           EXEC PGM=IDCAMS
//SYSPRINT      DD SYSOUT=*
//OLDINV        DD DSN=UNTG013.DATAIN(AUTODATA),DISP=SHR
//NEWINV        DD DSN=UNTG013.DATAIN(AUTONEW),DISP=SHR
//SYSIN         DD *
    REPRO INFILE(OLDINV)    OUTFILE(NEWINV)
/*
//STEP4           EXEC PGM=IDCAMS
//SYSPRINT      DD SYSOUT=*
//STUFF         DD DSN=UNTG013.DATAIN(AUTONEW),DISP=SHR
//SYSIN         DD *
    PRINT INFILE(STUFF) CHAR
/*
//STEP5           EXEC PGM=IKJEFT01
//SYSPRINT      DD SYSOUT=*
//SYSTSPRT      DD SYSOUT=*
//SYSTSIN       DD *
    RENAME     'UNTG013.DATAIN(AUTONEW)' 'UNTG013.DATAIN(ITDSDATA)'
/*
//STEP6           EXEC PGM=IDCAMS
//SYSPRINT      DD SYSOUT=*
//STUFF         DD DSN=UNTG013.DATAIN(ITDSDATA),DISP=SHR
//SYSIN         DD *
    PRINT INFILE(STUFF) CHAR
/*
//STEP7           EXEC PGM=IDCAMS
//SYSPRINT     DD SYSOUT=*
//SYSIN        DD *
    DELETE     UNTG013.DATAIN(ITDSDATA)
/*
//

我在SYS Z上得到的错误是：IEFC605I未知操作字段，第17行和第17行。 25.

不太确定它是如何不正确的。感谢

行。这是来自spool的消息：

SDSF输出显示MULTG013 JOB02122 DSID 4 LINE NOT PAGE MODE DATA
命令输入===＆gt; SCROLL ===＆gt;页的 * ** * ** * ** * ** * ** * * 数据顶部 * ** * ** * ** * ** * ** * ** STMT NO。消息
17 IEFC605I未知的操作领域
25 IEFC605I未知的操作领域
的 * ** * ** * ** * ** * ** * 数据底部 * ** * ** * * * * ** * ** *

也刚刚发现了这一点。

SDSF输出显示MULTG013 JOB02122 DSID 2 LINE NOT PAGE MODE DATA
命令输入===＆gt; SCROLL ===＆gt;页的 * ** * ** * ** * ** * ** * * 数据顶部 * ** * ** * ** * ** * ** * ** J E S 2 J O B L O G - S Y S T E M S 0 W 1 - N O D E

17.59.22 JOB02122 ---- 2014年3月28日星期五----
17.59.22 JOB02122 IRR010I USERID UNTG013已分配给此职位。
17.59.22 JOB02122 IEFC452I MULTG013 - JOB NOT RUN - JCL ERROR 415
------ JES2 JOB STATISTICS ------
           41卡读取
           45 SYSOUT PRINT RECORDS
            0 SYSOUT PUNCH RECORDS
            2 SYSOUT SPOOL KBYTES
         0.00分钟执行时间
的 * ** * ** * ** * ** * ** * 数据底部 * ** * ** * * * * ** * ** *

希望这有助于并感谢迄今为止的输入！我仍在调查它，看看我是否可以自己解决这个问题。

Answer 1

在查看您发布的JCL来源时，我会在两个//STUFF行中的DD和STUFF之间看到TAB。如果它们在您的原始JCL中，那么尝试用空格替换它们。 JCL Blanks和TAB不可互换。

未知的运营领域JCL

1 个答案: