ABAP function to convert Number
to Words
* * Converting Number to Words * * This function comes handy mostly for the Finance module as they need to print out check * for the vendors. The function allows you to covert easily from numbers to words. * * Written by : SAP Basis ABAP Programming and Other IMG Stuff * http://www.erpgreat.com * 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 Fast Links:
SAP Books
ABAP Tips
Best regards,
All the site contents are Copyright © www.erpgreat.com
and the content authors. All rights reserved.
|