公司员工工资管理系统课程设计

1、公司员工工资管理系统课程设计一）可行性分析1.1 项目背景及意义：随着我国国民经济建设的蓬勃发展和具有中国 特色的社会主义市场经济体制的迅速完善， 各个行业都在积极使用现 代化的手段，不断改善服务质量，提高工作效率，这些都在很大程度 上给企业提出越来越严峻的挑战， 对企业体系无论是在行政职能、 企 业管理水平以及优质服务上都提出更高的要求。 建设一个科学高效的 信息管理系统是解决这一问题的必由之路。 企业内部财务管理是该企 业运用现代化技术创造更多更高的经济效益的主要因素之一。 工资管 理作为企业内部的一种财务管理也是如此，由于企业职工人数较多， 每一位职工的具体实际情况也不尽相同， 各项工资

2、条款的发放， 如果 没有一个完整的工资管理系统对员工工资等进行系统的管理， 很难实 现企业高效运转。意义：（1）本系统提供了基本的人员信息管理，同时对员工的基本工资、 浮动工资和工资发放进行系统管理，同时配以查询、修改、删除、添 加功能，以便能真正适用于各类中小企业及事业单位。经过自己认真的思考和同学的讨论使我对该类管理系统有了进一步 的认识，同时也可以应用平时学习中所学到的东西。1.2 可行性研究报告及信息系统目标：员工工资管理系统的主要目的 是利用计算机对员工的各种工资信息进行日常的管理， 如查询、修改、 添加、删除以及存储等， 迅速准确地完成各种工资信息的统计计算和 汇总工作，针对系统服

3、务对象的具体要求， 设计了企业工资管理系统。企业工资管理系统主要有以下几大功能：对单位人员的变动进行处理。一个单位的职工不会是一成不变的， 总是在不断的变化：有调出、有调入、也有职工在本单位内部调动。因此，设计系统是应考虑到这些情况。对职工的工资进行计算、修改。可以对职工的工资档案进行个别、 部分和批量修改，同时，能对各职工的工资进行计算，即计算基本工 资、岗位工资、水电费及实发金额等。查询统计功能。要求即可以单项查询，比如查看某个职工的工资情 况等；也可以多项查询， 比如某个部门所有的员工的工资信息。二）系统分析部分2.1 系统功能模块图公司工资管理系统员工奖惩管理工资资料处理工资发放管理员

4、工资料管理员工基本资料管理表 yuangong 的创建；员工奖励管理表的创建；员工惩罚管理表的创建；工资发放查询表的创建 各表资料如截图所示：2.4 数据库概念结构设计数据库概念设计是整个数据库设计的关键。 根据用户需求设计数 据库的概念， 数据模型。 我们首先要将现实世界中的客观对象首先抽象为不依赖任何具体机器的信息结构，这种信息结构不是DBMS支持 的数据模型，而是概念级模型。 然后再把概念模型转换为具体机器上DBMS支持的数据模型。概念模型是对现实世界的抽象和概括。 它真实，充分地反映了现实世界中的事物和事物之间的联系，能满足用户对数据的处理要求。由于其简洁、明晰、独立于机器，很容易理解

5、，因此可以用概念模型 和不熟悉计算机的用户交换意见， 使用户能积极参与数据库的设计工 作。概念模型易于变动， 还很容易向各种数据模型转换。概念模型的基本概念涉及的主要有 7 个，分别为实体、属性、码、 域、实体型、实体集、联系。ER图是概念模型最常用的表示方法， 在 E R图中： 1）用长方形表示实体型，在框内写上实体名。2）用菱形表示实体间的联系，菱形框内写上联系名，用无向边把菱 形分别与有关实体相连， 在无向边旁标上联系的类型。 若实体间的联 系也具有属性，则把属性和菱形也用无向边连上。员工实体关系图图 1）部门实体关系图（图 2）根据上述概念模型设计得出的ER图，我们可以得出系统中涉及的

6、部门员工实体关系图（图 4）2.5 数据库逻辑结构设计主要实体有 3 个，其结构如下：1 、员工（职工号， 姓名、性别、年龄、单位和职业）2 、部门（部门编号，部门名称）3 、工资（职工号，日期，基本工资，奖励工资，福利补贴，住房公积金，失业保险）2.5.1实体间的联系工资管理系统中实体之间有 6 个联系，其关系如下：2 、工薪关系：员工和工资单的关系是1：N，每个员工每个月都有3 、属于关系：员工和部门的关系是N：1，一个部门可以有多个员4 、聘用关系：员工和职务的关系是N：1，一个职务可以聘用多个5 、设置关系：部门和职务的关系是M：N，一个部门可以设置多个根据以上逻辑结构分析我们可以知道

