NetCOBOL V11.0 メッセージ集

2.5.2 JMN3001I-S

@1@に対する@2@次元目の添字の値は，@3@以下でなければなりません． 添字の値を1とみなします．

埋め込みの説明

@1@ : 添字付けされたデータ項目
@2@ : 誤った添字が指定された次元数
@3@ : 正しい添字の値の範囲

例題

[C3001.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.  C3001.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01  GR01.
000006   02  TBL01 OCCURS 10 TIMES.
000007     03  TBL02 OCCURS 10 TIMES.
000008       04  AN01 PIC X.
000009 PROCEDURE  DIVISION.
000010     MOVE SPACE TO AN01(1, 11).

C3001.cob 10: JMN3001I-S 'AN01'に対する2次元目の添字の値は，10以下でなければなりません．添字の値を1とみなします．