Filling data into a browser.

[mayur_kovle]

Please anybody suggest a way to fill the dynamic browser with the data that is present in the temp-table or buffer.

Thanks in advance.
Regards M.

 

[eMe]

do you mean...

OPEN QUERY <browse_name> FOR EACH <tempTable_Name> NO-LOCK INDEXED-REPOSITION

 

[philippoommen1]

Hope following code will help you
===================================

DEFINE VARIABLE iFields AS INTEGER NO-UNDO.
DEFINE VARIABLE Field-hdl AS HANDLE NO-UNDO.
CREATE BROWSE Browse-Hndl
ASSIGN FRAME = FRAME F1:HANDLE
QUERY = qh
TITLE = " "
X = 2
Y = 2
WIDTH = 130
DOWN = 12
VISIBLE = TRUE
SENSITIVE = TRUE
READ-ONLY = NO
COLUMN-SCROLLING = TRUE
SEPARATORS = YES
qh:QUERY-PREPARE("for each temptable NO-LOCK":U).
qh:QUERY-OPEN.
/* Adding Fields */
Browse-Hndl:ADD-LIKE-COLUMN(bh:BUFFER-FIELD(1),1).
Browse-Hndl:ADD-LIKE-COLUMN(bh:BUFFER-FIELD(3),2).
END PROCEDURE.