I have a rexx program that reads in a list of data set names and / or masks
and creates a “master” member list consisting of all of the PDS/E members
found in the data sets.   The output is a file containing the member name,
the DSN, last update date (from ISPF stats, if available) and the number of
lines in the member.

It uses LMDLIST to process the list of data set names, and for each data
set it uses LMMLIST to retrieve the member name and ISPF stats.

It is quite simple and I have found a lot of uses for it.


On Tue, Dec 10, 2019 at 15:05 ITschak Mugzach <[email protected]> wrote:

> /* Rexx */
> "free f(List)"
> "alloc f(list) da(mylisy_dataset) shr"
> "ExecIO * DiskR list (stem List. finis"
> Do i = 1 to list.0
>    xdsn = list.0
>    TrapMode = outtrap('mem.')
>    "LISTD" xDsn "Members"
>    TrapMode = Outtrap('OFF')
>    Do j = 7 to Mem.0
>       Say Left(xDsn,44) mem.i /* print as you like */
>       End
>    End
>  End
>
>
>
> best,
> ITschak
>
> On Tue, Dec 10, 2019 at 8:26 PM Lizette Koehler <[email protected]>
> wrote:
>
> > Depending on the  number of datasets you need to do.
> >
> > A quick process is ISPF Option 3.4 and use PX next to the PDS.  It will
> > create a
> > pretty listing that might do what you want.  I am not sure how to run
> this
> > in
> > batch.
> >
> >
> >
> > Not sure what the utility you are looking to run would do.
> >
> > But for quick and dirty, ISPF Option 3.4 with PX might give you some
> ideas
> > of
> > what you want to produce in your own utility.
> >
> > Lizette
> >
> >
> >
> > > -----Original Message-----
> > > From: IBM Mainframe Discussion List <[email protected]> On
> > Behalf Of
> > > Lionel B Dyck
> > > Sent: Tuesday, December 10, 2019 10:49 AM
> > > To: [email protected]
> > > Subject: Re: Looking for a utility to create a master listing of all
> PDS
> > > members on a system
> > >
> > > Except that LISTDSI does not list the member names - LISTDS however
> will
> > > using the Members keyword.
> > >
> > > Would need to use one of the many vtoc commands on the cbttape, or even
> > > iehlist, process the results to find the pds dsnames and then do the
> > LISTDS
> > > for each.
> > >
> > >
> > > Lionel B. Dyck <sdg><
> > > Website: http://www.lbdsoftware.com
> > >
> > > "Worry more about your character than your reputation.  Character is
> > what you
> > > are, reputation merely what others think you are." - John Wooden
> > >
> > > -----Original Message-----
> > > From: IBM Mainframe Discussion List <[email protected]> On
> > Behalf Of
> > > Seymour J Metz
> > > Sent: Tuesday, December 10, 2019 11:37 AM
> > > To: [email protected]
> > > Subject: Re: Looking for a utility to create a master listing of all
> PDS
> > > members on a system
> > >
> > > IMHO the best options are ISPF and SAS, but the LISTDSI suggestion also
> > > works.
> > >
> > >
> > > --
> > > Shmuel (Seymour J.) Metz
> > > http://mason.gmu.edu/~smetz3
> > >
> > >
> > > ________________________________________
> > > From: IBM Mainframe Discussion List <[email protected]> on
> > behalf of
> > > Tony Thigpen <[email protected]>
> > > Sent: Tuesday, December 10, 2019 8:11 AM
> > > To: [email protected]
> > > Subject: Looking for a utility to create a master listing of all PDS
> > members
> > > on a system
> > >
> > > I am looking for a utility that will take a list of PDS libraries and
> > > generate a list of all members in the PDS.
> > >
> > > I have hundreds of PDSs on an old system I have to maintain and all the
> > old
> > > staff with any knowledge are gone. There are hundreds of PDS libraries
> > and no
> > > doc as to where anything is stored. I want, as a one time job, to
> create
> > a
> > > listing with a single line per member/PDS set:
> > > Member_name PDS_name
> > >
> > > I figure there is something already available before I start writing
> > > something new.
> > >
> > > This system does *not* have any PDSE libraries as it is OS/390 02.10.
> > >
> > > --
> > > Tony Thigpen
> > >
> > > ----------------------------------------------------------------------
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to
> > > [email protected] with the message: INFO IBM-MAIN
> > >
> > > ----------------------------------------------------------------------
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to
> > > [email protected] with the message: INFO IBM-MAIN
> > >
> > > ----------------------------------------------------------------------
> > > For IBM-MAIN subscribe / signoff / archive access instructions, send
> > email to
> > > [email protected] with the message: INFO IBM-MAIN
> >
> > ----------------------------------------------------------------------
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to [email protected] with the message: INFO IBM-MAIN
> >
>
>
> --
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Contiguous Monitoring
> for Legacy **|  *
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to