Загрузка данных


Процедура ОбработкаПроведения(Отказ, Режим)
	//{{__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
	// Данный фрагмент построен конструктором.
	// При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

	// регистр УчетЖивотных Приход
	Движения.УчетЖивотных.Записывать = Истина;
	Для Каждого ТекСтрокаЖивотные Из Животные Цикл
		Движение = Движения.УчетЖивотных.Добавить();
		Движение.ВидДвижения = ВидДвиженияНакопления.Приход;
		Движение.Период = Дата;
		Движение.ВидЖивотных = ТекСтрокаЖивотные.Вид;
		Движение.Цена = ТекСтрокаЖивотные.Цена;
		Движение.Количество = ТекСтрокаЖивотные.Количество;
		Движение.Стоимость = ТекСтрокаЖивотные.Цена * ТекСтрокаЖивотные.Количество;
	КонецЦикла;

	//}}__КОНСТРУКТОР_ДВИЖЕНИЙ_РЕГИСТРОВ
КонецПроцедуры