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

2.3.403 JMN2663I-S

有効なWHENEVER文の名標'@1@'は，手続き名でなければなりません．
GO TO手続き名指定をCONTINUE指定とみなします．

引数の説明

@1@:

エラーの原因となった利用者語．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2663.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
      000007 01 SQLSTATE    PIC X(5).
      000008     EXEC SQL END   DECLARE SECTION END-EXEC.
      000009 01 PROC-NAME   PIC X(8).
      000010 PROCEDURE      DIVISION.
      000011     EXEC SQL
      000012       WHENEVER SQLERROR GO TO :PROC-NAME
      000013     END-EXEC.
      000014*
      000015     EXEC SQL
      000016       DECLARE CUR1 CURSOR FOR
      000017         SELECT *
      000018     END-EXEC
      000019*
      000020     EXEC SQL
      000021       OPEN CUR1
      000022     END-EXEC
      000023 END PROGRAM    P2663.
    

P2663.cob (21) : JMN2663I-S 有効なWHENEVER文の名標'PROC-NAME'は，手続き名でなければなりません．GO TO手続き名指定をCONTINUE指定とみなします．