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,25 @@
CLASS {{p}}cx_bad_departure DEFINITION
PUBLIC
FINAL
INHERITING FROM {{p}}cx_holiday_error
CREATE PUBLIC.
PUBLIC SECTION.
DATA mv_departure TYPE d READ-ONLY.
DATA mv_earliest TYPE d READ-ONLY.
METHODS constructor
IMPORTING iv_departure TYPE d
iv_earliest TYPE d.
PRIVATE SECTION.
ENDCLASS.
CLASS {{p}}cx_bad_departure IMPLEMENTATION.
METHOD constructor.
super->constructor( iv_message = 'Departure date is too early' ).
mv_departure = iv_departure.
mv_earliest = iv_earliest.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,22 @@
CLASS {{p}}cx_bad_nights DEFINITION
PUBLIC
FINAL
INHERITING FROM {{p}}cx_holiday_error
CREATE PUBLIC.
PUBLIC SECTION.
DATA mv_nights TYPE i READ-ONLY.
METHODS constructor
IMPORTING iv_nights TYPE i.
PRIVATE SECTION.
ENDCLASS.
CLASS {{p}}cx_bad_nights IMPLEMENTATION.
METHOD constructor.
super->constructor( iv_message = 'Number of nights is not allowed' ).
mv_nights = iv_nights.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,25 @@
CLASS {{p}}cx_bad_travellers DEFINITION
PUBLIC
FINAL
INHERITING FROM {{p}}cx_holiday_error
CREATE PUBLIC.
PUBLIC SECTION.
DATA mv_travellers TYPE i READ-ONLY.
DATA mv_max TYPE i READ-ONLY.
METHODS constructor
IMPORTING iv_travellers TYPE i
iv_max TYPE i.
PRIVATE SECTION.
ENDCLASS.
CLASS {{p}}cx_bad_travellers IMPLEMENTATION.
METHOD constructor.
super->constructor( iv_message = 'Number of travellers is not allowed' ).
mv_travellers = iv_travellers.
mv_max = iv_max.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,22 @@
CLASS {{p}}cx_unknown_dest DEFINITION
PUBLIC
FINAL
INHERITING FROM {{p}}cx_holiday_error
CREATE PUBLIC.
PUBLIC SECTION.
DATA mv_dest TYPE string READ-ONLY.
METHODS constructor
IMPORTING iv_dest TYPE string.
PRIVATE SECTION.
ENDCLASS.
CLASS {{p}}cx_unknown_dest IMPLEMENTATION.
METHOD constructor.
super->constructor( iv_message = 'Destination is not offered' ).
mv_dest = iv_dest.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,109 @@
CLASS {{p}}holiday_checker DEFINITION
PUBLIC
FINAL
CREATE PUBLIC.
PUBLIC SECTION.
TYPES ty_dest_code TYPE string.
TYPES:
BEGIN OF ty_booking,
dest_code TYPE ty_dest_code,
travellers TYPE i,
nights TYPE i,
departure TYPE d,
END OF ty_booking.
METHODS check
IMPORTING is_booking TYPE ty_booking
iv_today TYPE d
RAISING {{p}}cx_holiday_error.
PRIVATE SECTION.
CONSTANTS:
c_min_travellers TYPE i VALUE 1,
c_min_nights TYPE i VALUE 2,
c_max_nights TYPE i VALUE 28,
c_lead_days TYPE i VALUE 14.
METHODS normalize
IMPORTING iv_code TYPE ty_dest_code
RETURNING VALUE(rv_code) TYPE ty_dest_code.
METHODS max_travellers
IMPORTING iv_code TYPE ty_dest_code
RETURNING VALUE(rv_max) TYPE i
RAISING {{p}}cx_unknown_dest.
METHODS check_travellers
IMPORTING is_booking TYPE ty_booking
iv_max TYPE i
RAISING {{p}}cx_holiday_error.
METHODS check_nights
IMPORTING is_booking TYPE ty_booking
RAISING {{p}}cx_holiday_error.
METHODS check_departure
IMPORTING is_booking TYPE ty_booking
iv_today TYPE d
RAISING {{p}}cx_holiday_error.
ENDCLASS.
CLASS {{p}}holiday_checker IMPLEMENTATION.
METHOD check.
DATA(lv_code) = normalize( is_booking-dest_code ).
DATA(lv_max) = max_travellers( lv_code ).
check_travellers( is_booking = is_booking iv_max = lv_max ).
check_nights( is_booking ).
check_departure( is_booking = is_booking iv_today = iv_today ).
ENDMETHOD.
METHOD normalize.
rv_code = to_upper( replace( val = iv_code sub = ` ` with = `` occ = 0 ) ).
ENDMETHOD.
METHOD max_travellers.
CASE iv_code.
WHEN 'ALPS'.
rv_max = 6.
WHEN 'CRETE'.
rv_max = 4.
WHEN 'KYOTO'.
rv_max = 8.
WHEN 'LAPLAND'.
rv_max = 5.
WHEN 'SAFARI'.
rv_max = 7.
WHEN OTHERS.
RAISE EXCEPTION TYPE {{p}}cx_unknown_dest EXPORTING iv_dest = iv_code.
ENDCASE.
ENDMETHOD.
METHOD check_travellers.
IF is_booking-travellers < c_min_travellers
OR is_booking-travellers > iv_max.
RAISE EXCEPTION TYPE {{p}}cx_bad_travellers
EXPORTING iv_travellers = is_booking-travellers
iv_max = iv_max.
ENDIF.
ENDMETHOD.
METHOD check_nights.
IF is_booking-nights < c_min_nights OR is_booking-nights > c_max_nights.
RAISE EXCEPTION TYPE {{p}}cx_bad_nights
EXPORTING iv_nights = is_booking-nights.
ENDIF.
ENDMETHOD.
METHOD check_departure.
DATA lv_earliest TYPE d.
lv_earliest = iv_today + c_lead_days.
IF is_booking-departure < lv_earliest.
RAISE EXCEPTION TYPE {{p}}cx_bad_departure
EXPORTING iv_departure = is_booking-departure
iv_earliest = lv_earliest.
ENDIF.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,115 @@
CLASS ltc_holiday_checker DEFINITION FINAL FOR TESTING
DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
CONSTANTS c_today TYPE d VALUE '20260101'.
DATA mo_cut TYPE REF TO {{p}}holiday_checker.
METHODS setup.
METHODS valid_booking FOR TESTING.
METHODS minimum_values FOR TESTING.
METHODS unknown_destination FOR TESTING.
METHODS too_many_travellers FOR TESTING.
METHODS bad_nights FOR TESTING.
METHODS early_departure FOR TESTING.
ENDCLASS.
CLASS ltc_holiday_checker IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}holiday_checker( ).
ENDMETHOD.
METHOD valid_booking.
DATA(lv_done) = abap_false.
TRY.
mo_cut->check( is_booking = VALUE #( dest_code = 'KYOTO'
travellers = 8
nights = 10
departure = '20260301' )
iv_today = c_today ).
lv_done = abap_true.
CATCH {{p}}cx_holiday_error INTO DATA(lx).
cl_abap_unit_assert=>fail( |Unexpected exception: { lx->mv_message }| ).
ENDTRY.
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_done ).
ENDMETHOD.
METHOD minimum_values.
DATA(lv_done) = abap_false.
TRY.
mo_cut->check( is_booking = VALUE #( dest_code = 'LAPLAND'
travellers = 1
nights = 2
departure = '20260115' )
iv_today = c_today ).
lv_done = abap_true.
CATCH {{p}}cx_holiday_error INTO DATA(lx).
cl_abap_unit_assert=>fail( |Unexpected exception: { lx->mv_message }| ).
ENDTRY.
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_done ).
ENDMETHOD.
METHOD unknown_destination.
TRY.
mo_cut->check( is_booking = VALUE #( dest_code = 'MARS'
travellers = 2
nights = 7
departure = '20260301' )
iv_today = c_today ).
cl_abap_unit_assert=>fail( 'CX_UNKNOWN_DEST expected' ).
CATCH {{p}}cx_unknown_dest INTO DATA(lx).
cl_abap_unit_assert=>assert_equals( exp = `MARS` act = lx->mv_dest ).
CATCH {{p}}cx_holiday_error.
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
ENDTRY.
ENDMETHOD.
METHOD too_many_travellers.
TRY.
mo_cut->check( is_booking = VALUE #( dest_code = 'SAFARI'
travellers = 8
nights = 7
departure = '20260301' )
iv_today = c_today ).
cl_abap_unit_assert=>fail( 'CX_BAD_TRAVELLERS expected' ).
CATCH {{p}}cx_bad_travellers INTO DATA(lx).
cl_abap_unit_assert=>assert_equals( exp = 8 act = lx->mv_travellers ).
cl_abap_unit_assert=>assert_equals( exp = 7 act = lx->mv_max ).
CATCH {{p}}cx_holiday_error.
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
ENDTRY.
ENDMETHOD.
METHOD bad_nights.
TRY.
mo_cut->check( is_booking = VALUE #( dest_code = 'ALPS'
travellers = 2
nights = 30
departure = '20260301' )
iv_today = c_today ).
cl_abap_unit_assert=>fail( 'CX_BAD_NIGHTS expected' ).
CATCH {{p}}cx_bad_nights INTO DATA(lx).
cl_abap_unit_assert=>assert_equals( exp = 30 act = lx->mv_nights ).
CATCH {{p}}cx_holiday_error.
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
ENDTRY.
ENDMETHOD.
METHOD early_departure.
TRY.
mo_cut->check( is_booking = VALUE #( dest_code = 'CRETE'
travellers = 2
nights = 7
departure = '20260110' )
iv_today = c_today ).
cl_abap_unit_assert=>fail( 'CX_BAD_DEPARTURE expected' ).
CATCH {{p}}cx_bad_departure INTO DATA(lx).
cl_abap_unit_assert=>assert_equals( exp = CONV d( '20260115' )
act = lx->mv_earliest ).
CATCH {{p}}cx_holiday_error.
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
ENDTRY.
ENDMETHOD.
ENDCLASS.