21 lines
1.1 KiB
ABAP
21 lines
1.1 KiB
ABAP
CLASS {{p}}t15_seed DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
CLASS {{p}}t15_seed IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DELETE FROM {{p}}subs.
|
|
INSERT {{p}}subs FROM TABLE @( VALUE #(
|
|
( subs_id = 1 magazine = 'ORBIT' sub_status = 'A' start_date = '20260101' monthly_fee = '12.00' )
|
|
( subs_id = 2 magazine = 'ORBIT' sub_status = 'A' start_date = '20260201' monthly_fee = '8.00' )
|
|
( subs_id = 3 magazine = 'ORBIT' sub_status = 'C' start_date = '20260101' monthly_fee = '20.00' )
|
|
( subs_id = 4 magazine = 'NATURE' sub_status = 'A' start_date = '20260115' monthly_fee = '30.00' )
|
|
( subs_id = 5 magazine = 'NATURE' sub_status = 'A' start_date = '20260301' monthly_fee = '10.00' )
|
|
( subs_id = 6 magazine = 'NATURE' sub_status = 'A' start_date = '20251201' monthly_fee = '5.00' )
|
|
( subs_id = 7 magazine = 'SPORT' sub_status = 'A' start_date = '20260110' monthly_fee = '25.00' )
|
|
( subs_id = 8 magazine = 'SPORT' sub_status = 'C' start_date = '20260210' monthly_fee = '15.00' ) ) ).
|
|
out->write( sy-dbcnt ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|