Постановка задачи
Документ согласуется внутри организации в системе DIRECTUM в формате DOC. После согласования документ необходимо преобразовать в формат PDF, поскольку использовать документ будет удобнее в этом формате.
Решение
Чтобы преобразование выполнялось автоматически, необходимо в типовой маршрут согласования документа добавить прикладной блок на основе базового блока «Сценарий», который будет преобразовывать документ в формат PDF и помещать PDF-документ в новую версию существующего.
Блоку необходимо задать свойство EDocument типа документ. Свойство должно содержать информацию о документе, который нужно преобразовать.
Необходимо задать следующие результаты выполнения блока:
• | Преобразование не выполнено (N); |
• | Преобразование выполнено успешно (C). |
В свойстве Script блока нужно задать приведенный ниже программный код.
Программный код
// Получить константу, содержащую адрес сервиса преобразования.
DCTSConvertToPDFWSDL = GetAssignedConst('DCTSConvertToPDFWSDL')
BlockProperties = Sender.Properties
EDocumentProperty = BlockProperties.ValueByName('EDocument')
ConvertingFailed = FALSE
try
EDocumentInfo = EDocumentProperty.Value
EDocument = EDocumentInfo.Document
except
ConvertingFailed = TRUE
endexcept
if not ConvertingFailed
try
DCTSConvertEDocumentToPDF(DCTSConvertToPDFWSDL; EDocument;;
TRUE; 'Версия для подписания')
except
ConvertingFailed = TRUE
endexcept
endif
if ConvertingFailed
// Преобразование не выполнено.
Result = 'N'
else
// Преобразование выполнено успешно.
Result = 'C'
endif
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |