[JoanKa]

Hola a todos
Tengo una tabla echa en firebird 1.5
Tbancs:
codi varchar(4)
descripcio varchar (50) y obtengo esto
Project.exe raised exception class EIBInterBaseError with message 'aritmetic, exception, numeric overflow, or string truncation.
Canon transliterate character between chararacter sets'. Process stopeped. use step or run to continue

Lo que pasa es que quiero enviar los datos de una tabla de Paradox a Firebird y esta tabla tiene 419 registros, pero solo me copia los primeros 10 registros y luego me sale el error antes mencionado, pero checando la tabla de paradox veo que en campo descripcion veo una palabra que contiene la Ñ y todos los campos despues de este registro no me copia a la tabla de paradox.

Tanto en Paradox como en Firebird tienes los campos como el tamaño y me sale el error que los mencione.

Para esto uso:

T_Paradox: TTable;
DS_Paradox: TDataSource;
IBDatabase1: TIBDatabase;
IBTransaction1: TIBTransaction;
IBQuery1: TIBQuery;
IBUpdateSQL1: TIBUpdateSQL;

y con esto hago el traslado:


procedure TForm1.btn_bancosClick(Sender: TObject);
var
fldDestino, fldInicio : TField;
i:integer;
begin
T_Paradox.first;
IBQuery1.Active:=True;
While not T_Paradox.eof do
begin
with IBQuery1 do
begin
active:=true;
Append;
for i := 0 to FieldCount - 1 do
begin
fldDestino := Fields[i];
fldInicio := T_Paradox.FindField(fldDestino.FieldName);
if assigned(fldInicio) then
fldDestino.AsString := fldInicio.AsString;
end;
Post;
IBTransaction1.Commit;
end;
T_Paradox.next;
end;
ShowMessage('La Transferencia ha finalizado');
end;

Espero que me ayuden.

Gracias