39769afce8
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
90 lines
2.3 KiB
ABAP
90 lines
2.3 KiB
ABAP
CLASS {{p}}visit_seed DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
CLASS {{p}}visit_seed IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DATA: lt_visit TYPE STANDARD TABLE OF {{p}}visit,
|
|
ls_visit TYPE {{p}}visit.
|
|
|
|
DELETE FROM {{p}}visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 1.
|
|
ls_visit-show_id = 'PLNT'.
|
|
ls_visit-visit_date = '20260105'.
|
|
ls_visit-tickets = 10.
|
|
ls_visit-ticket_price = '12.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 2.
|
|
ls_visit-show_id = 'PLNT'.
|
|
ls_visit-visit_date = '20260106'.
|
|
ls_visit-tickets = 5.
|
|
ls_visit-ticket_price = '12.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 3.
|
|
ls_visit-show_id = 'ROCK'.
|
|
ls_visit-visit_date = '20260106'.
|
|
ls_visit-tickets = 20.
|
|
ls_visit-ticket_price = '9.50'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 4.
|
|
ls_visit-show_id = 'ROCK'.
|
|
ls_visit-visit_date = '20251220'.
|
|
ls_visit-tickets = 8.
|
|
ls_visit-ticket_price = '9.50'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 5.
|
|
ls_visit-show_id = 'LASR'.
|
|
ls_visit-visit_date = '20260107'.
|
|
ls_visit-tickets = 0.
|
|
ls_visit-ticket_price = '15.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 6.
|
|
ls_visit-show_id = 'LASR'.
|
|
ls_visit-visit_date = '20260108'.
|
|
ls_visit-tickets = 4.
|
|
ls_visit-ticket_price = '15.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 7.
|
|
ls_visit-show_id = 'KIDS'.
|
|
ls_visit-visit_date = '20260109'.
|
|
ls_visit-tickets = 30.
|
|
ls_visit-ticket_price = '5.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 8.
|
|
ls_visit-show_id = 'OPER'.
|
|
ls_visit-visit_date = '20260110'.
|
|
ls_visit-tickets = 0.
|
|
ls_visit-ticket_price = '20.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
CLEAR ls_visit.
|
|
ls_visit-visit_id = 9.
|
|
ls_visit-show_id = 'MAGI'.
|
|
ls_visit-visit_date = '20260111'.
|
|
ls_visit-tickets = 4.
|
|
ls_visit-ticket_price = '15.00'.
|
|
APPEND ls_visit TO lt_visit.
|
|
|
|
INSERT {{p}}visit FROM TABLE lt_visit.
|
|
|
|
out->write( sy-dbcnt ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|