Problemas con applyupdates
Buenas,
Uso Firebird 2.0.1, delphi2006 y dbexpress.
Utilizo TSQLquery , un provider y un clientdataset. En el query indico los campos claves y el provider lo tengo a upwherekeyOnly. El campo cliente y refversion ProviderFlags(pfInUpdate=false,pfInWhere=false)
la select:
SELECT REF_C, REF_N, TIPOM, TCORTE, PU, FECHA, LARGO, ANCHO,
PESO, TRATMTO, NOTAS, TRABEXTERNO,CODCLIENTE,TIPO,
PERIMETRO, Clientes.Nom Cliente, VTRATMTO, PUPROPUESTO,
VMAT,VCORTE,DENOMINACION,TTRATMTOS,TIPOGEOMETRIA,
C_VR,REF_C||' '||C_VR REFVERSION, DEOFERTA
FROM PIEZAS Piezas
Inner join Clientes on Piezas.CodCliente=Clientes.Codigo
where ref_n=:ref_n
El bloqueo se produce en:
Código Delphi
[-]if ClientDataset.Applyupdates(0)=0 then
Nota: El bloqueo no se produce siempre, depende de :ref_n.
¿a qué es debido? Parando el motor firebird y si lo vuelvo a arrancar todo va bien. Si no paro el motor, el bloqueo se transmite a otros forms de la aplicación. Al día tengo que reiniciar el motor 2-3 veces