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/G0152/reference/t14_test.clas.abap

@@ -0,0 +1,69 @@
+CLASS {{p}}t14_test DEFINITION PUBLIC FINAL CREATE PUBLIC
+  FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
+  PRIVATE SECTION.
+    METHODS price_for
+      IMPORTING iv_source  TYPE string
+                iv_target  TYPE string
+                iv_words   TYPE i
+                iv_express TYPE abap_bool
+      RETURNING VALUE(rv_price) TYPE decfloat34.
+    METHODS standard_pair FOR TESTING.
+    METHODS express_and_minimum FOR TESTING.
+    METHODS zero_words FOR TESTING.
+    METHODS negative_words FOR TESTING.
+ENDCLASS.
+
+
+CLASS {{p}}t14_test IMPLEMENTATION.
+  METHOD price_for.
+    CALL FUNCTION '{{P}}TRL_PRICE'
+      EXPORTING
+        iv_source_lang = iv_source
+        iv_target_lang = iv_target
+        iv_words       = iv_words
+        iv_express     = iv_express
+      IMPORTING
+        ev_price       = rv_price
+      EXCEPTIONS
+        invalid_words  = 1
+        OTHERS         = 2.
+    cl_abap_unit_assert=>assert_subrc( exp = 0 ).
+  ENDMETHOD.
+
+  METHOD standard_pair.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV decfloat34( 120 )
+      act = price_for( iv_source = `EN` iv_target = `DE` iv_words = 1000 iv_express = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD express_and_minimum.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV decfloat34( 150 )
+      act = price_for( iv_source = `EN` iv_target = `DE` iv_words = 1000 iv_express = abap_true ) ).
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV decfloat34( 25 )
+      act = price_for( iv_source = `EN` iv_target = `DE` iv_words = 10 iv_express = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD zero_words.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV decfloat34( 0 )
+      act = price_for( iv_source = `EN` iv_target = `DE` iv_words = 0 iv_express = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD negative_words.
+    DATA lv_price TYPE decfloat34.
+    CALL FUNCTION '{{P}}TRL_PRICE'
+      EXPORTING
+        iv_source_lang = `EN`
+        iv_target_lang = `DE`
+        iv_words       = -1
+        iv_express     = abap_false
+      IMPORTING
+        ev_price       = lv_price
+      EXCEPTIONS
+        invalid_words  = 1
+        OTHERS         = 2.
+    cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
+  ENDMETHOD.
+ENDCLASS.

tasks_gen/eval/G0152/reference/trl_price.func.abap

@@ -0,0 +1,45 @@
+FUNCTION {{p}}trl_price
+  IMPORTING
+    iv_source_lang TYPE string
+    iv_target_lang TYPE string
+    iv_words       TYPE i
+    iv_express     TYPE abap_bool
+  EXPORTING
+    ev_price       TYPE decfloat34
+  EXCEPTIONS
+    invalid_words.
+
+  IF iv_words < 0.
+    RAISE invalid_words.
+  ENDIF.
+
+  IF iv_words = 0.
+    ev_price = 0.
+    RETURN.
+  ENDIF.
+
+  DATA lv_rate TYPE decfloat34.
+  IF ( iv_source_lang = 'EN' AND iv_target_lang = 'DE' )
+     OR ( iv_source_lang = 'DE' AND iv_target_lang = 'EN' ).
+    lv_rate = '0.12'.
+  ELSEIF ( iv_source_lang = 'EN' AND iv_target_lang = 'FR' )
+     OR ( iv_source_lang = 'FR' AND iv_target_lang = 'EN' ).
+    lv_rate = '0.15'.
+  ELSE.
+    lv_rate = '0.20'.
+  ENDIF.
+
+  DATA lv_amount TYPE decfloat34.
+  lv_amount = iv_words * lv_rate.
+
+  IF iv_express = abap_true.
+    lv_amount = lv_amount * '1.25'.
+  ENDIF.
+
+  ev_price = round( val = lv_amount dec = 2 mode = cl_abap_math=>round_half_up ).
+
+  IF ev_price < 25.
+    ev_price = 25.
+  ENDIF.
+
+ENDFUNCTION.