19 lines
376 B
ABAP
19 lines
376 B
ABAP
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.
|