【正文】 = 39。 ) ib_firstquery = false this . triggerevent ( 39。 ) return 1else if ll_rowpoint = 1 then /*解封失敗*/ messagebox ( 39。l 與存儲(chǔ)過(guò)程Spu_Stkloc_unclose的參數(shù)傳遞：DECLARE fengcang PROCEDURE FOR dbo . Spu_stkloc_unclosem_DeptId = :li_deptid, /*配送中心部門(mén)標(biāo)識(shí)*/m_StkLocId = :ll_stklocid, /*配送中心庫(kù)存標(biāo)識(shí)*/ m_StkStatus = :li_stkstatus, /*配送中心庫(kù)存狀態(tài)*/ m_Note = :ls_note, /*配送中心庫(kù)存說(shuō)明*/ m_OptrId = :li_optrid , /*操作員編號(hào)*/ m_error = :li_bak output。 39。 2050/12/31 39。 提示信息 39。l 檢索參數(shù)： li_deptid number 配送中心部門(mén)標(biāo)識(shí) li_storgeid number 配送中心倉(cāng)庫(kù)標(biāo)識(shí) ls_stkcellno string 配送中心倉(cāng)位編號(hào) ld_datestart Datetime 解封起始日期 ld_dateend Datetime 解封終止日期l 確定檢索條件（即已被封倉(cāng)，且有效期在規(guī)定的時(shí)間段內(nèi)的商品）：Where ( amp。 ) 4．關(guān)閉窗口事件（closequery）當(dāng)用戶改變了商品的自動(dòng)封倉(cāng)狀態(tài)后如果沒(méi)有保存就關(guān)閉窗口，則系統(tǒng)回提示用戶進(jìn)行保存：if ( 0 , primary! ) 0 thenll_result = messagebox ( 39。 2．?dāng)?shù)據(jù)窗口的構(gòu)建 編寫(xiě)存儲(chǔ)過(guò)程Spq_Stk_CloseAlarm，根據(jù)存儲(chǔ)過(guò)程的設(shè)計(jì)確定傳遞參數(shù)： m_DeptId int, /*配送中心部門(mén)標(biāo)識(shí)*/m_StorageId int, /*配送中心倉(cāng)庫(kù)標(biāo)識(shí)*/ m_StkCellNo varchar(20), /* 配送中心倉(cāng)位編碼 */ m_ValidDays datetime /* 預(yù)計(jì)封倉(cāng)日 */ 在實(shí)現(xiàn)查詢功能的事件sy_query中調(diào)用此數(shù)據(jù)窗口控件的retrieve函數(shù)，并確定定此四個(gè)參數(shù)后數(shù)據(jù)窗口即調(diào)用存儲(chǔ)過(guò)程進(jìn)行查詢，并將結(jié)果顯示在數(shù)據(jù)窗口控件dw_1。在數(shù)據(jù)窗口中可以對(duì)查詢所得的商品進(jìn)行判斷，通過(guò)checkbox決定是否將此商品自動(dòng)封倉(cāng)（默認(rèn)值為選中），點(diǎn)擊封倉(cāng)按鈕則可將約束條件下的商品進(jìn)行批處理封倉(cāng)。相對(duì)于SQL語(yǔ)句而言，其執(zhí)行速度更快。2) 將數(shù)據(jù)窗口控件連接到某個(gè)特定的數(shù)據(jù)窗口對(duì)象。數(shù)據(jù)窗口對(duì)象可以看成是封裝數(shù)據(jù)的容器，數(shù)據(jù)窗口控件可以看作是窗口和數(shù)據(jù)窗口之間的連接件。用戶定義了表現(xiàn)風(fēng)格后，可以對(duì)其進(jìn)行進(jìn)一步的修改，以增強(qiáng)數(shù)據(jù)窗口的功能。如圖23所示：圖23：封倉(cāng)與配送出庫(kù)狀態(tài)圖第三章 系統(tǒng)改進(jìn)設(shè)計(jì) 開(kāi)發(fā)環(huán)境描述 服務(wù)器端環(huán)境l 硬件環(huán)境：穩(wěn)定服務(wù)器l 軟件環(huán)境：Redhat Linux , Sybase 客戶端環(huán)境l 硬件環(huán)境：普通PC機(jī)l 軟件環(huán)境：Microsoft公司W(wǎng)indows操作系統(tǒng) 開(kāi)發(fā)環(huán)境l 硬件環(huán)境： Hz CPU，512M DDR內(nèi)存，17寸純平顯示器、顯存64M，80G硬盤(pán)。 封倉(cāng)部分需求分析總體描述：增加保質(zhì)期封倉(cāng)功能，并根據(jù)實(shí)際業(yè)務(wù)情況修改手工封倉(cāng)部分的功能，并保證封倉(cāng)部分與配送部分能夠兼容。另外，由于一些其他原因，可能有一些個(gè)別商品不能參加配送，因此需要對(duì)這些商品進(jìn)行單獨(dú)的封倉(cāng)操作。且此軟件對(duì)于公司簡(jiǎn)化工作流程，加快工作進(jìn)度，以適應(yīng)日益發(fā)展的業(yè)務(wù)以及企業(yè)信息化起到了非常積極的作用。所以，企業(yè)選擇物流IT系統(tǒng)，與其說(shuō)是一種信息技術(shù)選擇，不如說(shuō)是一種企業(yè)管理模式和市場(chǎng)競(jìng)爭(zhēng)戰(zhàn)略的選擇。什么是第三方物流呢？第三方物流是由物品供、需兩方以外的企業(yè)提供物流服務(wù)的業(yè)務(wù)模式，是在供應(yīng)鏈中，企業(yè)以合同的形式在一定期限內(nèi)提供用戶所需的全部或部分物流服務(wù)。主要是根據(jù)津菱物流公司的實(shí)際業(yè)務(wù)流程修改了原有的手動(dòng)封倉(cāng)解封功能，并在此基礎(chǔ)上增加了過(guò)保質(zhì)期自動(dòng)封倉(cāng)以及解封的功能。津菱物流公司就是一個(gè)以第三方物流為主，兼營(yíng)其他幾種物流方式的現(xiàn)代物流公司。所以，無(wú)論走哪條路，企業(yè)建立物流IT系統(tǒng)的前提都是要確定其物流運(yùn)作流程。如下圖14所示：倉(cāng)庫(kù)管理配送中心庫(kù)存維護(hù)配送中心商品封倉(cāng)配送中心移庫(kù)配送中心庫(kù)存盤(pán)點(diǎn)倉(cāng)庫(kù)損溢分揀倉(cāng)位優(yōu)化配送中心庫(kù)存查詢圖14：倉(cāng)庫(kù)內(nèi)管理模塊 36 Error! No text of specified style in document.第二章 系統(tǒng)功能及需求 封倉(cāng)部分功能概述封倉(cāng)是津菱物流管理系統(tǒng)庫(kù)內(nèi)管理中相當(dāng)重要的一部分。只能對(duì)單個(gè)商品進(jìn)行個(gè)別的封倉(cāng)。也可以對(duì)查詢出來(lái)的商品進(jìn)行選中單個(gè)或多個(gè)商品進(jìn)行解封。其體系架構(gòu)如圖31所示： Redhat Linux 服務(wù)器數(shù)據(jù)庫(kù)Windows操作系統(tǒng)客戶端發(fā)出SQL到服務(wù)器返回查詢結(jié)果到客戶端TCP/IP圖31:津菱物流管理系統(tǒng)體系結(jié)構(gòu) 封倉(cāng)部分主要技術(shù) PowerBuilder中的DataWindow技術(shù) 縱觀PowerBuilder技術(shù)，數(shù)據(jù)窗口（DataWindow）可是說(shuō)是其核心的核心，它使得數(shù)據(jù)庫(kù)的開(kāi)發(fā)和應(yīng)用變得更加簡(jiǎn)單，快捷。除了數(shù)據(jù)庫(kù)之外，數(shù)據(jù)窗口還可以通過(guò)ODBC，DDE（動(dòng)態(tài)數(shù)據(jù)交換），OLE（對(duì)象嵌入與連接）等方法訪問(wèn)文件中的數(shù)據(jù)。數(shù)據(jù)窗口對(duì)象創(chuàng)建以后，被定義為獨(dú)立對(duì)象，而不必將它們限定到某個(gè)特殊窗口，甚至不必將它們限定到某個(gè)應(yīng)用程序中。當(dāng)創(chuàng)建存儲(chǔ)過(guò)程時(shí)，系統(tǒng)會(huì)對(duì)其進(jìn)行編譯，并將執(zhí)行代碼存儲(chǔ)到數(shù)據(jù)庫(kù)中。在將存儲(chǔ)過(guò)程裝載到內(nèi)存中后，多個(gè)用戶可以同時(shí)調(diào)用該存儲(chǔ)過(guò)程，從而降低了應(yīng)用對(duì)Sybase的實(shí)際內(nèi)存需求。窗口對(duì)象：w_stkloc_autoclose_unclose數(shù)據(jù)窗口控件：dw_list數(shù)據(jù)窗口對(duì)象：d_stkloc_autoclose_unclose涉及存儲(chǔ)過(guò)程：Spu_stkloc_unclose涉及表：Tbb_StkLoc表32：解封窗口總體設(shè)計(jì)PB中的對(duì)象：含義類型w_stkloc_autoclose_unclose主窗口sy_w_sheetdw_storage 倉(cāng)庫(kù)信息下拉框dw_u_storage_queryst_1“倉(cāng)位編號(hào)”statictextsle_stkcell倉(cāng)位編號(hào)輸入框sy_u_sledw_list數(shù)據(jù)輸出窗口sy_u_dwst_2進(jìn)度條外框statictextst_3進(jìn)度條statictextem_1起始日期輸入窗口editmaskem_2終止日期輸入窗口editmaskst_4解封起始日期statictextst_5解封終止日期statictext 其他窗口的修改 1．在“配送中心手工封倉(cāng)”窗口w_stkloc_close中去掉“點(diǎn)菜封倉(cāng)”選項(xiàng)：主要對(duì)其數(shù)據(jù)窗口控件d_stkloc_list進(jìn)行修改，使其中的“點(diǎn)菜封倉(cāng)”選項(xiàng)為不可見(jiàn)，但是保留代碼，以留作以后的接口之用。 + trim ( ls_stkcellno ) + 39。數(shù)據(jù)已經(jīng)修改 ，是否保存？39。 )ld_em2 = date ( em_2 . text )ld_dateend = datetime ( ld_em2 )ls_dateend = string ( ld_dateend , 39。 ) em_1 . setfocus ( ) return 1end ifif ls_dateend ls_datestart then /*終止日期不得早于起始日期*/ messagebox ( 39。 then /*終止日期不得晚于2050年12月31日或者等于1900年1月1日*/ messagebox ( 39。 li_bak = ( ll_deptid , ll_storageid , ls_stkcellno , ld_datestart , ld_dateend )else li_bak = ( ll_deptid , ll_storageid , 39。 提示信息 39。 解封失敗! 39。并能對(duì)數(shù)據(jù)窗口中的選中記錄進(jìn)行到首，向前，向后，到尾操作。 % 39。過(guò)保自動(dòng)封倉(cāng)過(guò)程修改庫(kù)存狀態(tài)失敗.39。單元測(cè)試在開(kāi)發(fā)時(shí)完成，主要是對(duì)完成的代碼進(jìn)行功能性測(cè)試，在完成所有的開(kāi)發(fā)任務(wù)后，進(jìn)行集成測(cè)試，本文測(cè)試部分主要側(cè)重集成測(cè)試。自動(dòng)解封部分：此用庫(kù)內(nèi)已自動(dòng)封倉(cāng)的商品進(jìn)行查詢，然后對(duì)指定商品進(jìn)行解封。b．選中其中一條記錄，點(diǎn)擊“解封”，然后打開(kāi)“配送中心商品封倉(cāng)預(yù)警”窗口查詢，發(fā)現(xiàn)此商品均已解封。在導(dǎo)師的建議下，我對(duì)本項(xiàng)目組所使用的數(shù)據(jù)庫(kù)sytrade60復(fù)制，產(chǎn)生新的數(shù)據(jù)庫(kù)sytrade70，開(kāi)發(fā)的時(shí)候使用數(shù)據(jù)庫(kù)sytrade60，測(cè)試的時(shí)候使用復(fù)制的新數(shù)據(jù)庫(kù)sytrade70，保證了開(kāi)發(fā)和測(cè)試工作的順利進(jìn)行。2）原數(shù)據(jù)庫(kù)表結(jié)構(gòu)以及數(shù)據(jù)的導(dǎo)出在Sybase Central中將數(shù)據(jù)庫(kù)Sybase60中點(diǎn)中所有的表或者存儲(chǔ)過(guò)程，從右鍵選項(xiàng)中選擇Generate DDL,生成所有創(chuàng)建用戶表，系統(tǒng)表，代理表，存儲(chǔ)過(guò)程，視圖，用戶，組，用戶定義的數(shù)據(jù)類型，Java對(duì)象，缺省，規(guī)則，段，擴(kuò)展存儲(chǔ)過(guò)程的SQL語(yǔ)句。但是PowerDesigner會(huì)檢驗(yàn)數(shù)據(jù)庫(kù)的正確性，如果有錯(cuò)誤的表結(jié)構(gòu)，或者主外鍵關(guān)聯(lián)等，則不能進(jìn)行。但是事情往往是這樣，只有經(jīng)過(guò)了自己的努力學(xué)習(xí)才能把困難的事情變得簡(jiǎn)單，熟能生巧的故事對(duì)于我們軟件開(kāi)發(fā)者來(lái)說(shuō)其實(shí)是很有道理的。所以，我覺(jué)得可以在以后二次開(kāi)發(fā)的軟件項(xiàng)目中采用一套行之有效的軟件過(guò)程管理方法，包括對(duì)原系統(tǒng)的分析，新的需求的確定，以及開(kāi)發(fā)的各個(gè)細(xì)節(jié)方面，這對(duì)于提高軟件的開(kāi)發(fā)效率肯定是大有裨益的。 衷心感謝所有關(guān)心我的人！ 編號(hào)：時(shí)間：2021年x月x日書(shū)山有路勤為徑，學(xué)海無(wú)涯苦作舟頁(yè)碼：第37頁(yè) 共42頁(yè)參考文獻(xiàn)[1] 明德祥等：《》，國(guó)防科技大學(xué)出版社，2002年[2] 王鵬：《》，北京希望電子出版社，2000年[3] 劉增進(jìn)：《PowerBuilder 數(shù)據(jù)窗口技術(shù)詳解》，北京電子工業(yè)出版社，2000年[4] 徐武平：《PowerBuilder 7程序設(shè)計(jì)導(dǎo)學(xué)》，清華大學(xué)出版社，2002年[5] SYBASE公司：SYBASE TransactSQL User’s Guide，2001年[6] SYBASE公司：PowerBuilder Help，1999年第 37 頁(yè) 共 42 頁(yè)