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
 

 

Applying SRCHFOR to specific members in REXX/BATCH

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
purusothaman

New User


Joined: 17 Feb 2007
Posts: 39
Location: Chennai

PostPosted: Mon Jun 06, 2011 5:07 pm    Post subject: Applying SRCHFOR to specific members in REXX/BATCH
Reply with quote

Hi all,

I am currently creating a REXX module to search the list of COBOL modules using a particular table.

I am submitting the below found REXX code chunk in Batch using IKJEFT01 utility. It is working fine without any issues.

Code:
"ALLOC F(OUTDD) NEW REU UNIT(VIO) SP(1,1) CYLINDERS"
"ALLOC F(SYSIN) NEW REU UNIT(VIO) RECFM(F B) LRECL(80)"
QUEUE "SRCHFOR  '"TABLE"',8:72"
"EXECIO "QUEUED()" DISKW SYSIN (FINIS"
"CALL *(ISRSUPC) 'SRCHCMP,ANYC'"
"EXECIO * DISKR OUTDD (STEM SUP1. FINIS"


I have allocated the NEWDD DSN name required by SRCHFOR utility in the JCL.With the JCL that I used, the utility is searching for all the members present in the NEWDD library(where COBOL modules are present).

I would like to restrict the search only for the members starting with the name PAK* which will save some execution time.

When we try to search using 3.15 option, we have the option of providing member patter like PAK* and based on that the JCL is created with the "SELECT" keyword along with the selected job names. The member pattern might change from time to time.

How can I do this when do SRCHFOR using REXX?

Thanks in advance.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Jun 06, 2011 5:20 pm    Post subject:
Reply with quote

as you may have noticed,
when 3.14/3.15 does a selected member (member pattern),
each and every one of those member names is an input parm.

so, your rexx will have to access the pds list either thru listds/llm library services/ whatever,
selecting those member names that fit your pattern,
and generate the parms necessary for ISRSUPC,
and provide them as an allocated input to ISRSUPC.

you probabaly did not notice, otherwise you would not have asked the question.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10231
Location: italy

PostPosted: Mon Jun 06, 2011 5:27 pm    Post subject: Reply to: Applying SRCHFOR to specific members in REXX/BATCH
Reply with quote

Quote:
How can I do this when do SRCHFOR using REXX?

build Yourself the SELECT control statement

if You search the forums You will find quite a few examples on how build a member list

see here for working TESTED example
http://www.ibmmainframes.com/viewtopic.php?t=54492&highlight=nadel
Back to top
View user's profile Send private message
purusothaman

New User


Joined: 17 Feb 2007
Posts: 39
Location: Chennai

PostPosted: Mon Jun 06, 2011 5:42 pm    Post subject:
Reply with quote

Thanks for the replies.

I will try myself and let you know how it went. Thanks again.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10231
Location: italy

PostPosted: Mon Jun 06, 2011 5:45 pm    Post subject: Reply to: Applying SRCHFOR to specific members in REXX/BATCH
Reply with quote

my previous reply was edited to add the link to topic with working snippets
http://www.ibmmainframes.com/viewtopic.php?t=54492
Back to top
View user's profile Send private message
purusothaman

New User


Joined: 17 Feb 2007
Posts: 39
Location: Chennai

PostPosted: Mon Jun 06, 2011 5:56 pm    Post subject:
Reply with quote

Hi Enrico,

Thanks for your effort on educating me.
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 MIPS/CPU consumption reduction in Batch vishwakotin DFSORT/ICETOOL 4 Sat Mar 18, 2017 5:46 pm
No new posts REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am
No new posts Copying Panvalet members to PDS LOGESHWARAN K CA Products 4 Mon Mar 06, 2017 10:45 am
No new posts Overriding PS data in rexx Shaheen Shaik CLIST & REXX 8 Fri Mar 03, 2017 5:08 pm
No new posts Route a product's job to specific lpar vasanthz All Other Mainframe Topics 9 Thu Mar 02, 2017 2:22 am


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