Rexx routine to append records to a PDS member

[Carl Smith]

Hello all,
Does anyone have a REXX routine that will show me how to append lines to an existing PDS member. I am looking for sample to help me correct a routine that I wrote, but it is not quite right. THANKS IN ADVANCE FOR THE ASSISTANCE....

----------------------------------------------------------------------
For TSO-REXX subscribe / signoff / archive access instructions,
send email to LIST...@VM.MARIST.EDU with the message: INFO TSO-REXX

[Dave Salt]

Here's a simple edit macro that will append lines to whatever member or
sequential dataset is currently being edited:

/* REXX */
address isredit
"MACRO"
lineval = "This will be the second last line in the file"
"LINE_AFTER .ZLAST = (LINEVAL)"
lineval = "This will be the last line in the file"
"LINE_AFTER .ZLAST = (LINEVAL)"
"END"

You can call the macro from a REXX program. For example, if the name of the
above macro is "ADDLINES" then you can call the macro like this:

address ispexec "EDIT DATASET('MY.PDS(MEMBER)') MACRO(ADDLINES)"

Hope that helps,

Dave Salt
http://www.soft-center.com

_________________________________________________________________
Add photos to your e-mail with MSN 8. Get 2 months FREE*.
http://join.msn.com/?page=features/featuredemail

[Craddock, Chris]

PDS' aren't like that. Once a member has been written you have to rewrite
and stow it to change its shape. Therefore "name your poison". Any form of
execio will basically do what you want.

Chris

Does anyone have a REXX routine that will show me how to append lines to an
existing PDS member. I am looking for sample to help me correct a routine
that I wrote, but it is not quite right.

----------------------------------------------------------------------

[Carl Smith]

MANY THANKS TO ALL RESPONDERS.
o I was able to fix mind CASE problem by researching the ISPF Dialog manual and ideas from the responders to define my INPUT fields correctly for difference upper-lower-mixed case fields I have.
o As for the PDS update, I do know how to use EXECIO etc but its not practical to read and rewrite this several thousand line PDS a few dozen times a day. So I guess I will convert it to a sequential
DS and update it. I may later work on a edit macro as was suggested to try the PDS update. For now I wanted something quick and simple that works for this minor requirment I have.
.......................................
THANKS AGAIN TO EVERYONE FOR THE ASSIST