kckinney

 Profile Answers by kckinney Questions by kckinney

• Jun 8th, 2007

 

There are many ways, here's one - Allocate the duplicate DSN using BR14 and the LIKE parameter. Then GENER the existing dataset to the new dataset.You can also use IDCAMS to do this using REPRO instead of GENER.kk

kckinney

 Profile Answers by kckinney Questions by kckinney

• Sep 3rd, 2010

 

IDCAMS REPRO with LIKE
//STEP01   EXEC PGM=IDCAMS          
//SYSPRINT DD   SYSOUT=*                        
//INFILE   DD   DSN=DATASET.OLD,                
//             DISP=(SHR,KEEP,KEEP)             
//OUTFILE  DD   DSN=DATASET.NEW,                
//             LIKE=DATASET.OLD,                
//             DISP=(NEW,CATLG,DELETE),UNIT=3390,
//             SPACE=(CYL,50)                   
//SYSIN DD *                                    
  REPRO INFILE(INFILE) OUTFILE(OUTFILE)