RPG

171. RPG のエラー・モニター機能とは ?

ありそうでなかった RPG のエラー・モニター機能は OS : V5R1M0 から追加されている。
ILE-RPG では MONITOR 命令〜 ENDMON 命令のあいだで ON-ERROR 命令によって
エラー・コードを監視して処理することができる。

-------------------------------------------------------------------------
0001.00 C                   MONITOR                                    
0002.00 C                   ENDMON                                     
0003.00 C                   READ      FILE1                            
0004.00 C                   IF        NOT %EOF                         
0004.01 C                   EXSR      CHECK                            
0005.00 C                   ENDIF                                      
0006.00 C                   ON-ERROR  1211                             
0006.01 C*                     FILE-NOT-OPEN の処理                    
0007.00 C                   END                                        
0008.00 C                   ON-ERROR  *FILE                            
0008.01 C*                     その他のファイル処理エラー              
0009.00 C                   END                                        
0010.00 C                   ON-ERROR  00100 : 00121                    
0010.01 C*                     ストリングおよび配列指標のエラー        
0011.00 C                   END                                        
0012.00 C                   ON-ERROR                                   
0012.01 C*                     その他すべてのエラー                    
0013.00 C                   END                                        
0014.00 C                   ENDMON                                      
-------------------------------------------------------------------------