0
1634344
20.01.15
✎
10:36
|
Как теперь заполнить реквизит формы выбранным значением из списка значений. Впал в штупор. Кто придумал эти управляемые формы
&НаСервере
Функция ФормированиеЗапроса()Экспорт
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Водители.Наименование,
| Водители.Статус,
| Водители.ЗакреплёнАвто
|ИЗ
| Справочник.Водители КАК Водители
|ГДЕ
| Водители.ПометкаУдаления = ЛОЖЬ
| И Водители.Статус = ЗНАЧЕНИЕ(Перечисление.СтатусВодителя.Работает)";
СЗ = Новый СписокЗначений;
СЗ.Очистить();
СЗ.ЗагрузитьЗначения(Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("Наименование"));
Возврат(СЗ);
КонецФункции
&НаКлиенте
Процедура ВодительНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
сз2 = ФормированиеЗапроса();
Если СЗ2.Количество()>0 Тогда
СтандартнаяОбработка = Ложь;
ВыбЗначение = СЗ2.ВыбратьЭлемент("Наименование");
Если ВыбЗначение <> Неопределено Тогда
Элементы.Водитель = ВыбЗначение.Значение;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
|
|