---

Hallo liebe CatiaGemeinde,

ich hoffe Ihr könnt mir bei einem Problem weiterhelfen, habe schon im Forum und in der Catia Hilfe gesucht und leider nichts gefunden.

Ist es möglich den Status einer SubAssembly abzufragen?. ich habe ein Produkt mit mehreren Unterprodukten. Einige der Unterprodukte sind als flexible Unterbaugruppe deklariert. Wie kann ich nun per Makro abfragen, ob die Unterbaugruppe flexibel oder rigid ist?

Vielen Dank schonmal im Voraus

Gruß

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

---

Hallo!

Antwort laut: flexible Unterbaugruppe kann nicht fixieren.

Hier ist ein Beispiel:
Sub CATMain()

Set oProd = CATIA.ActiveDocument.Product

Set Constrs = oProd.Connections("CATIAConstraints")
For i = 1 To oProd.Products.Count
    sVaterName = oProd.Name
    sUnterProdName = oProd.Products.Item(i).Name
    sRefName = sVaterName & "/" & sUnterProdName & "/!" & sVaterName & "/" & sUnterProdName & "/"
    Set oRef = oProd.CreateReferenceFromName(sRefName)
    On Error Resume Next
    Set Constr = Constrs.AddMonoEltCst(catCstTypeReference, oRef)
   
    If Err.Number <> 0 Then
        MsgBox "flexible Unterbaugruppe"
    Else
        MsgBox "rigid Unterbaugruppe"
        Set osel = CATIA.ActiveDocument.Selection
        osel.Clear
        osel.Add Constr
        osel.Delete
    End If
    On Error GoTo 0
Next

End Sub

------------------
Mit freundlichen Grüßen,
JuPaV

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

---

Hallo JuPaV

super vielen Dank, das hat funktioniert.
10 unities für dich

Grüsse

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