名前
CORBA-OBJECT-IS-NIL
形式
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SPECIAL-NAMES.
SYMBOLIC CONSTANT
COPY SYMBOL-CONST IN CORBA.
.
DATA DIVISION.
WORKING-STORAGE SECTION.
COPY CONST IN CORBA.
01 COPY OBJECT IN CORBA REPLACING CORBA-OBJECT BY OBJ.
01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
01 COPY BOOLEAN IN CORBA REPLACING CORBA-BOOLEAN BY RESULT.
PROCEDURE DIVISION.
CALL "CORBA-OBJECT-IS-NIL" USING
OBJ
ENV
RESULT.機能説明
オブジェクトリファレンスが有効なオブジェクトを表しているかを検査します。
復帰値
有効なオブジェクトを表している場合はCORBA-FALSEを、そうでない場合はCORBA-TRUEが返されます。