18 lines
885 B
ABAP
18 lines
885 B
ABAP
CLASS {{p}}compost_seed DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
CLASS {{p}}compost_seed IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DELETE FROM {{p}}gwaste.
|
|
INSERT {{p}}gwaste FROM TABLE @( VALUE #(
|
|
( delivery_id = 1 round_id = 'R1001' waste_type = 'GRAS' deliv_date = '20260110' weight_kg = '1200.00' )
|
|
( delivery_id = 2 round_id = 'R1001' waste_type = 'HEDG' deliv_date = '20260210' weight_kg = '800.00' )
|
|
( delivery_id = 3 round_id = 'R1002' waste_type = 'BRAN' deliv_date = '20260115' weight_kg = '3000.00' )
|
|
( delivery_id = 4 round_id = 'R1003' waste_type = 'GRAS' deliv_date = '20251231' weight_kg = '5000.00' )
|
|
( delivery_id = 5 round_id = 'R1003' waste_type = 'BRAN' deliv_date = '20260301' weight_kg = '200.00' ) ) ).
|
|
out->write( sy-dbcnt ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|