進(jìn)銷存管理系統(tǒng)

72/82進(jìn)銷存治理系統(tǒng)初步分析了當(dāng)前業(yè)務(wù)公司治理方面存在的問題，聯(lián)系實(shí)際情況設(shè)計(jì)實(shí)現(xiàn)了一個(gè)以操縱物流為主的治理軟件。該系統(tǒng)實(shí)現(xiàn)了部分ERP的功能，盡力做到降低實(shí)施成本，減少實(shí)施風(fēng)險(xiǎn)，加快實(shí)施進(jìn)度，增加投資回報(bào)。企業(yè)的物資供應(yīng)治理往往是專門復(fù)雜，繁瑣的，由于掌握的物資種類眾多，訂貨，治理，發(fā)放的渠道各有差異，各個(gè)企業(yè)之間的治理體制不盡相同，各類統(tǒng)計(jì)打算報(bào)表繁多，因此物資治理必須實(shí)現(xiàn)計(jì)算機(jī)化，而且必須依照企業(yè)的具體情況制定便提高工作效率。依照當(dāng)前的企業(yè)治理體制，一般物資供應(yīng)治理系統(tǒng)，總是依照所掌握的物資類不，相應(yīng)分成幾個(gè)科室進(jìn)行物資的打算，訂貨，核對(duì)入庫，依照企業(yè)各個(gè)部門的需要來發(fā)送物資設(shè)備，并隨時(shí)近期進(jìn)行庫存盤點(diǎn)，作臺(tái)帳，依照企業(yè)領(lǐng)導(dǎo)和自身治理的需要按月，季，年進(jìn)行統(tǒng)計(jì)分析，產(chǎn)生相應(yīng)報(bào)表，為了加強(qiáng)關(guān)鍵物資，設(shè)備的治理，要定期掌握其儲(chǔ)備消耗情況，依照打算定額和實(shí)際消耗定額的比較，進(jìn)行定額治理。因此一個(gè)完整的企業(yè)物資供應(yīng)治理系統(tǒng)應(yīng)包括打算治理，合同托收治理，倉庫治理，定額治理，統(tǒng)計(jì)治理，財(cái)務(wù)治理等到模塊。其中倉庫治理是整個(gè)物資供應(yīng)治理系統(tǒng)的核心。使用MicrosoftVisualBasic6.0及MicrosoftOfficeAccess2003作為開發(fā)工具，利用面向?qū)ο蟮慕Y(jié)構(gòu)和自上而下的程序設(shè)計(jì)方法，差不多實(shí)現(xiàn)了倉庫的日常治理和進(jìn)貨出貨的查詢。關(guān)鍵字：企業(yè)資源打算，存貨，數(shù)據(jù)庫，面向?qū)ο?/p>

AbstractThefirststepanalyzesthecurrentbusinesscompanytomanagetheproblemoftheaspectexistence,contactactualcircumstancethedesigncarriedoutatakecontrolingthelogisticsaslordofmanagementsoftware.ThatsystemcarriedoutthefunctionofpartsofERPs,makinganefforttoattaintolowertheimplementcost,reducingtocarryouttherisk,speedingimplementdegreeofprogress,increasingtheinvestmentrepay.Thesuppliessupplymanagementofthebusinessenterpriseisusuallyverycomplex,tedious,becausethesuppliescategorythatcontrolisnumerous,order,manage,theoutletthatissueiseachtohavethedifference,themanagementsystembetweeneachbusinessenterprisedoesnotfulfilsamealike,eachkindofcovarianceplanstatementisnumerous.Accordingtothecurrentbusinessenterprisemanagementsystem,thegeneralsuppliessupplymanagementsystem,alwaysaccordingtothesuppliescategorycontrol,correspondtobedividedintotheplanthatafewsectionroomscarryonthesupplies,order,checktostoreinwarehouse,accordingtothedemandofthebusinessenterpriseeachsectiontosendoutthesuppliesequipments,andatanytimeinthenearfuturecarryonthestockstocktaking,makethepedestaldebt,accordingtothebusinessenterpriseleadstomanagewithoneselfofdemandisbythemonth,quarter,theyearcarryonstatisticsingtheanalysis,thecreationcorrespondthestatement,forstrengthenningthekeysupplies,themanagementoftheequipments,wanttoperiodicallycontrolitstorethedepletioncircumstance,settlingthesumaccordingtotheplanandconsumingtosettlethesumphysicallyofcomparison,carryonsettlingthesumtomanage.Soanintegrityofthebusinessenterprisesuppliessupplymanagementthesystemshouldincludetheplanmanagement,thecontractcollectionmanagement,warehousemanagement,settlesummanagement,statisticsthemanagement,financemanagementwaituntilthemoldpiece.Amongthem,thewarehousemanagementisthecoreofthewholesuppliessupplymanagementsystem.UsetheMicrosoftVisualBasic6.0andtheMicrosoftOfficeAccess2003conductandactionsesdevelopmenttool,makeuseofthestructureoffacetotheobjectandfromtoptobottomofprogramdesignmethod,basiccarriedouttheusualmanagementofthewarehouseandenterthesearchofthegoodsshipment.Keywords:ERP,Stock,Database,Facetotheobject

