![]() |
![]() |
![]() |
|
Не заполняется Цена в Установке цен. | ☑ | ||
---|---|---|---|---|
0
zippygrill
25.11.14
✎
20:40
|
Программно заполняю документ "Установка цен номенклатуры" в УТ11 11.1.9.44. Что ему еще надо чтобы цена записалась? В другой базе УТ11 цена подставляется.
СтрокаТаблицыРезультата.Цена - тип Число. Если ВыборкаДетальныеЗаписи.Следующий() Тогда Документ = ВыборкаДетальныеЗаписи.Документ.ПолучитьОбъект(); Иначе Документ = Документы.УстановкаЦенНоменклатуры.СоздатьДокумент(); Документ.Дата = ТекущаяДата(); Документ.Согласован = Истина; Документ.Статус = Перечисления.СтатусыУстановокЦенНоменклатуры.Согласован; Документ.Комментарий = "АвтоОбновлениеЦен"; НовыйВидЦены = Документ.ВидыЦен.Добавить(); НовыйВидЦены.ВидЦены = ВидЦеныПрайсЛист; КонецЕсли; Документ.Товары.Очистить(); Для Каждого СтрокаТаблицыРезультата из Таблица.Состав Цикл НоваяСтрока = Документ.Товары.Добавить(); НоваяСтрока.Номенклатура = ПолучитьНоменклатуру(СтрокаТаблицыРезультата.Номенклатура); НоваяСтрока.Цена = СтрокаТаблицыРезультата.Цена; НоваяСтрока.ВидЦены = ВидЦеныПрайсЛист; НоваяСтрока.ЦенаИзмененаВручную = Истина; //Прервать; КонецЦикла; |
|||
1
zippygrill
25.11.14
✎
20:40
|
Запись документа происходит чуть ниже. На всякий случай.
|
|||
2
zippygrill
25.11.14
✎
20:43
|
Осталось заполнять только поле "Характиристика" и "Упаковка" но не вижу связь с не сохранением цены...
|
|||
3
DGorgoN
25.11.14
✎
20:49
|
Сообщить(НоваяСтрока.Номенклатура);
Сообщить(НоваяСтрока.Цена); НоваяСтрока.Цена = СтрокаТаблицыРезультата.Цена; Сообщить(НоваяСтрока.Цена); Сообщить("*****"); НоваяСтрока.ВидЦены = ВидЦеныПрайсЛист; НоваяСтрока.ЦенаИзмененаВручную = Истина; Прервать; |
|||
4
zippygrill
25.11.14
✎
21:07
|
НоваяСтрока.Цена = СтрокаТаблицыРезультата.Цена;
Сообщить(НоваяСтрока.Цена); - сообщает цену :) а в документе ее нет |
|||
5
Banned
25.11.14
✎
21:19
|
Там ещё вроде как ссылка на строку таблицы видов цен была, не?
|
|||
6
zippygrill
25.11.14
✎
21:55
|
Не помню такого
|
|||
7
КонецЦикла
25.11.14
✎
21:57
|
Куя с 2
Разберись как там устроено... там еще типы цен записаны, нужно ссылку дать |
|||
8
zippygrill
25.11.14
✎
22:06
|
НоваяСтрока.ВидЦены=ВидЦеныПрайсЛист; - не канает уже?
|
|||
9
Maniac
25.11.14
✎
22:22
|
Вот это явно настораживает
НоваяСтрока.Номенклатура = ПолучитьНоменклатуру(СтрокаТаблицыРезультата.Номенклатура); |
|||
10
Maniac
25.11.14
✎
22:23
|
И вот это тоже
Таблица.Состав |
|||
11
zippygrill
25.11.14
✎
22:29
|
Спокойствие, только спокойствие :)
Там объектXDTO |
|||
12
zippygrill
26.11.14
✎
09:15
|
(7) Каким образом еще дать ссылку на вид цены? Разве в (8) недостаточно?
|
|||
13
КонецЦикла
26.11.14
✎
09:32
|
У меня как-то так работало, УТ 10.3
ДокУЦ = Документы.УстановкаЦенНоменклатуры.СоздатьДокумент(); ДокУЦ.Дата = ТекущаяДата(); СтрокаТипыЦен = ДокУЦ.ТипыЦен.Добавить(); СтрокаТипыЦен.ТипЦен = ТипЦеныНал; ... СтрокаТоваров = ДокУЦ.Товары.Добавить(); СтрокаТоваров.Номенклатура = Ссылка; СтрокаТоваров.Цена = ЦенаБезНалПрод; СтрокаТоваров.Валюта = ТипЦеныБезНал.ВалютаЦены; СтрокаТоваров.ЕдиницаИзмерения = Ссылка.ЕдиницаХраненияОстатков; СтрокаТоваров.ТипЦен = ТипЦеныБезНал; |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |