114 lines
4.2 KiB
ABAP
114 lines
4.2 KiB
ABAP
CLASS {{p}}t31_hidden DEFINITION PUBLIC FINAL CREATE PUBLIC
|
|
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
|
|
|
PRIVATE SECTION.
|
|
DATA mo_cut TYPE REF TO {{p}}pool_ticket.
|
|
DATA mv_member TYPE {{p}}pool_ticket=>ty_flag.
|
|
DATA mv_guest TYPE {{p}}pool_ticket=>ty_flag.
|
|
|
|
METHODS setup.
|
|
METHODS valid_booking_is_ok FOR TESTING.
|
|
METHODS unknown_zone FOR TESTING.
|
|
METHODS unknown_rate FOR TESTING.
|
|
METHODS unknown_day FOR TESTING.
|
|
METHODS zone_checked_first FOR TESTING.
|
|
METHODS lower_case_zone FOR TESTING.
|
|
METHODS price_indoor_adult FOR TESTING.
|
|
METHODS price_outdoor_child_weekend FOR TESTING.
|
|
METHODS price_sauna_senior_member FOR TESTING.
|
|
METHODS price_all_areas_weekend_member FOR TESTING.
|
|
METHODS price_member_weekday_child FOR TESTING.
|
|
METHODS price_invalid_booking FOR TESTING.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS {{p}}t31_hidden IMPLEMENTATION.
|
|
METHOD setup.
|
|
mo_cut = NEW {{p}}pool_ticket( ).
|
|
mv_member = {{p}}pool_ticket=>c_flag-member.
|
|
mv_guest = {{p}}pool_ticket=>c_flag-guest.
|
|
ENDMETHOD.
|
|
|
|
METHOD valid_booking_is_ok.
|
|
DATA lv_status TYPE {{p}}pool_ticket=>ty_status.
|
|
lv_status = mo_cut->check_booking( iv_zone = 'IN' iv_rate = 'A' iv_day = 'MO' ).
|
|
cl_abap_unit_assert=>assert_equals( exp = {{p}}pool_ticket=>c_status-ok
|
|
act = lv_status ).
|
|
ENDMETHOD.
|
|
|
|
METHOD unknown_zone.
|
|
DATA(lv_zone) = CONV {{p}}pool_ticket=>ty_zone( 'XX' ).
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = {{p}}pool_ticket=>c_status-zone
|
|
act = mo_cut->check_booking( iv_zone = lv_zone iv_rate = 'A' iv_day = 'MO' ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD unknown_rate.
|
|
DATA(lv_rate) = CONV {{p}}pool_ticket=>ty_rate( 'X' ).
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = {{p}}pool_ticket=>c_status-rate
|
|
act = mo_cut->check_booking( iv_zone = 'IN' iv_rate = lv_rate iv_day = 'XX' ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD unknown_day.
|
|
DATA(lv_day) = CONV {{p}}pool_ticket=>ty_day( 'XX' ).
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = {{p}}pool_ticket=>c_status-day
|
|
act = mo_cut->check_booking( iv_zone = 'IN' iv_rate = 'A' iv_day = lv_day ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD zone_checked_first.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = {{p}}pool_ticket=>c_status-zone
|
|
act = mo_cut->check_booking( iv_zone = 'XX' iv_rate = 'X' iv_day = 'XX' ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD lower_case_zone.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = {{p}}pool_ticket=>c_status-zone
|
|
act = mo_cut->check_booking( iv_zone = 'in' iv_rate = 'A' iv_day = 'MO' ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD price_indoor_adult.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = CONV {{p}}pool_ticket=>ty_amount( '10.00' )
|
|
act = mo_cut->ticket_price( iv_zone = 'IN' iv_rate = 'A' iv_day = 'MO'
|
|
iv_member = mv_guest ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD price_outdoor_child_weekend.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = CONV {{p}}pool_ticket=>ty_amount( '6.25' )
|
|
act = mo_cut->ticket_price( iv_zone = 'OU' iv_rate = 'C' iv_day = 'SA'
|
|
iv_member = mv_guest ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD price_sauna_senior_member.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = CONV {{p}}pool_ticket=>ty_amount( '9.00' )
|
|
act = mo_cut->ticket_price( iv_zone = 'SA' iv_rate = 'S' iv_day = 'MO'
|
|
iv_member = mv_member ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD price_all_areas_weekend_member.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = CONV {{p}}pool_ticket=>ty_amount( '18.00' )
|
|
act = mo_cut->ticket_price( iv_zone = 'AL' iv_rate = 'A' iv_day = 'SU'
|
|
iv_member = mv_member ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD price_member_weekday_child.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = CONV {{p}}pool_ticket=>ty_amount( '4.00' )
|
|
act = mo_cut->ticket_price( iv_zone = 'IN' iv_rate = 'C' iv_day = 'WE'
|
|
iv_member = mv_member ) ).
|
|
ENDMETHOD.
|
|
|
|
METHOD price_invalid_booking.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
exp = CONV {{p}}pool_ticket=>ty_amount( '0.00' )
|
|
act = mo_cut->ticket_price( iv_zone = 'XX' iv_rate = 'A' iv_day = 'MO'
|
|
iv_member = mv_guest ) ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|