CLASS {{p}}roast_seed DEFINITION
  PUBLIC
  FINAL
  CREATE PUBLIC.

  PUBLIC SECTION.
    INTERFACES if_oo_adt_classrun.
ENDCLASS.


CLASS {{p}}roast_seed IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    DATA lt_lines TYPE STANDARD TABLE OF {{p}}roasts.
    lt_lines = VALUE #(
      ( client = sy-mandt order_id = '0000000001' blend = 'PILS' quantity_kg = '120.500' )
      ( client = sy-mandt order_id = '0000000002' blend = 'WEIZ' quantity_kg = '80.000' )
      ( client = sy-mandt order_id = '0000000003' blend = 'PILS' quantity_kg = '60.250' )
      ( client = sy-mandt order_id = '0000000004' blend = 'KOLS' quantity_kg = '45.000' )
      ( client = sy-mandt order_id = '0000000005' blend = 'PILS' quantity_kg = '0.000' )
      ( client = sy-mandt order_id = '0000000006' blend = 'WEIZ' quantity_kg = '20.000' )
    ).

    DELETE FROM {{p}}roasts.
    INSERT {{p}}roasts FROM TABLE @lt_lines.

    out->write( |{ sy-dbcnt } roast lines inserted| ).
  ENDMETHOD.
ENDCLASS.