MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Listing dataset in batch mode

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
ranjit5311
Beginner


Joined: 27 Nov 2005
Posts: 27
Topics: 14
PostPosted: Wed Nov 01, 2006 8:19 am    Post subject: Listing dataset in batch mode Reply with quote
Hi all,
I am trying to list the datasets by giving incompelte dataset name i.e using wild card as we do in ISPF 3.4. I am doing this using LMDINIT. code is as follow:-
Code:
/*REXX*/                                                         
trace all                                                         
dsname = 'ttoi.ranjit*.te*'                                       
if dsname = '' then exit                                       
stat=msg('off')                                                   
ADDRESS ISPEXEC "LMDINIT LISTID(lmd) LEVEL(&dsname)"             
do forever                                                       
say "imd" lmd                                                     
Address ispexec                                                   
"Lmdlist Listid(&lmd) Stats(nO) Dataset(var1) Option(LIST)"       
say "dataset" var1                                               
if rc > 0 then do                                                 
"Lmdfree listid("lmd") "                                         
leave                                                             
end                                                                                                     
end                 

this is getting executed fine in fore ground mode. In batch mode it is getting failed with RC = -3.

How can one gets the list of datasets through batch mode.

Thanks,
Ranjit Kumar
_________________
One should move lightly through the life, carrying no excess baggage.
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12372
Topics: 75
Location: San Jose
PostPosted: Wed Nov 01, 2006 8:23 am    Post subject: Reply with quote
ranjit5311,

Read this topic

http://www.mvsforums.com/helpboards/viewtopic.php?t=5276

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group