*       *********************************************************
*       *                                                         
*       * 05/25/04              菜單.MPR                05:44:13  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名稱(chēng)                                                
*       *                                                         
*       * 版權(quán)所有 (C) 2004 公司名稱(chēng)                             
*       * 地址                                                    
*       * 城市,     郵編                                          
*       * 國(guó)家                                              
*       *                                                         
*       * 說(shuō)明:                                            
*       * 此程序由 GENMENU 自動(dòng)生成。    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _18u0cao67 OF _MSYSMENU PROMPT "查詢(xún)" COLOR SCHEME 3
DEFINE PAD _18u0cao68 OF _MSYSMENU PROMPT "更新" COLOR SCHEME 3
DEFINE PAD _18u0cao69 OF _MSYSMENU PROMPT "刷新" COLOR SCHEME 3
DEFINE PAD _18u0cao6a OF _MSYSMENU PROMPT "退出" COLOR SCHEME 3
ON PAD _18u0cao67 OF _MSYSMENU ACTIVATE POPUP 新菜單項(xiàng)
ON PAD _18u0cao68 OF _MSYSMENU ACTIVATE POPUP 更新
ON SELECTION PAD _18u0cao69 OF _MSYSMENU do createtotal
ON SELECTION PAD _18u0cao6a OF _MSYSMENU ;
	DO _18u0cao6b ;
	IN LOCFILE("\信息系統(tǒng)分析與設(shè)計(jì)\菜單" ,"MPX;MPR|FXP;PRG" ,"WHERE is 菜單?")

DEFINE POPUP 新菜單項(xiàng) MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 新菜單項(xiàng) PROMPT "運(yùn)動(dòng)員"
DEFINE BAR 2 OF 新菜單項(xiàng) PROMPT "金牌榜"
DEFINE BAR 3 OF 新菜單項(xiàng) PROMPT "總分"
ON SELECTION BAR 1 OF 新菜單項(xiàng) do form 運(yùn)動(dòng)員個(gè)人統(tǒng)計(jì)
ON SELECTION BAR 2 OF 新菜單項(xiàng) do form 金牌榜
ON SELECTION BAR 3 OF 新菜單項(xiàng) do form 各隊(duì)總分瀏覽

DEFINE POPUP 更新 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 更新 PROMPT "運(yùn)動(dòng)員隊(duì)名"
DEFINE BAR 2 OF 更新 PROMPT "破紀(jì)錄"
DEFINE BAR 3 OF 更新 PROMPT "決賽成績(jī)"
ON SELECTION BAR 1 OF 更新 do form 運(yùn)動(dòng)員隊(duì)名查詢(xún)
ON SELECTION BAR 2 OF 更新 do form 破紀(jì)錄查看
ON SELECTION BAR 3 OF 更新 do form 決賽成績(jī)查詢(xún)


*       *********************************************************
*       *                                                         
*       * _18U0CAO6B  ON SELECTION PAD                            
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  菜單.MPR,            Record:   14           
*       * Called By:  ON SELECTION PAD                            
*       * Prompt:     退出                                        
*       * Snippet:    1                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _18u0cao6b
clear even
set system menu to default