Delphi 7 SQL Não grava

Delphi

02/01/2007

Estou fazendo uma aplicação com Delphi 7 e SQL Server 7, uso para conexão ao Banco ADO

Uso para consultas e manipulação Query´s

Estou fazendo um cadastro onde será gravado em várias tabelas, por exemplo:

Tabela Principal => Pessoa
Tabelas secundárias => Telefones
Referencia
Contas Bancárias
etc etc

Basicamente o código está da seguinte forma:

inicio uma transação: BD.BeginTrans;
Faço todas os insert, usando query´s
e no final BD.CommitTrans;

Só que está gravando somente a inserção da ultima tabela, ou da ultima query.

Fiz um teste, onde coloque logo após a inclusão da primeira tablea, (Pessoa) um committrans e depoins um begintrans... aí gravou a tabela pessoa e tbm a ultima tabela...
Resumindo, está gravando somente a inclusão das query´s que antecedem um commit.
Procurei no fórum mas não achei nada que solucionasse meu problema. Se alguém puder ajudar, agraço...


Edjborges

Edjborges

Curtidas 0

Respostas

Aroldo Zanela

Aroldo Zanela

02/01/2007

Colega,

Experimente simplificar usando ADODataSet.


GOSTEI 0
Edjborges

Edjborges

02/01/2007

Iniciei minha aplicação usando ADODataSet, porém em algumas rotinas ficou complicado para eu ter o controle das inclusões/Alterações aí nesses casos preferi usar query´s com os compandos Insert to e update

Mas já fiz cadastros semelhantes mas nunca tinha ocorrido problemas como este, só que nos outros casos usei Dbexpress, será que tem alguma coisa a ver ?


GOSTEI 0
POSTAR