Currency in words

Hi Experts,
I want to know the function module to convert currency in words
for example
24.05 INR as 24 rupees 5 paisa
others wise please tell me the tables in which currency data stored.....for example INR - Rupee , paise....
Regards,
Siva.

Hi
TABLES SPELL.
DATA : T_SPELL LIKE SPELL OCCURS 0 WITH HEADER LINE.
DATA : PAMOUNT LIKE SPELL-NUMBER VALUE '123'.
SY-TITLE = 'SPELLING NUMBER'.
PERFORM SPELL_AMOUNT USING PAMOUNT 'USD'.
WRITE: 'NUMBERS', T_SPELL-WORD, 'DECIMALS ', T_SPELL-DECWORD.
FORM SPELL_AMOUNT USING PWRBTR PWAERS.
CALL FUNCTION 'SPELL_AMOUNT'
EXPORTING
AMOUNT = PAMOUNT
CURRENCY = PWAERS
FILLER = SPACE
LANGUAGE = 'E'
IMPORTING
IN_WORDS = T_SPELL
EXCEPTIONS
NOT_FOUND = 1
TOO_LARGE = 2
OTHERS = 3.
ENDFORM.
Or
DATA AMT_IN_NUM LIKE PC207-BETRG.
DATA AMT_IN_WORDS(100) TYPE c.
PARAMETERS: AMOUNT LIKE AMT_IN_NUM.
CALL FUNCTION 'HR_IN_CHG_INR_WRDS'
EXPORTING
amt_in_num = AMOUNT
IMPORTING
AMT_IN_WORDS = AMT_IN_WORDS
EXCEPTIONS
DATA_TYPE_MISMATCH = 1
OTHERS = 2
IF sy-subrc 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
WRITE AMT_IN_WORDS.
With Regards
Nikunj Shah

Similar Messages

Function module for converting the foreign currency to words

hi,
can anybody tell me about the function module for converting the foreign currency to words format.
Like 25.50 USD
should be "Twenty Five Dollar & Fifty Sents."
foreign currency can be anyone like USD, JPY, EUR etc.
Regards
Nitin Varshney

