---

Mein Wunsch wäre, in den Teilelisten der Zeichnungsableitungen Gewichte von z. B. Verbindungsmitteln - Schrauben, Scheiben, Muttern separat berechnet zu bekommen.
Es könnte z. B. so aussehen, dass eine Teileliste auf der Ableitung ist, in der nur die zu fertigenden Bauteile gelistet sind und eine 2. Teileliste, in der nur die Verbindungsmittel stehen. Am Ende der jeweiligen Liste sollte das Gesamtgewicht der Teile der jeweiligen Liste stehen.
Mit der Filterfunktion kann man die Teilelisten gut strukturieren vom Inhalt her, beispielsweise über die Pos.Nr. Wo ich keinen rechten Ansatz (bzw. einfache Lösung) finde, ist die Gewichtsbereichnung für einen bestimmten Teil der Liste. Kann man die Variable Pos. Nr. in einer IAM abgreifen? Wenn Pos < 100, dann Summe Gewicht1, ansonsten Summe Gewicht 2 - irgendwie so? Es würde mir reichen, irgendwelche Variablen zu befüttern, die dann in einem Textblock auf der IDW ausgegeben werden können. Hat jemand einen brauchbaren Tipp?

Danke für Hilfe.

------------------
Stephan

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

---

Hi.

Ich habe zwar keine direkte Lösung für Dich, aber ich würde versuchen das mit iLogic zu lösen.

Gruß
Stefan

------------------
Gruß Stefan
www.ch4-bts.de

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

---

Hallo oggy

Danke für den Tipp. Es scheint also keine einfachen Schalter zu geben, die man nutzen kann. An iLogic habe ich auch gedacht. Kenn mich aber nicht wirklich damit aus. Ein paar Tipps habe ich schon gefunden in diesen Foren. Mal sehen...
Aber noch mal die Frage: Kommt man in der IAM an die Variable Positionsnummer ran, z. B. in iLogic? Gefunden habe ich dies noch nicht.

Gruß

------------------
Stephan

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

---

puhh....das ist eine gute frage. das weiß ich leider auch nicht.
hab zwar das eine oder andere mit ilogic gemacht, aber so richtig kenne ich mich damit auch nciht aus. sry. :/

Edit:
Ansonsten könntest Du doch deine Verbindungsteile (Schrauben und co.) in eine seperate Baugruppe packen.
So würdest Du zumindest das Gewicht der Verbindungsmittel bekommen.
Und für die Abhängigkeiten machst Du die Baugruppe einfach flexibel.
Stückliste könnte dann so angelegt werden das Die Verbindungsmittel z.B. als 2.1, 2.2, 2.3 usw. zu sehen sind. das lässt sich ja dann auch einfach rausfiltern.

------------------
Gruß Stefan
www.ch4-bts.de

[Diese Nachricht wurde von oggy am 22. Feb. 2013 editiert.]

[Diese Nachricht wurde von oggy am 22. Feb. 2013 editiert.]

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

---

Zitat:

---

Original erstellt von oggy:
... Verbindungsteile (Schrauben und co.) in eine seperate Baugruppe packen ... für die Abhängigkeiten ... Baugruppe einfach flexibel.

---

Oh oh, lieber nicht...

------------------
Roland  
www.Das-Entwicklungsbuero.de

It's not the hammer - it's the way you hit!

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

---

Zitat:

---

Original erstellt von Doc Snyder:
  Oh oh, lieber nicht...

---

Das ist der Gottseibeiuns  .

Ich hatte tasächlich vor ein paar Jahren einen Konstrukteur, der auch auf diese glorreiche Idee gekommen ist und sich dann über die Phänomene beim Support gemeldet hat.

Das ist eine der größte Schnapsidee von Spezialisten, die nur bis zur Nasenspitze denken  .

------------------

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

---

Hallo Leute

