Возвращает номер ошибки для ошибки, которая вызвала процедуру ON ERROR. 

ERROR( )

Возвращаемое значение

Числовое

Замечания

ERROR( ) возвращает номер самой последней ошибки. Процедура ON ERROR должна быть активизирована для ERROR( ), чтобы возвратилось значение отличное от 0.

Когда в течение выполнения программы обнаружена ошибка, тип ошибки может быть возвращен 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

См. Также