z/OS does have Small Data Set Packing.  Puts datasets under your exit
size limit into a VSAM KSDS.  For another storage pool, we did run
into problems with not enough entries in the VTOC, so we created
smaller volumes with large VTOCs.

On Sat, Jan 13, 2018 at 2:19 PM, R.S. <r.skoru...@bremultibank.com.pl> wrote:
> Ron,
> While your solution can keep "small" datasets away from EAS, it is not a
> solution for a need I described.
> I mean a scenarion when many thousands of relatively small datasets need to
> be kept on disk. Colleague of mine administer a system, where ~200 000
> datasets are created during EOD.
>
> Of course when we talk about big storage needs it's  usually not-so-many
> datasets, but big or huge ones.
> Last, but not least, we have limited choice - up to 64(-256) non-EAV volumes
> or bigger EAV volumes (with the same limit for quantity).
>
> Regards
> --
> Radoslaw Skorupka
> Lodz, Poland
>
>
>
>
>
>
>
> W dniu 2018-01-13 o 19:02, Ron hawkins pisze:
>>
>> Radoslaw,
>>
>> That's why you can change the threshold for the track allocation area.
>>
>> DCOLLECT and PROC UNIVARIATE will probably give you all the guidance you
>> need. DCOLLECT does not have the primary space allocation size so this code
>> is not 100% accurate. It is good enough to give some guidance.
>>
>> I executed this against one of our general purpose lab systems, and this
>> is the CMA waste estimate with break point value at 5, 10 and 20 cylinders.
>>
>> EAV Breakpointvalue 10 Cylinders
>> Total Used   Cylinders 7516066.07911661
>> Total Wasted Cylinders 610787.607878009
>> Percent Wasted CMA                8.1%
>>
>> EAV Breakpointvalue 5 Cylinders
>> Total Used   Cylinders 7516066.07911661
>> Total Wasted Cylinders 783635.165880735
>> Percent Wasted CMA               10.4%
>>
>> EAV Breakpointvalue 20 Cylinders
>> Total Used   Cylinders 7516066.07911661
>> Total Wasted Cylinders 309321.636811143
>> Percent Wasted CMA                4.1%
>>
>> You could use SAS code like this to come up with a  good starting point
>> for your shop when you go EAV.
>>
>> options obs=max bufno=256 nosource2 nomacrogen nosymbolgen nomlogic
>> nomprint sortsize=6G msglevel=i;
>> goptions reset=all;
>>
>> %let BPV=20;
>>
>> Title1 "EAV Breakpoint Value &BPV Cylinders";                          ***
>> Main Output Title     ;
>>
>> FILENAME DCOLLECT FTP   (
>>                                         "MY.DCOL'"
>>                                         )
>>                            USER='myuid' HOST='111.222.333.444' DEBUG
>>                            S370VS RCMD='SITE RDW' LRECL=32760
>>                            PASS='mypw';
>>
>> proc datasets lib=pdb kill noprint;
>> run;quit;
>>
>> proc datasets lib=work kill noprint;
>> run;quit;
>>
>> %include sourclib(typedcol);
>> run;
>>
>> data dcolsp;
>>         set dcoldset;
>>         usedcyl=dcdusesp/(15*56664);
>>         if usedcyl>&BPV then wastecyl=mod(usedcyl,21);
>>         output;return;
>> run;
>>
>> title2 "Data set size distribution in Cylinders";
>> proc univariate data=dcolsp;
>>         var usedcyl;
>>         histogram;
>> run;
>>
>> title2 "Cylinder Managed Area - Data set size distribution in Cylinders";
>> proc univariate data=dcolsp;
>>         where usedcyl>&bpv;
>>         var usedcyl;
>>         histogram;
>> run;
>>
>> proc summary data=dcolsp nway;
>>         var usedcyl wastecyl;
>>         output  out=dcolsum
>>                         sum=
>>                         ;
>> run;
>>
>> data _null_;
>>         set dcolsum;
>>         pctwaste=wastecyl/usedcyl;
>>         put             "EAV Breakpointvalue &BPV Cylinders"
>>                 /       "Total Used   Cylinders " usedcyl       best16.
>>                 /       "Total Wasted Cylinders " wastecyl      best16.
>>                 /       "Percent Wasted CMA             " pctwaste
>> percent16.1
>>                 ;
>> run;
>>
>>
>> -----Original Message-----
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
>> Behalf Of R.S.
>> Sent: Friday, January 12, 2018 5:48 AM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: [IBM-MAIN] AW: Re: Number of Cylinders per Volume
>>
>> W dniu 2018-01-12 o 13:15, Tom Marchant pisze:
>>>
>>> On Fri, 12 Jan 2018 01:32:07 +0100, R.S. wrote:
>>>
>>>> BTW: an "awful waste of storage" is MCU on EAS which is 21 cyl. (315
>>>> trk). It is much more than 4kB and more than 4MB.
>>>
>>> Not such a big deal for very large data sets, which are the most
>>> appropriate ones to go into the cylinder-managed space. When you have
>>> a quarter of a million cylinders, allocating space on increments of 21
>>> cylinders isn't so bad, IMO.
>>>
>> Of course. However sometimes people need a lot of not-so-big datasets.
>> For ~1000 cyl datasets average lost is ~1% ( (21/2)/1000 ), but for 50 cyl
>> datasets is ~20%.
>>
>> --
>> Radoslaw Skorupka
>> Lodz, Poland
>
>
> ======================================================================
>
>
>        --
> Treść tej wiadomości może zawierać informacje prawnie chronione Banku
> przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być
> jedynie jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś
> adresatem niniejszej wiadomości lub pracownikiem upoważnionym do jej
> przekazania adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie,
> rozprowadzanie lub inne działanie o podobnym charakterze jest prawnie
> zabronione i może być karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo,
> prosimy niezwłocznie zawiadomić nadawcę wysyłając odpowiedź oraz trwale
> usunąć tę wiadomość włączając w to wszelkie jej kopie wydrukowane lub
> zapisane na dysku.
>
> This e-mail may contain legally privileged information of the Bank and is
> intended solely for business use of the addressee. This e-mail may only be
> received by the addressee and may not be disclosed to any third parties. If
> you are not the intended addressee of this e-mail or the employee authorized
> to forward it to the addressee, be advised that any dissemination, copying,
> distribution or any other similar activity is legally prohibited and may be
> punishable. If you received this e-mail by mistake please advise the sender
> immediately by using the reply facility in your e-mail software and delete
> permanently this e-mail including any copies of it either printed or saved
> to hard drive.
>
> mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa,
> www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII
> Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców
> KRS 0000025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2016 r.
> kapitał zakładowy mBanku S.A. (w całości wpłacony) wynosi 168.955.696
> złotych.
>
> ----------------------------------------------------------------------
> 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

Reply via email to