Hi,
Try using the FM SPELL_AMOUNT
Check this wiki
[SPELL_AMOUNT|https://wiki.sdn.sap.com/wiki/display/Snippets/SpelltheAmountenteredin+words]
Regards
Sarves

Doc currency in words in PLD

Hi Experts,
I want Document currency in words by clicking on sum in words USD and INR in PLD of Purchae order .when i set document total in words it gives doc total in INR only not in USD (Even BP currency is USD).so tell me solution ??
Rgds
Sudhir

Hi,
Step 1:Create one UDF for Convert amount to words ex: U_AmountInwords
Step 2:Create Funtion below link i given funtion just Create in u r SQL DB.
Step 3: Ceate Trigger in wich document you want ex:Invoice add trigger in OINV below i mention trigger just execute the trigger here we will call the funtion i.e.,Step 2 funtion.
see this link below:
[Re: Amount in words|Re: Amount in words]
Regds,
Sampath.

Printing currency in words

Hi,
I am printing the currency using the function
module "SPELL_AMOUNT".
Now, if the amount is USD 45.55,
it prints USD FORTY FIVE AND FIFTY FIVE
is it possible to print
USD FORTY FIVE AND FIFTY FIVE CENTS ?
And similarly for other currencies also ?
Pls help..
Rgds,
Ravindra

You can still use the SPELL_AMOUNT, you will just have to handle the addtional formatting manually,.
report zrich_0002.
data: amt_in type pc207-betrg value '45.55'.
data: words type spell.
data: output type string.
call function 'SPELL_AMOUNT'
exporting
 amount = amt_in
 currency = 'USD'
* FILLER = ' '
* LANGUAGE = SY-LANGU
importing
 in_words = words
* EXCEPTIONS
* NOT_FOUND = 1
* TOO_LARGE = 2
* OTHERS = 3
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
write:/ amt_in.
write:/ words.
concatenate 'USD' words-word 'AND' words-decword 'CENTS'
 into output separated by space.
write:/ output.
Regards,
Rich Heilman

Convert currency to Words(font Vietnamness)

Hi all,
I create report as crystal report tool .but I canu2019t convert currency number to vietnamness.
I can only convert to English.
URL=http://imageshack.usIMGhttp://img518.imageshack.us/img518/931/phieuchiqn6.png[/IMG][/url]
URL=http://g.imageshack.us/img518/phieuchiqn6.png/1/IMGhttp://img518.imageshack.us/img518/phieuchiqn6.png/1/w793.png[/IMG][/url]
I can not convert from number to word u2018s VietNamness.
I used create Customer Function in Crystal report for event this convert.But, it donu2019t work .
I create this function in VB.NET ,it work very good.
This is picture that I used in VB.NET.
URL=http://imageshack.usIMGhttp://img254.imageshack.us/img254/1227/convertdd6.png[/IMG][/url] URL=http://g.imageshack.us/img254/convertdd6.png/1/IMGhttp://img254.imageshack.us/img254/convertdd6.png/1/w363.png[/IMG][/url]
Now, I want to add this function into crystal report ,What do me do?
This is code :
Module Module2
Function ConvertCurrencyToEnglish(ByVal MyNumber As String)
Dim Temp
Dim Dollars, Cents As String
Dim DecimalPlace, Count As Integer
Dim Place(9) As String
Place(2) = " Nghìn "
Place(3) = "Triệu "
Place(4) = " Tỉ "
Place(5) = "Trăm tỉ "
' Convert MyNumber to a string, trimming extra spaces.
MyNumber = Trim(MyNumber)
' Find decimal place.
DecimalPlace = InStr(MyNumber, ".")
' If we find decimal place...
If DecimalPlace > 0 Then
' Convert cents
Temp = Left(Mid(MyNumber, DecimalPlace + 1) & "00", 2)
Cents = ConvertTens(Temp)
' Strip off cents from remainder to convert.
MyNumber = Trim(Left(MyNumber, DecimalPlace - 1))
End If
Count = 1
Do While MyNumber ""
' Convert last 3 digits of MyNumber to English dollars.
Temp = ConvertHundreds(Right(MyNumber, 3))
If Temp "" Then Dollars = Temp & Place(Count) & Dollars
If Len(MyNumber) > 3 Then
' Remove last 3 converted digits from MyNumber.
MyNumber = Left(MyNumber, Len(MyNumber) - 3)
Else
MyNumber = ""
End If
Count = Count + 1
Loop
' Clean up dollars.
Select Case Dollars
Case ""
Dollars = "Không Đồng"
Case "One"
Dollars = "Một Đồng"
Case Else
Dollars = Dollars & " Đồng"
End Select
' Clean up cents.
Select Case Cents
Case ""
Cents = " Chẵn"
Case "One"
Cents = " Lẻ"
Case Else
Cents = " And " & Cents & " Cents"
End Select
ConvertCurrencyToEnglish = Dollars & Cents
End Function
Private Function ConvertHundreds(ByVal MyNumber)
Dim Result As String
' Exit if there is nothing to convert.
If Val(MyNumber) = 0 Then Exit Function
' Append leading zeros to number.
MyNumber = Right("000" & MyNumber, 3)
' Do we have a hundreds place digit to convert?
If Left(MyNumber, 1) "0" Then
Result = ConvertDigit(Left(MyNumber, 1)) & " Chăm "
End If
' Do we have a tens place digit to convert?
If Mid(MyNumber, 2, 1) "0" Then
Result = Result & ConvertTens(Mid(MyNumber, 2))
Else
' If not, then convert the ones place digit.
Result = Result & ConvertDigit(Mid(MyNumber, 3))
End If
ConvertHundreds = Trim(Result)
End Function
Private Function ConvertTens(ByVal MyTens)
Dim Result As String
' Is value between 10 and 19?
If Val(Left(MyTens, 1)) = 1 Then
Select Case Val(MyTens)
Case 10 : Result = "Mười"
Case 11 : Result = "Mười Một"
Case 12 : Result = "Mười Hai"
Case 13 : Result = "Mười Ba"
Case 14 : Result = "Mười Bốn"
Case 15 : Result = "Mười Năm"
Case 16 : Result = "Mười Sáu"
Case 17 : Result = "Mười Bảy"
Case 18 : Result = "Mười Tám"
Case 19 : Result = "Mười Chín"
Case Else
End Select
Else
' .. otherwise it's between 20 and 99.
Select Case Val(Left(MyTens, 1))
Case 2 : Result = "Hai Mươi "
Case 3 : Result = "Ba Mươi "
Case 4 : Result = "Bốn Mươi "
Case 5 : Result = "Năm Mươi "
Case 6 : Result = "Sáu Mươi "
Case 7 : Result = "Bảy Mươi "
Case 8 : Result = "Tám Mươi "
Case 9 : Result = "Chín Mươi "
Case Else
End Select
' Convert ones place digit.
Result = Result & ConvertDigit(Right(MyTens, 1))
End If
ConvertTens = Result
End Function
Private Function ConvertDigit(ByVal MyDigit As Object)
Select Case Val(MyDigit)
Case 1 : ConvertDigit = "Một"
Case 2 : ConvertDigit = "Hai"
Case 3 : ConvertDigit = "Ba"
Case 4 : ConvertDigit = "Bốn"
Case 5 : ConvertDigit = "Năm"
Case 6 : ConvertDigit = "Sáu"
Case 7 : ConvertDigit = "Bảy"
Case 8 : ConvertDigit = "Tám"
Case 9 : ConvertDigit = "Chín"
Case Else : ConvertDigit = ""
End Select
End Function
End Module
Thank you ,

Hi,
Hope this help, http://www.slxdeveloper.com/page.aspx?action=viewarticle&articleid=103 .
You can search a topic User Function Libraries in Crystal Report for creating you own function
Regards,
Clint

Reg: Convert the currency value into word formate.

HI all,
Is there any FM to convert the currency into word formate.
Ex: 210
o/p: two hundreden twenty ruppes..

Hi,
Try
SPELL_AMOUNT
also HR_IN_CHG_INR_WRDS
Regards,
Sachin

Spell Currency - different currencies have different layout patterns

Hello Guys,
I am using the FM SPELL_AMOUNT for printing an amount in a downpayment invoice for a russian form. The problem is that the output pattern (layout) is different for EUR and USD than the one for RUB. For the RUB the currency is also spelled and the decimals are displayed as digits(check the bellow example). Can you tell me from where I can customize the system in order to get the same pattern for all currencies?
Example:
Language Russian, Currency EUR
WORD Двадцать четыре
DECWORD Пятьдесят шесть
Language Russian, Currency RUB
WORD Двадцать четыре рубля
DECWORD 56 копеек
Thanks and BR,
Cristian

Hi
Currency filed is depending on Vendor master.
In Vendor master u'll define the currency.
IN ME21N, if u enter the vendor it will automatically default.
Check it out.
Regards,
Raman

MS Word Web Service Interface: bad format of date and currency fields

Hi,
I am using MS Word Web Service interface to create contract documents. However, my date and currency fields show in a strange format. Date is in"YYYY-MM-DD" format, while currencies always have "." as decimal separator (probably technical values). My user settings are "DD.MM.YYYY" for dates and "n.nnn,dd" for decimal numbers.
My workaround is to create a Z structure for WS interface with char fields and then do conversion through CRM_WST_RT_BADI->OUTBOUND_PROCESSING method. This works, but requires a lot of custom development.
Is there a way to "tell" the interface to use correct formats in MS Word without doing it all manually through custom fields?
Thanks!
KR,
Igor

Oh, indeed!
We might be closer than you think - I live close to Croatian-Slovenian border so we might pop out for a drink! But we can discuss this out of forum...
Now work again:
Is there any documentation on possible formatting keywords? I suppose it's possible to set up decimal places, custom date formats etc.
Cheers,
Igor

Convert numeric in words in adobe forms (start with the currency)

Hi to all,
Below script i found here for converting numeric into words and its work perfectly. Just I edit in UAE currency.
It is possible to move the dirhams (currency) in front like. 1,900,000.55 = Dirhams One Million Nine Hundred Thousand and Fifty Five fils Only. (with period)
or 1,900,085.55 = Dirhams One Million Nine Hundred Thousand Eight Five and Fifty Five fils.
Previous code was One Million Nine Hundred Thousand Eighty-Five Dirhams and Fifty-Five Fils
Thanks in advance
Much Appreciate your advance help
aTens = [ "Twenty", "Thirty", "Forty", "Fifty", "Sixty", "Seventy", "Eighty", "Ninety"];
aOnes = [ "Zero", "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine",
"Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen",
"Nineteen" ];
function ConvertToHundreds(num)
 var cNum, nNum;
 var cWords = "";
 num %= 1000;
 if (num > 99) {
 /* Hundreds. */
 cNum = String(num);
 nNum = Number(cNum.charAt(0));
 cWords += aOnes[nNum] + " Hundred";
 num %= 100;
 if (num > 0)
 cWords += " and "
 if (num > 19) {
 /* Tens. */
 cNum = String(num);
 nNum = Number(cNum.charAt(0));
 cWords += aTens[nNum - 2];
 num %= 10;
 if (num > 0)
 cWords += "-";
 if (num > 0) {
 /* Ones and teens. */
 nNum = Math.floor(num);
 cWords += aOnes[nNum];
 return cWords;
function ConvertToWords(num)
 var aUnits = [ "Thousand", "Million", "Billion", "Trillion", "Quadrillion" ];
 var cWords = (num >= 1 && num < 2) ;
 var nRight = Math.floor(num);
 for (var i = 0; nLeft > 0; i++) {
 if (nLeft % 1000 > 0) {
 if (i != 0)
 cWords = ConvertToHundreds(nLeft) + " " + aUnits[i - 1] + " " + cWords;
 else
 cWords = ConvertToHundreds(nLeft) + " " + cWords;
 nLeft = Math.floor(nLeft / 1000);
 num = Math.round(num * 100) % 100;
 if (num > 0)
 cWords += ConvertToHundreds(num) + " Fils";
 else
 cWords += "Zero Fils";
 return cWords;

Hi RK,
We had a similar requirement and we used Web Dynpro for Java which contained the Interactive Form that would display the personnel area, personnel sub area, etc.
We developed a custom application in WD Java which would accept entries from the user on each screen after clicking on the Change Personnel area link in the portal. The user would put in the values and when the user would click on the Submit button, an adobe form would be displyed which would show the existing values as well as the values the user newly entered.
Hope this helps. Do let me know if you need any further inputs.

Plsql query converts numeric value or currency(rupees) to English words

Hi,
I Need a plsql procedure/function query that converts numeric value or currency(rupees) to English words.
Please help .that is very very important and urgent for me.
Thanks in advance.
Regards,
Karthik T

that is very very important and urgent for me. Then help yourself by looking on all over internet :
http://www.google.nl/search?hl=nl&q=oracle+numeric+word&meta=
Or by using the search feature against the forum :
http://forums.oracle.com/forums/search.jspa?threadID=&q=%2Bnumber+%2Bword&objID=f75&dateRange=all&userID=&numResults=15
That would be faster.
Nicolas.

Reg Currency Description and Amount in words

Hi
Can anybody help me out in finding Function Module for Currency Descripton and Amount in words.
For Example, if currency type is USD and the amount is 29,012.50
then it should display the currency description as The sum of US Dollars and the amount in words as Twenty Nine Thousand Twelve and Cents Fifty and it should work for any currency type.
Thanks in Advance.
Swathi

Hi swathi,
Cents are not known in SAP only USD with decimal places in known.
however check if this can solve teh problem...
for indian currency inr use the below function module....
HR_IN_CHG_INR_WRDS
for usd currency use the following code as an example..
data: amt_in type pc207-betrg value '29012.50'.
data: words type spell.
data: result type string.
call function 'SPELL_AMOUNT'
exporting
 amount = amt_in
 currency = 'USD'
FILLER = ' '
LANGUAGE = SY-LANGU
importing
 in_words = words
EXCEPTIONS
NOT_FOUND = 1
TOO_LARGE = 2
OTHERS = 3
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
concatenate 'USD' words-word 'AND' words-decword 'CENTS'
 into result separated by space.
write:/ result.
hope this helps,
all the best,
sampath
award helpful answers

How to spell currency from number to words

how to spell currency from number to words?
Is there a built in function in oracle?
Can anybody give me the code?
thanks
sharath

ok, rewritten to work with nulls and numbers from -5373484.99$ to +5373484.99$
SQL> set null "<NULL>"
SQL> select
to_char(comm, '$999999.99'),
decode(comm, null, null,
decode(sign(trunc(comm)),
 0, to_char(to_date(to_char(trunc(comm)),'SSSSS'),'ssssssp'),
 1, to_char(to_date('1','J')+(trunc(comm)-1),'jsp'),
 -1, 'minus '||to_char(to_date('1','J')+(trunc(comm)-1),'jsp')
) || ' dollars and '||
to_char(to_date(to_char(mod(comm,1)*100),'SSSSS'),'ssssssp')||
' cents'
from emp;
TO_CHAR(COM DECODE(COMM,NULL,NULL,DECODE(SIGN(TRUNC(COMM)),0,TO_CHAR(TO_DATE(TO_CHAR(TRUNC(COMM)),'SSSSS'),'SSSSSSP'),1,TO_CHAR(TO_DATE('1','J')+(TRUNC(COMM)-1),'JSP
<NULL> <NULL>
 $300.00 three hundred dollars and zero cents
 $500.00 five hundred dollars and zero cents
<NULL> <NULL>
 $1400.00 one thousand four hundred dollars and zero cents
<NULL> <NULL>
<NULL> <NULL>
<NULL> <NULL>
<NULL> <NULL>
 $.00 zero dollars and zero cents
<NULL> <NULL>
<NULL> <NULL>
<NULL> <NULL>
<NULL> <NULL>

How do I change currency sign $ to full wording of the currency ie USD on our Sales invoices in Great Plains?

Hi,
We are working in a multi-currency environment, many countries around the world are using the $ sign for their local currencies (like Australian
dollar). We invoice in USD but our invoice templates print the dollar sign ($), customers are confused which denomination they should pay with.<o:p></o:p>
How do we change on our Sales Invoice templates the $ sign to spelled out USD please.
Thanks
Zuzana

> How do we change on our Sales Invoice templates the $ sign to spelled
> out USD please.
That's rather not group policy related, but depends on the application
that prints your invoices. I'd suggest contacting the application vendor.
Greetings/Grüße,
Martin
Mal ein
gutes Buch über GPOs lesen?
Good or bad GPOs? - my blog…
And if IT bothers me -
coke bottle design refreshment (-:

Summary report treats a currency fields as text

In the summary report I have three charts with the currency field. The two charts show 'average' and 'total' but the other chart shows 'percentage' of responses - in other words the report treats that field not as a number but as text. The filed is designated as a currency in the desing view. Why is it treated as text?

Hi,
The percentage of responses is a reference for the responses of that field. If you don't want it to show, you can disable it.
Hope this help,
Perry

Error in Report: Next to amount field i could see 'ERROR' word in report

Guys,
Problem in Report: Next to amount field i could see 'ERROR' word in report
Eg: Invoice Amount : "1200ERROR" it should be like "$1200".
Pls help where do i need to check.
Thanks

Ajeet wrote :
Hi,
It can heppens if all the records getting aggregated in the report are of different currencies and not belonging to one currency.
Do a currency conversion for the key figures and make them all with same currency.
See if the records in the cube for the selection which you have given in the report gives you records with different currency and if it is true then as above said.
Thanks
AJeet
Are you sure ???
The mixed unit values will be displayed as * (by default unless its changed).
ERR comes if unit is not maintained.

Currency in words

Similar Messages

Maybe you are looking for