SignEDocument – подписать документ
Contents
Синтаксис:
procedure SignEDocument(
DocumentName: WideString;
VersionID: Integer);
Параметры:
| • | DocumentName – имя файла активного документа приложения без указания пути; |
| • | VersionID – значение поля XRecID таблицы SBEDocVer открытой версии документа. |
Описание:
Функция вызывает диалог подписания документа. На момент вызова функции документ должен быть закрыт.
Пример:
' Вызвать диалог подписания текущего документа.
DocumentName = ActiveDocument.Name
Call ActiveDocument.Close
DocInfoXML = IntLib.GetEDocumentInfo(ActiveDocument.FullName)
Set XMLFile = CreateObject("MSXML.DOMDocument")
Call XMLFile.loadXML(DocInfoXML)
VersionID = XMLFile.selectSingleNode("//CurrentVersionID").Text
Call IntLib.SignEDocument(DocumentName, VersionID)
| © Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |