您的位置:首页 > 其它

谁能告诉我哪里出错了,JCL

2008-06-05 16:22 169 查看
000100 //IBMUSERA JOB NOTIFY=&SYSUID
000200 //STEP1 EXEC PGM=DFSORT
000300 //SYSIN DD *
000400 OMIT COND=(5,3,EQ,C'MUS')
000500 //SYSOUT DD SYSOUT=*
000600 //SORTIN DD DSNAME=IBMUSER.TEST.QSAM1,DISP=SHR
000700 //SORTOUT DD DSNAME=IBMUSER.TEST.QSAM4,DISP=(NEW,CATLG,DELETE),
000800 // SPACE=(CYL,(1,1)),DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200)
000900 //
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: