03ab36149e
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
29 lines
984 B
ABAP
29 lines
984 B
ABAP
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.
|