//{{КОНСТРУКТОР_ВЫХОДНЫХ_ФОРМ(ПереченьУслуг)
//
системы
Данный
сопровождаются
фрагмент
спроса
построен
степени
конструктором.
//
также
При
товаров
повторном
только
использовании
торгового
конструктора,
торговых
внесенные
увязать
вручную
удобством
изменения
управление
будут
услуг
утеряны!!!
Макет
установление
=
уходящие
ОтчетОбъект.ПолучитьМакет("ПереченьУслуг"); Запрос
факторов
=
целом
Новый
широкого
Запрос;
Запрос.УстановшъПараметр("ВидНоменклатуры", Перечисления
элемент
.ВидыНоменклатуры.Услуга);
Запрос.УстановитьПараметр("ДатаОтчета", ДатаОтчета);
элементов
Запрос.Текст =
"ВЫБРАТЬ
СпрНоменклатура.Родитель КАК
этапом
ГруппаУслуг,
этом
ПРЕДСТАВЛЕНИЕ(СпрНоменклатура.Родитель),
СпрНоменклатура.Ссылка КАК
являясь
Услуга,
активную
СпрНоменклатура.Представление, ЦеныСрезПоследних.Цена
Справочник.Номенклатура КАК
более
СпрНоменклатура
внешней
ЛЕВОЕ
внутренней
СОЕДИНЕНИЕ
воздействие
РегистрСведений.Цены.СрезПоследних(&ДатаОтчета, )
воздействуют
КАК
деятельности
ЦеныСрезПоследних
ПО
заключение
ЦеныСрезПоследних.Номенклатура =
закупочной
СпрНоменклатура.Ссылка
|ГДЕ
СпрНоменклатура.ВидНоменклатуры =
изыскание
&ВидНоменклатуры
информационное
ИТОГИ
коммерческая
ПО
ГруппаУслуг
конечный
ИЕРАРХИЯ";
Запрос.УстановитьПараметр("ВидНоменклатуры", Неопределено);
места
Запрос.УстановитьПараметр("ДатаОтчета", ДатаОтчета);
Результат
особенности
=
отличительным
Запрос.Выполнить();
ОбластьЗаголовок
относятся
=
первой
Макет.ПолучитьОбласть("Заголовок"); ОбластьПодвал
поставка
=
предоставление
Макет.ПолучитьОбласть("Подвал"); ОбластьШапкаТаблицы
предприятия
=
представлено
Макет.ПолучитьОбласть("ШапкаТаблицы"); ОбластьПодвалТаблицы
представляют
=
прибыли
Макет.ПолучитьОбласть("ПодвалТаблицы"); ОбластьГруппаУслугИерархия
продвижении
=
производитель
Макет.ПолучитьОбласть("ГруппаУслугИерархия");
ОбластьГруппаУслуг
процесс
=
развивающейся
Макет.ПолучитьОбласть("ГруппаУслуг");
ОбластьДетальныхЗаписей
разделение
=
разделении
Макет.ПолучитьОбласть("Детали");
ТабДок.Очистить();
ТабДок.Вывести(ОбластьЗаголовок);
ТабДок.Вывести(ОбластьШапкаТаблицы);
ТабДок.НачатьАвтогруппировкуСтрок();
ВыборкаГруппаУслуг
распределение
=
Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока
розничной
ВыборкаГруппаУслуг.Следующий() Цикл
связанные
Если
связаны
ВыборкаГруппаУслуг.ТипЗаписи() =
системе
ТипЗаписиЗапроса.ИтогПоИерархии Тогда
Область
сопровождаются
=
спроса
ОбластьГруппаУслугИерархия;
Иначе
Область
также
=
товаров
ОбластьГруппаУслуг;
только
КонецЕсли;