Pipeline controller: plan 2 (hard +, error +50 %), backlog throttle, 2 trajectory workers, stop rules, summaries every 50; budget reserve
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
45
tasks_gen/train/G1026/faulty/m0_guard_fee.func.abap
Normal file
45
tasks_gen/train/G1026/faulty/m0_guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_true.
|
||||
|
||||
IF iv_hours <= 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 2 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true AND cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
45
tasks_gen/train/G1026/faulty/m1_guard_fee.func.abap
Normal file
45
tasks_gen/train/G1026/faulty/m1_guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
IF iv_hours > 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 2 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true AND cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
45
tasks_gen/train/G1026/faulty/m2_guard_fee.func.abap
Normal file
45
tasks_gen/train/G1026/faulty/m2_guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
IF iv_hours <= 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 3 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true AND cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
45
tasks_gen/train/G1026/faulty/m3_guard_fee.func.abap
Normal file
45
tasks_gen/train/G1026/faulty/m3_guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
IF iv_hours <= 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 2 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate / c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true AND cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
45
tasks_gen/train/G1026/faulty/m4_guard_fee.func.abap
Normal file
45
tasks_gen/train/G1026/faulty/m4_guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
IF iv_hours <= 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 2 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true OR cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
28
tasks_gen/train/G1026/generation.json
Normal file
28
tasks_gen/train/G1026/generation.json
Normal file
@@ -0,0 +1,28 @@
|
||||
{
|
||||
"id": "G1026",
|
||||
"pool": "train",
|
||||
"object_type": "FUNC",
|
||||
"category": "G",
|
||||
"attempts": [
|
||||
{
|
||||
"stage": "bundle",
|
||||
"errors": [
|
||||
"reference/t88_test.clas.abap line 64: syntax error for release v702 (abaplint): Statement does not exist in the configured ABAP version(or a parser error), \"cl_abap_unit_assert\""
|
||||
],
|
||||
"by_check": {
|
||||
"abaplint": 1
|
||||
}
|
||||
},
|
||||
{
|
||||
"stage": "validate",
|
||||
"oracle": 100.0,
|
||||
"null": 0,
|
||||
"mutation": {
|
||||
"valid": 5,
|
||||
"killed": 5,
|
||||
"ok": true
|
||||
}
|
||||
}
|
||||
],
|
||||
"accepted": true
|
||||
}
|
||||
129
tasks_gen/train/G1026/hidden/t88_hidden.clas.abap
Normal file
129
tasks_gen/train/G1026/hidden/t88_hidden.clas.abap
Normal file
@@ -0,0 +1,129 @@
|
||||
CLASS {{p}}t88_hidden DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
METHODS call
|
||||
IMPORTING iv_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
iv_fee TYPE decfloat34 DEFAULT 7
|
||||
EXPORTING ev_skip TYPE abap_bool
|
||||
ev_fee TYPE decfloat34
|
||||
ev_subrc TYPE sysubrc.
|
||||
METHODS day_shift_fee FOR TESTING.
|
||||
METHODS day_rounding FOR TESTING.
|
||||
METHODS day_minimum_fee FOR TESTING.
|
||||
METHODS night_shift_fee FOR TESTING.
|
||||
METHODS night_rounding FOR TESTING.
|
||||
METHODS holiday_shift_fee FOR TESTING.
|
||||
METHODS holiday_above_min FOR TESTING.
|
||||
METHODS other_shift_zero FOR TESTING.
|
||||
METHODS zero_hours_rejected FOR TESTING.
|
||||
METHODS negative_hours_rejected FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}t88_hidden IMPLEMENTATION.
|
||||
METHOD call.
|
||||
ev_fee = iv_fee.
|
||||
CALL FUNCTION '{{P}}GUARD_FEE'
|
||||
EXPORTING
|
||||
iv_shift_type = iv_type
|
||||
iv_hours = iv_hours
|
||||
IMPORTING
|
||||
ev_surcharge = ev_skip
|
||||
CHANGING
|
||||
cv_fee = ev_fee
|
||||
EXCEPTIONS
|
||||
invalid_hours = 1
|
||||
OTHERS = 2.
|
||||
ev_subrc = sy-subrc.
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD day_shift_fee.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '102.00'.
|
||||
call( EXPORTING iv_type = 'DAY' iv_hours = 4
|
||||
IMPORTING ev_fee = lv_fee ev_skip = lv_skip ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD day_rounding.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '57.38'.
|
||||
call( EXPORTING iv_type = 'DAY' iv_hours = '2.25'
|
||||
IMPORTING ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD day_minimum_fee.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '50.00'.
|
||||
call( EXPORTING iv_type = 'DAY' iv_hours = 1
|
||||
IMPORTING ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD night_shift_fee.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '127.50'.
|
||||
call( EXPORTING iv_type = 'NIGHT' iv_hours = 4
|
||||
IMPORTING ev_fee = lv_fee ev_skip = lv_skip ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD night_rounding.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '71.72'.
|
||||
call( EXPORTING iv_type = 'NIGHT' iv_hours = '2.25'
|
||||
IMPORTING ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD holiday_shift_fee.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '204.00'.
|
||||
call( EXPORTING iv_type = 'HOLIDAY' iv_hours = 4
|
||||
IMPORTING ev_fee = lv_fee ev_skip = lv_skip ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD holiday_above_min.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '51.00'.
|
||||
call( EXPORTING iv_type = 'HOLIDAY' iv_hours = 1
|
||||
IMPORTING ev_fee = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD other_shift_zero.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '0.00'.
|
||||
call( EXPORTING iv_type = 'STANDBY' iv_hours = 4
|
||||
IMPORTING ev_fee = lv_fee ev_skip = lv_skip ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_skip ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD zero_hours_rejected.
|
||||
DATA lv_fee TYPE decfloat34.
|
||||
DATA lv_rc TYPE sysubrc.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '7.00'.
|
||||
call( EXPORTING iv_type = 'DAY' iv_hours = 0 iv_fee = 7
|
||||
IMPORTING ev_fee = lv_fee ev_subrc = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD negative_hours_rejected.
|
||||
DATA lv_rc TYPE sysubrc.
|
||||
call( EXPORTING iv_type = 'NIGHT' iv_hours = '-2.5'
|
||||
IMPORTING ev_subrc = lv_rc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
71
tasks_gen/train/G1026/mutation.json
Normal file
71
tasks_gen/train/G1026/mutation.json
Normal file
@@ -0,0 +1,71 @@
|
||||
{
|
||||
"task": "G1026",
|
||||
"mutants": [
|
||||
{
|
||||
"object": "{{P}}GUARD_FEE",
|
||||
"mutant": "line 19: abap_false -> abap_true (bool)",
|
||||
"status": "killed",
|
||||
"hidden": "8/10",
|
||||
"failed_tests": [
|
||||
"DAY_SHIFT_FEE",
|
||||
"OTHER_SHIFT_ZERO"
|
||||
]
|
||||
},
|
||||
{
|
||||
"object": "{{P}}GUARD_FEE",
|
||||
"mutant": "line 21: <= -> > (rel)",
|
||||
"status": "killed",
|
||||
"hidden": "0/10",
|
||||
"failed_tests": [
|
||||
"DAY_MINIMUM_FEE",
|
||||
"DAY_ROUNDING",
|
||||
"DAY_SHIFT_FEE",
|
||||
"HOLIDAY_ABOVE_MIN",
|
||||
"HOLIDAY_SHIFT_FEE",
|
||||
"NEGATIVE_HOURS_REJECTED",
|
||||
"NIGHT_ROUNDING",
|
||||
"NIGHT_SHIFT_FEE",
|
||||
"OTHER_SHIFT_ZERO",
|
||||
"ZERO_HOURS_REJECTED"
|
||||
]
|
||||
},
|
||||
{
|
||||
"object": "{{P}}GUARD_FEE",
|
||||
"mutant": "line 32: 2 -> 3 (const)",
|
||||
"status": "killed",
|
||||
"hidden": "9/10",
|
||||
"failed_tests": [
|
||||
"NIGHT_ROUNDING"
|
||||
]
|
||||
},
|
||||
{
|
||||
"object": "{{P}}GUARD_FEE",
|
||||
"mutant": "line 36: * -> / (arith)",
|
||||
"status": "killed",
|
||||
"hidden": "8/10",
|
||||
"failed_tests": [
|
||||
"HOLIDAY_ABOVE_MIN",
|
||||
"HOLIDAY_SHIFT_FEE"
|
||||
]
|
||||
},
|
||||
{
|
||||
"object": "{{P}}GUARD_FEE",
|
||||
"mutant": "line 41: AND -> OR (logic)",
|
||||
"status": "killed",
|
||||
"hidden": "3/10",
|
||||
"failed_tests": [
|
||||
"DAY_ROUNDING",
|
||||
"DAY_SHIFT_FEE",
|
||||
"HOLIDAY_ABOVE_MIN",
|
||||
"HOLIDAY_SHIFT_FEE",
|
||||
"NIGHT_ROUNDING",
|
||||
"NIGHT_SHIFT_FEE",
|
||||
"OTHER_SHIFT_ZERO"
|
||||
]
|
||||
}
|
||||
],
|
||||
"valid": 5,
|
||||
"killed": 5,
|
||||
"kill_rate": 1.0,
|
||||
"ok": true
|
||||
}
|
||||
45
tasks_gen/train/G1026/reference/guard_fee.func.abap
Normal file
45
tasks_gen/train/G1026/reference/guard_fee.func.abap
Normal file
@@ -0,0 +1,45 @@
|
||||
FUNCTION {{p}}guard_fee
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
CONSTANTS c_base_rate TYPE decfloat34 VALUE '25.50'.
|
||||
CONSTANTS c_night_factor TYPE decfloat34 VALUE '1.25'.
|
||||
CONSTANTS c_holiday_factor TYPE decfloat34 VALUE '2.00'.
|
||||
CONSTANTS c_min_fee TYPE decfloat34 VALUE '50.00'.
|
||||
|
||||
DATA lv_known TYPE abap_bool.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
IF iv_hours <= 0.
|
||||
RAISE invalid_hours.
|
||||
ENDIF.
|
||||
|
||||
CASE iv_shift_type.
|
||||
WHEN 'DAY'.
|
||||
lv_known = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate dec = 2 ).
|
||||
WHEN 'NIGHT'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_night_factor dec = 2 ).
|
||||
WHEN 'HOLIDAY'.
|
||||
lv_known = abap_true.
|
||||
ev_surcharge = abap_true.
|
||||
cv_fee = round( val = iv_hours * c_base_rate * c_holiday_factor dec = 2 ).
|
||||
WHEN OTHERS.
|
||||
cv_fee = 0.
|
||||
ENDCASE.
|
||||
|
||||
IF lv_known = abap_true AND cv_fee < c_min_fee.
|
||||
cv_fee = c_min_fee.
|
||||
ENDIF.
|
||||
|
||||
ENDFUNCTION.
|
||||
68
tasks_gen/train/G1026/reference/t88_test.clas.abap
Normal file
68
tasks_gen/train/G1026/reference/t88_test.clas.abap
Normal file
@@ -0,0 +1,68 @@
|
||||
CLASS {{p}}t88_test DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
METHODS fee_for
|
||||
IMPORTING iv_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
RETURNING VALUE(rv_fee) TYPE decfloat34.
|
||||
METHODS day_fee FOR TESTING.
|
||||
METHODS night_fee FOR TESTING.
|
||||
METHODS holiday_fee FOR TESTING.
|
||||
METHODS minimum_fee FOR TESTING.
|
||||
METHODS invalid_hours FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}t88_test IMPLEMENTATION.
|
||||
METHOD fee_for.
|
||||
DATA lv_skip TYPE abap_bool.
|
||||
CALL FUNCTION '{{P}}GUARD_FEE'
|
||||
EXPORTING
|
||||
iv_shift_type = iv_type
|
||||
iv_hours = iv_hours
|
||||
IMPORTING
|
||||
ev_surcharge = lv_skip
|
||||
CHANGING
|
||||
cv_fee = rv_fee
|
||||
EXCEPTIONS
|
||||
invalid_hours = 1
|
||||
OTHERS = 2.
|
||||
cl_abap_unit_assert=>assert_equals( exp = 0 act = sy-subrc ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD day_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '102.00'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'DAY' iv_hours = 4 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD night_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '127.50'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'NIGHT' iv_hours = 4 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD holiday_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '204.00'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'HOLIDAY' iv_hours = 4 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD minimum_fee.
|
||||
DATA lv_exp TYPE decfloat34 VALUE '50.00'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = fee_for( iv_type = 'DAY' iv_hours = 1 ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD invalid_hours.
|
||||
DATA lv_fee TYPE decfloat34 VALUE '7.00'.
|
||||
DATA lv_expected TYPE decfloat34 VALUE '7.00'.
|
||||
CALL FUNCTION '{{P}}GUARD_FEE'
|
||||
EXPORTING
|
||||
iv_shift_type = 'DAY'
|
||||
iv_hours = 0
|
||||
CHANGING
|
||||
cv_fee = lv_fee
|
||||
EXCEPTIONS
|
||||
invalid_hours = 1
|
||||
OTHERS = 2.
|
||||
cl_abap_unit_assert=>assert_equals( exp = 1 act = sy-subrc ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = lv_expected act = lv_fee ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
14
tasks_gen/train/G1026/seed/guard_sample.func.abap
Normal file
14
tasks_gen/train/G1026/seed/guard_sample.func.abap
Normal file
@@ -0,0 +1,14 @@
|
||||
FUNCTION {{p}}guard_sample
|
||||
IMPORTING
|
||||
iv_shift_type TYPE string
|
||||
iv_hours TYPE decfloat34
|
||||
EXPORTING
|
||||
ev_surcharge TYPE abap_bool
|
||||
CHANGING
|
||||
cv_fee TYPE decfloat34
|
||||
EXCEPTIONS
|
||||
invalid_hours.
|
||||
|
||||
ev_surcharge = abap_false.
|
||||
|
||||
ENDFUNCTION.
|
||||
43
tasks_gen/train/G1026/spec.md
Normal file
43
tasks_gen/train/G1026/spec.md
Normal file
@@ -0,0 +1,43 @@
|
||||
# 1. Goal
|
||||
A security company bills its clients for guard shifts. The billing program calls
|
||||
one function module for each shift. The function module calculates the fee of
|
||||
the shift.
|
||||
|
||||
# 2. Open questions
|
||||
None.
|
||||
|
||||
# 3. Context
|
||||
- Function group {{P}}FG_GUARD exists in package $TMP.
|
||||
- Function module {{P}}GUARD_SAMPLE exists in this function group. It is the
|
||||
sample module. The billing program calls all shift modules with the same
|
||||
interface.
|
||||
|
||||
# 4. Contract
|
||||
- Create the function module {{P}}GUARD_FEE in function group {{P}}FG_GUARD.
|
||||
- Use exactly the interface of {{P}}GUARD_SAMPLE: the same parameter names,
|
||||
parameter kinds, types and exceptions.
|
||||
|
||||
# 5. Business rules
|
||||
1. If iv_hours is less than or equal to 0, raise the exception INVALID_HOURS.
|
||||
Do not change cv_fee.
|
||||
2. Set ev_surcharge to false.
|
||||
3. Shift type DAY: the fee is iv_hours multiplied by 25.50.
|
||||
4. Shift type NIGHT: the fee is iv_hours multiplied by 25.50 multiplied by 1.25.
|
||||
Set ev_surcharge to true.
|
||||
5. Shift type HOLIDAY: the fee is iv_hours multiplied by 25.50 multiplied by
|
||||
2.00. Set ev_surcharge to true.
|
||||
6. Any other shift type: the fee is 0. Rules 7 and 8 do not apply.
|
||||
7. For the shift types DAY, NIGHT and HOLIDAY, round the fee half up to 2
|
||||
decimal places.
|
||||
8. If the fee of rule 7 is less than 50.00, set the fee to 50.00.
|
||||
|
||||
# 6. Constraints
|
||||
- Release target: 7.02. Use only syntax that release 7.02 supports.
|
||||
- Package $TMP. Do not use transports.
|
||||
- Out of scope: do not change {{P}}GUARD_SAMPLE.
|
||||
- Do not use application tables.
|
||||
|
||||
# 7. Acceptance
|
||||
- The function module {{P}}GUARD_FEE is active and has no syntax error.
|
||||
- The hidden tests pass.
|
||||
- Write ABAP Unit tests for the function module in a global test class.
|
||||
81
tasks_gen/train/G1026/task.json
Normal file
81
tasks_gen/train/G1026/task.json
Normal file
@@ -0,0 +1,81 @@
|
||||
{
|
||||
"id": "G1026",
|
||||
"category": "G",
|
||||
"object_type": "FUNC",
|
||||
"difficulty": 2,
|
||||
"release_target": "v702",
|
||||
"expected_outcome": "implement",
|
||||
"budget": {
|
||||
"max_tool_calls": 60,
|
||||
"max_activations": 15
|
||||
},
|
||||
"seed": [
|
||||
{
|
||||
"type": "FUGR",
|
||||
"name": "{{P}}FG_GUARD",
|
||||
"description": "Guard shift function group"
|
||||
},
|
||||
{
|
||||
"type": "FUNC",
|
||||
"name": "{{P}}GUARD_SAMPLE",
|
||||
"functionGroup": "{{P}}FG_GUARD",
|
||||
"file": "seed/guard_sample.func.abap",
|
||||
"description": "Sample shift module that fixes the interface"
|
||||
}
|
||||
],
|
||||
"contract": [
|
||||
{
|
||||
"type": "FUNC",
|
||||
"name": "{{P}}GUARD_FEE",
|
||||
"functionGroup": "{{P}}FG_GUARD",
|
||||
"params": [
|
||||
{
|
||||
"name": "iv_shift_type",
|
||||
"type": "string"
|
||||
},
|
||||
{
|
||||
"name": "iv_hours",
|
||||
"type": "decfloat34"
|
||||
},
|
||||
{
|
||||
"name": "ev_surcharge",
|
||||
"type": "abap_bool"
|
||||
},
|
||||
{
|
||||
"name": "cv_fee",
|
||||
"type": "decfloat34"
|
||||
}
|
||||
]
|
||||
}
|
||||
],
|
||||
"out_of_scope": [
|
||||
"{{P}}GUARD_SAMPLE"
|
||||
],
|
||||
"hidden_tests": [
|
||||
{
|
||||
"type": "CLAS",
|
||||
"name": "{{P}}T88_HIDDEN",
|
||||
"file": "hidden/t88_hidden.clas.abap",
|
||||
"description": "T88 hidden tests"
|
||||
}
|
||||
],
|
||||
"reference": [
|
||||
{
|
||||
"type": "FUNC",
|
||||
"name": "{{P}}GUARD_FEE",
|
||||
"functionGroup": "{{P}}FG_GUARD",
|
||||
"file": "reference/guard_fee.func.abap",
|
||||
"description": "Guard shift fee module"
|
||||
},
|
||||
{
|
||||
"type": "CLAS",
|
||||
"name": "{{P}}T88_TEST",
|
||||
"file": "reference/t88_test.clas.abap",
|
||||
"description": "T88 own tests"
|
||||
}
|
||||
],
|
||||
"craft_checks": [
|
||||
"method_length",
|
||||
"release_syntax"
|
||||
]
|
||||
}
|
||||
Reference in New Issue
Block a user