Stage 2 summary at 50 accepted trajectories
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
108
tasks_gen/train/G1124/reference/shift_booker.clas.abap
Normal file
108
tasks_gen/train/G1124/reference/shift_booker.clas.abap
Normal file
@@ -0,0 +1,108 @@
|
||||
CLASS {{p}}shift_booker DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
||||
PUBLIC SECTION.
|
||||
TYPES ty_amount TYPE p LENGTH 9 DECIMALS 2.
|
||||
TYPES ty_hours TYPE p LENGTH 5 DECIMALS 2.
|
||||
TYPES ty_mode TYPE c LENGTH 3.
|
||||
TYPES ty_group TYPE c LENGTH 1.
|
||||
TYPES ty_order TYPE c LENGTH 10.
|
||||
|
||||
TYPES:
|
||||
BEGIN OF ty_shift,
|
||||
order_no TYPE ty_order,
|
||||
start_date TYPE d,
|
||||
work_hours TYPE ty_hours,
|
||||
calc_mode TYPE ty_mode,
|
||||
group_code TYPE ty_group,
|
||||
piece_count TYPE i,
|
||||
END OF ty_shift.
|
||||
|
||||
METHODS evaluate
|
||||
IMPORTING is_shift TYPE ty_shift
|
||||
RETURNING VALUE(rv_pay) TYPE ty_amount
|
||||
RAISING {{p}}cx_shift_error.
|
||||
|
||||
PRIVATE SECTION.
|
||||
TYPES ty_reason TYPE c LENGTH 10.
|
||||
|
||||
CONSTANTS c_piece_bonus TYPE ty_amount VALUE '0.50'.
|
||||
|
||||
METHODS check_shift
|
||||
IMPORTING is_shift TYPE ty_shift
|
||||
RAISING {{p}}cx_shift_error.
|
||||
METHODS raise_error
|
||||
IMPORTING iv_reason TYPE ty_reason
|
||||
RAISING {{p}}cx_shift_error.
|
||||
METHODS base_rate
|
||||
IMPORTING iv_group_code TYPE ty_group
|
||||
RETURNING VALUE(rv_rate) TYPE ty_amount.
|
||||
METHODS mode_factor
|
||||
IMPORTING iv_calc_mode TYPE ty_mode
|
||||
RETURNING VALUE(rv_factor) TYPE ty_amount.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}shift_booker IMPLEMENTATION.
|
||||
METHOD evaluate.
|
||||
check_shift( is_shift ).
|
||||
DATA lv_hour_rate TYPE ty_amount.
|
||||
lv_hour_rate = base_rate( is_shift-group_code ) * mode_factor( is_shift-calc_mode ).
|
||||
rv_pay = is_shift-work_hours * lv_hour_rate + is_shift-piece_count * c_piece_bonus.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD check_shift.
|
||||
IF is_shift-order_no IS INITIAL.
|
||||
raise_error( 'ORDER' ).
|
||||
ENDIF.
|
||||
IF is_shift-start_date IS INITIAL.
|
||||
raise_error( 'DATE' ).
|
||||
ENDIF.
|
||||
IF is_shift-work_hours <= 0.
|
||||
raise_error( 'HOURS' ).
|
||||
ENDIF.
|
||||
IF is_shift-calc_mode <> 'STD'
|
||||
AND is_shift-calc_mode <> 'OT1'
|
||||
AND is_shift-calc_mode <> 'OT2'.
|
||||
raise_error( 'MODE' ).
|
||||
ENDIF.
|
||||
IF is_shift-group_code <> 'A'
|
||||
AND is_shift-group_code <> 'B'
|
||||
AND is_shift-group_code <> 'C'.
|
||||
raise_error( 'GROUP' ).
|
||||
ENDIF.
|
||||
IF is_shift-piece_count < 1.
|
||||
raise_error( 'COUNT' ).
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD raise_error.
|
||||
DATA(lx_error) = NEW {{p}}cx_shift_error( ).
|
||||
lx_error->mv_reason = iv_reason.
|
||||
RAISE EXCEPTION lx_error.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD base_rate.
|
||||
CASE iv_group_code.
|
||||
WHEN 'A'.
|
||||
rv_rate = '18.00'.
|
||||
WHEN 'B'.
|
||||
rv_rate = '22.00'.
|
||||
WHEN 'C'.
|
||||
rv_rate = '26.00'.
|
||||
WHEN OTHERS.
|
||||
rv_rate = '0.00'.
|
||||
ENDCASE.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD mode_factor.
|
||||
CASE iv_calc_mode.
|
||||
WHEN 'STD'.
|
||||
rv_factor = '1.00'.
|
||||
WHEN 'OT1'.
|
||||
rv_factor = '1.50'.
|
||||
WHEN 'OT2'.
|
||||
rv_factor = '2.00'.
|
||||
WHEN OTHERS.
|
||||
rv_factor = '0.00'.
|
||||
ENDCASE.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user