Добавить ЕдиницыИзмерения

Здравствуйте...Я как всегда за помощью....Как добавить в новую строку единицу измерения?

Процедура ОсновныеДействияФормыНавыйЗаказТП(Кнопка)
    // Вставить содержимое обработчика.
    ТаблицаОбработки        = Товары.Выгрузить();


    ЗП=Документы.ЗаказПокупателя.СоздатьДокумент();
    ТабличнаяЧастьТовары=ЗП.Товары;
    ЗП.Дата=ТекущаяДата();
    ЗП.Организация=Справочники.Организации.НайтиПоКоду("УТ0000002");
    //ЗП.Склад=Справочники.Склады.НайтиПоКоду("000000001");
    ЗП.Контрагент=Справочники.Контрагенты.НайтиПоКоду("000000006");



Для каждого Стр Из ТаблицаОбработки Цикл
    Если  Стр.Номенклатура.ЭтоГруппа = Ложь
        И  (ТипЗнч(Стр.Дефицит)=Тип("Число")) и (Стр.Дефицит < 0) Тогда;
    НоваяСтрока=ЗП.Товары.Добавить();
    //ЗаполнитьЗначенияСвойств(НоваяСтрока, Стр);//Заполняем одинаковые колонки
    НоваяСтрока.Номенклатура=Стр.Номенклатура;// дополняешь различающиеся по кимени колонки
    НоваяСтрока.ХарактеристикаНоменклатуры=Стр.ХарактеристикаНоменклатуры;
    НоваяСтрока.Количество=Стр.Дефицит*(-1);
    //НоваяСтрока.ЕдиницаИзмерения=Справочники.Номенклатура.ЕдиницаХраненияОстатков;
    НоваяСтрока.Коэффициент=1;
    //НоваяСтрока.СпособСписанияОстаткаТоваров = Перечисления.СпособыСписанияОстаткаТоваров.СоСклада;

    КонецЕсли;
    //КонецЕсли;
КонецЦикла;

    ЗП.Записать();
    //}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА



КонецПроцедуры