ページの先頭行へ戻る
NetCOBOL for .NET V8.0 メッセージ集
FUJITSU Software

2.2.89 JMN1148I-S

DECLARATIVESに対応するEND DECLARATIVESが指定されていません.
END DECLARATIVESが指定されたものとみなします.

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.     C1148.
      000003 ENVIRONMENT     DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 INPUT-OUTPUT    SECTION.
      000006 FILE-CONTROL.
      000007     SELECT INMSG
      000008       ASSIGN TO INFILE.
      000009 DATA            DIVISION.
      000010 FILE            SECTION.
      000011 FD INMSG.
      000012 01 MSGFORM      PIC X(50).
      000013 PROCEDURE       DIVISION.
      000014 DECLARATIVES.
      000015 IO-ERR         SECTION.
      000016     USE AFTER EXCEPTION PROCEDURE INMSG.
      000017 END PROGRAM C1148.
    

C1148.cob (16) : JMN1148I-S DECLARATIVESに対応するEND DECLARATIVESが指定されていません.END DECLARATIVESが指定されたものとみなします.