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:
45
tasks_gen/train/G1314/reference/guard_fee.func.abap
Normal file
45
tasks_gen/train/G1314/reference/guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
IF iv_hours <= 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 2 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true AND cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
68
tasks_gen/train/G1314/reference/t88_test.clas.abap
Normal file
68
tasks_gen/train/G1314/reference/t88_test.clas.abap
Normal file
@@ -0,0 +1,68 @@
|
||||
CLASS {{p}}t88_test DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
METHODS fee_for
|
||||
IMPORTING iv_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
RETURNING VALUE(rv_fee) TYPE decfloat34.
|
||||
METHODS day_fee FOR TESTING.
|
||||
METHODS night_fee FOR TESTING.
|
||||
METHODS holiday_fee FOR TESTING.
|
||||
METHODS minimum_fee FOR TESTING.
|
||||
METHODS invalid_hours FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}t88_test IMPLEMENTATION.
|
||||
METHOD fee_for.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
CALL FUNCTION '{{P}}GUARD_FEE'
|
||||
EXPORTING
|
||||
iv_shift_type = iv_type
|
||||
iv_hours = iv_hours
|
||||
IMPORTING
|
||||
ev_surcharge = lv_skip
|
||||
CHANGING
|
||||
cv_fee = rv_fee
|
||||
EXCEPTIONS
|
||||
invalid_hours = 1
|
||||
OTHERS = 2.
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = sy-subrc ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD day_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '102.00'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'DAY' iv_hours = 4 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD night_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '127.50'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'NIGHT' iv_hours = 4 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD holiday_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '204.00'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'HOLIDAY' iv_hours = 4 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD minimum_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '50.00'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'DAY' iv_hours = 1 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_hours.
|
||||
DATA lv_fee TYPE decfloat34 VALUE '7.00'.
|
||||
DATA lv_expected TYPE decfloat34 VALUE '7.00'.
|
||||
CALL FUNCTION '{{P}}GUARD_FEE'
|
||||
EXPORTING
|
||||
iv_shift_type = 'DAY'
|
||||
iv_hours = 0
|
||||
CHANGING
|
||||
cv_fee = lv_fee
|
||||
EXCEPTIONS
|
||||
invalid_hours = 1
|
||||
OTHERS = 2.
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_expected act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user