erhan/abap-llm
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Snapshot: new training tasks (balanced generation), docs

Browse Source 
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
Kral
2026-10-05 22:08:59 +02:00
parent eb13453097
commit 6984fc7917
572 changed files with 30024 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
tasks_gen/train/G1937/faulty/m0_if_sweep_check.intf.abap Normal file
View File

@@ -0,0 +1,37 @@
INTERFACE {{p}}if_sweep_check PUBLIC.
TYPES ty_reason TYPE c LENGTH 10.
TYPES ty_flue_kind TYPE c LENGTH 3.
TYPES ty_amount TYPE p LENGTH 8 DECIMALS 2.
CONSTANTS:
BEGIN OF c_reason,
ok TYPE ty_reason VALUE 'OK',
no_flues TYPE ty_reason VALUE 'NO_FLUES',
too_many TYPE ty_reason VALUE 'TOO_MANY',
bad_kind TYPE ty_reason VALUE 'BAD_KIND',
blocked TYPE ty_reason VALUE 'BLOCKED',
old_sweep TYPE ty_reason VALUE 'OLD_SWEEP',
END OF c_reason.
CONSTANTS:
BEGIN OF c_kind,
open TYPE ty_flue_kind VALUE 'OPEN',
closed TYPE ty_flue_kind VALUE 'CLOS',
indust TYPE ty_flue_kind VALUE 'INDU',
END OF c_kind.
CONSTANTS c_max_flues TYPE i VALUE 12.
METHODS check_order
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
iv_last_sweep TYPE i
iv_year TYPE i
iv_blocked TYPE abap_bool
RETURNING VALUE(rv_reason) TYPE ty_reason.
METHODS fee
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
RETURNING VALUE(rv_fee) TYPE ty_amount.
ENDINTERFACE.

65
tasks_gen/train/G1937/faulty/m1_chimney_checker.clas.abap Normal file
View File

@@ -0,0 +1,65 @@
CLASS {{p}}chimney_checker DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
INTERFACES {{p}}if_sweep_check.
PRIVATE SECTION.
CONSTANTS c_discount TYPE p LENGTH 3 DECIMALS 2 VALUE '0.90'.
METHODS flue_fee
IMPORTING iv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind
RETURNING VALUE(rv_fee) TYPE {{p}}if_sweep_check=>ty_amount.
METHODS is_known_kind
IMPORTING iv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind
RETURNING VALUE(rv_known) TYPE abap_bool.
ENDCLASS.
CLASS {{p}}chimney_checker IMPLEMENTATION.
METHOD {{p}}if_sweep_check~check_order.
IF iv_flues < 1.
rv_reason = {{p}}if_sweep_check=>c_reason-no_flues.
ELSEIF iv_flues > {{p}}if_sweep_check=>c_max_flues.
rv_reason = {{p}}if_sweep_check=>c_reason-too_many.
ELSEIF is_known_kind( iv_kind ) = abap_true.
rv_reason = {{p}}if_sweep_check=>c_reason-bad_kind.
ELSEIF iv_blocked = abap_true.
rv_reason = {{p}}if_sweep_check=>c_reason-blocked.
ELSEIF iv_year - iv_last_sweep > 2.
rv_reason = {{p}}if_sweep_check=>c_reason-old_sweep.
ELSE.
rv_reason = {{p}}if_sweep_check=>c_reason-ok.
ENDIF.
ENDMETHOD.
METHOD {{p}}if_sweep_check~fee.
IF iv_flues < 1.
rv_fee = 0.
RETURN.
ENDIF.
DATA lv_total TYPE {{p}}if_sweep_check=>ty_amount.
lv_total = flue_fee( iv_kind ) * iv_flues.
IF iv_flues >= 5.
lv_total = lv_total * c_discount.
ENDIF.
rv_fee = round( val = lv_total dec = 2 ).
ENDMETHOD.
METHOD flue_fee.
IF iv_kind = {{p}}if_sweep_check=>c_kind-open.
rv_fee = '60.00'.
ELSEIF iv_kind = {{p}}if_sweep_check=>c_kind-closed.
rv_fee = '45.00'.
ELSEIF iv_kind = {{p}}if_sweep_check=>c_kind-indust.
rv_fee = '120.00'.
ELSE.
rv_fee = 0.
ENDIF.
ENDMETHOD.
METHOD is_known_kind.
rv_known = xsdbool( iv_kind = {{p}}if_sweep_check=>c_kind-open
OR iv_kind = {{p}}if_sweep_check=>c_kind-closed
OR iv_kind = {{p}}if_sweep_check=>c_kind-indust ).
ENDMETHOD.
ENDCLASS.

