Jim,
Aside from the codes below, I've also changed the shortcut menu to return BAR#. Still, BAR() always returned zero.

>Ramil,
>
>Don't put the actionn in the menu. Instead in the RightClick of the form do this;
>
>

>DO MyShortCut.mpr
>DO CASE
>   CASE BAR() = 1
>      Something
>   CASE BAR() = 2
>      SomethingElse
>   CASE BAR() = 3
>      SomeOtherThing
>ENDCASE
>