I don't know if this is what the OP wants. I have a rexx utility that uses: X = CALL LISTDSI(DSNAME DIRECTORY SMSINFO NORECALL)
and I get back: DSNAME ==> SYSPROG.CBT.FILE805.LIB VOLSER ==> COS101 DSORG ==> PO TYPE ==> PDS RECFM ==> FB SEQ TYPE ==> LRECL ==> 80 BLKSIZE ==> 5600 DIR BLKS ==> 10 USED DIR B==> 5 MEMBERS ==> 29 ALLOC UNIT==> BLOCK ALLOC ==> 234 USED ==> 180 USED PAGES==> PDSE USED 4K PAGES EXTENTS ==> 1 PRIMARY ==> 234 SECONDARY ==> 58 UNIT ==> 3390 Tracks/Cyl: 15 Blks/TRK: 9 CRE DATE ==> 05/05/2015 REF DATE ==> 05/06/2015 UPDATED ==> YES SAF Prof ==> GENERIC On Wed, May 6, 2015 at 8:11 AM, Vernooij, CP (ITOPT1) - KLM < [email protected]> wrote: > You will never be able to determine the original primary allocation > amount, because it is not recorded. When the primary allocation is done, it > can be done in one or more extents and adjacent secondary extents can be > merged together into 1 extent. Furthermore after close of the dataset, idle > space can be released. From that moment on, all what is left is the status > of the dataset at that moment, which is the result of any or all of the > above actions, but you cannot determine the requested primary allocation > from it. > > Kees. > > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:[email protected]] On > Behalf Of Fred van der Windt > Sent: 06 May, 2015 13:43 > To: [email protected] > Subject: Primary allocation of a dataset > > I want to retrieve the primary allocation of a dataset. Sofar I've used > OBTAIN to retrieve the DCSBs for the dataset. The DSCB1 contains > information about the secondary allocation size for the dataset but does > not contain any information about the primary allocation. If the dataset > had a primary allocation in tracks or cylinders I can retrieve the > necessary information from the extent information in the DSCB1: the first > extent can be converted back to tracks or cylinders and that should be the > primary allocation. > > But how can one recreate the primary allocation if some other form was > used, for instance an amount in blocks, records or KB or something like > that? Is this documented anywhere? > > Fred! > ----------------------------------------------------------------- > ATTENTION: > The information in this electronic mail message is private and > confidential, and only intended for the addressee. Should you > receive this message by mistake, you are hereby notified that > any disclosure, reproduction, distribution or use of this > message is strictly prohibited. Please inform the sender by > reply transmission and delete the message without copying or > opening it. > > Messages and attachments are scanned for all viruses known. > If this message contains password-protected attachments, the > files have NOT been scanned for viruses by the ING mail domain. > Always scan attachments before opening them. > ----------------------------------------------------------------- > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN > ******************************************************** > For information, services and offers, please visit our web site: > http://www.klm.com. This e-mail and any attachment may contain > confidential and privileged material intended for the addressee only. If > you are not the addressee, you are notified that no part of the e-mail or > any attachment may be disclosed, copied or distributed, and that any other > action related to this e-mail or attachment is strictly prohibited, and may > be unlawful. If you have received this e-mail by error, please notify the > sender immediately by return e-mail, and delete this message. > > Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its > employees shall not be liable for the incorrect or incomplete transmission > of this e-mail or any attachments, nor responsible for any delay in receipt. > Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch > Airlines) is registered in Amstelveen, The Netherlands, with registered > number 33014286 > ******************************************************** > > > ---------------------------------------------------------------------- > 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
