ページの先頭行へ戻る
NetCOBOL for .NET V8.0 メッセージ集
FUJITSU Software

2.3.169 JMN2333I-S

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

      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指定の目的語は,整数項目でなければなりません.

詳細な説明

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