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

2.4.119 JMN2202I-W

条件変数が集団項目である条件名のVALUE句の定数の長さは,集団項目の項目長以下でなければなりません. 項目と同じ長さだけの定数の先頭部分が有効になります.

例題

[P2202.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2202.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WGRP.
000007 88 OKVAL       VALUE "ABCDE".
000008 88 NGVAL       VALUE "あいう".
000009   02           PIC N.
000010   02           PIC X(3).
000011 PROCEDURE      DIVISION.
000012 END PROGRAM    P2202.

P2202.cob 8: JMN2202I-W 条件変数が集団項目である条件名のVALUE句の定数の長さは,集団項目の項目長以下でなければなりません.項目と同じ長さだけの定数の先頭部分が有効になります.

詳細な説明

条件名記述項(レベル番号が88)のVALUE句で指定した定数長が,条件変数の項目長よりも長くなっています.条件変数の長さ分の定数を条件名の値とみなし,余った定数は切り捨てます.