1С-Предприятие 8.0. Практическое пособие разработчика



              

Создание процедуры записи данных - часть 4


       СокрЛП(ПланыОбмена.Филиалы.ЭтотУзел().Код) + "_" + СокрЛП(Ссылка.Код) + ".xml";

   // Создать объект записи XML

   //*** запись XML документов

   ЗаписьXML = Новый ЗаписьXML;

   ЗаписьXML.ОткрытьФайл(ИмяФайла);

   ЗаписьXML.ЗаписатьОбъявлениеXML();

   //*** инфраструктура сообщений

   ЗаписьСообщения = ПланыОбмена.СоздатьЗаписьСообщения();

   ЗаписьСообщения.НачатьЗапись(ЗаписьXML, Ссылка);

   Сообщить(" Номер сообщения; " + ЗаписьСообщения.НомерСообщения);

   // Получить выборку измененных данных

   //*** механизм регистрации изменений

   ВыборкаИзменений = ПланыОбмена.ВыбратьИзменения(

       ЗаписьСообщения.Получатель, ЗаписьСообщения.НомерСообщения);

  Пока ВыборкаИзменений.Следующий() Цикл

       // Записать данные в сообщение

       //***XML-сериализация

       ЗаписатьXML(ЗаписьXML, ВыборкаИзменений.Получить());

   КонецЦикла;

   ЗаписьСообщения.ЗакончитьЗапись();

   ЗаписьXML.Закрыть();

   Сообщить("------------ Конец выгрузки ------------");

КонецПроцедуры

На этом создание процедуры записи данных обмена закончено.




Содержание  Назад  Вперед