37
tasks_gen/train/G1937/faulty/m2_if_sweep_check.intf.abap Normal file
View File

@@ -0,0 +1,37 @@
INTERFACE {{p}}if_sweep_check PUBLIC.
TYPES ty_reason TYPE c LENGTH 10.
TYPES ty_flue_kind TYPE c LENGTH 4.
TYPES ty_amount TYPE p LENGTH 8 DECIMALS 2.
CONSTANTS:
BEGIN OF c_reason,
ok TYPE ty_reason VALUE 'OK',
no_flues TYPE ty_reason VALUE 'ZO_FLUES',
too_many TYPE ty_reason VALUE 'TOO_MANY',
bad_kind TYPE ty_reason VALUE 'BAD_KIND',
blocked TYPE ty_reason VALUE 'BLOCKED',
old_sweep TYPE ty_reason VALUE 'OLD_SWEEP',
END OF c_reason.
CONSTANTS:
BEGIN OF c_kind,
open TYPE ty_flue_kind VALUE 'OPEN',
closed TYPE ty_flue_kind VALUE 'CLOS',
indust TYPE ty_flue_kind VALUE 'INDU',
END OF c_kind.
CONSTANTS c_max_flues TYPE i VALUE 12.
METHODS check_order
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
iv_last_sweep TYPE i
iv_year TYPE i
iv_blocked TYPE abap_bool
RETURNING VALUE(rv_reason) TYPE ty_reason.
METHODS fee
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
RETURNING VALUE(rv_fee) TYPE ty_amount.
ENDINTERFACE.

65
tasks_gen/train/G1937/faulty/m3_chimney_checker.clas.abap Normal file
View File

@@ -0,0 +1,65 @@
CLASS {{p}}chimney_checker DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
INTERFACES {{p}}if_sweep_check.
PRIVATE SECTION.
CONSTANTS c_discount TYPE p LENGTH 3 DECIMALS 2 VALUE '0.90'.
METHODS flue_fee
IMPORTING iv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind
RETURNING VALUE(rv_fee) TYPE {{p}}if_sweep_check=>ty_amount.
METHODS is_known_kind
IMPORTING iv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind
RETURNING VALUE(rv_known) TYPE abap_bool.
ENDCLASS.
CLASS {{p}}chimney_checker IMPLEMENTATION.
METHOD {{p}}if_sweep_check~check_order.
IF iv_flues < 1.
rv_reason = {{p}}if_sweep_check=>c_reason-no_flues.
ELSEIF iv_flues > {{p}}if_sweep_check=>c_max_flues.
rv_reason = {{p}}if_sweep_check=>c_reason-too_many.
ELSEIF is_known_kind( iv_kind ) = abap_false.
rv_reason = {{p}}if_sweep_check=>c_reason-bad_kind.
ELSEIF iv_blocked <> abap_true.
rv_reason = {{p}}if_sweep_check=>c_reason-blocked.
ELSEIF iv_year - iv_last_sweep > 2.
rv_reason = {{p}}if_sweep_check=>c_reason-old_sweep.
ELSE.
rv_reason = {{p}}if_sweep_check=>c_reason-ok.
ENDIF.
ENDMETHOD.
METHOD {{p}}if_sweep_check~fee.
IF iv_flues < 1.
rv_fee = 0.
RETURN.
ENDIF.
DATA lv_total TYPE {{p}}if_sweep_check=>ty_amount.
lv_total = flue_fee( iv_kind ) * iv_flues.
IF iv_flues >= 5.
lv_total = lv_total * c_discount.
ENDIF.
rv_fee = round( val = lv_total dec = 2 ).
ENDMETHOD.
METHOD flue_fee.
IF iv_kind = {{p}}if_sweep_check=>c_kind-open.
rv_fee = '60.00'.
ELSEIF iv_kind = {{p}}if_sweep_check=>c_kind-closed.
rv_fee = '45.00'.
ELSEIF iv_kind = {{p}}if_sweep_check=>c_kind-indust.
rv_fee = '120.00'.
ELSE.
rv_fee = 0.
ENDIF.
ENDMETHOD.
METHOD is_known_kind.
rv_known = xsdbool( iv_kind = {{p}}if_sweep_check=>c_kind-open
OR iv_kind = {{p}}if_sweep_check=>c_kind-closed
OR iv_kind = {{p}}if_sweep_check=>c_kind-indust ).
ENDMETHOD.
ENDCLASS.

