DESERV FUNC=GETALL will return a chain of DESB control blocks with a MEMBER count field in the header of each DESB. You can run the chain and add up the counts to get total members.
I don't know of any way to count directory BLOCKS except to read the PDS / PDSE with QSAM and count the records returned. As others have indicates, the hidden FAMS API may have what you need, but most of us do not have documentation of that API. As a vendor, your company may qualify to get that documentation. HTH Peter -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Kirk Wolf Sent: Wednesday, March 6, 2019 3:37 PM To: [email protected] Subject: Number of directory blocks for existing PDS EXTERNAL EMAIL Is there a standard programming API / macro for getting this? I don't see it in the F1 DSCB - just DS1NOBDB (number of bytes in last directory block). It seems odd that there is this bit without more. Do you have to just read the directory and count? Kirk Wolf Dovetailed Technologies http://dovetail.com ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
