Views from 3D

[Jegsaran]

Hello Everyone,
I'm trying to import an annotated view from a product to a drawing.
I have did some workaround using CATIA.StartCommand.
Here is my code

Set drawingSheets1 = drawingDocument1.Sheets
Set drawingSheet1 = drawingSheets1.ActiveSheet
Set drawingViews1 = drawingSheet1.Views
CATIA.StartCommand "View from 3D"
Set oParentDoc = CATIA.Documents.Item("DC-SectionCut-TemplateDoc.CATProduct")
oParentDoc.Activate
Set ActDoc = CATIA.ActiveDocument
Set Sel2 = ActDoc.Selection
Sel2.Search "Name=*Section Cut View1*,all"

Post this CATIA is asking me to click on the screen.
Since the view is not generated using traditional method I can't use drawingViewGenerativeBehavior1.Update also.

I tried CATIA.StartCommand "Select" but it is not working appropriately. Is there any workaround to click on the screen?

 

[LWolf]

perhaps do according to

http://www.coe.org/p/fo/et/thread=29337

together with

https://www.eng-tips.com/viewthread.cfm?qid=401763

regards,
LWolf

 

[Jegsaran]

Thanks for sharing this LWolf. Both the links is about creating Isometric view.
All I need is to import an Annotation(TPS) Section Cut View which is already created in the product.
When I import it into Drawing it'll come as Section Cut.
The main theme here is to eradicate creating Front View to create section cut.

 

[Jegsaran]

Did some workaround it is working now,

    CATIA.StartCommand "View from 3D"
    Set oParentDoc = CATIA.Documents.Item("DC-SectionCut-TemplateDoc.CATProduct")
    oParentDoc.Activate
    Set ActDoc = CATIA.ActiveDocument
    Set Sel2 = ActDoc.Selection
    Sel2.Search "Name=*" & IndivAssySecCut(i) & "*,all"
    inputObjectType(0) = "AnyObject"
    Status = oSel.SelectElement2(inputObjectType, "Click Screen & Select a Sheet", False)[indent]'asked the user to select the sheet from tree[/indent]
    DoEvents