【正文】 ，并取消點(diǎn)菜封倉(cāng)相關(guān)欄目。? 軟件環(huán)境：Windows2022 Server，Powbuilder7，Sybase ，ER 津菱系統(tǒng)總體設(shè)計(jì)津菱物流管理系統(tǒng)的是專門針對(duì)公司內(nèi)部資源進(jìn)行管理，業(yè)務(wù)邏輯比較復(fù)雜，并且局限在公司局域網(wǎng)內(nèi)部使用，所以此管理系統(tǒng)在總體結(jié)構(gòu)設(shè)計(jì)上采取C/S 的模式即能比較好的滿足客戶需求，采用此架構(gòu)模式能充分發(fā)揮客戶端 PC的處理能力，很多工作可以在客戶端處理后再提交給服務(wù)器，減輕了服務(wù)器的負(fù)擔(dān)，因而客戶端響應(yīng)速度快。其體系架構(gòu)如圖 31 所示：9 / 41Redhat 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)單，快捷。DataWindow 是一種為正在被觀察的數(shù)據(jù)保留數(shù)據(jù)信息的特有對(duì)象，因此，它為生成一個(gè)帶有高質(zhì)量的數(shù)據(jù)庫(kù)事務(wù)應(yīng)用程序提供了強(qiáng)大的處理工具。數(shù)據(jù)窗口需要數(shù)據(jù)庫(kù)和其他非數(shù)據(jù)庫(kù)的數(shù)據(jù)資源來(lái)組裝自己，它按照定義時(shí)制定的表現(xiàn)風(fēng)格顯示。數(shù)據(jù)窗口不但自身顯示數(shù)據(jù)還可以作為生成所有報(bào)表的數(shù)據(jù)源。除了數(shù)據(jù)10 / 41庫(kù)之外，數(shù)據(jù)窗口還可以通過(guò) ODBC，DDE（動(dòng)態(tài)數(shù)據(jù)交換） ，OLE（對(duì)象嵌入與連接）等方法訪問(wèn)文件中的數(shù)據(jù)。它包括數(shù)據(jù)窗口對(duì)象和數(shù)據(jù)窗口控件兩個(gè)方面。在實(shí)際應(yīng)用中，數(shù)據(jù)窗口對(duì)象通過(guò)數(shù)據(jù)窗口控件被放置在窗口中。數(shù)據(jù)窗口控件擁有自己獨(dú)立的屬性，函數(shù)和事件，擁有讀取和修改數(shù)據(jù)窗口對(duì)象屬性的函數(shù)（Describe 和 Modify） 。數(shù)據(jù)窗口對(duì)象創(chuàng)建以后，被定義為獨(dú)立對(duì)象，而不必將它們限定到某個(gè)特殊窗口，甚至不必將它們限定到某個(gè)應(yīng)用程序中。2．?dāng)?shù)據(jù)窗口控件數(shù)據(jù)窗口對(duì)象是通過(guò)一個(gè)數(shù)據(jù)窗口控件來(lái)引用的，通過(guò)數(shù)據(jù)窗口控件將數(shù)據(jù)窗口對(duì)象放置到窗口中，并通過(guò)數(shù)據(jù)窗口控件實(shí)現(xiàn)對(duì)數(shù)據(jù)窗口對(duì)象的操縱。1) 將數(shù)據(jù)窗口控件放置到窗口上，設(shè)定其位置和大小。3) 編寫腳本代碼，處理數(shù)據(jù)窗口控件和操縱數(shù)據(jù)窗口對(duì)象。當(dāng)創(chuàng)建存儲(chǔ)過(guò)程時(shí)，系統(tǒng)會(huì)對(duì)其進(jìn)行編譯，并將執(zhí)行代碼存儲(chǔ)到數(shù)據(jù)庫(kù)中。例如，11 / 41你可以將執(zhí)行過(guò)程（更新表）的權(quán)限授予其它用戶，但不授予它們直接訪問(wèn)該表的權(quán)限。當(dāng)調(diào)用存儲(chǔ)過(guò)程時(shí)，數(shù)據(jù)庫(kù)會(huì)直接運(yùn)行該存儲(chǔ)過(guò)程，無(wú)需進(jìn)行編譯。3) 內(nèi)存分配 存儲(chǔ)過(guò)程充分利用了 Sybase 共享內(nèi)存的能力。 面向?qū)ο蟮能浖O(shè)計(jì)由于 PowerBuilder 是完全支持面向?qū)ο蟮拈_(kāi)發(fā)工具，所以此系統(tǒng)的開(kāi)發(fā)運(yùn)用了大量的面向?qū)ο蟮乃枷搿?PowerBuilder 窗口設(shè)計(jì) 過(guò)保質(zhì)期自動(dòng)封倉(cāng)窗口設(shè)計(jì)此窗口可以對(duì)預(yù)警天數(shù)進(jìn)行設(shè)定（默認(rèn)值是 14 天） ，設(shè)定完畢后可以對(duì)選定倉(cāng)庫(kù)編號(hào)和倉(cāng)位編號(hào)進(jìn)行查詢未被封倉(cāng)的商品。在數(shù)據(jù)窗口中可以對(duì)查詢所得的商品進(jìn)行判斷，通過(guò) checkbox 決定是否將此商品自動(dòng)封倉(cāng)（默認(rèn)值為選中） ，點(diǎn)擊封倉(cāng)按鈕則可將約束條件下的商品進(jìn)行批處理封倉(cāng)。按住Ctrl 和 Shift 鍵可對(duì)此數(shù)據(jù)窗口中的記錄進(jìn)行單選或者多選，點(diǎn)擊解封按鈕可以將選中商品解封。2．在“配送中心封倉(cāng)商品查詢”窗口 w_stkloc_close_query 中去掉“點(diǎn)菜封倉(cāng)”復(fù)選框：主要對(duì)其數(shù)據(jù)窗口 d_stkloc_close_query 進(jìn)行修改，去掉“點(diǎn)菜封倉(cāng)”一欄。表 Tbd_StkLoc 包含的各個(gè)字段：? 表示商品所屬標(biāo)識(shí)的字段：DeptId （配送中心部門標(biāo)識(shí)） ，StkLocId（配送中心14 / 41庫(kù)存標(biāo)識(shí)） ，StkRegId（配送中心進(jìn)貨登記標(biāo)識(shí)） ，StorageId（配送中心倉(cāng)庫(kù)標(biāo)識(shí)） ，StkCellId（配送中心倉(cāng)位標(biāo)識(shí)） ，ProvId（供應(yīng)商標(biāo)識(shí)） ，ArtiId（基商品標(biāo)識(shí)） ，ImpArtiId（進(jìn)貨類商品標(biāo)識(shí)）? 表示商品基本信息的字段：ArtiClassCode（商品分類碼） ，ImpInclQty（進(jìn)貨包裝基商品含量） ，ImpUnit（進(jìn)貨包裝計(jì)量單位） ，DistInclQty（配送包裝基商品含量） ，DistUnit（配送包裝計(jì)量單位）? 表示現(xiàn)存該商品信息的字段：StkQty（配送中心庫(kù)存單品數(shù)量） ，TolQty（配送中心庫(kù)存單品可配送數(shù)量） ，TaxPrice（庫(kù)存商品含稅進(jìn)價(jià)） ，UnTaxPrice （庫(kù)存商品無(wú)稅進(jìn)價(jià)） ，ITaxRate（商品進(jìn)項(xiàng)稅率） ，ImpDate（配送中心入庫(kù)日期） ，ProcDate（配送中心商品生產(chǎn)日期） ，ValidDate （配送中心商品有效日期 ） ，BatchCode（配送中心商品批號(hào)） ，GiftTypeId（贈(zèng)品類型標(biāo)識(shí)）? 表示庫(kù)內(nèi)該商品狀態(tài)的字段：AutoCloseMark （自動(dòng)封倉(cāng)允許標(biāo)志） ，CloseDate（封倉(cāng)日期） ，EmptyDate （倉(cāng)卡結(jié)零日期） ，StkStatus（配送中心庫(kù)存狀態(tài)） ，Note（ 配送中心庫(kù)存說(shuō)明 ） ，OptrId （操作員標(biāo)識(shí)）此表中的 StkStatus 為商品的庫(kù)存狀態(tài)值，其具體含義如下：0正常（可配送）1正在配送（不可出庫(kù)）2手工點(diǎn)菜封倉(cāng)（可配送）4手工配送封倉(cāng)（不可點(diǎn)菜，不可配送）8到有效期自動(dòng)封倉(cāng)（不可點(diǎn)菜，不可配送）16配送中心內(nèi)部返品封倉(cāng)（不可點(diǎn)菜，不可配送）32配送返品封倉(cāng)（不可點(diǎn)菜，不可配送）64保留庫(kù)存封倉(cāng)（不可點(diǎn)菜，不可配送）128退貨封倉(cāng)（不可點(diǎn)菜，不可配送）256與供應(yīng)商調(diào)換封倉(cāng)（不可點(diǎn)菜，不可配送）512配送中心內(nèi)部移庫(kù)過(guò)程封倉(cāng)（中間狀態(tài)）注: 由于現(xiàn)有需求中對(duì)于點(diǎn)菜封倉(cāng)不做要求，所以在用戶操作界面上將與點(diǎn)菜封倉(cāng)有關(guān)的操作取消，但是考慮到由于公司以后業(yè)務(wù)的發(fā)展或者別的需求，點(diǎn)菜封倉(cāng)可能會(huì)在以后有所要求，所以在系統(tǒng)內(nèi)部實(shí)現(xiàn)中保留與點(diǎn)菜封倉(cāng)有關(guān)的15 / 41字段及屬性，以留作做將來(lái)功能擴(kuò)展之用。2．?dāng)?shù)據(jù)窗口的構(gòu)建編寫存儲(chǔ)過(guò)程 Spq_Stk_CloseAlarm，根據(jù)存儲(chǔ)過(guò)程的設(shè)計(jì)確定傳遞參數(shù)：m_DeptId int, /*配送中心部門標(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。%39。%39。事件在調(diào)用存儲(chǔ)過(guò)程完畢之后，再次調(diào)用查詢函數(shù)，刷新數(shù)據(jù)窗口： ( 39。 )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。 , 39。 , Question! , yesnocancel! , 3 )5．其他功能此窗口中的其他功能按鈕均從系統(tǒng)中的父類繼承，分別實(shí)現(xiàn)了復(fù)位，保存，另存，預(yù)覽，打印，關(guān)閉等功能。 過(guò)保質(zhì)期自動(dòng)封倉(cāng)解封窗口主要實(shí)現(xiàn)1．創(chuàng)建窗口主體 w_stkloc_autoclose_unclose在 PB 中創(chuàng)建 ObjectWindow w_stkloc_autoclose_unclose,按照設(shè)計(jì)，增各個(gè)控件：dw_storage(dw_u_storage_query), st_1(statictext), sle_stkcell(sy_u_sle), dw_list(sy_u_dw), st_2(statictext), st_3(statictext), em_1(editmask), em_2(editmask), st_4(statictext), st_5(statictext)。? 檢索參數(shù)：li_deptid number 配送中心部門標(biāo)識(shí)li_steid number 配送中心倉(cāng)庫(kù)標(biāo)識(shí)ls_stkcellno string 配送中心倉(cāng)位編號(hào)ld_datestart Datetime 解封起始日期ld_dateend Datetime 解封終止日期? 確定檢索條件（即已被封倉(cāng)，且有效期在規(guī)定的時(shí)間段內(nèi)的商品）：Where ( amp。 yyyy/mm/dd 39。 yyyy/mm/dd 39。1900/01/0139。 提示信息 39。 起始日期不合法 39。 提示信息 39。 終止日期不可以比起始日期小 39。 2050/12/31 39。 1900/01/01 39。 提示信息 39。 終止日期不合法 39。 39。 39。 % 39。 % 39。? 與存儲(chǔ)過(guò)程 Spu_Stkloc_unclose 的參數(shù)傳遞：DECLARE fengcang PROCEDURE FOR dbo . Spu_stkloc_unclosem_DeptId = :li_deptid, /*配送中心部門標(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。? 循環(huán)調(diào)用存儲(chǔ)過(guò)程：for ll_row = 1 to ll_maxrow if dw_list . isselected ( ll_row ) then/*調(diào)用存儲(chǔ)過(guò)程具體實(shí)現(xiàn)代碼*/end ifnext? 解封結(jié)果處理：if ll_rowpoint = ii_rowall then /*解封成功*/messagebox ( 39。 , 39。 )st_3 . visible = falselm_menu . of_disable ( lm_menu . m_edit . m_item_1 )ib_firstquery = falsethis . triggerevent ( 39。 )return 1elseif ll_rowpoint = 1 then /*解封失敗*/messagebox ( 39。 , 39。 ) elseif ll_rowpoint 1 then21 / 41messagebox ( 39。 , 39。 )ib_firstquery = falsethis . triggerevent ( 39。 )end ifst_3 . visible = falselm_menu . of_disable ( lm_menu . m_edit . m_item_1 )return 1end if5．其他功能此窗口中的其他功能按鈕亦從系統(tǒng)中的父類繼承，分別實(shí)現(xiàn)了復(fù)位，保存，另存，預(yù)覽，打印，關(guān)閉等功能。 手工封倉(cāng)解封及查詢主要實(shí)現(xiàn)1．在手工封倉(cāng)中去掉點(diǎn)菜封倉(cāng)的下拉菜單項(xiàng)：打開(kāi)數(shù)據(jù)窗口控件 d_stkloc_list,修改其中下拉列表控件tbd_stkloc_stkstatus 的 edit 屬性中的 code table 內(nèi)容，去掉“點(diǎn)菜封倉(cāng)” 。 存儲(chǔ)過(guò)程實(shí)現(xiàn) Spq_Stk_CloseAlarm此存儲(chǔ)過(guò)程被窗口 w_stkloc_autoclose_alarm 中的數(shù)據(jù)窗口對(duì)象調(diào)用，實(shí)現(xiàn)了對(duì)有效期在預(yù)警日期之前的存儲(chǔ)倉(cāng)位商品進(jìn)行查詢的功能。將結(jié)果放入臨時(shí)表22 / 41＃StkCell 中：select m_StorageId = isnull ( m_StorageId , 0 ) , m_ValidDays = isnull ( m_ValidDays , dateadd ( dd , 1 ,getdate ( ) ) ) if m_StkCellNo is NULL select m_StkCellNo