SAP/ABAP: ‘SPELL_AMOUNT’ FM

TABLES SPELL.

DATA: T_SPELL LIKE SPELL OCCURS 0 WITH HEADER LINE.
DATA: PAMOUNT LIKE SPELL-NUMBER  VALUE '1234510' .

PERFORM SPELL_AMOUNT USING PAMOUNT 'TRY'.

WRITE: T_SPELL-WORD,
       T_SPELL-DECWORD,
       'TRY' .

FORM SPELL_AMOUNT USING PWRBTR PWAERS.

  CALL FUNCTION 'SPELL_AMOUNT'
       EXPORTING
            AMOUNT    = PAMOUNT
            CURRENCY  = PWAERS
            FILLER    = SPACE
            LANGUAGE  = 'T'
       IMPORTING
            IN_WORDS  = T_SPELL
       EXCEPTIONS
            NOT_FOUND = 1
            TOO_LARGE = 2
            OTHERS    = 3.
ENDFORM.                               " SPELL_AMOUNT