COPYNSUB PROCESS PNODE=REPSRV SNODE=RPCLIENT -                                
 STARTT=(,10:10:00) -                                                           
 RETAIN=YES                                                                     
                                                                           
COPY1     COPY     FROM (PNODE DSN=&PARM1                           -           
                       DISP=SHR)                                    -           
                   COMPRESS EXT                                     -           
                   CKPT=500K                                        -           
                   TO  (SNODE DSN=&PARM2 UNIT=SYSDA )                           
                                                                             
NOTIFY     RUN TASK SNODE (PGM=NOTIFY) -                                         
 SYSOPTS=&OKOPT                                                                 
                                                                                
MORECOPY   SUBMIT  DSN=NDM.PROCESS.LIB(SPROC)            -           
                   SUBNODE=SNODE                                                
