计算机毕业论文企业人事工资管理.docx
《计算机毕业论文企业人事工资管理.docx》由会员分享，可在线阅读，更多相关《计算机毕业论文企业人事工资管理.docx（31页珍藏版）》请在冰豆网上搜索。
计算机毕业论文企业人事工资管理
企业人事工资管理
随着计算机技术的飞速发展，计算机在企业管理中应用的普及，利用计算机实现企业人事工资的管理势在必行。
本系统结合企业公司实际的人事、财务制度，经过实际的需求分析，采用功能强大的DDLPHI7做为开发工具、Paradox7做为数据库开发出来的单机版人事管工资理系统。
整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发，完成人事、工资管理的全过程，包括新进员工加入时人事档案的建立、老员工的转出、职位等的变动引起职工信息的修改、员工信息查询、统计等人事管理工作以及新进员工工资的新增、老员工工资修改、出盘等工资管理工作。
经过实际使用证明，本文所设计的人事工资管理系统可以满足企业人事、工资管理方面的需要。
论文主要介绍了本课题的开发背景，所要完成的功能和开发的过程。
重点的说明了系统设计的重点、设计思想、难点技术和解决方案。
关键词：
数据库，Paradox7，Delph5，出盘，人事工资管理
Abstract
Withthecomputer’stechnologydevelopingrapidly，thatcomputercanapplycommonlyinthemanagementoftheenterprise.Makeuseofthecomputertorealizethemanagementofpersonnelandsalaryinenterpriseiscertainlyinnecessary.Thissystemjoinstogethertheacademicandactualcircumstance,adoptingthemightythecapitalofGreeceinfunctionbeusedasthetoolofdevelopment.TheParadox7actsasadatabasetype，whicheditsastudentofthescoremanagementsystem.Recordthescoreofeachcategoryofstudentintothesystemandprovidetosearchandmodifyandsoon.
Thewholesystem’soperationissimple.Theinterfacesetsoutfromamity,vivid,practicalandsaferequest,completingstudent'sscorerecordinto,searching,modifyingandmakingstatistics.Itshowsouttheclearandquickinterfaceandmakesoperationsimplytoattainthetheoriescombinetogetherwithfulfillment.
Thethesisintroducedtousthelessonofthebackgroundofdevelopmentandthefinishedfunctionandaprocess.Itgivesusthesystemofdesignandmeasureprimarily.
Keyword:
database,themanagementofpersonnelandsalary,
前言
随着科技的发展以及计算机的广泛应用，各种管理软件已成为我们生活中不可缺少的一部分了。
人们不再拘泥于简单的人工操作、记录，而改为用计算机管理日常工作了，尤其是数据库已成为我们身边随处可见的管理系统，用数据库开发管理软件必不可少，学校图书馆的借书还书离不开数据库，企业工人的人事工资管理也离不开数据库，其重要性不言而喻。
本系统结合企业公司的实际情况，采用Delphi7作为开发工具,Paradox7作为数据库的类型编辑一个企业人事工资管理系统，把公司员工的各种信息录入，以供查询修改等。
整个系统完成人事管理、工资管理、系统维护及查询等的全过程，用简洁明快的界面展现出来，使操作简单可行，达到理论与实践相结合。
论文主要介绍了本课题的开发背景，所要完成的功能和开发的过程。
重点说明了系统设计的重点、设计思想、难点技术和解决方案。
对于论文中的不足之处，恳请各位领导、专家加以指正，谢谢！
目录
第一章绪论5
1.1课题来源5
1.2开发工具的选择5
1.3本文所做工作6
第二章需求分析7
2.1总体需求调查7
2.1.1组织结构图7
2.1.2系统目标7
2.1.3应用现状调查7
2.1.4业务总体流程调查8
2.2系统功能调查9
2.2.1系统维护功能9
2.3系统功能模块图9
第三章概要设计10
3.1概念设计10
3.2数据库设计11
3.2.1Yhklb用户口令表11
第四章详细设计13
4.1启动界面设计13
4.1.1功能说明13
4.1.2屏幕格式设计13
4.2登录窗口设计14
4.2.1功能说明14
4.2.2屏幕格式设计14
4.2.3源程序分析14
4.3主窗口设计16
4.3.1功能说明16
4.3.2屏幕格式设计16
4.3.3源程序分析17
4.4系统维护模块设计22
4.4.1基本参数维护22
4.4.2用户管理26
4.5系统其它功能的实现32
4.5.1打开计算器32
4.5.2打开写字板32
4.5.3窗口的层叠、平铺、极小化操作32
4.5.4关于窗口的实现33
第五章毕业设计小结33
第一章绪论
1.1课题来源
随着计算机技术的飞速发展，计算机在企业管理中应用的普及，利用计算机实现企业人事工资的管理势在必行。
对于大中型企业来说，利用计算机支持企业高效率完成劳动人事管理的日常事务，是适应现代企业制度要求、推动企业劳动人事管理走向科学化、规范化的必要条件。
如果实行手工操作，每月发放工资须手工填制大量的表格，这就会耗费工作人员大量的时间和精力。
计算机进行工资发放工作，不仅能够保证工资核算准确无误、快速输出，而且还可以利用计算机对有关工资的各种信息进行统计，服务于财务部门其他方面的核算和财务处理，同时计算机具有手工管理所无法比拟的优点.
1.2开发工具的选择
现在，市场上可以选购的应用开发产品很多，流行的也有数十种。
目前在我国市场上最为流行、使用最多、最为先进的可用作企业级开发工具的产品有：
Microsoft公司的VisualBasic
Microsoft公司的VisualC
Borland公司的Delphi
Powersoft公司的PowerBulider
Java等等
作为数据库系统的开发，Delphi是一个非常理想选择。
Delphi因简单易学、功能强大、编译速度快而从众多的软件开发工具中脱颖而出。
它提供了灵活的可视化设计工具，将可视化界面与面向对象技术完善、紧密地结合起来，并封装了Windows编程的复杂性。
程序的规模小到简单的个人数据库应用，大到复杂的企业的多层次分布式系统，都可以使用Delphi进行开发，其友好的集成开发界面，可视化的双向开发模式，良好的数据库应用支持高效的程序开发和程序运行，备受广大程序开发人员的好评。
尤其是Delphi对数据库应用的强大支持，大大提高了数据库应用软件开发的效率，缩短了开发周期，深受广大数据库应用程序设计人员的喜爱。
Delphi为数据库应用开发人员提供了丰富的数据库开发组件，使数据库应用开发功能更强大，控制更灵活，编译后的程序运行速度更快。
1.3本文所做工作
第一章结合软件工程方法,对系统进行需求分析、功能划分、数据流图设计，并结合数据库原理和功能划分进行ER图的绘制、数据库结构设计，
第二章根据需求分析的结果，用户概念数据模型表示数据及其相互间的联系。
第三章根据需求分析的结果，对系统进行详细设计，主要介绍用Delphi和Pradox实现每一个模块的具体功能。
第四章毕业设计小结，总结部分介绍了设计体会和编程体会，并指出了系统设计中的不足和改进的方向。
第二章需求分析
2.1总体需求调查
2.1.1组织结构图
企业公司组织结构图如下
2.1.2系统目标
采用公司现有的软硬件软件及科学的管理系统开发方案，建立企业人事工资管理系统，实现企业人事工资管理的计算机自动化。
系统应符合公司人事、工资管理制度，并达到操作直观、方便、实用、安全等要求。
2.1.3应用现状调查
目前，很多公司使用的人事工资管理系统采用的是DOS环境下的Foxbase数据库，界面不友好，不能适应公司发展的需要。
2.1.4业务总体流程调查
维护员工基本信息：
人事管理主要负责人员基本信息的维护，包括新进员工档案的建立，员工信息的修改。
公司工资管理基本流程如下：
数据来源：
将各部门送达的员工工资信息包括基本工资、奖金、水电费等作为数据来源，分为新增员工工资数据和老员工每月修改数据。
数据的输入：
由工作人员通过新员工本月工资增加和老员工上月工资表修改完成。
数据的统计：
由工作人员通过对修改后的上月工资表进行计算得到每个人的实发工资以及总金额。
表格的制作：
由工作人员以修改、计算后的在上月工资表为蓝本生成与银行进行数据交换的软件即出盘。
同时可打印工资报表。
2.2系统功能调查
整个系统从总体上分为人事管理、工资管理、系统维护三大部分，其中系统维护部分应实现的功能如下：
2.2.1系统维护功能
Ø部门信息维护：
实现灵活的增减部门信息
Ø职务信息维护：
实现灵活的增减职务信息
Ø职称信息维护：
实现灵活的增减职称信息
Ø工资账目维护：
能够灵活的改变员工的薪水账目。
Ø用户管理：
包括新增用户、删除用户、修改用户密码等。
2.3系统功能模块图
第三章概要设计
3.1概念设计
通过对企业员工管理内容、工资管理内容和过程的分析，本系统应设计的实体和属性如下：
员工（包括员工工号、员工姓名、学历、性别、政治面貌、出生日期、所属部门、职称、职务、入职时间、身份证号、联系电话、家庭住址、手机号码、Email、有效标志）
部门（部门代号、部门名称）
职务（职务代号、职务名称）
职称（职称代号、职称名称）
薪金结构（月份、员工工号、薪水帐目、数目）
薪水帐目（薪水帐目代号、薪水帐目名称）
3.2数据库设计
作为Borland公司的桌面数据库，Paradox在Delphi中的应用非常广泛，为此我选用Paradox数据库来进行数据库的逻辑设计。
根据前面定义的实体及实休之间的关系，形成数据库的表格以及各个表之间的关系。
为了减少数据冗余度，将职称实体、部门实体、职务实体、薪水帐目实体放在同一个表里，以一个类型字段加以区分。
对个关系选择主健，按照关系模式的规范化进行规范，消除数据依赖中不合适的部分，使模式中的各关系模式达到某种程度的分离。
3.2.1Yhklb用户口令表
序号
域名
域中文名
域类型
备注
1
Dlgh
登录工号
Alpha（20）
主键
2
Pswd
口令
Alpha（10）
说明：
为了便于多个用户管理该系统，建立此表，记录用户的登录工号和口令.
第四章详细设计
根据需求分析、概要设计的结果，采用Delphi做为开发工具，实现公司人事工资管理各模块的功能。
4.1启动界面设计
4.1.1功能说明
系统运行时，首先弹出此启动窗口，4秒钟后自动关闭出现主窗口和登录窗口,实现此界面主要是修改了工程文件，并调用了一个延时函数，实现起来很简单，源程序不加以介绍。
4.1.2屏幕格式设计
启动界面
4.2登录窗口设计
4.2.1功能说明
控制员工登录，防止非法用户闯入本系统，保证系统的安全，输入口令时屏幕显示为“*”以利保密。
4.2.2屏幕格式设计
登录界面
4.2.3源程序分析
procedureTFrm_dl.Button1Click（Sender:
TObject）;
begin
ifedit2.text=''then//判断密码是否输入为空
begin
Application.MessageBox（'密码不能为空，请重新输入！
','系统提示',mb_IconInformation+mb_OK）;
Edit2.SetFocus;
end;
Exit;
query1.sql.clear;
query1.sql.add（'selectpswdfromyhklbwheredlyh='+''''+trim（edit1.text）+''''）;
ifquery1.Activethen
query1.close;
query1.open;//根据用户名从用户口令表中取出用户口令
ifedit2.text<>query1.fieldbyname（'pswd'）.asstring
then
begin
iferr_cou=2then//判断是否三次输入错误
begin
application.messagebox（'三次登录的用户名或密码错误','系统退出',mb_IconInformation+mb_OK）;
frm_main.close;//关闭主窗口，退出系统
end;
Application.MessageBox（'密码或工号不正确','请重新输入！
',mb_IconInformation+mb_OK）;//若密码输入错误，提示重新输入
Edit2.SetFocus;
err_cou:
=err_cou+1;//输入次数加1
exit;
end;
dluser:
=edit1.text;//给变量赋值，记录登录用户，供其它程序使用
Close;
end;
4.3主窗口设计
4.3.1功能说明
界面采用MDI方式，可同时打开几处子窗口体，在界面上放置了菜单栏和工具栏、状态栏；菜单栏集中了系统操作的入口，各功能模块的执行从此进入；工具框显示了系统菜单中常用项目的快键图标，使用户只需点击相应图标即可进入相应功能模块，当鼠标移动到相应图标时，系统会出现提示信息。
状态栏主要是用于显示日期时钟信息，以及系统操作过程中的信息。
4.3.2屏幕格式设计
系统主界面
4.3.3源程序分析
procedureTFrm_main.N20Click（Sender:
TObject）;//菜单关闭事件
begin
close;
end;
procedureTFrm_main.N_shutdownClick（Sender:
TObject）;
begin//菜单退出系统并关机事件
ifmessagedlg（'是否退出并关闭计算机？
',mtinformation,[mbyes,mbno],1）=mryesthen
begin
close;
ExitWindowsEx（EWX_FORCEorEWX_SHUTDOWN,0）;//调用API函数
end;
end;
procedureTFrm_main.N_closeClick（Sender:
TObject）;
begin
close;
end;
procedureTFrm_main.N_bmcxwhClick（Sender:
TObject）;//打开部门参数维护窗口
begin
Application.CreateForm（TFrm_bmxg,Frm_bmxg）;
iffrm_bmxg.query1.activethenfrm_bmxg.query1.close;//判断Query是否打开
frm_bmxg.query1.open;//打开Query
end;
procedureTFrm_main.N_zwwhClick（Sender:
TObject）;//打开职务参数维护窗口
begin
Application.CreateForm（TFrm_zwxg,Frm_zwxg）;
iffrm_zwxg.query1.activethenfrm_zwxg.query1.close;
frm_zwxg.query1.open;
end;
procedureTFrm_main.N_ygjbxxsrClick（Sender:
TObject）;//打开新增员工信息窗口
begin
Application.CreateForm（Tfrm_ygzbxxsr,frm_ygzbxxsr）;
end;
procedureTFrm_main.N_yhwhClick（Sender:
TObject）;//打开用户维护窗口
begin
Application.CreateForm（TFrm_yhgl,Frm_yhgl）;
iffrm_yhgl.query1.activethenfrm_yhgl.query1.close;
frm_yhgl.query1.open;
end;
procedureTFrm_main.Timer1Timer（Sender:
TObject）;
vary,m,d:
word;//在状态栏上显示日期时间星期
begin
decodedate（now,y,m,d）;
statusbar1.Panels[1].text:
=concat（'【',inttostr（y）,'年',inttostr（m）,'月',inttostr（d）,'日',formatdatetime（'hh:
nn:
ssAM/PM',now）,f_get_week,'】'）;//调用函数f_get_week
end;
procedureTFrm_main.N_zcwhClick（Sender:
TObject）;//打开职称维护窗口
begin
Application.CreateForm（TFrm_zcxg,Frm_zcxg）;
iffrm_zcxg.query1.activethenfrm_zcxg.query1.close;
frm_zcxg.query1.open;
end;
procedureTFrm_main.N_ygzbxxwhClick（Sender:
TObject）;//打开员工信息维护窗口
begin
Application.CreateForm（Tfrm_ygzbxxwh,frm_ygzbxxwh）;
end;
procedureTFrm_main.N_zbxxckClick（Sender:
TObject）;//打开员工信息查看窗口
begin
Application.CreateForm（Tfrm_llygzbxx,frm_llygzbxx）;
end;
procedureTFrm_main.N_tjcxClick（Sender:
TObject）;//打开员工信息条件查询窗口
begin
Application.CreateForm（Tfrm_ygzlcx,frm_ygzlcx）;
end;
procedureTFrm_main.N_gzzmwhClick（Sender:
TObject）;//打开薪水帐目维护窗口
begin
Application.CreateForm（TFrm_gzzmwh,Frm_gzzmwh）;
ifFrm_gzzmwh.query1.activethenFrm_gzzmwh.query1.close;
Frm_gzzmwh.query1.open;
end;
procedureTFrm_main.N_cpClick（Sender:
TObject）;//打开出盘窗口
begin
Application.CreateForm（Tfrm_cp,frm_cp）;
end;
procedureTFrm_main.N_gzdxClick（Sender:
TObject）;//打开工资短信窗口
begin
frm_gzdx:
=Tfrm_gzdx.create（application）;
frm_gzdx.showmodal;
frm_gzdx.free;
end;
procedureTFrm_main.N_jsbClick（Sender:
TObject）;//打开写字板
begin
ShellExecute（handle,'open','notepad.exe',nil,nil,SW_ShowNormal）;//调用API函数
end;
procedureTFrm_main.N_jsqClick（Sender:
TObject）;//打开计算器
begin
ShellExecute（handle,'open','calc.exe',nil,nil,SW_ShowNormal）;
end;
procedureTFrm_main.N_ppClick（Sender:
TObject）;//实现窗口平铺
begin
TileMode:
=tbVertical;
Tile;
end;
procedureTFrm_main.N_cdClick（Sender:
TObject）;//实现窗口层叠
begin
Cascade;
end;
procedureTFrm_main.N_jxhClick（Sender:
TObject）;//实现窗口极小化
vari:
integer;
begin
withfrm_maindo
begin
fori:
=MDIchildcount-1downto0do
MDIChildren[i].Windowstate:
=wsMinimized;
end;
end;
procedureTFrm_main.N_aboutClick（Sender:
TObject）;//打开关于本系统窗口
begin
Application.CreateForm（Tfrm_about,frm_about）;
end;
functionTfrm_main.f_get_week:
string;//获取星期函数
var
days:
array[1..7]ofstring;
begin
days[1]:
='星期日';
days[2]:
='星期一';
days[3]:
='星期二';
days[4]:
='星期三';
days[5]:
='星期四';
days[6]:
='星期五';
days[7]:
='星期六';
result:
=days[DayOfWeek（now）];
end;
procedureTFrm_main.N_ygzlbbClick（Sender:
TObject）;//生成企业员工花名册
begin
frm_ygbb:
=Tfrm_ygbb.create（application）;
iffrm_y
升级会员 