Добрый день. Первый раз столкнулась с запросами в 1С 7.7. Помогите пожалуйста с кодом. На форме есть 3 флага выбора: ДокументыРБ, ДокументыЗагран и ДокументыТрансп.
Как при нажатии на определенный флаг выводить документ?
У меня есть запрос только для вывода всех документов сразу.
Процедура Сформировать()
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с ДатаС по ДатаПо;
|ОбрабатыватьДокументы все;
|Док = Документ.КомандировкиРБ.ТекущийДокумент,
| Документ.КомандировкиЗагран.ТекущийДокумент,
| Документ.КомандировкиТрансп.ТекущийДокумент;
|
|ДатаРег = Документ.КомандировкиРБ.ДатаРегКомандир,
| Документ.КомандировкиЗагран.ДатаРегКомандир,
| Документ.КомандировкиТрансп.ДатаРегКомандир;
|
|ФИО = Документ.КомандировкиРБ.ФИО,
| Документ.КомандировкиЗагран.ФИО,
| Документ.КомандировкиТрансп.ФИО;
|
|Табельный = Документ.КомандировкиРБ.Табельный,
| Документ.КомандировкиЗагран.Табельный,
| Документ.КомандировкиТрансп.Табельный;
|
|Должность = Документ.КомандировкиРБ.Профессия,
| Документ.КомандировкиЗагран.Профессия,
| Документ.КомандировкиТрансп.Профессия;
|
|Страны = Документ.КомандировкиРБ.КодСтраны,
| Документ.КомандировкиЗагран.КодСтраны,
| Документ.КомандировкиТрансп.КодСтраны;
|
|Город = Документ.КомандировкиРБ.КодГорода,
| Документ.КомандировкиЗагран.КодГорода,
| Документ.КомандировкиТрансп.КодГорода;
|
|ГруппаЦелей = Документ.КомандировкиРБ.ГруппаЦелей,
| Документ.КомандировкиЗагран.ГруппаЦелей,
| Документ.КомандировкиТрансп.ГруппаЦелей;
|
|Цель = Документ.КомандировкиРБ.Цели,
| Документ.КомандировкиЗагран.Цели,
| Документ.КомандировкиТрансп.Цели;
|
|Начало = Документ.КомандировкиРБ.ДатаНачКомандир,
| Документ.КомандировкиЗагран.ДатаНачКомандир,
| Документ.КомандировкиТрансп.ДатаНачКомандир;
|
|Конец = Документ.КомандировкиРБ.ДатаКонКомандир,
| Документ.КомандировкиЗагран.ДатаКонКомандир,
| Документ.КомандировкиТрансп.ДатаКонКомандир;
|
|ДатаДок = Документ.КомандировкиРБ.ДатаДок,
| Документ.КомандировкиЗагран.ДатаДок,
| Документ.КомандировкиТрансп.ДатаДок;
|
|Группировка Док все;
|"//}}ЗАПРОС
;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат;
КонецЕсли;
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Таблица");
Таб.ПовторятьПриПечатиСтроки(3,3);
Таб.ВывестиСекцию("Заголовок");
Таб.ВывестиСекцию("Шапка");
Пока Запрос.Группировка() = 1 Цикл
Таб.ВывестиСекцию("Строчка");
КонецЦикла;
Таб.Показать();
КонецПроцедуры