《员工工资管理系统资料(共20页).doc》由会员分享，可在线阅读，更多相关《员工工资管理系统资料(共20页).doc（20页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、精选优质文档-倾情为你奉上学号2014-2015学年 第一学期12080数据库原理课程设计报告题目：员工工资管理系统专业：计算机科学与技术班级：1姓名：指导教师：成绩：计算机与信息工程系2014年11月20日目录5.8 设计专心-专注-专业1设计内容及要求1.1课题简介借助现代信息技术和管理理论，建立企业管理信息系统是当今社会的重要趋势。党和政府根据知识经济时代的特点，对国民经济建设提出了“用信息化带动工业化”的指导思想。对企业而言，全面开发和应用计算机管理信息系统就是近期不能回避的问题。在企业管理中，人力资源是企业最宝贵的资源，也是企业的“生命线”，因此人事管理是企业的计算机管理信息系统重要
2、组成部分。而工资管理又是人力资源管理的重中之重。实行电子化的工资管理，可以让人力资源管理人员从繁重琐碎的案头工作解脱出来，去完成更重要的工作。工资管理信息系统的实现可以减轻比较繁琐的手工工资管理。随着我国市场经济的快速发展，员工工资管理系统在企业的日常管理中发挥着越来越重要的作用。员工工资管理系统可以进行档案管理、奖罚管理和工资管理等，方便处理企业内部员工的相关工资信息。1.2设计目的知识，将其应用在实际的项目开发中。特开发本系统。在开发过程中，从整体上把握项目开发的流程。以及如何针对用户需求设计出合理的数据库。1.3设计内容 工资管理涉及到职工的基本信息的录入、修改和删除，工资标准的设定、查
3、询和结算等.(1)员工基本信息的录入、修改、和删除功能。(2)工资标准设定功能，具体包括基本工资、岗位工资、公积金比例的设定。(3)工资信息浏览。(4)个人工资查询。(5)员工工资结算。(6)工资单打印。为完善系统的管理功能，增加工资系统用户管理功能，包括系统用户数据添加、修改和删除。员工作为系统不同用户，只能运行系统个人工资查询功能：系统管理员则运行系统所有功能，从而有效保证系统数据的安全性。2 需求分析2.1需求分析的任务随着我国市场经济的快速发展，员工工资管理系统在企业的日常管理中发挥着越来越重要的作用。员工工资管理系统可以进行档案管理、奖罚管理和工资管理等，方便处理企业内部员工的相关工
4、资信息。本系统的开发宗旨以及总体任务就是帮助企业的财务主管部门提高工作效率。2.2 需求分析的过程 由于此处主要任务是练习所学知识点，针对于本系统的基本功能已经给出。所以，仅需根据用户提出的功能要求分离出各个主体，从而设计出合理的数据结构。主要包括：（1）员工工资管理应涉及到职工的基本信息的录入、修改和删除。（2）员工工资管理应按照公司工资标准的设定、查询和结算等。（3) 员工工资管理系统还应该满足工资的考勤和奖励制度对员工进行考勤。2.3 数据字典 经过可行性分析，抽象出该子系统业务流程图，如下图所示。员工工资管理系统员工基本信息 工资信息查询 职务部门信息 员工变更信息员工资料输入 员工查
5、询员工的增减员工基础工资员工加班工资员工工龄工资员工变动记录图员工职务部门 图1 总体系统流程图调查用户需求内容:1、员工信息维护模块 根据工资管理的实际情况，本系统将员工信息维护分为部门管理、员工管理、发放工资三部分。2、员工工资设置模块 员工工资设置分为基本工资设置、岗位工资设置、公积金比例三部分。该模块可以对这三个工资类型设置工资等级，并对每个等级设置工资标准。工资查询3、工资查询分为按员工查询和按部门查询。 在实现各个功能模块时，采用先模块后系统集成的方式，即各个系统功能模块分别独立设计和调试，在创建系统主窗体时才将各个功能模块通过主窗体的菜单系统集成到一起，最后进行系统整体设计和调试
6、。分析用户需求: 在调查完了用户需求之后，就要开始分析用户需求。在此，我们采用自顶向下的结构化分析方法（SA 方法）。首先，定义全局概念结构的框架，如图2所示。 图2系统的数据流图3 概念结构设计3.1 概念结构设计的方法 设计概念结构通常有四类方法：自顶向下，自底向上，逐渐扩张以及混合策略。本教学系统采用的是自底向上的方法。即首先定义全局的概念结构的框架，然后逐步细化。根据自顶向上地进行需求分析然后再自底上上地进行概念设计。3.2 概念结构设计的步骤概念结构的设计可分为两步：第一步是抽象数据并设计局部视图。第二步是集成局部视图，得到全局的概念结构。3.3 数据抽象与局部视图设计员工姓名进公司
7、时间员工年龄员工性别员工编号家庭住址 员工信息电话 员工信息E-R图员工编号基本工资应发工资加班工资 工资信息实发工资工龄工资 工资信息E-R图 职务 部门 职务部门 职务部门E-R图3.4 系统E-R图实体和实体之间的关系E-R图4 逻辑结构设计4.1 E-R 图向关系模型的转换按照试题-联系图转化为关系模式的规则，本系统的E-R图科转化为如下的关系模式： 员工（员工编号、员工姓名、性别、年龄、生日、住址、电话） 职务（员工编号、职务、部门） 工资结构（员工编号、基本工资、加班工资、旷工工资，实发工资） 员工变动（员工编号、原部门、原职务、现部门、现职务）4.2规范化处理对上述初始关系模式进
8、行规范化，经分析关系中不存在部分函数依赖和传递函数依赖，已达到3NF。（“_”代表主码）员工（员工编号、员工姓名、性别、年龄、生日、住址、电话）职务（员工编号、职务、部门） 工资结构（员工编号、基本工资、加班工资、出差工资、旷工工资、迟到早退、应发工资、实发工资） 员工变动（员工编号、原部门、原职务、现部门、现职务）4.3逻辑模型表1：员工信息表表2 ：员工职务表表3：工资结构表表4：员工变动记录表5 物理设计阶段5.1、数据库模块功能1、系统用户管理模块系统用户管理模块包括用户添加、删除和修改三个功能，员工基本信息包括员工号、员工姓名、员工性别、所在部门、所在岗位、工龄和工资等级等信息。用户
9、添加和删除实现了对数据库中员工信息的增加和删除。2、员工信息维护模块根据工资管理的实际情况，本系统将员工信息维护分为部门管理、员工管理、发放工资三部分。3、员工工资设置模块 员工工资设置分为基本工资设置、岗位工资设置、公积金比例三部分。该模块可以对这三个工资类型设置工资等级，并对每个等级设置工资标准。4、 工资查询工资查询分为按员工查询和按部门查询。5.2数据库实施阶段 1.数据库实施阶段目标用DBMS所提供的数据定义语言和其他实用程序将数据库逻辑设计和物理设计结果描述出来，成为DBMS可以接受的源代码，在经过调试生成目标模式。2.数据库实施阶段任务2.1建立数据库Create databas
10、e 员工工资管理系统;2.2建立数据表(1)用户登陆基本信息的建立 Private Sub cmdOK_Click() Dim intchecked As IntegerDim strname As String, strpassword As StringintLogTimes Static intlogtimes As Integer intlogtimes = intlogtimes + 1 /保存登陆次数 If intlogtimes maxlogtimes Then MsgBox & vbcr_ & vbCritical End /结束应用程序 Else Select Case ch
11、eck_password(strname, strpassword) strname = Trim(txtlog(0).Text) /获得用户名 strpassword = Trim(txtlog(1).Text) /获得口令 txtlog(0).SetFocus txtlog(0).SelStart = 0txtlog(0).SelLength = Len(txtlog(0) End Select End If End Sub(2) 员工信息表的建立 Private Sub txtUser_KeyPress(KeyAscii As Integer) If Not(Chr(KeyAscii)L
12、ike0-9Or KeyAscii=vbKeyBack)ThenKeyAscii=0 /输入不是数字，英文字母或退格键，取消输入End If picNavigation.Enabled = FalsecmdAdd.Enabled=FalsecmdDelete.Enabled=FalseEnd Sub(3) 工资信息表的建立 Private Sub Form_ Load() Dim i % With Wage_Manage_Data.rsElseWage If .State=adStateClosed Then .Open If Nat (.BQF And .EOF) Then /判断有无其他工
13、资标准记录 txtSE（0）=Fields(专家津贴): txtSE(1)=Fields(独补) txtSE(2)=.Fields(房贴): txtSE(3)=Fields(一次性补发） txtSE(4)=.Fields(其他补贴): txtDE(0)= .Fields(扣公积金) txtDE(1) =.Fields(扣失业险) txtDE(2) = .Fields(扣医疗险) txtDE(3)=.Fields(扣垃圾费) txtDE(4)=.Fields(扣房租) txtDE(5)=.Fields(扣其他) Else For i=0 To 4 txtSE(i)=txtDE(i)=0 Next
14、 i txtDE(5)=0 End If End With End Sub4)员工变动信息表的建立Private Sub cmdAdd_Click() With Wage_ Manage_ Data.rsSteffLData .AddNew/添加新记录 txtNews=记录:&.AbsolutePosition&/&.ReordCount End With txtNum=Format(Date, yyyymmdd)&001 /设置默认编号 cmbDuty =无 /设置默认职务 cmbTide=初级 /设置默认职称 txtTime =Format(Date, Long Date) /设置默认工作
15、时间 isAdding=True cmdAdd.Enahled = False /在保存新记录之前禁用控件 cmdDelete.Enabled=False picNavigation.Enabled =FalseEnd Sub6 管理模块部分页面设计管理员登陆效果图 员工信息列表效果图部门信息列表效果图工资信息列表效果图津贴信息列表效果图奖金信息列表效果图7 管 理 模 块 核 心 代 码 Private Sub cmdOK_Click() Dim intchecked As IntegerDim strname As String, strpassword As StringintLogTi
16、mes Static intlogtimes As Integer intlogtimes = intlogtimes + 1 /保存登陆次数 If intlogtimes maxlogtimes Then MsgBox & vbcr_ & vbCritical End Else Select Case check_password(strname, strpassword) strname = Trim(txtlog(0).Text) /获得用户名 strpassword = Trim(txtlog(1).Text) /获得口令 txtlog(0).SetFocus txtlog(0).Se
17、lStart = 0txtlog(0).SelLength = Len(txtlog(0) If Not(Chr(KeyAscii)Like0-9Or KeyAscii=vbKeyBack)ThenKeyAscii=0 /输入不是数字，英文字母或退格键，取消输入End If picNavigation.Enabled = FalsecmdAdd.Enabled=FalsecmdDelete.Enabled=False Private Sub Form_ Load() Dim i % With Wage_Manage_Data.rsElseWage If .State=adStateClosed
18、 Then .Open If Nat (.BQF And .EOF) Then /判断有无其他工资标准记录 txtSE（0）=Fields(专家津贴): txtSE(1)=Fields(独补) txtSE(2)=.Fields(房贴): txtSE(3)=Fields(一次性补发） txtSE(4)=.Fields(其他补贴): txtDE(0)= .Fields(扣公积金) txtDE(1) =.Fields(扣失业险) txtDE(2) = .Fields(扣医疗险) txtDE(3)=.Fields(扣垃圾费) txtDE(4)=.Fields(扣房租) txtDE(5)=.Fields
19、(扣其他) Else For i=0 To 4 txtSE(i)=txtDE(i)=0 Next i txtDE(5)=0ith Wage_ Manage_ Data.rsSteffLData .AddNew/添加新记录 txtNews=记录:&.AbsolutePosition&/&.ReordCount End With txtNum=Format(Date, yyyymmdd)&001 /设置默认编号 cmbDuty =无 /设置默认职务 cmbTide=初级 /设置默认职称 txtTime =Format(Date, Long Date) /设置默认工作时间 isAdding=True
20、 cmdAdd.Enahled = False /在保存新记录之前禁用控件 cmdDelete.Enabled=False picNavigation.Enabled =False Private Sub cmdSave_ Click() Dim objCogy As New Recordset if Trim(txtUser)= Then MsgBox 员工姓名不能为空I!, vbCritical, 员工信息管理 txtUser.SetFocus txtUser.Se1Start=0 txtUser.SelLength=Len(txtUser) E1self Len(Trim(txtNum)
21、11 Then MsgBox员工编号必须为11的数字! , vbCritical, 员工信息管理 txlNum.SetFncus txtNum.SelStart=0 txtNum.SelLength=Len(txtNum)E1seIf Trim(txtDept)= Then MsgBox员工姓名不能为空!，vbCritical, 员工信息管理 txtDept.SetFocus txtDept=Elself IsDate(txtTime) Then MsgBox不是有效日期! , vbCritical,员工信息管理 txtTime.SetFocus txtTime.SelStart=0 txtT
22、ime.SelLength=Len(txtTime)E1seIf Trim(cmbDuty)=Then MsgBox职务不能为空, vbCriticaI,员工信息管理 cmbDuty= cmbDuty.SetFocusElself Trim(cmbTitle)=Then MsgBox职称不能为空，vbCritical,员工信息管理 cmbTitle= cmbTitle.SetFocusElse Set objCopy=Wage _Manage_Data.rsStuffData.Clone With objCopy If .RecordCount0 Then .MoveFirst .Find编号
23、=&Trim(txtNum)& 检查编号是否被使用 If Not .EOF And .AbsolutePosition_ Wage_Manage_DaEa.rsStuffData.AbsolutePosition Then MsgBox编号:&Trim(txtNum)_ &已被使用，请使用其他编号!,_ vbCritical,员工信息管理 txtNum.SetFocus txtNum.SelStart=0 txtNum.SelLength=Len(txtNum) Else Wage_Manage_Data.rsStuffData.Update MsgSox 数据保存成功! , vbInform
24、ation,员工信息管理” cmdAdd.Enabled=True cmdDelete.Enabled=True isAdding二False picNavigation.Enabled=True End if End With End Sub8 设 计 总 结 及 说 明 这次课程设计，经过为期一周的设计，在老师的指导以及同学们的帮助下，我们终于顺利地完成了设计任务，无论是知识上感受还是其他方面，我觉得我都学到了许多，受益匪浅。 拿到题目后的第一步，我们就确定了这次我们的系统前台界面和后台数据库用delphi实现，但是接下来我们就开始各自着手学习设计程序去了，没有想过要进行需求分析、数据流的
25、分析等，所幸得到老师及时的指点，我们才知道系统的目标、业务流程、功能描述、数据流程分析、数据词典、数据流图、E-R图等这一系列的工作是非常重要的前期工作，前期工作没做好，后面也就无法进行。因此，我们也做足充分的准备，我们搜索了大量的资料，尽可能模拟现实社会中的工资管理系统，建立模型。在这个系统实现过程中，我主要负责数据库的创建和程序的设计模块，这其中我发现开发设计需要特别严谨认真的态度和作风，一点都马虎不得。每一个细微的细节都必须十分的注意，如果不认真思考决策，就会出现或大或小的错误，如果早期的错误隐藏下来，对后面的工作影响就会很大，甚至有时要推倒很多前面做的工作重来。有时候，我自己觉得我写的
26、程序非常的正确，但是就是编译通不过，在查找错误的过程中，面临着否认自己的过程，非常的痛苦，而且由于自己的经验及各方面的能力的不足，所以进展的速度非常的缓慢，往往几天的时间还没有一点进展。由于我的知识浅薄，经验不足及阅历颇浅，因此，在该系统的设计方面还有很多不足，比如功能过少，界面不够醒目等问题，我会在工作的使用过程中，根据工作的具体要求不断的修改，完善，争取使该系统慢慢趋向完美。在本系统的设计过程和论文报告编写过程中，老师、同学都给予了我许多无私的帮助，给我提出了很多宝贵的修改意见，在这里，我向这些无私帮助我的人表示衷心的感谢。参 考 文 献1赛奎春等.Delphi数据库开发实例解析M.北京：
27、机械工业出版社，2004.2刘斌等.Delphi7数据库高级教程M.北京：清华大学出版社，2004.3钱雪忠.数据库原理及应用M.北京：北京邮电大学出版社，2007.4钱雪忠等.数据库原理及应用实验指导M.北京：北京邮电大学出版社，2005.5王珊，萨师煊编，数据库系统概论(第4版)，高等教育出版社，2006.6，数据库系统教程(第3版)，,2008.7 刘友华,王贤平,吴伟编著,NET环境下数据库应用系统开发技术M.科学出版社.2008. 8 张志学等编著.NET框架程序开发指南M. 北京：清华大学出版社.2010. 9 金旭亮著.NET软件技术学习与实践M. 北京：电子工业出版社.2009. 10 Charles Petzold 著. Windows 程序设计M.北京大学出版社.2008.