【正文】 Action) { Action = caFree。 TADOQuery* pQuery7 = new TADOQuery(NULL)。 delete pQuery4。 Table1FieldByName(PerCost)AsString = price。 pQuery2Connection=DataModule1ADOConnection1。 delete pQuery。 if(button==IDOK) Table1Delete()。 10. 物資余額信息的瀏覽。依據(jù)運(yùn)營部門下達(dá)的生產(chǎn)計(jì)劃編制物料采購計(jì)劃及庫存報(bào)表，然后根據(jù)采購計(jì)劃下采購訂單，同時(shí)將訂單轉(zhuǎn)發(fā)到財(cái)務(wù)部。 除此之外， 要查詢一個(gè)數(shù)據(jù)，特別是收集某一匯總或加總數(shù)據(jù)時(shí)速度很慢 。 （二）、需求概述 主要實(shí)現(xiàn)的基本功能如下： 1. 訂單信息的輸入 2. 財(cái)務(wù)信息的輸入 3. 有關(guān)物資基本信息的輸入。 系統(tǒng)管理員： 登陸成功不進(jìn)行其他操作時(shí)，只運(yùn)行登陸和物資信息維護(hù)模塊； 登陸成功，并選擇了除物資信息維護(hù)模塊外的其他操作，如選擇人員信息維護(hù)模塊， 則運(yùn)行了登陸模塊，物資信息維護(hù)模塊，人員信息維護(hù)模塊； 系統(tǒng)管理員服務(wù)界面 默認(rèn)界面： 4 5 3 登陸模塊 倉庫信息維護(hù)界面 人員信息維護(hù)界面 進(jìn)出記錄維護(hù)界面 合法用戶 2 個(gè)人密碼修改界面 倉庫管理員界面 默認(rèn)界面： 2 3 物資出庫界面 個(gè)人密碼修改界面 倉庫管理員界面 默認(rèn)界面： 2 個(gè)人密碼修改界面 登陸成功不進(jìn)行其他操作時(shí)，只運(yùn)行登陸和物資入庫模塊； 登陸成功，選擇了除物資出庫模塊，則運(yùn)行了登陸和物資入庫模塊，物資出庫模塊； 登陸成功后，選擇了除物資出庫模塊和個(gè)人密碼修改，則運(yùn)行了登陸和物資入庫模 塊，物資出庫模塊，個(gè)人密碼修改模塊。 Label4Caption = cash。 pQuery3Close()。 Abort()。 String quantity = FloatToStr(q1 + q2)。 pQuery6Connection=DataModule1ADOConnection1。 //pQuery4Open()。最后實(shí)現(xiàn)的界面只有幾個(gè)主要的部門功能，由于本次實(shí)習(xí)的時(shí)間有限，所以還有很多問題 沒有解決，希望在今后的學(xué)習(xí)中找到答案。 String f = FloatToStr(fee)。 pQuery5Last()。 pQuery3Open()。 //Table1Edit()。 float cash。 cash = StrToInt(pQuery3FieldByName(cash)AsString)。 （五）、外部接口 用戶界面： （六）、運(yùn)行模塊的組合 對不同的用戶有不同的視圖，而且不同的用戶可以選擇的功能也很多，則對不同的用戶只選取代表性的模塊組合作為講解。 可以對倉庫大部分相關(guān)數(shù)據(jù)進(jìn)行處理，并對倉庫管理需要實(shí)現(xiàn)的所有基本功能進(jìn)行實(shí)現(xiàn)。 本次實(shí)習(xí)模擬的企業(yè)主要有營銷部門、運(yùn)營部門、物流部門和財(cái)務(wù)部門的制造業(yè)企業(yè)，該企業(yè)目 前業(yè)務(wù)處理模式為全手工處理，信息收集、加工等處理得都比較緩慢，不 利于企業(yè)的市場競爭， 而且手工式的處理使得 從編制原始憑 證、記帳憑證到登帳、結(jié)帳、編制會計(jì)報(bào)表，要經(jīng)過很多人的手工才能完成，增加了數(shù)據(jù)處理差錯(cuò)的可能性 。 （ 三 ） 、 業(yè)務(wù)數(shù)據(jù) 采購 部門主要使用到的數(shù)據(jù)有生產(chǎn)計(jì)劃量、實(shí)際采購量、原材料種類和庫存量等。 下面不同角色的視圖對系統(tǒng)要實(shí)現(xiàn)的功能進(jìn)行說明。 //在窗口創(chuàng)建時(shí)顯示剩余先盡量 pQuery3DatabaseName = dBase1。 TQuery* pQuery3 = new TQuery(NULL)。 String data2=Table1FieldByName(RawID)AsString。 } //更新數(shù)量 TADOQuery * pQuery3= new TADOQuery(NULL)。 pQuery5Connection=DataModule1ADOConnection1。 String c = FloatToStr(cash)。 //增加一條記錄 } // 五、結(jié)論 通過對該制造業(yè)企業(yè)的需求分析，可用發(fā)現(xiàn)該企業(yè)的手工式處理存在著很多的弊端，通過系統(tǒng)性的優(yōu)化，各部門的業(yè)務(wù)流程變得很清晰，將信息化管理引入該企業(yè)，可以使可用信息的收集、加工等處理得都比較快速、高效，利于企業(yè)的市場競爭 ， 減少 了數(shù)據(jù)處理差錯(cuò)的可能性 。 delete pQuery8。 float fee = pQuery6FieldByName(fee)AsFloat + cash。 pQuery4SQLAdd(update Raw set Quantity = + quantity + where RawID = + data2)。 pQueryOpen()。 Abort()。 pQuerySQLAdd(update PurchasePlan set Finished = 1)。 }else //如果已完成，則 提示是否確認(rèn)刪除 { int button。 8. 出庫物資信息的查詢與修改。 二、 采購部門 需求分析 （一）、采購部門工作職責(zé) 采購計(jì)劃的編制 負(fù)責(zé)根據(jù)生產(chǎn)、總務(wù)、設(shè)備及檢驗(yàn)等各部門物品需求計(jì)劃，編制與之相配套的采購計(jì)劃，并組織具體的實(shí)施，保證經(jīng)營過程中的物資供應(yīng)。本實(shí)習(xí)采用企業(yè)沙盤模擬的方式，了解企業(yè)業(yè)務(wù)需求，從而得出系統(tǒng)需求，采用面向?qū)ο蠓椒ㄟM(jìn)行系統(tǒng)分析與設(shè)計(jì)，并給出系統(tǒng)實(shí)現(xiàn)。 5. 入庫物資信息的輸入。 （七）、類圖 采購子系統(tǒng)的類圖如下： S u p p ly G U IP r o d u c t S t o c k+P r od u c t I D : in t+Q u a n t it y : in t+q u e r y ( P r od u c t I D : in t = 0)+a d d ( P r od u c t I D : in t , Q u a n t it y : in t )+s u b ( P r od u c t I D : in t , Q u a n t it y : in t )+g e t Q u a n t it y ( R a w I D : in t ) : in t+g e t C os t ( ) : d ou b leRa w S t o c k+R a w I D : in t+Q u a n t it y : in t+C os t : d ou b le+q u e r y ( R a w I D : in t )+a d d