Problem with currecy conversion

[Former Member]

Hi Experts,

Iam trying to convert the currency from EUR to HUF for the Price per Unit in an Invoice using CONVERT_TO_FOREIGN_CURRENCY ,

So please tell me what is the exchange rate that i need to pass to this function module , Is it from VBRP or from KONV.

Please tell me how to convert from one currency to other manually using Exchange rate.

Thanks in Advance..

[sreelatha_gullapalli]

hi

check the following example

Currency Convertion (i.e. from EUR to GBP)

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

hope it will help you

and also check the folowing link

http://www.sapdevelopment.co.uk/country/country_curr.htm

Regards,

Sreelatha Gullapalli