im nicht Free sieht es auch nicht viel anders aus...
PHP-Code:
c                   For       Count= 1 to %Len( SourceFld )          
c                   If        %SubSt( SourceFld: Count: 1) < *Blanks 
c                   Eval      %SubSt( SourceFld: Count: 1) = *Blanks 
c                   EndIf                                            
c                   EndFor                                           
c                   Return    SourceFld 
Gruß
Ronald