Sofern der zu ersetzende String in dem Feld immer an fester Position steht, geht es mit SQL-Mitteln: etwas wie folgt:

1) STRSQL(Sitzung starten)
2) Update LIB/FILE
SET FELD = substr(FELD, 1 , 10)!!
"001"!!substr(FELD,18, 3)
where substr(Feld, 11, 7) = "001/002"

/*Kommentar: sofern 001/002 immer an z. B. Position 11 stehen würde und das Feld 20 Stellen lang wäre */

Ansonsten wüßte ich nur den Weg über ein z. B. Cobolprogramm, daß die Datei Satzweise liest und mit dem wunderbar komfortablen Befehl INSPECT REPLACING arbeitet.

Vielleicht hilft's weiter.
Gruß
Klaus