В начало

«Прайс лист» с макетом

           

Есть справочник «Номенклатура».

            Нужно сформировать Прайс лист на основании данных этого справочника.

            Записываем следующие процедуры в модуле формы отчета.

            Создаем новый объект в дереве объектов – «Отчеты –> ПрайсЛист».

            На закладке «Формы» объекта «ПрайсЛист» создаем новую форму «ФормаОтчета», а на закладке «Макеты» – печатную форму документа «Макет».

Рис. 1. Макет отчета

 

Листинг 1

&НаКлиенте

Процедура СоздатьПрайсЛист(Команда)

            ЗаполнитьТаблДок(ТаблДок);

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

 

&НаСервереБезКонтекста

Процедура ЗаполнитьТаблДок (ТаблДок)

            ТаблДок.Очистить();

           

            //=================

            //Получаем объекты

            //=================

            Макет = Отчеты.ПрайсЛист.ПолучитьМакет("Макет");

            Область_Ш = Макет.ПолучитьОбласть("Шапка");

            Область_Э = Макет.ПолучитьОбласть("Элемент");

           

            //==================================

            //Заполняем и выводим шапку таблицы

            //==================================

            Область_Ш.Параметры.ДатаОтчета = Формат(ТекущаяДата(), "ДЛФ=DD");

            ТаблДок.Вывести(Область_Ш);

           

            //Выбираем по ГРУППАМ

            Выборка = Справочники.Номенклатура.ВыбратьИерархически();

            Пока Выборка.Следующий() Цикл

                        //================================================

                        //Заполняем и выводим табличную часть прайс листа

                        //================================================

                        Область_Э.Параметры.Код = Выборка.Код;

                        Область_Э.Параметры.Наименование = Выборка.Наименование;

                        Область_Э.Параметры.ЦенаПродажи = Выборка.ЦенаПродажи;

                        ТаблДок.Вывести(Область_Э);

            КонецЦикла;   

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

 

Рис. 2. Результат формирования отчета

 

ПРИМЕЧАНИЕ: сделано на «1С: Предприятие» версии 8.2.