37
tasks_gen/train/G1937/faulty/m4_if_sweep_check.intf.abap Normal file
View File

@@ -0,0 +1,37 @@
INTERFACE {{p}}if_sweep_check PUBLIC.
TYPES ty_reason TYPE c LENGTH 10.
TYPES ty_flue_kind TYPE c LENGTH 4.
TYPES ty_amount TYPE p LENGTH 8 DECIMALS 2.
CONSTANTS:
BEGIN OF c_reason,
ok TYPE ty_reason VALUE 'OK',
no_flues TYPE ty_reason VALUE 'NO_FLUES',
too_many TYPE ty_reason VALUE 'TOO_MANY',
bad_kind TYPE ty_reason VALUE 'ZAD_KIND',
blocked TYPE ty_reason VALUE 'BLOCKED',
old_sweep TYPE ty_reason VALUE 'OLD_SWEEP',
END OF c_reason.
CONSTANTS:
BEGIN OF c_kind,
open TYPE ty_flue_kind VALUE 'OPEN',
closed TYPE ty_flue_kind VALUE 'CLOS',
indust TYPE ty_flue_kind VALUE 'INDU',
END OF c_kind.
CONSTANTS c_max_flues TYPE i VALUE 12.
METHODS check_order
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
iv_last_sweep TYPE i
iv_year TYPE i
iv_blocked TYPE abap_bool
RETURNING VALUE(rv_reason) TYPE ty_reason.
METHODS fee
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
RETURNING VALUE(rv_fee) TYPE ty_amount.
ENDINTERFACE.

34
tasks_gen/train/G1937/generation.json Normal file
View File

@@ -0,0 +1,34 @@
{
"id": "G1937",
"pool": "train",
"object_type": "INTF",
"category": "A",
"attempts": [
{
"stage": "validate",
"oracle": 0,
"null": 0
},
{
"stage": "validate",
"oracle": 0,
"null": 0
},
{
"stage": "validate",
"oracle": 96.7,
"null": 0
},
{
"stage": "validate",
"oracle": 100.0,
"null": 0,
"mutation": {
"valid": 5,
"killed": 5,
"ok": true
}
}
],
"accepted": true
}

215
tasks_gen/train/G1937/hidden/t02_hidden.clas.abap Normal file
View File

