職工工資管理系統(tǒng)設(shè)計(jì)與源代碼.doc

職工工資管理系統(tǒng)一、 設(shè)計(jì)目標(biāo)：按照軟件工程的規(guī)范，以SQL Server或Access為后臺(tái)數(shù)據(jù)庫(kù)，以Delphi 或Visual C+為前端開(kāi)發(fā)工具，設(shè)計(jì)并實(shí)現(xiàn)一個(gè)簡(jiǎn)化的工資管理系統(tǒng)。二、 需求描述該系統(tǒng)存儲(chǔ)了某單位全體職工和工資信息。職工的基本信息包括：職工編號(hào)、姓名、性別、出生年月、職稱(chēng)、最后學(xué)歷、工資和婚否。每一個(gè)職工的工資信息包括：月份、職工編號(hào)、職工姓名、基本工資、津貼、崗貼、補(bǔ)貼、房貼、交通補(bǔ)貼、應(yīng)發(fā)數(shù)、房租、儲(chǔ)蓄、會(huì)費(fèi)、個(gè)人所得稅、應(yīng)扣數(shù)、實(shí)發(fā)數(shù)、其他收入。個(gè)人所得稅計(jì)算方法設(shè)為：應(yīng)發(fā)數(shù)少于800元為0；8001000元的部分為5%；10005000元的部分為10%；5000元以上的部分為20%。系統(tǒng)功能如下：1 職工信息管理：a. 增加職工信息。增加新職工時(shí)輸入新職工的基本信息；b. 刪除某職工的基本信息。如，職工死亡或離職時(shí)；c. 修改某職工（指定職工編號(hào)）的某些信息（如，加工資、獲得新學(xué)位、晉升職稱(chēng)、結(jié)婚或離婚）。2 工資管理：a. 增加工資信息。當(dāng)增加新職工時(shí)，添加某職工的工資信息；b. 職工離職或死亡時(shí)，刪除某職工的工資信息；c. 修改工資信息。當(dāng)月開(kāi)始增加或減少某些項(xiàng)工資或扣款數(shù)變化時(shí)，修改某職工的部分工資信息；3 查詢(xún)與統(tǒng)計(jì)：a. 查詢(xún)職工信息，如查詢(xún)?nèi)w職工信息，或按職稱(chēng)、學(xué)歷、出生年月、出生年月之前/ 之后、已婚/ 未婚等條件或多個(gè)條件的組合來(lái)查詢(xún)相應(yīng)的職工信息。b. 查詢(xún)指定編號(hào)職工的工資信息；c. 按時(shí)間段統(tǒng)計(jì)職工收入或單位的工資支出。三、 概要設(shè)計(jì)四、 詳細(xì)設(shè)計(jì)void CWorkerMgr6View:OnExit()OnExit();void CWorkerMgr6View:OnRecordFirst()if(m_pSet-IsBOF()m_pSet-SetFieldNull(NULL);elsem_pSet-MoveFirst();UpdateData(FALSE);/更新對(duì)話(huà)框窗口void CWorkerMgr6View:OnRecordLast()m_pSet-MoveLast();UpdateData(FALSE);/更新對(duì)話(huà)框窗口void CWorkerMgr6View:OnRecordNext()if(m_pSet-IsBOF()m_pSet-SetFieldNull(NULL);/判斷是否溢出if(m_pSet-IsEOF()AfxMessageBox(已經(jīng)到達(dá)最后記錄);elsem_pSet-MoveNext();UpdateData(FALSE);void CWorkerMgr6View:OnRecordPre()if(m_pSet-IsBOF()AfxMessageBox(已經(jīng)到達(dá)第一個(gè)記錄);m_pSet-MoveFirst();m_pSet-MovePrev();UpdateData(FALSE);void CWorkerMgr6View:OnAddWorker()HRESULT hr;tryhr =m_pConnection.CreateInstance(ADODB.Connection);/創(chuàng)建Connection對(duì)象if(SUCCEEDED(hr)hr=m_pConnection-Open(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=worker.mdb,adModeUnknown);/連接數(shù)據(jù)庫(kù)/上面一句中連接字串中的Provider是針對(duì)ACCESS2000環(huán)境的，對(duì)于ACCESS97,需要改為:Provider=Microsoft.Jet.OLEDB.3.51;catch(_com_error e)/捕捉異常CString errormessage;errormessage.Format(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(errormessage);/顯示錯(cuò)誤信息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);/創(chuàng)建Connection對(duì)象if(SUCCEEDED(hr)hr=m_pConnection-Open(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=worker.mdb,adModeUnknown);/連接數(shù)據(jù)庫(kù)/上面一句中連接字串中的Provider是針對(duì)ACCESS2000環(huán)境的，對(duì)于ACCESS97,需要改為:Provider=Microsoft.Jet.OLEDB.3.51;catch(_com_error e)/捕捉異常CString errormessage;errormessage.Format(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(errormessage);/顯示錯(cuò)誤信息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);/創(chuàng)建Connection對(duì)象if(SUCCEEDED(hr)hr=m_pConnection-Open(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=worker.mdb,adModeUnknown);/連接數(shù)據(jù)庫(kù)/上面一句中連接字串中的Provider是針對(duì)ACCESS2000環(huán)境的，對(duì)于ACCESS97,需要改為:Provider=Microsoft.Jet.OLEDB.3.51;catch(_com_error e)/捕捉異常CString errormessage;errormessage.Format(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(errormessage);/顯示錯(cuò)誤信息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);/創(chuàng)建Connection對(duì)象if(SUCCEEDED(hr)hr=m_pConnection-Open(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=worker.mdb,adModeUnknown);/連接數(shù)據(jù)庫(kù)/上面一句中連接字串中的Provider是針對(duì)ACCESS2000環(huán)境的，對(duì)于ACCESS97,需要改為:Provider=Microsoft.Jet.OLEDB.3.51;catch(_com_error e)/捕捉異常CString errormessage;errormessage.Format(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(errormessage);/顯示錯(cuò)誤信息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);/創(chuàng)建Connection對(duì)象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(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(errormessage); /顯示錯(cuò)誤信息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);/創(chuàng)建Connection對(duì)象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(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(errormessage); /顯示錯(cuò)誤信息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);/創(chuàng)建Connection對(duì)象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(連接數(shù)據(jù)庫(kù)失敗!rn錯(cuò)誤信息:%s,e.ErrorMessage();AfxMessageBox(error