Вывести самые дорогие учебные строки первыми

Учебные задачи

Порядок отчёта сортирует вывод по сумме, затем по названию. Разбираем элементы порядка и изменение их коллекции.

Где и как запускать

Модуль новой управляемой формы учебной внешней обработки. Код содержит готовые процедуры с директивами; вставляйте на уровне модуля, не внутрь другого обработчика. Каждую задачу запускайте в отдельной копии формы.

Подготовка

  1. Учебная внешняя обработка с пустой управляемой основной формой. Создайте команду УчебныйПример, кнопку команды и назначьте действие УчебныйПример.

  2. Вставьте полный модуль урока: клиентский обработчик и серверную функцию. Каждый урок — отдельная копия модуля.

  3. Откройте EPF в тонком клиенте Windows. Данные Книга/Ручка/Коробка создаются только в памяти; запрос урока с параметрами не читает таблицы базы.

  4. ПостроительОтчета — существующий API для изучения/сопровождения старого кода. Это не СистемаКомпоновкиДанных и не рекомендация заменять ею современные отчёты.

&НаКлиенте
Процедура УчебныйПример(Команда)
    ТабДок = СформироватьУчебныйОтчет();
    ТабДок.ТолькоПросмотр = Истина;
    ТабДок.Показать("Учебный ПостроительОтчета");
КонецПроцедуры

&НаСервере
Функция СформироватьУчебныйОтчет()
    Данные = Новый ТаблицаЗначений;
    Данные.Колонки.Добавить("Категория", Новый ОписаниеТипов("Строка"));
    Данные.Колонки.Добавить("Наименование", Новый ОписаниеТипов("Строка"));
    Данные.Колонки.Добавить("Количество", Новый ОписаниеТипов("Число"));
    Данные.Колонки.Добавить("Цена", Новый ОписаниеТипов("Число"));
    Данные.Колонки.Добавить("Сумма", Новый ОписаниеТипов("Число"));
    Образцы = Новый Массив;
    Образцы.Добавить(Новый Структура("Категория,Наименование,Количество,Цена", "Канцелярия", "Книга", 3, 250));
    Образцы.Добавить(Новый Структура("Категория,Наименование,Количество,Цена", "Канцелярия", "Ручка", 1, 50));
    Образцы.Добавить(Новый Структура("Категория,Наименование,Количество,Цена", "Упаковка", "Коробка", 2, 30));
    Для Каждого Образец Из Образцы Цикл
        СтрокаДанных = Данные.Добавить();
        ЗаполнитьЗначенияСвойств(СтрокаДанных, Образец);
        СтрокаДанных.Сумма = СтрокаДанных.Количество * СтрокаДанных.Цена;
    КонецЦикла;
    Описание = Новый ОписаниеИсточникаДанных(Данные);
    Для Каждого Колонка Из Описание.Колонки Цикл
        Колонка.Поле = Истина;
        Колонка.Отбор = Истина;
        Колонка.Порядок = Истина;
        Колонка.Измерение = Колонка.Имя = "Категория";
    КонецЦикла;
    Построитель = Новый ПостроительОтчета;
    Построитель.ИсточникДанных = Описание;
    Построитель.АвтоДетальныеЗаписи = Ложь;
    Построитель.ВыводитьДетальныеЗаписи = Истина;
    Построитель.ВыводитьЗаголовокОтчета = Истина;
    Построитель.ВыводитьОбщиеИтоги = Ложь;
    Построитель.ВыводитьПодвалОтчета = Ложь;
    Построитель.ВыводитьПодвалТаблицы = Ложь;
    Построитель.ВыводитьШапкуТаблицы = Истина;
    Построитель.ОтображатьСостояние = Ложь;
    Построитель.ОбрабатыватьПрерываниеПользователя = Истина;
    Построитель.ТекстЗаголовка = "Учебный отчёт — вымышленные данные";
    Порядок = Построитель.Порядок;
    Порядок.Очистить();
    Порядок.Добавить("Сумма", "ПоСумме", "Сумма по убыванию", НаправлениеСортировки.Убыв);
    Порядок.Добавить("Наименование", "ПоНазванию", "Название", НаправлениеСортировки.Возр);
    Сумма = Порядок.Найти("ПоСумме");
    Название = Порядок.Найти("ПоНазванию");
    Сообщить(Порядок.Количество() = 2);
    Сообщить(Сумма.Направление = НаправлениеСортировки.Убыв);
    Сообщить(Сумма.ПутьКДанным = "Сумма");
    Сообщить(Сумма.Имя = "ПоСумме");
    Сообщить(Порядок.Индекс(Название) = 1);
    Порядок.Сдвинуть(1, -1);
    Сообщить(Порядок.Получить(0).Имя = "ПоНазванию");
    Порядок.Удалить(0);
    Сообщить(Порядок.Количество() = 1);
    // Установить заменяет порядок собственным описанием по доступным путям.
    Порядок.Установить("Сумма Убыв, Наименование Возр");
    Сообщить(Данные.Получить(1).Наименование = "Ручка");

    ТабДок = Новый ТабличныйДокумент;
    Построитель.Вывести(ТабДок);
    Возврат ТабДок;
КонецФункции

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

  1. Отдельная коллекция порядка создаёт две сортировки. Направление задано явно.

  2. Имя ПоСумме отличается от пути Сумма; находим настройку по имени.

  3. Индекс/Получить относятся к позиции условия сортировки, а не к позиции товарной строки.

  4. Временно переставляем и удаляем условие по названию, затем задаём итоговый порядок строкой Установить.

  5. Исходная таблица остаётся в прежнем порядке Книга/Ручка/Коробка. Вывод сортируется отдельно.

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

  1. Восемь булевых проверок Истина.

  2. В выводе порядок Книга 750, Коробка 60, Ручка 50.

  3. Проверка исходной строки 1 всё ещё Ручка.

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

Реальная сортировка отчёта разобрана отдельно от перестановки исходных данных.

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

  1. Сдвинуть у Порядок принимает индекс, а не обязательно объект элемента: здесь используем документированный числовой вариант.

  2. Установить описывает доступные пути данных, а не пользовательские заголовки.

  3. Добавить у Порядок не используем как возвращающий объект: элемент получаем через Найти.

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

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.