topic Re: iLogic fun - Changing an iProperty in each part of an assembly in Inventor Programming Forum

iLogic fun - Changing an iProperty in each part of an assembly

JamesNordgren — Tue, 30 Jan 2018 16:22:27 GMT

Hi, I know similar problems have been covered elsewhere here, but I cannot find an example of exactly what I want to do, and I am obviously missing something.

I need to create an iLogic rule to: (assume it will be run from an assembly document)

1) Iterate through all documents referenced by the assembly

2) Check that a custom iProperty "DrawingNo" both exists AND is not empty string For Each document

3) If 2) is true, then replace first 5 characters of DrawingNo with a new string that user has entered and is stored in a variable (i know how to do that part)

Will anyone help me with the basic code to iterate the assembly and check the existence and content of the custom iPorperty?

Thanks so much!

James

Re: iLogic fun - Changing an iProperty in each part of an assembly

chandra.shekar.g — Thu, 01 Feb 2018 10:54:14 GMT

@JamesNordgren,

Try the following iLogic code to check, enter a new string and replace the same string with first 5 letters. Before running code, make sure that a valid assembly document opened in Inventor.

Sub Main()

    Dim oDoc As AssemblyDocument
    oDoc = ThisApplication.ActiveDocument
    
    Dim oDef As AssemblyComponentDefinition
    oDef = oDoc.ComponentDefinition
    
    Dim inputStr As String
    inputStr = InputBox("Enter a text")
    
    
    Dim referDoc As Document
    Dim referDisp As DocumentDescriptor
    For Each referDisp In oDoc.ReferencedDocumentDescriptors
        referDoc = referDisp.ReferencedDocument
        
        Dim customProp As PropertySet
        customProp = referDoc.PropertySets.Item("User Defined Properties")
        
        Dim oProp As Inventor.Property
        For Each oProp In customProp
            If oProp.Name = "Drawing No" Then
                If oProp.Value <> "" Then
                    Dim temp As String
                    temp = Right(oProp.Value, Len(oProp.Value) - 5)
                    
                    result = inputStr + temp
					
					MessageBox.Show(result)
					
                End If
            End If
        Next
        
        
    Next
End Sub

Please feel free to contact if there is any queries.

If solves problem, click on "Accept as solution" / give a "Kudo".

Thanks and regards,

Re: iLogic fun - Changing an iProperty in each part of an assembly

JamesNordgren — Mon, 05 Feb 2018 15:14:30 GMT

Thank you, that helps alot. I eventually figured out it was the

"customProp = referDoc.PropertySets.Item("User Defined Properties")"

statement to access iproperties throught the API that I was missing. I had been trying to use the iLogic iProperties.Value statement, which only ever gets the properties from the document from which the rule is run.