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

2.3.122 JMN2207I-S

紙テープファイルを除くファイルに指定したCODE-SET句の符号系名は，STANDARD-1，STANDARD-2またはNATIVE指定でなければなりません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2207.
      000003 ENVIRONMENT    DIVISION.
      000004 CONFIGURATION   SECTION.
      000005 SPECIAL-NAMES.
      000006     ALPHABET CD1 IS CODE-1.
      000007 INPUT-OUTPUT    SECTION.
      000008 FILE-CONTROL.
      000009     SELECT SQFILE1 ASSIGN TO SYS001.
      000010 DATA           DIVISION.
      000011 FILE            SECTION.
      000012 FD SQFILE1 CODE-SET CD1.
      000013 01 SQF1REC.
      000014   02           PIC X(80).
      000015 WORKING-STORAGE SECTION.
      000016 PROCEDURE      DIVISION.
      000017 END PROGRAM    P2207.
    

P2207.cob (12) : JMN2207I-S 紙テープファイルを除くファイルに指定したCODE-SET句の符号系名は，STANDARD-1，STANDARD-2またはNATIVE指定でなければなりません．

詳細な説明

このコンパイラでは，CODE-SET句は注釈とみなされます．