You can't do it with EXCP either. Of course, if you're willing to give up "(safely)" ...
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List <[email protected]> on behalf of Binyamin Dissen <[email protected]> Sent: Thursday, February 15, 2018 3:39 AM To: [email protected] Subject: Re: Coding the equivalent of a Binder EXPAND On Thu, 15 Feb 2018 02:14:35 -0600 Jerry Levine <[email protected]> wrote: :>I have an existing program which opens an elementary one-CSECT load module member in a PDS and GETs records until it comes to the CSECT's record, discernible by an eyecatcher at offset 0. :>Until now, the program used the PUTX macro to update data in place in the existing record buffer. Now the program needs be modified to expand the length of old records to house additional data. Just in case anyone asks, the expanded record length is significantly less than the load library's BLKSIZE. :>Is it possible to change the buffer address and LRECL before issuing the PUTX? :>For LRECL, is this simply done by plugging the new length into DCBLRECL? If so, for a RECFM=U load library, is the LRECL the actual record length or does an RDW length or similar need to be added in? You would have to do the same as what EXPAND does, and create a new member. That will involve BPAM. You cannot (safely) change the lengths of blocks in a PDS member using standard access methods. -- Binyamin Dissen <[email protected]> http://secure-web.cisco.com/1cwmCVAAT17NXV3yt17PV-2Bd67Qm0IuJrZlBk431D1hfIAiaSEDjg2unrhhGMkCjs_JQTGul25LDNu8ZOvQogwkO-9FQ8zIwbhpAAP4Eit0h7ow-ddXOsav4YpDJe7gvOuIQEt8zT2uZcS8y0x1gA76ZgHKGVkVgeS2BK_s6vfpYV_MCtCyUf4hFNiussFu7o0lElstJZSsp2UP3NlX_w0destSbG7NSzow3qruJoUa8S_30yCPaLi8_OY3fiQ4rz7wq8gGzfjYvzesq_48nX83S_Foi82awFXZxXULZ7cHu6lxXa3N4XpKO3Z2iikdt5mt7bfOCyrBSVunKwVaoPPE0SLrBIlIQABQFfeNe-V8grWvyw9_HJjGBzSQeWQIp/http%3A%2F%2Fwww.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. ---------------------------------------------------------------------- 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
