You could also read the PDS directory with QSAM, since all blocks have the same key length and data length, and the last block is followed by an end-of-file record.
Bill Fairchild -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Robert A. Rosenberg Sent: Tuesday, July 12, 2011 10:53 PM To: [email protected] Subject: Re: Startio At 13:28 -0500 on 07/08/2011, Rick Fochtman wrote about Re: Startio: >Grey area here. I would say that depends a great deal on the experience >and skill levels of the programmer. Not to mention the final intended >purpose. I've used QSAM to access individual members of a PDS, in name >sequence, but it's not a practice I'd recommend to the novice. > >Rick It is not that hard. You read the directory (assuming it is a PDS and not a PDSE [Which I am not sure will act like a PDS for reading the directory]) one block at a time using BSAM. You then use OPENJ or SVC99 to allocate the member and read it as a normal QSAM file [ie: Read it as if you allocated it via a DD with DSN=DATASET(MEMBER)]. So long as a member is allocated it is treated as a SEQ file by QSAM (just make sure to open as INPUT - Using this method for PUTs is asking for problems). ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
