Как автоматически вытягивать значения с регистра сведений?

Question

[Mag1str]

Документ на установку цен устанавливает цену на отдельную номенклатуру. Когда пользователь производит документ продажи, то при выборе номенклатуры в табличной части, система должна автоматически подтягивать цену по срезу последних из регистра сведений.
Я что-то попробовал, но не выходит.

скрин кода

Comments

[Mag1str]

Моя dt https://drive.google.com/file/d/1rketPPG6YKe82sL6-...

Answer 1

[Mag1str]

&НаСервере
Функция ПродажаПриИзмененииНаСервере(Товар)
  Запрос = Новый Запрос;
  Запрос.Текст = 
    "ВЫБРАТЬ
    |	ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура,
    |	ЦеныНоменклатурыСрезПоследних.Цена КАК Цена
    |ИЗ
    |	РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
    |ГДЕ
    |	ЦеныНоменклатурыСрезПоследних.Номенклатура = &Номенклатура";
  
  Запрос.УстановитьПараметр("Номенклатура", Товар);
  
  
  РезультатЗапроса = Запрос.Выполнить();
  
  ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
  
  Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
    
    Возврат ВыборкаДетальныеЗаписи.Цена;
    
  КонецЦикла;

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

&НаКлиенте
Процедура ПродажаПриИзменении(Элемент)
  ТекущиеДанные = Элементы.Продажа.ТекущиеДанные;
  Цена = ПродажаНоменклатураПриИзмененииНаСервере(ТекущиеДанные.Номенклатура);
  ТекущиеДанные.Цена = Цена;
КонецПроцедуры

Answer 2

[Denis Melnikov]

Ну а где ?

Запрос.УстановитьПараметр("Номенклатура", Значение);

Comments

[Mag1str]

Писал, ругается

Запрос.УстановитьПараметр("Номенклатура", Нуменклатура);

[Denis Melnikov]

Mag1str, а что у вас в "Номеклатура" , я просто в коде не вижу номенклатуры )
Продажа, что за объект ? Это строка товарной части ? это документ ? что это ?

[Mag1str]

Denis Melnikov, я скинул dt, возможно у вас есть возможность посмотреть, сейчас попробую объяснить словами

[Mag1str]

[Denis Melnikov]

&НаСервере
Функция ПродажаНоменклатураПриИзмененииНаСервере(Товар)
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура,
		|	ЦеныНоменклатурыСрезПоследних.Цена КАК Цена
		|ИЗ
		|	РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
		|ГДЕ
		|	ЦеныНоменклатурыСрезПоследних.Номенклатура = &Номенклатура";
	
	Запрос.УстановитьПараметр("Номенклатура", Товар);
	
	
	РезультатЗапроса = Запрос.Выполнить();
	
	ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
	
	Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
		
		Возврат ВыборкаДетальныеЗаписи.Цена;
		
	КонецЦикла;

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

&НаКлиенте
Процедура ПродажаНоменклатураПриИзменении(Элемент)
	ТекущиеДанные = Элементы.Продажа.ТекущиеДанные;
	Цена = ПродажаНоменклатураПриИзмененииНаСервере(ТекущиеДанные.Номенклатура);
	ТекущиеДанные.Цена = Цена;
КонецПроцедуры

[Mag1str]

Denis Melnikov, код без ошибок, но цена с регистра не подтягивается. У вас работает?

[Константин Нагибович]

я бы в СрезПоследних() указывал номенклатуру, а не в секции ГДЕ

[Mag1str]

Константин Нагибович, конструктор сам так написал

[Константин Нагибович]

Mag1str, даже в конструкторе можно (и нужно) делать подобные условия

[Mag1str]

Константин Нагибович, подскажите решение моей задачи?

[Denis Melnikov]

Константин Нагибович, там много чего надо делать ) тут ну вопрос оптимизации.

[Denis Melnikov]

Mag1str, конечно. Проверил. Все работает.

[Mag1str]

Denis Melnikov, можете скинуть dt? Может вы какие-то настройки изменили

[arlis]

ВЫБРАТЬ
	ЦеныНоменклатурыСрезПоследних.Цена КАК Цена,
	ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура
ИЗ
	РегистрСведений.ЦеныНоменклатуры.СрезПоследних(
			&НаДату,
			Номенклатура = &ПарамНоменклатура
				И ТипЦен = &ПарамТипЦен) КАК ЦеныНоменклатурыСрезПоследних

[Mag1str]

arlis, уже есть решение, отметил

[Denis Melnikov]

Mag1str, вы взяли мой код , и ответили сами себе и отметили это решением ?) Забавно =)

[Mag1str]

Denis Melnikov, ваше не мог отметить решаемым) вы не туда писали. Да и в названиях функций ошибка, такой код как у вас не работал.