CLASS {{P}}SEED_COURSES DEFINITION PUBLIC FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    INTERFACES if_oo_adt_classrun.
ENDCLASS.


CLASS {{P}}SEED_COURSES IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    DELETE FROM {{P}}COURSE.

    DATA lt_course TYPE STANDARD TABLE OF {{P}}COURSE WITH EMPTY KEY.
    lt_course = VALUE #(
      ( mandt = sy-mandt course_id = 'ABAP101' category = 'IT' title = 'ABAP Basics'   capacity = 20 booked = 5 )
      ( mandt = sy-mandt course_id = 'ABAP102' category = 'IT' title = 'ABAP Advanced' capacity = 10 booked = 10 )
      ( mandt = sy-mandt course_id = 'ABAP103' category = 'IT' title = 'ABAP Expert'   capacity = 12 booked = 15 )
      ( mandt = sy-mandt course_id = 'SQL101'  category = 'DB' title = 'SQL Basics'    capacity = 30 booked = 10 )
      ( mandt = sy-mandt course_id = 'SQL102'  category = 'DB' title = 'SQL Tuning'    capacity = 8  booked = 8 )
      ( mandt = sy-mandt course_id = 'HR101'   category = 'HR' title = 'HR Basics'     capacity = 6  booked = 1 ) ).

    INSERT {{P}}COURSE FROM TABLE @lt_course.

    out->write( |Courses written: { sy-dbcnt }| ).
  ENDMETHOD.
ENDCLASS.