NO NAME написал(а):
не могу разобраться( я пойму , я не дурак) с всевозможными ykwert ,xkwert и прочие xworkj.
если вы можете: на примере не могли бы провести ликбез?
form frm_kondi_wert_906.
ykwert = xkwert.
ywaers = xkomv-waers.
ykbetr = xkomv-kbetr.
endform.
Ничего особо сложного там нет, только у нас VOFM вообще-то ABAPеры (вкл. меня
) занимаются.
Обычно названия следуют такой логике: X<таблица> Y<таблица>, где <таблица> - это просто таблица или структура, которую можно видеть в SE11. X... содержит текущие значения, а Y... - предыдущие. Т.е. в вашем примере всего-навсего старая инфа заменяется новой.
У нас есть длинная VOFM routine, которая вычисляет скидку по замудреному алгоритму. Фрагмент:
Code:
IF xkomv-kschl = 'Z032'.
* тут идет длиный код с вычислениями best_deal-kbetr
<...>
xkomv-kbetr = best_deal-kbetr.
xkwert = xkomv-kawrt * xkomv-kbetr / xkomv-kpein.
* теперь округляем
CASE xkomv-txprf.
WHEN ' '.
xkwert = xkwert / 1000.
WHEN 'A'.
IF xkwert GE 0.
xkwert = ( xkwert + 499 ) / 1000.
ELSE.
xkwert = ( xkwert - 499 ) / 1000.
ENDIF.
WHEN 'B'.
IF xkwert GT 0.
xkwert = ( xkwert - 500 ) / 1000.
ELSE.
IF xkwert NE 0.
xkwert = ( xkwert + 500 ) / 1000.
ENDIF.
ENDIF.
ENDCASE.
ENDIF.
На выходе - xkwert равный скидке на данную позицию.
Вход
Регистрация
FAQ пользователя
Поиск