Ok, jetzt weiß ich, was man möglichst nicht machen sollte. Hat jemand noch eine Idee, wie man es machen kann - siehe weiter oben - Positionsnummern Variabel abrufen...?

------------------
Stephan

[Diese Nachricht wurde von Stephan 3 am 25. Feb. 2013 editiert.]

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

---

Hallo,

Höchtswahrscheinlich würdest Du das über Excel lösen können (Export der BG-Stückliste nach Excel, und dort weiter verarbeiten).
Haben wir gelegentlich schon gemacht, z.B. um bei sehr umfangreichen Konstruktionen die Verbindungsmittel gesammelt rauszufiltern.

------------------
mfg - Leo

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

---

Stl_001.JPG Stl_002.JPG Stl_003.JPG

Hallo Stephan,

vielleicht hilft Dir das weier:

Du definierst in Deiner Baugruppe in der Stückliste (Teileliste) eine Benutzerdefinerte Spalte, z.B. mit dem Namen "Normteil", und befüllst diese Spalte an den entsprechenden Stellen mit einem x (oder anderer Wert)

Dann erstellst Du Deine Zeichnungsableitung, und platzierst eine Stückliste
Für die Gruppierungseinstellung lässt Du nach der Spalte "Normteil" gruppieren (diese Spalte kann mit einem Breitenwert von 0mm in die Stl eingefügt werden).

Zu guter letzt muss Du dann noch die Spalte für Gewicht mit einer Berechnung der Einzelnen Werte ersetzen, und fertig.

Jetzt hast Du eine neue Zeile, wo die Einzelgewichte zusammengerechnet wurden...

Gruß

Stefan

------------------
Wer nicht mitmacht, kann auch nichts verändern

[Diese Nachricht wurde von KatzenHund am 25. Feb. 2013 editiert.]

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

---

Hallo KatzenHund

Das ist ne Möglichkeit. In der Richtung habe ich auch schon gedacht und Versuche gemacht. Wahrscheinlich wird das auch so werden. Schade ist wirklich, dass man die Pos Nr. nicht abgreifen kann. Wir hätten nämlich intern die Regelung, dass Normteile auf 1-99 sitzen und alles andere auf 100 - 999. Dann bräuchte man nicht noch eine extra Spalte befüllen. Es ist auf jeden Fall ein Workarround.

Danke für die Info.

------------------
Stephan

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

---

Hallo

Ich bin jetzt mal von einer strukturierten Teileliste ausgegangen. Die Nummernkreise für Normteile (1-99) und andere Teile (>99) gelten in den Unterbaugruppen ebenso. Probier mal so:

Code:

---

Private Sub AddMassSumToPartsList()

'in welcher Einheit soll die Summe ausgegeben werden?
Dim oUnit As UnitsTypeEnum
oUnit = 11283

'weitere Masseeinheiten
'  kDefaultDisplayMassUnits = 11281
'  kDatabaseMassUnits = 11282
'  kKilogramMassUnits = 11283
'  kGramMassUnits = 11284
'  kSlugMassUnits = 11285
'  kLbMassMassUnits = 11286
'  kOunceMassUnits = 11287

Dim oDrawDoc As DrawingDocument
Set oDrawDoc = ThisApplication.ActiveDocument

Dim oUOM As UnitsOfMeasure
Set oUOM = oDrawDoc.UnitsOfMeasure
   
Dim oPartsList As PartsList
Set oPartsList = oDrawDoc.ActiveSheet.PartsLists.Item(1)

Dim oSumNormPartsListRow As PartsListRow
Dim oSumPartsListRow As PartsListRow
Dim oPartsListRow As PartsListRow
Dim iPos As Integer
Dim iObject As Integer
Dim iAnzahl As Integer
Dim iMasse As Integer
Dim dMasse As Double
Dim dSum As Double

