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

2.3.117 JMN2200I-W

集団項目に指定したVALUE句の定数の長さは，その項目長以下でなければなりません．
項目と同じ長さだけの定数の先頭部分が有効になります．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2200.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01 WGRP VALUE "あいう".
      000007   02           PIC N.
      000008   02           PIC X(3).
      000009 PROCEDURE      DIVISION.
      000010 END PROGRAM    P2200.
    

P2200.cob (6) : JMN2200I-W 集団項目に指定したVALUE句の定数の長さは，その項目長以下でなければなりません．項目と同じ長さだけの定数の先頭部分が有効になります．