//FCOPFILE JOB (,0100),CLASS=R,MSGCLASS=R                      
//STEP04  EXEC PGM=ADRDSSU,REGION=0M,TIME=1440 PARM='TYPRUN=NO 
//SYSPRINT DD  SYSOUT=*                                        
//SYSIN    DD  *                                               
    COPY DATASET(INC(      -                                   
    KCI09.D111997.BAKMSTR -                                    
    )) -                                                       
       RENAMEU(KCI09.D111997.*,KCI09.D1197.*) -                
           OPT(4)  -                                           
           SHARE   -                                           
           ALLEXCP -                                           
           ALLDATA(*) -                                        
           CATALOG                                             
/*