Как заполнить диаграмму данными?
---
```1c
    Диаграмма = ЭлементыФормы.Диаграмма;

    // Очистить диаграмму, возможно ранее в нее уже выводились данные.
    Диаграмма.КоличествоСерий = 0;
    Диаграмма.КоличествоТочек = 0;

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

    Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ
    | ПродажиКомпанииОбороты.Номенклатура,
    | СУММА(ПродажиКомпанииОбороты.КоличествоОборот) КАК КоличествоОборот
    |ИЗ
    | РегистрНакопления.Продажи.Обороты(, , , ) КАК ПродажиКомпанииОбороты
    |СГРУППИРОВАТЬ ПО
    | ПродажиКомпанииОбороты.Номенклатура";

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

    // Запретить обновление диаграммы на время вывода данных.
    Диаграмма.Обновление = Ложь;

    // Установить единственную точку.
    Диаграмма.КоличествоТочек = 1;
    Диаграмма.Точки[0].Текст = "Количество";
    Выборка = Результат.Выбрать();

    Пока Выборка.Следующий() Цикл

    // Количество серий, если бы не ограничивали зависело бы от результата запроса.
    КоличествоСерий = Диаграмма.Серии.Количество();
    Диаграмма.КоличествоСерий = КоличествоСерий + 1;
    Диаграмма.Серии[КоличествоСерий].Текст = Выборка.Номенклатура;

    // Установить значение "на пересечении" точки и серии.
    // Первый параметр - 0 , так как в диаграмме только одна точка.
    Диаграмма.УстановитьЗначение(0, КоличествоСерий, Выборка.КоличествоОборот);

    КонецЦикла;

    // Обновить диаграмму.
    Диаграмма.Обновление = Истина;
```
---
```1c
    Диаграмма = ЭлементыФормы.Диаграмма;

    // Очистить диаграмму, возможно ранее в нее уже выводились данные.
    Диаграмма.КоличествоСерий = 0;
    Диаграмма.КоличествоТочек = 0;

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

    Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ
    | ПродажиКомпанииОбороты.Номенклатура,
    | СУММА(ПродажиКомпанииОбороты.КоличествоОборот) КАК КоличествоОборот
    |ИЗ
    | РегистрНакопления.Продажи.Обороты(, , , ) КАК ПродажиКомпанииОбороты
    |СГРУППИРОВАТЬ ПО
    | ПродажиКомпанииОбороты.Номенклатура";

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

    // Запретить обновление диаграммы на время вывода данных.
    Диаграмма.Обновление = Ложь;

    // Установить единственную точку.
    Диаграмма.КоличествоТочек = 1;
    Диаграмма.Точки[0].Текст = "Количество";
    Выборка = Результат.Выбрать();

    Пока Выборка.Следующий() Цикл

    // Количество серий, если бы не ограничивали зависело бы от результата запроса.
    КоличествоСерий = Диаграмма.Серии.Количество();
    Диаграмма.КоличествоСерий = КоличествоСерий + 1;
    Диаграмма.Серии[КоличествоСерий].Текст = Выборка.Номенклатура;

    // Установить значение "на пересечении" точки и серии.
    // Первый параметр - 0 , так как в диаграмме только одна точка.
    Диаграмма.УстановитьЗначение(0, КоличествоСерий, Выборка.КоличествоОборот);

    КонецЦикла;

    // Обновить диаграмму.
    Диаграмма.Обновление = Истина;
```