Возвращает номер ошибки, запустившей программу ON ERROR.

Синтаксис:

ERROR( )

Результат:
Числовой.

Комментарии:
Функция ERROR( ) возвращает номер самой последней ошибки. Чтобы ERROR( ) возвращала ненулевое значение, должна быть активна программа ON ERROR.
Когда в ходе выполнения программы обнаруживается ошибка, ее тип может быть возвращен функцией ERROR( ) в программе ON ERROR. Соответствующее сообщение об ошибке может быть возвращено функцией MESSAGE( ).
Значение, возвращаемое функцией ERROR( ), сбрасывается командой RETURN или RETRY.
Перечень номеров ошибок и соответствующих сообщений об ошибках приведен в теме Сообщения об ошибках в Техническом справочнике.

Пример:

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

CLEAR
ON ERROR DO errhand WITH ERROR( ), MESSAGE( )

*** The next line generates an error - there is no BRWSE command

BRWSE
ON ERROR
RETURN

*** Error handler ***

PROCEDURE errhand
PARAMETER errnum,message
? Message 
? 'Error number: '+ ALLTRIM(STR(Errnum))
RETURN