Btree.Extract to Popup (OpenInsight 32-bit Specific)
At 08 SEP 2006 05:08:31PM Richard S Todd wrote:
Hello,
How would I get the Keylist from the Btree.Extract Function to display in popup?
Thanks
Richard
At 08 SEP 2006 06:51PM Karen Oland wrote:
using code something like this?
(from an existing pgm, you'll need to init any variables used, of course – and the call pop.up() is an rbasic wrapper around popup that uses the same parameters as the AREV pop.up() function)
btree.extract( search, file_name, dict_handle, keys, "S" )
if keys found, check for more than one. If single key,
return it, else display a popup for selection.if index( keys, vm$, 1 ) thenpopup=xlate( "POPUPS", popup_name, null$, "X" ): ' - matching: ' : quote(in_value)if popup thenconvert @VM to @FM in keysreturn_value=pop.up( popup, popup, "@":popup, keys, popup, popup, popup, Title, popup, popup, popup, popup )if len( return_value ) else status()=3 ;* no selectionend else return_value=keys ;* no popup, return firstend else return_value=keys ;* single key foundend