&НаКлиенте
Процедура ТранспортПриИзменении(Элемент)
Проверка = ПроверкаБригады(НачалоДня(Объект.Дата), Объект.Транспорт);
Если проверка = Ложь Тогда
Сообщить("На машину не определена бригада");
Объект.Транспорт = "";
Иначе Объект.Водитель=Водитель(Объект.Дата,Объект.Транспорт)
//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
//}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
КонецЕсли
КонецПроцедуры
&НаСервере
Функция Водитель (АктуальнаяДата, Машина) Экспорт
//{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
// Данный фрагмент построен конструктором.
// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| СостояниеМашины.Бригада.Водитель КАК БригадаВодитель
|ИЗ
| РегистрСведений.СостояниеМашины КАК СостояниеМашины
|ГДЕ
| СостояниеМашины.Машина = &Машина
| И СостояниеМашины.Период = &АктуальнаяДата";
(4) И поместить внутрь цикла Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший