Программное создание документа

Здравствуйте!
Пытаюсь программно создать документа:
    НовДок = Документы.ПоступлениеТоваров.СоздатьДокумент();
    НовДок.Дата            = ТекущаяДата();
    НовДок.Организация     = Объект.Организация;
    НовДок.Магазин        = Объект.Магазин;
    НовДок.Склад        = Объект.Склад;
    НовДок.Контрагент    = Объект.Поставщик;
    Для н = 1 по Объект.Товары.Количество() Цикл
        НовДокСтрока = НовДок.Товары.Добавить();
        НовДокСтрока.Номенклатура     = Объект.Товары[н-1].СпрНоменклатура;
        НовДокСтрока.Количество        = Объект.Товары[н-1].КолВо;
        НовДокСтрока.СтавкаНДС        = Перечисления.СтавкиНДС.БезНДС;
        НовДокСтрока.Цена            = Объект.Товары[н-1].Цена;
        НовДокСтрока.Сумма            = Объект.Товары[н-1].КолВо * Объект.Товары[н-1].Цена;
    КонецЦикла;
    Попытка
        НовДок.Записать(РежимЗаписиДокумента.Запись);
        Сообщить("Создан документ "+НовДок);
    Исключение
        Сообщить("Ошибка ! "+НовДок+ " - " + ОписаниеОшибки());
    КонецПопытки;

Поле Количество почему то пустое, хотя поле Сумма заполнено. Отладчиком проверял Объект.Товары[н-1].КолВо имеет верное значение