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

2.3.136 JMN2226I-S

CHARACTER TYPE句は，レベル番号01または77を除くREDEFINES句を持つ項目およびそれに従属する項目に指定できません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2226.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WGRP.
      000007   02 WGRP2.
      000008     03         PIC N(10)
      000009                CHARACTER TYPE MODE-2.
      000010   02 WGRP3 REDEFINES WGRP2.
      000011     03         PIC N(10)
      000012                CHARACTER TYPE MODE-1.
      000013 PROCEDURE      DIVISION.
      000014 END PROGRAM    P2226.
    

P2226.cob (12) : JMN2226I-S CHARACTER TYPE句は，レベル番号01または77を除くREDEFINES句を持つ項目およびそれに従属する項目に指定できません．

詳細な説明

CHARACTER TYPE句は印字するときの文字の形式を指定します．同句を持つデータ項目がREDEFINES句によって再定義されると，COBOL処理系が印字のための情報を正しく取得できなくなります．

ただしレベル番号01または77の項目間での再定義は例外で，この場合は印字のための情報を正しく取得できます．