conversion of char to currency

hi, im trying to convert a char of value 7.586.870,80 to curr value, im getting a dump

below is my code

DATA: l_amount type p.

shift l_CWTFREE left deleting leading space.

replace all occurrences of ',' in l_CWTFREE with '+'.

translate l_CWTFREE using '.,'.

replace all occurrences of '+' in l_CWTFREE with '.'.

condense l_CWTFREE no-gaps.

l_amount = l_cwtfree.