ShowOperation(TECH_ID As Long) ( Function )

Показать только данные относящиеся к конкретной операции или переходу

Устанавливает фильтр для отображения записей техпроцесса.

Синтаксис:

objectvariable.ShowOperation( TECH_ID )

objectvariable - INmkTechnology

TECH_ID - идентификатор позиции техпроцесса (0 - показать все)


Пример на 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
    
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)
        
        NmkTech.Filter.Active = True
        'OperID - идентификатор позиции ТП необходимой операции
        Call NmkTech.ShowOperation(OperID)
        
        I = NmkTech.ShowModal("Записи определенной операции")
        
        Set NmkTech = Nothing
    End If
    
    Set NMks = Nothing
End If
Set App = Nothing
Set TcsObj = Nothing