БиблиотекаМакетовОформленияКомпоновкиДанных

Выбрать оформление отчёта из реальной библиотеки по имени

Показываем доступные варианты, проверяем индекс, выбираем реальное имя и получаем макет. Применяем его к полному отчёту из двух учебных продаж; отсутствующее имя обрабатываем без вызова метода у Неопределено.

Подготовка

1. Создайте НОВУЮ отдельную файловую учебную базу платформы 8.5.1.1343, имя конфигурации УчебноеОформлениеСКД85, совместимость НеИспользовать, обычное приложение и толстый клиент. Не запускайте в рабочей базе. Здесь код и UI не выполнялись: runtimeVerifiedScenarios=0.

2. Создайте неглобальный общий модуль УчебноеОформление85: Клиент (обычное приложение)=Да, Сервер=Нет, остальные клиентские флаги=Нет, Привилегированный=Нет. Полный модуль выбранного урока вставляется целиком, не внутрь обработчика. Директивы управляемой формы сюда не добавляйте.

3. Создайте собственную обработку УчебноеОформление85 с обычной основной формой Пульт. Кнопка Выполнить, действие ВыполнитьНажатие. Полный отдельный модуль формы приведён ниже. Проверьте назначение действия и F7 перед будущим запуском.

4. Данные строятся запросом Local из двух константных строк: Книга — 3 штуки по 250, сумма 750; Ручка — 1 штука по 50, сумма 50. Всего 4 единицы и 800. Справочники, документы, регистры, SQL-соединения и внешний сервер не нужны.

5. Не создавайте собственные общие макеты оформления для первого опыта. Библиотека содержит системные варианты и может содержать конфигурационные; число/порядок/представления не жёстко зашиты. Современный и Такси требуют 8.3.22 или новее, здесь целевая 8.5.1.1343.

6. Каждый итог создаётся в новом ТабличномДокументе и показывается без имени файла. Не выбирайте команды печати/сохранения. Показать открывает собственное окно и допускает редактирование: это не readonly и не доказательство запрета записи правами.

7. Первый урок показывает один выбранный вариант, второй — девять отдельных учебных окон. Закрывайте только эти свои окна вручную. Повторяйте урок отдельно; реальные окна, 1С, принтер, файл и сеть здесь не запускались.

Процедура ВыполнитьПример() Экспорт
    ПроверитьСвойКонтекст();
    Библиотека = БиблиотекаМакетовОформленияКомпоновкиДанных;
    Количество = Библиотека.Количество();
    Если Количество < 1 Тогда
        ВызватьИсключение "В собственном контексте нет вариантов оформления";
    КонецЕсли;
    Для Индекс = 0 По Количество - 1 Цикл
        Элемент = Библиотека.Получить(Индекс);
        Если ТипЗнч(Элемент) <> Тип("ЭлементБиблиотекиМакетовОформленияКомпоновкиДанных") Тогда
            ВызватьИсключение "Получить возвращает элемент библиотеки, не сам макет";
        КонецЕсли;
        Если Библиотека.Индекс(Элемент) <> Индекс Или Библиотека.Найти(Элемент.Имя) = Неопределено Тогда
            ВызватьИсключение "Не подтверждены собственный индекс и поиск имени";
        КонецЕсли;
        Сообщить(СтрШаблон("%1: %2 — %3", Индекс, Элемент.Имя, Элемент.Представление));
    КонецЦикла;
    Первый = Библиотека.Получить(0);
    ИмяВыбора = Первый.Имя;
    Выбранный = Библиотека.Найти(ИмяВыбора);
    Если Выбранный = Неопределено Тогда
        ВызватьИсключение "Выбранного имени нет в библиотеке";
    КонецЕсли;
    Оформление = Выбранный.ПолучитьМакет();
    Отчет = СформироватьСвойОтчет(Оформление);
    Отчет.Показать("Свой вариант: " + Выбранный.Представление, "", Истина);
    ОтсутствующееИмя = "УчебныйОтсутствующий_" + Строка(Новый УникальныйИдентификатор);
    Если Библиотека.Найти(ОтсутствующееИмя) <> Неопределено Тогда
        ВызватьИсключение "Случайное имя совпало с реальным макетом; повторите опыт";
    КонецЕсли;
    Сообщить("Поиск отсутствующего имени вернул Неопределено, ПолучитьМакет у него не вызывался");
КонецПроцедуры

Процедура ПроверитьСвойКонтекст()
    Если Метаданные.РежимСовместимости <> Метаданные.СвойстваОбъектов.РежимСовместимости.НеИспользовать Тогда
        ВызватьИсключение "Нужен собственный стенд УчебноеОформлениеСКД85 платформы 8.5.1.1343";
    КонецЕсли;
    Если ТранзакцияАктивна() Тогда
        ВызватьИсключение "Учебный вывод не должен выполняться внутри чужой транзакции";
    КонецЕсли;
КонецПроцедуры

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

Процедура ВыполнитьНажатие(Кнопка)
    УчебноеОформление85.ВыполнитьПример();
КонецПроцедуры

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

1. Глобальное readonly-свойство даёт существующую библиотеку. Новый БиблиотекаМакетовОформленияКомпоновкиДанных не используется: конструктор не придумываем.

2. Количество задаёт безопасную границу цикла: индексы от 0 до Количество-1. Получить возвращает ЭлементБиблиотекиМакетовОформленияКомпоновкиДанных, а не оформление.

3. Имя — программный ключ поиска, Представление — подпись для человека. В сообщениях показаны оба значения; нельзя считать русскую подпись точным ключом.

4. Индекс сверяется для реально полученного элемента. Найти получает его настоящее Имя. Первый доступный элемент выбран только для воспроизводимого опыта: положение 0 не закрепляет конкретный стиль.

5. ПолучитьМакет у найденного элемента возвращает МакетОформленияКомпоновкиДанных. Этот объект передаётся четвёртым параметром Выполнить, не сам элемент библиотеки.

6. Каждая компоновка заново создаёт Local-схему, настройки, процессор и приёмник. Генератор выбран для ТабличногоДокумента, не для ТаблицыЗначений.

7. Показать вызывается в толстом клиенте и без имени файла. Поиск случайного отсутствующего имени должен дать Неопределено; код не продолжает как будто найден макет.

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

1. Будущий ручной тест: сообщения перечисляют фактические имена/представления и индексы; собственный отчёт содержит Книга: 3, 250, 750 и Ручка: 1, 50, 50.

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

3. Подставьте неизвестное имя в ИмяВыбора: должна возникнуть понятная ошибка до ПолучитьМакет и показа нового окна. Самостоятельный отрицательный поиск в конце выводит сообщение о Неопределено.

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

Подготовлен полноценный отчёт с выбранным из библиотеки оформлением и проверкой отсутствующего имени. runtimeVerifiedScenarios=0.

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

1. Не передавайте Компоновщику элемент библиотеки вместо результата ПолучитьМакет. Типы различаются, хотя оба относятся к оформлению.

2. Представление локализуется; Имя, порядок и количество узнаются из текущей коллекции. Нельзя зашивать индекс для конкретного оформления.

3. Библиотека readonly: здесь ничего не добавляется и не заменяется. Код не доказывает визуальный результат, пока будущий тест не выполнен в 1С.

4. Управляемый тонкий клиент требует иной границы клиент/сервер; не переносите этот полный модуль без изменения контекста. Показать не печатает, но пользовательские команды окна здесь не блокируются.

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