Отчет с настраиваемым списком колонок

17.02.10

Разработка - Работа с интерфейсом

Что делать, когда клиент просит отчет по предложенному в Excel макету, содержащий, по меньшей мере, с полсотни столбцов, и, вдобавок, требует, чтобы была возможность все эти столбцы при желании отключать?

Скачать файлы

Наименование Файл Версия Размер
Шаблон отчета с отключаемыми колонками
.erf 13,48Kb
175
.erf 13,48Kb 175 Скачать

Что делать, когда клиент просит отчет по предложенному в Excel макету, содержащий, по меньшей мере, с полсотни столбцов, и, вдобавок, требует, чтобы была возможность все эти столбцы при желании отключать? Предложить ему воспользоваться СКД? Возможно, кто-то так и делает, но мои клиенты почему-то, при виде аббревиатуры СКД, сразу скисают, однако, отчеты с полсотни отключаемых столбцов, при этом, любят. И тем больше количество столбцов в отчете, чем крупнее город, где расположен клиент... 

Поскольку работать с небольшими городами не всегда выгодно, а времени на колдовство по всем правилам с построителем жаль (*), я однажды решил что-нибудь придумать, чтобы и клиенту было удобно, и самому потратить лишь несколько минут. Решение пришло быстро, при взгляде на вереницу этих столбцов, на фоне лени вбивать все их наименования вручную. Ведь что может быть нагляднее для клиента, чем те названия, которые он сам придумал? Лишь бы все они были уникальными.

Итак, копируем таблицу из исходного xls-файла в макет нашего отчета, разбиваем на горизонтальные секции. На этом работа над макетом завершена. Никаких параметров в строках не создаем. Создаем на форме закладку «Настройки» и выводим туда список с пометками "ДоступныеПоля", а в обработчике ПриОткрытии прописываем обход колонок отчета (**):

 

 Макет=ПолучитьМакет("Макет");
  К=1;
  Пока Истина Цикл
    Область=Макет.ПолучитьОбласть("R1C"+К+":R1C"+К);
    Если ЗначениеЗаполнено(Область.ТекущаяОбласть.Текст) Тогда
      ДоступныеПоля.Добавить(Область.ТекущаяОбласть.Текст);
    Иначе
      Прервать;
    КонецЕсли;
    К=К+1;
  КонецЦикла;

 

(*) Под колдовством с построителем подразумевается сохранение во внешнем файле сгенерированного макета отчета, облагораживание его, и дальнейшее редактирование возможности отключать столбцы через набор вертикальных секции.

(**) Оговорюсь, что если в отчете более 999 колонок, то стоит использовать не +К, а Формат(К,”ЧГ=0”) ;)


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

Список колонок отчета

Впрочем, у меня был xls-макет, содержащий названия колонок не строго в определенной строке.

Моя табличка

Большой проблемы это не вызвало:

 

Макет=ПолучитьМакет("Макет");
  К=1;
  Пока Истина Цикл
    Область1=Макет.ПолучитьОбласть("R4C"+К+":R4C"+К);
    Область2=Макет.ПолучитьОбласть("R5C"+К+":R5C"+К);
    Если ЗначениеЗаполнено(Область2.ТекущаяОбласть.Текст) Тогда
      ДоступныеПоля.Добавить(Область2.ТекущаяОбласть.Текст);
    ИначеЕсли ЗначениеЗаполнено(Область1.ТекущаяОбласть.Текст) Тогда
      ДоступныеПоля.Добавить(Область1.ТекущаяОбласть.Текст);
    Иначе
      Прервать;
    КонецЕсли;
    К=К+1;
  КонецЦикла;


