---

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

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

&НаСервереБезКонтекста
Функция ПолучитьВидНоменклатурыНаСервере(Номенклатура)
	Возврат Номенклатура.ВидНоменклатуры;
КонецФункции