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

2.3.337 JMN2556I-S

USE文は，宣言部分以外に指定できません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2556.
      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 01 WFS1        PIC X(2).
      000014 PROCEDURE      DIVISION.
      000015 E-PROC SECTION. USE AFTER ERROR PROCEDURE ON SQFILE1.
      000016     DISPLAY "OK".
      000017 END PROGRAM    P2556.
    

P2556.cob (15) : JMN2556I-S USE文は，宣言部分以外に指定できません．

詳細な説明

宣言部分とは，DECLARATIVESで始まり，END DECLARATIVESで終わる，手続き部内の記述です．