Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
21 ноя 2024, 17:49

ПОМОГИТЕ С ОТЧЁТОМ ПО СПРАВОЧНИКУ. ПОЖАЛУЙСТА.

Автор StanMarsh, 13 мая 2010, 13:50

0 Пользователей и 1 гость просматривают эту тему.

StanMarsh

Зоздал отчёт по справочнику теперь хочу добавить в него период например Дата начала и Дата конца. как записать это условие.

Вот пример

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

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск