View previous topic :: View next topic
|
Author |
Message |
RazVorox
New User
Joined: 19 Oct 2022 Posts: 32 Location: Israel
|
|
|
|
Hi all.
First of all - I'm a TOTAL newbie to this whole "z/os" thing, so my sincere apologies, in advance. (Like, srsly. day 3. at best.)
Second - If its already answered, I've missed it, and not on account of lack-of-trying, so again - sorry
I'm looking for the most efficient way to get a list of all members,
in a pds, thats NAME starts with wxyz.
Basically, I'm looking for the best way to "REXX serch wxyz* members".
Please and thank you,
RazVorox. |
|
Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015 Posts: 1335 Location: Bamberg, Germany
|
|
|
|
You can use IEBCOPY CP with Wildcards to get what's needed. Besides that, TSO command LISTDS <pds> MEMBERS will give a list of all Members in a PDS[E]. Apply some filters and that's it.
There are certainly more options than these samples.
PS: Also see the Beginners Forum at https://www.ibmmainframeforum.com |
|
Back to top |
|
|
RazVorox
New User
Joined: 19 Oct 2022 Posts: 32 Location: Israel
|
|
|
|
There is a Begginers forum
~Running to sign up~
Thanks !!
P.S.
Interestingly enough, it didn't surface on the google searches.
-This- one, did.
:wonder: |
|
Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015 Posts: 1335 Location: Bamberg, Germany
|
|
|
|
What are you planning to do with the list of members? |
|
Back to top |
|
|
RazVorox
New User
Joined: 19 Oct 2022 Posts: 32 Location: Israel
|
|
|
|
Create an Index.
Basically, they are cbl progs listed by user prefix.
so, for example, mine would be rzvx0001, rzvx0002 etc.
I'm gonna parse them, then grab the "description" section from each,
and than create a basic index.
i.e.
rzvn0001 - Hello world
rzvn0002 - call time subroutine
..
etc.
its meant as an exercise in REXX to better familiarize myself with it. |
|
Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015 Posts: 1335 Location: Bamberg, Germany
|
|
|
|
Have a look at ISRSUPC using REXX (there was a discussion recently here). This makes it much easier as you get Member Name and Search String as result. Good luck. |
|
Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015 Posts: 734 Location: Denmark
|
|
|
|
Quick-and-dirty, if you only have a few members:
ISPF 3.2, enter dsname like LIB.CNTL(A*)
Then cut the list. |
|
Back to top |
|
|
RazVorox
New User
Joined: 19 Oct 2022 Posts: 32 Location: Israel
|
|
|
|
Thanks a lot Joerg!
Seems like I've got my starting point.
Gonna do some research/homework on the
IEBCOPY ; LISTDS ; ISRSUPC
Will(y) also try to rexx the 3.2 with the (*) member.
:-) |
|
Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015 Posts: 734 Location: Denmark
|
|
|
|
you can also use wildcard in ISPF 3.4, i.e. to browse you enter
b /(*list*)
in the line command |
|
Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015 Posts: 1335 Location: Bamberg, Germany
|
|
|
|
For the desired purpose, I would go with ISRSUPC. The only thing left is to apply some kind of filter for the member name. |
|
Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015 Posts: 734 Location: Denmark
|
|
|
|
Well, if you are going to use some kind of programming, then the ISPF library services can do he trick. Here is a small demo REXX:
Code: |
/* rexx */
mslmbr=''
address ispexec
"lminit dataid(did1) dataset('xxxx.lib.data') enq(shrw)"
if rc<>0 then say 'lminit rc' rc
else do
"lmopen dataid("did1") option(input)"
if rc<>0 then say 'lmopen rc' rc 'did' did1
else do forever
"lmmlist dataid("did1") member(mslmbr) option(list) stats(no)"
if rc<>0 then leave
if left(mslmbr,4)='TEST' then say ' 'strip(mslmbr)
end
"lmmlist dataid("did1") option(free)"
"lmclose dataid("did1")"
end
"lmfree dataid("did1")"
|
|
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2594 Location: Silicon Valley
|
|
|
|
You can skip over earlier member names by starting with the name you want.
Code: |
mslmbr = 'TEST"
. . .
"lmmlist dataid("did1") member(mslmbr) option(list) stats(no)"
. . . |
This works for RazVorox because the search is for the prefix of the name.
From the ISPF services guide:
Quote: |
When you invoke LMMLIST for the first time, member-var is used for selecting a starting position within the member list |
|
|
Back to top |
|
|
|