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:
Kral
2026-10-05 13:35:54 +02:00
parent 1c4667a0fc
commit 13360292dd
781 changed files with 50211 additions and 22 deletions

View File

@@ -0,0 +1,140 @@
CLASS {{p}}ride_booking DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
INTERFACES {{p}}if_ride_booking.
PRIVATE SECTION.
TYPES:
BEGIN OF ty_rate,
discipline TYPE {{p}}if_ride_booking=>ty_discipline,
base TYPE {{p}}if_ride_booking=>ty_amount,
END OF ty_rate,
tt_rate TYPE HASHED TABLE OF ty_rate WITH UNIQUE KEY discipline.
METHODS check_input
IMPORTING iv_rider_name TYPE string
iv_discipline TYPE {{p}}if_ride_booking=>ty_discipline
iv_level TYPE {{p}}if_ride_booking=>ty_level
iv_minutes TYPE i
iv_riders TYPE i
RAISING {{p}}cx_ride_input.
METHODS check_limits
IMPORTING iv_discipline TYPE {{p}}if_ride_booking=>ty_discipline
iv_level TYPE {{p}}if_ride_booking=>ty_level
iv_riders TYPE i
RAISING {{p}}cx_ride_limit.
METHODS base_rate
IMPORTING iv_discipline TYPE {{p}}if_ride_booking=>ty_discipline
RETURNING VALUE(rv_rate) TYPE {{p}}if_ride_booking=>ty_amount.
METHODS level_surcharge
IMPORTING iv_level TYPE {{p}}if_ride_booking=>ty_level
RETURNING VALUE(rv_amount) TYPE {{p}}if_ride_booking=>ty_amount.
METHODS discount
IMPORTING iv_riders TYPE i
RETURNING VALUE(rv_percent) TYPE i.
ENDCLASS.
CLASS {{p}}ride_booking IMPLEMENTATION.
METHOD {{p}}if_ride_booking~book.
check_input( iv_rider_name = iv_rider_name
iv_discipline = iv_discipline
iv_level = iv_level
iv_minutes = iv_minutes
iv_riders = iv_riders ).
check_limits( iv_discipline = iv_discipline
iv_level = iv_level
iv_riders = iv_riders ).
DATA lv_periods TYPE i.
DATA lv_gross TYPE {{p}}if_ride_booking=>ty_amount.
lv_periods = iv_minutes DIV 30.
lv_gross = ( base_rate( iv_discipline ) + level_surcharge( iv_level ) ) * lv_periods.
rv_price = lv_gross * ( 100 - discount( iv_riders ) ) / 100.
ENDMETHOD.
METHOD check_input.
IF iv_rider_name IS INITIAL.
RAISE EXCEPTION TYPE {{p}}cx_ride_input
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-name.
ENDIF.
IF iv_discipline <> {{p}}if_ride_booking=>c_discipline-dressage
AND iv_discipline <> {{p}}if_ride_booking=>c_discipline-jumping
AND iv_discipline <> {{p}}if_ride_booking=>c_discipline-western
AND iv_discipline <> {{p}}if_ride_booking=>c_discipline-vaulting.
RAISE EXCEPTION TYPE {{p}}cx_ride_input
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-discipline.
ENDIF.
IF iv_level <> {{p}}if_ride_booking=>c_level-basic
AND iv_level <> {{p}}if_ride_booking=>c_level-light
AND iv_level <> {{p}}if_ride_booking=>c_level-medium
AND iv_level <> {{p}}if_ride_booking=>c_level-advanced.
RAISE EXCEPTION TYPE {{p}}cx_ride_input
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-level.
ENDIF.
IF iv_minutes < 30 OR iv_minutes > 120 OR iv_minutes MOD 30 <> 0.
RAISE EXCEPTION TYPE {{p}}cx_ride_input
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-minutes.
ENDIF.
IF iv_riders < 1 OR iv_riders > 6.
RAISE EXCEPTION TYPE {{p}}cx_ride_input
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-riders.
ENDIF.
ENDMETHOD.
METHOD check_limits.
IF iv_discipline = {{p}}if_ride_booking=>c_discipline-jumping
AND iv_level <> {{p}}if_ride_booking=>c_level-medium
AND iv_level <> {{p}}if_ride_booking=>c_level-advanced.
RAISE EXCEPTION TYPE {{p}}cx_ride_limit
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-show_level.
ENDIF.
IF iv_discipline = {{p}}if_ride_booking=>c_discipline-vaulting
AND iv_riders < 3.
RAISE EXCEPTION TYPE {{p}}cx_ride_limit
EXPORTING iv_reason = {{p}}if_ride_booking=>c_reason-volt_group.
ENDIF.
ENDMETHOD.
METHOD base_rate.
DATA(lt_rate) = VALUE tt_rate(
( discipline = {{p}}if_ride_booking=>c_discipline-dressage base = 20 )
( discipline = {{p}}if_ride_booking=>c_discipline-jumping base = 25 )
( discipline = {{p}}if_ride_booking=>c_discipline-western base = 18 )
( discipline = {{p}}if_ride_booking=>c_discipline-vaulting base = 15 ) ).
rv_rate = lt_rate[ discipline = iv_discipline ]-base.
ENDMETHOD.
METHOD level_surcharge.
CASE iv_level.
WHEN {{p}}if_ride_booking=>c_level-light.
rv_amount = 2.
WHEN {{p}}if_ride_booking=>c_level-medium.
rv_amount = 4.
WHEN {{p}}if_ride_booking=>c_level-advanced.
rv_amount = 6.
WHEN OTHERS.
rv_amount = 0.
ENDCASE.
ENDMETHOD.
METHOD discount.
CASE iv_riders.
WHEN 1 OR 2.
rv_percent = 0.
WHEN 3 OR 4.
rv_percent = 20.
WHEN OTHERS.
rv_percent = 40.
ENDCASE.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,143 @@
CLASS ltc_ride_booking DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}if_ride_booking.
METHODS setup.
METHODS exp_amount
IMPORTING iv_cents TYPE i
RETURNING VALUE(rv_amount) TYPE {{p}}if_ride_booking=>ty_amount.
METHODS price_basic_lesson FOR TESTING.
METHODS price_group_discount FOR TESTING.
METHODS empty_name_raises FOR TESTING.
METHODS unknown_discipline_raises FOR TESTING.
METHODS invalid_minutes_raises FOR TESTING.
METHODS jumping_needs_level FOR TESTING.
METHODS vaulting_needs_group FOR TESTING.
ENDCLASS.
CLASS ltc_ride_booking IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}ride_booking( ).
ENDMETHOD.
METHOD exp_amount.
DATA lv_amount TYPE {{p}}if_ride_booking=>ty_amount.
lv_amount = iv_cents.
rv_amount = lv_amount / 100.
ENDMETHOD.
METHOD price_basic_lesson.
TRY.
cl_abap_unit_assert=>assert_equals(
exp = exp_amount( 2000 )
act = mo_cut->book( iv_rider_name = `Anna`
iv_discipline = {{p}}if_ride_booking=>c_discipline-dressage
iv_level = {{p}}if_ride_booking=>c_level-basic
iv_minutes = 30
iv_riders = 1 ) ).
CATCH {{p}}cx_ride_booking.
cl_abap_unit_assert=>fail( 'exception not expected' ).
ENDTRY.
ENDMETHOD.
METHOD price_group_discount.
TRY.
cl_abap_unit_assert=>assert_equals(
exp = exp_amount( 5040 )
act = mo_cut->book( iv_rider_name = `Ben`
iv_discipline = {{p}}if_ride_booking=>c_discipline-vaulting
iv_level = {{p}}if_ride_booking=>c_level-advanced
iv_minutes = 120
iv_riders = 6 ) ).
CATCH {{p}}cx_ride_booking.
cl_abap_unit_assert=>fail( 'exception not expected' ).
ENDTRY.
ENDMETHOD.
METHOD empty_name_raises.
TRY.
mo_cut->book( iv_rider_name = ``
iv_discipline = {{p}}if_ride_booking=>c_discipline-dressage
iv_level = {{p}}if_ride_booking=>c_level-basic
iv_minutes = 30
iv_riders = 1 ).
cl_abap_unit_assert=>fail( 'exception expected' ).
CATCH {{p}}cx_ride_input INTO DATA(lx_input).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_ride_booking=>c_reason-name
act = lx_input->reason ).
CATCH {{p}}cx_ride_limit.
cl_abap_unit_assert=>fail( 'wrong exception' ).
ENDTRY.
ENDMETHOD.
METHOD unknown_discipline_raises.
TRY.
mo_cut->book( iv_rider_name = `Cara`
iv_discipline = 'XXXX'
iv_level = {{p}}if_ride_booking=>c_level-basic
iv_minutes = 30
iv_riders = 1 ).
cl_abap_unit_assert=>fail( 'exception expected' ).
CATCH {{p}}cx_ride_input INTO DATA(lx_input).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_ride_booking=>c_reason-discipline
act = lx_input->reason ).
CATCH {{p}}cx_ride_limit.
cl_abap_unit_assert=>fail( 'wrong exception' ).
ENDTRY.
ENDMETHOD.
METHOD invalid_minutes_raises.
TRY.
mo_cut->book( iv_rider_name = `Dana`
iv_discipline = {{p}}if_ride_booking=>c_discipline-western
iv_level = {{p}}if_ride_booking=>c_level-basic
iv_minutes = 20
iv_riders = 1 ).
cl_abap_unit_assert=>fail( 'exception expected' ).
CATCH {{p}}cx_ride_input INTO DATA(lx_input).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_ride_booking=>c_reason-minutes
act = lx_input->reason ).
CATCH {{p}}cx_ride_limit.
cl_abap_unit_assert=>fail( 'wrong exception' ).
ENDTRY.
ENDMETHOD.
METHOD jumping_needs_level.
TRY.
mo_cut->book( iv_rider_name = `Erik`
iv_discipline = {{p}}if_ride_booking=>c_discipline-jumping
iv_level = {{p}}if_ride_booking=>c_level-light
iv_minutes = 60
iv_riders = 1 ).
cl_abap_unit_assert=>fail( 'exception expected' ).
CATCH {{p}}cx_ride_input.
cl_abap_unit_assert=>fail( 'wrong exception' ).
CATCH {{p}}cx_ride_limit INTO DATA(lx_limit).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_ride_booking=>c_reason-show_level
act = lx_limit->reason ).
ENDTRY.
ENDMETHOD.
METHOD vaulting_needs_group.
TRY.
mo_cut->book( iv_rider_name = `Fiona`
iv_discipline = {{p}}if_ride_booking=>c_discipline-vaulting
iv_level = {{p}}if_ride_booking=>c_level-basic
iv_minutes = 60
iv_riders = 2 ).
cl_abap_unit_assert=>fail( 'exception expected' ).
CATCH {{p}}cx_ride_input.
cl_abap_unit_assert=>fail( 'wrong exception' ).
CATCH {{p}}cx_ride_limit INTO DATA(lx_limit).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_ride_booking=>c_reason-volt_group
act = lx_limit->reason ).
ENDTRY.
ENDMETHOD.
ENDCLASS.