@@ -0,0 +1,215 @@
CLASS {{p}}t02_hidden DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PUBLIC SECTION.
INTERFACES {{p}}if_sweep_check.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}if_sweep_check.
METHODS setup.
METHODS ok_order FOR TESTING.
METHODS no_flues FOR TESTING.
METHODS too_many_flues FOR TESTING.
METHODS bad_kind FOR TESTING.
METHODS blocked_order FOR TESTING.
METHODS old_sweep FOR TESTING.
METHODS boundary_ok FOR TESTING.
METHODS reason_priority FOR TESTING.
METHODS fee_by_kind FOR TESTING.
METHODS fee_discount FOR TESTING.
METHODS fee_edge FOR TESTING.
METHODS contract_shape FOR TESTING.
ENDCLASS.
CLASS {{p}}t02_hidden IMPLEMENTATION.
METHOD {{p}}if_sweep_check~check_order.
rv_reason = {{p}}if_sweep_check=>c_reason-ok.
ENDMETHOD.
METHOD {{p}}if_sweep_check~fee.
rv_fee = 0.
ENDMETHOD.
METHOD setup.
mo_cut = NEW {{p}}chimney_checker( ).
ENDMETHOD.
METHOD ok_order.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-ok
act = mo_cut->check_order( iv_flues = 3
iv_kind = {{p}}if_sweep_check=>c_kind-open
iv_last_sweep = 2024
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD no_flues.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-no_flues
act = mo_cut->check_order( iv_flues = 0
iv_kind = {{p}}if_sweep_check=>c_kind-closed
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-no_flues
act = mo_cut->check_order( iv_flues = -2
iv_kind = {{p}}if_sweep_check=>c_kind-closed
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD too_many_flues.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-too_many
act = mo_cut->check_order( iv_flues = 13
iv_kind = {{p}}if_sweep_check=>c_kind-open
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD bad_kind.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-bad_kind
act = mo_cut->check_order( iv_flues = 3
iv_kind = 'GAS'
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD blocked_order.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-blocked
act = mo_cut->check_order( iv_flues = 3
iv_kind = {{p}}if_sweep_check=>c_kind-indust
iv_last_sweep = 2024
iv_year = 2025
iv_blocked = abap_true ) ).
ENDMETHOD.
METHOD old_sweep.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-old_sweep
act = mo_cut->check_order( iv_flues = 2
iv_kind = {{p}}if_sweep_check=>c_kind-open
iv_last_sweep = 2022
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD boundary_ok.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-ok
act = mo_cut->check_order( iv_flues = 12
iv_kind = {{p}}if_sweep_check=>c_kind-closed
iv_last_sweep = 2023
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD reason_priority.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-no_flues
act = mo_cut->check_order( iv_flues = 0
iv_kind = 'GAS'
iv_last_sweep = 2000
iv_year = 2025
iv_blocked = abap_true ) ).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-too_many
act = mo_cut->check_order( iv_flues = 20
iv_kind = 'GAS'
iv_last_sweep = 2000
iv_year = 2025
iv_blocked = abap_true ) ).
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-bad_kind
act = mo_cut->check_order( iv_flues = 3
iv_kind = 'GAS'
iv_last_sweep = 2000
iv_year = 2025
iv_blocked = abap_true ) ).
ENDMETHOD.
METHOD fee_by_kind.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '240.00' )
act = mo_cut->fee( iv_flues = 4 iv_kind = {{p}}if_sweep_check=>c_kind-open ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '180.00' )
act = mo_cut->fee( iv_flues = 4 iv_kind = {{p}}if_sweep_check=>c_kind-closed ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '240.00' )
act = mo_cut->fee( iv_flues = 2 iv_kind = {{p}}if_sweep_check=>c_kind-indust ) ).
ENDMETHOD.
METHOD fee_discount.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '243.00' )
act = mo_cut->fee( iv_flues = 6 iv_kind = {{p}}if_sweep_check=>c_kind-closed ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '270.00' )
act = mo_cut->fee( iv_flues = 5 iv_kind = {{p}}if_sweep_check=>c_kind-open ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '540.00' )
act = mo_cut->fee( iv_flues = 5 iv_kind = {{p}}if_sweep_check=>c_kind-indust ) ).
ENDMETHOD.
METHOD fee_edge.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '0.00' )
act = mo_cut->fee( iv_flues = 0 iv_kind = {{p}}if_sweep_check=>c_kind-open ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '0.00' )
act = mo_cut->fee( iv_flues = -2 iv_kind = {{p}}if_sweep_check=>c_kind-open ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '0.00' )
act = mo_cut->fee( iv_flues = 3 iv_kind = 'GAS' ) ).
ENDMETHOD.
METHOD contract_shape.
cl_abap_unit_assert=>assert_equals( exp = 12 act = {{p}}if_sweep_check=>c_max_flues ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_reason( 'OK' )
act = {{p}}if_sweep_check=>c_reason-ok ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_reason( 'NO_FLUES' )
act = {{p}}if_sweep_check=>c_reason-no_flues ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_reason( 'TOO_MANY' )
act = {{p}}if_sweep_check=>c_reason-too_many ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_reason( 'BAD_KIND' )
act = {{p}}if_sweep_check=>c_reason-bad_kind ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_reason( 'BLOCKED' )
act = {{p}}if_sweep_check=>c_reason-blocked ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_reason( 'OLD_SWEEP' )
act = {{p}}if_sweep_check=>c_reason-old_sweep ).
cl_abap_unit_assert=>assert_equals( exp = 'OPEN' act = {{p}}if_sweep_check=>c_kind-open ).
cl_abap_unit_assert=>assert_equals( exp = 'CLOS' act = {{p}}if_sweep_check=>c_kind-closed ).
cl_abap_unit_assert=>assert_equals( exp = 'INDU' act = {{p}}if_sweep_check=>c_kind-indust ).
DATA lv_reason TYPE {{p}}if_sweep_check=>ty_reason.
lv_reason = 'ABCDEFGHIJK'.
cl_abap_unit_assert=>assert_equals( exp = 'ABCDEFGHIJ' act = lv_reason ).
DATA lv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind.
lv_kind = 'ABCDE'.
cl_abap_unit_assert=>assert_equals( exp = 'ABCD' act = lv_kind ).
DATA lv_amount TYPE {{p}}if_sweep_check=>ty_amount.
lv_amount = '123.45'.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '123.45' )
act = lv_amount ).
DATA lo_self TYPE REF TO {{p}}if_sweep_check.
lo_self = NEW {{p}}t02_hidden( ).
cl_abap_unit_assert=>assert_bound( lo_self ).
ENDMETHOD.
ENDCLASS.

62
tasks_gen/train/G1937/mutation.json Normal file
View File

@@ -0,0 +1,62 @@
{
"task": "G1937",
"mutants": [
{
"object": "{{P}}IF_SWEEP_CHECK",
"mutant": "line 3: LENGTH 4 -> LENGTH 3 (length)",
"status": "killed",
"hidden": "11/12",
"failed_tests": [
"CONTRACT_SHAPE"
]
},
{
"object": "{{P}}CHIMNEY_CHECKER",
"mutant": "line 24: abap_false -> abap_true (bool)",
"status": "killed",
"hidden": "6/12",
"failed_tests": [
"BAD_KIND",
"BLOCKED_ORDER",
"BOUNDARY_OK",
"OK_ORDER",
"OLD_SWEEP",
"REASON_PRIORITY"
]
},
{
"object": "{{P}}IF_SWEEP_CHECK",
"mutant": "line 9: VALUE 'NO_FLUES' -> VALUE 'ZO_FLUES' (lit)",
"status": "killed",
"hidden": "11/12",
"failed_tests": [
"CONTRACT_SHAPE"
]
},
{
"object": "{{P}}CHIMNEY_CHECKER",
"mutant": "line 26: = -> <> (eq)",
"status": "killed",
"hidden": "8/12",
"failed_tests": [
"BLOCKED_ORDER",
"BOUNDARY_OK",
"OK_ORDER",
"OLD_SWEEP"
]
},
{
"object": "{{P}}IF_SWEEP_CHECK",
"mutant": "line 11: VALUE 'BAD_KIND' -> VALUE 'ZAD_KIND' (lit)",
"status": "killed",
"hidden": "11/12",
"failed_tests": [
"CONTRACT_SHAPE"
]
}
],
"valid": 5,
"killed": 5,
"kill_rate": 1.0,
"ok": true
}

65
tasks_gen/train/G1937/reference/chimney_checker.clas.abap Normal file
View File

