Проверить настоящее дополнение поиска собственной таблицы

Самостоятельное введение в механизм через конкретный собственный источник и допустимые API.

Подготовка

1. Два собственных ТОЛСТЫХ клиента в управляемом приложении: тестируемый запущен вручную с /TESTCLIENT -TPort15419, менеджер тестирования — с /TESTMANAGER. Код — клиентская команда формы менеджера; сеансы код не запускает.

2. В тестируемом клиенте своя форма с заголовком Учебный стенд: реквизит УчебныеКниги ТаблицаЗначений, колонки КодКниги Строка 20 и Количество Число 10.0; таблица ТаблицаУчебныхКниг связана с этим реквизитом.

3. В редакторе тестируемой формы добавьте к этой таблице дополнение вида УправлениеПоиском с именем ПоискКниг, источник — ТаблицаУчебныхКниг. Оно должно быть видимым и доступным. Дополнительный серверный обработчик назначьте ПриСозданииНаСервере тестируемой формы, затем откройте её вручную.

4. Тест получает настоящее платформенное дополнение, не создаёт его через Новый. Для расширения отображения управления поиском используется толстый клиент согласно его описанию.

&НаКлиенте
Процедура ПроверитьСвойПоиск(Команда)
    Тест = Новый ТестируемоеПриложение("127.0.0.1", 15419);
    Тест.УстановитьСоединение();
    Попытка
        Форма = Тест.ПолучитьОбъект(Тип("ТестируемаяФорма"), "Учебный стенд", , 2);
        Поиск = Форма.ПолучитьОбъект(Тип("ТестируемоеДополнениеЭлементаФормы"), , "ПоискКниг", 2);
        Если Поиск.Вид <> ВидДополненияЭлементаФормы.УправлениеПоиском Тогда
            ВызватьИсключение "Нужно собственное дополнение УправлениеПоиском";
        КонецЕсли;
        Сообщить("Поиск видим: " + Строка(Поиск.ТекущаяВидимость()));
        Сообщить("Поиск доступен: " + Строка(Поиск.ТекущаяДоступность()));
        Поиск.Активизировать();
    Исключение
        Тест.РазорватьСоединение();
        ВызватьИсключение;
    КонецПопытки;
    Тест.РазорватьСоединение();
КонецПроцедуры

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    УчебныеКниги.Очистить();
    Для Номер = 1 По 3 Цикл
        СтрокаКниги = УчебныеКниги.Добавить();
        СтрокаКниги.КодКниги = "BOOK-" + Строка(Номер);
        СтрокаКниги.Количество = Номер;
    КонецЦикла;
КонецПроцедуры

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

1. Подготовьте собственный контекст из описания.

2. Выполните блок в указанном модуле.

3. Сравните фактический результат, не объявляя подготовку выполненным обменом.

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

1. Вид readonly; сравнение подтверждает, что найден именно УправлениеПоиском, а не строка поиска / отображение состояния. Активизировать меняет фокус своего интерфейса; не подменяется несуществующим методом установки текста. Разрыв соединения показан в обеих ветках.

2. Код 1С, административные / тестовые соединения, криптография и внешняя сеть при сборке HTML не выполнялись.

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

Есть конкретный собственный сценарий механизма и честные границы его результата.

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

1. Подготовленные объекты / настройки не являются runtime-подтверждением всей инфраструктуры.

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