Винниченко И.В. Автоматизация процессов тестирования

Подождите немного. Документ загружается.

130 Глава 5. Вспомогательные функции

Seek filenumber^, positions

Функция, устанавливающая позицию чтения/запрюи в файле, где

filenumber^

—

цифра от

до 255, назначаемая файлу; positions

—

но-

вое значение позиции.

Пример. Установка позиции чтения/записи на четвертый символ

с начала:

Seek#l. 4

Line Input filenumber^, varnameS

Данная функция считывает одну строку из указанного файла, где

filenumber^

—

цифра от 1 до 255, назначаемая файлу; varname$

—

пе-

ременная, хранящая прочитанную строку.

Пример. Следующая строка кода считывает одну строку из фай-

ла C:\readme.txt:

Line Input #1, OneString

Print filenumber^. expression!ist

Функция записи одной строки в файл, где filenumber^

—

цифра от 1

до 255, назначаемая файлу; expression!ist

—

переменная, хранящая

выражения для записи в файл.

Пример. Запись одной строки в файл C:\readme.txt:

#1.

" Одна строка "

C!ose

fi!enumber^

Функция, закрывающая файл по окончании работы с ним (запись

и/или чтение), где fi!enumber^ — цифра от 1 до 255, назначенная

файлу в функции Open.

Пример. Следующая строка кода закрывает файл C:\readme.txt,

открытый функцией Open:

C!ose#l

Практический пример 1

Рассматриваемая ситуация: тестирование приложения Pizza Order.

Задача тестирования: проверить, что объект Name класса EditBox су-

ществует, ввести в него значение 1!уа Vinnichenko, вывести сообще-

ние о результатах теста и записать их в файл.

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

131

Тест-скрипт:

Активизировать окно.

Проверить наличие объекта

Name

класса EditBox.

О Если объекта нет, то подождать 10 секунд.

О Если объект не появился, вывести сообщение об ошибке и пе-

рейти к шагу 5, в противном случае перейти к шагу 3.

Щелкнуть мышью на объекте

Name

класса EditBox.

Ввести имя Пуа Vinnichenko.

Вывести сообщение о результатах тестирования и сохранить их

в файл.

WinRunner

# Активизировать окно:

set_window

("Pizza

Ordering

Page"):

# Проверить наличие объекта Name класса EditBox.

# Если объекта нет,

то

подождать

с:

if (obj__exists("name",10) != Е_ОК)

{

# Если объект

не

появился, вывести сообщение

об

ошибке

перейти

к шагу 5,

противном случае перейти

шагу

tl_step("Проверка объекта".-!."Объект Name класса EditBox

не

найден"):

tresult

"Объект

не

найден":

}

else

# Щелкнуть мышью

на

объекте Name класса EditBox:

obj_mouse_click

("name".

217, 34.

LEFT):

# Ввести имя Ilya Vinnichenko:

obj_type

("name"."Пуа

Vinnichenko"):

tresult

"Тест пройден успешно":

}

# Вывести сообщение

результатах тестирования

сохранить

их

файл:

report_msg(tresult):

file__open

("C:\\resuns.txt".

FOJODE__APPEND):

file^printf

("C:\\

results.txt

\"Xs

tresult):

file^close ("C:\\results.txt"):

SilkTest

Обозначить данные:

HFILE OutputFileHandle

STRING tresult

Активизировать окно:

132

Глава

Вспомогательные функции

Pi zzaOrder.SetActi ve()

Проверить наличие объекта Name класса EditBox.

Если объекта нет. то подождать 10

с:

if (Name.Exists()=-FALSE)

Если объект не появился, вывести сообщение об ошибке

перейти

к шагу 5,

противном случае перейти

шагу 3:

LogError

("Объект

Name класса EditBox не найден

tresult

"Объект не найден"

else

Щелкнуть мышью на объекте Name класса EditBox:

Name.Click

О;

Ввести имя Пуа Vinnichenko:

Name.TypeKeys

("Ilya

Vinnichenko")

tresult

"Тест пройден успешно"

Вывести сообщение

результатах тестирования

сохранить их в файл:

print(tresult)

OutputFileHandle

FileOpen

("C:\results.txt

". FM_APPEND)

FileWriteLine (OutputFileHandle, tresult)

FileClose (OutputFileHandle)

Rational Robot

Обозначить данные:

Dim tresult As String

Dim Result As Integer

'Активизировать окно:

Window SetContext, "Caption=PizzaOrder"

Проверить наличие объекта Name класса EditBox.

Если объекта нет, то подождать 10

с:

Result

SQAWaitForObject("Type=EditBox:name=name",10000)

If Result

sqaSuccess Then

Щелкнуть мышью на объекте Name класса EditBox:

EditBox Click, "Name=name", "Coords=91,12"

Ввести имя Ilya Vinnichenko:

InputChars

Ilya Vinnichenko"

tresult

"Тест пройден успешно"

Else

'Если объект не появился, вывести сообщение об ошибке

перейти

к шагу 5,

противном случае перейти

шагу 3:

SQALogMessage sqaFail. " Объект не найден",

tresult

"Объект не найден"

End If

Вывести сообщение

результатах тестирования

сохранить их

файл:

SQALogMessage sqaNone, tresult.

Open "C:\result.txt

For Append As #1

Print #1, tresult

Close #1

Глава 6

Функции работы

с базами данных

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

секрет, что большинство серьезных программных продуктов, имею-

щихся на рынке, так или иначе связаны с базами данных. Каждый

раз,

когда мы имеем дело с большим массивом данных, с почти сто-

процентной уверенностью можно предположить, что «на другом кон-

це» находится реляционная база данных. Стандартная архитектура

большинства современных бизнес-приложений представляет собой

комбинацию Application/Web Server и Database Server. В подобной

ситуации Application/Web Server принимает на себя всю функцио-

нальную нагрузку, а Database Server занимается хранением и обра-

боткой данных. Обмен информацией между серверами выполняется

посредством протокола ODBC (Open Data Base Connectivity) или,

если это Java Application, посредством протокола JDBC Qava Data

Base Connectivity). В обоих случаях в качестве основного инструмен-

та извлечения и последующей обработки данных используется язык

запросов SQL (Structured Query Language).

В этой книге не будем приводить описание SQL. Это очень объем-

ная тема, которой посвящено множество книг. Здесь же определим

требования к программному продукту автоматизации процесса тес-

тирования для работы с протоколами ODBC и JDBC. Сразу следует

отметить, что программное обеспечение для работы с ODBC входит

в стандартную поставку любого из описываемых программных про-

дуктов. При этом модули для работы непосредственно с JDBC, как

в принципе и модули для работы с Java-приложениями являются от-

дельным программным продуктом и поставляются как Add-on (до-

полнительный модуль) к базовому приложению. Исходя из сказан-

ного основной упор в этой главе будет сделан на работу с ODBC.

134 Глава 6. Функции работы с базами данных

Какие же требования можно предъявить к программному продукту

автоматизации процесса тестирования? По сути, требование одно:

ПО должно поддерживать основные API-функции протокола ODBC:

•

ConnectO;

•

DisconnectO;

•

ExecuteO;

•

UpdateO;

•

FetchO;

•

CommitO;

•

RollbackO.

К сожалению,

HPI

один из опргсываемых программных продуктов не

поддерживает все функции этого списка. А например к реализации

функции FetchO у каждой из этих программ имеется собственный

подход.

WinRunner

Mercury Interactive предоставляет пользователю 11 функций работы

с базами данных.

db__connect (session_name, connection^string)

где sessionname

—

имя, присваиваемое данному сеансу связи; соппес-

tion_string

—

параметры связи с базой данных (БД) ODBC.

Функция открывает сеанс связи с БД (функция ConnectO протокола

ODBC).

Пример. Следующая строка кода открывает сеанс связи с БД по

ее DSN-имени и присваивает данному сеансу имя queryl для ис-

пользования в других функциях работы с БД:

db__connect ("queryl",

"DSN=F1

ight32");

db^disconnect (session^name)

где session^name

—

имя, присвоенное данному сеансу связи.

Функция закрывает сеанс связи с БД (функция DisconnectO прото-

кола ODBC).

Пример. Закрытие сеанса связи с базой данных, открытой в пре-

дыдущем примере:

db_disconnect ("queryl");

WinRunner 135

clb_execute_query (session_name, SQL. record_number)

где sessionname

—

имя, присвоенное данному сеансу связи;

SQL —

SQL-

запрос; record_number

—

переменная, хранящая количество строк в воз-

вращаемой таблице.

Функция выполняет SQL-запрос (функция ExecuteO протокола

ODBC).

Пример. Следующая строка кода выполняет запрос, получает

возвращаемую таблицу и количество строк в этой таблице:

db_execute_query ("queryl", "SELECT *

FROM

Orders",record__number):

db_get_row (session^name, row_index, row_content)

где session_name

—

имя, присвоенное данному сеансу связи; row^index

—

порядковый помер строки (О — первая строка); row_content- пере-

менная, хранящая возвращаемую строку.

Функция возвращает строку таблицы, полученную как результат

SQL-запроса, выполненного функцией db_execute_query (частичная

реализация функции FetchO протокола ODBC).

Пример. Следующая строка кода возвращает шестую строку таб-

лицы, полученной в предыдущем примере (значения столбцов

в строке разделены табуляцией):

db_get_row("queryl",5.row_content):

db_get_fiel

devalue

(session_name, row^index, column)

где session_name

—

имя, присвоенное данному сеансу связи; row^index

—

порядковый номер строки (О

—

первая строка); column- порядковый

номер столбца (О ~ первый столбец).

Функция возвращает указанную ячейку (значение поля) таблицы,

полученную как результат SQL-запроса, выполненного функцией

db_execute_query (частичная реализация функции FetchO протокола

ODBC).

Пример. Следующий блок кода возвращает значение ячейки вто-

рого столбца во второй строке таблицы, полученной в примере

использования функции db_execute_query():

val -db^get_field_value ("queryl"."#Г'."#1");

db__get_row(

"queryl",

5, row^content):

db_get_headers (session^name. header_count. header_content)

где sessionname

—

имя, присвоенное данному сеансу связи; header^

count — количество столбцов; headercontent

—

значения столбцов.

136 Глава 6. Функции работы с базами данных

Функция возвращает количество и значения заголовков столбцов таб-

лицы, полученной как результат SQL-запроса, выполненного функ-

1Ц1ей db_execute_query:

Пример. Следующая строка кода возвращает количество и значе-

ния заголовков столбцов таблицы, полученной в примере db_

execute^queryO:

db_get_headers ("queryl",field_num,headers):

db_get_last_error (session_name, error)

где sessionname

—

имя, присвоенное данному сеансу связи; error

—

сообщение об ошибке.

Функция возвращает последнюю ошибку, возникшую при проведе-

нии данного сеанса связи.

Пример. Возвращение последней ошибки, возникшей при прове-

дении сеанса связи queryl:

db_get_1ast_error("queryl".error):

ПРИМЕЧАНИЕ

Упомянутые ранее функции db_check(), db_record_check(), db_

vvTite_rccords()

db_dj_convert() отражают особый подход Win-

Runner

тестированию

баз данных и в данной книге

огшсывать-

ся не будут.

SilkTest

Segue предлагает 17 функций работы с базахми данных. Следует от-

метить, что поскольку SilkTest имеет объектно-ориентированную

архитектуру, его система отладки ошибок базируется на всей мощи

ООП. Так, любая из перечисленных далее функций в случае обна-

ружения ошибки выдает нужное сообщение системы.

hdbc = DB^Connect ("con_string")

где hdbc

—

идентификатор (handle) данного сеанса связи; constring

—

параметры связи с базой данных ODBC формата (DSN=""[:SRVR="":

UID="":PWD=""]);

DSN —

DSN-имя базы данных;

SRVR —

имя сервера БД

(необязательный параметр); UID

—

имя пользователя БД (необяза-

тельный параметр);

PWD —

пароль пользователя БД (необязательный

параметр).

Функция открывает сеанс связи с БД (функция Connect О протокола

ODBC).

Silkiest 137

Пример. Следующая строка кода открывает сеанс связи с базой

данных по ее DSN-имени и генерирует его идентификатор для

использования в других функциях работы с БД:

hdbc = DB_Connect ("DSN= Flight32")

DB_Disconnect (hdbc)

где hdbc

—

идентификатор подключения данного сеанса связи.

Функция закрывает сеанс связи с БД (функция Disconnect О прото-

кола ODBC).

Пример. Закрытие сеанса связи с БД, открытой в предыдущем

примере:

DBDisconnect (hdbc)

hstmnt = DB_Execute$ql (hdbc. "sql_stmnt")

где hstmnt — идентификатор возвращенной таблицы; hdbc — иден-

тификатор подключения (handle) данного сеанса связи; sqlstmnt

—

SQL-запрос.

Функция выполняет SQL-запрос (функция ExecuteO протокола

ODBC).

Пример. Выполнение запроса и получение идентификатора воз-

вращенной таблицы:

hstmnt = DBJxecuteSql (hdbc. " SELECT *

FROM

Orders ")

status = DB_FetchNext (hstmnt, ...)

где status

—

статус возвращаемой строки, FALSE

—

если строк больше

нет; hstmnt

—

идентификатор возвращенной таблицы; ...

—

список

переменных, каждой из которых будет передано значение одного

столбца в возвращаемой строке.

Функция возвращает следующую строку таблицы, полученную как

результат SQL-запроса, выполненного функцией DB_ExecuteSql (час-

тичная реализация функции FetchO протокола ODBC).

Пример. Возвращение следующей строки таблрщы, полученной

в предыдущем примере:

DBFetchNext (hstmnt. order_number. product)

status = DB_FetchPrev (hstmnt. ...)

где status

—

статус возвращаемой строки (FALSE, если строк больше

нет);

hstmnt ~ идентификатор возвращенной таблицы; ...

—

список

переменных, каждой из которых будет передано значение одного

столбца в возвращаемой строке.

138 Глава 6. Функции работы с базами данных

Функция возвращает предыдущую строку таблицы, полученную как

результат SQL-запроса, выполненного функцией DBExecuteSql (час-

тичная реализация функции FetchO протокола ODBC).

Пример. Данная строка кода возвращает следующую строку таб-

лицы, полученной в предыдущем примере:

DB_FetchPrev (hstmnt, order_number, product)

DBFinishSql (hstmnt)

где hstmnt

—

идентификатор возвращенной таблицы.

Функция уничтожает таблицу, полученную как результат SQL-за-

проса, выполненного функцией DB_Execute$q1. Использование этой

функции является обязательным завершением работы с запросом.

Пример. Следующая строка кода закрывает сеанс связи с БД, от-

крытой в предыдущем примере:

DB_FinishSql (hstmnt)

ПРИМЕЧАНИЕ

Упомянутые ранее функции DB_ColumnPrivileges, DB_Columns,

DB_ForeignKeys, DB_GetConnectAttr, DB_PrimaryKcys, DB_

ProcedureColumns, DB_Procedures, DB_SetConnectAttr, DB_

Special Columns, DB_Statistics, DB_TablePrivileges отражают осо-

бый подход SilkTest к тестированию баз даьшых и

данной книге

рассматриваться не будут.

Rational Robot

Rational предлагает пользователю 8 функций работы с базами дан-

ных.

connection = SQLOpen (connectStr$)

где connection — значение, присваиваемое данному сеансу связи;

connectStr$

—

параметры связи с базой данных ODBC.

Функция открывает сеанс связи с БД (функция Connect О протокола

ODBC).

Пример. Следующая строка кода открывает сеанс связи с БД по

ее DSN-имени и присваивает данному сеансу значение, храня-

щееся в переменной connection для использования в других

функциях работы с БД:

connection = SQLOpen("DSN= Flight32")

Rational Robot 139

SQLClose (connection&)

где connection&

—

значение, присвоенное данному сеансу связи SQL-

Open.

Функция закрывает сеанс связи с БД (функция Disconnect О прото-

кола ODBC).

Пример. Закрытие сеанса связи с БД, открытой в предыдущем

примере:

SQLClose(connection)

SQLExecQuery (connections . query$)

где connections

—

значение, присвоенное данному сеансу связи SQL-

Open; queryS

—

SQL-запрос.

Функция выполняет SQL-запрос (функция ExecuteO протокола

ODBC).

Пример. Следующая строка кода выполняет запрос, получает воз-

вращаемую таблицу и количество строк в этой таблице:

SQLExecQuery(connection, "SELECT *

FROM

Orders")

SQLRetri eve

(connections.

destinationO, maxColumns^. maxRows^.

columnNames^. rowNumbers^. fetchFirst^)

где connections

—

значение, присвоенное данному сеансу связи SQL-

Open; destinationO

—

двумерный массив, хранящий возвращаемые

значения; maxColumns^

—

количество возвращаемых столбцов (необя-

зательный параметр); maxRows^ — количество возвращаемых строк

(необязательный параметр); columnNames^

—

флаг возврата имен столб-

цов (1

—

возвращать как первую строку массива,

О —

не возвращать

имена столбцов) (необязательный параметр); rowNumbers^ ~ флаг

возврата номеров строк (1

—

возвращать,

О —

не возвращать номера

строк) (необязательный параметр); fetchFirst^

—

флаг первой стро-

ки (ряда) (1

—

первая строка) (необязательный параметр).

Функция возвращает строку таблицы, полученную как результат

SQL-запроса, выполненного функцией SQLExecQuery (частичная реа-

лизация функции FetchO протокола ODBC).

Пример. Возвращение первой строки таблицы, полученной в пре-

дыдущем примере:

SQLRetrieve(connection:"Connection. destination:-destination. maxRows:-!)

SQLError (destinationO)

где destinationO

—

двумерный массив, хранящий сообщение об

ошибке.