【正文】 bo Box 控件輸入初始值。 endif amp。按照材料名稱查詢 運行表單 設(shè)計完成后，運行表單，結(jié)果如圖 2— 10 所示： 圖 2— 10 材料信息查詢表單的運行結(jié)果 出入庫管理表單 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １６ 出入庫管理表單實現(xiàn)的功能是記錄材料的出入庫信息，并修改相應(yīng)材料信息表。切換到 Page1 頁面，添加所需控件并設(shè)置其相應(yīng)屬性，界面如圖 2— 11 所示。 into cursor tempcursor amp。 Close tables 當(dāng)進行入庫登記時，用戶首先輸入“入庫材料編號”。定義數(shù)組 temp 數(shù)量 =val(alltrim()) bbb(1)= alltrim() bbb(2)= “i” 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） １９ bbb(3)= alltrim() bbb(4)= alltrim() bbb(5)= alltrim() bbb(6)= alltrim() bbb(7)= alltrim() amp。 where 材料編號 =alltrim()?！叭∠卑粹o的Click 事件代碼如下： =”” =”” =”” =”” =”” =”” =”” amp。 from project\倉庫管理系統(tǒng) \data\材料信息 .dbf。材料編號正確，允許用戶繼續(xù)輸入。amp。 數(shù)量 =num1temp 數(shù)量 。amp。 生成報表的步驟為： 選取 Tools\Wizard\Reports 菜單命令，彈出如圖 2— 14 所示對話框，選中 Report Wizard，單擊 ok 按鈕，進入報表設(shè)計窗口。 圖 2— 17 排序規(guī)則選擇 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） ２５ 單擊 Next按鈕，輸入報表的 Title信息，并選中 Save report and modify it in the report designer，單擊 Finish 按鈕，保存報表為“ D:\project\庫房管理系統(tǒng) \reports\材料信息 .frx”，進入報表設(shè)計器對報表界面作進一步的調(diào)整，如圖 2— 18 所示。進入材料信息維護表單 if =l do form project\庫房 管理系統(tǒng) \firms\出入庫管理 .scx endif amp。 考慮到該系統(tǒng)中出庫和入庫的操作非常類似，為節(jié)約時間，本人將它們設(shè)計在同一張表單上，并且將出庫和入庫信息記錄在同一張表里。如系統(tǒng)訪問權(quán)限、用戶的身份驗證、最大連接限制等都是系統(tǒng)的不穩(wěn)定因素。如果只一種藥就有成千上萬的數(shù)量，那么用一個數(shù)據(jù)表來存儲藥店中所有藥品的數(shù)量顯 然是不可取的，應(yīng)該將藥品進行分門別類的管理與存儲，力圖提高藥品信息的查找速度。感激他在我整個畢業(yè)設(shè)計的過程中給予的指導(dǎo)和幫助，并時刻向我提出最寶貴的意見，讓我能夠順利完成這次的設(shè)計和 論文撰寫。 對于使用的系統(tǒng)，為增加其穩(wěn)定性，應(yīng)該考慮在開發(fā)過程中除在本機經(jīng)常調(diào)試外，還應(yīng)經(jīng)常在異地計算機上調(diào)試，以確保系統(tǒng)的穩(wěn)定性、兼容性、可靠性。從數(shù)據(jù)庫所建立的關(guān)聯(lián)關(guān)系以及表字段的索引來看，該藥品倉庫管理系統(tǒng)的數(shù)據(jù)庫一旦擴大，勢必會影響查找藥品信息的速度。這也是以后修正的一個方面。 吉林農(nóng)業(yè)工程職業(yè)技術(shù)學(xué)院（論文） ２７ 第 3 章 問題分析 系統(tǒng)功能設(shè)計的不完整 任何一個應(yīng)用程序都不可能設(shè)計得十全十美，它必須經(jīng)歷設(shè)計、開發(fā)、應(yīng)用、反饋、修改、再修改如此反復(fù)的過程，在實踐應(yīng)用中不 斷完善。進入材料信息查詢表單 if =l do form project\庫房 管理系統(tǒng) \forms\材料信息維護 .scx endif amp。 報表的 Layout 屬性選擇默認(rèn)選項，進入下一步。 2 用戶向?qū)е谱鲌蟊? 首先利用向?qū)Э焖偕蓤蟊恚缓髮ι傻膱蟊磉M一步編輯和修改。將記錄插入出入庫信息表 insert into project\庫房管理系統(tǒng) \data\出入庫信息 .dbf from array ccc。amp。amp。提示錯誤 else =.f. =.f. =.f. =.f. =.f. endif amp。如果該材料編號在材料信息表中，允許用戶繼續(xù)完成出入庫信息輸入，否則提示錯誤，要求用戶重新輸入材料編號。amp。 into cursor tempcursor num1= 在 材料信息表中按“材料編號”查找記錄 update project\倉庫管理系統(tǒng) \data\材料信息 .dbf set?！叭霂臁卑粹o的Click 事件代碼如下： dimension bbb(7) amp。amp。 from project\倉庫管理系統(tǒng) \data\材料信息 .dbf。將 Page1 的標(biāo)題設(shè)為“入庫管理”；將 Page2 的標(biāo)題設(shè)為“出庫管理”。 endif amp。 into cursor tempcursor。 添加響應(yīng)代碼 Combo 用于選擇查詢依據(jù)。單擊該按鈕，退出表單。amp。該按鈕的 Click 事件代碼如下： tempstr=messagebox(“是否刪除記錄？ ”， 4+32+256， ”刪除對話框 ”) if tempstr=6 set exclusive on delete pack set exclusive off endif amp。amp。amp。amp。 “首記錄”按鈕。 表單設(shè)計 本系 統(tǒng)主要功能模塊的實現(xiàn)由 4 個表單完成，分別是：材料信息維護表單、材料信息查詢表單、出入庫管理表單和用于選擇操作類型的主界面。具體做法是：在 Project Designer中選中材料信息表，單擊 Browse 按鈕，瀏覽數(shù)據(jù)表。下面設(shè)計本系統(tǒng)數(shù)據(jù)庫，詳細步驟如下： 創(chuàng)建項目文件“庫房管理 .pjx”，保存路徑為 project\庫房管理系統(tǒng)。 庫存材料信息的查詢 信息查詢是倉庫管理系統(tǒng)的重要組成部分。 （ 1）系統(tǒng)的發(fā)布： VFP 項目管理器提供了一個管理應(yīng)用系統(tǒng)的集成環(huán)境，而且 VFP 提供的安裝向?qū)ВС钟脩魹樗_發(fā)的項目創(chuàng)建一套“安裝（磁）盤”，供系統(tǒng)發(fā)布使用。 能夠?qū)λ?品庫房內(nèi)的有關(guān)各種藥品材料的數(shù)據(jù)進行輸入、修改與查詢。大多數(shù)設(shè)計器還提快捷菜單，內(nèi)含最常用的菜單選項，供用戶隨時調(diào)用。 目 錄 第一章 技術(shù)背景和分析 ……………………………………………………… .1 第二章 系統(tǒng)實施 ……………………...…………… .…………………………… ..1 系統(tǒng)設(shè)計 ……………………………………………………………………… .1 系統(tǒng)分析 ……… .………………… .…… .………………………………… 2 用戶需求分析 ………………………………………………………… ..2 系統(tǒng)可行性分析 ????????????????????? .2 系統(tǒng)功能模塊劃分 ……………………………………………………… ..3 數(shù)據(jù)庫設(shè)計 ?????????????????????????? .4 數(shù) 據(jù)庫需求分析 ?????????????????????? .4 數(shù)據(jù)庫邏輯設(shè)計 ?????????????????????? .4 數(shù)據(jù)庫實現(xiàn) ???????????????????????? .5 表單設(shè)計 ??????????????????????????? .7 材料信息維護表單 ???????????????? ????? .7 材料信息查詢表單 ????????????????? .??? ..14 出入庫管理表單 ???? ????????????? .???? ..15 用戶向?qū)е谱鲌蟊?????????????????? .???? 23 主表單設(shè)計 ????????????????? .??????? 25 主控程序設(shè)