Error de memoria con proceso de Data Pump
Hola amigos he realizado un proceso de Data pump para traspasar todos los datos de una base de datos de nuestra aplicación hacia otra con la misma estructura.
La aplicación es muy sencilla y no tiene ningún tipo de proceso complejo, pero me está dando un quebradero de cabeza en un aspecto determinado. He hecho varias pruebas con diferentes bases de datos con bastante información pero tengo una que llega un momento que me dá error por falta de memoria. ¿Existe alguna posibilidad de controlar ese error o bien, en medio de cada proceso, por ejemplo entre tabla y tabla, liberar memoria? El proceso lo hago con los componentes de la paleta Data Access, la base de datos es FireBird y la versión de Delphi es la 5. |
Tal vez si puesieras el código... sería más sencillo.
¿De cuantos registros estamos hablando? ¿Puedes dar más detalles de la Base de Datos que te está dando error? |
La base de datos que me dá error es la Firebird, la tabla que me dá errores, le he hecho un count y me da un total de 653.398 registros y simplemente lo que hago es acceder a la tabla mediante los componentes tTable de la solapa Data Access y simplemnte lo que hago es asignaciones de un campo a otro. Ya te digo el código funciona perfectamente en todas las bases de datos que he probado excepto en esta, siendo la estructura la misma, ya que ese era el proposito de la aplicación.
El código que utilizo para dicho volcado de datos es el siguiente: Código:
procedure TForm1.btProcesarClick(Sender: TObject); |
Hola,
Hace tiempo hice un programa tambien para traspasar datos de una bd a otra, tal y como comentas que la bd origen es grande no te aconsejo que utilices los componentes TTable, porque entre otras cosas va ha ser muy lento el proceso. Para que te hagas una idea, cuando cuentas los registros de la que tiene 653.398 registros, estas provocando que estos viajen todos por la red!, solo para contarlos. Código:
tbTabla1.Last; Código:
select * from tabla where codigo = :CODIGO; Código:
qrySelect.ParamByName("CODIGO")->AsString = "0001"; |
Gracias Toni, modificaré todo el proceso para utilizar dichos componentes.
|
La franja horaria es GMT +2. Ahora son las 20:38:30. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi