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,126 @@
CLASS ltc_quote_merger DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}quote_merger.
METHODS setup.
METHODS merges_two_lists FOR TESTING.
METHODS keeps_lowest_price FOR TESTING.
METHODS breaks_tie_by_supplier FOR TESTING.
METHODS counts_all_quotes FOR TESTING.
METHODS rejects_invalid_rows FOR TESTING.
METHODS sorts_by_material FOR TESTING.
ENDCLASS.
CLASS ltc_quote_merger IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}quote_merger( ).
ENDMETHOD.
METHOD merges_two_lists.
DATA lt_quotes_a TYPE {{p}}quote_merger=>tt_quote.
DATA lt_quotes_b TYPE {{p}}quote_merger=>tt_quote.
DATA lt_result TYPE {{p}}quote_merger=>tt_result.
DATA lv_rejected TYPE i.
lt_quotes_a = VALUE #( ( material = 'MAT-1' supplier = 'ALPHA' price = '10.00' ) ).
lt_quotes_b = VALUE #( ( material = 'MAT-2' supplier = 'BETA' price = '20.00' ) ).
mo_cut->merge( EXPORTING it_quotes_a = lt_quotes_a
it_quotes_b = lt_quotes_b
IMPORTING et_result = lt_result
ev_rejected = lv_rejected ).
cl_abap_unit_assert=>assert_equals( exp = 2 act = lines( lt_result ) ).
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rejected ).
ENDMETHOD.
METHOD keeps_lowest_price.
DATA lt_quotes_a TYPE {{p}}quote_merger=>tt_quote.
DATA lt_quotes_b TYPE {{p}}quote_merger=>tt_quote.
DATA lt_result TYPE {{p}}quote_merger=>tt_result.
DATA lv_rejected TYPE i.
lt_quotes_a = VALUE #( ( material = 'MAT-1' supplier = 'ALPHA' price = '10.00' ) ).
lt_quotes_b = VALUE #( ( material = 'MAT-1' supplier = 'BETA' price = '8.00' ) ).
mo_cut->merge( EXPORTING it_quotes_a = lt_quotes_a
it_quotes_b = lt_quotes_b
IMPORTING et_result = lt_result
ev_rejected = lv_rejected ).
cl_abap_unit_assert=>assert_equals( exp = 'BETA' act = lt_result[ 1 ]-supplier ).
cl_abap_unit_assert=>assert_equals( exp = 2 act = lt_result[ 1 ]-quote_count ).
ENDMETHOD.
METHOD breaks_tie_by_supplier.
DATA lt_quotes_a TYPE {{p}}quote_merger=>tt_quote.
DATA lt_quotes_b TYPE {{p}}quote_merger=>tt_quote.
DATA lt_result TYPE {{p}}quote_merger=>tt_result.
DATA lv_rejected TYPE i.
lt_quotes_a = VALUE #( ( material = 'MAT-1' supplier = 'BETA' price = '10.00' ) ).
lt_quotes_b = VALUE #( ( material = 'MAT-1' supplier = 'ALPHA' price = '10.00' ) ).
mo_cut->merge( EXPORTING it_quotes_a = lt_quotes_a
it_quotes_b = lt_quotes_b
IMPORTING et_result = lt_result
ev_rejected = lv_rejected ).
cl_abap_unit_assert=>assert_equals( exp = 'ALPHA' act = lt_result[ 1 ]-supplier ).
ENDMETHOD.
METHOD counts_all_quotes.
DATA lt_quotes_a TYPE {{p}}quote_merger=>tt_quote.
DATA lt_quotes_b TYPE {{p}}quote_merger=>tt_quote.
DATA lt_result TYPE {{p}}quote_merger=>tt_result.
DATA lv_rejected TYPE i.
lt_quotes_a = VALUE #( ( material = 'MAT-1' supplier = 'ALPHA' price = '10.00' )
( material = 'MAT-1' supplier = 'ALPHA' price = '10.00' ) ).
lt_quotes_b = VALUE #( ( material = 'MAT-1' supplier = 'BETA' price = '12.00' ) ).
mo_cut->merge( EXPORTING it_quotes_a = lt_quotes_a
it_quotes_b = lt_quotes_b
IMPORTING et_result = lt_result
ev_rejected = lv_rejected ).
cl_abap_unit_assert=>assert_equals( exp = 3 act = lt_result[ 1 ]-quote_count ).
ENDMETHOD.
METHOD rejects_invalid_rows.
DATA lt_quotes_a TYPE {{p}}quote_merger=>tt_quote.
DATA lt_quotes_b TYPE {{p}}quote_merger=>tt_quote.
DATA lt_result TYPE {{p}}quote_merger=>tt_result.
DATA lv_rejected TYPE i.
lt_quotes_a = VALUE #( ( material = 'MAT-1' supplier = 'ALPHA' price = '0.00' ) ).
lt_quotes_b = VALUE #( ( material = '' supplier = 'BETA' price = '5.00' ) ).
mo_cut->merge( EXPORTING it_quotes_a = lt_quotes_a
it_quotes_b = lt_quotes_b
IMPORTING et_result = lt_result
ev_rejected = lv_rejected ).
cl_abap_unit_assert=>assert_equals( exp = 0 act = lines( lt_result ) ).
cl_abap_unit_assert=>assert_equals( exp = 2 act = lv_rejected ).
ENDMETHOD.
METHOD sorts_by_material.
DATA lt_quotes_a TYPE {{p}}quote_merger=>tt_quote.
DATA lt_quotes_b TYPE {{p}}quote_merger=>tt_quote.
DATA lt_result TYPE {{p}}quote_merger=>tt_result.
DATA lv_rejected TYPE i.
lt_quotes_a = VALUE #( ( material = 'MAT-3' supplier = 'ALPHA' price = '10.00' )
( material = 'MAT-1' supplier = 'BETA' price = '11.00' ) ).
lt_quotes_b = VALUE #( ( material = 'MAT-2' supplier = 'GAMMA' price = '12.00' ) ).
mo_cut->merge( EXPORTING it_quotes_a = lt_quotes_a
it_quotes_b = lt_quotes_b
IMPORTING et_result = lt_result
ev_rejected = lv_rejected ).
cl_abap_unit_assert=>assert_equals( exp = 'MAT-1' act = lt_result[ 1 ]-material ).
cl_abap_unit_assert=>assert_equals( exp = 'MAT-3' act = lt_result[ 3 ]-material ).
ENDMETHOD.
ENDCLASS.