Добавляет новый элемент коллекции и возвращает его,.
Синтаксис
Добавить(<Тип>)Полное описание, параметры и ограничения
КоллекцияВыбранныхПолейКомпоновкиДанных.Добавить (DataCompositionSelectedFieldCollection.Add)
КоллекцияВыбранныхПолейКомпоновкиДанных (DataCompositionSelectedFieldCollection)
Добавить (Add)
Доступен, начиная с версии 8.1.
Синтаксис:
Добавить(<Тип>)
Параметры:
<Тип> (обязательный)
Тип: Тип.
Тип добавляемого элемента. Элементами коллекции могут быть ВыбранноеПолеКомпоновкиДанных, ГруппаВыбранныхПолейКомпоновкиДанных, АвтоВыбранноеПолеКомпоновкиДанных.
Возвращаемое значение:
Тип: ВыбранноеПолеКомпоновкиДанных, ГруппаВыбранныхПолейКомпоновкиДанных, АвтоВыбранноеПолеКомпоновкиДанных.
Описание:
Добавляет новый элемент коллекции и возвращает его,.
Доступность:
Тонкий клиент, веб-клиент, сервер, толстый клиент, внешнее соединение.
Использование в версии:
Доступен, начиная с версии 8.1.
Методическая информация
Практические примеры
Январь и март: настоящий календарный пробел февраля и устойчивые цвета по date-ключам
Полный memory процесс: свой typed источник → настройки/доступные поля → compiled period addition → фактические native ячейки и диаграммы. Февраль — пробел источника, не сгенерированная продажа.
Где и как запускать
Полный серверный общий модуль УчебныеМесяцы85, вызываемый собственной управляемой формой в новой файловой ИБ .1343. Только WindowsThickManaged; ValueAppearance не исполняется в thin/web/external context.
Подготовка
Задача: две настоящие продажи в январе и марте. В феврале продаж нет. СКД должна показать календарный пробел, не добавляя нулевую запись в исходник, а одинаковые date-ключи диаграмм должны сохранить native цвета при перестановке серий.
Вручную создайте НОВУЮ пустую файловую ИБ платформы 8.5.1.1343 только по пути C:\1C85_OwnMonthGap\e9b935fa-64d8-4d5f-a190-01726ddc40ac\Base. Если путь/регистрация уже заняты, остановитесь. Здесь ИБ, каталог, роль, пользователь и модули фактически не создавались. UUID каталога — собственная метка стенда, не UUID ИБ.
Конфигуратор: новая конфигурация УчебныеМесяцыЦвета85, режим совместимости НеИспользовать, основной режим запуска УправляемоеПриложение. Запуск вручную только толстым клиентом с управляемым приложением. Никаких прикладных справочников, документов, регистров, отчётов, хранилищ, расширений и импортов из рабочих конфигураций.
Создайте одну свою роль УчебныйАдминистратор85: Администрирование и права запуска толстого управляемого клиента/просмотра своей формы. Создайте ровно одного собственного реального пользователя УчебныйАдминистратор85 с этой ролью, войдите им в один сеанс. GetUsers требует административного права. Код сверяет настоящий UUID пользователя с единственным элементом native массива; placeholder UUID не нужен.
Создайте один общий модуль УчебныеМесяцы85: Глобальный Нет; Сервер Да; Клиент управляемое приложение Нет; Клиент обычное приложение Нет; Внешнее соединение Нет; Вызов сервера Нет; Привилегированный Нет; повторное использование возвращаемых значений НеИспользовать. Вставьте целиком CODE. Его экспорт вызывается только серверной частью собственной формы.
Создайте управляемую общую форму МесяцыЦвета85 без основного реквизита. Реквизиты До85/После85 — ТабличныйДокумент; Прямая85/Переставленная85 — Диаграмма; Статус85 — Строка неограниченной длины; Остановка85 — Булево, начальное значение Ложь. Два поля табличного документа/два поля диаграммы связаны с одноимёнными реквизитами, readonly для пользователя. Статус многострочный readonly. Никаких других форм.
Одна команда формы Сформировать85: Действие → Сформировать85(Команда), одна кнопка с Команда=Сформировать85. Вставьте целиком FORM. В корне собственной конфигурации → Открыть модуль управляемого приложения вставьте целиком APPLICATION: native ПриНачалеРаботыСистемы() без аргументов открывает только эту общую форму. Событие вручную не вызывайте. После будущего ручного обновления своей ИБ запустите толстый управляемый клиент и нажмите настоящую кнопку один раз. Это авторская инструкция, реального открытия здесь нет.
Сам источник создаётся в памяти: три typed колонки UUID85/Период85/Сумма85, две строки 2026-01-01/1000 и 2026-03-01/2000 с одним новым UUID пакета. В исходнике НЕТ февральской строки. До/после каждого native вывода сверяется вся схема и каждая из 2×3 ячеек, итог 3000.
Схема создаёт objectdataset СвоиМесяцы85. Два schema date-параметра Начало85=2026-01-01, Конец85=2026-03-31 включаются в доступные поля. Add/смена Parameter делаются ТОЛЬКО в новых unbound Настройках до LoadSettings, не в связанной native коллекции.
ИсточникДоступныхНастроекКомпоновкиДанных(Схема) → Initialize → LoadSettings → actual Composer.Settings. ДоступныеПоляПолейГруппировок реально проверяют date Период85, ДоступныеПоляДополненияПериода — date-поля ПараметрыДанных.Начало85/Конец85. Нет самодельных available collections и зависимости от совпадения имени переменной.
Компилятор выдаёт реальный связанный макет; рекурсивный обход actual Тело/Группировка находит единственный Период85. Только его readonly ДополнениеПериода даёт внутренний тип. Начало/Конец читаются из actual compiled объектa; режим Месяц и exact dates должны совпасть. ГруппировкаРесурса False, ТипГруппировки Элементы, НаборДанныхИерархии пустой проверяются, а не бессмысленно присваиваются для покрытия.
ОформлениеЗначений НЕ имеет документированного конструктора. Маршрут: свой Новый native OutputProcessor → его typed ОформлениеЗначений. Native не гарантирует начальную пустоту: Type и GetAll.Count=0 обоих свежих собственных процессоров обязательны. После первой своей записи контрольный map должен остаться пустым; это проверка этих двух экземпляров, не универсальное доказательство глобального устройства. При Undefined/nonempty/shared эффекте — отказ, без чужого Clear и слепого отката.
Для января/марта задаются explicit RGB, февраль Set(date) получает настоящий свободный numeric индекс. Его номер не считается равным 0. Повторный Set без значения не меняет ключ. Full GetAll и typed Date/String GetAll проверяют весь whitelist: три date-ключа и свой строковый marker.
УстановитьВсе получает полный собственный payload, затем readback. Clear(Type(Date),True) удаляет только numeric февраль, сохраняет nonnumeric RGB января/марта и другой key-type. Это не clear всего объекта и не удаление исходных продаж. После проверки февраль явно серый.
Native output действительно формирует 2→3 месяца. Reader находит реальные заголовки, typed Date/числа либо явно форматированный ISO/text, исключает лишние итоги/дубликаты и суммирует actual суммы 3000. Пустой февральский ресурс отмечается Пробел=True и сохраняется отдельно; 0 используется только для суммы и диаграммы пробела, не как выдуманная запись источника.
Две собственные native диаграммы используют actual месячный результат: январь/февраль/март и март/январь/февраль. Native FillSeriesColors не возвращает ОформлениеЗначений. Проверяются все real Series.Value/Series.Color и Chart.GetValue; не пиксели, качество отрисовки, палитра ОС или сохранность произвольного промышленного отчёта.
При будущей ручной ошибке форма sticky fail-stop на client и server границах. Не обещается атомарность memory/UI присваиваний; автоматического retry/restore/clear нет. Закройте собственную форму и исследуйте причину. Здесь только авторство и статические проверки; actual 1С/compile/DB/UI/файлы/сеть/печать/экспорт/настройки/backup0.
Процедура ПроверитьСвойСтенд85() Экспорт
Если СтрокаСоединенияИнформационнойБазы() <> "File=""C:\1C85_OwnMonthGap\e9b935fa-64d8-4d5f-a190-01726ddc40ac\Base"";" Тогда
ВызватьИсключение "Только собственная новая файловая учебная ИБ";
КонецЕсли;
Если Метаданные.РежимСовместимости <> Метаданные.СвойстваОбъектов.РежимСовместимости.НеИспользовать Тогда
ВызватьИсключение "Не совпали версия платформы или собственная конфигурация";
КонецЕсли;
Если Метаданные.ОбщиеМодули.Количество() <> 1 Или Метаданные.ОбщиеМодули.Найти("УчебныеМесяцы85") = Неопределено
Или Метаданные.ОбщиеФормы.Количество() <> 1 Или Метаданные.ОбщиеФормы.Найти("МесяцыЦвета85") = Неопределено
Или Метаданные.Роли.Количество() <> 1 Или Метаданные.Роли.Найти("УчебныйАдминистратор85") = Неопределено Тогда
ВызватьИсключение "Нужны ровно свои общий модуль, управляемая общая форма и роль";
КонецЕсли;
Если Метаданные.Справочники.Количество() <> 0 Или Метаданные.Документы.Количество() <> 0
Или Метаданные.РегистрыСведений.Количество() <> 0 Или Метаданные.РегистрыНакопления.Количество() <> 0
Или Метаданные.РегистрыБухгалтерии.Количество() <> 0 Или Метаданные.РегистрыРасчета.Количество() <> 0
Или Метаданные.ПланыСчетов.Количество() <> 0 Или Метаданные.ПланыВидовХарактеристик.Количество() <> 0
Или Метаданные.ПланыВидовРасчета.Количество() <> 0 Или Метаданные.ПланыОбмена.Количество() <> 0
Или Метаданные.БизнесПроцессы.Количество() <> 0 Или Метаданные.Задачи.Количество() <> 0
Или Метаданные.Обработки.Количество() <> 0 Или Метаданные.Отчеты.Количество() <> 0
Или Метаданные.Константы.Количество() <> 0 Или Метаданные.Перечисления.Количество() <> 0
Или Метаданные.ВнешниеИсточникиДанных.Количество() <> 0 Или Метаданные.ХранилищаНастроек.Количество() <> 0
Или Метаданные.ОбщиеМакеты.Количество() <> 0 Или Метаданные.ПараметрыСеанса.Количество() <> 0 Тогда
ВызватьИсключение "Своя пустая прикладная схема без чужих данных и хранилищ";
КонецЕсли;
Если РасширенияКонфигурации.Получить(, ИсточникРасширенийКонфигурации.БазаДанных).Количество() <> 0
Или РасширенияКонфигурации.Получить(, ИсточникРасширенийКонфигурации.СеансАктивные).Количество() <> 0
Или РасширенияКонфигурации.Получить(, ИсточникРасширенийКонфигурации.СеансОтключенные).Количество() <> 0 Тогда
ВызватьИсключение "Стенд только без расширений";
КонецЕсли;
Текущий = ПользователиИнформационнойБазы.ТекущийПользователь();
Пользователи = ПользователиИнформационнойБазы.ПолучитьПользователей();
Если Текущий = Неопределено Или Пользователи.Количество() <> 1 Тогда
ВызватьИсключение "Нужен единственный собственный реальный пользователь ИБ";
КонецЕсли;
Если Текущий.Имя <> "УчебныйАдминистратор85"
Или Пользователи[0].УникальныйИдентификатор <> Текущий.УникальныйИдентификатор Тогда
ВызватьИсключение "Не совпал реальный UUID собственного пользователя ИБ";
КонецЕсли;
КонецПроцедуры
Функция СоздатьИсточник85(UUIDПакета)
Источник = Новый ТаблицаЗначений;
Источник.Колонки.Добавить("UUID85", Новый ОписаниеТипов("УникальныйИдентификатор"));
Источник.Колонки.Добавить("Период85", Новый ОписаниеТипов("Дата", , , Новый КвалификаторыДаты(ЧастиДаты.Дата)));
Источник.Колонки.Добавить("Сумма85", Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(9, 0, ДопустимыйЗнак.Неотрицательный)));
Для Номер = 0 По 1 Цикл
Запись = Источник.Добавить();
Запись.UUID85 = UUIDПакета;
Запись.Период85 = Дата(2026, ?(Номер = 0, 1, 3), 1);
Запись.Сумма85 = ?(Номер = 0, 1000, 2000);
КонецЦикла;
Возврат Источник;
КонецФункции
Процедура ПроверитьИсточник85(Источник, UUIDПакета)
Если ТипЗнч(Источник) <> Тип("ТаблицаЗначений") Или ТипЗнч(UUIDПакета) <> Тип("УникальныйИдентификатор")
Или Источник.Количество() <> 2 Или Источник.Колонки.Количество() <> 3 Тогда
ВызватьИсключение "Нужны ровно собственные две исходные строки и три типизированные колонки";
КонецЕсли;
Эталон = СоздатьИсточник85(UUIDПакета);
Для Индекс = 0 По 2 Цикл
Колонка = Источник.Колонки.Получить(Индекс);
ОжидаемаяКолонка = Эталон.Колонки.Получить(Индекс);
Если Колонка.Имя <> ОжидаемаяКолонка.Имя Или Колонка.ТипЗначения <> ОжидаемаяКолонка.ТипЗначения Тогда
ВызватьИсключение "Изменилась полная схема собственного источника";
КонецЕсли;
КонецЦикла;
Для Индекс = 0 По 1 Цикл
Запись = Источник.Получить(Индекс);
Если Запись.UUID85 <> UUIDПакета Или Запись.Период85 <> Дата(2026, ?(Индекс = 0, 1, 3), 1)
Или Запись.Сумма85 <> ?(Индекс = 0, 1000, 2000) Тогда
ВызватьИсключение "Изменились свои UUID, даты или суммы; февральскую запись не добавляем";
КонецЕсли;
КонецЦикла;
Если Источник.Итог("Сумма85") <> 3000 Тогда
ВызватьИсключение "Сумма двух настоящих исходных записей должна быть 3000";
КонецЕсли;
КонецПроцедуры
Функция СоздатьСхему85(Источник)
Схема = Новый СхемаКомпоновкиДанных;
Локальный = Схема.ИсточникиДанных.Добавить();
Локальный.Имя = "СвойИсточник85";
Локальный.ТипИсточникаДанных = "Local";
Набор = Схема.НаборыДанных.Добавить(Тип("НаборДанныхОбъектСхемыКомпоновкиДанных"));
Набор.Имя = "СвоиМесяцы85";
Набор.ИмяОбъекта = "СвоиМесяцы85";
Набор.ИсточникДанных = Локальный.Имя;
Для Каждого Колонка Из Источник.Колонки Цикл
Поле = Набор.Поля.Добавить(Тип("ПолеНабораДанныхСхемыКомпоновкиДанных"));
Поле.Поле = Колонка.Имя;
Поле.ПутьКДанным = Колонка.Имя;
Поле.Заголовок = Колонка.Имя;
Поле.ТипЗначения = Колонка.ТипЗначения;
Если Колонка.Имя = "Период85" Тогда
Поле.Оформление.УстановитьЗначениеПараметра("Формат", "ДФ=yyyy-MM-dd");
ИначеЕсли Колонка.Имя = "Сумма85" Тогда
Поле.Оформление.УстановитьЗначениеПараметра("Формат", "ЧДЦ=0;ЧГ=0");
Итог = Схема.ПоляИтога.Добавить();
Итог.ПутьКДанным = Колонка.Имя;
Итог.Выражение = "Сумма(Сумма85)";
КонецЕсли;
КонецЦикла;
Для Номер = 0 По 1 Цикл
Параметр = Схема.Параметры.Добавить();
Параметр.Имя = ?(Номер = 0, "Начало85", "Конец85");
Параметр.ТипЗначения = Источник.Колонки.Найти("Период85").ТипЗначения;
Параметр.Значение = ?(Номер = 0, Дата(2026, 1, 1), Дата(2026, 3, 31));
Параметр.Использование = ИспользованиеПараметраКомпоновкиДанных.Всегда;
Параметр.ВключатьВДоступныеПоля = Истина;
КонецЦикла;
Возврат Схема;
КонецФункции
Функция ПодготовитьНастройки85(Схема, Дополнять)
Настройки = Новый НастройкиКомпоновкиДанных;
Если Настройки.ПараметрыДанных.ДоступныеПараметры <> Неопределено Тогда
ВызватьИсключение "Добавление параметров разрешено только в собственной новой несвязанной коллекции";
КонецЕсли;
Для Номер = 0 По 1 Цикл
ЗначениеПараметра = Настройки.ПараметрыДанных.Элементы.Добавить();
ЗначениеПараметра.Параметр = Новый ПараметрКомпоновкиДанных(?(Номер = 0, "Начало85", "Конец85"));
ЗначениеПараметра.Значение = ?(Номер = 0, Дата(2026, 1, 1), Дата(2026, 3, 31));
ЗначениеПараметра.Использование = Истина;
КонецЦикла;
Группа = Настройки.Структура.Добавить(Тип("ГруппировкаКомпоновкиДанных"));
Группа.Имя = "СвоиМесяцы85";
Группа.Использование = Истина;
Для Каждого Имя Из СтрРазделить("Период85,Сумма85", ",") Цикл
Выбор = Группа.Выбор.Элементы.Добавить(Тип("ВыбранноеПолеКомпоновкиДанных"));
Выбор.Поле = Новый ПолеКомпоновкиДанных(Имя);
Выбор.Использование = Истина;
КонецЦикла;
ПолеГруппы = Группа.ПоляГруппировки.Элементы.Добавить(Тип("ПолеГруппировкиКомпоновкиДанных"));
ПолеГруппы.Поле = Новый ПолеКомпоновкиДанных("Период85");
ПолеГруппы.ТипГруппировки = ТипГруппировкиКомпоновкиДанных.Элементы;
ПолеГруппы.Использование = Истина;
ПолеГруппы.ТипДополнения = ?(Дополнять, ТипДополненияПериодаКомпоновкиДанных.Месяц, ТипДополненияПериодаКомпоновкиДанных.БезДополнения);
ПолеГруппы.НачалоПериода = Новый ПолеКомпоновкиДанных("ПараметрыДанных.Начало85");
ПолеГруппы.КонецПериода = Новый ПолеКомпоновкиДанных("ПараметрыДанных.Конец85");
Настройки.ПараметрыВывода.УстановитьЗначениеПараметра("РасположениеОбщихИтогов", РасположениеИтоговКомпоновкиДанных.Нет);
Группа.ПараметрыВывода.УстановитьЗначениеПараметра("РасположениеИтогов", РасположениеИтоговКомпоновкиДанных.Нет);
Порядок = Группа.Порядок.Элементы.Добавить(Тип("ЭлементПорядкаКомпоновкиДанных"));
Порядок.Поле = Новый ПолеКомпоновкиДанных("Период85");
Порядок.ТипУпорядочивания = НаправлениеСортировкиКомпоновкиДанных.Возр;
Порядок.Использование = Истина;
Компоновщик = Новый КомпоновщикНастроекКомпоновкиДанных;
ДоступныйИсточник = Новый ИсточникДоступныхНастроекКомпоновкиДанных(Схема);
Компоновщик.Инициализировать(ДоступныйИсточник);
Компоновщик.ЗагрузитьНастройки(Настройки);
Связанные = Компоновщик.Настройки;
Если Связанные.Структура.Количество() <> 1 Тогда
ВызватьИсключение "Нужна одна реальная связанная месячная группировка";
КонецЕсли;
СвояГруппа = Связанные.Структура.Получить(0);
Если ТипЗнч(СвояГруппа) <> Тип("ГруппировкаКомпоновкиДанных") Или СвояГруппа.Имя <> "СвоиМесяцы85"
Или СвояГруппа.ПоляГруппировки.Элементы.Количество() <> 1 Тогда
ВызватьИсключение "Не совпал фактический владелец настроек своей группы";
КонецЕсли;
ПоляГруппы = СвояГруппа.ПоляГруппировки;
ДоступныеГруппы = ПоляГруппы.ДоступныеПоляПолейГруппировок;
ДоступныеГраницы = ПоляГруппы.ДоступныеПоляДополненияПериода;
Если ТипЗнч(ДоступныеГруппы) <> Тип("ДоступныеПоляКомпоновкиДанных")
Или ТипЗнч(ДоступныеГраницы) <> Тип("ДоступныеПоляКомпоновкиДанных") Тогда
ВызватьИсключение "Источник не связал реальные доступные поля месячной группы и границ";
КонецЕсли;
ДатаГруппы = ДоступныеГруппы.НайтиПоле(Новый ПолеКомпоновкиДанных("Период85"));
Если ТипЗнч(ДатаГруппы) <> Тип("ДоступноеПолеКомпоновкиДанных")
Или Не ДатаГруппы.ТипЗначения.СодержитТип(Тип("Дата")) Тогда
ВызватьИсключение "Своё поле группировки не является доступной датой";
КонецЕсли;
Для Номер = 0 По 1 Цикл
Имя = ?(Номер = 0, "Начало85", "Конец85");
Граница = ДоступныеГраницы.НайтиПоле(Новый ПолеКомпоновкиДанных("ПараметрыДанных." + Имя));
Если ТипЗнч(Граница) <> Тип("ДоступноеПолеКомпоновкиДанных")
Или Не Граница.ТипЗначения.СодержитТип(Тип("Дата")) Тогда
ВызватьИсключение "Не найдена своя доступная дата-параметр для дополнения периода";
КонецЕсли;
ЗначениеГраницы = Связанные.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных(Имя));
Если ЗначениеГраницы = Неопределено Или Не ЗначениеГраницы.Использование
Или ЗначениеГраницы.Значение <> ?(Номер = 0, Дата(2026, 1, 1), Дата(2026, 3, 31)) Тогда
ВызватьИсключение "Не совпало реальное значение собственной границы";
КонецЕсли;
КонецЦикла;
РеальноеПоле = ПоляГруппы.Элементы.Получить(0);
Если Строка(РеальноеПоле.Поле) <> "Период85"
Или РеальноеПоле.ТипДополнения <> ?(Дополнять, ТипДополненияПериодаКомпоновкиДанных.Месяц, ТипДополненияПериодаКомпоновкиДанных.БезДополнения)
Или Строка(РеальноеПоле.НачалоПериода) <> "ПараметрыДанных.Начало85"
Или Строка(РеальноеПоле.КонецПериода) <> "ПараметрыДанных.Конец85" Тогда
ВызватьИсключение "Реальные настройки месячного дополнения не совпали";
КонецЕсли;
Возврат Связанные;
КонецФункции
Процедура НайтиСвоёПолеМакета85(Тело, Найденные)
Для Каждого Часть Из Тело Цикл
Если ТипЗнч(Часть) <> Тип("ГруппировкаМакетаКомпоновкиДанных") Тогда
ВызватьИсключение "В собственном простом макете неожиданная часть тела";
КонецЕсли;
Для Каждого ПолеМакета Из Часть.Группировка Цикл
Если ТипЗнч(ПолеМакета) <> Тип("ЭлементГруппировкиМакетаКомпоновкиДанных") Тогда
ВызватьИсключение "Реальная коллекция группировки вернула другой тип";
КонецЕсли;
Если ПолеМакета.ИмяПоля = "Период85" Тогда
Найденные.Добавить(ПолеМакета);
КонецЕсли;
КонецЦикла;
НайтиСвоёПолеМакета85(Часть.Тело, Найденные);
КонецЦикла;
КонецПроцедуры
Функция Скомпилировать85(Схема, Настройки, Дополнять)
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
Макет = КомпоновщикМакета.Выполнить(Схема, Настройки);
Найденные = Новый Массив;
НайтиСвоёПолеМакета85(Макет.Тело, Найденные);
Если Найденные.Количество() <> 1 Тогда
ВызватьИсключение "Нужен единственный фактически скомпилированный Период85, не предполагаемый индекс тела";
КонецЕсли;
ПолеМакета = Найденные[0];
Если ПолеМакета.ГруппировкаРесурса Или ПолеМакета.ТипГруппировки <> ТипГруппировкиКомпоновкиДанных.Элементы
Или ПолеМакета.НаборДанныхИерархии <> "" Тогда
ВызватьИсключение "Месяц должен группировать дату, а не ресурс или неизвестную иерархию";
КонецЕсли;
Дополнение = ПолеМакета.ДополнениеПериода;
Если ТипЗнч(Дополнение) <> Тип("ДополнениеПериодаМакетаКомпоновкиДанных") Тогда
ВызватьИсключение "Нужен реальный дочерний объект дополнения из собственного макета";
КонецЕсли;
Если Дополнение.ТипДополнения <> ?(Дополнять, ТипДополненияПериодаКомпоновкиДанных.Месяц, ТипДополненияПериодаКомпоновкиДанных.БезДополнения) Тогда
ВызватьИсключение "Компилятор не подтвердил выбранный режим дополнения";
КонецЕсли;
Если Дополнять Тогда
Если ТипЗнч(Дополнение.Начало) <> Тип("Дата") Или ТипЗнч(Дополнение.Конец) <> Тип("Дата")
Или Дополнение.Начало <> Дата(2026, 1, 1) Или Дополнение.Конец <> Дата(2026, 3, 31) Тогда
ВызватьИсключение "Компилятор не разрешил свои date-параметры в точные даты границ";
КонецЕсли;
КонецЕсли;
Возврат Макет;
КонецФункции
Функция ВывестиМесяцы85(Макет, Источник, Вывод)
Процессор = Новый ПроцессорКомпоновкиДанных;
Процессор.Инициализировать(Макет, Новый Структура("СвоиМесяцы85", Источник));
Документ = Новый ТабличныйДокумент;
Вывод.ОтображатьПроцентВывода = Ложь;
Вывод.УстановитьДокумент(Документ);
Результат = Вывод.Вывести(Процессор, Ложь);
Если ТипЗнч(Результат) <> Тип("ТабличныйДокумент") Тогда
ВызватьИсключение "Нужен настоящий табличный результат native процессора";
КонецЕсли;
Возврат Результат;
КонецФункции
Функция ПрочитатьМесяцы85(Документ, Дополнять)
Если ТипЗнч(Документ) <> Тип("ТабличныйДокумент") Или Документ.ВысотаТаблицы = 0
Или Документ.ВысотаТаблицы > 40 Или Документ.ШиринаТаблицы > 20 Тогда
ВызватьИсключение "Неожиданный настоящий native результат для двух собственных записей";
КонецЕсли;
КолонкаДаты = 0;
КолонкаСуммы = 0;
Заголовки = 0;
Для СтрокаДокумента = 1 По Документ.ВысотаТаблицы Цикл
ДатаВСтроке = 0;
СуммаВСтроке = 0;
Для КолонкаДокумента = 1 По Документ.ШиринаТаблицы Цикл
Текст = СокрЛП(Документ.Область(СтрокаДокумента, КолонкаДокумента).Текст);
Если Текст = "Период85" Тогда
ДатаВСтроке = КолонкаДокумента;
ИначеЕсли Текст = "Сумма85" Тогда
СуммаВСтроке = КолонкаДокумента;
КонецЕсли;
КонецЦикла;
Если ДатаВСтроке > 0 И СуммаВСтроке > 0 Тогда
Заголовки = Заголовки + 1;
КолонкаДаты = ДатаВСтроке;
КолонкаСуммы = СуммаВСтроке;
КонецЕсли;
КонецЦикла;
Если Заголовки <> 1 Или КолонкаДаты >= КолонкаСуммы Тогда
ВызватьИсключение "Нужны единственные фактические заголовки даты и суммы без угадывания координат";
КонецЕсли;
Месяцы = Новый Соответствие;
Всего = 0;
Для СтрокаДокумента = 1 По Документ.ВысотаТаблицы Цикл
Для КолонкаДокумента = 1 По Документ.ШиринаТаблицы Цикл
Если КолонкаДокумента = КолонкаДаты Или КолонкаДокумента = КолонкаСуммы Тогда
Продолжить;
КонецЕсли;
ДругаяЯчейка = Документ.Область(СтрокаДокумента, КолонкаДокумента);
ДругоеЧисло = Неопределено;
Если ДругаяЯчейка.СодержитЗначение Тогда
Если ТипЗнч(ДругаяЯчейка.Значение) = Тип("Число") Тогда
ДругоеЧисло = ДругаяЯчейка.Значение;
КонецЕсли;
ИначеЕсли СокрЛП(ДругаяЯчейка.Текст) <> "" Тогда
Попытка
ДругоеЧисло = Число(ДругаяЯчейка.Текст);
Исключение
ДругоеЧисло = Неопределено;
КонецПопытки;
КонецЕсли;
Если ДругоеЧисло <> Неопределено Тогда
ВызватьИсключение "Неожиданные numeric ячейки вне своих двух native колонок";
КонецЕсли;
КонецЦикла;
ЯчейкаДаты = Документ.Область(СтрокаДокумента, КолонкаДаты);
ЯчейкаСуммы = Документ.Область(СтрокаДокумента, КолонкаСуммы);
ТекстДаты = СокрЛП(ЯчейкаДаты.Текст);
Период = Неопределено;
Если ЯчейкаДаты.СодержитЗначение Тогда
Если ТипЗнч(ЯчейкаДаты.Значение) = Тип("Дата") Тогда
Период = ЯчейкаДаты.Значение;
КонецЕсли;
КонецЕсли;
Если Период = Неопределено Тогда
Для Месяц85 = 1 По 3 Цикл
Если ТекстДаты = Формат(Дата(2026, Месяц85, 1), "ДФ=yyyy-MM-dd") Тогда
Период = Дата(2026, Месяц85, 1);
КонецЕсли;
КонецЦикла;
КонецЕсли;
ТекстСуммы = СокрЛП(ЯчейкаСуммы.Текст);
Если Период = Неопределено Тогда
Если ТекстСуммы <> "" И ТекстСуммы <> "Сумма85" Тогда
ВызватьИсключение "Есть ресурс без собственного месяца: дополнительный итог или неожиданная строка";
КонецЕсли;
Продолжить;
КонецЕсли;
Если Период <> Дата(2026, 1, 1) И Период <> Дата(2026, 2, 1) И Период <> Дата(2026, 3, 1)
Или Месяцы.Получить(Период) <> Неопределено Тогда
ВызватьИсключение "Чужая дата или повторная строка месяца в native результате";
КонецЕсли;
ЗначениеРесурса = Неопределено;
Если ЯчейкаСуммы.СодержитЗначение Тогда
ЗначениеРесурса = ЯчейкаСуммы.Значение;
ИначеЕсли ТекстСуммы <> "" Тогда
Попытка
ЗначениеРесурса = Число(ТекстСуммы);
Исключение
ВызватьИсключение "Свой ресурс не является числом или пустым значением";
КонецПопытки;
КонецЕсли;
Пробел = Период = Дата(2026, 2, 1);
Если Пробел Тогда
Если Не Дополнять Или (ТипЗнч(ЗначениеРесурса) <> Тип("Неопределено")
И ТипЗнч(ЗначениеРесурса) <> Тип("Null") И ТипЗнч(ЗначениеРесурса) <> Тип("Число")) Тогда
ВызватьИсключение "Февральский gap допускает только actual Undefined/Null или числовой0, не Bool/String/Date";
КонецЕсли;
Если ТипЗнч(ЗначениеРесурса) = Тип("Число") И ЗначениеРесурса <> 0 Тогда
ВызватьИсключение "Февраль отсутствует в источнике и не может содержать собственную продажу";
КонецЕсли;
Сумма = 0;
Иначе
Если ТипЗнч(ЗначениеРесурса) <> Тип("Число")
Или ЗначениеРесурса <> ?(Период = Дата(2026, 1, 1), 1000, 2000) Тогда
ВызватьИсключение "Не совпали фактические суммы января или марта";
КонецЕсли;
Сумма = ЗначениеРесурса;
КонецЕсли;
Месяцы.Вставить(Период, Новый Структура("Сумма,Пробел,Ресурс,ТекстРесурса", Сумма, Пробел, ЗначениеРесурса, ТекстСуммы));
Всего = Всего + Сумма;
КонецЦикла;
Если Месяцы.Количество() <> ?(Дополнять, 3, 2) Или Всего <> 3000
Или Месяцы.Получить(Дата(2026, 1, 1)) = Неопределено Или Месяцы.Получить(Дата(2026, 3, 1)) = Неопределено Тогда
ВызватьИсключение "Полный фактический native вывод не подтвердил 2→3 месяца и сумму 3000";
КонецЕсли;
Возврат Месяцы;
КонецФункции
Процедура ПроверитьСвоёОформление85(Оформление, ЧисловойФевраль, ИндексФевраля, БезФевраля)
Все = Оформление.ПолучитьВсе();
Даты = Оформление.ПолучитьВсе(Тип("Дата"));
Строки = Оформление.ПолучитьВсе(Тип("Строка"));
Если Все.Количество() <> ?(БезФевраля, 3, 4) Или Даты.Количество() <> ?(БезФевраля, 2, 3) Или Строки.Количество() <> 1
Или Строки.Получить("Маркер85") <> "e9b935fa-64d8-4d5f-a190-01726ddc40ac"
Или Оформление.Получить(Дата(2026, 1, 1)) <> Новый Цвет(34, 112, 180)
Или Оформление.Получить(Дата(2026, 3, 1)) <> Новый Цвет(39, 146, 95) Тогда
ВызватьИсключение "Полный whitelist четырёх собственных ключей и typed GetAll не совпал";
КонецЕсли;
Февраль = Оформление.Получить(Дата(2026, 2, 1));
Если БезФевраля Тогда
Если Февраль <> Неопределено Тогда
ВызватьИсключение "После Clear(Date,True) числовой февраль должен отсутствовать";
КонецЕсли;
ИначеЕсли ЧисловойФевраль Тогда
Если ТипЗнч(Февраль) <> Тип("Число") Или Февраль <> ИндексФевраля Тогда
ВызватьИсключение "Не сохранён действительно выделенный numeric индекс; его номер не угадываем";
КонецЕсли;
ИначеЕсли Февраль <> Новый Цвет(150, 150, 150) Тогда
ВызватьИсключение "Не подтверждён явный серый цвет отсутствующего месяца";
КонецЕсли;
КонецПроцедуры
Функция ПодготовитьСвоёОформление85(Вывод)
Оформление = Вывод.ОформлениеЗначений;
КонтрольныйВывод = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
КонтрольноеОформление = КонтрольныйВывод.ОформлениеЗначений;
Если ТипЗнч(Оформление) <> Тип("ОформлениеЗначений") Или ТипЗнч(КонтрольноеОформление) <> Тип("ОформлениеЗначений") Тогда
ВызватьИсключение "Native getter не дал typed объект: не выдумываем Новый ОформлениеЗначений";
КонецЕсли;
Если Оформление.ПолучитьВсе().Количество() <> 0 Или КонтрольноеОформление.ПолучитьВсе().Количество() <> 0 Тогда
ВызватьИсключение "Начальное состояние native map не подтверждено пустым; чужие значения не очищаем";
КонецЕсли;
Оформление.Установить(Дата(2026, 1, 1), Новый Цвет(34, 112, 180));
Если КонтрольноеОформление.ПолучитьВсе().Количество() <> 0 Тогда
ВызватьИсключение "Не подтверждена независимость двух собственных getter maps; слепого Clear/rollback нет";
КонецЕсли;
Оформление.Установить(Дата(2026, 3, 1), Новый Цвет(39, 146, 95));
ИндексФевраля = Оформление.Установить(Дата(2026, 2, 1));
Если ТипЗнч(ИндексФевраля) <> Тип("Число") Или ИндексФевраля < 0
Или Оформление.Установить(Дата(2026, 2, 1)) <> ИндексФевраля Тогда
ВызватьИсключение "Один собственный ключ должен сохранить настоящий выделенный индекс";
КонецЕсли;
Оформление.Установить("Маркер85", "e9b935fa-64d8-4d5f-a190-01726ddc40ac");
ПроверитьСвоёОформление85(Оформление, Истина, ИндексФевраля, Ложь);
ПолныйПакет = Оформление.ПолучитьВсе();
Оформление.УстановитьВсе(ПолныйПакет);
ПроверитьСвоёОформление85(Оформление, Истина, ИндексФевраля, Ложь);
Оформление.Очистить(Тип("Дата"), Истина);
ПроверитьСвоёОформление85(Оформление, Ложь, ИндексФевраля, Истина);
Оформление.Установить(Дата(2026, 2, 1), Новый Цвет(150, 150, 150));
ПроверитьСвоёОформление85(Оформление, Ложь, ИндексФевраля, Ложь);
Если КонтрольноеОформление.ПолучитьВсе().Количество() <> 0 Тогда
ВызватьИсключение "Контрольный map изменился после собственного полного процесса";
КонецЕсли;
Возврат Оформление;
КонецФункции
Функция ПостроитьСвоюДиаграмму85(Месяцы, Оформление, ОбратныйПорядок)
Если Месяцы.Количество() <> 3 Или Не Месяцы.Получить(Дата(2026, 2, 1)).Пробел Тогда
ВызватьИсключение "Диаграмма принимает только проверенный настоящий месячный native результат";
КонецЕсли;
Диаграмма = Новый Диаграмма;
Диаграмма.ТипДиаграммы = ТипДиаграммы.Гистограмма;
Точка = Диаграмма.Точки.Добавить("Сумма85");
Для Номер = 1 По 3 Цикл
Месяц85 = ?(ОбратныйПорядок, ?(Номер = 1, 3, ?(Номер = 2, 1, 2)), Номер);
ДатаСерии = Дата(2026, Месяц85, 1);
РеальныйМесяц = Месяцы.Получить(ДатаСерии);
Серия = Диаграмма.Серии.Добавить(Формат(ДатаСерии, "ДФ=yyyy-MM-dd"));
Серия.Значение = ДатаСерии;
Диаграмма.УстановитьЗначение(Точка, Серия, РеальныйМесяц.Сумма);
КонецЦикла;
Диаграмма.ЗаполнитьЦветаСерий(Оформление);
ПроверитьСвоёОформление85(Оформление, Ложь, 0, Ложь);
Всего = 0;
Если Диаграмма.Серии.Количество() <> 3 Или Диаграмма.Точки.Количество() <> 1 Тогда
ВызватьИсключение "Не совпал полный объём собственной диаграммы";
КонецЕсли;
Для Номер = 0 По 2 Цикл
Серия = Диаграмма.Серии.Получить(Номер);
Месяц85 = ?(ОбратныйПорядок, ?(Номер = 0, 3, ?(Номер = 1, 1, 2)), Номер + 1);
ДатаСерии = Дата(2026, Месяц85, 1);
РеальноеЗначение = Диаграмма.ПолучитьЗначение(Точка, Серия).Значение;
Если Серия.Значение <> ДатаСерии Или Серия.Цвет <> Оформление.Получить(ДатаСерии)
Или ТипЗнч(РеальноеЗначение) <> Тип("Число") Или РеальноеЗначение <> Месяцы.Получить(ДатаСерии).Сумма Тогда
ВызватьИсключение "Фактический logical date key, native цвет или значение серии не совпали";
КонецЕсли;
Всего = Всего + РеальноеЗначение;
КонецЦикла;
Если Всего <> 3000 Тогда
ВызватьИсключение "Настоящие значения диаграммы не подтвердили native сумму 3000";
КонецЕсли;
Возврат Диаграмма;
КонецФункции
Функция ВыполнитьСвойУрок85() Экспорт
ПроверитьСвойСтенд85();
UUIDПакета = Новый УникальныйИдентификатор;
Источник = СоздатьИсточник85(UUIDПакета);
ПроверитьИсточник85(Источник, UUIDПакета);
Схема = СоздатьСхему85(Источник);
НастройкиДо = ПодготовитьНастройки85(Схема, Ложь);
МакетДо = Скомпилировать85(Схема, НастройкиДо, Ложь);
ВыводДо = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ДокументДо = ВывестиМесяцы85(МакетДо, Источник, ВыводДо);
ПрочитатьМесяцы85(ДокументДо, Ложь);
ПроверитьИсточник85(Источник, UUIDПакета);
НастройкиПосле = ПодготовитьНастройки85(Схема, Истина);
МакетПосле = Скомпилировать85(Схема, НастройкиПосле, Истина);
ВыводПосле = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
Оформление = ПодготовитьСвоёОформление85(ВыводПосле);
ВыводПосле.ОформлениеЗначений = Оформление;
Если ВыводПосле.ОформлениеЗначений <> Оформление Тогда
ВызватьИсключение "Свой native output property не вернул присвоенный actual typed map";
КонецЕсли;
ДокументПосле = ВывестиМесяцы85(МакетПосле, Источник, ВыводПосле);
Месяцы = ПрочитатьМесяцы85(ДокументПосле, Истина);
Прямая = ПостроитьСвоюДиаграмму85(Месяцы, Оформление, Ложь);
Переставленная = ПостроитьСвоюДиаграмму85(Месяцы, Оформление, Истина);
ПроверитьИсточник85(Источник, UUIDПакета);
ПроверитьСвоёОформление85(Оформление, Ложь, 0, Ложь);
Возврат Новый Структура("До,После,Прямая,Переставленная,Протокол", ДокументДо, ДокументПосле, Прямая, Переставленная,
"Native вывод: 2 → 3 месяца, сумма 3000. Февраль — пробел источника, не новая продажа. Цвета проверены по native сериям; source 2×3 сохранён.");
КонецФункцииПолный модуль своей управляемой общей формы
Общие → Общие формы → МесяцыЦвета85 → Модуль
Windows thick managed client and server context form; own module only.
&НаКлиенте
Процедура Сформировать85(Команда)
#Если ТолстыйКлиентУправляемоеПриложение Тогда
Если Остановка85 Или ТипЗнч(Команда) <> Тип("КомандаФормы") Или Команда <> Команды.Сформировать85 Тогда
ВызватьИсключение "Форма остановлена после ошибки: закройте её, не повторяйте частичные действия";
КонецЕсли;
Попытка
СформироватьНаСервере85();
Исключение
Остановка85 = Истина;
Статус85 = "Отказ: результат не подтверждён. Нет автоматического повтора, очистки или отката.";
ВызватьИсключение;
КонецПопытки;
#Иначе
ВызватьИсключение "Урок только для собственного толстого клиента с управляемым приложением";
#КонецЕсли
КонецПроцедуры
&НаСервере
Процедура СформироватьНаСервере85()
Если Остановка85 Тогда
ВызватьИсключение "Серверная граница также запрещает повтор после частичного отказа";
КонецЕсли;
Попытка
Пакет = УчебныеМесяцы85.ВыполнитьСвойУрок85();
До85 = Пакет.До;
После85 = Пакет.После;
Прямая85 = Пакет.Прямая;
Переставленная85 = Пакет.Переставленная;
Статус85 = Пакет.Протокол;
Исключение
Остановка85 = Истина;
ВызватьИсключение;
КонецПопытки;
КонецПроцедурыПолный модуль своего управляемого приложения
Своя конфигурация → Модуль управляемого приложения
Windows thick managed client, real OnStart event0; own application only.
Процедура ПриНачалеРаботыСистемы()
#Если ТолстыйКлиентУправляемоеПриложение Тогда
ОткрытьФорму("ОбщаяФорма.МесяцыЦвета85");
#Иначе
ВызватьИсключение "Свой учебный сценарий только в толстом управляемом клиенте";
#КонецЕсли
КонецПроцедурыРазбор по шагам
Подготовьте только свой новый exact FileCF/единственного actual пользователя/общий модуль/форму.
Создайте и целиком проверьте две typed строки с новым UUID пакета; сумму 3000 вычисляют исходные записи.
В новых unbound настройках добавьте два собственных date-параметра, затем свяжите настоящей схемой и проверьте доступные date fields/actual bound values.
БезДополнения → actual compiled макет/вывод/reader подтверждают январь1000 и март2000 без февраля.
Месяц → новый actual compiled объект дополнения с точными датами. Native getter map получает guarded own-empty состояние; исполните полный Set/GetAll/SetAll/Clear(Type,True) workflow.
Прочитайте настоящие месяцы native output: январь1000, февраль-пробел, март2000; не добавляйте февральскую строку в ТаблицаЗначений.
Постройте две диаграммы из actual reader результата, проверив date keys, native значения и цвета каждой переставленной серии; снова сверяйте полный source.
Как проверить результат
Ожидаемые будущие ручные проверки: source2×3 сохранён, native месяцы2→3, actual сумма3000, February.Пробел=True.
GetAll() содержит4 своих ключа, GetAll(Date)3 и GetAll(String)1. Clear(Date,True) оставляет2 date RGB и marker, Feb Get=None. Финально опять4 ключа с explicitGrey.
Дата серии определяет цвет, не её индекс: January RGB34/112/180, March39/146/95, February150/150/150 в обеих диаграммах.
Замените в только своём исходнике доступное поле/границу/тип/UUID/входную сумму/повторное UI действие: нужен явный отказ, не готовый подставленный результат.
Неопределённый/непустой native map или непредвиденный layout — отказ. Статический PASS не доказывает runtime пустоту, renderer layout или успешный запуск 1С.
Ожидаемый результат
Ожидаемый будущий ручной результат: две настоящие исходные продажи на3000, в native отчёте3 календарных месяца с февральским пробелом, стабильные проверенные native цвета date-серий. RuntimeVerified=False: actual1С/compile/DB/UI/network/backup0.
На что обратить внимание
Readonly available-field/layout-container ссылки не заменяются. Наличие RW дочерних свойств не даёт права присваивать Элемент.ДополнениеПериода.
НачалоПериода/КонецПериода в настройках допускают date, field или enum; compiled Начало/Конец допускают date/enum, но не Field. Здесь native compiler обязан разрешить свои date-параметры в actual dates, иначе fail-stop.
Собственные карты не загружаются/не сохраняются в системное хранилище; правило ≤100 keys одного типа и LRU при записи не проверяется этим четырёхключевым memory примером.
Нельзя писать Новый ОформлениеЗначений или считать FillSeriesColors фабрикой. GetAll даёт соответствие, не новый ValueAppearance; неизвестный native default не стираем.
Сервер и толстый клиент поддерживают ValueAppearance методы; внешнее соединение поддерживает output property, но не эти методы, поэтому внешний контекст здесь не разрешён.
Нормализация пустого февральского ресурса в0 служит диаграмме пробела. Она не доказывает реальную февральскую продажу, не меняет источник и не обещает универсальный способ трактовать Null в рабочих данных.
Проверен authored source/static только; реальные 1С, БД, UI, print/export, внешние настройки, файлы и сеть здесь не запускались.
Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.
Параметр связи СКД: объявление строковых кодов и согласованные режимы = / В
Создаём свой источник A01/3 и приёмник с буквальными строками A01/500, B01/700 внутри настоящего вложенного запроса. Объявляем КодыСвязи85 в схеме, связываем его с полем источника, переключаем полное условие запроса и Булево разрешения списка вместе, проверяем восстановление и независимую копию без исполнения.
Где и как запускать
Полный серверный общий модуль УчебныеЗадачи новой пустой конфигурации УчебныеПараметрыСвязи85; в1С не запускался.
Подготовка
НОВАЯ отдельная учебная база, не копия рабочей: точно8.5.1.1343, конфигурация УчебныеПараметрыСвязи85, совместимость Не использовать. Нет бизнес-объектов, расширений, подписок и фоновых заданий; модули вручную пустые, кроме данного общего модуля.
Конфигуратор → Общие → Общие модули → УчебныеЗадачи: Сервер=Да, Вызов сервера=Да, Клиент=Нет, Глобальный=Нет, Привилегированный=Нет. Вставить весь основной модуль. Создать свою внешнюю обработку УчебныеПараметрыСвязи85 → управляемая Форма: команда/кнопка Выполнить с действием Выполнить. Отдельный полный модуль формы дан ниже; реквизиты не нужны.
Будущая ручная подготовка вне опыта: завершить прежний свой сеанс, сохранить, Конфигурация → Обновить конфигурацию базы данных (F7), открыть свежий собственный клиент и свою обработку. Здесь F7, BSL, запросы, компоновщик и процессор не запускались.
Источник и приёмник объявлены самим кодом: четыре уникальных пути, в каждом наборе Строка/Число. Приёмник использует вложенный запрос как таблицу-источник, объединяющую две собственные буквальные строки; рабочих таблиц и неизвестных параметров нет.
Числовые поля имеют разные явные учебные контракты: КоличествоИсточника — целое 0–9, ЦенаПриемника — целое 0–999. Собственные буквальные значения3,500,700 укладываются в них. КвалификаторыЧисла передаются вторым аргументом ОписаниеТипов; это не утверждение, что рабочие цены всегда целые или ограничены999.
Процедура ВыполнитьПример() Экспорт
ПроверитьСвойПустойСтенд();
Если ПривилегированныйРежим() Тогда
ВызватьИсключение "Привилегированный режим не нужен";
КонецЕсли;
Схема = СоздатьСвоюОсновуПараметра();
ПроверитьСвойРежимСвязи(Схема, Ложь, Ложь);
ДобавитьСвоюПараметрическуюСвязь(Схема);
ПроверитьСвойРежимСвязи(Схема, Истина, Ложь);
Копия = СоздатьСвоюОсновуПараметра();
ДобавитьСвоюПараметрическуюСвязь(Копия);
УстановитьСвойРежимСвязи(Схема, Истина);
ПроверитьСвойРежимСвязи(Схема, Истина, Истина);
ПроверитьСвойРежимСвязи(Копия, Истина, Ложь);
УстановитьСвойРежимСвязи(Схема, Ложь);
ПроверитьСвойРежимСвязи(Схема, Истина, Ложь);
Каталог = Схема.СвязиНаборовДанных;
Связь = Каталог.Получить(0);
Каталог.Удалить(Связь);
ПроверитьСвойРежимСвязи(Схема, Ложь, Ложь);
ПроверитьСвойРежимСвязи(Копия, Истина, Ложь);
ДобавитьСвоюПараметрическуюСвязь(Схема);
ПроверитьСвойРежимСвязи(Схема, Истина, Ложь);
Каталог.Очистить();
ПроверитьСвойРежимСвязи(Схема, Ложь, Ложь);
ПроверитьСвойРежимСвязи(Копия, Истина, Ложь);
ДобавитьСвоюПараметрическуюСвязь(Схема);
ПроверитьСвойРежимСвязи(Схема, Истина, Ложь);
ПроверитьСвойРежимСвязи(Копия, Истина, Ложь);
Сообщить("КодыСвязи85 объявлен, запрос приёмника и скалярный флаг полностью восстановлены");
КонецПроцедуры
Процедура ПроверитьСвойПустойСтенд()
Если Метаданные.Справочники.Количество() <> 0 Или Метаданные.Документы.Количество() <> 0 Или Метаданные.Перечисления.Количество() <> 0 Или Метаданные.РегистрыСведений.Количество() <> 0 Или Метаданные.РегистрыНакопления.Количество() <> 0 Или Метаданные.РегистрыБухгалтерии.Количество() <> 0 Или Метаданные.РегистрыРасчета.Количество() <> 0 Или Метаданные.ПланыВидовХарактеристик.Количество() <> 0 Или Метаданные.ПланыВидовРасчета.Количество() <> 0 Или Метаданные.ПланыСчетов.Количество() <> 0 Или Метаданные.ПланыОбмена.Количество() <> 0 Или Метаданные.Последовательности.Количество() <> 0 Или Метаданные.БизнесПроцессы.Количество() <> 0 Или Метаданные.Задачи.Количество() <> 0 Или Метаданные.ОбщиеРеквизиты.Количество() <> 0 Или Метаданные.ПодпискиНаСобытия.Количество() <> 0 Или Метаданные.РегламентныеЗадания.Количество() <> 0 Или Метаданные.ВнешниеИсточникиДанных.Количество() <> 0 Тогда
ВызватьИсключение "Нужен только свой новый пустой учебный стенд";
КонецЕсли;
Если Метаданные.ЕстьИзмененияРасширениямиКонфигурации() Тогда
ВызватьИсключение "Свой сеанс не должен изменяться расширениями";
КонецЕсли;
Источники = Новый Массив;
Источники.Добавить(ИсточникРасширенийКонфигурации.БазаДанных);
Источники.Добавить(ИсточникРасширенийКонфигурации.СеансАктивные);
Источники.Добавить(ИсточникРасширенийКонфигурации.СеансОтключенные);
Для Каждого Источник Из Источники Цикл
Расширения = РасширенияКонфигурации.Получить(, Источник);
Если ТипЗнч(Расширения) <> Тип("Массив") Тогда
ВызватьИсключение "Native список расширений должен иметь тип Массив";
КонецЕсли;
Если Расширения.Количество() <> 0 Тогда
ВызватьИсключение "В своём новом стенде нет расширений базы или сеанса";
КонецЕсли;
КонецЦикла;
Если ТранзакцияАктивна() Тогда
ВызватьИсключение "Чужая или вложенная активная транзакция не допускается";
КонецЕсли;
КонецПроцедуры
Функция СвоеПолеВXML(Поле)
Если ТипЗнч(Поле) <> Тип("ПолеКомпоновкиДанных") Тогда
ВызватьИсключение "Сериализуется только собственное поле СКД, не объект или записи базы";
КонецЕсли;
Запись = Новый ЗаписьXML;
Запись.УстановитьСтроку();
Попытка
СериализаторXDTO.ЗаписатьXML(Запись, Поле);
Возврат Запись.Закрыть();
Исключение
Запись.Закрыть();
ВызватьИсключение;
КонецПопытки;
КонецФункции
Функция СвойТипПоляПараметра(ИмяПоля)
Если ИмяПоля = "КодИсточника" Или ИмяПоля = "КодПриемника" Тогда
Возврат Новый ОписаниеТипов("Строка");
ИначеЕсли ИмяПоля = "КоличествоИсточника" Тогда
Возврат Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(1, 0, ДопустимыйЗнак.Неотрицательный));
ИначеЕсли ИмяПоля = "ЦенаПриемника" Тогда
Возврат Новый ОписаниеТипов("Число", Новый КвалификаторыЧисла(3, 0, ДопустимыйЗнак.Неотрицательный));
КонецЕсли;
ВызватьИсключение "В собственной связи используются только четыре явно заданных поля";
КонецФункции
Процедура ПроверитьСвоиКвалификаторыПараметра(Описание, Разрядность)
Если ТипЗнч(Описание) <> Тип("ОписаниеТипов") Тогда
ВызватьИсключение "Нужно собственное описание числового поля параметрической связи";
КонецЕсли;
Квалификаторы = Описание.КвалификаторыЧисла;
Если ТипЗнч(Квалификаторы) <> Тип("КвалификаторыЧисла") Или Квалификаторы.Разрядность <> Разрядность
Или Квалификаторы.РазрядностьДробнойЧасти <> 0
Или Квалификаторы.ДопустимыйЗнак <> ДопустимыйЗнак.Неотрицательный Тогда
ВызватьИсключение "Не совпал полный собственный числовой контракт количества или цены";
КонецЕсли;
КонецПроцедуры
Функция СвойЗапросПриемника(СписокРазрешен)
Если СписокРазрешен Тогда
Возврат "ВЫБРАТЬ Данные.Код КАК КодПриемника, Данные.Цена КАК ЦенаПриемника ИЗ (ВЫБРАТЬ ""A01"" КАК Код, 500 КАК Цена ОБЪЕДИНИТЬ ВСЕ ВЫБРАТЬ ""B01"" КАК Код, 700 КАК Цена) КАК Данные ГДЕ Данные.Код В (&КодыСвязи85)";
КонецЕсли;
Возврат "ВЫБРАТЬ Данные.Код КАК КодПриемника, Данные.Цена КАК ЦенаПриемника ИЗ (ВЫБРАТЬ ""A01"" КАК Код, 500 КАК Цена ОБЪЕДИНИТЬ ВСЕ ВЫБРАТЬ ""B01"" КАК Код, 700 КАК Цена) КАК Данные ГДЕ Данные.Код = &КодыСвязи85";
КонецФункции
Функция СоздатьСвоюОсновуПараметра()
Схема = Новый СхемаКомпоновкиДанных;
Источник = Схема.ИсточникиДанных.Добавить();
Источник.Имя = "СвоиПараметры85";
Источник.ТипИсточникаДанных = "Local";
ИменаНаборов = СтрРазделить("Источник85,Приемник85", ",");
Запросы = Новый Массив;
Запросы.Добавить("ВЫБРАТЬ ""A01"" КАК КодИсточника, 3 КАК КоличествоИсточника");
Запросы.Добавить(СвойЗапросПриемника(Ложь));
ПоляНаборов = Новый Массив;
ПоляНаборов.Добавить(СтрРазделить("КодИсточника,КоличествоИсточника", ","));
ПоляНаборов.Добавить(СтрРазделить("КодПриемника,ЦенаПриемника", ","));
Для ИндексНабора = 0 По 1 Цикл
Набор = Схема.НаборыДанных.Добавить(Тип("НаборДанныхЗапросСхемыКомпоновкиДанных"));
Если ТипЗнч(Набор) <> Тип("НаборДанныхЗапросСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужен собственный набор запроса";
КонецЕсли;
Набор.Имя = ИменаНаборов[ИндексНабора];
Набор.ИсточникДанных = "СвоиПараметры85";
Набор.АвтоЗаполнениеДоступныхПолей = Ложь;
Набор.Запрос = Запросы[ИндексНабора];
ИменаПолей = ПоляНаборов[ИндексНабора];
Для Индекс = 0 По 1 Цикл
Поле = Набор.Поля.Добавить(Тип("ПолеНабораДанныхСхемыКомпоновкиДанных"));
Если ТипЗнч(Поле) <> Тип("ПолеНабораДанныхСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужно собственное простое объявление поля";
КонецЕсли;
Поле.Поле = ИменаПолей[Индекс];
Поле.ПутьКДанным = ИменаПолей[Индекс];
Поле.ТипЗначения = СвойТипПоляПараметра(ИменаПолей[Индекс]);
КонецЦикла;
КонецЦикла;
Параметр = Схема.Параметры.Добавить();
Если ТипЗнч(Параметр) <> Тип("ПараметрСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужен настоящий собственный параметр схемы";
КонецЕсли;
Параметр.Имя = "КодыСвязи85";
Параметр.ТипЗначения = Новый ОписаниеТипов("Строка");
Параметр.Значение = "";
Параметр.Использование = ИспользованиеПараметраКомпоновкиДанных.Авто;
ВыбираемыеПоля = СтрРазделить("КодИсточника,КоличествоИсточника,ЦенаПриемника", ",");
Для Каждого Путь Из ВыбираемыеПоля Цикл
Выбор = Схема.НастройкиПоУмолчанию.Выбор.Элементы.Добавить(Тип("ВыбранноеПолеКомпоновкиДанных"));
Если ТипЗнч(Выбор) <> Тип("ВыбранноеПолеКомпоновкиДанных") Тогда
ВызватьИсключение "Нужно собственное явно выбранное поле";
КонецЕсли;
Выбор.Поле = Новый ПолеКомпоновкиДанных(Путь);
Выбор.Использование = Истина;
КонецЦикла;
ПроверитьСвоюОсновуПараметра(Схема, Ложь);
Возврат Схема;
КонецФункции
Процедура ПроверитьСвоюОсновуПараметра(Схема, СписокРазрешен)
Если ТипЗнч(Схема) <> Тип("СхемаКомпоновкиДанных")
Или Схема.ИсточникиДанных.Количество() <> 1 Или Схема.НаборыДанных.Количество() <> 2
Или Схема.Параметры.Количество() <> 1 Или Схема.НастройкиПоУмолчанию.Выбор.Элементы.Количество() <> 3 Тогда
ВызватьИсключение "Нужны прежние свои источник, два набора, параметр и три выбранных поля";
КонецЕсли;
Источник = Схема.ИсточникиДанных.Получить(0);
Если ТипЗнч(Источник) <> Тип("ИсточникДанныхСхемыКомпоновкиДанных")
Или Источник.Имя <> "СвоиПараметры85" Или Источник.ТипИсточникаДанных <> "Local" Тогда
ВызватьИсключение "Не совпал полный собственный источник";
КонецЕсли;
ИменаНаборов = СтрРазделить("Источник85,Приемник85", ",");
Запросы = Новый Массив;
Запросы.Добавить("ВЫБРАТЬ ""A01"" КАК КодИсточника, 3 КАК КоличествоИсточника");
Запросы.Добавить(СвойЗапросПриемника(СписокРазрешен));
ПоляНаборов = Новый Массив;
ПоляНаборов.Добавить(СтрРазделить("КодИсточника,КоличествоИсточника", ","));
ПоляНаборов.Добавить(СтрРазделить("КодПриемника,ЦенаПриемника", ","));
Типы = СтрРазделить("Строка,Число", ",");
Для ИндексНабора = 0 По 1 Цикл
Набор = Схема.НаборыДанных.Получить(ИндексНабора);
Если ТипЗнч(Набор) <> Тип("НаборДанныхЗапросСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужен собственный набор запроса";
КонецЕсли;
Если Набор.Имя <> ИменаНаборов[ИндексНабора] Или Набор.ИсточникДанных <> "СвоиПараметры85"
Или Набор.АвтоЗаполнениеДоступныхПолей Или Набор.Запрос <> Запросы[ИндексНабора]
Или Набор.Поля.Количество() <> 2 Или Схема.НаборыДанных.Найти(Набор.Имя) <> Набор Тогда
ВызватьИсключение "Не совпали полный запрос, имя, порядок и поля своего набора";
КонецЕсли;
ИменаПолей = ПоляНаборов[ИндексНабора];
Для Индекс = 0 По 1 Цикл
Поле = Набор.Поля.Получить(Индекс);
Если ТипЗнч(Поле) <> Тип("ПолеНабораДанныхСхемыКомпоновкиДанных")
Или Поле.Поле <> ИменаПолей[Индекс] Или Поле.ПутьКДанным <> ИменаПолей[Индекс]
Или ТипЗнч(Поле.ТипЗначения) <> Тип("ОписаниеТипов") Тогда
ВызватьИсключение "Не совпали все полные собственные пути и типы полей";
КонецЕсли;
ПолныеТипы = Поле.ТипЗначения.Типы();
Если ПолныеТипы.Количество() <> 1 Или ПолныеТипы[0] <> Тип(Типы[Индекс]) Тогда
ВызватьИсключение "Не совпал полный тип собственного поля";
КонецЕсли;
Если Индекс = 1 Тогда
Разрядность = 1;
Если ИндексНабора = 1 Тогда
Разрядность = 3;
КонецЕсли;
ПроверитьСвоиКвалификаторыПараметра(Поле.ТипЗначения, Разрядность);
КонецЕсли;
КонецЦикла;
КонецЦикла;
Параметр = Схема.Параметры.Получить(0);
Если ТипЗнч(Параметр) <> Тип("ПараметрСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужен собственный параметр схемы";
КонецЕсли;
Если Параметр.Имя <> "КодыСвязи85" Или Схема.Параметры.Найти("КодыСвязи85") <> Параметр
Или ТипЗнч(Параметр.ТипЗначения) <> Тип("ОписаниеТипов") Или ТипЗнч(Параметр.Значение) <> Тип("Строка")
Или Параметр.Значение <> "" Или Параметр.Использование <> ИспользованиеПараметраКомпоновкиДанных.Авто Тогда
ВызватьИсключение "Не совпали имя, тип, значение по умолчанию и использование своего параметра";
КонецЕсли;
ПолныеТипы = Параметр.ТипЗначения.Типы();
Если ПолныеТипы.Количество() <> 1 Или ПолныеТипы[0] <> Тип("Строка") Тогда
ВызватьИсключение "Параметр связи относится к собственным строковым кодам";
КонецЕсли;
Если Схема.Параметры.Найти("НетТакогоПараметра85") <> Неопределено Тогда
ВызватьИсключение "Отсутствующий собственный параметр не должен находиться";
КонецЕсли;
ВыбираемыеПоля = СтрРазделить("КодИсточника,КоличествоИсточника,ЦенаПриемника", ",");
Для Индекс = 0 По 2 Цикл
Выбор = Схема.НастройкиПоУмолчанию.Выбор.Элементы.Получить(Индекс);
Если ТипЗнч(Выбор) <> Тип("ВыбранноеПолеКомпоновкиДанных") Или Не Выбор.Использование Тогда
ВызватьИсключение "Нужно используемое собственное выбранное поле";
КонецЕсли;
Если СвоеПолеВXML(Выбор.Поле) <> СвоеПолеВXML(Новый ПолеКомпоновкиДанных(ВыбираемыеПоля[Индекс])) Тогда
ВызватьИсключение "Не совпали полные пути и порядок выбранных полей";
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Процедура ДобавитьСвоюПараметрическуюСвязь(Схема)
ПроверитьСвоюОсновуПараметра(Схема, Ложь);
Если Схема.СвязиНаборовДанных.Количество() <> 0 Тогда
ВызватьИсключение "Связь добавляется в пустой собственный каталог";
КонецЕсли;
Связь = Схема.СвязиНаборовДанных.Добавить();
Если ТипЗнч(Связь) <> Тип("СвязьНаборовДанныхСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужна собственная параметрическая связь";
КонецЕсли;
Связь.НаборДанныхИсточник = "Источник85";
Связь.НаборДанныхПриемник = "Приемник85";
Связь.ВыражениеИсточник = "КодИсточника";
Связь.ВыражениеПриемник = "КодПриемника";
Связь.Обязательная = Истина;
Связь.Параметр = "КодыСвязи85";
Связь.РазрешенСписокПараметров = Ложь;
КонецПроцедуры
Процедура УстановитьСвойРежимСвязи(Схема, СписокРазрешен)
Если Схема.СвязиНаборовДанных.Количество() <> 1 Тогда
ВызватьИсключение "Нужна единственная текущая собственная связь";
КонецЕсли;
Приемник = Схема.НаборыДанных.Найти("Приемник85");
Если ТипЗнч(Приемник) <> Тип("НаборДанныхЗапросСхемыКомпоновкиДанных") Тогда
ВызватьИсключение "Нужен свой существующий набор запроса приемника";
КонецЕсли;
Приемник.Запрос = СвойЗапросПриемника(СписокРазрешен);
Связь = Схема.СвязиНаборовДанных.Получить(0);
Связь.РазрешенСписокПараметров = СписокРазрешен;
ПроверитьСвойРежимСвязи(Схема, Истина, СписокРазрешен);
КонецПроцедуры
Процедура ПроверитьСвойРежимСвязи(Схема, ЕстьСвязь, СписокРазрешен)
ПроверитьСвоюОсновуПараметра(Схема, СписокРазрешен);
Каталог = Схема.СвязиНаборовДанных;
Ожидается = 0;
Если ЕстьСвязь Тогда
Ожидается = 1;
КонецЕсли;
Если Каталог.Количество() <> Ожидается Тогда
ВызватьИсключение "Не совпал полный размер собственных связей";
КонецЕсли;
Если Не ЕстьСвязь Тогда
Возврат;
КонецЕсли;
Связь = Каталог.Получить(0);
Если ТипЗнч(Связь) <> Тип("СвязьНаборовДанныхСхемыКомпоновкиДанных")
Или Связь.НаборДанныхИсточник <> "Источник85" Или Связь.НаборДанныхПриемник <> "Приемник85"
Или Связь.ВыражениеИсточник <> "КодИсточника" Или Связь.ВыражениеПриемник <> "КодПриемника"
Или Не Связь.Обязательная Или Связь.Параметр <> "КодыСвязи85"
Или ТипЗнч(Связь.РазрешенСписокПараметров) <> Тип("Булево")
Или Связь.РазрешенСписокПараметров <> СписокРазрешен
Или Каталог.Индекс(Связь) <> 0 Или Каталог[0] <> Связь Тогда
ВызватьИсключение "Не совпали стороны, ключи, имя параметра, флаг списка и порядок своей связи";
КонецЕсли;
КонецПроцедурыУчебныеПараметрыСвязи85.Форма
Своя внешняя обработка УчебныеПараметрыСвязи85 → управляемая Форма → Модуль
Полный отдельный модуль своей формы с серверным вызовом; здесь не запускался.
&НаКлиенте
Процедура Выполнить(Команда)
ВыполнитьНаСервере();
Сообщить("Объявление параметра, полный запрос приёмника и скалярный/списочный режим связи проверены");
КонецПроцедуры
&НаСервереБезКонтекста
Процедура ВыполнитьНаСервере()
УчебныеЗадачи.ВыполнитьПример();
КонецПроцедурыРазбор по шагам
Полностью объявить свой параметр Схема.Параметры.Добавить(): имя КодыСвязи85, ОписаниеТипов("Строка"), строковое значение по умолчанию пустое, использование Авто. В КА2 АнализСчета настоящий параметр связи Ссылки также объявлен в схеме, тип соответствует полю источника.
Не устанавливать Всегда механически: по справке этот режим всегда использует значение настройки. В своём опыте проверяется Авто и передача кода через Параметр связи; пустой default не выдаётся за полученное значение источника.
Параметр свойства связи — имя без амперсанда: КодыСвязи85. В запросе используется &КодыСвязи85. Значение определяется ВыражениеИсточник="КодИсточника"; ВыражениеПриемник="КодПриемника" указывает реальный ключ приёмника. ЦенаПриемника нужна в выборе; источник кода также выбран.
Скалярная версия запроса содержит Данные.Код = &КодыСвязи85 и РазрешенСписокПараметров=Ложь. Списочная версия содержит Данные.Код В (&КодыСвязи85) и флаг Истина. СвойЗапросПриемника возвращает полный точный запрос режима, а УстановитьСвойРежимСвязи меняет запрос и флаг согласованно.
Условие находится во внешнем запросе с настоящим ИЗ (вложенный запрос) КАК Данные, не в выдуманном ГДЕ без источника. Вложенные источники документированы установленной справкой; поля Данные.Код/Цена объявлены внутренним списком выборки.
Восемь контрольных состояний оригинала проверяют полный источник, оба текста запросов, все поля/типы/порядок, весь параметр, его положительный/отрицательный поиск, выбор, обе стороны связи, имя параметра, реальный Булево и каталог. Флаг списка не считается доказанным только по названию свойства.
Копия создаётся заново со своим параметром и исходным запросом =. Во время режима В оригинала копия остаётся скалярной. После возврата режима удалить текущую связь как объект, не индекс, подтвердить0 при сохранённом объявлении параметра и запросах, создать новую; очистить оригинальный каталог и восстановить снова.
Списочный режим разрешает обработку списка, но код не присваивает Массив строковому ТипЗначения параметра и не запускает движок. Конкретная упаковка значений компоновщиком и данные результата остаются будущей runtime-проверкой.
СвойТипПоляПараметра различает все четыре настоящих имени поля: коды Строка, количество Число(1,0,Неотрицательный), цена Число(3,0,Неотрицательный). Проверка каждого числового поля сверяет все три квалификатора, а не только наличие Число в Типы(). Строковый параметр КодыСвязи85, запросы и переключение = / В остаются прежними.
Как проверить результат
Будущий итог проверки модели: единственный строковый КодыСвязи85 с пустым default/Авто; два исходных набора и полный скалярный запрос; одна связь Источник85→Приемник85, КодИсточника→КодПриемника, Параметр=КодыСвязи85, флаг списка Ложь. Копия сохраняет то же исходное состояние.
Буквальные строки задают A01/500 и B01/700. По математической логике = для A01 выбирает первый код, а В для списка A01/B01 допускает оба кода, но здесь список источников не формировался и запрос не выполнялся: это объяснение режимов, не полученные строки или обещание производительности.
Будущий отрицательный контроль: после согласованного перехода в режим В вручную заменить только Связь.РазрешенСписокПараметров на Ложь, не меняя эталон Истина и полный запрос. Проверка должна отказать. Альтернативно заменить имя параметра связи на НетТакогоПараметра85 при прежних запросах. Вернуть код, сохранить/F7 вне опыта и открыть новый свой сеанс; здесь контроль не выполнялся.
runtimeVerifiedScenarios=0. Сохранность прежних материалов и native-контракты проверяются статически. Нет выполнения 1С, запросов, записи, сети, реального компоновщика, печати или изменения конфигураций пользователя.
Ожидаемый результат
Полный осмысленный пример двух режимов параметрической связи: реальное объявление параметра, настоящий запрос приёмника и согласованные проверки всех определений.
На что обратить внимание
Параметр связи хранит имя параметра, не его значение и не текст &КодыСвязи85. Амперсанд нужен в языке запроса; строка свойства задаётся без него. Полный текст запроса не сводится к поиску подстроки В.
Список допустим при использовании параметра в операции В. Не включайте Истина при сохранённом сравнении = и не подменяйте ОписаниеТипов строкового элемента типом Массив без документированного основания.
Авто и Всегда имеют разный смысл. Этот урок не утверждает, что default пустой станет A01 сам по себе: это работа будущего компоновщика при использовании связи, здесь ни её исполнение, ни фактическая передача не проверялись.
Буквальный вложенный запрос позволяет изучать контракты без чужих таблиц. Наличие параметрической связи не обещает выполненный SQL, количество обращений или готовый визуальный отчёт.
Копия содержит новые собственные объекты. После Удалить и Очистить старые ссылки связи не используются; объявление параметра и оба набора сохраняются. XML получает только собственное ПолеКомпоновкиДанных и пишет строку в памяти.
Методы жизненного цикла каталога параметров и параметры функциональных опций не привязываются как бессмысленные заглушки: им нужны отдельные содержательные задачи.
Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.