Commit no se ejecuta

[Casimiro Notevi]

Elimina esos commit que haces después de los execsql
Al componente TIBTransaction dale estos valores:

write
nowait
rec_version
read_committed

Luego, en el evento del query que lo necesites, haces un commit explícito:

Código Delphi [-]
procedure TDMmain.QRcentrosCosteAfterPost(DataSet: TDataSet);
begin
  DataSet.Transaction.CommitRetaining;
end;

Y por supuesto, no olvides hacer un commit (no un commitretaining) por ejemplo cuando vuelves a la pantalla principal. Ya depende de cómo tengas estructurado tu programa.

[Angel.Matilla]

Empezado por Casimiro Notevi

Al componente TIBTransaction dale estos valores:

write
nowait
rec_version
 read_committed

¿Dónde pongo esos valores? ¿En los parámetros? ¿Cómo? Porque en la ayuda no lo he visto. El resto del código que me sugieres no se me había ocurrido, la verdad.

[Casimiro Notevi]

Por ejemplo, doble click en el componente.
O botón derecho sobre el mismo -> editar parámetros de transacciones.

[Angel.Matilla]

Imagino que te refieres a esto:

Los valores de la izquierda, ¿los dejo tal cual, sin seleccionar ninguno?

[Casimiro Notevi]

Ese diálogo es.
No hace falta que tú lo teclees. Si marcas "Read Commited" verás que se escriben esas opciones.

[Angel.Matilla]

Gracias por todas las respuestas (me estáis enseñando un montón de cosas que desconocía) y perdón por lo paliza que llego a ser. Vamos a ver. He hecho lo que me has sugerido: darle los valores a la transacción, poner el código de la transacción (lo he puesto en el evento QueryAfterPost, como en tu ejemplo, pero tal vez no sea el mejor sitio) y he eliminado los commit tras los ExecSQL... ¡Pero me sigue haciendo lo mismo! Cuando tiene que buscar el último valor que se ha grabado en el query INSERT INTO Mesas, sigue sin encontrarlo y se salta el resto del código. De hecho tengo puesto con el depurador que se pare en:

Código PHP:

void __fastcall TfMenu::QueryAfterPost(TDataSet *DataSet)
{
     (reinterpret_cast<TIBQuery *>(DataSet))->Transaction->CommitRetaining();
} 


pero ni siquiera llega a entrar en ese evento; tengo puesta la "parada" justo en la línea del CommitRetainig. El código está puesto así, de forma similar a otros eventos, para que me valga para otros querys que hay en la aplicación; por ejemplo:

Código PHP:

void __fastcall TfMenu::QueryAfterClose(TDataSet *DataSet)
{
     (reinterpret_cast<TIBQuery *>(DataSet))->UnPrepare();
     (reinterpret_cast<TIBQuery *>(DataSet))->SQL->Clear();
} 


[Casimiro Notevi]

Pero, ¿qué error sale? ¿has verificado qué valores llevan los parámetros? etc.