1 ERN$
 The ERN$ function returns the name of the main program or subprogram  that
 was executing when the last error occurred.

 Example

 2000   Error_module$ = ERN$

2 Syntax

     str-var = ERN$