topic Re: PositionalRepresentation.SetConstraintValueOverride ==> use of parameter in Inventor Programming Forum

PositionalRepresentation.SetConstraintValueOverride ==> use of parameter

Anonymous — Tue, 13 May 2014 07:39:53 GMT

Hi there,

I have an assembly with two parts connected with a mate constraint. In the assembly there is a parameter 'Offset' present but somehow the below code fails on the line 'Call oPosRep.SetConstraintValueOverride(oConstraint, "Offset")'.

When I manually create a PosRep with an override on the mate constraint I am allowed to use the 'Offset' parameter. So why doesn't this work from VBA?

Note that the below code does work if I replace 'Offset' with a numeric value.

Sub CreatePosRep()
    
    Dim oAssCompDef As AssemblyComponentDefinition
    Set oAssCompDef = ThisApplication.ActiveDocument.ComponentDefinition
    
    Dim oPosRep As PositionalRepresentation
    Set oPosRep = oAssCompDef.RepresentationsManager.PositionalRepresentations.Add("PosRep1")
    
    Dim oConstraint As AssemblyConstraint
    Set oConstraint = oAssCompDef.Constraints(1)
    
    Call oPosRep.SetConstraintValueOverride(oConstraint, "Offset")

End Sub

Hopefully someone can shed some light on this case.

Best regards, Daniël

IV2013 Professional SP2 Update 5

Re: PositionalRepresentation.SetConstraintValueOverride ==> use of parameter

Vladimir.Ananyev — Fri, 16 May 2014 08:17:54 GMT

I suppose you experience the problem with he second argumrnt in the SetConstraintValueOverride method. Method expects the expression like “28 mm”. The following code works for me:

Sub CreatePosRep()
    
    Dim oAssCompDef As AssemblyComponentDefinition
    Set oAssCompDef = ThisApplication.ActiveDocument.ComponentDefinition
    
    Dim oPosRep As PositionalRepresentation
    On Error Resume Next
    Set oPosRep = oAssCompDef.RepresentationsManager.PositionalRepresentations.Add("PosRep1")
    If Err <> 0 Then
      Set oPosRep = oAssCompDef.RepresentationsManager.PositionalRepresentations.Item("PosRep1")
    End If
    
    Dim oConstraint As AssemblyConstraint
    Set oConstraint = oAssCompDef.Constraints.Item("GAP")
    
    Call oPosRep.SetConstraintValueOverride(oConstraint, "15 mm")
  
  Beep
End Sub

cheers,

Re: PositionalRepresentation.SetConstraintValueOverride ==> use of parameter

Anonymous — Fri, 16 May 2014 08:28:34 GMT

Yes, as I already indicated in my first post the code does work if I use a numeric value. So "15" or "15 mm" does work as expected. However the use of a parameter does not work from the code. But I can use a parameter if I manually create an override constraint.

Daniël

Re: PositionalRepresentation.SetConstraintValueOverride ==> use of parameter

YuhanZhang — Tue, 27 May 2014 06:03:14 GMT

Hi Daniel,

This should be a defect, I logged it as 1517815, you can provide this number to us to check its status.