Настройка «ВЭД-Декларант»:
Для интеграции рекомендуется использовать «зеркало» базы данных «ВЭД-Декларанта» и «Монитора ЭД».
Описание настройки «зеркалирования» MSSQL можно прочитать по ссылке.
Описание всех функций в интерфейсе CTMDclIfc.idl
Создание объекта Декларанта
Type t = Type.GetTypeFromProgID("Declarant.clsCTM_Dcl");
DclApp = (ICTMDcl)System.Activator.CreateInstance(t);
Ожидание загрузки
DclApp.IsReady() = ECTMDclResult.rOk
Режим запуска
Function SetProgramStartMode(StartMode As String) As CTMDclIfc.ECTMDclResult
StartMode принимает строку, аналогичную аргументам запуска приложения. Сейчас это комбинация значений -es и -dc.
-es ( режим ExtraSilent) – загрузка без диалогов + подавление MsgBox и ExtMsgBox.
-dc ( режим DbCollectMode) – загрузка в режиме « Сбор БД».
Для корректной отработки выбора режима SetProgramStartMode необходимо запустить сразу после создания экземпляра ICTMDcl.
Сохранение ДТ в XPS
DclApp.PrintDocumentsToXPS(sTempDir, sND, ref sReturnSaveFile);
sTempDir – временный каталог для сохранения XPS.
sND – внутренний номер папки ДТ в базе.
В переменной sReturnSaveFile возвращается имя сохраненного XPS.
Сохранение ДТ в PDF
DclApp.PrintDocumentsToPDF(sTempDir, sND, ref sReturnSaveFile).
sTempDir – временный каталог для сохранения PDF.
sND – внутренний номер папки ДТ в базе.
В переменной sReturnSaveFile возвращается имя сохраненного PDF.
Загрузка ДТ из XML (без контейнера)
DclApp.ImportDocumentsFromXML(FieldName, sND).
FieldName - ДТ в формате XML (без контейнера),
sND - возвращается внутренний номер ДТ в базе ВЭД Декларант загруженного документа.
XML должен быть сформирован в соответствии со схемой ESADOUT_CU Альбома форматов ФТС,
описание элементов в Гл.6.6 "Таможенные ЭД", доступно на сайте ФТС(Главная страница-Электронная таможня-Техническая документация- Альбомы форматов электронных документов https://customs.gov.ru/techdoc/alboms-format-eldoc).
Скрытие окна «ВЭД-Декларант»
DclApp.HideWindow();
Закрытие «ВЭД-Декларант»
DclApp.CloseProgram().
Выгрузка товаров спецификации в Excel
Шаблон SpecificationGoods.xls,
правила переноса SpecificationGoods.xml
[helpstring("Экспорт товаров Спецификации в формате Excel.")]
HRESULT ExportSpecificationGoodsToExcel([in] BSTR* sND, [in, out] BSTR* sTargetDir, [in, out] BSTR* sResultFile, [out, retval] ECTMDclResult*);
sND - внутренний номер ДТ
sTargetDir - полный путь к каталогу, в котором следует сохранить результат
sResultFile - полный путь к созданному файлу или пустая строка в случае ошибки
В качестве имени файла используется внутренний номер. При наличии файла в каталоге, он будет перезаписан.
Функция вернет ECTMDclResult.rOk в случае, если файл был создан.