zkcd.mpr

本成绩管理系统由foxpro编写,可在VF下运行-the wage management system prepared by foxpro can run in VF

*       *********************************************************
*       *                                                         
*       * 03/17/05              ZKCD.MPR                19:53:21  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * 作者名称                                                
*       *                                                         
*       * 版权所有 (C) 2005 公司名称                             
*       * 地址                                                    
*       * 城市,     邮编                                          
*       * 国家                                              
*       *                                                         
*       * 说明:                                            
*       * 此程序由 GENMENU 自动生成。    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1h316mo0u OF _MSYSMENU PROMPT "档案建立(\<M)" COLOR SCHEME 3 ;
	KEY ALT+M, ""
DEFINE PAD _1h316mo0v OF _MSYSMENU PROMPT "档案查询(\<F)" COLOR SCHEME 3 ;
	KEY ALT+F, ""
DEFINE PAD _1h316mo0w OF _MSYSMENU PROMPT "报表打印(\<R)" COLOR SCHEME 3 ;
	KEY ALT+R, ""
DEFINE PAD _1h316mo0x OF _MSYSMENU PROMPT "系统退出(\<T)" COLOR SCHEME 3 ;
	KEY ALT+T, ""
ON PAD _1h316mo0u OF _MSYSMENU ACTIVATE POPUP 档案建立m
ON PAD _1h316mo0v OF _MSYSMENU ACTIVATE POPUP 档案查询f
ON PAD _1h316mo0w OF _MSYSMENU ACTIVATE POPUP 报表打印r
ON SELECTION PAD _1h316mo0x OF _MSYSMENU QUIT

DEFINE POPUP 档案建立m MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 档案建立m PROMPT "基本档案建立"
DEFINE BAR 2 OF 档案建立m PROMPT "成绩档案建立"
ON SELECTION BAR 1 OF 档案建立m DO FORM FRMS\frm_jbdajl
ON SELECTION BAR 2 OF 档案建立m DO FORM FRMS\frm_cjdaml

DEFINE POPUP 档案查询f MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 档案查询f PROMPT "学生简历查询"
DEFINE BAR 2 OF 档案查询f PROMPT "学生成绩查询"
ON SELECTION BAR 1 OF 档案查询f DO FORM FRMS\frm_dacxml
ON SELECTION BAR 2 OF 档案查询f DO FORM FRMS\frm_cjdacx

DEFINE POPUP 报表打印r MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF 报表打印r PROMPT "简历打印"
DEFINE BAR 2 OF 报表打印r PROMPT "成绩打印"
ON SELECTION BAR 1 OF 报表打印r DO FORM FRMS\frm_jbdady
ON SELECTION BAR 2 OF 报表打印r DO FORM FRMS\frm_cjdady