v7: Движение документа

 Если стрВидРемонта = "Капитальный" Тогда

		спрТС = СоздатьОбъект("Справочник.ТранспортныеСредства");

		Если спрТС.НайтиЭлемент(Автомобиль) = 1 Тогда

			спрТС.ДатаКРДвигателя = ДатаОкончания;

			период = СоздатьОбъект("Периодический");

			период.ИспользоватьОбъект("НомерДвигателя",спрТС);

			период.ОбратныйПорядок();

			период.ВыбратьЗначения();

			Пока период.ПолучитьЗначение() = 1 Цикл

				НомДв = период.Значение;			УстановитьРеквизитСправочника(спрТС,"НомерДвигателя",НомДв,ДатаОкончания);

			КонецЦикла;

			спрТС.Записать();

		КонецЕсли;