helpf.pro
Регистрация
 +1 
Распечатать

Как сформировать диаграмму с типом Круговая

В этом примере показано как сформировать диаграмму с типом Круговая, которая выглядит:

Настройки

 

Код

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


Запрос.УстановитьПараметр("KD",КонПериодаР);
Запрос.УстановитьПараметр("Mened", МенеджерОПР);
Запрос.УстановитьПараметр("ND", НачПериодаР);
Запрос.УстановитьПараметр("Org", ДляОрганизацииОР);
Результат = Запрос.Выполнить();
Выборка = Результат.Выгрузить();
итог = Выборка.Итог("КоличествоОборот");
Для каждого СтрокаТЗ Из Выборка Цикл
СтрокаТЗ.Проц = Окр(СтрокаТЗ.КоличествоОборот*100/итог,2);
КонецЦикла;


ДиаграммаВП = ЭлементыФормы.ДиаграммаОР;
Для Каждого СтрТраб из Выборка Цикл
Серия=ДиаграммаВП.Серии.Добавить(?(ЗначениеЗаполнено(СтрТраб.Получить(0).Наименование), СтрТраб.Получить(0).Наименование+" - "+Строка(СтрТраб.Получить(2))+"%","Без группы"));
Попытка
ДиаграммаВП.УстановитьЗначение(1,Серия,?(СтрТраб.Получить(2)=Неопределено,0,СтрТраб.Получить(2)));
Исключение
// такого не должно быть, но на всякий случай
КонецПопытки;
КонецЦикла;  
Разместил:   Версии: |  Дата:   Прочитано: 2807
 +1 
Распечатать
Возможно, вас также заинтересует
Вывод Диаграммы График Валют, Сохранение диаграммы, графиков и гистограмм в виде Картинки 0
Алгоритм обработки выполняет запрос к регистру сведений " курсы валют" за определенный пользователем период. Полученные данные выборки в цикле выводятся в элемент экранной формы " диаграмма" в режиме построения...
Вывод результата запроса в сводную диаграмму 0
Запрос = Новый Запрос( " ВЫБРАТЬ | ТоварыНаСкладахОстаткиИОбороты.Склад КАК Склад, | ТоварыНаСкладахОстаткиИОбороты.Склад.Представление, | ТоварыНаСкладахОстаткиИОбороты.Номенклатура КАК Номенклатура, ...
Заполним диаграмму Ганта данными 0
ДГ = ЭлементыФормы.ДГ; // Установить заголовок диаграммы. ДГ.ОбластьЗаголовка.Текст = " График дежурств" ; // Интервал будем определять самостоятельно. ДГ.АвтоОпределениеПолногоИнтервала = Ложь; // Установить...
Заполнить данными измерительную диаграмму 0
// Настроить свойства диаграммы. Диаграмма = ЭлементыФормы.ДиаграммаПродажи; Диаграмма.ТипДиаграммы = ТипДиаграммы.Измерительная; Диаграмма.АвтоМаксимальноеЗначение = Ложь; Диаграмма.МаксимальноеЗначение = 20000; ...
Как заполнить диаграмму данными? 0
Диаграмма = ЭлементыФормы.Диаграмма; // Очистить диаграмму, возможно ранее в нее уже выводились данные. Диаграмма.КоличествоСерий = 0; Диаграмма.КоличествоТочек = 0; // Количество серий будет ограничиваться (не все...
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.