Thanks John . I am new to Rexx , but just wanted to know how in the below code, we make sure that only what is in my input file is read and renamed and not all the datasets under the SLXR5V.SAPDB.* ?
/* REXX */ XX=OUTTRAP('DATA.','*') LISTC LVL('SLXR5V.SAPDB​') XX=OUTTRAP("OFF") DO I=1 TO DATA.0 LINE=DATA.I IF 'NONVSAM' <> WORD(LINE,1) THEN ITERATE /* ONLY WORKS FOR NON-VSAM */ DSN=WORD(LINE,3) /* GET THE DSN */ SUFFIX=SUBSTR(DSN,12) /* STRIP OFF THE FRONT */ NEWDSN='SLXR5V.SAPDB.X'||SUFFIX "ALTER '"DSN"' NEWNAME('"NEWDSN"')" END Thanks Ron T ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN