CATIA和ACCESS二次开发在提升项目管理效率中的应用研究

李成华，周盼盼

（中航工业成都飞机工业（集团）有限责任公司，成都 610092）

CATIA和ACCESS二次开发在提升项目管理效率中的应用研究

李成华，周盼盼

（中航工业成都飞机工业（集团）有限责任公司，成都 610092）

基于CATIA，ACCCESS，Excel多种软件联合二次开发工具软件，涉及项目管理中的CATIA结构树非几何信息提取、工艺文件的管理。通过软件的使用将项目管理过程中关键环节串联为一个有机整体，改善以往项目管理中信息获取困难和过程监控不力的状态，优化了工作流程，提高了项目管理效率。

项目管理；CATIA；ACCESS；二次开发；信息提取；超链接；数据报表

0　引言

航空制造业中的零件有其自身的特点，对比其他行业的零件存在材料特殊、结构复杂、热处理、表面处理类型多、质量控制严苛、无损检测过程多等特点；从批量上讲，零件属于单件小批量生产，零件种类多。因此，航空制造业中的工艺项目管理存在数据量大，管理繁琐的特点。

项目管理主要涉及两方面的工作：一是全面把握设计端信息来源；二是有效解决制造端工艺文件管理。工艺技术部门依据设计的零件数模，编制制造大纲，完成零件的生产制造。飞机零件的设计基于CATIA平台进行，零件相关的材料、热处理、表面处理、无损检测等非几何信息都在存放在数模结构树中，因此，快速有效的获取项目零件结构树信息为项目管理的第一步。

要完成零件制造，除了编制制造大纲之外，还有数控程序、刀具清单等机加配套文件；机加完成后还需协作单位进行热处理、表面处理、无损检测等过程；多单位协同工作将产生大量技术状态协调的交接单、指示单。通常，一个机型项目相关的各种工艺文件总量上万份。管理好这些工艺文件能够监控项目的执行情况，减少现场问题的发生，从而提高项目管理效率。因此，工艺文件的有效管理为项目管理的第二步。

针对目前数据管理混乱，项目管理效率不高的现状，对CATIA数模结构树信息自动提取、工艺文件的有效管理方面进行研究，基于CATIA、ACCESS、Excel联合二次开发工具软件来解决项目管理中的难点问题。

1　CATIA结构树信息自动提取

1.1信息输出方式

目前CATIA数模信息的获取是通过人工拷贝结构树上的信息，手动汇总形成项目总信息表。由于零件数量多、工作量大，造成数据维护困难，而且人工操作也容易出错，可靠性差。为了改善现状，通过CATIA二次开发提取零件结构树信息。CATIA结构树中非几何信息如图1所示。

图1　CATIA结构树中非几何信息

有研究针对装配数模通过循环装配数模下的零件数模，依次输出零件的结构树信息［1～2］。但在实际工程中，零件分工通常按结构特征分工，而不是以装配关系整块分工，因此，直接针对单个零件数模提取结构树信息的方式通用性更强。只需要将待提取信息的零件数模置于相同文件夹下面，以文件夹控制导出数据范围，灵活性更强。

遍历文件夹下面CATIA数模的核心伪代码如下：

1.2程序工作流程

依据项目需求，采用VB对CATIA进行二次开发。软件执行流程如下：首先，打开一个零件项目，确定输出信息类别；然后，遍历项目包内所有的零件名称存入File数组，接着输出所有零件中相应类别下的数据；最后，后台运行Excel生成项目总信息表。流程图如图2所示，项目总信息报表如图5左半部分所示。

图2　CATIA提取结构树信息程序流程图

2　工艺文件管理

2.1文件管理问题及解决思路

针对文件管理，很多文件审签都走PDM系统，PDM系统大而全，但是在具体针对项目文件管理方面还不够灵活，因此有必要针对实际情况开发部门级应用。

目前，项目文件管理杂乱无章、规范不一，总结起来主要存在两个问题：第一，单人独自管理与自己相关的文件，没有信息共享；第二，工艺文件的名字不规范，文件命名依赖于人的偏好，同一种类型的文件，不同的人命名相差甚远，外人无法通过文件名明确这个文件的主要内容，阻碍协同工作中的交流。因此，要实现大量工艺文件的有效管理必须解决上述问题。

