Stage 2 summary at 50 accepted trajectories
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
27
tasks_gen/train/G1095/reference/cx_heli_invalid.clas.abap
Normal file
27
tasks_gen/train/G1095/reference/cx_heli_invalid.clas.abap
Normal file
@@ -0,0 +1,27 @@
|
||||
CLASS {{p}}cx_heli_invalid DEFINITION
|
||||
PUBLIC
|
||||
INHERITING FROM cx_static_check
|
||||
FINAL
|
||||
CREATE PUBLIC.
|
||||
|
||||
PUBLIC SECTION.
|
||||
CONSTANTS:
|
||||
BEGIN OF co_reason,
|
||||
passengers TYPE string VALUE 'PASSENGERS',
|
||||
minutes TYPE string VALUE 'MINUTES',
|
||||
END OF co_reason.
|
||||
|
||||
DATA mv_reason TYPE string READ-ONLY.
|
||||
|
||||
METHODS constructor
|
||||
IMPORTING
|
||||
iv_reason TYPE string.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}cx_heli_invalid IMPLEMENTATION.
|
||||
METHOD constructor.
|
||||
super->constructor( ).
|
||||
mv_reason = iv_reason.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
43
tasks_gen/train/G1095/reference/heli_fee.func.abap
Normal file
43
tasks_gen/train/G1095/reference/heli_fee.func.abap
Normal file
@@ -0,0 +1,43 @@
|
||||
FUNCTION {{p}}heli_fee
|
||||
IMPORTING
|
||||
iv_tour_type TYPE string
|
||||
iv_passengers TYPE i
|
||||
iv_minutes TYPE i
|
||||
iv_member TYPE abap_bool
|
||||
EXPORTING
|
||||
ev_skip TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_passengers
|
||||
invalid_minutes.
|
||||
|
||||
DATA lo_pricer TYPE REF TO {{p}}heli_pricer.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
|
||||
lo_pricer = NEW #( ).
|
||||
|
||||
TRY.
|
||||
lo_pricer->calculate(
|
||||
EXPORTING
|
||||
iv_tour_type = iv_tour_type
|
||||
iv_passengers = iv_passengers
|
||||
iv_minutes = iv_minutes
|
||||
iv_member = iv_member
|
||||
IMPORTING
|
||||
ev_skip = ev_skip
|
||||
ev_fee = lv_fee ).
|
||||
CATCH {{p}}cx_heli_invalid INTO DATA(lo_error).
|
||||
CASE lo_error->mv_reason.
|
||||
WHEN {{p}}cx_heli_invalid=>co_reason-passengers.
|
||||
RAISE invalid_passengers.
|
||||
WHEN OTHERS.
|
||||
RAISE invalid_minutes.
|
||||
ENDCASE.
|
||||
ENDTRY.
|
||||
|
||||
IF ev_skip = abap_false.
|
||||
cv_fee = lv_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
113
tasks_gen/train/G1095/reference/heli_pricer.clas.abap
Normal file
113
tasks_gen/train/G1095/reference/heli_pricer.clas.abap
Normal file
@@ -0,0 +1,113 @@
|
||||
CLASS {{p}}heli_pricer DEFINITION
|
||||
PUBLIC
|
||||
FINAL
|
||||
CREATE PUBLIC.
|
||||
|
||||
PUBLIC SECTION.
|
||||
METHODS calculate
|
||||
IMPORTING
|
||||
iv_tour_type TYPE string
|
||||
iv_passengers TYPE i
|
||||
iv_minutes TYPE i
|
||||
iv_member TYPE abap_bool
|
||||
EXPORTING
|
||||
ev_skip TYPE abap_bool
|
||||
ev_fee TYPE decfloat34
|
||||
RAISING
|
||||
{{p}}cx_heli_invalid.
|
||||
|
||||
PRIVATE SECTION.
|
||||
CONSTANTS:
|
||||
c_rate_scenic TYPE decfloat34 VALUE '8',
|
||||
c_rate_training TYPE decfloat34 VALUE '12',
|
||||
c_pax_surcharge TYPE decfloat34 VALUE '15',
|
||||
c_member_rate TYPE decfloat34 VALUE '0.875',
|
||||
c_min_fee TYPE decfloat34 VALUE '50',
|
||||
c_max_fee TYPE decfloat34 VALUE '1500',
|
||||
c_max_pax TYPE i VALUE 6,
|
||||
c_min_minutes TYPE i VALUE 5.
|
||||
|
||||
METHODS check_input
|
||||
IMPORTING
|
||||
iv_passengers TYPE i
|
||||
iv_minutes TYPE i
|
||||
RAISING
|
||||
{{p}}cx_heli_invalid.
|
||||
|
||||
METHODS scenic_fee
|
||||
IMPORTING
|
||||
iv_passengers TYPE i
|
||||
iv_minutes TYPE i
|
||||
iv_member TYPE abap_bool
|
||||
RETURNING
|
||||
VALUE(rv_fee) TYPE decfloat34.
|
||||
|
||||
METHODS round_fee
|
||||
IMPORTING
|
||||
iv_fee TYPE decfloat34
|
||||
RETURNING
|
||||
VALUE(rv_fee) TYPE decfloat34.
|
||||
|
||||
METHODS apply_limits
|
||||
IMPORTING
|
||||
iv_fee TYPE decfloat34
|
||||
RETURNING
|
||||
VALUE(rv_fee) TYPE decfloat34.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}heli_pricer IMPLEMENTATION.
|
||||
|
||||
METHOD calculate.
|
||||
check_input( iv_passengers = iv_passengers iv_minutes = iv_minutes ).
|
||||
|
||||
ev_skip = abap_false.
|
||||
|
||||
CASE iv_tour_type.
|
||||
WHEN 'SC'.
|
||||
ev_fee = apply_limits( round_fee( scenic_fee( iv_passengers = iv_passengers
|
||||
iv_minutes = iv_minutes
|
||||
iv_member = iv_member ) ) ).
|
||||
WHEN 'TR'.
|
||||
ev_fee = apply_limits( round_fee( CONV decfloat34( iv_minutes ) * c_rate_training ) ).
|
||||
WHEN 'CH'.
|
||||
ev_skip = abap_true.
|
||||
WHEN OTHERS.
|
||||
ev_fee = 0.
|
||||
ENDCASE.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD check_input.
|
||||
IF iv_passengers < 1 OR iv_passengers > c_max_pax.
|
||||
RAISE EXCEPTION TYPE {{p}}cx_heli_invalid
|
||||
EXPORTING
|
||||
iv_reason = {{p}}cx_heli_invalid=>co_reason-passengers.
|
||||
ENDIF.
|
||||
IF iv_minutes < c_min_minutes.
|
||||
RAISE EXCEPTION TYPE {{p}}cx_heli_invalid
|
||||
EXPORTING
|
||||
iv_reason = {{p}}cx_heli_invalid=>co_reason-minutes.
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD scenic_fee.
|
||||
rv_fee = CONV decfloat34( iv_minutes ) * c_rate_scenic
|
||||
+ CONV decfloat34( iv_passengers ) * c_pax_surcharge.
|
||||
IF iv_member = abap_true.
|
||||
rv_fee = rv_fee * c_member_rate.
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD round_fee.
|
||||
rv_fee = round( val = iv_fee dec = 2 mode = cl_abap_math=>round_half_up ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD apply_limits.
|
||||
rv_fee = iv_fee.
|
||||
IF rv_fee < c_min_fee.
|
||||
rv_fee = c_min_fee.
|
||||
ELSEIF rv_fee > c_max_fee.
|
||||
rv_fee = c_max_fee.
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
@@ -0,0 +1,97 @@
|
||||
CLASS ltc_pricer DEFINITION FOR TESTING
|
||||
DURATION SHORT
|
||||
RISK LEVEL HARMLESS.
|
||||
|
||||
PRIVATE SECTION.
|
||||
DATA mo_cut TYPE REF TO {{p}}heli_pricer.
|
||||
|
||||
METHODS setup.
|
||||
METHODS scenic_fee FOR TESTING.
|
||||
METHODS member_discount FOR TESTING.
|
||||
METHODS training_fee FOR TESTING.
|
||||
METHODS charter_skips FOR TESTING.
|
||||
METHODS rejects_zero_passengers FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS ltc_pricer IMPLEMENTATION.
|
||||
|
||||
METHOD setup.
|
||||
mo_cut = NEW #( ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD scenic_fee.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
mo_cut->calculate(
|
||||
EXPORTING
|
||||
iv_tour_type = `SC`
|
||||
iv_passengers = 2
|
||||
iv_minutes = 10
|
||||
iv_member = abap_false
|
||||
IMPORTING
|
||||
ev_skip = lv_skip
|
||||
ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 110 ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_false( lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD member_discount.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
mo_cut->calculate(
|
||||
EXPORTING
|
||||
iv_tour_type = `SC`
|
||||
iv_passengers = 3
|
||||
iv_minutes = 7
|
||||
iv_member = abap_true
|
||||
IMPORTING
|
||||
ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '88.38' ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD training_fee.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
mo_cut->calculate(
|
||||
EXPORTING
|
||||
iv_tour_type = `TR`
|
||||
iv_passengers = 2
|
||||
iv_minutes = 10
|
||||
iv_member = abap_false
|
||||
IMPORTING
|
||||
ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 120 ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD charter_skips.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
mo_cut->calculate(
|
||||
EXPORTING
|
||||
iv_tour_type = `CH`
|
||||
iv_passengers = 2
|
||||
iv_minutes = 10
|
||||
iv_member = abap_false
|
||||
IMPORTING
|
||||
ev_skip = lv_skip
|
||||
ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_true( lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD rejects_zero_passengers.
|
||||
TRY.
|
||||
mo_cut->calculate(
|
||||
EXPORTING
|
||||
iv_tour_type = `SC`
|
||||
iv_passengers = 0
|
||||
iv_minutes = 10
|
||||
iv_member = abap_false
|
||||
IMPORTING
|
||||
ev_fee = DATA(lv_fee) ).
|
||||
cl_abap_unit_assert=>fail( ).
|
||||
CATCH {{p}}cx_heli_invalid INTO DATA(lo_error).
|
||||
cl_abap_unit_assert=>assert_equals(
|
||||
exp = {{p}}cx_heli_invalid=>co_reason-passengers
|
||||
act = lo_error->mv_reason ).
|
||||
ENDTRY.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
85
tasks_gen/train/G1095/reference/t14_test.clas.abap
Normal file
85
tasks_gen/train/G1095/reference/t14_test.clas.abap
Normal file
@@ -0,0 +1,85 @@
|
||||
CLASS {{p}}t14_test DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
|
||||
PRIVATE SECTION.
|
||||
METHODS call_fee
|
||||
IMPORTING
|
||||
iv_tour_type TYPE string
|
||||
iv_passengers TYPE i
|
||||
iv_minutes TYPE i
|
||||
iv_member TYPE abap_bool DEFAULT abap_false
|
||||
iv_fee TYPE decfloat34 DEFAULT 7
|
||||
EXPORTING
|
||||
ev_fee TYPE decfloat34
|
||||
ev_skip TYPE abap_bool
|
||||
ev_subrc TYPE sysubrc.
|
||||
|
||||
METHODS scenic_price FOR TESTING.
|
||||
METHODS member_price FOR TESTING.
|
||||
METHODS training_price FOR TESTING.
|
||||
METHODS charter_price FOR TESTING.
|
||||
METHODS invalid_input FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}t14_test IMPLEMENTATION.
|
||||
|
||||
METHOD call_fee.
|
||||
ev_fee = iv_fee.
|
||||
CALL FUNCTION '{{P}}HELI_FEE'
|
||||
EXPORTING
|
||||
iv_tour_type = iv_tour_type
|
||||
iv_passengers = iv_passengers
|
||||
iv_minutes = iv_minutes
|
||||
iv_member = iv_member
|
||||
IMPORTING
|
||||
ev_skip = ev_skip
|
||||
CHANGING
|
||||
cv_fee = ev_fee
|
||||
EXCEPTIONS
|
||||
invalid_passengers = 1
|
||||
invalid_minutes = 2
|
||||
OTHERS = 3.
|
||||
ev_subrc = sy-subrc.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD scenic_price.
|
||||
call_fee( EXPORTING iv_tour_type = `SC` iv_passengers = 2 iv_minutes = 10
|
||||
IMPORTING ev_fee = DATA(lv_fee) ev_skip = DATA(lv_skip) ev_subrc = DATA(lv_rc) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 110 ) act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_false( lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD member_price.
|
||||
call_fee( EXPORTING iv_tour_type = `SC` iv_passengers = 3 iv_minutes = 7 iv_member = abap_true
|
||||
IMPORTING ev_fee = DATA(lv_fee) ev_subrc = DATA(lv_rc) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '88.38' ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD training_price.
|
||||
call_fee( EXPORTING iv_tour_type = `TR` iv_passengers = 2 iv_minutes = 10
|
||||
IMPORTING ev_fee = DATA(lv_fee) ev_subrc = DATA(lv_rc) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 120 ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD charter_price.
|
||||
call_fee( EXPORTING iv_tour_type = `CH` iv_passengers = 2 iv_minutes = 10 iv_fee = 7
|
||||
IMPORTING ev_fee = DATA(lv_fee) ev_skip = DATA(lv_skip) ev_subrc = DATA(lv_rc) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_true( lv_skip ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( 7 ) act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_input.
|
||||
call_fee( EXPORTING iv_tour_type = `SC` iv_passengers = 0 iv_minutes = 10
|
||||
IMPORTING ev_subrc = DATA(lv_rc) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
|
||||
|
||||
call_fee( EXPORTING iv_tour_type = `TR` iv_passengers = 2 iv_minutes = 4
|
||||
IMPORTING ev_subrc = DATA(lv_rc_minutes) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 2 act = lv_rc_minutes ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user