Informix - Reemplazar caracter

   
Vista:

Reemplazar caracter

Publicado por HAIR (11 intervenciones) el 27/09/2007 15:37:41
tengo una cadena de texto y deseo reemplazar un caracter de la cadena por otro ejemplo el signo pesos por un espacio
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Reemplazar caracter

Publicado por Luis Rivaldo (126 intervenciones) el 27/09/2007 16:13:58
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.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar