NetCOBOL for .NET V7.0 メッセージ集

2.5.231 JMN5780I-S

RESUME文には手続き名を指定しなければなりません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P5780.
      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 EXP1 SECTION.
      000012     USE AFTER EXCEPTION SYSEXP.
      000013     RESUME AT.
      000014 END DECLARATIVES.
      000015 LABEL-1.
      000016     EXIT PROGRAM
      000017 END PROGRAM    P5780.
    

P5780.cob (13) : JMN5780I-S RESUME文には手続き名を指定しなければなりません．

詳細な説明

RESUME文が実行されると，「GO TO 手続き名」が実行されたかのように，RESUME文で指定した手続き名に制御が移ります．