INTERFACE {{p}}if_sail_repair PUBLIC.
  TYPES ty_reason TYPE c LENGTH 10.
  TYPES ty_damage TYPE c LENGTH 4.
  TYPES ty_cloth TYPE c LENGTH 4.

  CONSTANTS:
    BEGIN OF c_reason,
      ok     TYPE ty_reason VALUE 'OK',
      empty  TYPE ty_reason VALUE 'EMPTY',
      damage TYPE ty_reason VALUE 'DAMAGE',
      cloth  TYPE ty_reason VALUE 'CLOTH',
      length TYPE ty_reason VALUE 'LENGTH',
      rush   TYPE ty_reason VALUE 'RUSH',
    END OF c_reason.

  CONSTANTS:
    BEGIN OF c_damage,
      tear TYPE ty_damage VALUE 'TEAR',
      seam TYPE ty_damage VALUE 'SEAM',
      eylt TYPE ty_damage VALUE 'EYLT',
      batt TYPE ty_damage VALUE 'BATT',
    END OF c_damage.

  CONSTANTS:
    BEGIN OF c_cloth,
      lite TYPE ty_cloth VALUE 'LITE',
      medm TYPE ty_cloth VALUE 'MEDM',
      heav TYPE ty_cloth VALUE 'HEAV',
    END OF c_cloth.

  CONSTANTS c_max_length TYPE i VALUE 400.
  CONSTANTS c_rush_limit TYPE i VALUE 200.

  METHODS check_order
    IMPORTING iv_damage        TYPE ty_damage
              iv_cloth         TYPE ty_cloth
              iv_length        TYPE i
              iv_rush          TYPE abap_bool
    RETURNING VALUE(rv_reason) TYPE ty_reason.
ENDINTERFACE.