Wednesday, 3 July 2013

KSDS - REPRO Using IDCAMS to COPY A DATASET INTO NEW DATASET

KSDS - REPRO Using IDCAMS to COPY A DATASET INTO NEW DATASET

//TRNG111A JOB NOTIFY=TRNG111                              
//STEP1  EXEC PGM=IDCAMS                                    
//SYSPRINT DD SYSOUT=*                                      
//SYSIN DD *                                                
  REPRO IDS(TRNG111.JCLVSAM.DATA1) ODS(TRNG111.JCLVSAM.KSDS1)

Data in TRNG111.JCLVSAM.DATA1 (Seq DS)

c2000ramesh15-10-2000che25000
c3100ganesh25-01-2001bng10000
c3500satish12-02-2000hyd15000
c4000ganesh10-12-2001che30000
c5000ramesh23-06-2008del30000

No comments:

Post a Comment