作业 1 用的例子:
//WUTSOA JOB (NEU-BITCO,SD3),CLASS=A,
// MSGCLASS=X,MSGLEVEL=(1,1),NOTIFY=WUTSO
//STEP1 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//DD1 DD DSN=WUTSO.COBOL.JTEST,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(5,5,3)),
// DCB=(LRECL=80,BLKSIZE=32720,RECFM=FB,DSORG=PO)
//*
//STEP2 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=A
//SYSUT1 DD DSN=WUTSO.JCL.CNTL,DISP=OLD
//* DSN=WUTSO.JCL.CNTL 这是一个 PS
//SYSUT2 DD DSN=WUTSO.COBOL.JTEST,DISP=OLD
//* DSN=WUTSO.COBOL.JTEST 这个是 PDS,注意一下
//SYSIN DD *
GENERATE MAXNAME=1
MEMBER NAME=JOBCARD //PDS 中要起的名字
//*
//STEP3 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DSN=WUTSO.COBOL.JTEST(JOBCARD),DISP=OLD
//SYSUT2 DD SYSOUT=*
//*
//
注:
SYSPRINT DD:指定输入信息用的 data set
SYSUT1:指定输入 data set
SYSUT2:指定输出 data set
SYSIN DD:指定控制语句,当输出是顺序 data set 且不需要特殊处理时可以指定为
DUMMY
评论0
最新资源