7、: 一个部门有多个员工，每1 、具有 1 关系：员工和奖金的关系是 1： N，N个职位相同的员工具有相同的奖金基数。一张工资单。工。员工。职务，相同的职务也可以设置在多个部门。个员工都有工资， 工资又由基本工资等组成，其关系模式为：员工编号（主码）姓名性别年龄部门号（主码） 职业部门号（主码）部门名称日期员工号基本福利奖励工资失业保险住房公积金（主码）工资补贴表、视图汇总视图/ 表名类型说明员工基本表集中保存员工的基本信息科室基本表集中存放单位各部门的信息工资基本表存放员工工资的基本信息2.5.2完整性约束：基本表 员工字段类型长度格式约束员工编号文本250主码姓名文本250性别文本250年龄

8、文本250所属部门号文本250外码职业文本250基本表 科室字段类型长度格式约束部门编号文本250主码部门名称文本250基本表 工资字段类型长度格式约束日期文本250主码员工编号文本250外码基本工资数字（整型）福利补贴数字（整型）奖金工资数字（整型）失业保险数字（整型）住房公积金数字（整型）2.6 数据字典绘制数据流图以后，只是对数据处理和彼此之间的联系进行了说 明，为了进一步明确数据的详细内容和数据加工过程， 应将数据流图 中的各元素作出详细的定义和说明，以便于此后系统设计的进行。数据字典描述的主要内容有：数据项、数据流、数据存储、数据 处理、外部实体。 数据流程图配以数据词典，就可以从图

9、形和文字两 个方面对系统的逻辑模型进行描述， 从而形成一个完整的说明。在系统分析中会产生大量的数据词典，以下将以图表形式分别列 出系统中代表性的数据流、 数据元素、 数据存储和外部实体以及所有 的加工处理。条目名称编号说明来源去向组成存取方式数据项职工号F1每位员工一个编号D1D5部门编号、顺序号键入员工都有数据数据存储数据处理数据F1详细的资劳务奖金员工资料管理基本D4P1P2存储每个员工的奖对员工资料进行管生成员工事部”外部实体P3F1 员工和变动信息F2P1P4D1D6D2职 工号， 姓名，性别，职位，学历，联系电话，身份证号码，入职时间，离职时职工号月份 奖金（ 近似长度分别为： 6

10、、4、12（字节）主关键字：工号辅关键字：键入自动存储组职 工号， 姓名，性别，职工号，在职织：维表键入自动处理工资管理基本工资表时间，基本工资数据处理员工考勤管理P3生成考勤汇总表F3D3职 工号， 迟 到，旷工，请 假键入数据处理奖金管理P4生成员工劳务奖金表F4、D3 D4职工号，奖励 项目，金额， 月份键入数据处理工资汇总P5计算员工 工资。是最 重要的部 分D1 、D2 、D3、D4F5F6实发工资，汇总表，工资单自动外部实体员工工资汇总 后，生成工 资单给员 工F5职 工号， 月 份，工资单号键入外部实体人事部录入改变 员工的基 本信息及 员工的考 核情况D1、D3P5P4P1部门

11、编号，员工号，考核键入外部财务计算发放P5F5员工号，各工 自动实体例如2.7 问题及解决方法 问题及其解决方案： 1、在概念结构设计中遇到了结构冲突，导致系统错误。在经过根据 应用的语义对实体联系的类型进行综合、 调整后得以解决。2、在逻辑结构设计中，由于没有理清概念结构设计中的各实体间的 相互联系导致逻辑结构一度无法建立。 在经过赵老师的指点后， 终于 找到了问题的所在。顺利的完成了逻辑结构设计。3、查询嵌套的实现和计算工资这个环节也遇到了很大的困难，这一 切都源自对操作环境的不熟悉， 所以我们尽量使我们的应用程序简单 化，重点放在基本功能的实现上，没有追求一些高难度的应用编写。6.2 系

12、统中中可以改进的地方说明：功能不是很全面 , 可是适当添加一些功能使程序更加完善 可添加员工参加工作的时间， 工龄等使员工信息更加系统全面。三）系统详细设计说明3.1 创建数据库 本次设计中的表一律是通过手工自己创建。员工基本资料管理表 yuangong 的创建；资员工的工F7员工奖励管理表的创建；员工惩罚管理表的创建；工资发放查询表的创建此时生成的界面如下图：3.2 设计数据表关系3.3 建立数据库窗体： 使用窗体向导的方法依次添加窗体和“职员信息管理”子窗体职员信息管理”Forms!Forms!Forms!员工基本资料管理 员工基本资料管理 员工基本资料管理!Forms!Forms!For

