save members of a pds starting with a certain pattern

ashishwach · New User Joined: 07 Nov 2008 Posts: 19 Location: India

Hi all,
Could anyone pls tell how members (of a pds) starting with a certain pattern say a7 can be stored in an array using rexx.
I checked with other threads and found something like lmmlist..but when I tried opening the link, I was not able to get the exact syntax..
Thanks..

ofer71 · Posted: Tue Nov 25, 2008 3:06 pm

LMMLIST is indeed my favorite selection. You can read about it in the fine manual (ISPF Services).

O.

ashishwach · New User Joined: 07 Nov 2008 Posts: 19 Location: India

Thanks for that.. I tried reading through ISPF help availbale...
But there is no syntax given for the member selection..
If you could please provide me with Syntax as to how can I get the required list...would be really helpful..
I think I am asking for much..but m using it for the first time...I beg your pardon for tht...

ofer71 · Posted: Tue Nov 25, 2008 3:34 pm

At the top of this page, you can see "IBM manuals" link. Look for "ISPF Services Guide". Your answer is in there.

O.

ashishwach · New User Joined: 07 Nov 2008 Posts: 19 Location: India

I tried running following code in Rexx..for generating the Data Id associated with that dataset..
/* ************************** REXX ****************************** */
ISPEXEC LMINIT DATAID(DDVAR) DATASET(LIB.FCS.JCLLIB) ENQ(SHR)
CALL ISPLINK('LMINIT ','DDVAR ',
' ',' ',' ',' ',' ',' ',
'LIB.FCS.JCLLIB',' ',
' ',' ','SHR ');
SAY DDVAR
ISPEXEC LMFREE DATAID(DDVAR)

But it thrown an error 3+++ saying Routine not found..
Could you pls tell me about that..

superk · Posted: Tue Nov 25, 2008 4:16 pm

You have to start with the LMINIT Service.

Then, the LMOPEN Service.

Then, you can use the LMMLIST Service.

Garry Carroll · Posted: Tue Nov 25, 2008 4:30 pm

Would also suggest you pick either ISPEXEC or CALL ISPLINK , not both.

Garry.

superk · Posted: Tue Nov 25, 2008 4:45 pm

And, use the ISPF Edit Models for the required service for the language you've chosen to use.