ReplaceReference on "Piping Runs Environment" assembly does not work instantly

[Anonymous]

Hi,

I have an Inventor Addin and i am using Inventor API.

I want to rename a complete assembly-structure that contains a piping assembly.

The Problem is that Inventor does not recognize the changes instantly and does not find the routes:

I have a function which renames all models recursively, using replaceReference:

For Each childDoc As Document In activeDocument.ReferencingDocuments

  oFileDescriptors = childDoc.File.ReferencedFileDescriptors

  For descriptorCount = 1 To oFileDescriptors.Count

    Try

      If String.Compare(oFileDescriptors.Item(descriptorCount).FullFileName, filePath, True) = 0 Then

              oFileDescriptor = oFileDescriptors.Item(descriptorCount)

              oFileDescriptor.ReplaceReference(newFilePath)

      End If

    Catch exc As Exception

    End Try

  Next descriptorCount

Next

What can I do that Inventor recognizes the changes correctly?

It is no option to reopen assemblies, because opening of large assemblies is too slow.

thanks

-marcus

[Anonymous · Accepted solution]

I solved the Problem switching to LevelOfDetailEnum.kAllPartsSuppressedLevelOfDetail and back.

[Anonymous]

I did not understand it fully. whose lod did you change and run. Could you please explain a bit more in detail

[Anonymous]

I switched it on the main Assembly like that:

 If m_application.ActiveDocument.DocumentType = DocumentTypeEnum.kAssemblyDocumentObject Then
                        With DirectCast(m_application.ActiveDocument, AssemblyDocument)
                            
                            Dim alvl = .ComponentDefinition.RepresentationsManager.ActiveLevelOfDetailRepresentation
                            For Each lvl As LevelOfDetailRepresentation In .ComponentDefinition.RepresentationsManager.LevelOfDetailRepresentations
                                If lvl.LevelOfDetail = LevelOfDetailEnum.kAllPartsSuppressedLevelOfDetail Then
                                  
                                    lvl.Activate()
                                    Exit For
                                End If
                            Next

                            'switch back
                            alvl.Activate()
                        End With
                    End If

[Anonymous]

thank you. working