Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

SUPERC SEARCH for multiple strings

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
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    Post subject: SUPERC SEARCH for multiple strings
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: 7913
Location: Bellevue, IA

PostPosted: Wed Mar 16, 2011 7:08 pm    Post subject: Reply to: SUPERC SEARCH for multiple strings
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: 8593
Location: Back in jolly old England

PostPosted: Wed Mar 16, 2011 7:32 pm    Post subject: Re: SUPERC SEARCH for multiple strings
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    Post subject:
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: 1703
Location: Australia

PostPosted: Thu Mar 17, 2011 10:28 am    Post subject:
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    Post subject:
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: 1219
Location: Israel

PostPosted: Thu Mar 17, 2011 1:46 pm    Post subject: Reply to: SUPERC SEARCH for multiple strings
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    Post subject:
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: 8593
Location: Back in jolly old England

PostPosted: Thu Mar 17, 2011 2:20 pm    Post subject:
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    Post subject:
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    Post subject:
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    Post subject:
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

Active Member


Joined: 07 Feb 2009
Posts: 984
Location: Oostende, Belgium

PostPosted: Thu Mar 17, 2011 6:20 pm    Post subject:
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: 642
Location: Whitby, ON, Canada

PostPosted: Thu Mar 17, 2011 7:59 pm    Post subject:
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    Post subject:
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    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Converting multiple VB files to FB fi... Viswanath Reddy JCL & VSAM 6 Mon Aug 08, 2016 11:49 pm
No new posts Execute multiple DB2 Load commands in... faizm DB2 4 Wed Aug 03, 2016 12:53 pm
This topic is locked: you cannot edit posts or make replies. JCL MULTIPLE STEP EXECUTION QUERY Susanta JCL & VSAM 18 Sat Jul 30, 2016 1:17 pm
No new posts Multiple parameters Csongor All Other Mainframe Topics 16 Thu Jun 09, 2016 7:54 pm
No new posts Search a Load Module sreekanth1984 TSO/ISPF 8 Tue Jun 07, 2016 8:45 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us