Процедура ОбработкаПроведения()

    ВыбратьСтроки();

        Пока ПолучитьСтроку() = 1 Цикл

                Регистр.ОстаткиТоваров.Артикул = Артикул;
                Регистр.ОстаткиТоваров.Название = Товар;
                Регистр.ОстаткиТоваров.Количество = Количество;
                Регистр.ОстаткиТоваров.ДвижениеПриходВыполнить();

        КонецЦикла;
КонецПроцедуры




Процедура Сформировать()

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

        ТекстЗапроса = "
        | Артикул = Регистр.ОстаткиТоваров.Артикул;
        | Название = Регистр.ОстаткиТоваров.Название;
        | Количество = Регистр.ОстаткиТоваров.Количество;
        | Функция КоличествоКонОст = КонОст(Количество);
        | Группировка Название;
	| Группировка Артикул;
        | ";

        Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
                Возврат;
        КонецЕсли;


        Таб = СоздатьОбъект("Таблица");
        Таб.ВывестиСекцию("Заголовок");


        Пока Запрос.Группировка("Название") = 1 Цикл
                Если Запрос.Название.ЭтоГруппа() = 1 Тогда
                        Таб.ВывестиСекцию("Группа");
                Иначе
                        Таб.ВывестиСекцию("Материал");
                КонецЕсли;
	Пока Запрос.Группировка("Артикул") = 1 Цикл
		Таб.ВывестиСекцию("Материал");
	КонецЦикла;
        КонецЦикла;

        Таб.Опции(0);
        Таб.Показать("ОстаткиТоваров");

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