multiples conexiones a una base de datos con firebird

[novato_erick]

Mi muy estimado Sres


Estoy realizando una aplicacion el cual se requiere que mas de 20 usuarios esten simultaneamente conectado a una base de datos e incluso precisamente ingresando cliente, el problema esta es que si tengo usuarios ingresando clientes y otros buscando clientes en otro formulario para ser modificado o utilizado en un modulo de factura el programa en ocasiones se pega. para realizar Mis pruebas de desarrollo tengo 5 maquinas el cual 3 de ellas ingresan Clientes y 2 de ellas buscan y modifican clientes, la base de datos es firebird 2.5 y la tabla de clientes le ingrese registro de clientes actuales el cual son mas de 50,000 (cincuentamil registros) para comprobar la velocidad de busqueda pero no he logrado mejorarlo

Alguien con mas experiencia podria darme un consejo, utilizando componentes como DBExpress, ClientDataSet, DataSetProvieder.


Saludos

novato_erick

[Casimiro Notevi]

¿Qué quiere decir que "en ocasiones se pega"?

[novato_erick]

El programa no responde. o demora en agregar o enconrar un cliente.


Saludos

[Casimiro Notevi]

Pues tendrás que explicarnos en detalle cómo trabajas, el código de las búsquedas, las tablas y sus índices, relaciones entre ellas, etc. porque así, sin ninguna información, poco podemos hacer
Desde luego, 20 conexiones y 50.000 registros es poquita cosa para que tarde en hacer algo.

[novato_erick]

Código SQL [-]
Create Table Clientes (
  Id_cliente Integer Not Null,
  Cedula Varchar(20) Character Set Ascii Not Null Collate Ascii,
  Nombre Varchar(100) Character Set Ascii Not Null Collate Ascii,
  Pais Varchar(50) Character Set Ascii Not Null Collate Ascii,
  Direccion Varchar(250) Character Set Ascii Not Null Collate Ascii,
  Telefono Varchar(15) Character Set Ascii Collate Ascii,
  Fax Varchar(10) Character Set Ascii Collate Ascii,
  Celular Varchar(15) Character Set Ascii Collate Ascii,
  Email Varchar(40) Character Set Ascii Collate Ascii,
  Fecha Date Default 'now',
  Observaciones Varchar(250) Character Set Ascii Collate Ascii);


Alter Table Clientes Add Primary Key (id_cliente);


Set Term ^ ;

Create Trigger Bi_clientes_id_cliente For Clientes
Active Before Insert
Position 0
As
Begin
  If (new.id_cliente Is Null) Then
      New.id_cliente = Gen_id(clientes_id_cliente_gen, 1);
End^

Set Term ; ^

[marcoszorrilla]

Yo te preguntaría en el componente que hace las búsquedas tienes declarados campos LookUp ó Calculados.

Hace unos días sin ir más lejos descubrí que un proceso que realizaba 137 recibos tardaba muchísimo, primero desactive los controles xxx.DisableControls y vi que no mejoraba gran cosa.

Pensé que podían ser los campos LookUp

Código Delphi [-]
Dmclientes.IBDtsRecibos.AutoCalcFields:=False;

Coloqué la instrucción anterior antes del proceso y la contraria al finalizar y todo volvió a la normalidad.

Un Saludo.