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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

КонецЦикла;

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

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

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

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

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