Search for an Instance name in a product

[CheeseMaker13]

Hi Guys,

Another little problem I can't for the life of me figure out.

I want to search for a specific Instance of something, for example "Apple.2". I have a SearchString Var with "Apple.2" in it.

How do I then search for that in a product?

I've tried:

oSelection.Search "CATAsmSearch.Name=SearchString,all"
oSelection.Search "'Assembly Design'.Product.'Part Number'=SearchString,all"

And numerous others off the internet with no success.

Thoughts?

Thanks!!

 

[lukaszsz]

(Name='Apple.2' & (((((((((('Product Structure'.Product + 'Systems Routing'.Product) + 'HVAC Design'.Product) + 'Assembly Design'.Product) + 'Waveguide Diagrams'.Product) + 'HVAC Diagrams'.Product) + 'Systems Space Reservation'.Product) + 'Process Applications'.Product) + 'Tubing Diagrams'.Product) + 'Plant Layout'.Product) + 'Piping and Instrumentation Diagrams'.Product));all


You can decrease number of considered types of product , for e.g. only to product structure and assembly design

(Name='Apple.2' & ('Product Structure'.Product 'Assembly Design'.Product));all

LukaszSz. Poland, Warsaw University of Technology, Faculty of Power and Aeronautical Engineering : MEchanical Engineering. BsC - 2013

 

[CheeseMaker13]

What would the full string be?

oSelection.Search (Name='Apple.2' & ('Product Structure'.Product 'Assembly Design'.Product));all

[That doesn't work ]

(I should have said I want to select the found item!!)

Many Thanks!!!!!

 

[lukaszsz]

oSelection.Clear
Dim InstanceName 'as String
Dim SelectionQuery 'as String
InstanceName = "Przekladnia_MASTER.1"
SelectionQuery="(Name='"& InstanceName &"' & (CATProductSearch.Product + CATAsmSearch.Product)),all"

oSelection.Search SelectionQuery

Dim FoundedInstance 'as Product

MsgBox oSelection.Count & " Items of" & InstanceName &"has been founded"

Set FoundedInstance=oSelection.Item(1).Value

LukaszSz. Poland, Warsaw University of Technology, Faculty of Power and Aeronautical Engineering : MEchanical Engineering. BsC - 2013

 

[ferdo]

Language="VBSCRIPT"

Sub CATMain()

Dim productDocument1 As Document
Set productDocument1 = CATIA.ActiveDocument

Dim selection1 As Selection
Set selection1 = productDocument1.Selection

selection1.Search "Name=*Apple'.'2*,all"

End Sub

Regards
Fernando

https://picasaweb.google.com/102257836106335725208

https://picasaweb.google.com/103462806772634246699/

 

[CheeseMaker13]

Hi Guys.

Thanks, both methods work!!