Народ не кидайте камнями, решил разобраться с расширениями.
Задача: При изменении Организации, автоматически заполнить подразделение.
Не соображу как через расширение заполнить реквизит и отобразить на форме
&НаСервере
Процедура БИТ_ОрганизацияПриИзмененииПослеНаСервере()
ТаблицаСотрудников=ПроверитьНаличиеПодработки(ПараметрыСеанса.ТекущийПользователь.ФизическоеЛицо, ТекущаяДата());
Для Каждого Стр Из ТаблицаСотрудников Цикл
КодПодразделения=Стр.Подразделение.Код;
КонецЦикла;
ЭтаФорма.Элементы.Подразделение = Справочники.ПодразделенияОрганизаций.НайтиПоКоду(КодПодразделения);
КонецПроцедуры
Так не хочет
и так - Подразделение = Справочники.ПодразделенияОрганизаций.НайтиПоКоду(КодПодразделения);