CLASS ltc_rope_checker DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
  PRIVATE SECTION.
    DATA mo_cut TYPE REF TO {{p}}if_rope_check.
    METHODS setup.
    METHODS level_1_ok FOR TESTING.
    METHODS level_3_ok FOR TESTING.
    METHODS ticket_case_and_space FOR TESTING.
    METHODS empty_ticket FOR TESTING.
    METHODS unknown_ticket FOR TESTING.
    METHODS too_young FOR TESTING.
    METHODS too_few_hours FOR TESTING.
    METHODS too_high FOR TESTING.
ENDCLASS.


CLASS ltc_rope_checker IMPLEMENTATION.
  METHOD setup.
    mo_cut = NEW {{p}}rope_checker( ).
  ENDMETHOD.

  METHOD level_1_ok.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-ok
      act = mo_cut->check( iv_ticket = 'LEVEL_1' iv_height_m = 30
                           iv_logged_hours = 0 iv_age = 18 ) ).
  ENDMETHOD.

  METHOD level_3_ok.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-ok
      act = mo_cut->check( iv_ticket = 'LEVEL_3' iv_height_m = 120
                           iv_logged_hours = 1000 iv_age = 21 ) ).
  ENDMETHOD.

  METHOD ticket_case_and_space.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-ok
      act = mo_cut->check( iv_ticket = ' level_2 ' iv_height_m = 60
                           iv_logged_hours = 500 iv_age = 18 ) ).
  ENDMETHOD.

  METHOD empty_ticket.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-empty
      act = mo_cut->check( iv_ticket = '' iv_height_m = 10
                           iv_logged_hours = 0 iv_age = 40 ) ).
  ENDMETHOD.

  METHOD unknown_ticket.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-ticket
      act = mo_cut->check( iv_ticket = 'LEVEL_9' iv_height_m = 10
                           iv_logged_hours = 0 iv_age = 40 ) ).
  ENDMETHOD.

  METHOD too_young.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-age
      act = mo_cut->check( iv_ticket = 'LEVEL_3' iv_height_m = 120
                           iv_logged_hours = 1000 iv_age = 20 ) ).
  ENDMETHOD.

  METHOD too_few_hours.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-hours
      act = mo_cut->check( iv_ticket = 'LEVEL_2' iv_height_m = 60
                           iv_logged_hours = 499 iv_age = 18 ) ).
  ENDMETHOD.

  METHOD too_high.
    cl_abap_unit_assert=>assert_equals(
      exp = {{p}}if_rope_check=>c_reason-height
      act = mo_cut->check( iv_ticket = 'LEVEL_2' iv_height_m = 61
                           iv_logged_hours = 500 iv_age = 18 ) ).
  ENDMETHOD.
ENDCLASS.