引数の説明
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文)を指定する.