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 

list of all members from the librarian

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
digitalnirmal
Beginner


Joined: 06 Dec 2005
Posts: 21
Topics: 10
PostPosted: Thu Jun 22, 2006 5:46 am    Post subject: list of all members from the librarian Reply with quote
I need a list of all members present in the soucelib of the librarian
Is these any way to do this usig FILEAID

Also, is there any tutorial/sample progs/reference available from where programming using FILEAID could be learnt
Back to top
View user's profile Send private message
digitalnirmal
Beginner


Joined: 06 Dec 2005
Posts: 21
Topics: 10
PostPosted: Sun Jun 25, 2006 9:04 am    Post subject: Reply with quote
guys .... 3 days and no soln......
does it mean that it cant be done???
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose
PostPosted: Mon Jun 26, 2006 5:22 am    Post subject: Reply with quote
digitalnirmal,

*Sigh* We do not know the answers for all the questions. But I just referred the User guide and found that librarian has its own program which can provide the listing. Try this JCL

Printing or Punching Entire Members or Portions of Members

Code:

Following is an example of a typical utility PRINT/PUNCH job stream.
//PRIJOB JOB 70000,R.BROWN,CLASS=X
//EXEC librarian
//MASTER DD DSN=LIBR.MASTER.FILE,DISP=SHR
//SYSPUNCH DD SYSOUT=B
//OSJOB DD DUMMY
//SYSIN DD *
-OPT UTILITY
-PRINT TESTMOD,1120,1690
-PUNCH MEMBER1,420,635
-PRINT MEMBER3,1800,3450
-PRINT MEMBER3,200,670
/*
//
* $$ JOB JNM=PRIJOB,CLASS=A
// JOB PRIJOB
// DLBL MASTER,'CAI.LIBR.LIBTESTB',,DA
// EXTENT SYS004,SYSWK2,1,0,8816,40
// ASSGN SYS004,DISK,VOL=SYSWK2,SHR
// DLBL JOBSTR,'LIBR.JOBSTR1',,SD
// EXTENT SYS008,SYSWK2,1,0,9100,10
// ASSGN SYS008,DISK,VOL=SYSWK2,SHR
// EXEC librprog,SIZE=AUTO
-OPT UTILITY
-PRINT TESTMOD,1120,1690
-PUNCH MODULE1,420,635
-PRINT MODULE3,1800,3450
-PRINT MODULE3,200,670


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
digitalnirmal
Beginner


Joined: 06 Dec 2005
Posts: 21
Topics: 10
PostPosted: Mon Jun 26, 2006 11:45 pm    Post subject: Reply with quote
Thanks ... leme try this out
Back to top
View user's profile Send private message
Pudah
Beginner


Joined: 20 Jun 2003
Posts: 27
Topics: 8
Location: East of the Rock, West of the Hard Place
PostPosted: Fri Jul 07, 2006 6:58 am    Post subject: Reply with quote
If you just want a list of the members (as opposed to a listing of the contents of each member) this should do the trick:
Code:
//LIBRINDX EXEC PGM=LIBARIAN                       
//MASTER    DD DSN=SOME.LIBRIAN.DATASET,DISP=SHR
//AUXINC    DD DUMMY                               
//LIST      DD SYSOUT=T                             
//INDEX     DD SYSOUT=T                             
//SYSPRINT  DD SYSOUT=T                             
//SYSIN     DD *                                   
-OPT INDEX                                         
-END                                               
/*                                                 
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 -> Utilities 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