В этой статье попробуем сделать самый простой тест. Например протестируем время проведение документов "Приход".Для этого потребуется обработка "ТЦШаблонТестовойОбработки", входящая в состав конфигурации ТЦ. Путем ее копирования создаем новую обработку, назовем ее например "ТЦСозданиеДокументовПриход".
Добавим реквизиты в обработку:
ДокПриход (ссылка на один из существующих документов типа "Приходная накладная")
КоличествоИтераций (указывает сколько документов нужно создать и провести)
Пауза (в секундах, указываем паузу между документами для более реалистичного поведения системы).
Переходим в модуль формы обработки.
Основными являются следующие функции:
- ТЦИнициализировать — используется для начального заполнения настроек информационной базы, например заполнение учетной политики.
- ТЦВыполнить — основной модуль, в котором прописывается непосредственно сценарий тестирования.
- ТЦУдалитьДанные — модуль, в котором описывается удаление объектов, которые были созданы в процессе тестирования.
В нашем случае нужна только процедура ТЦВыполнить. Она содержит код
#Если ТолстыйКлиентОбычноеПриложение Тогда
// Код обычного приложения
#Иначе
// Код управляемого приложения
#КонецЕсли
// ТЦЗаписатьПоказатель("ВремяВыполнения", ВремяВыполнения);
Возврат ТЦРезультатВыполненияУспешно();
Поскольку мы пишем тестирование для управляемого приложения, то свой код вставим после комментария // Код управляемого приложения.
Инструменты = КипВнешнийКомпонент.ПолучитьИнструменты();
Для Сч=1 по ТЦОбъект.ЧислоИтераций Цикл
Попытка
ВремяНачала = КипВнешнийКомпонент.ЗначениеТаймера(Инструменты);
КипВнешнийКомпонент.Пауза(Инструменты, ТЦОбъект.Пауза*1000);
СоздатьНовыйДок();
ВремяОкончания = КипВнешнийКомпонент.ЗначениеТаймера(Инструменты);
ТЦЗаписатьПоказатель("ВремяПроведенияПоступления", (ВремяОкончания - ВремяНачала- ТЦОбъект.Пауза*1000));
Исключение
ТЦОбщий.ЗаписатьВЖурнал("Ошибка проведения документа "+ ОписаниеОшибки());
КонецПопытки;
КонецЦикла;
Разберем код:
Для фиксации времени проведения операции в существует специальный инструмент, нужно просто запомнить как его вызвать:
Инструменты = КипВнешнийКомпонент.ПолучитьИнструменты();
Далее идет цикл создания и проведения документов.
С помощью команды КипВнешнийКомпонент.ЗначениеТаймера(Инструменты) фиксируем время начала и окончания итерации.
Далее с помощью служебной команды ТЦЗаписатьПоказатель записываем полученную разницу в специальный журнал результатов тестирования. Не забываем отнять паузу.
Если случилась ошибка, то зафиксируем это с помощью командыТЦОбщий.ЗаписатьВЖурнал.
Внутри цикла содержится вызов процедуры СоздатьНовыйДок.
&НаСервере
Процедура СоздатьНовыйДок()
НовыйДокумент = ТЦОбъект.ДокПриход.Скопировать();
НовыйДокумент.Дата = ТекущаяДата();
НовыйДокумент.Записать(РежимЗаписиДокумента.Проведение);
КонецПроцедуры
Остается заполнить необходимые справочники.
- Пользователи
- Обработки
Выбираем тип обработки = "внутренняя" и из списка выбираем созданную обработку.
3. Роли.
Создаем новую роль
Заполняем поле обработка, придумываем название, и переходим к настройке с помощью команды "Настроить".
Заполняем все поля.
4. Включаем агента. Находим пункт меню "Агенты" и жмем "Включить агента". Сразу же отключаем агента. Делаем это для того чтобы автоматически заполнилась информация в справочнике "Компьютеры".
5. Заполняем справочник Клиенты. Клиенты - это комбинация сведений о компьютере и режиме запуска.
6. Добавляем сценарий тестирования в соответствующий справочник.
Все готово к запуску. Включаем агента и давим на кнопку "Выполнить" в справочнике "Сценарии тестирования".
Если обошлись без косяков получим результаты тестирования
посмотреть их можно в справочнике "Результаты тестирования". Если тест завершился с ошибкой то подробную информацию также можно увидеть в этом справочнике.
Если Вам статья понравилась, то приглашаю Вас в группу в контакте (Мне будет приятно что Вы со мной)) ).
Комментариев нет:
Отправить комментарий