一种通过AutoCAD实现嵌入式驻地网传输资源全生命周期管理的方法

1、一种通过AutoCAD实现嵌入式驻地网传输资源全生命周期管理的方法【摘要】电信运营商的综合资源管理系统对资源的生命周期管理逐渐前移，需要将工程阶段的资源数据纳入管理。通过在资源管理系统中集成AutoCAD技术，可以提升工程建设与网络维护之间的资源数据衔接效率，显著提高资源管理能力。【关键词】综合资源管理系统;驻地网资源;AutoCAD1.引言电信运营商的综合资源管理系统大局部已完成了对全专业网络资源数据的统一管理，但目前管理的生命周期仅仅是各类资源的入网/运维以及退网阶段。在接下来的系统建设中，需要将逐步将管理的范围前移，实现对工程、设计阶段的资源数据进行管理。驻地网资源管理是综合资源管理系统

2、的传输专业的重要组成局部，本文主要探讨如何将驻地网工程阶段的数据纳入传输管线系统管理范围，提升工程建设与网络维护之间的资源数据衔接效率。2.现状根据资源生命周期，我们将资源管理划分为“规划-设计-工程-使用-维护-退网六个阶段。在目前的工程设计阶段，驻地网资源管理一般采用AutoCAD进行设计并输出图纸。这样的处理过程有明显的缺点：1不能实现设计阶段与施工维护阶段的无缝对接。2资源维护人员需要在两个系统上重复录入维护同一套数据，管理效率很低。为解决上述问题，需要对现有传输管线系统进行扩展，增加图纸设计功能。3.实现方案3.1整体框架系统整体框架是将现有传输管线系统与AutoCAD实现无缝整合，

3、工程设计人员可以直接在传输管线系统中调用AutoCAD功能进行驻地网资源的工程设计与出图。图13.2关键技术点本方案主要通过ActiveXAutomation和AutoLisp技术实现AutoCAD的集成。3.2.1ActiveXAutomationActiveXAutomation是一种使Windows应用程序实现互联互通的技术，其前身是OLEAutomation技术。ActiveXAutomation由两局部实现：AutomationServer和AutomationController。3.2.1.1AutoCAD的Automation对象模型AutoCAD的ActiveXAutomat

4、ion对象体系处于最高层的对象是Application应用对象，包含了AutoCADActiveXAutomation对象所提供的全部功能。在Application之下的是Preferences和document对象。Preferences对象等于AutoCAD的Preferences界面，用于设置与存放AutoCAD的各种系统参数。document对象表示当前在AutoCAD中处于激活状态的图形文件，通过该对象实例可以对激活的图形文件进行所有的操作。3.2.1.2调用AutoCADAutomationServer以下代码为在传输管线系统中调用AutoCADAutomationServer、实

5、现无缝整合AutoCAD功能的应用实例：acadApp：=CreateOleObjectautocad.application;ifnotVarisEmptyacadAppandnotVarisNullacadAppthenbeginacadApp.Preferences.System.SingledocumentMode：=False;Windows.SetParentacadApp.HWND，ParentPnl.Handle;Windows.SetWindowPosacadApp.HWND，HWND_TOP，0，0，ParentPnl.Width，ParentPnl.Height，SWP_

6、NOACTIVATE;/生成文档对象实例并与AutoCAD的當前活动文档建立连接CurrDoc：=TAcaddocument.Createnil;CurrDoc.ConnectToIUnknownacadApp.ActivedocumentasIAcaddocument;/遍历当前活动文档中的所有图形对象p3：=VarArrayCreate0，2，VarDouble;forIdx：=0toCurrDoc.ModelSpace.Count-1dobegin/读取图形对象的类型名称与ID、句柄HANDLE以及其他属性pName：=IUnknownCurrDoc.ModelSpace.ItemIdx

7、asIAcadEntity.EntityName;pID：=inttostrIUnknownCurrDoc.ModelSpace.ItemIdxasIAcadObject.ObjectID;pHandle：=IUnknownCurrDoc.ModelSpace.ItemIdxasIAcadObject.Handle;/读取图形对象的中心点坐标IUnknownCurrDoc.ModelSpace.ItemIdxasIAcadEntity.GetBoundingBoxp1，p2;p30：=p10+p20/2;p3【1】：=p1【1】+p2【1】/2;p3【2】：=p1【2】+p2【2】/2;/将图

8、形对象信息写入数据库WriteToDB;end;End;3.2.1.3AutoCAD事件处理Automation对象除了提供大量对象方法供客户端程序调用AutoCADAutomationServer的各种功能，还提供了丰富的事件消息类型，可以让客户端捕获AutoCAD运行过程中产生的各种事件并进行相应的处理。/向AutomationServer注册需要接收的事件CurrDoc.OnObjectAdded：=ObjectAdded;/当用户在AutoCAD中手工选择的图形对象发生改变时，将会/触发OnSelecionChanged事件CurrDoc.OnSelectionChanged：=Sel

9、ectionChanged;CurrDoc.OnBeginDocClose：=OnBeginDocClose;CurrDoc.ConnectToIUnknownacadApp.ActivedocumentasIAcaddocument;/OnSelectionChanged事件处理过程procedureTACADForm.SelectionChangedSender：TObject;begin/遍历document对象的选择集，获取在AutoCAD的当前活动/文档中被选中的图形对象fori：=0toCurrDoc.PickfirstSelectionSet.Count-1dobegin/从数据

10、库读取图形对象的详细属性GetDetailInfofromDBCurrDoc.PickfirstSelectionSet.Itemi.EntityName，CurrDoc.PickfirstSelectionSet.Itemi.ObjectID;/將详细信息展示在界面上end;end;3.2.2AutoLISP语言对于某些比较特殊的操作效果比方选定图形文件中某个图元，然后居中定位并高亮显示，Automation对象暂时还无法提供很好的实现方法，这个时候就需要使用AutoCAD本身自带的、能提供更加底层的控制功能的AutoLISP语言来实现。图2效果图以下的代码实例，就是使用AutoLISP语言

11、，根据指定的图形对象id，在图形文件中进行居中定位和高亮显示：IHighlightEntity：IAcadEntity;SelVariant，p1，p2：OleVariant;/根据ID获取图形对象IHighlightEntity：=CurrDoc.ObjectIDToObjectiObjectIDasIAcadEntity;/定位并缩放，将所选的图形对象置于屏幕中心IHighlightEntity.GetBoundingBoxp1，p2;p10：=p10-50;p1【1】：=p1【1】-50;p20：=p20+50;p2【1】：=p2【1】+50;acadApp.ZoomWindowp1，p

12、2;/向AutoCAD发送AutoLISP指令，将选中的对象高亮显示CurrDoc.SendCommandsetqoursetnilsetqe1handent+IUnknownIHighlightEntityasIAcadObject.Handle+setqoursetssadde1sssetfirstnilourset+#13;3.3集成方案3.3.1定义标准的资源CAD图元平常的CAD图纸，都用某种图元代表某种资源对象。因此，集成AutoCAD后，我们通过在传输管线系统中扩展一套标准化的资源CAD图元，并且图元拥有资源属性。3.3.2提供标准化的资源图纸设计界面当使用图元进行绘图时候，通过

13、Automation调用AutoCAD的功能，可以实现和AutoCAD一样的绘图操作功能。我们可以让图纸设计界面延续设计人员画图习惯。3.3.3提供资源数据到CAD图纸的转换因为资源对象和CAD图元有了对应关系，现在可以将存量资源数据进行导出，转化为图元，生成AutoCAD图纸。3.3.4与工程管理流程的结合集成了AutoCAD之后，综合资源管理系统具备了驻地网资源的“图纸在线设计功能。以前独立于资源管理生命周期之外的工程阶段设计图纸，也能够纳入资源系统中进行管理。4.应用效果在传输管线系统中整合了基于AutoCAD的驻地网资源管理模块后，维护人员对驻地网资源数据的处理速度和效率得到了极大的提升，比之前需要先在AutoCAD中画图然后在传输管线系统再重复录入一遍的方式，平均提高了1012倍。5.结束语通过集成AutoCAD实现对工程阶段的资源进行管理，有利于提升工程建设与网络维护之间