请教高手，问个RPG编程中MONITOR的问题

richardyang

如果在
MONITOR
    ...call 'xxxxx'
ON-ERROR
    ...
ENDMON
如果是call的这个xxxxx程序中出现了异常，本程序是否能捕捉到并且被ON-ERROR里处理呢？

[ 本帖最后由 richardyang 于 2008-11-14 10:58 编辑 ]

qiao_zq

可以的，建议到谷歌上去搜，英文网站有详细的解释，我觉得你的问题在于rpg这种语言是否提供这种机制的问题
下面是LE的代码，rpg的写法有点区别
D PSDS           SDS                                                
D  STATUS           *STATUS        
C                   SETOFF                                       30                                   
C                   CALL      'AAA'                                 
C                   SETON                                        30  
C     *PSSR         BEGSR                                            
C                   IF        STATUS<> 0                             
C                   SETON                                        LR  
C                   RETURN                                          
C                   ENDIF                                            
C                   ENDSR