我在主程序里设置错误捕获语句:ON ERRO DO DNBPJER WITH ERROR(),MESSAGE(),MESSAGE(1),LINENO(),PROGRAM()
在DNBPJER.PRG第一行设置了接收语句:PARA E_ERRO,E_MESA,E_MES1,E_LINE,E_PROG。

E_MESA,E_MES1,E_LINE,E_PROG等返回值都正确,唯一E_ERRO返回值却是0。
祈请高手指教,不胜感谢!