Hi John,

I am using some functions which are filled from within a special method, i.e. per BINDEVENT()

* This code is used to generate the menue
MakePopup()
Add2Popup([\<1 My 1st MenuItem],  1,[-])
Add2Popup([\<2 My 2nd MenuItem],  1,[-])
Add2Popup([\-],                  98,[-])
Add2Popup([\<0 Cancel],          99,[-])
ShowPopup()
IF VARTYPE(PopUpMenueSelection) = 'N'
	DO CASE 
	CASE PopUpMenueSelection = 1 
		* Do something here
	CASE PopUpMenueSelection = 2 
		* Do something there
	ENDCASE 
ENDIF 

* These are the specific functions
FUNCTION makepopup
	* Create Popup-Menue
	DEFINE POPUP Pop1 shortcut relative from mrow(), mcol()
	* Declare public variable to hold the selected menue-value
	PUBLIC PopupMenueSelection
ENDFUNC 
**********************************************************
FUNCTION add2popup
LPARAMETERS vPrompt, vValue, vMessage
	* create menue-entry
	DEFINE BAR (vValue) OF Pop1 PROMPT vPrompt MESSAGE vPrompt
ENDFUNC 
**********************************************************
FUNCTION showpopup
	* activate/show popup-menue
	ON SELECTION popup pop1 PopupMenueSelection = BAR()
	ACTIVATE POPUP Pop1
	RELEASE POPUP Pop1 extended 
ENDFUNC