%MACRO traduis (text);
&text =TRANSLATE (&text,'����������������',
                        '����������������');
%MEND traduis;