【正文】 力與協(xié)調(diào)配合，就不可能有項(xiàng)目的順利完成。在整個(gè)開發(fā)過程中，也是我認(rèn)識(shí)到了軟件過程管理對(duì)于開發(fā)效率的決定作用。雖然數(shù)據(jù)庫象SQL SERVER2000、ORACLE也接觸過一段時(shí)間，但真正的對(duì)數(shù)據(jù)庫的感悟卻是來自于pb的datawindow，項(xiàng)目剛開始時(shí)，對(duì)于datawindow的認(rèn)識(shí)僅僅限于一個(gè)很窄的層面上。因此需要記錄原始倉位的StkRegId的值，以便在Tbd_StkReg表中，插入實(shí)價(jià)記錄后，把Tbd_StkLoc的相應(yīng)記錄的StkRegId的值也更新為實(shí)價(jià)記錄所對(duì)應(yīng)的值*/ exec RetVal = Spq_sys_MaxId 182, 0, SysId output if RetVal != 1 begin rollback transaction stk_tran_realinmit transaction raiserror 90006 沒有能夠計(jì)算出一個(gè)進(jìn)貨編碼(插入負(fù)項(xiàng))! select m_ReclaimId = 60return 1end select m_stkRegId = SysId /*調(diào)用物流系統(tǒng)的存儲(chǔ)過程，統(tǒng)一地為StkRegId分配值*/insert Tbd_StkReg (DeptId,StkRegId,ArtiClassCode,ArtiId,ImpArtiInfoId,OrdId,ProvSupplyNo,ProvId,ImpArtiId,ImpInclQty,ImpUnit,DistInclQty,DistUnit,TaxPrice,UnTaxPrice,RetailPrice,CostPrice,ITaxRate,ArtiQty,ValuQty,CostAmt,ImpDate,StkDate,BussEventId,BussStatus,OptrId,ImpId,CheckId,Note,GiftTypeId,RateBuyQty,RateGiftQty,SampQty,FailQty,ChkRepCode,HasBrand,HasDoc,HasAppear,StkLocId,TranStatus,OrigStkRegId)Select ( DeptId,m_stkRegId,ArtiClassCode,ArtiId,ImpArtiInfoId,OrdId,ProvSupplyNo,ProvId,ImpArtiId,ImpInclQty,ImpUnit,DistInclQty,DistUnit,TaxPrice,UnTaxPrice,RetailPrice,CostPrice,ITaxRate,ArtiQty,ValuQty,CostAmt,ImpDate,StkDate,15,BussStatus,OptrId,ImpId,CheckId,實(shí)價(jià)入庫紅沖,GiftTypeId,RateBuyQty,RateGiftQty,SampQty,FailQty,ChkRepCode,HasBrand,HasDoc,HasAppear,StkLocId,TranStatus,OrigStkRegId)from Tbd_StkRegwhere StkRegId = m_stkRegId_Oldif error0begin rollback transaction stk_tran_realin mit transaction raiserror 90001 寫入估價(jià)負(fù)項(xiàng)失敗 select m_ReclaimId = 20 return 1end/*在Tbd_StkReg表中插入一條實(shí)價(jià)入庫紅沖的記錄*/ exec RetVal = Spq_sys_MaxId 182, 0, SysId output if RetVal != 1 begin rollback transaction stk_tran_realinmit transaction raiserror 90006 沒有能夠計(jì)算出一個(gè)進(jìn)貨編碼(插入實(shí)價(jià)項(xiàng))! select m_ReclaimId = 60return 1end select m_stkRegId = SysId //調(diào)用物流系統(tǒng)的存儲(chǔ)過程，統(tǒng)一地為StkRegId分配值insert Tbd_StkReg (DeptId,StkRegId,ArtiClassCode,ArtiId,ImpArtiInfoId,OrdId,ProvSupplyNo,ProvId,ImpArtiId,ImpInclQty,ImpUnit,DistInclQty,DistUnit,TaxPrice,UnTaxPrice,RetailPrice,CostPrice,ITaxRate,ArtiQty,ValuQty,CostAmt,ImpDate,StkDate,BussEventId,BussStatus,OptrId,ImpId,CheckId,Note,GiftTypeId,RateBuyQty,RateGiftQty,SampQty,FailQty,ChkRepCode,HasBrand,HasDoc,HasAppear,StkLocId,TranStatus,OrigStkRegId)select (DeptId,m_stkRegId,ArtiClassCode,ArtiId,ImpArtiInfoId,OrdId,ProvSupplyNo,ProvId,ImpArtiId,ImpInclQty,ImpUnit,DistInclQty,DistUnit,m_UnTaxPrice*(m_TaxRate*+1),m_UnTaxPrice,m_UnTaxPrice*(m_TaxRate*+1),CostPrice,ITaxRate,ArtiQty,ValuQty,m_UnTaxPrice*ValuQty,ImpDate,StkDate,10,BussStatus,OptrId,ImpId,CheckId,訂單進(jìn)貨登記,GiftTypeId,RateBuyQty,RateGiftQty,SampQty,FailQty,ChkRepCode,HasBrand,HasDoc,HasAppear,StkLocId,TranStatus,OrigStkRegId)from Tbd_StkRegwhere StkRegId = m_stkRegId_Oldif rowcount1begin rollback transaction stk_tran_realin mit transaction raiserror 90002 寫入實(shí)價(jià)時(shí)失敗(insert Tbd_StkReg) select m_ReclaimId = 30 return 1end/*在Tbd_StkReg表中插入一條實(shí)價(jià)入庫記錄*/ update Tbd_StkLocset (TaxPrice = m_UnTaxPrice*(m_TaxRate*+1), UnTaxPrice = m_UnTaxPrice, ITaxRate = m_TaxRate, StkRegId = m_stkRegId)where StkRegId = m_stkRegId_Oldif error0begin rollback transaction stk_tran_realinmit transaction raiserror 90003 進(jìn)貨登記數(shù)據(jù)有誤(update Tbd_StkLoc) select m_ReclaimId = 40 return 1end/*更新Tbd_StkLoc中的與Tbd_StkReg中的原始記錄通過外鍵StkRegId相聯(lián)系的記錄的原始進(jìn)價(jià)更新為現(xiàn)在的實(shí)際價(jià)格，并把給記錄原來與Tbd_StkReg中的原始記錄的聯(lián)接，轉(zhuǎn)變?yōu)榕cTbd_StkReg中實(shí)價(jià)入庫記錄的聯(lián)接*/ update Tbd_StkReg set BussEventId = 14,Note = 原始估價(jià)入庫 where StkRegId = m_stkRegId_Oldif rowcount 1begin rollback transaction stk_tran_realin mit transactionraiserror 90000 進(jìn)貨登記數(shù)據(jù)有誤(update Tbd_StkReg) select m_ReclaimId = 10 return 1end/*更新Tbd_StkReg表的原始記錄為原始估價(jià)入庫，并設(shè)定其BussEventId = 14,表示這條記錄為原始價(jià)格記錄*/mit transactionselect m_ReclaimId = 0return 0 盤點(diǎn)部分財(cái)務(wù)模塊的設(shè)計(jì)與實(shí)現(xiàn) 盤點(diǎn)部分需求的分析津菱公司對(duì)于倉庫將定期進(jìn)行盤點(diǎn)，盤點(diǎn)產(chǎn)生損益也將生成財(cái)務(wù)憑證。進(jìn)行實(shí)價(jià)入庫的操作，即在存儲(chǔ)過程中更新原始記錄、添加一條紅沖記錄和一條實(shí)價(jià)記錄。查詢結(jié)束后，即轉(zhuǎn)變狀態(tài)為of_SwitchState(Allow_Modify_Price)。其中ddlb_owner、ddlb_supplyno用于選擇查詢的條件；dw_list用于向操作人員顯示在上述查詢條件下，所retrieve的記錄；dw_list2用于操作人員輸入實(shí)際價(jià)格。open cur_ImpDate。216。 系統(tǒng)的狀態(tài)圖如圖42：圖42 狀態(tài)圖頁面初始調(diào)出來時(shí)，處于Initial狀態(tài)，然后由狀態(tài)決定變量ll_AllStautus0、 ll_AllStautusll_AllStautus10分別決定此時(shí)系統(tǒng)將進(jìn)入狀態(tài)Editing_ArtiInfo、Editing_CellInfo、Import_ConFirmed。要實(shí)現(xiàn)該功能，需要對(duì)數(shù)據(jù)庫的相應(yīng)表作如下處理：首先將數(shù)據(jù)庫中相應(yīng)表的原始記錄的狀態(tài)標(biāo)志作更改，并在相應(yīng)表中插入一條紅沖記錄，即將原始估價(jià)的數(shù)量和價(jià)格都紅沖掉，最后還要在表中插入一項(xiàng)實(shí)價(jià)記錄。 做出上述分析和決定后，將面臨了兩個(gè)必須解決的問題。由于在津菱的財(cái)務(wù)業(yè)務(wù)中，存在著送貨單與廠商銷售發(fā)票一一對(duì)應(yīng)的關(guān)系，并考慮為了以后查詢的方便，需要為系統(tǒng)設(shè)定一個(gè)唯一標(biāo)識(shí)的字段，在經(jīng)過對(duì)物流系統(tǒng)仔細(xì)分析后，選定系統(tǒng)暫時(shí)未用的送貨單號(hào)作為該唯一標(biāo)志字段。津菱公司根據(jù)公司的規(guī)定進(jìn)行定期或不定期的商品盤點(diǎn)工作，按照需要也可以分成全盤和部分盤。3) 估價(jià)出現(xiàn)在以下三種情況:商品基本信息導(dǎo)入時(shí)、下定單時(shí)和商品進(jìn)貨時(shí)。一般情況下津菱公司首先向供應(yīng)商下定單，由于一張定單上可定品種數(shù)量有限制，最多30（6）種商品，所以如果所訂商品比較多時(shí)，應(yīng)該下幾張定單，每張定單上有一個(gè)不同的定單號(hào)碼。216。216。但是每當(dāng)有實(shí)物進(jìn)、出，并開出發(fā)票時(shí)，都要通告K/3生成會(huì)計(jì)憑證信息，此時(shí)由于K/3不支持?jǐn)?shù)據(jù)導(dǎo)入，需要把物流軟件已經(jīng)錄入過的商品信息再次手工錄入一遍，造成了重復(fù)勞動(dòng)，也容易產(chǎn)生錯(cuò)誤。 物流軟件系統(tǒng)（即本系統(tǒng)）的功能概述物流軟件系統(tǒng)具有物流方面進(jìn)、銷、存的功能。 會(huì)計(jì)分錄:就是在記賬憑證中指明某項(xiàng)經(jīng)濟(jì)業(yè)務(wù)應(yīng)借、應(yīng)貸的賬戶名稱以及應(yīng)記入賬戶的金額，即一筆業(yè)務(wù)的記錄。216。第三章 財(cái)務(wù)模塊的需求分析第三章 財(cái)務(wù)模塊的需求分析 擴(kuò)充財(cái)務(wù)功能的現(xiàn)實(shí)經(jīng)濟(jì)性的分析津菱物流系統(tǒng)基本實(shí)現(xiàn)了物流部分的進(jìn)貨、銷售以及庫存管理等的功能。當(dāng)然用戶需要擁有執(zhí)行該存儲(chǔ)過程的權(quán)力。這種特性能降低網(wǎng)絡(luò)的流量。Datawindow函數(shù)需要手工調(diào)用，包括有關(guān)于后臺(tái)數(shù)據(jù)處理的Datawindow控件函數(shù)，與SQL語言類似，是SQL語言在Datawindow中的表示；有前臺(tái)數(shù)據(jù)處理的Datawindow控件函數(shù)如Getitem,Setitem等；還有前后臺(tái)協(xié)調(diào)的函數(shù)Retrieve等。因此，它是一個(gè)高質(zhì)量的數(shù)據(jù)庫事務(wù)應(yīng)用程序開發(fā)的強(qiáng)大的處理工具。 軟件環(huán)境：Redhat Linux , Sybase 客戶端環(huán)境