唐 晨 趙 偉 吳 璟 封亞輝

（南京海關(guān)工業(yè)產(chǎn)品檢測中心 江蘇南京 210019）

1 引言

海關(guān)是進出口商品監(jiān)管機構(gòu)，為深入貫徹落實國務院“放管服”改革要求，進一步優(yōu)化口岸營商環(huán)境，提高貿(mào)易便利化水平，海關(guān)總署于2019 年發(fā)布了159 號公告[1]，對進口大宗商品重量鑒定監(jiān)管方式進行優(yōu)化，進口大宗商品收貨人或者代理人需要向海關(guān)申請實施重量鑒定并出具重量證書，不申請海關(guān)重量鑒定的，必要時海關(guān)依據(jù)職權(quán)實施鑒定或抽查驗證。首先，企業(yè)可委托獲得海關(guān)許可的進出口商品檢驗鑒定機構(gòu)（以下簡稱鑒定機構(gòu)）實施重量鑒定，海關(guān)依據(jù)需要核驗鑒定機構(gòu)的鑒定結(jié)果，但是由于客觀原因，海關(guān)關(guān)員無法及時查閱到原始的岸罐檢定容量數(shù)據(jù)，無法判斷數(shù)值是否準確無誤。 其次，海關(guān)對鑒定機構(gòu)負有監(jiān)管職權(quán)，但在日常監(jiān)管中又缺乏有效便捷的手段，不能實時了解鑒定機構(gòu)日常鑒定活動，月度年度鑒定業(yè)務情況獲取嚴重滯后，若第三方采信完全開展，亟需一個鑒定監(jiān)管系統(tǒng)為海關(guān)第三方機構(gòu)日常管理提供技術(shù)支撐，岸罐計重的智能驗核會成為該系統(tǒng)的重要模塊之一。

岸罐計重，全稱為岸上立式金屬罐靜態(tài)計重。是容器計重的一種表現(xiàn)形式，以檢定合格的岸罐自身作為計量容器岸罐計重普遍采用手工檢尺的方法，首先需要測量罐內(nèi)液貨的液位高度，其次測量罐內(nèi)液貨平均溫度，必要時還需測量罐外大氣溫度，而后獲取液貨實驗室測得的密度及測定溫度，最后結(jié)合容量表及液貨理化參數(shù)計算出罐內(nèi)液貨重量。

由于整個計算過程涉及的數(shù)據(jù)量大且過于煩瑣，人工計算易出錯，人工復核較困難。 本文充分研究了岸上立式金屬罐靜態(tài)計重標準SN/T 2389.2《進出口商品容器計重規(guī)程 第2 部分:動植物油岸上立式金屬罐靜態(tài)計重》[2]、SN/T 2389.5《進出口商品容器計重規(guī)程 石油岸上立式金屬罐靜態(tài)計重》[3]、SN/T 2389.11《進出口商品容器計重規(guī)程 第11 部分：液體化工品岸上立式金屬罐靜態(tài)計重》[4]、SN/T 2389.16《進出口商品容器計重規(guī)程 第16 部分：岸上立式金屬罐靜態(tài)計重通則》[5]以及GB/T 1885—1998《石油計量表》[6]，歸納總結(jié)了計重標準和方法的共同點與不同點，設計了一張通用的EXCEL 表單，通過VAB（Visual Basic for Applications）宏語言擴展Microsoft Excel 應用程序[7]，實現(xiàn)了條件選擇及代碼組合，同時滿足動植物油脂、液體化工品、石油產(chǎn)品的計算需求。

2 智能計算表單的設計與應用研究

2.1 研究技術(shù)路線

深入研究SN/T 2389 系列標準中有關(guān)岸罐計重的內(nèi)容后發(fā)現(xiàn)，不同貨物類別既有共同點，又有差異性。 共同點表現(xiàn)在對同一個岸罐檢定機構(gòu)出具的容量表，查表過程和各種修正過程相同。差異性表現(xiàn)在修正后容量VT計算重量的過程，如石油產(chǎn)品使用VCF修正法，先在GB/T 1885—1998 表60 中查出液溫T時對應的VCF 修正值，再將VT乘以該值，計算得到V20℃，最后帶入20℃標準密度求得重量；對于動植物油脂，則使用密度修正法，先查出油脂密度溫度變化系數(shù)γ，再用該值將實驗室測定的T0溫度時的密度ρ0修正到液溫T 時ρT，而后在VT求得重量；對于液體化工品，可以使用密度修正法，過程同植物油脂，也可以使用體積修正法，先查出體積溫度變化系數(shù)f，再用該值將VT修正到密度測定溫度時的體積，再帶入密度求得重量。根據(jù)上述異同點，歸納總結(jié)繪制出岸罐計重一般流程圖（圖1），圖中含有底色的為原始輸入數(shù)值。對于一些含有底水的貨物，應在計算過程中扣除底水容量或重量，對于含有浮頂?shù)陌豆?，最終的重量結(jié)果中應扣除浮頂重量。

