紫金桥跨平台软件报警排名功能实现

http://www.realinfo.ltd/ 紫金桥组态论坛

实现方法

 利用紫金桥内置SQL功能查询指定时间段内的报警并按报警内容分组统计次数，然后再针对结果进行排序输出到表格显示。因为紫金桥是实时数据库而非关系库，内置SQL功能只是为了方便用户查询数据而开发出的转译查询功能，所以只支持简单查询。所以像 “ group by xx order byxx” 就不支持了，要不然一条sql查询即可完成报警统计排序功能了。

实现脚本

 ①初始化表格，sql查询历史报警

ObSql rsql;
ObTable tab;
 
table.RemoveRows(1,table.RowCount());//表格保留一行
table.ClearContent();//表格初始化,表格保留一行
 
rsql.Connect("Local");
rsql.Query("SELECT Desc,Count(Name) as cnt from hisalarmdata where DateTime>="+ToString(CurTime-3600*8)+" and DateTime<="+ToString(CurTime)+" and ACK=0 group by Desc ",tab);//查询最近8小时内报警统计次数
rsql.close();

• sql查询返回的tab内容
  
  ②对tab内容按次数进行排序
• 排序的实现
    我能想到好的排序方法是利用数组实现，如果朋友们有更好的实现方式可以私聊告知我一下，到时我再补充到文章中。数组排序有两种，一种是文本型数组按字符串排序，一种是数值型数组按数值排序，两种均可。这里以文本数组排序方式来演示。
    tab表里有2个字段数据，一个是报警内容，一个是报警次数 ，我们要按文本排序，首先就要将两个字段的数据合并成一个字符串，因为要按次数排序，所以次数要放到首位(左边)，其次为报警内容。因为排序后，为了快速从字符串里还原出次数和内容，所以两个数据间加一个特殊符号来分隔( 注意:报警内容里不能含有分隔符号 )，演示脚本以“$”来分隔。所以形成文本格式为报警次数$报警内容 如：3$液位超限_Err3

int i,cnt=tab.GetRowCount();//获得tab里记录数
 
if cnt<=0 then  //没有报警返回不继续执行
   return 0;
endif
 
string desc,almcnt,sbuff[];
 
for i=0 to cnt-1
    desc=tab.Get(i,0);
    almcnt=tab.Get(i,1);
    sbuff.add(almcnt+"$"+desc);//拼接文本添加至数组
next
 
ErrorLog("sbuff排序前.log",sbuff);//将数组内容输出到文件
 
sbuff.sort(0);//降序
 
ErrorLog("sbuff排序后.log",sbuff);

tab原始内容 ：

拼接添加倒sbuff，排序前：

排序后：

• 数组数据还原到表格里
   通过一个循环依次取出数组里的数据，然后将数据还原赋值到表格即可。

table.AddRows(cnt-1,1);//根据记录数添加表格行数
string arr[];
//数组遍历
for i=0 to cnt
     arr=StrSplit(sbuff[i],"$");//通过分隔符取出报警次数和内容 放到一个数组里
     table.SetCell(i,0,arr[1]);//向表格单元格 添加报警内容
     table.SetCell(i,1,arr[0]);//向表格单元格 添加报警数量
next

执行结果：

完善问题

 细心朋友们会发现上面的排序还是会存在一点bug的，如果数值部分位数不一样会出现排序错误。如【1,12,111,5,33,88,7】降序排序后则为【88,7,5,33,12,111,1】，可以看到顺序明显错误，这是因为文本排序是按字符逐字排序的，所以我们要统一长度，长度不满足的用符号补足即可解决问题。因为是数值，可以按下面方式处理：


完整脚本：

ObSql rsql;
ObTable tab;
table.RemoveRows(1,table.RowCount());//表格保留一行
table.ClearContent();//表格初始化,表格保留一行
 
rsql.Connect("Local");
rsql.Query("SELECT Desc,Count(Name) as cnt from hisalarmdata where DateTime>="+ToString(CurTime-3600*8)+" and DateTime<="+ToString(CurTime)+" and ACK=0 group by Desc ",tab);//查询最近8小时内报警统计次数
rsql.close();
 
int i,cnt=tab.GetRowCount();//获得tab里记录数
 
if cnt<=0 then  //没有报警返回不继续执行
   return 0;
endif
 
string desc,almcnt,sbuff[];
 
for i=0 to cnt-1
    desc=tab.Get(i,0);
    almcnt= ToString(1000000+tab.Get(i,1));
    sbuff.add(almcnt+"$"+desc);//拼接文本添加至数组
next
sbuff.sort(0);//降序
table.AddRows(cnt-1,1);//根据记录数添加表格行数
string arr[];
//数组遍历
for i=0 to cnt
     arr=StrSplit(sbuff[i],"$");//通过分隔符取出报警次数和内容 放到一个数组里
     table.SetCell(i,0,arr[1]);//向表格单元格 添加报警内容
     table.SetCell(i,1,StrToInt(arr[0])-1000000);//向表格单元格 添加报警数量
next

如果您有更好的方法，欢迎私聊。

更多技术文章，请访问紫金桥知识库：紫金桥知识库