【正文】 根據(jù)員工編號和等級判斷記錄是否存在 function ProtitleRec4(Name,Dji:string):Boolean。 Delphi + SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計報告書 27 表 414 Tportitle 類封裝的方法和過程 方法或過程名 具體說明 function ProtitleRec(Id:string):Boolean。 通過 SQL 語句執(zhí)行按員工編號和月份刪除操作過程 procedure RecDel1(Name,month:string)。 根據(jù)員工編號和月份返回員工備注 function CheckInfoRecs(SQL:string):OLEVariant。 根據(jù)員工編號和月份返回員工遲到天數(shù) function GetLeaEarTimes(Id,month:string):string。 根據(jù)員工編號和月份返回員工應(yīng)出勤天數(shù) function GetBusinessDays(Id,month:string):string。 根據(jù)員工編號和月份返回員工姓名 function GetMonthDays(Id,month:string):string。 根據(jù)員工姓名和月份判斷記錄是否存在 function CheckInfoRec2(Id:string):Boolean。 通過 SQL 語句執(zhí)行修改操作過程 procedure RecDel(Id:string)。 根據(jù)工資方案編號返回征稅下限 function GetJiangJin(Id:string):string。 根據(jù)工資方案編號返回其他加班工資 function GetChuChai(Id:string):string。 根據(jù)工資方案編號返回礦工扣除 function GetZaoTui(Id:string):string。 根據(jù)工資方案編號返回工傷保險 function GetYiLiao_BX(Id:string):string。 根據(jù)工資方案編號返回特級員工工資 function GetYiJi_YG(Id:string):string。 根據(jù)工資方案編號返回副科長工資 function GetBuZhang(Id:string):string。 通過 SQL 語句獲取所有工資方案編號 function GetJingLi(Id:string):string。 通過 SQL 按月份執(zhí)行刪除操作過程 4. Twageset類 Twageset 類 封裝了對 WAGE_SET 表的各種操作，類中定義的方法和過程如表 412所示。 通過 SQL 按員工編號和月份執(zhí)行刪除操作過程 procedure RecDel1(Name,GiveDate:string)。 根據(jù)員工編號和月份返回實發(fā)工資 function WagesRecs(SQL:string):OLEVariant。 根據(jù)員工編號和月份返回工傷保險 function GetUnemployMoney(Id,GiveDate:string):string。 根據(jù)員工編號和月份返回加班費 function GetDeductCheck(Id,GiveDate:string):string。 根據(jù)員工編號和月份返回基本工資 function GetAllowance1(Id,GiveDate:string):string。 根據(jù)員工編號和月份返回工資方案編號 function GetDepartment(Id,GiveDate:string):string。 根據(jù)員工姓名判斷查詢記錄是否存在 function WageInfoRec5(GiveDate:string):Boolean。 表 311 Twageinfo 類 封裝的方法和過程 方法或過程名 具體說明 function WageInfoRec(Id,GiveDate:string):Boolean。 通過 SQL 語句執(zhí)行按員工姓名刪除操作過程 procedure RecDel4(Place:string)。 通過 SQL 語句返回查詢信息 procedure RecInsert(InsertSQl:string)。 根據(jù)記錄編號返回員工擔(dān)任職務(wù) function GetLevel1(ReId:string):string。 根據(jù)記錄 編號返回員工姓名 function GetBeginDate(ReId:string):string。 根據(jù)員工 姓名和工作單位 判斷查詢記錄是否存在 function WorkAgeRec1(FindSQL:string):Boolean。 根據(jù)員工編號判斷查詢 記錄是否存在 function WorkAgeRec3(Name:string):Boolean。 通過傳遞 SQL 語句執(zhí)行修改操作過程 procedure RecDel(Id:string)。 修改指定員 工編號 的照片信息 procedure WorkId(Id:string。 根據(jù)員工編號返回員工 備注 function GetPhoto(WorkId:string):string。 根據(jù)員工編號返回員工 參加工作日期 function GetComeTime(WorkId:string):string。 根據(jù)員工編號返回員工 學(xué)歷 function GetMajor(WorkId:string):string。 根據(jù)員工編號返回員工 性別 function GetBirth(WorkId:string):string。 根據(jù)員工編號返回員工檔案編號 function GetWorkerName (WorkId:string):string。 根據(jù)員工性別判斷記錄是否存在 function CheckRec4(XL:string):Boolean。 表 39 Tbasedata 類封裝的方法和過程 方法或過程名 具體說明 function CheckRec(Id:string):Boolean。 表 35 員工履歷信息表 字段名 數(shù)據(jù)類型 長度 主鍵 功能描述 RECORD_ID Bigint 8 是 記錄號 WORKER_ID Nvarchar 15 否 員工編號 WORKER_NAME Nvarchar 8 否 員工姓名 BEGIN_DATE Datetime 否 起始日期 OVER_DATE Datetime 否 終止日期 UNIT_NAME Nvarchar 20 否 單位名稱 WORK_TIME Float 8 否 工齡 DUTY Nvarchar 10 否 擔(dān)任職位 LEVEL Nvarchar 4 否 級別 REMARK Nvarchar 255 否 備注 （ 6）員工工作信息表 (WAGE_INFO) Delphi+SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計報告書 20 員工工資信息表的作用是存入各員工每個月的工資信息，其 結(jié)構(gòu)如表 36所示。 表 31 基本信息表 字段名 數(shù)據(jù)類型 長度 主鍵 功能描述 WORKER_ID Nvarchar 15 是 員工編號 ARCHIVES_ID Nvarchar 10 否 檔案編號 Delphi+SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計報告書 18 WORKER_NAME Nvarchar 10 否 員工姓名 DEPARTMENT_NAME Nvarchar 10 否 部門名稱 SEX Nvarchar 2 否 員工性別 POSITION Nvarchar 10 否 員工職位 BIRTHDAY Datetime 否 出生日期 NATIVE_PLACE Nvarchar 10 否 籍貫 SCHOOL_AGE Nvarchar 10 否 學(xué)歷 MAJOR Nvarchar 10 否 專業(yè) GRADUATE_SCH Nvarchar 10 否 畢業(yè)學(xué)校 POLITIC_STATUS Nvarchar 10 否 政治面貌 WORK_TIME Datetime 否 參加工作時間 COME_TIME Datetime 否 入本單位時間 LINK_PHONE Nvarchar 14 否 聯(lián)系電話 ADDRESS Nvarchar 25 否 住址 PHOTO Image 否 照片 NATIONALITY Nvarchar 10 否 民族 ID_NO Nvarchar 18 否 身份證號 REMARK Nvarchar 255 否 備注 （ 2） 員工考勤信息表 (CHECK_INFO) 員工考勤信息表的作用是存入每個員工每個月的考勤信息，其結(jié)構(gòu)如表32所示。 1．標(biāo)識需要的數(shù)據(jù)； 2．收集被標(biāo)識的字段到表中； 3．標(biāo)識主關(guān)鍵字字段； 4．繪制一個簡單的數(shù)據(jù)圖表； 5．規(guī)范數(shù)據(jù)； 6．標(biāo)識指定字段的信息； 7．創(chuàng)建物理表。數(shù)據(jù)庫在系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫設(shè)計的好壞將直接影響系統(tǒng)的效率。 數(shù)據(jù)采集部分：主要完成 每月考勤信息 。 （ 7） 工資管理模塊主要是：設(shè)置員工的 各項 工資信息 以及編輯員工工資 。 （ 3） 員工 考勤信息管理模塊主要功能是記錄員工每月的出 勤情況，以便在員工工資編輯時，調(diào)用相關(guān)信息。SQL Server 2021 包括加速從概念到最后交付開發(fā)過程的工具。使用 SQL Server 2021 可以獲得非凡的可伸縮性和可靠性。 （二） SQL Server 2021 簡介 SQL Server 2021 繼承了數(shù)據(jù)庫軟件設(shè)計和引擎方面的優(yōu)勢，已經(jīng)成為新一代網(wǎng)絡(luò)應(yīng)用程序的最佳數(shù)據(jù)庫和分析解決方案之一。您所需要做的，只是在程序中加入完成您所需功能的代碼而已。缺省的應(yīng)用程序是一個空白的窗體 (Form)，您可以運行它，結(jié)果得到一個空白的窗口。 Delphi + SQL Server 企業(yè)人事管理系統(tǒng)設(shè)計報告書 11 Delphi實際上是 Pascal 語言的一種版本，但它與傳統(tǒng)的 Pascal 語言有天壤之別。 （ 3） 編譯器的速度和已編譯代碼的效率。它使用了 Microsoft Windows圖形用戶界面的許多先進特性和設(shè)計思想，采用了彈性可重復(fù)利用的完整的面向?qū)ο蟪绦蛘Z言 (ObjectOriented Language)、當(dāng)今世界上最快的編輯器、最為領(lǐng)先的數(shù)據(jù)庫技術(shù)。可見， VC++與 Delphi是兩種較優(yōu)秀的語言開發(fā)工具。 從本人的實際情況看：因為在校期間也有學(xué)習(xí)過可視化的編程，對這一類的軟件的使用也有較深的認識，所以說選用 SQL Server 2021作為開發(fā)工具是很有優(yōu)勢的。而事實證明： SQL數(shù)據(jù)庫是一個廣泛使用、簡單易用、性能價格比較高、工具完整而又豐富、界面友好、處理速度高的關(guān)系型數(shù)據(jù)庫。本軟件界面美觀、使用方便，是企業(yè)人事管理必不可缺的好幫手。企業(yè)人事管理可以說是一項瑣碎、繁雜而又必須十分細致的工作，是不能允許時常發(fā)生差錯的。企業(yè)人事管理是相對企業(yè)內(nèi)部員工的管理。隨著計算機技術(shù)的飛速發(fā)展，計算機在企業(yè)管理中應(yīng)用的普及，利用計算機實現(xiàn)企業(yè)人事管理勢在必行。事實上，對一個國家來說，信息決定其如何建設(shè)和治理；對一個人來說，信息是其決定如何發(fā)展才能適應(yīng)社會需要的 基本要求；對政府來說，各種必須的信息是其賴以生存和活動至關(guān)重要的條件；而對與任何工商貿(mào)企業(yè)來說，信息就是他們的生命線，沒有大量的信息想要在市場環(huán)境下生存是不可能的。 時至今日，計算機正在令人難以置信的速度步入普通人的學(xué)習(xí)、工作和生活。 MIS系統(tǒng)涉及到多方面的內(nèi)容，因此，人們稱 MIS學(xué)科是一個交叉綜合性的學(xué)科。這是長期以來困惑 人們的一大問題?，F(xiàn)在，數(shù)據(jù)庫技術(shù)正在被用來同 Inter技術(shù)相結(jié) 合，以便在機構(gòu)內(nèi)聯(lián)網(wǎng)、部門局域網(wǎng)甚至 WWW上發(fā)布數(shù)據(jù)庫數(shù)據(jù)。當(dāng)時的數(shù)據(jù)庫處理技術(shù)還很脆弱，常常發(fā)生應(yīng)用不能提交的情況。后來隨著個人計算機的普及，數(shù)據(jù)庫技術(shù)被移植到 PC機 (Personal Computer，個人計算機 )上，供單用戶個人數(shù)據(jù)庫應(yīng)用。 ③ 必須對其他系統(tǒng)開放。 3. 第三代數(shù)據(jù)庫系統(tǒng) 從 20世紀(jì) 80年代以 來，數(shù)據(jù)庫技術(shù)在商業(yè)上的巨大成功刺激了其他領(lǐng)域?qū)?shù)據(jù)庫技術(shù)需求的迅速增長。 20世紀(jì) 70年代是關(guān)系數(shù)據(jù)庫理論研究和原型開發(fā)的時代，其中以 IBM公司的 San Jose研究試驗室開發(fā)的 System R和 Berkeley大學(xué)研制的 Ingres為典型代表。 可以說，層次數(shù)據(jù)庫是數(shù)據(jù)庫系統(tǒng)的先驅(qū)，而網(wǎng)狀數(shù)據(jù)庫則是數(shù)據(jù)庫概念、 方法、技術(shù)的奠基者。層次數(shù)據(jù)庫系統(tǒng)的典型代表是 1969年 IBM公司研制出的層次模型的數(shù)據(jù)庫管理系統(tǒng) IMS。 數(shù)據(jù)庫技術(shù)發(fā)展歷史 數(shù)據(jù)模型是數(shù)據(jù)庫技術(shù)的核心和基礎(chǔ)，因此，對數(shù)據(jù)庫系統(tǒng)發(fā)展階段的劃分應(yīng)該以數(shù)據(jù)模型的發(fā)展演變作為主要依據(jù)和標(biāo) 志。 關(guān)鍵字： Delphi SQL Server 2021，類，原型法。 本系統(tǒng)主要包括人員基本情況管理、考勤信息管理、獎懲信息管理、履歷信息管理、評定信息管理、工資管理等幾個 方面的功能 , 提