Warum willst Du das unbedingt in RPG machen und nimmst nicht SQL?

Code:
update MySchema/MyTable
    set MyCol = Replace(MyCol, '.', '')
Where ... ;
Den Replace-Befehl kann man auch in embedded SQL verwenden:

Code:
  Exec SQL  Set :MyCol = Replace(:MyCol, '.', '');
Und schließlich gibt es auch ab Release 7.1 auch die Built-In-Funktion %ScanRpl(), die die gleiche Funktionalität wie der SQL Replace hat.

Code:
/Free
   MyCol = %ScanRpl('.': '': MyCol);
/End-Free
Birgitta