过程 数据集压缩

来源:互联网 发布:淘宝店招图片大全免费 编辑:程序博客网 时间:2024/05/16 03:00

//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)            
/*   

原创粉丝点击