AXForum  
Вернуться   AXForum > Microsoft Dynamics NAV > NAV: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 19.09.2014, 10:54   #3  
Kirill.Cheremisin is offline
Kirill.Cheremisin
Участник
 
3 / 10 (1) +
Регистрация: 18.09.2014
Спасибо за совет, Алекс, он мне очень помог!

Автозапуск решил при помощи Job Queue, окно убрал запуская ХМЛ-порт через XMLPORT.IMPORT.

Следующий код поместил в codeunit, который использовал в Job Queue:

Код:
SalesSet.GET;
DirectoryInfo := DirectoryInfo.DirectoryInfo(SalesSet."Orders from Customers");
List := DirectoryInfo.GetFiles('*.XML');
enumerator := List.GetEnumerator;

WHILE enumerator.MoveNext DO
BEGIN
FileInfo := enumerator.Current;
XmlFile.OPEN(SalesSet."Orders from Customers" + FileInfo.Name);
XmlFile.CREATEINSTREAM(InputStream);
IF XMLPORT.IMPORT(XMLPORT::"Orders From Web", InputStream) THEN
BEGIN
  FileInfo.CopyTo(SalesSet."Archive Orders from Customers" + FileInfo.Name, TRUE);
  FileInfo.Delete;
END;
XmlFile.CLOSE;
END;
 


Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 16:47.