Stage 2 summary at 50 accepted trajectories

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

View File

@@ -0,0 +1,17 @@
@AccessControl.authorizationCheck: #NOT_REQUIRED
@EndUserText.label: 'Lessons with instructor'
define view entity {{P}}I_LESSON_INSTR
as select from {{p}}lesson as lesson
association [1..1] to {{p}}instr as _instructor
on lesson.instr_id = _instructor.instr_id
{
key lesson.lesson_id as lesson_id,
lesson.instr_id as instr_id,
lesson.lesson_date as lesson_date,
lesson.duration as duration,
lesson.fee as fee,
_instructor.full_name as instructor_name,
_instructor.city as instructor_city,
_instructor
}
where lesson.duration >= 45

View File

@@ -0,0 +1,55 @@
CLASS {{p}}t31_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
CLASS-DATA go_env TYPE REF TO if_cds_test_environment.
CLASS-METHODS class_setup.
CLASS-METHODS class_teardown.
METHODS setup.
METHODS lesson_with_instructor FOR TESTING.
METHODS lesson_without_instructor FOR TESTING.
ENDCLASS.
CLASS {{p}}t31_test IMPLEMENTATION.
METHOD class_setup.
go_env = cl_cds_test_environment=>create( i_for_entity = '{{P}}I_LESSON_INSTR' ).
ENDMETHOD.
METHOD class_teardown.
go_env->destroy( ).
ENDMETHOD.
METHOD setup.
DATA lt_instr TYPE STANDARD TABLE OF {{p}}instr WITH EMPTY KEY.
DATA lt_lesson TYPE STANDARD TABLE OF {{p}}lesson WITH EMPTY KEY.
go_env->clear_doubles( ).
lt_instr = VALUE #( ( instr_id = 'A' full_name = 'CARA' city = 'KOELN' ) ).
lt_lesson = VALUE #( ( lesson_id = 'X1' instr_id = 'A' lesson_date = '20240201'
duration = 45 fee = '40.00' )
( lesson_id = 'X2' instr_id = 'A' lesson_date = '20240202'
duration = 20 fee = '20.00' )
( lesson_id = 'X3' instr_id = 'Z' lesson_date = '20240203'
duration = 60 fee = '30.00' ) ).
go_env->insert_test_data( lt_instr ).
go_env->insert_test_data( lt_lesson ).
ENDMETHOD.
METHOD lesson_with_instructor.
SELECT SINGLE lesson_id, instructor_name, instructor_city
FROM {{p}}i_lesson_instr
WHERE lesson_id = 'X1' INTO @DATA(ls_result).
cl_abap_unit_assert=>assert_equals( exp = 'X1' act = ls_result-lesson_id ).
cl_abap_unit_assert=>assert_equals( exp = 'CARA' act = ls_result-instructor_name ).
cl_abap_unit_assert=>assert_equals( exp = 'KOELN' act = ls_result-instructor_city ).
ENDMETHOD.
METHOD lesson_without_instructor.
SELECT SINGLE lesson_id, instructor_name
FROM {{p}}i_lesson_instr
WHERE lesson_id = 'X3' INTO @DATA(ls_result).
cl_abap_unit_assert=>assert_equals( exp = 'X3' act = ls_result-lesson_id ).
cl_abap_unit_assert=>assert_initial( act = ls_result-instructor_name ).
ENDMETHOD.
ENDCLASS.