@@ -0,0 +1,65 @@
CLASS {{p}}chimney_checker DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
INTERFACES {{p}}if_sweep_check.
PRIVATE SECTION.
CONSTANTS c_discount TYPE p LENGTH 3 DECIMALS 2 VALUE '0.90'.
METHODS flue_fee
IMPORTING iv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind
RETURNING VALUE(rv_fee) TYPE {{p}}if_sweep_check=>ty_amount.
METHODS is_known_kind
IMPORTING iv_kind TYPE {{p}}if_sweep_check=>ty_flue_kind
RETURNING VALUE(rv_known) TYPE abap_bool.
ENDCLASS.
CLASS {{p}}chimney_checker IMPLEMENTATION.
METHOD {{p}}if_sweep_check~check_order.
IF iv_flues < 1.
rv_reason = {{p}}if_sweep_check=>c_reason-no_flues.
ELSEIF iv_flues > {{p}}if_sweep_check=>c_max_flues.
rv_reason = {{p}}if_sweep_check=>c_reason-too_many.
ELSEIF is_known_kind( iv_kind ) = abap_false.
rv_reason = {{p}}if_sweep_check=>c_reason-bad_kind.
ELSEIF iv_blocked = abap_true.
rv_reason = {{p}}if_sweep_check=>c_reason-blocked.
ELSEIF iv_year - iv_last_sweep > 2.
rv_reason = {{p}}if_sweep_check=>c_reason-old_sweep.
ELSE.
rv_reason = {{p}}if_sweep_check=>c_reason-ok.
ENDIF.
ENDMETHOD.
METHOD {{p}}if_sweep_check~fee.
IF iv_flues < 1.
rv_fee = 0.
RETURN.
ENDIF.
DATA lv_total TYPE {{p}}if_sweep_check=>ty_amount.
lv_total = flue_fee( iv_kind ) * iv_flues.
IF iv_flues >= 5.
lv_total = lv_total * c_discount.
ENDIF.
rv_fee = round( val = lv_total dec = 2 ).
ENDMETHOD.
METHOD flue_fee.
IF iv_kind = {{p}}if_sweep_check=>c_kind-open.
rv_fee = '60.00'.
ELSEIF iv_kind = {{p}}if_sweep_check=>c_kind-closed.
rv_fee = '45.00'.
ELSEIF iv_kind = {{p}}if_sweep_check=>c_kind-indust.
rv_fee = '120.00'.
ELSE.
rv_fee = 0.
ENDIF.
ENDMETHOD.
METHOD is_known_kind.
rv_known = xsdbool( iv_kind = {{p}}if_sweep_check=>c_kind-open
OR iv_kind = {{p}}if_sweep_check=>c_kind-closed
OR iv_kind = {{p}}if_sweep_check=>c_kind-indust ).
ENDMETHOD.
ENDCLASS.

102
tasks_gen/train/G1937/reference/chimney_checker.testclasses.abap Normal file
View File

