采購管理系統(tǒng)開發(fā)報告

1、目錄目錄I1 前言11.1 選題的背景11.2 選題說明11.2.1 基本思路21.2.2 作業(yè)目標(biāo)22 系統(tǒng)規(guī)劃32.1 項目名稱32.2 項目背景32.3 項目目標(biāo)32.4 開發(fā)方法32.5 項目功能32.6 可行性分析報告42.6.1 技術(shù)可行性42.6.2 經(jīng)濟可行性42.6.3 管理可行性42.6.4 需求分析43 系統(tǒng)分析53.1 業(yè)務(wù)流程圖53.2 數(shù)據(jù)流程圖63.3 數(shù)據(jù)字典73.3.1 數(shù)據(jù)項定義73.3.2 數(shù)據(jù)流的描述113.3.3 處理邏輯的描述123.3.4 數(shù)據(jù)存儲的描述143.3.5 外部實體的描述154 系統(tǒng)設(shè)計164.1 總體設(shè)計164.2 詳細(xì)設(shè)計164.2

2、.1 代碼設(shè)計164.2.2 輸出設(shè)計174.2.3 輸入設(shè)計184.2.4 數(shù)據(jù)庫結(jié)構(gòu)設(shè)計195 系統(tǒng)實施225.1 登錄設(shè)計225.2 采購信息錄入235.3 出庫記錄修改265.3 采購記錄刪除295.5 總信息查詢305.6 其他表單32結(jié)束語3336 / 39文檔可自由編輯打印1 前言1.1 選題的背景傳統(tǒng)采購的重點放在如何和供應(yīng)商進(jìn)行商業(yè)交易的活動上，特點是比較重視交易過程的 供應(yīng)商的價格比較，通過供應(yīng)商的多頭競爭，從中選擇價格最低的作為合作者。傳統(tǒng)的采購模式的主要缺點表現(xiàn)在如下幾個方面。傳統(tǒng)采購過程是典型的非信息對稱博奕過程，選擇供應(yīng)商在傳統(tǒng)的采購活動中是一個首要的任務(wù)。在采購過

3、程中，采購一方為了能夠從多個競爭性的供應(yīng)商中選擇一個最佳的供應(yīng)商，往往會保留私有信息，而供應(yīng)商也在和其他的供應(yīng)商競爭中隱瞞自己的信息。這樣，采購、供應(yīng)雙方都不進(jìn)行有效的信息溝通，這就是非信息對稱的博奕過程。 驗收檢查是采購部門的一個重要的事后把關(guān)工作，質(zhì)量控制難度大采購一方很難參與供應(yīng)商的生產(chǎn)組織過程和有關(guān)質(zhì)量控制活動，相互的工作是不透明 的。因此需要通過各種有關(guān)標(biāo)準(zhǔn)如國際標(biāo)準(zhǔn)、國家標(biāo)準(zhǔn)等，進(jìn)行檢查驗收。缺乏合作的質(zhì)量控制會導(dǎo)致采購部門對采購物品質(zhì)量控制的難度增加。供需關(guān)系是臨時的或短期的合作關(guān)系，而且競爭多于合作由于缺乏合作與協(xié)調(diào)，采購過程中各種抱怨和扯皮的事情比較多，很多時間消耗在解決日常

4、問題上，沒有更多的時間用來做長期預(yù)測與計劃工作，供應(yīng)與需求之間這種缺乏合作的氣氛增加了許多運作中的不確定性。響應(yīng)用戶需求能力遲鈍由于供應(yīng)與采購雙方在信息的溝通方面缺乏及時的信息反饋，在市場需求發(fā)生變化的情況下，采購一方也不能改變供應(yīng)一方已有的訂貨合同， 因此采購一方在需求減少時庫存增加， 需求增加時，出現(xiàn)供不應(yīng)求。重新訂貨需要增加談判過程，因此供需之間對用戶需求的響應(yīng)沒有同步進(jìn)行，缺乏應(yīng)付需求變化的能力。1.2 選題說明項目背景研究課題題目：采購管理系統(tǒng)設(shè)計與開發(fā)。1.2.1 基本思路首先對研究企業(yè)的背景進(jìn)行研究進(jìn)而從經(jīng)濟、管理和技術(shù)三個方面對開發(fā)項目的可行性進(jìn)行分析。得出結(jié)論之后，開始對該企

