Sure...I do it a lot. It may not be the "right" way, but I declare the variable prior to calling the shortcut menu, then, in the menu option procedures, I set the variable and return it...see below:

*- Code in procedure calling menu:
lcClickCode = " "

DO mnsFind.mpr

DO CASE
CASE UPPER(lcClickCode) = "F"
* Do Whatever
CASE UPPER(lcClickCode) = "Q"
* Do Whatever
ENDCASE


*- Code within each procedure of menu:
*** User selects first menu item:
lcClickCode = "1"

RETURN lcClickCode

*** User selects second menu item:
lcClickCode = "2"

RETURN lcClickCode

Good luck - Victor