超市管理系統(tǒng)完整版

課程設計說明書課程名稱：大型數(shù)據(jù)庫應用計本課題名稱：超市管理系統(tǒng)班級計本041姓名：02號左文兵姓名：27號董子冰姓名：31號劉子豪指導教師：滿君豐副教授湖南工業(yè)大學計算機與通信學院2007年12月20日課程設計檢查表課程設計檢查表.書簽錯誤！未定目錄1緒論1.1課題背景1.2系統(tǒng)開發(fā)關鍵技術介紹系統(tǒng)分析.2.1用戶工作流程.2.2用戶業(yè)務需求.系統(tǒng)設計.3.1設計思想3.2系統(tǒng)功能結(jié)構圖3.3模塊功能設計.系統(tǒng)數(shù)據(jù)庫設計.TOC\o"1-5"\h\z4.1系統(tǒng)數(shù)據(jù)庫的建立74.2系統(tǒng)E-R圖74.3各個數(shù)據(jù)表的創(chuàng)建94.4存儲過程設計114.5數(shù)據(jù)庫的連接115系統(tǒng)實現(xiàn)135.1系統(tǒng)實現(xiàn)工具與支持平臺135.2系統(tǒng)界面135.3系統(tǒng)主要功能實現(xiàn)161.前臺162.后臺175.4系統(tǒng)核心代碼176總結(jié)與展望216.1收獲與體會216.2未來的展望21參考文獻.錯誤！未定義書致謝參考文獻.錯誤！未定義書致謝.簽錯誤！未定義緒論1.1課題背景21世紀，超市的競爭也進入到了一個全新的領域，隨著超市的發(fā)展，其經(jīng)營管理也變得愈加復雜，迫切地需要引入新的管理技術。超市形態(tài)的高速發(fā)展，其經(jīng)營管理也變得愈加復雜，日常所需要處理的數(shù)據(jù)量也逐漸增大，商業(yè)運轉(zhuǎn)的中間環(huán)節(jié)也越來越多，原始的人工管理已無法應對這復雜的市場。超市需要處理大量的庫存信息，還要時刻更新產(chǎn)品的銷售信息，不斷添加商品信息。競爭已不再是規(guī)模的競爭，而是技術的競爭、管理的競爭、人才的競爭。技術的提升和管理的升級是超市業(yè)的競爭核心。零售領域目前呈多元發(fā)展趨勢，多種業(yè)態(tài)：超市、倉儲店、便利店、特許加盟店、專賣店、貨倉等相互并存。如何在激烈的競爭中擴大銷售額、降低經(jīng)營成本、擴大經(jīng)營規(guī)模，成為超市營業(yè)者努力追求的目標。為了大大提高超市的運作效率；通過全面的信息采集和處理，輔助提高超市的決策水平；使用本系統(tǒng)，可以迅速提升超市的管理水平，為降低經(jīng)營成本，提高效益，增強超市擴張力，提供有效的技術保障。針對超市的特點，為了幫助超市解決現(xiàn)在面臨的問題，提高小型超市的競爭力，我們將開發(fā)以下系統(tǒng)：前臺POS銷售系統(tǒng)、后臺管理系統(tǒng)，其中這兩個子系統(tǒng)又包含其它一些子功能。1.2系統(tǒng)開發(fā)關鍵技術介紹本系統(tǒng)采用的是微軟公司的MicrosoftVisualBasic6.0開發(fā)工具做為開發(fā)系統(tǒng)程序。在連接數(shù)據(jù)庫上，利用AD0對象模型，創(chuàng)建幾個簡單的對象和數(shù)據(jù)來源進行連接，然后從中取得所需要的數(shù)據(jù)，進行數(shù)據(jù)訪問操作后保存。在連接數(shù)據(jù)庫上，以往在數(shù)據(jù)訪問應用程序開發(fā)中，不管是使用DAO或RDO對象來訪問數(shù)據(jù)來源，都會對這些對象模型眾多而且復雜的組成結(jié)構印象深刻。但利用ADO對象模型，就可以只創(chuàng)建幾個簡單的對象和數(shù)據(jù)來源進行連接，然后從中取得所需要的數(shù)據(jù)，進行數(shù)據(jù)訪問操作后保存。ADO(ActiveXDataObjects)對象模型主要由三個對象成員：Connection、Command與Recordset對象；以及三個集合對象：Errors、Parameters與Fields對象所組成。ADO對象模型與DAO、RDO另一個較大的差異，在于某些ADO對象可以直接創(chuàng)建而不需依據(jù)上下層按順序產(chǎn)生，比如我們可以直接創(chuàng)建一個Command對象而不需要先行創(chuàng)建該對象的上層Connection對象，ADO會在該Comman對d象產(chǎn)生時自動創(chuàng)建上層Connection對象。下面給出ADO對象間的關系下面給出ADO對象間的關系（如下圖1）:圖1.2ADO對象關系對象和集合的功能描述：Connection對象和集合的功能描述：Connection對象Command對象Recordset對象Errors集合對象Parameters集合對象Fields集合對象連接數(shù)據(jù)來源從數(shù)據(jù)來源取得所需的數(shù)據(jù)針對取出的數(shù)據(jù)進行處理返回錯誤信息和其他信息執(zhí)行SQL查詢獲取和處理字段數(shù)據(jù)2系統(tǒng)分析2.1用戶工作流程本系統(tǒng)主要解決超市的基本管理問題，其中又分別包括后臺管理和前臺管理，后臺包括進貨管理，銷售管理，庫存情況的查詢，以及基本用戶人員的帳號管理。前臺包括商品錄入，收銀業(yè)務。2.2用戶業(yè)務需求進貨管理：根據(jù)銷售情況及庫存情況，自動制定進貨計劃(亦可手工制定修改)，可以避免盲目進貨造成商品積壓。按計劃單有選擇性地進行自動入庫登記。綜合查詢打印計劃進貨與入庫記錄及金額。銷售管理：商品正常銷售、促銷與限量、限期及禁止銷售控制。綜合查詢各種銷售明細記錄、各地收銀員收銀記錄以及交結(jié)賬情況等。按多種方式統(tǒng)計生成銷售排行榜，靈活察看和打印商品銷售日、月、年報表。庫存管理：綜合查詢庫存明細記錄。庫存狀態(tài)自動告警提示。如庫存過剩、少貨、缺貨等。軟件為您預警，避免庫存商品積壓損失和缺貨。庫存自動盤點計算。人員管理：員工、會員、供貨商、廠商等基本信息登記管理。員工操作權限管理。客戶銷售權限管理。收銀業(yè)務：通過掃描條形碼或者直接輸入商品名稱(對于同類多件商品采用一次錄入加數(shù)量的方式)自動計算本次交易的總金額。在顧客付款后，自動計算找零，同時打印交易清單(包括交易的流水賬號、每類商品的商品名、數(shù)量、該類商品的總金額、交易的時間、負責本次收銀的員工號)。如果顧客是本店會員并持有本人會員卡，則在交易前先掃描會員卡，并對所購物品全部實行95折優(yōu)惠，并將所購物品的總金額累計到該會員的總消費金額中。會員卡的有效期限為一年，滿一年未續(xù)卡者，該會員卡將被注銷。3系統(tǒng)設計3.1設計思想（1）系統(tǒng)分成前臺和后臺幾個相對獨立的模塊，但這些模塊都進行集中式管理。（2）分層的模塊化程序設計思想，整個系統(tǒng)采用模塊化結(jié)構設計。作為應用程序有較強的可操作性和擴展性。（3）本系統(tǒng)使用的數(shù)據(jù)庫設計是0racle+ODBC+AD控0制，同時也盡可能地使用了VB的各種高級控件。（4）在SQL語言的使用上，也使用了較多的技巧，例如組合查詢技術，希望通過此次設計能夠提供自己各個方面的能力。3.2系統(tǒng)功能結(jié)構圖根據(jù)對超市管理系統(tǒng)進行的可行性分析和結(jié)構化程序設計的要求，得到系統(tǒng)總體結(jié)構如圖5-1所示：3.3模塊功能設計根據(jù)上述系統(tǒng)總體思想的分析，本系統(tǒng)共包括六大模塊，分別是商品錄入管理模塊，收銀業(yè)務管理模塊，人員管理模塊，銷售管理模塊，進貨管理模塊，庫存管理模塊。每個模塊的功能如下：商品錄入管理模塊：（1）實現(xiàn)商品的快速錄入以快速更新數(shù)據(jù)；（2）實現(xiàn)支持商品的條形碼掃描錄入；收銀業(yè)務管理模塊：（1）實現(xiàn)交易總額計算；（2）實現(xiàn)交易總額的查詢；人員管理模塊功能：（1）實現(xiàn)員工信息的查詢；（2）實現(xiàn)員工信息的更新，包括增加、刪除、修改功能；（3）實現(xiàn)員工操作權限管理；銷售管理模塊功能：（1）實現(xiàn)銷售信息的查詢；（2）實現(xiàn)商品銷售的控制；進貨管理模塊功能：（1）實現(xiàn)進貨信息的查詢；（2）實現(xiàn)進貨信息的更新，包括增加、刪除、修改功能；庫存管理模塊功能：（1）實現(xiàn)商品明細記錄的查詢；（2）實現(xiàn)商品信息的更新，包括增加、刪除、修改功能；（3）實現(xiàn)庫存狀態(tài)自動告警；4.1系統(tǒng)數(shù)據(jù)庫的建立數(shù)據(jù)庫應該設計成層次清晰的，高效的，實用數(shù)據(jù)庫，該系統(tǒng)是采用三層架構設計的，可通過應用服務器的擴展來實現(xiàn)新功能的添加。系統(tǒng)對數(shù)據(jù)記錄的操作也因為其課程設計中定義的數(shù)據(jù)操作方式和操作內(nèi)容而注定不會產(chǎn)生臟數(shù)據(jù)及數(shù)據(jù)讀寫的不一致性，故在數(shù)據(jù)庫設計方面未采用觸發(fā)器。我們認為在擴展應用服務器至多種功能后，將應用服務器分為控制部分和客戶應用部分，此時在控制部分添加觸發(fā)器來防止數(shù)據(jù)讀寫的不一致性，這已經(jīng)超出了本次課程設計所涉及的范圍，在此不做過多的陳述。4.2系統(tǒng)E-R圖1.E-R模型超市管理系統(tǒng)數(shù)據(jù)庫E-R模型:類型用戶姓名用戶用戶密碼ID員用戶號類型用戶姓名用戶用戶密碼ID員用戶號圖41用戶E-R模型圖銷書銷售I期D促銷價格商品:徊爾名商品圖銷書銷售I期D促銷價格商品:徊爾名商品圖4.2物胡銷售E^R模型圖價格允許打折圖4.3物品銷售E-R模型圖圖4.8系統(tǒng)E-R模型圖4.3各個數(shù)據(jù)表的創(chuàng)建由數(shù)據(jù)模型利用OraclelOg進行數(shù)據(jù)庫的詳細設計，其基本表的設計如下:表4.1商品表(Merchandise)字段名—字段類型長度主/外鍵字段值約束對應中文名MerchlDint4PNotnull商品編號MerchNameVarchar50Notnull商品名稱MerchPriceMoney4Notnull價格MerchNumInt4Notnull庫存數(shù)量CautionNumInt4Notnull庫存報警數(shù)量PlanNumInt4null計劃進貨數(shù)BarCodeVarchar50Notnull條形碼SalesProPriceMoney4促銷價格SalesProDateSDatetime8促銷起日期SalesProDateEDatetime8促銷止日期AllowAbateInt4Notnull允許打折AllowSaleInt4Notnull允許銷售FactoryIDVarchar10FNotnull廠商編號ProvidelDVarchar10FNotnull供貨商編號表4.2用戶表(User)字段名字段類型長度主/外鍵字段值約束對應中文名UserIDvarchar10PNotnull用戶編號UserNameVarchar25Notnull用戶名稱UserPWVarchar50Notnull用戶密碼UserStyleInt4Notnull用戶類型表4.3會員表(Menber)字段名字段類型長度主/外鍵字段值約束對應中文名MemberIDVarchar10PNotnull會員編號MemberCardVarchar20Notnull會員卡號TotalCostMoney4Notnull累積消費金額RegDateDatetime8Notnull注冊日期表4.4銷售表(Sale)字段名字段類型長度主/外鍵字段值約束對應中文名SaleIDVarchar10PNotnull銷售編號MerChIDVarchar10FNotnull商品編號SaleDateDatetime8Notnull銷售日期SaleNumInt4Notnull銷售數(shù)量SalePriceMoney4Notnull銷售單額表4.5交易表(Dealing)字段名字段類型長度主/外鍵字段值約束對應中文名DealingIDVarchar10PNotnull交易編號DealingPriceMoney4Notnull交易金額DealingDateMoney4Notnull交易日期MemberIDVarchar10會員卡號UserNameVarchar10FNotnull用戶名稱表4.6入庫紀錄表(Stock)字段名字段類型長度主/外鍵字段值約束對應中文名StockIDVarchar10PNotnull入庫編號MerchIDVarchar10FNotnull入庫商品編號MerchNumInt4Notnull入庫數(shù)量MerchPriceMoney4Notnull單額TotalPriceMoney4Notnull總額StockDateDatetime8Datetime入庫日期PlanDateDatetime8Datetime計劃進貨日期StockStateInt4Notnull入庫狀態(tài)表4.7供貨商表(Provide)字段名字段類型長度主/外鍵字段值約束對應中文名ProvidelDvarchar10PNotnull供貨商編號ProvideNameVarchar50Notnull供貨商名稱ProvideAddressVarchar250供貨商地址ProvidePhoneVarchar25供貨商電話表4.8廠商表(Provide)字段名字段類型長度主/外鍵字段值約束對應中文名FactoryIDvarchar10PNotnull廠商編號FactoryNameVarchar50Notnull廠商名稱FactoryAddressVarchar250廠商地址FactoryPhoneVarchar25廠商電話4.4存儲過程設計創(chuàng)建用于用戶登陸的存儲過程：createorreplaceprocedureset_User(sUserIDinintidentity,sUserPWinvarchar,sUserNameinvarchar,sUserStyleinnumber)asbeginupdateUsersetUserName=sUserName,UserPW=sUserPW,UserStyle=sUserStylewhereUserID=sUserID;ifSQL%NOTFOUNDTHENinsertintoUser(UserID,UserPW,UserName,UserStyle)values(sUserID,sUserPW,UserName,sUserStyle);endif;endset_User;4.5數(shù)據(jù)庫的連接應用程序與OraclelOg數(shù)據(jù)庫的連接是通過創(chuàng)建ADO數(shù)據(jù)源，然后在程序中利用代碼與數(shù)據(jù)庫建立連接來實現(xiàn)的。具體實現(xiàn)方法是：在模塊中聲明調(diào)用ADO連接控件，這樣便能在任何時間連接數(shù)據(jù)庫了。使用ADOConnection對象連接到Oracle10g。在查詢等按鈕的單擊事件中訪問數(shù)據(jù)庫?？梢允褂脩贸绦蚺渲梦募⒁粭l到數(shù)據(jù)庫服務器的連接，返回一個關鍵字ConnectionString，在實體數(shù)據(jù)鏈路層定義一個用于存儲過程的一個基類DBdata.cs在這個基類中接受該關鍵字，使用ConnectionString連接數(shù)據(jù)庫。配置文件連接數(shù)據(jù)SqlConnection庫的代碼：<addkey="ConnectionString"value="server=(local);uid=sa;pwd="/>。存儲database=Supermark過程基類接受該關鍵字的代碼：et;System.Configuration.ConfigurationSettings.AppSettings[ing"].ToString();用戶名用戶名5系統(tǒng)實現(xiàn)5.1系統(tǒng)實現(xiàn)工具與支持平臺(1)用戶界面本系統(tǒng)采用MicrosoftVisualBasic6.0設計，用戶交互界面采用的是基于Windows的窗口界面。硬件接口運行本系統(tǒng)的硬件基本要求如下：CPU：IntelP3及以上；內(nèi)存：512MB及以上；硬盤：40GB及以上。軟件接口數(shù)據(jù)庫服務器：OraclelOg。ADO對象模型5.2系統(tǒng)界面下面為運行后的界面圖服務器(S)確定圖5.1系統(tǒng)登錄界面

圖5.3銷售管理員界面計劃進貸入庫記錄Listl忝加(K)刪除報表CR)會扇卡號：消費金前:登記日瑚：裔品辜形碼:計劃逬貸日期:ij確走眼消圖5.4進貨管理界面刪除0)渚理(C)確定取消圖5.5會員管理界面圖5.6廠商/供貨商管理界面5.3系統(tǒng)主要功能實現(xiàn)1.前臺前臺僅包括銷售商品時必須且僅需的功能，盡可能地做到簡化操作程序，利于收銀員快捷、準確地進行收款。功能包括前臺交易開單、收款、退貨、會員卡、折扣和優(yōu)惠等；下載后臺資料和將清款后的業(yè)務數(shù)據(jù)上傳后臺；完成前臺交易中的掃描條碼或輸入商品編碼、收款、打印收據(jù)、彈出銀箱等一系列操作。支持多種收款方式：顧客交款、營業(yè)員收款。支持會員制折扣卡銷售，可以采用嚴格會員制或自由會員制。記錄顧客信息、累計顧客消費金額等功能。支持多種付款方式：現(xiàn)金、支票、記帳、贈券等。支持多種促銷方式：折扣、折讓、VIP優(yōu)惠卡、贈送。收款員非常規(guī)操作記錄，有助于減少財務損失，方便匯總打印各種營業(yè)報表。該系統(tǒng)包含兩個對象，包括收銀員和客戶。系統(tǒng)用例：收銀員：結(jié)算收款客戶：結(jié)帳2.后臺充分利用數(shù)據(jù)庫的大容量、高效率等特點，為用戶提供強大的功能支持，對超市進貨業(yè)務、庫房業(yè)務進行管理，并處理分公司銷售數(shù)據(jù)和后臺批發(fā)業(yè)務，利用商業(yè)流通超市的商品管理和往來客戶管理，為經(jīng)營管理者提供分析與決策必需的數(shù)據(jù)和信息。該后臺包含3個對象，包括：超市經(jīng)理，銷售管理員，進貨管理員。系統(tǒng)用例：超市經(jīng)理：操作軟件錄入商品，供貨商，廠商；操作軟件制定進貨計劃；查詢打印計劃進貨與入庫記錄；操作軟件控制商品銷售與否；查詢打印銷售情況；操作軟件生成銷售排行榜；查詢庫存明細記錄；根據(jù)軟件發(fā)出的庫存告警進行入貨；操作軟件進行盤點計算。銷售管理員：銷售管理，因為要向系統(tǒng)提供貨架管理信息，所以也參與貨源管理進貨管理員：具體采購進貨，采購單查詢。5.4系統(tǒng)核心代碼此處指選取主要代碼進行說明，數(shù)據(jù)庫連接、用戶登陸、主窗體數(shù)據(jù)庫連接：<appSettings><addkey="ConnectionString"value="server=(local);database=Supermarket;uid=sa;pwd="/></appSettings>在基類DBdat中打開數(shù)據(jù)庫鏈接對象，publicclassDBdat{privatestaticSqlConnectionMyConnection;privatestaticreadonlystringRETURNVALUE="RETURNVALUE";privatestaticreadonlyStringStringConnection=System.Configuration.ConfigurationSettings.AppSettings["ConnectionString"].ToString()publicstaticvoidOpen(){//打開鏈接對象if(MyConnection==null){MyConnection=newSqlConnection(StringConnection);}if(MyConnection.State==ConnectionState.Closed){MyConnection.Open();///打開數(shù)據(jù)庫連接}}///關閉鏈接對象登陸PrivateSuballen_Click()EndSubPrivateSubcboUser_GotFocus()cboUser.SelAllEndSubPrivateSubcmdExit_Click()UnloadMeEndSub檢查是否連接服務器PrivateSubcmdOK_Click()//'如果還沒有服務器信息IfstrSQLServer=""ThenMsgBox"您必須先設置cmdServer_ClickExitSubEndIfIfcboUser.Text=""Then//MsgBox"請?zhí)顚懹脩裘boUser.SetFocusSQL服務器信息。"vbInformation填寫用戶名〃vbInformationcboUser.SetFocusExitSubEndIfIftxtPW.Text=""Then//填寫密碼MsgBox"請?zhí)顚懨艽a。",■，txtPW.SetFocusExitSubvbInformationEndIfOnErrorGoToaaaa//檢查是否存在用戶sqlConnectcnMain,strSQLServer,strSQLUser,strSQLPW,strSQLDBDimrsAsNewADODB.Recordset,strMD5AsStringstrMD5=GetMD5(txtPW.Text)rs.Open"Select*From[User]WhereUserStyle>1",cnMain,11Ifrs.EOFThenMsgBox"找不到任何用戶！",vbCriticalcnMain.CloseElseDoUntilrs.EOFIfStrComp(rs("UserName"),cboUser.Text,1)=0AndStrComp(rs("UserPW"),GetMD5(txtPW.Text),1)=0ThencurUserName=rs("UserName")curUserStyle=CLng(rs("UserStyle"))cboUser.AddItemcurUserName,0SaveUserListfrmMain.Icon=Me.IconUnloadMe//卸載主窗體frmMain.Show//顯示主窗體ExitSubEndIfrs.MoveNextLoopEndIfMsgBox"用戶名或密碼錯誤，登陸失敗！",vbCriticalcnMain.CloseExitSubaaaa:MsgBoxErr.Description,vbCriticalIfcnMain.State=1ThencnMain.CloseEndSubPrivateSubcmdServer_Click()//創(chuàng)建服務器命令按紐WithfrmServer.txtServer.Text=strSQLServer.txtUser.Text=strSQLUserIfstrSQLPW<>""Then.lbPW.Visible=True.txtDB.Text=IIf(strSQLDB<>"",strSQLDB,"SuperMarketdb").Show1EndWithEndSubPrivateSubForm_Activate()//設置光標點OnErrorResumeNextcboUser.SetFocuscboUser.SetFEndSubPrivateSubForm_Load()IfcnMain.State<>0ThencnMain.CloseLoadUserListIfcboUser.ListCount>0ThencboUser.ListIndex=0EndSubPublicSubLoadUserList()OnErrorGoToaaaaDimstrTmpAsString,jAsLongOpenGetApp&"Files\user.inf"ForInputAs#1DoUntilEOF(1)LineInpu