Announcements
Attention for Customers without Multi-Factor Authentication or Single Sign-On - OTP Verification rolls out April 2025. Read all about it here.
syafiqfarhan
552 Views, 4 Replies

User Parameter link to iproperties

Dim oPartDoc As Document
oPartDoc = ThisDoc.Document

If oPartDoc.DocumentType = kPartDocumentObject Then

	Dim oPartCompDef As PartComponentDefinition
		oPartCompDef = oPartDoc.ComponentDefinition
		
Dim oParams As Parameters
		oParams=oPartCompDef.Parameters
				
		Dim oUserParams As UserParameters
		oUserParams=oParams.UserParameters       
		
		Dim oAwesomeParameter As Parameter                     
				
		Try
			otester = oUserParams.Item("Profile")
			Catch
oInsulationType=oUserParams.AddByValue("Profile", "Plate", kTextUnits) 
MultiValue.SetList("Profile", "Plate", "HEA", "HEB", "Pipe", "Sample")
			End Try
            End If

Parameter.Param("Profile").ExposedAsProperty = False
Parameter.Param("Profile").IsKey = True



If oPartDoc.DocumentType = kPartDocumentObject Then

	Dim oPartCompDef As PartComponentDefinition
		oPartCompDef = oPartDoc.ComponentDefinition
		
Dim oParams As Parameters
		oParams=oPartCompDef.Parameters
				
		Dim oUserParams As UserParameters
		oUserParams=oParams.UserParameters       
		
		Dim oAwesomeParameter As Parameter                     
				
		Try
			otester = oUserParams.Item("t")
			Catch
oInsulationType = oUserParams.AddByValue("t", " ", kTextUnits) 
			End Try
            End If

Parameter.Param("t").ExposedAsProperty = False
Parameter.Param("t").IsKey = True

If oPartDoc.DocumentType = kPartDocumentObject Then

	Dim oPartCompDef As PartComponentDefinition
		oPartCompDef = oPartDoc.ComponentDefinition
		
Dim oParams As Parameters
		oParams=oPartCompDef.Parameters
				
		Dim oUserParams As UserParameters
		oUserParams=oParams.UserParameters       
		
		Dim oAwesomeParameter As Parameter                     
				
		Try
			otester = oUserParams.Item("Unit")
			Catch
oInsulationType=oUserParams.AddByValue("Unit", "MM", kTextUnits) 
MultiValue.SetList("Unit", "MM", "INCH", "Sample")
			End Try
            End If

Parameter.Param("Unit").ExposedAsProperty = False
Parameter.Param("Unit").IsKey = True

Hi all, I want to make my "t" value link to my iproperties. Is there a possible way?

syafiqfarhan_0-1639551747346.png