ページの先頭行へ戻る
NetCOBOL V11.1 メッセージ集
FUJITSU Software

2.4.170 JMN2333I-S

OCCURS句のDEPENDING ON指定の目的語は,整数項目でなければなりません.

例題

[P2333.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2333.
000003 ENVIRONMENT    DIVISION.
000004 DATA           DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WGRP.
000007   02 WDPEND    PIC S9(3)V99.
000008   02 WOCC      OCCURS 10 DEPENDING ON WDPEND.
000009     03         PIC X.
000010 PROCEDURE      DIVISION.
000011 END PROGRAM    P2333.

P2333.cob 8: JMN2333I-S OCCURS句のDEPENDING ON指定の目的語は,整数項目でなければなりません.

詳細な説明

繰り返しの反復回数を示すデータであるため,整数項目でなければなりません.