В начало

Обмен с филиалами

 

&НаСервереБезКонтекста

Процедура ОбменСФилиалами () Экспорт

            ВыборкаУзлов = ПланыОбменаилиалы.Выбрать ();

           

            Пока ВыборкаУзловледующий () Цикл

                        Если ВыборкаУзловсылка <> ПланыОбмена.Филиалы.ЭтотУзел () Тогда

                                   УзелОбъект = ВыборкаУзловолучитьОбъект ();

                                  

                                   УзелОбъектрочитатьСообщениеСИзменениями ();

                                  

                                   УзелОбъектаписатьСообщениеСИзменениями ();

                        КонецЕсли;

            КонецЦикла;

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