DEFINE MENU (m.cMenuName) IN (m.oFormRef.Name) BAR
DEFINE PAD _3dg0xqbgi OF (m.cMenuName) PROMPT "Дані" COLOR SCHEME 3 ;
KEY CTRL+E, "CTRL+E"
DEFINE PAD _3dg0xqbgj OF (m.cMenuName) PROMPT "Звіти" COLOR SCHEME 3 ;
KEY CTRL+Z, "CTRL+Z"
DEFINE PAD _3dg0xqbgk OF (m.cMenuName) PROMPT "Сервіс" COLOR SCHEME 3 ;
KEY CTRL+S, "CTRL+S"
DEFINE PAD _3dg0xqbgl OF (m.cMenuName) PROMPT "Вихід" COLOR SCHEME 3 ;
KEY CTRL+Q, "CTRL+Q"
ON PAD _3dg0xqbgi OF (m.cMenuName) ACTIVATE POPUP (a_menupops[1])
ON PAD _3dg0xqbgj OF (m.cMenuName) ACTIVATE POPUP (a_menupops[2])
ON PAD _3dg0xqbgk OF (m.cMenuName) ACTIVATE POPUP (a_menupops[3])
ON SELECTION PAD _3dg0xqbgl OF (m.cMenuName) ;
DO _3dg0xqbgm ;
IN LOCFILE("VANTAG\MENU1" ,"MPX;MPR|FXP;PRG" ,"WHERE is MENU1?")
DEFINE POPUP (a_menupops[1]) MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF (a_menupops[1]) PROMPT "Довідник цехів" ;
KEY CTRL+T, "CTRL+T"
DEFINE BAR 2 OF (a_menupops[1]) PROMPT "Довідник складів" ;
KEY CTRL+R, "CTRL+R"