|
View previous topic :: View next topic
|
| Author |
Message |
Amar.Roy
New User
Joined: 26 Jul 2010
Posts: 4
Location: Banglore
|
|
|
|
| I need to find out the duplicate members in 2 different PDS .. I need to do this by using REXX .. Please help me with the logic. |
|
| Back to top |
|
 |
Craq Giegerich
Senior Member
Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA
|
|
|
|
| Duplicate based on name or contents? |
|
| Back to top |
|
|
Amar.Roy
New User
Joined: 26 Jul 2010
Posts: 4
Location: Banglore
|
|
|
|
| Duplicate based on member names only. |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| Create a member list of each PDS using whatever method you normally employ to create member lists. Then combine them, sort them, and select the entries that occur more that once. Your basic, simple duplicate check process. |
|
| Back to top |
|
|
Amar.Roy
New User
Joined: 26 Jul 2010
Posts: 4
Location: Banglore
|
|
|
|
| Can you please provide me REXX code for that? |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
| Quote: |
| Can you please provide me REXX code for that? |
why should anybody do that...
this is a help forum, not a gimme the code one  |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
| Quote: |
| I need to do this by using REXX .. |
Why is this a "need" . . .?
If you know nothing about Rexx, suggest you use something you do know.
You can do what Superk suggested without Rexx. . . |
|
| Back to top |
|
|
Michael Jakob
New User
Joined: 13 Mar 2011
Posts: 17
Location: Switzerland
|
|
|
|
Use these ISPF functions in this sequence:
LMINIT
LMOPEN
LMMLIST n times
LMCLOSE
LMFREE
The MOD function in the ISPF editor will help you to build this commands. |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
Michael
Just to be pedantic, that's not REXX 
Amar.Roy
How to list a PDS using REXX / TSO
| Code: |
PDS1 = "'YOUR.PDS.NAME'"
X=OUTTRAP(LIST1.)
"LISTDS " PDS1 " MEM "
X=OUTTRAP(OFF) |
|
|
| Back to top |
|
|
|
|
