Не заполняется ставка ндс, при програмном создании документа отчёт о розничных продажах

        НоваяСтрока = Документ.Товары.Добавить();
        НоваяСтрока.Номенклатура = НайтиПоКоду(СтрокаТЧ.КодТовара);
        НоваяСтрока.Количество = СтрокаТЧ.Количество;
        НоваяСтрока.КоличествоУпаковок = СтрокаТЧ.Количество; 
        НоваяСтрока.Цена = СтрокаТЧ.Цена; 
        НоваяСтрока.Сумма = НоваяСтрока.Цена * НоваяСтрока.КоличествоУпаковок;
        НоваяСтрока.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
        НоваяСтрока.СуммаНДС = 0;
        НоваяСтрока.Продавец = Справочники.Пользователи.НайтиПоНаименованию("...");