Do not use process(SYS1) w/o excluding the VVDS and the VTOCIX (Check
the syntax, Done from memory).
COPY DATASET(INCLUDE(**)
EXCLUDE(SYS1.VTOCIX.VPROD06,
SYS1.VVDS.PROD06) -
) -
INDY( -
(PROD06) -
)-
EXCLUDE(SYS1.VTOCIX.VPROD06 -
SYS1.VVDS.PROD06) -
ALLEXCP -
ALLDATA(*) -
ADMIN -
CATALOG -
DELETE -
PROCESS(SYS1) -
PURGE -
SPHERE
<snip>
With PROG06 in DSNEW status, run:
//ADRDSSU EXEC PGM=ADRDSSU,REGION=5M,
// TIME=1439 ,PARM='TYPRUN=SCAN'
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
COPY DATASET(INCLUDE(**)) -
INDY( -
(PROD06) -
)-
ALLEXCP -
ALLDATA(*) -
ADMIN -
CATALOG -
DELETE -
PROCESS(SYS1) -
PURGE -
SPHERE
Which will move everything it can off of PROD06 and keep it in the same
SMS pool.
Then determine why whatever is left wouldn't move, remove the inhibitor,
and move it.
When volume is empty, reinit.
IMO, any of the other methods suggested include unneeded risk.
</snip>
----------------------------------------------------------------------
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
