引数の説明
TRY,CATCHまたはFINALLY. |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P5764. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 PROCEDURE DIVISION. 000007 TRY 000008 DISPLAY "TRY-BLOCK" 000009 FINALLY 000010 END-TRY 000011 END PROGRAM P5764.
P5764.cob (10) : JMN5764I-W FINALLYブロック中には,文を指定しなければなりません.指定されたとおりに,受け入れます.
詳細な説明
TRY文とそれに付随するCATCHブロックまたはFINALLYブロック内には無条件文を指定する必要があります.
次のどちらかの方法で修正できます.
診断メッセージが出力されたブロックを削除する.
診断メッセージが出力されたブロック内に無条件文(たとえばCONTINUE文)を指定する.