5、業(yè)的組織結(jié)構(gòu)和業(yè)務(wù)流程進(jìn)行分析，然后得出邏輯模型即數(shù)據(jù)流程圖。根據(jù)系統(tǒng)分析階段的數(shù)據(jù)流程圖得到物理模型即模塊結(jié)構(gòu)圖。最后根據(jù)系統(tǒng)設(shè)計的內(nèi)容進(jìn)行程序設(shè)計并運行系統(tǒng)。1.2.2 作業(yè)目標(biāo)通過對采購管理信息系統(tǒng)的設(shè)計與開發(fā)，熟練使用所學(xué)的結(jié)構(gòu)化分析以及設(shè)計方法分析系統(tǒng)，描述系統(tǒng)，設(shè)計系統(tǒng)。掌握業(yè)務(wù)流程圖，數(shù)據(jù)流程圖，數(shù)據(jù)字典等工具。熟練使用模塊設(shè)計方法，數(shù)據(jù)庫設(shè)計方法，代碼設(shè)計方法，輸入輸出設(shè)計方法等設(shè)計物理系統(tǒng)。并且會做簡單的系統(tǒng)，并運行實施。 2 系統(tǒng)規(guī)劃2.1 項目名稱信達(dá)公司采購管理系統(tǒng)設(shè)計與開發(fā)。2.2 項目背景 自1990年信達(dá)公司成立以來，信達(dá)公司根據(jù)不同層次的客戶的不同需求銷售各種款

6、式的鞋制品。隨著社會發(fā)展，信達(dá)公司在傳統(tǒng)的采購管理運作下已經(jīng)不能滿足顧客的大量需求，所以信達(dá)公司的管理層想要開發(fā)采購管理信息系統(tǒng)來輔助作出采購管理決策，提高采購活動效率，降低采購成本，促進(jìn)公司獲得更高的收益。2.3 項目目標(biāo)通過開發(fā)采購管理信息系統(tǒng)，建立比較完整的采購體系，使公司的運營更加順利，得到較高的效益。具體如下：建立采購管理信息系統(tǒng)，使采購記錄的文件量占用面積變小，節(jié)省一定量的資金；采用采購管理信息系統(tǒng)可以方便查詢每一件采購的產(chǎn)品信息來源，便于控制。2.4 開發(fā)方法本系統(tǒng)運用結(jié)構(gòu)化系統(tǒng)開發(fā)方法。2.5 項目功能該采購信息系統(tǒng)是一整套采購業(yè)務(wù)流程信息管理系統(tǒng)，依據(jù)此系統(tǒng)可以按產(chǎn)品的信息查

7、詢?nèi)霂飚a(chǎn)品的多少與賣出的多少，以方便看此產(chǎn)品是否暢銷，有沒有利潤可言，是否還要采購此產(chǎn)品，依據(jù)信息進(jìn)行輔助決策等。2.6 可行性分析報告2.6.1 技術(shù)可行性運用Visual Basic 語言完成系統(tǒng)，同時運用Microsoft Office實用軟件完成文檔工作。本公司采用先進(jìn)的技術(shù)手段，為信息管理提供了強大的硬件保證，不管從設(shè)備方面還是技術(shù)力量方面，本公司都達(dá)到了一定的能力。在技術(shù)方面可以建立管理信息系統(tǒng)。2.6.2 經(jīng)濟可行性有一定的資金，能夠支持計算外圍設(shè)備費用、軟件開發(fā)的費用、人員培訓(xùn)的費用、維護費用、管理費用。間接的經(jīng)濟效益中，公司的管理層待遇優(yōu)厚，可以為公司的管理信息系統(tǒng)的運行提供

8、保證。2.6.3 管理可行性管理人員對開發(fā)本項目的態(tài)度是積極的，直屬領(lǐng)導(dǎo)對項目的開發(fā)支持，管理方法科學(xué)，在這個現(xiàn)代社會這樣的管理制度開發(fā)相應(yīng)成熟，規(guī)章制度已經(jīng)具備了開發(fā)系統(tǒng)的條件，有專門開發(fā)的人員四人，既能合理的分配相應(yīng)的工作，又能在完成各自工作的同時對整體的系統(tǒng)管理進(jìn)行整合。2.6.4 需求分析隨著鞋業(yè)競爭的激烈與人們對自身要求的提高，使本公司對于挑選高質(zhì)量的鞋的標(biāo)準(zhǔn)也越來越高，設(shè)計采購管理信息系統(tǒng)為了使我們公司在采購方面能夠給公司做好基礎(chǔ)，使公司的品牌效益有保證，使公司人員的工作更有條理。綜上分析可得出結(jié)論：該公司完全具備開發(fā)采購管理信息系統(tǒng)的能力。3 系統(tǒng)分析3.1 業(yè)務(wù)流程圖通過對信達(dá)

