5de5e2851c
- Static bundle checks (name length, seed type, reserved words, contract test classes, testclasses_file), local abaplint parser check before SAP, max_tokens, robust JSON parse - Runner: G2 for CDS views with parameters, contract_check detail in report - G0020 and G0013 fixed by review and revalidated (oracle 100, null 0) - Pilot results in docs/faz1-tasarim.md 11e; handover notes merged into CLAUDE.md and docs Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
23 lines
1.0 KiB
ABAP
23 lines
1.0 KiB
ABAP
CLASS {{p}}seed_data DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS {{p}}seed_data IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DELETE FROM {{p}}ord.
|
|
DELETE FROM {{p}}cust.
|
|
INSERT {{p}}cust FROM TABLE @( VALUE #(
|
|
( client = sy-mandt cust_id = 'C001' cust_name = 'Alpha GmbH' country = 'DE' )
|
|
( client = sy-mandt cust_id = 'C002' cust_name = 'Beta Ltd' country = 'GB' )
|
|
( client = sy-mandt cust_id = 'C003' cust_name = 'Gamma SA' country = 'FR' ) ) ).
|
|
INSERT {{p}}ord FROM TABLE @( VALUE #(
|
|
( client = sy-mandt order_id = 'O100' cust_id = 'C001' order_date = '20250110' status = 'O' )
|
|
( client = sy-mandt order_id = 'O101' cust_id = 'C002' order_date = '20250111' status = 'O' )
|
|
( client = sy-mandt order_id = 'O102' cust_id = 'C999' order_date = '20250112' status = 'O' )
|
|
( client = sy-mandt order_id = 'O103' cust_id = 'C003' order_date = '20250113' status = 'C' ) ) ).
|
|
out->write( 'Seed data written' ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|