У обработки основная форма собственная, но есть отдельные формы телефона, истории и веб-сайта. Мы изучаем маршрутизацию, не вводим контакты.
Где и как запускать
Учебная база: создайте серверный общий модуль УчебныеЗадачи (флаг Сервер). Код без директив вставьте в тело процедуры ВыполнитьПример() Экспорт. Вызовите её из серверного обработчика команды учебной обработки. Не запускайте в рабочей базе.
Подготовка
Запускайте в учебной копии конфигурации. Примеры читают структуру метаданных, но не создают объекты, не записывают регистры и не проводят документы.
Сверяйте вывод с деревом конфигурации в Конфигураторе. Имена, длины и настройки в УНФ, КА2, БП, УТ 11 и УТ 10.3 могут различаться.
Имена объектов взяты из XML КА2 Progress: C:\claude\KA2\Progress\XML_CF_KA2_PROGRESS. Исходные XML не изменяйте. Выполняйте код только в своей учебной копии соответствующей конфигурации.
В другой конфигурации предварительно найдите аналогичный объект в Конфигураторе и замените только строку имени в поиске. Отсутствие имени обрабатывается до чтения свойств; оно не доказывает отсутствие аналогичной возможности.
Каждый урок запускайте отдельно. Код не вызывает бизнес-функции модулей и обработчики команд, не переключает привилегированный режим и не меняет параметры сеанса.
Отчет = Метаданные.Отчеты.Найти("АнализОстатковТоваровОрганизаций");
Если Отчет = Неопределено Тогда
ВызватьИсключение "В учебной конфигурации отсутствует Отчеты.АнализОстатковТоваровОрганизаций";
КонецЕсли;
Обработка = Метаданные.Обработки.Найти("ВводКонтактнойИнформации");
Если Обработка = Неопределено Тогда
ВызватьИсключение "В учебной конфигурации отсутствует Обработки.ВводКонтактнойИнформации";
КонецЕсли;
Основная = Обработка.ОсновнаяФорма;
Если Основная <> Неопределено Тогда
Сообщить(Основная.ПолноеИмя());
Сообщить(Основная.Имя = "ВводАдресаВСвободнойФорме");
Иначе
Сообщить("Основная форма не назначена");
КонецЕсли;
Дополнительная = Обработка.ДополнительнаяФорма;
Если Дополнительная <> Неопределено Тогда
Сообщить(Дополнительная.ПолноеИмя());
Иначе
Сообщить("Дополнительная форма не назначена");
КонецЕсли;
Всего = 0;
Для Каждого ФормаОбработки Из Обработка.Формы Цикл
Всего = Всего + 1;
Сообщить(ФормаОбработки.Имя);
КонецЦикла;
Сообщить(Всего = Обработка.Формы.Количество());
Сообщить(Всего = 4);Разбор по шагам
Основное назначение читаем отдельно от коллекции всех собственных форм.
Обе назначенные формы проверяем на Неопределено.
Счётчик обхода сравниваем с Количество, не предполагаем наличие формы по индексу без проверки.
Наличие форм изучаем без создания обработки и исполнения её обработчиков.
Как проверить результат
По XML имя основной формы ВводАдресаВСвободнойФорме; сравнение Истина.
Выводит ВводАдресаВСвободнойФорме, ВводТелефона, ИсторияКонтактнойИнформации, ВебСайт; два сравнения количества Истина.
Ожидаемый результат
Найдены варианты интерфейса конкретной обработки и основное назначение.
На что обратить внимание
Эта проверка не подтверждает корректность ввода адреса или телефона.
Чтение метаданных не заменяет разрешение на открытие внешней обработки.
Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.