---

Hi All,
Sorry for posting in English here. But I know it is valuable resource and I am hopping for response any way…
I am working on application that generates aptsource output with code below on huge number of parts with predefined CATProcess files. This is why timing is really important for me… 
If you generate aptsource from manual Catia session with “MfgBatch” and “Generate Interactively” commands you will see noticeable difference in timing. This is why I am expecting that in my application "Generate Interactively" should be a lot faster then “MfgBatch”.
So I am looking for your input/example/code improvement for following two commands

ManufacturingOutputGenerator
ManufacturingGeneratorData

And here is the code…

Dim procDocument As ProcessDocument
Dim outputGen As ManufacturingOutputGenerator
Dim genData As ManufacturingGeneratorData
Dim mfgSelection As Selection
                           
Set procDocument = CATIA.Documents.Open("filename.CATProcess")                           
Set mfgSelection = procDocument.Selection
mfgSelection.Search "Name='Manufacturing Program.1',all"           
           
  Set outputGen = mfgSelection.Item(1).Value 
  outputGen.InitFileGenerator "APT", “filename”, genData
  outputGen.RunFileGenerator genData
  genData.ResetAllModalValues 
  procDocument.Close

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

This is German version afger Google translation...

Hallo alle, traurig für auf englisch hier bekanntgeben.  Aber ich weiß, daß es wertvolles Hilfsmittel ist und ich hopping für Antwort jede mögliche Weise...,  Ich arbeite auf Anwendung, die aptsource mit Code unten auf sehr großer Zahl der Teile mit vorbestimmten CATProcess erzeugt.  Deshalb ist TIMING wirklich wichtig für mich...,  Wenn Sie aptsource vom manuellen Lernabschnitt Catia mit "MfgBatch" und "Generate Interactively" Befehle erzeugen Sie, die Sie wahrnehmbaren Unterschied bezüglich des TIMINGS sehen.  Deshalb erwarte ich, daß in meiner Anwendung ' Generate Interactively ' sollte viel schnelleres dann "MfgBatch" sein erzeugen Sie.  So suche ich nach Ihrer input-/example/codeverbesserung für das Folgen von zwei Befehlen

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hello Lapa,

welcome to this CATIA Board.

I'm a little bit surprised that there are people looking that board who don`t speak german.

I think it's not neccessary to translate your posting into German - especially not with such programs as Google or other translators. Your english Posting is better to understand than Google's german translation.

I am sorry, that I am not able to help you.

Greetings to Canada,

CEROG

------------------
Inoffizielle Linux-Hilfeseite
Meine Firma

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Thank you CEROG. Will keep posting in English then.
Lapa

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Lapa,
this is the only way to output the CATIA in a interactiv way.
You can define the parameters in the CATIA GUI and then start this job.

The only possibility I know to output the APTsource file where I'm able to define the parameters like in the CATIA GUI is to output the stored process in batch mode.
There are some discussion about that in the NC forum too.

Best regards,
crash

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Just to add to a discussion following recorded Macro in R16SP4 doesn’t work when you try to replay it but returns an error. I recorded following steps in the Macro
1 Open process file
2 Start “Generate APT Source Interactively”
3 Close the process
End of recording

Language="VBSCRIPT"
Sub CATMain()
Set documents1 = CATIA.Documents
Set processDocument1 = documents1.Open("C:\processname.CATProcess")
Set manufacturingAPTGenerator1 = processDocument1.GetItem("Manufacturing Program.1") ‘Here is where error occurs
manufacturingAPTGenerator1.InitFileGenerator "APT", "c:\Temp\filename.aptsource", manufacturingGeneratorData1
manufacturingAPTGenerator1.RunFileGenerator manufacturingGeneratorData1
manufacturingGeneratorData1.ResetAllModalValues
Set processDocument1 = CATIA.ActiveDocument
processDocument1.Close
Set productDocument1 = CATIA.ActiveDocument
productDocument1.Close
End Sub

When I change the code to a version below, which is equivalent of VB program in first post, error occurs in different place… So what would be working version of the script for this task? Any thoughts?

Language="VBSCRIPT"
Sub CATMain()
Set documents1 = CATIA.Documents
Set processDocument1 = Documents1.Open("processname.CATProcess")
Set mfgSelection = processDocument1.Selection
mfgSelection.Search "Name='Manufacturing Program.1',all"
Set manufacturingAPTGenerator1 =  mfgSelection.Item2(1).Value
'Set manufacturingAPTGenerator1 = processDocument1.GetItem("Manufacturing Program.1")
manufacturingAPTGenerator1.InitFileGenerator "APT", "c:\Temp\filename.aptsource", manufacturingGeneratorData1 ‘Here is where error occurs in this case
manufacturingAPTGenerator1.RunFileGenerator manufacturingGeneratorData1
manufacturingGeneratorData1.ResetAllModalValues
Set processDocument1 = CATIA.ActiveDocument
processDocument1.Close
Set productDocument1 = CATIA.ActiveDocument
productDocument1.Close
End Sub

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP