例題
[P2337.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2337. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WGRP VALUE LOW-VALUE. 000007 02 WELM1 PIC X(5). 000008 02 WELM2 PIC 9(5) BINARY. 000009 02 WELM3 PIC X(5). 000010 PROCEDURE DIVISION. 000011 END PROGRAM P2337.
P2337.cob 8: JMN2337I-S VALUE句を持つ集団項目に従属する項目のUSAGEは，DISPLAYでなければなりません．USAGE句を有効とみなします．
詳細な説明
集団項目への初期値の設定は，集団項目全体が1つの英数字項目であるかのように設定されるため，用途が表示用(USAGE IS DISPLAY)でない場合は有効な値になりません．
従属項目に指定された用途(USAGE)を有効とみなして処理を続けますが，このときオブジェクトファイルや実行形式は生成されません．
