CLASS ltc_legacy_freight DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
  PRIVATE SECTION.
    METHODS base_parcel FOR TESTING.
    METHODS express_parcel FOR TESTING.
ENDCLASS.


CLASS ltc_legacy_freight IMPLEMENTATION.
  METHOD base_parcel.
    DATA(lo_cut) = NEW {{p}}freight_calculator( ).
    cl_abap_unit_assert=>assert_equals(
      exp = VALUE {{p}}freight_calculator=>ty_result( status = 'OK' base = '45.00' total = '45.00' )
      act = lo_cut->calculate( iv_weight_kg = '10.00' iv_zone = `DE` ) ).
  ENDMETHOD.

  METHOD express_parcel.
    DATA(lo_cut) = NEW {{p}}freight_calculator( ).
    cl_abap_unit_assert=>assert_equals(
      exp = VALUE {{p}}freight_calculator=>ty_result( status    = 'OK'
                                                     base      = '45.00'
                                                     surcharge = '11.25'
                                                     total     = '56.25' )
      act = lo_cut->calculate( iv_weight_kg = '10.00' iv_zone = `DE` iv_express = abap_true ) ).
  ENDMETHOD.
ENDCLASS.