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,106 @@
CLASS {{p}}sweep_pricer DEFINITION
PUBLIC
FINAL
CREATE PUBLIC.
PUBLIC SECTION.
TYPES:
ty_building TYPE c LENGTH 1,
ty_fee TYPE p LENGTH 8 DECIMALS 2.
METHODS calculate
IMPORTING iv_flues TYPE i
iv_building TYPE ty_building
iv_soot TYPE i
iv_express TYPE abap_bool
RETURNING VALUE(rv_fee) TYPE ty_fee.
PRIVATE SECTION.
CONSTANTS:
BEGIN OF c_building,
house TYPE ty_building VALUE 'H',
apartment TYPE ty_building VALUE 'A',
restaurant TYPE ty_building VALUE 'R',
END OF c_building,
c_rate_house TYPE ty_fee VALUE '45.00',
c_rate_apartment TYPE ty_fee VALUE '35.00',
c_rate_restaurant TYPE ty_fee VALUE '60.00',
c_express_fee TYPE ty_fee VALUE '25.00',
c_min_fee TYPE ty_fee VALUE '60.00',
c_no_fee TYPE ty_fee VALUE '0.00',
c_discount_pct TYPE i VALUE 10,
c_discount_flues TYPE i VALUE 4,
c_soot_min TYPE i VALUE 2,
c_soot_max TYPE i VALUE 5,
c_soot_step TYPE i VALUE 5.
METHODS rate_of
IMPORTING iv_building TYPE ty_building
RETURNING VALUE(rv_rate) TYPE ty_fee.
METHODS base_fee
IMPORTING iv_flues TYPE i
iv_rate TYPE ty_fee
RETURNING VALUE(rv_base) TYPE ty_fee.
METHODS soot_pct
IMPORTING iv_soot TYPE i
RETURNING VALUE(rv_pct) TYPE i.
ENDCLASS.
CLASS {{p}}sweep_pricer IMPLEMENTATION.
METHOD calculate.
IF iv_flues < 1.
rv_fee = c_no_fee.
RETURN.
ENDIF.
DATA(lv_rate) = rate_of( iv_building ).
IF lv_rate IS INITIAL.
rv_fee = c_no_fee.
RETURN.
ENDIF.
DATA(lv_fee) = base_fee( iv_flues = iv_flues
iv_rate = lv_rate ).
lv_fee = lv_fee + lv_fee * soot_pct( iv_soot ) / 100.
IF iv_express = abap_true.
lv_fee = lv_fee + c_express_fee.
ENDIF.
IF lv_fee < c_min_fee.
lv_fee = c_min_fee.
ENDIF.
rv_fee = lv_fee.
ENDMETHOD.
METHOD rate_of.
CASE iv_building.
WHEN c_building-house.
rv_rate = c_rate_house.
WHEN c_building-apartment.
rv_rate = c_rate_apartment.
WHEN c_building-restaurant.
rv_rate = c_rate_restaurant.
WHEN OTHERS.
rv_rate = c_no_fee.
ENDCASE.
ENDMETHOD.
METHOD base_fee.
rv_base = iv_flues * iv_rate.
IF iv_flues >= c_discount_flues.
rv_base = rv_base - rv_base * c_discount_pct / 100.
ENDIF.
ENDMETHOD.
METHOD soot_pct.
IF iv_soot < c_soot_min AND iv_soot <= c_soot_max.
rv_pct = ( iv_soot - 1 ) * c_soot_step.
ELSE.
rv_pct = 0.
ENDIF.
ENDMETHOD.
ENDCLASS.