本表單集成了以下6 個主要功能模塊代碼：視容量自動查找計算、油品視密度反推查找計算、油品VCF 值查找計算、液貨密度溫度變化系數(shù)查找、液貨體積溫度變化系數(shù)查找、方法選擇計算。

2.2 表單設計

圖1 岸罐計重一般流程圖

針對液貨產(chǎn)品設計了如圖2 的表單，含灰色底紋的單元格是需要填寫原始數(shù)值和需要選擇的計算方法參數(shù)，含密點底紋的單元格是經(jīng)過代碼計算回寫至表單的計算值和參數(shù)。貨物名稱、罐區(qū)、罐號、岸罐類別、計算方法欄中使用了嚴格的序列選擇，以確保序列中文字與代碼中判別條件保持一致， 目前正在考慮使用ActiveX 控件實現(xiàn)罐區(qū)、罐號聯(lián)動。

圖2 岸罐計重智能計算表單

2.3 基礎數(shù)據(jù)的準備與維護

基礎數(shù)據(jù)包括不同岸罐的鑒定容量數(shù)據(jù)、成品油標準密度表59B、成品油體積修正系數(shù)表60B、液體化工品密度溫度變化系數(shù)及體積溫度變化系數(shù)表等。 以上數(shù)據(jù)需建立獨立的EXCEL 文件，并按照一定的規(guī)則命名文件，并存儲在相對固定的文件夾下，如計算表單所在文件夾下的“數(shù)據(jù)庫”文件夾內(nèi)。 岸罐的鑒定容量數(shù)據(jù)應在EXCEL 中劃定固定的存放區(qū)域，如岸罐屬性參數(shù)區(qū)域、分米容量值區(qū)域、厘米毫米容量值區(qū)域、靜壓力修正容量值區(qū)域，以方便代碼在此區(qū)域內(nèi)調(diào)用查找。

2.4 模塊設計及功能的實現(xiàn)

為了實現(xiàn)條件判別選擇，并盡量避免代碼過于冗長，將整個計算判別過程切分成多個模塊，利用模塊間的相互依存關(guān)系，使用Call 語句調(diào)用對應的模塊。采用模塊設計易于修正，當某個模塊代碼執(zhí)行過程中出現(xiàn)特殊情況下的BUG 時，易于在該模塊中調(diào)試查找BUG 原因并修訂，無需對整個代碼檢查修正，避免牽一發(fā)動全身，詳見表1。

表1 各模塊名稱和功能

2.5 數(shù)據(jù)的輸入與輸出

在執(zhí)行計算代碼前，應先定義數(shù)值存儲的變量，有些變量是需要作用于整個代碼區(qū)域，應提前使用“Public”語句聲明全局變量，有些則是子代碼中的過程計算變量，在代碼中聲明賦值。

在運行智能計算代碼時，首先是讀取表單中填入的原始數(shù)值，使用“變量 = ThisWorkbook.Sheets(1).Cells(行指引，列指引)”語句，給全局變量賦值。 當完成某項計算， 需要將數(shù)值寫入表單中時， 使用“ThisWorkbook.Sheets (1).Cells-(行指引， 列指引) =全局變量”語句。 行指引為表單中數(shù)值所在的行號，列指引為表單中數(shù)值所在的列號， 如前尺液位高度為Cells(8，3)，由表單可以看出，前尺數(shù)據(jù)的列號都為3，后尺數(shù)據(jù)列號都為5，執(zhí)行的所有計算過程完全相同， 因此只需要編寫一套含有列指引全局變量x 的代碼，先賦值x=3 執(zhí)行代碼，再賦值x=5 執(zhí)行相同代碼，如下：

此方法減少了前后兩次編寫同類型的代碼，有效避免代碼過于冗長，更方便代碼維護和修改。

2.6 基礎數(shù)據(jù)的調(diào)用與數(shù)值查找

使用VBA 中“Workbooks.Open（FilePath）”語句，打開需要調(diào)用的基礎數(shù)據(jù)文件，使用“ActiveWorkbook.Sheets(1).Select”語句選擇并激活存放基礎數(shù)值的表單。 利用循環(huán)語句+條件判斷語句， 依次判別Cells中的數(shù)值是否是所需要的，若是，則將所需的數(shù)值賦值給對應的變量，跳出本循環(huán)語句或本模塊，繼續(xù)執(zhí)行后續(xù)代碼。

以靜壓力修正容量查找計算為例， 靜壓力修正容量表呈現(xiàn)形式如表2 所示，查找代碼如下：

