【正文】 Emp_teleno Number(10) NULL 聯(lián)系電話 Emp_ Varchar2(20) NULL 聯(lián)系 Email 地址 Job_id Number(3) NULL 工作崗位代號（外部鍵），指向工作崗位情況表的 Job_i 表 5 Dept 部門信息表 列名 數(shù)據(jù)類型 可否為空 說明 Dept_id Number(3) NOT NULL 部門代號 （主鍵） Dept_name Varchar2(10) NULL 部門名稱 Dept_desc Varchar2(30) NULL 部門職能描述 Dept_manager Number(6) NULL 部門經(jīng)理代號（外部鍵），指向員工基本情況表的 Emp_no 14 Dept_vicemanager Number(6) NULL 部門副經(jīng)理代號（外部鍵），指向員工基本情況表的 Emp_no 三、 模塊分述及窗口 主窗口： 、登錄（身份驗證） 檢測用戶是否為合法的用戶，若是則能進入本系統(tǒng)， 否則認為是非法的用戶，不允許進入本系統(tǒng)，只有取得用戶名和密碼才可進入。系統(tǒng)功能基本運行良好，且用戶界面友好，操作簡單，使用方便。其中數(shù)據(jù)窗口中導入的數(shù)據(jù)表為 (d_basic),代碼如下： w_insert_basicopen() (sqlca) () cb_1clicked() //插入 long row_number () row_number=insertrow(,0) cb_2clicked() //刪除 long current_rownumber current_rownumber=() deleterow(,current_rownumber) cb_3clicked() //確認 if update(,true,false)=1 then () mit。 else rollback。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。++39。 else rollback。 messagebox(錯誤?。?！ ,數(shù)據(jù)保存失敗 ) end if cb_4clicked() //退出 int mcount int updateornot mcount=() if mcount=0 then close(w_insert_basic) elseif mcount0 then updateornot=messagebox(保存修改 ,您修改了數(shù)據(jù)窗口中的數(shù)據(jù)，現(xiàn)在是否保存？,Question!,YesNoCancel!) if updateornot=1 then if update(,true,false)=1 then () mit。設(shè)計中我遇到了許多困難，在老師和同學們的幫助下我還是克服了。其中有一部分內(nèi)容是必須填寫的，如果不填寫，則系統(tǒng)不保存，系統(tǒng)會提示用戶。 、輸入模塊的功能 在本模塊中，可以輸入員工的基本信息、學歷信息、婚姻狀況、工作崗位信息、企業(yè)部門信息。 、使用幫助。 、系統(tǒng)應符合企業(yè)人事管理的規(guī)定，滿足企業(yè)日常人事管理工作需要，并達到操作過程中的直觀、方便、實用、安全等要求。下面章節(jié)將詳細介紹本系統(tǒng)的設(shè)計過程。 人事管理系統(tǒng)是現(xiàn)代企業(yè)管理不可缺少的一部分，是適應現(xiàn)代企業(yè)制度要求、推動企業(yè)勞動人事管理走向科學化、規(guī)范化的必要條件。 Input the various informations that modular is used in inputing employee mainly。并且，此軟件能夠 改變傳統(tǒng)的、落后的管理形式，提高管理的效率和企業(yè)的競爭力，使企業(yè)能夠為向更高層次發(fā)展創(chuàng)造了有利條件。 Form modular is used in printing the information information of employee and enterprise mainly。此外，人事管理系統(tǒng)還需要數(shù)據(jù)庫維護功能，及時根據(jù)用戶需求進行數(shù)據(jù)的添加、刪除、修改、備份等操作。 、 支持企業(yè)實現(xiàn)規(guī)范化、高效率的管理。 開發(fā)和運行環(huán)境選擇 6 本系統(tǒng)軟件可以在大多數(shù)的 Windows x下運行使用。隨著計算機行業(yè)發(fā)展 ,到今天產(chǎn)生了第四代 編程語言即面向?qū)ο蟮目梢暬幊陶Z言。 、查看模塊的功能 員工的各種信息進行瀏覽，查看某位員工的信息，通過某些條件進行查詢。 、報表模塊的功能 打針所需要的員工的信息。代碼如下： w_loginopen() environment l_env int l_scrwidth,l_scrheight setredraw(false) getenvironment(l_env) l_scrwidth=pixelstounits(,xpixelstounits!) l_scrheight=pixelstounits(,ypixelstounits!) move((l_scrwidth )/2,(l_scrheight )/2) setredraw(true) cb_1clicked() //確認 int g_input_time=0 if =a and =1 then open(w_main) close(w_login) messagebox(,歡迎進入本系統(tǒng) ) else messagebox(警告 , 輸入用戶口令有誤，請重新輸入 ) end if cb_2clicked() //取消 close(w_login) ******************************************************************* （三）、主窗口 (w_main)： 由一個圖片控件 (“Create Picture control”)組成。 close(w_insert_basic) end if end if ******************************************************************* （五）、維護中的五個窗口基本相同只寫其中一個。 學歷信息瀏覽窗口（ w_browse_school)： 由一個靜態(tài)文本框 (Create StaticText control1）、一個數(shù)據(jù)窗口控件（“ Create DateWindow control) 和五 個按鈕（ CommandButton) 組成。 elseif =國籍 then lookforitem1=emp_country lookforwhat1=39。 elseif =政治面貌 then lookforitem1=emp_zzmm lookforwhat1=39。 elseif =部門號 then lookforitem2=emp_id lookforwhat2= elseif =性別 then lookforitem2=emp_gender lookforwhat2=39。 elseif =身份證號 then lookforitem2=emp_id lookforwhat2= elseif =婚姻狀況 then lookforitem2=emp_marriage lookforwhat2=39。 elseif =電話 then lookforitem2=emp_teleno lookforwhat2= elseif =工作種類 then lookforitem2=job_id lookforwhat2=39。 elseif =國籍 then lookforitem3=emp_country lookforwhat3=39。 elseif =政治面貌 then lookforitem3=emp_zzmm lookforwhat3=39。代碼如下： w_browseopen() (sqlca) () cb_1clicked() //保存報表 string pathname,filename int saveornot saveornot=GetFileSaveName(保存文件 ,pathname,filename,xls,Excel 文件 ,*.xls) if saveornot=1 then (D:\temp\pb\,excel!,false) end if cb_2clicked() //打印報表 () () () cb_3clicked() //退出 close(w_posite) 31