34 lines
1.1 KiB
ABAP
34 lines
1.1 KiB
ABAP
INTERFACE {{p}}if_feed_stock PUBLIC.
|
|
TYPES:
|
|
ty_feed_type TYPE c LENGTH 8,
|
|
ty_unit TYPE c LENGTH 3,
|
|
ty_quantity TYPE p LENGTH 13 DECIMALS 3,
|
|
BEGIN OF ty_delivery,
|
|
feed_type TYPE ty_feed_type,
|
|
unit TYPE ty_unit,
|
|
quantity TYPE ty_quantity,
|
|
END OF ty_delivery,
|
|
tt_delivery TYPE STANDARD TABLE OF ty_delivery WITH EMPTY KEY,
|
|
BEGIN OF ty_stock,
|
|
feed_type TYPE ty_feed_type,
|
|
unit TYPE ty_unit,
|
|
quantity TYPE ty_quantity,
|
|
deliveries TYPE i,
|
|
END OF ty_stock,
|
|
tt_stock TYPE STANDARD TABLE OF ty_stock WITH EMPTY KEY.
|
|
|
|
METHODS consolidate
|
|
IMPORTING it_supplier_a TYPE tt_delivery
|
|
it_supplier_b TYPE tt_delivery
|
|
RETURNING VALUE(rt_stock) TYPE tt_stock.
|
|
|
|
METHODS quantity_of
|
|
IMPORTING it_stock TYPE tt_stock
|
|
iv_feed_type TYPE ty_feed_type
|
|
RETURNING VALUE(rv_quantity) TYPE ty_quantity.
|
|
|
|
METHODS top_feed
|
|
IMPORTING it_stock TYPE tt_stock
|
|
RETURNING VALUE(rv_feed_type) TYPE ty_feed_type.
|
|
ENDINTERFACE.
|