Quitar caracter de una cadena

[Triton]

Hola amigos, tengo un contratiempo y es que tengo un campo (NIF) en una tabla de mi aplicación, la cual un cliente mío la a rellenado con el carácter "-". Por ejemplo: B-30458799.

Me gustaría saber si existe alguna función en Interbase 5.6 que me ayude a quitar el carácter "-" y dejarlo así: B30458799.

Desde ya, gracias

[marcoszorrilla]

La verdad ahora mismo no recuerdo si existen una UDF en interbase para hacer lo que pides, pero si es urgente con código Delphi recorres la tabla y lo arreglas:

procedure TForm1.Button1Click(Sender: TObject);
Var
s:String;
begin
s:=Edit1.text;
Delete(s, Pos('-',edit1.text),1);
edit1.Text:=s;
end;

Este ejemplo adaptándolo a tu base de datos lo arreglaría, haces un bucle que recorra la tabla y cambias edit1.text por el nombre del campo a modificar.

Un Saludo.

[__cadetill]

otra opción es usar el SUBSTRING y la concatenación de strings

select substring(NIF from 1 for 1) || substring(NIF from 3 for 8)
from clientes

[Triton]

Al final opté por la siguiente opción:

with Clientes do
  begin
    First;
    while not Eof do
    begin
      Clientes.Edit;
      aux:=ClientesNIF.Value;
      aux1:=StringReplace(aux,'-','',[rfReplaceAll]);
      ClientesNIF.Value:=aux1;
      Post;
      Next;
    end;
  end;

De todos modos gracias, la opción de Substring no me sirve porque en InterBase 5.6 no existe. Además hay nifs que van así también "789542136-A".

Lo dicho, muchas gracias