基于EPS2008的管线接边方法研究

2015-02-19赵海涛刘启福

测绘通报 2015年3期

关键词：管线测绘方法

赵海涛，王　鹏，刘启福

(济南市勘察测绘研究院，山东济南 250013)

Research on Edge Match Method of Pipeline Based on EPS2008

ZHAO Haitao，WANG Peng，LIU Qifu

基于EPS2008的管线接边方法研究

赵海涛，王鹏，刘启福

(济南市勘察测绘研究院，山东济南 250013)

Research on Edge Match Method of Pipeline Based on EPS2008

ZHAO Haitao，WANG Peng，LIU Qifu

摘要：基于EPS2008软件，提出了一种以计算机自动处理为主、人工参与为辅的管线接边新方法，并通过VBScript编程实现。实际应用表明，与传统的管线接边方法相比，该方法大大提高了管线接边效率，改善了接边质量。

关键词：地下管线探测；管线接边；EPS2008；计算机自动处理

一、引言

在一般地下管线探测工程、管线普查等的内业编绘、管线的建库、更新入库时，由于新旧测量数据存在重复，可能出现重点重线，或者由于测量误差使本来连接的管线没有相接，这时需要进行管线的接边处理，图1为管线接边处理示意图。传统的管线接边方法以人工参与为主，接边效率较低，且容易出错，特别是在管线建库过程中，大量的工程需要两两接边，且接边处往往管线复杂、凌乱，传统的管线接边方法将大大影响数据预处理的效率和质量。本文基于EPS2008地理信息工作站基础平台(以下简称EPS2008)，提出了一种以计算机自动处理为主、人工参与为辅的管线接边新方法，以期提高管线接边的效率，改善接边质量。

图1　管线接边处理示意图

二、传统的管线接边方法

依据常用的管线编辑平台，将管线接边方法分为两种：基于AutoCAD的管线接边方法和基于EPS2008的管线接边方法。

1. 基于AutoCAD的管线接边方法

DWG格式的两张管线图接边的方法一般是在AutoCAD平台下以一张图为底图，确定需要接边的管点，然后打开另一张图，手工删除重叠的管线(点)，将其插入底图，在接边处一一进行管线拖动，查看修正接边管线的管径、埋深等属性，查看全图删除多余的管线管点。

此类方法在一般的管线探测工程接边处理中使用较为普遍，方法易学易懂，但接边时需要人工判断接边管点、手工删除多余管线、逐一进行管点连接，而且接边过程中需要在两张图上多次切换，接边效率低下，易发生线点连接错误，影响管线接边质量。

2. 基于EPS2008的一般管线接边方法

EPS2008是北京清华山维新技术开发有限公司研发的面向测绘、基础地理信息生产的软件系统。该软件从地理信息系统应用的角度构建数据模型，综合CAD技术与GIS技术，以数据库为核心，将图形和属性关联为一体，EPS工程数据文件可实现图形和属性数据的存储。该平台下的管线测绘模块可实现管线内业编绘。EPS脚本语言遵循VBScript和JScript语言标准，支持用户进行EPS平台数据整理、数据转换等的二次开发。

在EPS工作空间中同种类型的数据可以叠加管理，不同类型数据(4D数据)亦可叠加显示，实现新旧图形对照等。

基于EPS2008的一般管线接边方法为：将两张待接的管线图放入同一工作空间，将一幅图上的管线变为灰色，另一张图上的管线保持彩色，这样即可很明显地看出重叠交叉的部分和需要接边的管线；以一张图为主，手工删除另一张图上重叠交叉的管线，保存并关闭该图；将该图插入主图，合并为一幅图，在接边处拖动管线，将相应管线正确接边，并查看修正管线对应属性。

与AutoCAD平台下的管线接边方法相比，此种方法可将两张图放入同一工作空间进行图形对照，省略了在AutoCAD中两张图来回切换的过程，接边效率略有提高。但此种方法仍以手工参与为主，容易发生管线接边错误。

三、基于EPS2008的新的管线接边方法

1. 方法原理