'alle Teilelisten durchlaufen
For Each oPartsList In oDrawDoc.ActiveSheet.PartsLists
    'welche Spalte ist die mit den Positionsnummer?
    For i = 1 To oPartsList.PartsListColumns.Count
        Select Case oPartsList.PartsListColumns.Item(i).Title
        '#######################################################################################
        ' nachfolgende Spaltennamen gegebenenfalls anpassen ####################################
        '#######################################################################################
        Case "Objekt": iObject = i
        Case "Anz.": iAnzahl = i
        Case "MASSE": iMasse = i
        End Select
    Next
   
    'die Positionsnummernspalte fehlt?
    If iObject = 0 Then
        GoTo NextList
    End If
   
    'die Mengenspalte fehlt?
    If iAnzahl = 0 Then
        GoTo NextList
    End If
   
    'die Massenspalte fehlt?
    If iMasse = 0 Then
        GoTo NextList
    End If
   
    'Schleife durch alle Teilelistenzeilen
    For Each oPartsListRow In oPartsList.PartsListRows
        'Auslesen der Positionsnummer
        iPos = 0
        If InStrRev(oPartsListRow.Item(iObject).Value, ".") > 0 Then
            iPos = CInt(Right(oPartsListRow.Item(iObject).Value, Len(oPartsListRow.Item(iObject).Value) - InStrRev(oPartsListRow.Item(iObject).Value, ".")))
        Else
            If Not oPartsListRow.Item(iObject).Value = "Summe Normteile" And Not oPartsListRow.Item(iObject).Value = "Summe andere" Then
                iPos = CInt(oPartsListRow.Item(iObject).Value)
            End If
        End If
       
        If iPos > 0 And iPos < 100 Then
            dSumNorm = dSumNorm + oPartsListRow.Item(iAnzahl).Value * oUOM.GetValueFromExpression(oPartsListRow.Item(iMasse).Value, 11282)
        ElseIf iPos >= 100 Then
            dSum = dSum + oPartsListRow.Item(iAnzahl).Value * oUOM.GetValueFromExpression(oPartsListRow.Item(iMasse).Value, 11282)
        End If
       
        If oPartsListRow.Item(iObject) = "Summe Normteile" Then
            Set oSumNormPartsListRow = oPartsListRow
        End If
       
        If oPartsListRow.Item(iObject) = "Summe andere" Then
            Set oSumPartsListRow = oPartsListRow
        End If
    Next
   
    'Gibt es schon die Summenzeile für Normteile? Sonst erstellen wir eine
    If oSumNormPartsListRow Is Nothing Then
        Set oSumNormPartsListRow = oPartsList.PartsListRows.Add(oPartsList.PartsListRows.Count, False)
        oSumNormPartsListRow.Item(iObject).Value = "Summe Normteile"
        oSumNormPartsListRow.Item(iAnzahl).Value = ""
    End If
   
    'Gibt es schon die Summenzeile? Sonst erstellen wir eine
    If oSumPartsListRow Is Nothing Then
        Set oSumPartsListRow = oPartsList.PartsListRows.Add(oPartsList.PartsListRows.Count, False)
        oSumPartsListRow.Item(iObject).Value = "Summe andere"
        oSumPartsListRow.Item(iAnzahl).Value = ""
    End If
   
    'Umwandeln in Strings samt Ausgabeeinheit
    Dim sSumNorm As String
    Dim sSum As String
    sSumNorm = oUOM.GetStringFromValue(dSumNorm, oUnit)
    sSum = oUOM.GetStringFromValue(dSum, oUnit)
   
    'Schreiben der Summen
    oSumNormPartsListRow.Item(iMasse).Value = sSumNorm
    oSumPartsListRow.Item(iMasse).Value = sSum
   
NextList:

Next
End Sub

---

------------------
MfG
Ralf

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

---

Hallo Ralf

Vielen Dank für deine Arbeit. Nun weiß ich aber grad nicht, wo / wie ich das in INventor einbetten kann zum testen. Kannst du dazu ein paar Zeilen schreiben?
Danke.

------------------
Stephan

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