ТестируемоеПриложение.РазорватьСоединение

Методы · Disconnect

Разрывает соединение с тестируемым приложением.

Синтаксис

РазорватьСоединение()
Полное описание, параметры и ограничения

ТестируемоеПриложение.РазорватьСоединение (TestedApplication.Disconnect)

ТестируемоеПриложение (TestedApplication)

РазорватьСоединение (Disconnect)

Доступен, начиная с версии 8.3.1.

Синтаксис:
РазорватьСоединение()
Описание:

Разрывает соединение с тестируемым приложением.

Доступность:

Тонкий клиент, толстый клиент.

Использование в версии:

Доступен, начиная с версии 8.3.1.

Методическая информация

Практические примеры

Проверить собственные формы, активное окно и наличие ошибки

Читаем дерево и состояние клиента тестирования, не закрывая приложение и не нажимая системные окна.

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

Полный клиентский модуль формы обработки в менеджере тестов, запущенном с /TESTMANAGER. Это не модуль тестируемой таблицы.

Подготовка

  1. Создайте собственную пустую учебную конфигурацию УчебнаяКонфигурацияСинтаксиса. Первый урок содержит полный модуль отдельной внешней обработки УчебнаяТаблицаТестирования; её данные только в памяти.

  2. Запустите два отдельных тонких клиента собственной учебной базы: тестируемый с /TESTCLIENT -TPort15380, менеджер с /TESTMANAGER. Порт 15380 — собственный учебный; убедитесь, что на нём не работает другой клиент. Не подключайте менеджер к рабочей базе/чужому приложению.

  3. В тестируемом клиенте вручную откройте собственную обработку из первого урока. В менеджере создайте другую внешнюю обработку с командой ВыполнитьПример; полный код одного теста вставьте в её модуль формы.

  4. Перед каждым тестом закройте и заново откройте таблицу в тестируемом клиенте. Исходно в ней A-01/Книга/3, B-02/Ручка/1, C-00/Бумага/2, без ранее установленной сортировки и редактирования.

  5. Каждый тест ищет точный учебный заголовок и таблицу ТаблицаТоваров внутри этой формы. Не заменяйте селекторы на * или первый найденный элемент рабочего приложения.

  6. Это код штатного механизма тестирования 1С, не браузерная проверка HTML. В данном окружении выполнение UI-тестов в настоящей 1С не подтверждено.

&НаКлиенте
Процедура ВыполнитьПример(Команда)
    Приложение = Новый ТестируемоеПриложение("127.0.0.1", 15380);
    Приложение.УстановитьСоединение();
    ИсходныйЛимит = Неопределено;
    ОшибкаТеста = "";
    Попытка
        Форма = Приложение.ПолучитьОбъект(Тип("ТестируемаяФорма"), "Учебная таблица guide-owned-ui-2026", , 10);
        Таблица = Форма.ПолучитьОбъект(Тип("ТестируемаяТаблицаФормы"), , "ТаблицаТоваров", 10);
        ИсходныйЛимит = Приложение.ПолучитьМаксимальноеВремяВыполненияДействия();
        Приложение.УстановитьМаксимальноеВремяВыполненияДействия(10);
        Найденная = Приложение.НайтиОбъект(Тип("ТестируемаяФорма"), "Учебная таблица guide-owned-ui-2026", , 2);
        Сообщить(Найденная <> Неопределено);
        ВсеУчебные = Приложение.НайтиОбъекты(Тип("ТестируемаяФорма"), "Учебная таблица guide-owned-ui-2026", , 2);
        Сообщить("Форм с точным собственным заголовком: " + Строка(ВсеУчебные.Количество()));
        Сообщить("Корневых объектов клиента: " + Строка(Приложение.ПолучитьПодчиненныеОбъекты().Количество()));
        Окно = Приложение.ПолучитьАктивноеОкно();
        Сообщить("Активное окно получено: " + Строка(Окно <> Неопределено));
        Ошибка = Приложение.ПолучитьТекущуюИнформациюОбОшибке();
        Если Ошибка = Неопределено Тогда
            Сообщить("Отображаемого окна ошибки нет");
        Иначе
            Сообщить("Ошибка содержит собственный маркер: " + Строка(СтрНайти(Ошибка.Описание, "guide-owned-ui-2026") > 0));
            Сообщить("Текст/стек ошибки не публикуем и окно автоматически не закрываем");
        КонецЕсли;
    Исключение
        ОшибкаТеста = ОписаниеОшибки();
    КонецПопытки;
    ОшибкиЗавершения = ЗавершитьСобственныйУчебныйТест(Приложение, ИсходныйЛимит);
    Если Не ПустаяСтрока(ОшибкаТеста) Или Не ПустаяСтрока(ОшибкиЗавершения) Тогда
        ВызватьИсключение "Ошибка учебного UI-теста: " + ОшибкаТеста + " " + ОшибкиЗавершения;
    КонецЕсли;
    Сообщить("Сценарий завершён без исключения. Отдельно сверяйте контрольные Истина и видимые данные учебного клиента");
