FB+IBX+IBTransaction+ClientDataSet

[[Al González]]

Empezado por hibero

...tenia entendido que el DataSetProvider se encargada de iniciar (startTransaction) y finalizar (Commit o rollback) las transacciones.

Doy la misma respuesta.
http://www.clubdelphi.com/foros/show...48&postcount=6

[Rockin]

Tengo el mismo problema como indica AI Gonzalez, he hehcho de todo pero nada. Si alguien encuentra la solución que la postee.

Gracias y saludos.

[[Al González]]

Empezado por Rockin

Tengo el mismo problema como indica AI Gonzalez...

¿Y ese quién es?

[hibero]

el caso es que tengo un tibtransaction y un tibdatabase desde que conecto a la base de datos (tibdatabase.open) si el componente tibtransaction inicia una transaccion (Por lo tanto me veo obligado a realizar un commit tras realizar un applyupdates en el client dataset).
en vista de esto he asociado un componente transaccion para el componente ibquery es decir (diferente del que tiene asociado el componente tibdatabase)
TIbtransaction<--TIBQuery<--TDataSetProvider<--TClientDataSet<--TDataSource<---TDBGrid

En este caso si yo no hago en mi codigo un tibtransaction.Starttransaction no se debería haber iniciado una transacción y entiendo que el TDataSetprovider deberia manejar las transacciones por mi. Pero sigo teniendo el mismo problema (Problema que en realidad se soluciona si siempre que hago un applyupodate a continuacion hago una commit de la transaccion asociada)

[hibero]

Lo he solucionado haciendo un commit tras cada Applyupdates pero no se si es lo correcto, el caso es que funciona

[Rockin]

¿Donde haces el commit en el Servidor de Capa Intermedia o en la Aplicación Cliente?

saludos.

[Rockin]

Ya he conseguido realizar los cambios en la BD pero solo se realizan cuando cierro la Aplicacion. ¿Que tengo que hacer para se realicen en el momento?

[hibero]

Rockin en vez de cerrar haz un commit y seguramente se te grabaran los datos (po al menos eso es lo que me pasa a mi).
En mi caso estoy haciendo pruebas asi que tengo todo en un modulo de datos. Pero supongo que lo haras donde tengas el componente transaccion o no

[Cañones]

Hola a todos.
Para este tema Yo deje un ejemplo de como lo solucione.
http://www.clubdelphi.com/foros/show...5&goto=newpost

No se si es lo mejor, pero me funciona.

Saludos. Espero que sirva de algo.

[Gabriel]

Siempre me a ido perfecto, desde la versión 1 de Firebird hasta la 2.1 que utilizo ahora
al Aceptar y hacer el Post i el Apply, cualquier cliente ya ve los datos gravados, en el acto.


SQLQuery - DatasetProvider - ClientDataset

try
ClientDataSet1.Post;
ClientDataSet1.ApplyUpdates(0);
except
ClientDataSet1.Cancel;
ClientDataSet1.CancelUpdates;
end;

en el TSQLConnection (solo uno por aplicación)

procedure TFModuloIni.SQLConnection1BeforeConnect(Sender: TObject);
begin
SQLConnection1.ConnectionName := 'MiConexion';
SQLConnection1.DriverName :='Interbase';
SQLConnection1.Params.Values['BlobSize'] := '-1';
SQLConnection1.Params.Values['CommitRetain'] := 'False';
SQLConnection1.Params.Values['Database'] := Utilidades.DataBaseUtil;
SQLConnection1.Params.Values['ErrorResourceFile'] := '';
SQLConnection1.Params.Values['LocaleCode'] := '0000';
SQLConnection1.Params.Values['Password'] := 'masterkey';
SQLConnection1.Params.Values['RoleName'] := 'RoleName';
SQLConnection1.Params.Values['ServerCharSet'] := '';
SQLConnection1.Params.Values['SQLDialect'] := '1';
SQLConnection1.Params.Values['Interbase TransIsolation'] := 'ReadCommited';
SQLConnection1.Params.Values['User_Name'] := 'sysdba';
SQLConnection1.Params.Values['WaitOnLocks'] := 'True';
end;


Salut