If the OP has FDR, and if I remember correctly FDR/CPK could be used for file placement. And many, many moons ago Boole & Babbage had DASD/Tune or Tune/DASD which would tell you what data sets to put together to reduce arm movement and decrease access time. Now you're talking 70's, 80's, and 90's DASD tuning.
--- [email protected] wrote: From: Ron Hawkins <[email protected]> To: [email protected] Subject: Re: [Bulk] Re: [IBM-MAIN] File Placement Utility Date: Sun, 11 Oct 2015 16:25:59 -0700 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 _____________________________________________________________ Netscape. Just the Net You Need. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