目錄摘要 IAbstract II1續(xù)言 12系統(tǒng)分析2.1問題的提出 42.2分析問題 42.3系統(tǒng)設(shè)計(jì)目標(biāo) 52.3.1系統(tǒng)設(shè)計(jì)的長遠(yuǎn)目標(biāo)：實(shí)現(xiàn)ERP系統(tǒng) 52.3.2系統(tǒng)設(shè)計(jì)近期 63系統(tǒng)總體設(shè)計(jì)3.1數(shù)據(jù)流圖 73.2部分?jǐn)?shù)據(jù)字典 113.3E-R圖 123.4功能模塊 143.4.1程序?qū)哟?143.4.2模塊功能講明 153.4.3系統(tǒng)數(shù)據(jù)表 154系統(tǒng)詳細(xì)設(shè)計(jì) 175編碼實(shí)現(xiàn)與測(cè)試5.1編碼摘要 215.2程序界面 286總結(jié)與展望6.1總結(jié) 346.2心得體會(huì) 35致謝 37參考文獻(xiàn) 381續(xù)言依照指導(dǎo)老師、公司和客戶的要求，本次畢業(yè)設(shè)計(jì)的題目是進(jìn)銷存治理系統(tǒng)，要求利用VisualBasic完成治理平臺(tái)設(shè)計(jì)，構(gòu)造所用的類庫；使用Access數(shù)據(jù)庫存儲(chǔ)數(shù)據(jù)，限單機(jī)使用。企業(yè)的物資供應(yīng)治理往往是專門復(fù)雜，繁瑣的，由于掌握的物資種類眾多，訂貨，治理，發(fā)放的渠道各有差異，各個(gè)企業(yè)之間的治理體制不盡相同，各類統(tǒng)計(jì)打算報(bào)表繁多，因此物資治理必須實(shí)現(xiàn)計(jì)算機(jī)化，而且必須依照企業(yè)的具體情況制定便提高工作效率，依照當(dāng)前的企業(yè)治理體制，一般物資供應(yīng)治理系統(tǒng)，總是依照所掌握的物資類不，相應(yīng)分成幾個(gè)科室進(jìn)行物資的打算，訂貨，核對(duì)入庫，依照企業(yè)各個(gè)部門的需要來發(fā)送物資設(shè)備，并隨時(shí)近期進(jìn)行庫存盤點(diǎn)，作臺(tái)帳，依照企業(yè)領(lǐng)導(dǎo)和自身治理的需要按月，季，年進(jìn)行統(tǒng)計(jì)分析，產(chǎn)生相應(yīng)報(bào)表，為了加強(qiáng)關(guān)鍵物資，設(shè)備的治理，要定期掌握其儲(chǔ)備消耗情況，依照打算定額和實(shí)際消耗定額的比較，進(jìn)行定額治理。因此一個(gè)完整的企業(yè)物資供應(yīng)治理系統(tǒng)應(yīng)包括打算治理，合同托收治理，倉庫治理，定額治理，統(tǒng)計(jì)治理，財(cái)務(wù)治理等到模塊。其中倉庫治理是整個(gè)物資供應(yīng)治理系統(tǒng)的核心。隨著科學(xué)技術(shù)特不是信息工程、計(jì)算機(jī)技術(shù)等高科技技術(shù)的飛速進(jìn)展和普及，當(dāng)今世界已進(jìn)入到了信息時(shí)代。企業(yè)和組織要求信息處理的數(shù)量越來越大，速度越來超快。為了讓治理者及時(shí)掌握準(zhǔn)確、可靠的信息，以及執(zhí)行之后構(gòu)成真實(shí)的反饋，必須建立一個(gè)功能齊全和高效率的信息治理系統(tǒng)。信息治理系統(tǒng)采納以電子計(jì)算機(jī)為主的技術(shù)設(shè)備，通過自動(dòng)化通信網(wǎng)絡(luò)，與各種信息終端相連接，利用完善的通信網(wǎng)，溝通各方面的聯(lián)系，以保證迅速、準(zhǔn)確、及時(shí)地收集情況和下達(dá)命令。本公司（現(xiàn)國內(nèi)大多實(shí)業(yè)公司的代表）存在的問題：信息化不足，計(jì)算機(jī)使用率低，大量的日常工作皆是手工處理，因此工作效率低落，企業(yè)內(nèi)部溝通不良等等問題專門難克服。要提升企業(yè)競爭力，企業(yè)內(nèi)部信息化是不可缺少的一個(gè)步驟。實(shí)施先進(jìn)的辦公室自動(dòng)化系統(tǒng)，實(shí)現(xiàn)企業(yè)內(nèi)部信息治理、共享及交流，才能讓企業(yè)在競爭激烈的21世紀(jì)取得先機(jī)。隨著經(jīng)濟(jì)的全球化以及中國經(jīng)濟(jì)改革的逐漸深化，制造業(yè)面臨著越來越激烈的競爭，改善企業(yè)內(nèi)部以及整個(gè)供應(yīng)鏈各個(gè)環(huán)節(jié)的治理、調(diào)度及資源配置，迅速適應(yīng)客戶的新需求和市場新機(jī)遇的能力，是中國企業(yè)贏得競爭勝利的決定性因素，而快速有效地實(shí)施企業(yè)資源打算（ERP）系統(tǒng)是被實(shí)踐證明了的提高企業(yè)競爭力的最有效的方法之一。從全然上講，企業(yè)確實(shí)是一個(gè)利用資源（人、財(cái)、物、時(shí)刻），為客戶制造價(jià)值的組織，ERP確實(shí)是對(duì)這些資源進(jìn)行打算、調(diào)度、操縱、衡量、改進(jìn)的治理技術(shù)和信息系統(tǒng)。現(xiàn)今的企業(yè)并不只是人力資源、資金和產(chǎn)品的組合，它還應(yīng)該包括供應(yīng)、銷售、市場營銷、客戶服務(wù)、需求預(yù)測(cè)，以及其他更多的東西。假如一個(gè)ERP系統(tǒng)真正想要最大限度地提高其生產(chǎn)能力，它必須能夠特不融洽地和其他關(guān)鍵性的商務(wù)領(lǐng)域進(jìn)行交流。企業(yè)資源打算(ERP)應(yīng)用將許許多多的商務(wù)過程自動(dòng)化并集成在一起，從而有助于企業(yè)保持競爭優(yōu)勢(shì)；數(shù)字內(nèi)容治理應(yīng)用有效地操縱存儲(chǔ)、檢索和資源的再利用，從而理順了各種操作，有助于幸免冗余；供應(yīng)鏈治理確實(shí)是對(duì)供應(yīng)鏈中的物資和服務(wù)、信息、以及金鈔票以電子方式進(jìn)行規(guī)劃和實(shí)行流操縱，提高系統(tǒng)的智能化程度，產(chǎn)、供、銷、財(cái)務(wù)形成一個(gè)統(tǒng)一的整體。使企業(yè)處于全面受控狀態(tài)，壓縮投資規(guī)模，加快資金周圍，在實(shí)時(shí)反映的基礎(chǔ)上，修正企業(yè)在日常生產(chǎn)經(jīng)營過程中各個(gè)環(huán)節(jié)上的偏差，降低產(chǎn)品成本和不必要的原料和在制品積壓。ERP將和供應(yīng)鏈治理（SCM），客戶關(guān)系治理（CRM），商業(yè)職能（BI），知識(shí)治理（KM）以及電子商務(wù)完全融合在一起。這些系統(tǒng)將會(huì)象一個(gè)團(tuán)隊(duì)一樣工作，經(jīng)常性地和客戶進(jìn)行聯(lián)系，從而為他們提供服務(wù)，出謀劃策以及保證系統(tǒng)的正常運(yùn)行。針對(duì)目前國內(nèi)實(shí)業(yè)公司存在的問題，本文設(shè)計(jì)一個(gè)以物料流處理為主，具有一定智能特性和網(wǎng)絡(luò)特性的治理系統(tǒng)。該系統(tǒng)不僅能智能的操縱企業(yè)的物流情況，而且還具有操作方便、便于糾錯(cuò)的特點(diǎn)。概括起來系統(tǒng)的優(yōu)點(diǎn)如下:（1）用戶差不多資料一次性建立，便于規(guī)范操縱。（2）物料操縱半自動(dòng)化，加強(qiáng)了各個(gè)部門之間的聯(lián)系。（3）提高庫存治理的服務(wù)水平，最大限度地降低庫存量，包括中間庫存和在制品的庫存，以減少在庫存上的資金積壓。（4）最大限度的保證訂貨任務(wù)的按期完成。（5）提高打算的可能性，實(shí)現(xiàn)均衡生產(chǎn)。（6）集成治理職能，提高治理效率。本文要緊闡述了進(jìn)銷存治理系統(tǒng)的設(shè)計(jì)目標(biāo)，系統(tǒng)要求、總體設(shè)計(jì)、詳細(xì)設(shè)計(jì)、測(cè)試等。最后是本次畢業(yè)設(shè)計(jì)的總結(jié)和體會(huì)。最初本著盡可能完成ERP的各項(xiàng)功能的原則，將物料操縱到只在需要的時(shí)候向需要的部門按需要的數(shù)量，提供所需要的物料，也確實(shí)是講，它既要防止物料供應(yīng)滯后于對(duì)他們的要求，也要防止物料過早地出產(chǎn)和進(jìn)貨，以免增加庫存，造成物資和資金的積壓，設(shè)計(jì)了這套治理軟件，但在設(shè)計(jì)的過程中發(fā)覺許多實(shí)際問題特不復(fù)雜，軟件專門難操縱，本著能自動(dòng)化的盡量自動(dòng)化，不容易實(shí)現(xiàn)自動(dòng)化的則人為操作，由于能力有限和時(shí)刻的限制，系統(tǒng)的設(shè)計(jì)難免會(huì)存在不足之處，敬請(qǐng)各位同學(xué)、老師不吝賜教。

