仪表安装图材料自动统计方法①

荀中正

(湖南百利工程科技股份有限公司)

仪表安装图材料自动统计方法①

荀中正

(湖南百利工程科技股份有限公司)

介绍了一种不需要制作材料库，利用Truetable、AutoLISP和数据透析表功能进行仪表安装图材料自动统计的方法。它不仅修改方便，而且简单灵活，实用性强，提高了自控设计的工作效率和正确性。

仪表安装图 Truetable AutoLISP 自动提取 数据透视表

在仪表专业设计过程中，仪表安装材料主要包括安装图材料、电缆敷设材料、供气材料、接地材料和伴热绝热材料五大部分，其中又以仪表安装图材料部分最难统计，它涉及的图纸量大，材料种类和规格繁多。目前各设计单位对于安装图材料的统计方法主要有：打印安装图后逐项手动统计，此方法劳动强度大，且非常容易出错；编制自己单位对应风格的安装图软件包[1]，要求设计人员相当精通VBA等二次开发，对于一些中小型规模的单位，较难实现；利用AutoXlsTable等软件实现AutoCAD和Excel材料同步，利用VB编程软件对Excel进行宏的编制，实现自动统计[2]，此方法也需要设计人员比较精通编程软件，同时需要编制Excel材料库等，安装图换版或者标准、材料更新，维护量也比较大。

笔者针对这些情况，探讨了一种利用AutoCAD、Excel、Truetable和AutoLISP软件快速实现仪表安装图材料自动统计的方法。

1 概略程序框图

安装图材料自动统计概略程序框图如图1所示，首先需要对AutoCAD格式的安装图进行整理[3]，项目中选取本项目采用的安装图，按格式填写仪表位号，完成单张仪表安装图材料统计，然后利用Truetable软件和AutoLISP自动把安装图里面的材料提取到安装图材料统计工作表模板中，再运用Excel的数据透析表功能完成安装图材料的自动汇总。

图1 概略程序框图

2 工具介绍

笔者介绍的安装图材料自动统计需要用到AutoCAD、Excel、Truetable和AutoLISP软件。

AutoCAD(Auto Computer Aided Design)用于二维绘图、详细绘制、设计文档和基本三维设计。AutoCAD具有良好的用户界面，通过交互菜单或命令行方式便可以进行各种操作。它的多文档设计环境，让非计算机专业人员也能很快地学会使用，在不断实践的过程中更好地掌握它的各种应用和开发技巧，从而不断提高工作效率。

Excel可以灵活地对数据进行整理、计算、汇总、查询及分析等处理。

Truetable(真实表格)是一款基于AutoCAD平台的软件，能够在AutoCAD和Excel间互导表格，能输出、更新AutoCAD中的任意表格。

AutoLISP是一种LISP程序语言(LISP是List Processor的缩写)。AutoLISP是编写绘图、编辑图形等程序的表处理语言，易学易用且功能强大。通过AutoLISP程序可以辅助AutoCAD制图提高工作效率。

3 安装图材料自动统计方法

3.1 前期准备

3.1.1 安装图的整理

在执行程序之前必须先根据HG/T 21581-2012《自控安装图册》整理本单位风格的AutoCAD版安装图，安装图标准图框可以采用可编辑的属性图块，方便图纸统一化管理，安装图材料表格建议采用标准命名的图块，材料表格根据材料行数设置“M-1”～“M-9”常用的9个图块，安装图材料表格里面的材料文字统一采用字高3.0，宽度比例0.75的单行文字。安装图材料表格样式和9种材料表格图块样式中的“M-5” 如图2所示。

图2 安装图材料表格样式和9种材料表格图块样式之 “M-5”

3.1.2 制作安装图材料统计工作表模板

安装图材料统计工作表模板用Excel制作，主要用于存储提取的AutoCAD安装图中的材料，模板如图3所示。为了方便统计材料，根据笔者的经验，表格字体、高度等设置如下：

字号字体 宋体，12号

行高 20

列宽

A、B列 10

C列 60

D列 15

E列 12

F列 12

G列 20

图3 安装图材料统计工作表模板

3.1.3 安装图材料统计工作表模板调用

把制作好的安装图材料统计工作表模板放在AutoCAD支持的路径目录下，制作调用模板程序的AutoLISP文件，制作好之后同样放在AutoCAD支持的路径目录下加载，即可用命令调出安装图材料统计工作表模板。调出安装图材料统计工作表模板的AutoLISP核心程序为：command "start" "安装图材料统计工作表模板.xls"[4]。

3.1.4 Truetable软件设置

由于AutoCAD的一些特殊符号导入到Excel时会以AutoCAD中符号输入形式存在，需进行替换，才能在Excel中以正确的形式存在。根据笔者的经验，Truetable软件的文本替换选项常规设置包括：“%%C”对应“Φ”，“%%d”对应“°”，“%%P”对应“±”等。为了把AutoCAD安装图文件中的材料，分别一张一张连续提取到打开的安装图材料统计工作表模板中，Truetable软件的输出设置选项需要设置为“连续输出”。

3.2 安装图(AutoCAD)文件中的材料输出到Excel

