Step F first pass: 81/92 accepted; budget floor 60 calls; rejected slots moved for regeneration

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
This commit is contained in:
Kral
2026-10-03 12:10:52 +02:00
parent d3250acfb8
commit 39769afce8
741 changed files with 40573 additions and 317 deletions

View File

@@ -0,0 +1,81 @@
CLASS ltc_move_pricer DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
TYPES ty_price TYPE p LENGTH 8 DECIMALS 2.
DATA mo_cut TYPE REF TO {{p}}move_pricer.
METHODS setup.
METHODS base_fee_only FOR TESTING.
METHODS distance_fee FOR TESTING.
METHODS first_floor FOR TESTING.
METHODS packing_fee FOR TESTING.
METHODS weekend_surcharge FOR TESTING.
METHODS combined_move FOR TESTING.
ENDCLASS.
CLASS ltc_move_pricer IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}move_pricer( ).
ENDMETHOD.
METHOD base_fee_only.
cl_abap_unit_assert=>assert_equals(
exp = CONV ty_price( '250.00' )
act = mo_cut->calculate( iv_distance_km = 0
iv_volume_m3 = 0
iv_floor = 0
iv_packing = abap_false
iv_weekend = abap_false ) ).
ENDMETHOD.
METHOD distance_fee.
cl_abap_unit_assert=>assert_equals(
exp = CONV ty_price( '268.00' )
act = mo_cut->calculate( iv_distance_km = 15
iv_volume_m3 = 0
iv_floor = 0
iv_packing = abap_false
iv_weekend = abap_false ) ).
ENDMETHOD.
METHOD first_floor.
cl_abap_unit_assert=>assert_equals(
exp = CONV ty_price( '265.00' )
act = mo_cut->calculate( iv_distance_km = 0
iv_volume_m3 = 0
iv_floor = 1
iv_packing = abap_false
iv_weekend = abap_false ) ).
ENDMETHOD.
METHOD packing_fee.
cl_abap_unit_assert=>assert_equals(
exp = CONV ty_price( '430.00' )
act = mo_cut->calculate( iv_distance_km = 0
iv_volume_m3 = 0
iv_floor = 0
iv_packing = abap_true
iv_weekend = abap_false ) ).
ENDMETHOD.
METHOD weekend_surcharge.
cl_abap_unit_assert=>assert_equals(
exp = CONV ty_price( '441.28' )
act = mo_cut->calculate( iv_distance_km = 20
iv_volume_m3 = 3
iv_floor = 0
iv_packing = abap_false
iv_weekend = abap_true ) ).
ENDMETHOD.
METHOD combined_move.
cl_abap_unit_assert=>assert_equals(
exp = CONV ty_price( '669.76' )
act = mo_cut->calculate( iv_distance_km = 15
iv_volume_m3 = 3
iv_floor = 2
iv_packing = abap_true
iv_weekend = abap_true ) ).
ENDMETHOD.
ENDCLASS.