|
View previous topic :: View next topic
|
| Author |
Message |
purusothaman
New User
Joined: 17 Feb 2007
Posts: 39
Location: Chennai
|
|
|
|
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 |
|
 |
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
| Back to top |
|
|
purusothaman
New User
Joined: 17 Feb 2007
Posts: 39
Location: Chennai
|
|
|
|
Thanks for the replies.
I will try myself and let you know how it went. Thanks again. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
| Back to top |
|
|
purusothaman
New User
Joined: 17 Feb 2007
Posts: 39
Location: Chennai
|
|
|
|
Hi Enrico,
Thanks for your effort on educating me. |
|
| Back to top |
|
|
|
|
