Try

define popup cont_sal SHORTCUT relative

>Everything is fine except the submenu is not normal 3D submenu. Submenu code works fine when i put it in non-Shortcut menu.
>
>

>define popup trn_pop shortcut from mrow(),mcol() relative in screen title 'Transactions'
>define popup cont_sal margin relative
>
>define bar 01 of trn_pop prompt "\<1 - Contract Sales"
>    on bar 01 of trn_pop activate popup cont_sal
>
>define bar 01 of cont_sal prompt "\<1 - Contract Sales - Yarn"
>define bar 02 of cont_sal prompt "\<2 - Contract Sales - Conversion"
>define bar 03 of cont_sal prompt "\<3 - Contract Sales - Ready Fabric"
>
>on selection bar 01 of cont_sal do form cont_sal1
>on selection bar 02 of cont_sal do form cont_sal2
>on selection bar 03 of cont_sal do form cont_sal3
>

>
>Thanks in Advance.