CLASS {{p}}paint_mix DEFINITION PUBLIC FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    TYPES:
      BEGIN OF ty_tint,
        tint_id     TYPE c LENGTH 4,
        quantity_ml TYPE i,
      END OF ty_tint,
      ty_tints TYPE STANDARD TABLE OF ty_tint WITH EMPTY KEY.

    INTERFACES if_oo_adt_classrun.
ENDCLASS.


CLASS {{p}}paint_mix IMPLEMENTATION.
  METHOD if_oo_adt_classrun~main.
    DATA lt_prices TYPE STANDARD TABLE OF {{p}}tintpr WITH EMPTY KEY.
    lt_prices = VALUE #(
      ( tint_id = 'WHIT' price_ml = '0.020' )
      ( tint_id = 'BLUE' price_ml = '0.045' )
      ( tint_id = 'GREY' price_ml = '0.030' )
      ( tint_id = 'GOLD' price_ml = '0.250' ) ).

    DELETE FROM {{p}}tintpr.
    INSERT {{p}}tintpr FROM TABLE @lt_prices.

    out->write( |Tint prices seeded: { lines( lt_prices ) }| ).
  ENDMETHOD.
ENDCLASS.