В начало

ОП по трем регистрам

 

 

Процедура ОбработкаПроведения (Отказ, Режим)

            Движения.ОстаткиМатериалов.Записывать = Истина;

            Движения.СтоимостьМатериалов.Записывать = Истина;

            Движения.Управленческий.Записывать = Истина;

 

            Для Каждого ТекСтрокаМатериалы Из Материалы Цикл

                       

//Регистр ОстаткиМатериалов

                        Движение = Движения.ОстаткиМатериалов.Добавить();

                        Движение.ВидДвижения = ВидДвиженияНакопления.Приход;

                        Движение.Период = Дата;

                        Движение.Материал = ТекСтрокаМатериалы.Материал;

                        Движение.НаборСвойств = ТекСтрокаМатериалы.НаборСвойств;

                        Движение.Склад = Склад;

                        Движение.Количество = ТекСтрокаМатериалы.Количество;

                       

                         //Регистр СтоимостьМатериалов

                        Движение = Движения.СтоимостьМатериалов.Добавить();

                        Движение.ВидДвижения = ВидДвиженияНакопления.Приход;

                        Движение.Период = Дата;

                        Движение.Материал = ТекСтрокаМатериалы.Материал;

                        Движение.Стоимость = ТекСтрокаМатериалы.Количество;                

                       

                         //Регистр Управленческий

                        Движение = Движения.Управленческий.Добавить();

                        Движение.СчетДт = ПланыСчетов.Основной.Товары; //Дебет

                        Движение.СчетКт = ПланыСчетов.Основной.РасчетыСПоставщиками;

                        Движение.Период = Дата;

                        Движение.Сумма = ТекСтрокаМатериалы.Сумма;

                        Движение.КоличествоДт = ТекСтрокаМатериалы.Количество;

            Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Материалы] =

                                   ТекСтрокаМатериалы.Материал; //Обращение к элементу коллекции                                   

            КонецЦикла;

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