Ver Mensaje Individual
  #1  
Antiguo 05-03-2012
jocaro jocaro is offline
Miembro
 
Registrado: sep 2011
Posts: 104
Reputación: 13
jocaro Va por buen camino
Raise exception

Hola a todos.

Depurando el código de una procedure, encuentro un error (ambos presentados mas adelante), que he intentado acotar para evitarlo, pero no lo consigo.

Al ejecutar los métodos post de las líneas de código mostradas en negrita me salta el siguiente error:

Cita:
raise exception class ESQLiteError, message 'cannot rollback savepoint - SQL statements in progress'
En otras partes del código de la aplicación hay definidas unas querys de tipo SELECT y referidas sólo a TablaNotTem. Aunque en la sesión en curso de la aplicación no se utilicen esas querys, el error sigue apareciendo.

Si alguno de vosotros sabe indicarme a que puede ser debido el error, alguna situación típica en que suele aparecer, en definitiva cualquier comentario que pueda encaminarme a la solución, os lo agradeceré

Un saludo
Código Delphi [-]
procedure TSDIAppForm.GrabarBD(); 
begin 

{ Recoger modificación último registro de tablas editado, por si no se cambia a otro registro antes de grabar (no se recogerían cambios automáticamente) } 
  FrmBasDat.TablaElementosArbol.Edit; 
  FrmBasDat.TablaElementosArbol.Post; 
  FrmBasDat.TablaNotas.Edit; 
  FrmBasDat.TablaNotas.Post; 
  FrmBasDat.TablaTemas.Edit; 
  FrmBasDat.TablaTemas.Post; 
  FrmBasDat.TablaNotTem.Edit; 
  FrmBasDat.TablaNotTem.Post; 

{ Grabación en base de datos de los datos de la transacción pendiente } 
  FrmBasDat.ConexionBdSqlite.Commit; 

end;

Última edición por jocaro fecha: 05-03-2012 a las 17:46:17. Razón: No aparece código delphi correctamente
Responder Con Cita