GetListOfIndirectFilesForGivenFile Method

Description

Returns all the indirect file names.

Syntax

Visual Basic
Public Sub GetListOfIndirectFilesForGivenFile( _ ByVal bstrItemId As String, _ ByVal bstrItemRev As String, _ ByVal bstrDataSetFileName As String, _ ByVal bstrRevisionRule As String, _ ByVal bstrVariantRule As String, _ ByRef pvarListOfIndirectFiles As Variant _ )

Visual Basic

Public Sub GetListOfIndirectFilesForGivenFile( _
   ByVal bstrItemId As String, _
   ByVal bstrItemRev As String, _
   ByVal bstrDataSetFileName As String, _
   ByVal bstrRevisionRule As String, _
   ByVal bstrVariantRule As String, _
   ByRef pvarListOfIndirectFiles As Variant _
)

Parameters

bstrItemId: Specifies the Item Id of the file.
bstrItemRev: Specifies the Revision of the file.
bstrDataSetFileName: Specifies the Data set name of the file.
bstrRevisionRule: Revision rule of the file.
bstrVariantRule: Variant rule of the file.
pvarListOfIndirectFiles: Returns the names of the indirect file names.

Example

Example (Visual Basic)

Private Sub Command1_Click()
    On Error Resume Next
    Dim objApplication As SolidEdgeFramework.Application
    Dim objSolidEdgeInsightXT  As SolidEdgeFramework.SolidEdgeInsightXT
    
    Set objApplication = GetObject(, "SolidEdge.Application")
    Set objSolidEdgeInsightXT = objApplication.SolidEdgeInsightXT
                    
    Dim FileItemID As String
    Dim FileItemRevID As String
    Dim FileDataSetName As String
    Dim FileRevisionRule As String
    Dim FileVariantRule As String
    
    FileItemID = "020147"
    FileItemRevID = "A"
    FileDataSetName = "020147.par"
    FileRevisionRule = "latest working"
    FileVariantRule = ""
    
    Call objSolidEdgeInsightXT.GetListOfIndirectFilesForGivenFile(FileItemID, _
        FileItemRevID, _
        FileDataSetName, _
        FileRevisionRule, _
        FileVariantRule, _
        listoffiles)

    Set objSolidEdgeInsightXT = Nothing
    Set objApplication = Nothing
End Sub