CATIA和ACCESS二次開發(fā)在提升項(xiàng)目管理效率中的應(yīng)用研究

李成華，周盼盼

（中航工業(yè)成都飛機(jī)工業(yè)（集團(tuán)）有限責(zé)任公司，成都 610092）

CATIA和ACCESS二次開發(fā)在提升項(xiàng)目管理效率中的應(yīng)用研究

李成華，周盼盼

（中航工業(yè)成都飛機(jī)工業(yè)（集團(tuán)）有限責(zé)任公司，成都 610092）

基于CATIA，ACCCESS，Excel多種軟件聯(lián)合二次開發(fā)工具軟件，涉及項(xiàng)目管理中的CATIA結(jié)構(gòu)樹非幾何信息提取、工藝文件的管理。通過軟件的使用將項(xiàng)目管理過程中關(guān)鍵環(huán)節(jié)串聯(lián)為一個(gè)有機(jī)整體，改善以往項(xiàng)目管理中信息獲取困難和過程監(jiān)控不力的狀態(tài)，優(yōu)化了工作流程，提高了項(xiàng)目管理效率。

項(xiàng)目管理；CATIA；ACCESS；二次開發(fā)；信息提取；超鏈接；數(shù)據(jù)報(bào)表

0　引言

航空制造業(yè)中的零件有其自身的特點(diǎn)，對(duì)比其他行業(yè)的零件存在材料特殊、結(jié)構(gòu)復(fù)雜、熱處理、表面處理類型多、質(zhì)量控制嚴(yán)苛、無損檢測(cè)過程多等特點(diǎn)；從批量上講，零件屬于單件小批量生產(chǎn)，零件種類多。因此，航空制造業(yè)中的工藝項(xiàng)目管理存在數(shù)據(jù)量大，管理繁瑣的特點(diǎn)。

項(xiàng)目管理主要涉及兩方面的工作：一是全面把握設(shè)計(jì)端信息來源；二是有效解決制造端工藝文件管理。工藝技術(shù)部門依據(jù)設(shè)計(jì)的零件數(shù)模，編制制造大綱，完成零件的生產(chǎn)制造。飛機(jī)零件的設(shè)計(jì)基于CATIA平臺(tái)進(jìn)行，零件相關(guān)的材料、熱處理、表面處理、無損檢測(cè)等非幾何信息都在存放在數(shù)模結(jié)構(gòu)樹中，因此，快速有效的獲取項(xiàng)目零件結(jié)構(gòu)樹信息為項(xiàng)目管理的第一步。

要完成零件制造，除了編制制造大綱之外，還有數(shù)控程序、刀具清單等機(jī)加配套文件；機(jī)加完成后還需協(xié)作單位進(jìn)行熱處理、表面處理、無損檢測(cè)等過程；多單位協(xié)同工作將產(chǎn)生大量技術(shù)狀態(tài)協(xié)調(diào)的交接單、指示單。通常，一個(gè)機(jī)型項(xiàng)目相關(guān)的各種工藝文件總量上萬份。管理好這些工藝文件能夠監(jiān)控項(xiàng)目的執(zhí)行情況，減少現(xiàn)場(chǎng)問題的發(fā)生，從而提高項(xiàng)目管理效率。因此，工藝文件的有效管理為項(xiàng)目管理的第二步。

針對(duì)目前數(shù)據(jù)管理混亂，項(xiàng)目管理效率不高的現(xiàn)狀，對(duì)CATIA數(shù)模結(jié)構(gòu)樹信息自動(dòng)提取、工藝文件的有效管理方面進(jìn)行研究，基于CATIA、ACCESS、Excel聯(lián)合二次開發(fā)工具軟件來解決項(xiàng)目管理中的難點(diǎn)問題。

1　CATIA結(jié)構(gòu)樹信息自動(dòng)提取

1.1信息輸出方式

目前CATIA數(shù)模信息的獲取是通過人工拷貝結(jié)構(gòu)樹上的信息，手動(dòng)匯總形成項(xiàng)目總信息表。由于零件數(shù)量多、工作量大，造成數(shù)據(jù)維護(hù)困難，而且人工操作也容易出錯(cuò)，可靠性差。為了改善現(xiàn)狀，通過CATIA二次開發(fā)提取零件結(jié)構(gòu)樹信息。CATIA結(jié)構(gòu)樹中非幾何信息如圖1所示。

圖1　CATIA結(jié)構(gòu)樹中非幾何信息

有研究針對(duì)裝配數(shù)模通過循環(huán)裝配數(shù)模下的零件數(shù)模，依次輸出零件的結(jié)構(gòu)樹信息［1～2］。但在實(shí)際工程中，零件分工通常按結(jié)構(gòu)特征分工，而不是以裝配關(guān)系整塊分工，因此，直接針對(duì)單個(gè)零件數(shù)模提取結(jié)構(gòu)樹信息的方式通用性更強(qiáng)。只需要將待提取信息的零件數(shù)模置于相同文件夾下面，以文件夾控制導(dǎo)出數(shù)據(jù)范圍，靈活性更強(qiáng)。

遍歷文件夾下面CATIA數(shù)模的核心偽代碼如下：

1.2程序工作流程

依據(jù)項(xiàng)目需求，采用VB對(duì)CATIA進(jìn)行二次開發(fā)。軟件執(zhí)行流程如下：首先，打開一個(gè)零件項(xiàng)目，確定輸出信息類別；然后，遍歷項(xiàng)目包內(nèi)所有的零件名稱存入File數(shù)組，接著輸出所有零件中相應(yīng)類別下的數(shù)據(jù)；最后，后臺(tái)運(yùn)行Excel生成項(xiàng)目總信息表。流程圖如圖2所示，項(xiàng)目總信息報(bào)表如圖5左半部分所示。

