例外クラスの使用

テンプレートクラス /LRN/CL_S4D401_OOS_FACTORY をコピーします。前の演習問題を完了した場合は、このタスクをスキップし、クラス ZCL_##_SOLUTION の編集を続行することができます。

1. クラス /LRN/CL_S4D401_OOS_FACTORY を各自のパッケージのクラスにコピーします (推奨名: ZCL_##_SOLUTION、## はグループ番号)。

   1. Project Explorer で、クラス /LRN/CL_S4D401_OOS_FACTORY を右クリックしてコンテキストメニューを開きます。

   2. コンテキストメニューから Duplicate.... を選択します。

   3. Package 項目にパッケージの名称を入力します。Name 項目に、ZCL_##_SOLUTION (## はグループ番号) と入力します。

   4. Next を選択します。

   5. 移送依頼を確認し、Finish を選択します。

2. コピーを有効化します。

   1. Ctrl + F3 を押してクラスを有効化します。

グローバルクラスで、メソッド IF_OO_ADT_CLASSRUN~MAIN の実装を調整します。ファクトリメソッド GET_INSTANCE の呼出時に例外処理を拡張します。両方の CATCH ブロックで、例外オブジェクトへの参照を受け取り、例外テキストを抽出します。コンソール出力のリテラルテキストを例外テキストに置き換えます。

1. グローバルクラスのメソッド IF_OO_ADT_CLASSRUN~MAIN の実装にナビゲートします。

   1. グローバルクラスを開き、グローバルクラスタブに切り替えます。

2. 最初の CATCH 命令で、参照変数が例外オブジェクト (例外クラス CX_ABAP_INVALID_VALUE のインスタンス) をポイントするようにします (変数の推奨名: exc_inv)。

   ヒント

   インライン宣言を使用して、参照変数を正しいデータ型で宣言することができます。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      1
        CATCH cx_abap_invalid_value INTO DATA(exc_inv).

   2. 変数 exc_inv のタイプを照会するには、カーソルを exc_inv に置いて F2 を押します。

3. CX_ABAP_INVALID_VALUE CATCH ブロックで、メソッド out->write の呼出をコメントアウトします。例外オブジェクトから例外テキストを取得し、それをメソッド out->write の新しい呼出で使用します。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      123
        CATCH cx_abap_invalid_value INTO DATA(exc_inv).
      *    out->write( |Carrier { c_carrier_id } does not exist| ).
          out->write( exc_inv->get_text( ) ).

4. 2 番目の CATCH 命令および CATCH ブロックでも同じ操作を行います (参照変数の推奨名: exc_auth)。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      123
        CATCH cx_abap_auth_check_exception INTO DATA(exc_auth).
      *    out->write( |No authorization to display carrier { c_carrier_id }| ).
          out->write( exc_auth->get_text( ) ).

5. コードを有効化してテストします。定数 c_carrier_id の値を調整して、さまざまな例外を発生させます。

   1. Ctrl + F3 を押してコードを有効化します。

   2. F9 を押して、コードをコンソールアプリとして実行します。

   3. 定数 c_carrier_id の値を XX に設定して、無効な値の例外を発生させます。

   4. 定数 c_carrier_id の値を UA に設定して、権限不足の例外を発生させます。

ローカルテストクラス LTCL_FIND_FLIGHTS で、メソッド CLASS_SETUP の実装を調整します。ファクトリメソッド GET_INSTANCE の呼出時に、可能性のあるすべての例外を 1 つの CATCH ブロックで処理します。例外の場合、一般エラーメッセージの "lcl_carrier をインスタンス化できません"の代わりに、例外オブジェクトから例外テキストとともに失敗メソッドを指定します。

1. ローカルテストクラス LTCL_FIND_FLIGHTS のメソッド CLASS_SETUP の実装にナビゲートします。

   1. テストクラスタブに切り替えます。

   2. ステートメント METHOD class_setup までスクロールします。

2. メソッド GET_INSTANCE の呼出後、例外処理を調整します。例外クラス CX_ABAP_INVALID_VALUE の捕捉ブロックにコメントを付け、例外クラス CX_ABAP_AUTH_CHECK_EXCEPTION を CX_ROOT に置き換えます。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      1234567
        TRY.
          the_carrier = lcl_carrier=>get_instance( i_carrier_id = some_flight_data-carrier_id ).
      *    CATCH cx_abap_invalid_value.
      *      cl_abap_unit_assert=>fail( `Unable to instantiate lcl_carrier` ).
           CATCH cx_root.
              cl_abap_unit_assert=>fail( `Unable to instantiate lcl_carrier` ).
        ENDTRY.

3. インライン宣言参照変数を使用して CATCH 文に INTO 句を追加します (変数の推奨名: exc_root)。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      1
        CATCH cx_root INTO DATA(exc_root).

   2. 変数 exc_root のタイプを表示するには、カーソルを exc_root に置いて F2 を押します。

4. CX_ROOT CATCH ブロックで、例外テキストをメソッド CL_ABAP_UNIT_ASSERT=>fail の入力として使用します。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      12
        CATCH cx_root INTO DATA(exc_root).
          cl_abap_unit_assert=>fail( exc_root->get_text( ) ).

5. コードを有効化します。

   1. Ctrl + F3 を押します。

ファクトリメソッド GET_INSTANCE で例外の発生を調整します。例外 CX_ABAP_INVALID_VALUE を発生させる場合は、適切なコンストラクタパラメータを使用して、無効な航空会社 ID を例外テキストに含めます。例外 CX_ABAP_AUTH_CHECK_EXCEPTION を発生させる場合は、適切なコンストラクタパラメータを使用して、より適切な例外テキストを選択します。

1. ローカルクラス LCL_CARRIER のメソッド GET_INSTANCE の実装にナビゲートします。

   1. たとえば、IF_OO_ADT_CLASSRUN~MAIN メソッドで、get_instance にカーソルを置き、F3 を押します。

2. 例外クラス CX_ABAP_INVALID_VALUE の CONSTRUCTOR メソッドの署名を分析します。

   1. RAISE EXCEPTION 命令で、CX_ABAP_INVALID_VALUE にカーソルを置き、F2 を押して例外クラスの ABAP エレメント情報を表示します。

   2. ダイアログウィンドウで、コンストラクタを選択して CONSTRUCTOR メソッドのエレメント情報を表示します。

3. 例外クラス CX_ABAP_INVALID_VALUE の RAISE EXCEPTION 命令を調整します。コンストラクタパラメータ値に無効な航空会社 ID を指定します。

   注記

   value と i_carrier_id は同じデータ型を持たないため、データ型変換を実行する必要があります。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      123
        RAISE EXCEPTION TYPE cx_abap_invalid_value
          EXPORTING
            value = CONV #( i_carrier_id ).

4. 例外クラス CX_ABAP_AUTH_CHECK_EXCEPTION の RAISE EXCEPTION 命令を調整します。コンストラクタパラメータ textid に、その例外クラスの public 定数 missing_authorization を指定します。

   1. コードを以下のように調整します。

      ABAP

      Copy codeSwitch to dark mode

      1234
        RAISE EXCEPTION TYPE cx_abap_auth_check_exception
          EXPORTING
            textid = 
              cx_abap_auth_check_exception=>missing_authorization.

5. コードを有効化してテストします。定数 c_carrier_id の値を調整して、さまざまな例外を発生させます。

   1. Ctrl + F3 を押してコードを有効化します。

   2. F9 を押して、コードをコンソールアプリとして実行します。

   3. 定数 c_carrier_id の値を XX に設定して、無効な値の例外を発生させます。

   4. 定数 c_carrier_id の値を UA に設定して、権限不足の例外を発生させます。