CLASS ltc_salon_pricer DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
  PRIVATE SECTION.
    DATA mo_cut TYPE REF TO {{p}}if_salon_price.
    METHODS setup.
    METHODS cut_price FOR TESTING.
    METHODS colour_price FOR TESTING.
    METHODS perm_price FOR TESTING.
    METHODS child_cut_price FOR TESTING.
ENDCLASS.


CLASS ltc_salon_pricer IMPLEMENTATION.
  METHOD setup.
    mo_cut = NEW {{p}}salon_pricer( ).
  ENDMETHOD.

  METHOD cut_price.
    cl_abap_unit_assert=>assert_equals(
      exp = CONV {{p}}if_salon_price=>ty_amount( '42.00' )
      act = mo_cut->price( iv_service = {{p}}if_salon_price=>c_service-cut
                           iv_child   = abap_false ) ).
  ENDMETHOD.

  METHOD colour_price.
    cl_abap_unit_assert=>assert_equals(
      exp = CONV {{p}}if_salon_price=>ty_amount( '90.00' )
      act = mo_cut->price( iv_service = {{p}}if_salon_price=>c_service-colour
                           iv_child   = abap_false ) ).
  ENDMETHOD.

  METHOD perm_price.
    cl_abap_unit_assert=>assert_equals(
      exp = CONV {{p}}if_salon_price=>ty_amount( '95.00' )
      act = mo_cut->price( iv_service = {{p}}if_salon_price=>c_service-perm
                           iv_child   = abap_false ) ).
  ENDMETHOD.

  METHOD child_cut_price.
    cl_abap_unit_assert=>assert_equals(
      exp = CONV {{p}}if_salon_price=>ty_amount( '12.00' )
      act = mo_cut->price( iv_service = {{p}}if_salon_price=>c_service-cut
                           iv_child   = abap_true ) ).
  ENDMETHOD.
ENDCLASS.