Good Morning Gentle Readers, I need to move some USER CATS from a non-SMS volume to a SMS managed volume. Besides modifying the SMS ACS SC routine is there anything else that I need to consider? Below is my job which I will use to perform the move. /* //BACKUP EXEC PGM=IDCAMS,COND=(4,LT) //DISK1 DD DSN=SYS1.WHMS01.UCAT.BK01.CATJOB01, // DISP=(NEW,CATLG),UNIT=3390,SPACE=(CYL,(10,10),RLSE) //DISK2 DD DSN=SYS1.WHMS01.UCAT.BK02.CATJOB01, // DISP=(NEW,CATLG),UNIT=3390,SPACE=(CYL,(10,10),RLSE) //SYSPRINT DD SYSOUT=* //SYSIN DD * ALTER WHMS01.UCAT LOCK EXPORT WHMS01.UCAT OUTFILE(DISK1) TEMPORARY EXPORT WHMS01.UCAT OUTFILE(DISK2) TEMPORARY /* //DELETE EXEC PGM=IDCAMS,COND=(4,LT) //SYSPRINT DD SYSOUT=* //SYSIN DD * DELETE WHMS01.UCAT RECOVERY USERCATALOG /* //DEFINE EXEC PGM=IDCAMS,COND=(4,LT) //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE - USERCATALOG - (NAME (WHMS01.UCAT) - CYL(5) - VOLUME(RPM001) - ICFCATALOG - STRNO(3) - FREESPACE(20 20) - NOIMBED - LOCK - SHAREOPTIONS(3 4)) - DATA( - CONTROLINTERVALSIZE(4096)) /* //IMPORT EXEC PGM=IDCAMS,COND=(4,LT) //SYSPRINT DD SYSOUT=* //SYSIN DD * IMPORT IDS(SYS1.WHMS01.UCAT.BK01.CATJOB01) - ODS(WHMS01.UCAT) - ALIAS - LOCK - INTOEMPTY /* //DIAGNOSE EXEC PGM=IDCAMS,COND=(4,LT) //SYSPRINT DD SYSOUT=* //DIAGDD DD DSN=WHMS01.UCAT,DISP=SHR //SYSIN DD * DIAGNOSE ICFCATALOG INFILE(DIAGDD) EXAMINE NAME(WHMS01.UCAT) - ITEST NODATATEST ERRORLIMIT(1000) EXAMINE NAME(WHMS01.UCAT) - NOITEST DATATEST ERRORLIMIT(1000) /*
---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
