Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Selecting a few members in a PDS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
Vasanthr

New User


Joined: 24 Jan 2011
Posts: 21
Location: India

PostPosted: Tue Jun 05, 2012 12:47 pm    Post subject: Selecting a few members in a PDS
Reply with quote

Hi


Is there a rexx command to open only few members in pds


ie. I want an equivalent of member command of AAAA.BBBB.CCCC.DDDD(*LLL*)

Here i want to open PDS with members which contains LLL in its name.

I know that

address ispexec
"VIEW DATASET('AAAA.BBBB.CCCC.DDDD(ALLLLLL)')" will open that particular member.


Please help me in this issue.
Back to top
View user's profile Send private message

PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2445
Location: Netherlands, Amstelveen

PostPosted: Tue Jun 05, 2012 12:51 pm    Post subject:
Reply with quote

Use the ISPF LM* services.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10374
Location: italy

PostPosted: Tue Jun 05, 2012 1:09 pm    Post subject: Reply to: Selecting a few members in a PDS
Reply with quote

from the BROWSE/VIEW/EDIT member list
enter
Code:
s <pattern> B/V/E

s as SELECT

it will B/V/E all the members selected in sequence
entering cancel will stop and return to the member list

the only annoyance is that it will leave in the line command the B/V/E
for the unprocessed members,
nothing that a RESET will not heal icon_wink.gif

but I might have misunderstood the requirement!
Back to top
View user's profile Send private message
Vasanthr

New User


Joined: 24 Jan 2011
Posts: 21
Location: India

PostPosted: Tue Jun 05, 2012 2:33 pm    Post subject:
Reply with quote

Hi Peter,

Can you please give the exact syntax ..It would be really helpful for me


PeterHolland wrote:
Use the ISPF LM* services.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1072
Location: Oostende, Belgium

PostPosted: Tue Jun 05, 2012 2:41 pm    Post subject:
Reply with quote

Vasanthr wrote:
Can you please give the exact syntax ..It would be really helpful for me
PeterHolland wrote:
Use the ISPF LM* services.

Nobody ever got any terrible diseases from reading a manual...
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 688
Location: Pennsylvania

PostPosted: Tue Jun 05, 2012 5:05 pm    Post subject:
Reply with quote

Vasanthr,

First of all, you can not do a view of all the members at once.

You need to process (read) them one at a time. Pseudo code:

Code:
LMINIT dataset
LMMLIST (use pattern syntax)
START LOOP
   ALLOCATE DATASET(MEMBER) REUSE
   EXECIO *
   PROCESS DATA  (may be another loop or internal subroutine)
   LMMLIST  (to get next member)
   IF NO MORE MEMBERS (based on rc) THEN LEAVE LOOP
END LOOP
LMCLOSE


Do you see why nobody can provide you with 'exact syntax'?

You need to read the manual and understand how LM Services work.

It is either that or find a new job.
Back to top
View user's profile Send private message
Vasanthr

New User


Joined: 24 Jan 2011
Posts: 21
Location: India

PostPosted: Tue Jun 05, 2012 6:14 pm    Post subject:
Reply with quote

Hi Dave,


I dont want to view all the members at once.

What I need is equivalent of


3.4 option -------> view command of AAAA.BBBB.CCCC(*LLL*)


This will open the PDS with members with name containing LLL in it .


I'll surely read the manual for LM commands.But it would take extra time for me.I needed this for an adhoc request .So only I posted here.


Anyways thanks much for ur help





daveporcelan wrote:
Vasanthr,

First of all, you can not do a view of all the members at once.

You need to process (read) them one at a time. Pseudo code:

Code:
LMINIT dataset
LMMLIST (use pattern syntax)
START LOOP
   ALLOCATE DATASET(MEMBER) REUSE
   EXECIO *
   PROCESS DATA  (may be another loop or internal subroutine)
   LMMLIST  (to get next member)
   IF NO MORE MEMBERS (based on rc) THEN LEAVE LOOP
END LOOP
LMCLOSE


Do you see why nobody can provide you with 'exact syntax'?

You need to read the manual and understand how LM Services work.

It is either that or find a new job.
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 688
Location: Pennsylvania

PostPosted: Tue Jun 05, 2012 8:48 pm    Post subject:
Reply with quote

Vasanthr,

Sorry I misunderstood your requirments.

I was thown off by:
Quote:
Is there a rexx command to open only few members in pds.

Do like Enrico said: from the 3.4 dataset list:

Code:

Command - Enter "/" to select action                  Message           Volume
-------------------------------------------------------------------------------
V /(*L*) AAAA.BBBB.CCCC.DDDD
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1932
Location: UK

PostPosted: Tue Jun 05, 2012 11:44 pm    Post subject:
Reply with quote

In answer to your question "Is there a rexx command...." - no, there is not. The rexx keywords and functions can be found in the rexx language reference along with TSO extensions.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Selecting a row from multiple tables! Vignesh Sid DB2 2 Thu Oct 26, 2017 6:09 pm
This topic is locked: you cannot edit posts or make replies. Selecting two copybooks of different ... Vignesh Sid COBOL Programming 8 Tue Sep 05, 2017 7:28 pm
No new posts Historical/statistical details for me... elixir1986 TSO/ISPF 13 Wed Aug 30, 2017 9:02 pm
No new posts Copying Panvalet members to PDS LOGESHWARAN K CA Products 4 Mon Mar 06, 2017 10:45 am
No new posts Single step utility for compare and u... ramprakashn JCL & VSAM 5 Fri Apr 29, 2016 3:43 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us