【正文】 else showmessage(copy(,1,4)+39。39。39。39。SELECT * FROM kqb_1 WHERE ny=39。 end。 。39。++39。39。39。]+39。+ADOQuery3[39。39。+ 39。).AsString+39。+(39。 := 39。 。) 。39。]+39。+ADOQuery3[39。39。SELECT ++++++39。 。 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XVII ADOQuery:=(self)。) 。39。+ +39。39。 begin i:= dmrsgl. QueryExeSQL(ADOQuery3,39。 var i:integer。 （ 8）工資計(jì)算 由于進(jìn)行畢業(yè)設(shè)計(jì)時(shí)間較倉(cāng)促，出勤率與基本工資計(jì)算對(duì)應(yīng)關(guān)系未調(diào)研清楚，本人編寫(xiě)了簡(jiǎn)單的計(jì)算方法，即工資總額是全勤下的標(biāo)準(zhǔn)工資，扣除工資： 1 天病假扣除 15 元，其請(qǐng)假天數(shù)扣除 20 元 /天，實(shí)際工資為工資總額 扣除工資。通過(guò)調(diào)查，員工基本工資包括：技能標(biāo)準(zhǔn)、技術(shù)工資、職工工資、崗位工資、工齡工資、住房補(bǔ)貼公積金等，具體如下窗口內(nèi)容： 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XVI 在上面窗口中選擇單位，列表中就列出了選擇單位的人員信息，點(diǎn)中人員信息，進(jìn)行職工工資標(biāo)準(zhǔn)數(shù)據(jù)的錄入。) 。39。+ +39。39。+ 39。 dmrsgl. QueryExeSQL(ADOQuery3,39。月還沒(méi)有考勤 !39。 年39。) 。39。++39。39。39。+ +39。39。+ 39。 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XV i:= dmrsgl. QueryExeSQL(ADOQuery3,39。)39。39。39。 and Name in (select Name from zgb where dwbh=39。39。39。 + AS KQTS FROM kqb where ny=39。 + + + + + + + + 39。 + + + + + + + + 39。 + + + + + + + + 39。 insert into kqb_1(Num,Name,ny,gzts ) SELECT Num, Name, ny, + + + + + 39。 。 end 。)39。39。39。 and Name in (select Name from zgb where dwbh=39。39。39。 delete * from kqb_1 where ny=39。 。) 。39。+ +39。39。+ 39。 begin 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XIV i:= dmrsgl. QueryExeSQL(ADOQuery3,39。 考勤統(tǒng)計(jì)的程序算法如下： procedure (Sender: TObject)。 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XIII （ 6）單位考勤統(tǒng)計(jì) 當(dāng)每個(gè)單位的職工正常工作考勤確定后，還存在職工請(qǐng)假、事假等一些非正常工作日。等等。人員信息維護(hù)窗重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XII 口如下： 在一個(gè)優(yōu)秀的設(shè)計(jì)中，為了減少系統(tǒng)維護(hù)所帶來(lái)的工作，盡量在程序中做到動(dòng)態(tài)調(diào)用參數(shù)和值，比如以上界面中的籍貫、民族、文化 程度、工程、職務(wù)等可供選擇的項(xiàng)，可以定義在一個(gè)代碼表中，通過(guò)分類(lèi)碼分類(lèi)使用這些值，就如所在部門(mén)名稱(chēng)一樣，將單位名稱(chēng)提前定義后，在職工信息表中，直接選擇這些單位，就是該項(xiàng)職工的工作單位了。 如單位職工人員需要增加或維護(hù)時(shí)，請(qǐng)進(jìn)入職工信息窗口。在以下界面，就完成上述兩個(gè)功能，即右上角數(shù)據(jù)區(qū)定義單位信息；點(diǎn)擊左邊的單位，就在右下角數(shù)據(jù)區(qū)顯示該單位的職工信息。 即用戶(hù)選擇用戶(hù)名后，輸入正確的口令后，系統(tǒng)自動(dòng)到數(shù)據(jù)庫(kù)重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ X usertrb 表里驗(yàn) 證密碼，如果試密碼次數(shù)大于 3 時(shí)，退出系統(tǒng)，流程圖如下： 圖 6 系統(tǒng)登錄流程 密碼正確進(jìn)入系統(tǒng)主界面： 圖 7 系統(tǒng)主窗口 開(kāi)始輸入用戶(hù)名和口令是否有當(dāng)前用戶(hù)和口令否次數(shù) N + 1次數(shù) N = 3否進(jìn)入主窗口是退出系統(tǒng)是結(jié)束 否否重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ XI （ 3）單位信息管理 對(duì)于職工考勤人員來(lái)說(shuō)，職工人員最基本的分類(lèi)方法是按單位。 end end。,mb_ok+mb_iconerror)。,39。 end else //QUIT SYSTEM begin (39。 。 :=39。錯(cuò)誤 39。密碼錯(cuò)誤 ,請(qǐng)重試 !39。 modalresult:=mrok。name39。).AsString。 if recordcount0 then begin //符值給其它變量 identify:=fieldbyname(39。 (findstring)。and password=39。select * from usertrb where name=39。 。 var findstring:string。 end。39。+ExtractFilePath(paramstr(0))+39。+ 39。User ID=Admin。Provider=。 begin :=False。具體源碼如下： 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ VIII procedure (Sender: TObject)。 （ 3） ado 連接數(shù)據(jù)庫(kù) 程序數(shù)據(jù)接口部分采用 ADO 和連接數(shù)據(jù)庫(kù)連接，以便應(yīng)用程序的移植。 Delphi 非常擅長(zhǎng)數(shù)據(jù)庫(kù)編程，因?yàn)樗m用于多種數(shù)據(jù)庫(kù)結(jié)構(gòu)，從客戶(hù)機(jī) /服務(wù)器模式到多層數(shù)據(jù)庫(kù)模式，另外大量的控件給開(kāi)發(fā)數(shù)據(jù)庫(kù)程序提供了極大的便捷。 總體數(shù)據(jù)流程結(jié)構(gòu)圖 圖 3 系統(tǒng)數(shù)據(jù)流程結(jié)構(gòu)圖 單位信息職工信息考勤信息工資標(biāo)準(zhǔn)個(gè)人月工資 單位工資表重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ VI 圖 4 系統(tǒng)功能圖 重油公司工資管理信息系統(tǒng)職工管理 考勤管理 工資管理 報(bào)表管理 系統(tǒng)管理職工信息單位信息職工花名冊(cè)考勤統(tǒng)計(jì)考勤登記工資標(biāo)準(zhǔn)職工考勤表職工薪資報(bào)表個(gè)人工資用戶(hù)管理月底統(tǒng)計(jì)重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ VII 編寫(xiě)目的 系統(tǒng)是根據(jù)工資考勤工作過(guò)程中，從單位、職工、考勤、工資等四個(gè)環(huán)節(jié)進(jìn)行分析和設(shè)計(jì)，最終的目的就是提高職工考勤工作效率。 假設(shè)和約束 該軟件運(yùn)行需在 Windows 環(huán)境下，客戶(hù)端內(nèi)存至少 32M。 重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ V . 軟件總體目標(biāo) 生產(chǎn)單位在人員相對(duì)穩(wěn)定的情況下進(jìn)行考勤記錄，計(jì)算職工工資，每月都是重復(fù)性工作。 4. 根據(jù)每個(gè)職工的出勤天數(shù)，工資級(jí)別、工齡等計(jì)算月工資等 5. 報(bào)表輸出：主要包括職工花名冊(cè)、考勤表、工資表等。 功能要求 本人通過(guò)對(duì)單位職工考勤和工資計(jì)算方法等方面的調(diào)研，需要完成以下方面信息的管理及功能實(shí)現(xiàn)： 1. 單位信息：一般包括單位名稱(chēng)、單位簡(jiǎn)稱(chēng)、單位電話，根據(jù)數(shù)據(jù)統(tǒng)計(jì)和人事管理方面的要求，還需要單位編碼； 2. 單位職工信息：其中包括姓名、性別、族別、籍貫、出生產(chǎn)蟆、民族，學(xué)歷、聯(lián)系電話、身份證、工作時(shí)間等，主要為本單位人員提供一個(gè)人員信息庫(kù)。系統(tǒng)管理主要是對(duì)系統(tǒng)用戶(hù)、用戶(hù)密 碼的管理，還可以根據(jù)使用者的要求，控制系統(tǒng)功能權(quán)限或數(shù)據(jù)權(quán)限等。 $ $ $各單位或科室人事主管人員信息人員信息人員信息考勤工資及各類(lèi)統(tǒng)計(jì)報(bào)表有關(guān)領(lǐng)導(dǎo)審批工資統(tǒng)計(jì)存檔重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ III 圖 2 功 能模塊圖 通過(guò)工資考勤管理業(yè)務(wù)調(diào)研分析，根據(jù)面向?qū)ο蟮脑O(shè)計(jì)方法進(jìn)行設(shè)計(jì)，首先需要進(jìn)行職工人員信息的管理，即職工管理，工資考勤中涉及的職工一般是按單位進(jìn)行分類(lèi)的，所以在設(shè)計(jì)過(guò)程中，需要加入單位信息，即某一單位有哪些職工組成。按單位統(tǒng)計(jì)職工工資并計(jì)算總工資、扣除工資及實(shí)發(fā)工資等并打印輸出各類(lèi)報(bào)表。重油公司工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) _______________________________________________________________________ II WINDOW XP 操作系統(tǒng) 用戶(hù) 單機(jī)用戶(hù)方式，單位考勤管理人員使用。 職工花名冊(cè)：按單位分類(lèi)登記每個(gè)職工主要信息的報(bào)表。在信息化快速發(fā)展的今天，各個(gè)企業(yè)部門(mén)使用的信息管理系統(tǒng)較為普遍，教材上關(guān)于職工考勤、工資的信息系統(tǒng)的圖、表以及程序的程序可以 也 參考，因此， 我 建立《重油公司職工 工資 管理系統(tǒng)》作為我的畢業(yè)設(shè)計(jì)題目 是可行的。 公司 職工 工資管理信息系統(tǒng) 畢 業(yè) 設(shè) 計(jì) I 在任何一個(gè)企業(yè)里，職工考勤、工資的核算和發(fā)放是必不可少的一個(gè)環(huán)節(jié)。 關(guān)鍵詞： 查詢(xún)、修改、維