引数の説明
クラス名,インタフェース名,デリゲート名またはENUM名 |
例
000001 PROGRAM-ID. C3504.
000002 ENVIRONMENT DIVISION.
000003 CONFIGURATION SECTION.
000004 REPOSITORY.
000005 CLASS SYS-OBJECT AS "System.Object".
000006 DATA DIVISION.
000007 WORKING-STORAGE SECTION.
000008 01 OBJ-SYSOBJ OBJECT SYS-OBJECT.
000009 PROCEDURE DIVISION.
000010 IF OBJ-SYSOBJ = SYS-OBJECT THEN
000011 DISPLAY "CAN NOT COMPARED"
000012 END-IF
000013 END PROGRAM C3504.
C3504.cob (10) : JMN3504I-S 型名'SYS-OBJECT'は比較できません.
詳細な説明
クラス名/インタフェース名/ENUM名/デリゲート名が指定できる条件式は,型条件のみです.