IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

creat new line command in front of Member from 3.4


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Punki

New User


Joined: 31 Oct 2006
Posts: 2

PostPosted: Mon May 26, 2025 8:30 pm
Reply with quote

Hi together,

you know the member list that you get when you open a PO dataset under ISPF 3.4 with e for edit. You will then see the member list with the specific information. On the left side there are 9 underscores in which I (normally) enter the known lines of commandos. D for delete, s for edit... etc

Now I want to position the cursor in front of a member, enter a string (e.g. dis for display) and then press Enter. DIS is a sample and not the requirement. A REXX with the name 'DIS' should then be executed. So far so good. The REXX is executed.

But I need the dataset and member name, because I want to do something with the member.

Can anyone help me with this? Are there standard variables that I can query or where do I have to read in?

I hope I have described everything clearly.

Thank you very much for your help.

Regards
Punki
Back to top
View user's profile Send private message
Joerg.Findeisen

Senior Member


Joined: 15 Aug 2015
Posts: 1390
Location: Bamberg, Germany

PostPosted: Tue May 27, 2025 11:30 am
Reply with quote

See Arg keyword. Your sample can be as simple as follows:

Code:
/* REXX */                                           
                                                     
Arg parms                                             
Parse Upper Var parms dsn '(' member ')' .           
Say "Parm="parms; Say "DSN="dsn; Say "Member="member 
                                                     
Exit
Back to top
View user's profile Send private message
Punki

New User


Joined: 31 Oct 2006
Posts: 2

PostPosted: Tue May 27, 2025 3:28 pm
Reply with quote

Hi Joerg.Findeisen,

yesterday I looked for so many possibilities and found nothing suitable.

Thank you very much. Everything works as desired.

Sometimes you just can't see the wood for the trees.

Thanks and best regards

Olaf
Back to top
View user's profile Send private message
Willy Jensen

Active Member


Joined: 01 Sep 2015
Posts: 745
Location: Denmark

PostPosted: Tue May 27, 2025 5:53 pm
Reply with quote

Note that you can use the slash '/' as a substitution for the datasetname. That way you can give a parameter for the program where the datasetname is part of the string.
I.e linecmd in the 3.4 Datasetlist: listc ent(/) all
It is ok to overwrite part of the line.
Back to top
View user's profile Send private message
sergeyken

Senior Member


Joined: 29 Apr 2008
Posts: 2218
Location: USA

PostPosted: Wed May 28, 2025 1:24 am
Reply with quote

Joerg.Findeisen wrote:
See Arg keyword. Your sample can be as simple as follows:

Code:
/* REXX */                                           
                                                     
Arg parms                                             
Parse Upper Var parms dsn '(' member ')' .           
Say "Parm="parms; Say "DSN="dsn; Say "Member="member 
                                                     
Exit

It can be even more simple.
Code:
/* REXX */                                           
Arg dsn '(' member ')' .           
Say "DSN="dsn; Say "Member="member 
                                                     
Exit

Just a reminder:
- operator ARG is equivalent to PARSE UPPER ARG; it converts all parameters to uppercase, and performs parsing of the text string.
- operator PARSE ARG does the same without conversion to uppercase.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts c all command JCL & VSAM 11
No new posts PDS member list with stats JCL & VSAM 6
No new posts REXX/CMS How to place command console... CLIST & REXX 4
No new posts Help needed in automation cics transa... CLIST & REXX 1
No new posts How to Login in to cics region and is... CICS 9
Search our Forums:


Back to Top