Отчет: как связать поле выбора и запрос?

@popoff17 · Регистрация: 13.07.2010

Author24 — интернет-сервис помощи студентам

Добрый день. создал внешний отчет, который выводит ФИО и паспортные данные сотрудников всех организаций. вопрос: как сделать фильтр по организациям и по подразделениям??
т.е. список выводится, поле выбора есть, а вот как их "связать" - не могу разобраться.

Вот код формы:

1C

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

Заранее благодарю за помощь!

Konctantin · 23.09.2010, 13:02

С отбором по Организации у вас вроде все получилось, а вот чтобы отобразить добавьте отбор:

1C

1
2

                       |    СотрудникиОрганизаций.Организация.Наименование = &Организация
                       |    И СотрудникиОрганизаций.ПодразделениеОрганизации = &ПодразделениеОрганизации";

но так как это будет жесткий отбор, то можно сделать разбинение запроса, на куски, и применять их в зависимости от условий, но...
У вас простенький отчет, нет требований к условному форматированию, используйте систему компоновки данных или же используйте объект УниверсальныйОтчет
вот пример с вашим запросом:

для начала добавьте табличное поле и сделайте тип данных ПостроительОтчета.Отбор
и у вас будет поле с возможностью задания отбора по выбраным полям, там же будет и указываться вид сравниения

1C

ПостроительОтчета.Текст = 
"ВЫБРАТЬ ПЕРВЫЕ 40
|   ПаспортныеДанныеФизЛиц.ФизЛицо,
|   ПаспортныеДанныеФизЛиц.ДокументВид,
|   ПаспортныеДанныеФизЛиц.ДокументСерия,
|   ПаспортныеДанныеФизЛиц.ДокументНомер,
|   ПаспортныеДанныеФизЛиц.ДокументДатаВыдачи,
|   ПаспортныеДанныеФизЛиц.ДокументКемВыдан,
|   ФизическиеЛица.Наименование,
|   СотрудникиОрганизаций.Организация КАК Организация,
|   СотрудникиОрганизаций.Физлицо КАК ФизЛицо1,
|   СотрудникиОрганизаций.ПодразделениеОрганизации
|{ВЫБРАТЬ
|   Организация.*,
|   ПодразделениеОрганизации.*}
|ИЗ
|   РегистрСведений.ПаспортныеДанныеФизЛиц КАК ПаспортныеДанныеФизЛиц
|       ПОЛНОЕ СОЕДИНЕНИЕ Справочник.ФизическиеЛица КАК ФизическиеЛица
|           ПОЛНОЕ СОЕДИНЕНИЕ Справочник.СотрудникиОрганизаций КАК СотрудникиОрганизаций
|           ПО ФизическиеЛица.Наименование = СотрудникиОрганизаций.Физлицо.Наименование
|       ПО ПаспортныеДанныеФизЛиц.ФизЛицо = ФизическиеЛица.Ссылка
|ГДЕ
|   СотрудникиОрганизаций.Организация.Наименование = &Организация
|   И СотрудникиОрганизаций.ПодразделениеОрганизации = &ПодразделениеОрганизации
|{ГДЕ
|   СотрудникиОрганизаций.Организация.*,
|   СотрудникиОрганизаций.Физлицо.*,
|   СотрудникиОрганизаций.ПодразделениеОрганизации.*}"; 
 
МассивОтбора = Новый Массив;
МассивОтбора.Добавить("Организация");
МассивОтбора.Добавить("Физлицо");
МассивОтбора.Добавить("ПодразделениеОрганизации");
УправлениеОтчетами.ЗаполнитьОтбор(МассивОтбора, ПостроительОтчета);
 
// можно жестко установить параметр отбора
ПостроительОтчета.Параметры.Вставить("Организация",  Организация);
ПостроительОтчета.Параметры.Вставить("ПодразделениеОрганизации",  ПодразделениеОрганизации);
// и выполняем запрос
ПостроительОтчета.Выполнить();
Выборка = ПостроительОтчета.Результат.Выбрать();

@popoff17 · 23.09.2010, 13:41 **[ТС]**

премного благодарен за помощь. но только что буквально доделал этот этап

сейчас борюсь с другой проблемой: в одно из полей макета не цепляются данные. 3 поля - шапка, таблица и подвал. так в таблицу и подвал все норм встает, а в шапку ни-ни + директора и нглавбуха надо вывести. если интересно - вложил файл. как добью этот отчет - выложу результат, мало ли кому пригодится...

Konctantin · 23.09.2010, 14:53

Не правильно вы делаете, сделайте групировку по организации, и обойдите запрос по групровкам. В первом обходе у вас будет выборка по организации, а потом во вором уровне у вас будет уже заполнение ТЧ.

Как-то так, но могу и ошибатся, так как писал на форуме

1C

ВыборкаДляОтчет   = Запрос.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);    
ДокументРезультат = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет");
ОбластьМакетаШапка = Макет.ПолучитьОбласть("Шапка");
Если ВыборкаДляОтчет.Следующий() Тогда
    ОбластьМакетаШапка.Параметры.Заполнить(ВыборкаДляОтчет);
КонецЕсли;
ДокументРезультат.Вывести(ОбластьМакетаШапка);
ОбластьМакетаТаблица = Макет.ПолучитьОбласть("Таблица");
ВыборкаПоСтрокам = ВыборкаДляОтчет.Выбрать();
Пока ВыборкаПоСтрокам.Следующий()  Цикл
    ОбластьМакетаТаблица.Параметры.Заполнить(ВыборкаПоСтрокам);
    ДокументРезультат.Вывести(ОбластьМакетаТаблица);    
КонецЦикла;

	23.09.2010, 14:53