Rex Code for comparioson of PDS contents

Kamlesh Kamal · Posted: Sun Nov 01, 2009 4:51 pm

Hi,
Can ayonne help me with a rex piece of code which can do the following.

I will give two separate PDS names and it should give me the names of the members in those PDS'es which is common in both.
PS:I have no REX experience so the code should be complete in all sence.
Thanks a milion in advance.It will be a great help.Also the command to eecute it.

dbzTHEdinosauer · Posted: Sun Nov 01, 2009 5:30 pm

use the ISPF option 3.12 to perform your compare.

The ISPF for z/OS Library will provide you a link to all the relevant manuals that you will need to digest to develop REXX experience.

REXX Reference
REXX User Guide
REXX Docs via IBM Library Server

anyone who knows REXX would not have written 'a piece REX(sic) of code' to satisfy your requirement.

again, it is REXX and they are known as scripts, not code.

Kamlesh Kamal · Posted: Sun Nov 01, 2009 5:37 pm

Hey Dick,

I got your point but I don't have time as of now to familiarize myself with REXX through manuals.So can you help me with the REXX script which can give me common names of two sepate PDS? if that's not much of an effort for you.

for example names common in between the E0421T.FCAE.PL4.JOBS.PKG712
and E0421T.FCAE.PL4.JOBS.PKG640

dbzTHEdinosauer · Posted: Sun Nov 01, 2009 5:39 pm

if you don't have time, use ISPF option 3.12 which will provide you with the info that you need.

and as I said, I never bothered to waste my time writing a REXX Script to do what 3.12 does.

so, I can't supply you with any code.

Pedro · Posted: Sun Nov 01, 2009 9:21 pm

expat · Posted: Sun Nov 01, 2009 10:16 pm

And I am sure that some hints and tips have been given before in the forum for a similar topic.

dick scherrer · Posted: Mon Nov 02, 2009 3:08 am

Hello,

MBabu · Posted: Mon Nov 02, 2009 4:51 am

This isn't really a bad way to learn rexx, but what you may want to learn is how to call other programs and then read the output. So one way to do this is to use SuperC online to figure out what options you need to pass it and then write a Rexx program that calls superc (program ISRSUPC, see the manuals on what it takes as input), and then read the the listing using EXECIO. That will give you both experience with using Rexx to do different, common tasks, and it will give you a program that does what you first wanted to have.

The other way to do it is to get the members, create a stem variable with the member names in PDS 1 as tails and then run through the members in PDS 2 checking to see if a tail with each name exists in your stem variable. That should not be more than about 20 lines of code, but I'll leave it to you to write. You can get the pds member names using either the LISTD command from TSO or using some ISPF services (among other ways).

enrico-sorichetti · Posted: Mon Nov 02, 2009 4:11 pm