针对数据共享问题，现采用数据上传服务器集中存储，使每一个合法用户都能通过客户端访问数据，方便协同处理问题。针对命名不规范问题，现通过客户端对上传文件自动规范性重命名后上传；上传文件前会让用户选择与该文件相关的信息，包括机型、图号、文件类别、附加说明等，利用软件强制规范文件命名格式。

2.2基于ACCESS平台开发文件管理程序

1）ACCESS二次开发简介［3］

ACCCESS是微软把数据库引擎（Microsoft JET database engine）的图形用户界面和软件开发工具结合在一起的数据库管理系统。MS ACCESS以它自己的格式将数据存于ACCESS JET的数据库引擎里，它可以直接导入或者链接数据（这些数据存储于其他应用程序或数据库）。

ACCESS除了具有存储数据功能外，还具有强大的数据处理和开发软件的能力。基于ACCESS开发软件速度快，效率高和Excel互导数据方便。ACCESS的内置开发语言为VBA。

2）程序写流程及功能概述

客户端主要功能是将工艺文件资料通过软件自动化规范重命名后上传服务器，除主要功能外，还具有删除服务器上旧版本文件，查询相关零件的所有相关工艺文件和导出机型相关文件总清单的功能。程序流程图如图3所示。

图3　工艺文件管理平台程序流程图

程序通过超链接实现客户端记录与服务器上文件的链接，在客户端查询零件图号后，程序后台的搜索模块会在服务器上相应数据库中检索相关文件，匹配到和零件相关的工艺文件时，获取该文件的名称，地址信息，然后在客户端生成超链接。除了直接通过超链接访问文件外，还可以通过点击记录中的“下载”，将服务器端的文件下载至本机。程序主界面如图4所示。

图4　工艺文件管理平台主界面

3）关键技术

通过对文件的重命名后提交服务器，获取服务器端文件名和文件地址在前台生成文件超链接。

核心功能伪代码如下：

Private Sub FileSubmission（）

＇文件提交函数

Name OldName As NewName［3］

＇更改文件名

Filecopy SourceFile，DestinationFile［3］

＇将源文件上传服务器

Dim rst As DAO.Recordset

StrSQL=＂select*from DataSheet1＂

Ser rst=CurrentDb.OpenRecordset（strSQL，dbOpenDy naset）

＇给记录赋值

rst.AddNew＇添加新记录

rst.Fields！Hyperlink=＂DisplayText#FullAddress#＂

＇给超链接赋值

rst.Update＇更新记录

rst.Close＇关闭记录

Set rst=Nothing＇释放内存

Me.Refresh＇刷新窗体

End sub

4）Excel 输出项目文件报表

鉴于Excel在数据透视和数据处理方面的强大功能［4］，通过向Excel中写入数据，生成项目文件清单报表。

数据导出函数ExportDataToEXCEL核心伪代码如下：

Private Sub ExportDataToEXCEL（）'数据导出函数

Dim xlApp As Application

Dim xlbook As Workbook

Dim xlSheet As Worksheet

＇获取正在运行的excel程序

Set xlApp=GetObject（，＂EXCEL.Application＂）

If xlApp Is Nothing Then

＇新建一个excel程序

Set xlApp=CreateObject（，＂EXCEL.Application＂）

End If

Set xlbook=xlApp.Workbooks.Add

Set xlSheet=xlbook.Worksheets（1）

＇给EXCEL的＂A1＂单元格赋值

xlSheet.Cells（1，1）= ＂Data＂

＇详细过程略

【】【】

The practical research of CATIA and ACCESS secondary development in promoting project management efficiency

LI Cheng-hua， ZHOU Pan-pan

TP311.56

A

1009-0134（2016）10-0123-04

2016-07-26

李成华（1989 -），男，重庆人，工程师，硕士研究生，研究方向为机械制造、加工工艺、企业管理信息化、CATIA及Access二次开发等。