Chuck,
I'll start with three assumptions:
1) The 70 volumes are in there own Storage Group (let's call it
SGCHUCK0)
2) The datasets already exist
3) They have some qualifiers that will allow you to identify them
with a mask
If those assumptions are true, then my approach would be:
a) write an ACS routine that directs the datasets to the Storage
Group SGCHUCK0. Using a mask(s) to put the datasets in a filter list, and
use the same mask for the DFSMSdss jobs.
/********************************************************************/
/* FILTERLIST FOR CHUCK TEST DATASETS */
/********************************************************************/
FILTLIST CHUCKJCL INCLUDE(**.CHUCK.*.CNTLLIB,
**.CHUCK.*.JCLSAMP,
**.CHUCK.*.LOGFIL*,
**.CHUCK.*.RATEDATA,
**.CHUCK.*.ADENDATA,
**.CHUCK.*.CDLFILE)
ELSE SELECT
WHEN (&DSN EQ & CHUCKJCL) /* PAIO JCLMAGIC FILES */
SET &STORGRUP = 'SGCHUCK0'
END
2) Move the datasets with DFSMSdss, without specifying any target
volumes or SMS parms. Let DFSMSdfp do the work.
//SYSIN DD *
COPY DATASET(INCLUDE( -
(**.CHUCK.*.CNTLLIB, -
**.CHUCK.*.JCLSAMP, -
**.CHUCK.*.LOGFIL*, -
**.CHUCK.*.RATEDATA, -
**.CHUCK.*.ADENDATA, -
**.CHUCK.*.CDLFILE -
)) -
CATALOG -
SELECTMULTI(ANY) -
SPHERE -
DELETE -
PURGE -
OPT(4) -
WAIT(0,0)
/*
The above cut and paste are not from working JCL and ACS, so they may need
some fixin, but it will do what you want, and it can be resused.
Ron
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Hardee, Chuck
Sent: Saturday, October 10, 2015 5:07 PM
To: [email protected]
Subject: [Bulk] Re: [IBM-MAIN] File Placement Utility
Emulated 3390 mod 3s
Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration EAS Information Technology
Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile
+1 (412) 877-2809 | FAX: +1 (412) 490-9230 [email protected] |
www.thermofisher.com
WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of
this e-mail or the information herein by anyone other than the intended
recipient, or an employee or agent of a system responsible for delivering
the message to the intended recipient, is prohibited. If you are not the
intended recipient, please inform the sender and delete all copies.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Ken Hume IBM
Sent: Saturday, October 10, 2015 5:58 PM
To: [email protected]
Subject: Re: File Placement Utility
What kind of DASD are you putting these files on?
**************************************************************
Text of the 4th Ammendment to the U.S. Constitution.
The right of the people to be secure in their persons, houses, papers, and
effects, against unreasonable searches and seizures, shall not be violated,
and no Warrants shall issue, but upon probable cause, supported by Oath or
affirmation, and particularly describing the place to be searched, and the
persons or things to be seized.
-----Original Message-----
From: Hardee, Chuck
Sent: Friday, October 09, 2015 6:30 PM Newsgroups: bit.listserv.ibm-main
To: [email protected]
Subject: Re: File Placement Utility
Thanks all for your responses.
While some of you offered some good ideas on how to handle the problem, none
of them presented was an automated process, which is what I was hoping for.
Some of you asked questions about types of files and cross LPAR conditions
and I will not go into those details.
Suffice it to say, I have 1500+ files of varying sizes and I need to balance
their placement across 70 volumes.
If no one knows of a tool out there that can do this, then you have all
fulfilled my need.
I will have to, I guess, invent the wheel.
Chuck
Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration EAS Information Technology
Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile
+1 (412) 877-2809 | FAX: +1 (412) 490-9230 [email protected] |
www.thermofisher.com
WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of
this e-mail or the information herein by anyone other than the intended
recipient, or an employee or agent of a system responsible for delivering
the message to the intended recipient, is prohibited. If you are not the
intended recipient, please inform the sender and delete all copies.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On
Behalf Of Hardee, Chuck H.
Sent: Thursday, October 08, 2015 9:25 PM
To: [email protected]
Subject: File Placement Utility
I have a need to juggle the locations of 1500+ files on 70 volumes.
These packs are not SMS managed and will never be.
There will be 4 sets of these files across 4 sets of 70 DASD volumes.
Does anyone know of a utility, REXX, EXCEL, executable program, etc, that
would let me feed in the file names and sizes, dasd characteristics, etc,
and produce a list of what files should be allocated on what packs?
The file sizes vary file to file, but they do not expand or contract once
allocated and won't change until the next time the files need to be
adjusted, which won't hopefully, change for a while.
Thanks,
Chuck
Charles (Chuck) Hardee<mailto:[email protected]>
Senior Systems Engineer/Database Administration EAS Information Technology
Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile
+1 (412) 877-2809 | FAX: +1 (412) 490-9230
[email protected]<mailto:[email protected]> |
www.thermofisher.com
WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of
this e-mail or the information herein by anyone other than the intended
recipient, or an employee or agent of a system responsible for delivering
the message to the intended recipient, is prohibited. If you are not the
intended recipient, please inform the sender and delete all copies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
