Duda sobre grabación de registros

[Casimiro Notevi]

Empezado por usuario1000

El componente en sí, no veo que tenga tal propiedad, no sé si está muy escondida por alguna subpropiedad, pero no la veo.

¿Entonces tienes un componente base de datos y tiene asignado un componente transaction?

[usuario1000]

Empezado por Casimiro Notevi

¿Entonces tienes un componente base de datos y tiene asignado un componente transaction?

Por el lado del Servidor tengo los siguientes componentes:
- TFDConnetion, el cual tiene una propiedad "Transaction" donde tengo asignado el componente TFDTransaction
- TFDTransaction, elcula tiene una propiedad "Connection" donde tengo asignado al componente anterior (TFDConnection).
- Y distintos TFDQuery, en cada uno de ellos hay una propiedad "Transaction" que tiene asignado el TFDTransacction.



por el lado del Cliente, utilizo los siguientes componentes:
- TClientDataSet.
- TDataSetProvider.
- SQLConnection,


hay algunos más componentes, pero básicamentes son del mismo tipo.


Para las grabaciones de datos, utilizo funciones donde paso los parametros a grabar desde el cliente al servidor.



Saludos.

[Casimiro Notevi]

Entonces, no necesitas controlar tú mismo las transacciones.

Código Delphi [-]
QExpedientes.ExecSQL;

Y nada más.


Lo que no entiendo es eso de "en el lado del servidor" y "en el lado del cliente", ¿tienes un programa cliente, que conecta a un programa servidor, que conecta a la base de datos?
No sé si esos componentes funcionan así, pero me parece extraño.

[usuario1000]

Empezado por Casimiro Notevi

Entonces, no necesitas controlar tú mismo las transacciones.
Código Delphi [-]QExpedientes.ExecSQL;

Y nada más.


Lo que no entiendo es eso de "en el lado del servidor" y "en el lado del cliente", ¿tienes un programa cliente, que conecta a un programa servidor, que conecta a la base de datos?
No sé si esos componentes funcionan así, pero me parece extraño.

Perdón, no me he explicado bien. Lo que quiero decir es que tengo dos programas, uno es el servidor y otro el cliente. El cliente envia la información a grabar al servidor y el servidor está conectado a la base de datos mediante el componente TFDConnection, que por medio de TFDQuery (qExpedientes.ExecSQL) graba la información en la misma. Pero no lo hace al instante, tarda un tiempo, incluso demasiado. Es una aplicación DataSnap.



No sé si alguno de los componentes debo indicar algo para que la grabación sea inmediata, ya lo estuve revisando y no veo nada que me llame la atención.


Gracias por tu interés.

[[Al González]]

Es como si tuviera transacciones anidadas:

StartTransaction
  StartTransaction
  Commit
Commit

El "verdadero" commit es el último, pero es sólo una idea. Procura aislar el proceso en una aplicación mucho más sencilla.

[Casimiro Notevi]

Empezado por Al González

Es como si tuviera transacciones anidadas:

StartTransaction
  StartTransaction
  Commit
Commit

El "verdadero" commit es el último, pero es sólo una idea. Procura aislar el proceso en una aplicación mucho más sencilla.

Casi seguro que es algo así. Está haciendo transacciones manualmente, cuando el componente ya las tiene asociadas implícitamente.

[usuario1000]

Empezado por Casimiro Notevi

Casi seguro que es algo así. Está haciendo transacciones manualmente, cuando el componente ya las tiene asociadas implícitamente.

Buenas


Como puedo averiguar si el componente las tiene asociada implicitamente. ¿Cual es la propiedad?.



Ayer por la noche quité todas las instrucciones de transacciones, para ver si se hacían de forma automática las grabaciones de manera implicita, quité el componente TFDTransaction y no funcionó. Así que lo dejé como estaba.


Lo he solucionado de forma provisional modificando el programa Cliente, cada vez que envío datos al programa Servidor, lo que hago es seguidamente desconectar y conectar al cliente del servidor, y así sí que se refleja inmediatamente la grabación. Pero como digo, no es una forma de hacerlo que me guste, aunque consigo lo que quiero. Seguiré investigando a ver que sucede.


No hago transacciones anidadas, un ejemplo es como el que sigue:

Código Delphi [-]
  transacciones.StartTransaction;
  try
    qCuentas.ExecSQL;
    Result:= 'Ok';
    transacciones.commit;
  Except
    on E: exception do
    begin
        transacciones.Rollback;
        raise;
    end;
  end;

Tan sencillo como eso y no graba cuando llega al commit.


Gracias por vuestros comentarios.

[Caminante]

Hola



Los componentes IBX (Que son los que uso) tienen una propiedad Intransaction que indica si ya esta iniciada una transaccion.

Código Delphi [-]
if not IBTransaction1.intransaction then
  IBTransaction1.startTransaction;

Supongo que los componentes que usas deben tener una propiedad similar.

[engranaje]

Por si es de ayuda, solo apuntar que una conexión (TFDConnection) también puede estar en una transacción. Estás seguro de que todas tus transacciones son sobre TFDTransaction y no tienes ninguna sobre TFDConnection?