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

Stage 2 summary at 50 accepted trajectories

Browse Source 
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
Kral
2026-10-05 18:02:52 +02:00
parent 332fb4601d
commit 5bcd1bf9cd
1230 changed files with 77563 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

138
tasks_gen/train/G1098/hidden/t41_hidden.clas.abap Normal file
View File

@@ -0,0 +1,138 @@
CLASS {{p}}t41_hidden DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS call
IMPORTING iv_lesson_type TYPE string
iv_vehicle TYPE string
iv_minutes TYPE i
EXPORTING ev_block TYPE abap_bool
ev_fee TYPE decfloat34
ev_subrc TYPE sysubrc.
METHODS car_rate FOR TESTING.
METHODS truck_rate FOR TESTING.
METHODS moto_rate FOR TESTING.
METHODS night_surcharge FOR TESTING.
METHODS motorway_surcharge FOR TESTING.
METHODS rounding_half_up FOR TESTING.
METHODS minimum_fee FOR TESTING.
METHODS unknown_vehicle FOR TESTING.
METHODS block_long_lesson FOR TESTING.
METHODS no_block_normal_lesson FOR TESTING.
METHODS invalid_minutes FOR TESTING.
ENDCLASS.
CLASS {{p}}t41_hidden IMPLEMENTATION.
METHOD call.
CLEAR ev_fee.
CALL FUNCTION '{{P}}DRV_FEE'
EXPORTING
iv_lesson_type = iv_lesson_type
iv_vehicle = iv_vehicle
iv_minutes = iv_minutes
IMPORTING
ev_block = ev_block
CHANGING
cv_fee = ev_fee
EXCEPTIONS
invalid_minutes = 1
OTHERS = 2.
ev_subrc = sy-subrc.
ENDMETHOD.
METHOD car_rate.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '72.00'.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'CAR' iv_minutes = 60
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD truck_rate.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '75.00'.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'TRUCK' iv_minutes = 30
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD moto_rate.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '54.00'.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'MOTORCYCLE' iv_minutes = 60
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD night_surcharge.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '90.00'.
call( EXPORTING iv_lesson_type = 'NIGHT' iv_vehicle = 'CAR' iv_minutes = 60
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD motorway_surcharge.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '105.00'.
call( EXPORTING iv_lesson_type = 'MOTORWAY' iv_vehicle = 'TRUCK' iv_minutes = 30
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD rounding_half_up.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '21.88'.
call( EXPORTING iv_lesson_type = 'NIGHT' iv_vehicle = 'TRUCK' iv_minutes = 7
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD minimum_fee.
DATA lv_fee TYPE decfloat34.
DATA lv_exp TYPE decfloat34 VALUE '15.00'.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'MOTORCYCLE' iv_minutes = 10
IMPORTING ev_fee = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD unknown_vehicle.
DATA lv_fee TYPE decfloat34.
DATA lv_block TYPE abap_bool.
DATA lv_rc TYPE sysubrc.
DATA lv_exp TYPE decfloat34.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'BOAT' iv_minutes = 200
IMPORTING ev_fee = lv_fee ev_block = lv_block ev_subrc = lv_rc ).
cl_abap_unit_assert=>assert_equals( exp = 0 act = lv_rc ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_block ).
ENDMETHOD.
METHOD block_long_lesson.
DATA lv_fee TYPE decfloat34.
DATA lv_block TYPE abap_bool.
DATA lv_exp TYPE decfloat34 VALUE '145.20'.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'CAR' iv_minutes = 121
IMPORTING ev_fee = lv_fee ev_block = lv_block ).
cl_abap_unit_assert=>assert_equals( exp = abap_true act = lv_block ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD no_block_normal_lesson.
DATA lv_fee TYPE decfloat34.
DATA lv_block TYPE abap_bool.
DATA lv_exp TYPE decfloat34 VALUE '144.00'.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'CAR' iv_minutes = 120
IMPORTING ev_fee = lv_fee ev_block = lv_block ).
cl_abap_unit_assert=>assert_equals( exp = abap_false act = lv_block ).
cl_abap_unit_assert=>assert_equals( exp = lv_exp act = lv_fee ).
ENDMETHOD.
METHOD invalid_minutes.
DATA lv_fee TYPE decfloat34.
DATA lv_rc TYPE sysubrc.
call( EXPORTING iv_lesson_type = 'NORMAL' iv_vehicle = 'CAR' iv_minutes = 0
IMPORTING ev_fee = lv_fee ev_subrc = lv_rc ).
cl_abap_unit_assert=>assert_equals( exp = 1 act = lv_rc ).
ENDMETHOD.
ENDCLASS.