2系統(tǒng)分析2.1問題的提出本公司目前存在的問題是：信息化不足，計(jì)算機(jī)使用率低，大量的日常工作皆是手工處理，因此工作效率低落，企業(yè)內(nèi)部溝通不良等等問題專門難克服，倉庫治理專門不合理，不能及時(shí)依照需要調(diào)整庫存。公司希望解決的問題是：缺少一個(gè)集成的信息平臺(tái)和信息系統(tǒng)，而各個(gè)業(yè)務(wù)部門之間缺少信息溝通（即重復(fù)勞動(dòng)）和共享是傳統(tǒng)庫存治理中資金占用過大的要緊緣故之一。解決企業(yè)內(nèi)部統(tǒng)一的物料編碼治理，物流治理中的信息流通。庫存積壓與物料的配套問題。完善質(zhì)量檢驗(yàn)，對(duì)生產(chǎn)過程中的質(zhì)量信息進(jìn)行全面治理，包括原材料、外購?fù)鈪f(xié)件、半成品、成品各道工序的質(zhì)量操縱，用戶反饋，售后服務(wù)，并對(duì)各種數(shù)據(jù)進(jìn)行統(tǒng)計(jì)分析。生產(chǎn)治理，對(duì)車間作業(yè)進(jìn)行治理，對(duì)施工通知單、設(shè)計(jì)更改通知單進(jìn)行制訂與查詢。銷售部門能方便地依照預(yù)測(cè)信息、各倉庫的庫存信息和客戶的要貨情況做出物資的調(diào)撥打算和改制打算。隨時(shí)了解供應(yīng)商的供貨（原材料和外協(xié)加工）執(zhí)行情況、制造車間的加工（合格、報(bào)廢、返工等）執(zhí)行情況及公司的各倉庫庫存情況，以便隨時(shí)協(xié)調(diào)或采取合適的補(bǔ)救措施治理供應(yīng)商，在供應(yīng)到貨的到期日前，主動(dòng)與供應(yīng)商聯(lián)系，檢查及時(shí)到貨的可能性；同時(shí)在物流和信息流上同意供應(yīng)商的部分零件直接發(fā)貨到客戶處。對(duì)供應(yīng)商的考核從質(zhì)量、交貨及時(shí)程度和價(jià)格上給出統(tǒng)計(jì)數(shù)據(jù)。打算過程不太理想，無物料清單，憑經(jīng)驗(yàn)辦事；對(duì)打算的執(zhí)行率未作統(tǒng)計(jì)?，F(xiàn)有量、在制品、再途庫存和歷史記錄等多方位查詢需求。庫存信息與供應(yīng)和生產(chǎn)等各部門的及時(shí)反饋和共享問題信息查詢與決策，對(duì)公司的各種資源與信息進(jìn)行查詢，包括銷售、采購、生產(chǎn)、質(zhì)量、人事、財(cái)務(wù)等信息數(shù)據(jù)進(jìn)行查詢、統(tǒng)計(jì)與分析，對(duì)依照信息作出快速合理的經(jīng)營決策，增強(qiáng)應(yīng)變反應(yīng)能力。2.2分析問題本公司是以訂單為依據(jù)進(jìn)行生產(chǎn)的實(shí)業(yè)公司，公司的要緊流程是：接到一張銷售訂單，由銷售部門轉(zhuǎn)化為內(nèi)部訂單，轉(zhuǎn)給生產(chǎn)部門，生產(chǎn)部門依照訂單上的產(chǎn)品、數(shù)量，技術(shù)部差不多配好的物料清單，及各車間半成品儲(chǔ)存量，匯總材料需求，然后依照庫存情況決定請(qǐng)購及預(yù)約情況，采購部門依照請(qǐng)購單下采購單，然后材料入庫，在手工操作的條件下，各個(gè)部門之間的溝通困難，比如，當(dāng)采購部下完采購訂單之后，倉庫是否如期到貨，必須去倉庫詢問，而且即使詢問了，有時(shí)候因?yàn)橛唵屋^多材料有可能重復(fù)，而無法確定是哪一張采購單到貨，哪一張沒有到貨，再例如，銷售部門下過內(nèi)部訂單之后，就容易了解到那個(gè)單子上的這批物資到底處于什么狀態(tài)，是已發(fā)完，依舊未發(fā)，生產(chǎn)是否完畢等，要許多次的詢問倉庫和生產(chǎn)部門才能了解到部分情況，等等，這一系列的問題迫待解決，隨著經(jīng)濟(jì)的全球化以及中國經(jīng)濟(jì)改革的逐漸深化，制造業(yè)面臨著越來越激烈的競爭，改善企業(yè)內(nèi)部以及整個(gè)供應(yīng)鏈各個(gè)環(huán)節(jié)的治理、調(diào)度及資源配置，迅速適應(yīng)客戶的新需求和市場新機(jī)遇的能力，是中國企業(yè)贏得競爭勝利的決定性因素，如何快速有效地實(shí)現(xiàn)跟單，如何有效的操縱庫存，這一切差不多上本治理系統(tǒng)所力求實(shí)現(xiàn)的功能。從全然上講，企業(yè)確實(shí)是一個(gè)利用資源（人、財(cái)、物、時(shí)刻），為客戶制造價(jià)值的組織，企業(yè)資源打算確實(shí)是對(duì)這些資源進(jìn)行打算、調(diào)度、操縱、衡量、改進(jìn)的治理技術(shù)和信息系統(tǒng)?，F(xiàn)今的企業(yè)并不只是人力資源、資金和產(chǎn)品的組合，它還應(yīng)該包括供應(yīng)、銷售、市場營銷、客戶服務(wù)、需求預(yù)測(cè)，以及其他更多的東西。假如一個(gè)企業(yè)資源打算系統(tǒng)真正想要最大限度地提高其生產(chǎn)能力，它必須能夠特不融洽地和其他關(guān)鍵性的商務(wù)領(lǐng)域進(jìn)行交流。2.3系統(tǒng)設(shè)計(jì)目標(biāo)2.3.1系統(tǒng)設(shè)計(jì)的長遠(yuǎn)目標(biāo)：實(shí)現(xiàn)ERP系統(tǒng)1．系統(tǒng)運(yùn)行集成化：這是ERP應(yīng)用成功在技術(shù)解決方案方面最差不多的表現(xiàn)。ERP系統(tǒng)是對(duì)企業(yè)物流、資金流、信息流進(jìn)行一體化治理的軟件系統(tǒng)，其核心治理思想確實(shí)是實(shí)現(xiàn)對(duì)“供應(yīng)鏈（SupplyChain）”的治理。軟件的應(yīng)用將跨越多個(gè)部門甚至多個(gè)企業(yè)。為了達(dá)到預(yù)期設(shè)定的應(yīng)用目標(biāo)，最差不多的要求是系統(tǒng)能夠運(yùn)行起來，實(shí)現(xiàn)集成化應(yīng)用，建立企業(yè)決策完善的數(shù)據(jù)體系和信息共享機(jī)制。一般來講，假如ERP系統(tǒng)僅在財(cái)務(wù)部門應(yīng)用，只能實(shí)現(xiàn)財(cái)務(wù)治理規(guī)范化、改善應(yīng)收帳款和資金治理；僅在銷售部門應(yīng)用，只能加強(qiáng)和改善營銷治理；僅在庫存治理部門應(yīng)用，只能關(guān)心掌握存貨信息；僅在生產(chǎn)部門應(yīng)用只能輔助制定生產(chǎn)打算和物資需求打算。只有集成一體化運(yùn)行起來，才有可能達(dá)到：降低庫存，提高資金利用率和操縱經(jīng)營風(fēng)險(xiǎn)；操縱產(chǎn)品生產(chǎn)成本，縮短產(chǎn)品生產(chǎn)周期；提高產(chǎn)品質(zhì)量和合格率；減少財(cái)務(wù)壞帳、呆帳金額等。這些目標(biāo)能否真正達(dá)到，還要取決于企業(yè)業(yè)務(wù)流程重組的實(shí)施效果。2．業(yè)務(wù)流程合理化：這是ERP應(yīng)用成功在改善治理效率方面的體現(xiàn)。ERP應(yīng)用成功的前提是必須對(duì)企業(yè)實(shí)施業(yè)務(wù)流程重組，因此，ERP應(yīng)用成功也即意味著企業(yè)業(yè)務(wù)處理流程趨于合理化，并實(shí)現(xiàn)了ERP應(yīng)用的以下幾個(gè)最終目標(biāo)：企業(yè)競爭力得到大幅度提升；企業(yè)面對(duì)市場的響應(yīng)速度大大加快；客戶中意度顯著改善。3．績效監(jiān)控動(dòng)態(tài)化：ERP的應(yīng)用，將為企業(yè)提供豐富的治理信息。如何用好這些信息并在企業(yè)治理和決策過程中真正起到作用，是衡量ERP應(yīng)用成功的另一個(gè)標(biāo)志。在ERP系統(tǒng)完全投入實(shí)際運(yùn)行后，企業(yè)應(yīng)依照治理需要，利用ERP系統(tǒng)提供的信息資源設(shè)計(jì)出一套動(dòng)態(tài)監(jiān)控治理績效變化的報(bào)表體系，以期即時(shí)反饋和糾正治理中存在的問題。這項(xiàng)工作，一般是在ERP系統(tǒng)實(shí)施完成后由企業(yè)設(shè)計(jì)完成。企業(yè)如未能利用ERP系統(tǒng)提供的信息資源建立起自己的績效監(jiān)控系統(tǒng)，將意味著ERP系統(tǒng)應(yīng)用沒有完全成功。4．理改善持續(xù)化：隨著ERP系統(tǒng)的應(yīng)用和企業(yè)業(yè)務(wù)流程的合理化，企業(yè)治理水平將會(huì)明顯提高。為了衡量企業(yè)治理水平的改善程度，能夠依據(jù)治理咨詢公司提供的企業(yè)治理評(píng)價(jià)指標(biāo)體系對(duì)企業(yè)治理水平進(jìn)行綜合評(píng)價(jià)。評(píng)價(jià)過程本身并不是目的，為企業(yè)建立一個(gè)能夠不斷進(jìn)行自我評(píng)價(jià)和不斷改善治理的機(jī)制，才是真正目的。這也是ERP應(yīng)用成功的一個(gè)經(jīng)常不被人們重視的標(biāo)志。2.3.2系統(tǒng)設(shè)計(jì)近期（1）建立差不多資料信息庫，規(guī)范所有資料信息。（2）物料操縱半自動(dòng)化，加強(qiáng)了各個(gè)部門之間的聯(lián)系。（3）高庫存治理的服務(wù)水平，最大限度地降低庫存量，包括中間庫存和在制品的庫存，以減少在庫存上的資金積壓。（4）最大限度的保證訂貨任務(wù)的按期完成。（5）提高打算的可能性，實(shí)現(xiàn)均衡生產(chǎn)：（6）集成治理職能，提高治理效率。

