Rexx code to find a string record in all members of dataset

niks_jude · Posted: Tue Jan 09, 2007 12:42 am

I have the following REXX code requirement. Read a record(which contains a string of length 8). Find it in all the members of a PDS and write the output in a sequential file.

superk · Posted: Tue Jan 09, 2007 2:04 am

First of all, why are you writing a function that already exists (see ISPF Option 3.14 (Search-For) or 3.15 (Search-For Extended, among others)?

Second, you failed to mention what exactly it is you want to write to the output file?

Third, everything you're doing here has already been posted within this Forum. Search and you'll find your answers.

niks_jude · Posted: Tue Jan 09, 2007 2:15 am

I couldn't find the exact code for my requirement.
I want to do it with REXX because
1.If I do it with 3.14 it takes a lot of time.As I have a file containning about 200 entries.Each entry needs to be found in all the members of the PDS.This means I have to search using 3.14 200 times.

I want the logic for the following to be precise ----
1.Read a string (each of the 200 records of sequential file contains 1 8 byte string) from a sequential file,find its presence in all the members of a PDS.
2.Write only the names of members in which the string was found.

I hope my requirement would be clear by now.

ofer71 · Posted: Tue Jan 09, 2007 2:39 am

Just for you to know, SUPERC will always be faster then pure REXX instructions when it comes to comparison/search.

However, you can invoke SUPERC from within REXX. Using this method, you can supply different search string every time, and you can format the output for your needs.

O.

niks_jude · Posted: Tue Jan 09, 2007 2:59 am

Hi ofer71,

Thnx for the reply.

superk · Posted: Tue Jan 09, 2007 3:02 am

That's exactly what my answer was going to be.

Pseudo code:

1. Read the search string from the PS dataset.
2. Create the ISRSUPC search parameter.
3. Run ISRSUPC.
4. Locate all the records with the text:
"member_name --------- STRING(S) FOUND -------------------"
and get the member name from the front.
5. Write the member name(s) to the output.
6. Go back to 1 until EOF.