Запрос= новый запрос;
Запрос.Текст=
"ВЫБРАТЬ
| МинСуммаСамовывозаСрезПоследних.ГруппаФинКонтр КАК Группа,
| МинСуммаСамовывозаСрезПоследних.МинимальнаяСуммаСамовывоза КАК Миним
|ИЗ
| РегистрСведений.МинСуммаСамовывоза.СрезПоследних КАК МинСуммаСамовывозаСрезПоследних
|ГДЕ
| МинСуммаСамовывозаСрезПоследних.Период = &ДатаПр
| И МинСуммаСамовывозаСрезПоследних.ГруппаФинКонтр.Ссылка = &Тек";
Запрос.УстановитьПараметр("ДатаПр",ЭтаФорма.ДатаПросмотра);
Запрос.УстановитьПараметр("Тек", ЭтотОбъект.ЭтотОбъект.Объект.Ссылка);
Т=Запрос.Выполнить().Выгрузить();
Если Т.Количество()<>0 тогда
МинимальнаяСуммаСамовывоза=Т[0].Миним
иначе
МинимальнаяСуммаСамовывоза=0;
КОнецесли;
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший