Горев А., Макашарипов С., Ахаян Р. Эффективная работа с СУБД

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

• Open - открытие программы.

• Cancel - прерывание работы программы.

• Line Numbers - нумерация программных строк.

• Clear Breakpoints - удаление точек останова.

• Trace Between Breaks - управление режимом просмотра команд в окне Trace.

• Throttle - установка задержки времени выполнения команд в программе.

Для наблюдения за выполнением программы с помощью окна Trace необходимы следующие

действия:

1. Выполните команду Trace Window из меню Tools.

2. Откройте требуемую программу с помощью команды Open меню Program окна Trace.

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

помощью команды Throttle этого же меню. Время задержки придется подобрать опытным

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

компьютера.

4. Запустите программу на выполнение, выбрав меню Do окна Trace.

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

кода, вы можете выбрать на четвертом этапе пошаговое выполнение программы, щелкнув на

меню Step! окна Trace. В этом случае следующая строка программы будет выполняться только

после очередного щелчка на этом меню.

В этом режиме выбор меню Out! позволяет отменить пошаговый режим и продолжить

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

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

завершится выполнение текущей программы.

Пpеpвать выполнение пpогpаммы можно нажатием клавиши Esc. Если необходимо

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

от нужной строки. Слева от стpоки появится отметка в виде точки. Каждый pаз пpи достижении

этого места выполнение пpогpаммы будет пpиостанавливаться, что позволит пpосмотpеть

содержимое таблиц, значений всех вpеменных пеpеменных и выполнить дpугие действия,

связанные с контpолем состояния сpеды, а затем пpодолжить (Resume) или пpеpвать работу

программы (Cancel). Отменить пpиостановку можно повтоpением указанных действий.

Расширить возможности трассировки позволяет установка

SET DEBUG ON | off

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

приостановки выполнения программы во вpемя ее pаботы (команда Debug Windows в меню

Tools). Hабеpите идентификатоpы вpеменных пеpеменных, элементов массива, стандаpтных

функций или полей таблиц в левой части окна отладки, после набоpа каждого идентификатоpа

нажимайте клавишу Enter. Пpи выполнении пpогpаммы значения этих выpажений будут

выводиться в пpавой части окна.

В окне отладки можно устанавливать контpольные точки для пpиостановки pаботы пpогpаммы

пpи смене значений, указанных в левой части выpажений. Hажмите клавишу пробела или кнопку

мыши напpотив нужного выpажения в колонке, котоpая pазделяет левую и пpавую части окна:

появится отметка в виде точки, снять отметку можно, повтоpив указанные действия.

Если вы хотите просматривать написанный вами код событий и методов при работе формы, то

нам потребуется использовать окна Trace и Debug совместно, как это показано на рис. 12.2. Для

этого выполните следующие действия:

converted to PDF by HupBaH9I

Рис. 12.2.

1. Откройте окно Debug.

2. Наберите в его левой части строку типа PROGRAM()="MOUSEMOVE", в которой

необходимо указать имя события или метода, код которого вас интересует. Установите на

разделительной линейке точку останова.

3. Откройте окно Trace.

4. С помощью меню Do окна Trace запустите нужную форму.

5. При выполнении события MouseMove окно Trace будет активизироваться и вы сможете

просматривать код или задавать его пошаговое выполнение.

Эффективность отладки в Visual FoxPro, особенно в период опытной эксплуатации программы,

могут повысить следующие команды.

SET ALTERNATE TO [FileName [ADDITIVE]]

Создает на диске текстовый файл с именем FileName (по умолчанию pасшиpение TXT), в

котоpом дублиpуются pезультаты выполнения всех команд, кpоме полноэкpанных, что позволяет

контpолиpовать пpоцесс pаботы пpогpаммы даже без пpисутствия pазpаботчика (в пеpиод

опытной эксплуатации) и опpеделять пpичины сбоя или непpавильных действий опеpатоpа.

Конечно, эта пpоцедуpа тpебует достаточного дискового пpостpанства и несколько замедляет

pаботу пpогpаммы. Без паpаметpов команда закpывает текущий альтеpнативный файл. С опцией

ADDITIVE добавляет данные в файл, в пpотивном случае его содеpжимое пеpезаписывается.

SET ALTERNATE on | OFF

Включает (ON) или выключает (OFF) pежим записи данных в альтеpнативный файл.

ON ERROR [Command]

Устанавливает режим ожидания для ошибочных ситуаций во время работы программы. В

случае возникновения ошибки выполняется указанная команда. Как правило, это команда

запуска специальной процедуры обработки ошибок.

Без аргумента команда восстанавливает режим обработки ошибочных ситуаций Visual FoxPro.

При возникновении ошибки Visual FoxPro приостанавливает работу программы и при наличии

исходного кода выводит на экран окно Trace, в котором строка кода, вызвавшего ошибку,

выделена. Очевидно, что даже в отлично отлаженной программе могут возникать ошибочные

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

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

основу которого и будет составлять команда ON ERROR. Пример такой программы мы приведем в

конце этого параграфа, а логика, которая должна быть заложена в блок обработки ошибок,

демонстрируется на рис. 12.3.

converted to PDF by HupBaH9I

Рис. 12.3.

В Visual FoxPro мы можем расширить возможности обработки ошибок за счет использования

локальной идентификации каких-либо специфических ошибок, возникающих при выполнении

тех или иных действий. Например, в форме мы можем обработать ошибочные ситуации,

возникающие при выполнении каких-либо методов, без обращения к установке ON ERROR, то

есть внутри формы. Для этого можно использовать событие Error.

PROCEDURE Object.Error

LPARAMETERS [nIndex,] nError, cMethod, nLine

Параметр nIndex позволяет сослаться на элемент управления по его номеру в массиве

элементов управления объекта-контейнера (формы). Параметр nError содержит номер ошибки

Visual FoxPro, cMethod - имя метода, который вызвал ошибку, nLine - номер строки внутри метода

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

В то же время, если при обработке ошибки в процедуре обработки события Error возникнет

еще одна ошибка, Visual FoxPro вызовет обработчик, указанный в установке ON ERROR, или,

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

Например, мы можем в событие Error формы записать код, который будет выполняться, если

невозможно открыть связанные с формой таблицы, так как администратор БД проводит

переиндексацию файлов:

LPARAMETERS nError, cMethod, nLine

* Ошибка "File in use by another"

IF nError = 108

=MESSAGEBOX("Данные не доступны! " + ;

"Попробуйте открыть форму позднее.")

ELSE

* В случае другой ошибки вызываем общую процедуру

* обработки ошибок, установленную в главной программе

DO proc_error

ENDIF

Если вы определяете локальную процедуру обработки ошибок для класса, то при

использовании в пользовательском приложении объектов, основанных на этом классе, заданная

процедура будет автоматически в нем задействована. Причем эта процедура обработки ошибок

будет автоматически наследоваться в подклассах, основанных на этом классе. Следует иметь в

виду, что если вы используете в форме какие-либо элементы управления, для которых в событии

Error обработка ошибок не предусмотрена, то событие Error для формы вызвано не будет. В этом

плане использование установки ON ERROR более универсально, так как она будет обработана

не зависимо от места возникновения ошибки.

converted to PDF by HupBaH9I

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

ситуацию с помощью команды

ERROR nErrorNumber | nErrorNumber, cMessageText1

[cMessageText2]

которая генерирует ошибку Visual FoxPro. Параметр nErrorNumber определяет номер ошибки,

который используется для воспроизведения стандартного сообщения Visual FoxPro. Параметр

cMessageText1 задает текст, появляющийся в сообщении об ошибке, который может содержать

дополнительную информацию. Например, если вы ссылаетесь на переменную, которой не

существует, Visual FoxPro может вывести имя этой переменной в сообщении об ошибке. Параметр

cMessageText2 определяет текст, отображаемый в сообщении об ошибке. Когда вместо параметра

nErrorNumber в команде задается параметр cMessageText2, будет сгенерирована ошибка Visual

FoxPro с номером 1098 (определяемая пользователем ошибка). Чтобы переместить часть

сообщения об ошибке на следующую строку, используйте в cMessageText2 символ возврата

каретки CHR(13).

Команда ERROR может использоваться помимо проверки программы обработки ошибок для

того, чтобы показать особые сообщения об ошибках. Если действует установка ON ERROR, то

при выполнении команды ERROR Visual FoxPro выполняет процедуру обработки ошибок,

определяемую в установке ON ERROR. Если происходит ошибка для объекта, будет выполнено

событие Error для этого объекта.

Если вы задаете команду ERROR из окна Command и установка ON ERROR не действует,

Visual FoxPro показывает сообщение об ошибке. Если команда ERROR выдана в программе и

установка ON ERROR также не действует, Visual FoxPro выводит сообщение об ошибке и

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

Например, чтобы задать появление ошибки Visual FoxPro номер 12, напишем следующую

команду в требуемом месте программы:

ERROR 12

Появится сообщение об ошибке "Variable not found" ("Переменная не найдена"). Если задать

эту команду в следующем виде:

ERROR 12, `nVar1'

появится сообщение об ошибке "Variable `nVar1' not found" ("Переменная `nVar1' не

найдена").

Для получения более обширной информации при отладке пpогpаммы можно использовать

следующие функции.

AERROR(ArrayName)

Создает массив, содержащий информацию относительно самой последней ошибки Visual

FoxPro, OLE или ODBC. Параметр ArrayName определяет имя создаваемого массива. Функция

AERROR() создает массив с шестью столбцами и возвращает число строк в массиве, которое

определяется типом ошибки. Следующий список описывает содержание каждого элемента

массива:

Номер

элемента

Описание

1 Числовой. Содержит номер ошибки.

Идентичен значению, возвращаемому

функцией ERROR().

2 Символьный. Текст сообщения об

ошибке. Идентичен значению,

возвращаемому функцией MESSAGE().

3 Значение NULL. Если ошибка имеет

дополнительный параметр, содержит

текст параметра ошибки. Идентичен

значению, возвращаемому функцией

SYS(2018).

4 Значение NULL. Однако, как и в

converted to PDF by HupBaH9I

предыдущем случае, может содержать

номер рабочей области, в которой

произошла ошибка.

5 Значение NULL. Если триггер не смог

выполниться (ошибка 1539), будет

содержать одно из следующих числовых

значений:

1 - триггер вставки потерпел неудачу;

2 - триггер модернизации потерпел

неудачу;

3 - триггер удаления потерпел неудачу.

6 Значение NULL

7 Значение NULL.

В следующем списке описано содержимое каждого элемента создаваемого массива, когда

происходят ошибки OLE с номерами 1427 или 1429:

Номер

элемента

Описание

1 Числовой. Содержит код ошибки 1427

или 1429.

2 Символьный. Текст FoxPro сообщения об

ошибке.

3 Символьный. Текст OLE сообщения об

ошибке.

4 Символьный. Имя прикладной программы

(например, Microsoft Excel).

5 Значение NULL или Символьный. В

последнем случае содержит имя

справочного файла, где может быть

найдена более подробная информация

относительно ошибки.

6 Значение NULL или Символьный. В

последнем случае содержит

идентификатор для соответствующей

темы оперативной подсказки, если

информация доступна из приложения.

7 Числовой. Номер ошибки OLE.

Ниже приводится описание содержимого каждого элемента массива, когда происходит ошибка

ODBC с номером 1526 (ошибка соединения ODBC). Массив может содержать две или больше

строки - по одной для каждой ошибки ODBC:

Номер

элемента

Описание

1 Числовой. Содержит номер ошибки

1526.

2 Символьный. Текст сообщения об

ошибке.

3 Символьный. Текст ODBC сообщения

об ошибке.

4 Символьный. Текущее состояние

ODBC SQL.

5 Числовой. Номер ошибки ODBC

