Currency Conversion Program

[Former Member]

we are currently trying to change currencies and i'm looking for the name of the currency conversion program that we can use for this process

[Former Member]

HI,

use the below function modules, give your current currency value & CURR key and give new CURR key,

that will give you the currency value in new CURR.

CONVERT_TO_FOREIGN_CURRENCY -

---

Convert Currency

<b>CONVERT_TO_LOCAL_CURRENCY</b> this will be useful for you.

CONVERT_COUNTRY_CURRENCY

CURRENCY_CONVERT

regards

srikanth

Message was edited by: Srikanth Kidambi

[Former Member]

Use Fm CMS_API_CURR_CONV

[Former Member]

HI,

use the below function modules, give your current currency value & CURR key and give new CURR key,

that will give you the currency value in new CURR.

CONVERT_TO_FOREIGN_CURRENCY -

---

Convert Currency

<b>CONVERT_TO_LOCAL_CURRENCY</b> this will be useful for you.

CONVERT_COUNTRY_CURRENCY

CURRENCY_CONVERT

regards

srikanth

Message was edited by: Srikanth Kidambi

[Former Member]

Hi trevor,

DATA: gd_fcurr TYPE tcurr-fcurr,

gd_tcurr TYPE tcurr-tcurr,

gd_date TYPE sy-datum,

gd_value TYPE i.

gd_fcurr = 'EUR'.

gd_tcurr = 'GBP'.

gd_date = sy-datum.

gd_value = 10.

PERFORM currency_conversion USING gd_fcurr

gd_tcurr

gd_date

CHANGING gd_value.

• Convert value to Currency value

&----

---

*& Form currency_conversion

&----

---

• text

----

---

• -->P_GD_FCURR text

• -->P_GD_TCURR text

• -->P_GD_DATE text

• <--P_GD_VALUE text

----

---

FORM currency_conversion USING p_fcurr

p_tcurr

p_date

CHANGING p_value.

DATA: t_er TYPE tcurr-ukurs,

t_ff TYPE tcurr-ffact,

t_lf TYPE tcurr-tfact,

t_vfd TYPE datum,

ld_erate(12) TYPE c.

CALL FUNCTION 'READ_EXCHANGE_RATE'

EXPORTING

• CLIENT = SY-MANDT

date = p_date

foreign_currency = p_fcurr

local_currency = p_tcurr

TYPE_OF_RATE = 'M'

• EXACT_DATE = ' '

IMPORTING

exchange_rate = t_er

foreign_factor = t_ff

local_factor = t_lf

valid_from_date = t_vfd

• DERIVED_RATE_TYPE =

• FIXED_RATE =

• OLDEST_RATE_FROM =

EXCEPTIONS

no_rate_found = 1

no_factors_found = 2

no_spread_found = 3

derived_2_times = 4

overflow = 5

zero_rate = 6

OTHERS = 7

.

IF sy-subrc EQ 0.

ld_erate = t_er / ( t_ff / t_lf ).

p_value = p_value * ld_erate.

ENDIF.

ENDFORM. " currency_conversion

regards,

keerthi.

[Former Member]

hi trevor,

check the FM

CONVERT_TO_FOREIGN_CURRENCY

CONVERT_TO_LOCAL_CURRENCY