一般需要接边的两张管线图(图A、图B)探测时间不同，图A探测时间比图B探测时间晚，假设图A现势性好于图B，设定图A为新图，管线颜色为彩色，设定图B为旧图，所有管线颜色变为灰色；将图B插入图A，保证图B管线(点)置于图A管线(点)之上，统一删除与彩色管线(点)重合的灰色管线(点)，单独处理与彩色管线(点)位置交叉的管线(点)；图上灰色与彩色管线分界线清晰可见，该处即为新旧图的接边处，拖动灰色管线与对应彩色管点连接，查看修正管线对应属性。接边方法流程如图2所示。

图2　新的管线接边方法流程

2. 方法实现

以上方法通过编写VB脚本程序得以实现。其主要代码如下：

1) 改变图形颜色：

'建立选择集，将点、线颜色改为灰色

SSProcess.PushUndoMark

SSProcess.ClearSelection

SSProcess.ClearSelectCondition

SSProcess.SetSelectCondition

"SSObj_LayerName", "==",layername

SSProcess.SetSelectCondition

"SSObj_Type", "==", "LINE"

SSProcess.SelectFilter

If XJ="旧" then Process.ChangeSelectionObjAttr "SSObj_Color", "RGB(192,192,192)"

2) 删除旧图中重复管线(点)：

for i=0 to gpoint-1

ppid = SSProcess.GetSelGeoValue( i,

"SSObj_ID")′线的ID

pcode=SSProcess.GetSelGeoValue( i,

"SSObj_Code")′线的编码

SSProcess.GetSelGeoPoint

i,0,x1,y1,z1,pt,name1′线起点空间信息

SSProcess.GetSelGeoPoint

i,1,x11,y11,z11,pt,name1′线终点空间信息

ids=""

ids = SSProcess.SearchNearObjIDs(x1, y1, 0.01, 1, pcode, ppid)′ids可能为多个ID

a=0

for j=1 to len(ids)

ifmid(ids,j,1)=","or j=len(ids) then

if j=len(ids) then

idls=mid(ids,a+1,j-a)

else

idls=mid(ids,a+1,j-a-1)

end if

a=j

ND = SSProcess.GetObjectAttr( idls, "[管线新旧]")

x0=SSProcess.GetObjectAttr( idls, "SSObj_X(0)")

y0=SSProcess.GetObjectAttr( idls, "SSObj_Y(0)")

x2=SSProcess.GetObjectAttr( idls, "SSObj_X(1)")

y2=SSProcess.GetObjectAttr( idls, "SSObj_Y(1)")

if ND="旧" and abs(x0-x1)<0.01 and abs(y0-y1)<0.01 then′表示起点相同

ifabs(x2-x11)<0.01 and bs(y2-y11)<0.01 then ′表示终点相同

SSProcess.DeleteObject idls′删除旧重复线

end if

elseifND="旧" and abs(x2-x1)<0.0005

and abs(y2-y1)<0.01 then

ifabs(x0-x11)<0.0005 and

abs(y0-y11)<0.01 then

SSProcess.DeleteObject idls'删除旧重复线

end if

3) 重建点线连接关系：

SSPipe.GxReBuildRelation′自动建立接边处点线内部连接关系

图3为管线接边工具栏。

图3　管线接边工具栏

该方法实现了接边过程中删除重合管线点的自动处理关键环节，完成了接边的大部分工作，人工参与较少且操作简单，大大提高了管线接边效率和接边质量。

四、应用实例

2012年4月笔者所在单位启动了济南市地下空间管线数据建库项目，建库管线原始数据来自单位2005—2012年以来积累的所有管线探测工程资料。这些管线数据量庞大、工程年度跨度大、现势性参差不齐，管线重叠交叉严重，给管线入库前的数据整理带来了一定难度。采用基于EPS2008的新的管线接边方法，将接边过程中大量的工作交由计算机处理，大大提高了数据整理的速度，减少了人工参与可能产生的错误，保证了接边的质量和项目的进度。图4、图5为使用新方法对玉兴路管线工程图与水厂路管线工程图进行接边的实例。

图4　两图叠加后管线图

五、结束语

为更好地应用本文提出的管线接边新方法，最大化地提高计算机自动处理程度，避免重复探测，节约成本，建议在管线探测工程中充分利用已有资料，特别是在管线点位误差范围内尽可能地利用原有点位。本文提出的管线接边新方法在删除旧图中重复实体环节时只将点位完全重合(点位偏差小于0.01 m)的管线(点)自动删除，未考虑同一管线(点)由于探测误差的存在而不完全重合的情况，在今后的研究中应将上述情况考虑进去。