INTERFACE {{p}}if_hotel_rate PUBLIC.
  TYPES ty_category TYPE c LENGTH 1.
  TYPES ty_reason   TYPE c LENGTH 10.
  TYPES ty_amount   TYPE p LENGTH 10 DECIMALS 2.
  TYPES:
    BEGIN OF ty_result,
      reason TYPE ty_reason,
      price  TYPE ty_amount,
    END OF ty_result.
  CONSTANTS:
    BEGIN OF c_reason,
      ok       TYPE ty_reason VALUE 'OK',
      nights   TYPE ty_reason VALUE 'NIGHTS',
      guests   TYPE ty_reason VALUE 'GUESTS',
      category TYPE ty_reason VALUE 'CATEGORY',
    END OF c_reason.
  CONSTANTS:
    BEGIN OF c_category,
      basic   TYPE ty_category VALUE 'S',
      comfort TYPE ty_category VALUE 'C',
      suite   TYPE ty_category VALUE 'U',
    END OF c_category.
  METHODS calculate
    IMPORTING iv_category  TYPE ty_category
              iv_nights    TYPE i
              iv_guests    TYPE i
              iv_breakfast TYPE abap_bool
    RETURNING VALUE(rs_result) TYPE ty_result.
ENDINTERFACE.