用PROGRAM（）只能返回       ，就是要得到是那个调用文件名出错了。
SYS(16) 只能得到一开始调用的名。
比如我调用了N个表单，然后在当前表单执行一个按钮，出错了，调用出错程序。就要取得这个出错按钮所在的文件名。
用PROGRAM（）只能返回 。这个FORM1对等的DOS文件名是什么？

SYS(16) 返回的是 PROCEDURE   SYS(16，1) 返回的是 主程序的名。期间调用了好多表单

我可能说错了。我试了很多，返回的都是主程序名。ASTACKINFO()，也是返回主程序名。应该返回当前 表单 的名称。是表单名称。比如按钮出错，要返回是那一张表单的表单名。才知道是哪一张表单有问题。

已OK