*       *********************************************************
*       *                                                         
*       * 03/10/02              MAIN.MPR                18:12:48  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名稱                                                
*       *                                                         
*       * 版權所有 (C) 2002 公司名稱                             
*       * 地址                                                    
*       * 城市,     郵編                                          
*       * 國家                                              
*       *                                                         
*       * 說明:                                            
*       * 此程序由 GENMENU 自動生成。    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                         菜單定義                        
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _0mb131csc OF _MSYSMENU PROMPT "數據管理" COLOR SCHEME 3
DEFINE PAD _0mb131ctp OF _MSYSMENU PROMPT "查詢" COLOR SCHEME 3
DEFINE PAD _0mb131ctr OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3
ON PAD _0mb131csc OF _MSYSMENU ACTIVATE POPUP 數據管理
ON PAD _0mb131ctp OF _MSYSMENU ACTIVATE POPUP 查詢
ON SELECTION PAD _0mb131ctr OF _MSYSMENU clear events

DEFINE POPUP 數據管理 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 數據管理 PROMPT "員工信息輸入"
ON SELECTION BAR 1 OF 數據管理 do form form\personnel

DEFINE POPUP 查詢 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 查詢 PROMPT "一覽"
DEFINE BAR 2 OF 查詢 PROMPT "個人查詢"
ON SELECTION BAR 1 OF 查詢 do form form\result
ON SELECTION BAR 2 OF 查詢 do form form\grcx