КонецПроцедуры

&НаКлиенте
Функция ЗавершитьСобственныйУчебныйТест(Приложение, ИсходныйЛимит)
    ОшибкиЗавершения = "";
    Если ТипЗнч(ИсходныйЛимит) = Тип("Число") Тогда
        Попытка
            Приложение.УстановитьМаксимальноеВремяВыполненияДействия(ИсходныйЛимит);
        Исключение
            ОшибкиЗавершения = "Не восстановлен лимит действий: " + ОписаниеОшибки();
        КонецПопытки;
    КонецЕсли;
    Попытка
        Приложение.РазорватьСоединение();
    Исключение
        ОшибкиЗавершения = ОшибкиЗавершения + " Не разорвано соединение: " + ОписаниеОшибки();
    КонецПопытки;
    Возврат ОшибкиЗавершения;
КонецФункции

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

  1. Сначала открываем собственную таблицу в отдельном клиенте тестирования. Подключаемся только к 127.0.0.1:15380, ищем точный заголовок и внутреннее имя таблицы с таймаутами 10 секунд.

  2. НайтиОбъект при отсутствии возвращает Неопределено, НайтиОбъекты — фиксированный массив. Даже при точном заголовке может быть несколько открытых копий; не берём элемент 0 без проверки.

  3. ПолучитьПодчиненныеОбъекты показывает корневые тестируемые объекты, не все строки данных базы. ПолучитьАктивноеОкно не гарантирует, что это именно наша обработка.

  4. ПолучитьТекущуюИнформациюОбОшибке возвращает ИнформацияОбОшибке только если в тестируемом клиенте отображается окно ошибки. Неопределено — нормальное отсутствие.

  5. Для отдельной ручной проверки в расширенном fixture нажмите УчебнаяОшибка. Затем запустите чтение в менеджере: проверяется только собственный маркер, не выводится полный стек.

  6. Никакого Нажать на активное системное окно, закрытия или перезапуска приложения здесь нет. Если ошибка блокирует действия, закройте распознанное собственное окно вручную.

  7. После теста восстанавливаем исходный лимит действий и отдельно пытаемся разорвать соединение, даже при исключении. Ошибки завершения не скрываем; разрыв соединения не закрывает тестируемое приложение.

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

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

  2. Без отображаемой ошибки выводится её отсутствие. Для контролируемой ошибки с кнопки проверка маркера должна дать Истина; чужой текст не публикуется.

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

Разобрана разница между поиском объекта, активным окном и текущей ошибкой клиента.

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

  1. Не интерпретируйте отсутствие окна ошибки как отсутствие всех ошибок приложения.

  2. Активное окно не является безопасным селектором для произвольного подтверждения или закрытия.

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

Записать журнал собственных UI-действий и разобрать XML

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

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

