菜单.mpr

工资管理系统源文件工资管理系统源文件工资管理系统源文件工资管理系统源文件

*       *********************************************************
*       *                                                         
*       * 10/14/04              菜单.MPR                06:54:37  
*       *                                                         
*       *********************************************************
*       *                                                         
*       * Author's Name                                           
*       *                                                         
*       * Copyright (C) 2004 Company Name                         
*       * Address                                                 
*       * City,     Zip                                           
*       *                                                         
*       * Description:                                            
*       * This PROGRAM was automatically generated BY GENMENU.    
*       *                                                         
*       *********************************************************


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

SET SYSMENU TO
SET SYSMENU AUTOMATIC

DEFINE PAD _1cs0et7g9 OF _MSYSMENU PROMPT "工资参数" COLOR SCHEME 3
DEFINE PAD _1cs0et7gh OF _MSYSMENU PROMPT "员工工资" COLOR SCHEME 3
DEFINE PAD _1cs0et7gi OF _MSYSMENU PROMPT "系统" COLOR SCHEME 3
ON PAD _1cs0et7g9 OF _MSYSMENU ACTIVATE POPUP 工资参数
ON PAD _1cs0et7gh OF _MSYSMENU ACTIVATE POPUP 员工工资
ON PAD _1cs0et7gi OF _MSYSMENU ACTIVATE POPUP 系统

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 员工基本信息表单
ON SELECTION BAR 2 OF 工资参数 ;
	DO _1cs0et7gm ;
	IN LOCFILE("..\..\论文200410\电信工资管理VFP\源代码文件\菜单" ,"MPX;MPR|FXP;PRG" ,"WHERE is 菜单?")
ON SELECTION BAR 3 OF 工资参数 do form 工资相关系数设置表单

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  员工工资信息表单
ON SELECTION BAR 2 OF 员工工资 do form  工资查询表单
ON SELECTION BAR 3 OF 员工工资 do form 工资汇总

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 添加操作员
ON SELECTION BAR 2 OF 系统 do form 密码修改表单
ON SELECTION BAR 3 OF 系统 quit


*       *********************************************************
*       *                                                         
*       * _1CS0ET7GM  ON SELECTION BAR 2 OF POPUP 工资参数        
*       *                                                         
*       * Procedure Origin:                                       
*       *                                                         
*       * From Menu:  菜单.MPR,            Record:    6           
*       * Called By:  ON SELECTION BAR 2 OF POPUP 工资参数        
*       * Prompt:     员工考勤                                    
*       * Snippet:    1                                           
*       *                                                         
*       *********************************************************
*
PROCEDURE _1cs0et7gm
par1="200401"
do form 员工考勤管理表单