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:
130
tasks_gen/eval/G0159/hidden/t63_hidden.clas.abap
Normal file
130
tasks_gen/eval/G0159/hidden/t63_hidden.clas.abap
Normal file
@@ -0,0 +1,130 @@
|
||||
CLASS {{p}}t63_hidden DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
METHODS call
|
||||
IMPORTING iv_type TYPE string
|
||||
iv_nights TYPE i
|
||||
iv_adults TYPE i DEFAULT 1
|
||||
iv_elec TYPE abap_bool DEFAULT abap_false
|
||||
iv_fee TYPE decfloat34 DEFAULT 0
|
||||
EXPORTING ev_discount TYPE abap_bool
|
||||
ev_fee TYPE decfloat34
|
||||
ev_subrc TYPE sysubrc.
|
||||
METHODS std_short_stay FOR TESTING.
|
||||
METHODS comfort_long_stay FOR TESTING.
|
||||
METHODS premium_one_night FOR TESTING.
|
||||
METHODS adults_min_one FOR TESTING.
|
||||
METHODS electricity_charge FOR TESTING.
|
||||
METHODS unknown_type_zero FOR TESTING.
|
||||
METHODS zero_nights FOR TESTING.
|
||||
METHODS negative_nights FOR TESTING.
|
||||
METHODS no_discount_short FOR TESTING.
|
||||
METHODS discount_long_stay FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}t63_hidden IMPLEMENTATION.
|
||||
METHOD call.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
lv_fee = iv_fee.
|
||||
CALL FUNCTION '{{P}}CAMP_FEE'
|
||||
EXPORTING
|
||||
iv_pitch_type = iv_type
|
||||
iv_nights = iv_nights
|
||||
iv_adults = iv_adults
|
||||
iv_electricity = iv_elec
|
||||
IMPORTING
|
||||
ev_discount = lv_discount
|
||||
CHANGING
|
||||
cv_fee = lv_fee
|
||||
EXCEPTIONS
|
||||
invalid_nights = 1
|
||||
OTHERS = 2.
|
||||
ev_subrc = sy-subrc.
|
||||
ev_fee = lv_fee.
|
||||
ev_discount = lv_discount.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD std_short_stay.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = 3 iv_adults = 2
|
||||
IMPORTING ev_fee = lv_fee ev_discount = lv_discount ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 60 ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_discount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD comfort_long_stay.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
call( EXPORTING iv_type = 'CMF' iv_nights = 7 iv_adults = 2 iv_elec = abap_true
|
||||
IMPORTING ev_fee = lv_fee ev_discount = lv_discount ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '175.53' ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_discount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD premium_one_night.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
call( EXPORTING iv_type = 'PRM' iv_nights = 1 iv_adults = 1
|
||||
IMPORTING ev_fee = lv_fee ev_discount = lv_discount ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 29 ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_discount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD adults_min_one.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = 2 iv_adults = 0
|
||||
IMPORTING ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 32 ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD electricity_charge.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = 2 iv_adults = 1 iv_elec = abap_true
|
||||
IMPORTING ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 39 ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD unknown_type_zero.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
call( EXPORTING iv_type = 'XYZ' iv_nights = 10 iv_adults = 5 iv_elec = abap_true
|
||||
IMPORTING ev_fee = lv_fee ev_discount = lv_discount ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 0 ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_discount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD zero_nights.
|
||||
DATA lv_rc TYPE sysubrc.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = 0 iv_adults = 1
|
||||
IMPORTING ev_subrc = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD negative_nights.
|
||||
DATA lv_rc TYPE sysubrc.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = -1 iv_adults = 1
|
||||
IMPORTING ev_subrc = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD no_discount_short.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = 6 iv_adults = 1
|
||||
IMPORTING ev_fee = lv_fee ev_discount = lv_discount ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 96 ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_discount ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD discount_long_stay.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_discount TYPE abap_bool.
|
||||
call( EXPORTING iv_type = 'STD' iv_nights = 7 iv_adults = 1
|
||||
IMPORTING ev_fee = lv_fee ev_discount = lv_discount ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '95.20' ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_discount ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user