引数の説明
一意名(比較対象のSystem.Boolean型オブジェクト参照) |
一意名(比較対象のブール項目) |
'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けたでなければなりません.