Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
JelteDeJong
in reply to: cparnellCDZ7D

The value was written to a custom iProperty. But if you want you can write it to a user parameter like this:

Dim volume = iProperties.Volume
Dim side1 = volume ^ (1 / 3)

Dim uom = ThisDoc.Document.UnitsOfMeasure
Dim sideConverted = uom.ConvertUnits(side1,
        UnitsTypeEnum.kDefaultDisplayLengthUnits,
        UnitsTypeEnum.kInchLengthUnits)

Dim volumeConverted = (sideConverted ^ 3) / 144

Dim doc As PartDocument = ThisDoc.Document
Dim parameters = doc.ComponentDefinition.Parameters.UserParameters
Try
	Dim para = parameters.Item("VolumeBrdFt")
	para.Value = volumeConverted
Catch ex As Exception
	parameters.AddByValue("VolumeBrdFt", volumeConverted, "ul")
End Try

 

Jelte de Jong
Did you find this post helpful? Feel free to Like this post.
Did your question get successfully answered? Then click on the ACCEPT SOLUTION button.

EESignature


Blog: hjalte.nl - github.com