I would use the ADRDSSU utility with the RENAMEU parameter, something like:
//DSMOVE EXEC PGM=ADRDSSU ,PARM='TYPRUN=NORUN'
//SYSPRINT DD SYSOUT=*
COPY DATASET( INC( TECH.** ) -
) -
RENAMEU(TECH1) -
NULLSTORCLAS -
DELETE CATALOG -
SPHERE OPT(4)
**do veryfy the parameters before running, I suggest use the TYPRUN parameter
for 1st run.
Actually I think I would do a backup of the datasets beforehand, or do a copy
with a delete afterwards.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
