【正文】 在程序設(shè)計的過程中還得到了很多人的幫助和支持，并且參考了一些技術(shù)資料。首先，在即將畢業(yè)之際，還要感謝所有培養(yǎng)過我的老師們，正是他們傳道、授業(yè)、解惑才使我的專業(yè)課水平不斷進步與提高，才能在設(shè)計過程中做得更好。才會為后來的設(shè)計打下良好的基礎(chǔ)。從開發(fā)此系統(tǒng)開始無論遇到什么困難，我都沒有一絲的放棄的念頭。 [22,]:=floattostr(sf)。,strtofloat([17,i]))。39。 [6,i]:=FormatFloat(39。 sf:=sfstrtofloat([21,i])。 [17,i]:=FormatFloat(39。 //yf:=FormatFloat(39。 yf:=yf+strtofloat([6,i])+strtofloat([8,i])+strtofloat([9,i])。 for j:=0 to 20 do [j+2,i]:= floattostr([j].asfloat)。%39。y239。y139。 (39。)。sum(z9),sum(z10),sum(z11),sum(z12),39。 (39。)。 for i:=1 to do begin 。 j:=j+1。仿宋39。 //設(shè)置數(shù)據(jù)行字體,大小 s:=39。隸書39。A1:F139。//字體顏色 [1].Range[39。 then [1].Cells[h+2,j+1].Value :=[j,h]。 //表頭 i := 2。 //單元格居中 [1].range[39。 //增加一個工作表 MyworkBook:=。 except on Exception do raise (39。)。 i,j,h:integer。 end。 for i:=1 to do begin for j:=0 to 22 do begin [j,k]:=[j,0]。for I := 0 to 1 do [i].Clear。 //選中工資表beginif =true then begin :=true。 [,j]:=floattostr(yf)。,strtofloat([i,17]))。39。 [i,23]:=FormatFloat(39。39。39。 yf:=yf+strtofloat([i,10])+strtofloat([i,11])+strtofloat([i,12])。 當月報表核心代碼：procedure (Sender: TObject)。 當月數(shù)據(jù)存檔OK! 39。 end。 showmessage(39。 存檔失敗,程序退出! 39。).Value:=+39。 where ( rq like :rq )39。 (39。).AsFloat。 (39。y2339。).Value:=(39。k239。).AsFloat。 (39。y1939。).Value:=(39。j239。).AsFloat。 (39。y1539。).Value:=(39。z1139。).AsFloat。 (39。y1139。).Value:=(39。z739。).AsFloat。 (39。y739。).Value:=(39。z339。).AsFloat。 (39。y339。).Value:=(39。bh39。).AsString。 (39。)。 End。 except showmessage(39。 (39。 exit。)。 showmessage(39。 Try 。 (39。)。Select count(*) 39。)。 showmessage(39。 Try 。)。 。 存檔失敗,程序退出! 39。).Value:=+39。 where ( rq like :rq )39。 (39。 var i,x,y:integer。 End。).AsString+(39。 。 Try 。)。 。39。 var i:integer。begin :=false。 。rq39。 [5,i]:=floattostr((39。).Asfloat)。j139。 [1,i]:=floattostr((39。bh39。水電暖39。夜班39。崗位資39。 :=7。 。 Try 。%39。)。Select bh,xm,z1,j1,j3,k1,k2,rq From ry 39。 var i:integer。 showmessage(39。)。%39。%39。).Value:=[6,i]。k239。 (39。).Value:=strtofloat([3,i])。j239。 (39。)。 update ry set j1=:j1,j2=:j2,j3=:j3,j4=:j4, 39。 for i:=1 to do begin s:=[0,i]。 end。列有非法數(shù)字39。第39。 then exit。確認更新數(shù)據(jù)嗎?39。 var i,j,k:integer。 End。).AsString+(39。 。 Try 。)。 。procedure (Sender: TObject)。 var Action: TCloseAction)。 End。 [10,i]:=floattostr((39。).Asfloat)。z939。 [6,i]:=floattostr((39。).Asfloat)。z539。 [2,i]:=floattostr((39。).AsString。 [0,i]:=(39。bh39。 //(39。公積金39。教護齡39。醫(yī)務補39。月效資39。崗位資39。 For I:=0 To Do [I].Clear。 。 Try 。%39。)。Select bh,xm,z1,z4,z5,z6,z7,z8,z9,z10,k3,kbx From ry 39。 var i:integer。 showmessage(39。)。).Value:=strtofloat([10,i])。).Value:=copy(s,1,2)+39。).Value:=copy(,3,20)+39。k339。//(39。).Value:=strtofloat([8,i])。z939。(39。).Value:=strtofloat([4,i])。z539。(39。).Value:=strtofloat([1,i])*。z139。(39。)。 。 if k0 then exit。)。+inttostr(i)+39。 k:=0。,mtconfirmation,[mbyes,mbno],0) =mrno then exit。 var i,j,k:integer。 for i:=10 to 99 do (inttostr(i))。 。mc39。)。)。Select mc From bm 39。begin:=rgb(220,170,140)。action:=cafree。end。 :=39。).AsString)。).AsString+39。 For I:=1 To Do Begin (39。 End。 except showmessage(39。bm39。 (39。)。 。end。).AsString)。).AsString+39。 For I:=1 To Do Begin (39。 End。 except showmessage(39。bm39。 (39。)。 。end。)。%39。%39。)。delete from ry 39。 if (length()2) then exit。beginif messagedlg(39。 end。 except showmessage(39。 (39。).Value:=。 Values(:y0,:y1,:y2) 39。 (39。 exit。begin :=trim()。 for i:=10 to 50 do (inttostr(i))。begin:=rgb(220,170,140)。action:=cafree。end。).AsString)。bh39。編號39。 :=+1。服務器連接error,程序退出!39。 order by bh39。 (39。procedure (Sender: TObject)。 。 Try 。 (39。)。procedure (Sender: TObject)。 。 Try ExecSql。).Value:=。 Values(:y0,:y1) 39。 (39。 exit。begin :=trim()。此模塊包括部門和員工的基本信息維護，具體功能包括，部門信息的添加和刪除，員工信息的添加和刪除。 。+timetostr(time)。系統(tǒng)日期:39。 end。 except showmessage(39。在狀態(tài)欄顯示系統(tǒng)日期和登錄系統(tǒng)時間。不但能大大減少重復性的書面報告，降低辦公費用，提高辦公室效率，而且能提高檢測數(shù)據(jù)效用，為企業(yè)提供很方便。通過對Delphi和Oracle的系統(tǒng)學習，已經(jīng)基本掌握了開發(fā)本系統(tǒng)所需的技術(shù)和查閱文獻的能力。③完善的數(shù)據(jù)輸入，維護，輸出。本系統(tǒng)擬在完成工資管理的同時，集成其他必要的功能，以保證系統(tǒng)的完整性和安全性。Delphi數(shù)據(jù)庫應用程序是通過數(shù)據(jù)庫引擎來訪問它們引用的數(shù)據(jù)源的。Oracle 數(shù)據(jù)庫 11 g中新增的故障診斷功能使客戶在發(fā)生錯誤后捕獲 OracleSupport所需的數(shù)據(jù)變得極為簡單。11 g降低了數(shù)據(jù)庫升級以及其他硬件和操作系統(tǒng)更改的成本，顯著簡化了更改前后的系統(tǒng)測試以便您可以識別和解決問題。⑵Oracle簡介Oracle的關(guān)系數(shù)據(jù)庫是世界第一個支持SQL語言的數(shù)據(jù)庫。 　　⑧。 Delphi既可用于開發(fā)系統(tǒng)軟件，也適合于應用軟件的開發(fā)。開發(fā)人員不必再對諸如標簽、按鈕及對話框等Windows的常見部件進行編程。這樣，大大減少了對服務器的請求和網(wǎng)絡上的數(shù)據(jù)傳輸量，提高了應用處理的速度。Delphi具有如下特點：①直接編譯生成可執(zhí)行代碼，編譯速度快。在CodeGear的發(fā)展規(guī)劃中，或許“Delphi”不再是Object Pascal的專屬IDE名稱，而是將之提升到通用IDE品牌的層次。Borland公司因而把Object Pascal改稱為Delphi。Delphi所編譯的可運行檔，雖然容量較大，但效能上卻比較快。經(jīng)過數(shù)年的發(fā)展，此產(chǎn)品也轉(zhuǎn)移至Embarcadero公司旗下。與其他開發(fā)工具相比，Delphi與Oracle有著自己的特點與優(yōu)勢。④能提供分布式數(shù)據(jù)庫功能。IBM DB2的創(chuàng)始人Donald Haderle先生與國內(nèi)著名數(shù)據(jù)庫專家,就下世紀數(shù)據(jù)庫發(fā)展的趨勢、數(shù)據(jù)庫領(lǐng)域革命性的突破、IBM DB2的應用、數(shù)據(jù)倉庫的實施、我國數(shù)據(jù)庫技術(shù)和應用的現(xiàn)狀及趨勢、我國數(shù)據(jù)庫用戶的需求等問題,進行了廣泛而深入的討論。傳統(tǒng)的數(shù)據(jù)庫系統(tǒng)旨在處理永久、穩(wěn)定的數(shù)據(jù)，強調(diào)維護數(shù)據(jù)的完整性、一致性。本系統(tǒng)開發(fā)的主要目的就是要使企事業(yè)單位工資管理實現(xiàn)計算機管理，使管理員能夠有序地管理每一位職工的各項工資條款的發(fā)放以及員工個人臺帳的生成，使企業(yè)運用現(xiàn)代化技術(shù)創(chuàng)造更多更高的經(jīng)濟效益。通過工資人事管理可以獲得并維持組織的競爭優(yōu)勢，人作為公司最重要的資產(chǎn)，如何用好人才，為每個人找到合適的崗位去發(fā)揮其特長是用人的關(guān)鍵環(huán)節(jié)。財務是每一個單位都會涉及的問題，管理軟件雨后春筍般崛起的今天，企業(yè)不僅需要通過軟件有效地對其實施管理，還想操作能夠盡可能簡單，軟件易于上手。而管理信息系統(tǒng)（Management Information System, MIS）在辦公自動化的進程中發(fā)揮著重要的作用。計算機在國內(nèi)的崛起加速了各企事業(yè)單位、機關(guān)的自動化進程，提高了國民生產(chǎn)的效率，從而為國民經(jīng)濟的飛速發(fā)展創(chuàng)造了必要的條件。電子商務也會隨著網(wǎng)絡的發(fā)展日益貼近人們的生活。文筆流暢、語言通順、使用專業(yè)術(shù)語準確，圖表清楚，符合要求。5存在問題工作措施主要是各個功能塊的連接方式還存在問題，待老師幫助解決后，有了初步的解決構(gòu)思。編 號： 審定成績： 先鋒軟件學院2011屆畢業(yè)論文題目： ERP工資管理系統(tǒng) 分 院： 軟件工程分院 學生姓名： 專 業(yè)： 計算機應用技術(shù)