【正文】 薅薈膄芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈 蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄 芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆 芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿蒆袈罿莈薅薈膄 芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀芃蚆裊袃腿蚆蚅聿膅蚅螇羈蒃蚄袀膇荿蚃羂羀芅螞螞膅膁荿螄羈肇莈袆膃莆莇薆羆莂莆螈節(jié)羋蒞袁肅膄莄羃袇蒂莄螞肅莈莃螅袆芄蒂袇肁膀蒁薇襖肆蒀蠆聿蒅葿袁袂莁蒈羄膈芇蒈蚃羈膃蕆螆膆聿 蒆袈罿莈薅薈膄芃薄蝕羇腿薃螂膃肅薂羅羅蒄薂蚄袈莀薁螆肄芆薀衿袇膂蕿薈肂肈蚈蟻裊莇蚇螃肀 分類 編號 2 1. 問題描述 背景 隨著經(jīng)濟的發(fā)展，企業(yè)正向著大型化、規(guī)范化發(fā)展，而對于大中型企業(yè)，員工、職稱等跟工資管理有關(guān)的信息隨之急劇增加，在這種情況下，單靠人工來處理員工的工資顯得力不從心，而且極易出錯。 該系統(tǒng)的具體任務(wù)就是設(shè)計一個企業(yè)工資的數(shù)據(jù)庫管理系統(tǒng)，由計算機來代替人工執(zhí)行一系列諸如增加新 員工、刪除舊員工、工資修改、查詢、統(tǒng)計、打印等操作。 ? 系統(tǒng)具備數(shù)據(jù)庫維護功能，及時根據(jù)用戶需求進行數(shù)據(jù)的添加、刪除、修改、備份等操 作。開發(fā)的總體任務(wù)是使辦 公人員可以輕松快捷的完成工資管理任務(wù)。 實體和實體之間的關(guān)系 ER圖如圖 11所示。這個階段 主要是確定基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以及數(shù)據(jù)處理的流程，組成一份詳盡的數(shù)據(jù)字典，為以后進一步設(shè)計打下基礎(chǔ)。 員工 員工工資 基礎(chǔ)工資 崗位工資 工齡工資 福利費用 對應(yīng) 包含 對應(yīng) 對應(yīng) 對應(yīng) 對應(yīng) 工資等級 部門崗位 工齡 公司福利 4 圖 12 數(shù)據(jù)流程圖 通過對企業(yè)工資管理的內(nèi)容和數(shù)據(jù)流程分析，針對本實例，我們設(shè)計的數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)如下： ? 員工基本情況。 ? 工資級別和工資金額。 ? 企業(yè)部門及工資崗位信息。 ? 工齡的工資金額。 ? 公司福利表。 ? 工資信息。 數(shù)據(jù)庫 邏輯結(jié)構(gòu)設(shè)計 在實體以及實體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫中的表格以及各個表格之間的 關(guān)系。每個表格表示在數(shù)據(jù)庫中的一個表（只列出與本例相關(guān)的字段） 表 1— 1為員工基本狀況表 PERSONNEL 員工基本狀況表 列名 數(shù)據(jù)類型 可否為空 說明 PID CHARACTER(3) NOT NULL 員工號（索引） PNAME CHARACTER(10) NULL 員工姓名 級別工資設(shè)定 崗位工資設(shè)定 工齡工資設(shè)定 工資基本設(shè)定 員工信息 員工工資 5 PSEX CHARACTER(2) NULL 員工性別 PDEPT CHARACTER(10) NULL 所在部門 PJOB CHARACTER(10) NULL 所在崗位 PINDATE CHARACTER(2) NULL 工齡 PRANK CHARACTER(2) NULL 工資等級 表 1— 2為工資等級表 PANK 工資等級表 列名 數(shù)據(jù)類型 可否為空 說明 RNAME CHARACTER(2) NOT NULL 工資等級 (索引 ) RSALARY NUMERIC(10,2) NULL 相應(yīng)工資額 表 1— 3 為工作崗位情況表 DEPT 工作崗位情況表 列名 數(shù)據(jù)類型 可否為空 說明 JOBNAME CHARACTER(10) NULL 工作崗位名 稱（索引） JOBSALARY NUMERIC(10,2) NULL 崗位工資 表 1— 4 為工齡工資表 GONGLING 工齡工資表 列名 數(shù)據(jù)類型 可否為空 說明 GNAME CHARACTER(2) NOT NULL 工齡（索引） GSALARY NUMERIC(10,2) NULL 工齡工資額 表 1— 5為公司福利表 WELFARE 為公司福利表 列名 數(shù)據(jù)類型 可否為空 說明 WNAME CHARACTER(10) NOT NULL 福利名稱（索引） WMONEY NUMERIC(10,2) NULL 福利費用 表 1— 6為系統(tǒng)的用戶口令表 系統(tǒng)的用戶口令表 USER_PSWD 列名 數(shù)據(jù)類型 可否為空 說明 TMS_USER CHARACTER(10) NOT NULL 用戶名（索引） TMS_PSWD CHARACTER(10) NOT NULL 口令 3 系統(tǒng)實 現(xiàn) 開發(fā)環(huán)境 開發(fā)工具： Visual FoxPro 。 系統(tǒng)流程圖 系統(tǒng)功能分析 6 ? 系統(tǒng)數(shù)據(jù)初始化； ? 員工基本信息數(shù)據(jù)的輸入； ? 員工基本信息數(shù) 據(jù)的修改、刪除； ? 企業(yè)工資的基本設(shè)定； ? 員工工資的瀏覽； ? 員工個人工資表的查詢； ? 工資報表的打印 在系統(tǒng)功能分析的基礎(chǔ)上，得到如圖 13所示的系統(tǒng)功能模 塊圖 。 工資管理系統(tǒng) 員工信息 工資基本設(shè)定 工資匯總 員工查詢 工齡工資 資料輸入 員工增刪 公司福利 崗位工資 基礎(chǔ)工資 工資匯總 個人工資查詢 瀏覽 打印 7 圖 142 錯誤的報表 這是由于報表欄中的細節(jié)欄設(shè)計又有誤，下面是對應(yīng)的設(shè)計，如圖 142所示。 圖 143 錯誤的細節(jié)設(shè)置 數(shù)據(jù)庫結(jié)構(gòu)的實現(xiàn) 在需求分析、概念結(jié)構(gòu)設(shè)計的繼承上得到數(shù)據(jù)庫的結(jié)構(gòu)之后，我們就可以在 Visual FoxPro 數(shù)據(jù)庫系統(tǒng)中實現(xiàn)該邏輯結(jié)構(gòu)。例如 D:\ Visual FoxPro的文件中選擇“新建”→“項目”。 8 圖 14 新建數(shù)據(jù)庫 在彈出的數(shù)據(jù)庫設(shè)計器中單擊鼠標右鍵，選擇“新建表，如圖 15 所示。下面以表 6 為例。在彈出的表設(shè)計器中填寫表的內(nèi)容，如圖 16 所示。要注意的是在以后的編寫程序中對數(shù)據(jù)庫的數(shù)據(jù)的操作通常是引用表的字段，因此在設(shè)計字段是要挑選容易理解的名稱。 各個功能模塊的創(chuàng)建 經(jīng)過前面對系統(tǒng)功能的分析，我們將企業(yè)工資管理系統(tǒng)分為 4 個模塊：系統(tǒng)主界面、員工信息管理、工資基本設(shè)定和工資匯總。下面將以主界面的設(shè)計為例，仔細講解表單的創(chuàng)建。如圖 17 所示。 圖 18 為設(shè)計的表單 可以根據(jù)界面的需要向其中添加控件如圖 19 所示。 表 17 控件屬性更改值 控件 Caption Alignment Picture Stretch Form1 企業(yè)工資管理系統(tǒng) Label1 歡迎使用 2中央 Command 員工基本信息 Command 員工基本設(shè)定 Command 工資匯總 Command 個人工資設(shè)定 Command 退出 Image1 D:\salary\ 2變比填充 Caption屬性表示控件的顯示名，是為了使用者方便特意設(shè)計的名稱， 為一些常用的提示信息。另外，設(shè)置 Label的 Font（字體）和 Fontsize（字體大?。傩钥梢愿淖?Caption顯示的字體及大小。對應(yīng) Image（圖象）控件，則表示顯示在其中的圖象。并應(yīng)設(shè)置其 Streth屬性為“ 2變比填充”以使圖象能正確顯示。 12 圖 110 更改后的表單 要注意的是向容器中添加按鈕時候 ，必須先添加容器，然后在容器單擊鼠標右鍵，選擇編輯，此時容器邊緣變?yōu)榫G色，表明此時容器正處于編輯狀態(tài)。 可以通過查閱表單的結(jié)構(gòu)層次來理解，如圖 111所示 圖 111 表單中的控件的結(jié)構(gòu) 控件添加結(jié)束后，表單并未完成設(shè)計，此時的表單運行后會發(fā)現(xiàn)只有一個空殼，單擊其中的按鈕沒 有任何反應(yīng)。 選中 Command1（按鈕 1），雙擊后彈出控件“方法程序”對話框，如圖 112所示 . 13 圖 112 為控件Command1 設(shè)置Click 事件程序 填寫代碼如下： Do from salary\form\personnel *打開下級表單 pensonnel..scx, salary\form\personnel為 它的路徑 對 Command2（按鈕 2）、 Command3（按鈕 3）、 Command4（按鈕 4）、 Command5（按鈕 5）、進行同樣的操作。 選擇 Timer（記時器）控件，雙擊后填寫其 Timer 的事件代碼： if i=0 =.F. *使 Label1 不可見 i=1 else =.T. *使 Label1 可見 i=0 endif 設(shè)置 Timer的 Interval屬性為“ 750”。既是每隔 Timer控件的 Timer事件。 14 注意 Timer事件代碼中使用了變量 i來控制，因此應(yīng)先聲明該變量。接下來進入其他表單的設(shè)計。要實現(xiàn)的功能較多，一個表單不可能容納下所有空件，所以需要使用表單集或頁框。 新建表單 Personal,存儲 ”D:\salary\form\”。向表單中加入控件，如圖 113 所示 圖 113 表單的基本控件 本表單需要對數(shù)據(jù)庫中的表進行操作，因此必須將該表加入到表單的數(shù)據(jù)環(huán)境中。 1.“一覽”子頁面的設(shè)計 將表單數(shù)據(jù)環(huán)境中的表 ”Personnel”的字段添加到表單中，如圖 114 所示。 向子頁面 1 中添加控件，如圖 115 所示。如圖 116 位添加的類 —— 導(dǎo)航條。 ●“上一個”按鈕使記錄后退一個； ●“第一個”按鈕使記錄后退至表首； ●“下一個”按鈕使記錄前進； ●“最后一個”按鈕使記錄前進至表尾； 下面給出按鈕的 Click 事件代碼。按鈕“取消操作”的“ Enabled” 屬性設(shè)為“ .F.”。增加新記錄 39。增加確認 39。增加新記錄 39。 19 為“修改這條記錄”按鈕添加 Click 事件代碼： =.F. *使“增加”按鈕不可用 =.F. *使“刪除”按鈕不可用 =.T. *使“取消”按鈕可用 =.F. *使導(dǎo)航條可用 if =39。 =.T. =.T. =.T. =.T. =.T. =.T. =39。 *文本框 1 獲得鼠標焦點 else =39。 tableupdate(.t.) *更改確認 =.F. =.F. =.F. =.F. =.F. =.F. =.T. =.T. =.F. =.T. *恢復(fù)本子頁面各控件狀態(tài) endif 上段代碼的功能是修改一個員工的信息并更新到數(shù)據(jù)庫中。39。39。39。39。39。39。39。39。39。39。39。39。 為“取消操作”按鈕添加 Click 事件代碼： if =39。 *判斷要恢復(fù)的是何種操作 =39。 =.T. =.T. =.T. tablerevert(.f.) *放棄對表的數(shù)據(jù)更改操作 endif if =39。 =39。 =.T. =.T. *根據(jù)實際情況更改各個按鈕的狀態(tài) tablerevert(.f.) *取消對表所作的操作 endif =.F. =.F. 21 =.F. =.F. =.F. =.F. =.T. =.F. *恢復(fù)各個控件的狀態(tài) 上段代碼的功能為取消前面所作的操作。因此，要求在表單的 Init 事件中添加代碼： set multilocks on *允許數(shù)據(jù)緩沖 cursorsetprop(“buffering”,3) *打開開放式記錄緩沖區(qū) 為了頁面 2 添加控件，如圖 119 所示。提供了按“員工號”和“員工姓名”查詢的功能。當使用者填入查詢條件后，單擊“查詢”按鈕，如果查到相應(yīng)記錄，系統(tǒng)會自動提示。使用者此時單擊“查詢結(jié)果”按鈕可以