Но пойдем далее… Мы отказались от прописывания имен параметров в макете строки. Чтобы теперь вывести в строки отчета необходимую информацию, достаточно написать запрос, с составом полей, соответствующим в точности столбцам нашей таблицы, а потом просто пробежаться по ним, проверяя, что выделил пользователь в списке колонок. Каждая строка нашего отчета легко может быть построена вот такой процедурой:

 

 Процедура СформироватьСтрокуОтчета(ТабличныйДокумент, Макет, ИмяГоризонтальнойОбласти, СтрокаРезультатаЗапроса=Неопределено)
    Область=Макет.ПолучитьОбласть(ИмяГоризонтальнойОбласти);
    К=1;
    Перв=Истина;
    Для Каждого Эл Из ДоступныеПоля Цикл
      Если Эл.Пометка Тогда
        ТекОбласть=Область.ПолучитьОбласть("R1C"+К+":R"+Область.ВысотаТаблицы+"C"+К);
        Если СтрокаРезультатаЗапроса<>Неопределено Тогда
          ТекОбласть.ТекущаяОбласть.Текст=Строка(СтрокаРезультатаЗапроса[К-1]);
        КонецЕсли;
        Если Перв Тогда
          Перв=Ложь;
          ТабличныйДокумент.Вывести(ТекОбласть);
        Иначе
          ТабличныйДокумент.Присоединить(ТекОбласть);
        КонецЕсли;
      КонецЕсли;
      К=К+1;
    КонецЦикла;
  КонецПроцедуры



Теперь наш отчет с произвольным составом колонок строится в два счета:

 

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



Ни что не мешает использовать в процедуре СформироватьЗапрос построитель отчета, выводя поля отбора значений и порядок сортировки на форму в закладке настроек, куда мы уже вывели наш список с колонками.

Страница настроек отчета

В этом случае, имеет смысл поместить текст запроса в обработчик ПриОткрытии:

 

Построитель.Текст=”…”;
  Построитель.ЗаполнитьНастройки();



Тогда функция СформироватьЗапрос будет иметь всего лишь пару строк:

  Функция СформироватьЗапрос()
    Построитель.Выполнить();
    Возврат Построитель.Результат;
  КонецФункции



Вот и все…

Конечно, при заполнении столбцов отчета параметрами, правильно было бы не тупо преобразовывать значения полей запроса в строку, а как-то обрабатывать по типу, но это уже тонкости.

Кстати, прилагаю шаблон отчета, который тут старался описать…

 

См. также

Богатый редактор картинок, хранимых в базе, с возможностью РИСОВАНИЯ. Редактор внешних файлов картинок. Объект, расширяющий возможности работы с картинками из встроенного языка (Три в одном) + Обработка «Стандартизация картинок»

Работа с интерфейсом Рабочее место Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Обработка предназначена для редактирования картинок в режиме «Предприятие», с возможностью РИСОВАТЬ на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Также обработка может быть использована из встроенного языка как объект для редактирования картинок. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Данная обработка будет особенно полезна тем, кто вносит картинки в базу (изображения номенклатуры, фотографии физических лиц и т.п.). Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6000 руб.

16.01.2015    61698    43    59    

80

[Расширения] Динамическое управление видимостью и доступностью элементов форм (УФ) (8.3.6+)

Работа с интерфейсом Платформа 1С v8.3 Управляемые формы Конфигурации 1cv8 Платные (руб)

Механизм «Динамическое управление доступом к элементам форм объектов 1С8» предназначен для обеспечения возможности оперативного управления видимостью и доступностью элементов форм документов и справочников продуктов фирмы «1С» «1С:Предприятие 8». Решение универсальное, встраивается в любую конфигурацию с минимальными доработками, что позволяет без проблем обновлять типовые решения.

5000 руб.

14.01.2016    54313    16    21    

42

Управление дашбордами

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Платные (руб)

Обработка предназначена для создания и управления дашбордами.

2400 руб.

29.06.2020    16623    21    4    

35

Новогоднее оформление для 1С

Работа с интерфейсом Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 Бесплатно (free)

Добавьте новогоднего настроения! Расширение создает декорацию в виде гирлянды на некоторых формах объектов.

27.12.2023    10563    745    elcoan    45    

106

Конструктор HTML, CSS и javascript

Инструментарий разработчика Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.

2 стартмани

10.04.2023    9484    150    acces969    31    

115

Модель состояния для MVC

Работа с интерфейсом Платформа 1С v8.3 Конфигурации 1cv8 Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022    3577    kalyaka    2    

27

Табло очереди заказов на экран телевизора

WEB-интеграция Работа с интерфейсом Платформа 1С v8.3 1С:Розница 2 Платные (руб)

Связка из веб-приложения и расширения для 1С: Розница 2.3.

3600 руб.

29.04.2022    12010    1    5    

