一種通過AutoCAD實現嵌入式駐地網傳輸資源全生命周期管理的方法

林文鋒

【摘要】電信運營商的綜合資源管理系統對資源的生命周期管理逐漸前移，需要將工程階段的資源數據納入管理。通過在資源管理系統中集成AutoCAD技術，可以提升工程建設與網絡維護之間的資源數據銜接效率，顯著提高資源管理能力。

【關鍵詞】綜合資源管理系統;駐地網資源;AutoCAD

1.引言

電信運營商的綜合資源管理系統大部分已完成了對全專業網絡資源數據的統一管理，但目前管理的生命周期僅僅是各類資源的入網/運維以及退網階段。在接下來的系統建設中，需要將逐步將管理的范圍前移，實現對工程、設計階段的資源數據進行管理。

駐地網資源管理是綜合資源管理系統的傳輸專業的重要組成部分，本文主要探討如何將駐地網工程階段的數據納入傳輸管線系統管理范圍，提升工程建設與網絡維護之間的資源數據銜接效率。

2.現狀

根據資源生命周期，我們將資源管理劃分為“規劃-設計-工程-使用-維護-退網”六個階段。在目前的工程設計階段，駐地網資源管理一般采用AutoCAD進行設計并輸出圖紙。這樣的處理過程有明顯的缺點：

（1）不能實現設計階段與施工維護階段的無縫對接。

（2）資源維護人員需要在兩個系統上重復錄入維護同一套數據，管理效率很低。

為解決上述問題，需要對現有傳輸管線系統進行擴展，增加圖紙設計功能。

3.實現方案

3.1 整體框架

系統整體框架是將現有傳輸管線系統與AutoCAD實現無縫整合，工程設計人員可以直接在傳輸管線系統中調用AutoCAD功能進行駐地網資源的工程設計與出圖。

圖1

3.2 關鍵技術點

本方案主要通過ActiveX Automation和AutoLisp技術實現AutoCAD的集成。

3.2.1 ActiveX Automation

ActiveX Automation是一種使Windows應用程序實現互聯互通的技術，其前身是OLE Automation技術。ActiveX Automation由兩部分實現：Automation Server和Automation Controller。

3.2.1.1 AutoCAD的Automation對象模型

AutoCAD的ActiveX Automation對象體系處于最高層的對象是Application應用對象，包含了AutoCAD ActiveX Automation對象所提供的全部功能。

在Application之下的是Preferences和Document對象。Preferences對象等于AutoCAD的Preferences界面，用于設置與存放AutoCAD的各種系統參數。Document對象表示當前在AutoCAD中處于激活狀態的圖形文件，通過該對象實例可以對激活的圖形文件進行所有的操作。

3.2.1.2 調用AutoCAD Automation Server

以下代碼為在傳輸管線系統中調用AutoCAD Automation Server、實現無縫整合AutoCAD功能的應用實例：

…

acadApp：=CreateOleObject（‘autocad.application）;

if（not VarisEmpty（acadApp）and not VarisNull（acadApp））then

begin

acadApp.Preferences.System.Single DocumentMode：=False;

Windows.SetParent（acadApp.HWND， ParentPnl.Handle）;

Windows.SetWindowPos（acadApp.HWND， HWND_TOP，0，0，

ParentPnl.Width，ParentPnl.Height，SWP_NOACTIVATE）;

//生成文檔對象實例并與AutoCAD的當前活動文檔建立連接

CurrDoc：=TAcadDocument.Create（nil）;

…

CurrDoc.ConnectTo（IUnknown（acadApp.ActiveDocument）as IAcadDocument）;

…

//遍歷當前活動文檔中的所有圖形對象

p3：=VarArrayCreate（[0，2]，VarDouble）;

for Idx：=0 to CurrDoc.ModelSpace.Count-1 do

begin

//讀取圖形對象的類型名稱與ID、句柄HANDLE以及其他屬性

pName：=（IUnknown（CurrDoc.ModelSpace.Item（Idx））as IAcadEntity）.EntityName;

pID：=inttostr（（IUnknown（CurrDoc.ModelSpace.Item（Idx））as IAcadObject）.ObjectID）;

pHandle：=（IUnknown（CurrDoc.Model Space.Item（Idx））as IAcadObject）.Handle;

//讀取圖形對象的中心點坐標

（IUnknown（CurrDoc.ModelSpace.Item （Idx））as IAcadEntity）.GetBoundingBox （p1，p2）;

p3[0]：=（p1[0]+p2[0]）/2;

p3[1]：=（p1[1]+p2[1]）/2;

p3[2]：=（p1[2]+p2[2]）/2;

…

//將圖形對象信息寫入數據庫

WriteToDB;

end;

End;

3.2.1.3 AutoCAD事件處理

