介紹了鄂鋼地磅計量系統的硬軟件結構，利用計量軟件并使用VB控件，實(shí)現了地磅電子流水記錄。

1 .前言

鄂鋼使用的地磅計量系統均配置兩臺打印機, 一臺打印票據,一臺打印流水,每進(jìn)行一次計量操作， 都會(huì )打印一條流水信息,記錄計量時(shí)間、流水號、發(fā)貨 單位、收貨單位和毛重皮重等信息,通過(guò)查詢(xún)這些紙 質(zhì)記錄,從而查詢(xún)計量信息。通過(guò)編寫(xiě)計量軟件程 序,實(shí)現了計量員通過(guò)軟件查詢(xún)功能查詢(xún)計量數據， 從而取消了流水打印機,這樣不僅節約了打印機,還 節約了各種耗材。

2.計量系統簡(jiǎn)介

2. 1 硬件結構

計量站通過(guò)計算機進(jìn)行計量作業(yè),計算機與地磅通過(guò)稱(chēng)重顯示表進(jìn)行通訊,采集重量數據；通過(guò)在 計算機上加裝視頻監控卡采集過(guò)秤時(shí)的現場(chǎng)狀況;利 用在汽車(chē)衡兩端加裝冷金屬紅外探測器來(lái)判斷汽車(chē) 過(guò)衡的位置信息,I/O卡用來(lái)接收從冷金屬探測器傳 遞過(guò)來(lái)的探測信號；網(wǎng)卡用于與其它計量計算機進(jìn)行 通訊。其硬件結構如圖1所示。

2.2軟件結構

計量系統的軟件由數據采集、視頻采集、紅外處理、 打印輸出、防作弊、數據計量和數據統計共7部分組成。

數據采集部分主要負責讀取稱(chēng)重顯示表所顯示 的計量數據。它主要通過(guò)COM 口 RS232通訊來(lái)完 成。計量數據被讀取后，用于顯示在計量界面和計毛計皮時(shí)的數據處理。

視頻采集部分的作用是對計量界面進(jìn)行抓圖，其 中包含各種計量信息和車(chē)頭車(chē)尾的圖片，用來(lái)和流水 信息進(jìn)行比較。

紅外處理部分主要用于接收I/O卡的信息，當車(chē) 輛不完全在秤臺上時(shí),計量畫(huà)面上的左越界和右越界 的燈就會(huì )變色，同時(shí)在計量時(shí)彈出提示信息左越界或 右越界,不能計量。

打印輸出部分包括流水打印和票據打印，流水打 印在連續紙上打印各種流水信息,用于查詢(xún)和與圖片 進(jìn)行比較,票據打印可打印標準票據,用于結算。

防作弊部分的作用是:每輛汽車(chē)第一次計皮重時(shí) 均寫(xiě)入皮重庫,以后再進(jìn)行計量時(shí),都會(huì )將當前皮重與 皮重庫中的歷史皮重進(jìn)行比較,當超過(guò)一定范圍時(shí),計量就會(huì )彈出對話(huà)框提示皮重超差，不予計量。如果需 要計量,則需要管理員對皮重進(jìn)行解鎖后方可進(jìn)行。

數據計量部分包括計毛重和計皮重。計毛重時(shí)， 首先判斷車(chē)輛是否超出邊界，當前重量是否超出量 程，當前重量顯示值是否合法，再進(jìn)行計量性質(zhì)的判 斷（進(jìn)公司不可先計皮重，出公司不可先計毛重），檢 查計量信息是否完整,確定直接定皮重時(shí)搜索記錄的 允許時(shí)間間隔，當判斷為進(jìn)公司時(shí),直接計毛重,將計 量信息寫(xiě)入文件,抓取計量圖片，判斷為出公司時(shí)，搜 索對應車(chē)牌號皮重,計算出凈重,然后將計量信息寫(xiě) 入文件,打印票據,通過(guò)聲卡輸出提示司機計量完畢， 最后進(jìn)行流水信息打印。計皮重時(shí),開(kāi)始的判斷與計 毛重一樣,在檢查完輸入信息是否規范后要進(jìn)行防作 弊比較,如超出允許誤差范圍則提示后退出，如果正 常就進(jìn)行下一步的判斷,計量性質(zhì)為出公司時(shí)直接計 皮重,將計量信息寫(xiě)入文件,抓取計量圖片，計量性質(zhì) 為進(jìn)公司時(shí),搜索對應車(chē)牌號毛重,計算出凈重,計量 信息寫(xiě)入文件,打印票據，通過(guò)聲卡輸出提示司機計 量完畢,最后進(jìn)行流水信息打印。

數據統計部分可以對每天或者每月的計量信息 進(jìn)行分類(lèi)統計,并形成報表。

3.流水電子化的實(shí)現

計量程序使用Visual Basic6. 0編寫(xiě)。首先在 程序中添加一個(gè)新窗體“form2”在主計量畫(huà)面建立 一個(gè)按鈕,按鈕命名為“流水查詢(xún)”用于打開(kāi)新建窗 體;根據流水需要在Form_Load ()中設計相應的表 頭;在工具欄添加MSFlexGrid控件和CommonDialog 控件，MSFlexGrid控件可以顯示網(wǎng)格數據，Common-Dialog 控件提供一組標準的操作對話(huà)框,進(jìn)行諸如打 開(kāi)和保存文件、設置打印選項、選擇顏色和字體等操 作,用它來(lái)選擇相應的文件。程序如下：

ComDlgl. DialogTitle ="打開(kāi)計量數據文件"

ComDlgl. Filter ="計量數據文件（* . mqd) I * . mqd"

*利用CommonDialog控件選擇計量數據文件 Open checkfile For Random Access Read Write As # filenumber Len = Len (Data)

*打開(kāi)所選擇的數據文件

FxGd1 . FormatString = header *將定制好的表頭傳給MSFlexGrid控件 For i = 1 To rec_no Step 1 Get #filenumber，i，Data

Next i

*利用循環(huán)在MSFlexGrid控件中顯示文件中所有的 記錄

Close #filenumber

*關(guān)閉打開(kāi)的文件

根據需要調整表格的大小和按鈕的位置。

禁止流水打印。

對修改好的文件進(jìn)行編譯，生成目標文件。

4.結語(yǔ)

取消汽車(chē)衡計量系統中的流水打印機,實(shí)現流水 電子化，不僅滿(mǎn)足了鄂鋼計量工藝要求及管理要求， 還確保了數據的安全性和穩定性,減輕了計量人員的 工作強度,節約了計量成本。到目前為止，軟件運行 良好,達到預期目標。