Копирование с ценой

[cska-fanat-kz]

С помощью

Запрос.Выполнить().Выбрать();

вы получили данные. Они хранятся в ВыборкаРезультатаЗапроса.
теперь надо встать на первую запись чтобы добраться до значений полей выборки.
Делается с помощью ВыборкаРезультатаЗапроса.Следующий().
То есть датацены = ВыборкаРезультатаЗапроса.Период; должно идти после Следующий()!

Исправляйте!..

[Chuchi]

у копируемой номенклатуры внесены и цена продажи и цена покупки

Код Выделить Развернуть

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


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

НоменклатураФорма.ЭлементыФормы.Панель1.Страницы.Цены.Доступность=Истина;
    НоменклатураФорма.ДатаЦены=   ВыборкаРезультатаЗапроса.Дата


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


[Chuchi]

А выводит только
01.04.2011 0:00:01
10
Основная цена продажи
Притом что есть от 05.04
2
Основная цена покупки..
и теперь надо прописать чтобы в копируемой номенклатуре появились цены и дата 05.04

[cska-fanat-kz]

вы забыли запрос отсортировать по убыванию периода...

опять же зачем нужно соединение со справочником ТипыЦен??