假定液位高度為4.532 m，根據(jù)靜壓力查表計算方法，需要找到4.5 m 和4.6 m 端點處對應的數(shù)值，再通過內(nèi)插法計算出4.532 m 處的靜壓力容量值。使用“Do 循環(huán)”語句，聲明行指引i，利用if 語句判別Cells(i， 1)是否等于米刻度數(shù)值4，若是，則將i 值賦值給行指引變量Index_Row，并結(jié)束“Do 循環(huán)”，若否且cells(i， 1)不為空值，則再次執(zhí)行Do 語句，此時i 遞增1 直至Index_Row 被賦值。 然后更改if 語句判別式，用同樣的方式，賦值變量Index_Column。 進代碼運算， 最終Index_Row = 6，Index_Column =7，4.5m 對應的Cells (Index_Row， Index_Column) =866，4.6m 對應的Cells(Index_Row， Index_Column +1) = 905，通過內(nèi)插法計算得到4.532 m 對應的靜壓力修正容量修約后為878 L。 考慮到當Index_Column = 11 時，Cells(Index_Row， Index_Column +1)為空值，因此又加入了if 判別式，取Cells(Index_Row + 1， 2)端點值。

表2 靜壓力修正容量表（部分）

液位高度容量、油品VCF 修正值、油品當前液溫下密度、密度溫度變化系數(shù)、體積溫度變化系數(shù)也都采用上述類似結(jié)構(gòu)的代碼形式。 完成基礎數(shù)據(jù)表單的調(diào)用計算后，使用“ActiveWorkbook.Close Save Changes:=False”語句關(guān)閉表單。

2.7 重量計算方法的自動選擇

為了使代碼編寫更加簡單方便， 暫時沒有編寫代碼使之能夠通過所填貨物名稱自動選擇方法，在執(zhí)行運算前，在原始數(shù)據(jù)錄入時，需要人為選定該貨物適用的重量計算方法， 即在表單計算方法欄中下拉選擇，使用“if…then…elseif…then…else”語句判別選中的方法，執(zhí)行對應的模塊，此舉可大大降低編碼難度。

2.8 特殊情況處理

在代碼中增加了液溫高度異常輸入值判定，以提高代碼整體流暢性和適用性，如液溫高度超出岸罐計量最大范圍時，終止執(zhí)行后續(xù)代碼，并給出對應的信息提示框，提醒檢查輸入數(shù)值是否真確；當液位高度出于浮頂起浮不可計量高度范圍內(nèi)，終止執(zhí)行后續(xù)代碼，并給出對應的信息提示框；液溫高度為0時，直接返寫重量結(jié)果為0。

在油品岸罐計重靜壓力容量修正時，依據(jù)標準和岸罐檢定使用要求，實際靜壓力修正容量值應使用液體實際密度進行修正如公式（1）：

其中，ΔVp—實際靜壓力修正容量；ΔVs—以4℃時水的密度編制的靜壓力修正容量值；—液體在t℃時的密度與水在4℃時密度的比值。

然而，在現(xiàn)場條件下很難測定當前液溫下密度，而實驗室測定又費時費力，不能及時給出檢測值，因此考慮使用油品在20℃時的標準密度，利用成品油標準密度表59B，編寫代碼反向推算當前液溫下密度，實現(xiàn)了密度數(shù)值的及時獲取。

3 結(jié)語

經(jīng)測試，本研究設計的表單能夠滿足石油產(chǎn)品、動植物油脂、液體化工品岸罐計重使用要求，代碼運算流暢，單次執(zhí)行平均用時1～2 s，與人工查表計算相比，效率明顯增加，并有效避免了人為的、不經(jīng)過嚴苛的內(nèi)插計算，使用相近值的情況，減小計算誤差，更能夠避免人為計算錯誤；集成了3 種類別貨物的計算方法，適用性更強，基礎數(shù)據(jù)文件管理和維護更加簡單便捷，避免了每個品種單獨創(chuàng)建計算表單以及文件管理上的混亂；運算代碼采用模塊組合，易于維護和修正。

本研究基于常規(guī)EXCEL 軟件，從事該項工作的檢驗鑒定人員或機構(gòu)都可以根據(jù)本思路建立適用于自身工作情形的計算表單。 本研究還為海關(guān)檢驗鑒定活動在線監(jiān)管系統(tǒng)提供了思路，以海關(guān)監(jiān)管為紐帶，開發(fā)Web 網(wǎng)頁版和App 版等在線系統(tǒng)，實現(xiàn)多平臺使用，由岸罐所屬方維護容量表數(shù)據(jù)，賦予進出口檢驗鑒定機構(gòu)和人員一定的使用權(quán)限，海關(guān)可以第一時間了解貨物鑒定相關(guān)結(jié)果，并為海關(guān)信息化建設添磚加瓦。

本研究目前不足之處主要表現(xiàn)在基礎數(shù)據(jù)不夠完善，成品油標準密度表59B 和成品油體積修正系數(shù)表60B 數(shù)據(jù)龐大，目前只維護了部分數(shù)據(jù)，鑒定容量數(shù)據(jù)也只維護了少量試驗用岸罐容量數(shù)據(jù)，液體化工品密度溫度變化系數(shù)及體積溫度變化系數(shù)也只維護了常見的十幾種貨物。因此，全面的推廣和使用還需要聯(lián)合多方共同參與，花時間和精力做好基礎數(shù)據(jù)的維護工作。此外還需繼續(xù)完善表單，減少原始參數(shù)填入不規(guī)范造成的運行BUG。