@@ -0,0 +1,102 @@
CLASS ltc_chimney_checker DEFINITION FINAL FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
DATA mo_cut TYPE REF TO {{p}}if_sweep_check.
METHODS setup.
METHODS order_is_ok FOR TESTING.
METHODS no_flues FOR TESTING.
METHODS too_many_flues FOR TESTING.
METHODS unknown_kind FOR TESTING.
METHODS blocked_order FOR TESTING.
METHODS stale_sweep FOR TESTING.
METHODS fee_by_kind FOR TESTING.
METHODS fee_with_discount FOR TESTING.
METHODS fee_without_flues FOR TESTING.
ENDCLASS.
CLASS ltc_chimney_checker IMPLEMENTATION.
METHOD setup.
mo_cut = NEW {{p}}chimney_checker( ).
ENDMETHOD.
METHOD order_is_ok.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-ok
act = mo_cut->check_order( iv_flues = 2
iv_kind = {{p}}if_sweep_check=>c_kind-open
iv_last_sweep = 2024
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD no_flues.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-no_flues
act = mo_cut->check_order( iv_flues = 0
iv_kind = {{p}}if_sweep_check=>c_kind-closed
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD too_many_flues.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-too_many
act = mo_cut->check_order( iv_flues = 13
iv_kind = {{p}}if_sweep_check=>c_kind-open
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD unknown_kind.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-bad_kind
act = mo_cut->check_order( iv_flues = 2
iv_kind = 'GAS'
iv_last_sweep = 2025
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD blocked_order.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-blocked
act = mo_cut->check_order( iv_flues = 2
iv_kind = {{p}}if_sweep_check=>c_kind-open
iv_last_sweep = 2024
iv_year = 2025
iv_blocked = abap_true ) ).
ENDMETHOD.
METHOD stale_sweep.
cl_abap_unit_assert=>assert_equals(
exp = {{p}}if_sweep_check=>c_reason-old_sweep
act = mo_cut->check_order( iv_flues = 2
iv_kind = {{p}}if_sweep_check=>c_kind-indust
iv_last_sweep = 2022
iv_year = 2025
iv_blocked = abap_false ) ).
ENDMETHOD.
METHOD fee_by_kind.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '240.00' )
act = mo_cut->fee( iv_flues = 4 iv_kind = {{p}}if_sweep_check=>c_kind-open ) ).
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '180.00' )
act = mo_cut->fee( iv_flues = 4 iv_kind = {{p}}if_sweep_check=>c_kind-closed ) ).
ENDMETHOD.
METHOD fee_with_discount.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '243.00' )
act = mo_cut->fee( iv_flues = 6 iv_kind = {{p}}if_sweep_check=>c_kind-closed ) ).
ENDMETHOD.
METHOD fee_without_flues.
cl_abap_unit_assert=>assert_equals(
exp = CONV {{p}}if_sweep_check=>ty_amount( '0.00' )
act = mo_cut->fee( iv_flues = 0 iv_kind = {{p}}if_sweep_check=>c_kind-open ) ).
ENDMETHOD.
ENDCLASS.

37
tasks_gen/train/G1937/reference/if_sweep_check.intf.abap Normal file
View File

@@ -0,0 +1,37 @@
INTERFACE {{p}}if_sweep_check PUBLIC.
TYPES ty_reason TYPE c LENGTH 10.
TYPES ty_flue_kind TYPE c LENGTH 4.
TYPES ty_amount TYPE p LENGTH 8 DECIMALS 2.
CONSTANTS:
BEGIN OF c_reason,
ok TYPE ty_reason VALUE 'OK',
no_flues TYPE ty_reason VALUE 'NO_FLUES',
too_many TYPE ty_reason VALUE 'TOO_MANY',
bad_kind TYPE ty_reason VALUE 'BAD_KIND',
blocked TYPE ty_reason VALUE 'BLOCKED',
old_sweep TYPE ty_reason VALUE 'OLD_SWEEP',
END OF c_reason.
CONSTANTS:
BEGIN OF c_kind,
open TYPE ty_flue_kind VALUE 'OPEN',
closed TYPE ty_flue_kind VALUE 'CLOS',
indust TYPE ty_flue_kind VALUE 'INDU',
END OF c_kind.
CONSTANTS c_max_flues TYPE i VALUE 12.
METHODS check_order
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
iv_last_sweep TYPE i
iv_year TYPE i
iv_blocked TYPE abap_bool
RETURNING VALUE(rv_reason) TYPE ty_reason.
METHODS fee
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
RETURNING VALUE(rv_fee) TYPE ty_amount.
ENDINTERFACE.

75
tasks_gen/train/G1937/spec.md Normal file
View File

