Stage 2 summary at 50 accepted trajectories
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
69
tasks_gen/train/G1067/reference/tent_hire_fee.clas.abap
Normal file
69
tasks_gen/train/G1067/reference/tent_hire_fee.clas.abap
Normal file
@@ -0,0 +1,69 @@
|
||||
CLASS {{p}}tent_hire_fee DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
||||
PUBLIC SECTION.
|
||||
INTERFACES {{p}}if_tent_hire.
|
||||
PRIVATE SECTION.
|
||||
TYPES ty_calc TYPE p LENGTH 15 DECIMALS 4.
|
||||
|
||||
METHODS get_rates
|
||||
IMPORTING iv_tent_size TYPE string
|
||||
EXPORTING ev_rate_day TYPE {{p}}if_tent_hire=>ty_amount
|
||||
ev_setup_fee TYPE {{p}}if_tent_hire=>ty_amount
|
||||
ev_found TYPE abap_bool.
|
||||
METHODS apply_discount
|
||||
IMPORTING iv_days TYPE i
|
||||
CHANGING cv_amount TYPE ty_calc.
|
||||
METHODS round_gross
|
||||
IMPORTING iv_amount TYPE ty_calc
|
||||
RETURNING VALUE(rv_fee) TYPE {{p}}if_tent_hire=>ty_amount.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}tent_hire_fee IMPLEMENTATION.
|
||||
METHOD {{p}}if_tent_hire~calculate_fee.
|
||||
DATA lv_rate_day TYPE {{p}}if_tent_hire=>ty_amount.
|
||||
DATA lv_setup_fee TYPE {{p}}if_tent_hire=>ty_amount.
|
||||
DATA lv_found TYPE abap_bool.
|
||||
get_rates(
|
||||
EXPORTING iv_tent_size = iv_tent_size
|
||||
IMPORTING ev_rate_day = lv_rate_day
|
||||
ev_setup_fee = lv_setup_fee
|
||||
ev_found = lv_found ).
|
||||
IF lv_found = abap_false.
|
||||
rv_fee = 0.
|
||||
RETURN.
|
||||
ENDIF.
|
||||
DATA lv_net TYPE ty_calc.
|
||||
lv_net = iv_days * lv_rate_day + lv_setup_fee.
|
||||
apply_discount( EXPORTING iv_days = iv_days CHANGING cv_amount = lv_net ).
|
||||
DATA(lv_gross) = lv_net * ( 1 + {{p}}if_tent_hire=>c_vat ).
|
||||
rv_fee = round_gross( lv_gross ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD get_rates.
|
||||
CASE to_upper( iv_tent_size ).
|
||||
WHEN 'S'.
|
||||
ev_rate_day = {{p}}if_tent_hire=>c_rate_s-rate_day.
|
||||
ev_setup_fee = {{p}}if_tent_hire=>c_rate_s-setup_fee.
|
||||
WHEN 'M'.
|
||||
ev_rate_day = {{p}}if_tent_hire=>c_rate_m-rate_day.
|
||||
ev_setup_fee = {{p}}if_tent_hire=>c_rate_m-setup_fee.
|
||||
WHEN 'L'.
|
||||
ev_rate_day = {{p}}if_tent_hire=>c_rate_l-rate_day.
|
||||
ev_setup_fee = {{p}}if_tent_hire=>c_rate_l-setup_fee.
|
||||
WHEN OTHERS.
|
||||
ev_found = abap_false.
|
||||
RETURN.
|
||||
ENDCASE.
|
||||
ev_found = abap_true.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD apply_discount.
|
||||
IF iv_days >= {{p}}if_tent_hire=>c_long_rental_days.
|
||||
cv_amount = cv_amount * ( 1 - {{p}}if_tent_hire=>c_discount ).
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD round_gross.
|
||||
rv_fee = round( val = iv_amount dec = 2 ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
@@ -0,0 +1,51 @@
|
||||
CLASS ltc_tent_hire_fee DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
DATA mo_cut TYPE REF TO {{p}}if_tent_hire.
|
||||
METHODS setup.
|
||||
METHODS small_tent_one_day FOR TESTING.
|
||||
METHODS small_tent_five_days FOR TESTING.
|
||||
METHODS medium_tent_three_days FOR TESTING.
|
||||
METHODS large_tent_seven_days FOR TESTING.
|
||||
METHODS unknown_size FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS ltc_tent_hire_fee IMPLEMENTATION.
|
||||
METHOD setup.
|
||||
mo_cut = NEW {{p}}tent_hire_fee( ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD small_tent_one_day.
|
||||
" 1 * 45.00 + 30.00 = 75.00; plus 19% VAT = 89.25
|
||||
cl_abap_unit_assert=>assert_equals(
|
||||
exp = '89.25'
|
||||
act = mo_cut->calculate_fee( iv_tent_size = 'S' iv_days = 1 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD small_tent_five_days.
|
||||
" 5 * 45.00 + 30.00 = 255.00; less 10% = 229.50; plus 19% VAT = 273.105
|
||||
cl_abap_unit_assert=>assert_equals(
|
||||
exp = '273.11'
|
||||
act = mo_cut->calculate_fee( iv_tent_size = 'S' iv_days = 5 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD medium_tent_three_days.
|
||||
" 3 * 68.00 + 40.00 = 244.00; plus 19% VAT = 290.36
|
||||
cl_abap_unit_assert=>assert_equals(
|
||||
exp = '290.36'
|
||||
act = mo_cut->calculate_fee( iv_tent_size = 'M' iv_days = 3 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD large_tent_seven_days.
|
||||
" 7 * 95.00 + 55.00 = 720.00; less 10% = 648.00; plus 19% VAT = 771.12
|
||||
cl_abap_unit_assert=>assert_equals(
|
||||
exp = '771.12'
|
||||
act = mo_cut->calculate_fee( iv_tent_size = 'L' iv_days = 7 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD unknown_size.
|
||||
cl_abap_unit_assert=>assert_equals(
|
||||
exp = '0.00'
|
||||
act = mo_cut->calculate_fee( iv_tent_size = 'X' iv_days = 2 ) ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user