REXX Query



IBM's Command List programming language & Restructured Extended Executor

Re: REXX Query

Postby arya_s » Tue Jul 21, 2009 9:08 am

Hello,
Points 1 and 2 are correct. after I get the list of PDS's that have the pattern "REXX" , i just want to display the names of these PDS's in my O/P file.
I was just trying to implement Point 3 and point 4 along with this piece of code.
My main objective is to check which PDS's have the pattern "REXX".
The list of PDS's having pattern "REXX" must be displayed in my Output file.
Since I dont know the names of PDS's that I need, I am using the SUBSTR function to compare the given pattern "REXX" with the PDS names.
arya_s
 
Posts: 7
Joined: Thu Jul 16, 2009 4:05 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Re: REXX Query

 

Re: REXX Query

Postby MrSpock » Tue Jul 21, 2009 6:15 pm

For your purposes, I think you'd be better off using the POS function. Something like this:

/* REXX */
Call Outtrap('list.')
"LISTA ST"
Call Outtrap(Off)
Do i = 1 To list.0
  If Substr(list.i,1) = " " Then Iterate
  fnd = Pos('REXX',list.i)
  If fnd <> 0 Then Say Strip(list.i)
End
Exit
User avatar
MrSpock
Global moderator
 
Posts: 810
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 2 times

Re: REXX Query

Postby arya_s » Thu Jul 23, 2009 4:12 pm

Hello,
How do I get a list of all the PDS's.
When I am using the attached code I am not getting the entire list of PDS's that are present. I am just getting System named PDS(around 5) names not the ones that are actually required(more than 100).
Also, once i get the list of PDS names I need to store these PDS names in an O/P file.
Thank you for all the help given...
arya_s
 
Posts: 7
Joined: Thu Jul 16, 2009 4:05 pm
Has thanked: 0 time
Been thanked: 0 time

Re: REXX Query

Postby MrSpock » Fri Jul 24, 2009 6:48 pm

All of the PDS's that exist in all of the system catalogs? Honestly I have no idea. Maybe a storage expert will offer their opinion, but I think you'd have to get in touch with your local storage administrators and ask them how or where you would obtain this information. I know that performing a true wild-card search through all of the catalogs is a time and CPU-consuming process (like running a LISTCAT with full wildcards or ISPF 3.4 (DSLIST) with the same) and may actually impact the system performance.
User avatar
MrSpock
Global moderator
 
Posts: 810
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 2 times

Previous

Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post