Kbase P97370: Sample code to determine the current order of a browsers' columns
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
11/9/2004 |
|
Status: Unverified
GOAL:
Sample code to determine the current order of a browsers' columns
GOAL:
How to get the order of a browsers' columns
FIX:
The following code puts together a comma separated list of the column names by the order that they appear in the browse.
DEF VAR I AS INT NO-UNDO.
DEF VAR colOrd AS CHAR FORMAT "x(25)" NO-UNDO.
DEF VAR chnd AS HANDLE NO-UNDO.
DO i = 1 TO <BrowseName>:NUM-COLUMNS:
chnd = <BrowseName>:GET-BROWSE-COLUMN(i).
IF i = 1 THEN
colOrd = chnd:NAME.
ELSE
colOrd = colOrd + "," + chnd:NAME.
END.
MESSAGE colOrd
VIEW-AS ALERT-BOX INFO BUTTONS OK.