9、公司采購業(yè)務(wù)的實際調(diào)查分析，弄清了該公司的采購業(yè)務(wù)管理作的業(yè)務(wù)流程和管理功能，系統(tǒng)的業(yè)務(wù)流程圖如圖3.1所示。圖3.1采購管理業(yè)務(wù)流程圖3.2 數(shù)據(jù)流程圖繪制頂層數(shù)據(jù)流程圖關(guān)鍵在于找出主要外部實體和關(guān)鍵數(shù)據(jù)流。該公司采購業(yè)務(wù)的主要外部實體是需求部門和倉儲部門。采購管理頂層數(shù)據(jù)流程圖如圖3.2所示。F1需求計劃單S1需求部門 P采購管理系統(tǒng)F4入庫單S2倉儲部門圖3.2 采購管理頂層數(shù)據(jù)流程圖采購管理一級數(shù)據(jù)流程圖如圖3.3所示。S1需求部門F1需求計劃單采購計劃管理P1P2F2采購計劃單生成采購訂單F3采購訂單D1采購計劃文件采購收貨管理P3F4入庫單S2倉儲部門D2采購訂單文件D3收貨單文件

10、圖3.3 采購管理一級數(shù)據(jù)流程圖繪制采購業(yè)務(wù)二級數(shù)據(jù)流程圖時，主要將采購計劃管理進(jìn)一步細(xì)化為需求計劃匯總和生成采購計劃兩個處理模塊，將采購收貨管理進(jìn)一步細(xì)化為采購收貨管理和入庫管理兩個處理模塊。同時各個數(shù)據(jù)處理過程伴隨產(chǎn)生相應(yīng)的數(shù)據(jù)流，并作出數(shù)據(jù)存儲。采購管理二級數(shù)據(jù)流程圖如圖3.4所示。S1需求部門F1.1需求計劃單P1.1需求計劃匯總F1.2采購需求單生成采購計劃P1.2F2采購計劃單P2生成采購訂單D1.1需求計劃文件D1.2采購計劃文件F3采購訂單D2.3供應(yīng)商資料采購收貨管理P3.1D2.1采購訂單文件D2.2采購合同文件F4.1入庫信息P3.2入庫管理F4.2入庫單S2倉儲部門D3

11、收貨單文件圖3.4 采購管理二級數(shù)據(jù)流程圖3.3 數(shù)據(jù)字典3.3.1 數(shù)據(jù)項定義數(shù)據(jù)項編號：I1數(shù)據(jù)項名稱：需求計劃單號類型及寬度：char(13)說明：貨物需求計劃編號取值范圍：數(shù)據(jù)項編號：I2數(shù)據(jù)項名稱：訂單號類型及寬度：char(13)說明：需求計劃編號取值范圍：數(shù)據(jù)項編號：I3數(shù)據(jù)項名稱：收獲通知編號類型及寬度：char(13)說明：收獲通知單編號取值范圍：數(shù)據(jù)項編號：I4數(shù)據(jù)項名稱：入庫單編號類型及寬度：char(13)說明：入庫單編號編號取值范圍：數(shù)據(jù)項編號：I5數(shù)據(jù)項名稱：供應(yīng)商編號類型及寬度：char(5)說明：供應(yīng)商編號取值范圍： 數(shù)據(jù)項編號：I6數(shù)據(jù)項名稱：倉儲部門編號類型

12、及寬度：char(5)說明：倉儲部門編號取值范圍：數(shù)據(jù)項編號：I7數(shù)據(jù)項名稱：存貨編碼類型及寬度：char(13)說明：存貨編碼取值范圍：數(shù)據(jù)項編號：I8數(shù)據(jù)項名稱：計量單位類型及寬度：char(10)說明：貨物計量單位取值范圍：數(shù)據(jù)項編號：I9數(shù)據(jù)項名稱：數(shù)量類型及寬度：decimal(10,2)說明：采購數(shù)量取值范圍：數(shù)據(jù)項編號：I10數(shù)據(jù)項名稱：單價類型及寬度：decimal(10,2)說明：采購單價取值范圍：數(shù)據(jù)項編號：I11數(shù)據(jù)項名稱：金額類型及寬度：decimal(10,2)說明：不含稅總價取值范圍：數(shù)據(jù)項編號：I12數(shù)據(jù)項名稱：稅率類型及寬度：decimal(3,2)說明：增值稅