3系統(tǒng)總體設(shè)計(jì)3.1數(shù)據(jù)流圖頂層數(shù)據(jù)流圖如圖3.1所示圖3.1進(jìn)銷存治理系統(tǒng)頂層數(shù)據(jù)流圖0層數(shù)據(jù)流圖如圖3.2所示：圖3.2進(jìn)銷存治理系統(tǒng)0層數(shù)據(jù)流圖1層數(shù)據(jù)流圖如圖3.3所示：圖3.3進(jìn)銷存治理系統(tǒng)1層數(shù)據(jù)流圖圖3.3進(jìn)銷存治理系統(tǒng)1層數(shù)據(jù)流圖（續(xù)）3.2部分?jǐn)?shù)據(jù)字典數(shù)據(jù)流圖描述了系統(tǒng)的分解，但沒有對(duì)圖中各成分進(jìn)行講明，數(shù)據(jù)字典確實(shí)是為了數(shù)據(jù)流圖的每個(gè)數(shù)據(jù)流、文件、加工，以及組成數(shù)據(jù)流或文件的數(shù)據(jù)項(xiàng)作出講明。因篇幅限制，每樣僅舉例講明數(shù)據(jù)流條目：出庫單=出庫單號(hào)+日期+客戶名稱+物資類不+制單人員+記帳人員+發(fā)貨人+狀態(tài)+{銷售訂單號(hào)+品名+單位+數(shù)量+規(guī)格+備注+單價(jià)}各類財(cái)務(wù)統(tǒng)計(jì)報(bào)表=倉庫材料消耗匯總（成本項(xiàng)目）+倉庫材料消耗匯總（按車間）+材料收發(fā)存明細(xì)A+材料收發(fā)存明細(xì)B+材料收發(fā)存明細(xì)C+材料收發(fā)存分類匯總表+木材消耗匯總表。文件條目：文件名稱：原材料庫存文件。簡述：保存原材料的差不多資料。組成：材料編號(hào)+品名型號(hào)+規(guī)格尺寸+單位+采購計(jì)量單位+參數(shù)+數(shù)量+最低數(shù)量+最高數(shù)量+單價(jià)+備注+大大分類+大分類+分類+小分類。文件名稱：銷售文件。簡述：保存所有銷售訂單的文件。組成內(nèi)部定單號(hào)+訂貨日期+客戶編號(hào)+總金額+預(yù)收率——NEWCASTLE號(hào)+PO單號(hào)包裝方法+品質(zhì)要求+內(nèi)裝箱+外裝箱+MADEINCHINA+特不指示+箱正側(cè)內(nèi)+狀態(tài)+{型號(hào)+色號(hào)+木材尺寸+光澤度+內(nèi)絨+表面處理+數(shù)量+出貨日期+單價(jià)}。數(shù)據(jù)項(xiàng)條目：名稱：材料編號(hào)簡述：材料編號(hào)分四個(gè)字段（大大分類+大分類+分類+小分類），能夠?qū)⒉牧戏珠T不。類，因?yàn)樵S多地點(diǎn)用到編號(hào)，因此將四項(xiàng)和為一項(xiàng)保存一個(gè)冗余字段。為了便于查找。3.3E-R圖程序總體E-R圖如圖3.4所示：圖3.4程序總體E-R圖人員治理模塊如圖3.5所示：圖3.5人員治理模塊材料治理模塊如圖3.6所示：圖3.6材料治理模塊3.4功能模塊3.4.1程序?qū)哟纬绦驅(qū)哟稳鐖D3.7所示：圖3.7程序?qū)哟螆D3.4.2模塊功能講明篇幅所限，僅選擇部分功能講明。登陸驗(yàn)證功能：要緊功能為身份驗(yàn)證，防止非法用戶進(jìn)入系統(tǒng)。實(shí)現(xiàn)方法如圖3.8所示：圖3.8登陸驗(yàn)證實(shí)現(xiàn)方法3.4.3系統(tǒng)數(shù)據(jù)表倉庫物資信息表（材料表），如表3.1所示：表3.1倉庫物資信息表編號(hào)字段名稱數(shù)據(jù)類型講明1自動(dòng)編號(hào)Long數(shù)值Primarykey主鍵2規(guī)格Text文本必填,字段不同意空串3型號(hào)Text文本必填,字段不同意空串4數(shù)量Long數(shù)值必填字段5價(jià)格Long數(shù)值必填字段6名稱Text文本必填字段進(jìn)貨人員信息表，如表3.2所示：表3.2進(jìn)貨人員信息表編號(hào)字段名稱數(shù)據(jù)類型講明1自動(dòng)編號(hào)Long數(shù)值Primarykey主鍵2姓名Text文本必填,字段不同意空串3聯(lián)系方式Text文本必填,字段不同意空串入庫、出庫單信息表，如表3.3所示：表3.3入庫、出庫單信息表編號(hào)字段名稱數(shù)據(jù)類型講明1自動(dòng)編號(hào)Long數(shù)值Primarykey主鍵2姓名Text文本必填,字段不同意空串3聯(lián)系方式Text文本必填,字段不同意空串4物資名稱Text文本必填,字段不同意空串5物資數(shù)量Long數(shù)值必填,字段不同意空串6物資規(guī)格Text文本必填,字段不同意空串物資型號(hào)Text文本必填,字段不同意空串價(jià)格Long數(shù)值必填,字段不同意空串日期Text文本必填,字段不同意空串