Automation對象除了提供大量對象方法供客戶端程序調用AutoCAD Automation Server的各種功能，還提供了豐富的事件消息類型，可以讓客戶端捕獲AutoCAD運行過程中產生的各種事件并進行相應的處理。

…

//向Automation Server注冊需要接收的事件

CurrDoc.OnObjectAdded：=ObjectAdded;

//當用戶在AutoCAD中手工選擇的圖形對象發生改變時，將會

//觸發OnSelectionChanged事件

CurrDoc.OnSelectionChanged：=SelectionChanged;

CurrDoc.OnBeginDocClose：=OnBeginDocClose;

CurrDoc.ConnectTo（IUnknown（acadApp.ActiveDocument）as IAcadDocument）;

…

//OnSelectionChanged事件處理過程

procedure TACADForm.SelectionChanged（Sender：TObject）;

begin

…

//遍歷Document對象的選擇集，獲取在AutoCAD的當前活動

//文檔中被選中的圖形對象

fori：=0 to CurrDoc.PickfirstSelectionSet. Count-1 do

begin

//從數據庫讀取圖形對象的詳細屬性

GetDetailInfofromDB（

CurrDoc.PickfirstSelectionSet.Item（i）. EntityName，

CurrDoc.PickfirstSelectionSet.Item（i）. ObjectID）;

//將詳細信息展示在界面上

…

end;

end;

3.2.2 AutoLISP語言

對于某些比較特殊的操作效果（比如選定圖形文件中某個圖元，然后居中定位并高亮顯示），Automation對象暫時還無法提供很好的實現方法，這個時候就需要使用AutoCAD本身自帶的、能提供更加底層的控制功能的AutoLISP語言來實現。

圖2 效果圖

以下的代碼實例，就是使用AutoLISP語言，根據指定的圖形對象id，在圖形文件中進行居中定位和高亮顯示：

…

IHighlightEntity：IAcadEntity;

SelVariant，p1，p2：OleVariant;

…

//根據ID獲取圖形對象

IHighlightEntity：=CurrDoc.ObjectIDTo Object（iObjectID）as IAcadEntity;

//定位并縮放，將所選的圖形對象置于屏幕中心

IHighlightEntity.GetBoundingBox（p1，p2）;

p1[0]：=p1[0]-50;

p1[1]：=p1[1]-50;

p2[0]：=p2[0]+50;

p2[1]：=p2[1]+50;

acadApp.ZoomWindow（p1，p2）;

//向AutoCAD發送AutoLISP指令，將選中的對象高亮顯示

CurrDoc.SendCommand（‘（setq ourset nil）（setq e1（handent”

+IUnknown（IHighlightEntity as IAcad Object）.Handle

+”））（setq ourset（ssadd e1））（sssetfirst nil ourset）+#13）;

…

3.3 集成方案

3.3.1 定義規范的資源CAD圖元

平常的CAD圖紙，都用某種圖元代表某種資源對象。因此，集成AutoCAD后，我們通過在傳輸管線系統中擴展一套規范化的資源CAD圖元，并且圖元擁有資源屬性。

3.3.2 提供標準化的資源圖紙設計界面

當使用圖元進行繪圖時候，通過Automation調用AutoCAD的功能，可以實現和AutoCAD一樣的繪圖操作功能。我們可以讓圖紙設計界面延續設計人員畫圖習慣。

3.3.3 提供資源數據到CAD圖紙的轉換

因為資源對象和CAD圖元有了對應關系，現在可以將存量資源數據進行導出，轉化為圖元，生成AutoCAD圖紙。

3.3.4 與工程管理流程的結合

集成了AutoCAD之后，綜合資源管理系統具備了駐地網資源的“圖紙在線設計”功能。以前獨立于資源管理生命周期之外的工程階段設計圖紙，也能夠納入資源系統中進行管理。

4.應用效果

在傳輸管線系統中整合了基于AutoCAD的駐地網資源管理模塊后，維護人員對駐地網資源數據的處理速度和效率得到了極大的提升，比之前需要先在AutoCAD中畫圖然后在傳輸管線系統再重復錄入一遍的方式，平均提高了10～12倍。

5.結束語

通過集成AutoCAD實現對工程階段的資源進行管理，有利于提升工程建設與網絡維護之間的資源數據銜接效率，有利于加強工程建設過程管理的規范化，還有利于加強設計管理規范化。因此非常值得去嘗試，讓資源管理產生更大的價值。

參考文獻

[1]潘愛民.COM原理與應用[M].清華大學出版社，1999.

[2]Autodesk.AutoCAD 2008幫助[M].2008.

[3]Autodesk.AutoCAD 2008開發人員幫助[M].2008.

[4]中國移動設計工程階段網絡資源數據管理規范——工程管理平臺分冊_V1.0[S].2013.