Имя: Пароль:
1C
1С v8
Розница документ установки цен номенклатуры
0 Dmitriy_76
 
31.08.11
10:00
пытаюсь програмно создать документ с двумя типами цен(Розничная и закупочная)

ДокУЦОбъект=Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
СтрокаТиповЦен = ДокУЦОбъект.ТипыЦен.Добавить();    
СтрокаТиповЦен.ТипЦен=Константы.ТипЦенЗакупочные.Получить();    
СтрокаТиповЦен = ДокУЦОбъект.ТипыЦен.Добавить();    
СтрокаТиповЦен.ТипЦен=Константы.ТипЦенВРознице.Получить();
Для Каждого СтрокаНоменклатуры Из ТабТовары Цикл
   НоваяСтрока = ДокУЦОбъект.Товары.Добавить();
   НоваяСтрока.Номенклатура               = СтрокаНоменклатуры.Номенклатура;
   НоваяСтрока.ХарактеристикаНоменклатуры = СтрокаНоменклатуры.ХарактеристикаНоменклатуры;
   НоваяСтрока.ЕдиницаИзмерения           = СтрокаНоменклатуры.ЕдиницаИзмерения;
   НоваяСтрока.ТипЦен                     = Константы.ТипЦенЗакупочные.Получить();
   НоваяСтрока.Цена                         = СтрокаНоменклатуры.Цена;
               
   НоваяСтрока = ДокУЦОбъект.Товары.Добавить();
   НоваяСтрока.Номенклатура               = СтрокаНоменклатуры.Номенклатура;
   НоваяСтрока.ХарактеристикаНоменклатуры = СтрокаНоменклатуры.ХарактеристикаНоменклатуры;
   НоваяСтрока.ЕдиницаИзмерения           = СтрокаНоменклатуры.ЕдиницаИзмерения;
   НоваяСтрока.ТипЦен                     = Константы.ТипЦенВРознице.Получить();
   НоваяСтрока.Цена                         = СтрокаНоменклатуры.ЦенаВРознице;
КонецЦикла;
   
ДокУЦОбъект.Записать();



вроде все создается...но при проведении пишет что не указана единица измерения в строке 1...
Отладчиком смотрю все есть...единственное реквизит табличной части товары ИндексСтрокиТаблицыЦен стоит 0... может с ним что ?
1 Grusswelle
 
31.08.11
10:03
(0) Да. Там две табличные части: с типами цен и, собственно, с номенклатурой. Посмотри на созданном вручную документе по какому реквизиту происходит соответствие - и вперёд!
2 bake
 
31.08.11
10:13
НоваяСтрока.ИндексСтрокиТаблицыЦен = нужно указать номер строки типов цен
3 Dmitriy_76
 
31.08.11
10:17
(2) не помогает