Движения.КомплектацияАвтомобиля.Записывать = Истина;
Для Каждого ТекСтрокаРаботы Из Работы Цикл
Если не ТекСтрокаРаботы.Номенклатура.ЭтоРабота И ЗначениеЗаполнено(ТекСтрокаРаботы.Номенклатура.КатегорияНоменклатуры) Тогда
Движение = Движения.КомплектацияАвтомобиля.Добавить();
Движение.Период = Дата;
Движение.Автотранспорт = Автотранспорт;
Движение.КатегорияНоменклатуры = ТекСтрокаРаботы.Номенклатура.КатегорияНоменклатуры;
Движение.Номенклатура = ТекСтрокаРаботы.Номенклатура;
Движение.ДатаУстановки = Дата;
КонецЕсли;
КонецЦикла;