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
 
Panel Menu option does not execute CMD

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

New User


Joined: 22 Oct 2008
Posts: 5
Location: maidstone,uk

PostPosted: Wed Oct 22, 2008 10:51 pm    Post subject: Panel Menu option does not execute CMD
Reply with quote

I'm using a panel to list a set of menu items:

)INIT
.HELP = SMTh0
.cursor = ZCMD
&PFKEY3 = &ZPF03
&ZPF03 = END
VPUT ( ZPF03 ) PROFILE
)PROC
&ZPF03 = &PFKEY3
VER (&zcmd,nb,list,0,1,2,3,4,5,6,7,8,9,'x'
&ZSEL = TRANS (TRUNC (&ZCMD,'.')
1,'cmd(%TS7740B)'
2,'cmd(TS7740C)'
3,'cmd(TS7740CS)'
4,'cmd(%TS7740D)'
5,'cmd(%TS7740h)'
6,'cmd(%TS7740J)'

but it drops through this and out of the calling rexx.

After running this in 7.1 - with the panel - the cmds got executed, so am assuming I haven't included something in the calling rexx

Any hints welcome

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

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Wed Oct 22, 2008 11:42 pm    Post subject: Reply to: CLIST Menu option does not execute CMD
Reply with quote

Does the calling program use "ISPEXEC SELECT PANEL(panname)"?
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Wed Oct 22, 2008 11:48 pm    Post subject: Reply to: CLIST Menu option does not execute CMD
Reply with quote

If the selection from the panel is coming from ZCMD and you are doing your VER on &ZCMD, wouldn't you want to do a VPUT (ZCMD) PROFILE rather than VPUT (ZPF03) PROFILE.
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Oct 23, 2008 1:24 am    Post subject: Reply to: CLIST Menu option does not execute CMD
Reply with quote

I do not like panels that change my PF key settings. Those can be set by the user... and many people do.

And I especially do not like that you change it and save to the profile. That will likely affect other applications as well.
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Oct 23, 2008 1:24 am    Post subject: Reply to: CLIST Menu option does not execute CMD
Reply with quote

Learn how to use KEYLISTS.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8620
Location: Back in jolly old England

PostPosted: Thu Oct 23, 2008 11:16 am    Post subject:
Reply with quote

And for readability in your postings .......

Click HERE to see how to use tags to make your post more easily readable
Back to top
View user's profile Send private message
cs53033

New User


Joined: 22 Oct 2008
Posts: 5
Location: maidstone,uk

PostPosted: Thu Oct 23, 2008 2:19 pm    Post subject: Re: Reply to: CLIST Menu option does not execute CMD
Reply with quote

superk wrote:
Does the calling program use "ISPEXEC SELECT PANEL(panname)"?


Hi Kevin - yes it does
Back to top
View user's profile Send private message
cs53033

New User


Joined: 22 Oct 2008
Posts: 5
Location: maidstone,uk

PostPosted: Thu Oct 23, 2008 2:29 pm    Post subject: Re: Reply to: CLIST Menu option does not execute CMD
Reply with quote

cpuhawg wrote:
If the selection from the panel is coming from ZCMD and you are doing your VER on &ZCMD, wouldn't you want to do a VPUT (ZCMD) PROFILE rather than VPUT (ZPF03) PROFILE.


I altered this, but it had no effect

Are there any possible commands I should be using in the calling rexx
Back to top
View user's profile Send private message
cs53033

New User


Joined: 22 Oct 2008
Posts: 5
Location: maidstone,uk

PostPosted: Thu Oct 23, 2008 2:34 pm    Post subject:
Reply with quote

If anyone has any examples of a menu within a panel being called from a REXX with the rexx code, that might be good to see how the experts do it.
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Thu Oct 23, 2008 8:45 pm    Post subject: Reply to: CLIST Menu option does not execute CMD
Reply with quote

I think all you need in your rexx is the select statement, and for debugging, add a trace statement:
Code:

trace('r')
Address ISPEXEC
"SELECT PANEL(yourpanl)"


Add a trace to TS7740B to make sure it is not being called and ending without showing anything.

You did not post your entire panel definition. Please show your )PROC section through to the end.

Your VER statement is missing right parenthesis.

Your TRANS statement is missing right parenthesis.
Back to top
View user's profile Send private message
cs53033

New User


Joined: 22 Oct 2008
Posts: 5
Location: maidstone,uk

PostPosted: Fri Oct 24, 2008 4:02 pm    Post subject: Re: Reply to: CLIST Menu option does not execute CMD
Reply with quote

Pedro wrote:
I think all you need in your rexx is the select statement, and for debugging, add a trace statement:
Code:

trace('r')
Address ISPEXEC
"SELECT PANEL(yourpanl)"


Add a trace to TS7740B to make sure it is not being called and ending without showing anything.

You did not post your entire panel definition. Please show your )PROC section through to the end.

Your VER statement is missing right parenthesis.

Your TRANS statement is missing right parenthesis.


Thanks Pedro - after changing to SELECT PANEL........ from DISPLAY, my problems went away - DISPLAY always used to work ?
Back to top
View user's profile Send private message
Pedro

Senior Member


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

PostPosted: Fri Oct 24, 2008 9:20 pm    Post subject: Reply to: CLIST Menu option does not execute CMD
Reply with quote

that's funny. The first response to your post recommended SELECT service and you responded that you were using it already on Thu Oct 23, 2008 1:49 pm.

Please read the advice you are reading carefully.
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
This topic is locked: you cannot edit posts or make replies. Rexx to execute spool commands upendrasri CLIST & REXX 5 Wed Oct 04, 2017 6:54 am
No new posts Execute JCL step based on the content... sprikitik JCL & VSAM 2 Tue Oct 03, 2017 10:03 am
This topic is locked: you cannot edit posts or make replies. Rexx to execute spool commands upendrasri CLIST & REXX 47 Fri Sep 29, 2017 1:08 pm
No new posts Where is output from PARM ABEXIT (SNA... packerm CA Products 3 Thu Sep 28, 2017 4:06 pm
No new posts MQ command in option 6 of ISPF! Vignesh Sid All Other Mainframe Topics 3 Tue Sep 26, 2017 6:01 pm

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