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

Синтаксис:

MESSAGE([1])

Параметры:
1
Если функция MESSAGE( ) используется в подпрограмме ON ERROR, то, задав этот аргумент, вы получите исходный код программы, вызвавший ошибку. Если исходный код программы отсутствует, MESSAGE(1) возвращает одно из следующих значений:

• Всю строку программы, если в ней используется макроподстановка.
  
• Команду, если строка содержит команду без каких-либо предложений.
  
• Команду с тремя точками (...), если строка содержит команду с предложениями.

Результат:
Символьный.

Комментарии:
В отличие от ERROR( ), функция MESSAGE( ) не сбрасывается командами RETURN или RETRY.

Пример:

* В следующем примере на экране отображается вывод функций
* MESSAGE( ) и MESSAGE(1).

ON ERROR DO Errhand

*** The next line should generate an error ***

USE Nodatabase
ON ERROR	  && restore system error handler
PROCEDURE Errhand
? 'Line of code with error: ' + MESSAGE(1) 
? 'Error number: ' + STR(ERROR( ))
? 'Error message: ' + MESSAGE( )