完整word版工资管理系统实验报告.docx
- 文档编号:3899946
- 上传时间:2022-11-26
- 格式:DOCX
- 页数:20
- 大小:63.61KB
完整word版工资管理系统实验报告.docx
《完整word版工资管理系统实验报告.docx》由会员分享,可在线阅读,更多相关《完整word版工资管理系统实验报告.docx(20页珍藏版)》请在冰豆网上搜索。
完整word版工资管理系统实验报告
信
息
系
统
设
计
与
开
发
系统名称:
工资管理系统
开发人员:
薛靖峰
学号:
1009034122
专业:
信息管理与信息系统
(1)编写目的
随着社会的发展,中国的中小型企业越来越多,而对企业而言,人力资源是企业最宝贵的资源,也是企业的“生命线”。
工资管理又是人力资源管理的重中之重。
实行电了化智能化的工资管理,可以让人力资源管理人员从繁重琐碎的案头工作解脱出来,去完成更重要的工作。
实现企业更大的工作效益和利润。
提高工作效率,减少人力;节省开支;先前人工劳动的自动化;针对使用企业与人群为中小型的管理者。
(2)背景
借助现代信息技术和管理理论,建立企业管理信息系统是当今社会的重要趋势,企业要在当今激烈的社会竞争中生存并发展,单靠人工或九十年代的手动,机械化操作是不够的,社会的发展,要求企业要跟上时代的步伐,抓住新时代的新科技的机遇,运用自动化,智能化的电脑管理,实现企业的高效益发展,这其中,企业员工的工资管理,对一个企业起着很关键的作用。
因此开发一个能自动化的管理企业员工工资的发放,员工内部信息的管理,企业招聘的管理等功能的系统,对一个企业的发展铺上了一条奔向高速发展的道路。
在一个企业屮,工资管理是一项琐碎、复杂而又十分细致的工作,工资计算、发放、核算的工作量很大,一般不允许出错,如果实行手工操作,每月发放工资须手工填制人量的表格,这就会耗费工作人员大量的时间和精力,计算机进行工资发放工作,不仅能够保证工资核算准确无误、快速输出,而且还可以利用计算机对有关工资的各种信息进行统计,服务于财务部门其他方面的核算和财务处理,同时计算机具有着手工管理所无法比拟的优点.例如:
检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。
这些优点能够极人地提高人事工资资管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。
2、可行性研究的前提
⑴要求
1主要功能:
为企业提供工资管理的软件,方便公司进行准确的工资管理。
2性能要求:
可以准确登记出勤率以及一些特殊的影响工资的因素,工资的计算及发放等,可以以不同的方式查询工资情况。
最重要的是准确。
3输入要求:
数据完整、准确,真实。
4输出要求:
简洁、快速、实时、可以打印相关的报表,提供一定的视图。
5安全与保密要求:
本系统的管理员要对该管理系统的安全负责,系统由特定人员修改及进行更新,计算等功能实现。
职工只有查询的权利,不能对其中的数据进行修改。
上级管理者可以利用视图进行查看,或是打印报表。
(2)目标
系统实现后,大大地提高职工工资管理系统的运行效率,可以减少由人为而导致的纪录及运算借误。
可以对某些特殊工资的界定条件进行设定保护,使公司更好的运行。
(3)评价尺度:
成本效益分析结果,效益人于成本,技术可行,效益小于成本,技术不可行,现有技术可完全承担开发任务,操作可行,软件可被原工作人员快速接受。
(4)
1、管理上的可行性分析
随着市场近几年的发展,公司规模的不断扩大,业务的扩张,为了提高企业的业务水平,为企业简化人事管理,提高商品库存效率,增加公司的业绩。
在管理方面已经积累了丰富的管理经验与方法,并建立的成熟的管理制度、齐全的规章制度汇集了正确的原始数据,使管理工作有了制度支持与信息支持。
特别是,能够改进企业管理机制,改善决策方式,减少管理成本,提高工作效率。
领导的支持对于信息系统的开发和实施有很人作用,也能保证系统在开发过程中妥善解决矛盾,在企业上下顺利实施信息系统,实现信息系统最初的目标。
2、技术上的可行性
随着IT技术的发展,特別是网络技术和数据库技术的发展,在软件开发方面,可以采用现行主流的开发技术;硬件技术方面则可以充分利用日益增强的存储能力、通讯能力和处理速度来保证系统开发技术的准备。
由此可见,该系统在技术上具有可行性。
3、经济上的可行性
对于信息系统的初期投资,都是为了以后获得更人的经济效益。
通过一定的成本、效益分析,我认为开发这个系统在经济上是可行的。
因为虽然系统开发需要初始成本和日后的维护费用,但是,信息系统可以提供比以前更加准确和及时的信息,可以改善领导层的决策方式,促进故那里体制改革和提高工作效率,减少人员费用,这些都是可以在以后的管理过程中体现出来的,并且可以令公司比具他竞争对手更
加具有竞争优势,对企业长远的发展有不可忽视的作用。
所以,经济上的可行性是肯定的。
4、可行性分析结论
在对系统目标和环境进行分析的基础上,更进一步对系统的技术可行性、经济可行性、营运可行性等方面进行系统的可行性分析研究:
二、组织机构图
总经理
三、业务流程图
人爭部
部财
四.功能结构图
年度汇总
统计汇总
月工资表
T•贸管理系统
生成报我
1
五、数据流程图
1.第一层数据流程图
2.第二层数据流程图
六、数据字典
(1)数据流
数据流编号:
D01-03
数据流名:
出勤情况
简要说明:
每月员工出勤统计情况
数据流来源:
人事部
数据流去向:
工资信息设置处理
数据流组成:
考勤统计时间+出勤天数+迟到早退次数+旷工次数+正常
加班次数+特殊加班次数+出差次数
(2)数据存储
数据存储编号:
F1
数据存储名称:
月工资表
简要说明:
每月按部门的工资表
数据存储来源:
工资核算处理数据存储去向:
工资查询处理数据存储组成:
工资统计时间+基本工资+职务津贴+奖金+福利+加班费+出差费+迟到早退扣发+旷工扣发+其他
(3)处理逻辑
编号:
P01-1.2
处理逻辑的名称:
工资计算
简述:
计算本月所有部门员工工资
输入数据流:
基本工资,来自“工资信息设置”处理逻辑
其他项目,来自“工资信息设置”处理逻辑
效益工资,来自“工资信息设置”处理逻辑
出勤情况,来自“工资信息设置”处理逻辑
数据存储组成:
工资统计时间+基本工资+职务津贴+奖金+福利+加班
费+出差费+迟到早退扣发+旷工扣发+其他
输出的数据流:
部门工资,去“月工资表”数据存储
员工个人工资,去“工资单”数据存储
(4)外部实体编号:
S04
名称:
员工简述:
本单位的员工
输入的数据流:
工资单
输出的数据流:
确认
七、E-R图
八、对象关系图
工资
PK,FK1
工资収号
FK1
一s^一
财务部
PK.FK1
工窃单号
tfi售明细出砂惜况奖励标岸计算提成力法
职工
PK1
工资单姓名性别年龄部门住址工资单号
九、数据表详情
1、工资表
ID-
字段1・
字段2上
字段3・
字段4・
字段5・
忝加新字段
1
工资单号
职工号
基本工资
奖金
扣除
2
20120901
1009034122
500
200
123
3
20120901
1009034117
550
500
300
4
201210011
1009034123
700
600
327
5
20121001
1009034122
650
300
50
620121101
1009034157
1000
600
459|
*
2、职工表
字段1▼
职工号1009034122100903412310090341271009034147
誤名邮帅煌耘姓薛蔺谢王
3
段字别性男男男女
4
段
字龄
FT221
角222
字段6
中北大学
▼字段7▼.
工资单号20120901
20121001
20120901
20121101
3、财务表
字段1F
字段2丁
字段3▼
字段4▼
字段5社
工資单号
销售明细
出勤情况
奖励标准
其他
20121001
500
-150
200
156
20120901
359
-100
350
160
20121101
461
0
500
120
20121101
600
0
540
200
20120901
600
-100
500
320
十、系统截图
工资详情I工資管理职工管理
mm婪录
职工号
密码
1009034122
登录I忘记密码I
基本信息
职工号|-
姓名
部门
民礁
学历
住址
性别
■二资详倩
二吳单号[
基本工资[
燮全
年售明细
其他—
工資是盂己左於I
査洵
系统分析报告
借助现代信息技术和管理理论,建立企业管理信息系统是当今社会的重要趋势,企业要在当今激烈的社会竞争中生存并发展,单靠人工或九十年代的手动,机械化操作是不够的,社会的发展,要求企业要跟上时代的步伐,抓住新时代的新科技的机遇,运用自动化,智能化的电脑管理,实现企业的高效益发展,这其中,企业员工的工资管理,对一个企业起着很关键的作用。
因此开发一个能自动化的管理企业员工工资的发放,员工内部信息的管理,企业招聘的管理等功能的系统,对一个企业的发展铺上了一条奔向高速发展的道路。
在一个企业中,工资管理是一项琐碎、复杂而又十分细致的工作,工资计算、发放、核算的工作量很大,一般不允许出错,如果实行手工操作,每月发放工资须手工填制人量的表格,这就会耗费工作人员大量的时间和精力,计算机进行工资发放工作,不仅能够保证工资核算准确无误、快速输出,而口还可以利用计算机对有关工资的各种信息进行统计,服务于财务部门其他方面的核算和财务处理,同时计算机具有着手工管理所无法比拟的优点.例如:
检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。
这些优点能够极大地提高人事工资资管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。
1、系统的易用性和易维护性
工资信息管理系统是直接面对使用人员的,而使用人员往往对计算机并不时非常熟悉。
这就要求系统能够提供良好的用户接口,易用的人机交互界面。
要实现这一点,就要求系统应该尽量使用用户熟悉的术语和中文信息的界面;针对用户可能出现的使用问题,要提供足够的在线帮助,缩短用户对系统熟悉的过程。
工资信息管理系统中涉及到的数据是企业的相当重要的信息,系统要提供方便的手段供系统维护人员进行数据的备份,FI常的安全管理,系统意外崩溃时数据的恢复等工作。
系统的标准性
系统在设计开发使用过程屮都要涉及到很多计算机硬件、软件。
所有这些都要符合主流国际、国家和行业标准。
例如在开发中使用的操作系统、网络系统、开发工具都必须符合通用标准。
如规范的数据库操纵界面、作为业界标准的TCP/IP网络协议及IS09002标准所要求的质量规范等;同时,在自主开发本系统时,要进行良好的设计工作,制订行之有效的软件工程规范,保证代码的易读性、可操作性和可移植性。
3、系统的先进性
目前计算系统的技术发展相当快,做为员工信息管理系统工程,应该保证系统在下个世纪仍IH是先进的,在系统的生命周期尽量做到系统的先进,充分完成企业信息处理的要求而不至于落后。
这一方面通过系统的开放性和可扩充性,不断改善系统的功能完成。
另一方面,在系统设计和开发的过程中,应在考虑成本的基础上尽量采用当前主流并先进且有良好发展前途的产品。
代码设计:
添加用户:
PrivateSubcmdcancel_Click()
UnloadMe
ExitSub
EndSub
PrivateSubcmdok_Click()
DunsqlAsSuing
DimrsAsADODBRecordset
IfTiim(useriiameText)-"Then
MsgBox"请输入用户名称二vbOKOnly^Exclamation.H提示“
ExitSub
username.SetFocus
Else
sql■Mselect♦fromuserinfowhereuserid-,H&username&HW
Setre-getrs(sqL"salary")
Ifre.EOF・FalseThen
MsgBox”这个用户己经存在.请录新输入用户名\vbOKOiily+vtExclamation.°提示99usemameSetFocus
username.Text-"
password.Text-confirmpwdText-WMExitSub
Else
IfTnm(passwordText)OTrmi(confiimpwdText)Then
MsgBox"两次输入密码不一致・请乖新输入密码二vbOKOnly+\i>Exclamation.”提示”password.Text-
confirmpwdText-HH
passwordSetFocus
ExitSub
ElselfTrim(pass\vord.Text)-HUThen
MsgBox”密码不能为空M,vbOKOnly牛vhExckrnmuoa”提示”password.Text-Mt1
confirmpwd-MH
password.SetFocus
Else
sql-”insertintouseiinfo(userid.userpwd)values(,M&usernamesql・sql&&password&
Calltransactsql(sql,Msalaiyj
MsgBox”添加成功\vbOKOnly+\4>Exclamauon,加结果”
usernameText-MM
password.Text■"
confirmpwd.Text-"
usernameSetFocus
EndIf
EndIf
EndIf
EndSub
PrivateSubFomi.LoadQ
EndSub
出勤结果:
OptionExplicit
PnvaieSubDataGiidl_ClickQ
EndSub
PrivateSubForm_LoadQ
DimsqlAsString
DunrsAsNewADODBRecordset
DunsdAsString
IfstniseriianieOSdmm"Then
sql-Mselectsidfromstuffinfowheresname&strusername&
Setrs■getrs(sql."salary”)
1sd-rs(0)
Security
Secuntv
♦
sql■”select♦fromattendancestatisticswheresniffid-**&sd&W,K
MeAdodclConnectionStrmg■HProvider-SQLOLEDBl;IntegratedSecurity^-SSPLPersistIiifo-False,ImtialCatalog-I】资管理.DadSouice-(local)"
MeAdodclRecordSource-sql
MeAdodclRefresh
SetMeDataGridlDataSource■Me.AdodclRecordset
Me.DataGndlRefresh
Else
sql-"select*fromattendancestatisticsM
MeAdodclConnectionStimg■HProvider-SQLOLEDBLIntegiatedSecurity^-SSPLPersistInfo-False,ImtialCatalog-匸资营理.DataSouice-(local)H
MeAdodclRecordSource-sql
MeAdodclRefresh
SetMeDataGridlDataSource■Me.Adodc1Recordset
Me.DataGndlRefresh
EndIf
EndSub
基本工资设置
OptionExplicit
PrivateidAsStung
PrivateSubcmdcancel_Click()
UnloadMe
ExitSub
EndSub
PrivateSubimtQ
Mposition.Listlndex■0
MecoinstuffidListlndex-0
Metextmonev■"”
MeoptiomdValue-True
EndSub
PrivateSubaddiecordO•添加记录
DimsqlAsString
DimrsAsNewADODBRecordset
sql-Hselect*fromsalary,settmgM
Setrs-getis(sql「salary")
rs.AddNew
rs.Fields(l)-Tnm(id)
is.Fields
(2)-Tnm(MpositioiLText)
is.Fields(3)-Tnm(Me.textmoney)
rs.Update
rs.Close
EndSub
PrivateSubcmdok_Click()
DimsqlAsSuing
DinirsAsNewADODBRecordset
Iflchaiigeflag-1Then
IfMeoptioiud.Value-TrueThen
IfMstuffidTextThen
MsgBox"请选择员工编vbOKOnly十vbExclamation,”提示”
ElselfIsEnipty(Me.textmone>9-TrueThen
MsgBox■•请输入基本工资二vbOKOnly+vbExclaniation.”提示”
MetextmoneySetFocus
ElselfIsNumeric(Metextmoney)-FalseThen
MsgBox"请输入数'旷,vbOKOnly+vbExclamauon.”捉示"
Me.textmoney
MetextmoneySetFocus
Else
sql■"select♦fiomsalaryseuingwherestuffid-'H&MstuffidText&""
Setrs-getrs(sql,"salary”)
Ifrs.EOF-FalseThen
sql■"deletefromsalarysettmgwherestuffid-M&MstufiidText&
Calltransactsql(sql,**salanrM)
EndIf
rs.Ciose
id■MecomstuffidText
Calladdrecord
MsgBox”己经设辻基木匸资•:
vbOKOnly+vbExchmauon「添加结果”
Callnut
sql■Mselect♦fromsalarysetting**
Callfrrniesult.basictopic
Callfimiesult.showbasic(sql)
filmesult.Show
frmiesult.ZOrdei0
Me.ZOrder0
EndIf
EudIf
IfMeoptionpositionValue-TnieThen
IfMposition.TextThen
MsgBox"请输入职务二vbOKOnly*vbExclamation.”捉示"
EiselfIsEmptyXMetextmoney)一TrueThen
MsgBox"请输入基本工资二vbOKOnly+vbExclamation,M提示"
Me.textmoney.SetFocus
EiselfIsNumenc(Me.texlmoney)■FalseThen
MsgBox"请输入数字二vbOKOnly♦vbExclamation.M提示"
Me.textmoney-
Me.textmoney.SetFocus
Else
sql-Mselect*fromsalamettingwheresposition-,H&MpositionText&,nw
Setrs-getrs(sql「salary”)
Ifrs.EOF-FalseThen
sql-''deletefromsalarysettingwheresposition&Me.coinpositionText&Mm
Calltransactsql(sql."salary”)
EndIf
rs.Ciose
sql-Hselect*fromsalaryseiungwheresposition-,M&Me.coinpositionText&
Setrs-getrs(sql,HsalaryM)
WhileNotisEOF
id-rs(0)
Calladdrecord
rsMoveNext
Wend
rs.Ciose
MsgBox"已经设ft基木工资vbOKOnly十vtExclamation.M添加结果"
Callmit
sql-Mselect*fromsnlarysetung”
Callfrmiesult.basictopic
Callfilmesult.showbasic(sql)
filmesult.Show
frmiesult.ZOrder0
Me.ZOrder0
EndIf
EndIf
Else
sql-Mupdatesalarysettingsetsalary—H&Me.textmoney&Hwherestuffid-H,sql-sql&Mstuffid&*HHCalltransactsql(sql,KsalaryM)
MsgBoxH已经修改甚木工资设置”.vbOKOnlyvi)Exclamation.°提示"
UnloadMe
sql-Mselect♦fromsalaiysetting**
Callfinuesult.basictopic
Callfrixuesult.showbasic(sql)
frmiesult.Show
Hiniesult.ZOrdei0
Callfrin
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 完整 word 工资管理 系统 实验 报告
![提示](https://static.bdocx.com/images/bang_tan.gif)