【正文】 表Tedit1*Tbitbtn1Caption增加公司Tbitbtn2Caption增加中心Tbitbtn3Caption增加部門Tbitbtn4Caption增加科室Tbitbtn5Caption增加組Tbitbtn6Caption修改名稱Tbitbtn7Caption刪除Tbitbtn8Caption修改機(jī)構(gòu)Tbitbtn9Caption退出（2） 崗位名稱及屬性定義【主要功能】提供系統(tǒng)的崗位設(shè)置，完成系統(tǒng)的初始崗位架構(gòu)、崗位級(jí)別的定義及修改。對(duì)項(xiàng)名屬性屬性值SpeedButton1Caption應(yīng)聘登記表SpeedButton2Caption面試預(yù)約SpeedButton3Caption未通過SpeedButton4Caption通過SpeedButton5Caption入職審批SpeedButton6Caption人才庫SpeedButton7Caption應(yīng)聘花名冊(cè)SpeedButton8Caption退出（2） 應(yīng)聘申請(qǐng)書【主要功能】提供招聘人員的基本資料入錄，包含基本資料、教育經(jīng)歷、家庭成員、工作經(jīng)歷等文檔錄入窗口。對(duì)項(xiàng)名屬性屬性值TDateTimePick日期選擇Tbitbtn1Caption新增Tbitbtn2Caption修改Tbitbtn3Caption保存Tbitbtn4Caption打印Tbitbtn5Caption退出（4） 領(lǐng)導(dǎo)審批【主要功能】提供招聘人員的應(yīng)聘第三階段審批，包含人資源部、擬聘部門、分管領(lǐng)導(dǎo)、人力高管、總裁等部門的意見資料錄入、薪資定義等窗口。對(duì)項(xiàng)名屬性屬性值Tbitbtn1Caption增加Tbitbtn2Caption保存Tbitbtn3Caption刪除Tbitbtn4Caption退出Tbitbtn5Caption增加明細(xì)Tbitbtn6Caption保存明細(xì)Tbitbtn7Caption刪除明細(xì)（2） 員工培訓(xùn)申請(qǐng)實(shí)施表【主要功能】提供在職人員培訓(xùn)申請(qǐng)實(shí)施錄入審批等工作的查詢、增加、修改、保存等窗口，并對(duì)在職人員培訓(xùn)申請(qǐng)實(shí)施情況進(jìn)行存儲(chǔ)。對(duì)項(xiàng)名屬性屬性值Tbitbtn1Caption增加項(xiàng)目Tbitbtn2Caption修改Tbitbtn3Caption保存Tbitbtn4Caption取消Tbitbtn5Caption刪除Tbitbtn6Caption退出 報(bào)表統(tǒng)計(jì)（1） 人員分布統(tǒng)計(jì)【主要功能】提供在職人員分布、按組織架構(gòu)設(shè)置、按學(xué)歷、按級(jí)別、按性別等要求進(jìn)行統(tǒng)計(jì)的窗口。對(duì)項(xiàng)名屬性屬性值TDBGrid1表格Tbitbtn1Caption轉(zhuǎn)入操作員Tbitbtn2Caption開放權(quán)限Tbitbtn3Caption保存Tbitbtn4Caption刪除操作員Tbitbtn5Caption退出TComBoBoxCaption可維護(hù)權(quán)限Item公司級(jí)中心級(jí)部門級(jí)科室級(jí)組級(jí)（2） 修改密碼【主要功能】提供軟件操作人員的密碼修改、呢稱設(shè)置等窗口。對(duì)項(xiàng)名屬性屬性值Tbitbtn1Caption新增Tbitbtn2Caption修改Tbitbtn3Caption保存Tbitbtn4Caption取消Tbitbtn5Caption刪除Tbitbtn6Caption退出 系統(tǒng)測(cè)試系統(tǒng)程序設(shè)計(jì)后，依照測(cè)試用例分別進(jìn)行系統(tǒng)的單元測(cè)試、集成測(cè)試、有效性測(cè)試，最后進(jìn)行系統(tǒng)的總體測(cè)試。通過上述測(cè)試后，根據(jù)系統(tǒng)設(shè)計(jì)的要求分別對(duì)組織機(jī)構(gòu)、招聘、在職管理、培訓(xùn)管理、系統(tǒng)維護(hù)等模塊進(jìn)行試運(yùn)行，效果良好，得到了滿意的結(jié)果。結(jié)束語根據(jù)老師的要求并在 、 、 老師的指導(dǎo)下，在 ‘人力資源管理軟件’調(diào)研、設(shè)計(jì)過程中，我對(duì)人力資源管理有了全新的認(rèn)識(shí)，了解了企業(yè)的人力資源管理流程，理清了公司的組織機(jī)構(gòu)、崗位體系、各工作流程中的控制點(diǎn)（即提醒內(nèi)容）等。在整個(gè)畢業(yè)設(shè)計(jì)的過程中讓我不僅對(duì)系統(tǒng)開發(fā)的流程有了更深刻的了解。 在寫論文的過程中三位老師又仔細(xì)的幫我審查論文的內(nèi)容和排版格式，提出了很多的寶貴意見。對(duì)此表示感謝！路漫漫其修遠(yuǎn)兮，吾將上下而求索。參考文獻(xiàn)[1][M].臺(tái)北:三民書局,.[2]胡君辰,(第二版)[M]上海:復(fù)旦大學(xué)出版社,.[3] 黃維德，(第1版)，北京:高等教育出版社， 2000[4]湛新民，唐東方，人力資源規(guī)劃(第1版).廣州:廣東經(jīng)濟(jì)出版社。具體配置步驟如下：新建一個(gè)空數(shù)據(jù)庫，取名為sumpo_ehr。系統(tǒng)測(cè)試用戶名：員工號(hào)：123數(shù)據(jù)源配置，安裝BDE數(shù)據(jù)源軟件，建立一個(gè)BDE數(shù)據(jù)源，名稱為sumpo_ehr。如圖所示。程序設(shè)計(jì)代碼系統(tǒng)登錄代碼表單的onShow事件代碼procedure (Sender: TObject)。 xt_login := 39。 xt_path := ExtractFilePath()?！暗卿洝卑粹o的onClick事件代碼procedure (Sender: TObject)。 qDownFCONTENT: TBlobField。39。 vDownFile := vExeFile。此文件由于修改了文件名(39。)而不允許運(yùn)行!39。 close。 := false。39。SELECT RNO, NAMEE, NAMEC, FVER, FSIZE, DOWNFLAG FROM ZD_EXEFILEINF F WHERE (NAMEE=39。39。39。) or (charindex(39。39。39。, MAINPROG)0) 39。 ORDER BY RNO 39。 while not do begin if (((39。).AsString = 39。) and (GetExeFileVer(ExtractFilePath() + (39。).AsString) (39。).AsString)) or (not FileExists(ExtractFilePath() + (39。).AsString)) then vDownFile := vDownFile + 39。 + (39。).AsString。 end。 if length(vDownFile) length(vExeFile) then //有文件需要下載 begin if not FileExists(39。) then begin := false。vFileName39。39。 if (not ) then (39。) else begin Showmessage(39。)。 //終止應(yīng)用程序 end。 end。本程序已發(fā)布新的版本，需要下載新的程序！39。 WinExec(Pchar(ExtractFilePath() + 39。 + vDownFile), SW_SHOWDEFAULT)。 //終止應(yīng)用程序 end。39。39。39。39。39。39。39。39。39。39。員工號(hào)：39。 。select * from rs_zd_czy where czylsh=:czylsh and czymm =:czymm 39。 (39。).AsString := trim()。czymm39。 。查無此人39。 。 end else begin czyxm := (39。).AsString。czylsh39。 czymm := (39。).AsString。czybm39。 czyzwmc := (39。).AsString。ksbh39。 czyksmc := (39。).AsString。gwmc39。 czyqx := (39。).AsString。ksbh39。 1: xt_gs := copy((39。).AsString,1,4)。ksbh39。 3: xt_gs := copy((39。).AsString,1,8)。ksbh39。 end。 end。 。select * from rs_zd_czy where czybm=:czybm and czymm =:czymm 39。 (39。).AsString := trim()。czymm39。 。查無此人39。 。 end else begin czyxm := (39。).AsString。czylsh39。 czymm := (39。).AsString。czybm39。 czyzwmc := (39。).AsString。ksbh39。 czyksmc := (39。).AsString。gwmc39。 czyqx := (39。).AsString。ksbh39。 1: xt_gs := copy((39。).AsString,1,4)。ksbh39。 3: xt_gs := copy((39。).AsString,1,8)。ksbh39。 end。 end。 end else begin showmessage(39。)。 end。39。 (39。, czylsh, czyxm, 39。)。end。begin close。 。41 / 41