7510131a7d
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
19 lines
961 B
ABAP
19 lines
961 B
ABAP
CLASS {{p}}admit_seed DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
CLASS {{p}}admit_seed IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DELETE FROM {{p}}admit.
|
|
INSERT {{p}}admit FROM TABLE @( VALUE #(
|
|
( adm_id = 1 ward = 'A' admit_date = '20260105' discharge_date = '20260109' daily_rate = '100.00' )
|
|
( adm_id = 2 ward = 'A' admit_date = '20260110' discharge_date = '20260111' daily_rate = '100.00' )
|
|
( adm_id = 3 ward = 'B' admit_date = '20260106' discharge_date = '20260116' daily_rate = '250.00' )
|
|
( adm_id = 4 ward = 'B' admit_date = '20260120' discharge_date = '00000000' daily_rate = '250.00' )
|
|
( adm_id = 5 ward = 'C' admit_date = '20251220' discharge_date = '20251225' daily_rate = '50.00' )
|
|
( adm_id = 6 ward = 'A' admit_date = '20260201' discharge_date = '20260203' daily_rate = '100.00' ) ) ).
|
|
out->write( sy-dbcnt ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|