Skip to Content
0
Former Member
Dec 03, 2009 at 07:23 AM

Currency Conversion Problem

49 Views

Dear All,

I want convert INR currecny to USD dollor currency. In my program it display result 0. I want sample program for currecny conversion. I have include my program for persual.

DATA: xrate TYPE f,

lamt TYPE p,

ffact TYPE f,

lfact TYPE f.

PARAMETERS: fcurr LIKE tcurc-waers,

lcurr LIKE tcurc-waers,

famt TYPE p.

CALL FUNCTION 'CONVERT_TO_FOREIGN_CURRENCY'

EXPORTING

CLIENT = SY-MANDT

date = sy-datum

foreign_currency = fcurr

local_amount = lamt

local_currency = lcurr

RATE = 50

TYPE_OF_RATE = 'M'

READ_TCURR = 'X'

IMPORTING

exchange_rate = xrate

foreign_amount = famt

foreign_factor = ffact

local_factor = lfact

  • EXCHANGE_RATEX =

  • DERIVED_RATE_TYPE =

  • FIXED_RATE =

EXCEPTIONS

no_rate_found = 1

overflow = 2

no_factors_found = 3

no_spread_found = 4

derived_2_times = 5

OTHERS = 6.

.

IF sy-subrc EQ 0.

WRITE:/ lamt, 'converted from',lcurr, 'to',fcurr, 'is:',famt.

WRITE:/ 'exchange rate',xrate,

/ 'foreign factor',ffact,

/ 'local factor',lfact.

ELSE.

WRITE:/ lamt, 'not converted'.

ENDIF.

With Regards,

Sathish M.R