化肥生产软件：Wonderware InTouch二次开发_9.报警与事件管理.docx

PAGE1

PAGE1

9.报警与事件管理

在化肥生产过程中，报警与事件管理是确保生产安全和高效运行的关键环节。本节将详细介绍如何在WonderwareInTouch中进行报警与事件管理的二次开发，包括报警的配置、事件的记录与处理、报警画面的设计与优化等内容。

9.1报警配置

报警配置是报警与事件管理的基础步骤，通过配置报警，可以确保在生产过程中及时发现和处理异常情况。WonderwareInTouch提供了多种报警类型和配置方法，本小节将详细介绍如何配置不同类型的报警。

9.1.1报警类型

WonderwareInTouch支持多种报警类型，包括：

数字报警：当某个数字变量超过或低于设定的阈值时触发报警。

模拟报警：当某个模拟变量的值在设定的范围内变化时触发报警。

状态报警：当某个状态变量发生变化时触发报警。

定时报警：在特定时间点或时间段内触发报警。

复合报警：当多个条件同时满足时触发报警。

9.1.2报警配置步骤

创建报警组：

在InTouch的报警管理器中，创建一个新的报警组。

为报警组命名，例如“温度报警组”。

设置报警组的属性，如报警级别、报警声音等。

添加报警点：

在报警组中添加报警点，选择需要监控的变量。

为每个报警点设置报警条件，例如温度变量超过100°C时触发报警。

设置报警点的优先级、描述等属性。

配置报警动作：

在报警点的属性中，配置报警触发时的动作，例如记录报警信息、发送邮件通知等。

可以使用InTouch的脚本功能，编写自定义的报警处理脚本。

9.1.3代码示例：自定义报警处理脚本

假设我们需要在温度超过100°C时记录报警信息并发送邮件通知，可以使用以下VBA脚本：

SubOnTemperatureAlarm()

获取当前温度值

DimcurrentTemperatureAsDouble

currentTemperature=GetTagValue(TemperatureTag)

检查温度是否超过100°C

IfcurrentTemperature100Then

记录报警信息

LogAlarm温度超过100°C，当前温度为:currentTemperature

发送邮件通知

SendEmailtemperature@,紧急报警：温度异常,当前温度为currentTemperature，请立即处理。

EndIf

EndSub

获取标签值的函数

FunctionGetTagValue(tagNameAsString)AsDouble

GetTagValue=STagValue(tagName)

EndFunction

记录报警信息的函数

SubLogAlarm(messageAsString)

将报警信息记录到日志文件中

OpenC:\Logs\AlarmLog.txtForAppendAs#1

Print#1,Now-message

Close#1

EndSub

发送邮件的函数

SubSendEmail(toAddressAsString,subjectAsString,bodyAsString)

使用InTouch的内置函数发送邮件

SMTPTagSendMailSMTPServer,toAddress,,,,subject,body,False

EndSub

9.2事件记录与处理

事件记录是确保生产过程可追溯的重要手段，通过记录事件，可以分析生产过程中的异常情况，优化生产工艺。本小节将详细介绍如何在InTouch中进行事件记录与处理。

9.2.1事件记录

创建事件记录器：

在InTouch的事件管理器中，创建一个新的事件记录器。

为事件记录器命名，例如“生产事件记录器”。

设置事件记录器的存储位置，如SQL数据库或文本文件。

配置事件记录点：

在事件记录器中添加事件记录点，选择需要记录的变量。

为每个事件记录点设置记录条件，例如每5分钟记录一次生产数据。

设置事件记录点的描述和格式。

9.2.2事件处理

事件处理脚本：

使用InTouch的脚本功能，编写事件处理脚本。

事件处理脚本可以在事件发生时自动执行，例如记录数据、发送通知等。

事件分析：

通过事件记录数据，进行生产过程的分析和优化。

可以使用数据分析工具，如Excel或SQL查询，进行事