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 

Tracks allocated and % used

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
deepeshk79
Beginner


Joined: 20 Jun 2003
Posts: 112
Topics: 48
Location: Bangalore
PostPosted: Tue Jul 15, 2003 11:48 pm    Post subject: Tracks allocated and % used Reply with quote
Hi All,

I have around 100 files some of which are VSAM and i need to find the following information for them

TRACKS Allocated
% Used

Any way out other than manually looking into the file info??

Thanks,
Deepesh
Back to top
View user's profile Send private message AIM Address
ofer71
Intermediate


Joined: 12 Feb 2003
Posts: 358
Topics: 4
Location: Israel
PostPosted: Wed Jul 16, 2003 5:21 am    Post subject: Reply with quote
Code:
/*------------------------------- REXX ------------------------------ */
                                                                       
ADDRESS ISPEXEC "LMDINIT LISTID(TEMPLIST) LEVEL("HLQ")"                 
                                                                       
DO FOREVER                                                             
  ADDRESS ISPEXEC                                                       
  "LMDLIST LISTID(&TEMPLIST) OPTION(LIST) DATASET(DSVAR) STATS(YES)"   
  IF RC ?= 0 THEN LEAVE                                                 
  SAY DSVAR ZDLEXT ZDLUSED                                             
END                                                                     
                                                                       
ADDRESS ISPEXEC "LMDFREE LISTID(&TEMPLIST)"                             
                                                                       
                                                                       
EXIT                                                                   


O.
________
marijuana indica
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) 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