13、ms!员工基本资料管理 员工基本资料管理 员工基本资料管理!职员 ID = Me! 职员 ID 部门 ID = Me! 部门 ID 职务 = Me! 工资 = Me! 姓名 = Me! 性别 = Me!职务 工资 姓名 性别员工基本资料管理 员工基本资料管理Forms!Forms!Exit_Form_Current:Exit Sub!身份证 ID = Me! 身份证 ID 备注 = Me! 备注此处添加子窗体代码为：Private Sub Form_Current() On Error GoTo Err_Form_CurrentErr_Form_Current:MsgBox Err.Descr

14、iptionResume Exit_Form_CurrentEnd Sub运行后界面为：窗体及子窗体调整后如下图所示：_Click:Click:3.4 实现新建职员功能，代码添加为：Private Sub 新建职员 _Click() On Error GoTo Err_ 新建职员 _Click 把窗体中所有控件都置空Me! 职员 ID = NullMe! 部门 ID = NullMe! 职务 = NullMe! 工资 = NullMe! 姓名 = NullMe! 性别 = NullMe! 身份证 ID = NullMe! 备注 = NullExit_ 新建职员Exit SubErr_ 新建职员

15、MsgBox Err.DescriptionResume Exit_ 新建职员 _Click End Sub运行后界面如下图所示：3.5 实现添加职员功能，添加代码为Private Sub 添加职员 _Click（）On Error GoTo Err_ 添加职员 _clickDim STemp As StringIf IsNull（Me!职员 ID） = True ThenMsgBox 请输入 职员 ID 它不能为空！ , vbOKOnly, 输入职员 ID Me! 职员 ID.SetFocusElseIf IsNull（Me! 部门 ID） = True ThenMsgBox 请输入 部门

16、ID 它不能为空！ , vbOKOnly, 输入部门 ID Me! 部门 ID.SetFocusElseIf IsNull（Me!职务 ） = True ThenMsgBox 请输入 职务 它不能为空！ , vbOKOnly, Me! 职务 .SetFocus输入职务 ElseIf IsNull（Me!工资 ） = True ThenMsgBox 请输入 工资 它不能为空！ , vbOKOnly, Me! 工资 .SetFocus输入工资 ElseIf IsNull（Me!姓名 ） = True ThenMsgBox 请输入 姓名 它不能为空！ , vbOKOnly, Me! 姓名 .SetF

17、ocus输入姓名 ElseIf IsNull（Me!性别 ） = True ThenMsgBox 请输入 性别 它不能为空！ , vbOKOnly, 输入性别 工资 & , & Me! 备注 & ）Me! 性别 .SetFocusElseIf IsNull（Me! 身份证 ID） = True ThenMsgBox 请输入 身份证 ID 它不能为空！ , vbOKOnly, 输入身份证 IDMe! 身份证 ID.SetFocusElseIf IsNull（Me!备注 ） = True ThenMsgBox 请输入 备注 它不能为空！ , vbOKOnly, 输入备注 Me! 备注 .SetFo

18、cusElseSTemp = INSERT INTO 员工基本资料管理 STemp = STemp & （ 职员 ID,部门 ID,职务,工资,姓名,性别,身份证 ID, 备注）STemp = STemp & VALUES（ & Me! 职员 ID & , & Me!部门 ID & , & Me!务 & , & Me!工资 & , & Me!姓名 & , & Me!性别 & , & Me!份证 ID & , & Me!DoCmd.RunSQL STempMe! 员工基本资料管理子窗体 .RequeryEnd IfExit_ 添加职员Exit SubErr_ 添加职员_Click:click:M

19、sgBox Err.Description Resume Exit_ 添加职员_ClickEnd Sub 运行后界面为下图所示：3.6 实现修改职员功能， 代码如下：Private Sub 修改职员 _Click()On Error GoTo Err_ 修改职员Dim i As IntegerDim STemp As StringDim Rs As New ADODB.RecordsetSTemp = Select*From 员工基本资料管理 Rs.Open STemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic_Cli

