返回当前正在执行的程序的名称,或者错误发生时所执行的程序的名称。
语法
PROGRAM([nLevel])
参数
nLevel
指定程序嵌套层次,这个参数值在 0 到程序嵌套深度之间。一个程序可以执行另一个程序,这个程序又可以执行另外一个程序,依次类推,最多可以嵌套 128 层。
如果把 nLevel 指定为 0 或 1,program( ) 函数返回主程序名(最高层程序)。如果 nLevel 超过程序嵌套深度,PROGRAM( ) 返回一个空字符串。
返回值类型
字符型
说明
PROGRAM( ) 有助于程序从错误中恢复,它类似于 SYS(16)。如果不使用参数,PROGRAM( ) 返回当前执行的程序名。