Step F first pass: 81/92 accepted; budget floor 60 calls; rejected slots moved for regeneration

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 12:10:52 +02:00
parent d3250acfb8
commit 39769afce8
741 changed files with 40573 additions and 317 deletions

View File

@@ -0,0 +1,41 @@
FUNCTION {{p}}customs_duty_old
IMPORTING
iv_value TYPE decfloat34
iv_country TYPE string
iv_category TYPE string
EXPORTING
ev_rate TYPE decfloat34
ev_duty TYPE decfloat34
EXCEPTIONS
invalid_value.
DATA lv_rate TYPE decfloat34.
IF iv_value < 0.
RAISE invalid_value.
ENDIF.
CASE iv_category.
WHEN 'FOOD'.
lv_rate = 5.
WHEN 'TEXTILE'.
lv_rate = 12.
WHEN 'MACHINE'.
lv_rate = 3.
WHEN OTHERS.
lv_rate = 0.
ENDCASE.
IF iv_country = 'CH' OR iv_country = 'DE' OR iv_country = 'FR'
OR iv_country = 'IT' OR iv_country = 'ES'.
lv_rate = 0.
ENDIF.
ev_rate = lv_rate.
ev_duty = round( val = iv_value * lv_rate / 100 dec = 2 ).
IF ev_duty > 0 AND ev_duty < 5.
ev_duty = 5.
ENDIF.
ENDFUNCTION.

View File

@@ -0,0 +1,72 @@
CLASS {{p}}duty_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS duty_for
IMPORTING
iv_value TYPE decfloat34
iv_country TYPE string
iv_category TYPE string
RETURNING
VALUE(rv_duty) TYPE decfloat34.
METHODS food_duty FOR TESTING.
METHODS rounding FOR TESTING.
METHODS minimum FOR TESTING.
METHODS preferential FOR TESTING.
METHODS negative_value FOR TESTING.
ENDCLASS.
CLASS {{p}}duty_test IMPLEMENTATION.
METHOD duty_for.
CALL FUNCTION '{{P}}CUSTOMS_DUTY_OLD'
EXPORTING
iv_value = iv_value
iv_country = iv_country
iv_category = iv_category
IMPORTING
ev_duty = rv_duty
EXCEPTIONS
invalid_value = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
ENDMETHOD.
METHOD food_duty.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( 50 )
act = duty_for( iv_value = 1000 iv_country = 'US' iv_category = 'FOOD' ) ).
ENDMETHOD.
METHOD rounding.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '6.19' )
act = duty_for( iv_value = '123.7' iv_country = 'US' iv_category = 'FOOD' ) ).
ENDMETHOD.
METHOD minimum.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( 5 )
act = duty_for( iv_value = 50 iv_country = 'US' iv_category = 'FOOD' ) ).
ENDMETHOD.
METHOD preferential.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( 0 )
act = duty_for( iv_value = 10000 iv_country = 'FR' iv_category = 'FOOD' ) ).
ENDMETHOD.
METHOD negative_value.
DATA lv_duty TYPE decfloat34.
CALL FUNCTION '{{P}}CUSTOMS_DUTY_OLD'
EXPORTING
iv_value = -1
iv_country = 'US'
iv_category = 'FOOD'
IMPORTING
ev_duty = lv_duty
EXCEPTIONS
invalid_value = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
ENDMETHOD.
ENDCLASS.