VBA 编程在川气东送光传输系统中的研究与应用.docVIP

VBA 编程在川气东送光传输系统中的研究与应用 　　摘 要：开展VBA编程在光传输系统中的研究与应用，并设计实现光功率数据统计分析系统，使我们站场工作人员可以快速地从链路大量离散数据中提取、统计、分析出传输网络上各网元光板的收发功率并对应计算出各通道衰减值。可以通过此系统，将光传输系统原始离散数据与更多的数据分析要求做关联研究，帮助我们掌握更多的重要参数和技术积累。 　　关键词：VBA；光传输；数据分析 　　1 本文研究内容 　　本文关于光功率数据统计分析系统的设计与实现基于VBA编程。VBA作为VB编程的简易衍生，具备学习简单、实现办公功能便捷快速的优点，同时与word、excel、access、sql、vfp等众多数据文本程序兼容，能够快速实现ERP和专业数据分析等针对性功能，帮助工作人员进行各种数据分析与处理。通过本文可以很好地论证这一课题的可行性。 　　2 VBA开发光功率数据统计分析系统的研究 　　2.1 系统功能概述 　　 　　上图根据项目部川气东送武汉调控中心对光传输系统日常维护工作要求和流程，构建流程图描述。 　　以图示流程作为程序系统的运行流程，构建程序代码描述，实现预期功能，替代人力完成月度繁琐工作，从而进行程序运行测试和对VBA编程的应用探讨。 　　2.2 设计算法流程 　　根据2.1部分流程图，设计算法可以分以下几个步骤： 　　①导出单板收发光功率数据。首先单板收发光功率数据是离散无规律数据，而且因设备多所以离散数据量也很大，由光传输网管系统导出产生。 　　②设定离散数据对应的战场名和光板型号为判断条件，利用自己编写的取值函数从第一步骤得到的离散数据中快速生成判断条件数据。 　　③用冒泡排序计算机算法快速比较判断条件数据，当条件一致，将对应数据填入相应的单元格。 　　④用差值法将链路上对应的两块光板的当月的收发功率数据取差值，从而得到当月链路的通道衰减值。 　　⑤每个月以随机抽样的方式按上述步骤得到每个月的通道衰减值。从而实现全年的光功率数据统计分析。 　　2.3 功能代码实现分析 　　2.3.1 光功率收发功率离散数据判断条件生成。把当月的原始数据中的端口信息分离提取出两个条件，一个为站场，一个为板型。如下图所示： 　　 　　图示端口信息直接从原始数据中粘贴至固定位置，条件生成按钮与这一部分代码所属函数关联，点击运行站点和板型就从端口信息中提取出来。 　　2.3.2 使用冒泡排序算法自动将条件成立的收发功率数据填入对应信息表。VBA代码利用FOR循环语句对站点和板型两个条件进行快速判断的方法实现冒泡排序算法。实现自动准确的数据导入对应位置功能。点击第一步视图中的第二个按钮数据导入，程序运行实现功能。 　　2.3.3 套用光功率衰减计算公式。 　　2.3.4 报表日期生成代码。 VBA编程有专门的日期自动生成函数Today函数，但是这类函数是自动更新日期功能的，在对全年统计分析工作有要求的情况下，当月的函数运行会造成前几个月的时间进一步更新编程同一日期时间。故当月日期生成采用原始设计方法手动设定参数程序自动填入的算法。 　　2.3.5 以上4步就是当月的完整数据录入步骤，每个月按步骤点击跟相应程序关联的前端按钮完成操作。最终得到全年数据，就可以展开数据当年的整体分析。本系统还增设清除数据功能，可以让系统反复复制使用，最终形成若干年的整体性数据。 　　3 VBA开发光功率数据统计分析系统的应用 　　3.1 光功率统计分析 　　川气东送管道分公司光传输网络受制于其自身产业特点，基本按长链式分布，且西起四川，东至上海，沿天然气管道布局，穿越多种地形，全长2800多公里。因此结合光传输系统日常维护要求和甲方对光传输系统的极大依赖及要求，项目部人员不仅要及时了解链路通断情况，还要定期采集各网元、收发离散数据，还要通过计算得出对应的通道衰减值从而形成系统统计数据，以便工作人员对链路使用情况等有系统的了解掌握。 　　以往，项目部调控中心工程师每个月需要将设备厂商的光传输网管导出的各站场网元光板的收光功率和发光功率离散数据逐一查找填入统计文档表格对应的站场光板数据项中，再将对应的光板收发功率差值得出通道衰减值。最终形成一年12组数据。由于川气东送光传输战场多，链路长，故上述操作耗时耗力，且易出错。 　　而自用VBA实现光传输数据统计分析系统后，上述工作全部程序自动完成，操作简单，运行稳定准确，为项目部线上工作人员节约大量人力物力。通过对光传输网管功能的补充，使项目部对光传输系统的维护更加专业化，面对甲方的严格要求也能从容面对。操作界面见下图： 　　 　　3.2 拓展功能分析 　　上述功能是为了实现数据的纵横比较： 　　①各离散值与厂家给出的对应参考值比较