DEFINE POPUP myShortcut SHORTCUT RELATIVE FROM MROW(),MCOL() DEFINE BAR 1 OF myShortcut PROMPT "myfirst item one" DEFINE BAR 2 OF myShortcut PROMPT "mysecond item one" DEFINE BAR 3 OF myShortcut PROMPT "mymulti item one >" ON SELECTION BAR 1 OF myShortcut wait window 'My First' ON SELECTION BAR 2 OF myShortcut wait window 'My Second' ON SELECTION BAR 3 OF myShortcut ACTIVATE POPUP myMulti DEFINE POPUP myMulti SHORTCUT RELATIVE FROM MROW()+1,MCOL()+1 DEFINE BAR 1 OF myMulti PROMPT "my first multi" DEFINE BAR 2 OF myMulti PROMPT "my second multi" DEFINE BAR 3 OF myMulti PROMPT "my thirdy multi" ON SELECTION BAR 1 OF myMulti wait window "my first multi" ON SELECTION BAR 2 OF myMulti wait window "my second multi" ON SELECTION BAR 3 OF myMulti wait window "my thirdy multi" ACTIVATE POPUP myShortcut