*&---------------------------------------------------------------------*
*& Report Z_TEST.
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT Z_TEST.
DATA: date LIKE sy-datum . "获取汇率的时间,函数会取离指定时间前面最近维护的一个汇率
DATA: rate LIKE vbrp-kursk . "要输出的汇率 最好参考一个有5位小数点的类型 不然精度会丢失
DATA: curr_ex LIKE bapicurr-bapicurr .
date = sy-datum .
DATA: fa LIKE vbrp-kursk , "要转换的金额 这里要求的是汇率 故1即可
fc LIKE t001-waers , "外币
lc LIKE t001-waers , "本币
ty LIKE tcurr-kurst . "类型
fa = 1.
fc = 'JPY' .
lc = 'HKD' .
ty = 'M'.
date = SY-DATUM.
curr_ex = fa .
*"对于像JPY TWD 等 比人民币小的 不然出来的金额会扩大(一般是扩