例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1184.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 WK-TBL.
000006 02 WK PIC X OCCURS 1 TO 10.
000007 01 LENGCNT PIC S9(4) BINARY.
000008 END PROGRAM C1184.
C1184.cob (6) : JMN1184I-S OCCURS句で最大の反復回数を指定したときには,DEPENDING ON指定も記述しなければなりません.最大の反復回数を一定の反復回数とみなします.
詳細な説明
OCCURS句のTO指定を指定した場合,DEPENDING ON指定を記述してください.