安装图(AutoCAD)中材料可以采用Truetable软件的“批量输出表格”功能，连续选取材料区域表格导入到Excel安装图材料统计工作表模板中，但是手动执行对于多张AutoCAD安装图文件需要一张一张地选取，也非常容易出现差错，工作效率也比较低。笔者采用简单AutoLISP代码自动提取，每张AutoCAD安装图文件提取材料之后，对此材料区域采用高亮的临时虚线予以提示，防止材料漏统计，下面给出两种实现方案。

第1种方案安装图标准图框采用可编辑属性块，对单张图里面的材料表格没有要求，流程如图4所示。

图4 安装图标准图框采用可编辑属性块的流程

第2种方案对安装图图框没有要求。但是对于单张图里面的材料表格需要采用固定名称的图块。一般每张安装图的材料行数为1～9行，制作9种材料表格图块与之一一对应，并分别命名为“M-1”～“M-9”。安装图材料表格采用固定名称块的流程如图5所示。

图5 安装图材料表格采用固定名称块的流程

两种方案的核心AutoLISP源代码[5]如下：

(setq azt_clk (ssget ′((0 . "INSERT"))))

;;获取选取区域内的块对象

(setq ss (ssget (cons blockname slist)))

;;获取选取区域内的固定块名的块对象

(setq blkname (cdr (assoc 2 (entget (ssname azt_clk index0)))))

;;依次取选择集里面块名称

(setq clk_point (cdr (assoc 10 (entget (ssname azt_clk index0)))))

;;依次取选择集里面块插入点坐标

(setq AZT-L (ssget "w" pt1 pt2))

;;根据块插入点获取安装图材料表格左下角点和右上角点，通过两点获取两点内框选对象

(command "truetable" "E" AZT-L "" "")

;;调用Truetable输出函数，输出表格内容至已打开关联的安装图材料统计工作表模板

3.3 Excel的数据透视表功能

Excel的数据透视表功能是一项非常强大的功能[6]。数据透视表是一种交互式的表，可以进行某些计算，如求和、计数等，并且可以动态地改变它们的版面布置，以便按照不同方式分析数据，也可以重新安排行号、列标和页字段。每一次改变版面布置时，数据透视表会立即按照新的布置重新计算数据。另外，如果原始数据发生更改，则可以更新数据透视表，完成重新统计。

前面把AutoCAD安装图中的材料提取到Excel的安装图材料统计工作表模板后，执行“数据”菜单下的“数据透视表和数据透视图”功能，选择“新建工作表”，一般材料汇总参数只需要“材料名称及规格”、“材料材质”两项，因此把“材料名称及规格”、“材料材质”两项拖动到行字段作为分类依据，把“总数量”拖动到列字段，作为求和项，Excel自动会完成安装图材料分类汇总[7]。应用数据透视表整理安装图材料非常实用、快捷。整理后的安装图材料汇总表如图6所示。

图6 安装图材料汇总表

4 存在问题的改进

由于仪表安装图涉及的仪表测量管路所用阀门、管件、法兰及紧固件等材料规格非常多，使用上述方法使统计效率得到了大幅提高，并且不容易出错，但是因为AutoCAD安装图中材料规格多，同一种材料在多张安装图中出现，如果个别字符不一致，会导致分类统计、汇总分类比较多，相对采用Excel材料库统计方法后期还需要人为区分才能汇进仪表材料表，只能在安装图整理初期尽量保证同一材料在多张AutoCAD安装图中的统一性，避免此类情况。

5 结束语

仪表安装图材料自动统计方法在许多工程中得到了应用。利用Truetable、AutoLISP软件把AutoCAD中的材料自动提取到Excel模板，然后利用Excel的数据透视表功能进行安装图材料自动统计，成功解决了当前AutoCAD图形文件材料统计效率不高的问题，同时也提高了自控设计工作的准确性。

[1] 赵正光.利用电子表格软件进行仪表安装图的材料统计[J].石油化工自动化,2001，37(5):7～8.

[2] 陈松华.仪表安装材料的自动统计[J].石油化工自动化,2010,46 (4):51～53.

[3] HG/T 21581-2012，自控安装图册[S].北京:中国计划出版社,2012.

[4] 二代龙震工作室.AutoCAD LISP/VLISP函数库查询词典[M].北京:中国铁道出版社，2003.

[5] 李学志.Visual LISP程序设计[M].北京:清华大学出版社,2010.

[6] 苏雪峰.Excel在仪表工程设计中的若干应用[J].化工自动化及仪表,2013,40(7):947～950.

[7] Excel Home.Excel数据透视表应用大全[M].北京:人民邮电出版社,2009.

AutomaticStatisticalMethodforMaterialsStipulatedbyInstrumentInstallationDrawings

XUN Zhong-zheng

(HunanBailiEngineeringScience&TechnologyCo.,Ltd.)

The automatic statistical method which asking for no material database was introduced, including application of Truetable, AutoLISP and Pivottable to automatically count materials stipulated by the instrument installation drawing. This method has characteristics such as simple and flexible structure, strong practicability and high work efficiency and correctness in control design.

instrument installation drawing,Truetable, AutoLISP,automatic extraction, Pivottable

TH86；TP391

B

1000-3932(2017)08-0763-04

2017-01-20，

2017-04-07)

荀中正(1986-)，工程师，从事自动控制的设计工作，xunzhongzheng20@163.com。