Hallo Crinuy,
Also die BOM (Bill of Materials) kann man mit der Methode "ExtractBOM" des Objekts Product exportieren. Anbei ein Beispiel zum Export der BOM des Rootproducts als .txt-File:
---------------------------------------
Sub CATMain()
Dim MyProduct As Product
Set MyProduct = CATIA.ActiveDocument.Product
Dim catFileTypeText As CatFileType
MyProduct.ExtractBOM catFileTypeText , "C:\Test\BOM.txt"
'---bzw. bei Unix als Pfadz.B. "/home/CATIA/macros/Schreibtest/BOM.txt"
End Sub
-----------------------------------------------------------------
Außerdem stehen noch die Formate:
Motif => catFileTypeMotif
HTML => catFileTypeHTML
zur Verfügung.
Was Du mit der Aufzeichnung erfasst hast, sind lediglich die Einstellungen, welche Properties unter:
a) Der BOM:
arrayOfVariantOfBstr1(0) = "Menge"
arrayOfVariantOfBstr1(1) = "Teilenummer"
arrayOfVariantOfBstr1(2) = "Typ"
arrayOfVariantOfBstr1(3) = "Nomenklatur"
arrayOfVariantOfBstr1(4) = "Überarbeitung"
objMaterial.SetCurrentFormat arrayOfVariantOfBstr1
b) bzw. der Recapitulation:
arrayOfVariantOfBstr2(0) = "Menge"
arrayOfVariantOfBstr2(1) = "Teilenummer"
objMaterial.SetSecondaryFormat arrayOfVariantOfBstr2
gelistet werden sollen.
------------------
Gruß,
Matthias
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP