26 lines
990 B
ABAP
26 lines
990 B
ABAP
INTERFACE {{p}}if_drone_check PUBLIC.
|
|
TYPES ty_reason TYPE c LENGTH 10.
|
|
TYPES ty_weight TYPE p LENGTH 8 DECIMALS 2.
|
|
TYPES ty_distance TYPE p LENGTH 8 DECIMALS 2.
|
|
TYPES ty_speed TYPE p LENGTH 8 DECIMALS 2.
|
|
TYPES ty_percent TYPE i.
|
|
CONSTANTS:
|
|
BEGIN OF c_reason,
|
|
ok TYPE ty_reason VALUE 'OK',
|
|
payload TYPE ty_reason VALUE 'PAYLOAD',
|
|
distance TYPE ty_reason VALUE 'DISTANCE',
|
|
wind TYPE ty_reason VALUE 'WIND',
|
|
battery TYPE ty_reason VALUE 'BATTERY',
|
|
zone TYPE ty_reason VALUE 'ZONE',
|
|
light TYPE ty_reason VALUE 'LIGHT',
|
|
END OF c_reason.
|
|
METHODS check
|
|
IMPORTING iv_payload TYPE ty_weight
|
|
iv_distance TYPE ty_distance
|
|
iv_wind_speed TYPE ty_speed
|
|
iv_battery TYPE ty_percent
|
|
iv_in_zone TYPE abap_bool
|
|
iv_daylight TYPE abap_bool
|
|
RETURNING VALUE(rv_reason) TYPE ty_reason.
|
|
ENDINTERFACE.
|