I tried the example (JOB4) however it worked to a certain extent. All the dsns were moved to a volume othere than what was specified and to a storage pool which is not the same. The dsns are SMS managed. Could this be the reason? Below is the job I ran:
//STEP1 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=* //SYSIN DD * COPY DATASET( - INCLUDE(PROD03.**)) /* FILTER ON DS W/1ST LEV Q USER1 */ - OUTDYNAM(SLU340) /* ALLOC VOL 338001 DYNAMICALLY */ - DELETE CATALOG FORCE - SPHERE - TGTALLOC(SOURCE) - TGTGDS(SOURCE) - CANCELERROR - OPT(4) - ALLDATA(*) ALLEXCP /* -------------------------------------------- On Wed, 5/6/15, Mike Schwab <mike.a.sch...@gmail.com> wrote: Subject: Re: Primary allocation of a dataset To: IBM-MAIN@LISTSERV.UA.EDU Received: Wednesday, May 6, 2015, 8:44 PM To consolidate a multi volume dataset to one (or fewer) volume(s) http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/r2250.htm?lang=en //JOB4 JOB accounting information,REGION=nnnnK //STEP1 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=A //SYSIN DD * COPY DATASET( - INCLUDE(data.set.name)) /* FILTER ON DS W/1ST LEV Q USER1 */ - OUTDYNAM(volser) /* ALLOC VOL 338001 DYNAMICALLY */ - DELETE CATALOG FORCE - TGTALLOC(SOURCE) /* A single volume dataset you can just do a dataset consolidate. http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.adru000/cnsex.htm?lang=en //JOB1 JOB accounting information,REGION=nnnnK //STEP1 EXEC PGM=ADRDSSU //SYSPRINT DD SYSOUT=A //DASD DD UNIT=3390,VOL=(PRIVATE,SER=volser),DISP=OLD //SYSIN DD * CONSOLIDATE DATASET(INCLUDE(data.set.name) - EXCLUDE(data.set.name)) - PHYSINDDNAME(DASD) /* On Wed, May 6, 2015 at 5:21 PM, Paul Gilmartin <0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On 2015-05-06 16:18, Mike Schwab wrote: >> I would be more worried about specifying enough space for the current >> contents and calculating a nice secondary space value. 10% for a 16 >> extent type. Maybe 1% for a 1## extent type. >> > Oh, be done with it! HMIGRATE it; HRECALL it. HSM coalesces everything > into one neat extent and RLSEs everything else. (But I wish there were a > way to achieve this with half the I/Os.) > > -- gil > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN