Execute(SilentMode As Boolean,NewVerName As String)

Execute(SilentMode As Boolean,NewVerName As String) ( Function )

Выполнить переход

Синтаксис:

objectvariable.Execute( SilentMode, NewVerName )

objectvariable - IActualWorkFlowItems

SilentMode - флаг: True - не показывать диалог и других окон сообщений, False - показывать

NewVerName - наименование новой версии (необходимо когда при переходе создается новая версия)

Пример на VB Script:

Sub Test()
    
    Dim I
    Dim Archive
    Dim ActualWorkFlowItems
    
    Set Archive = TCSApp.Archive
    If Archive.RunModuleForSelect("Выберите документ", False) Then
        Set ActualWorkFlowItems = Archive.Properties( "ACTUAL_WORKFLOW_ITEMS" ).AsIDispatch
        If ActualWorkFlowItems.RunModuleForSelect("Выберите переход для выполнения", False) Then
            Call ActualWorkFlowItems.Execute( True, "NewVersion" )
        End If
        Set ActualWorkFlowItems = Nothing
    End If
    Set Archive = Nothing
End Sub