CLASS {{p}}seed_grv DEFINITION PUBLIC FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    INTERFACES if_oo_adt_classrun.
ENDCLASS.


CLASS {{p}}seed_grv IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    DATA lt_order TYPE STANDARD TABLE OF {{p}}grv_ord WITH EMPTY KEY.
    lt_order = VALUE #(
      ( order_id = 'ORD0000001' grade = 'F' tonnes = 3  customer = 'BuildIt Ltd' )
      ( order_id = 'ORD0000002' grade = 'M' tonnes = 12 customer = 'Roadworks AG' )
      ( order_id = 'ORD0000003' grade = 'C' tonnes = 25 customer = 'City Council' )
      ( order_id = 'ORD0000004' grade = 'F' tonnes = 5  customer = 'Stone and Co' ) ).
    DELETE FROM {{p}}grv_ord.
    INSERT {{p}}grv_ord FROM TABLE @lt_order.
    out->write( |{ sy-dbcnt } orders inserted| ).
  ENDMETHOD.
ENDCLASS.