Puedes Hacer cualquiera de estas 2 opciones:
1. Si es dentro del programa .4gl que estas manipulando la variable tipo char, deberas
realizar una funcion que recorra la cadena y cambie el caracter uno por el caracter dos
Ejemplo: cadena1="$ 90000.00 Pesos "
let long_cadena1=length(cadena1)
let letra1 = "$"
let letra2 = " "
call Cambiar_Caracter( letra1, letra2, long_cadena1,cadena1) returning cadena_new
..
...
..
Function Cambiar_Caracter(letra_1,letra_2,long,cad)
Define
letra_1,letra_2 char(1),
long smallint ,
cad char(50),
idx smallint
for idx = 1 to long
if cad[idx,idx] = letra_1 then
let cad[idx,idx] = letra_2
end if
end for
return cad
End Function
2. Si son los registros de una tabla de un Base_De_Datos
deberas bajar los datos en archivo plano
unload to nombre_tabla.txt select * from nombre_tabla
despues desde el PROMPT o shell haces un sed .
sed -e 's/$/ /g' < nombre_tabla.txt > nombre_tabla_nueva.txt
Puedes Hacer tambien un trigers o un procedimiento almacenado tambien.
etc...
Ok.
