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

MESSAGE([1])

Параметры

[1]

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

NoteПримечание

MESSAGE(1) - недоступна в режиме выполнения программы RunTime.

Если исходный программный код является недоступным в настоящий момент, MESSAGE(1) возвращает одно из следующего:

  • Полную программную строку, если в данной строке имеется Макро-Подстановка  (&...).

  • Системную Команду, если не заданы необходимые параметры, опции, секции этой команды.

  • Системную Команду и многоточие (...), если текущая строка программного модуля содержит данную команду и опциональные параметры.

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

Символьного типа (Character). MESSAGE( ) возвращает Сообщение об Ошибке или текст программной строки, в которой произошла ошибка.

Expand imageКомментарии

В отличие от функции ERROR( ), функция MESSAGE( ) не очищается по командам RETURN или RETRY.

Expand imageПример

В следующем далее примере демонстрируется использование функции MESSAGE( ).

  CopyCode imageКопировать Код
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( )

Expand imageСм. также