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,28 @@
CLASS {{p}}cx_return_error DEFINITION PUBLIC INHERITING FROM cx_static_check FINAL CREATE PUBLIC.
PUBLIC SECTION.
TYPES ty_reason TYPE c LENGTH 10.
CONSTANTS:
BEGIN OF c_reason,
no_data TYPE ty_reason VALUE 'NO_DATA',
date_order TYPE ty_reason VALUE 'DATE_ORDER',
mileage TYPE ty_reason VALUE 'MILEAGE',
fuel TYPE ty_reason VALUE 'FUEL',
damage TYPE ty_reason VALUE 'DAMAGE',
unknown TYPE ty_reason VALUE 'UNKNOWN',
too_long TYPE ty_reason VALUE 'TOO_LONG',
END OF c_reason.
DATA mv_reason TYPE ty_reason READ-ONLY.
METHODS constructor
IMPORTING iv_reason TYPE ty_reason.
ENDCLASS.
CLASS {{p}}cx_return_error IMPLEMENTATION.
METHOD constructor.
super->constructor( ).
mv_reason = iv_reason.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,86 @@
CLASS {{p}}return_checker DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
TYPES:
BEGIN OF ty_return_data,
rental_id TYPE string,
vehicle_id TYPE string,
start_date TYPE d,
return_date TYPE d,
start_mileage TYPE i,
end_mileage TYPE i,
fuel_percent TYPE i,
damage_code TYPE string,
is_damaged TYPE abap_bool,
END OF ty_return_data.
METHODS constructor.
METHODS check
IMPORTING is_return_data TYPE ty_return_data
RAISING {{p}}cx_return_error.
PRIVATE SECTION.
METHODS has_missing_data
IMPORTING is_return_data TYPE ty_return_data
RETURNING VALUE(rv_missing) TYPE abap_bool.
METHODS duration_in_days
IMPORTING is_return_data TYPE ty_return_data
RETURNING VALUE(rv_days) TYPE i.
ENDCLASS.
CLASS {{p}}return_checker IMPLEMENTATION.
METHOD constructor.
ENDMETHOD.
METHOD check.
IF has_missing_data( is_return_data ) = abap_true.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-no_data.
ENDIF.
IF is_return_data-return_date < is_return_data-start_date.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-date_order.
ENDIF.
IF is_return_data-end_mileage < is_return_data-start_mileage.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-mileage.
ENDIF.
IF is_return_data-fuel_percent < 0 OR is_return_data-fuel_percent > 100.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-fuel.
ENDIF.
IF is_return_data-is_damaged = abap_true AND is_return_data-damage_code IS INITIAL.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-damage.
ENDIF.
DATA lv_max_days TYPE i.
SELECT SINGLE max_days FROM {{p}}vehicle
WHERE vehicle_id = @is_return_data-vehicle_id
INTO @lv_max_days.
IF sy-subrc <> 0.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-unknown.
ENDIF.
IF duration_in_days( is_return_data ) > lv_max_days.
RAISE EXCEPTION TYPE {{p}}cx_return_error
EXPORTING iv_reason = {{p}}cx_return_error=>c_reason-too_long.
ENDIF.
ENDMETHOD.
METHOD has_missing_data.
rv_missing = xsdbool( is_return_data-rental_id IS INITIAL
OR is_return_data-vehicle_id IS INITIAL
OR is_return_data-start_date IS INITIAL
OR is_return_data-return_date IS INITIAL ).
ENDMETHOD.
METHOD duration_in_days.
rv_days = is_return_data-return_date - is_return_data-start_date + 1.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,99 @@
CLASS ltc_return_checker DEFINITION FINAL FOR TESTING
DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}return_checker.
DATA mo_env TYPE REF TO if_osql_test_environment.
METHODS setup.
METHODS teardown.
METHODS test_return
RETURNING VALUE(rs_return) TYPE {{p}}return_checker=>ty_return_data.
METHODS valid_return_is_accepted FOR TESTING.
METHODS missing_rental_id_is_rejected FOR TESTING.
METHODS unknown_vehicle_is_rejected FOR TESTING.
METHODS too_long_rental_is_rejected FOR TESTING.
METHODS damage_without_code_fails FOR TESTING.
ENDCLASS.
CLASS ltc_return_checker IMPLEMENTATION.
METHOD setup.
mo_env = cl_osql_test_environment=>create( VALUE #( ( '{{P}}VEHICLE' ) ) ).
DATA lt_vehicle TYPE STANDARD TABLE OF {{p}}vehicle WITH EMPTY KEY.
lt_vehicle = VALUE #( ( mandt = sy-mandt
vehicle_id = 'V-1001'
max_days = 5 ) ).
mo_env->insert_test_data( lt_vehicle ).
mo_cut = NEW {{p}}return_checker( ).
ENDMETHOD.
METHOD teardown.
mo_env->destroy( ).
ENDMETHOD.
METHOD test_return.
rs_return = VALUE #( rental_id = 'R-4711'
vehicle_id = 'V-1001'
start_date = '20240101'
return_date = '20240103'
start_mileage = 10000
end_mileage = 10250
fuel_percent = 80
damage_code = ''
is_damaged = abap_false ).
ENDMETHOD.
METHOD valid_return_is_accepted.
TRY.
mo_cut->check( test_return( ) ).
CATCH {{p}}cx_return_error INTO DATA(lo_error).
cl_abap_unit_assert=>fail( msg = |unexpected reason { lo_error->mv_reason }| ).
ENDTRY.
ENDMETHOD.
METHOD missing_rental_id_is_rejected.
DATA(ls_return) = test_return( ).
CLEAR ls_return-rental_id.
TRY.
mo_cut->check( ls_return ).
cl_abap_unit_assert=>fail( msg = 'NO_DATA expected' ).
CATCH {{p}}cx_return_error INTO DATA(lo_error).
cl_abap_unit_assert=>assert_equals( exp = 'NO_DATA' act = lo_error->mv_reason ).
ENDTRY.
ENDMETHOD.
METHOD unknown_vehicle_is_rejected.
DATA(ls_return) = test_return( ).
ls_return-vehicle_id = 'V-9999'.
TRY.
mo_cut->check( ls_return ).
cl_abap_unit_assert=>fail( msg = 'UNKNOWN expected' ).
CATCH {{p}}cx_return_error INTO DATA(lo_error).
cl_abap_unit_assert=>assert_equals( exp = 'UNKNOWN' act = lo_error->mv_reason ).
ENDTRY.
ENDMETHOD.
METHOD too_long_rental_is_rejected.
DATA(ls_return) = test_return( ).
ls_return-return_date = '20240120'.
TRY.
mo_cut->check( ls_return ).
cl_abap_unit_assert=>fail( msg = 'TOO_LONG expected' ).
CATCH {{p}}cx_return_error INTO DATA(lo_error).
cl_abap_unit_assert=>assert_equals( exp = 'TOO_LONG' act = lo_error->mv_reason ).
ENDTRY.
ENDMETHOD.
METHOD damage_without_code_fails.
DATA(ls_return) = test_return( ).
ls_return-is_damaged = abap_true.
CLEAR ls_return-damage_code.
TRY.
mo_cut->check( ls_return ).
cl_abap_unit_assert=>fail( msg = 'DAMAGE expected' ).
CATCH {{p}}cx_return_error INTO DATA(lo_error).
cl_abap_unit_assert=>assert_equals( exp = 'DAMAGE' act = lo_error->mv_reason ).
ENDTRY.
ENDMETHOD.
ENDCLASS.