Tuesday, 25 June 2013

Copy Datasets Using IEBGENER

//JOBCOPY1  JOB CLASS=A,MSGLEVEL=(1,1),NOTIFY=&SYSUID
//STEP1 EXEC PGM=IEBGENER                            
//SYSPRINT DD SYSOUT=*                              
//SYSUT1 DD DISP=SHR,DSN=TRNG111.X.X                
//SYSUT2 DD DISP=SHR,DSN=TRNG111.X.Y                
//SYSIN DD DUMMY                                      

No comments:

Post a Comment