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
 
Mapping ENTER key in panel

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

New User


Joined: 25 Jun 2007
Posts: 8
Location: India

PostPosted: Tue Dec 04, 2007 1:23 pm    Post subject: Mapping ENTER key in panel
Reply with quote

I designed a panel. I need to differentiate between PF03 and ENTER keys. PF03 works fine by using the logic 'fkey='PF03'. Need to map ENTER key to process and all other PF keys to be made as invalid keys.
In a previos post by someone, I found that PF03 gives RC of 8 whereas ENTER '0'. But the RC for ENTER as well as PF03 is '0' as far as I could see. Please let me konw what can be done.
Back to top
View user's profile Send private message

Srihari Gonugunta

Active User


Joined: 14 Sep 2007
Posts: 295
Location: Singapore

PostPosted: Tue Dec 04, 2007 2:01 pm    Post subject:
Reply with quote

Code:
 "ispexec vget (zpfkey) asis"
if zpfkey='PF03' then do
stmt1
end;
else do
stmt2
end;


After displaying the panel, If PF3 is pressed then stmt1 is executed and If pf3 is not entered it is considered as ENTER. you can achieve all the pf key handling with this if-else if logic, I believe.

I am not sure of handling the ENTER key explicitly.
Back to top
View user's profile Send private message
sreejith2612

New User


Joined: 25 Jun 2007
Posts: 8
Location: India

PostPosted: Tue Dec 04, 2007 2:33 pm    Post subject: Reply to: Mapping ENTER key in panel coded using REXX.
Reply with quote

Hi,
Thx for the reply. This works fine but we cant differentiate between PF keys other than PF03 (say PF04) and ENTER because the same statement gets executed when (say) PF04 and ENTER are pressed.

Regards,
Sreejith.
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: Tue Dec 04, 2007 4:32 pm    Post subject: Reply to: Mapping ENTER key in panel
Reply with quote

Did you read this previous topic?
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: Tue Dec 04, 2007 7:20 pm    Post subject: Reply to: Mapping ENTER key in panel
Reply with quote

Once again, I need to ask why you want to do this.

When you use the DISPLAY service for a panel, there are only two normal return-codes that you need to deal with: RC=0 or RC=8.

When you call the DISPLAY service, and then press the ENTER key, the DISPLAY service ends with RC=0. When you call the DISPLAY service, and then enter an END or EXIT or RETURN command, then the DISPLAY service ends with RC=8.

Since each TSO/ISPF user has the option to specify which PF keys are mapped to which commands, then it doesn't make logical sense to look for specific PF keys to be pressed, when all that's really important is what command they issue, and what return-code that command generates back to the dialog.
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 Trace in CLIST PANEL cvnlynn CLIST & REXX 1 Thu Jun 22, 2017 11:06 pm
No new posts SCLM -- not installed -- panel ISRNOSLM dmitchell1105 IBM Tools 3 Fri Jun 09, 2017 10:41 pm
No new posts ISPF - How to come out of ISPF Panel parasmalik20 TSO/ISPF 5 Tue Feb 21, 2017 7:44 pm
No new posts the use of 'B3'x character in a panel Pedro TSO/ISPF 1 Thu Feb 16, 2017 3:09 am
No new posts Design of ISPF panel prino TSO/ISPF 2 Wed Jan 25, 2017 10:31 pm

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