31 lines
1.4 KiB
ABAP
31 lines
1.4 KiB
ABAP
CLASS {{p}}seed_runlog DEFINITION
|
|
PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
PROTECTED SECTION.
|
|
PRIVATE SECTION.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS {{p}}seed_runlog IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DATA lt_runlog TYPE STANDARD TABLE OF {{p}}runlog WITH EMPTY KEY.
|
|
lt_runlog = VALUE #(
|
|
( run_id = 'R1' still_id = 'STILL-A' run_date = '20240301'
|
|
wash_litre = '1000.0' spirit_litre = '120.0' strength_pct = '68.50' cask_no = 'C1' )
|
|
( run_id = 'R2' still_id = 'STILL-A' run_date = '20240315'
|
|
wash_litre = '1200.0' spirit_litre = '150.0' strength_pct = '70.00' cask_no = 'C2' )
|
|
( run_id = 'R3' still_id = 'STILL-A' run_date = '20240401'
|
|
wash_litre = '900.0' spirit_litre = '100.0' strength_pct = '69.00' cask_no = 'C1' )
|
|
( run_id = 'R4' still_id = 'STILL-B' run_date = '20240210'
|
|
wash_litre = '800.0' spirit_litre = '0.0' strength_pct = '0.00' cask_no = '' )
|
|
( run_id = 'R5' still_id = 'STILL-B' run_date = '20240220'
|
|
wash_litre = '700.0' spirit_litre = '90.0' strength_pct = '65.00' cask_no = 'C3' )
|
|
( run_id = 'R6' still_id = 'STILL-C' run_date = '20240305'
|
|
wash_litre = '500.0' spirit_litre = '0.0' strength_pct = '0.00' cask_no = '' ) ).
|
|
DELETE FROM {{p}}runlog.
|
|
INSERT {{p}}runlog FROM TABLE @lt_runlog.
|
|
out->write( |Runs: { lines( lt_runlog ) }| ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|