When I have a lot of VSAM files to rename, I use DFDSS to do the rename
with filtering, here is an example
//S02 EXEC PGM=ADRDSSU,REGION=6000K,TIME=95
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=A
//SYSIN DD *
COPY -
DATASET(INCLUDE(DOTWONG.COPP.VSAM.IPOIDHD)) -
RENAMEUNCONDITIONAL(DOTWONG.COPP.VSAM.IPOIDHD, -
DOTWONG.NEWNAME.VSAM.TEST) -
DELETE CATALOG PURGE
/*
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html