企業人事管理系統設計報告書(專業版)

　　

【正文】 通過 SQL 語句執行按員工姓名刪除操作過程 procedure RecDel4(month:string)。 根據員工編號和月份返回員工公休假天數 function GetReWorkDays(Id,month:string):string。 根據工資方案編號返回工齡工資（ /年） function GetShuiLv(Id:string):string。 根據工資方案編號返回副部長工資 function GetPuTong(Id:string):string。 通過傳遞 SQL 語句執行插入操作過程 procedure RecUpdate(UpdateSQl:string)。 根據員工編號和月份返回職務 Delphi+SQL Server 企業人事管理系統設計報告書 24 function GetWorkerName(Id,GiveDate:string):string。 通過 SQL 語句執行修改操作過程 procedure RecDel2(Id:string)。 根據員工 工作單位 判斷查詢記錄是否存在 Delphi + SQL Server 企業人事管理系統設計報告書 23 function WorkAgeRec5(Id,Place:string):Boolean。 根據員工編號返回員工 聯系電話 function GetAddress(WorkId:string):string。 根據員工民族判斷記錄是否存在 function CheckRec6(MM:string):Boolean。 圖 37 數據庫表 以上各表分別保存員工基本信息、員工考勤信息、員工評定信息、員工獎懲信息、員工工資信息、各項工資設設置、員工履歷信息。 （ 5）員工履歷信息管理模塊主要是記錄員工進入本單位前 的履歷信息，為后面的工資計算中的工齡工資計算提供參考信息。由于您并未告訴它接收到用戶輸入后作何反應，窗口除了響應 Windows的基本操作 (移動、縮放等 )外，它只是接受用戶的輸入，然后再忽略。 DELPHI最顯著的特點就是高效性和穩定性，總的來說，主要體現在以下 6個 方面： （ 1） 可視化開發環境的性能。選擇一優秀的數據 庫管理系統作為開發平臺，將給日后的信息處理帶來便利性。同時也說明了一點，就是信息處理也非常的重要。自 20世紀 50年代將計算機引入數據處理以來，歷經管理信息系統發展的各個階段。 1990年高級 DBMS功能委員會發表了《第三代數據庫系統宣言》，提出了第三代數據庫管理系統應具有的三個基本特征： ① 應支持數據管理、對象管理和知識管理。數據庫技術與網絡通信技術、人工智能技術、面向對象程序設計技術、并行計算技術等相互滲透、有機結合，成為當代數據庫技術發展的重要特征。本系統是一個典型的信息管理系統，它的開發主要包括兩個方面，一是后臺數據庫的建立，維護。數據庫系統已經成為現代計算機系統的重要組成部分。這些商用數據庫系統的應用使數據庫技術日益廣泛地應用到企業管理、情報檢索、輔助決策等方面，成為實現和優化信息系統的基本技術。 20世紀 80年代中期到后期，終端用戶開始使用局域網技術將獨立的計算機連接成網絡，終端之間共享數據庫，形成了一種新型的多用戶數據處理，稱為客戶機 /服務器數據庫結構。古往今來，信息都上一種資源，只是未Delphi + SQL Server 企業人事管理系統設計報告書 9 得到應有的重視。利用計算機對企業人事管理不僅保證了核算準確度，還成倍的提高了工作效率，而且便于查詢。 Delphi 及 SQL Server 2021 簡介 （一） Delphi 簡介 Delphi 是全新的可視化編 程環境，為我們提供了一種方便、快捷的 Windows 應用程序開發工具。 Delphi 已經為您做好了一切基礎工作 程序框架就是一個已經完成的可運行應用程序，只是不處理任何事情。 （ 2） 員工 基本 信息管理模塊主要功能是 記錄員工的基本信息，如：工號、姓名、所在部門、職位等。創建一個數據庫結構的過程被認為是數據模型設計。 根據員工職務判斷記錄是否存在 function CheckRec3(XB:string):Boolean。 根據員工編號返回員工 政治面貌 function GetWorkTime(WorkId:string):string。 根據員工編號和工作單位判斷查詢記錄是否存在 function WorkAgeRec2(Id:string):Boolean。 根據記錄編號返回員工工齡 function WorkAgeRecs(SQL:string):OLEVariant。 根據員工編號和月份返回記錄號 function GetSche_Id(Id,GiveDate:string):string。 根據員工編號和月份返回個人所得稅 function GetRealWage(Id,GiveDate:string):string。 根據工資方案編號返回科長工資 function GetFuKeZhang(Id:string):string。 根據工資方案編號返回節假日加班工資 function GetJiaBan_QT(Id:string):string。 根據月份判斷記錄是否存在 function GetWorkerName(Id,month:string):string。 通過 SQL 語句執行修改操作過程 procedure RecDel(Id,month:string)。 根據員工編號判斷記錄是否存在 function ProtitleRec1(Name:string):Boolean。 根據員工編號和月份返回員工出差天數 function GetAbsentDays(Id,month:string):string。 根據工資方案編號返回獎金 function wagesetRecs(SQL:string):OLEVariant。 根據工資方案編號返回一級員工工資 function GetErJi_YG(Id:string):string。 通過 SQL 按員工姓名和月份執行刪除操作過程 procedure RecDel2(Id:string)。 根據員工編號和月份返回出差補貼 function GetAllowance2(Id,GiveDate:string):string。 通過 SQL 語句執行按工作單位刪除操作過程 procedure RecDel5(Id,Place:string)。 通過傳遞 SQL 語句判斷查詢記錄是否存在 function GetWorkerId(ReId:string):string。 根據員工編號返回員工 照片 function GetAllRec(SQL:string):OLEVariant。 根據員工編號返回員工 姓名 function GetDepartName(WorkId:string):string。 表 42 員工考勤信息表 字段名 數據類型 長度 主鍵 功能描述 WORKER_ID Nvarchar 15 是 員工編號 WORKER_NAME Nvarchar 8 否 員工姓名 MONTHS Nvarchar 8 否 月份 MONTH_DAYS Int 8 否 當月天數 HOLIDAYS Int 8 否 公休假天數 REAL_WORK_DAYS Int 8 否 出勤天數 WORK_DAYS Int 8 否 應出勤天數 BUSINESS_DAYS Int 8 否 出差天數 ABSENT_DAYS Int 8 否 曠工天數 LEAVE_TIMES Int 8 否 請 假次數 LATE_TIMES Int 8 否 遲到次數 LEAVE_EARLY_TIMES Int 8 否 早退次數 HOLIDAY_OVERTIME Int 8 否 節假日加班 OTHER_OVERTIME Int 8 否 其他加班 REMARK Nvarchar 255 否 備注 （ 3） 員工獎懲信息表 (REWARD_PUN) Delphi + SQL Server 企業人事管理系統設計報告書 19 員工獎懲信息表的作用是存入員工獎懲信息，其結構如表 33所示。 總之 , 開發這個系統的目的就是要幫助企業的人事部門提高工作效率，實現企業人事信息管理系統的系統化、規范化和自動化。作為 Microsoft． NET Enterprise Servers 的核心組件，它將減少電子商務、在線商務和數據倉 庫應用程序推向市場的時間，并對需要的環境提供可靠的支持。 （ 4） 編程語言的功能及其復雜性。 SQL Server 2021主要用于 Windows環境，利用它可設Delphi+SQL Server 企業人事管理系統設計報告書 10 計出體現 Windows風格的豐富多彩的圖形化用戶界面，使用戶的操作和使用十分便利。企業人事信息管理系統是大中型企業單位不可缺少的工具 ,它的內容對于企業的決策者和管理者來說都至關重要 ,所以企業人事信息管理系統應該能夠為用戶提供 充足的信息和快捷的查詢手段?，F在人們日益深刻認識到，把信息技術應用與應用環境分離是辦不到的。 面向對象數據模型是第三代數據庫系統的主要特征之一；數據庫技術與多學科技術的有機結合也是第三代數據庫技術的一 個重要特征。 20 世紀 60年代末70年代初，美國數據庫系統語言協會 CODASYL(Conference on Data System Language)下屬的數據庫任務組 DBTG(Data Base Task Group)提出了若干報告，被稱為 DBTG報告。而對于前端的應用程序則要求有友好的用戶界面，易操作，易使用等特點。 關鍵字： Delphi SQL Server 2021，類，原型法。 20世紀 70年代是關系數據庫理論研究和原型開發的時代，其中以 IBM公司的 San Jose研究試驗室開發的 System R和 Berkeley大學研制的 Ingres為典型代表。當時的數據庫處理技術還很脆弱，常常發生應用不能提交的情況。 時至今日，計算機正在令人難以置信的速度步入普通人的學習、工作和生活。企業人事管理可以說是一項瑣碎、繁雜而又必須十分細致的工作，是不能允許時常發生差錯的?？梢?， VC++與 Delphi是兩種較優秀的語言開發工具。缺省的應用程序是一個空白的窗體 (Form)，您可以運行它，結果得到一個空白的窗口。SQL Server 2021 包括加速從概念到最后交付開發過程的工具。數據庫在系統中占有非常重要的地位，數據庫設計的好壞將直接影響系統的效率。 表 39 Tbasedata 類封裝的方法和過程 方法或過程名 具體說明 function CheckRec(Id:string):Boolean。 根據員工編號返回員工 學歷 function GetMajor(WorkId:string):string。 通過傳遞 SQL 語句執行修改操作過程 procedure RecDel(Id:string)。 根據記錄編號返回員工擔任職務 function GetLevel1(ReId:string):string。 根據員工姓名判斷查詢記錄是否存在 function WageInfoRec5(GiveDate:string):Boolean。 根據員工編號和月份返回工傷保險 function GetUnemployMoney(Id,GiveDate:string):string。 通過 SQL 語句獲取所有工資方案編號 function GetJingLi(Id:string):string。 根據工資方案編號返回礦工扣除 function GetZaoTui(Id:string):string。 根據員工姓名和月份判斷記錄是否存在 function CheckInfoRec2(Id:string):Boolean。 根據員工編號和月份返回員工備注 function CheckInfoRecs(SQL:string):OLEVariant。 根據員工編號和等級判斷記錄是否存在 function ProtitleRec4(Name,Dji:string):Boolean。 根據員工編號和月份返回員工遲到天數 function GetLeaEarTimes(Id,month:string):string。 通過 SQL 語句執行修改操作過程 procedure RecDel(Id:string)。 根據工資方案編號返回工傷保險 function GetYiLiao_BX(Id:string):string。 通過 SQL 按月份執行刪除操作過程 4. Twageset類 Twageset 類 封裝了對 WAGE_SET 表的各種操作，類中定義的方法和過程如表 412所示。 根據員工編號和月份返回加班費 function GetDeductCheck(Id,GiveDate:string):string。 表 311 Twageinfo 類 封裝的方法和過程 方法或過程名 具體說明 function WageInfoRec(Id