Kbase P23823: How to use the ROW-ENTRY event with a BROWSE?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
4/23/2003 |
|
Status: Unverified
GOAL:
How to use the ROW-ENTRY event with a BROWSE?
FIX:
You can only use the ROW-ENTRY event with an updateable BROWSE.
In order to get the event to trigger, 1 or more rows in the BROWSE must be
enabled.
If no rows are enabled, then the event does not trigger when entering a row.
Example:
/* Run against the Sports2000 database */
/* Query Definition */
DEFINE QUERY qQuery FOR customer.
/* Browse Definition */
DEFINE BROWSE brBrowse QUERY qQuery
DISPLAY customer.NAME
ENABLE customer.NAME
WITH 10 DOWN NO-BOX.
/* Frame Definition */
DEFINE FRAME frFrame
brBrowse
WITH THREE-D ROW 1.
OPEN QUERY qQuery FOR EACH customer.
ENABLE ALL WITH FRAME frFrame.
/* Event syntax */
ON ROW-ENTRY OF BROWSE brBrowse
DO:
MESSAGE customer.NAME VIEW-AS ALERT-BOX.
RETURN.
END.
WAIT-FOR WINDOW-CLOSE OF CURRENT-WINDOW.