15 lines
477 B
ABAP
15 lines
477 B
ABAP
INTERFACE {{p}}if_salon_price PUBLIC.
|
|
TYPES ty_service TYPE c LENGTH 10.
|
|
TYPES ty_amount TYPE p LENGTH 8 DECIMALS 2.
|
|
CONSTANTS:
|
|
BEGIN OF c_service,
|
|
cut TYPE ty_service VALUE 'CUT',
|
|
colour TYPE ty_service VALUE 'COLOUR',
|
|
perm TYPE ty_service VALUE 'PERM',
|
|
END OF c_service.
|
|
METHODS price
|
|
IMPORTING iv_service TYPE ty_service
|
|
iv_child TYPE abap_bool
|
|
RETURNING VALUE(rv_price) TYPE ty_amount.
|
|
ENDINTERFACE.
|