УТ 11 изменить значение табличной части документа УстановкаЦенНоменклатуры

1С v8

, , , , , ,

25.06.12

✎

02:08

Необходимо поменять программно текущий вид цены, на другой (вручную - пропадают все цены)

УстЦен= Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(УстановкаЦен.Номер,ТекущаяДата()).Ссылка;
УстЦенОбъект = УстЦен.ПолучитьОбъект();

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

Код срабатывает, но при открытии документа появляется сообщение:
"Поле объекта не обнаружено (ВидЦеныi344uhk43sd898d)"

Подскажите, люди добрые, где ошибся

1 Злобный Фей

25.06.12

✎

02:14

ВидЦены есть не только в ТЧ ВидыЦен..

2 DDimson

25.06.12

✎

02:16

Точно. Попробую в ТЧ Товары еще записать

3 DDimson

25.06.12

✎

02:19

Спасибо большое, ЗлобныйФей. Очень помог

4 DDimson

25.06.12

✎

02:22

Может кому пригодится. Код должен быть таким:

УстЦен = Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(УстановкаЦен.Номер,ТекущаяДата()).Ссылка;
УстЦенОбъект = УстЦен.ПолучитьОбъект();

Для Каждого ТекущаяСтрока Из УстЦенОбъект.ВидыЦен Цикл
Сообщить(ТекущаяСтрока.ВидЦены);
ТекущаяСтрока.ВидЦены = ВидЦены.Ссылка;
КонецЦикла;

Для Каждого ТекущаяСтрока Из УстЦенОбъект.Товары Цикл
Сообщить(ТекущаяСтрока.ВидЦены);
ТекущаяСтрока.ВидЦены = ВидЦены.Ссылка;
КонецЦикла;

УстЦенОбъект.Записать();