Построить сводную таблицу из двух собственных товаров

Источник — запрос по собственной таблице в памяти. Итоги запроса определяют ресурсные поля Количество и Сумма; Товар используется как измерение строк.

Подготовка

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

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

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

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

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

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

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

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

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

1. Создаём типизированную ТаблицаЗначений с книгой 3/750 и ручкой 1/50, без чтения базы.

2. Первый запрос помещает собственный источник во временную таблицу; второй формирует РезультатЗапроса с итогами по товару.

3. ВстроенныеТаблицы.Добавить принимает Тип("СводнаяТаблица"), а не вымышленное перечисление.

4. ИсточникДанных получает результат запроса; в строки добавляем измерение, в данные — ресурсы, затем обновляем.

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

1. Пять проверок Истина: количество 4, сумма 800, одно поле строк, два поля данных и одна встроенная таблица.

2. В клиентском показе проверьте строки Книга и Ручка; это ручная проверка, код платформой в этом руководстве не запускался.

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

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

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

1. ТаблицаЗначений не присваивается ИсточникДанных напрямую: требуется РезультатЗапроса или ПостроительОтчета.

2. Закрываем свой менеджер временных таблиц после получения результата; никакие рабочие таблицы не выбираются запросом.

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