источника данных.

6 Числовой. Указатель соединения

ODBC.

7 Значение NULL.

ERROR()

Возвpащает номеp ошибки, котоpая пpоизошла пpи выполнении пpогpаммы, если действует

команда ON ERROR.

LINENO([1])

converted to PDF by HupBaH9I

Возвpащает номеp стpоки пpогpаммы относительно первой строки главной программы, в

котоpой пpоизошла ошибка. Если вы указываете параметр 1, то номер строки вычисляется

относительно первой строки текущей программы или процедуры.

Счетчик строк в программе учитывает все строки, включая комментарии и пустые строки. Вы

всегда можете задать приостановку выполнения программы, если откроете окно Debug на время

выполнения программы и в его левой части запишете, например, LINENO(1) = 100. После этого

не забудьте на разделительной линии окна Debug поставить точку останова.

MESSAGE([1])

Возвpащает сообщение об ошибке, с помощью опции 1 можно вывести последнюю

пpогpаммную стpоку, пpи выполнении котоpой пpоизошла ошибка. Для pаботы функции

необходимо установить ON ERROR.

PROGRAM([nLevel])

Возвpащает название пpогpаммы, во вpемя pаботы котоpой пpоизошла ошибка. Численный

аpгумент опpеделяет уpовень вложенности пpогpамм, чьи имена необходимо запомнить, если

nLevel = 1, то возвpащается имя только пеpвой исполнявшейся пpогpаммы (главной), если

аpгумент не указан, возвpащается имя текущей пpогpаммы.

Работу описанных выше функций можно пpоиллюстpиpовать следующим пpостым пpимеpом:

ON ERROR DO proc_error WITH;

ERROR(),MESSAGE(),MESSAGE(1),PROGRAM(),LINENO()

. . .

RETURN

PROCEDURE proc_error

LPARAMETER nError, cMess, cMess1, cProg, nLineno

? "Hомер ошибки: " + LTRIM(STR(nError))

? "Сообщение об ошибке: " + cMess

? "Текст строки, вызвавшей ошибку: " + cMess1

? "Hомер строки с ошибкой: " + LTRIM(STR(nLineno))

? "Ошибка пpоизошла в пpогpамме: " + cProg

RETURN

Отладка программы в Access

Четыре из наиболее часто используемых функций отладки доступны через панель

инструментов Access. Их описание приведено в табл. 12.1. На рис. 12.4 представлена панель

инструментов для выполнения отладки и приведено описание ее кнопок.

Рис. 12.4. Наиболее часто используемые функции отладки в Access

Таблица 12.1. Инструментальные функции отладки в Access

Кнопка

отладки

Выполняемое

действие

Соответствующая

горячая клавиша

converted to PDF by HupBaH9I

Установка

точки

останова

Создает или

уничтожает точку

останова. Точка

останова

Шаг с

заходом в

процедуру

В окне просмотра

кода при вызове

другой процедуры

вы видите ее код

Шаг без

захода в

процедуру

В окне просмотра

кода при вызове

другой процедуры

вы не видите ее

кода

Shift+8

Сброс Прекращает работу

процедуры

Состояние прерывания приостанавливает работу программы и дает вам картину состояния на

текущий момент исполнения программы.

СУБД Access попадает в состояние прерывания, когда происходит одно из следующих событий:

• Программа достигает строчки с точкой останова.

• Исполняемый код достигает строчки с выражением Stop.

• Выражение в строке кода генерирует неперехватываемую ошибку.

Как только Access встречается с одним из вышеприведенных условий, исполняемый код

приостанавливается. Появляется окно отладки. При этом вы можете воспользоваться панелью

инструментов Access, но не можете переключиться в другие части вашего приложения.

В состоянии прерывания значения переменных и свойств сохраняются, таким образом, вы

можете:

• просматривать значения переменных, свойств и выражений;

• изменять значения переменных и свойств.

В окне отладки вы можете просматривать значения выражений и переменных в процессе

перемещения между выражениями в вашем коде. Помимо этого вы можете использовать окно

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

