企業人事管理系統設計報告書-預覽頁

　

【正文】 增加上去，直到所有的性質全部滿足。二是前 端應用程序的開發。本系統是一個典型的信息管理系統，它的開發主要包括兩個方面，一是后臺數據庫的建立，維護。 在本系統開發中，使用原型法（ Rapid Prototyping）即以少量代價快速地構造一個可執行的軟件系統模型。 本系統采用類的封裝的方法，大大地減小了代碼的冗繁，使系統可行性更加好。在這 30多年的歷程中，人們在數據庫技術的理論研究和系統開發上都取得了輝煌的成就，而且已經開始對新一代數據庫系統的深入研究。數據庫技術與網絡通信技術、人工智能技術、面向對象程序設計技術、并行計算技術等相互滲透、有機結合，成為當代數據庫技術發展的重要特征。 DBTG報告確定并建立了網狀數據庫系統的許多概念、方法和技術，是網狀數據庫的典型代表。 1970年 IBM公司的 San Jose研究試驗室的研究員 Edgar F. Codd發表了題為《大型共享數據庫數據的關系模型》的論文，提出了關系數據Delphi + SQL Server 企業人事管理系統設計報告書 7 模型，開創了關系數據庫方法和關系數據庫理論，為關系數據庫技術奠定了理論基礎。 20世紀 80年代幾乎所有新開發的系統均是關系型的，其中涌現出了許多性能優良的商品化關系數據庫管理系統，如 DB Ingres、 Oracle、 Informix、 Sybase等。 1990年高級 DBMS功能委員會發表了《第三代數據庫系統宣言》，提出了第三代數據庫管理系統應具有的三個基本特征： ① 應支持數據管理、對象管理和知識管理。分布式數據庫、并行數據庫、工程數據庫、演繹數據庫、知識庫、多媒體庫、模糊數據庫等都是這方面的實例。現在，數據庫正在 Inter和內聯網中廣泛使用。 1979年，AshtonTate公司引入了微機產品 dBase Ⅱ ，并稱之為關系數據庫管理系統，從此數據庫技術移植到了個人計算機上。自 20世紀 50年代將計算機引入數據處理以來，歷經管理信息系統發展的各個階段。管理信息系統根本不僅是技術系統，而且是社會系統。計算機應用于企業的人事信息處理處理，不僅可以使企業各類人員以最少的勞動和最短的實踐取得足夠的、可靠的、準確的信息。計算機已經成為人們日常工作中處理數據的得力助手和工具，數據處理與科學計算、過程控制、輔助設計一起，并稱為計算機四大應用。同時也說明了一點，就是信息處理也非常的重要。而如今電腦已經深入到日常工作和生活的方方面面，比如文字處理、信息管理、輔助設計、圖形圖像處理、教育培訓以及游戲娛樂等。為企業在人事管理等方面提供極大的方便。合理的利用有助于企業發展的管理系統是企業改革的一種優越的體現。選擇一優秀的數據 庫管理系統作為開發平臺，將給日后的信息處理帶來便利性。 SQL Server 2021 是為數據庫應用程序開發而設計的功能強大、面向對象的編程工具。對底層編程比較需要的地方就大部分 VC++，而 Delphi 的IDE 是非常易用的。故實現本系統用 Delphi 作為開發工具是一個明智的選擇。 DELPHI最顯著的特點就是高效性和穩定性，總的來說，主要體現在以下 6個 方面： （ 1） 可視化開發環境的性能。 （ 5） 數據庫結構的靈活性和擴展性。在骨架上即使沒有附著任何東西，仍可以嚴格地按照設計運行。因此，可以說應用程序框架通過提供所有應用程序共有的東西，為用戶應用程序的開發打下了良好的基礎。由于您并未告訴它接收到用戶輸入后作何反應，窗口除了響應 Windows的基本操作 (移動、縮放等 )外，它只是接受用戶的輸入，然后再忽略。 SQL Server 2021 對 XML和 HTTP 提供充分的支持；提供分割裝載和確保時間的特性；提供先進的管理和協調機制，可以自動管理線程任務，降低總體開銷。主要體現為： （ 1）高度可用性； （ 2）可伸縮性； （ 3）安全性； （ 4）分布式分區圖； （ 5）索引視圖； （ 6）虛擬接口系統網絡； （ 7）復制特性 。 系統功能需求 系統主要功能模塊說明 （ 1） 系統管理模塊的主要功能是版本 信息、 用戶賬戶 設置、 用戶賬戶維護 、 注銷系統以及退出系統 。 （ 5）員工履歷信息管理模塊主要是記錄員工進入本單位前 的履歷信息，為后面的工資計算中的工齡工資計算提供參考信息。根據這個系統所要實現的目的和任務，總結出這個系統最終要實現的主要功能如下： 數據設置部分：主要包括考勤錄入 、各項工資設置、以及員工工資編輯等 功能。 Delphi+SQL Server 企業人事管理系統設計報告書 14 系統功能模塊圖 圖 21 Delphi + SQL Server 企業人事管理系統設計報告書 15 第三章 系統設計 概念設計 （ ER 圖） ①員工基本信息管理 ER圖 ： 圖 31 基本信息 ER圖 ②員工考勤信息管理 ER圖： 圖 32 員工考勤信息 ER圖 ③員工獎懲信息 ER圖： 圖 33 員工獎懲信息 ER圖 Delphi+SQL Server 企業人事管理系統設計報告書 16 ④員工履歷 信息 ER圖： 圖 34 員工履歷信息 ER圖 ⑤員工評定信息 ER圖： 圖 35 員工評定信息 ER圖 ⑥員工工資信息 ER圖： 圖 36 員工工資信息 ER圖 Delphi + SQL Server 企業人事管理系統設計報告書 17 數據庫設計 創建數據庫及數據庫表 數據庫是一種存儲數據并對數據進行操作的工具。 創建任何一個數據庫的第一步 是仔細的規劃數據庫，設計必須是靈活的、有邏輯的。 圖 37 數據庫表 以上各表分別保存員工基本信息、員工考勤信息、員工評定信息、員工獎懲信息、員工工資信息、各項工資設設置、員工履歷信息。 表 33 員工獎懲信息表 字段名 數據類型 長度 主鍵 功能描述 RECORD_ID Bigint 8 是 記錄號 WORKER_ID Nvarchar 15 否 員工編號 WORKER_NAME Nvarchar 8 否 員工姓名 RECORD_DATE Datetime 否 獎懲日期 RECORD_TYPE Nvarchar 2 否 獎懲類型 RECORD_CONTENT Nvarchar 30 否 獎懲內容 RECORD_REASON Nvarchar 30 否 獎懲理由 ALLOW_UNIT Nvarchar 20 否 批準單位 REMARK Nvarchar 255 否 備注 （ 4）員工評定信息表 (PRO_TITLE) 員工評定信息表的作用是存入員工的評定信息，其結構如表 34所示。 對每張數據表的操作都可以封裝到對應類的方法和過程中，在使用類時先要實例化，使用完之后，也要講實例釋放，調用類中方法和過程時只需要向方法和過程傳遞參數就可以實現調用。 根據員工所在部門判斷記錄是否存在 function CheckRec2(ZW:string):Boolean。 根據員工民族判斷記錄是否存在 function CheckRec6(MM:string):Boolean。 根據員工編號返回員工 所在部門 function GetPosition(WorkId:string):string。 根 據員工編號返回員工 籍貫 function GetNationality(WorkId:string):string。 根據員工編號返回員工 畢業學校 function GetPoliSta(WorkId:string):string。 根據員工編號返回員工 聯系電話 function GetAddress(WorkId:string):string。 通過傳遞 SQL 語句返回查詢記錄 procedure PhotoUpdate(Id:string。 根據員工編號和圖片路徑插入一條記錄 procedure RecInsert(InsertSQL:string)。類中定義的方法和過程如表310 所示 表 310 Tworkage 類封裝的方法和過程 方法和過程名 具體說明 function WorkAgeRec(Id,Work_unit:string):Boolean。 根據員工 工作單位 判斷查詢記錄是否存在 Delphi + SQL Server 企業人事管理系統設計報告書 23 function WorkAgeRec5(Id,Place:string):Boolean。 根據記錄編號返回員工編號 function GetUnitName(ReId:string):string。 根據記錄編號返回員工終止日期 function GetWorkTime(ReId:string):string。 根據記錄編號返回員工備注 function GetSumWorTime(Id:string):Integer。 通過 SQL 語句執行修改操作過程 procedure RecDel2(Id:string)。 通過 SQL 語句執行按編號和單位刪除操作過程 procedure RecDel6(Name,Place:string)。 根據員工姓名和月份判斷查詢記錄是否存在 function WageInfoRec3(Id:string):Boolean。 通過傳遞 SQL 語句判斷查詢記錄是否存在 function GetRecId(Id,GiveDate:string):string。 根據員工編號和月份返回職務 Delphi+SQL Server 企業人事管理系統設計報告書 24 function GetWorkerName(Id,GiveDate:string):string。 根據員工編號和月份返回公共補貼 function GetReward(Id,GiveDate:string):string。 根據員工編號和月份返回養老保險 function GetMedicalMoney(Id,GiveDate:string):string。 根據員工編號和月份返回住房公積金 function GetIneTax(Id,GiveDate:string):string。 通過傳遞 SQL 語句執行插入操作過程 procedure RecUpdate(UpdateSQl:string)。 通過 SQL 按員工編號執行刪除操作過程 procedure RecDel3(Name:string)。 根據方案編號判斷記錄是否存在 function wagesetRec1(FindSQL:string):Boolean。 根據工資方案編號返回副經理工資 function GetKeZhang(Id:string):string。 根據工資方案編號返回副部長工資 function GetPuTong(Id:string):string。 根據工資方案編號返回二級員工工資 function GetYangLao_BX(Id:string):string。 根據工資方案編號返回失業保險 function GetChiDao(Id:string):string。 根據工資方案編號返回請假扣除 function GetJiaBan_JR(Id:string):string。 根據工資方案編號返回工齡工資（ /年） function GetShuiLv(Id:string):string。 通過 SQL 語句返回方案信息 procedure RecInsert(InsertSQl:string)。 Delphi+SQL Server 企業人事管理系統設計報告書 26 表 413 Tcheck_info 類封裝的方法和過程 方法或過程名 具體說明 function CheckInfoRec(Id,month:string):Boolean。 根據員工姓名判斷記錄是否存在 function CheckInfoRec4(month:string):Boolean。 根據員工編號和月份返回員工公休假天數 function GetReWorkDays(Id,month:string):string。 根據員工編號和月份返回員工礦工天數 function GetLeaveTimes(Id,month:string):string。 根據員工編號和月份返回員工節假日加班次數 function GetOtherOverTimes(Id,month:string):string。 通過 SQL 語句執行插入操作過程 procedure RecUpdate(UpdateSQl:string)。 通過 SQL 語句執行按員工姓名刪除操作過程 procedure RecDel4(month:string)。 根據員工姓名判斷記錄是否存在 function ProtitleRec2(Dji:string):Boolea