Добрый день!

Нужно после выбора значения в колонке ТЧ документа заполнить оставшиеся колонки ТЧ по текущей строке данными из реквизитов выбранного эл. справочника. Как это сделать?

Стр.РеквизитТЧ1 = Стр.ЭлементСправочника.Реквизит1;
Стр.РеквизитТЧ2 = Стр.ЭлементСправочника.Реквизит2;

УП это что?

Спасибо, поясню подробнее: нужно заполнить перебором колонок по текущей строке.

стр = Элементы.ИФНС.ТекущиеДанные;
Для каждого Рекв Из стр.Подключение.Метаданные().Реквизиты Цикл
    //Нужно проверить наличие колонки с именем Рекв.Имя и
        // заполнить ячейку по значению реквизита эл.     //справочника
    
КонецЦикла;

в ПриИзменении ячейки таб поля
ТД=Элемент.ТекущиеДанные;
ТД.РеквизитТЧ1 = ТД.ИмяИзмененнойКолонки.Реквизит1;
ТД.РеквизитТЧ2 = ТД.ИмяИзмененнойКолонки.Реквизит2;

УП - управляемая форма

(5)Полузуйся УФ. а то не поймут:-)

Повторюсь:

&НаКлиенте
Процедура ИФНСПодключениеПриИзменении(Элемент)
стр = Элементы.ИФНС.ТекущиеДанные;
Для каждого Рекв Из стр.Подключение.Метаданные().Реквизиты Цикл
    //Нужно проверить наличие колонки с именем Рекв.Имя и

        // заполнить ячейку по значению реквизита эл.     //справочника

    
КонецЦикла;

КонецПроцедуры

Как это сделать?

а если тупо ЗаполнитьЗначенияСвойств?

Можно так, если др. неизвестно:

&НаКлиенте
Процедура ИФНСПодключениеПриИзменении(Элемент)
    стр = Элементы.ИФНС.ТекущиеДанные;
    Для каждого Рекв Из стр.Подключение.Метаданные().Реквизиты Цикл
        Если ЕстьКолонка(Рекв.Имя) Тогда
        
            стр[Рекв.Имя] = стр.Подключение[Рекв.Имя];    
        
        КонецЕсли;
    
    КонецЦикла;
    
КонецПроцедуры


&НаСервере
Функция ЕстьКолонка(Имя)
    
     Возврат ?(РеквизитФормыВЗначение("Объект").Метаданные().ТабличныеЧасти.ИФНС.Реквизиты.Найти(Имя)= неопределено,ЛОЖЬ,Истина) ;

КонецФункции