Kbase P6288: How to use the buffers within the Assign and Write triggers
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
22/01/2003 |
|
Status: Unverified
GOAL:
How to use the buffers within the Assign and Write triggers
FIX:
TRIGGER PROCEDURE FOR ASSIGN OF customer.custnum OLD VALUE oldcustnum LIKE customer.custnum.
MESSAGE "Old value: ":U oldcustnum SKIP
"New value: ":U customer.custnum VIEW-AS ALERT-BOX.
*******************************************************************************
ON WRITE OF customer
NEW BUFFER new-customer
OLD BUFFER old-customer
DO:
ASSIGN
new-customer.NAME = old-customer.NAME + "TEST".
MESSAGE "write fired:" SKIP
new-customer.NAME SKIP
old-customer.NAME SKIP
customer.custnum
VIEW-AS ALERT-BOX.
END.
DO TRANSACTION:
CREATE customer.
END.