Помогите новичку. Как изменить чтобы руками изменять цену

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


&НаСервере

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