【正文】 衷心感謝所有關(guān)心我的人！ 編號(hào)：時(shí)間：2021年x月x日書山有路勤為徑，學(xué)海無涯苦作舟頁碼：第39頁 共44頁參考文獻(xiàn)[1] CLM：[2] 崔杜武、姚全珠、范艷華、黑新紅：《PowerBuilder 從基礎(chǔ)到應(yīng)用》，人民郵電出版社，.[3] 王鵬：《》，北京希望電子出版社，2000年[4] 劉增進(jìn)：《PowerBuilder 數(shù)據(jù)窗口技術(shù)詳解》，北京電子工業(yè)出版社，2000年[5] SYBASE公司：SYBASE TransactSQL User’s Guide，2001年第 39 頁 共 44 頁。感謝軟件學(xué)院對(duì)我們做畢業(yè)設(shè)計(jì)的大力支持，為我們做畢業(yè)設(shè)計(jì)提供了很優(yōu)越的實(shí)驗(yàn)環(huán)境，為我們配備了性能優(yōu)越的計(jì)算機(jī)，保證我們的畢設(shè)順利進(jìn)行。感謝和我同組的劉劉、韓曉瑋、樓波和盧子怡同學(xué)，沒有他們?cè)陧?xiàng)目中的努力與協(xié)調(diào)配合，就不可能有項(xiàng)目的順利完成。他對(duì)于項(xiàng)目一絲不茍的治學(xué)態(tài)度以及對(duì)于項(xiàng)目人員的協(xié)調(diào)與統(tǒng)籌規(guī)劃的能力，讓我深刻體會(huì)到了作為項(xiàng)目主持人所應(yīng)具備素質(zhì)。由于項(xiàng)目是在物流系統(tǒng)的基礎(chǔ)上進(jìn)行的二次開發(fā)，數(shù)據(jù)庫的許多表的設(shè)計(jì)對(duì)于財(cái)務(wù)來講，都很不適用，需要更多的優(yōu)化和重新設(shè)計(jì)。因此，行之有效的項(xiàng)目管理是項(xiàng)目正常進(jìn)行的保障。在整個(gè)開發(fā)過程中，也是我認(rèn)識(shí)到了軟件過程管理對(duì)于開發(fā)效率的決定作用。這也許就是項(xiàng)目真正教給我的生活態(tài)度吧。整個(gè)項(xiàng)目最讓我感觸的是對(duì)需求分析地重新認(rèn)識(shí)，以前做過的程序也沒太多的需求分析要做，現(xiàn)在真正接觸到了這么一個(gè)龐大的系統(tǒng)，才明白如果沒一個(gè)清晰明確的需求分析是絕對(duì)不可能完成的。 第一次接觸這么大型的軟件，才覺得以前做過的東西真的只能算是玩具了。雖然數(shù)據(jù)庫象SQL SERVER2000、ORACLE也接觸過一段時(shí)間，但真正的對(duì)數(shù)據(jù)庫的感悟卻是來自于pb的datawindow，項(xiàng)目剛開始時(shí)，對(duì)于datawindow的認(rèn)識(shí)僅僅限于一個(gè)很窄的層面上。從開始的一竅不通，到慢慢地熟悉掌握，以及后來的熟練運(yùn)用。第五章 項(xiàng)目總結(jié)及展望 開發(fā)經(jīng)驗(yàn)總結(jié) 畢業(yè)設(shè)計(jì)即將結(jié)束了，整個(gè)畢業(yè)設(shè)計(jì)雖然只有短短的幾個(gè)月，但它卻不僅在學(xué)業(yè)上給了我很大的幫助，而且更多是教給了我面對(duì)問題與困難的態(tài)度。由于物流系統(tǒng)在盤點(diǎn)功能模塊中已經(jīng)實(shí)現(xiàn)了將有損益的商品信息寫入數(shù)據(jù)庫的盤點(diǎn)損益表中，因此這部分財(cái)務(wù)處理較為簡(jiǎn)單些，只需將盤點(diǎn)損益表中的相關(guān)信息導(dǎo)出，產(chǎn)給k3生成會(huì)計(jì)憑證即可。因此需要記錄原始倉位的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ù)憑證。216。其中，ls_PathFile為操作人員選定的生成dbf文件的路徑。IV. 導(dǎo)出事件(sy_export)的實(shí)現(xiàn)首先按照金蝶k3財(cái)務(wù)數(shù)據(jù)導(dǎo)入所需的dbf文件的格式建一個(gè)datawindow object為d_k3Account，并把其裝載在dw_2中。進(jìn)行實(shí)價(jià)入庫的操作，即在存儲(chǔ)過程中更新原始記錄、添加一條紅沖記錄和一條實(shí)價(jià)記錄。,string()) return 1 end if fetch shijiahongchong into :li_err。 if 0 then messagebox(39。在of_SwitchState函數(shù)中，對(duì)于原不可編輯的untaxprice一列進(jìn)行了重新設(shè)置： = 0 = 0 III. 入庫事件(sy_save