13、率取值范圍：數(shù)據(jù)項編號：I13數(shù)據(jù)項名稱：運費類型及寬度：decimal(10,2)說明：該批采購物料的運費取值范圍：數(shù)據(jù)項編號：I14數(shù)據(jù)項名稱：制單人編碼類型及寬度：char(5)說明：該單據(jù)的制作的操作員取值范圍： 數(shù)據(jù)項編號：I15數(shù)據(jù)項名稱：審核人編碼類型及寬度：char(5)說明：該單據(jù)的審核的操作員取值范圍：數(shù)據(jù)項編號：I16數(shù)據(jù)項名稱：審核時間類型及寬度：char(10)說明：該單據(jù)的審核時間取值范圍：3.3.2 數(shù)據(jù)流的描述數(shù)據(jù)流編號：F1.1數(shù)據(jù)流名稱：需求計劃單簡述：由需求部門根據(jù)供需情況制定的所需的貨物清單數(shù)據(jù)流來源：需求部門數(shù)據(jù)流去向：需求計劃匯總處理模塊數(shù)據(jù)項組成：

14、日期+貨物編碼+單價+數(shù)量數(shù)據(jù)流量：10張/月 高峰流量：15張/月數(shù)據(jù)流編號：F1.2數(shù)據(jù)流名稱：采購需求單簡述：根據(jù)需求訂貨單和存貨情況制定的所需采購的貨物清單數(shù)據(jù)流來源：需求計劃匯總處理模塊數(shù)據(jù)流去向：生成采購計劃處理模塊數(shù)據(jù)項組成：日期+貨物編碼+單價+數(shù)量數(shù)據(jù)流量：10張/月 高峰流量：15張/月數(shù)據(jù)流編號：F2數(shù)據(jù)流名稱：采購計劃單簡述：根據(jù)采購需求單和庫存情況由采購員制定的采購計劃數(shù)據(jù)流來源：生成采購計劃處理模塊數(shù)據(jù)流去向：生成采購訂單處理模塊數(shù)據(jù)項組成：日期+供應(yīng)商編碼+貨物編碼+單價+數(shù)量數(shù)據(jù)流量：10張/月 高峰流量：15張/月數(shù)據(jù)流編號：F3數(shù)據(jù)流名稱：采購訂單簡述：由采

15、購主管根據(jù)采購計劃和供應(yīng)商信息填制的所需采購的貨物訂單數(shù)據(jù)流來源：生成采購訂單處理模塊數(shù)據(jù)流去向：采購收貨管理處理模塊數(shù)據(jù)項組成：日期+訂單號+供應(yīng)商編碼+訂貨部門編碼+發(fā)運方式+制單人+審核人+存貨編碼+計量單位+訂貨數(shù)量+訂貨單價+訂貨金額+增值稅率數(shù)據(jù)流量： 10張/月 高峰流量：15張/月數(shù)據(jù)流編號：F4.1數(shù)據(jù)流名稱：入庫信息簡述：由庫管員填寫收貨入庫的信息數(shù)據(jù)流來源：采購收貨管理處理模塊數(shù)據(jù)流去向：入庫管理數(shù)據(jù)項組成：日期+貨物編碼+數(shù)量+單價數(shù)據(jù)流量：10張/月 高峰流量：15張/月數(shù)據(jù)流編號：F4.2數(shù)據(jù)流名稱：入庫單簡述：貨物經(jīng)驗收合格實際出庫的單據(jù)憑證數(shù)據(jù)流來源：入庫管理處

16、理模塊數(shù)據(jù)流去向：倉儲部門數(shù)據(jù)項組成：日期+出庫單編號+收貨通知號+倉庫編碼+制單人+審核人+計量單位+入庫數(shù)量+入庫單價+入庫金額數(shù)據(jù)流量：10張/月 高峰流量：15張/月3.3.3 處理邏輯的描述處理邏輯編號：P1.1處理邏輯名稱：需求計劃匯總簡述：匯總所需貨物的相關(guān)信息輸入的數(shù)據(jù)流：需求計劃單處理描述：根據(jù)需求部門的需求信息得出所需貨物的匯總信息輸出的數(shù)據(jù)流：采購需求單處理頻率：10次/月處理邏輯編號：P1.2處理邏輯名稱：生成采購計劃簡述：填寫采購貨物的計劃輸入的數(shù)據(jù)流：采購需求單 處理描述：根據(jù)需求計劃單和存貨情況編寫出采購計劃輸出的數(shù)據(jù)流：采購計劃處理頻率：10次/月處理邏輯編號：

