曹德平

(湖南華電長(zhǎng)沙發(fā)電有限公司，湖南 長(zhǎng)沙 410203)

0 引言

入爐煤化驗(yàn)數(shù)據(jù)的準(zhǔn)確性不僅關(guān)系到火力發(fā)電企業(yè)的節(jié)能增效以及機(jī)組的安全、穩(wěn)定運(yùn)行，更是入爐煤摻配摻燒工作和入廠煤監(jiān)督工作的重要參考依據(jù)。入爐煤化驗(yàn)專業(yè)每天需定期上報(bào)的紙質(zhì)報(bào)表和網(wǎng)上報(bào)表多達(dá)幾十份，繁雜的數(shù)據(jù)極易造成報(bào)出錯(cuò)誤。入爐煤化驗(yàn)數(shù)據(jù)統(tǒng)計(jì)量大，有值內(nèi)數(shù)據(jù)的加權(quán)平均、日內(nèi)數(shù)據(jù)的加權(quán)平均，甚至為了對(duì)標(biāo)管理、小指標(biāo)競(jìng)賽和與入廠煤熱值差計(jì)算，需要月內(nèi)數(shù)據(jù)分值加權(quán)平均或更長(zhǎng)時(shí)間段的加權(quán)平均。DL/T 904—2004《火力發(fā)電廠技術(shù)經(jīng)濟(jì)指標(biāo)計(jì)算方法》中關(guān)于入廠煤與入爐煤熱量差、入廠煤與入爐煤水分差等的計(jì)算，都明確規(guī)定必須用加權(quán)平均值，而各個(gè)電廠往往因某些原因無(wú)法進(jìn)行加權(quán)平均統(tǒng)計(jì)，很多相關(guān)工作無(wú)法按國(guó)標(biāo)開展。當(dāng)然也有利用Excel對(duì)入爐煤數(shù)據(jù)進(jìn)行處理的優(yōu)秀經(jīng)驗(yàn)［1］，但統(tǒng)計(jì)過于局限，而且數(shù)據(jù)修約根本無(wú)法完成。為保證化驗(yàn)記錄健全、工作任務(wù)簡(jiǎn)化以及統(tǒng)計(jì)數(shù)據(jù)精確、可靠、安全、完整，湖南華電長(zhǎng)沙發(fā)電有限公司基于Visual Basic開發(fā)了一套實(shí)用的入爐煤數(shù)據(jù)管理系統(tǒng)。

1 數(shù)據(jù)庫(kù)設(shè)計(jì)

根據(jù)需要建立Data_base.mdb數(shù)據(jù)庫(kù)，數(shù)據(jù)庫(kù)中建立4個(gè)數(shù)據(jù)表，分別為UserInfo、值內(nèi)單樣表、值內(nèi)加權(quán)平均表和日綜合分析表，各數(shù)據(jù)表結(jié)構(gòu)見表1、表2。

表1 UserInfo數(shù)據(jù)表結(jié)構(gòu)

表2 值內(nèi)單樣表、值內(nèi)加權(quán)平均表和日綜合分析表結(jié)構(gòu)

2 用戶界面設(shè)計(jì)

系統(tǒng)采用MDI窗體形式，設(shè)計(jì)母窗體1個(gè)、子窗體11個(gè)，見表3。主窗體及錄入界面截圖如圖1所示。

表3 入爐煤數(shù)據(jù)管理系統(tǒng)窗體

3 關(guān)鍵功能的實(shí)現(xiàn)

3.1 界面與數(shù)據(jù)庫(kù)的交互

系統(tǒng)中需要多次與數(shù)據(jù)庫(kù)交互，建立統(tǒng)一的數(shù)據(jù)庫(kù)訪問函數(shù)是最切實(shí)際的方法［2］。為此，筆者建立了如下數(shù)據(jù)庫(kù)訪問函數(shù)，放在公共模塊中。

圖1 入爐煤數(shù)據(jù)管理系統(tǒng)主窗體及數(shù)據(jù)錄入子窗體

另外，數(shù)據(jù)修改界面用到Data Grid表格，選用ADODC控件更為方便。

3.2 加權(quán)平均的實(shí)現(xiàn)

