FUNCTION {{p}}dlv_sample
  IMPORTING
    iv_service TYPE string
    iv_weight TYPE decfloat34
    iv_distance TYPE decfloat34
  EXPORTING
    ev_skip TYPE abap_bool
  CHANGING
    cv_price TYPE decfloat34
  EXCEPTIONS
    invalid_weight.

  ev_skip = abap_false.
  IF iv_service IS INITIAL OR iv_weight < 0 OR iv_distance < 0.
    RAISE invalid_weight.
  ENDIF.

ENDFUNCTION.