20、ckIf IsNull(Me!MsgBox 请输入 职员 IDMe! 职员 ID.SetFocus职员 ID) = True Then它不能为空 !, vbOKOnly, 输入职员 IDElseIf IsNull(Me! 部门 MsgBox 请输入 部门 ID Me! 部门 ID.SetFocusID) = True Then 它不能为空 !, vbOKOnly, 输入部门 ID输入职务 输入工资 ElseIf IsNull(Me!职务 ) = True ThenMsgBox 请输入 职务 它不能为空 !, vbOKOnly, Me! 职务 .SetFocusElseIf IsNull(Me!

21、工资 ) = True ThenMsgBox 请输入 工资 它不能为空 !, vbOKOnly, Me! 工资 .SetFocusFor i = 1 To Rs.RecordCount If Rs( Rs( Rs( Rs( Rs( Rs( Rs( Rs(职务 工资 姓名 性别 ElseIf IsNull(Me!姓名 ) = True ThenMsgBox 请输入 姓名 它不能为空 !, vbOKOnly, 输入姓名 Me! 姓名 .SetFocusElseIf IsNull(Me!性别 ) = True ThenMsgBox 请输入 性别 它不能为空 !, vbOKOnly, 输入性别 Me!

22、 性别 .SetFocusElseIf IsNull(Me! 身份证 ID) = True ThenMsgBox 请输入 身份证 ID 它不能为空 !, vbOKOnly, 输入身份证 IDMe! 身份证 ID.SetFocusElseIf IsNull(Me!备注 ) = True ThenMsgBox 请输入 备注 它不能为空 !, vbOKOnly, 备注 Me! 备注 .SetFocusElseRs.MoveFirst职员 ID) = Me! 职员 ID Then 部门 ID) = Me! 部门 ID 职务) = Me! 工资) = Me! 姓名) = Me! 性别) = Me!身份证

23、 ID) = Me! 身份证 ID 备注) = Me! 备注 Rs.UpdateMsgBox 职员信息修改完成 !, vbOKOnly, 修改完成 Exit SubElseRs.MoveNextEnd IfNext iEnd IfMe! 员工基本资料管理 子窗体 .RequerySet Rs = NothingExit_ 修改职员 _Click:Exit SubErr_ 修改职员 _Click:MsgBox Err.DescriptionResume Exit_ 修改职员 _ClickEnd Sub运行后界面如下：3.7 实现删除职员功能，代码如下：Private Sub 删除职员 _Clic

24、k()On Error GoTo Err_ 删除职员 _Click Dim STemp As StringDim i As IntegerDim Rs As ADODB.RecordsetSet Rs = New ADODB.RecordsetSTemp = select*from 员工基本资料管理 Rs.Open STemp, CurrentProject.Connection, adOpenKeyset, adLockOptimisticRs.MoveFirstFor i = 1 To Rs.RecordCountIf Rs（ 职员 ID） = Me! 员工基本资料管理 子窗体 ! 职员

25、ID ThenRs.Delete i = Rs.RecordCount + 1_Click:Err_ 删除职员Click:Resume Exit_ElseRs.MoveNextEnd IfNext iMsgBox 该职员档案记录已经删除 !, vbOKOnly, 删除完成 Me! 员工基本资料管理 子窗体 .RequerySet Rs = Nothing Exit_ 删除职员Exit SubMsgBox Err.Description删除职员 _ClickEnd Sub运行后界面为：至此，职员信息管理窗体建立完毕， 窗体完整界面如下图所示：四）系统实施部分4.1 试运行结果：4.2 技术说明书

26、、使用说明书和维护说明书略五） 总结1、体会下去的感觉。但是我从中发现，只要步一步调试、静下心来看待问此次课程设计给我的体会有以下几点： 一、看似简单，其实不然以前没有过课程设计的经验，作为第一次课程设计课，我抱着试试看的态度去写， 一开始看了只有这么几个模块是心里挺高兴的， 但 是当我真真正正地去把一个操作写成功时， 很多意想不到的情况发生 了。有时候会为了一个操作不能调试成功而整个晚上都不能去安心做 其他的作业。二、冷静沉着、兢兢业业编程是一个很繁琐的过程，要考虑到很多错误转移情况，在这期间会有很多以前不曾想过的问题出现， 次数多了， 不免会有觉得做不题，再复杂再微小的问题都会迎刃而解，当

27、一个程序被调试出来时， 那时的快乐相比与任何困难都值得的。三、立足程序、回归书本在着手写程序时觉得思路一片混乱， 无意间出现的问题会不知道 怎么解决。这时，需要回归书本，书本是前人总结的经验，几乎所有 情况都会有解决方法。只有把书本“吃透” ，在遇到问题是才会反应 快。四、致谢在此我向方芳老师致以诚挚的谢意。 由于此次课程设计的主要知 识是数据库系统， 在很多方面我们都还存在一知半解的情况， 而赵专 政老师多次帮我们解释重点、分析概念结构、逻辑结构，特别在课程赵松涛 编著2)数据库系统概论 第四版 M 王珊 萨师轩清华大学出版M.2004;85设计报告的时候给予了很多的指导。 在她的悉心指导下， 我们不仅学 到了扎实的文化知识， 也在为人处世方面受益匪浅， 尤其是一次次方 芳老师在鼓励我们的话语