39769afce8
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
19 lines
355 B
ABAP
19 lines
355 B
ABAP
FUNCTION {{p}}grain_sample
|
|
IMPORTING
|
|
iv_grain_type TYPE string
|
|
EXPORTING
|
|
ev_grain_name TYPE string.
|
|
|
|
CASE iv_grain_type.
|
|
WHEN 'WHEAT'.
|
|
ev_grain_name = 'Wheat'.
|
|
WHEN 'BARLEY'.
|
|
ev_grain_name = 'Barley'.
|
|
WHEN 'RYE'.
|
|
ev_grain_name = 'Rye'.
|
|
WHEN OTHERS.
|
|
ev_grain_name = 'Unknown'.
|
|
ENDCASE.
|
|
|
|
ENDFUNCTION.
|