倉庫管理系統(tǒng)數據庫應用技術課程設計.doc

遼 寧 工 業(yè) 大 學數據庫應用技術課 程 設 計 說 明 書題目： 倉庫管理系統(tǒng) 學院（系）： 專業(yè)班級： 學 號： 學生姓名： 指導教師： 教師職稱： 起止時間： 遼 寧 工 業(yè) 大 學 課 程 設 計 說 明 （ 計 算 ）書 目錄第一章 概述4第二章 問題定義5第三章 需求分析6第四章 數據庫設計11第五章 界面設計19第六章 代碼與注釋24設計總結26參考文獻27第一章 概述本倉庫貨物管理系統(tǒng)針對企業(yè)倉庫進貨管理方面的問題。它能實現倉庫進貨的綜合管理，減少不必要的手工上報，也為基層單位上報數據提供便利，減少人工勞動。對倉庫進貨信息資源，出貨信息資源管理的貨號、貨物名稱、進出貨時間、數量、生產單位；貨物報表登記貨物的基本檔案，貨號、貨名、入庫日期、存放地點、存放情況；日常管理中貨物性質、存放要求、保質期等信息進行全面、系統(tǒng)的管理。在整個系統(tǒng)開發(fā)的過程中，運用了軟件工程的基本概念、相關技術和方法。并且采用了系統(tǒng)生命周期的結構化程序設計方法，從而將整個系統(tǒng)開發(fā)各階段（系統(tǒng)分析、系統(tǒng)設計、系統(tǒng)實施）的基本活動貫穿起來。第二章 問題定義隨著科學技術的發(fā)展，社會進步，計算機迅速的發(fā)展,倉庫貨物管理的方法也日新月異,以前全是由人工管理的方法現存在很多的缺點：管理效率低，勞動強度大，信息處理速度低而且準確率也不夠令人滿意。為了提高倉庫貨物管理效率，減輕勞動強度提高，信息處理速度和準確性；為管理員提供更方便、科學的服務項目。為管理員提供的一種更先進、科學的服務系統(tǒng)。于是我們便選擇了由計算機來設計一個倉庫貨物管理系統(tǒng)的方案。讓計算機對倉庫貨物進行自動管理，管理員可以直接在計算機上實現倉庫貨物的信息管理，并能在一定程度上實現自動化。我們在現行系統(tǒng)初步調查的基礎上提出了新系統(tǒng)目標，即新系統(tǒng)建立后所要求達到的運行指標，這是系統(tǒng)開發(fā)和評價的依據。第三章 需求分析一、數據庫需求分析該系統(tǒng)主要包括系統(tǒng)功能輸入模塊、基本資料維護模塊、報表模塊、綜合查詢功能模塊和統(tǒng)計模塊等。系統(tǒng)要實現基本信息錄入、修改、查詢等功能：1、 信息的輸入，包括溢貨信息、缺貨信息、貨物入庫信息、庫存信息、貨源信息、貨價信息等。2、 信息的修改、刪除。3、 根據要求，查詢統(tǒng)計符合條件的各類信息。4、 依據實際需要，對重要新信息進行統(tǒng)計。二、數據流圖需求單位需求倉庫現有庫存向供應單位進貨管理事物處理設備進貨設備入庫設備出庫設備出貨庫存清 單出貨清 單進貨清 單三、數據字典（DD）:數據字典是關于數據的信息的集合，也就是對數據流圖中包含的所有元素的定義的集合。由于本次設計是小型軟件系統(tǒng)的開發(fā)，所以采用卡片形式書寫數據字典。每張卡片上保存描述一個數據的信息這樣做更新和修改起來比較方便，而且能單獨處理描述每個數據的信息。下面將列出若干數據元素的數據卡片信息。數據字典卡片：名稱：庫存清單別名：庫存報表描述：倉庫貨物存儲的描述定義：貨物編號+名稱+生產日期+有效期+數量+單價+上、下限位置：輸出到打印機保存到磁盤名字：貨物編號別名：描述：惟一地標識庫存清單中一個特定貨物的關鍵域定義：貨物編號=8字符8位置：進貨報表 庫存清單 事務名稱：貨物現存量清單別名：描述：倉庫貨物存量描述定義：貨物編號+名稱+生產日期+有效期+數量+上下限 + +狀態(tài)標志（正常、緊急、警告、嚴重）位置：輸出到打印機保存到磁盤名稱：進貨清單別名：進貨報表描述：每次進貨的貨物描述定義：貨物編號+名稱+生產日期+有效期+數量位置：輸出到打印機保存到磁盤名字：貨物生產單位別名：生產商描述：惟一的標識倉庫貨物生產的一個特定的單位定義：單位名+負責人+聯系電話位置：進貨報表 出貨報表 庫存清單名字：貨物供應單位別名：供應商描述：惟一的標識倉庫貨物來源的一個特定的單位定義：單位名+負責人+聯系電話位置：進貨報表 出貨報表 庫存清單 名字：需求數量別名：本次數量描述：某種貨物一次被某單位領取的數量定義：本次數量=1數字5位置：貨物出庫信息 名字：上期數量別名： 描述：某種貨物的庫存數量定義：上期數量=1數字5位置：貨物入庫信息貨物出庫信息名字：進貨數量別名：本次數量描述：某種貨物的一次入庫數量定義：本次數量=1數字5位置：貨物入庫信息名字：出貨清單別名：出貨報表描述：每次出貨的貨物描述定義：貨物編號+名稱+生產日期+有效期+數量位置：輸出到打印機保存到磁盤名字：需求單位名別名： 描述：惟一的標識需要貨物的一個特定的單位定義：單位名=20字符20位置：部門表 貨物入庫信息貨物出庫信息名字：需求單位表別名：需求單位信息描述：是對需要貨物的各單位的信息進行統(tǒng)計定義： 單位名+負責人+負責人聯系電話+操作員 +所屬工作位置：貨物入庫信息貨物出庫信息名字：操作用戶表別名：操作用戶信息描述：是對使用本系統(tǒng)的用戶進行身份和權限驗證用的定義：用戶名+密碼+所屬單位+權限一+權限二+權限三+操作員位置：班級表貨物需求單位信息表貨物信息表貨物出庫表貨物入庫表名字：用戶名別名： 描述：惟一標識本系統(tǒng)的用戶身份定義：用戶名=8字符8位置：操作用戶表名字：密碼別名： 描述：驗證本系統(tǒng)的用戶身份定義：密碼=8字符8位置：操作用戶表名字：權限三別名： 描述：標識本系統(tǒng)的用戶對本系統(tǒng)查詢權的使用權限定義：權限四=8字符8位置：操作用戶表名字：權限二別名： 描述：標識本系統(tǒng)的用戶對本系統(tǒng)出入庫權的使用權限定義：權限三=8字符8位置：操作用戶表名字：權限一別名： 描述：標識本系統(tǒng)的用戶對本系統(tǒng)管理權使用權限定義：權限一=8字符8位置：操作用戶表四、數據庫概念的結構設計數據庫一般分為三級模式：外模式、概念模式和內模式。外模式也就是不同用戶所對的數據視圖，它將數據庫內部抽象的數據及其互相之間的關系表示為簡單、直觀的應用界面。概念模式是數據庫中全部數據的邏輯結構和特征描述，通常以某種數據模型為基礎。內模式是對數據的物理結構和存儲方式的描述。在這里我們將要設計的是數據庫的概念模式，通過對倉庫貨物管理系統(tǒng)的內容和數據流程分析及E-R圖，設計如下數據項和數據結構。倉庫信息。包括庫房名稱、庫位名稱、庫存貨物、來往客戶信息、庫房編號、庫位編號，倉庫管理員等。貨物信息。包括名稱、供應單位、生產單位、生產日期、貨物數量、貨物單價、入庫時間、貨物編號等。單位信息。包括單位名稱、負責人、地址、聯系電話等信息。貨物入庫信息。包括貨物編號、貨物名、生產單位、供應單位、本次數量、生產時間、貨物單價、入庫時間、經辦人等信息。貨物出庫信息。包括貨物編號、貨物名、生產單位、供應單位、貨物需求單位名、本次數量、生產時間、貨物單價、出庫時間、經辦人等信息。用戶信息。包括用戶名稱、密碼、所在單位、用戶權限信息、操作員、最后修改時間。數據庫概念結構設計，是在需求分析的基礎上，設計出能夠滿足用戶需求的各種實體，以及他們之間的關系，為后面的邏輯結構設計打下基礎。五、數據庫的邏輯結構設計：在數據庫設計中相當重要的一步就是將概念模型轉化為計算機上DBMS所支持的數據模型，例如，將E-R圖模型轉化為關系模型，道理很簡單，我們設計概念模型基本上都是一些抽象的關系，在再數據庫設計的實現過程中，在計算機上有效地表示出這些關系就成了數據庫設計的關鍵。根據倉庫貨物管理系統(tǒng)的功能要求，選取SQLServer 2000作為后臺數據庫。在上面的實體和實體之間的E-R圖設計基礎上，形成數據庫中的表格及表格之間的關系。該數據庫由6個表組成，需求單位表、貨物表、供應單位表、入庫信息表、出庫信息表、操作用戶表。一、主表的結構設計1.需求單位信息需求單位表是對需求單位信息進行統(tǒng)計，包括單位名、單位編號、取貨時間、地址、負責人、聯系電話、操作員、所需貨物、貨物單價、貨物數量等信息。2.供應單位信息 供應單位信息表是提供貨物的單位信息的統(tǒng)計，包括單位編號、單位名稱、負責人、聯系電話、地址、所供應貨物、貨物單價、貨物商量等信息。3.貨物信息貨物表是對貨物信息的統(tǒng)計，包括名稱、供應單位、生產單位、生產時間、貨物數量、貨物單價、入庫時間、編號等。4.貨物入庫信息貨物入庫信息是對入庫信息的統(tǒng)計，包括貨物編號、貨物名稱、生產單位、供應單位、本次數量、生產時間、貨物單價、入庫時間、經辦人等信息。5.操作用戶信息操作用戶表是對使用本系統(tǒng)的用戶進行身份和權限驗證用的，包括用戶名稱、密碼、所在單位、用戶權限信息、操作員、最后修改時間。6、貨物出庫信息貨物出庫表是對出庫信息的統(tǒng)計。包括貨物編號、貨物名稱、生產單位、需求單位、本次數量、生產時間、貨物單價、出庫時間、經辦人等信息。六、倉庫貨物管理系統(tǒng)系統(tǒng)模塊可以根據模塊獨立原理對軟件結構進行精化。為了合理的分解，得到盡可能高的內聚、盡可能松散的耦合，最終要的是，為了得到一個易于實現、易于測試和易于維護的軟件結構，應該對模塊進行再分解或合并。系統(tǒng)功能模塊圖如圖7.1所示：倉庫貨物管理系統(tǒng)系統(tǒng)模塊輸入模塊維護模塊查詢模塊報表模塊幫助模塊打印設置日志管理入庫模塊出庫模塊還原模塊需求模塊進貨模塊圖4.1 系統(tǒng)功能模塊圖第四章 數據庫設計一、概念設計：系統(tǒng)ER圖根據對數據流圖和數據字典的分析，我們可以確定該應用中的實體，屬性和實體之間的關系，并畫出如下所示的E-R圖。編號取貨時間負責人聯系電話需求單位名需求單位操作員地址貨物單價 圖1.3 需求單位實體E-R生產單位供應單位生產日期名 稱上 下 限貨 物 貨物編號需求單位貨物單價貨物數量入庫時間圖1.4貨物實體E-R圖庫 房庫房編號庫房名稱庫存量供應單位貨物電話地址管理員需求單位 圖1.5 倉庫E-R圖供貨時間貨物編號單位地址單位編號單位名稱供應單位聯系電話負責人 圖1.6 供應單位實體E-R圖貨物編號貨物名稱生產單位供應單位生產時間貨物單價入庫時間經辦人本次數量入庫信息 圖1.7 入庫信息實體E-R圖生產單位貨物名稱供應單位本次數量出庫信息貨物單價出庫時間貨物編號生產時間經辦人需求單位名 圖1.8 出庫信息實體E-R圖所在單位用戶權限用戶名稱密碼操作員修改時間用 戶圖1.9 用戶實體E-R圖地址貨物編號負責人負責人地址貨物編號名稱名稱電話電話供應單位需求單位單位編號單位編號需求生產日期供應數量編號貨物單價名稱入庫時間生產單位存儲倉庫名稱編號貨物庫存量需求單位供應單位地址電話查詢用戶修改時間擁護權限操作員所在單位密碼名稱圖3.10 實體和實體之間的E-R圖二、邏輯設計：下面列出幾個主要的數據庫表設計：表2-1. 需求單位結構表列 名數據類型長 度是否允許為空說明xqdwnumbermoney8否編號（主鍵）xqdwnamevarchar50否單位名xqdwadressvarchar20否地址xqdwmanagervarchar8否負責人xqdwtelvarchar20是聯系電話operatorvarchar8是操作員xqpricemoney8是單價xqhwvarchar20是所需貨物xqamountint4否貨物數量qhtimedatatime8否取貨時間表2-2 供應單位信息結構表列 名數據類型長 度是否為空說 明gydwnumbermoney8否編號（主鍵）gydwnamevarchar20否單位名稱gydwmanagervarchar8是負責人gydwtelvarchar50是聯系電話gydwadressvarchar20否地址operatorvarchar8是操作員gypricemoney8是單價gyhwvarchar20是供應貨物gyamountint4否貨物數量表2-3 貨物結構表列 名數據類型長 度是否為空說 明gydwvarchar50是供應單位hwnamevarchar8是貨物名稱scdwvarchar20是生產單位sctimedatatime8是生產時間amountint4是貨物數量pricemoney8是貨物單價rktimedatatime8是入庫時間operatorvarchar8是操作員hwnumbermoney8否編號（主鍵）表2-4 貨物入庫信息結構表列名數據類型長度是否為空說 明hwnumberint4否貨物編號hwnamevarchar50否貨物名稱scdwvarchar8否生產單位gydwvarchar50是供應單位bcslint4是本次數量sctimevarchar8是生產日期pricemoney8是貨物單價rktimedatetime8是入庫時間jbrvarchar8是經辦人表2-5 操作用戶結構表列名數據類型長度是否為空說明usernamevarchar8否用戶名passwordvarchar20否密碼szdwvarchar20是所在單位Qx1bit1是權限一Qx2bit1是權限二Qx3bit1是權限三operatorvarchar8是操作員表2-6 貨物出庫信息結構表列名數據類型長度是否為空說明hwnumberint4否貨物號hwnamevarchar50否貨物名scdwvarchar20否生產單位xqdwvarchar20否需求單位bcslint4是本次數量sctimevarchar8是生產日期pricemoney8是貨物單價outtimedatetime8是出庫時間jbrvarchar8是經辦人三、物理設計在數據庫中創(chuàng)建索引時，查詢所使用的索引信息存儲在索引頁中。連續(xù)索引頁由從一個頁到下一個頁的指針鏈接在一起。當對數據的更改影響到索引時，索引中的信息可能會在數據庫中分散開來。重建索引可以重新組織索引數據（對于聚集索引還包括表數據)的存儲，清除碎片。這可通過減少獲得請求數據所需的頁讀取數來提高磁盤性能。 在 SQL Server 2000 中，如果要用一個步驟重新創(chuàng)建索引，而不想刪除舊索引并重新創(chuàng)建同一索引，則使用 CREATE INDEX 語句的 DROP_EXISTING 子句可以提高效率。這一優(yōu)點既適用于聚集索引也適用于非聚集索引。 以刪除舊索引然后重新創(chuàng)建同一索引的方式重建聚集索引，是一種昂貴的方法，因為所有二級索引都使用聚集鍵指向數據行。如果只是刪除聚集索引然后重新創(chuàng)建，則會使所有非聚集索引都被刪除和重新創(chuàng)建兩次。一旦刪除聚集索引并再次重建該索引，就會發(fā)生這種情形。通過在一個步驟中重新創(chuàng)建索引，可以避免這一昂貴的做法。在一個步驟中重新創(chuàng)建索引時，會告訴 SQL Server 要重新組織現有索引，避免了刪除和重新創(chuàng)建非聚集索引這些不必要的工作。該方法的另一個重要優(yōu)點是可以使用現有索引中的數據排序次序，從而避免了對數據重新排序。這對于聚集索引和非聚集索引都十分有用，可以顯著減少重建索引的成本。另外，通過使用 DBCC DBREINDEX 語句，SQL Server 還允許對一個表重建一個或多個索引，而不必單獨重建每個索引。 DBCC DBREINDEX 也可用于重建執(zhí)行 PRIMARY KEY 或 UNIQUE 約束的索引，而不必刪除并創(chuàng)建這些約束（因為對于為執(zhí)行 PRIMARY KEY 或 UNIQUE 約束而創(chuàng)建的索引，必須先刪除該約束，然后才能刪除該索引）第五章 界面設計一、程序流程圖：該系統(tǒng)數據流程圖如圖3.2所示：更新庫存清 單處理進 貨產生進貨報 表處理出 庫處理出 貨產生出貨報 表倉庫管理員經辦人產生出庫報 表D1 庫存清單D1 庫存清單D2 進貨信息D4 出庫信息更新 事物庫存信息庫存清單進貨信息進貨信息進貨報表接收事務出貨 信息出貨報表D3 出貨信息出貨信息出庫信息出庫信息庫存清單出庫報表 圖3.2 系統(tǒng)數據流程圖二、登錄界面及密碼修改1、登錄界面如圖5.3所示 圖5.3 登錄界面圖在用戶登錄時，在輸入用戶名和密碼及用戶類型的前提下將其與數據庫中的數據進行對比，若一致，則打開主窗體，若不一致提示錯誤，并要求再次輸入，若輸入次數超過三次，則關閉系統(tǒng)。在這個部分中，需要對用戶的類型存入一個全局變量，予以判斷其所具有的系統(tǒng)使用權限，例如，用戶類型為DBA，則該用戶擁有系統(tǒng)的一切權力，可以對每一部分進行添加、刪除、查找、統(tǒng)計等操作；而其他用戶類型都依據其類型的屬性，可以使用的部分也會相應減少，而只能使用一部分與其類型相匹配的功能。2、增加新用戶如圖5.4所示 圖5.4 增加新用戶三、貨物添加操作及修改1、貨物添加如圖5.5所示： 圖5.5 貨物添加如圖管理員查詢某貨物時貨物名及貨物號與數據庫中的數據不相一致，系統(tǒng)提示所查貨物在倉庫里為空，即倉庫從沒存儲該貨物。然后管理員可根據倉庫管理的需求是否保存該貨物。2、貨物修改此功能是對貨物單價、庫位、編號修改。首先系統(tǒng)將從數據庫中讀取所有可用的貨物信息，其中包括編號、名稱、入庫時間、單價等信息，管理員可視情況分別修改。修改完畢并確認后，系統(tǒng)將所做修改保存，并將新的記錄保存于數據庫中。在倉庫貨物管理操作中，為了保護數據庫以及考慮實際因素，對單價、編號的修改時都不能留空，同時編號的修改也不能有重復，若出現此類情況則提示出錯。四、查詢操作查詢操作如圖5.7所示 圖5.7 查詢操作圖在執(zhí)行查詢操作之前通常要先在單行文本框中輸入被查詢的條件，在單行文本框失去聚焦時將查詢條件傳遞給查詢按鈕的單擊事件中，然后過濾語句依據此過濾條件過濾得出相應的數據，并顯示在其他數據窗體控件中。在通常情況下，用戶可以在得到要查詢的信息后，對它們的各個字段進行修改，經過修改后，在退出時系統(tǒng)會提示進行存儲。在完成了用戶界面設計和程序過程設計后，基本上完成了詳細設計的內容。第六章 代碼與注釋一、登錄代碼Option ExplicitDim cnt As Integer 記錄確定次數Private Sub Command1_Click()Dim sql As StringDim rs_login As New ADODB.RecordsetIf Trim(txtuser.Text) = Then 判斷輸入的用戶名是否為空 MsgBox 沒有這個用戶, vbOKOnly + vbExclamation, txtuser.SetFocusElse sql = select * from 系統(tǒng)管理 where 用戶名= & txtuser.Text & rs_login.Open sql, conn, adOpenKeyset, adLockPessimistic If rs_login.EOF = True Then MsgBox 沒有這個用戶, vbOKOnly + vbExclamation, txtuser.SetFocus Else 檢驗密碼是否正確 If Trim(rs_login.Fields(1) = Trim(txtpwd.Text) Then userID = txtuser.Text userpow = rs_login.Fields(2) rs_login.Close Unload Me MDIForm1.Show Else MsgBox 密碼不正確, vbOKOnly + vbExclamation, txtpwd.SetFocus End If End IfEnd Ifcnt = cnt + 1If cnt = 3 Then Unload MeEnd IfExit SubEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim connectionstring As Stringconnectionstring = provider=Microsoft.Jet.oledb.4.0; & _ data source=cangku.mdbconn.Open connectionstringcnt = 0End SubPrivate Sub Timer1_Timer()Label3.Caption = TimeLabel4.Caption = DateEnd SubOption ExplicitDim rs_find As New ADODB.RecordsetPrivate Sub Command1_Click()On Error GoTo cmderrorDim find_date1 As StringDim find_date2 As StringIf Option1.Value = True Then sqlfind = select * from 入出庫 where 貨單號 between & _ Combo1(0).Text & & and & & Combo1(1).Text & End IfIf Option2.Value = True Then find_date1 = Format(CDate(comboy(0).Text & - & _ combom(0).Text & - & combod(0).Text), yyyy-mm-dd) find_date2 = Format(CDate(comboy(1).Text & - & _ combom(1).Text & - & combod(1).Text), yyyy-mm-dd) sqlfind = select * from 入出庫 where 日期 between # & _ find_date1 & # & and & # & find_date2 & #End Ifrs_data1.Open sqlfind, conn, adOpenKeyset, adLockPessimistickumanage.displaygrid1Unload Mekumanage.Showcmderror:If Err.Number 0 Then MsgBox 請輸入正確的查詢條件！, vbOKOnly + vbExclamation, 警告End IfEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim i As IntegerDim j As IntegerDim sql As StringIf findok = True Then rs_data1.CloseEnd Ifsql = select * from 入出庫 order by 貨單號 descrs_find.CursorLocation = adUseClientrs_find.Open sql, conn, adOpenKeyset, adLockPessimisticIf rs_find.EOF = False Then 添加貨單號 With rs_find Do While Not .EOF Combo1(0).AddItem .Fields(0) Combo1(1).AddItem .Fields(0) .MoveNext Loop End WithEnd IfFor i = 2001 To 2005 添加年 comboy(0).AddItem i comboy(1).AddItem iNext iFor i = 1 T