CLASS ltc_escape_checker DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
  PRIVATE SECTION.
    DATA mo_cut TYPE REF TO {{p}}escape_checker.

    METHODS setup.
    METHODS mars_price FOR TESTING.
    METHODS group_discount FOR TESTING.
    METHODS deep_price FOR TESTING.
    METHODS unknown_room FOR TESTING.
    METHODS too_many_players FOR TESTING.
    METHODS too_young FOR TESTING.
    METHODS lead_time_too_short FOR TESTING.

    METHODS assert_price
      IMPORTING iv_room    TYPE {{p}}escape_checker=>ty_room
                iv_players TYPE i
                iv_age     TYPE i
                iv_lead    TYPE i
                iv_exp     TYPE {{p}}escape_checker=>ty_price.
ENDCLASS.


CLASS ltc_escape_checker IMPLEMENTATION.
  METHOD setup.
    mo_cut = NEW {{p}}escape_checker( ).
  ENDMETHOD.

  METHOD mars_price.
    assert_price( iv_room = 'MARS' iv_players = 2 iv_age = 12 iv_lead = 2 iv_exp = '50.00' ).
  ENDMETHOD.

  METHOD group_discount.
    assert_price( iv_room = 'MARS' iv_players = 6 iv_age = 12 iv_lead = 2 iv_exp = '135.00' ).
  ENDMETHOD.

  METHOD deep_price.
    assert_price( iv_room = 'DEEP' iv_players = 3 iv_age = 16 iv_lead = 4 iv_exp = '90.00' ).
  ENDMETHOD.

  METHOD unknown_room.
    TRY.
        mo_cut->check_booking( iv_room = 'XXXX' iv_players = 2
                               iv_youngest_age = 12 iv_lead_hours = 2 ).
        cl_abap_unit_assert=>fail( 'Exception expected' ).
      CATCH {{p}}cx_escape_room INTO DATA(lo_error).
        cl_abap_unit_assert=>assert_bound( lo_error ).
      CATCH {{p}}cx_escape_error INTO DATA(lo_other).
        cl_abap_unit_assert=>fail( |Wrong exception: { lo_other->get_text( ) }| ).
    ENDTRY.
  ENDMETHOD.

  METHOD too_many_players.
    TRY.
        mo_cut->check_booking( iv_room = 'MARS' iv_players = 7
                               iv_youngest_age = 12 iv_lead_hours = 2 ).
        cl_abap_unit_assert=>fail( 'Exception expected' ).
      CATCH {{p}}cx_escape_players INTO DATA(lo_error).
        cl_abap_unit_assert=>assert_bound( lo_error ).
      CATCH {{p}}cx_escape_error INTO DATA(lo_other).
        cl_abap_unit_assert=>fail( |Wrong exception: { lo_other->get_text( ) }| ).
    ENDTRY.
  ENDMETHOD.

  METHOD too_young.
    TRY.
        mo_cut->check_booking( iv_room = 'MARS' iv_players = 2
                               iv_youngest_age = 11 iv_lead_hours = 2 ).
        cl_abap_unit_assert=>fail( 'Exception expected' ).
      CATCH {{p}}cx_escape_age INTO DATA(lo_error).
        cl_abap_unit_assert=>assert_bound( lo_error ).
      CATCH {{p}}cx_escape_error INTO DATA(lo_other).
        cl_abap_unit_assert=>fail( |Wrong exception: { lo_other->get_text( ) }| ).
    ENDTRY.
  ENDMETHOD.

  METHOD lead_time_too_short.
    TRY.
        mo_cut->check_booking( iv_room = 'MARS' iv_players = 2
                               iv_youngest_age = 12 iv_lead_hours = 1 ).
        cl_abap_unit_assert=>fail( 'Exception expected' ).
      CATCH {{p}}cx_escape_time INTO DATA(lo_error).
        cl_abap_unit_assert=>assert_bound( lo_error ).
      CATCH {{p}}cx_escape_error INTO DATA(lo_other).
        cl_abap_unit_assert=>fail( |Wrong exception: { lo_other->get_text( ) }| ).
    ENDTRY.
  ENDMETHOD.

  METHOD assert_price.
    TRY.
        cl_abap_unit_assert=>assert_equals(
          exp = iv_exp
          act = mo_cut->check_booking( iv_room = iv_room iv_players = iv_players
                                       iv_youngest_age = iv_age iv_lead_hours = iv_lead ) ).
      CATCH {{p}}cx_escape_error INTO DATA(lo_error).
        cl_abap_unit_assert=>fail( |Unexpected exception: { lo_error->get_text( ) }| ).
    ENDTRY.
  ENDMETHOD.
ENDCLASS.