职工工资管理系统设计与源代码.doc

职工工资管理系统一、 设计目标：按照软件工程的规范，以sql server或access为后台数据库，以delphi 或visual c+为前端开发工具，设计并实现一个简化的工资管理系统。二、 需求描述该系统存储了某单位全体职工和工资信息。职工的基本信息包括：职工编号、姓名、性别、出生年月、职称、最后学历、工资和婚否。每一个职工的工资信息包括：月份、职工编号、职工姓名、基本工资、津贴、岗贴、补贴、房贴、交通补贴、应发数、房租、储蓄、会费、个人所得税、应扣数、实发数、其他收入。个人所得税计算方法设为：应发数少于800元为0；8001000元的部分为5%；10005000元的部分为10%；5000元以上的部分为20%。系统功能如下：1 职工信息管理：a. 增加职工信息。增加新职工时输入新职工的基本信息；b. 删除某职工的基本信息。如，职工死亡或离职时；c. 修改某职工（指定职工编号）的某些信息（如，加工资、获得新学位、晋升职称、结婚或离婚）。2 工资管理：a. 增加工资信息。当增加新职工时，添加某职工的工资信息；b. 职工离职或死亡时，删除某职工的工资信息；c. 修改工资信息。当月开始增加或减少某些项工资或扣款数变化时，修改某职工的部分工资信息；3 查询与统计：a. 查询职工信息，如查询全体职工信息，或按职称、学历、出生年月、出生年月之前/ 之后、已婚/ 未婚等条件或多个条件的组合来查询相应的职工信息。b. 查询指定编号职工的工资信息；c. 按时间段统计职工收入或单位的工资支出。三、 概要设计四、 详细设计void cworkermgr6view:onexit()onexit();void cworkermgr6view:onrecordfirst()if(m_pset-isbof()m_pset-setfieldnull(null);elsem_pset-movefirst();updatedata(false);/更新对话框窗口void cworkermgr6view:onrecordlast()m_pset-movelast();updatedata(false);/更新对话框窗口void cworkermgr6view:onrecordnext()if(m_pset-isbof()m_pset-setfieldnull(null);/判断是否溢出if(m_pset-iseof()afxmessagebox(已经到达最后记录);elsem_pset-movenext();updatedata(false);void cworkermgr6view:onrecordpre()if(m_pset-isbof()afxmessagebox(已经到达第一个记录);m_pset-movefirst();m_pset-moveprev();updatedata(false);void cworkermgr6view:onaddworker()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);/连接数据库/上面一句中连接字串中的provider是针对access2000环境的，对于access97,需要改为:provider=microsoft.jet.oledb.3.51;catch(_com_error e)/捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(errormessage);/显示错误信息caddworker dl;if(dl.domodal()=idok)m_pset-addnew();m_pset-m_name=dl.m_nm;m_pset-m_id=dl.m_ids;m_pset-m_sex=dl.m_sx;m_pset-m_born=dl.m_bn;m_pset-m_zhichen=dl.m_zhch;m_pset-m_xueli=dl.m_xli;m_pset-m_salary=dl.m_sala;m_pset-m_marry=dl.m_marr;m_pset-update();m_pset-movelast();updatedata(false);onaddmoney();void cworkermgr6view:ondeleteworker()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);/连接数据库/上面一句中连接字串中的provider是针对access2000环境的，对于access97,需要改为:provider=microsoft.jet.oledb.3.51;catch(_com_error e)/捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(errormessage);/显示错误信息cdelworker dl;if(dl.domodal()=idok)updatedata(true);trylong id=dl.m_idid;cstring str;str.format(delete from worker where id=%d,id);_variant_t recordsaffected;m_pconnection-execute(_bstr_t)str,&recordsaffected,adcmdtext);afxmessagebox(删除成功!);catch(_com_error*e)afxmessagebox(e-errormessage();m_pset-movenext();if(m_pset-iseof()m_pset-movelast();updatedata(false);void cworkermgr6view:onchangworker()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);/连接数据库/上面一句中连接字串中的provider是针对access2000环境的，对于access97,需要改为:provider=microsoft.jet.oledb.3.51;catch(_com_error e)/捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(errormessage);/显示错误信息cchangework dl2;if(dl2.domodal()=idok)updatedata(true);long id=dl2.m_wid;m_pset-movefirst();while(m_pset-m_id!=dl2.m_wid)m_pset-movenext();cchangeone dl1;dl1.m_name1=m_pset-m_name;dl1.m_id1=m_pset-m_id;dl1.m_sex1=m_pset-m_sex;dl1.m_born1=m_pset-m_born;dl1.m_zhichen1=m_pset-m_zhichen;dl1.m_xueli=m_pset-m_xueli;dl1.m_salary1=m_pset-m_salary;dl1.m_marry1=m_pset-m_marry;if(dl1.domodal()=idok)m_pset-edit();m_pset-m_name=dl1.m_name1;m_pset-m_id=dl1.m_id1;m_pset-m_sex=dl1.m_sex1;m_pset-m_born=dl1.m_born1;m_pset-m_zhichen=dl1.m_zhichen1;m_pset-m_xueli=dl1.m_xueli;m_pset-m_salary=dl1.m_salary1;m_pset-m_marry=dl1.m_marry1;m_pset-update();/m_pset-movenext();updatedata(false);void cworkermgr6view:onmshowdetail()cmshowdetail dl;long id=m_pset-m_id;m_pset-movefirst();while(m_pset-m_id!=id)m_pset-movenext();dl.m_month=m_pset-m_month;dl.m_id=m_pset-m_id;dl.m_name=m_pset-m_name;dl.m_base=m_pset-m_base;dl.m_jintie=m_pset-m_jintie;dl.m_gangtie=m_pset-m_gangtie;dl.m_butie=m_pset-m_butie;dl.m_fangtie=m_pset-m_fangtie;dl.m_jiaotong=m_pset-m_jiaotong;dl.m_yingfa=dl.m_base+dl.m_jintie+dl.m_gangtie+dl.m_butie+dl.m_fangtie+dl.m_jiaotong;dl.m_fangzu=m_pset-m_fangzu;dl.m_chuxu=m_pset-m_chuxu;dl.m_huifei=m_pset-m_huifei;if(dl.m_yingfa=800&dl.m_yingfa1000&dl.m_yingfa5000)dl.m_gerentax=dl.m_yingfa*0.2f;dl.m_yingkou=dl.m_fangzu+dl.m_chuxu+dl.m_huifei+dl.m_gerentax;dl.m_shifa=dl.m_yingfa-dl.m_yingkou;dl.m_other=m_pset-m_other;dl.domodal();void cworkermgr6view:onaddmoney()caddmoney dl;dl.m_id=m_pset-m_id;dl.m_name=m_pset-m_name;if(dl.domodal()=idok)m_pset-edit();m_pset-m_base=dl.m_base;m_pset-m_month=dl.m_month;m_pset-m_jintie=dl.m_jintie;m_pset-m_gangtie=dl.m_gangtie;m_pset-m_butie=dl.m_butie;m_pset-m_fangtie=dl.m_fangtie;m_pset-m_jiaotong=dl.m_jiaotong;dl.m_yingfa=dl.m_base+dl.m_jintie+dl.m_gangtie+dl.m_butie+dl.m_fangtie+dl.m_jiaotong;m_pset-m_yingfa=dl.m_yingfa;m_pset-m_fangzu=dl.m_fangzu;m_pset-m_chuxu=dl.m_chuxu;m_pset-m_huifei=dl.m_huifei;if(dl.m_yingfa=800&dl.m_yingfa1000&dl.m_yingfa5000)dl.m_gerentax=dl.m_yingfa*0.2f;m_pset-m_gerentax=dl.m_gerentax;dl.m_yingkou=dl.m_fangtie+dl.m_chuxu+dl.m_huifei+dl.m_gerentax;m_pset-m_yingkou=dl.m_yingkou;dl.m_shifa=dl.m_yingfa-dl.m_yingkou;m_pset-m_shifa=dl.m_shifa;m_pset-m_other=dl.m_other;m_pset-update();/m_pset-movelast();updatedata(false);void cworkermgr6view:ondeletemoney()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);/连接数据库/上面一句中连接字串中的provider是针对access2000环境的，对于access97,需要改为:provider=microsoft.jet.oledb.3.51;catch(_com_error e)/捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(errormessage);/显示错误信息cdeletemoney dl;if(dl.domodal()=idok)updatedata(true);trylong id=dl.m_id;cstring str;str.format(delete from worker where id=%d,id);_variant_t recordsaffected;m_pconnection-execute(_bstr_t)str,&recordsaffected,adcmdtext);afxmessagebox(删除成功!);catch(_com_error*e)afxmessagebox(e-errormessage();m_pset-movenext();if(m_pset-iseof()m_pset-movelast();updatedata(false);void cworkermgr6view:onchangemoney()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);catch(_com_error e) /捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(errormessage); /显示错误信息cchangework dl2;if(dl2.domodal()=idok)updatedata(true);long id=dl2.m_wid;m_pset-movefirst();while(m_pset-m_id!=dl2.m_wid)m_pset-movenext();cchangemoney dl1;dl1.m_month=m_pset-m_month;dl1.m_name=m_pset-m_name;dl1.m_id=m_pset-m_id;dl1.m_base=m_pset-m_base;dl1.m_jintie=m_pset-m_jintie;dl1.m_gangtie=m_pset-m_gangtie;dl1.m_butie=m_pset-m_butie;dl1.m_fangtie=m_pset-m_fangtie;dl1.m_jiaotong=m_pset-m_jiaotong;dl1.m_yingfa=dl1.m_base+dl1.m_jintie+dl1.m_gangtie+dl1.m_butie+dl1.m_fangtie+dl1.m_jiaotong;dl1.m_fangzu=m_pset-m_fangzu;dl1.m_chuxu=m_pset-m_chuxu;dl1.m_huifei=m_pset-m_huifei;if(dl1.m_yingfa=800&dl1.m_yingfa1000&dl1.m_yingfa5000)dl1.m_gerentax=dl1.m_yingfa*0.2f;dl1.m_yingkou=dl1.m_gerentax+dl1.m_fangzu+dl1.m_chuxu+dl1.m_huifei;dl1.m_shifa=dl1.m_yingfa-dl1.m_yingkou;dl1.m_other=dl1.m_other;if(dl1.domodal()=idok)m_pset-edit();m_pset-m_name=dl1.m_name;m_pset-m_id=dl1.m_id;m_pset-m_month=dl1.m_month;m_pset-m_base=dl1.m_base;m_pset-m_jintie=dl1.m_jintie;m_pset-m_gangtie=dl1.m_gangtie;m_pset-m_butie=dl1.m_butie;m_pset-m_fangtie=dl1.m_fangtie;m_pset-m_jiaotong=dl1.m_jiaotong;m_pset-m_yingfa=dl1.m_base+dl1.m_jintie+dl1.m_gangtie+dl1.m_butie+dl1.m_fangtie+dl1.m_jiaotong;m_pset-m_fangzu=dl1.m_fangzu;m_pset-m_chuxu=dl1.m_chuxu;m_pset-m_huifei=dl1.m_huifei;if(m_pset-m_yingfam_gerentax=0;else if(m_pset-m_yingfa=800&m_pset-m_yingfam_gerentax=m_pset-m_yingfa*0.05f;else if(m_pset-m_yingfa1000&m_pset-m_yingfam_gerentax=m_pset-m_yingfa*0.1f;else if(m_pset-m_yingfa5000)m_pset-m_gerentax=m_pset-m_yingfa*0.2f;m_pset-m_yingkou=dl1.m_fangzu+dl1.m_chuxu+dl1.m_huifei+m_pset-m_gerentax;m_pset-m_shifa=m_pset-m_yingfa-m_pset-m_yingkou;m_pset-m_other=dl1.m_other;m_pset-update();/m_pset-movenext();updatedata(false);void cworkermgr6view:onfindmoney()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);catch(_com_error e) /捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(errormessage); /显示错误信息cfindno dl2;if(dl2.domodal()=idok)updatedata(true);long id=dl2.m_id;m_pset-movefirst();while(m_pset-m_id!=dl2.m_id)m_pset-movenext();cmshowdetail dl1;dl1.m_month=m_pset-m_month;dl1.m_name=m_pset-m_name;dl1.m_id=m_pset-m_id;dl1.m_base=m_pset-m_base;dl1.m_jintie=m_pset-m_jintie;dl1.m_gangtie=m_pset-m_gangtie;dl1.m_butie=m_pset-m_butie;dl1.m_fangtie=m_pset-m_fangtie;dl1.m_jiaotong=m_pset-m_jiaotong;dl1.m_yingfa=dl1.m_base+dl1.m_jintie+dl1.m_gangtie+dl1.m_butie+dl1.m_fangtie+dl1.m_jiaotong;dl1.m_fangzu=m_pset-m_fangzu;dl1.m_chuxu=m_pset-m_chuxu;dl1.m_huifei=m_pset-m_huifei;if(dl1.m_yingfa=800&dl1.m_yingfa1000&dl1.m_yingfa5000)dl1.m_gerentax=dl1.m_yingfa*0.2f;dl1.m_yingkou=dl1.m_gerentax+dl1.m_fangzu+dl1.m_chuxu+dl1.m_huifei;dl1.m_shifa=dl1.m_yingfa-dl1.m_yingkou;dl1.m_other=dl1.m_other;dl1.domodal();void cworkermgr6view:onstaticsmoney()hresult hr;tryhr =m_pconnection.createinstance(adodb.connection);/创建connection对象if(succeeded(hr)hr=m_pconnection-open(provider=microsoft.jet.oledb.4.0;data source=worker.mdb,admodeunknown);catch(_com_error e) /捕捉异常cstring errormessage;errormessage.format(连接数据库失败!rn错误信息:%s,e.errormessage();afxmessagebox(error