MVSFORUMS.com

[Sarangadhar]

Hi,
I have a requirement:

there are lots of datasets like this:
HLQ1.HLQ2.HLQ3.HLQ4.HLQ5 with varying HLQ3 for each dataset. HLQ3 is Axxxxxxx, where xxxxxxx is varying.

I would need to open all those datasets and replace the first row of the dataset with a given value.

If it is not possible to replace the first row, then I have an alternative requirement: there are two words in the first row, these two words will never appear in the dataset anywhere else, so it is enough if we replace those two words with the 4 given words.

Can somebody help me in doing so?

I believe this will be possible using REXX or a JCL/PROC call with all the file names.
_________________
Thanks

[semigeezer]

see either the LMDLIST service (Google for examples or see the manual) or modify 'SYS1.SAMPLIB(IGGCSIRX)' to get the data set names. Then either call the ISPF editor with an initial macro, or call another utility to do the changes you need (sort, fileaid, etc).

With LMDLIST, the search and replace should probably be about 50 lines of Rexx (half of which are DO and END ) including very rudimentary error checking. One thing you will need to check for is if the given data sets are in use (the editor will fail or you won't be able to allocate the data set OLD because some other job/user has it already allocated).
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html.

[Sarangadhar]

I am trying to edit my PS datasets as below:

[kolusu]

Sarangadhar,

You need to enclose the DSVAR variable in single Quotes. Change this line to

[Sarangadhar]

After editing the dataset, my control stops at the edited dataset. doesn't close, come back adn open another one. here is the code:


main program:

[dbzTHEdinosauer]

you need an 'END' command in macro1
_________________
Dick Brenholtz
American living in Varel, Germany