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/G0167/reference/move_pricer.clas.abap

@@ -0,0 +1,74 @@
+CLASS {{p}}move_pricer DEFINITION PUBLIC FINAL CREATE PUBLIC.
+  PUBLIC SECTION.
+    TYPES ty_price TYPE p LENGTH 8 DECIMALS 2.
+
+    CONSTANTS:
+      c_base_fee     TYPE ty_price VALUE '250.00',
+      c_volume_fee   TYPE ty_price VALUE '40.00',
+      c_distance_fee TYPE ty_price VALUE '1.20',
+      c_floor_fee    TYPE ty_price VALUE '15.00',
+      c_packing_fee  TYPE ty_price VALUE '180.00',
+      c_weekend_rate TYPE ty_price VALUE '0.12'.
+
+    METHODS calculate
+      IMPORTING iv_distance_km TYPE i
+                iv_volume_m3   TYPE i
+                iv_floor       TYPE i
+                iv_packing     TYPE abap_bool
+                iv_weekend     TYPE abap_bool
+      RETURNING VALUE(rv_price) TYPE ty_price.
+
+  PRIVATE SECTION.
+    METHODS subtotal
+      IMPORTING iv_distance_km   TYPE i
+                iv_volume_m3     TYPE i
+                iv_floor         TYPE i
+                iv_packing       TYPE abap_bool
+      RETURNING VALUE(rv_subtotal) TYPE ty_price.
+    METHODS distance_fee
+      IMPORTING iv_distance_km TYPE i
+      RETURNING VALUE(rv_fee) TYPE ty_price.
+    METHODS floor_surcharge
+      IMPORTING iv_floor TYPE i
+      RETURNING VALUE(rv_surcharge) TYPE ty_price.
+    METHODS weekend_surcharge
+      IMPORTING iv_subtotal TYPE ty_price
+      RETURNING VALUE(rv_surcharge) TYPE ty_price.
+ENDCLASS.
+
+
+CLASS {{p}}move_pricer IMPLEMENTATION.
+  METHOD calculate.
+    DATA(lv_subtotal) = subtotal( iv_distance_km = iv_distance_km
+                                  iv_volume_m3   = iv_volume_m3
+                                  iv_floor       = iv_floor
+                                  iv_packing     = iv_packing ).
+    rv_price = lv_subtotal.
+    IF iv_weekend = abap_true.
+      rv_price = rv_price + weekend_surcharge( lv_subtotal ).
+    ENDIF.
+  ENDMETHOD.
+
+  METHOD subtotal.
+    rv_subtotal = c_base_fee + iv_volume_m3 * c_volume_fee
+                + distance_fee( iv_distance_km )
+                + floor_surcharge( iv_floor ).
+    IF iv_packing = abap_true.
+      rv_subtotal = rv_subtotal + c_packing_fee.
+    ENDIF.
+  ENDMETHOD.
+
+  METHOD distance_fee.
+    rv_fee = iv_distance_km * c_distance_fee.
+  ENDMETHOD.
+
+  METHOD floor_surcharge.
+    IF iv_floor > 0.
+      rv_surcharge = iv_floor * c_floor_fee.
+    ENDIF.
+  ENDMETHOD.
+
+  METHOD weekend_surcharge.
+    rv_surcharge = round( val = iv_subtotal * c_weekend_rate dec = 2 ).
+  ENDMETHOD.
+ENDCLASS.

tasks_gen/eval/G0167/reference/move_pricer.testclasses.abap

@@ -0,0 +1,81 @@
+CLASS ltc_move_pricer DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
+  PRIVATE SECTION.
+    TYPES ty_price TYPE p LENGTH 8 DECIMALS 2.
+
+    DATA mo_cut TYPE REF TO {{p}}move_pricer.
+
+    METHODS setup.
+    METHODS base_fee_only FOR TESTING.
+    METHODS distance_fee FOR TESTING.
+    METHODS first_floor FOR TESTING.
+    METHODS packing_fee FOR TESTING.
+    METHODS weekend_surcharge FOR TESTING.
+    METHODS combined_move FOR TESTING.
+ENDCLASS.
+
+
+CLASS ltc_move_pricer IMPLEMENTATION.
+  METHOD setup.
+    mo_cut = NEW {{p}}move_pricer( ).
+  ENDMETHOD.
+
+  METHOD base_fee_only.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV ty_price( '250.00' )
+      act = mo_cut->calculate( iv_distance_km = 0
+                               iv_volume_m3   = 0
+                               iv_floor       = 0
+                               iv_packing     = abap_false
+                               iv_weekend     = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD distance_fee.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV ty_price( '268.00' )
+      act = mo_cut->calculate( iv_distance_km = 15
+                               iv_volume_m3   = 0
+                               iv_floor       = 0
+                               iv_packing     = abap_false
+                               iv_weekend     = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD first_floor.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV ty_price( '265.00' )
+      act = mo_cut->calculate( iv_distance_km = 0
+                               iv_volume_m3   = 0
+                               iv_floor       = 1
+                               iv_packing     = abap_false
+                               iv_weekend     = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD packing_fee.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV ty_price( '430.00' )
+      act = mo_cut->calculate( iv_distance_km = 0
+                               iv_volume_m3   = 0
+                               iv_floor       = 0
+                               iv_packing     = abap_true
+                               iv_weekend     = abap_false ) ).
+  ENDMETHOD.
+
+  METHOD weekend_surcharge.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV ty_price( '441.28' )
+      act = mo_cut->calculate( iv_distance_km = 20
+                               iv_volume_m3   = 3
+                               iv_floor       = 0
+                               iv_packing     = abap_false
+                               iv_weekend     = abap_true ) ).
+  ENDMETHOD.
+
+  METHOD combined_move.
+    cl_abap_unit_assert=>assert_equals(
+      exp = CONV ty_price( '669.76' )
+      act = mo_cut->calculate( iv_distance_km = 15
+                               iv_volume_m3   = 3
+                               iv_floor       = 2
+                               iv_packing     = abap_true
+                               iv_weekend     = abap_true ) ).
+  ENDMETHOD.
+ENDCLASS.