Интерактивное Добавление Номенклатуры и запись документа(без проведения)

Привет всем. такое дело, при интерактивном добавлении номенклатуры и количества в документ ВнутреннийЗаказ в ТЧ Товары Добавляется две номенклатуры, в одной указывается только количество в другой только название номенклатуры. как сделать чтобы это было в одной строке?
Процедура КнопкаВыполнитьНажатие(Кнопка)     ТекДанные=ЭлементыФормы.ТабличнаяЧасть.ТекущиеДанные;     Док=Документы.ВнутреннийЗаказ.СоздатьДокумент();     Док.Дата=ТекущаяДата();     Док.Товары.Добавить().Количество=ТекДанные.Заказать;     Док.Товары.Добавить().Номенклатура=ТекДанные.Номенклатура;     Док.Записать();     Сообщить("Документ записан"); КонецПроцедуры

Строка = Док.Товары.Добавить();
Строка.Количество = ТекДанные.Заказать;
Строка.Номенклатура=ТекДанные.Номенклатура;

Спасибо.

---

а как быть если мне нужно добавить несколько позиций, а в данном случае добавляет только одну(последнюю введенную)

Процедура КнопкаВыполнитьНажатие(Кнопка)
    Док=Документы.ВнутреннийЗаказ.СоздатьДокумент();
    Док.Дата=ТекущаяДата();
    Для ТекСтрока Из ЭлементыФормы.ТабличнаяЧасть Цикл
        Строка = Док.Товары.Добавить();
        Строка.Количество = ТекСтрока.Заказать;
        Строка.Номенклатура = ТекСтрока.Номенклатура;
    КонецЦикла;
    Док.Записать();
    Сообщить("Документ записан ВЕСЬ !!! ;-)");
КонецПроцедуры

Спасибо ВАМ огромное

---

новая проблема.если пишу так
Для Каждого ТекДанные Из ЭлементыФормы.ТабличнаяЧасть Цикл // тут пишем код по вводу данных КонецЦикла
то пишет "итератор для значения не определен"
а если пишу так:
Для Каждого ТекСтрока  Из ЭлементыФормы.ТабличнаяЧасть.ТекущиеДанные Цикл      // тут пишем код по вводу данных     КонецЦикла;

то записывает док с одной ЗАЦИКЛЕННОЙ(причем по 7) номенклатурой(последней)

---

Проблема решена!!:zebzdr:
Процедура КнопкаВыполнитьНажатие(Кнопка)   Док=Документы.ВнутреннийЗаказ.СоздатьДокумент(); Для Каждого ТекСтрока  Из ТабличнаяЧасть Цикл Строка=Док.Товары.Добавить(); Строка.Количество=ТекСтрока.Заказать; Строка.Номенклатура=ТекСтрока.Номенклатура; КонецЦикла; Юзер=ПользователиИнформационнойБазы.ТекущийПользователь(); Док.Комментарий=Юзер.Имя; Док.Дата=ТекущаяДата();     Док.Записать(); Сообщить("Документ записан"); КонецПроцедуры