106 lines
3.0 KiB
ABAP
106 lines
3.0 KiB
ABAP
CLASS ltc_shift_booker DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT RISK LEVEL HARMLESS.
|
|
PRIVATE SECTION.
|
|
TYPES ty_reason TYPE c LENGTH 10.
|
|
|
|
DATA mo_cut TYPE REF TO {{p}}shift_booker.
|
|
|
|
METHODS setup.
|
|
METHODS valid_shift
|
|
RETURNING VALUE(rs_shift) TYPE {{p}}shift_booker=>ty_shift.
|
|
METHODS expect_reason
|
|
IMPORTING is_shift TYPE {{p}}shift_booker=>ty_shift
|
|
iv_reason TYPE ty_reason.
|
|
METHODS expect_pay
|
|
IMPORTING is_shift TYPE {{p}}shift_booker=>ty_shift
|
|
iv_pay TYPE {{p}}shift_booker=>ty_amount.
|
|
|
|
METHODS standard_pay FOR TESTING.
|
|
METHODS overtime_pay FOR TESTING.
|
|
METHODS empty_order FOR TESTING.
|
|
METHODS zero_hours FOR TESTING.
|
|
METHODS bad_mode FOR TESTING.
|
|
METHODS bad_group FOR TESTING.
|
|
METHODS zero_pieces FOR TESTING.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS ltc_shift_booker IMPLEMENTATION.
|
|
|
|
METHOD setup.
|
|
mo_cut = NEW {{p}}shift_booker( ).
|
|
ENDMETHOD.
|
|
|
|
METHOD valid_shift.
|
|
rs_shift = VALUE #( order_no = '4711'
|
|
start_date = '20240212'
|
|
work_hours = '8.00'
|
|
calc_mode = 'STD'
|
|
group_code = 'A'
|
|
piece_count = 100 ).
|
|
ENDMETHOD.
|
|
|
|
METHOD expect_reason.
|
|
TRY.
|
|
mo_cut->evaluate( is_shift ).
|
|
cl_abap_unit_assert=>fail( msg = |no exception for { iv_reason }| ).
|
|
CATCH {{p}}cx_shift_error INTO DATA(lx_error).
|
|
cl_abap_unit_assert=>assert_equals( exp = iv_reason
|
|
act = lx_error->mv_reason ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
|
|
METHOD expect_pay.
|
|
TRY.
|
|
cl_abap_unit_assert=>assert_equals( exp = iv_pay
|
|
act = mo_cut->evaluate( is_shift ) ).
|
|
CATCH {{p}}cx_shift_error.
|
|
cl_abap_unit_assert=>fail( msg = 'unexpected exception' ).
|
|
ENDTRY.
|
|
ENDMETHOD.
|
|
|
|
METHOD standard_pay.
|
|
expect_pay( is_shift = valid_shift( ) iv_pay = '194.00' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD overtime_pay.
|
|
DATA(ls_shift) = valid_shift( ).
|
|
ls_shift-work_hours = '7.50'.
|
|
ls_shift-calc_mode = 'OT1'.
|
|
ls_shift-group_code = 'B'.
|
|
ls_shift-piece_count = 40.
|
|
expect_pay( is_shift = ls_shift iv_pay = '267.50' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD empty_order.
|
|
DATA(ls_shift) = valid_shift( ).
|
|
ls_shift-order_no = ''.
|
|
expect_reason( is_shift = ls_shift iv_reason = 'ORDER' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD zero_hours.
|
|
DATA(ls_shift) = valid_shift( ).
|
|
ls_shift-work_hours = '0.00'.
|
|
expect_reason( is_shift = ls_shift iv_reason = 'HOURS' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD bad_mode.
|
|
DATA(ls_shift) = valid_shift( ).
|
|
ls_shift-calc_mode = 'XX'.
|
|
expect_reason( is_shift = ls_shift iv_reason = 'MODE' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD bad_group.
|
|
DATA(ls_shift) = valid_shift( ).
|
|
ls_shift-group_code = 'D'.
|
|
expect_reason( is_shift = ls_shift iv_reason = 'GROUP' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD zero_pieces.
|
|
DATA(ls_shift) = valid_shift( ).
|
|
ls_shift-piece_count = 0.
|
|
expect_reason( is_shift = ls_shift iv_reason = 'COUNT' ).
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|