17、P2處理邏輯名稱：生成采購訂單簡述：填寫采購貨物的訂單輸入的數(shù)據(jù)流：采購計劃處理描述：根據(jù)采購計劃和供應(yīng)商資料，選擇合格的供應(yīng)商，確認(rèn)價格填寫采購訂單輸出的數(shù)據(jù)流：采購訂單處理頻率：10次/月處理邏輯編號：P3.1處理邏輯名稱：采購收貨管理簡述：對采購的貨物進(jìn)行收獲管理輸入的數(shù)據(jù)流：采購訂單處理描述：當(dāng)貨物到達(dá)時，根據(jù)采購訂單，對貨物進(jìn)行查驗質(zhì)量，數(shù)量等輸出的數(shù)據(jù)流：入庫信息處理頻率：10次/月處理邏輯編號：P3.2處理邏輯名稱：入庫管理簡述：對已收貨進(jìn)行入庫管理輸入的數(shù)據(jù)流：入庫信息處理描述：根據(jù)入庫信息，對已經(jīng)檢驗收貨的貨物，入庫，上架，記錄輸出的數(shù)據(jù)流：入庫單3.3.4 數(shù)據(jù)存儲的描述數(shù)

18、據(jù)存儲編號：D1.1數(shù)據(jù)存儲名稱：需求計劃文件簡述：存儲需求計劃的文件數(shù)據(jù)存儲組成：日期+貨物編碼+單價+數(shù)量關(guān)鍵字：部門代碼，貨物編碼相關(guān)聯(lián)的處理：P1.1數(shù)據(jù)存儲編號：D1.2數(shù)據(jù)存儲名稱：采購計劃文件 簡述：登記采購計劃的文件數(shù)據(jù)存儲組成：日期+供應(yīng)商編碼+貨物編碼+單價+數(shù)量 關(guān)鍵字：供應(yīng)商編碼，貨物編碼相關(guān)聯(lián)的處理：P1.2數(shù)據(jù)存儲編號：D2.3數(shù)據(jù)存儲名稱：供應(yīng)商資料 簡述：登記供應(yīng)商的相關(guān)信息數(shù)據(jù)存儲組成：供應(yīng)商編碼+貨物編碼+單價+數(shù)量 關(guān)鍵字：供應(yīng)商編碼，貨物編碼相關(guān)聯(lián)的處理：P1.2 數(shù)據(jù)存儲編號：D2.1數(shù)據(jù)存儲名稱：采購訂單文件 簡述：登記采購貨物訂單的文件數(shù)據(jù)存儲組成

19、：日期+訂單號+供應(yīng)商編碼+訂貨部門編碼+發(fā)運方式+制單人+審核人+存貨編碼+計量單位+訂貨數(shù)量+訂貨單價+訂貨金額+增值稅率 關(guān)鍵字：訂單號，供應(yīng)商編碼，訂貨部門編碼，存貨編碼相關(guān)聯(lián)的處理：P2數(shù)據(jù)存儲編號：D2.2數(shù)據(jù)存儲名稱：采購合同文件 簡述：編寫采購合同的文件數(shù)據(jù)存儲組成：日期+訂單號+供應(yīng)商編碼+訂貨部門編碼+發(fā)運方式+制單人+審核人+存貨編碼+計量單位+訂貨數(shù)量+訂貨單價+訂貨金額+增值稅率 關(guān)鍵字：訂單號，供應(yīng)商編碼，訂貨部門編碼，存貨編碼相關(guān)聯(lián)的處理：P2數(shù)據(jù)存儲編號：D3數(shù)據(jù)存儲名稱：收貨單文件 簡述：匯總收貨單的文件數(shù)據(jù)存儲組成：日期+訂單號+供應(yīng)商編碼+訂貨部門編碼+制

20、單人+審核人+計量單位+訂貨數(shù)量+訂貨單價+訂貨金額+增值稅率 關(guān)鍵字：訂單號，供應(yīng)商編碼，訂貨部門編碼，存貨編碼相關(guān)聯(lián)的處理：P3.1+P3.23.3.5 外部實體的描述外部實體編號：S1 實體名稱：需求部門 簡述：產(chǎn)生貨物需求的部門輸入的數(shù)據(jù)流：申請單輸出的數(shù)據(jù)流：需求計劃單4 系統(tǒng)設(shè)計4.1 總體設(shè)計根據(jù)企業(yè)數(shù)據(jù)流程圖可繪制的系統(tǒng)功能結(jié)構(gòu)圖如圖4.1所示。采購處理計劃管理訂單處理收貨處理需求計劃管理生成采購計劃計劃完成情況分析生成采購訂單訂單完成訂單終止或取消訂單收貨處理入庫處理圖4.1 采購管理系統(tǒng)模塊結(jié)構(gòu)圖4.2 詳細(xì)設(shè)計4.2.1 代碼設(shè)計（1）商品代碼設(shè)計商品代碼采用由兩位整數(shù)組

21、成的層次碼，設(shè)計方案如圖4.2所示。規(guī)格順序號品種順序號圖4.2 商品代碼方案設(shè)計（2）部門代碼設(shè)計公司公司部門只有少數(shù)幾個，因此，將部門的代碼設(shè)計成有兩位整數(shù)組成的順序碼，設(shè)計方案如圖4.3所示。X X順序號圖4.3 部門代碼設(shè)計方案同理，由于公司只有人數(shù)有限（幾十人），將員工代碼也設(shè)計成由兩位整數(shù)組成的順序碼，設(shè)計方案同上。（3）商品采購訂單編號方案設(shè)計考慮公司商品采購時間的不確定，每天采購量的不確定性，采用的編碼設(shè)計方案如圖4.4所示。順序號采購時間圖4.4 采購訂單編號設(shè)計方案4.2.2 輸出設(shè)計對系統(tǒng)需要的輸出結(jié)果進(jìn)行設(shè)計，本系統(tǒng)主要是查詢采購及入庫的相關(guān)信息?，F(xiàn)僅就采購信息查詢輸出

22、表進(jìn)行描述如表4.1所示。表4.1 采購信息查詢輸出表采購信息查詢名稱供應(yīng)地種類單價采購時間返回通過表4.1可以快速方便地查到本企業(yè)的采購信息。4.2.3 輸入設(shè)計采購信息錄入如圖4.5所示。采購信息錄入商品編號商品名稱單位采購數(shù)量單價采購時間錄入清空退出圖4.5 采購信息錄入界面入庫信息錄入如圖4.6所示。入庫信息錄入商品編號商品名稱單位入庫數(shù)量商品單價入庫時間錄入清空退出圖4.6 入庫信息錄入界面4.2.4 數(shù)據(jù)庫結(jié)構(gòu)設(shè)計(1)概念結(jié)構(gòu)設(shè)計（E-R圖）采購管理信息系統(tǒng)概念結(jié)構(gòu)設(shè)計E-R圖如圖4.7所示。需求計劃單生成采購計劃單生成采購訂單收貨收貨單送貨供應(yīng)商檢驗檢驗單入庫物料存單庫存臺賬n

23、11nn11n11m11記賬圖4.7 采購管理信息系統(tǒng)E-R圖部分實體所具有的屬性描述如下：需求計劃實體屬性E-R分圖如圖4.8所示。 需求計劃單編號部門代碼部門名稱需求理由圖4.8 需求計劃單實體圖采購計劃實體屬性E-R分圖如圖4.9所示。采購計劃單編號部門代碼部門名稱決策結(jié)果圖4.9 采購計劃單實體屬性E-R分圖采購訂單實體屬性E-R分圖如圖4.10所示。采購訂單商品編號商品代碼備注訂單編號 圖4.10 采購訂單實體屬性E-R分圖(2)邏輯結(jié)構(gòu)設(shè)計（關(guān)系模型）需求計劃（編號*，部門代碼，部門名稱，需求理由，采購計劃編號）采購計劃（編號*，部門代碼，部門名稱，決策結(jié)果）采購訂單（訂單編號*，

