Fórum DUVIDA EM GRAVAR 2 VEZES #363564

Bom dia , gemim, tudo blz

Poderia postar o codigo ou parte de codigo que esta usando nesta sua persistencia.


T+

else if rdt_3060.Checked then
begin
frm_contas_receber.ib_contas_receber.Active := True;
frm_contas_receber.ib_contas_receber.Open;
frm_contas_receber.ib_contas_receber.Edit;
frm_contas_receber.ib_contas_receberCTR_3060.Value := parcela2;
frm_contas_receber.ib_contas_receberCTR_3060VA.Value := parceladiv;
frm_contas_receber.ib_contas_receberCTR_VENCIMENTO.Value := vinteeoito;
frm_contas_receber.ib_contas_receber.Post;
dm_banco.IBTransaction1.CommitRetaining;

end
//gravar novamente
frm_contas_receber.ib_contas_receber.Active := True;
frm_contas_receber.ib_contas_receber.Open;
frm_contas_receber.ib_contas_receber.Edit;
frm_contas_receber.ib_contas_receberCTR_3060.Value := parcela2;
frm_contas_receber.ib_contas_receberCTR_3060VA.Value := parceladiv;
frm_contas_receber.ib_contas_receberCTR_VENCIMENTO.Value := vinteeoito;
frm_contas_receber.ib_contas_receber.Post;
dm_banco.IBTransaction1.CommitRetaining;

Pelo código que colocasse ali tais editando 2 vezes o mesmo registro
e não inserindo o mesmo, ai claro que não vai aparecer os dados do segundo commit;

além disso se for insert no segundo edit os valores da chave têm que ser diferente do primeiro senão vai dar erro.