Как в 1С создать паутинку "как на Инфостарте"

15.01.20

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

Добрый день, уважаемы коллеги! В этой статье я расскажу, как в 1С создать отчет - "паутинку" на примере отчета по компетенциям сотрудника (разрабатывала на платформе 1С:Предприятие 8.3 (8.3.13.1865).

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
Как в 1С создать паутинку "как на Инфостарте":
.rar 8,33Kb
7 1 850 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

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

Оформить подписку и скачать решение со скидкой

В один прекрасный момент на предприятии возникла необходимость создать отчет – «паутинку» как на Инфостарте.

Сначала предыстория: есть некоторый документ, в нем заполняются компетенции, т.е. скилы сотрудника . После проведения документа данные попадают в соответствующий регистр накопления. А дальше начинается магия! 

Теперь нам необходимо построить отчет – «паутинку». Данный отчет будет формироваться по конкретному сотруднику, так же необходимо вывести все доступные компетенции у этого сотрудника, и при выборе другой вложимости «паутинка» должна перестраиваться.

Создадим новый объект метаданных Отчет, добавим ему форму. На форму выводим данные о сотруднике, ДеревоЗначений – для вывода компетенций, и самое главное добавляем объект Диаграмма.

Теперь настроим диаграмму таким образом, чтобы она отображалась именно паутинкой, точки которой связаны между собой. Для этого открываем настройки диаграммы:

Открывается окно настроек диаграммы, где нам необходимо выбрать следующие параметры:

Так же вы можете настроить фон у диаграммы, рамку, палитру отображаемых цветов, это уж как вам понравится. Стоит отметить, что при соединении всех точек между собой и при выборе цветовой палитры, будет выбран только один цвет, рандомный.  Если вы хотите каждый «листик» диаграммы выделить своим цветом, необходимо убрать соединение точек. На мой взгляд такая диаграмма будет менее читабельной. Но как говориться, у каждого свои вкусы, кому то может понравится разноцветные «листики» =).

Итак, после всех настроек шаблон диаграммы будет выглядеть вот так:

На самом деле осталось самое легкое, настроить вывод данных в диаграмму. Для этого на форму отчета вывожу кнопку «Сформировать диаграмму». (В данном конкретном случае так было удобнее, но можно было сделать формирование при изменении сотрудника).

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

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

Так же необходимо помнить, что подобная диаграмма будет строиться только в том случае, если у вас будет больше 2 "лепестков"!  

А дальше наполняем диаграмму данными:

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

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

У меня по результату тестирования получилась вот такая паутинка, причем в зависимости от количества активных компетенций в активной группе меняется количество "листиков" диаграммы:

 

Ниже представлен внешний отчет, содержащий полный листинг программы (разрабатывала на платформе 1С:Предприятие 8.3 (8.3.13.1865)).

Пробовала сделать подобную диаграмму через СКД, но такого результата у меня не получилось. Возможно смотрела где то не там. Если вам приходилось строить подобные диаграммы, поделитесь способом, очень интересно!

Спасибо за внимание, хорошего дня!


Вступайте в нашу телеграмм-группу Инфостарт

диаграмма - паутинка отчеты диаграммы

См. также

Работа с интерфейсом Анализ учета Мониторинг 1С v8.3 8.3.14 1C:Бухгалтерия 1С:Бухгалтерия 3.0 1С:Библиотека стандартных подсистем 1С:ERP Управление предприятием 2 1С:Управление холдингом 1С:Зарплата и Управление Персоналом 3.x 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 Платные (руб)

Создайте свой функциональный интерфейс в любой конфигурации 1С с помощью расширения Infostart Dashboard. Настраивайте панели виджетов с метриками, индикаторами и показателями на начальном экране. Узнайте возможность внедрения подсистемы у себя в конфигурации с помощью бесплатной обработки "Анализ внедрения подсистемы 1С Infostart Dashboard"!

28800 руб.

27.03.2025    39378    26    22    

37

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

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

6000 руб.

16.01.2015    66601    45    60    

84

Работа с интерфейсом Программист 1С v8.3 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Платные (руб)

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

5160 руб.

29.06.2020    22154    32    6    

49

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

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

5040 руб.

06.10.2020    12176    8    8    

14

Работа с интерфейсом Программист Стажер 1С v8.3 Бесплатно (free)

Это инструкция по дизайну форм в среде 1С. Гайд охватывает рекомендации и стандарты для оптимизации пользовательского интерфейса. В гайде содержатся указания по использованию элементов интерфейса, включая как основные, так и продвинутые аспекты. Предоставляются также примеры и антипримеры для наглядного понимания принципов дизайна

20.08.2024    39873    mrXoxot    44    

136

Работа с интерфейсом Программист 1С v8.3 Бесплатно (free)

Пример простого и симпатичного прогресс-бара в динамическом списке, без картинок, используя редактирование запроса.

27.05.2024    23449    smielka    38    

109

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

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

27.12.2023    21791    1303    elcoan    53    

128

Инструментарий разработчика Работа с интерфейсом Программист 1С v8.3 1C:Бухгалтерия Абонемент ($m)

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

3 стартмани

10.04.2023    15564    177    acces969    31    

132
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. ZuevNikolay 15.01.20 12:30 Сейчас в теме
Спасибо большое за статью
Алексей_mir2mb; pro96inf; +2 Ответить
2. user660153_aleks.pisanets 116 15.01.20 12:31 Сейчас в теме
(1) На здоровье! =) Главное чтобы она была полезной
pro96inf; DrAku1a; sapervodichka; acanta; +4 Ответить
3. akim2040 48 15.01.20 13:01 Сейчас в теме
Интресненько!
А если бы такое добро, вообще было бы непередаваемо )))

