Nomenclatures2(NmkClassId As Long,AttachParamCodes As String) As INomenclatures ( PropertyGet )
Справочник "Номенклатура" для указанного класса с присоединенными параметрами
Синтаксис:
objectvariable.Nomenclatures2( NmkClassId, AttachParamCodes )
objectvariable -
ITcs_Application2
NmkClassId - идентификатор класса
AttachParamCodes - уникальные коды параметров разделенные ";"
Возвращает: указатель на
Nomenclatures
Пример на VB:
Dim TcsObj As CSDN.TCS
Dim App As CSDN.Tcs_Application
Dim NMks As CSDN.Nomenclatures
Set TcsObj = CreateObject("CSDN.TCS")
Set App = TcsObj.Login
If App.NmkClasses.RunModuleForSelect("Выберите класс", False) Then
Set NMks = App.Nomenclatures2( App.NmkClasses.Properties("ID").AsInteger, "TCS_ST_KG" )
...
Set NMks = Nothing
End If
Set App = Nothing
Set TcsObj = Nothing