PROGRAM()
From Lianjapedia
Contents
Purpose
Function to return the currently executing program name
Syntax
PROGRAM([<expN>])
See Also
DO, FUNCTION, PROCEDURE, DOLEVEL(), LINENO(), PATH(), PROCLIBS(), PROCLINE(), PROCNAME(), SYS()
Description
The PROGRAM() function returns the name of the currently executing program or procedure. The name is returned as a character string in upper case without path or file extension.
<expN> Specifying the optional <expN> causes PROGRAM() to return the name of the procedure or program at the <expN> level. If there is no program or procedure at the specified level, an empty string is returned. The name of the master or starting program is returned if <expN> is 0 or 1.
Example
m_program = program() messagebox("The error occurred in the program; &m_program.")