89 lines
3.7 KiB
ABAP
89 lines
3.7 KiB
ABAP
CLASS ltc_rack_billing DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
|
PRIVATE SECTION.
|
|
DATA mo_cut TYPE REF TO {{p}}rack_billing.
|
|
|
|
METHODS setup.
|
|
METHODS assert_amount
|
|
IMPORTING iv_expected TYPE {{p}}rack_billing=>ty_fee
|
|
iv_actual TYPE {{p}}rack_billing=>ty_fee.
|
|
|
|
METHODS one_rack FOR TESTING.
|
|
METHODS groups_by_customer FOR TESTING.
|
|
METHODS applies_discount FOR TESTING.
|
|
METHODS ignores_invalid_rack FOR TESTING.
|
|
METHODS ignores_duplicate_rack FOR TESTING.
|
|
METHODS empty_input FOR TESTING.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltc_rack_billing IMPLEMENTATION.
|
|
METHOD setup.
|
|
mo_cut = NEW {{p}}rack_billing( ).
|
|
ENDMETHOD.
|
|
|
|
METHOD assert_amount.
|
|
cl_abap_unit_assert=>assert_equals( exp = iv_expected act = iv_actual ).
|
|
ENDMETHOD.
|
|
|
|
METHOD one_rack.
|
|
DATA lt_racks TYPE {{p}}rack_billing=>tt_racks.
|
|
lt_racks = VALUE #( ( rack_id = 'R001' customer = 'ALPHA'
|
|
size_class = 'M' power_class = 'B' ) ).
|
|
DATA(lt_bills) = mo_cut->calculate( lt_racks ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 1 act = lines( lt_bills ) ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 1 act = lt_bills[ 1 ]-rack_count ).
|
|
assert_amount( iv_expected = '150.00' iv_actual = lt_bills[ 1 ]-total_fee ).
|
|
ENDMETHOD.
|
|
|
|
METHOD groups_by_customer.
|
|
DATA lt_racks TYPE {{p}}rack_billing=>tt_racks.
|
|
lt_racks = VALUE #(
|
|
( rack_id = 'R001' customer = 'ALPHA' size_class = 'S' power_class = 'C' )
|
|
( rack_id = 'R002' customer = 'ALPHA' size_class = 'L' power_class = 'A' )
|
|
( rack_id = 'R003' customer = 'BETA' size_class = 'M' power_class = 'B' ) ).
|
|
DATA(lt_bills) = mo_cut->calculate( lt_racks ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 2 act = lines( lt_bills ) ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 'ALPHA' act = lt_bills[ 1 ]-customer ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 2 act = lt_bills[ 1 ]-rack_count ).
|
|
assert_amount( iv_expected = '370.00' iv_actual = lt_bills[ 1 ]-total_fee ).
|
|
assert_amount( iv_expected = '150.00' iv_actual = lt_bills[ 2 ]-total_fee ).
|
|
ENDMETHOD.
|
|
|
|
METHOD applies_discount.
|
|
DATA lt_racks TYPE {{p}}rack_billing=>tt_racks.
|
|
DO 10 TIMES.
|
|
INSERT VALUE #( rack_id = |R{ sy-index }| customer = 'ALPHA'
|
|
size_class = 'M' power_class = 'B' ) INTO TABLE lt_racks.
|
|
ENDDO.
|
|
DATA(lt_bills) = mo_cut->calculate( lt_racks ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 10 act = lt_bills[ 1 ]-rack_count ).
|
|
assert_amount( iv_expected = '1350.00' iv_actual = lt_bills[ 1 ]-total_fee ).
|
|
ENDMETHOD.
|
|
|
|
METHOD ignores_invalid_rack.
|
|
DATA lt_racks TYPE {{p}}rack_billing=>tt_racks.
|
|
lt_racks = VALUE #(
|
|
( rack_id = 'R001' customer = 'ALPHA' size_class = 'S' power_class = 'D' )
|
|
( rack_id = 'R002' customer = 'ALPHA' size_class = 'M' power_class = 'A' ) ).
|
|
DATA(lt_bills) = mo_cut->calculate( lt_racks ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 1 act = lt_bills[ 1 ]-rack_count ).
|
|
assert_amount( iv_expected = '120.00' iv_actual = lt_bills[ 1 ]-total_fee ).
|
|
ENDMETHOD.
|
|
|
|
METHOD ignores_duplicate_rack.
|
|
DATA lt_racks TYPE {{p}}rack_billing=>tt_racks.
|
|
lt_racks = VALUE #(
|
|
( rack_id = 'R001' customer = 'ALPHA' size_class = 'S' power_class = 'A' )
|
|
( rack_id = 'R001' customer = 'ALPHA' size_class = 'L' power_class = 'C' ) ).
|
|
DATA(lt_bills) = mo_cut->calculate( lt_racks ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 1 act = lt_bills[ 1 ]-rack_count ).
|
|
assert_amount( iv_expected = '50.00' iv_actual = lt_bills[ 1 ]-total_fee ).
|
|
ENDMETHOD.
|
|
|
|
METHOD empty_input.
|
|
DATA lt_racks TYPE {{p}}rack_billing=>tt_racks.
|
|
DATA(lt_bills) = mo_cut->calculate( lt_racks ).
|
|
cl_abap_unit_assert=>assert_initial( lt_bills ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|