RE: how to monitor for function keys in a cl program with display files

[Rob Berendt <rob@xxxxxxxxx>]

             SNDRCVF RCDFMT(PROMPT)
             IF &IN91 RETURN /* Request was ended  */

       A                                      DSPSIZ(24 80)
       A          R PROMPT                    TEXT('Prompt')
       A                                      BLINK
       A                                      CA03(91 'Return')





ChrisB@cross-check.com on 09/27/99 01:30:24 PM
Please respond to RPG400-L@midrange.com@Internet
To:     RPG400-L@midrange.com@Internet
cc:      
Fax to: 
Subject:        RE: how to monitor for function keys in a cl program with 
display files

You must define the Fkeys with an Indicator.  You can then check for *IN03 =
'1'.....

-----Original Message-----
From: Chris Beck [mailto:CBeck@good-sam.com]
Sent: Monday, September 27, 1999 9:46 AM
To: Rpg400-l@midrange.com
Subject: how to monitor for function keys in a cl program with display
files


how can i monitor of the f3 or f12 keys are pushed in a displayfile run
through a cl progarm?

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---