Transa��es no Dbexpress

Question

Venho desenvolvendo meus sistemas usando principalmente os componentes IB para manipula��o de dados, lembrando que sempre usando Interbase e Firebird mas a minha d�vida �: qual a melhor maneira de se ...

Faelcavalcanti · Answer

No b�sico e simples faria assim:[code:1:18f14d6396]Procedure ProcedimentoSimples;const c_SQL_Tabela : String = �DELETE * FROM TABELA�;var   Qry_Aux : TSQLQuery;begin  // instancia o objeto TSQLQuery em run-time  Qry_Aux               := TSQLQuery.Create(Nil);  Qry_Aux.SQLConnection := SQLConnectionDefault;  // verifica se est� em transa��o, caso n�o inicializar�  if SQLConnectionDefault.InTransaction then    SQLConnectionDefault.StartTransaction(TTransactionDesc);  try    try      Qry_Aux.SQL.Add(c_SQL_Tabela);      Qry_Aux.ExecSQL;      // v�rios outros procedimentos aqui             // ......      // salva tudo e atualiza no banco      SQLConnectionDefault.Commit(TTransactionDesc);    except      // caso ocorra algum erro executar o seguinte c�digo abaixo      do e: exception begin        SQLConnectionDefault.Roolback(TTransactionDesc);        ShowMessage(�Ocorreu um erro: + #13 + e.Message);      end;  finally    Qry_Aux.Free; // aqui sempre ser� executado  end;end;[/code:1:18f14d6396]Os objetos [b:18f14d6396]TTransactionDesc[/b:18f14d6396], voc� poderia utilizar algum j� criado, mas no caso seria recomend�vel setar para [b:18f14d6396]xilREADCOMMITTED[/b:18f14d6396]. J� no caso do [b:18f14d6396]SQLConnectionDefault[/b:18f14d6396] vale o mesmo, pois depende das configura��es do banco. Acho que este simples exemplo j� fica legal para implementar no c�digo, voc� poderia fazer at� uma procedure padr�o j� com tratamento de transa��o, tipow sempre que eu quiser fazer qualquer ti...

F�rum Transa��es no Dbexpress #273369