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