Spell amount in words

Hi,
    I have a smartform based on the document type it should display the total amount in INR(Indian Ruppes) or USD(US dollars).Based on doc type how i can get the total amount in words.
If Doc.Type = 'X'
    Rupees Hundred and Twenty Three Only
If Doc.TYpe = 'Y'
     USD Hundred and Twenty Three Only

Hi
In the corresponding text element you have to place a alternative option in that make a condition that
doc number = 'x'.
If the condition is true means the system will go for a 'YES' Option and Place a text element and call a function module to spell the amount.
If the conditon is NO Means the system will execute the rest and as said for the above conditon here also u have incorporate the textelemt and call a function module as pass the detials as per your requirement.
Thanks and Regards
Arun Joseph

Similar Messages

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.
Bobby

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
sreelakshmi

Amount in words in PDF

hi all,
I have a requirement where in i have to print amount in words. The user enters the amount in table rows, and the total in amount gets printed in another text field. I have put the code for sum in the exit event of the rows(cell) this is done through formcalc.
Now i have requirement to print the amount in words
1. Is there any function like SPELL in form calc? (i doubt there would be one...!!)
2. If there is no such funcrion, then how to implement this functionality? Can i some how call the FM SPELL in the interactive form or may be generate a event that would call FM SPELL in my WD componentand then print the result back in my interactive form?
All help will be appreciated.

Hey Runal,
I haven't had much experience with Interactive forms inside WDJ, but I think this will work...
In the Submit To SAP button, this code exists...
// DO NOT MODIFY THE CODE BEYOND THIS POINT - 710.20060821084622.325745.280724 - SubmitToSAP.xfo
ContainerFoundation_JS.SendMessageToContainer(event.target, "submit", "", "", "", "");
// END OF DO NOT MODIFY
This code triggers an event call to the backend.
What I would do is have a variable in your form that you set just before you click the button so you know what "event" you want to trigger, then of course, set it to null inside the method... when it goes back into the method in your web dynpro, you could then take the number, call the function module, and return the value to the screen.
In theory, this should work.
Hope this helps...
Cheers,
Kevin

Check printing: Amount in words is getting jumbled

Hi,
I have a problem in displaying amount in words in check.
I am getting the amount in words through functuion module SPELL_AMOUNT correctly,i.e,(for example,110,002 ) ONE HUNDRED TEN THOUSAND TWO.
After getting the amount,i am concatenating the words 'ONLY' amount 'RIYALS'.In program it is concatenated correctly.Expected output is RIYALS ONE HUNDRED TEN THOUSAND ONLY.
But when seen on screen,the words are getting jumbled.
It is getting displayed as TWO RIYALS ONLY ONE HUNDRED TEN THOUSAND.
(Note: My form is in arabic,since i want to display vendor name in arabic,and rest of the check in english).
Please help me with some solution.
Thanks & Regards
Seshagiri.

Hi Dishant,
Sorry for the delay.I am pasting the code below:
Code in print program:
Global data:
data: gv_riyals(6) value 'RIYALS', "RIYALS
      gv_only(4) value 'ONLY',
      gv_halalas(7) value 'HALALAS',
      gv_and(3) value 'AND'.
Local data:
        data: lw_dummy(25),
              lw_fraction(2),   "for fraction part of amount in HALALAS
              lw_integer type i.
        if spell-decimal is initial.
          clear: spell-decimal, dg_100.
        else.
           lw_integer = spell-decimal / 10.
           lw_fraction = lw_integer.
           concatenate '(' lw_fraction '/100)'
                   into lw_dummy. " SEPARATED BY space.
           condense lw_dummy.
           clear dg_100.
           dg_100 = lw_dummy.
        if not spell-word is initial.
          condense spell-word.
          gv_spell_word(50) = spell-word. "Amount in RIYALS
        endif.
     endif.
          call function 'WRITE_FORM'
            exporting
              window = 'PAY_DOC'
              element = 'PAY_DOC'
            exceptions
              window = 1
              element = 2.
          if sy-subrc eq 2 and
            ( err_element-fname ne t042e-zforn
            or err_element-fenst ne 'PAY_DOC'
            or err_element-elemt ne 'PAY_DOC' ).
            err_element-fname = t042e-zforn.
            err_element-fenst = 'PAY_DOC'.
            err_element-elemt = 'PAY_DOC'.
            err_element-text = text_530.
*--Code in the script:
/: IF &DG_100& EQ ' '
L1 &gv_only(C)&,,&gv_riyals(C)&,,&spell-word&
/: ELSE
L1 &gv_riyals(C)&,,&gv_spell_word(C)&
L1 &gv_only(C)&,,&gv_halalas(C)&,,&dg_100(C)&,,&gv_and(C)&
/: ENDIF
Thanks & Regards
Seshagiri.

Function Module to convert amount to amount in words

Dear Guru ,
I want to know is there any sap standard Function Module to convert amount value   to amount in words
Thanks & Regards

Hi..
Use FM SPELL_AMOUNT.
This function module converts an amount or number into words. It can be used as follows:
Convert a number into words
To do this, the transfer parameters LANGUAGE and AMOUNT have to be entered.
Convert an amount into words
To do this, the fields LANGUAGE, CURRENCY, and AMOUNT have to be entered.
Program RF_SPELL contains a sample call of the function module. You can use it for test purposes.
REPORT ZSPELL.
TABLES SPELL.
DATA : T_SPELL LIKE SPELL OCCURS 0 WITH HEADER LINE.
DATA : PAMOUNT LIKE SPELL-NUMBER VALUE '1234510'.
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.                               " SPELL_AMOUNT
I hope it helps.
Reward pts if helpful
Regards
- Rishika Bawa

AMOUNT IN WORDS IN SMARTFORMS

HI All,
I need to convert the amount into words in my smartforms.
How is this achieved?
Thanks & Regards,
Murthy

Hi kan murthy ,
let say in sf the amount is sf_amt...
*Declare varibles in SF like this in global
data: v_word type spell, "structure
v_amt type string.
*Calling Function SPELL_AMOUNT in Program Lines
and Import parameters are V_AMT and Export Parameters are
*V_WORD
call function 'SPELL_AMOUNT'
exporting
amount = v_amt
currency = 'INR'
language = sy-langu
importing
in_words = v_word
exceptions
not_found = 1
too_large = 2
others = 3.
Use V_WORD Where need to print
Regards,
sg

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:

Amount into Words in PE51

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.

Amount in words in F110 (sapscript -indian format)

Hi Experts.
I have changed the F110_PRENUM_CHCK to Z110_PRENUM_CHCK .
I want the amount to be in word in indian format.
say Ten Lakh ninty thousand and fifty
But i am getting the output in "One millon .. " format
Pls give me the coding and also suggest me how to incorporate in sapscript .
Window CHECKSPL
545
Amount in words -
&'*** 'SPELL-WORD& &' and 'SPELL-DECWORD&***
Example for amount and decimal places in words
&'*** 'SPELL-WORD& &REGUD-WAERS&&' and 'SPELL-DECWORD' Cents'& ***
Example for numbers in words
&SPELL-DIG06(6)&&SPELL-DIG05(6)&&SPELL-DIG04(6)&&SPELL-DIG03(6)&&SPELL-DIG02(6)&&SPELL-DIG01(7)&
Pls revert back its urgent
Thanks
Pravesh Deshbhratar

same code i used in smartform:
DATA : l_spell_a TYPE pc207-betrg,
l_local   TYPE string,
w_len     TYPE i.
* Internal Table Declaration
DATA : BEGIN OF t_char OCCURS 0,
char(80) TYPE c,
END OF t_char.
l_spell_a = l_amtsum.
CALL FUNCTION 'HR_IN_CHG_INR_WRDS'
EXPORTING
amt_in_num         = l_spell_a
IMPORTING
amt_in_words       = l_spell
EXCEPTIONS
data_type_mismatch = 1
OTHERS             = 2.
IF sy-subrc = 0.

Function for amount into words

hi friends,
 can any one tell from which function module we can convert amount in figures into words.
input -> 50,000
output -> fifty thousands
plz. help.
it's urgent

HI
use SPELL_AMOUNT
data: words type spell.
call function 'SPELL_AMOUNT'
exporting
 amount = '100000'
* CURRENCY = ' '
* FILLER = ' '
* LANGUAGE = SY-LANGU
importing
 in_words = words.
if words-word = 'ONE HUNDRED THOUSAND'.
words-word = '1 LAKH'.
endif.
write:/ words-word.
display amount in words (USD) including cents
convert amount in no's to words
/community [original link is broken]
Reward if usefull

SAP Script : Amount in Words

Dear All,
I am working on bank Check, I need to print the amount value in Words. Amount field &REGUD-SWNES&, I need to print this amount in words.
I mean to say that, regud-swnes = 1000.69, I have to print this as One Thousand and 69/100. please advice me, how Can I do that.
Thanking you.
with kind Regards
Venkat.

hi venkat,
split the command at decimal and u can design ur code for 69/1000.for displaying 1000 u can use the fm 'SPELL_AMOUNT'.
sample:
TABLES SPELL.
DATA : T_SPELL LIKE SPELL OCCURS 0 WITH HEADER LINE.
DATA : PAMOUNT LIKE SPELL-NUMBER VALUE '1234510'.
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.
reward if helpful.
regards,
keerthi.

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

PRINT SPELL AMOUNT IN SPANISH

Hi to all
I need print into a Sap Script a value in spanish. I use the FM SPELL_AMOUNT, but, when I send the value 1000000, or 2000000, or 3000000, ..... appear: 'UN MILLON', 'DOS MILLONES', 'TRES MILLONES', , but I need that appear 'UN MILLON DE', 'DOS MILLONES DE', 'TRES MILLONES DE'.
In the table T015Z, the word 'DE', don't appear and I need by print 'UN MILLON DE PESOS',
Thank by their aid
regards
Dario

No, because DON'T applied in all the cases
For example, for 1500000, must print 'UN MILLON QUINIENTOS MIL PESOS'
In this case the word 'DE' should't appear in the spell amount
Thank you
regards
Dario

Spell amount functional module

hi guys,
i want u guys to help me out here.i need a functional module which works exactly like SPELL_AMOUNT.The issue is that i want the amount 100,000 to be spelt as 1 lakh instead of one hundred thousand.

