ПриИзменении()

[elwis91]

здравствуйте.есть такая задача, мне нужно чтобы при выборе реквизита Водитель(СправочникСсылка.Физические Лица) реквизит Автомобиль(СправочникСсылка.ЗначенияСвойствОбъектов) заполнялся автоматически.
я так понял на форме списка я выбираю водителя, в событии ПриИзменении, должен написать этот обработчик событий.Подскажите пожалуйста как сделать

[Besart]

в событии ПриИзменении

в событии ОбработкаВыбора, вызываете серверную процедуру в к\ю передаете выбранное значение (водитель), в к\й запросом из соотвествующих регистров вытаскиваете нужные сведения, затем заполняете этими данными соответсвующие реквизиты формы

[LordWizard]

не только обработчик, но и связь с реквизитом, на основании которого перезаполняется.

[elwis91]

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

[LordWizard]

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

Главное работает! Молодца!
Анек:
"Приходит малец программера с садика домой, а тот в это время сидит и пишет прогу.
-Пап, там такое нам воспиталка расказала!?!
-Что случилось сынок? - не оборачиваясь от ратного труда, программер.
-Представляешь, солнышко встает утром на небо и там ходит целый день!
-Сынок! Работает? Работает! Так вот - ничего не трогай!"

[elwis91]

всех с праздником кстати!)ну а все-таки, как сделать чтобы еще вручную можно было заполнять?

[LordWizard]

всех с праздником кстати!)ну а все-таки, как сделать чтобы еще вручную можно было заполнять?

посмотри в настройках и по тексту по данному полю реквизита на доступность.

Добавлено: 13 сен 2013, 12:21

всех с праздником кстати!)ну а все-таки, как сделать чтобы еще вручную можно было заполнять?

посмотри в настройках и по тексту по данному полю реквизита на доступность.

Пятница 13-е?

[elwis91]

день программиста!)ну и пятница 13ое заодно:D