Установка ЦЕНЫ номенклатуры

Розница 2.2

Т = Новый ТаблицаЗначений;
Т.Колонки.Добавить("Артикул", Новый ОписаниеТипов("Строка", , Новый КвалификаторыСтроки(100)));
Т.Колонки.Добавить("Цена", Новый ОписаниеТипов("Число"));
Для Сч = 1 По ТабличныйДокументИсточник.ВысотаТаблицы Цикл
    Н = Т.Добавить();
    Н.Артикул = ТабличныйДокументИсточник.Область(Сч, 1).Текст;
    Н.Цена = Число(ТабличныйДокументИсточник.Область(Сч, 2).Текст);
КонецЦикла;
З = Новый Запрос;
З.Текст =
"ВЫБРАТЬ Т.Артикул, Т.Цена ПОМЕСТИТЬ ВТ ИЗ &Т Т
|;
|ВЫБРАТЬ Н.Ссылка Номенклатура, Х.Ссылка Характеристика, Ц.Ссылка ВидЦены, Т.Цена
|ИЗ ВТ Т
|ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Номенклатура Н ПО Т.Артикул = Н.Артикул
|ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ХарактеристикиНоменклатуры Х ПО Н.ВидНоменклатуры = Х.Владелец
|ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ВидыЦен Ц ПО ИСТИНА";
З.УстановитьПараметр("Т", Т);

Д = Документы.УстановкаЦенНоменклатуры.СоздатьДокумент();
Д.Товары.Загрузить(З.Выполнить().Выгрузить());
Д.ВидыЦен.Добавить().ВидЦены = Д.Товары[0].ВидЦены;
Д.Дата = ТекущаяДата();
Д.Ответственный = Пользователи.ТекущийПользователь();
Д.Записать();

Ошибка при открытия документа.

{Документ.УстановкаЦенНоменклатуры.Форма.ФормаДокумента.Форма(3679)}: Поле объекта не обнаружено (ВидЦены496d3ab2715b11e7a99600155df40d02)
                        ЭлементХарактеристика[                     ИмяКолонки] = ВыборкаВидыЦен.Цена;

Подскажите плиз.