INmkTechnology
Наследование 
Функции и процедуры
Техпроцесс
См. также:
ITcs_Application
.NmkTechnology
Пример на VB:
Dim TcsObj As CSDN.TCS
Dim App As CSDN.Tcs_Application
Dim NMks As CSDN.Nomenclatures
Dim NmkTech As CSDN.NmkTechnology
Set TcsObj = CreateObject("CSDN.TCS")
Set App = TcsObj.Login
On Error Resume Next
If App.NmkClasses.RunModuleForSelect("Выберите класс", False) Then
Set NMks = App.Nomenclatures(App.NmkClasses.Properties("ID").AsInteger)
If NMks.RunModuleForSelect("Выберите номенклатуру", False) Then
Set NmkTech = App.NmkTechnology(NMks.Properties("ID").AsInteger, -1)
rw = 1
For i = 1 To NmkTech.PropertiesCount
Cells(rw, i).Value = NmkTech.Properties(i - 1).Caption
Next
rw = rw + 2
NmkTech.First
Do While Not NmkTech.EOF
For i = 1 To NmkTech.PropertiesCount
Cells(rw, i).Value = NmkTech.Properties(i - 1).DisplayText
Next
NmkTech.Next
rw = rw + 1
Loop
Set NmkTech = Nothing
End If
Set NMks = Nothing
End If
Set App = Nothing
Set TcsObj = Nothing