资源描述：
《人事工资管理信息系统_员工工资信息查询模块的实现》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、第23卷第3期甘肃科技Vol.23No.32007年3月GansuScienceandTechnologyMar.2007人事工资管理信息系统———员工工资信息查询模块的实现甘容,李明东(西华师范大学计算机学院,四川南充637002)摘要:在现代企业管理中,企业信息化是提高企业管理效率的重要手段。人事工资管理是企业管理的重要部分,是企业信息化的一个重要切入点。本文简明扼要地概述了系统的系统设计,重点论述了员工工资信息查询模块的实现。本系统采用数据库SQLServer2000技术和Delphi编程实现了上述目标。关键词:人事工资;SQ
2、LServer2000;信息系统中图分类号:TP3111引言随着计算机技术的飞速发展,计算机在企业管理中应用的普及,利用计算机实现企业人事工资的管理势在必行。整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发,完成人事、工资管理的全过程,包括员工基本信息、考勤信息、奖惩信息、员工履历、职称信息和员工工资信息查询等管理工作。本文介绍了员工工资信息查询模块的实现。2系统的实现2.1系统功能模块整个系统的功能模块如图1所示:图23数据库逻辑结构及物理结构设计根据系统功能设计的要求以及功能模块的划分,对于员工基本信息、考勤信息、奖
3、惩信息、职称评定信息、工资信息、工作履历和用户账号可以列出以下数据项和数据结构:员工基本信息(员工编号,档案编号,员工姓名,部门名称,性别,出生日期,籍贯,学历,专业,毕业学校,政治面貌,参加工作日期,入本单位日期,联系电话,住址,个人照片,备注)考勤信息(员工编号,员工姓名,月份编号,本月天数,公休假天数,应出勤天数,出勤天数,出差天图1数,缺勤天数,请假次数,迟到次数,早退次数,节假2.2系统流程日加班时间,其他加班时间)整个系统的流程如图2所示:奖惩信息(记录编号,员工编号,员工姓名,奖惩66甘肃科技第23卷日期,奖惩内容,奖
4、惩原因,批准单位)Dbgrid1(DBGrid控件)DataSourceWagefind_ds1职称评定信息(员工编号,员工姓名,评定日期,Label1(标签控件)Caption月份编号评定单位,评定职称,备注)Label2(标签控件)Caption员工编号FindBtn(按钮控件)Caption查询工资信息(记录编号,员工编号,员工姓名,基本PriviewBtn(按钮控件)Caption预览工资,公共补贴,出差补贴,奖金,加班费,扣考核,养DelBtn(按钮控件)Caption删除老保险,医疗保险,工伤保险,失业保险,住房公积Ho
5、ldBtn(按钮控件)Caption编辑金,所得税,实发工资,发放月份)工作履历(记录编号,员工编号,员工姓名,起始(4)添加程序代码日期,结束日期,单位名称,本单位工作时间,担任职工资查询界面的功能实现调用了Twageinfo类务,级别,备注)和Tbasedata类,在uses子句中添加类的单元文件用户账号(用户名,用户密码,权限级别)的代码如下:Uses4员工工资信息查询模块的实现Windows,Messages,SysUtils,Variants,Clas-4.1实现目标ses,Graphics,Controls,Form,D
6、ialogs,DB,员工工资信息查询界面主要实现以下功能:ADODB,Grids,DBGrids,StdCtrls,ExtCtrls,DB-(1)为用户提供信息查询服务Client,wageinfo_unit,Buttons,basedata_unit;(2)编辑工资信息同时要声明Twageinfor类和Tbasedata类的(3)删除指定的信息实例名:(4)预览全部员工的工资信息。Private4.2具体实现过程Wageinfo:Twageinfo;(1)在人事工资管理信息系统项目中,新建窗体Basedata:Tbasedata;
7、wagefindfrm作为员工工资信息查询界面,其界面工资查询界面声明全局公开变量的代码如下:布局如图3所示。VarWagefindfrm:Twagefindfrm;Idnum,workerid,givedate:string;选择好员工编号并输入月份编号后,单击FindBtn按钮即可查询对应员工的工资信息。FindBtn(查询按钮)的OnClick事件代码如下:ProcedureTwagefindfrm.FindBtnClick(Send-er:TObject);Begin//赋值查询语句图3Sql:='selectrecord_
8、id记录号,worker_id员工(2)在员工工资信息查询表单中添加2个编号,worker_name员工姓名,geiv_date月分编号,'Labe1控件,5个Button1控件。ClientDataSet控+'base_wage基本
