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

2.4.63 JMN3081I-S

指標比較で,@1@は整数でなければなりません.

引数の説明

@1@:

一意名の名標,数字定数

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.  C3081.
      000003 ENVIRONMENT  DIVISION.
      000004 DATA  DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01  A    PIC S9(4)V9 BINARY.
      000007 01  B.
      000008     02  C  OCCURS 10 TIMES  INDEXED BY IX.
      000009         03  D    PIC XX.
      000010 PROCEDURE  DIVISION.
      000011 P-START.
      000012     IF A = IX   STOP RUN.
    

C3081.cob (12) : JMN3081I-S 指標比較で,'A'は整数でなければなりません.