Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Which PFKEY pressed

320 views
Skip to first unread message

Harry Myhre

unread,
Dec 4, 1994, 9:03:03 AM12/4/94
to
How can a REXX exec know which PFKEY was pressed? I'm using SPF panels and
REXX execs. I know how to check for PF3 using errorlevel, but how to check
for the other PFKEYs?
---
* Harry Myhre <har...@netcom.com>

Marc Irvin

unread,
Dec 4, 1994, 6:13:00 PM12/4/94
to
I converted some CMS applications to TSO/ISPF and
had that problem. The solution for me was to simulate
the CALLDMS command using REXX. PFkeys are not
normally passed, but if you improvise you can get by
the problem. The ZCMD field contains any user response
that is not an ISPF command, which ISPF intercepts. These
ISPF are normally attached to the PF-keys. If you
do VGETS and change they to constant values, such as
PF01-24, and use the VPUT to reset the PFkey values
ISPF will pass them to the REXX program. After you have
them you can then use VPUT to reinstate the original
PFkey setting to END UP DOWN etc...

As I said I have a REXX program that does it automatically,
call me at 203 327-4361 to discuss how I can share the
code with you, to save you some time.

Wim Crabbe

unread,
Dec 5, 1994, 3:39:00 AM12/5/94
to
> How can a REXX exec know which PFKEY was pressed? I'm using SPF
> panels and REXX execs. I know how to check for PF3 using errorlevel,
> but how to check for the other PFKEYs?

Add the following line to your ISPF-panel :
)PROC
&PF = .PFKEY

In the REXX exec, you add 'IF PF = PF04 THEN ....'

.--------------------------------------------------------------------.
| Wim Crabbe' | Internet : <Wim.C...@AIV.KULEUVEN.AC.BE> |
| K.U.Leuven University, Belgium |
'--------------------------------------------------------------------'

Lou (Computer Warrior)

unread,
Dec 5, 1994, 9:19:10 AM12/5/94
to
In the (PROC section of the panel, set a variable to the .PFKKEY control
variable, like so:
&PUPPY=.PFKEY
this should return the value of PF01-PF24 to the rexx variable PUPPY.
0 new messages