+---------------------------------+
|             MESSAGE             |
+---------------------------------+
MESSAGE([1])

-----------------------------------
Returns current error message or contents of line that caused error.
Return value - Character
-----------------------------------

1
        Returns program source code that caused error.  When source code is not
available, the following is returned:

        .       Entire line if line is macro substituted.

        .       Command if line contains command without any additional clauses.

        .       Command followed by ... if line contains command and additional
clauses.

Unlike ERROR(), MESSAGE() is not reset by RETURN or RETRY.

+---------------------------------+
|         Program Example         |
+---------------------------------+
This example illustrates output from MESSAGE() with and without optional
1 argument.

ON ERROR DO Errhand

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

USE Nodatabase

PROCEDURE Errhand
? 'Line of code with error: ' + MESSAGE(1)
? 'Error number: ' + STR(ERROR())
? 'Error message: ' + MESSAGE()

-----------------------------------

See Also:  ERROR(), ON ERROR, SET MESSAGE, SET NOTIFY

-----------------------------------