parikshit123
Active User
Joined: 01 Jul 2005 Posts: 269 Location: India
|
|
|
|
Hi Lavanya,
This job will rename a dataset, you provide the current dataset name and the new name and the volume on which the dataset resides
Code: |
//HERC01P JOB (HERC01),'IEHPROGM',CLASS=A,MSGCLASS=X,
// MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*
//STEP010 EXEC PGM=IEHPROGM,REGION=1024K
//*
//SYSPRINT DD SYSOUT=X
//DD1 DD UNIT=3350,VOL=SER=PUB000,DISP=OLD
//DD2 DD UNIT=3350,VOL=SER=PUB001,DISP=OLD
//*
//SYSIN DD *
RENAME DSNAME=HERC01.SOURCE.ASM,VOL=3350=PUB001, X
NEWNAME=HERC01.DEV.ASM
RENAME DSNAME=HERC01.SOURCE.ASMMAC,VOL=3350=PUB001, X
NEWNAME=HERC01.DEV.ASMMAC
/*
|
|
|