|
某天然氣公司的生產信息平臺，是一個生產運行關鍵數據統計和展示的平臺，其中的裝置關鍵參數合格率、設備運行狀態、振動設備報警監測這三部分，由紫金橋實時數據庫提供數據。
客戶在功能上要求是這樣的：
1、裝置關鍵參數合格率，報警上下限值要從指定的關系數據庫表中讀取，該表由工藝人員根據需要修改報警上下限的限值，紫金橋軟件根據此限值計算裝置關鍵參數的合格率，計算完成后，再存入關系數據庫指定的表中。
2、設備運行狀態，實時值由信息平臺實時讀取，歷史值要定時存入關系數據庫指定的表中。
3、設備振動報警監測，實時值由信息平臺實時讀取，不需要存儲歷史值。
設備運行狀態以及設備振動監測的實時數據是通過開放OPC Server接口，由對方直接實時采集，裝置關鍵參數的合格率以及設備運行狀態歷史兩部分的數據，是通過紫金橋實時數據庫軟件，將歷史數據寫入到SQL Server數據庫中，再由生產信息平臺系統從SQL Server中按照需要讀取。
系統使用的軟件版本：紫金橋實時數據庫軟件V6.5。
功能窗口截圖如下，由于該窗口不需要展示，故未做任何美化：
各部分功能說明：
1-報警時間統計組件，用于統計位號的累計報警時間，以便計算合格率。
2-設備狀態實時報表，實時顯示設備狀態值，通過腳本將對應位號的值存儲到數據庫中。
3-位號的報警上下限值報表，從關系數據庫讀取參數的報警限值。
4-手動讀取合格率報警限值按鈕，點擊后讀取關系數據庫的報警限值。
5-查看當天已經寫入數據的報表，用來查看數據庫中已經寫入的數據。
6-查看設備狀態/合格率數據按鈕。點擊按鈕分別查看最近一天的設備狀態或者合格率數據。
窗口最下方的部分即5、6兩塊實際上不是功能必須的，只是方便開發者自己查看遠程數據庫中的數據是否成功存儲。
本文主要介紹“裝置關鍵參數合格率”這部分的功能，“設備運行狀態”部分大同小異，“設備振動監測”部分不需要向關系數據庫存儲數據，所以這兩部分不再過多敘述。接
下來開始說明關鍵參數合格率功能部分：
1、窗口中新增報警時間統計組件，命名為Alarm1，在組件中添加需要進行統計的位號，設置位號使用自身報警限值。
2、點組態中，新增‘報表關系數據源點’，連接要讀取數據的關系數據庫。
3、窗口中新增自由報表，關系數據庫連接里面，連接新建的報表關系數據源點，并將報表命名。本案例中，該報表名為Fr1 。
4、建立表模板。
使用紫金橋軟件預定義的SQL函數向關系數據庫插入數據，首先要按照固定表結構在關系數據庫先創建表， SQL函數無法直接生成表，而是需要一個給定的模板，按照模板進行表的創建，這就需要事先定義好一個表模板。
下圖是合格率數據表要使用的表模板，要創建的表一共有4個字段，分別是‘日期、位號名、值、權重’，對應的字段名分別是‘UpdateTime、TagName、TagValue、TagLevel’，權重這個字段是客戶要求的。
合格率表模版
創建表使用函數SQLCreateTable()，這里定義一個窗口整型變量w_cID，供SQL函數使用。關于紫金橋實時數據庫預定義的SQL函數的用法，請讀者自行查看幫助，這里不再詳述。
一旦數據表創建完畢，表模板就不再需要了。基于此原因，最開始的數據表是使用按鈕創建的，創建完畢后，按鈕就刪除了，所以窗口中沒有創建數據表的腳本。
5、建立綁定表。
數據表創建完畢后，接下來就是向表內插入數據了。要向關系數據庫表內插入數據，需要使用紫金橋實時數據庫的‘綁定表’，綁定表里的字段名設置要和表模版里的字段完全一致，否則插入數據時會失敗。
另外，需要建立4個中間變量（圖中變量名部分），分別對應數據表的4個字段，供綁定表使用，具體用法在后面腳本部分會詳細介紹。
合格率綁定表
6、腳本。
由于紫金橋實時數據庫6.5版軟件里，窗口周期執行腳本的周期不能大于15分鐘，所以為了實現需要的功能，定義以下整型窗口變量：w_cID、w_t1、w_t2、w_t3、w_t4、w_TBegin，具體使用在后面的腳本中說明。
進入窗口：
進入窗口后，執行下面腳本，前三行是給w_t1、w_t2、w_t3賦值為次日零點的時間；第五行w_TBegin賦值為當日零點的時間，是報警統計組件執行統計的起始時間；第六行連接數據存儲所使用的數據庫，由于連接字符涉及到客戶信息，所以這里去掉了，讀者可以自己查看幫助中關于紫金橋軟件內置SQL函數的用法，里面有關于連接數據庫的詳細說明。w_t4賦值為次日上午8：30分的時間，設備狀態數據存儲腳本使用，與合格率數據存儲無關。w
_t1 = LongTime(StrLeft(StrTime($Curtime,0),10) + " 00:00:00") + 86400;
w_t2 = w_t1;
w_t3 = w_t1;
w_t4 = LongTime(StrLeft(StrTime($Curtime,0),10) + " 08:30:00") + 86400;
w_TBegin = LongTime(StrLeft(StrTime($Curtime,0),10) + " 00:00:00");
SQLConnect(w_cID,"此部分是數據庫服務器連接字符串，不便公開");
周期執行：
首先，每天凌晨前5分鐘，從關系數據庫讀取關鍵參數的報警限值到報表Fr1中。由于報警限值由工藝人員維護，可能根據工藝需要有修改，所以每天計算合格率之前要重新讀取。腳本如下：
if $Curtime >= w_t1-300 && $Curtime < w_t1-240 then
w_t1 = $Curtime + 86400;
#Fr1.SqlSelectCmd("select 位號,指標級別,下限,上限 from TM_裝置關鍵控制參數");
Delay(1500);
for i = 1 to #Fr1.RowCount()+1
#本地.SetDataStr(#Fr1.Txt(1,i)+".EU",#Fr1.Txt(2,i));
#本地.SetDataReal(#Fr1.Txt(1,i)+".EULO",#Fr1.Val(3,i));
#本地.SetDataReal(#Fr1.Txt(1,i)+".EUHI",#Fr1.Val(4,i));
#next
#本地.RegUpdate();
endif
腳本第1行是判斷本段腳本執行的時間，當系統時間處于零點前5分鐘至前4分鐘這段時間內，開始執行腳本；
第2行是將變量w_t1的值增加一天的時間，以便下次執行的時間是在下一天的同一時間；
第3行是報表Fr1從關系數據庫的表中讀取報警限值；
第4行是延遲時間，以便報表Fr1能夠完全讀取表中的數據；
第5~9行循環，將報表Fr1中的報警限值以及權重設置到對應的位號，第6行是設置權重，第7行是設置報警下限，第8行是設置報警上限；
第10行，刷新第6、7、8行操作以后的點的信息。
讀取報警限值后，接下來就是根據報警限值計算位號的合格率了。下面這段腳本是判斷系統時間在零點前4分鐘至3分鐘之間，開始執行，同樣把變量w_t2的值增加一天，即與w_t1相同，然后開始報警組件進行報警時間的統計，統計的時間是一天，即86400秒。
if $Curtime >= w_t2-240 && $Curtime < w_t2-180 then
#w_t2 = w_t1;
#Alarm1.Start(w_TBegin,86400,1);
endif
在報警統計組件完成統計后，接下來就需要將統計的數據提取出來，然后計算，再把計算結果存入數據庫的表中了。
if $Curtime > w_t3-60 && $Curtime <= w_t3 then
w_t3 = w_t1;
for i = 0 to #Alarm1.GetTagCount()
Bind_TagValue = 1 - (#Alarm1.GetCellHi(0,i) + #Alarm1.GetCellLow(0,i))/86400;
Bind_TagName = #Alarm1.GetTag(i) + ".PV";
Bind_StrTime = StrTime($Curtime,1);
for j = 0 to #Fr1.RowCount()
if #Alarm1.GetTag(i) == #Fr1.Txt(1,j+1) then
Bind_TagLevel = #Fr1.Txt(2,j+1)
endif
next
SQLInsert(w_cID,"XHQ_HGL","XHQ_BindHGL");
next
endif
這部分腳本就是向數據庫表內寫入數據了。
第1行仍然是判斷時間，當時間達到零點前一分鐘時，開始執行腳本，首先還是將時間變量w_t3增加一天，與w_t1相同；
第3~13行循環，將報警組件中所有位號的值逐個進行計算，然后存入數據庫的表中。
第4行是把報警組件第i列的位號報警上限時間和報警下限時間求和，然后除以一天的時間，得到不合格率，再用1減去不合格率得到合格率的數值，賦給綁定表使用的變量；
第5行是把報警組件第i列的位號賦給綁定表變量；
第6行是把當前時間賦給綁定表變量；
第7~11行，是在報表Fr1中查找當前第i列位號的權重，然后賦給綁定表變量；
第12行，4個綁定表變量都已經賦值，此行使用紫金橋軟件的SQL函數，將綁定表變量的值插入到關系數據庫表中。
至此，完成報警組件第i列的一個循環，直至報警組件中所有位號的合格率統計值都插入數據表后，循環完成。
退出窗口：
這里只有一行腳本，就是當退出窗口時，斷開與關系數據庫的連接。
SQLDisconnect(w_cID);
整個腳本的關鍵，就是周期執行部分，這里使用了一個小技巧，由于紫金橋實時數據庫6.5版，周期執行腳本的周期不能大于15分鐘，所以這里使用一個整型變量，通過該變量的值與系統當前時間比較，只有符合條件才能執行腳本，否則不執行，這就保證了腳本只在每天指定的零點附近執行。
另外，為了保證每一部分的腳本能夠完全執行完畢，并且不在時間上有交叉沖突，所以設置3個不同的時間變量，并且在不交叉的時間執行。而且通過這樣的方法，不會影響其他需要頻繁執行的周期腳本正常運行。
總結：
本例中使用了報表關系數據源點與自由報表相結合，讀取關系數據庫表中的數據，這樣的好處是操作簡單，不需要寫過多腳本，但是無法向數據庫表中寫入數據。
又使用了紫金橋實時數據庫軟件預定義的SQL函數，向關系數據庫中寫入數據。SQL函數的優點是功能全面，幾乎能夠完成對關系數據庫表的所有操作，包括查詢、插入、刪除、建表、刪表等等；缺點就是操作相對自由報表和報表關系數據源點的結合要繁瑣一些，需要建立表模版、綁定表，還要手動寫一些腳本等。
|