Полный клиентский модуль формы обработки в менеджере тестов, запущенном с /TESTMANAGER. Это не модуль тестируемой таблицы.

Подготовка

  1. Создайте собственную пустую учебную конфигурацию УчебнаяКонфигурацияСинтаксиса. Первый урок содержит полный модуль отдельной внешней обработки УчебнаяТаблицаТестирования; её данные только в памяти.

  2. Запустите два отдельных тонких клиента собственной учебной базы: тестируемый с /TESTCLIENT -TPort15380, менеджер с /TESTMANAGER. Порт 15380 — собственный учебный; убедитесь, что на нём не работает другой клиент. Не подключайте менеджер к рабочей базе/чужому приложению.

  3. В тестируемом клиенте вручную откройте собственную обработку из первого урока. В менеджере создайте другую внешнюю обработку с командой ВыполнитьПример; полный код одного теста вставьте в её модуль формы.

  4. Перед каждым тестом закройте и заново откройте таблицу в тестируемом клиенте. Исходно в ней A-01/Книга/3, B-02/Ручка/1, C-00/Бумага/2, без ранее установленной сортировки и редактирования.

  5. Каждый тест ищет точный учебный заголовок и таблицу ТаблицаТоваров внутри этой формы. Не заменяйте селекторы на * или первый найденный элемент рабочего приложения.

  6. Это код штатного механизма тестирования 1С, не браузерная проверка HTML. В данном окружении выполнение UI-тестов в настоящей 1С не подтверждено.

&НаКлиенте
Процедура ВыполнитьПример(Команда)
    Приложение = Новый ТестируемоеПриложение("127.0.0.1", 15380);
    Приложение.УстановитьСоединение();
    ИсходныйЛимит = Неопределено;
    ОшибкаТеста = "";
    Попытка
        Форма = Приложение.ПолучитьОбъект(Тип("ТестируемаяФорма"), "Учебная таблица guide-owned-ui-2026", , 10);
        Таблица = Форма.ПолучитьОбъект(Тип("ТестируемаяТаблицаФормы"), , "ТаблицаТоваров", 10);
        ИсходныйЛимит = Приложение.ПолучитьМаксимальноеВремяВыполненияДействия();
        Приложение.УстановитьМаксимальноеВремяВыполненияДействия(10);
        ЗаписьНачата = Ложь;
        ОшибкаЖурнала = "";
        ТекстЖурнала = "";
        Попытка
            Приложение.НачатьЗаписьЖурналаДействийПользователя();
            ЗаписьНачата = Истина;
            Таблица.Активизировать();
            Таблица.ПерейтиКПервойСтроке();
            Таблица.ПерейтиКСледующейСтроке();
            Приложение.ПриостановитьЗаписьЖурналаДействийПользователя();
            Таблица.ПерейтиКПоследнейСтроке();
            Приложение.ПродолжитьЗаписьЖурналаДействийПользователя();
            Таблица.ПерейтиКПервойСтроке();
            ТекстЖурнала = Приложение.ЗавершитьЗаписьЖурналаДействийПользователя();
            ЗаписьНачата = Ложь;
        Исключение
            ОшибкаЖурнала = ОписаниеОшибки();
        КонецПопытки;
        Если ЗаписьНачата Тогда
            Попытка
                Приложение.ПрерватьЗаписьЖурналаДействийПользователя();
            Исключение
                ВызватьИсключение "Запись не прервана: " + ОписаниеОшибки() + "; исходная ошибка: " + ОшибкаЖурнала;
            КонецПопытки;
        КонецЕсли;
        Если Не ПустаяСтрока(ОшибкаЖурнала) Тогда
            ВызватьИсключение ОшибкаЖурнала;
        КонецЕсли;
        Если ПустаяСтрока(ТекстЖурнала) Тогда
            ВызватьИсключение "Журнал собственных действий пуст";
        КонецЕсли;
        Чтение = Новый ЧтениеXML;
        Чтение.УстановитьСтроку(ТекстЖурнала);
        Узлов = 0;
        Попытка
            Пока Чтение.Прочитать() Цикл
                Узлов = Узлов + 1;
            КонецЦикла;
        Исключение
            Чтение.Закрыть();
            ВызватьИсключение;
        КонецПопытки;
        Чтение.Закрыть();
        Сообщить(Узлов > 0);
        Сообщить("Журнал прочитан как XML; весь текст не публикуется");
    Исключение
        ОшибкаТеста = ОписаниеОшибки();
    КонецПопытки;
    ОшибкиЗавершения = ЗавершитьСобственныйУчебныйТест(Приложение, ИсходныйЛимит);
    Если Не ПустаяСтрока(ОшибкаТеста) Или Не ПустаяСтрока(ОшибкиЗавершения) Тогда
        ВызватьИсключение "Ошибка учебного UI-теста: " + ОшибкаТеста + " " + ОшибкиЗавершения;
    КонецЕсли;
    Сообщить("Сценарий завершён без исключения. Отдельно сверяйте контрольные Истина и видимые данные учебного клиента");
