UserNomenclatureDesktopByNmkClass(NmkClassId As Long) As IUserNomenclatureDesktop ( PropertyGet )


Рабочий стол пользователя для определенного класса

Синтаксис:

objectvariable.UserNomenclatureDesktopByNmkClass( NmkClassId )

objectvariable - ITcs_Application2

NmkClassId - идентификатор класса

Возвращает: указатель на UserNomenclatureDesktop


Пример на VB Script:
Sub Test()
    
    Dim I, NmkClassId
    If TCSApp.NmkClasses.RunModuleForSelect("Выберите класс", False) Then
    
        NmkClassId = TCSApp.NmkClasses.Properties("ID").AsInteger
        I = TCSApp.UserNomenclatureDesktopByNmkClass(NmkClassId).ShowModal("Мой рабочий стол для определенного класса")
        
    End If
End Sub