家电设备监控软件：Wonderware二次开发_（7）.报警与事件管理.docx

PAGE1

PAGE1

报警与事件管理

报警管理概述

报警与事件管理是家电设备监控软件中的重要功能之一，用于及时发现和处理设备运行中的异常情况。报警管理主要包括报警的生成、存储、显示、处理和记录等功能。通过有效的报警管理，可以提高设备的运行效率，减少故障时间，确保生产过程的稳定性和安全性。

报警的生成

报警的生成通常基于设备状态和运行参数的监测。当设备的某个参数超出预设的正常范围时，系统会自动生成报警信息。报警信息通常包括报警时间、报警类型、报警描述、报警级别等。

生成报警的条件

生成报警的条件可以是多种多样的，常见的条件包括：

设备温度超过预设值

电流或电压超出安全范围

设备运行时间超过预定时间

某个传感器检测到异常信号

生成报警的代码示例

以下是一个生成报警的代码示例，假设我们使用WonderwareIntouch作为监控软件，并通过脚本语言实现报警生成。

生成报警的脚本示例

SubGenerateAlarm()

定义报警参数

DimalarmTimeAsDate

DimalarmTypeAsString

DimalarmDescriptionAsString

DimalarmLevelAsInteger

获取当前时间

alarmTime=Now

假设设备温度超出预设值

DimdeviceTemperatureAsDouble

deviceTemperature=GetDeviceTemperature()获取设备温度的函数

预设的温度阈值

DimthresholdAsDouble

threshold=80

检查温度是否超出阈值

IfdeviceTemperaturethresholdThen

alarmType=温度报警

alarmDescription=设备温度超过预设值

alarmLevel=2报警级别：2表示中等报警

生成报警

GenerateAlarmMessagealarmTime,alarmType,alarmDescription,alarmLevel

EndIf

EndSub

生成报警信息的函数

SubGenerateAlarmMessage(ByValalarmTimeAsDate,ByValalarmTypeAsString,ByValalarmDescriptionAsString,ByValalarmLevelAsInteger)

创建报警对象

DimalarmAsObject

Setalarm=CreateObject(Wonderware.Alarm)

设置报警参数

alarm.Time=alarmTime

alarm.Type=alarmType

alarm.Description=alarmDescription

alarm.Level=alarmLevel

将报警信息发送到报警日志

SendToAlarmLogalarm

EndSub

发送报警信息到报警日志的函数

SubSendToAlarmLog(ByValalarmAsObject)

获取报警日志对象

DimalarmLogAsObject

SetalarmLog=GetAlarmLog()

将报警信息添加到日志

alarmLog.Addalarm

EndSub

获取设备温度的函数示例

FunctionGetDeviceTemperature()AsDouble

假设从PLC读取温度数据

DimplcTemperatureAsDouble

plcTemperature=ReadFromPLC(TemperatureSensor)读取PLC数据的函数

GetDeviceTemperature=plcTemperature

EndFunction

读取PLC数据的函数示例

FunctionReadFromPLC(ByValtagAsString)AsDouble