Программная установка цен номенклатуры. Розница.

[Nitroski]

Добрый день, коллеги. Подскажите, пожалуйста.

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


ДокЦена=Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();

ДокЦена.Дата=ТекущаяДата();
ДокЦена.Согласован = Истина;
ДокЦена.Ответственный = Пользователи.ТекущийПользователь();
НоваяСтрока=ДокЦена.товары.Добавить();

НоваяСтрока.ВидЦены=Справочники.ВидыЦен.НайтиПоНаименованию("Закупочные");
        НоваяСтрока.Цена=МассивСтрок[4];

НоваяСтрока.ВидЦены=Справочники.ВидыЦен.НайтиПоНаименованию("Продажные");
НоваяСтрока.Цена=МассивСтрок[5];

НоваяСтрока.Номенклатура=справочники.Номенклатура.НайтиПоКоду(МассивСтрок[0]);

ДокЦена.Записать();


При выполнении создаются документы изменения цен номенклатуры, но при попытке их открыть выходит вот такая ошибка:

Скрин в полном размере



Подскажите, пожалуйста, что не так и как исправить.

[oleg-x]

Есть такая кнопка подробно, там и написано что не так у тебя.

[Nitroski]

Есть такая кнопка подробно, там и написано что не так у тебя.

Да, извините. Вот "Подробнее" об ошибке.





Будьте добры, подскажите.

Добавлено: 06 фев 2018, 13:55

Есть такая кнопка подробно, там и написано что не так у тебя.

Да, извините. Вот "Подробнее" об ошибке.





Будьте добры, подскажите. Что я делаю не так?!

[oleg-x]

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

ЭлементНоменклатура[ИмяКолонки] = ВыборкаВидыЦен.Цена;
Смотрите какое значение имеет ИмяКолонки.
Ошибка явно говорит что такого реквизита нет. Да и имя реквизита формируется странным. Название реквизита и ссылка на объект.

[Nitroski]

Всё оказалось немного иначе.

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


ДокЦена=Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
ДокЦена.Дата=ТекущаяДата();
ДокЦена.Согласован = Истина;
ДокЦена.Ответственный = Пользователи.ТекущийПользователь();

НоваяСтрока=ДокЦена.товары.Добавить();
НоваяСтрока.Номенклатура=справочники.Номенклатура.НайтиПоКоду(МассивСтрок[0]);

ВидЦеныЗак = Справочники.ВидыЦен.НайтиПоНаименованию("Закупочные");
ТабЧастьВидЦены = ДокЦена.ВидыЦен.Добавить();
ТабЧастьВидЦены.ВидЦены=ВидЦеныЗак;

НоваяСтрока.ВидЦены=ВидЦеныЗак;
    НоваяСтрока.Цена=МассивСтрок[4];

НоваяСтрока=ДокЦена.товары.Добавить();
НоваяСтрока.Номенклатура=справочники.Номенклатура.НайтиПоКоду(МассивСтрок[0]);

ВидЦеныПрод = Справочники.ВидыЦен.НайтиПоНаименованию("Продажные");
ТабЧастьВидЦены = ДокЦена.ВидыЦен.Добавить();
ТабЧастьВидЦены.ВидЦены=ВидЦеныПрод;

НоваяСтрока.ВидЦены=ВидЦеныПрод;
НоваяСтрока.Цена=МассивСтрок[5];

ДокЦена.Записать(РежимЗаписиДокумента.Проведение);




Надо было указать виды цен документу.

Решено. Можно закрывать.