*       *********************************************************
*       *                                                         
*       * 02/10/03              MAIN.MPR                22:15:24  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (C) 2003 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


*       *********************************************************
*       *                                                         
*       *                      Menu Definition                    
*       *                                                         
*       *********************************************************
*

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _0vq1bpcp6 OF _MSYSMENU PROMPT "數(shù)據(jù)錄入(\<W)" COLOR SCHEME 3 ;
	KEY ALT+W, ""
DEFINE PAD _0vq1bpcpf OF _MSYSMENU PROMPT "修改(\<E)" COLOR SCHEME 3 ;
	KEY ALT+E, ""
DEFINE PAD _0vq1bpcpg OF _MSYSMENU PROMPT "查詢(\<F)" COLOR SCHEME 3 ;
	KEY ALT+F, ""
DEFINE PAD _0vq1bpcph OF _MSYSMENU PROMPT "退出(\<X)" COLOR SCHEME 3 ;
	KEY ALT+X, ""
ON PAD _0vq1bpcp6 OF _MSYSMENU ACTIVATE POPUP 數(shù)據(jù)錄入w
ON SELECTION PAD _0vq1bpcpf OF _MSYSMENU do form xiugai
ON PAD _0vq1bpcpg OF _MSYSMENU ACTIVATE POPUP 查詢f
ON SELECTION PAD _0vq1bpcph OF _MSYSMENU quit

DEFINE POPUP 數(shù)據(jù)錄入w MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 數(shù)據(jù)錄入w PROMPT "工會(huì)會(huì)員登記"
DEFINE BAR 2 OF 數(shù)據(jù)錄入w PROMPT "工會(huì)會(huì)員代表登記"
DEFINE BAR 3 OF 數(shù)據(jù)錄入w PROMPT "職工療養(yǎng)登記"
DEFINE BAR 4 OF 數(shù)據(jù)錄入w PROMPT "困難補(bǔ)助登記"
DEFINE BAR 5 OF 數(shù)據(jù)錄入w PROMPT "職工互助保險(xiǎn)登記"
DEFINE BAR 6 OF 數(shù)據(jù)錄入w PROMPT "班組建設(shè)登記"
DEFINE BAR 7 OF 數(shù)據(jù)錄入w PROMPT "廠務(wù)公開登記"
DEFINE BAR 8 OF 數(shù)據(jù)錄入w PROMPT "宣傳報(bào)道登記"
DEFINE BAR 9 OF 數(shù)據(jù)錄入w PROMPT "文體活動(dòng)登記"
ON SELECTION BAR 1 OF 數(shù)據(jù)錄入w do form ghhy
ON SELECTION BAR 2 OF 數(shù)據(jù)錄入w do form hydb
ON SELECTION BAR 3 OF 數(shù)據(jù)錄入w do form zgly
ON SELECTION BAR 4 OF 數(shù)據(jù)錄入w do form knbz
ON SELECTION BAR 5 OF 數(shù)據(jù)錄入w do form zghz
ON SELECTION BAR 6 OF 數(shù)據(jù)錄入w do form bzjs
ON SELECTION BAR 7 OF 數(shù)據(jù)錄入w do form cwgk
ON SELECTION BAR 8 OF 數(shù)據(jù)錄入w do form xcbd
ON SELECTION BAR 9 OF 數(shù)據(jù)錄入w do form wthd

DEFINE POPUP 查詢f MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 查詢f PROMPT "職工、會(huì)員代表查詢"
DEFINE BAR 2 OF 查詢f PROMPT "職工療養(yǎng)情況查詢"
DEFINE BAR 3 OF 查詢f PROMPT "職工困難補(bǔ)助查詢"
DEFINE BAR 4 OF 查詢f PROMPT "職工互助保險(xiǎn)查詢"
DEFINE BAR 5 OF 查詢f PROMPT "班組建設(shè)工作查詢"
DEFINE BAR 6 OF 查詢f PROMPT "廠務(wù)公開情況查詢"
DEFINE BAR 7 OF 查詢f PROMPT "宣傳報(bào)道情況查詢"
DEFINE BAR 8 OF 查詢f PROMPT "文體活動(dòng)情況查詢"
ON SELECTION BAR 1 OF 查詢f do form hydbcx
ON SELECTION BAR 2 OF 查詢f do form zglycx
ON SELECTION BAR 3 OF 查詢f do form knbzcx
ON SELECTION BAR 4 OF 查詢f do form zghzcx
ON SELECTION BAR 5 OF 查詢f do form bzjscx
ON SELECTION BAR 6 OF 查詢f do form cwgkcx
ON SELECTION BAR 7 OF 查詢f do form xcbdcx
ON SELECTION BAR 8 OF 查詢f do form wthdcx