10
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. Evg-Lylyk 4547 17.02.10 16:35 Сейчас в теме
Это все замечательно в 8-ке мучения всегда были в получении данных. Простите может не внимательно читал, но всетаки непонятно чем не подходят стандартные механизмы УниверсальныйОтчет, ПостроительОтчета раз уж на СКД аллергия

(**) Оговорюсь, что если в отчете более 999 колонок, то стоит использовать не +К, а Формат(К,”ЧГ=0”) ;)

метод получить область можно использовать так:
ПолучитьОбласть(<Номер первой строки>, <Номер первой колонки>, <Номер последней строки>, <Номер последней колонки>)
т.е. ПолучитьОбласть(4,К,4,К)
2. O-Planet 6431 17.02.10 17:22 Сейчас в теме
(1) Мне что-то через RC больше нравится. Наверное, из дельфей осталось.

Стандартная настройка колонок, в общем, подошла бы, если бы клиенту подошел сгенерированный построителем шаблон. Часто клиент бывает очень привередлив к тому, что отображается на экране, вплоть до разных нестандартных бантиков, расшифровок, подстрок в строках. Если же построителю подсунуть собственный макет, то что-то не знаю, как организовать тогда настройку состава колонок стандартными средствами построителя. Ну а потом, если задача решается универсальным отчетом, ни кто не запрещает его использовать. Здесь просто приведен еще один метод. И главная фишка - в том, что макет вообще НЕ строим, а просто копируем через буфер обмена то, что предоставляет заказчик в xls-файле.
6. Evg-Lylyk 4547 18.02.10 00:02 Сейчас в теме
(2)
Мне что-то через RC больше нравится. Наверное, из дельфей осталось
в предложенном варианте не будет проблемы описанной в (**)
Понятно что пользователи могут хотеть финдиплюшки, но если отчет стоил сначала 1000 после мелочи 5000
(3) в статье пример другой :) (в примере на картинке есть нумерация строк, СКД подойдет)
3. O-Planet 6431 17.02.10 18:21 Сейчас в теме
+ Вот пример того, что лично я не представляю, как можно вывести средствами универсального отчета (в каждой строке может быть произвольное кол-во подстрок с расшифровкой по пунктам следования)
Прикрепленные файлы:
4. luns 17.02.10 21:26 Сейчас в теме
(3) Компоновка так может. И не только так. А в принципе и на построителе можно сваять. Особых сложностей нет (если я правильно понял задачу)
5. anig99 2841 17.02.10 22:05 Сейчас в теме
Эээээ...до существование СКД такое же ваял... Через "присоеденить"...Теперь не так актуально
7. O-Planet 6431 18.02.10 13:29 Сейчас в теме
Да я знаю, что СКД подойдет. Но вот не любят его и все.
8. O-Planet 6431 18.02.10 13:46 Сейчас в теме
И с другой стороны, всегда ли нужно использовать универсальные механизмы по-максимуму? Не забываем, что СКД - это мощный ресурс. В конце концов, мы вроде программисты. Разве не интересно сделать что-то альтернативное самому, и чтобы оно получилось удобным, оптимальным и быстрым? Если задача вполне решаема ста стоками кода, то зачем притягивать СКД? Ресурсы сервака не безграничны.
9. Nadezhda09 23.03.10 08:13 Сейчас в теме
1С:Предприятие 8.1 (8.1.14.72)
Управление производственным предприятием, редакция 1.2 (1.2.23.2)

Здравствуйте!
Заинтересовалась обработкой.
Начала выполнять по приведенной инструкции.
"Любуясь красивым списком с названиями всех колонок отчета" заметила, что у меня только список колонок без флажков.
Что делать, чтобы они появились?
Прошу прощения, если вопрос глупый. Самостоятельно программирую еще очень мало.
10. Nadezhda09 23.03.10 10:11 Сейчас в теме
Уже сама разобралась. :)
Прошу прощения за беспокойство.
11. Nadezhda09 23.03.10 10:19 Сейчас в теме
12. O-Planet 6431 24.03.10 03:52 Сейчас в теме
Угу. Кстати ошибочка была в ДействиеФормыкнСформировать... Там нужно добавить:

РезультатЗапроса.Выбрать();

Тоже разобрались?
Оставьте свое сообщение