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

2.4.285 JMN3523I-S

@3@型を参照するオブジェクト参照@1@と比較するブール項目@2@は,1けたでなければなりません.

引数の説明

@1@:

一意名(比較対象のSystem.Boolean型オブジェクト参照)

@2@:

一意名(比較対象のブール項目)

@3@:

'System.Boolean'

      000001 PROGRAM-ID. C3523.
      000002 ENVIRONMENT DIVISION.
      000003 CONFIGURATION SECTION.
      000004 REPOSITORY.
      000005     CLASS CLASS-BOOLEAN AS "System.Boolean"
      000006     .
      000007 DATA DIVISION.
      000008 WORKING-STORAGE SECTION.
      000009 01 OBJ-BOOLEAN OBJECT CLASS-BOOLEAN.
      000010 01 COBOL-BOOL  PIC 1(2).
      000011 PROCEDURE  DIVISION.
      000012     IF OBJ-BOOLEAN = COBOL-BOOL THEN  *> JMN3523I-S
      000013       DISPLAY "CANNOT BE COMPARED"
      000014     END-IF
      000015 END PROGRAM C3523.
    

C3523.cob (12) : JMN3523I-S System.Boolean型を参照するオブジェクト参照'OBJ-BOOLEAN'と比較するブール項目'COBOL-BOOL'は,1けたでなければなりません.