Загрузка номенклатуры в УТ 11.3. Документ "Установка цен номенклатуры"

Загружаю данные из табличного документа. Всё проходит идеально, номенклатура, группы. Но, когда заполняю цены в документ установки цен, цены не прописываются, хотя пробовал просто закидывать в таблицу значений всё норм и по типам тоже.

[code]

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

    ТекущаяГруппа = Неопределено;

    Розничная = Справочники.ВидыЦен.НайтиПоНаименованию("Розничная");
    Оптовая = Справочники.ВидыЦен.НайтиПоНаименованию("Оптовая");
    ВидНоменклатуры =  Справочники.ВидыНоменклатуры.НайтиПоНаименованию("Товары");
    ЕдиницаИзмерения = Справочники.УпаковкиЕдиницыИзмерения.НайтиПоНаименованию("шт");

    НоваСтрокаВидаЦен = УстановкаЦен.ВидыЦен.Добавить();
    НоваСтрокаВидаЦен.ВидЦены = Розничная;

    НоваСтрокаВидаЦен = УстановкаЦен.ВидыЦен.Добавить();
    НоваСтрокаВидаЦен.ВидЦены = Оптовая;

    ИндексСтроки = 1;

    Пока ТаблицаЗагрузки.Область(ИндексСтроки,5,ИндексСтроки, 13).Текст <> "" Цикл

        Наименование = ТаблицаЗагрузки.Область(ИндексСтроки,5,ИндексСтроки, 13).Текст;
        Наименование = Лев( Наименование, СтрДлина( Наименование ) - 2 );
        Наименование = СокрЛП( Наименование );

        Артикул = ТаблицаЗагрузки.Область(ИндексСтроки,1,ИндексСтроки, 4).Текст;
        Цена = ТаблицаЗагрузки.Область(ИндексСтроки,14,ИндексСтроки, 14).Текст;

        Если Артикул = "" Тогда

            УровеньИерархии = ТаблицаЗагрузки.Область(ИндексСтроки,5,ИндексСтроки, 13).Отступ / 2;

            НоваяСтрокаГрупп = Справочники.Номенклатура.СоздатьГруппу();
            НоваяСтрокаГрупп.Наименование = Наименование;

            Если УровеньИерархии = 0 Тогда

                НоваяСтрокаГрупп.Родитель = Неопределено;

            Иначе

                Если УровеньИерархии < ТекущаяГруппа.Уровень() Тогда

                    НоваяСтрокаГрупп.Родитель = ВверхПоДеревуДоНужногоУровня( ТекущаяГруппа, УровеньИерархии - 1 );

                Иначе

                    Если УровеньИерархии = ТекущаяГруппа.Уровень() Тогда

                        НоваяСтрокаГрупп.Родитель = ТекущаяГруппа.Родитель;

                    Иначе

                        НоваяСтрокаГрупп.Родитель = ТекущаяГруппа;

                    КонецЕсли;

                КонецЕсли;

            КонецЕсли;

            НоваяСтрокаГрупп.Записать();

            ТекущаяГруппа = НоваяСтрокаГрупп.Ссылка;

        Иначе

            НоваяНоменклатура = Справочники.Номенклатура.СоздатьЭлемент();
            НоваяНоменклатура.Наименование = Наименование;
            НоваяНоменклатура.Артикул = Артикул;
            НоваяНоменклатура.Родитель = ТекущаяГруппа;
            НоваяНоменклатура.ВидНоменклатуры = ВидНоменклатуры;
            НоваяНоменклатура.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Товар;
            НоваяНоменклатура.ИспользованиеХарактеристик = Перечисления.ВариантыИспользованияХарактеристикНоменклатуры.НеИспользовать;
            НоваяНоменклатура.ЕдиницаИзмерения = ЕдиницаИзмерения;
            НоваяНоменклатура.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
            НоваяНоменклатура.Записать();

            НоваяЦена = УстановкаЦен.Товары.Добавить();
            НоваяЦена.Номенклатура = НоваяНоменклатура.Ссылка;
            НоваяЦена.Характеристика = Перечисления.ВариантыИспользованияХарактеристикНоменклатуры.НеИспользовать;
            НоваяЦена.ВидЦены = Розничная;
            НоваяЦена.Цена = Формат( Цена, "ЧДЦ=2; ЧРД=," ) * 2;

            УстановкаЦен.Товары.Свернуть("Номенклатура, Характеристика, ВидЦены");

            НоваяЦена = УстановкаЦен.Товары.Добавить();
            НоваяЦена.Номенклатура = НоваяНоменклатура.Ссылка;
            НоваяЦена.Характеристика = Перечисления.ВариантыИспользованияХарактеристикНоменклатуры.НеИспользовать;
            НоваяЦена.ВидЦены = Оптовая;
            НоваяЦена.Цена = Формат( Цена, "ЧДЦ=2; ЧРД=," ) * 1.5;

            УстановкаЦен.Товары.Свернуть("Номенклатура, Характеристика, ВидЦены");

            ДобавляемДляПроверки = ОбработаннаяТаблица.Добавить();
            ДобавляемДляПроверки.Номенклатура = НоваяНоменклатура;
            ДобавляемДляПроверки.Артикул = НоваяНоменклатура.Артикул;
            ДобавляемДляПроверки.Группа = ТекущаяГруппа;
            ДобавляемДляПроверки.Стоимость = Формат( Цена, "ЧДЦ=2; ЧРД=," ) * 2;

        КонецЕсли;

        ИндексСтроки = ИндексСтроки + 1;

    КонецЦикла;

    УстановкаЦен.Записать( РежимЗаписиДокумента.Проведение );

[/code]