4系統(tǒng)詳細(xì)設(shè)計(jì)依照內(nèi)部訂單預(yù)定材料的流程圖如圖4.1所示：講明：KDYsl：可調(diào)用數(shù)量XQsl：需求數(shù)量KCsl：庫存數(shù)量可調(diào)用數(shù)量=庫存數(shù)量－最低庫存量－已預(yù)約數(shù)量設(shè)計(jì)時(shí)需求數(shù)量與庫存數(shù)量、可調(diào)用數(shù)量分不比較可得出４種情況需求數(shù)量>可調(diào)用數(shù)量and需求數(shù)量>庫存數(shù)量（因?yàn)閹齑鏀?shù)量>=可調(diào)用數(shù)量因此可寫成XQsl>KDYsl）需求數(shù)量>=可調(diào)用數(shù)量and需求數(shù)量<=庫存數(shù)量（因?yàn)閹齑鏀?shù)量>=可調(diào)用數(shù)量因此可寫成KDYsl<=XQsl<=KCsl）需求數(shù)量<可調(diào)用數(shù)量and需求數(shù)量>庫存數(shù)量(因?yàn)閹齑鏀?shù)量>=可調(diào)用數(shù)量因此不存在這種情況)需求數(shù)量<可調(diào)用數(shù)量and需求數(shù)量<庫存數(shù)量（因?yàn)閹齑鏀?shù)量>=可調(diào)用數(shù)量因此可寫成XQsl<KDYsl）綜上所述：比較情況分為三支XQsl>KDYsl和KDYsl<=XQsl<=KCs和XQsl<KDYsl算法的設(shè)計(jì)企業(yè)的流轉(zhuǎn)包括實(shí)物流轉(zhuǎn)和成本流轉(zhuǎn)，在理論上，兩者應(yīng)一致。但在實(shí)際工作中，企業(yè)的存貨進(jìn)出量專門大，存貨的品種繁多，存貨的成本多變，難以保證各種存貨的成本流轉(zhuǎn)與實(shí)物流轉(zhuǎn)相一致。由于同一種存貨，盡管價(jià)格不同，但均能滿足銷售或生產(chǎn)需要，在存貨減少時(shí)，毋需辨不是哪一批實(shí)物被發(fā)出，哪一批庫存，成本的流轉(zhuǎn)順序和實(shí)物的流轉(zhuǎn)順序能夠分離，只要明白發(fā)出成本和庫存成本即可。如此就出現(xiàn)了存貨成本的流轉(zhuǎn)假設(shè)。

采納某種存貨成本流轉(zhuǎn)的假設(shè)，在期末存貨與發(fā)出存貨之間分配成本，便產(chǎn)生了不同的存貨成本分配方。圖4.1內(nèi)部訂單預(yù)定材料流程圖材料收發(fā)存分類匯總的程序流程圖如圖4.2所示：圖4.2材料收發(fā)存分類匯總的程序流程圖

存貨計(jì)價(jià)的方法不同，對(duì)企業(yè)財(cái)務(wù)狀況、盈虧情況會(huì)產(chǎn)生不同的阻礙，要緊表現(xiàn)在以下幾個(gè)方面：

(1)存貨計(jì)價(jià)對(duì)企業(yè)損益的計(jì)算有直接阻礙。

(2)存貨計(jì)價(jià)關(guān)于資產(chǎn)負(fù)債表有關(guān)項(xiàng)目數(shù)額計(jì)算有直接阻礙。

(3)存貨計(jì)價(jià)方法的選擇對(duì)計(jì)算繳納所得稅的數(shù)額有一定的阻礙。因本公司往常是手工計(jì)算，為了減少計(jì)算量，使用的全月一次加權(quán)平均法，報(bào)稅務(wù)局的也是全月一次加權(quán)平均法，為了過度時(shí)期的使用，本系統(tǒng)不僅設(shè)計(jì)了更合理的移動(dòng)加權(quán)平均法，同時(shí)設(shè)計(jì)了全月一次加權(quán)平均法。加權(quán)平均法（稱全月一次加權(quán)平均法），指以本月全部收貨數(shù)量加月初存貨數(shù)量作為權(quán)數(shù)，去除本月全部收貨成本加上月初存貨成本，計(jì)算出存貨的加權(quán)平均單位成本，從而確定存貨的發(fā)出和庫存成本。計(jì)算公式如下：移動(dòng)平均法

移動(dòng)平均法亦稱移動(dòng)加權(quán)平均法，指本次收貨的成本加原有庫存的成本，除以本次收貨數(shù)量加原有收貨數(shù)量，據(jù)以計(jì)算加權(quán)單價(jià)，并對(duì)發(fā)出存貨進(jìn)行計(jì)價(jià)的一種方法。

移動(dòng)加權(quán)平均法的優(yōu)點(diǎn)：能使治理當(dāng)局及時(shí)了解存貨的結(jié)存情況，而且計(jì)算的平均單位成本以及發(fā)出和結(jié)存的存貨成本比較客觀。缺點(diǎn)：每次收貨都要計(jì)算一次平均單價(jià)，計(jì)算工作量較大。

