Moin,

Du kannst aber auch so lösen, für den Fall das Dein Feld Alpha ist.

For $i = 1 To %Len(%Trim(DeinFeld)) ;
If %Subst ( DeinFeld : $i : 1 ) = DeinZeichen' ;
Fehler ;
EndIf ;
EndFor ;

mfg

DKSPROFI