监控系统报表及历史数据库系统的实现.pdfVIP

曼翌!王鏖全璺查皇[堂查至窒 查垫 监控系统报表及历史数据库系统的实现 汤春林张德智 (杂谷脑流域水电开发有限责任公司红叶二级水电厂) 摘要：本文介绍了利用DDE协议实现ABB Server2000历史数据库系统。 ABB监控系统通讯实现SQL 关键词：报表历史数据库实现 1引言 按“无人值班”(少人值守)的原则，红叶二级水电厂在进行监控系统设计中，对报表和历史数 据存储提出丁生成EXCEL报表和SQLServer2000数据库的要求，用以提供现场运行、维护、事故、 故障状态下的各种数据，为电厂安全运行、科学决策提供可靠的依据。报表和历史数据库系统采用 Vc++、VB、ASP．NET、EXCEL的VBA编程实现，运行在WINDOWS 2000系统平台上，并与ABB Freelance2000监控系统实时通讯。 2监控系统EXCEL报表 2．1系统构成 EXCEL报表系统是一个独立运行的软件系统，与ABBFreelance2000监控系统通过网络连接， Data 遵循DDE(DynamicExchange)协议。 操作系统中基于消息的协议。其数据交换总是发生在两个正在运行的程序之间，在这两个应用程序 之间相互发送和接收命令及数据。这两个程序分别称为客户和服务器程序，客户程序就是请求服务 的程序，而提供服务的程序称为服务器程序。 在该系统中，临控系统程序作为DDE服务器，EXCEL报表系统程序作为客户程序从监控系统 访问获取数据。如下图所示。 157 2004年度全国水电厂学术年会 EXCEL报表系统主要完成运行日报和运行月报数据的生成及统计，运行日报分为：电气日志、 模板工作表完成每日整点数据的生成，并计算出每日的最大、最小值；运行月报分为：电气月报、 模板工作表完成每日最大、最小值的统计，每日电能的计算及月汇总，各断路器、刀闸的分合闸次 数月统计及相应的月分合闸时间。其软件构成如下图所示。 2．2编程实现 2．2．1EXCEL报表主程序的VB6编程 2．2．1．1新建一个工程。在Forml上添加如下表一所示控件。 表一在Form上添加控件 控件类型 控件名称 属性名称 属性值 ／nterval 1000 T血ler Timerl Vbible False 2．2，1．2代码编写 · Private As xlAppExcel．Application As Sub dwMilliseconds PrivateDeclare Long) SleepLib”kernel32’’rByVal ● 双击Forml窗体上的Timed控件，在Timer过程中添加如下代码： PrivateSubTimerl Timer() 崦q建EXCEL程序实例对象 Set xlApp=CreateObject(”Excel．Application”1 ·打开运行日志EXCEL模板工作表 型竺尘型坠!：!鲨皇[堂查兰