例題
[P2966.cob] 000001 PROGRAM-ID. P2966. 000002 ENVIRONMENT DIVISION. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 WD1 PIC X(2) VALUE "AA". 000006 SCREEN SECTION. 000007 01 HYO. 000008 02 HYO1 OCCURS 10 TIMES. 000009 03 PIC X(30) USING WD1. 000010 PROCEDURE DIVISION. 000011 DISPLAY HYO1. 000012 END PROGRAM P2966.
P2966.cob 11: JMN2966I-S 画面節のデータ項目の参照はデータ名を用いなければなりません.
詳細な説明
ACCEPT文あるいはDISPLAY文で参照するデータ名に対応する画面データ記述項が,OCCURS句を持つ項目であるか,あるいはOCCURS句を持つ項目に従属する項目である場合に,この診断メッセージが出力されます.