http://visualdataweb.de/webvowl/#

PS на сколько вообще сложно такое реализовать? Это очень полезно в проектных конфах
Mechanik21; +1 Ответить
4. user660153_aleks.pisanets 116 15.01.20 13:34 Сейчас в теме
(3) добрый день! Если честно, подобных диаграмм мне не приходилось реализовывать. В новых версиях платформ добавили разновидность графиков и диаграмм,мне кажется если "поиграться" с настройками можно сотворить что вам нужно)) Возможно если будет время,попробую что нибудь такое реализовать,самой даже интересно стало)))если найдете решение раньше меня, напишите!)буду очень благодарна
8. ixijixi 2059 16.01.20 13:21 Сейчас в теме
13. insurgut 208 17.01.20 06:11 Сейчас в теме
(3) практической пользы в анимации представления данных конечно никакой нет, но, блин, порелаксировал, спасибо! )))
5. user774630 15.01.20 14:04 Сейчас в теме
За идею спасибо. Интересно.
Но коду всё же стоило бы уделить немного времени. А то прямо перл:
РезультатВыборки = Запрос.Выполнить().Выгрузить();
Если РезультатВыборки.Количество()>0 тогда
	Дерево = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
КонецЕсли;
improg; dsdred; Алексей_mir2mb; DrAku1a; user811769; +5 Ответить
6. user660153_aleks.pisanets 116 15.01.20 14:10 Сейчас в теме
(5) Спасибо за замечания, я их учту =)
DrAku1a; acanta; +2 Ответить
7. Yashazz 4880 15.01.20 19:41 Сейчас в теме
(5) Ну, это, конечно, мдяяя. А я уже почти собрался плюс поставить...
9. dsdred 4024 16.01.20 15:03 Сейчас в теме
"Диаграммы" для "1С:Предприятия" версии 8.3
http://platform.demo.1c.ru/chartsDemo/ru_RU/
вот тут и эта диаграмма и еще на 50 статей
starik-2005; mikl79; Yashazz; RustIG; CSiER; AlexeyPapanov; TipsyKID; MikZ; user774630; +9 Ответить
10. user660153_aleks.pisanets 116 16.01.20 15:10 Сейчас в теме
11. user774630 16.01.20 16:29 Сейчас в теме
(9) спасибо!

Но конкретно по этому примеру код там странный:
Диаграмма.ТипДиаграммы = ТипДиаграммы.РадарныйГрафик;
МодульДиаграммы.ЗаполнитьСтандартнымиДанными(Диаграмма);

Содержимое ЗаполнитьСтандартнымиДанными() они не показали
12. dsdred 4024 16.01.20 17:05 Сейчас в теме
(11)Скачайте демо конфигурацию и посмотрите модуль
https://its.1c.ru/db/metod8dev/content/5952/hdoc
mikl79; Yashazz; o4karek; TipsyKID; user774630; +5 Ответить
18. user1630954 03.02.22 14:07 Сейчас в теме
(12) Подскажите, пожалуйста, oткудо можно скачать платформу 1С 8.3.21 , чтобы запустить демонстрационную конфигурацию
19. dsdred 4024 03.02.22 21:56 Сейчас в теме
14. Yashazz 4880 08.06.20 13:25 Сейчас в теме
(9) ну вот я и не понял, почему столько плюсов за то, что давно и гораздо более подробно представлено в материалах вендора. Ну, видимо, кому-то лень искать, и поэтому простейшие вещи становятся откровением.
Ах да, и ещё - радарные диаграммы в недавних релизах появились, это надо учитывать, а автор вроде как не указала.
15. dsdred 4024 08.06.20 14:17 Сейчас в теме
(14)
ну вот я и не понял, почему столько плюсов за то, что давно и гораздо более подробно представлено в материалах вендора. Ну, видимо, кому-то лень искать, и поэтому простейшие вещи становятся откровением.

Это риторический вопрос ))

Если судить по себе: Дело в том что автор не знает, что нужно читателю.
Какие то вещи ты делал лет 5 назад и к ним относишься как обыденным действиям, но выходит статья кого то и собирает плюсы, еще и лучшей статьей года может стать ))
А ты все это знал, но не думал и не догадывался что если оформить то может выстрелить))
16. improg 736 08.06.20 14:38 Сейчас в теме
(0) Родитель, Компетенции это измерения? Если да, то зачем дополнительно по ним группировать в запросе? Для виртуальной таблицы группировка по измерениям происходит на уровне СУБД.
17. Yashazz 4880 08.06.20 17:43 Сейчас в теме
(64)
(15)
К сожалению, да. Я очень многое делаю совсем "на автопилоте", и кое-что из делаемого коллеги считали высшим пилотажем, вау и всё такое. Но у меня нет сил и времени оформлять и публиковать всё подряд, и я не понимаю, что из этого нужно, востребованно, а что нет. И потому меня приводят в недоумение и раздражение пространные статьи, разжёвывающие азы и основы, и удостоенные высокого рейтинга.

Я однажды проспорил "американку", и фант был - написать статью про что-то совсем элементарное. Ну, например, про команду "Сообщить" или передачу клиент-сервер. Я выбрал про таблицу значений. Это стёб был, а не статья, на мой-то взгляд. А вот что было потом - см.отзывы. И никто, походу, не просёк, что это было на самом деле...
dsdred; acanta; +2 Ответить
20. starik-2005 3197 15.07.23 11:07 Сейчас в теме
(17)
Я выбрал про таблицу значений. Это стёб был, а не статья, на мой-то взгляд.
С учетом того, что все старички плюсанули, включая разраба инструментов разраба, то станный стеб. Поездите Вы, батенька, не краснея.
Для отправки сообщения требуется регистрация/авторизация