【文章內(nèi)容簡(jiǎn)介】 第 16 頁 共 55 頁 入庫 現(xiàn)有庫存 出庫 還庫 部門需求 設(shè)備采購(gòu) 3． 3 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì) 在上面的實(shí)體以及實(shí)體之間的關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫中的表格以及各個(gè)表格之間的關(guān)系。 倉(cāng)庫管理系統(tǒng)數(shù)據(jù)庫中的各個(gè)表格的設(shè)計(jì)結(jié)果如下面的幾個(gè)表格所示。每個(gè)表格表示在數(shù)據(jù)庫中的一個(gè)表。 （ 1）設(shè)備代碼表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 設(shè)備名稱 字符型（ 50） 可為空 （ 2）設(shè)備入庫表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào) 數(shù)值型（ 20） 不能為空 入庫時(shí)間（主鍵） 日期型（ 8） 可為空 供應(yīng)商 字符型（ 50） 可為空 供應(yīng)商電話 字符型（ 15） 可為空 入庫數(shù)量 數(shù)值型（ 20） 可為空 價(jià)格 字符型（ 10） 可為空 采購(gòu)員 字符型（ 20） 可為空 （ 3）設(shè)備出庫表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào) 數(shù)值型（ 20） 不能為空 出庫時(shí)間（主鍵） 日期型（ 8） 可為空 使用部門 字符型（ 50） 可為空 倉(cāng)庫管理系統(tǒng) 第 17 頁 共 55 頁 出庫狀況 數(shù)值型（ 20） 可為空 經(jīng)手人 字 符型（ 20） 可為空 出庫數(shù)量 數(shù)值型（ 10） 不能為空 領(lǐng)取人 字符型（ 50） 可為空 用途 字符型（ 50） 可為空 （ 4）現(xiàn)有庫存表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 現(xiàn)有庫存 數(shù)值型（ 20） 可為空 最大庫存 數(shù)值型（ 20） 可為空 最小庫存 數(shù)值型（ 20） 可為空 總數(shù) 數(shù)值型（ 20） 可為空 （ 5）部門需求表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 部門名稱 字符型（ 20） 不能為空 需要數(shù)量 數(shù)值型（ 20） 可為空 需求開始時(shí)間 日期型（ 8） 可為空 需求結(jié)束時(shí)間 日期型（ 8） 可為空 （ 6）設(shè)備還庫表： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào)（主鍵） 數(shù)值型（ 20） 不能為空 還庫時(shí)間 日期型（ 8） 不能為空 倉(cāng)庫管理員 數(shù)值型（ 20） 可為空 歸還數(shù)量 數(shù)值型（ 20） 可為空 歸還人 字符型（ 10） 可為空 倉(cāng)庫管理系統(tǒng) 第 18 頁 共 55 頁 （ 7）操作日志表： 列名 數(shù)據(jù)類型 可否為空 操作員 字符型（ 50） 不能為空 操作內(nèi)容 字符型（ 50） 不能為空 操作時(shí)間 日期型（ 8） 可為空 （ 8）設(shè)備采購(gòu)計(jì)劃表 ： 列名 數(shù)據(jù)類型 可否為空 設(shè)備號(hào) 數(shù)值型（ 20） 不能為空 現(xiàn)有庫存 數(shù)值型（ 20） 可為空 總庫存 數(shù)值型（ 20） 可為空 最大庫存 數(shù)值型（ 20） 可為空 購(gòu)買數(shù)量 數(shù)值型（ 20） 可為空 供應(yīng)商 字符型（ 20） 不能為空 價(jià)格 字符型（ 10） 可為空 計(jì)劃采購(gòu)時(shí)間（主鍵） 日期型（ 8） 可為空 3． 4 數(shù)據(jù)庫結(jié)構(gòu)的實(shí)現(xiàn) 在需求分析、概念結(jié)構(gòu)設(shè)計(jì)的基礎(chǔ)上得到數(shù)據(jù)庫的邏輯結(jié)構(gòu)設(shè)計(jì)之后，我們就可以在 Visual 數(shù)據(jù)庫系統(tǒng)中實(shí)現(xiàn)該邏輯結(jié)構(gòu)。 打開如圖所示的“倉(cāng)庫管理 ”項(xiàng)目后，在項(xiàng)目管理器中展開數(shù)據(jù)文本夾，用鼠標(biāo)倉(cāng)庫管理系統(tǒng) 第 19 頁 共 55 頁 選中數(shù)據(jù)庫，單擊右側(cè)的“新建”按鈕，在彈出的對(duì)話框中將該數(shù)據(jù)庫文件存儲(chǔ)為 c:\倉(cāng)庫管理 \倉(cāng)庫管理 .dbc。 在彈出的如圖所示的數(shù)據(jù)庫設(shè)計(jì)器中單擊鼠標(biāo)右鍵，選擇“新建表”，為數(shù)據(jù)庫添加數(shù)據(jù)表（表的內(nèi)容見上節(jié)）。下面以表設(shè)備代碼表為例來介紹表的建立過程。 選擇“新建表”，在彈出的對(duì)話框中將表存儲(chǔ)為 c:\倉(cāng)庫管理 \設(shè)備代碼 .dbf 。在彈出的如圖所示的表設(shè)計(jì)器中填寫表的內(nèi)容。 字段設(shè)置完成后，單擊“確定”按鈕后為表輸入數(shù)據(jù)，如不想現(xiàn)在輸入，可以先“取消”，以后再輸 入。具體方法如下： （ 1） 如圖所示，選中要輸入數(shù)據(jù)的表，單擊“瀏覽”按鈕。 倉(cāng)庫管理系統(tǒng) 第 20 頁 共 55 頁 （ 2） 此時(shí)彈出無數(shù)據(jù)的表，在 Visual 的主窗口中選擇“表”，選擇“追加新記錄”后，就 可以在表中輸入數(shù)據(jù)了。如圖所示。不過這種方法只能一次輸入一條記錄，如果要輸入第二條記錄時(shí)，需再次選擇追加新記錄。如果有一個(gè)已有的數(shù)據(jù)表，就可以使用“使用追加記錄”將這個(gè)有數(shù)據(jù)的表追加到當(dāng)前表中，不過執(zhí)行該操作要求這二個(gè)表的結(jié)構(gòu)完全相同。 第四章 系統(tǒng)主要功能模塊的創(chuàng)建 按照前面的分析，我們將管理系統(tǒng)的邏輯模塊統(tǒng)一到 6 個(gè)實(shí)際功能 模塊中，如圖所示。切換面板用于切換不同的操作，每項(xiàng)具體操作結(jié)束后，都會(huì)返回到切換面板。 切換面板 設(shè) 設(shè) 設(shè) 設(shè) 設(shè) 顯 備 備 備 備 備 示 入 出 還 需 采 報(bào) 庫 庫 庫 求 購(gòu) 表 下面對(duì)各模塊的作用進(jìn)行說明： （ 1） 設(shè)備入庫模塊：添加設(shè)備到庫存中。 倉(cāng)庫管理系統(tǒng) 第 21 頁 共 55 頁 （ 2） 設(shè)備出庫模塊：將設(shè)備從庫存取出并記錄。 （ 3） 設(shè)備還庫模塊：將歸并到庫存的設(shè)備保存到數(shù)據(jù)庫。 （ 4） 設(shè)備需求模塊：記錄各部門的設(shè)備需求。 （ 5） 設(shè)備采購(gòu)模塊：記錄要采購(gòu)的設(shè)備。 （ 6） 切換面板：用于切換到不同的操作，如設(shè)備入庫、設(shè)備出庫等。 （ 7） 顯示報(bào)表：顯示庫存過多、庫存不足等信息。 下面就按照功能模塊圖來設(shè)計(jì)該倉(cāng)庫管理系統(tǒng)。首先在 Visual 中建立一個(gè)項(xiàng)目管理器，以便管理本系統(tǒng)中所有的數(shù)據(jù)，命名為“倉(cāng)庫管理”。一下操作均在該項(xiàng)目管理器中進(jìn)行。以下所有表單的“ desktop”屬性全部設(shè)為“ .真”。 4． 1 功能選擇界面的設(shè)計(jì)： 這一模塊的主要功能是作為系統(tǒng)主界面為進(jìn)入本系統(tǒng)不同功能界面選擇提供一個(gè)接口，使用一個(gè)窗口來實(shí)現(xiàn)這一功能。 首先建立一個(gè)表單，設(shè)取“ caption”屬性為“倉(cāng)庫管理”。在該表單上添加6 個(gè)“按鈕”控件，它們的“ caption”屬性分別為“設(shè)備入庫”，“設(shè)備出庫”，“設(shè)備還庫”，“部門需求”，“設(shè)備采 購(gòu)”，“顯示報(bào)表”。然后在表單上添加“圖象控件”，并設(shè)其“ stretch”屬性為“ 2strech（擴(kuò)展）”，“ pictrue”屬性為圖片所在的位置，本例中為“ c:\倉(cāng)庫管理 \”。 在“ ” (“ caption”屬性為“設(shè)備入庫” )控件的“ click”事件中添加如下代碼： do form 設(shè)備入庫表 在“ ” (“ caption”屬性為“設(shè)備出庫” )控件的“ click”事件中添加如下代碼： do form 設(shè)備出庫表 在“ ” (“ caption”屬性為“設(shè)備還庫” )控件的“ click”事件中添加如下代碼： do form 設(shè)備還庫表 倉(cāng)庫管理系統(tǒng) 第 22 頁 共 55 頁 在“ ” (“ caption”屬性為“部門需求” )控件的“ click”事件中添加如下代碼： do form 部門需求表 在“ ” (“ caption”屬性為“設(shè)備采購(gòu)” )控件的“ click”事件中添加如下代碼： do form 設(shè)備采購(gòu)表 在“ ” (“ caption”屬性為“顯示報(bào)表” )控件的“ click”事件中添加如下代碼： do form 顯示報(bào)表 在“ form1”的屬性里選擇“ autocenter”設(shè)置為“ .”，同時(shí)將“ backcolor” 設(shè)置為“ 255,255,255”，“ windowstate”設(shè)置為“ 0普通”。 添加“ form1”的“ init”事件的代碼如下： set directory to c:\倉(cāng)庫管理 \ *將程序的默認(rèn)的路徑指向資源所在的文 件夾 該表單設(shè)計(jì)結(jié)果如圖所示： 4． 2 設(shè)備入庫模塊的設(shè)計(jì) 在設(shè)備入庫模塊中將實(shí)現(xiàn)設(shè)備數(shù)據(jù)的添加和入庫等功能。本模塊設(shè)計(jì)采用先倉(cāng)庫管理系統(tǒng) 第 23 頁 共 55 頁 用向?qū)杀韱?，然后修改的方法?shí)現(xiàn)。 首先在項(xiàng)目管理器的文檔視圖下單擊“新建”按鈕， 在接下來的向?qū)е?，“?shù)據(jù)庫和表”選擇“倉(cāng)庫管理”以及“設(shè)備入庫表”，這是前面定義好的數(shù)據(jù)庫和表。 由于設(shè)備入庫需要顯示所有的字段，因此我們將可用字段全部移至選定字段，如圖所示，單擊“下一步”按鈕， 倉(cāng)庫管理系統(tǒng) 第 24 頁 共 55 頁 在表單樣式中，選擇“陰影式”以及“圖片按鈕”，如圖所示。左上角的窗口提供了表單樣式的預(yù)覽功能，圖片按鈕和文本按鈕的區(qū)別在于顯示的時(shí)候是以圖片來表達(dá)功能還是文字來表達(dá)，實(shí)現(xiàn)功能的函數(shù)沒有區(qū)別。選擇“上一步”按鈕可以跳回上一個(gè)界面對(duì)表單中顯示的字段進(jìn)行修改。 單擊“下一步”按鈕后，向?qū)нM(jìn)行到“步驟 3排序次序”，如圖所示，選擇“設(shè)備號(hào)”為索引，并選擇升序排列。最后預(yù)覽表單，核對(duì)每項(xiàng)的設(shè)置，完成表單向?qū)?，如圖所示。 倉(cāng)庫管理系統(tǒng) 第 25 頁 共 55 頁 值得注意的是，在結(jié)束表單向?qū)埃蛇x擇“保存表單以備將來使用”，“保存并運(yùn)行表單”，或者“保存表單并用表單設(shè)計(jì)器修改表單”。由于 Visual 向?qū)傻谋韱沃痪哂衅毡樾裕瑢?duì)于當(dāng)前設(shè)計(jì)的倉(cāng)庫管理系統(tǒng)還需要一定的改變，因此以我們選擇“保存表單并用表設(shè)計(jì)器修改表單”。 單擊“完成”按鈕系統(tǒng)提示保存表單，將表單保存為“設(shè)備入庫表 .scx”，存于 c:\倉(cāng)庫管理目錄下。然后打開表單修改器生成的表單，如圖所示。 在修改 BUTTONSET 時(shí)，可以通過屬性窗口的下拉列表選定單個(gè)按鈕，調(diào)整其位置和其它屬性。如圖所示。 倉(cāng)庫管理系統(tǒng) 第 26 頁 共 55 頁 根據(jù)功能需求，把“ cmdprint”、“” cmdexit、“ cmdDelete”和“ cmdedit”的Visible 屬性都設(shè)為“ .”。添加 2 個(gè)命令按鈕， Caption 屬性分別設(shè)為“修改庫存”和“回主界面”。 在“回主界面”命令按鈕的 click 事件中添加代碼如下： do form 倉(cāng)庫管理 在修改庫存命令按鈕的 click 事件中添加代碼如下： select 現(xiàn)有庫存表 getid= set order to 設(shè)備號(hào) seek getid if found() getnum= update 現(xiàn)有庫存表 set 現(xiàn)有庫存 =(現(xiàn)有庫存 +getnum) where (設(shè)備號(hào)=getid) else insert into 現(xiàn)有庫存表 (設(shè)備號(hào) ,現(xiàn)有庫存 ,最大庫存 ,最小庫存 )。 value (thisform. 設(shè)備號(hào) ,thisform. 入庫數(shù)量倉(cāng)庫管理系統(tǒng) 第 27 頁 共 55 頁 ,1000,10) endif insert into 操作日志表 (操作員 ,操作內(nèi)容 ,操作時(shí)間 )。 values ( ,39。設(shè)備入庫 39。,date()) 保存后運(yùn)行表單，界面如圖所示： 4． 3 設(shè)備出庫模塊的設(shè)計(jì)： 在設(shè)備出庫模塊中將實(shí)現(xiàn)設(shè)備出庫數(shù)據(jù)的添加和修改庫存等功能。該模塊的倉(cāng)庫管理系統(tǒng) 第 28 頁 共 55 頁 功能和設(shè)備入庫的功能相似。具體操作可以參考設(shè)備入庫模塊的設(shè)計(jì)，設(shè)計(jì)最終的界面如圖所示。 在表單的左上角加上了顯示當(dāng)前時(shí)間的功能，添加標(biāo)簽 label2 的 caption 屬性設(shè)為“當(dāng)前時(shí)間”；添加 label3 的 caption屬性設(shè)為空；為當(dāng)前表單的 label3init事件添加如下代碼： =dtoc(date()) 該模塊具體實(shí)現(xiàn)過程不再一一詳細(xì)說明。下面列出了表單中所用到控件的屬性值。 (1) Form1 控件的主要屬性： 屬性名稱 屬性值 Caption 設(shè)備出庫表 Autocenter . BackColor （ 2） ButtonSet1 控件的主要屬性： 控件名 屬性名稱 屬性值