У нас закупка в валюте, а реализация в рублях.
Спасибо, что код был открытый - просто перенес себе только то, что было нужно )
хочу поделиться с сообществом:
изменил запрос и расчет цены:
ЦенаЗапрос.Текст = "ВЫБРАТЬ
| ЦеныНоменклатурыСрезПоследних.Номенклатура КАК Номенклатура,
| ЦеныНоменклатурыСрезПоследних.Цена КАК Цена,
| ЦеныНоменклатурыСрезПоследних.ВалютаЦены КАК ВалютаЦены
|ИЗ
| РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Период, ) КАК ЦеныНоменклатурыСрезПоследних
|ГДЕ
| ЦеныНоменклатурыСрезПоследних.Номенклатура = &Номенклатура
| И ЦеныНоменклатурыСрезПоследних.ВидЦен = &ВидЦен";
ЦенаЗапрос.УстановитьПараметр("Номенклатура", Номенклатура);
ЦенаЗапрос.УстановитьПараметр("Период", Период);
//ЦенаЗапрос.УстановитьПараметр("ВидЦен", Справочники.ВидыЦен.НайтиПоНаименованию("Закупочная",Истина,,));
ЦенаЗапрос.УстановитьПараметр("ВидЦен", Константы.ЗакупочнаяЦена.Получить());
РезультатЗапроса = ЦенаЗапрос.Выполнить();
Если НЕ РезультатЗапроса.Пустой() Тогда
Выборка = РезультатЗапроса.Выбрать();
Пока Выборка.Следующий() Цикл
Цена = РаботаСКурсамиВалют.ПересчитатьВВалюту(Выборка.Цена, Выборка.ВалютаЦены, ЗарплатаКадры.ВалютаУчетаЗаработнойПлаты(),Период);
Возврат Цена;
КонецЦикла;
КонецЕсли; Показать
и конечно же создание реквизита не на форме, а кодом:
&После("ПриСозданииНаСервере")
&НаСервере
Процедура Расширение_ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
НовыйРеквизит = Элементы.Вставить("Закупка", Тип("ПолеФормы"), ЭтаФорма.Элементы.Запасы, ЭтаФорма.Элементы.ЗапасыЦена);// ЭтаФорма.Элементы.ТоварыЦена);
НовыйРеквизит.Вид = ВидПоляФормы.ПолеНадписи;
НовыйРеквизит.ГиперссылкаЯчейки = Ложь;
НовыйРеквизит.Гиперссылка = Ложь;
НовыйРеквизит.ПоложениеЗаголовка = ПоложениеЗаголовкаЭлементаФормы.Авто;
НовыйРеквизит.Заголовок = "Закупка";
НовыйРеквизит.РастягиватьПоГоризонтали = Ложь;
НовыйРеквизит.Ширина = 5;
НовыйРеквизит.АвтоМаксимальнаяШирина = Истина;
НовыйРеквизит.МаксимальнаяШирина = 7;
НовыйРеквизит.ПутьКДанным = "Объект.Запасы.ЗакупочнаяЦена";
КонецПроцедуры Показать
