|
隨著世界各國工業化程度的不斷加大，各國的鋼鐵需求量也不斷加大，需要的鋼鐵的種類也不斷增多。這就要求我們在鋼鐵的生產過程中不斷改進自己的工藝技術，提高生產過程控制精度，從而生產出更多更好的高質量鋼材。
在煉鋼過程中配料、上料過程將直接影響鋼的產量及質量，如果能對這一過程進行記錄分析，將有利于工藝的改進及分析產生次品的原因。下面就講解一下通過紫金橋實時數據庫實現配料、上料過程記錄分析的方法和過程。
工藝過程
從總的工藝過程可以分為焦上料和礦上料兩部分，通常焦或礦又各自由兩套上料系統來完成。在上料前，首先要根據生產不同種類的鋼材進行配料。一個稱量斗可以對應一個料倉或兩上料倉，當一個稱量斗對應兩個料倉時，要通過選料器進行選料。通常焦炭是通過焦炭稱量斗稱量后直接上料的；而礦通常是由多個量稱量斗按比例進行稱量混合，然后再由礦總稱量斗進行匯總稱量上料。
記錄過程分析
對于所有稱量斗，當稱量斗打開時為一次稱量結束，這時根據稱量斗物料來源（料倉選擇器選擇狀態），將這個值記錄到對應本次加料量中間量中。對于礦總稱量斗打開時或焦炭稱量斗打開時，則產生一條上料記錄。對于焦炭上料記錄，只記錄一個當前選擇料倉的上料量；對于礦的上料記錄，則要記錄各分組成分的上料量（由中間量獲得）和礦總的上料量。
上料過程產生的記錄要通過WEB瀏覽發布，為了使用所WEB客戶端看到相同的記錄結果，這要求記錄時要將數據插入到歷史中。WEB客戶端通過查詢指定時間范圍內的上料記錄，而得一致的完整的記錄結果。
記錄過程實現
對于礦上料記錄，由于其是由多種組分混合組成，并要對各組分含量進行記錄，因此行成上料記錄前，要通過一組中間變量對各組分的稱重結果記錄。根據分礦稱量斗對應一個或兩個料倉的不同，在產生中間量記錄時，處理方法有所不同，但觸發條件都由分礦稱量斗的放料門打開產生的。在數據庫的“值改變”腳本中為每個分礦稱量斗打開開關定義一段處理腳本，如下所示：
一個分礦稱量斗對應一個料倉，開關狀態變化時腳本：
if( 580稱量斗5打開信號.PV ) then
580燒5稱重E.PV = 580稱量斗5稱重.PV;
endif;
一個分礦稱量斗對應兩個料倉，開關狀態變化時腳本：
if (580稱量斗1打開信號.PV) then
if( 580礦1燒11選擇信號.PV == 0) then
580礦1稱重E.PV = 580稱量斗1稱重.PV;
580燒11稱重E.PV = -99999;
else
580礦1稱重E.PV = -99999;
580燒11稱重E.PV = 580稱量斗1稱重.PV;
endif;
endif;
當礦總稱量斗或焦炭稱量斗打開時就會產生一條上料記錄，為了方便以時間為序的記錄檢索，增加了一個“記錄時間”數據庫點，其保存的值沒有太多實際意義，但它所對應的時間則是其它量值的檢索條件。對于礦總稱量斗或焦炭稱量斗同樣要在數據庫的“值改變”腳本中為每個稱量打開開關定義一段處理腳本，如下所示：
焦炭稱量斗開關狀態變化時腳本：
int Millisecond = $SYSTEM.Millisec;
int CurTime = $SYSTEM.LongTime;
if( 580西焦稱量斗打開.PV == 1) then
InsertHisData2(580記錄時間.PV,$SYSTEM.LongTime, $SYSTEM.LongTime,Millisecond);
InsertHisData2(580裝料制度.PV,-99999, CurTime, Millisecond);//裝料制度0表示為P
InsertHisData2(580焦3上料量.PV, -99999, CurTime, Millisecond);
//沒有上料的礦
InsertHisData2(580礦總上料量.PV, -99999, CurTime, Millisecond);
//這里假設為0時為選擇焦1
if( 580焦1焦2選擇信號.PV == 0) then
InsertHisData2(580焦1上料量.PV, 580西焦稱重.PV, CurTime, Millisecond);
InsertHisData2(580焦2上料量.PV, -99999, CurTime, Millisecond);
else
InsertHisData2(580焦1上料量.PV, -99999, CurTime, Millisecond);
InsertHisData2(580焦2上料量.PV, 580西焦稱重.PV, CurTime, Millisecond);
endif;
endif;
礦總稱量斗開關狀態變化時腳本：
int Millisecond = $SYSTEM.Millisec;
int CurTime= $SYSTEM.LongTime;
if (580西礦稱量斗打開.PV) then
InsertHisData2(580記錄時間.PV,CurTime, CurTime, Millisecond);
InsertHisData2(580裝料制度.PV,1, CurTime, Millisecond);//1表示裝料制度為K
InsertHisData2(580焦1上料量.PV, -99999, CurTime, Millisecond);
//沒有上料的礦或焦
InsertHisData2(580球10上料量.PV, -99999, CurTime, Millisecond);
InsertHisData2(580礦1上料量.PV, 580礦1稱重E.PV, CurTime, Millisecond);
//上料的礦或焦
InsertHisData2(580礦總上料量.PV, 580西礦稱重.PV, CurTime, Millisecond);
endif;
記錄查詢顯示
對于記錄的顯示首先是通過一個隱藏的“所有歷史數據表”將選定時間范圍內的所有記錄時間檢索出來，然后再通過這個時間檢索其它記錄值，并將這些值填充到顯示表中。這個處理過程是通過“所有歷史數據表”的“事件腳本”來完成的：
“事件腳本”中的“數據刷新”腳本如下所示：
int RecordCount = #RecordTime.GetDataCount();
int RecordIndex = 1;
int i,j;
//第一個記錄的時間有可能小于開始時間
if( #RecordTime.GetVal(1,1) < #StartDate.Time ) then
RecordCount = RecordCount - 1;
RecordIndex = RecordIndex+ 1;
endif;
if( RecordCount > #List.RowCount() - 2) then
#List.AddRow(RecordCount - (#List.RowCount() - 2));
else
if( RecordCount < 18 ) then//18是本例中缺省記錄數，可根據實際情況調整
#List.DelTailRow(#List.RowCount() - 20);//20為缺省記錄數加表頭行數。
#List.ClearRowData(3,18);
else
#List.DelTailRow(#List.RowCount()-2 -RecordCount);
endif;
endif;
j=1;
for i=1to RecordCount+1step1
if( #RecordTime.GetVal(1,RecordIndex+i) == #RecordTime.GetVal(3,RecordIndex+i)) then
#list.SetVal(1, j+2, #RecordTime.GetVal(1,RecordIndex+i));
#list.SetVal(2, j+2, #RecordTime.GetVal(2,RecordIndex+i));
j=j+1;
endif;
next;
小結
本文主要是以鋼鐵的配料、上料記錄過程為例，結合工藝過程實現數據記錄和查詢顯示。對于這個示例不僅可以做為鋼鐵配料、上料記錄、數據分析顯示的原型，也可以根據它的應用特點（數據產生存儲由服務器端——數據庫腳本來完成，數據查詢顯示由客戶端腳本來完成），而將其擴展到其它行業。希望對學習使用紫金橋實時數據庫所有幫助。
|
