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
This commit is contained in:
Kral
2026-10-03 12:10:52 +02:00
parent d3250acfb8
commit 39769afce8
741 changed files with 40573 additions and 317 deletions

View File

@@ -0,0 +1,95 @@
CLASS {{p}}vine_seed DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
INTERFACES if_oo_adt_classrun.
ENDCLASS.
CLASS {{p}}vine_seed IMPLEMENTATION.
METHOD if_oo_adt_classrun~main.
DATA lt_grape TYPE STANDARD TABLE OF {{p}}grape.
DATA lt_harvest TYPE STANDARD TABLE OF {{p}}harvest.
DATA ls_grape TYPE {{p}}grape.
DATA ls_harvest TYPE {{p}}harvest.
DELETE FROM {{p}}harvest.
DELETE FROM {{p}}grape.
CLEAR ls_grape.
ls_grape-client = sy-mandt.
ls_grape-variety = 'MERL'.
ls_grape-name = 'Merlot'.
APPEND ls_grape TO lt_grape.
CLEAR ls_grape.
ls_grape-client = sy-mandt.
ls_grape-variety = 'CHRD'.
ls_grape-name = 'Chardonnay'.
APPEND ls_grape TO lt_grape.
CLEAR ls_grape.
ls_grape-client = sy-mandt.
ls_grape-variety = 'RIES'.
ls_grape-name = 'Riesling'.
APPEND ls_grape TO lt_grape.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 1.
ls_harvest-variety = 'MERL'.
ls_harvest-harvest_date = '20260901'.
ls_harvest-weight_kg = '1200.500'.
APPEND ls_harvest TO lt_harvest.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 2.
ls_harvest-variety = 'MERL'.
ls_harvest-harvest_date = '20260910'.
ls_harvest-weight_kg = '800.000'.
APPEND ls_harvest TO lt_harvest.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 3.
ls_harvest-variety = 'CHRD'.
ls_harvest-harvest_date = '20260905'.
ls_harvest-weight_kg = '2000.000'.
APPEND ls_harvest TO lt_harvest.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 4.
ls_harvest-variety = 'CHRD'.
ls_harvest-harvest_date = '20261001'.
ls_harvest-weight_kg = '300.000'.
APPEND ls_harvest TO lt_harvest.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 5.
ls_harvest-variety = 'RIES'.
ls_harvest-harvest_date = '20251215'.
ls_harvest-weight_kg = '250.000'.
APPEND ls_harvest TO lt_harvest.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 6.
ls_harvest-variety = 'RIES'.
ls_harvest-harvest_date = '20260820'.
ls_harvest-weight_kg = '500.000'.
APPEND ls_harvest TO lt_harvest.
CLEAR ls_harvest.
ls_harvest-client = sy-mandt.
ls_harvest-harvest_id = 7.
ls_harvest-variety = 'SYRA'.
ls_harvest-harvest_date = '20260915'.
ls_harvest-weight_kg = '100.000'.
APPEND ls_harvest TO lt_harvest.
INSERT {{p}}grape FROM TABLE lt_grape.
INSERT {{p}}harvest FROM TABLE lt_harvest.
out->write( sy-dbcnt ).
ENDMETHOD.
ENDCLASS.