FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
Erro poco raro
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 |
|
|
|