hi Arup,
If you look at the documentation of the Function Module, it tells you that the table T015Z has to be customized for your language if the default format of the spelled amounts is not acceptable.
Unfortunately, the vales are stored only based on the language, and not on the currency. So If you configure the table for the English language, then all users who log on in English will get the same format (LAKHS, CRORES etc.,). This may not be acceptable for users in a country like US where the format preferred might be MILLIONS , BILLIONS etc.,
Please exercise caution before going ahead with configuring the table.
The only other alternative (to modifying the table) that I can think of will be to write your own function module!!
or check the below program
FUNCTION Z_FI_AMT_WRDS_CONVERT .
""Local interface:
*" IMPORTING
*" REFERENCE(AMT)
*" EXPORTING
*" REFERENCE(WORD) TYPE SPELL-WORD
amt_c1 = amt.
replace '.' with 'D' into amt_c1.
SEARCH amt_c1 for 'D'.
IF sy-subrc = 0.
amt_wh1 = amt_c1+0(sy-fdpos).
wrk_fdpos = sy-fdpos + 1.
amt_dc1 = amt_c1+wrk_fdpos(2).
ELSE.
amt_wh1 = amt_c1.
amt_dc1 = '00'.
ENDIF.
amtnmr = amt_wh1.
amtdec = amt_dc1.
CONCATENATE amtnmr amtdec INTO amount.
CALL FUNCTION 'SPELL_AMOUNT'
EXPORTING
amount = amount
currency = 'INR'
filler = ' '
language = 'E'
IMPORTING
in_words = amountrs.
*WRITE: / 'amount in figures: ' ,'Rs.-->', AMTNMR,'.',AMTDEC.
*WRITE: / 'Amount in WORDS.: ' ,' Rs.' ,AMOUNTRS-WORD,
*'AND' ,AMOUNTRS-DECWORD ,'Paisa Only'.
*SKIP.
CLEAR: unit1,digit1,unit2,digit2,unit3,digit3,unit4,digit4,word1,word2,
word3,word4,word.
digit1 = amtnmr+14.
unit1 = amtnmr+13.
digit2 = amtnmr+12.
unit2 = '0'.
digit3 = amtnmr+11.
unit3 = amtnmr+10.
digit4 = amtnmr+9.
unit4 = amtnmr+8.
digit5 = amtnmr+7.
unit5 = amtnmr+6.
digit6 = amtnmr+5.
unit6 = '0'.
digit7 = amtnmr+4.
unit7 = amtnmr+3.
digit8 = amtnmr+2.
unit8 = amtnmr+1.
digit9 = amtnmr.
unit9 = '0'.
*WRITE:/ 'UNIT9 = ' , UNIT9, 'DIGIT9 = ', DIGIT9.
IF ( unit1 NE '0' ) OR ( digit1 NE '0' ).
SELECT SINGLE wort INTO word1 FROM t015z WHERE einh = unit1
AND ziff = digit1 AND spras = 'E'.
word1 = t015z-wort.
REPLACE ';' WITH '' INTO word1.
*write: / word1.
ENDIF.
IF unit2 NE '0' OR digit2 NE '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit2
AND ziff = digit2 AND spras = 'E'.
word2 = t015z-wort.
REPLACE ';' WITH '' INTO word2.
CONCATENATE word2 ' HUNDRED ' INTO word2.
*REPLACE '(FEMININE)' WITH '' INTO WORD2.
*write: / word2.
ENDIF.
IF unit3 NE '0' OR digit3 NE '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit3
AND ziff = digit3 AND spras = 'E'.
word3 = t015z-wort .
CONCATENATE word3 ' THOUSAND ' INTO word3.
REPLACE ';' WITH '' INTO word3.
*write: / word3.
ENDIF.
IF unit4 NE '0' OR digit4 NE '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit4
AND ziff = digit4 AND spras = 'E'.
word4 = t015z-wort.
REPLACE ';' WITH '' INTO word4.
CONCATENATE word4 ' LAKH ' INTO word4.
*WRITE: / WORD4.
ENDIF.
IF unit5 NE '0' OR digit5 NE '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit5
AND ziff = digit5 AND spras = 'E'.
word5 = t015z-wort.
REPLACE ';' WITH '' INTO word5.
*write: / word5.
ENDIF.
IF unit6 NE '0' OR digit6 NE '0'.
*UNIT6 = 'H'.
SELECT SINGLE * FROM t015z WHERE einh = unit6
AND ziff = digit6 AND spras = 'E'.
word6 = t015z-wort.
REPLACE ';' WITH ' ' INTO word6.
CONCATENATE word6 ' HUNDRED ' INTO word6.
*REPLACE '(FEMININE)' WITH '' INTO WORD6.
*write: / word6.
ENDIF.
IF unit7 NE '0' OR digit7 NE '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit7
AND ziff = digit7 AND spras = 'E'.
word7 = t015z-wort.
REPLACE ';' WITH ' ' INTO word7.
CONCATENATE word7 ' THOUSAND ' INTO word7.
*write: / word7.
ENDIF.
IF unit8 NE '0' OR digit8 NE '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit8
AND ziff = digit8 AND spras = 'E'.
word8 = t015z-wort.
REPLACE ';' WITH '' INTO word8.
CONCATENATE word8 ' LAKHS ' INTO word8.
*write: / word8.
ENDIF.
IF digit9 NE '0'.
unit9 = '0'.
SELECT SINGLE * FROM t015z WHERE einh = unit9
AND ziff = digit9 AND spras = 'E'.
word9 = t015z-wort.
REPLACE ';' WITH ' ' INTO word9.
*REPLACE '(FEMININE)' WITH ' ' INTO WORD9.
CONCATENATE word9 ' HUNDRED ' INTO word9.
ENDIF.
CONCATENATE word9 word8 word7 word6 word5 ' CRORE ' INTO wordc
SEPARATED BY space.
*WRITE:/ 'Amount in Rs.------->'.
IF amountrs-decword NE 'ZERO'.
CONCATENATE ' AND PAISE ' amountrs-decword INTO dcwrd
SEPARATED BY space.
ENDIF.
IF amtnmr > 9999999.
*WRITE: / WORDC.
*ENDIF.
CONCATENATE 'RUPEES' wordc word4 word3 word2 word1 dcwrd 'ONLY'
INTO word SEPARATED BY space.
ELSE.
CONCATENATE 'RUPEES'word4 word3 word2 word1 dcwrd 'ONLY'
INTO word SEPARATED BY space.
ENDIF.
CLEAR dcwrd.
*WRITE :/ WORD.
*WRITE: 'AND' ,AMOUNTRS-DECWORD ,'Paise Only
ENDFUNCTION.
or try to use the below function module
HR_IN_CHG_INR_WRDS
if u find it useful just mark some points
Regards,
Naveen

Amounts in words will be in Chinese

Hi All,
I need to print Amount in words in Chinese language. I used Function Module "SPELL AMOUNT". By using this FM i can able to print the words in english. Eventhough i used language (sy-langu='zh') is China but i cant able to print in chinse letters. Please guide me on this.
Regards,
Jayakumar

Hi,
the language is ZH and the currency is CNY, those are the values that u need to pass to the FM.
It should work fine, otherwise, check this notes 1401367 - Spell Amount:
Note 152520 - T015Z - Digits and numbers in words in Asian lang.
What is the SAP version that u r working on?
Regards

Spell amount in words

Similar Messages

Maybe you are looking for