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

SUPERC SEARCH for multiple strings
IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Wed Mar 16, 2011 6:54 pm
 Reply with quote
Hi,

I need to search a for multiple strings in PDS... "XXXX.SRC.LIB" having 100 members.
The strings are '-int' and 'CICS'. These strings are not in the same line.
Please provide me the JCLs needed for that. I have tried many methods from google, but non worked.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA
PostPosted: Wed Mar 16, 2011 7:08 pm
 Reply with quote
Have you tried ISPF option 3.14 and put a slash by "Specify additional search strings" near the bottom of the screen?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
PostPosted: Wed Mar 16, 2011 7:32 pm
 Reply with quote
Ronny John wrote:
Please provide me the JCLs needed for that.

By following the suggestion of Robert, you can process this in background, or batch to use another name, and then keep the JCL for future reference.
Back to top
View user's profile Send private message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Thu Mar 17, 2011 10:19 am
 Reply with quote
No that is not working. It does "OR" operation. ie we get members with either -int or CICS.

I need to get members having both -int and CICS, ie AND operation( and that too both strings need not be necessarily on the same line).

Tried many things . Did not work icon_sad.gif
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1702
Location: Australia
PostPosted: Thu Mar 17, 2011 10:28 am
 Reply with quote
Hi,

check this link out http://ibmmainframes.com/viewtopic.php?t=47148&postdays=0&postorder=asc&start=15


Gerry
Back to top
View user's profile Send private message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Thu Mar 17, 2011 12:07 pm
 Reply with quote
I dont think that will work either. Tried that earlier.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1353
Location: Israel
PostPosted: Thu Mar 17, 2011 1:46 pm
 Reply with quote
Add FINDALL to the PARM process option.
For example:
Code:
//SEARCH   EXEC PGM=ISRSUPC,                   
// PARM=('SRCHCMP,ANYC,DPCBCMT,COBOL,FINDALL')   
Back to top
View user's profile Send private message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Thu Mar 17, 2011 2:14 pm
 Reply with quote
tried FINDALL also. But to be on the right page, what is the SRCHFOR parameter to be given if we are going to give two strinsg to be searched?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
PostPosted: Thu Mar 17, 2011 2:20 pm
 Reply with quote
I vaguely recall that in the past the first execution of SUPERC picked all of the members with one string, the output was parsed via REXX and used to build the member select statements for a second pass of SUPERC which searched for the second string.

If your REXX coding isn't up to performing the parse operation it can quite easily be done manually.
Back to top
View user's profile Send private message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Thu Mar 17, 2011 5:45 pm
 Reply with quote
Rather than just limiting to ISRSUPC, is there any other way? Without REXX also, as i am not that good in REXX.?
Back to top
View user's profile Send private message
Ronald Burr

Active User


Joined: 22 Oct 2009
Posts: 293
Location: U.S.A.
PostPosted: Thu Mar 17, 2011 5:54 pm
 Reply with quote
Try using SyncSort or DFSORT as follows to consolidate the output of two searches:
Code:

//SEARCH   EXEC PGM=ISRSUPC,
//            PARM=(SRCHCMP,'LMTO,XREF,NOSUMS')
//NEWDD    DD DSN=your.pds.library,DISP=SHR
//OUTDD    DD DSN=&&SUPC,UNIT=SYSDA,DISP=(,PASS)
//SYSIN    DD *
 SRCHFOR 'STRING1'
 SRCHFOR 'STRING2'
/*
//SORT     EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DSN=&&SUPC,DISP=(OLD,DELETE)
//SORTOUT  DD DSN=your.report.file,UNIT=DISK,DISP=(,CATLG),
//            SPACE=(TRK,(1,1),RLSE)
//SYSIN    DD *
 INCLUDE COND=(28,1,CH,EQ,C' ',AND,29,1,CH,GE,C'A')
 INREC IFTHEN=(WHEN=INIT,BUILD=(29,9,C'0001',6,12)),
       IFTHEN=(WHEN=GROUP,BEGIN=(14,1,CH,GT,C' '),PUSH=(14:14,12))
 SORT FIELDS=(1,8,CH,A)
 SUM  FIELDS=(10,4,ZD)
 OUTFIL OUTREC=(1,9,10,4,CHANGE=(12,C'0001',14,12),
                         NOMATCH=(C'MULTIPLE    '))
/*


After running the job, each member will either be flagged with the single search string that was found, or MULTIPLE if the member contained BOTH search strings. In your case, you only want the members marked MULTIPLE.
Back to top
View user's profile Send private message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Thu Mar 17, 2011 6:05 pm
 Reply with quote
let me try this out. But please tell me what this sort card does

"INREC IFTHEN=(WHEN=INIT,BUILD=(29,9,C'0001',6,12)),
IFTHEN=(WHEN=GROUP,BEGIN=(14,1,CH,GT,C' '),PUSH=(14:14,12))
SORT FIELDS=(1,8,CH,A)
SUM FIELDS=(10,4,ZD) "
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania
PostPosted: Thu Mar 17, 2011 6:20 pm
 Reply with quote
Ronny John wrote:
let me try this out. But please tell me what this sort card does

"INREC IFTHEN=(WHEN=INIT,BUILD=(29,9,C'0001',6,12)),
IFTHEN=(WHEN=GROUP,BEGIN=(14,1,CH,GT,C' '),PUSH=(14:14,12))
SORT FIELDS=(1,8,CH,A)
SUM FIELDS=(10,4,ZD) "


Holy Sith, is it so flucking difficult to RTFM?
Back to top
View user's profile Send private message
don.leahy

Active Member


Joined: 06 Jul 2010
Posts: 765
Location: Whitby, ON, Canada
PostPosted: Thu Mar 17, 2011 7:59 pm
 Reply with quote
prino wrote:
[
Holy Sith, is it so flucking difficult to RTFM?
Evidenthly.
Back to top
View user's profile Send private message
Ronny John

New User


Joined: 30 Mar 2010
Posts: 33
Location: USA
PostPosted: Fri Mar 18, 2011 11:19 am
 Reply with quote
what was that in red? icon_razz.gif
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 INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Search two or more word with FILEAID Compuware & Other Tools 15
No new posts Sortjoin and Search for a String and ... DFSORT/ICETOOL 1
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Multiple table unload using INZUTILB DB2 2
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us