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

tasks_gen/eval/G0189/seed/customs_duty_old.func.abap

@@ -0,0 +1,36 @@
+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.
+
+  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'.
+    lv_rate = 0.
+  ENDIF.
+
+  ev_rate = lv_rate.
+  ev_duty = iv_value * lv_rate / 100.
+
+  IF ev_duty < 5.
+    ev_duty = 5.
+  ENDIF.
+
+ENDFUNCTION.