Почему не заполняется количество в заказе?

НовСтрТЧДокумента = ДокПриход.Товары.Добавить();
НовСтрТЧДокумента.Номенклатура = Справочники.Номенклатура.НайтиПоРеквизиту("Артикул", АртикулКремлина);
НовСтрТЧДокумента.Количество = 1;
НовСтрТЧДокумента.Цена = цена_товара.ТекстовоеСодержимое;
НовСтрТЧДокумента.ДатаОтгрузки = ТекущаяДата();								
НовСтрТЧДокумента.Сумма = цена_товара.ТекстовоеСодержимое;
НовСтрТЧДокумента.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС;
НовСтрТЧДокумента.ВариантОбеспечения = Перечисления.ВариантыОбеспечения.НеТребуется;