因?yàn)槊總€(gè)煤樣的上煤量不同，因此，多個(gè)煤樣各個(gè)指標(biāo)的加權(quán)平均不能以簡(jiǎn)單的指標(biāo)平均值進(jìn)行計(jì)算［3］

多個(gè)煤樣某項(xiàng)指標(biāo)加權(quán)平均=∑(煤樣指標(biāo)大小×煤樣數(shù)量)/∑煤樣數(shù)量。

先從數(shù)據(jù)庫(kù)中查詢到相關(guān)的煤樣，經(jīng)用戶確認(rèn)煤樣正確后，找到指標(biāo)和煤樣數(shù)量相關(guān)字段進(jìn)行相關(guān)處理即可。

定義rs為查詢到的相關(guān)記錄，rs1為加權(quán)平均記錄，定義a(15，rs.RecordCount)存儲(chǔ)中間變量，其中a(6，rs.RecordCount)存儲(chǔ)上煤總量，以計(jì)算收到基低位發(fā)熱量(Qnet.ar)為例，計(jì)算如下

其中，F(xiàn)ormatXY為自定義格式函數(shù)，實(shí)現(xiàn)“四舍六入五成雙”數(shù)字修約規(guī)則，中間變量采用二維數(shù)組，是為了和相關(guān)報(bào)告單煤樣數(shù)據(jù)一一對(duì)應(yīng)，生成報(bào)表時(shí)更加方便。

3.3 煤樣密碼的規(guī)范及界面的人性化

湖南華電長(zhǎng)沙發(fā)電有限公司每個(gè)入爐煤樣都有統(tǒng)一規(guī)定的密碼，例如L101205A:L代表入爐煤樣;101205代表2010年12月5日;A(或B，C)代表早班(或中班、晚班)。密碼是數(shù)據(jù)查詢的依據(jù)，從密碼可以分析出煤樣的日期及煤樣的值別、班別等重要信息，也是實(shí)現(xiàn)按值加權(quán)平均統(tǒng)計(jì)的基礎(chǔ)，因此，錄入數(shù)據(jù)庫(kù)系統(tǒng)時(shí)絕不能出錯(cuò)。系統(tǒng)會(huì)根據(jù)當(dāng)前時(shí)間自動(dòng)生成相應(yīng)的密碼，不需要人工輸入，以減小錯(cuò)誤幾率;同時(shí)，設(shè)計(jì)密碼判斷函數(shù)，對(duì)密碼的全角/半角、大寫/小寫、各位字母、各位數(shù)字范圍等加以判斷，當(dāng)數(shù)據(jù)錄入數(shù)據(jù)庫(kù)時(shí)提前判斷，函數(shù)聲明如下:

Public Function isrightpassword(ByVal txtmima As String)As Boolean

為了使軟件更具人性化，在調(diào)出數(shù)據(jù)錄入界面時(shí)，除密碼以外，報(bào)告日期、制樣時(shí)間，煤樣代表日期、采樣方式等均會(huì)自動(dòng)填入符合本值的相關(guān)信息。同時(shí)增加了數(shù)據(jù)修改界面，不僅能對(duì)自己錄入的數(shù)據(jù)進(jìn)行修改，而且只要修改1個(gè)數(shù)據(jù)，與計(jì)算公式相關(guān)聯(lián)或數(shù)據(jù)表相關(guān)聯(lián)的所有數(shù)據(jù)均會(huì)一次全部修改。所有數(shù)據(jù)錄入系統(tǒng)前均會(huì)進(jìn)行初步格式判斷，自動(dòng)提示錯(cuò)誤。為了方便操作及保證安全，還增加了托盤功能、目錄樹功能以及非管理員的權(quán)限限制。

3.4 月度數(shù)據(jù)按值加權(quán)平均的實(shí)現(xiàn)

月度數(shù)據(jù)按值加權(quán)平均，需要將錄入系統(tǒng)的所有煤樣按值分類，然后分別進(jìn)行加權(quán)平均統(tǒng)計(jì)。按值分類比較困難，實(shí)現(xiàn)的方法有3種:一種是根據(jù)用戶分值，但化驗(yàn)員換班會(huì)導(dǎo)致出錯(cuò);另一種方法是在錄入數(shù)據(jù)界面增加值別一欄，但由于每次煤樣代表值不固定，很容易出錯(cuò);第3種方法是從密碼分離出值別，根據(jù)倒班的規(guī)律完全可以做到。函數(shù)聲明如下:

Public Function meiyangzhi(myzmima As String)As Integer

參數(shù):煤樣值密碼;返回煤樣值值別。用這種高度集成的函數(shù)，不僅減少了工作量，減少了出錯(cuò)幾率，后期維護(hù)也十分方便，編程調(diào)用十分簡(jiǎn)單。例如，要獲取每值當(dāng)月的煤樣數(shù)，定義numMSH(1 To 5)存儲(chǔ)(下標(biāo)為值別)，代碼非常簡(jiǎn)潔:

3.5 修約規(guī)則的實(shí)現(xiàn)

從統(tǒng)計(jì)學(xué)與分析化學(xué)的角度來說，數(shù)字修約都要求遵循“四舍六入五成雙”(也稱“四舍六入五湊偶”)的規(guī)則［4－5］，而不是傳統(tǒng)的“四舍五入”。在大量運(yùn)算時(shí)，“四舍六入五成雙”使測(cè)量結(jié)果受到舍入誤差的影響降到最低，舍入后的結(jié)果誤差的均值趨于零，而不是像四舍五入那樣逢五就入，導(dǎo)致結(jié)果偏向大數(shù)，使得誤差積累進(jìn)而產(chǎn)生系統(tǒng)誤差。為此，在系統(tǒng)中根據(jù)需要設(shè)計(jì)了如下函數(shù):

Public Function FormatXY(ByVal a As Double，b As String)As String

函數(shù)功能:a為要修約的原數(shù)據(jù);b為格式要求，取“0.0”，“0.00”，“0.000”等數(shù)，以同標(biāo)準(zhǔn) Format函數(shù)格式相呼應(yīng)。

3.6 報(bào)表的自動(dòng)生成

系統(tǒng)能自動(dòng)產(chǎn)生3種報(bào)表:入爐煤質(zhì)值報(bào)告單、入爐煤質(zhì)日?qǐng)?bào)告單、入爐煤質(zhì)_年_月分值加權(quán)平均統(tǒng)計(jì)報(bào)告單，均采用Excel實(shí)現(xiàn)。值報(bào)告單按月存放，每值1個(gè)工作簿，日?qǐng)?bào)告單每月1個(gè)工作簿，每日建立1個(gè)工作表，均可建立標(biāo)準(zhǔn)Excel模板，再使用復(fù)制、粘貼、修改等方法編程，或建立生成Excel文件的Public過程，再調(diào)用。

4 結(jié)束語(yǔ)

基于VB的入爐煤數(shù)據(jù)管理系統(tǒng)在湖南華電長(zhǎng)沙發(fā)電有限公司已成功應(yīng)用，繁瑣的入爐煤數(shù)據(jù)加權(quán)統(tǒng)計(jì)鼠標(biāo)一“點(diǎn)”即成，復(fù)雜的數(shù)據(jù)報(bào)表鼠標(biāo)一“擊”即可，數(shù)據(jù)管理更加科學(xué)、快捷、規(guī)范。

［1］楊斌.Excel在電廠入爐煤報(bào)表中的應(yīng)用［J］.中國(guó)科技博覽，2009(31):91.

［2］斯琴巴圖，楊利潤(rùn).零基礎(chǔ)學(xué) Visual Basic［M］.北京:機(jī)械工業(yè)出版社，2008.

［3］曾慶云.統(tǒng)計(jì)指標(biāo)中加權(quán)平均數(shù)的權(quán)數(shù)的認(rèn)識(shí)［J］.時(shí)代經(jīng)貿(mào)，2010(8):243.

［4］鄒翔.淺談分析化學(xué)中的有效數(shù)字［J］.科技信息，2008(5):171.

［5］邱貞生.基于VB實(shí)現(xiàn)房產(chǎn)測(cè)量的數(shù)據(jù)管理［J］.吉林地質(zhì)，2010(1):153－155.