Stage 2 summary at 50 accepted trajectories

Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
Kral
2026-10-05 18:02:52 +02:00
parent 332fb4601d
commit 5bcd1bf9cd
1230 changed files with 77563 additions and 33 deletions

View File

@@ -0,0 +1,11 @@
@EndUserText.label : 'Dish master'
@AbapCatalog.enhancement.category : #NOT_EXTENSIBLE
@AbapCatalog.tableCategory : #TRANSPARENT
@AbapCatalog.deliveryClass : #A
@AbapCatalog.dataMaintenance : #RESTRICTED
define table {{p}}dish {
key client : abap.clnt not null;
key dish_id : abap.char(10) not null;
dish_name : abap.char(40);
price : abap.dec(15,2);
}

View File

@@ -0,0 +1,12 @@
@EndUserText.label : 'Banquet positions'
@AbapCatalog.enhancement.category : #NOT_EXTENSIBLE
@AbapCatalog.tableCategory : #TRANSPARENT
@AbapCatalog.deliveryClass : #A
@AbapCatalog.dataMaintenance : #RESTRICTED
define table {{p}}pos {
key client : abap.clnt not null;
key order_id : abap.char(10) not null;
key pos_no : abap.int4 not null;
dish_id : abap.char(10);
qty : abap.int4;
}

View File

@@ -0,0 +1,36 @@
CLASS {{p}}seed_banquet DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
INTERFACES if_oo_adt_classrun.
ENDCLASS.
CLASS {{p}}seed_banquet IMPLEMENTATION.
METHOD if_oo_adt_classrun~main.
DELETE FROM {{p}}pos WHERE client = @sy-mandt.
DELETE FROM {{p}}dish WHERE client = @sy-mandt.
DATA lt_dishes TYPE STANDARD TABLE OF {{p}}dish.
lt_dishes = VALUE #(
( client = sy-mandt dish_id = 'D001' dish_name = 'Tomato soup' price = '4.50' )
( client = sy-mandt dish_id = 'D002' dish_name = 'Roast beef' price = '18.00' )
( client = sy-mandt dish_id = 'D003' dish_name = 'Apple pie' price = '5.25' )
( client = sy-mandt dish_id = 'D004' dish_name = 'Sparkling water' price = '2.00' )
( client = sy-mandt dish_id = 'D005' dish_name = 'Bread basket' price = '2.05' )
).
INSERT {{p}}dish FROM TABLE @lt_dishes.
DATA lt_positions TYPE STANDARD TABLE OF {{p}}pos.
lt_positions = VALUE #(
( client = sy-mandt order_id = 'ORD1' pos_no = 1 dish_id = 'D001' qty = 12 )
( client = sy-mandt order_id = 'ORD1' pos_no = 2 dish_id = 'D002' qty = 8 )
( client = sy-mandt order_id = 'ORD1' pos_no = 3 dish_id = 'D004' qty = 30 )
( client = sy-mandt order_id = 'ORD2' pos_no = 1 dish_id = 'D003' qty = 4 )
( client = sy-mandt order_id = 'ORD3' pos_no = 1 dish_id = 'D001' qty = 0 )
( client = sy-mandt order_id = 'ORD4' pos_no = 1 dish_id = 'X999' qty = 2 )
).
INSERT {{p}}pos FROM TABLE @lt_positions.
out->write( |Dishes: { lines( lt_dishes ) }| ).
out->write( |Positions: { lines( lt_positions ) }| ).
ENDMETHOD.
ENDCLASS.