Sign(SilentMode As Boolean,DoRoute As Boolean,DoCancel As Boolean) As Boolean ( Function )

Поставить подпись и выполнить переход, если подпись автоматически осуществляет переход

Синтаксис:

objectvariable.Sign( SilentMode, DoRoute, DoCancel )

objectvariable - IActualWorkFlowItemSigns

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

DoRoute - выполнить переход, если подпись автоматически осуществляет переход.

DoCancel - отменить подписание, если произошла ошибка при осуществлении перехода

Возвращает: логическое значение - признак успешного выполнения


Пример на VB Script:
Sub Test()
    
    Dim I
    Dim Archive
    Dim ActualWorkFlowItems
    Dim ActualWorkFlowItemSigns
    
    Set Archive = TCSApp.Archive
    If Archive.RunModuleForSelect("Выберите документ", False) Then
        Set ActualWorkFlowItems = Archive.Properties( "ACTUAL_WORKFLOW_ITEMS" ).AsIDispatch
            Set ActualWorkFlowItemSigns = ActualWorkFlowItems.Properties( "SIGNS" ).AsIDispatch
            If ActualWorkFlowItemSigns.RunModuleForSelect("Выберите подпись, которую необходимо проставить", False) Then
                SilentMode = True 'не показывать диалог и других окон сообщений
                DoRoute = False 'выполнить переход, если подпись автоматически осуществляет переход.
                DoCancel = False 'отменить подписание, если произошла ошибка при осуществлении перехода
                If ActualWorkFlowItemSigns.Sign( SilentMode, DoRoute, DoCancel ) Then
                    Call TCSApp.ShowMessageBox("Сообщение", "Подпись проставлена.")
                Else
                    Call TCSApp.ShowMessageBox("Сообщение", "Подпись не проставлена!")
                End If
            End If
            Set ActualWorkFlowItemSigns = Nothing
        Set ActualWorkFlowItems = Nothing
    End If
    Set Archive = Nothing
End Sub