I vote for the REXX option. Use LISTD after an OUTTRAP to capture a list of members, DO loop thru the list, allocate the dsn/member, readin, add the 2 lines to the end by adding to a counter and setting the needed value to the stemvar, and then write back out.
--- On Mon, 2/14/11, Adam Johanson <[email protected]> wrote: > From: Adam Johanson <[email protected]> > Subject: Adding Lines to End of Member > To: [email protected] > Date: Monday, February 14, 2011, 12:03 PM > I've got to change about 1,000 > members of a PDS containing JCL by adding > 2 lines to the end of each member. > > I thought there might be a way to do this > with IEBUPDTE, but he requires > sequence numbers, which a lot of the members don't have. > And it also looks > like you can't just tell him something like, "sequence > number = last". > > Is there any way to do this with another > utility? I'd like to do this with > standard MVS utilities, but if it winds up that we need to > use a REXX program > to do it, then we can go that route. > > Thanks. > > ---------------------------------------------------------------------- > 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
