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:
48
tasks_gen/train/G1305/reference/ad_price.func.abap
Normal file
48
tasks_gen/train/G1305/reference/ad_price.func.abap
Normal file
@@ -0,0 +1,48 @@
|
||||
FUNCTION {{p}}ad_price
|
||||
IMPORTING
|
||||
iv_lines TYPE i
|
||||
iv_insertions TYPE i
|
||||
iv_photo TYPE abap_bool
|
||||
EXPORTING
|
||||
ev_price TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_lines
|
||||
invalid_insertions.
|
||||
|
||||
CONSTANTS lc_line_rate TYPE decfloat34 VALUE '12.45'.
|
||||
CONSTANTS lc_photo_fee TYPE decfloat34 VALUE '25.00'.
|
||||
CONSTANTS lc_min_price TYPE decfloat34 VALUE '20.00'.
|
||||
|
||||
DATA lv_price TYPE decfloat34.
|
||||
DATA lv_discount TYPE decfloat34.
|
||||
|
||||
IF iv_lines < 1.
|
||||
RAISE invalid_lines.
|
||||
ENDIF.
|
||||
|
||||
IF iv_insertions < 1.
|
||||
RAISE invalid_insertions.
|
||||
ENDIF.
|
||||
|
||||
lv_price = iv_lines * lc_line_rate.
|
||||
IF iv_photo = abap_true.
|
||||
lv_price = lv_price + lc_photo_fee.
|
||||
ENDIF.
|
||||
|
||||
lv_discount = 0.
|
||||
IF iv_insertions >= 6.
|
||||
lv_discount = 20.
|
||||
ELSEIF iv_insertions >= 3.
|
||||
lv_discount = 10.
|
||||
ENDIF.
|
||||
|
||||
lv_price = lv_price * ( 100 - lv_discount ) / 100.
|
||||
lv_price = round( val = lv_price dec = 2 ).
|
||||
|
||||
IF lv_price < lc_min_price.
|
||||
lv_price = lc_min_price.
|
||||
ENDIF.
|
||||
|
||||
ev_price = lv_price.
|
||||
|
||||
ENDFUNCTION.
|
||||
92
tasks_gen/train/G1305/reference/ad_test.clas.abap
Normal file
92
tasks_gen/train/G1305/reference/ad_test.clas.abap
Normal file
@@ -0,0 +1,92 @@
|
||||
CLASS {{p}}ad_test DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
CONSTANTS lc_price_2490 TYPE decfloat34 VALUE '24.90'.
|
||||
CONSTANTS lc_price_4980 TYPE decfloat34 VALUE '49.80'.
|
||||
CONSTANTS lc_price_4482 TYPE decfloat34 VALUE '44.82'.
|
||||
CONSTANTS lc_price_6980 TYPE decfloat34 VALUE '69.80'.
|
||||
CONSTANTS lc_price_2000 TYPE decfloat34 VALUE '20.00'.
|
||||
METHODS call
|
||||
IMPORTING iv_lines TYPE i
|
||||
iv_insertions TYPE i
|
||||
iv_photo TYPE abap_bool DEFAULT abap_false
|
||||
EXPORTING ev_price TYPE decfloat34
|
||||
ev_subrc TYPE sysubrc.
|
||||
METHODS assert_price
|
||||
IMPORTING iv_expected TYPE decfloat34
|
||||
iv_actual TYPE decfloat34.
|
||||
METHODS line_price FOR TESTING.
|
||||
METHODS no_discount_short FOR TESTING.
|
||||
METHODS discount_ten_pct FOR TESTING.
|
||||
METHODS photo_and_discount FOR TESTING.
|
||||
METHODS minimum_price FOR TESTING.
|
||||
METHODS invalid_input FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}ad_test IMPLEMENTATION.
|
||||
METHOD call.
|
||||
ev_price = 0.
|
||||
CALL FUNCTION '{{P}}AD_PRICE'
|
||||
EXPORTING
|
||||
iv_lines = iv_lines
|
||||
iv_insertions = iv_insertions
|
||||
iv_photo = iv_photo
|
||||
IMPORTING
|
||||
ev_price = ev_price
|
||||
EXCEPTIONS
|
||||
invalid_lines = 1
|
||||
invalid_insertions = 2
|
||||
OTHERS = 3.
|
||||
ev_subrc = sy-subrc.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD assert_price.
|
||||
cl_abap_unit_assert=>assert_equals( exp = iv_expected act = iv_actual ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD line_price.
|
||||
DATA lv_price TYPE decfloat34.
|
||||
DATA lv_rc TYPE sysubrc.
|
||||
call( EXPORTING iv_lines = 2 iv_insertions = 1
|
||||
IMPORTING ev_price = lv_price ev_subrc = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rc ).
|
||||
assert_price( iv_expected = lc_price_2490 iv_actual = lv_price ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD no_discount_short.
|
||||
DATA lv_price TYPE decfloat34.
|
||||
call( EXPORTING iv_lines = 4 iv_insertions = 2
|
||||
IMPORTING ev_price = lv_price ).
|
||||
assert_price( iv_expected = lc_price_4980 iv_actual = lv_price ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD discount_ten_pct.
|
||||
DATA lv_price TYPE decfloat34.
|
||||
call( EXPORTING iv_lines = 4 iv_insertions = 3
|
||||
IMPORTING ev_price = lv_price ).
|
||||
assert_price( iv_expected = lc_price_4482 iv_actual = lv_price ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD photo_and_discount.
|
||||
DATA lv_price TYPE decfloat34.
|
||||
call( EXPORTING iv_lines = 5 iv_insertions = 6 iv_photo = abap_true
|
||||
IMPORTING ev_price = lv_price ).
|
||||
assert_price( iv_expected = lc_price_6980 iv_actual = lv_price ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD minimum_price.
|
||||
DATA lv_price TYPE decfloat34.
|
||||
call( EXPORTING iv_lines = 1 iv_insertions = 1
|
||||
IMPORTING ev_price = lv_price ).
|
||||
assert_price( iv_expected = lc_price_2000 iv_actual = lv_price ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_input.
|
||||
DATA lv_price TYPE decfloat34.
|
||||
DATA lv_rc TYPE sysubrc.
|
||||
call( EXPORTING iv_lines = 0 iv_insertions = 1
|
||||
IMPORTING ev_price = lv_price ev_subrc = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user