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

macro needed to navigate to Endevor.


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

New User


Joined: 29 Oct 2007
Posts: 17
Location: Noida

PostPosted: Tue Jun 10, 2008 2:36 pm
Reply with quote

I use this to navigate to Endevor option "Display Elements/Component" -:
START V.EC → 1 →1 → 1 →1

I need a macro to automate this.

Basically I need to position the cursor on command-line....Then send "START V.EC;1;1;1;1" to ISPF

Thanks
Gaurav
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Tue Jun 10, 2008 4:09 pm
Reply with quote

Gaurav,
Do you always want to browse the elements from only one envionment.
if so, how many environments

first one 1st - environment (may vary depends on your requirement to browse the elements)

Second one 3nd - Display option (constant in Endevor main panel_

thrid 1 - Element display option (to give all options)

please check back your requirement because usually it's not only required to browse for one environment.
Back to top
View user's profile Send private message
Gaurav Chauhan

New User


Joined: 29 Oct 2007
Posts: 17
Location: Noida

PostPosted: Tue Jun 10, 2008 4:22 pm
Reply with quote

For mainframe that I'm using navigation is 1;1;1 once I log into Endevor.

Thing is that I want to issue "START 3.4;1;1;1" at command line in ISPF panel to navigate to 'Display Elements/Component Lists' Option.
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Tue Jun 10, 2008 5:26 pm
Reply with quote

Gaurav,
The display option is 1 in all Endevor panels because it's a 3rd party product.

it was my mistake I printed 3 as second one.

my question is you might have a different number of environments which is completely site specific. So do you always want to go to environment assigned to option:1.

If so then you can use same macro always.
Back to top
View user's profile Send private message
Gaurav Chauhan

New User


Joined: 29 Oct 2007
Posts: 17
Location: Noida

PostPosted: Tue Jun 10, 2008 6:04 pm
Reply with quote

I'll be using ENVIRONMENT 1 only...

So that makes the navigation as "START V.EC;1;1;1;1" as against "START 3.4;....." wrongly mentioned previously.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Jun 10, 2008 7:03 pm
Reply with quote

Macro??? why don't you people start using the proper terminology?


what you want is a tso or ispf command to jump you there. why not dedicate a pf key to this?
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India

PostPosted: Wed Jun 11, 2008 4:32 am
Reply with quote

Dick,

Quote:
why not dedicate a pf key to this?


Curious to know as to how this can be done.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Wed Jun 11, 2008 5:01 am
Reply with quote

A PF key is just a shortcut for issuing commands. For example, instead of pressing F2, you can actually type the word SPLIT on the command line and press Enter.

Type KEYS in the command line and press Enter. A panel will display with the current PF key definitions. Pick a less frequently used key (such as 13-24) and replace the values:
Code:
                                                                       
 Key       Definition                         Format  Label     
 F13  . .  START V.EC;1;1;1;1                 SHORT   Endevor     
 F14  . .  tso %telephon                      LONG    tele

It will work as if you typed that value in the command line and pressed Enter.
Back to top
View user's profile Send private message
Gaurav Chauhan

New User


Joined: 29 Oct 2007
Posts: 17
Location: Noida

PostPosted: Wed Jun 11, 2008 10:04 am
Reply with quote

Yeah it works...
But still wanted to know how to issue ISPF commands thru REXX and make this work through REXX.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Wed Jun 11, 2008 9:26 pm
Reply with quote

Use ISPF option 3.9 to look at the ISP command table. You will find the definition of START there:
Code:
Verb      T  Action                                 
START     0  SELECT PGM(ISPSTRT) PARM(&ZPARM)       


from which you can deduce how to perform the same action in your rexx program:
Code:
/* rexx */
Address ISPEXEC
"SELECT PGM(ISPSTRT) PARM(V.EC;1;1;1;1)"

The example above is untested, but should work. icon_wink.gif

fyi. Not all of us are native English speakers. And this is a forum for technical discussions... for the sake of clarity, it would be appreciated if you did not use chat jargon and abbreviations here. Thanks.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Wed Jun 11, 2008 11:35 pm
Reply with quote

Likewise, you may be able to use ISPF option 3.9 to create your own commands! A panel titled 'Command Table Utility' should display and tell you what command tables can be used. Our system has a 'USR' command table. Using that name as an example, it will be a member named USRCMDS as a member in your ISPTLIB concatenation.

You can add an ENDEVOR command there, rather than creating a rexx program.
Code:
Verb      T  Action                                 
ENDEVOR     0  SELECT PGM(ISPSTRT) PARM(V.EC;1;1;1;1)


You can type ENDEVOR in any command line.
Back to top
View user's profile Send private message
Gaurav Chauhan

New User


Joined: 29 Oct 2007
Posts: 17
Location: Noida

PostPosted: Thu Jun 12, 2008 11:00 am
Reply with quote

Many thanks....Its working perfectly now
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Thu Jun 12, 2008 12:11 pm
Reply with quote

Thanks much Pedro, Learned one more new thing today.

I tried using your last suggested method of setting up in 3.9 option

Specifications
Application ID . . ISR
Enter "/" to select option
Show description field

After hit Eneter : next panel is

The command table is currently open, it cannot be modified. Use the view(V)
row command to see an entire entry.

Verb T Action
JCL 0 SELECT PGM(ISPSTRT) PARM(L.E)


I want to edit this command but it's not allowing, can you tell me how can i achieve this
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Thu Jun 12, 2008 12:17 pm
Reply with quote

secondly, if I want to go to a specific dataset with one command using the option given by you 3.9, how can i try that because after 3.4 option we need to place the cursor @ DSN name filed instead of command field to give dataset name

can we also do shifting cursor in same command
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Thu Jun 12, 2008 8:54 pm
Reply with quote

1. as you found out, you cannot edit an open table. That is why there are user and site command tables. I recommend you use those instead of trying to update the ISPF command table.


Quote:
i want to go to a specific dataset...

2. It is not clear what you mean by 'go to'



Quote:
becoz

fyi. Not all of us are native English speakers. And this is a forum for technical discussions... for the sake of clarity, it would be appreciated if you did not use chat jargon and abbreviations here. Thanks.
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Fri Jun 13, 2008 11:07 am
Reply with quote

apologize for my jargon..

So I want to use User table and want to delete the current setup of system table. Any way to delete so..?

Lets take an example..

want to go directly to members in a dataset (abc.def.hdf)

to go from ISPF we have to give 3. then 4(option) then move the cursor to " Dsname Level . . ." from command line.

So if I want to set this entire options in a user command table, how can i achieve this because we can setup for the options giving in command prompt line but how can I shift to next cursor position in same option.

please let me know if you are not clear
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Fri Jun 13, 2008 9:34 pm
Reply with quote

1. It is not clear to me what you want to delete. You cannot delete the entire table - ISPF will not function very well without it.

2. The tables are all processed in order, from top to bottom as listed in ISPF option 3.9. If you type a command, ISPF searches for the command in each table until found and does the process described there. There are up to three user tables. See the ISPF Customization manual for adding your user command tables.


3. It is still not clear what you want to do! Do you want to go to a member list of a particular dataset? Or just to move the cursor to name in the dataset list?
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Mon Jun 16, 2008 11:27 am
Reply with quote

I will try to explain in example..
lets say i want to see members in a dataset (aaa.bbb.ccc) daily. so i am doing now with below options
ISPF 3 > 4 > cursor on command line > shift the cursor to DSN level to place my dataset name and > Hit enter to get members in a dataset.

I would like to do all this functions in a single command using your suggestions.

I am able to put all commands in one statement which we have to give in command/option line. but for the commands to give in other than option command line , not sure how to put in statement where assigning to verb/pf key
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Mon Jun 16, 2008 10:17 pm
Reply with quote

Quote:
i want to see members in a dataset ...

>shift the cursor to DSN level to place my dataset name and
> Hit enter to get members in a dataset.


I think you are missing some steps. When you press Enter, you get a list of datasets (but in this case, I think you only get one name in the list. Then you can select the dataset by pressing B (for browse), E (for edit), etc...

If you just put the cursor on the line with the dataset name and press Enter, you get a popup panel with possible actions. But to do those things from a rexx program, you do not have to follow the same 'keystrokes' as you describe. Just call the service directly!

for browse:
Code:
/* rexx*/
Address ISPEXEC "BROWSE DATASET('aaa.bbb.ccc')"


for view:
Browse:
Code:
/* rexx*/
Address ISPEXEC "VIEW DATASET('aaa.bbb.ccc')"


for member list:
Code:
/* rexx*/
Address ISPEXEC                                                   
"LMINIT   DATAID(DID) DATASET('aaa.bbb.ccc') ENQ(SHRW)"                 
"LMOPEN  DATAID("did")"   
"MEMLIST DATAID("did") CONFIRM(YES)"
"LMFREE   DATAID("did")"


You can learn more about calling ISPF services by reading the ISPF Services Guide.
Back to top
View user's profile Send private message
HappySrinu

Active User


Joined: 22 Jan 2008
Posts: 194
Location: India

PostPosted: Tue Jun 17, 2008 10:42 am
Reply with quote

I got what I am looking for.
Thanks alot for your time Pedro.
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 PRINTOUT macro PL/I & Assembler 0
No new posts Mainframe Programmer with CICS Skill... Mainframe Jobs 0
No new posts create rexx edit Macro that edits the... CLIST & REXX 3
No new posts Help needed to assemble IMS sample co... ABENDS & Debugging 4
No new posts RABBIT HOLE NEEDED - "Live"... All Other Mainframe Topics 0
Search our Forums:

Back to Top