Copy from VSAM to Sequential

//******************************************************************** 
//***     VSAM TO SEQUENTIAL                                           
//***                                                                  
//******************************************************************** 
//*                                                                    
//STEP005   EXEC PGM=IDCAMS                                            
//SYSPRINT DD  SYSOUT=*                                                
//*YSPRINT DD SYSOUT=A                                                 
//OLD  DD DSN=OCCUL.IDPI991.POLMASTR,DISP=SHR                          
//NEW  DD DSN=TCCPU.DLPXV1.POLMASTR,DISP=OLD                           
//SYSIN DD *                                                           
   REPRO -                                                             
       INFILE(OLD) -                                                   
       OUTFILE(NEW) -                                                  
       SKIP(40) -                                                      
       COUNT(50)                                                       
/*