Inser��o com MasterSource e MasterFields

Question

Pessoal,Uso os componentes datasource, dataset provider, client datasets, SQLDatasets e SQLConnection. Suponham que eles estejam conectados corretamente.Tenho um clientdataset �A� que representa uma t...

Rafael Gomes · Answer

caro marcelo ...para que voce possa inserir os registros detalhes com sucesso, a chave primaria da sua tabela mestre DEVE ter um valor. se nao tiver como o delphi vai relacionar as duas tabelas????no modo de edi��o, creio que voce ja inseriu o registro no banco de dados e o valor da chave primaria ja existe, logo nao ter� problemas para inserir os registros detalhes ...creio que vc esta querendo inserir os registros detalhe sem antes dar um post na sua tabela mestre.se nao for isso volte a postar!![]s...

Marcelocda · Answer

Obrigado por sua resposta, Rafael !a estrutura aqui est� da seguinte forma:1) Dou um Post no cds mestre (somente uma vez, testando se o estado dele est� em dsInsert ou dsEdit) ao adicionar uma reportagem2) Dou um Post no cds detalhe para cada reportagem adicionada3) Na hora de salvar, eu fa�o um applyupdates(-1) no cds mestre e em seguida outro no cds detalheContinua dando o mesmo erro :(Ser� que isso tem a ver com o fato de eu utilizar um generator junto com um trigger para a gera��o de chaves prim�rias ?...

Marcelocda · Answer

Sobe......

Marcelocda · Answer

Alterei o algoritmo para o c�digo abaixo, que � executado ao clicar no Salvar:

  dModule.IniciaTransacao();

            dModule.cdsReportagem.Post;
            dModule.cdsExemplar.Post;

            dModule.cdsExemplar.ApplyUpdates(-1);
            dModule.cdsExemplar.Refresh;

            dModule.cdsReportagem.Edit;
            dModule.cdsReportagemCOD_EXEMPLAR.AsInteger := dModule.cdsExemplarCOD.AsInteger;
            dModule.cdsReportagem.ApplyUpdates(-1);

            dModule.Commit();

Bem, pessoal, o que est� acontecendo � o seguinte:
1. Continua dando o mesmo erro, mesmo eu salvando o mestre primeiro.
2. Ap�s o Refresh do cds mestre, como pude comprovar no debug, ele realmente est� atribuindo o c�digo gerado ao campo COD_EXEMPLAR, do cds detalhe. Por�m, ao salvar o cds detalhe, ele continua acusando que COD_EXEMPLAR � null.

E uma coisa muito estranha que acontece:
a) No meu generator o valor corrente � 29, por�m, o valor que est� sendo atribu�do ao COD do cds mestre � 6. Por qu� isso acontece?

Ap�s encontrar o mesmo erro, eu tentei atribuir o c�digo �na m�o�, como foi visto na pen�ltima linha, antes do applyupdates do cds detalhe, e mesmo assim, continua acusando o erro de NULL no COD_EXEMPLAR.

O update mode est� como UpWhereKeyOnly.

Por favor, pessoal, algu�m poderia me dizer o que est� errado?

Paullsoftware · Answer

[quote:00fa1136fa]a) No meu generator o valor corrente � 29, por�m, o valor que est� sendo atribu�do ao COD do cds mestre � 6. Por qu� isso acontece? [/quote:00fa1136fa]vc est� apontando os campos corretos no c�digo do gerador??tipo, o c�digo da minha Trigger � esse:[code:1:00fa1136fa]CREATE TRIGGER CLIENTES_BI FOR CLIENTESACTIVE BEFORE INSERT POSITION 0ASBEGIN  IF (NEW.CODIGO IS NULL) THEN    NEW.CODIGO = GEN_ID(GEN_CLIENTES_ID,1);END[/code:1:00fa1136fa]s� um detalhe, como est� o valor [b:00fa1136fa]Default[/b:00fa1136fa] do seu campo c�digo, tente incluir dados pelo pr�prio banco e veja se o [b:00fa1136fa]GERADOR [/b:00fa1136fa] esta funcionando, uma vez aconteceu comigo de n�o funcionar, mais por que o [b:00fa1136fa]Default[/b:00fa1136fa] do campo c�digo estava 0...Post aqui o resultado!...

Emerson Nascimento · Answer

tente algo assim:[code:1:7d955c1fd1]dModule.IniciaTransacao();             dModule.cdsReportagem.Post;             dModule.cdsExemplar.Post;             dModule.cdsExemplar.ApplyUpdates(-1);             dModule.cdsExemplar.Refresh;             dModule.cdsReportagem.First; // primeiro registro            while not dModule.cdsReportagem.Eof do            begin              dModule.cdsReportagem.Edit;               dModule.cdsReportagemCOD_EXEMPLAR.AsInteger := dModule.cdsExemplarCOD.AsInteger;              dModule.cdsReportagem.Post; // grava o valor do "mestre"              dModule.cdsReportagem.Next; // passa para o pr�ximo registro            end;             dModule.cdsReportagem.ApplyUpdates(-1); // aplica as altera��es            dModule.Commit();[/code:1:7d955c1fd1]veja se assim d� certo. o problema est� no fato de a liga��o master/detail n�o ter (infelizmente) o recurso de [i:7d955c1fd1]propagate changes[/i:7d955c1fd1] do nesteddataset. de qualquer forma fa�a o teste e nos avise sobre o resultado....

Marcelocda · Answer

Bem, eu resolvi adotar a seguinte solu��o: como eu j� estou usando trigger, eu coloquei a defini��o do c�digo do exemplar da reportagem dentro dele. Assim, passou a funcionar.

De qualquer forma, a l�gica do �merson est� correta. S� que no meu caso eu teria que fazer umas coisas chatas no clientdataset, como achar o registro que acabou de ser inserido e filtrar o cds detalhe, j� que nos meus cds est�o todos os registros, pois tamb�m os utilizo para visualiza��o em grid. N�o sei se isso � trivial, por�m, n�o quis perder mais tempo com isso.

Agora c� entre n�s, essa implementa��o de mestre-detalhe no Delphi � bizarra, hein? N�o propagar o valor da chave prim�ria que foi inserida...Acaba servindo apenas para listagem e filtro mesmo.

PaullSoftware, o generator e o trigger est�o corretos :)
Obrigado pelas respostas de todos !

S�o esses detalhes que eu busco nos livros e n�o acho...Coisas como a n�o propaga��o dos valores do cds mestre, contidos em um relacionamento mestre-detalhe;
No geral, os livros de delphi que vejo s�o muito superficiais...

Se algu�m puder me indicar um livro BOM mesmo, que tenha um n�vel de detalhes desse tipo...Ficaria muito agradecido !

Valeu, pessoal !

Obrigado a todos e em especial ao �merson !

F�rum Inser��o com MasterSource e MasterFields #313520