Obrigado.

“Eu” não encontrei uma solução prática para meu problema.

Ou seja, não tem como voce criar mais que uma transação na mesma sessão, para resolver o problema que eu tinha postado no tópico anterior, tive que criar uma nova sessão(Conexão) para cada transação que eu tinha.

Na minha aplicação o usuário pode abrir abrir várias abas(TabSheet) – TDI e cada aba tem sua transacao independente uma da outra.
Imagine duas abas de cadastro sendo alterada ao mesmo tempo, no modelo anterior o primeiro cadastro que executasse um COMMIT os dois cadastro em aberto eram comitados.

para resolver o problema, tive que criar em cada Aba Aberta uma nova sessão no banco:
Conexao := TDBXConnectionFactory.GetConnectionFactory.GetConnection(‘Falcon Financas’, ‘falcon’, ‘**********’);

e apos fechar a aba matar a sessão ativa.

Somente assim consegui resolver o problema de varias transaçoes ser executadas ao mesmo tempo, sem nenhuma interferir com a outra.

Att, Marlon Nardi

estou realizando a mesma Rotina que voce demonstrou, porém no meu caso aparesenta erro na linha 53;

” A transaction is already active.”

Estou utilizando o Delphi 2010 – MYSQL 51.1.53 (INNODB)

O que poderia ser ?

Att,

@Rodrigo, o suporte a multiplas transações foi implementado a partir do Delphi XE, o 2007 não suporta mesmo não.

Ozamir,

só passar a data como string, você pode usar DateToStr para converter

excelente post, mas como ficaria a formatacao para um campo date inves de uma string

InsertSQL : String = ‘Insert Into Country Values ( ”%s”, ”%s” )’;

@Clécio, recomendo você criar uma classe que tenha uma método que retorne a conexão quando você precisar.

*****método de pesquisa*****

aDBXConn:= TDBXConnectionFactory.GetConnectionFactory.GetConnection
(‘nomedaconexaodbxexpress’, ‘user’, ‘password’);

aCmnd := aDBXConn.CreateCommand;

aDBXTrans := aDBXConn.BeginTransaction(TDBXIsolations.ReadCommitted);

// Start transaction
aCmnd.Text := ‘sql’;

aCmnd.Prepare;
aReader := aCmnd.ExecuteQuery;

…. continua….
*****método para segunda pesquisa*****

aDBXConn:= TDBXConnectionFactory.GetConnectionFactory.GetConnection
(‘nomedaconexaodbxexpress’, ‘user’, ‘password’);

…… continua

ou teria outra forma melhor de implementar? Tipo criando uma classe de conexão, etc. Como sugestão poderia nos mostrar em um outro post como usar o DBXExpress Framework para Criar aplicações MVC.

Grato e até mais…

Multiplas transações em oracle utilizando Delphi 2007 eu não consigo fazer como você fez no seu artigo. Como faço nesse cenário ?

Obrigado!

Oi Carlos,

Basta ter objetos transacionais diferentes. Em uma aplicação DataSnap você irá controlar transação no server method ou através de ClientDataSet, não tem conflito.

Sobre o ThreadID sim, tudo no Datasnap é thread safe

Carlos, não entendi nada 🙂

Seguinte, na linha 53, não deveria continuar o nível de isolamento ReadCommited?

E sobre a intercalação de transações, como faço para começar duas transações, e escolher através de qual transação quero rodar um comando? Ouitro exemplo, em uma aplicação DataSnap, onde o objeto de conexão é compartilhado, como faço para o BeginTransaction de um cliente não interferir nos demais clientes?

Ainda sobre o DataSnap, verifiquei que posso verificar qual usuário está rodando um comando verificando o ThreadID, este procedimento é seguro?

Abraço,
Tatu!

Eu particularmente não gosto de ferramentas cases, as que você citou geram uma falsa impressão de produtividade, pois depois a manutenção se torna difícil e custosa.

O Delphi por si só oferece inúmeros recursos que permitem o desenvolvedor criar aplicações de alta qualidade com alta produtividade.

Bom dia

O sr. conhece alguma ferramenta similar ao Genexus ou Maker que possa gerar o código do sistema modelado para Delphi?
Ou seja uma ferramenta CASE para Delphi?

já ví o x-maker mas achei desatualizado e não trabalha com a versão atual do delphi.

grato,

Prof. Emiliano Monteiro