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

Files additonal qualifier


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
som_infotech

New User


Joined: 25 Feb 2006
Posts: 38
Location: chennai-india

PostPosted: Wed Jul 20, 2011 8:34 am
Reply with quote

For example - In 3.4 if you give partial file name - Ex SHANK.REF it will provide below results
SHANK.REF.FILE1
SHANK.REF.FILE2
SHANK.REF.PORT etc...

Similar way is there any command in REXX where if you give partial ds name it expands and finds out all datasets ????
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Wed Jul 20, 2011 10:27 am
Reply with quote

Try using the Catalog Search Interface (CSI) utility program. There's a REXX example in 'SYS1.SAMPLIB(IGGCSIRX)'.

Or, of course, you might try calling the ISPF LMDLIST Service.
Back to top
View user's profile Send private message
gylbharat

Active Member


Joined: 31 Jul 2009
Posts: 565
Location: Bangalore

PostPosted: Wed Jul 20, 2011 11:07 am
Reply with quote

You can use Listcat
Code:

/*REXX*/                                                     
HLQ=SHANK.REF.                                 
DS=STRIP(HLQ||"*")                                           
"ISPEXEC LMDINIT LISTID(IDV) LEVEL(&DS)"                     
DO FOREVER                                                   
"ISPEXEC LMDLIST LISTID("IDV") DATASET(DSVAR)"               
IF RC = 0 THEN SAY DSVAR                                     
ELSE LEAVE                                                   
END                                                           
"ISPEXEC LMDLIST LISTID("IDV") OPTION(FREE)"                 

or you can also use ISMF DATA SET LIST IN BATCH -
Sample job - http://www.servframe.com/wp-content/uploads/2011/01/ISMFDCDS.jcl_.txt[/quote]
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 -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
No new posts Joinkeys - 5 output files DFSORT/ICETOOL 7
No new posts How to append a PS file into multiple... JCL & VSAM 3
Search our Forums:

Back to Top