повлияют на работу вашего кода.

Окно отладки выводит информацию, которая является результатом выполнения кода либо

выражений, которые вы набираете непосредственно в окне. Например, при отладке или

экспериментах с кодом у вас может появиться желание протестировать процедуру, получить

значения выражений или присвоить новые значения переменным и свойствам. Все это можно

сделать в окне отладки. При этом надо помнить о том, что видимость переменных,

переназначенных в окне отладки, ограничена только текущей процедурой.

Вывод данных в окне отладки можно легко осуществить с помощью символа вопросительного

знака, который здесь вполне успешно заменяет метод Print (рис. 12.5). Вопросительный знак

означает совершенно то же самое, что и Print, и может использоваться в любом контексте, в

котором может использоваться метод Print.

converted to PDF by HupBaH9I

Рис. 12.5.

Внутри вашего кода вы можете использовать метод Print объекта Debug, для того чтобы

послать вывод в окно отладки. Этот способ позволяет вам создать историю значений переменной

или свойства в процессе выполнения в окне отладки. Когда приложение приостановится или

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

значение выведет в окно отладки значение переменной myvar:

Debug.Print "Значение переменной равно =" & myvar

Эта техника хорошо помогает, когда имеется место в программе, где переменная (в нашем

случае myvar) изменяется. Например, вы можете использовать выражение, которое меняет

значение переменной vyvar, в цикле.

Вы можете работать с диалоговым окном Вызовы (Calls), приведенном на рис. 12.6, для

исследования последовательности действий приложения в случаях, если оно состоит из цепочки

вложенных вызовов процедур.

Рис. 12.6. Диалоговое окно Вызовы

Для того чтобы вызвать диалоговое окно Вызовы, необходимо:

• Приостановить выполнения кода. Вы можете вывести диалоговое окно Вызовы, только

когда выполнение кода приостановлено.

• Щелкнуть на кнопке Вызовы в панели инструментов.

Например, процедура события может вызвать вторую процедуру, которая, в свою очередь,

вызывает третью - и все это до того, как процедура события, вызвавшая эту цепочку,

завершилась.

Диалоговое окно Вызовы выводит список всех активных процедур в серии вложенных вызовов

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

расположена. В информацию о каждой процедуре входит название модуля, включающего

процедуру, за которым следует имя вызываемой процедуры.

converted to PDF by HupBaH9I

Одна из главных задач, которая стоит перед программистом, создающим профессиональное

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

малопонятного сообщения об ошибке.

Источник ошибок времени выполнения не всегда очевиден, часто требуется потратить много

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

при нормальных условиях, оно может вывести сообщение об ошибке, если будет введено

значение не того типа, которое требует какое-либо из полей ввода.

Ошибки времени выполнения происходят тогда, когда Access получает команду, которую он не

может выполнить, такую, как, например, деление на ноль. Когда Access наталкивается на ошибку

времени выполнения, программа останавливается и выводится диалоговое окно с сообщением,

описывающем ошибку.

В это время вы можете:

• Остановить выполнение программы.

• Продолжить выполнение, если вы разрешите проблемы в окне отладки.

• Просмотреть окно отладки, где в это время вы можете увидеть выделенной строчку,

которая привела к ошибке.

• Перейти прямо к строчке, которая вызвала ошибку.

• Вызвать Справку по данной ошибке.

Для чего перехватывать ошибки времени выполнения? Перехватывая ошибки времени

выполнения, вы делаете приложение более устойчивыми по отношению к типичным ошибкам, с

которыми оно может встретиться.

При этом:

• Создаются устойчивые приложения. Приложение, которое перехватывает ошибки

времени выполнения, может справиться со многими поль-зовательскими ошибками без

остановки приложения. Сделав приложение устойчивым по отношению к часто

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

работы.

• Если приложению все же не удается обработать сложившуюся ошибочную ситуацию,

ваше приложение может тем не менее аккуратно закрыть все открытые файлы и тем

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

