19 lines
830 B
ABAP
19 lines
830 B
ABAP
CLASS {{p}}ski_seed DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
CLASS {{p}}ski_seed IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DELETE FROM {{p}}skiride.
|
|
INSERT {{p}}skiride FROM TABLE @( VALUE #(
|
|
( ride_id = 1 lift_id = 'NORD' season = '2026' tickets = 10 fare = '25.00' )
|
|
( ride_id = 2 lift_id = 'NORD' season = '2026' tickets = 6 fare = '25.00' )
|
|
( ride_id = 3 lift_id = 'SUED' season = '2026' tickets = 20 fare = '30.00' )
|
|
( ride_id = 4 lift_id = 'SUED' season = '2026' tickets = 5 fare = '30.00' )
|
|
( ride_id = 5 lift_id = 'OST' season = '2026' tickets = 3 fare = '20.00' )
|
|
( ride_id = 6 lift_id = 'WEST' season = '2025' tickets = 100 fare = '40.00' ) ) ).
|
|
out->write( sy-dbcnt ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|