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

105
tasks_gen/train/G1054/reference/pest_fee.clas.abap Normal file
View File

@@ -0,0 +1,105 @@
CLASS {{p}}pest_fee DEFINITION
PUBLIC
FINAL
CREATE PUBLIC.
PUBLIC SECTION.
TYPES ty_pest TYPE c LENGTH 4.
TYPES ty_fee TYPE p LENGTH 8 DECIMALS 2.
METHODS calculate_fee
IMPORTING iv_pest_type TYPE ty_pest
iv_area TYPE i
iv_urgent TYPE abap_bool
iv_contract TYPE abap_bool
RETURNING VALUE(rv_fee) TYPE ty_fee.
PRIVATE SECTION.
CONSTANTS:
c_minimum_fee TYPE ty_fee VALUE '50.00',
c_urgent_fee TYPE ty_fee VALUE '45.00',
c_area_free TYPE i VALUE 100,
c_area_step TYPE i VALUE 50,
c_area_step_fee TYPE i VALUE 15,
c_discount_pct TYPE i VALUE 10.
METHODS base_fee
IMPORTING iv_pest_type TYPE ty_pest
RETURNING VALUE(rv_fee) TYPE ty_fee.
METHODS area_surcharge
IMPORTING iv_area TYPE i
RETURNING VALUE(rv_fee) TYPE ty_fee.
METHODS urgent_surcharge
IMPORTING iv_urgent TYPE abap_bool
RETURNING VALUE(rv_fee) TYPE ty_fee.
METHODS contract_discount
IMPORTING iv_base TYPE ty_fee
iv_area_fee TYPE ty_fee
iv_contract TYPE abap_bool
RETURNING VALUE(rv_fee) TYPE ty_fee.
ENDCLASS.
CLASS {{p}}pest_fee IMPLEMENTATION.
METHOD calculate_fee.
DATA(lv_base) = base_fee( iv_pest_type ).
IF lv_base = 0.
CLEAR rv_fee.
RETURN.
ENDIF.
DATA(lv_area_fee) = area_surcharge( iv_area ).
DATA(lv_gross) = lv_base + lv_area_fee + urgent_surcharge( iv_urgent ).
DATA(lv_discount) = contract_discount( iv_base = lv_base
iv_area_fee = lv_area_fee
iv_contract = iv_contract ).
rv_fee = lv_gross - lv_discount.
IF rv_fee < c_minimum_fee.
rv_fee = c_minimum_fee.
ENDIF.
ENDMETHOD.
METHOD base_fee.
CASE iv_pest_type.
WHEN 'RATS'.
rv_fee = 120.
WHEN 'MICE'.
rv_fee = 55.
WHEN 'WASP'.
rv_fee = 150.
WHEN 'ANTS'.
rv_fee = 80.
WHEN OTHERS.
CLEAR rv_fee.
ENDCASE.
ENDMETHOD.
METHOD area_surcharge.
DATA(lv_billable) = iv_area - c_area_free.
IF lv_billable <= 0.
RETURN.
ENDIF.
DATA(lv_steps) = ( lv_billable + c_area_step - 1 ) DIV c_area_step.
rv_fee = lv_steps * c_area_step_fee.
ENDMETHOD.
METHOD urgent_surcharge.
IF iv_urgent = abap_true.
rv_fee = c_urgent_fee.
ENDIF.
ENDMETHOD.
METHOD contract_discount.
IF iv_contract = abap_false.
RETURN.
ENDIF.
DATA(lv_discountable) = iv_base + iv_area_fee.
rv_fee = lv_discountable * c_discount_pct / 100.
ENDMETHOD.
ENDCLASS.

73
tasks_gen/train/G1054/reference/pest_fee.testclasses.abap Normal file
View File

@@ -0,0 +1,73 @@
CLASS ltc_pest_fee DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}pest_fee.
METHODS setup.
METHODS rats_with_area FOR TESTING.
METHODS mice_base_fee FOR TESTING.
METHODS unknown_pest_is_free FOR TESTING.
METHODS urgent_job FOR TESTING.
METHODS contract_discount FOR TESTING.
METHODS minimum_fee FOR TESTING.
ENDCLASS.
CLASS ltc_pest_fee IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}pest_fee( ).
ENDMETHOD.
METHOD rats_with_area.
DATA lv_exp TYPE {{p}}pest_fee=>ty_fee.
lv_exp = 135.
cl_abap_unit_assert=>assert_equals(
exp = lv_exp
act = mo_cut->calculate_fee( iv_pest_type = 'RATS' iv_area = 101
iv_urgent = abap_false iv_contract = abap_false ) ).
ENDMETHOD.
METHOD mice_base_fee.
DATA lv_exp TYPE {{p}}pest_fee=>ty_fee.
lv_exp = 55.
cl_abap_unit_assert=>assert_equals(
exp = lv_exp
act = mo_cut->calculate_fee( iv_pest_type = 'MICE' iv_area = 0
iv_urgent = abap_false iv_contract = abap_false ) ).
ENDMETHOD.
METHOD unknown_pest_is_free.
DATA lv_exp TYPE {{p}}pest_fee=>ty_fee.
lv_exp = 0.
cl_abap_unit_assert=>assert_equals(
exp = lv_exp
act = mo_cut->calculate_fee( iv_pest_type = 'BIRD' iv_area = 500
iv_urgent = abap_true iv_contract = abap_true ) ).
ENDMETHOD.
METHOD urgent_job.
DATA lv_exp TYPE {{p}}pest_fee=>ty_fee.
lv_exp = 125.
cl_abap_unit_assert=>assert_equals(
exp = lv_exp
act = mo_cut->calculate_fee( iv_pest_type = 'ANTS' iv_area = 100
iv_urgent = abap_true iv_contract = abap_false ) ).
ENDMETHOD.
METHOD contract_discount.
DATA lv_exp TYPE {{p}}pest_fee=>ty_fee.
lv_exp = 153.
cl_abap_unit_assert=>assert_equals(
exp = lv_exp
act = mo_cut->calculate_fee( iv_pest_type = 'RATS' iv_area = 0
iv_urgent = abap_true iv_contract = abap_true ) ).
ENDMETHOD.
METHOD minimum_fee.
DATA lv_exp TYPE {{p}}pest_fee=>ty_fee.
lv_exp = 50.
cl_abap_unit_assert=>assert_equals(
exp = lv_exp
act = mo_cut->calculate_fee( iv_pest_type = 'MICE' iv_area = 0
iv_urgent = abap_false iv_contract = abap_true ) ).
ENDMETHOD.
ENDCLASS.