2.3.372 JMN2603I-S

@1@文は，GLOBAL指定の宣言手続き中に指定できません．

引数の説明

@1@:

EXIT PROGRAM，EXIT METHODまたはGOBACK．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2603.
      000003 ENVIRONMENT    DIVISION.
      000004 INPUT-OUTPUT    SECTION.
      000005 FILE-CONTROL.
      000006     SELECT SQFILE1 ASSIGN TO SYS001.
      000007 DATA           DIVISION.
      000008 FILE            SECTION.
      000009 FD SQFILE1.
      000010 01 SQF1REC.
      000011   02           PIC X(80).
      000012 WORKING-STORAGE SECTION.
      000013 PROCEDURE      DIVISION.
      000014 DECLARATIVES.
      000015 FILE-ERROR-1 SECTION.
      000016     USE GLOBAL AFTER STANDARD ERROR PROCEDURE ON SQFILE1.
      000017     EXIT PROGRAM.
      000018 END DECLARATIVES.
      000019 END PROGRAM    P2603.

P2603.cob (17) : JMN2603I-S EXIT PROGRAM文は，GLOBAL指定の宣言手続き中に指定できません．