Kbase P60468: How to list the table name and field name of each column of
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  23/12/2003 |
|
Status: Unverified
GOAL:
How to list the table name and field name of each column of a browse widget?
FIX:
The following code loops through the columns of a static browse widget messaging the table and field name of each:
DEFINE VARIABLE i AS INTEGER NO-UNDO.
DEFINE VARIABLE h AS HANDLE NO-UNDO.
h = BROWSE-1:FIRST-COLUMN IN FRAME {&FRAME-NAME}.
DO i = 1 TO BROWSE-1:NUM-COLUMNS:
MESSAGE h:NAME h:TABLE
VIEW-AS ALERT-BOX INFO BUTTONS OK.
h = h:NEXT-COLUMN.
END.