КонецПроцедуры

&НаКлиенте
Функция ЗавершитьСобственныйУчебныйТест(Приложение, ИсходныйЛимит)
    ОшибкиЗавершения = "";
    Если ТипЗнч(ИсходныйЛимит) = Тип("Число") Тогда
        Попытка
            Приложение.УстановитьМаксимальноеВремяВыполненияДействия(ИсходныйЛимит);
        Исключение
            ОшибкиЗавершения = "Не восстановлен лимит действий: " + ОписаниеОшибки();
        КонецПопытки;
    КонецЕсли;
    Попытка
        Приложение.РазорватьСоединение();
    Исключение
        ОшибкиЗавершения = ОшибкиЗавершения + " Не разорвано соединение: " + ОписаниеОшибки();
    КонецПопытки;
    Возврат ОшибкиЗавершения;
КонецФункции

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

  1. Сначала открываем собственную таблицу в отдельном клиенте тестирования. Подключаемся только к 127.0.0.1:15380, ищем точный заголовок и внутреннее имя таблицы с таймаутами 10 секунд.

  2. Тестируемое приложение должно быть изолированным, без чужой уже начатой записи действий. Здесь записываем только собственную таблицу памяти.

  3. Приостановить останавливает добавление записей, не сам клиент. Переход к последней строке во время паузы выполняется, но его запись не ожидается в журнале.

  4. Продолжить возобновляет запись, Завершить возвращает XML-строку. Прервать используется при ошибке, когда запись всё ещё начата.

  5. Отдельно обрабатываем сбой прерывания, сохраняя описание исходной ошибки. Не выдаём потерю соединения за успешно остановленный журнал.

  6. XML читается стандартным ЧтениеXML без предположений об именах узлов схемы. Количество XML-узлов не равно числу пользовательских действий.

  7. Не выводим весь журнал в сообщения: реальная запись действий может содержать имена, пути и введённые значения. Собственный fixture минимизирует данные, но не заменяет просмотр содержимого.

  8. После теста восстанавливаем исходный лимит действий и отдельно пытаемся разорвать соединение, даже при исключении. Ошибки завершения не скрываем; разрыв соединения не закрывает тестируемое приложение.

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

  1. Непустой журнал успешно читается как XML; контроль Узлов > 0 даёт Истина.

  2. Если нужно проверить паузу, изучите XML вручную только в своей базе и сверяйте записанные переходы, не угадывая теги. После успеха/обработанной ошибки запись не должна оставаться активной.

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

Показан полный жизненный цикл журнала с паузой, продолжением, завершением и аварийным прерыванием.

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

  1. Не путайте этот журнал с журналом регистрации информационной базы.

  2. Не публикуйте XML журнала рабочего приложения без проверки персональных и служебных данных.

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

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

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

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

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