例外処理

表 5-1 CORBA システム例外

例外名	説明
BAD_CONTEXT	コンテキスト・オブジェクトの処理中にエラーが発生しました。
BAD_INV_ORDER	ルーチン呼び出しが順不同です。
BAD_OPERATION	無効なオペレーションです。
BAD_PARAM	無効なパラメータが受け渡されました。
BAD_TYPECODE	無効な typecode です。
COMM_FAILURE	通信障害。
DATA_CONVERSION	データ変換エラー。
FREE_MEM	メモリを解放できません。
IMP_LIMIT	インプリメンテーション制限に違反しました。
INITIALIZE	ORB 初期化障害。
INTERNAL	ORB 内部エラー。
INTF_REPOS	インターフェイス・リポジトリへのアクセス中にエラーが発生しました。
INV_FLAG	無効なフラグが指定されています。
INV_IDENT	無効な識別子構文です。
INV_OBJREF	無効なオブジェクト・リファレンスが指定されています。
MARSHAL	パラメータまたは結果のマーシャリング・エラー。
NO_IMPLEMENT	オペレーションのインプリメンテーションが利用できません。
NO_MEMORY	動的メモリ割り当てが異常終了しました。
NO_PERMISSION	試行されたオペレーションのパーミッションが存在しません。
NO_RESOURCES	要求を処理するためのリソースが不足しています。
NO_RESPONSE	要求に対する応答がまだ利用できません。
OBJ_ADAPTER	オブジェクト・アダプタによってエラーが検出されました。
OBJECT_NOT_EXIST	オブジェクトが利用できません。
PERSIST_STORE	永続ストレージの障害。
TRANSIENT	一時障害。
UNKNOWN	未知の結果。

try{

//ORB を初期化
CORBA::ORB* orb=CORBA::ORB_init(argc, argv, ORBid);

//Bootstrap オブジェクトを取得
Tobj_Bootstrap* bs= new Tobj_Bootstrap(orb, “//host:port”);

// Factory Finder を解決
CORBA::Object_var var_factory_finder_oref = bs->
resolve_initial_reference(“FactoryFinder”);
Tobj::FactoryFinder_var var_factory_finder_ref = Tobj::FactoryFinder::_narrow
(var_factory_finder_oref.in());

catch(CORBA::Exception& e) {
cerr <<e.get_id() <<end1;
}

exception TooManyCredits
{
unsigned short maximum_credits;
};

interface Registrar

NotRegisteredList register_for_courses(
in StudentId student,
in CourseNumberList courses
) raises (
TooManyCredits
);

//コースの学生を登録

try {
pointer_registrar_reference->register_for_courses
(student_id, course_number_list);

catch (UniversityT::TooManyCredits& e) {
cout <<"You cannot register for more than"<< e.maximum_credits
<<"credits."<<end1;
}

try
{
// Factory Finder を解決
org.omg.CORBA.Object off = bs.resolve_initial_references
(“FactoryFinder”);
FactoryFinder ff=FactoryFinderHelper.narrow(off);

org.omg.CORBA.Object of = FactoryFinder.find_one_factory_by_id
(UniversityT.RegistrarFactoryHelper.id());
UniversityT.RegistrarFactory F =
UniversityT.RegistrarFactoryHelper.narrow(of);

catch (org.omg.CORBA.SystemException e)
{
System.err.println("System exception " + e);
System.exit(1);
}

//コースへの登録を行う
try{
gRegistrarObjRef.register_for_courses(student_id, selected_course_numbers);

catch(UniversityT.TooManyCredits e)
{
System.err.println("TooManyCredits: " +e);
System.exit(1);
}

Dim minorCode As Long
Dim completionStatus As CORBA_CompletionStatus
Dim completionMsg As String

minorCode = exceptInfo.EX_minorCode
completionStatus = exceptInfo.EX_completionStatus
Select Case completionStatus
Case COMPLETION_NO
completionMsg = "No"
Case COMPLETION_YES
completionMsg = "Yes"
Case COMPLETION_MAYBE
completionMsg = "Maybe"
End Select