33 lines
867 B
ABAP
33 lines
867 B
ABAP
INTERFACE {{p}}if_tour_summary PUBLIC.
|
|
TYPES ty_tour_type TYPE c LENGTH 1.
|
|
TYPES ty_status TYPE c LENGTH 1.
|
|
|
|
TYPES:
|
|
BEGIN OF ty_booking,
|
|
tour_type TYPE ty_tour_type,
|
|
adults TYPE i,
|
|
children TYPE i,
|
|
END OF ty_booking.
|
|
|
|
TYPES tt_booking TYPE STANDARD TABLE OF ty_booking WITH EMPTY KEY.
|
|
|
|
TYPES:
|
|
BEGIN OF ty_result,
|
|
status TYPE ty_status,
|
|
total_fee TYPE p LENGTH 8 DECIMALS 2,
|
|
booking_count TYPE i,
|
|
average_fee TYPE p LENGTH 8 DECIMALS 2,
|
|
END OF ty_result.
|
|
|
|
CONSTANTS:
|
|
BEGIN OF c_status,
|
|
ok TYPE ty_status VALUE 'O',
|
|
invalid_number TYPE ty_status VALUE 'N',
|
|
unknown_type TYPE ty_status VALUE 'T',
|
|
END OF c_status.
|
|
|
|
METHODS summarize
|
|
IMPORTING it_bookings TYPE tt_booking
|
|
RETURNING VALUE(rs_result) TYPE ty_result.
|
|
ENDINTERFACE.
|