erhan/abap-llm
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Stage 2 summary at 50 accepted trajectories

Browse Source 
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
Kral
2026-10-05 18:02:52 +02:00
parent 332fb4601d
commit 5bcd1bf9cd
1230 changed files with 77563 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

51
tasks_gen/train/G1119/reference/bind_fee.func.abap Normal file
View File

@@ -0,0 +1,51 @@
FUNCTION {{p}}bind_fee
IMPORTING
iv_binding TYPE string
iv_pages TYPE i
iv_member TYPE abap_bool
EXPORTING
ev_rush TYPE abap_bool
CHANGING
cv_fee TYPE decfloat34
EXCEPTIONS
invalid_pages.
CONSTANTS: lc_rate_pb TYPE decfloat34 VALUE '0.05',
lc_rate_hb TYPE decfloat34 VALUE '0.12',
lc_rate_ex TYPE decfloat34 VALUE '0.20',
lc_min_hb TYPE decfloat34 VALUE '15.00',
lc_discount TYPE decfloat34 VALUE '0.9'.
ev_rush = abap_false.
IF iv_pages < 1.
RAISE invalid_pages.
ENDIF.
CASE iv_binding.
WHEN 'PB'.
cv_fee = round( val = iv_pages * lc_rate_pb
dec = 2
mode = cl_abap_math=>round_half_up ).
WHEN 'HB'.
cv_fee = round( val = iv_pages * lc_rate_hb
dec = 2
mode = cl_abap_math=>round_half_up ).
IF cv_fee < lc_min_hb.
cv_fee = lc_min_hb.
ENDIF.
WHEN 'EX'.
ev_rush = abap_true.
cv_fee = round( val = iv_pages * lc_rate_ex
dec = 2
mode = cl_abap_math=>round_half_up ).
WHEN OTHERS.
cv_fee = 0.
ENDCASE.
IF iv_member = abap_true AND cv_fee > 0.
cv_fee = round( val = cv_fee * lc_discount
dec = 2
mode = cl_abap_math=>round_half_up ).
ENDIF.
ENDFUNCTION.

89
tasks_gen/train/G1119/reference/bind_test.clas.abap Normal file
View File

@@ -0,0 +1,89 @@
CLASS {{p}}bind_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS fee_for
IMPORTING iv_binding TYPE string
iv_pages TYPE i
iv_member TYPE abap_bool DEFAULT abap_false
RETURNING VALUE(rv_fee) TYPE decfloat34.
METHODS paperback_fee FOR TESTING.
METHODS hardback_minimum FOR TESTING.
METHODS member_discount FOR TESTING.
METHODS express_sets_rush FOR TESTING.
METHODS other_type_zero FOR TESTING.
METHODS invalid_pages FOR TESTING.
ENDCLASS.
CLASS {{p}}bind_test IMPLEMENTATION.
METHOD fee_for.
DATA lv_rush TYPE abap_bool.
CALL FUNCTION '{{P}}BIND_FEE'
EXPORTING
iv_binding = iv_binding
iv_pages = iv_pages
iv_member = iv_member
IMPORTING
ev_rush = lv_rush
CHANGING
cv_fee = rv_fee
EXCEPTIONS
invalid_pages = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
ENDMETHOD.
METHOD paperback_fee.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '10.00' )
act = fee_for( iv_binding = `PB` iv_pages = 200 ) ).
ENDMETHOD.
METHOD hardback_minimum.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '15.00' )
act = fee_for( iv_binding = `HB` iv_pages = 50 ) ).
ENDMETHOD.
METHOD member_discount.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '9.00' )
act = fee_for( iv_binding = `PB` iv_pages = 200 iv_member = abap_true ) ).
ENDMETHOD.
METHOD express_sets_rush.
DATA lv_rush TYPE abap_bool.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}BIND_FEE'
EXPORTING
iv_binding = `EX`
iv_pages = 10
iv_member = abap_false
IMPORTING
ev_rush = lv_rush
CHANGING
cv_fee = lv_fee.
cl_abap_unit_assert=>assert_true( lv_rush ).
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '2.00' ) act = lv_fee ).
ENDMETHOD.
METHOD other_type_zero.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( 0 )
act = fee_for( iv_binding = `XX` iv_pages = 100 ) ).
ENDMETHOD.
METHOD invalid_pages.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}BIND_FEE'
EXPORTING
iv_binding = `PB`
iv_pages = 0
CHANGING
cv_fee = lv_fee
EXCEPTIONS
invalid_pages = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
ENDMETHOD.
ENDCLASS.