96 lines
3.8 KiB
ABAP
96 lines
3.8 KiB
ABAP
CLASS ltc_cinema_pricer DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT RISK LEVEL HARMLESS.
|
|
PRIVATE SECTION.
|
|
DATA mo_cut TYPE REF TO {{p}}if_cinema_price.
|
|
|
|
METHODS setup.
|
|
METHODS standard_adult FOR TESTING.
|
|
METHODS child_ticket FOR TESTING.
|
|
METHODS late_show FOR TESTING.
|
|
METHODS group_and_loyalty FOR TESTING.
|
|
METHODS invalid_screen FOR TESTING.
|
|
METHODS invalid_quantity FOR TESTING.
|
|
|
|
METHODS result_of
|
|
IMPORTING iv_screen TYPE {{p}}if_cinema_price=>ty_screen
|
|
iv_visitor TYPE {{p}}if_cinema_price=>ty_visitor
|
|
iv_quantity TYPE i
|
|
iv_hour TYPE i
|
|
iv_loyalty TYPE abap_bool
|
|
RETURNING VALUE(rs_result) TYPE {{p}}if_cinema_price=>ty_result.
|
|
METHODS amount
|
|
IMPORTING iv_text TYPE string
|
|
RETURNING VALUE(rv_amount) TYPE {{p}}if_cinema_price=>ty_amount.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltc_cinema_pricer IMPLEMENTATION.
|
|
METHOD setup.
|
|
mo_cut = NEW {{p}}cinema_pricer( ).
|
|
ENDMETHOD.
|
|
|
|
METHOD standard_adult.
|
|
DATA(ls_result) = result_of( iv_screen = 'S' iv_visitor = 'A'
|
|
iv_quantity = 1 iv_hour = 18
|
|
iv_loyalty = abap_false ).
|
|
cl_abap_unit_assert=>assert_equals( exp = amount( '9.50' )
|
|
act = ls_result-price ).
|
|
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_cinema_price=>c_reason-ok
|
|
act = ls_result-reason ).
|
|
ENDMETHOD.
|
|
|
|
METHOD child_ticket.
|
|
DATA(ls_result) = result_of( iv_screen = 'T' iv_visitor = 'C'
|
|
iv_quantity = 1 iv_hour = 18
|
|
iv_loyalty = abap_false ).
|
|
cl_abap_unit_assert=>assert_equals( exp = amount( '8.40' )
|
|
act = ls_result-price ).
|
|
ENDMETHOD.
|
|
|
|
METHOD late_show.
|
|
DATA(ls_result) = result_of( iv_screen = 'S' iv_visitor = 'A'
|
|
iv_quantity = 1 iv_hour = 20
|
|
iv_loyalty = abap_false ).
|
|
cl_abap_unit_assert=>assert_equals( exp = amount( '11.00' )
|
|
act = ls_result-price ).
|
|
ENDMETHOD.
|
|
|
|
METHOD group_and_loyalty.
|
|
DATA(ls_result) = result_of( iv_screen = 'T' iv_visitor = 'C'
|
|
iv_quantity = 6 iv_hour = 21
|
|
iv_loyalty = abap_true ).
|
|
cl_abap_unit_assert=>assert_equals( exp = amount( '50.79' )
|
|
act = ls_result-price ).
|
|
ENDMETHOD.
|
|
|
|
METHOD invalid_screen.
|
|
DATA(ls_result) = result_of( iv_screen = 'X' iv_visitor = 'A'
|
|
iv_quantity = 1 iv_hour = 18
|
|
iv_loyalty = abap_false ).
|
|
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_cinema_price=>c_reason-screen
|
|
act = ls_result-reason ).
|
|
cl_abap_unit_assert=>assert_equals( exp = amount( '0.00' )
|
|
act = ls_result-price ).
|
|
ENDMETHOD.
|
|
|
|
METHOD invalid_quantity.
|
|
DATA(ls_result) = result_of( iv_screen = 'S' iv_visitor = 'A'
|
|
iv_quantity = 0 iv_hour = 18
|
|
iv_loyalty = abap_false ).
|
|
cl_abap_unit_assert=>assert_equals( exp = {{p}}if_cinema_price=>c_reason-quantity
|
|
act = ls_result-reason ).
|
|
ENDMETHOD.
|
|
|
|
METHOD result_of.
|
|
rs_result = mo_cut->price( iv_screen = iv_screen
|
|
iv_visitor = iv_visitor
|
|
iv_quantity = iv_quantity
|
|
iv_show_hour = iv_hour
|
|
iv_loyalty = iv_loyalty ).
|
|
ENDMETHOD.
|
|
|
|
METHOD amount.
|
|
rv_amount = iv_text.
|
|
ENDMETHOD.
|
|
ENDCLASS.
|