2.5.213 JMN5761I-S

@1@文は，@2@文を含むソース単位中では使用できません．
書かれたとおりに受け入れます．

引数の説明

@1@:

TRYまたはUSE AFTER EXCEPTION．

@2@:

USE AFTER EXCEPTIONまたはTRY．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P5761.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 REPOSITORY.
      000006     CLASS SYSEXP AS "System.Exception".
      000007 DATA           DIVISION.
      000008 WORKING-STORAGE SECTION.
      000009 PROCEDURE      DIVISION.
      000010 DECLARATIVES.
      000011 ERR SECTION.
      000012     USE AFTER EXCEPTION SYSEXP.
      000013 END DECLARATIVES.
      000014     TRY
      000015       DISPLAY "TRY-BLOCK"
      000016     FINALLY
      000017       DISPLAY "FINALLY-BLOCK"
      000018     END-TRY
      000019 END PROGRAM    P5761.

P5761.cob (14) : JMN5761I-S TRY文は，USE AFTER EXCEPTION文を含むソース単位中では使用できません．書かれたとおりに受け入れます．

詳細な説明

TRY文とUSE AFTER EXCEPTION文はどちらも例外オブジェクトに対する例外処理を記述します．

ただし，例外処理終了後のふるまいが異なるため，TRY文とUSE AFTER EXCEPTION文を同一プログラムまたは同一メソッド内に記述することはできません．

どちらか一方の文のみを使用するように修正してください．