圖2　CATIA提取結(jié)構(gòu)樹信息程序流程圖

2　工藝文件管理

2.1文件管理問題及解決思路

針對(duì)文件管理，很多文件審簽都走PDM系統(tǒng)，PDM系統(tǒng)大而全，但是在具體針對(duì)項(xiàng)目文件管理方面還不夠靈活，因此有必要針對(duì)實(shí)際情況開發(fā)部門級(jí)應(yīng)用。

目前，項(xiàng)目文件管理雜亂無章、規(guī)范不一，總結(jié)起來主要存在兩個(gè)問題：第一，單人獨(dú)自管理與自己相關(guān)的文件，沒有信息共享；第二，工藝文件的名字不規(guī)范，文件命名依賴于人的偏好，同一種類型的文件，不同的人命名相差甚遠(yuǎn)，外人無法通過文件名明確這個(gè)文件的主要內(nèi)容，阻礙協(xié)同工作中的交流。因此，要實(shí)現(xiàn)大量工藝文件的有效管理必須解決上述問題。

針對(duì)數(shù)據(jù)共享問題，現(xiàn)采用數(shù)據(jù)上傳服務(wù)器集中存儲(chǔ)，使每一個(gè)合法用戶都能通過客戶端訪問數(shù)據(jù)，方便協(xié)同處理問題。針對(duì)命名不規(guī)范問題，現(xiàn)通過客戶端對(duì)上傳文件自動(dòng)規(guī)范性重命名后上傳；上傳文件前會(huì)讓用戶選擇與該文件相關(guān)的信息，包括機(jī)型、圖號(hào)、文件類別、附加說明等，利用軟件強(qiáng)制規(guī)范文件命名格式。

2.2基于ACCESS平臺(tái)開發(fā)文件管理程序

1）ACCESS二次開發(fā)簡(jiǎn)介［3］

ACCCESS是微軟把數(shù)據(jù)庫引擎（Microsoft JET database engine）的圖形用戶界面和軟件開發(fā)工具結(jié)合在一起的數(shù)據(jù)庫管理系統(tǒng)。MS ACCESS以它自己的格式將數(shù)據(jù)存于ACCESS JET的數(shù)據(jù)庫引擎里，它可以直接導(dǎo)入或者鏈接數(shù)據(jù)（這些數(shù)據(jù)存儲(chǔ)于其他應(yīng)用程序或數(shù)據(jù)庫）。

ACCESS除了具有存儲(chǔ)數(shù)據(jù)功能外，還具有強(qiáng)大的數(shù)據(jù)處理和開發(fā)軟件的能力。基于ACCESS開發(fā)軟件速度快，效率高和Excel互導(dǎo)數(shù)據(jù)方便。ACCESS的內(nèi)置開發(fā)語言為VBA。

2）程序?qū)懥鞒碳肮δ芨攀?/p>

客戶端主要功能是將工藝文件資料通過軟件自動(dòng)化規(guī)范重命名后上傳服務(wù)器，除主要功能外，還具有刪除服務(wù)器上舊版本文件，查詢相關(guān)零件的所有相關(guān)工藝文件和導(dǎo)出機(jī)型相關(guān)文件總清單的功能。程序流程圖如圖3所示。

圖3　工藝文件管理平臺(tái)程序流程圖

程序通過超鏈接實(shí)現(xiàn)客戶端記錄與服務(wù)器上文件的鏈接，在客戶端查詢零件圖號(hào)后，程序后臺(tái)的搜索模塊會(huì)在服務(wù)器上相應(yīng)數(shù)據(jù)庫中檢索相關(guān)文件，匹配到和零件相關(guān)的工藝文件時(shí)，獲取該文件的名稱，地址信息，然后在客戶端生成超鏈接。除了直接通過超鏈接訪問文件外，還可以通過點(diǎn)擊記錄中的“下載”，將服務(wù)器端的文件下載至本機(jī)。程序主界面如圖4所示。

圖4　工藝文件管理平臺(tái)主界面

3）關(guān)鍵技術(shù)

通過對(duì)文件的重命名后提交服務(wù)器，獲取服務(wù)器端文件名和文件地址在前臺(tái)生成文件超鏈接。

核心功能偽代碼如下：

Private Sub FileSubmission（）

＇文件提交函數(shù)

Name OldName As NewName［3］

＇更改文件名

Filecopy SourceFile，DestinationFile［3］

＇將源文件上傳服務(wù)器

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＇關(guān)閉記錄

Set rst=Nothing＇釋放內(nèi)存

Me.Refresh＇刷新窗體

End sub

4）Excel 輸出項(xiàng)目文件報(bào)表

鑒于Excel在數(shù)據(jù)透視和數(shù)據(jù)處理方面的強(qiáng)大功能［4］，通過向Excel中寫入數(shù)據(jù)，生成項(xiàng)目文件清單報(bào)表。

數(shù)據(jù)導(dǎo)出函數(shù)ExportDataToEXCEL核心偽代碼如下：

Private Sub ExportDataToEXCEL（）'數(shù)據(jù)導(dǎo)出函數(shù)

Dim xlApp As Application

Dim xlbook As Workbook

Dim xlSheet As Worksheet

＇獲取正在運(yùn)行的excel程序

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

If xlApp Is Nothing Then

＇新建一個(gè)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＂

＇詳細(xì)過程略

【】【】

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 -），男，重慶人，工程師，碩士研究生，研究方向?yàn)闄C(jī)械制造、加工工藝、企業(yè)管理信息化、CATIA及Access二次開發(fā)等。