116 lines
4.5 KiB
ABAP
116 lines
4.5 KiB
ABAP
CLASS ltc_holiday_checker DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT RISK LEVEL HARMLESS.
|
|
|
|
PRIVATE SECTION.
|
|
CONSTANTS c_today TYPE d VALUE '20260101'.
|
|
|
|
DATA mo_cut TYPE REF TO {{p}}holiday_checker.
|
|
|
|
METHODS setup.
|
|
METHODS valid_booking FOR TESTING.
|
|
METHODS minimum_values FOR TESTING.
|
|
METHODS unknown_destination FOR TESTING.
|
|
METHODS too_many_travellers FOR TESTING.
|
|
METHODS bad_nights FOR TESTING.
|
|
METHODS early_departure FOR TESTING.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltc_holiday_checker IMPLEMENTATION.
|
|
METHOD setup.
|
|
mo_cut = NEW {{p}}holiday_checker( ).
|
|
ENDMETHOD.
|
|
|
|
METHOD valid_booking.
|
|
DATA(lv_done) = abap_false.
|
|
TRY.
|
|
mo_cut->check( is_booking = VALUE #( dest_code = 'KYOTO'
|
|
travellers = 8
|
|
nights = 10
|
|
departure = '20260301' )
|
|
iv_today = c_today ).
|
|
lv_done = abap_true.
|
|
CATCH {{p}}cx_holiday_error INTO DATA(lx).
|
|
cl_abap_unit_assert=>fail( |Unexpected exception: { lx->mv_message }| ).
|
|
ENDTRY.
|
|
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_done ).
|
|
ENDMETHOD.
|
|
|
|
METHOD minimum_values.
|
|
DATA(lv_done) = abap_false.
|
|
TRY.
|
|
mo_cut->check( is_booking = VALUE #( dest_code = 'LAPLAND'
|
|
travellers = 1
|
|
nights = 2
|
|
departure = '20260115' )
|
|
iv_today = c_today ).
|
|
lv_done = abap_true.
|
|
CATCH {{p}}cx_holiday_error INTO DATA(lx).
|
|
cl_abap_unit_assert=>fail( |Unexpected exception: { lx->mv_message }| ).
|
|
ENDTRY.
|
|
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_done ).
|
|
ENDMETHOD.
|
|
|
|
METHOD unknown_destination.
|
|
TRY.
|
|
mo_cut->check( is_booking = VALUE #( dest_code = 'MARS'
|
|
travellers = 2
|
|
nights = 7
|
|
departure = '20260301' )
|
|
iv_today = c_today ).
|
|
cl_abap_unit_assert=>fail( 'CX_UNKNOWN_DEST expected' ).
|
|
CATCH {{p}}cx_unknown_dest INTO DATA(lx).
|
|
cl_abap_unit_assert=>assert_equals( exp = `MARS` act = lx->mv_dest ).
|
|
CATCH {{p}}cx_holiday_error.
|
|
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
|
|
METHOD too_many_travellers.
|
|
TRY.
|
|
mo_cut->check( is_booking = VALUE #( dest_code = 'SAFARI'
|
|
travellers = 8
|
|
nights = 7
|
|
departure = '20260301' )
|
|
iv_today = c_today ).
|
|
cl_abap_unit_assert=>fail( 'CX_BAD_TRAVELLERS expected' ).
|
|
CATCH {{p}}cx_bad_travellers INTO DATA(lx).
|
|
cl_abap_unit_assert=>assert_equals( exp = 8 act = lx->mv_travellers ).
|
|
cl_abap_unit_assert=>assert_equals( exp = 7 act = lx->mv_max ).
|
|
CATCH {{p}}cx_holiday_error.
|
|
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
|
|
METHOD bad_nights.
|
|
TRY.
|
|
mo_cut->check( is_booking = VALUE #( dest_code = 'ALPS'
|
|
travellers = 2
|
|
nights = 30
|
|
departure = '20260301' )
|
|
iv_today = c_today ).
|
|
cl_abap_unit_assert=>fail( 'CX_BAD_NIGHTS expected' ).
|
|
CATCH {{p}}cx_bad_nights INTO DATA(lx).
|
|
cl_abap_unit_assert=>assert_equals( exp = 30 act = lx->mv_nights ).
|
|
CATCH {{p}}cx_holiday_error.
|
|
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
|
|
METHOD early_departure.
|
|
TRY.
|
|
mo_cut->check( is_booking = VALUE #( dest_code = 'CRETE'
|
|
travellers = 2
|
|
nights = 7
|
|
departure = '20260110' )
|
|
iv_today = c_today ).
|
|
cl_abap_unit_assert=>fail( 'CX_BAD_DEPARTURE expected' ).
|
|
CATCH {{p}}cx_bad_departure INTO DATA(lx).
|
|
cl_abap_unit_assert=>assert_equals( exp = CONV d( '20260115' )
|
|
act = lx->mv_earliest ).
|
|
CATCH {{p}}cx_holiday_error.
|
|
cl_abap_unit_assert=>fail( 'Wrong exception type' ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
ENDCLASS.
|