Pipeline controller: plan 2 (hard +, error +50 %), backlog throttle, 2 trajectory workers, stop rules, summaries every 50; budget reserve
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
104
tasks_gen/train/G1025/reference/crane_hire_calc.testclasses.abap
Normal file
104
tasks_gen/train/G1025/reference/crane_hire_calc.testclasses.abap
Normal file
@@ -0,0 +1,104 @@
|
||||
CLASS ltc_crane_hire DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
DATA mo_cut TYPE REF TO {{p}}if_crane_hire.
|
||||
METHODS setup.
|
||||
METHODS road_fee FOR TESTING.
|
||||
METHODS gravel_fee FOR TESTING.
|
||||
METHODS soil_fee FOR TESTING.
|
||||
METHODS permit_fee FOR TESTING.
|
||||
METHODS minimum_fee FOR TESTING.
|
||||
METHODS invalid_radius FOR TESTING.
|
||||
METHODS invalid_load FOR TESTING.
|
||||
METHODS over_capacity FOR TESTING.
|
||||
METHODS invalid_ground FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS ltc_crane_hire IMPLEMENTATION.
|
||||
METHOD setup.
|
||||
mo_cut = NEW {{p}}crane_hire_calc( ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD road_fee.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 20
|
||||
iv_load_kg = 5000
|
||||
iv_ground = `ROAD`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_crane_hire=>c_reason-ok
|
||||
act = ls_result-reason ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 550
|
||||
act = ls_result-fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD gravel_fee.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 30
|
||||
iv_load_kg = 5000
|
||||
iv_ground = `GRAVEL`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 805
|
||||
act = ls_result-fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD soil_fee.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 10
|
||||
iv_load_kg = 12000
|
||||
iv_ground = `SOIL`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1013
|
||||
act = ls_result-fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD permit_fee.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 20
|
||||
iv_load_kg = 5000
|
||||
iv_ground = `ROAD`
|
||||
iv_permit = abap_true ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 800
|
||||
act = ls_result-fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD minimum_fee.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 5
|
||||
iv_load_kg = 500
|
||||
iv_ground = `ROAD`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 300
|
||||
act = ls_result-fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_radius.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 61
|
||||
iv_load_kg = 5000
|
||||
iv_ground = `ROAD`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_crane_hire=>c_reason-radius
|
||||
act = ls_result-reason ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_load.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 20
|
||||
iv_load_kg = 499
|
||||
iv_ground = `ROAD`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_crane_hire=>c_reason-load
|
||||
act = ls_result-reason ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD over_capacity.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 25
|
||||
iv_load_kg = 6000
|
||||
iv_ground = `ROAD`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_crane_hire=>c_reason-capacity
|
||||
act = ls_result-reason ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_ground.
|
||||
DATA(ls_result) = mo_cut->hire( iv_radius_m = 20
|
||||
iv_load_kg = 5000
|
||||
iv_ground = `FIELD`
|
||||
iv_permit = abap_false ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_crane_hire=>c_reason-ground
|
||||
act = ls_result-reason ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user