РИБ

Процедура ПрочитатьСообщениеСИзменениями()Экспорт
Каталог= КаталогВременныхФайлов();

ИмяФайла=Каталог+?(Прав(Каталог,1)="\","","\")+
"Message"+СокрЛП(Ссылка.Код)+"_"+
СокрЛП(ПланыОбмена.Филиалы.ЭтотУзел().Код)+".xml";

Файл= Новый Файл(ИмяФайла);
Если Не Файл.Существует()Тогда
Возврат;
конецЕсли;
ЧтениеXML= Новый ЧтениеXML;
Попытка
ЧтениеXML.ОткрытьФайл(ИмяФайла);
Исключение
Сообщить("Невозможно открыть файл обмена данными.");
Возврат;

Сообщить("----- Загрузка из" + Строка(ЭтотОбъект) + "---------");
Сообщить(" - Считывается файл" + ИмяФайла);

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

ЧтениеСообщения.НачатьЧтение(ЧтениеXML);

Если ЧтениеСообщения.Отправитель <> Ссылка Тогда
ВызватьИсключение "Неверный Узел";
КонецЕсли;

ПланыОбмена.УдалитьРегистрациюИзменений(ЧтениеСообщения.Отправитель, ЧтениеСообщения.НомерПринятого);
//Пока true Цикл

Пока ВозможностьЧтениеXML(ЧтениеXML) Цикл
Данные= ПрочитатьXML(ЧтениеXML);

Если Не ЧтениеСообщения.Отправитель.Главный
И
ПланыОбмена.ИзменениеЗарегистрировано(ЧтениеСообщения.Отправитель.Данные) тогда
Сообщить(" - Изменения отключены");
Продолжить;
КонецЕсли;
Данные.ОбменДанными.Оправитель= ЧтениеСообщения.Отправитель;
Данные.ОбменДанными.Загрузка = Истина;
Данные.Записать();
КонецЦикла;

ЧтениеСообщения.ЗакончитьЧтение();
ЧтениеXML.Закрыть();
УдалитьФайлы(ИмяФайла);
Сообщить("-------Конец загрузки---------");
КонецПопытки;
//КонецЦикла
КонецПроцедуры

Вся процедура чтение данных при обмене.
При запуске сл. ошибка
{ПланОбмена.Отделения(65,14)}: Процедура или функция с указанным именем не определена (ВозможностьЧтениеXML)
Пока <<?>>ВозможностьЧтениеXML(ЧтениеXML) Цикл