5編碼實(shí)現(xiàn)與測(cè)試5.1編碼摘要材料收發(fā)存分類匯總的部分代碼：sql語句：SELECT[K_llll_D].[CLBH]ASCLBH,[K_llll_M].[KDRQ]ASKDRQ,[K_llll_M].[CBXM]ASCBXM,[K_llll_M].[DHDH],[K_llll_D].[SLSL]ASSLSL,[k_LLLL_D].[JEJE]ASJEJEFROMK_llll_MINNERJOINK_llll_DON[K_llll_M].[DHDH]=[K_llll_D].[DHDH]WHERE[K_llll_M].[status]=1;SELECT[K_clrk_D].[CLBH]ASCLBH,[K_clrk_M].[KDRQ]ASKDRQ,[K_clrk_M].[DHDH]ASDHDH,[K_clrk_D].[SLSL]ASSLSL,[SLSL]*[K_clrk_D].[DJDJ]ASJEJEFROMK_clrk_MINNERJOINK_clrk_DON[K_clrk_M].[DHDH]=[K_clrk_D].[DHDH]WHERE[K_clrk_m].[STATUS]=1;SELECTA.CLBH,Sum(A.SLSL)ASZSL,Sum(A.JEJE)ASZJE,year([KDRQ])&"-"&Month([KDRQ])&"-"&"1"ASMONFROMSFC_rkASAGROUPBYA.CLBH,year([KDRQ])&"-"&Month([KDRQ])&"-"&"1";SELECTA.CLBH,Sum(IIf(ISNULL(A.SLSL),0,A.SLSL))ASZSL,Sum(IIf(ISNULL(A.JEJE),0,A.JEJE))ASZJE,year([KDRQ])&"-"&Month([KDRQ])&"-"&"1"ASMONFROMSFC_ckASAGROUPBYA.CLBH,year([KDRQ])&"-"&Month([KDRQ])&"-"&"1";SELECTA.BHBHASBHBH,A.YFYFASYFYF,IIf(ISNULL(A.QCSL),0,A.QCSL)ASQCSL,IIf(ISNULL(B.ZSL),0,B.ZSL)ASSRSL,[QCSL]+SRSLASMISL,IIf(ISNULL(A.QCJE),0,A.QCJE)ASQCJE,IIf(ISNULL(B.ZJE),0,B.ZJE)ASSRJE,[QCJE]+SRJEASMIJEFROMT_SFC_QCASALEFTJOINSFC_RK_GPASBON(A.YFYF=CDATE(B.MON))AND(A.BHBH=B.CLBH)ORDERBY[bhbh];SELECTA.BHBH,A.YFYF,A.QCSL,A.SRSL,A.MISL-IIF(ISNULL(B.ZSL),0,B.ZSL)ASQMSL,A.QCJE,A.SRJE,A.MIJE-IIF(ISNULL(B.ZJE),0,B.ZJE)ASQMJE,IIF(ISNULL(B.ZSL),0,B.ZSL)ASFCSL,IIF(ISNULL(B.ZJE),0,B.ZJE)ASFCJEFROMSFC_AAAASALEFTJOINSFC_CK_GPASBON(A.YFYF=CDATE(B.MON))AND(A.BHBH=B.CLBH)ORDERBY[bhbh];SELECTA.BHBH,B.PMPMASPMPM,B.GGGGASGGGG,A.YFYF,A.QCSL,A.SRSL,A.FCSL,A.QMSL,A.QCJE,A.SRJE,A.FCJE,A.QMJE,B.FLAA,B.FLBB,B.FLCCFROMSFC_BBBASALEFTJOINJ_clclASBONA.BHBH=B.BHBHORDERBYA.BHBH;SELECTSFC_CCC.*,IIf(ISNULL([O_Dzfy].[ZWZW]),"空",[O_Dzfy].[ZWZW])ASZWBBFROMSFC_CCCLEFTJOINO_DzfyON[O_Dzfy].[FHFH]=[SFC_CCC].[FLBB];SELECTSFC_ZW_B.*,IIf(isnull([O_Dzfy].[ZWZW]),"空",[O_Dzfy].[ZWZW])ASZWCCFROMSFC_ZW_BLEFTJOINO_DzfyON[SFC_ZW_B].[FLCC]=[O_Dzfy].[FHFH];SELECTA.FLBBASFLBB,A.ZWBBASZWBB,A.ZWCCASZWCC,A.YFYFASYFYF,Sum(A.QCSL)ASQCZSL,Sum(A.SRSL)ASSRZSL,Sum(A.FCSL)ASFCZSL,Sum(A.QMSL)ASQMZSL,Sum(A.QCJE)ASQCZJE,Sum(A.SRJE)ASSRZJE,Sum(A.FCJE)ASFCZJE,Sum(A.QMJE)ASQMZJEFROMSFC_ZW_CASAGROUPBYA.FLBB,A.ZWBB,A.YFYF,A.ZWCC;全月一次加權(quán)平均計(jì)算單價(jià)的部分代碼：sql語句：SELECTA.CLBH,SUM(A.SLSL)ASRKSL,SUM(A.JEJE)ASRKJEFROMAVER_MTH_RK1ASAWHERENOT(ISNULL(A.YFYF))GROUPBY[CLBH];SELECTA.CLBH,[SLSL],[JEJE],[YFYF]FROMAVER_MTH_RKASALEFTJOINT_SFC_QCASBON(A.CLBH=B.BHBH)AND(A.KDRQ>=B.YFYF);SELECTA.DHDH,A.KDRQ,B.CLBH,B.SLSL,B.SLSL*B.DJDJASJEJEFROMK_clrk_MASAINNERJOINK_clrk_DASBONA.DHDH=B.DHDHWHERESTATUS=1;SELECTA.CLBH,B.YFYF,IIf(A.RKSL=0,IIf(ISNULL([QCSL]),0,[QCJE]/[QCSL]),(B.QCJE+A.RKJE)/(B.QCSL+A.RKSL))ASDJDJFROMAVER_MTH_RK2ASALEFTJOINT_SFC_QCASBONA.CLBH=B.BHBH;功能函數(shù)PublicSubDo_Aver_DJ()Dimda_RecAsADODB.RecordsetDimda_SQLAsStringSetda_Rec=AppCN.Execute("select*fromAVER_DJ")AppCN.BeginTransDoWhileNotda_Rec.EOFda_SQL="updateJ_clclsetDJDJ="&da_Rec.Fields("DJDJ")&"whereBHBH='"&da_Rec.Fields("CLBH")&"'"AppCN.Execute(da_SQL)da_SQL="updateK_LLLL_DsetJEJE="&da_Rec.Fields("DJDJ")&"*k_LLLL_D.SLSLwhereK_LLLL_D.CLBH='"&_da_Rec.Fields("CLBH")&"'andK_LLLL_D.DHDHIN(SELECTDHDHFROMAVER_mth_LL2)"AppCN.Execute(da_SQL)da_Rec.MoveNextLoopAppCN.CommitTransEndSub收發(fā)存明細(xì),追蹤某中材料某月的進(jìn)出庫情況，并顯示出是那一帳單據(jù)進(jìn)行操作，假如是領(lǐng)料則在摘要中寫明成本項(xiàng)目。計(jì)算出每次操作之后的結(jié)存數(shù)量及金額。PrivateSubCmdMe_Click(IndexAsInteger)IfIndex=0ThenCallPrintLstv(Me.LstView,LoadResString(804),"材料["&m_CLBH&"]收發(fā)存明細(xì)A",1,1)ElseUnloadMeEndIfEndSubPrivateSubDoGroupCube(SlColAsString,JeColAsString)DimarrSlCol()AsStringDimarrJeCol()AsStringDimkAsIntegerDimtotalAsDoubleCallON_GetArray(SlCol,arrSlCol)CallON_GetArray(JeCol,arrJeCol)LstView.ListItems.Add,,""LstView.ListItems(LstView.ListItems.Count).SubItems(1)="總計(jì)"Fork=0ToUBound(arrSlCol)total=0ForJ=1ToLstView.ListItems.Counttotal=total+Val(LstView.ListItems(J).SubItems(Val(arrSlCol(k))))NextLstView.ListItems(LstView.ListItems.Count).SubItems(Val(arrSlCol(k)))=totalNextFork=0ToUBound(arrJeCol)total=0ForJ=1ToLstView.ListItems.Counttotal=total+Val(LstView.ListItems(J).SubItems(Val(arrJeCol(k))))NextLstView.ListItems(LstView.ListItems.Count).SubItems(Val(arrJeCol(k)))=Format(total,"###0.00")NextEndSubPrivateSubForm_Load()Dimfl_NumAsSingleDimfl_CashAsDoubleMe.Icon=LoadResPicture(101,vbResIcon)Me.Move(Screen.Width-Me.Width)/2,(Screen.Height-Me.Height)/4Me.Caption="查看["&m_CLBH&"]的明細(xì)情況"CallDoStyleIfGetInitData(fl_Num,fl_Cash)=TrueThenCallDoShow(fl_Num,fl_Cash)'CallDoRemain(fl_Num,fl_Cash)EndIfEndSubPrivateSubDoShow(m_drNumAsSingle,m_drCashAsDouble)DimdsRecAsADODB.RecordsetDimdsSQLAsStringDimIAsIntegerDimitmXDimrd_theSLAsSingleDimrd_theJEAsDoubleDimrd_RKJEAsDouble,rd_CKJEAsDoublerd_theSL=m_drNumrd_theJE=m_drCashdsSQL="select*fromSFC_MXA3whereCLBH='"&m_CLBH&"'"SetdsRec=AppCN.Execute(dsSQL&"ANDMonth(KDRQ)="&m_Month&"ANDYear(KDRQ)="&m_Year)IfdsRec.EOFThen'MsgBox"無效的材料編號(hào)！"ExitSubEndIfI=1SetitmX=LstView.ListItems.Add(,,A&I)itmX.SubItems(1)=dsRec.Fields("KDRQ").ValueitmX.SubItems(3)="期初數(shù)量"itmX.SubItems(10)=rd_theSLitmX.SubItems(11)=Format(m_drCash,"##,##0.00")DoWhileNotdsRec.EOFI=I+1SetitmX=LstView.ListItems.Add(,,A&I)rd_RKJE=IIf(dsRec.Fields("RKJE").Value="",0,dsRec.Fields("RKJE").Value)rd_CKJE=IIf(dsRec.Fields("CKJE").Value="",0,dsRec.Fields("CKJE").Value)rd_theSL=rd_theSL+Val(dsRec.Fields("RKSL"))-Val(dsRec.Fields("CKSL"))m_drCash=m_drCash+rd_RKJE-rd_CKJEitmX.SubItems(1)=dsRec.Fields("KDRQ").ValueitmX.SubItems(2)=dsRec.Fields("DHDH").ValueitmX.SubItems(3)=dsRec.Fields("CBXM").ValueitmX.SubItems(4)=dsRec.Fields("RKSL").ValueitmX.SubItems(5)=IIf(dsRec.Fields("RKDJ").Value="","",Format(dsRec.Fields("RKDJ").Value,"##,##0.00"))itmX.SubItems(6)=IIf(dsRec.Fields("RKJE").Value="","",Format(dsRec.Fields("RKJE").Value,"##,##0.00"))'itmX.SubItems(7)=dsRec.Fields("CKSL").ValueitmX.SubItems(8)=IIf(dsRec.Fields("CKDJ").Value="","",Format(dsRec.Fields("CKDJ").Value,"##,##0.00"))itmX.SubItems(9)=IIf(dsRec.Fields("CKJE").Value="","",Format(dsRec.Fields("CKJE").Value,"##,##0.00"))'itmX.SubItems(10)=rd_theSLitmX.SubItems(11)=Format(m_drCash,"##,##0.00")dsRec.MoveNextLoopEndSubPrivateSubDoStyle()DimintWidAsIntegerintWid=1200LstView.ColumnHeaders.Add,,"序號(hào)",600LstView.ColumnHeaders.Add,,"日期",1000,lvwColumnRightLstView.ColumnHeaders.Add,,"憑證編號(hào)",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"摘要",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"收入數(shù)量",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"收入單價(jià)",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"收入金額",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"發(fā)出數(shù)量",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"發(fā)出單價(jià)",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"發(fā)出金額",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"結(jié)存數(shù)量",intWid,lvwColumnRightLstView.ColumnHeaders.Add,,"結(jié)存金額",intWid,lvwColumnRightEndSubPrivateSubForm_Resize()OnErrorResumeNextLstView.Move0,100+500+50,Me.ScaleWidth,Me.ScaleHeight-Me.StatusBar1.Height-650EndSubPrivateFunctionGetInitData(m_giNumAsSingle,m_giCashAsDouble)AsBooleanDimdrRec_1AsADODB.RecordsetDimdrRec_2AsADODB.RecordsetDimdrSQLAsStringGetInitData=Truem_giNum=-2002.1994m_giCash=-2002.1994drSQL="select*fromT_SFCWhereBHBH='"&m_CLBH&"'"drSQL=drSQL&"ANDMonth(YFYF)="&m_Month&"ANDYear(YFYF)="&m_YearSetdrRec_1=AppCN.Execute(drSQL)IfdrRec_1.EOFThendrSQL="select*fromT_SFC_QCWhereBHBH='"&m_CLBH&"'"drSQL=drSQL&"ANDMonth(YFYF)="&m_Month&"ANDYear(YFYF)="&m_YearSetdrRec_2=AppCN.Execute(drSQL)IfdrRec_2.EOFThenMsgBox"沒有盤點(diǎn)，沒有期初期末數(shù)據(jù)！"GetInitData=FalseElsem_giNum=drRec_2.Fields("QCSL").Valuem_giCash=drRec_2.Fields("QCJE").ValueEndIfdrRec_2.Close:SetdrRec_2=NothingElsem_giNum=drRec_1.Fields("QCSL").Valuem_giCash=drRec_1.Fields("QCJE").ValueEndIfdrRec_1.Close:SetdrRec_1=NothingEndFunctionPrivateSubForm_Unload(CancelAsInteger)m_CLBH=""m_Month=0m_Year=0EndSubPrivateSubDoRemain(m_drNumAsSingle,m_drCashAsDouble)Dimrd_theSLAsSingleDimrd_theJEAsDoubleDimrd_RKJEAsDouble,rd_CKJEAsDoublerd_theSL=m_drNumrd_theJE=m_drCashForI=1ToMe.LstView.ListItems.Countrd_theSL=rd_theSL+Val(LstView.ListItems(I).SubItems(4))-Val(LstView.ListItems(I).SubItems(7))LstView.ListItems(I).SubItems(10)=rd_theSLIfrd_theSL<>0Thenrd_CKJE=Val(Format(LstView.ListItems(I).SubItems(9),"###0.00"))rd_theJE=rd_theJE+rd_RKJE-rd_CKJEElserd_theJE=0EndIfLstView.ListItems(I).SubItems(11)=Format(rd_theJE,"##,##0.00")NextEndSub5.2程序界面1．系統(tǒng)登陸界面如圖5.1所示：圖5.1系統(tǒng)登陸界面2．系統(tǒng)總治理界面如圖5.2所示：圖5.2系統(tǒng)總治理界面3．系統(tǒng)入庫操作界面如圖5.3所示圖5.3系統(tǒng)入庫操作界面4．系統(tǒng)出庫操作界面如圖5.4所示：圖5.4系統(tǒng)出庫操作界面5．人員查詢界面如圖5.5所示：圖5.5人員查詢界面6．操作員設(shè)置界面如圖5.6所示：圖5.6操作員設(shè)置界面7．物品查詢界面如圖5.7所示：圖5.7物品查詢界面8．日期查詢界面如圖5.8所示：圖5.8日期查詢界面9．按月份統(tǒng)計(jì)界面如圖5.9所示：圖5.9按月統(tǒng)計(jì)界面10．?dāng)?shù)據(jù)治理界面如圖5.10所示：圖5.10數(shù)據(jù)治理界面

6總結(jié)與展望6.1總結(jié)隨著經(jīng)濟(jì)的全球化以及中國經(jīng)濟(jì)改革的逐漸深化，制造業(yè)面臨著越來越激烈的競爭，改善企業(yè)內(nèi)部以及整個(gè)供應(yīng)鏈各個(gè)環(huán)節(jié)的治理、調(diào)度及資源配置，迅速適應(yīng)客戶的新需求和市場新機(jī)遇的能力，是中國企業(yè)贏得競爭勝利的決定性因素，而快速有效地實(shí)施企業(yè)資源打算（ERP）系統(tǒng)是被實(shí)踐證明了的提高企業(yè)競爭力的最有效的方法之一。從全然上講，企業(yè)確實(shí)是一個(gè)利用資源（人、財(cái)、物、時(shí)刻），為客戶制造價(jià)值的組織，ERP確實(shí)是對(duì)這些資源進(jìn)行打算、調(diào)度、操縱、衡量、改進(jìn)的治理技術(shù)和信息系統(tǒng)?，F(xiàn)今的企業(yè)并不只是人力資源、資金和產(chǎn)品的組合，它還應(yīng)該包括供應(yīng)、銷售、市場營銷、客戶服務(wù)、需求預(yù)測(cè)，以及其他更多的東西。假如一個(gè)ERP系統(tǒng)真正想要最大限度地提高其生產(chǎn)能力，它必須能夠特不融洽地和其他關(guān)鍵性的商務(wù)領(lǐng)域進(jìn)行交流。當(dāng)前,隨著經(jīng)濟(jì)的全球化以及中國經(jīng)濟(jì)改革的逐漸深化，制造業(yè)面臨著越來越激烈的競爭，改善企業(yè)內(nèi)部以及整個(gè)供應(yīng)鏈各個(gè)環(huán)節(jié)的治理、調(diào)度及資源配置，迅速適應(yīng)客