Stage 2 summary at 50 accepted trajectories
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
92
tasks_gen/train/G1115/reference/trans_pricer.clas.abap
Normal file
92
tasks_gen/train/G1115/reference/trans_pricer.clas.abap
Normal file
@@ -0,0 +1,92 @@
|
||||
CLASS {{p}}trans_pricer DEFINITION
|
||||
PUBLIC
|
||||
FINAL
|
||||
CREATE PUBLIC.
|
||||
|
||||
PUBLIC SECTION.
|
||||
METHODS constructor.
|
||||
METHODS calculate_fee
|
||||
IMPORTING iv_lang_pair TYPE string
|
||||
iv_word_count TYPE i
|
||||
iv_express TYPE abap_bool
|
||||
iv_certified TYPE abap_bool
|
||||
RETURNING VALUE(rv_fee) TYPE decfloat34.
|
||||
|
||||
PRIVATE SECTION.
|
||||
CONSTANTS c_rate_std TYPE decfloat34 VALUE '0.12'.
|
||||
CONSTANTS c_rate_rare TYPE decfloat34 VALUE '0.19'.
|
||||
CONSTANTS c_min_charge TYPE decfloat34 VALUE '35.00'.
|
||||
CONSTANTS c_certified_fee TYPE decfloat34 VALUE '22.00'.
|
||||
CONSTANTS c_express_percent TYPE decfloat34 VALUE '150'.
|
||||
CONSTANTS c_tier_one_words TYPE i VALUE 1000.
|
||||
CONSTANTS c_tier_two_words TYPE i VALUE 5000.
|
||||
CONSTANTS c_tier_one_percent TYPE decfloat34 VALUE '10'.
|
||||
CONSTANTS c_tier_two_percent TYPE decfloat34 VALUE '15'.
|
||||
|
||||
METHODS rate
|
||||
IMPORTING iv_lang_pair TYPE string
|
||||
RETURNING VALUE(rv_rate) TYPE decfloat34.
|
||||
METHODS translation_charge
|
||||
IMPORTING iv_word_count TYPE i
|
||||
iv_rate TYPE decfloat34
|
||||
RETURNING VALUE(rv_charge) TYPE decfloat34.
|
||||
METHODS discount
|
||||
IMPORTING iv_word_count TYPE i
|
||||
iv_charge TYPE decfloat34
|
||||
RETURNING VALUE(rv_discount) TYPE decfloat34.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}trans_pricer IMPLEMENTATION.
|
||||
METHOD constructor.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD calculate_fee.
|
||||
DATA(lv_amount) = translation_charge(
|
||||
iv_word_count = iv_word_count
|
||||
iv_rate = rate( iv_lang_pair ) ).
|
||||
lv_amount = lv_amount - discount( iv_word_count = iv_word_count
|
||||
iv_charge = lv_amount ).
|
||||
IF iv_certified = abap_true.
|
||||
lv_amount = lv_amount + c_certified_fee.
|
||||
ENDIF.
|
||||
IF iv_express = abap_true.
|
||||
lv_amount = round( val = lv_amount * c_express_percent / 100
|
||||
dec = 2
|
||||
mode = cl_abap_math=>round_half_up ).
|
||||
ENDIF.
|
||||
rv_fee = lv_amount.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD rate.
|
||||
CASE iv_lang_pair.
|
||||
WHEN 'STD'.
|
||||
rv_rate = c_rate_std.
|
||||
WHEN 'RARE'.
|
||||
rv_rate = c_rate_rare.
|
||||
WHEN OTHERS.
|
||||
rv_rate = 0.
|
||||
ENDCASE.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD translation_charge.
|
||||
rv_charge = round( val = iv_word_count * iv_rate
|
||||
dec = 2
|
||||
mode = cl_abap_math=>round_half_up ).
|
||||
IF rv_charge < c_min_charge.
|
||||
rv_charge = c_min_charge.
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD discount.
|
||||
IF iv_word_count >= c_tier_two_words.
|
||||
rv_discount = round( val = iv_charge * c_tier_two_percent / 100
|
||||
dec = 2
|
||||
mode = cl_abap_math=>round_half_up ).
|
||||
ELSEIF iv_word_count >= c_tier_one_words.
|
||||
rv_discount = round( val = iv_charge * c_tier_one_percent / 100
|
||||
dec = 2
|
||||
mode = cl_abap_math=>round_half_up ).
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user