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,77 @@
FUNCTION {{p}}cine_fee_old
IMPORTING
iv_show_type TYPE string
iv_seats TYPE i
iv_show_time TYPE t
iv_cust_type TYPE string
EXPORTING
ev_total TYPE decfloat34
ev_discount TYPE decfloat34
EXCEPTIONS
invalid_input.
CONSTANTS:
c_price_2d TYPE decfloat34 VALUE '9.00',
c_price_3d TYPE decfloat34 VALUE '12.50',
c_price_imax TYPE decfloat34 VALUE '16.00',
c_booking_fee TYPE decfloat34 VALUE '0.50',
c_percent TYPE decfloat34 VALUE 100,
c_disc_child TYPE decfloat34 VALUE 40,
c_disc_senior TYPE decfloat34 VALUE 30,
c_disc_student TYPE decfloat34 VALUE 20,
c_disc_matinee TYPE decfloat34 VALUE 25,
c_disc_group TYPE decfloat34 VALUE 10,
c_disc_max TYPE decfloat34 VALUE 60,
c_group_seats TYPE i VALUE 8,
c_matinee_end TYPE t VALUE '170000'.
DATA: lv_base TYPE decfloat34,
lv_discount TYPE decfloat34,
lv_price TYPE decfloat34.
IF iv_seats < 1.
RAISE invalid_input.
ENDIF.
CASE iv_show_type.
WHEN '2D'.
lv_base = c_price_2d.
WHEN '3D'.
lv_base = c_price_3d.
WHEN 'IMAX'.
lv_base = c_price_imax.
WHEN OTHERS.
RAISE invalid_input.
ENDCASE.
CASE iv_cust_type.
WHEN 'CHILD'.
lv_discount = c_disc_child.
WHEN 'SENIOR'.
lv_discount = c_disc_senior.
WHEN 'STUDENT'.
lv_discount = c_disc_student.
WHEN 'ADULT'.
lv_discount = 0.
WHEN OTHERS.
RAISE invalid_input.
ENDCASE.
IF iv_show_time < c_matinee_end AND iv_cust_type <> 'CHILD'.
lv_discount = lv_discount + c_disc_matinee.
ENDIF.
IF iv_seats >= c_group_seats.
lv_discount = lv_discount + c_disc_group.
ENDIF.
IF lv_discount > c_disc_max.
lv_discount = c_disc_max.
ENDIF.
lv_price = lv_base - lv_base * lv_discount / c_percent + c_booking_fee.
ev_total = round( val = lv_price * iv_seats dec = 2 mode = cl_abap_math=>round_half_up ).
ev_discount = lv_discount.
ENDFUNCTION.

View File

@@ -0,0 +1,72 @@
CLASS {{p}}cine_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
CONSTANTS: c_evening TYPE t VALUE '200000',
c_matinee TYPE t VALUE '160000'.
METHODS fee
IMPORTING iv_show TYPE string
iv_seats TYPE i
iv_time TYPE t
iv_cust TYPE string
RETURNING VALUE(rv_total) TYPE decfloat34.
METHODS adult_evening FOR TESTING.
METHODS matinee_discount FOR TESTING.
METHODS child_price FOR TESTING.
METHODS invalid_seats FOR TESTING.
ENDCLASS.
CLASS {{p}}cine_test IMPLEMENTATION.
METHOD fee.
CALL FUNCTION '{{P}}CINE_FEE_OLD'
EXPORTING
iv_show_type = iv_show
iv_seats = iv_seats
iv_show_time = iv_time
iv_cust_type = iv_cust
IMPORTING
ev_total = rv_total
EXCEPTIONS
invalid_input = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_subrc( exp = 0 ).
ENDMETHOD.
METHOD adult_evening.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '9.50' )
act = fee( iv_show = `2D` iv_seats = 1 iv_time = c_evening iv_cust = `ADULT` ) ).
ENDMETHOD.
METHOD matinee_discount.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '7.25' )
act = fee( iv_show = `2D` iv_seats = 1 iv_time = c_matinee iv_cust = `ADULT` ) ).
ENDMETHOD.
METHOD child_price.
cl_abap_unit_assert=>assert_equals(
exp = CONV decfloat34( '5.90' )
act = fee( iv_show = `2D` iv_seats = 1 iv_time = c_matinee iv_cust = `CHILD` ) ).
ENDMETHOD.
METHOD invalid_seats.
DATA lv_total TYPE decfloat34.
CALL FUNCTION '{{P}}CINE_FEE_OLD'
EXPORTING
iv_show_type = `2D`
iv_seats = 0
iv_show_time = c_evening
iv_cust_type = `ADULT`
IMPORTING
ev_total = lv_total
EXCEPTIONS
invalid_input = 1
OTHERS = 2.
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
ENDMETHOD.
ENDCLASS.