Im RPGLE gibts ja die Funktion %scan() um nach dem Punkt zu suchen.
Im CLP muss man leider das API QCLSCAN bemühen.
Man kann aber auch eine kleine Schleife und %sst() programmieren.