|
УТ 11.5, док. установка цен пишет в разные регистры ЦеныНоменклатуры25 и ЦеныНоменклатуры? |
☑ |
0
8319
11.02.22
✎
10:41
|
Здравствуйте, создаю документ "УЦ" (через "прай-лист") пишет в регистр "ЦеныНоменклатуры25", все цены подтягиваются во все документы, все отлично. Создаю программно документ "УЦ" (код ниже), пишет цены в регистр "ЦеныНоменклатуры", цены в документы не подтягиваются. Пожалуйста, подскажите что переделать, чтоб цены нормально писались в регистр "ЦеныНоменклатуры25" и соответвенно подтягивались в документы.
Программный код создания "УЦ":
ДокУЦ = Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
ДокУЦ.Дата = ТекущаяДата();
ДокУЦ.Статус =Перечисления.СтатусыУстановокЦенНоменклатуры.Согласован;
ДокУЦ.Ответственный = Пользователи.ТекущийПользователь();
ДокУЦ.Согласован = Истина;
ВидЦены = Объект.ТипЦен;
ТЧВидЦены = ДокУЦ.ВидыЦен.Добавить();
ТЧВидЦены.ВидЦены = ВидЦены;
Для каждого СтрД Из Объект.Цены Цикл
НоваяСтрока = ДокУЦ.Товары.Добавить();
СпрНом = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул",СтрД.Артикул);
НоваяСтрока.Номенклатура = СпрНом;
НоваяСтрока.ВидЦены = ВидЦены;
НоваяСтрока.Валюта = Объект.Валюта;
Если Объект.ТипЦен.ЦенаВключаетНДС Тогда
НоваяСтрока.Цена = СтрД.ЦенаСНДС;
Иначе
НоваяСтрока.Цена = СтрД.ЦенаБезНДС;
КонецЕсли;
ДокУЦ.Товары.Свернуть("Номенклатура, ВидЦены, Цена");
КонецЦикла;
Попытка
ДокУЦ.Записать(РежимЗаписиДокумента.Проведение);
Сообщить("Документ успешно создан.");
Исключение
Сообщить("Обнаружены ошибки: "+ОписаниеОшибки());
КонецПопытки;
|
|
1
vicof
11.02.22
✎
10:45
|
Создавать документ "УЦ" (через "прай-лист")
|
|
2
8319
11.02.22
✎
10:46
|
(1) Надо программно, через обработку подтягивать цены в 1С.
|
|
3
pechkin
11.02.22
✎
10:47
|
а что за регистр? типовой? и зачем он вообще нужен?
|
|
4
yzimin
11.02.22
✎
10:47
|
Создать документ программно, создать документ вручную, сравнить пореквизитно
|
|
5
8319
11.02.22
✎
10:47
|
(3) Да, типовой )
|
|
6
8319
11.02.22
✎
10:48
|
(3) Причем, оба типовые:)
|
|
7
8319
11.02.22
✎
10:52
|
Ни кто не подскажет? Из-за чего такое происходит?
|
|
8
Смотрящий
11.02.22
✎
11:12
|
(7) Какой нить флажок забыл взвести в УЦ который программно создаешь или поле заполнить ...
Сравни свой сделанный программно документ с тем который делаешь руками
|
|
9
8319
11.02.22
✎
11:13
|
Короче ответ, может кто-то будет искать.
Вместо НоваяСтрока = ДокУЦ.Товары.Добавить();
Надо НоваяСтрока = ДокУЦ.ДокУЦ.Товары2_5.Добавить();
И будет счастье...
|
|
10
8319
11.02.22
✎
11:17
|
(9) Вернее так:
Вместо НоваяСтрока = ДокУЦ.Товары.Добавить();
Надо НоваяСтрока = ДокУЦ.Товары2_5.Добавить();
|
|
11
8319
11.02.22
✎
11:20
|
(8) Да так и сделал, и обнаружил, что товар добавляет в разные таблицы. Спасибо!
|
|