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