引数の説明
EXIT PROGRAM,EXIT METHOD,EXIT PERFORM,GO TO,そとPERFORMまたはSTOPの語. |
TRY,CATCHまたはFINALLYの語. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P5768.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 PROCEDURE DIVISION.
000007 TRY
000008 GO TO L1
000009 CATCH
000010 GO TO L1
000011 FINALLY
000012 GO TO L1
000013 END-TRY.
000014 L1.
000015 EXIT PROGRAM
000016 END PROGRAM P5768.
P5768.cob (12) : JMN5768I-S GO TO文は,TRY文のFINALLYブロックには指定できません.
詳細な説明
TRYブロック,CATCHブロックまたはFINALLYブロック内に記述できない文を指定した場合に,この診断メッセージが出力されます.
記述できない文は次の通りです.
TRYブロックおよびCATCHブロックの場合
そとPERFORM文
INPUT PROCEDURE指定またはOUTPUT PROCEDURE指定を持つSORT文およびMERGE文
メソッド定義のファイル節に定義された,LINAGE句指定のファイルを操作する入出力文
FINALLYブロック
GO TO文
EXIT PROGRAM文またはEXIT METHOD文
EXIT TRY文
STOP RUN文
EXIT PERFORM文