ABAP获取汇率

最新推荐文章于 2024-05-15 17:58:42 发布

转载最新推荐文章于 2024-05-15 17:58:42 发布 · 987 阅读

1 ·

CC 4.0 BY-SA版权

原文链接：http://blog.csdn.net/zhongguomao/article/details/54923486

文章标签：

#abap

获取汇率专栏收录该内容

1 篇文章

订阅专栏

本文介绍了如何通过BAPI_EXCHANGERATE_GETDETAIL和CURRENCY_CONVERTING_FACTOR函数获取并计算汇率信息，包括起始汇率、装换汇率和转换因子，以实现货币转换的精确计算。

data: exch_rate like bapi1093_0.
data: s_c_factor type p decimals 3,
t_c_factor type p decimals 3.
data: lv_waerk type waerk,"起始汇率
ln_waerk type waerk,"装换汇率
curdate type rscalday ,"汇率生效日期
l_rate type p decimals 4.
curdate = SY-DATUM .
BREAK-POINT.
*1. 获取汇率信息
call function ‘BAPI_EXCHANGERATE_GETDETAIL’
exporting
rate_type = ‘M’
from_curr = lv_waerk
to_currncy = ln_waerk
date = curdate
importing
exch_rate = exch_rate.
*2. 获取转换因子
call function ‘CURRENCY_CONVERTING_FACTOR’
exporting
currency = lv_waerk
importing
factor = s_c_factor.
call function ‘CURRENCY_CONVERTING_FACTOR’
exporting
currency = ln_waerk
importing
factor = t_c_factor.
l_rate = exch_rate-exch_rate * ( exch_rate-to_factor / exch_rate-from_factor ) * ( s_c_factor / t_c_factor ) .
BREAK-POINT.