IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

ISPF Searching a member of a PDS


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Pradeebha

New User


Joined: 06 Jan 2006
Posts: 7

PostPosted: Fri Dec 15, 2006 10:55 am
Reply with quote

Hai,

For ex i have a list of 100 PS. I want to search it in a particular PDS .Is there any way to do it in single shot.

Regards,
Pradeebha
Back to top
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1448
Location: Chicago, IL

PostPosted: Fri Dec 15, 2006 11:18 am
Reply with quote

This ques comes in mind very first when we look at the job/proc library and want to find out something at a shot ... Anyway, one of the most popular post ...

Run 3.14 SUPERC option in Background Mode and you should be able to figure out answer yourself. Should be somethign like this.
Code:
//SEARCH  EXEC PGM=ISRSUPC,
//             PARM=(SRCHCMP,'ANYC')
//NEWDD   DD DSN=YOUR.INPUT.PDS,
//        DISP=SHR
//OUTDD   DD DSN=YOUR.OUTPUT.SEARCH.RESULT,
//        DISP=(,CATLG,DELETE)
//SYSIN   DD *
SRCHFOR  'STRING1',
SRCHFOR  'STRING2',
::
::
::
SRCHFOR  'STRING100'
//
Back to top
View user's profile Send private message
Pradeebha

New User


Joined: 06 Jan 2006
Posts: 7

PostPosted: Fri Dec 15, 2006 12:04 pm
Reply with quote

Hai

I tried the JCL which you have given. I have a list of PS with me. I want to find how many PS are present in a particular PDS (in 1 PDS).

For Ex:

Let the PDS be userid.Work.JCL which contains around 200 PS.

I have the following list of PS:

COMPAREY
CMPARE
COMPAREX

I want to find whether the above 3 PS is present in userid.Work.JCL.If not the list of PS which is matching with the PDS.

Can you please tell a solution for the above problem.

Regards,
Pradeebha
Back to top
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1448
Location: Chicago, IL

PostPosted: Fri Dec 15, 2006 12:14 pm
Reply with quote

Now you explain the problem much better.

Following TSO command would enlist all the member names for a given PDS. You can format a batch job to compare with your selective ones.
Code:
TSO LISTDS 'PDSNAME.TOBE.SEARCHED' MEMBERS
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Tue Dec 26, 2006 1:28 am
Reply with quote

Here's a variation on Priyesh's 1st solution:

Create the JCJ as Priyesh showed, but with these changes:

//sysin dd *
srchfor '~'
select compare
select comparex
select comparey
/*

I used "~" because its rare and shouldn't be found. If any member can't be found you'll get a msg telling you so.

Since you have 100 members you won't want to type them into sysin, so try this:

In your jcl arrange the member names as below
Code:


m.....  select
oo....         compare
......         comparey
.                     .
.                     .
.                     .
oo....         comparez

The select will get copied to all lines.
Code:

m.....  select
oo....  select  compare
......  select  comparey
.       select      .
.       select      .
.       select      .
oo....  select  comparez
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Looking for a little history of ISPF ... TSO/ISPF 5
No new posts Adding QMF and SPUFI to the ISPF menu DB2 20
No new posts Issue after ISPF copy to Linklist Lib... TSO/ISPF 1
No new posts How to copy the -1 version of a membe... TSO/ISPF 4
No new posts Searching for a member but don't know... TSO/ISPF 6
Search our Forums:

Back to Top