Kbase P101086: How to make an updatable browse to move to next column when user hits RETURN ?
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  2/11/2005 |
|
Status: Unverified
GOAL:
How to make an updatable browse to move to next column when user hits RETURN ?
FACT(s) (Environment):
Progress 9.x
OpenEdge 10.x
FIX:
In the code bellow replace "creditLimit" with the name of the last updatable column in your browse.
IF KEY-FUNCTION( LASTKEY ) = "RETURN" THEN
DO:
DEF VAR hC AS HANDLE .
hC = BROWSE {&browse-name}:CURRENT-COLUMN.
IF hC:NAME <> "CreditLimit" THEN DO:
hC = hC:NEXT-COLUMN.
APPLY "Entry" TO hC.
RETURN NO-APPLY.
END.
END.