Большая часть обработчиков ошибок имеет общую схему. Когда Access сталкивается с

ошибкой времени выполнения, он ищет выражение On Error Goto <<выражение>>. Если он

его находит, ошибка обрабатывается и выполнение продолжается либо с того же выражения, на

котором оно остановилось, либо с какого-нибудь другого.

Если Access не может найти выражение On Error Goto, выполнение процедуры

приостанавливается и Access выводит сообщение об ошибке времени выполнения, которое может

в какой-то степени удивить ваших пользователей.

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

приведено в табл. 12.2.

Таблица 12.2. Основные программные функции отладки в Access

Выражение

или функция

Описание

On Error Goto Подключает обработчик ошибок и

указывает расположение обработчика

внутри процедуры. Может также

использоваться для отключения

обработчика ошибок

Err

(Выражение)

Устанавливает свойство Err в

указанное значение

Err (Функция)

Возвращает статус ошибки

Error

(Выражение)

Воспроизводит ошибку

Error

(Функция)

Возвращает сообщение об ошибке,

соответствующее указанному номеру

Resume Продолжает выполнение с

выражения, которое вызвало ошибку,

после того как обработчик ошибок

converted to PDF by HupBaH9I

отработал

Resume Next Продолжает выполнение со строки,

следующей за строкой, которая

вызвала ошибку, после того как

обработчик ошибок отработал

Resume Строка

Продолжает выполнение с указанной

строки и метки после обработки

ошибки

Существуют три действия, которые можно применить к большинству обработчиков ошибок:

• Установка перехватчика ошибок. Каждая процедура или функция, которая поддерживает

перехват ошибок, должна включать выражение On Error, которое указывает Access, где

искать инструкции по обработке ошибок. Хотя команда On Error должна указывать на

метку или строку внутри той же самой процедуры, выражение после метки может

вызывать другую процедуру.

• Оформление обработчика ошибок. Обработчик ошибок обычно состоит из выражения

Select Case (или похожего выражения для принятия решений), которое различает

разные значения свойства Err и способ их обработки.

• Выход из обработчика. Используйте одно из выражений Resume для указания выхода из

процедуры, если ошибка приводит к тупиковой ситуации, или для продолжения

выполнения программы.

Для отключения обработчика ошибок вставьте следующее выражение в код вашей процедуры:

On Error Goto 0

Когда Access наталкивается на ошибку времени выполнения, он ищет неактивный обработчик

ошибок в следующей последовательности:

1. Текущая процедура.

2. Процедуры, перечисленные в списке Вызовы (начиная с самой последней вызываемой

процедуры).

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

выводит диалоговое окно ошибки времени выполнения.

Обработка ошибок процессора баз данных в Access

Ошибки, связанные с работой процессора баз данных, вызывают событие Error. Это относится

к ошибкам процессора баз данных Microsoft Jet, но не к ошибкам времени выполнения Access.

Выполняя процедуру события или макроса при возникновения события Error, вы можете

предотвратить вывод сообщения об ошибке Microsoft Access и вывести пользовательское

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

приложения.

Свойство OnError используется для того, чтобы указать макрос или процедуру Access, которая

будет выполняться при возникновении события Error. Устанавливайте это свойство тем же путем,

которым вы устанавливаете остальные свойства.

Например, синтаксис для процедуры события Error формы должен иметь следующую

конструкцию:

Sub Form_Error(DataErr As Integer, Response As Integer)

Аргумент DataErr является кодом ошибки, возвращаемым функцией Err при возникновении

ошибки. Вы можете использовать аргумент DataErr вместе с функцией Error$, чтобы соотнести

номер ошибки с соответствующим сообщением об ошибке. Аргумент Response определяет, будет

ли выводиться сообщение об ошибке. Для задания значения этого аргумента можно использовать

одну из следующих констант:

• DATA_ERRCONTINUE - это значение приводит к игнорированию ошибки, и код

продолжается без вывода сообщения об ошибке. Вы можете добавить свое собственное

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

converted to PDF by HupBaH9I