【正文】 ck_product_table where stock_quote_id=@quoteid。 update auto_add_table set stock_id=@update_id where auto_id=1endGO3. 關(guān)系圖圖419 進(jìn)貨詢(xún)價(jià)表與進(jìn)貨詢(xún)價(jià)商品的關(guān)系圖 子模塊詳細(xì)設(shè)計(jì)進(jìn)貨管理模塊主要讓操作員進(jìn)行進(jìn)貨詢(xún)價(jià)操作，通過(guò)已經(jīng)詢(xún)價(jià)過(guò)的單據(jù)生成進(jìn)貨報(bào)價(jià)單，再通過(guò)進(jìn)貨報(bào)價(jià)單生成進(jìn)貨單；通過(guò)進(jìn)貨單，處理要退貨的商品。采用單擊后，讓操作者就行具體的設(shè)置。1. “進(jìn)貨詢(xún)價(jià)單－詳細(xì)信息”子窗體設(shè)計(jì)完成后的“進(jìn)貨詢(xún)價(jià)單－詳細(xì)信息”子窗體如圖420所示。圖420 “進(jìn)貨詢(xún)價(jià)單－詳細(xì)信息”子窗體該窗體用于查看所有進(jìn)貨詢(xún)價(jià)單信息，在窗體里添加一個(gè)clientdataset1，ProviderName屬性值為‘get_stock_inquiry_dsp’。當(dāng)單擊“增加”或“編輯”按鈕后，彈出“進(jìn)貨詢(xún)價(jià)－錄入”子窗體，如圖421所示?！斑M(jìn)貨詢(xún)價(jià)－錄入”，ProviderName屬性值為‘get_stock_inquiry_product_dsp’，服務(wù)器端的DataSetProvide從臨時(shí)表取出數(shù)據(jù)。當(dāng)該頁(yè)面顯示的時(shí)候，通過(guò)DbGrid1的感知屬性，得到當(dāng)前參數(shù)，通過(guò)接口函數(shù)get_stock_inquiry_productget_stock_inquiry_product(stock_inquiry_id,vc)取得該詢(xún)價(jià)單的商品信息。當(dāng)單擊“進(jìn)貨詢(xún)價(jià)－錄入”子窗體頁(yè)面上的“增加商品”或“編輯商品”按鈕時(shí)，彈出如圖422所示的窗體。當(dāng)單擊“進(jìn)貨詢(xún)價(jià)單－商品信息－錄入”子窗體上“保存”按鈕時(shí)，程序?qū)⑹紫热〕鼍庉嫏谥械臄?shù)據(jù)做為參數(shù)，通過(guò)Server端提供的接口函數(shù)update_stock_inquiry_product(vt,vid,temp,vproductname,vproductnumber,vmeasurename,vmark,vsaved)，傳遞到數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程update_stock_inquiry_product_info中，執(zhí)行并更新數(shù)據(jù)庫(kù)Engine中的表temp_stock_inquiry_product_table。當(dāng)添加完詢(xún)價(jià)商品后，單擊“進(jìn)貨詢(xún)價(jià)單－錄入”子窗體的“保存”按鈕后，程序?qū)⑹紫热〕鼍庉嫏谥械臄?shù)據(jù)做為參數(shù)，通過(guò)Server端提供的接口函數(shù)update_stock_inquiry(vt,vupdate_id,vid,vdate,vusername,vpany,vsaved)，傳遞到數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程update_stock_inquiry_ info中，執(zhí)行并更新數(shù)據(jù)庫(kù)Engine中的表stock_inquiry_ table和表stock_inquiry_product_table。 圖421 “進(jìn)貨詢(xún)價(jià)單－錄入”子窗體圖422 “進(jìn)貨詢(xún)價(jià)單－商品信息－錄入”子窗體當(dāng)單擊“進(jìn)貨詢(xún)價(jià)單－錄入”子窗體的“查找”按鈕后，彈出如圖423所示的窗體，可以選擇要按哪個(gè)字段查找。圖423 “進(jìn)貨詢(xún)價(jià)單－查找”子窗體2. “進(jìn)貨報(bào)價(jià)單－詳細(xì)信息”子窗體由于該模塊的具體設(shè)置跟“進(jìn)貨詢(xún)價(jià)單－詳細(xì)信息”子窗體子窗體很相似，故這里只簡(jiǎn)單重復(fù)介紹一下參數(shù)設(shè)置和內(nèi)容。內(nèi)容：增加進(jìn)貨報(bào)價(jià)單，設(shè)置商品價(jià)格，發(fā)送給有權(quán)限審核的人審核該單據(jù)。作用：對(duì)已經(jīng)詢(xún)價(jià)過(guò)的商品進(jìn)行報(bào)價(jià)。操作：可增加、編輯、刪除、查找報(bào)價(jià)單。該模塊通過(guò)TClientDataSet控件與后臺(tái)數(shù)據(jù)庫(kù)相連，ProviderName屬性值為‘get_stock_quote_dsp’。增加、修改通過(guò)調(diào)用server的接口函數(shù)update_stock_quote，執(zhí)行數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程update_stock_quote_info。 刪除通過(guò)調(diào)用server的接口函數(shù)delet_stock_quote。查找通過(guò)調(diào)用server的接口函數(shù)find_stock_quote，執(zhí)行數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程find_stock_quote_info。3. “進(jìn)貨單－詳細(xì)信息”子窗體由于該模塊的具體設(shè)置跟“進(jìn)貨詢(xún)價(jià)單－詳細(xì)信息”子窗體子窗體很相似，故這里只簡(jiǎn)單重復(fù)介紹一下參數(shù)設(shè)置和內(nèi)容。內(nèi)容：增加進(jìn)貨單，發(fā)送給有權(quán)限審核的人審核該單據(jù)。作用：對(duì)已經(jīng)報(bào)價(jià)過(guò)的單據(jù)生成進(jìn)貨單。操作：可增加、編輯、刪除、查找進(jìn)貨單。該模塊通過(guò)TClientDataSet控件與后臺(tái)數(shù)據(jù)庫(kù)相連，ProviderName屬性值為‘get_stock__dsp’。增加、修改通過(guò)調(diào)用server的接口函數(shù)update_stock，執(zhí)行數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程update_stock_info。 刪除通過(guò)調(diào)用server的接口函數(shù)delet_stock。查找通過(guò)調(diào)用server的接口函數(shù)find_stock，執(zhí)行數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程find_stock _info。4. “進(jìn)貨單－詳細(xì)信息”子窗體由于該模塊的具體設(shè)置跟“進(jìn)貨詢(xún)價(jià)單－詳細(xì)信息”子窗體子窗體很相似，故這里只簡(jiǎn)單重復(fù)介紹一下參數(shù)設(shè)置和內(nèi)容。內(nèi)容：增加進(jìn)貨退貨單，發(fā)送給有權(quán)限審核的人審核該單據(jù)。作用：根據(jù)進(jìn)貨單生成進(jìn)貨退貨單，設(shè)置要退貨的商品數(shù)量，單價(jià)，運(yùn)費(fèi)等。操作：可增加、編輯、刪除、查找進(jìn)貨退貨單。該模塊通過(guò)TClientDataSet控件與后臺(tái)數(shù)據(jù)庫(kù)相連，ProviderName屬性值為‘get_stock_return__dsp’。增加、修改通過(guò)調(diào)用server的接口函數(shù)update_stock_return，執(zhí)行數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程update_stock_return_info。 刪除通過(guò)調(diào)用server的接口函數(shù)delet_stock。查找通過(guò)調(diào)用server的接口函數(shù)find_stock，執(zhí)行數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程find_stock _info。5. “個(gè)人提示信息”子窗體由于進(jìn)貨管理模塊的各個(gè)單據(jù)在保存完成后都要發(fā)送給審核人審核，我們?cè)O(shè)置了個(gè)人提示信息，如圖424所示。當(dāng)審核人沒(méi)有提示信息的時(shí)候，圖片“NEW?。　笔庆o止的，而當(dāng)有提示信息的時(shí)候，圖片“NEW??！”就開(kāi)始跳動(dòng)。由于沒(méi)有用Timer控件，所以不能時(shí)時(shí)刷新，需要手動(dòng)刷新。圖424 “個(gè)人信息”當(dāng)有單據(jù)需要審核時(shí)，單擊圖片“NEW??！”時(shí)，彈出如圖425所示的窗體，此窗體上放置一個(gè)Datasource1控件，，ProvideName的屬性值為“get_tip_dsp”。雙擊DbGrid1時(shí)，彈出需用戶(hù)審核的單據(jù)，如圖426所示。當(dāng)單擊“個(gè)人提示信息－具體信息”的“保存”按鈕時(shí)，程序?qū)⑹紫热〕鼍庉嫏谥械臄?shù)據(jù)做為參數(shù)，通過(guò)Server端提供的接口函數(shù)，update_tip(billid,result,rtime,billkind,vsaved)，傳遞到數(shù)據(jù)庫(kù)中的存儲(chǔ)過(guò)程update_tip_ info中，執(zhí)行并更新數(shù)據(jù)庫(kù)Engine中的表tip_ table。如果通過(guò)審核，則該單據(jù)的審核狀態(tài)為“已通過(guò)”，否則為“未通過(guò)”。圖425 “個(gè)人提示信息”子窗體圖426 “個(gè)人提示－具體信息”第五章 技術(shù)難點(diǎn)、解決方案 。當(dāng)有客戶(hù)端在運(yùn)行時(shí)。這時(shí)客戶(hù)端會(huì)彈出如圖52所示的提示信息。，客戶(hù)端進(jìn)行操作的時(shí)候，會(huì)彈出如圖53所示的提示，程序得不到數(shù)據(jù)庫(kù)的數(shù)據(jù)。而最為嚴(yán)重的問(wèn)題是客戶(hù)端不能關(guān)閉。這個(gè)難點(diǎn)問(wèn)題暫未得到解決。圖51 服務(wù)器端警告信息圖52 客戶(hù)端提示信息圖53 提示信息 關(guān)于存儲(chǔ)過(guò)程中臨時(shí)表當(dāng)在查找一張單據(jù)的時(shí)候，我們?cè)诖鎯?chǔ)過(guò)程中自動(dòng)生成一張臨時(shí)表，把查找到的信息存儲(chǔ)在這張臨時(shí)表中。問(wèn)題在于，當(dāng)多個(gè)人同時(shí)查詢(xún)的時(shí)候，臨時(shí)表的用戶(hù)到底歸屬哪個(gè)人。而當(dāng)增加一張進(jìn)貨報(bào)價(jià)單或是進(jìn)貨單時(shí)，同樣對(duì)單據(jù)中的商品也是用臨時(shí)表存儲(chǔ)要查看的商品。當(dāng)其他人同樣要增加此類(lèi)單據(jù)時(shí)，臨時(shí)表里的數(shù)據(jù)應(yīng)該是用戶(hù)自己的還是其他人的。這個(gè)問(wèn)題已經(jīng)解決，因?yàn)镾ql Server 2000對(duì)多線程，有同步處理的功能，用存儲(chǔ)過(guò)程操作數(shù)據(jù)庫(kù)，共享互斥操作由存儲(chǔ)過(guò)程完成。用戶(hù)不必?fù)?dān)心自己的數(shù)據(jù)丟失。 單據(jù)自動(dòng)編號(hào)當(dāng)有兩個(gè)用戶(hù)同時(shí)增加一張單據(jù)，生成的編號(hào)是一樣的。造成當(dāng)用戶(hù)單擊保存的時(shí)候，有一用戶(hù)保存會(huì)產(chǎn)生失敗，這時(shí)已經(jīng)編輯好的數(shù)據(jù)會(huì)丟失。這個(gè)問(wèn)題暫未解決。第六章 結(jié)論在項(xiàng)目的開(kāi)發(fā)過(guò)程中，在王備戰(zhàn)老師的悉心指導(dǎo)下我們小組按照軟件工程的要求，對(duì)整個(gè)項(xiàng)目的開(kāi)發(fā)進(jìn)度進(jìn)行了合理安排，在初期我們只得參考大量的Delphi開(kāi)發(fā)實(shí)例并向王老師請(qǐng)教，在王老師的指導(dǎo)下，我們的工作慢慢走向正軌，但前期的學(xué)習(xí)使得整個(gè)項(xiàng)目的實(shí)施進(jìn)度跟預(yù)測(cè)、計(jì)劃并不符合。項(xiàng)目開(kāi)發(fā)初期，我們到公司進(jìn)行了需求分析，并擬定了一系列的模塊及要實(shí)現(xiàn)的功能，但在開(kāi)發(fā)過(guò)程中發(fā)現(xiàn)，有幾個(gè)功能和幾個(gè)模塊未能像預(yù)期的那樣順利的完成，這是很值得吸取的教訓(xùn)。當(dāng)然，最后通過(guò)大家的共同努力，我們還是基本實(shí)現(xiàn)了業(yè)務(wù)流程中重要的模塊及功能要求。本系統(tǒng)利用Delphi強(qiáng)大而成熟的組件技術(shù)及對(duì)數(shù)據(jù)庫(kù)強(qiáng)大支持，按照機(jī)械行業(yè)的進(jìn)銷(xiāo)存業(yè)務(wù)流程，實(shí)現(xiàn)了進(jìn)貨、銷(xiāo)售、庫(kù)存管理、資料管理及消息管理的主要功能。按照業(yè)務(wù)流程，進(jìn)行了良好的模塊劃分歸類(lèi)，并在界面及窗體風(fēng)格上保持了一致，方便了用戶(hù)的使用。本系統(tǒng)還有許多地方須要補(bǔ)充與完善；財(cái)務(wù)管理、員工管理及系統(tǒng)設(shè)置幾個(gè)模塊功能需要添加；代碼實(shí)現(xiàn)方面，書(shū)寫(xiě)較為零亂；系統(tǒng)缺乏安全措施。致謝語(yǔ)首先，我要感謝廈門(mén)大學(xué)軟件學(xué)院的各位老師。在這兩年生活和學(xué)習(xí)中，學(xué)院的老師在生活上給了我無(wú)微不至的關(guān)懷，在學(xué)習(xí)上給了我全心的指導(dǎo)。老師們出色的科學(xué)理念、扎實(shí)的理論功底、開(kāi)拓的思維方式和特有的人格魅力，對(duì)于我而言都是學(xué)習(xí)的榜樣。其次，還要感謝指導(dǎo)老師王備戰(zhàn)教授，在畢業(yè)設(shè)計(jì)過(guò)程為我們項(xiàng)目提供了很多寶貴的指導(dǎo)性意見(jiàn)，是他的熱情指導(dǎo)、在前進(jìn)方向上的指引和階段性的督促才使我們項(xiàng)目小組能及時(shí)、妥當(dāng)?shù)耐瓿扇蝿?wù)。此外，還要感謝章宇峰和蔣棋兩們同學(xué)，他們?cè)谡麄€(gè)項(xiàng)目和實(shí)現(xiàn)過(guò)程中，給于我相互幫助，讓我學(xué)到了很多東西，更開(kāi)拓了視野，并能夠一直保持愉快的心情和高度的熱情于畢業(yè)設(shè)計(jì)過(guò)程。感謝所有和我在一起生活兩年的每一個(gè)同學(xué)！最后，我要感謝我的父母和家人，他們的關(guān)懷、支持和鼓勵(lì)是我不斷前進(jìn)的不竭動(dòng)力。 謝謝！參考文獻(xiàn)[1] 丁國(guó)棟. Delphi 7管理信息系統(tǒng)實(shí)例教程[M]. 北京:希望電子出版社. 2004.[2] 李軍、張桂英等. Delphi 7項(xiàng)目開(kāi)發(fā)實(shí)踐[M]. 北京:中國(guó)鐵道出版社. 2003.[3] 趙應(yīng)丁等編著. Delphi 7數(shù)據(jù)庫(kù)應(yīng)用技術(shù)與實(shí)例[M]. 北京: 中國(guó)水利水電出版社. 2003.[4] 張大年、廖智勇等編著. Delphi數(shù)據(jù)庫(kù)應(yīng)用開(kāi)發(fā)技術(shù)與實(shí)例[M]. 北京:清華大學(xué)出版社. 2002.[5] 喬建行、陶 川編著. Delphi項(xiàng)目案例導(dǎo)航[M]. 北京:科學(xué)出版社. 2002.[6] 儲(chǔ)啟明、周旭編著. Delphi 7典型實(shí)例開(kāi)發(fā)篇：基礎(chǔ)開(kāi)發(fā)篇[M]. 北京:清華大學(xué)出版社. 2003.[7] 夏邦貴、郭勝等編著. Delphi數(shù)據(jù)庫(kù)開(kāi)發(fā)入門(mén)與范例解析[M]. 北京:機(jī)械工業(yè)出版社. 2004.[8] 鄭阿奇主編. SQL Server實(shí)用教程[M]. 北京:電子工業(yè)出版社. 2002.