НужныйОбъект = Справочники.Контрагенты.ПолучитьСсылку();
Если НужныйОбъект.Код = ИК.Код И
НужныйОбъект.Наименование = ИК.Наименование
Тогда
Выборка = ИК.ВладелецКарты.Выбрать();
Пока Выборка.Следующий() Цикл
Объект = Выборка.ПолучитьОбъект();
Объект.ВладелецКарты = НужныйОбъект.Ссылка;
Попытка
Объект.Записать();
Исключение
Предупреждение("Не удалось записать объект """ + Объект + """
|" + ОписаниеОшибки(),60);
КонецПопытки;
КонецЦикла;
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший