*       *********************************************************
*       *                                                         
*       * 04/06/05              MAIN.MPR                20:28:16  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名稱                                                
*       *                                                         
*       * 版權所有 (C) 2005 公司名稱                             
*       * 地址                                                    
*       * 城市,     郵編                                          
*       * 國家                                              
*       *                                                         
*       * 說明:                                            
*       * 此程序由 GENMENU 自動生成。    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1hn17vko2 OF _MSYSMENU PROMPT "工資設定" COLOR SCHEME 3
DEFINE PAD _1hn17vko3 OF _MSYSMENU PROMPT "工資查詢" COLOR SCHEME 3
DEFINE PAD _1hn17vko4 OF _MSYSMENU PROMPT "工資匯總" COLOR SCHEME 3
DEFINE PAD _1hn17vko5 OF _MSYSMENU PROMPT "退出系統" COLOR SCHEME 3
ON PAD _1hn17vko2 OF _MSYSMENU ACTIVATE POPUP 工資設定
ON PAD _1hn17vko3 OF _MSYSMENU ACTIVATE POPUP 工資查詢
ON PAD _1hn17vko4 OF _MSYSMENU ACTIVATE POPUP 工資匯總
ON SELECTION PAD _1hn17vko5 OF _MSYSMENU clear events

DEFINE POPUP 工資設定 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 工資設定 PROMPT "修改個人工資"
DEFINE BAR 2 OF 工資設定 PROMPT "打印個人工資"
DEFINE BAR 3 OF 工資設定 PROMPT "新職工工資的錄入"
DEFINE BAR 4 OF 工資設定 PROMPT "刪除個人工資"
ON SELECTION BAR 1 OF 工資設定 do form gzsd
ON SELECTION BAR 2 OF 工資設定 do form gzsd
ON SELECTION BAR 3 OF 工資設定 do form gzsd
ON SELECTION BAR 4 OF 工資設定 do form gzsd

DEFINE POPUP 工資查詢 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 工資查詢 PROMPT "順序查詢"
DEFINE BAR 2 OF 工資查詢 PROMPT "向上查詢"
DEFINE BAR 3 OF 工資查詢 PROMPT "按某一條件查詢"
DEFINE BAR 4 OF 工資查詢 PROMPT "打印查詢結果"
ON SELECTION BAR 1 OF 工資查詢 do form gzcx
ON SELECTION BAR 2 OF 工資查詢 do form gzcx
ON SELECTION BAR 3 OF 工資查詢 do form gzcx
ON SELECTION BAR 4 OF 工資查詢 do form gzcx

DEFINE POPUP 工資匯總 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 工資匯總 PROMPT "所有職工工資的匯總"
DEFINE BAR 2 OF 工資匯總 PROMPT "工資的預覽"
DEFINE BAR 3 OF 工資匯總 PROMPT "工資的打印"
ON SELECTION BAR 1 OF 工資匯總 do form gzhz
ON SELECTION BAR 2 OF 工資匯總 do form gzhz
ON SELECTION BAR 3 OF 工資匯總 do form gzhz