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
2026-10-03 12:10:52 +02:00
parent d3250acfb8
commit 39769afce8
741 changed files with 40573 additions and 317 deletions
--- a/tasks_gen/eval/G0190/seed/fleet_cost_old.prog.abap
+++ b/tasks_gen/eval/G0190/seed/fleet_cost_old.prog.abap
@@ -0,0 +1,75 @@
+REPORT {{p}}fleet_cost_old.
+
+TYPES: BEGIN OF ty_out,
+         vehicle_id  TYPE {{p}}vehicle-vehicle_id,
+         plate       TYPE {{p}}vehicle-plate,
+         category    TYPE {{p}}vehicle-category,
+         distance    TYPE {{p}}trip-distance_km,
+         fuel_cost   TYPE {{p}}trip-toll_fee,
+         toll_cost   TYPE {{p}}trip-toll_fee,
+         total_cost  TYPE {{p}}trip-toll_fee,
+         cost_per_km TYPE p LENGTH 15 DECIMALS 3,
+       END OF ty_out.
+
+DATA: gt_out     TYPE STANDARD TABLE OF ty_out,
+      gt_vehicle TYPE STANDARD TABLE OF {{p}}vehicle,
+      gt_trip    TYPE STANDARD TABLE OF {{p}}trip,
+      gs_vehicle TYPE {{p}}vehicle,
+      gs_trip    TYPE {{p}}trip,
+      gs_out     TYPE ty_out,
+      go_alv     TYPE REF TO cl_salv_table,
+      gv_cat     TYPE {{p}}vehicle-category.
+
+PARAMETERS: p_from TYPE d OBLIGATORY,
+            p_to   TYPE d OBLIGATORY.
+
+SELECT-OPTIONS: s_cat FOR gv_cat.
+
+START-OF-SELECTION.
+
+  SELECT * FROM {{p}}vehicle INTO TABLE gt_vehicle.
+
+  LOOP AT gt_vehicle INTO gs_vehicle.
+
+    IF gs_vehicle-category IN s_cat.
+
+      CLEAR gs_out.
+      gs_out-vehicle_id = gs_vehicle-vehicle_id.
+      gs_out-plate = gs_vehicle-plate.
+      gs_out-category = gs_vehicle-category.
+
+      SELECT * FROM {{p}}trip INTO TABLE gt_trip
+        WHERE vehicle_id = gs_vehicle-vehicle_id
+          AND trip_date >= p_from
+          AND trip_date <= p_to.
+
+      IF sy-subrc = 0.
+
+        LOOP AT gt_trip INTO gs_trip.
+          gs_out-distance = gs_out-distance + gs_trip-distance_km.
+          gs_out-fuel_cost = gs_out-fuel_cost + gs_trip-fuel_liters * gs_trip-fuel_price.
+          gs_out-toll_cost = gs_out-toll_cost + gs_trip-toll_fee.
+        ENDLOOP.
+
+        gs_out-total_cost = gs_out-fuel_cost + gs_out-toll_cost.
+
+        IF gs_out-distance > 0.
+          gs_out-cost_per_km = gs_out-total_cost / gs_out-distance.
+        ENDIF.
+
+        APPEND gs_out TO gt_out.
+
+      ENDIF.
+
+    ENDIF.
+
+  ENDLOOP.
+
+  SORT gt_out BY total_cost DESCENDING.
+
+  TRY.
+      cl_salv_table=>factory( IMPORTING r_salv_table = go_alv
+                              CHANGING  t_table      = gt_out ).
+      go_alv->display( ).
+    CATCH cx_salv_msg.
+  ENDTRY.