35 lines
1.6 KiB
ABAP
35 lines
1.6 KiB
ABAP
CLASS {{p}}seed_repair DEFINITION PUBLIC FINAL CREATE PUBLIC.
|
|
PUBLIC SECTION.
|
|
INTERFACES if_oo_adt_classrun.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS {{p}}seed_repair IMPLEMENTATION.
|
|
METHOD if_oo_adt_classrun~main.
|
|
DATA lt_job TYPE STANDARD TABLE OF {{p}}job WITH EMPTY KEY.
|
|
DATA lt_rate TYPE STANDARD TABLE OF {{p}}rate WITH EMPTY KEY.
|
|
|
|
lt_job = VALUE #(
|
|
( job_id = 'J1' customer = 'C1' shoe_type = 'BOOT' repair_type = 'SOLE' pairs = 2 job_state = 'D' )
|
|
( job_id = 'J2' customer = 'C1' shoe_type = 'SHOE' repair_type = 'HEEL' pairs = 1 job_state = 'D' )
|
|
( job_id = 'J3' customer = 'C2' shoe_type = 'BOOT' repair_type = 'SOLE' pairs = 3 job_state = 'D' )
|
|
( job_id = 'J4' customer = 'C3' shoe_type = 'BOOT' repair_type = 'SOLE' pairs = 1 job_state = 'O' )
|
|
( job_id = 'J5' customer = 'C2' shoe_type = 'BOOT' repair_type = 'HEEL' pairs = 1 job_state = 'D' )
|
|
( job_id = 'J6' customer = 'C4' shoe_type = 'SANDAL' repair_type = 'STRAP' pairs = 2 job_state = 'D' ) ).
|
|
|
|
lt_rate = VALUE #(
|
|
( shoe_type = 'BOOT' repair_type = 'SOLE' price = '12.50' )
|
|
( shoe_type = 'BOOT' repair_type = 'HEEL' price = '6.25' )
|
|
( shoe_type = 'SHOE' repair_type = 'HEEL' price = '4.00' )
|
|
( shoe_type = 'SHOE' repair_type = 'SOLE' price = '3.75' )
|
|
( shoe_type = 'SANDAL' repair_type = 'STRAP' price = '5.00' ) ).
|
|
|
|
DELETE FROM {{p}}job.
|
|
DELETE FROM {{p}}rate.
|
|
INSERT {{p}}job FROM TABLE @lt_job.
|
|
INSERT {{p}}rate FROM TABLE @lt_rate.
|
|
|
|
out->write( |Jobs: { lines( lt_job ) }, rates: { lines( lt_rate ) }| ).
|
|
ENDMETHOD.
|
|
ENDCLASS.
|