@@ -0,0 +1,75 @@
# 1. Goal
A chimney sweep company serves private houses and small businesses. Before the
dispatcher schedules a sweep, the dispatch program checks each sweep order and
calculates the sweep fee. The program needs one reason code for each order.
# 2. Open questions
None.
# 3. Context
- Package $TMP.
- The dispatch program uses the interface {{P}}IF_SWEEP_CHECK and the class
{{P}}CHIMNEY_CHECKER.
- One flue is one chimney channel. A sweep order covers one or more flues.
- iv_last_sweep is the year of the last sweep of the order.
- iv_year is the current year.
- iv_blocked is true when the customer blocked the access to the building.
# 4. Contract
- Create the interface {{P}}IF_SWEEP_CHECK in package $TMP. The interface has
these public components:
- TYPES ty_reason TYPE c LENGTH 10.
- TYPES ty_flue_kind TYPE c LENGTH 4.
- TYPES ty_amount TYPE p LENGTH 8 DECIMALS 2.
- The constant structure c_reason with the components ok, no_flues, too_many,
bad_kind, blocked, old_sweep. Each component has the type ty_reason and
these values: 'OK', 'NO_FLUES', 'TOO_MANY', 'BAD_KIND', 'BLOCKED',
'OLD_SWEEP'.
- The constant structure c_kind with the components open, closed, indust.
Each component has the type ty_flue_kind and these values: 'OPEN', 'CLOS',
'INDU'.
- The constant c_max_flues with the type i and the value 12.
- The method check_order with the parameters
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
iv_last_sweep TYPE i
iv_year TYPE i
iv_blocked TYPE abap_bool
RETURNING VALUE(rv_reason) TYPE ty_reason.
- The method fee with the parameters
IMPORTING iv_flues TYPE i
iv_kind TYPE ty_flue_kind
RETURNING VALUE(rv_fee) TYPE ty_amount.
- Create the class {{P}}CHIMNEY_CHECKER in package $TMP.
- The class is public, final, and has a public constructor without parameters.
- The class implements {{P}}IF_SWEEP_CHECK.
- Do not add other public methods to the class.
# 5. Business rules
## 5.1 Check of a sweep order
Apply the rules in this sequence. Return the reason of the first rule that fails.
1. If iv_flues is less than 1, return NO_FLUES.
2. If iv_flues is greater than c_max_flues, return TOO_MANY.
3. If iv_kind is not OPEN, CLOS or INDU, return BAD_KIND.
4. If iv_blocked is true, return BLOCKED.
5. If iv_year minus iv_last_sweep is greater than 2, return OLD_SWEEP.
6. Else return OK.
## 5.2 Fee of a sweep order
1. The fee of one flue depends on the flue kind: OPEN 60.00, CLOS 45.00,
INDU 120.00. Any other flue kind has a fee of 0.00.
2. The total is the fee of one flue multiplied by iv_flues.
3. If iv_flues is 5 or more, reduce the total by 10 percent.
4. Round the result to 2 decimals.
5. If iv_flues is less than 1, the fee is 0.00.
# 6. Constraints
- Release target: SAP_BASIS 816.
- Coding standards: Clean ABAP. Method length below 40 statements. No global
variables. No comment that restates the code.
- Out of scope: no other objects in package $TMP.
# 7. Acceptance
- The interface and the class are active and have no syntax error.
- The hidden tests pass.
- Write your own ABAP Unit tests for the class.

51
tasks_gen/train/G1937/task.json Normal file
View File

@@ -0,0 +1,51 @@
{
"id": "G1937",
"category": "A",
"object_type": "INTF",
"difficulty": 2,
"release_target": "v816",
"expected_outcome": "implement",
"budget": {
"max_tool_calls": 60,
"max_activations": 15
},
"seed": [],
"contract": [
{
"type": "INTF",
"name": "{{P}}IF_SWEEP_CHECK"
},
{
"type": "CLAS",
"name": "{{P}}CHIMNEY_CHECKER",
"implements": "{{P}}IF_SWEEP_CHECK"
}
],
"out_of_scope": [],
"hidden_tests": [
{
"type": "CLAS",
"name": "{{P}}T02_HIDDEN",
"file": "hidden/t02_hidden.clas.abap",
"description": "T02 hidden tests: the test class implements the interface, calls the methods through the interface, reads the constants and checks the type lengths"
}
],
"reference": [
{
"type": "INTF",
"name": "{{P}}IF_SWEEP_CHECK",
"file": "reference/if_sweep_check.intf.abap",
"description": "Sweep order check contract"
},
{
"type": "CLAS",
"name": "{{P}}CHIMNEY_CHECKER",
"file": "reference/chimney_checker.clas.abap",
"description": "Chimney sweep order checker and fee calculator",
"testclasses_file": "reference/chimney_checker.testclasses.abap"
}
],
"craft_checks": [
"method_length"
]
}