24、商品代碼，商品編號，備注，采購計劃編號）收貨單（收貨編號*，收貨日期，收貨人，備注）檢驗單（檢驗單編號*，審核時間，審核結(jié)果，審核人，收貨單編號）物料存單（存單編號*，存貨人，存貨時間，備注，收貨單編號）存貨臺賬（編號*，記錄時間，負(fù)責(zé)人，備注）供應(yīng)商（供應(yīng)商編號*，供應(yīng)商名稱，聯(lián)系方式，地址，備注）(3)物理結(jié)構(gòu)設(shè)計(部分結(jié)構(gòu)如表4.2，表4.3，表4.4，表4.5所示)表4.2 需求計劃單字段名稱字段說明類型寬度小數(shù)位數(shù)xqjhID需求計劃單編號字符型10cgjhID采購計劃單編號字符型10BMDM部門代碼字符型12bmNAME部門名稱字符型50xqReason需求理由字符型200表4.3

25、采購計劃單字段名稱字段說明類型寬度小數(shù)位數(shù)cgjhID采購計劃單編號字符型10BMDM部門代碼字符型12bmNAME部門名稱字符型50jcResult決策結(jié)果字符型1505 系統(tǒng)實施5.1 登錄設(shè)計新建一個表單，命名為“登錄界面”。把表單Caption屬性設(shè)置為“登錄系統(tǒng)”；在“登錄表單”表單上放置相應(yīng)的控件，2個標(biāo)簽Label，2個文本框Text,3個命令按鈕Command，1個Image控件，更改其中控件的Caption屬性，表單如圖5.1所示。圖5.1 登錄界面窗口具體代碼編寫如下：（1）“確定”按鈕的Click事件代碼select 密碼表1locate for alltrim(this

26、form.text1.value)=alltrim(用戶名) if found() and alltrim(thisform.text2.value)=alltrim(密碼) thisform.release do form 主界面 else i=i+1 if i<3 messagebox("對不起！您輸入有誤，請重試！",64,"錯誤") thisform.text1.value="" thisform.text2.value="" thisform.text2.enabled=.f. thisform.t

27、ext1.enabled=.t. thisform.text1.setfocus else messagebox("對不起！您輸入有誤，禁止進(jìn)入系統(tǒng)！",64,"錯誤") thisform.release endifendif（2）“取消”按鈕的Click事件代碼mand1.enabled=.t.thisform.text1.value=""thisform.text2.value=""thisform.Label2.visible=.f.thisform.text2.visible=.f.mand1.enable

28、d=.f.mand2.enabled=.f.thisform.text1.enabled=.t.thisform.text1.setfocus（3）“退出”按鈕的Click事件代碼thisform.release5.2 采購信息錄入新建一個表單，命名為“采購信息錄入”。把表單Caption屬性設(shè)置為“采購信息錄入”；在“采購信息錄入”表單上放置相應(yīng)的控件，6個標(biāo)簽Label，6個文本框Text，3個命令按鈕Command，更改其中控件的Caption屬性，表單如圖5.2所示。圖5.2 采購信息錄入窗口具體代碼編寫如下：（1）“錄入”按鈕的Click事件代碼if !empty(thisform.

29、text1.value) and !empty(thisform.text2.value) and; !empty(thisform.text3.value) and !empty(thisform.text4.value) and; !empty(thisform.text5.value) and !empty(thisform.text6.value)sele 采購材料信息 append blankgo bottom replace 材料編號 with alltrim (thisform.text1.value)replace 材料名稱 with alltrim (thisform.tex

30、t2.value)replace 單位 with alltrim (thisform.text3.value)replace 采購數(shù)量 with thisform.text4.valuereplace 單價 with thisform.text5.valuereplace 采購時間 with thisform.text6.valuemessagebox ("成功添加記錄",48,"信息窗口")select 庫存材料信息locate for allt(材料編號)=allt(thisform.text1.value)if found()replace 數(shù)量

31、with thisform.text4.value+數(shù)量replace 材料名稱 with alltrim(thisform.text2.value)replace 單位 with alltrim(thisform.text3.value)replace 單價 with thisform.text5.valuereplace 采購時間 with thisform.text6.valueelseappend blankgo bottom replace 材料名稱 with alltrim(thisform.text2.value)replace 單位 with alltrim(thisform.

32、text3.value)replace 數(shù)量 with thisform.text4.valuereplace 材料編號 with alltrim(thisform.text1.value)replace 單價 with thisform.text5.value endifendifthisform.text1.value=''thisform.text2.value=''thisform.text3.value=''thisform.text4.value=0thisform.text5.value=0thisform.text6.value=

33、date()thisform.refresh （2）“清空”按鈕的Click事件代碼thisform.text1.value=''thisform.text2.value=''thisform.text3.value=''thisform.text4.value=0thisform.text5.value=0thisform.text6.value=date()thisform.refresh（3）“退出”按鈕的Click事件代碼thisform.release5.3 出庫記錄修改 新建一個表單，命名為“出庫記錄修改”。把表單Caption屬性設(shè)

