CLASS {{p}}seed_sales DEFINITION PUBLIC FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    INTERFACES if_oo_adt_classrun.
  PROTECTED SECTION.
  PRIVATE SECTION.
ENDCLASS.


CLASS {{p}}seed_sales IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    DATA lt_sales TYPE STANDARD TABLE OF {{p}}sales WITH EMPTY KEY.
    lt_sales = VALUE #(
      ( doc_id = 'D1' item_no = 1 product = 'MAT_A' quantity = 3 price = '10.00'  sold_on = '20240110' )
      ( doc_id = 'D1' item_no = 2 product = 'MAT_A' quantity = 2 price = '5.00'   sold_on = '20240115' )
      ( doc_id = 'D2' item_no = 1 product = 'MAT_B' quantity = 1 price = '100.00' sold_on = '20240131' )
      ( doc_id = 'D3' item_no = 1 product = 'MAT_B' quantity = 4 price = '2.50'   sold_on = '20231231' )
      ( doc_id = 'D4' item_no = 1 product = 'MAT_C' quantity = 7 price = '1.00'   sold_on = '20240201' ) ).
    DELETE FROM {{p}}sales.
    INSERT {{p}}sales FROM TABLE @lt_sales.
    out->write( |Seed rows: { lines( lt_sales ) }| ).
  ENDMETHOD.
ENDCLASS.