Hallo,
unter Start --> Digital Mock-Up --> DMU-Navigator gibt es unter Tools --> DMU DaTa Flow eine intessante Funktion mit Namen "SaveAsFrozen". Diese Funktion ist ziemlich hilfreich, wenn man sehr große Assemblys speichern möchte. Ich brauche nur die Produktstruktur nach V5 laden und diese Funktion ausführen. Hierbei kann man anschließend noch entscheiden, ob man die 3D-Parts oder nur die CGR's speichern möchte. Voraussetzung ist natürlich, das mit den Options Cache Management gearbeitet wird und unter Options --> Infrastructure --> Product Structure --> Product Visualisation --> "Do not activate default shapes on open aktiviert" ist.
Für diese Funktion möchte ich gerne ein Macro erstellen, um den Ablauf automatisiert ablaufen zu lassen. In der V5 Visual Basic help habe ich auch eine entsprechende Sub gefunden:
o Sub SaveAsFrozen( CATBSTR iDirectory,
CATBSTR iPrefix,
long iData,
long iCache)
Saves all documents related to the product in a directory.
Parameters:
iDirectory
The directory that will contain documents.
iPrefix
The prefix used to save product documents.
iData
To save geometries.
0: no save.
1: save.
iCache
To cache data.
0: no save.
1: save.
Baugruppe ist in V5 geladen!
Habe versucht das als Macro umzusetzen:
Sub CATMain()
Dim Dokument As Document
Set Dokument = CATIA.ActiveDocument
Dim directory As String
Dim prefix As String
directory ="C:\TEMP\Save_Test"
prefix = "Test"
'Hier kommt die Fehlermeldung, siehe angehängtes Bild.
Dokument.SaveAsFrozen directory , prefix , 1, 0
End Sub
Hat einer Idee, warum dieser Fehler auftritt?
Gruß Meridian
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP