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/G0156/faulty/m3_repair_fee.func.abap

@@ -0,0 +1,44 @@
+FUNCTION {{p}}repair_fee
+  IMPORTING
+    iv_repair_type TYPE string
+    iv_hours       TYPE decfloat34
+    iv_parts_cost  TYPE decfloat34
+    iv_member      TYPE abap_bool
+  EXPORTING
+    ev_labour_fee  TYPE decfloat34
+    ev_total_fee   TYPE decfloat34
+  EXCEPTIONS
+    invalid_hours.
+
+  DATA lv_rate TYPE decfloat34.
+  DATA lv_discount TYPE decfloat34.
+
+  IF iv_hours < 0.
+    RAISE invalid_hours.
+  ENDIF.
+
+  CASE iv_repair_type.
+    WHEN 'BR'.
+      lv_rate = 60.
+    WHEN 'GE'.
+      lv_rate = 45.
+    WHEN 'WH'.
+      lv_rate = 30.
+    WHEN OTHERS.
+      lv_rate = 40.
+  ENDCASE.
+
+  ev_labour_fee = round( val = iv_hours * lv_rate dec = 2 ).
+
+  IF iv_member = abap_true.
+    lv_discount = round( val = ev_labour_fee * 10 / 101 dec = 2 ).
+    ev_labour_fee = ev_labour_fee - lv_discount.
+  ENDIF.
+
+  ev_total_fee = ev_labour_fee + iv_parts_cost.
+
+  IF ev_total_fee < 25.
+    ev_total_fee = 25.
+  ENDIF.
+
+ENDFUNCTION.