Tuesday, 25 June 2013

Copy Using IDCAMS

Copy Using IDCAMS

//TRNG111C JOB CLASS=C,NOTIFY=TRNG111    
//S1 EXEC PGM=IDCAMS                    
//SYSPRINT DD SYSOUT=*                  
//SYSIN DD *                            
  REPRO IDS(TRNG111.X.X) ODS(TRNG111.X.X) 

No comments:

Post a Comment