КоллекцияПолейСводнойДиаграммы.Получить

Переставить ресурсы диаграммы и восстановить исходный состав

Меняем только выбранные поля отображения. Исходная таблица и её итог 800 остаются неизменными.

Подготовка

1. Создайте новую внешнюю обработку с управляемой основной формой в учебной базе. Каждый урок — отдельная копия модуля.

2. На форме создайте команду УчебныйПример и перетащите её на форму как кнопку. В действии команды выберите процедуру УчебныйПример(Команда).

3. Вставьте весь модуль из примера: УчебныйПример, ПостроитьУчебныйДокумент и УчебнаяТаблица. Серверный вызов возвращает собственный табличный документ клиенту; директивы не удаляйте.

4. Никакие макеты, документы и справочники конфигурации не нужны. Всё построение — в памяти, без печати, записи файлов и отправки в сервисы.

5. Показ и ручную проверку выполняйте в тонком клиенте Windows 8.5.1.1343. Каждый урок — отдельная копия формы с пустым модулем до вставки.

&НаКлиенте
Процедура УчебныйПример(Команда)
    ТабДок = ПостроитьУчебныйДокумент();

    ТабДок.Показать("Учебный документ — без печати и сохранения");
КонецПроцедуры

&НаСервереБезКонтекста
Функция ПостроитьУчебныйДокумент()
    ТабДок = Новый ТабличныйДокумент;
    Источник = Новый ТаблицаЗначений;
    Источник.Колонки.Добавить("Товар", Новый ОписаниеТипов("Строка"));
    Источник.Колонки.Добавить("Количество", Новый ОписаниеТипов("Число"));
    Источник.Колонки.Добавить("Сумма", Новый ОписаниеТипов("Число"));
    СтрокаТовара = Источник.Добавить();
    СтрокаТовара.Товар = "Книга";
    СтрокаТовара.Количество = 3;
    СтрокаТовара.Сумма = 750;
    СтрокаТовара = Источник.Добавить();
    СтрокаТовара.Товар = "Ручка";
    СтрокаТовара.Количество = 1;
    СтрокаТовара.Сумма = 50;
    Менеджер = Новый МенеджерВременныхТаблиц;
    Запрос = Новый Запрос;
    Запрос.МенеджерВременныхТаблиц = Менеджер;
    Запрос.УстановитьПараметр("Источник", Источник);
    Запрос.Текст = "ВЫБРАТЬ Д.Товар, Д.Количество, Д.Сумма
    |ПОМЕСТИТЬ ВТУчебныеТовары ИЗ &Источник КАК Д;
    |ВЫБРАТЬ Д.Товар, Д.Количество, Д.Сумма
    |ИЗ ВТУчебныеТовары КАК Д
    |ИТОГИ СУММА(Количество), СУММА(Сумма) ПО Товар";
    Попытка
        Пакет = Запрос.ВыполнитьПакет();
        Результат = Пакет.Получить(1);
    Исключение
        Менеджер.Закрыть();
        ВызватьИсключение;
    КонецПопытки;
    Менеджер.Закрыть();
    Диаграмма = Новый СводнаяДиаграмма;
    Диаграмма.ТипСводнойДиаграммы = ТипСводнойДиаграммы.Гистограмма;
    Диаграмма.ИсточникДанных = Результат;
    Диаграмма.Точки.Добавить("Товар");
    Диаграмма.Ресурсы.Добавить("Количество");
    Диаграмма.Ресурсы.Добавить("Сумма");
    Диаграмма.ОбластьЗаголовка.Текст = "Учебные товары: количество и сумма — разные единицы";
    Диаграмма.Обновить();
    Сумма = Диаграмма.Ресурсы.Найти("Сумма");
    Количество = Диаграмма.Ресурсы.Найти("Количество");
    Если Сумма = Неопределено Или Количество = Неопределено Тогда
        ВызватьИсключение "Ожидались два учебных ресурса";
    КонецЕсли;
    Сообщить(Диаграмма.Ресурсы.Индекс(Сумма) = 1);
    Диаграмма.Ресурсы.Сдвинуть(Сумма, -1);
    Сообщить(Диаграмма.Ресурсы.Получить(0).Имя = "Сумма");
    Диаграмма.Ресурсы.Удалить(Количество);
    Сообщить(Диаграмма.Ресурсы.Количество() = 1);
    Диаграмма.Ресурсы.Вставить("Количество", 0);
    Сообщить(Диаграмма.Ресурсы.Получить(0).Имя = "Количество");
    Диаграмма.Ресурсы.Очистить();
    Сообщить(Диаграмма.Ресурсы.Количество() = 0);
    Диаграмма.Ресурсы.Добавить("Количество");
    Диаграмма.Ресурсы.Добавить("Сумма");
    Диаграмма.Обновить();
    Сообщить(Диаграмма.Ресурсы.Количество() = 2);
    Сообщить(Источник.Итог("Сумма") = 800);
    Сообщить(Диаграмма.Реквизиты.Количество() = 0);
    Изображение = Диаграмма.ПолучитьКартинку(900, 500, ФорматКартинки.PNG);
    Сообщить(ТипЗнч(Изображение) = Тип("Картинка"));
    Рисунок = ТабДок.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    Рисунок.Картинка = Изображение;
    Рисунок.АвтоРазмер = Ложь;
    Рисунок.Лево = 5;
    Рисунок.Верх = 12;
    Рисунок.Ширина = 180;
    Рисунок.Высота = 100;
    ТабДок.Область(1, 1).Текст = "Только учебные данные: книга 3/750, ручка 1/50; количество 4, сумма 800";
    ТабДок.ТолькоПросмотр = Истина;
    Возврат ТабДок;
КонецФункции

Разбор по шагам

1. Проверяем оба найденных поля перед Индекс и Удалить.

2. Сдвинуть принимает смещение -1, не конечную позицию; Получить использует индекс с нуля.

3. Удаляем объект выбранного поля, вставляем удалённый ресурс по его имени в начало.

4. Очистить затрагивает роль Ресурсы; восстанавливаем состав до обновления и получения картинки.

Как проверить результат

1. Восемь сравнений Истина: порядок, промежуточные количества, восстановление, итог 800 и отсутствие выбранных реквизитов.

2. На итоговой картинке снова используются оба ресурса; источник по-прежнему содержит два товара.

Ожидаемый результат

Показан обратимый жизненный цикл выбранных полей диаграммы.

На что обратить внимание

1. Нельзя вставить дубликат уже выбранного поля без изучения допустимого состава.

2. Очистить ресурсы не удаляет записи базы и не обнуляет результат запроса.

3. СводнаяДиаграмма доступна на сервере/в толстом клиенте. Здесь тонкому клиенту возвращается обычный табличный документ с картинкой, не интерактивная сводная диаграмма.

4. Количество и сумма имеют разные единицы: совместная учебная шкала не подходит для достоверного бизнес-сравнения величин.

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