Kbase 15470: Example using the CHOOSE ROW statement
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  10/05/1998 |
|
Example using the CHOOSE ROW statement
FORM customer.name customer.city WITH FRAME choose-frame 10 down.
PAUSE 0 BEFORE-HIDE.
FOR EACH customer WHERE NAME BEGINS "S" BREAK BY customer.name:
DISPLAY name city WITH FRAME choose-frame.
IF NOT LAST(customer.name) THEN DOWN WITH FRAME choose-frame.
END.
REPEAT:
CHOOSE ROW customer.name WITH FRAME choose-frame.
FIND customer WHERE customer.name = frame-value.
MESSAGE customer.address.
END.
Progress Software Technical Support Note # 15470