Написал
Процедура ПереченьНоменклатурыНоменклатураПриИзменении(Элемент)
СтрокаТабличнойЧасти=ЭлементыФормы.ПереченьНоменклатуры.ТекущиеДанные;
СтрокаТабличнойЧасти.Цена=РозничнаяЦена(Дата,Элемент.Значение);
РассчитатьСумму(СтрокаТабличнойЧасти);
СтрокаТабличнойЧасти.ВидНоменклатуры=СтрокаТабличнойЧасти.Номенклатура .ВидНоменклатуры;
КонецПроцедуры
и заработало. ТОлько нефига не понимаю почему
Логичнее было бы если б написать
СтрокаТабличнойЧасти.ВидНоменклатуры=Справочники.Номенклатура.ВидНомен клатуры;
только так не работает