Kbase P105935: How to get values from a Browse with multiple-selection attribute enabled
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  7/1/2005 |
|
Status: Unverified
GOAL:
How to get values from a Browse with multiple-selection attribute enabled
FIX:
This code can be used in any trigger that can be fired after the multi row selection.
DEF VAR vc AS CHARACTER NO-UNDO.
DEF VAR intSub AS INTEGER NO-UNDO.
DEFINE VARIABLE hField AS HANDLE.
DO intSub = 1 TO {&BROWSE-NAME}:NUM-SELECTED-ROWS IN FRAME {&FRAME-NAME} :
{&BROWSE-NAME}:FETCH-SELECTED-ROW(intSub).
/* interesting point here */
/* hBUFFER:AVAILABLE is TRUE */
/* but AVAILABLE( rowObject ) is FALSE */
hField = BUFFER {&TABLES-IN-QUERY-{&BROWSE-NAME}}:BUFFER-FIELD( "cust-num" ).
IF vc <> "" THEN
ASSIGN vc = vc + "," + STRING( hField:BUFFER-VALUE ).
ELSE
ASSIGN vc = STRING( hField:BUFFER-VALUE ).
END.