Good point, thank you.

Dave Gibney
Information Technology Services
Washington State University


> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Staller, Allan
> Sent: Tuesday, October 18, 2011 2:03 PM
> To: [email protected]
> Subject: Re: IEC331I 050-030(VVDSFULL, PROD06)
> 
> 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 [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

Reply via email to