*CONVERT NUMBER TO ENGLISH
CALL FUNCTION 'SPELL_AMOUNT'
EXPORTING
AMOUNT = G_TOTAL
CURRENCY = WG_HEADER-WAERK
FILLER = ' '
LANGUAGE = SY-LANGU
IMPORTING
IN_WORDS = G_TITL
EXCEPTIONS
NOT_FOUND = 1
TOO_LARGE = 2
OTHERS = 3.
G_TOT1 = G_TITL-WORD. " for int
G_TOT2 = G_TITL-DECWORD. "for decimal
IF G_TOT2 NE 'ZERO'.
CONCATENATE WG_HEADER-WAERK G_TOT1 'AND' G_TOT2 'CENTS'INTO G_TOTAL_TEXT SEPARATED BY SPACE.
ELSE.
G_TOTAL_TEXT = G_TOT1.
CONCATENATE WG_HEADER-WAERK G_TOT1 INTO G_TOTAL_TEXT SEPARATED BY SPACE.
ENDIF.