Загрузка данных

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

&НаСервереНаБезКонтекста
Функция ПолучитьЦенуНаСервере(Дата, Номенклатура)
	
	Отбор = Новый Структура("Номенклатура", Номенклатура);
	ЗначенияРесурсов = РегистрыСведений.Цены.СрезПоследних(Дата, Отбор);
	
	Возврат ЗначенияРесурсов.Цена;
	
КонецФункции