//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)
/*
过程 数据集压缩
最新推荐文章于 2022-04-01 15:58:29 发布