SelectedStructureItem As Long

SelectedStructureItem As Long ( PropertyPut )

Выбрать позицию состава ПСп, которая будет является выбранной в дереве состава

Т.е. с составом какой позиции будет идти работа.

Синтаксис:

objectvariable.SelectedStructureItem = StructureItemID

objectvariable - IProductionBOMStructure

StructureItemID - идентификатор позиции состава

Пример на VB Script:

Sub Test()
    Dim ProductionBOMStructure
    Dim I
    If TCSApp.Manufacturing.ProductionBOM.RunModuleForSelect("Выберите производственную спецификацию", False) Then
        Set ProductionBOMStructure = TCSApp.Manufacturing.ProductionBOM.Properties("ProductionBOMStructure").AsIDispatch
        If ProductionBOMStructure.RunModuleForSelect("Выберите позицию состава, которую нужно сделать текущей в дереве состава (т.е. показать ее состав)", False) Then
            ProductionBOMStructure.SelectedStructureItem = ProductionBOMStructure.Properties("ID").AsInteger
            I = ProductionBOMStructure.ShowModal("Состав ПСп")
        End If
        Set ProductionBOMStructure = Nothing
    End If
End Sub