PROCNAME()
Purpose
Function to return name of currently executing procedure
Syntax
PROCNAME([<expN>])
See Also
DEBUG, DO, MESSAGE, RESUME, SUSPEND, DOLEVEL(), MESSAGE(), PATH(), PROCLIBS(), PROCLINE(), SYS(), SET DEBUG, SET DOHISTORY, SET ECHO, SET HISTORY
Description
The PROCNAME() function returns the name of the currently executing program or procedure. This function is useful when used with the SET KEY TO command or ON ERROR routines. The PROCNAME() function returns a character string in upper case. If a program is currently being executed, the ".PRG" for program or ".DBO" for compiled program will be returned with the name of the program. Otherwise if a procedure or user defined function (UDF) is being executed, only the name will be returned.
<expN> Specifying the optional <expN> causes PROCNAME() 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_procname = procname() dialog message "The error occurred in the procedure &m_procname."
Products
Recital, Recital Server