>Hi Cetin,
>
>I already tried this before instead of the final SCAN loop:
>
>SET FIELDS GLOBAL
>SET FIELDS TO f1 = ;
> STUFF( RTRIM( Name ), AT( " ", Name ), 1, ", " ) +", "+ ;
> STUFF( RTRIM( Strasse ), RAT( " ", RTRIM( Strasse ) ), 1, ", " ) +", "+ ;
> LEFT( Ort , AT( " ", Ort ) - 1 ) +", "+ ALLTRIM(SUBSTR( Ort, AT( " ", Ort ) )) +", "+ ;
> RTRIM( eMail )
>COPY TO _FOLDER_ + "Adressen2.txt" SDF
>
>
>Unfortunately there's no difference on my machine. Did you have something different in mind?
>
>Markus
I don't have something specific in my mind. I don't even know the input and desired output yet. But it's anyway would be something to remove unnecessary function calls, unnecessary concatenation etc. For example it looks like you might instead do (not exactly same result):
SET FIELDS TO ;
f1 = strtran( Name ," ", ", ",1,1), ;
f2 = strtran( Strasse, " ", ", ",occurs(" ",strasse),1 ), ;
f3 = LEFT( Ort , AT( " ", Ort ) - 1 ),;
f4 = SUBSTR( Ort, AT( " ", Ort ) + 1 ), ;
eMail
COPY TO _FOLDER_ + "Adressen2.txt" type delimited
Cetin