УТ 11 изменить значение табличной части документа УстановкаЦенНоменклатуры
☑
0
DDimson
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
Может кому пригодится. Код должен быть таким:
УстЦен = Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру(УстановкаЦен.Номер,ТекущаяДата()).Ссылка;
УстЦенОбъект = УстЦен.ПолучитьОбъект();
Для Каждого ТекущаяСтрока Из УстЦенОбъект.ВидыЦен Цикл
Сообщить(ТекущаяСтрока.ВидЦены);
ТекущаяСтрока.ВидЦены = ВидЦены.Ссылка;
КонецЦикла;
Для Каждого ТекущаяСтрока Из УстЦенОбъект.Товары Цикл
Сообщить(ТекущаяСтрока.ВидЦены);
ТекущаяСтрока.ВидЦены = ВидЦены.Ссылка;
КонецЦикла;
УстЦенОбъект.Записать();
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.