名前
CORBA-EXCEPTION-ID
形式
 ENVIRONMENT DIVISION.
 DATA DIVISION.
  WORKING-STORAGE SECTION.
    COPY CONST IN CORBA.
    01 COPY ENVIRONMENT IN CORBA REPLACING CORBA-ENVIRONMENT BY ENV.
    01 EXCEP USAGE POINTER.
 PROCEDURE DIVISION.
    CALL "CORBA-EXCEPTION-ID" USING
         ENV 
         EXCEP.機能説明
ENV構造体に設定された例外を識別するための識別子を返します。
復帰値
例外が設定されている場合は、ENV構造体の例外を識別するための識別子を返します。例外が設定されていない(ENV構造体のMAJORにCORBA-NO-EXCEPTIONが設定されている)場合は、ヌルポインタを返します。