Работа с диаграммами

Подскажите, пожалуйста, кто работал с диаграммами в 1с-ке. От чего зависит вывод значений на области самой диаграммы рядом со столбиками?

имеем следующий код:

ПоляДиаграммы = Новый Структура;

ПоляДиаграммы.Вставить("СуммаДоходов" , Нстр("ru=""Доходы"";en=""Payments recived,rub"""));
ПоляДиаграммы.Вставить("СуммаЗатрат" , Нстр("ru=""Затраты"";en=""Incurred costs,rub"""));
ПоляДиаграммы.Вставить("СуммаБюджета" , Нстр("ru=""Бюджет"";en=""Budget,rub"""));
//ПоляДиаграммы.Вставить("СуммаПрогноза" , Нстр("ru=""Прогноз"";en=""Forecast,rub""")); БЕЗ ЭТОЙ СТРОЧКИ ЗНАЧЕНИЯ РЯДОМ ВЫВОДЯТСЯ, А С ЭТОЙ СТРОЧКОЙ НЕТ, не знаю что где добавить еще нужно

МассивОбластей = Новый Массив;
МассивОбластей.Добавить(СтруктураОбластей.ОбластьДиаграммы);
МассивОбластей.Добавить(СтруктураОбластей.ОбластьРашифровкаЦветов);

ОбластьДиаграммы = СтруктураОбластей.ОбластьДиаграммы;

ОбластьДиаграммы.Параметры.ЗаголовокТаблицы = СокрЛП(Данные.ОбъектЗатрат);

Диаграмма = ОбластьДиаграммы.Области.РабочаяДиаграмма.Объект;

Диаграмма.Обновление = Ложь;
Диаграмма.АвтоТранспонирование = Ложь;

Диаграмма.АвтоМаксимальноеЗначение = (МаксимальноеЗначение = 0);
Диаграмма.МаксимальноеЗначение = МаксимальноеЗначение;

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

Диаграмма.МаксимумСерий = МаксимумСерий.Ограничено;
Диаграмма.МаксимумСерийКоличество = ПоляДиаграммы.Количество();
Диаграмма.ВидПодписей = ВидПодписейКДиаграмме.Значение;

Диаграмма.КоличествоТочек = 1;
Диаграмма.Точки[0].Текст = "Руб.";

Для Каждого КлючЗначение Из ПоляДиаграммы Цикл

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

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

Серия.Текст = КлючЗначение.Значение;
Серия.ПриоритетЦвета = Истина;
Диаграмма.УстановитьЗначение(0, КоличествоСерий, Данные[КлючЗначение.Ключ]);

КонецЦикла;

Диаграмма.АвтоТранспонирование = (МаксимальноеЗначение = 0);
Диаграмма.Обновление = Истина;

//Выведем расшифровку диаграммы

ОбластьРашифровкаЦветов = СтруктураОбластей.ОбластьРашифровкаЦветов;

ии = 0;
Для Каждого КлючЗначение Из ПоляДиаграммы Цикл

ТекущаяСерия = ПоляДиаграммы.Количество() - ии;

ОбластьРашифровкаЦветов.Параметры["Серия" + Строка(ТекущаяСерия)] = КлючЗначение.Значение;

ии = ии + 1;

КонецЦикла;

ВывестиОбласть(Результат, МассивОбластей);