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

ADT fallback: Accept headers for FUNC; G0189 accepted; regen2 results

Browse Source 
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
This commit is contained in:
Kral
2026-10-03 16:31:03 +02:00
parent 428b3565b2
commit 7510131a7d
335 changed files with 12047 additions and 5545 deletions
Download Patch File Download Diff File Expand all files Collapse all files

90
tasks_gen/eval/G0143/reference/bowl_fee_old.func.abap
View File

@@ -1,90 +0,0 @@
FUNCTION {{p}}bowl_fee_old
IMPORTING
iv_players TYPE i
iv_games TYPE i
iv_day TYPE i
iv_shoes TYPE abap_bool
EXPORTING
ev_fee TYPE decfloat34
ev_note TYPE string
EXCEPTIONS
invalid_input.
TYPES ty_rate TYPE p LENGTH 8 DECIMALS 2.
CLASS lcl_bowling DEFINITION.
PUBLIC SECTION.
METHODS calculate
IMPORTING
iv_players TYPE i
iv_games TYPE i
iv_day TYPE i
iv_shoes TYPE abap_bool
EXPORTING
ev_fee TYPE decfloat34
ev_note TYPE string.
PRIVATE SECTION.
CONSTANTS:
c_lane_size TYPE i VALUE 6,
c_group_size TYPE i VALUE 12,
c_rate_weekday TYPE ty_rate VALUE '3.50',
c_rate_weekend TYPE ty_rate VALUE '5.00',
c_shoe_price TYPE ty_rate VALUE '2.00',
c_group_discount TYPE ty_rate VALUE '10.00'.
METHODS lanes_for
IMPORTING iv_players TYPE i
RETURNING VALUE(rv_lanes) TYPE i.
METHODS rate_for
IMPORTING iv_day TYPE i
RETURNING VALUE(rv_rate) TYPE ty_rate.
ENDCLASS.
CLASS lcl_bowling IMPLEMENTATION.
METHOD calculate.
DATA(lv_lanes) = lanes_for( iv_players ).
DATA(lv_rate) = rate_for( iv_day ).
DATA lv_sum TYPE p LENGTH 15 DECIMALS 2.
lv_sum = lv_lanes * iv_games * lv_rate.
IF iv_shoes = abap_true.
lv_sum = lv_sum + iv_players * c_shoe_price.
ENDIF.
ev_note = 'BOOKED'.
IF iv_players >= c_group_size.
lv_sum = lv_sum - c_group_discount.
ev_note = 'GROUP'.
ENDIF.
ev_fee = lv_sum.
ENDMETHOD.
METHOD lanes_for.
rv_lanes = iv_players DIV c_lane_size.
IF iv_players MOD c_lane_size > 0.
rv_lanes = rv_lanes + 1.
ENDIF.
ENDMETHOD.
METHOD rate_for.
IF iv_day > 5.
rv_rate = c_rate_weekend.
ELSE.
rv_rate = c_rate_weekday.
ENDIF.
ENDMETHOD.
ENDCLASS.
IF iv_players < 1 OR iv_games < 1.
RAISE invalid_input.
ENDIF.
DATA(lo_bowling) = NEW lcl_bowling( ).
lo_bowling->calculate(
EXPORTING
iv_players = iv_players
iv_games = iv_games
iv_day = iv_day
iv_shoes = iv_shoes
IMPORTING
ev_fee = ev_fee
ev_note = ev_note ).
ENDFUNCTION.

71
tasks_gen/eval/G0143/reference/crane_test.clas.abap Normal file
View File

@@ -0,0 +1,71 @@
CLASS {{p}}crane_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
iv_km TYPE i
iv_weekend TYPE abap_bool
iv_customer TYPE string
RETURNING VALUE(rv_total) TYPE decfloat34.
METHODS small_crane FOR TESTING.
METHODS weekend_and_gold FOR TESTING.
METHODS travel_cap FOR TESTING.
METHODS invalid_input FOR TESTING.
ENDCLASS.
CLASS {{p}}crane_test IMPLEMENTATION.
METHOD fee_for.
CALL FUNCTION '{{P}}CRANE_FEE_OLD'
EXPORTING
iv_crane_type = iv_type
iv_hours = iv_hours
iv_distance_km = iv_km
iv_weekend = iv_weekend
iv_customer = iv_customer
IMPORTING
ev_total = rv_total
EXCEPTIONS
invalid_crane_type = 1
invalid_hours = 2
OTHERS = 3.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
ENDMETHOD.
METHOD small_crane.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( 230 )
act = fee_for( iv_type = 'SM' iv_hours = 2 iv_km = 0 iv_weekend = abap_false iv_customer = 'STD' ) ).
ENDMETHOD.
METHOD weekend_and_gold.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '655.88' )
act = fee_for( iv_type = 'MD' iv_hours = 3 iv_km = 20 iv_weekend = abap_true iv_customer = 'GOLD' ) ).
ENDMETHOD.
METHOD travel_cap.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( 240 )
act = fee_for( iv_type = 'SM' iv_hours = 1 iv_km = 200 iv_weekend = abap_false iv_customer = 'STD' ) ).
ENDMETHOD.
METHOD invalid_input.
DATA lv_total TYPE decfloat34.
CALL FUNCTION '{{P}}CRANE_FEE_OLD'
EXPORTING
iv_crane_type = 'XX'
iv_hours = 1
iv_distance_km = 0
iv_weekend = abap_false
iv_customer = 'STD'
IMPORTING
ev_total = lv_total
EXCEPTIONS
invalid_crane_type = 1
invalid_hours = 2
OTHERS = 3.
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
ENDMETHOD.
ENDCLASS.

74
tasks_gen/eval/G0143/reference/t14_test.clas.abap
View File

@@ -1,74 +0,0 @@
CLASS {{p}}t14_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS weekday_fee FOR TESTING.
METHODS weekend_fee FOR TESTING.
METHODS group_fee FOR TESTING.
METHODS invalid_input FOR TESTING.
ENDCLASS.
CLASS {{p}}t14_test IMPLEMENTATION.
METHOD weekday_fee.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}BOWL_FEE_OLD'
EXPORTING
iv_players = 1
iv_games = 1
iv_day = 1
IMPORTING
ev_fee = lv_fee
EXCEPTIONS
invalid_input = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '3.50' ) act = lv_fee ).
ENDMETHOD.
METHOD weekend_fee.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}BOWL_FEE_OLD'
EXPORTING
iv_players = 6
iv_games = 2
iv_day = 6
IMPORTING
ev_fee = lv_fee
EXCEPTIONS
invalid_input = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '10.00' ) act = lv_fee ).
ENDMETHOD.
METHOD group_fee.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}BOWL_FEE_OLD'
EXPORTING
iv_players = 12
iv_games = 1
iv_day = 1
iv_shoes = abap_true
IMPORTING
ev_fee = lv_fee
EXCEPTIONS
invalid_input = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '21.00' ) act = lv_fee ).
ENDMETHOD.
METHOD invalid_input.
DATA lv_fee TYPE decfloat34.
CALL FUNCTION '{{P}}BOWL_FEE_OLD'
EXPORTING
iv_players = 0
iv_games = 1
iv_day = 1
IMPORTING
ev_fee = lv_fee
EXCEPTIONS
invalid_input = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
ENDMETHOD.
ENDCLASS.