[Resolvido] Auto incremento Sem trigger e generator

[rafaeloliveira83 0]

Consegui criar um autoincremento, mas conectando diretamente ao clientdataset do datamodule do client.

O problema é que não consigo fazer em 3 camadas usando o server com o client mais o banco de dados.

Criei com query, mas não da pra fazer sem ser conecção direta.

 

Existe algum modo de criar um autoincremento em 3 camadas?

[Chrnos 30]

Não sei se existe como fazer o que quer em 3 camadas... até onde eu sei, ou você implementa isto por código (como foi mostrado a você em outro tópico) ou direto no BD, via triggers. Se alguém souber como fazer em 3 camadas, sinta-se a vontade para expor a forma aqui.

 

[]'s

[rafaeloliveira83 0]

Dica do Flavio UNIP:

 

No ClientDataSet Clicar 2 vezes e Adicionar "New Field"

 

Name = Incremento

Type = Aggregate

Field Type = Aggregate

 

No Object Inspector do Incremento:

 

Active = True

Expression = Tabela(Codigo)+1

 

No Object do ClientDataSet:

 

AgregatesActive = True

 

No Form:

 

Colocar 2 BDEdits

 

1- DBECodigo ( Preencher o DataSource relacionado ao ClientDataSet e em DataField com o campo Codigo da Tabela )

2 - DBEIncremento ( Preencher o DataSource relacionado ao ClientDataSet e em DataField com o campo Incremento da Tabela )

 

Deixar o DBEIncremento como Visible = False

 

Agora no Botão Inserir logo após do ( Append )

 

DBECodigo.Text := DBEIncremento.Text; // Autoincremento

 

Está funcionando como um incremento e em 3 Camadas.