REPORT ZNCTEST.
DATA V_AMT TYPE P DECIMALS 2.
CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
EXPORTING
client = sy-mandt
date = sy-datum
foreign_amount = 1000
foreign_currency = 'RMB'
local_currency = 'HKD'
* RATE = 0
* TYPE_OF_RATE = 'M'
* READ_TCURR = 'X'
IMPORTING
local_amount = V_AMT
EXCEPTIONS
no_rate_found = 1
overflow = 2
no_factors_found = 3
no_spread_found = 4
derived_2_times = 5
OTHERS = 6.
IF sy-subrc <> 0.
V_AMT = 0.
ENDIF.
WRITE:V_AMT.
DATA V_AMT TYPE P DECIMALS 2.
CALL FUNCTION 'CONVERT_TO_LOCAL_CURRENCY'
EXPORTING
client = sy-mandt
date = sy-datum
foreign_amount = 1000
foreign_currency = 'RMB'
local_currency = 'HKD'
* RATE = 0
* TYPE_OF_RATE = 'M'
* READ_TCURR = 'X'
IMPORTING
local_amount = V_AMT
EXCEPTIONS
no_rate_found = 1
overflow = 2
no_factors_found = 3
no_spread_found = 4
derived_2_times = 5
OTHERS = 6.
IF sy-subrc <> 0.
V_AMT = 0.
ENDIF.
WRITE:V_AMT.
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10339719/viewspace-605039/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/10339719/viewspace-605039/