Converting the amount into words in different languages
Hi All,
Is there any FM to convert the amount into words in a specific language.
SPELL_AMOUNT FM is not working for some of the languages like portuguese, etc..
Any idea on this.
Thanks in Advance.
Hi,
Use the FM:
CALL FUNCTION <b>'Y_AMOUNT_IN_WORDS'</b>
Hope it helps.
Reward if helpful.
Regards,
Sipra
Similar Messages
-
Convert total amount into words
Hi
My requirement is to convert total amount into words.
For this i used function module SPELL_AMOUNT.
But its giving wrong (i.e. problem is in the paise).
I tried with other function module also, its not giving output.
how i can get exactly correct output.
Reward points if helpful.Hi
execute this code .
REPORT ZCOVERTION.
TABLES SPELL.
DATA : T_SPELL LIKE SPELL OCCURS 0 WITH HEADER LINE.
DATA : PAMOUNT LIKE SPELL-NUMBER VALUE '23.45'.
SY-TITLE = 'SPELLING NUMBER'.
PERFORM SPELL_AMOUNT USING PAMOUNT 'USD'.
WRITE: 'NUMBERS', T_SPELL-WORD ,'and', 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. " SPELL_AMOUNT
Hope this will solve ur problem
Thanks
Krushna
oputput: -
Converting the amount in words
Hi ,
Issues is like if the amount is $137,510.82 for US currency it should give as ONE HUNDRED THIRTY-SEVEN THOUSAND FIVE HUNDRED TEN USD and 82/100.
But when the document currency is german in the check it should give as ONE HUNDRED THIRTY THOPUSAND AND 51082/100.
THE LOGIC SHOULD BE CURRENCY DEPENDENT.
HOW DO I DI THIS...following is a customized report to convert amount to words...
*& Report ZCFM_REPT_RUPEE_CONVERSION *
*This report is a copy of report 'ZRUPECO1' in Tengl server *
Date : 25-Oct-2006 *
Author : Amiya Shrivastava *
Title : Report to convert amount into words as per*
Indian spelling conventions *
Original Request number : DEVK917286 *
report zcfm_rept_rupee_conversion .
include zcfm_incl_rupee_conv_data.
*& Form COVERSION1
text
-->NUMBER text
-->ANS text
form coversion1 using number changing ans.
clear: gtab,
giritab,
giriline,
girijtab,
line ,
ans,
init, initnam, initno , init1,
cnam1, cnam2, cnam3,cnam4, point,jpoint,
kpoint,lpoint1, lpoint2,lpoint,fpoint,
cnt1 , cnt2, cnt3 ,
flhun, flth, flla, flcr1,flcr2, flchu1, flchu2, flpt, res.
refresh :
itab ,
ktab ,
jtab .
init = number.
init1 = init.
cnt1 = strlen( init ).
cnt2 = cnt1 - 1.
do cnt1 times.
initnam = init+0(1).
shift init by 1 places left.
if initnam = '.'.
cnam1 = init1+0(initno).
endif.
initno = initno + 1.
enddo.
do cnt1 times.
cnam2 = init1+0(1).
shift init1 by 1 places left.
if cnam2 = '.'.
point = init1+0(2).
exit.
endif.
enddo.
do 2 times.
jpoint = point+0(1).
shift point by 1 places left.
if sy-index = 1.
kpoint = point.
endif.
perform points.
enddo.
cnt1 = strlen( cnam1 ).
do cnt1 times.
cnam2 = cnam1+0(1).
perform calcu .
shift cnam1 by 1 places left.
enddo.
sort itab descending by index.
loop at itab.
if sy-tabix = 1.
jtab-result = itab-result.
jtab-index = itab-index.
append jtab.
else.
if itab-result = 'One ' and ( sy-tabix = 2 or sy-tabix = 5 or
sy-tabix = 7 or sy-tabix = 9 ).
perform teens.
move space to line-result.
modify jtab from line index cnt3 transporting result .
else.
if itab-result <> space.
perform ties.
else.
jtab-result = itab-result.
jtab-index = itab-index.
append jtab.
endif.
endif.
endif.
cnt3 = sy-tabix.
res = itab-result.
endloop.
skip.
loop at jtab.
case sy-tabix.
when 10.
if jtab-result <> space.
if flcr1 = 'X' and flcr2 = 'X'.
concatenate jtab-result 'Hundred Crores' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
else.
concatenate jtab-result 'Hundred AND' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
endif.
endif.
when 9.
if flcr1 = 'X'.
if jtab-result <> space.
concatenate jtab-result 'Crores' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
else.
flcr2 = 'X'.
endif.
endif.
when 8.
if jtab-result <> space.
concatenate jtab-result 'Crores' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
else.
flcr1 = 'X'.
endif.
when 7.
if flla = 'X'.
if jtab-result <> space.
concatenate jtab-result 'Lacs' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
endif.
endif.
when 6.
if jtab-result <> space.
concatenate jtab-result 'Lacs' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
else.
flla = 'X'.
endif.
when 5.
if jtab-result <> space.
if flth = 'X'.
concatenate jtab-result 'Thousand' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
endif.
endif.
when 4.
if jtab-result <> space.
concatenate jtab-result 'Thousand' into line-result
separated by ' '.
modify jtab from line index sy-tabix transporting result.
else.
flth = 'X'.
endif.
when 3.
if jtab-result <> space.
if flchu1 = 'X' and flchu2 = 'X'.
concatenate jtab-result 'Hundred' into line-result
separated by ' '.
else.
concatenate jtab-result 'Hundred AND' into line-result
separated by ' '.
endif.
modify jtab from line index sy-tabix transporting result.
else.
flhun = 'X'.
endif.
when 2.
if jtab-result = space.
flchu2 = 'X'.
endif.
when 1.
if jtab-result = space.
flchu1 = 'X'.
endif.
endcase.
endloop.
*SORT JTAB ASCENDING BY INDEX.
loop at jtab.
if sy-tabix = 1.
cnam4 = jtab-result.
else.
concatenate jtab-result cnam4 into cnam4 separated by space.
endif.
endloop.
if lpoint2 = space and lpoint1 = space.
lpoint = 'only'.
else.
concatenate 'Paise' lpoint2 lpoint1 'only' into lpoint separated by
space.
endif.
if cnam4 <> space.
shift cnam4 left deleting leading space.
concatenate 'Rupees' cnam4 lpoint into ans separated by space.
*WRITE : / 'RUPEES', CNAM4.
*WRITE : / ANS.
endif.
endform. "COVERSION1
*WRITE : / LPOINT NO-GAP.
form ties.
jtab-index = itab-index.
if sy-tabix = 2 or sy-tabix = 5 or sy-tabix = 7 or sy-tabix = 9.
case itab-result.
when 'Two '.
jtab-result = 'Twenty'.
when 'Three'.
jtab-result = 'Thirty'.
when 'Four '.
jtab-result = 'Fourty'.
when 'Five '.
jtab-result = 'Fifty'.
when 'Six '.
jtab-result = 'Sixty'.
when 'Seven'.
jtab-result = 'Seventy'.
when 'Eight'.
jtab-result = 'Eighty'.
when 'Nine '.
jtab-result = 'Ninety'.
when space.
jtab-result = space.
endcase.
else.
jtab-result = itab-result.
endif.
append jtab.
endform. "TIES
*& Form TEENS
text
form teens.
jtab-index = itab-index.
case res.
when 'One '.
jtab-result = 'Eleven'.
when 'Two '.
jtab-result = 'Twelve'.
when 'Three'.
jtab-result = 'Thirteen'.
when 'Four '.
jtab-result = 'Fourteen'.
when 'Five '.
jtab-result = 'Fifteen'.
when 'Six '.
jtab-result = 'Sixteen'.
when 'Seven'.
jtab-result = 'Seventeen'.
when 'Eight'.
jtab-result = 'Eighteen'.
when 'Nine '.
jtab-result = 'Nineteen'.
when space.
jtab-result = 'Ten'.
endcase.
append jtab.
endform. "TEENS
*& Form CALCU
text
form calcu .
itab-index = sy-index.
case cnam2.
when '1'.
itab-result = 'One'.
when '2'.
itab-result = 'Two'.
when '3'.
itab-result = 'Three'.
when '4'.
itab-result = 'Four'.
when '5'.
itab-result = 'Five'.
when '6'.
itab-result = 'Six'.
when '7'.
itab-result = 'Seven'.
when '8'.
itab-result = 'Eight'.
when '9'.
itab-result = 'Nine'.
when '0'.
itab-result = space.
endcase.
append itab.
endform. "CALCU
*& Form POINTS
text
form points.
if sy-index = 2.
if fpoint = space.
case jpoint.
when '1'.
lpoint1 = 'One'.
when '2'.
lpoint1 = 'Two'.
when '3'.
lpoint1 = 'Three'.
when '4'.
lpoint1 = 'Four'.
when '5'.
lpoint1 = 'Five'.
when '6'.
lpoint1 = 'Six'.
when '7'.
lpoint1 = 'Seven'.
when '8'.
lpoint1 = 'Eight'.
when '9'.
lpoint1 = 'Nine'.
when '0'.
lpoint1 = space.
endcase.
endif.
endif.
if sy-index = 1.
case jpoint.
when '1'.
perform lpointy.
when '2'.
lpoint2 = 'Twenty'.
when '3'.
lpoint2 = 'Thirty'.
when '4'.
lpoint2 = 'Forty'.
when '5'.
lpoint2 = 'Fifty'.
when '6'.
lpoint2 = 'Sixty'.
when '7'.
lpoint2 = 'Seventy'.
when '8'.
lpoint2 = 'Eighty'.
when '9'.
lpoint2 = 'Ninety'.
when '0'.
lpoint2 = space.
endcase.
endif.
endform. "POINTS
*& Form LPOINTY
text
form lpointy.
case kpoint.
when '1'.
lpoint2 = 'Eleven'.
when '2'.
lpoint2 = 'Twelve'.
when '3'.
lpoint2 = 'Thirteen'.
when '4'.
lpoint2 = 'Fourteen'.
when '5'.
lpoint2 = 'Fifteen'.
when '6'.
lpoint2 = 'Sixteen'.
when '7'.
lpoint2 = 'Seventeen'.
when '8'.
lpoint2 = 'Eighteen'.
when '9'.
lpoint2 = 'Nineteen'.
when '0'.
lpoint2 = 'Ten'.
endcase.
lpoint1 = space.
fpoint = 'X'.
endform. "LPOINTY -
Converting USD amount into word
Hi,
I want to convert amount which is in USD into word i am using below FM
CALL FUNCTION 'SPELL_AMOUNT'
EXPORTING
amount = dmbtr
currency = waers
FILLER = ' '
language = langu
IMPORTING
in_words = spell
EXCEPTIONS
not_found = 1
too_large = 2
OTHERS = 3.
IF sy-subrc = 0.
now my DMBTR amount is 21960.00 which is atually 219.60 USD but in dmbtr initially amount is coming as 21960.00 and when i convert it to word it is coming as USD : TWO HUNDRED NINETEEN, AND CENTS AS SIX THOUSAND, but acutally it should be USD DOLLAR TWO HUNDRED NINETEEN AND CENTS SIXTY ONLY, it is not coming peoprly so is there any other functionn module for this to convert USD , JPY into word.
regards,
zafarHi,
Assign dmbtr to type PAYR_FI-RWBTR.
PARAMETERS: dmbtr type PAYR_FI-RWBTR.
OR
If you didnt get from this try by using type P
PARAMETERS: dmbtr type P.
Regards,
kalandar
Edited by: kalandar on Jun 16, 2010 9:48 AM -
Hi,
Using PE51, net salary amount can display in words as,
pe51--> form name-->Betrg(double click)--->select RT
Table field : Betrg
Identifier: /560
Output length: 30
Convertion: 23
Eg:17,714.44 (Net Salary)
While i was doing like this i am getting the amount in words as
SEVENTEEN THOUSAND SEVEN HUNDRED FOURTEEN
But i want the output like this SEVENTEEN THOUSAND SEVEN HUNDRED FOURTEEN AND 44/100 DOLLARS
Thanks in Advance.hi,
data: AMOUNT(20),
CURRENCY(3)
FILLER(1)
LANGUAGE(2),
IN_WORDS(900).
DESCRIBE FIELD AMOUNT TYPE TYPE DECIMALS DECIMALS.
IF TYPE EQ 'P'.
INT_AMOUNT = AMOUNT * ( 10 ** DECIMALS ).
ELSE.
INT_AMOUNT = AMOUNT.
ENDIF.
INT_DECIMAL = 0.
INT_FILLER = SPACE.
INT_FILLER+1 = FILLER.
INT_LANGUAGE = LANGUAGE.
IF CURRENCY NE SPACE.
IF CURRENCY EQ '0'. "Sicherheitsabfrage (sonst Loop
TCURX-CURRDEC = 0. "bei fehlendem Eintrag 0)
ELSE.
SELECT SINGLE * FROM TCURX
WHERE CURRKEY EQ CURRENCY.
IF SY-SUBRC NE 0.
TCURX-CURRDEC = 2.
ENDIF.
ENDIF.
INT_DIVISOR = 1.
INT_CURRENCY = CURRENCY.
DO TCURX-CURRDEC TIMES.
INT_DIVISOR = INT_DIVISOR * 10.
ENDDO.
INT_DECIMAL = INT_AMOUNT MOD INT_DIVISOR.
INT_AMOUNT = INT_AMOUNT DIV INT_DIVISOR.
INT_DIVISOR = 1000000000.
DO TCURX-CURRDEC TIMES.
INT_DIVISOR = INT_DIVISOR / 10.
ENDDO.
INT_DECIMAL = INT_DECIMAL * INT_DIVISOR.
ENDIF.
IF LANGUAGE CA 'PS'.
IF CURRENCY EQ SPACE.
INT_GENUS = 'M'.
ELSE.
IF TCURC-WAERS NE CURRENCY.
CLEAR TCURC.
SELECT SINGLE * FROM TCURC WHERE WAERS EQ CURRENCY.
ENDIF.
IF ( 'ADP/CYL/CZK/DKK/EEK/EGP/ESP/GBL/GBP/IDR' CS TCURC-ISOCD OR
'IEP/INR/ITL/LBP/LKR/MTL/MUR/NOK/NPR/PKR' CS TCURC-ISOCD OR
'SCR/SDP/SEK/SKK/SYP/TRL' CS TCURC-ISOCD )
AND TCURC-ISOCD NE SPACE.
INT_GENUS = 'F'.
ELSE.
INT_GENUS = 'M'.
ENDIF.
ENDIF.
ENDIF.
IF LANGUAGE EQ 'R'.
CLEAR TCURC.
SELECT SINGLE * FROM TCURC WHERE WAERS EQ CURRENCY.
ENDIF.
IF INT_AMOUNT(5) NE '00000'.
MESSAGE E074 WITH INT_AMOUNT RAISING TOO_LARGE.
ELSE.
INT_ZAHL = INT_AMOUNT+5.
ENDIF.
PERFORM ZIFFERN_IN_WORTEN.
PERFORM BETRAG_IN_WORTEN.
PERFORM NACHKOMMA_IN_WORTEN.
IN_WORDS = SPELL. -
i have an ipad 2 and want to put my dvds onto the ipad. i have downloaded handbrake and converted the file into mpeg4 file but i cannot get the file to open in itunes
I have the same problem , i've converted my videos to mp4 , by using different programmes and tried to open them in itunes but it didnt .
Some people suggested the following although it didnt help me , it might help you
One suggested to paste the videos that you want in automatically add to itune ( go to your music folder m then click on itunes , then itunes media , and you will find it there )
Others suggested to o to the ontrol panal , then programmes and features m then lick on quick time (. Or itunes) then Change then repair
If it didnt help. And you find another method m please let me know
Thank you -
I cannot convert pdf file into word
i cannot convert pdf file into word i have paid for it
Check the security settings for the purchased PDF.
Reader cannot convert to Word. -
Have bought service below to convert pdf files into word excel, Have followed instructions but cannot convert file. Please help.
AD003225761BR Produtos pedidos: Qtd. produto 1 Adobe ExportPDF, Annual (Outro,Todos os idiomas disponíveis) My email: [email protected]Hi Jwalter,
Thank you for posting on the Adobe forums,Please let us know what is the exact issue.
Also, if you want help on how to use the service, kindly try the link below.
Adobe ExportPDF FAQ
http://tv.adobe.com/watch/insights-on-acrobat-solutions/introduction-to-adobe-exportpdf/
Thanks,
Vikrantt Singh -
Convert the date into user default date formate
I am wrinting a bdc and i want to convert the date into user default date farmate ..please suggust the functiom module should i use...
actually by using dats or d type you can get the user specific date itself.
but if u have different dates format that need to be converted to the user specific date then you can follow below procedure
1. retrieve the user format from usr01
SELECT SINGLE datfm
INTO w_datfm
FROM usr01
WHERE bname EQ sy-uname.
pass w_datfm to the below FM (4th import parameter)
2. create Z - FM and retrieve the user secific date
FUNCTION ZFXX_USER_SPECIFIC_DATE.
""Local Interface:
*" IMPORTING
*" VALUE(IW_DAY) TYPE CHAR2
*" VALUE(IW_MONTH) TYPE CHAR2
*" VALUE(IW_YEAR) TYPE CHAR4
*" VALUE(IW_DATFM) TYPE USR01-DATFM
*" EXPORTING
*" VALUE(EW_USER_DATE) TYPE CHAR0008
*1 DD.MM.YYYY
*2 MM/DD/YYYY
*3 MM-DD-YYYY
*4 YYYY.MM.DD
*5 YYYY/MM/DD
*6 YYYY-MM-DD
CASE iw_datfm.
when '1'.
concatenate iw_day iw_month iw_year
into ew_user_date.
when '2'.
concatenate iw_month iw_day iw_year
into ew_user_date.
when '3'.
concatenate iw_month iw_day iw_year
into ew_user_date.
when '4'.
concatenate iw_year iw_month iw_day
into ew_user_date.
when '5'.
concatenate iw_year iw_month iw_day
into ew_user_date.
when '6'.
concatenate iw_year iw_month iw_day
into ew_user_date.
when others.
clear ew_user_date.
endcase.
ENDFUNCTION. -
Convert given value into words
i want convert given value into words
such as
amount 54300
in words fifty four thousand three hundred only
thanking you
aamirnumber value in words
-
Amount into Word (i.e. 1001 one thousand one)
can some body help me to tell me that any function in Oracle which can translate any given amount into words.
regards
Zahidselect to_char(to_date(873,'J'), 'JSP') as converted_form from dual;
CONVERTED_FORM
EIGHT HUNDRED SEVENTY-THREESource:http://www.oracle.com/technology/oramag/code/tips2005/011705.html
2.Convert amount in words to amount in numbers
HTH
Girish Sharma -
Is there a possibility to send from the Admin console the invitations to endusers in different languages? Somehow all the invitations go out in German but for my colleages in Spain and in the UK it makes it difficult to understand what they have to do with this invitation. It doesn't help when I change the language in the admin console....Thanks for your help
Hey Eric,
Thanks for taking the time. Unfortunately no that does not solve it. Same as swipe it will get me there and it will show separate programs spaced out. The issue I am having is that all my open word files are bunched up in a pile on top of each other. I can see the edges of each one but I want them to be separated from each other enough that I can visually identify what file is what.
Again, thanks for trying, it is appreciated. -
SAP Script(calling FM to spell the amount in words)
Hi Friends,
I am getting error in calling a function module(HR_IN_CHG_INR_WRDS : To spell the amount in words) to a script form.It is giving a dump message : "Conversion type error".
Could you guide me with small example ?
I will reward for usefull responses.
Pls. treat it as urgent.
Thx in Adv.
BobbyHi
execute this code .
REPORT ZCOVERTION.
TABLES SPELL.
DATA : T_SPELL LIKE SPELL OCCURS 0 WITH HEADER LINE.
DATA : PAMOUNT LIKE SPELL-NUMBER VALUE '23.45'.
SY-TITLE = 'SPELLING NUMBER'.
PERFORM SPELL_AMOUNT USING PAMOUNT 'USD'.
WRITE: 'NUMBERS', T_SPELL-WORD ,'and', 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. " SPELL_AMOUNT
Hope this will solve ur problem
Thanks
sreelakshmi -
Report for converting the documents into the PDF format.
Hello Experts,
I need to know if any report/ T-code is available in SAP to convert the files into PDF format.
We are processsong these PDF's then into IXOS system.
Regards,
Anna.Hello ,
You may check with the below programs:
Program name Report title
RSTXCPDF Routines for Converting OTF Format to PDF Format
RSTXPDF2 Administration/Upload of type 1 and TrueType font files
RSTXPDF3 Customizing for OTF-PDF Conversion
RSTXPDF4 Help Report from CONVERT_OTFSPOOLJOB_2_PDF
RSTXPDF5 Help Report from CONVERT_ABAPSPOOLJOB_2_PDF
RSTXPDFT Test report for PDF conversion - converting standard texts to PDF
RSTXPDFT2
RSTXPDFT3 Test
RSTXPDFT4 Convert SAPscript (OTF) or ABAP Lists Spool Job by PDF
RSTXPDFT5 Test: GUI Download of Spool Request
Regards
Ramesh Ch -
How to display the entire application in two different languages in apex
Hi,
How to display the entire application in two different languages in apex...
For example i need to display each item in both English and Hindi..
To achieve this initially i have the select the language otherwise the item label alone ll be displayed in both languages ...
Anyhow how it ll be apex is it possible
Regards,
PavanHi pars,
http://www.packtpub.com/sites/default/files/1346-chapter-6-creating-multilingual-apex-applications.pdf?utm_source=packtp…
In this link also i struck in
In page 10 of that document
The application is now ready to be translated. Everything is in place to run it in any language imaginable.To ca ll the application in another language, change the URL of your application to the following:
http://yourdomain:port/pls/apex/f?p=&APP_ID.:&PAGE_ID.:&SESSION_ID.:LANG:NO::FSP_LANGUAGE_PREFERENCE:nl
This example will call the chosen page in the application and show it in the Dutch language instead of in English. To select another language change the property nl at the end of the URL to your desired language code.
Thanks alot for ur suggestions.kindly provide more inputs..............
Maybe you are looking for
-
Download Link for HP Smart Web Printing does not answer
Since 4PM GMT + 1 on Thursday the 19. of November 2009 Any solution on the situation ? Regards Thomas This question was solved. View Solution.
-
I have 130 books on my ipad but only 95 in itunes. I'm running the most current version of itunes. I used to be able to just do a backup to my computer and it would capture everything but now it's not doing it. How do I get all of my books backed
-
Is it possible to integrate fingerprint to a car park with LV
Sorry, i am new to LV. I would like to know Is it possible to integrate fingerprint device to lv car park?
-
I have some .mov's of a film I made and I'm burning them to dvds. When I import my highest quality mov into idvd and preview it, there are straight white lines at the top and bottom of the letterbox area, one on the very top and one on the very botto
-
Errors Calculating File Size for 4.7MB DVD's
I have been seeing a lot of errors when Encore calculates the total disc capacity in the "Disc" tab. Sometimes it will say my total file size is say 6.3GB and won't all fit on a 4.7GB disc. I re-transcode select AVI's at the LOWEST setting rather tha