例題
[P2821.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2821. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 WGRP VALUE SPACE. 000006 02 WELM1 PIC X(2). 000007 02 WELM2 PIC X(2) VALUE "AB". 000008 02 WELM3 PIC X(2). 000009 PROCEDURE DIVISION. 000010 END PROGRAM P2821.
P2821.cob 7: JMN2821I-W VALUE句は，VALUE句を持つ集団項目に従属する項目に指定できません．VALUE句は，無効になります．
詳細な説明
集団項目に対して設定する初期値がVALUE句で指定されているとき，その集団項目に従属する項目に対して，VALUE句によってさらに初期値を設定することはできません．
