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

73
tasks_gen/train/G1115/reference/t14_test.clas.abap Normal file
View File

@@ -0,0 +1,73 @@
CLASS {{p}}t14_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS fee_for
IMPORTING iv_pair TYPE string
iv_words TYPE i
iv_express TYPE abap_bool
iv_cert TYPE abap_bool
RETURNING VALUE(rv_fee) TYPE decfloat34.
METHODS minimum_charge FOR TESTING.
METHODS tier_discount FOR TESTING.
METHODS express_surcharge FOR TESTING.
METHODS invalid_input FOR TESTING.
ENDCLASS.
CLASS {{p}}t14_test IMPLEMENTATION.
METHOD fee_for.
CALL FUNCTION '{{P}}TRANS_FEE'
EXPORTING
iv_lang_pair = iv_pair
iv_word_count = iv_words
iv_express = iv_express
iv_certified = iv_cert
IMPORTING
ev_fee = rv_fee
EXCEPTIONS
invalid_lang_pair = 1
invalid_word_count = 2
OTHERS = 3.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
ENDMETHOD.
METHOD minimum_charge.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '35.00' )
act = fee_for( iv_pair = 'STD' iv_words = 100
iv_express = abap_false iv_cert = abap_false ) ).
ENDMETHOD.
METHOD tier_discount.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '108.00' )
act = fee_for( iv_pair = 'STD' iv_words = 1000
iv_express = abap_false iv_cert = abap_false ) ).
ENDMETHOD.
METHOD express_surcharge.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '87.00' )
act = fee_for( iv_pair = 'STD' iv_words = 300
iv_express = abap_true iv_cert = abap_true ) ).
ENDMETHOD.
METHOD invalid_input.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}TRANS_FEE'
EXPORTING
iv_lang_pair = 'STD'
iv_word_count = 0
iv_express = abap_false
iv_certified = abap_false
IMPORTING
ev_fee = lv_fee
EXCEPTIONS
invalid_lang_pair = 1
invalid_word_count = 2
OTHERS = 3.
cl_abap_unit_assert=>assert_equals( exp = 2 act = sy-subrc ).
ENDMETHOD.
ENDCLASS.

28
tasks_gen/train/G1115/reference/trans_fee.func.abap Normal file
View File

@@ -0,0 +1,28 @@
FUNCTION {{p}}trans_fee
IMPORTING
iv_lang_pair TYPE string
iv_word_count TYPE i
iv_express TYPE abap_bool
iv_certified TYPE abap_bool
EXPORTING
ev_fee TYPE decfloat34
EXCEPTIONS
invalid_lang_pair
invalid_word_count.
IF iv_lang_pair <> 'STD' AND iv_lang_pair <> 'RARE'.
RAISE invalid_lang_pair.
ENDIF.
IF iv_word_count < 1.
RAISE invalid_word_count.
ENDIF.
DATA(lo_pricer) = NEW {{p}}trans_pricer( ).
ev_fee = lo_pricer->calculate_fee(
iv_lang_pair = iv_lang_pair
iv_word_count = iv_word_count
iv_express = iv_express
iv_certified = iv_certified ).
ENDFUNCTION.

92
tasks_gen/train/G1115/reference/trans_pricer.clas.abap Normal file
View File

