> Well, I think stories of overwriting PDS directories with IEBGENER are legend
ITYM legion; it's no legend, although IBM fixed it a long time ago. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of Greg Price <[email protected]> Sent: Monday, August 19, 2019 11:21 AM To: [email protected] Subject: Re: Adding/replacing PDS member with QSAM, BLDL, and STOW On 2019-08-20 12:46 AM, Kirk Wolf wrote: > 1) This is confusing, since I had thought that I couldn't use MACRF=PM with > DSORG=PO. But with DSORG=PS, I don't think that I can use STOW. But, > under "STOW - Update the Directory", it says that you can. Maybe I need > to use DSORG=PS? > I read that a BLDL can be done for any DSORG, so probably this is true for STOW as well. After all, they don't need much data from the DCB since they are dealing with the directory and the DCB is mainly tracking the data blocks within the member. > *2) Referring to the following pseudocode:* where do I get the TTR for > STOW for the new member location? DCBRELAD/DCBRELA right after OPEN? > You might want to open it for INOUT or some such... and do the BLDL first to get the old stats. Then start writing data and construct the new stats after the final data block WRITE and do a STOW A (ADD) with the new stats. And maybe OUTPUT is sufficient given that BLDL should work for any DSORG, but I would do the BLDL before any WRITEs. The STOW A means that you do not have to keep track of the TTR. STOW will pick it up from DCBRELAD. > 3) DD question: I think that having the member name in the DD is what > causes OPEN (OUTPUT) to starting writing onto the end of the PDS, right? Well, I think stories of overwriting PDS directories with IEBGENER are legend, so yes. You could OPEN it for EXTEND, I suppose, but you really want QSAM to know that it is writing to a PDS, and then it will work for a PDSE as well. Cheers, Greg ---------------------------------------------------------------------- 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
