//USERID JOB ZLP,CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),
// NOTIFY=&SYSUID
//COMP PROC
//STEP1 EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSIN1 DD DSN=IBMUSER.TEST.G905.DATA01,DISP=SHR
//SYSIN2 DD DSN=IBMUSER.TEST.G905.DATA02,DISP=SHR
//SYSOT1 DD DSN=IBMUSER.TEST.G905.DATA03,DISP=SHR
//COMP PEND
//CPYLOAD EXEC COMP
//STEP1.SYSIN DD *
COPYOPER COPY OUTDD=SYSOT1
INDD=(SYSIN2,(SYSIN1,R),SYSOT1)
/*
过程 数据集压缩
最新推荐文章于 2024-04-19 10:10:10 发布
3171

被折叠的 条评论
为什么被折叠?



