ГОСПОДА !
есть желание получить по COM измененные объекты из плана обмена.
Узел = Неопределено;
НомерСообщения =0;
Если фТекущийПланОбмена Тогда
ПлО = ПланыОбмена;
Иначе
ПлО = _Соединение.ПланыОбмена;
КонецЕсли;
ВыбПО = ПлО.sОбмен.Выбрать();
Пока ВыбПО.Следующий() Цикл
Если Не (ВыбПО.Ссылка = ПлО.sОбмен.ЭтотУзел()) Тогда
Узел = ВыбПО.Ссылка;
Прервать;
Конецесли;
КонецЦикла;
Если Узел = Неопределено тогда Сообщить("Узел не определен !");
Возврат;
КонецЕсли;
Выб = ПлО.ВыбратьИзменения(Узел,НомерСообщения);
Пока Выб.Следующий() Цикл
ОбработкаПрерыванияПользователя();
Сообщить("Об = " + СокрЛП(Выб.Получить()));
КонецЦикла;
|