Диграммы в 1С уже давно принимают вид воронки продаж, но для корректного формирования нужно потрудиться искать в интернете информацию

Я вывожу воронку следующим модулем:

&НаСервере

Процедура ОбновитьДиаграммуНаСервере()

Диаграмма = Элементы.Диаграмма;

Диаграмма.КоличествоСерий = 0;

Диаграмма.КоличествоТочек = 0;

Диаграмма.МаксимумСерий = МаксимумСерий.НеЗадано;

//Диаграмма.МаксимумСерийКоличество = 10;

Диаграмма.ВидПодписей = ВидПодписейКДиаграмме.ЗначениеРазмер;

// Запретить обновление диаграммы на время вывода данных.

Диаграмма.Обновление = Ложь;

//// Установить единственную точку.

//Диаграмма.КоличествоТочек = 1;

//Диаграмма.Точки[0].Текст = "fst";

//

//// Количество серий, если бы не ограничивали зависело бы от результата запроса.

//КоличествоСерий = Диаграмма.Серии.Количество();

//Диаграмма.КоличествоСерий = КоличествоСерий + 1;

//Диаграмма.Серии[КоличествоСерий].Текст = "text1";

//

//// Установить значение "на пересечении" точки и серии.

//// Первый параметр - 0 , так как в диаграмме только одна точка.

//Диаграмма.УстановитьЗначение(0, КоличествоСерий, 80);

//

////2

//КоличествоСерий = Диаграмма.Серии.Количество();

//Диаграмма.КоличествоСерий = КоличествоСерий + 1;

//Диаграмма.Серии[КоличествоСерий].Текст = "text2";

//

//Диаграмма.УстановитьЗначение(0, КоличествоСерий, 50);

// Установить единственную точку.

Диаграмма.КоличествоТочек = 1;

Диаграмма.Точки[0].Текст = "";

Для Каждого Ст Из Отчет.ТаблицаСтатусы Цикл

Если Ст.Отображать = Истина Тогда

// Количество серий, если бы не ограничивали зависело бы от результата запроса.

КоличествоСерий = Диаграмма.Серии.Количество();

Диаграмма.КоличествоСерий = КоличествоСерий + 1;

Диаграмма.Серии[КоличествоСерий].Текст = СокрЛП(Ст.НаименованиеСтатуса)+" ("+Ст.Бюджет+")" ;

// Установить значение "на пересечении" точки и серии.

// Первый параметр - 0 , так как в диаграмме только одна точка.

Диаграмма.УстановитьЗначение(0, КоличествоСерий, Ст.Количество);

КонецЕсли;

КонецЦикла;

// Установить вид диаграммы

Диаграмма.ТипДиаграммы = ТипДиаграммы.ВоронкаНормированная;

// Обновить диаграмму.

Диаграмма.Обновление = Истина;

КонецПроцедуры

!!! Не забудь установить тип диаграммы (иначе будет обычный график): Диаграмма.ТипДиаграммы = ТипДиаграммы.ВоронкаНормированная;