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

2.3.47 JMN2080I-S

集団項目に従属する項目のCHARACTER TYPE句は，その集団項目のCHARACTER TYPE句と同じ指定でなければなりません．
集団項目のCHARACTER TYPE句を有効とみなします．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2080.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 GRP CHARACTER TYPE MODE-1.
      000007   02           PIC N(10).
      000008   02   CHARACTER TYPE MODE-2.
      000009     03         PIC N(10).
      000010 PROCEDURE      DIVISION.
      000011 END PROGRAM    P2080.
    

P2080.cob (8) : JMN2080I-S 集団項目に従属する項目のCHARACTER TYPE句は，その集団項目のCHARACTER TYPE句と同じ指定でなければなりません．集団項目のCHARACTER TYPE句を有効とみなします．

詳細な説明

集団項目およびその集団に従属するデータ項目の両方に，MODE-1，MODE-2，MODE-3あるいは呼び名を指定したCHARACTER TYPE句を記述するときは，両者のCHARACTER TYPE句の指定は同じでなければなりません．

翻訳を続行するために従属項目のCHARACTER TYPE句を有効とみなしますが，このときオブジェクトファイルや実行形式ファイルは生成されません．