Stage 2 summary at 50 accepted trajectories
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
@@ -0,0 +1,118 @@
|
||||
CLASS ltc_air_freight_pricer DEFINITION FINAL FOR TESTING
|
||||
DURATION SHORT RISK LEVEL HARMLESS.
|
||||
|
||||
PRIVATE SECTION.
|
||||
TYPES ty_expected TYPE c LENGTH 20.
|
||||
|
||||
DATA mo_cut TYPE REF TO {{p}}if_air_freight.
|
||||
|
||||
METHODS setup.
|
||||
METHODS assert_weight
|
||||
IMPORTING iv_expected TYPE ty_expected
|
||||
iv_actual TYPE {{p}}if_air_freight=>ty_weight.
|
||||
METHODS assert_amount
|
||||
IMPORTING iv_expected TYPE ty_expected
|
||||
iv_actual TYPE {{p}}if_air_freight=>ty_amount.
|
||||
|
||||
METHODS general_shipment_is_priced FOR TESTING.
|
||||
METHODS volumetric_weight_wins FOR TESTING.
|
||||
METHODS dangerous_goods_surcharge FOR TESTING.
|
||||
METHODS zero_weight_is_rejected FOR TESTING.
|
||||
METHODS bad_category_is_rejected FOR TESTING.
|
||||
METHODS too_heavy_is_rejected FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS ltc_air_freight_pricer IMPLEMENTATION.
|
||||
METHOD setup.
|
||||
mo_cut = NEW {{p}}air_freight_pricer( ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD assert_weight.
|
||||
DATA lv_expected TYPE {{p}}if_air_freight=>ty_weight.
|
||||
lv_expected = iv_expected.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_expected act = iv_actual ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD assert_amount.
|
||||
DATA lv_expected TYPE {{p}}if_air_freight=>ty_amount.
|
||||
lv_expected = iv_expected.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_expected act = iv_actual ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD general_shipment_is_priced.
|
||||
DATA ls_result TYPE {{p}}if_air_freight=>ty_result.
|
||||
|
||||
ls_result = mo_cut->price( iv_weight = '12.000'
|
||||
iv_volume = '48000.000'
|
||||
iv_category = {{p}}if_air_freight=>c_category-general
|
||||
iv_dangerous = abap_false ).
|
||||
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_air_freight=>c_reason-ok
|
||||
act = ls_result-reason ).
|
||||
assert_weight( iv_expected = '12.000' iv_actual = ls_result-chargeable_weight ).
|
||||
assert_amount( iv_expected = '135.96' iv_actual = ls_result-total_amount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD volumetric_weight_wins.
|
||||
DATA ls_result TYPE {{p}}if_air_freight=>ty_result.
|
||||
|
||||
ls_result = mo_cut->price( iv_weight = '5.000'
|
||||
iv_volume = '120000.000'
|
||||
iv_category = {{p}}if_air_freight=>c_category-general
|
||||
iv_dangerous = abap_false ).
|
||||
|
||||
assert_weight( iv_expected = '20.000' iv_actual = ls_result-chargeable_weight ).
|
||||
assert_amount( iv_expected = '216.60' iv_actual = ls_result-total_amount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD dangerous_goods_surcharge.
|
||||
DATA ls_result TYPE {{p}}if_air_freight=>ty_result.
|
||||
|
||||
ls_result = mo_cut->price( iv_weight = '10.000'
|
||||
iv_volume = '600.000'
|
||||
iv_category = {{p}}if_air_freight=>c_category-valuable
|
||||
iv_dangerous = abap_true ).
|
||||
|
||||
assert_amount( iv_expected = '54.00' iv_actual = ls_result-dangerous_fee ).
|
||||
assert_amount( iv_expected = '226.68' iv_actual = ls_result-total_amount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD zero_weight_is_rejected.
|
||||
DATA ls_result TYPE {{p}}if_air_freight=>ty_result.
|
||||
|
||||
ls_result = mo_cut->price( iv_weight = '0.000'
|
||||
iv_volume = '600.000'
|
||||
iv_category = {{p}}if_air_freight=>c_category-general
|
||||
iv_dangerous = abap_false ).
|
||||
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_air_freight=>c_reason-bad_weight
|
||||
act = ls_result-reason ).
|
||||
assert_amount( iv_expected = '0.00' iv_actual = ls_result-total_amount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD bad_category_is_rejected.
|
||||
DATA ls_result TYPE {{p}}if_air_freight=>ty_result.
|
||||
|
||||
ls_result = mo_cut->price( iv_weight = '10.000'
|
||||
iv_volume = '600.000'
|
||||
iv_category = 'EXPRESS'
|
||||
iv_dangerous = abap_false ).
|
||||
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_air_freight=>c_reason-bad_category
|
||||
act = ls_result-reason ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD too_heavy_is_rejected.
|
||||
DATA ls_result TYPE {{p}}if_air_freight=>ty_result.
|
||||
|
||||
ls_result = mo_cut->price( iv_weight = '3000.500'
|
||||
iv_volume = '600.000'
|
||||
iv_category = {{p}}if_air_freight=>c_category-general
|
||||
iv_dangerous = abap_false ).
|
||||
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_air_freight=>c_reason-too_heavy
|
||||
act = ls_result-reason ).
|
||||
assert_amount( iv_expected = '0.00' iv_actual = ls_result-total_amount ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user