34、置為“出庫記錄修改”；在“出庫記錄修改”表單上放置相應(yīng)的控件，6個標(biāo)簽Label，6個文本框Text,2個命令按鈕組CommandGroup，更改其中控件的Caption屬性，表單如圖5.3所示。圖5.3 出庫記錄窗口具體代碼編寫如下：（1）“首記錄”按鈕的click事件go topmand2.enabled=.f.mand3.enabled=.t.thisform.refresh（2）“上條記錄”按鈕的click事件if bof() messagebox("已是第一個記錄",48,“信息窗口”) mand2.enabled=.f. else skip -1 mand3.e

35、nabled=.t.endifthisform.refresh（3）“下條記錄”按鈕的click事件if eof() messagebox("已是最后一條記錄",48,"信息窗口") mand3.enabled=.f. else skip mand2.enabled=.t endif thisform.refresh（4）“未記錄”按鈕的click事件go bottommand3.enabled=.f.mand2.enabled=.t.thisform.refreshiption="修改" ption="保存" t

36、hisform.txt 材料編號.enabled=.t. thisform.txt 材料名稱.enabled=.t. thisform.txt 單位.enabled=.t. thisform.txt 出庫數(shù)量.enabled=.t. thisform.txt 原材料單位.enabled=.t. thisform.txt 出庫時間.enabled=.t. mand1.enabled=.f. mand2.enabled=.f. mand3.enabled=.f. mand4.enabled=.f.else yn=messagebox("確定保存嗎？",4+32,"信息

37、窗口") if yn=6 =tablerevert(.t.) replace 材料編號 with thisform.txt 材料編號.value replace 材料名稱 with thisform.txt 材料名稱.value replace 單位 with thisform.txt 單位.value replace 出庫數(shù)量 with thisform.txt 出庫數(shù)量.value replace 原材料單價 with thisform.txt 原材料單價.value replace 出庫時間 with thisform.txt 出庫時間.value thisform.refre

38、sh thisform.txt 材料編號.enabled=.f. thisform.txt 材料名稱.enabled=.f. thisform.txt 單位.enabled=.f. thisform.txt 出庫數(shù)量.enabled=.f. thisform.txt 原材料單價.enabled=.f. thisform.txt 出庫時間.enabled=.f.（5）“修改”按鈕的click事件ption="修改"mand1.enabled=.t.mand2.enabled=.t.mand3.enabled=.t.mand4.enabled=.t.else=tablereve

39、rt(.f.)thisform.txt 材料編號.enabled=.f.thisform.txt 材料名稱.enabled=.f.thisform.txt 單位.enabled=.f.thisform.txt 出庫數(shù)量.enabled=.f.thisform.txt 原材料單位.enabled=.f.thisform.txt 出庫時間.enabled=.f.ption="修改"mand1.enabled=.t.mand2.enabled=.t.mand3.enabled=.t.mand4.enabled=.tthisform.refreshendif endif 5.3 采

40、購記錄刪除 新建一個表單，命名為“采購記錄刪除”。把表單Caption屬性設(shè)置為“采購記錄修改”；在“出庫記錄刪除”表單上放置相應(yīng)的控件，1個表格Grid，2個命令按鈕Command，更改其中控件的Caption屬性，表單如圖5.4所示。圖5.4 出庫記錄刪除窗口主要代碼編寫如下：“刪除”按鈕的Click事件代碼sele 采購材料信息if not eof() jlh=recno() y=messagebox("真的要刪除嗎？",4+32,"信息窗口") if y=6 go jlh delete use 采購材料信息 exclusive pack this

41、form.grd采購材料信息.recordsource="采購材料信息" thisform.grd采購材料信息.refresh thisform.refresh else thisform.grd采購材料信息.recordsource="采購材料信息" thisform.grd采購材料信息.refresh thisform.refresh endifendif5.5 總信息查詢 新建一個表單，命名為“總信息查詢”。把表單Caption屬性設(shè)置為“總信息查詢”；在“總信息查詢”表單上放置相應(yīng)的控件，1個標(biāo)簽Label，1個文本框text，1個表格Grid，2個命令按鈕Command，1個選項按鈕組OptionGroup，更改其中控件的Caption屬性，表單如圖5.5所示。具體代碼編寫如下