@@ -0,0 +1,92 @@
CLASS {{p}}trans_pricer DEFINITION
PUBLIC
FINAL
CREATE PUBLIC.
PUBLIC SECTION.
METHODS constructor.
METHODS calculate_fee
IMPORTING iv_lang_pair TYPE string
iv_word_count TYPE i
iv_express TYPE abap_bool
iv_certified TYPE abap_bool
RETURNING VALUE(rv_fee) TYPE decfloat34.
PRIVATE SECTION.
CONSTANTS c_rate_std TYPE decfloat34 VALUE '0.12'.
CONSTANTS c_rate_rare TYPE decfloat34 VALUE '0.19'.
CONSTANTS c_min_charge TYPE decfloat34 VALUE '35.00'.
CONSTANTS c_certified_fee TYPE decfloat34 VALUE '22.00'.
CONSTANTS c_express_percent TYPE decfloat34 VALUE '150'.
CONSTANTS c_tier_one_words TYPE i VALUE 1000.
CONSTANTS c_tier_two_words TYPE i VALUE 5000.
CONSTANTS c_tier_one_percent TYPE decfloat34 VALUE '10'.
CONSTANTS c_tier_two_percent TYPE decfloat34 VALUE '15'.
METHODS rate
IMPORTING iv_lang_pair TYPE string
RETURNING VALUE(rv_rate) TYPE decfloat34.
METHODS translation_charge
IMPORTING iv_word_count TYPE i
iv_rate TYPE decfloat34
RETURNING VALUE(rv_charge) TYPE decfloat34.
METHODS discount
IMPORTING iv_word_count TYPE i
iv_charge TYPE decfloat34
RETURNING VALUE(rv_discount) TYPE decfloat34.
ENDCLASS.
CLASS {{p}}trans_pricer IMPLEMENTATION.
METHOD constructor.
ENDMETHOD.
METHOD calculate_fee.
DATA(lv_amount) = translation_charge(
iv_word_count = iv_word_count
iv_rate = rate( iv_lang_pair ) ).
lv_amount = lv_amount - discount( iv_word_count = iv_word_count
iv_charge = lv_amount ).
IF iv_certified = abap_true.
lv_amount = lv_amount + c_certified_fee.
ENDIF.
IF iv_express = abap_true.
lv_amount = round( val = lv_amount * c_express_percent / 100
dec = 2
mode = cl_abap_math=>round_half_up ).
ENDIF.
rv_fee = lv_amount.
ENDMETHOD.
METHOD rate.
CASE iv_lang_pair.
WHEN 'STD'.
rv_rate = c_rate_std.
WHEN 'RARE'.
rv_rate = c_rate_rare.
WHEN OTHERS.
rv_rate = 0.
ENDCASE.
ENDMETHOD.
METHOD translation_charge.
rv_charge = round( val = iv_word_count * iv_rate
dec = 2
mode = cl_abap_math=>round_half_up ).
IF rv_charge < c_min_charge.
rv_charge = c_min_charge.
ENDIF.
ENDMETHOD.
METHOD discount.
IF iv_word_count >= c_tier_two_words.
rv_discount = round( val = iv_charge * c_tier_two_percent / 100
dec = 2
mode = cl_abap_math=>round_half_up ).
ELSEIF iv_word_count >= c_tier_one_words.
rv_discount = round( val = iv_charge * c_tier_one_percent / 100
dec = 2
mode = cl_abap_math=>round_half_up ).
ENDIF.
ENDMETHOD.
ENDCLASS.

40
tasks_gen/train/G1115/reference/trans_pricer.testclasses.abap Normal file
View File

@@ -0,0 +1,40 @@
CLASS ltc_pricer DEFINITION FINAL FOR TESTING
DURATION SHORT
RISK LEVEL HARMLESS.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}trans_pricer.
METHODS setup.
METHODS minimum_charge FOR TESTING.
METHODS tier_discount FOR TESTING.
METHODS certified_and_express FOR TESTING.
ENDCLASS.
CLASS ltc_pricer IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}trans_pricer( ).
ENDMETHOD.
METHOD minimum_charge.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '35.00' )
act = mo_cut->calculate_fee( iv_lang_pair = 'STD' iv_word_count = 100
iv_express = abap_false iv_certified = abap_false ) ).
ENDMETHOD.
METHOD tier_discount.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '807.50' )
act = mo_cut->calculate_fee( iv_lang_pair = 'RARE' iv_word_count = 5000
iv_express = abap_false iv_certified = abap_false ) ).
ENDMETHOD.
METHOD certified_and_express.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '87.00' )
act = mo_cut->calculate_fee( iv_lang_pair = 'STD' iv_word_count = 300
iv_express = abap_true iv_certified = abap_true ) ).
ENDMETHOD.
ENDCLASS.