Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
12 lines
389 B
ABAP
12 lines
389 B
ABAP
INTERFACE {{p}}if_discount PUBLIC.
|
|
TYPES ty_group TYPE c LENGTH 1.
|
|
TYPES ty_percent TYPE p LENGTH 5 DECIMALS 2.
|
|
CONSTANTS:
|
|
c_group_key TYPE ty_group VALUE 'A',
|
|
c_group_standard TYPE ty_group VALUE 'S'.
|
|
METHODS calculate
|
|
IMPORTING iv_quantity TYPE i
|
|
iv_group TYPE ty_group
|
|
RETURNING VALUE(rv_percent) TYPE ty_percent.
|
|
ENDINTERFACE.
|