topic Re: Currency convert in Application Development and Automation Discussions

Currency convert

Former Member — Mon, 03 Mar 2008 13:49:40 GMT

hi,

my requirment is that if amount is comes in either in USD or INR it should show in report in EUR and next column is exchange rate correponds it. how it is possible i reached the solution that is i need to read tcurr table but m not able to read as of date date condition so that i can find correct exchange currency rate.

thatks.

Re: Currency convert

Former Member — Mon, 03 Mar 2008 13:53:43 GMT

Hi Jony,

The rates stored in TCURR are current only.

Regards,

Atish

Re: Currency convert

Former Member — Mon, 03 Mar 2008 14:24:32 GMT

use fms 'CURRENCY_CONVERT'

'CURRENCY_CONVERSION_MINIAPP'

for this conversion.

<REMOVED BY MODERATOR>

venkat.

Edited by: Alvaro Tejada Galindo on Mar 3, 2008 10:14 AM

Re: Currency convert

Former Member — Mon, 03 Mar 2008 15:13:56 GMT

Hi...

Check out table TCURN and use FM 'CONVERT_TO_LOCAL_CURRENCY' for currency conversion.

Cheers!!

Lokesh

Re: Currency convert

Former Member — Tue, 04 Mar 2008 04:01:34 GMT

Hi,

Check out this function module READ_EXCHANGE_RATE.

Regards,

Sreedhar.

Re: Currency convert

Former Member — Tue, 04 Mar 2008 04:07:53 GMT

Hi,

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

See the below link for explanation and a Program

https://www.sdn.sap.com/irj/sdn/wiki?path=/display/snippets/fmCurrencyConversion&

Cheers,

vasavi.