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,38 @@
FUNCTION {{p}}dep_calc
IMPORTING
iv_code TYPE c
iv_quantity TYPE i
iv_damaged TYPE abap_bool
EXPORTING
ev_deposit TYPE decfloat34
EXCEPTIONS
invalid_quantity
invalid_container.
DATA lv_unit TYPE decfloat34.
IF iv_quantity < 1.
RAISE invalid_quantity.
ENDIF.
CASE iv_code.
WHEN 'A'.
lv_unit = '1.50'.
WHEN 'B'.
lv_unit = '3.00'.
WHEN 'G'.
lv_unit = '0.08'.
WHEN 'P'.
lv_unit = '0.25'.
WHEN OTHERS.
RAISE invalid_container.
ENDCASE.
IF iv_damaged = abap_true.
lv_unit = lv_unit / 2.
lv_unit = round( val = lv_unit dec = 3 mode = cl_abap_math=>round_half_up ).
ENDIF.
ev_deposit = round( val = lv_unit * iv_quantity dec = 2 mode = cl_abap_math=>round_half_up ).
ENDFUNCTION.