菜单2.mpr

这是一个医院管理系统

*       *********************************************************
*       *                                                         
*       * 12/24/04              菜单2.MPR               22:56:38  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名称                                                
*       *                                                         
*       * 版权所有 (C) 2004 公司名称                             
*       * 地址                                                    
*       * 城市,     邮编                                          
*       * 国家                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                         菜单定义                        
*       *                                                         
*       *********************************************************
*

DEFINE POPUP 快捷菜单 SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF 快捷菜单 PROMPT "新建"
DEFINE BAR 2 OF 快捷菜单 PROMPT "删除"
DEFINE BAR 3 OF 快捷菜单 PROMPT "住院部"
DEFINE BAR 4 OF 快捷菜单 PROMPT "员工管理"
DEFINE BAR 5 OF 快捷菜单 PROMPT "药品仪器"
DEFINE BAR 6 OF 快捷菜单 PROMPT "门诊部"
ON BAR 3 OF 快捷菜单 ACTIVATE POPUP 住院部
ON SELECTION BAR 4 OF 快捷菜单 do form e:\医院管理系统\ygcx.scx
ON SELECTION BAR 5 OF 快捷菜单 do form e:\医院管理系统\ypyq.scx

DEFINE POPUP 住院部 SHORTCUT RELATIVE
DEFINE BAR 1 OF 住院部 PROMPT "病人管理"
DEFINE BAR 2 OF 住院部 PROMPT "病床管理"
ON SELECTION BAR 1 OF 住院部 do form e:\医院管理系统\brgl.scx
ON SELECTION BAR 2 OF 住院部 do form e:\医院管理系统\bcgl.scx

ACTIVATE POPUP 快捷菜单