Unidac

[Élviro Cavalcanti]

Boa tarde, estou migrando pra usar o componente Unidac no delphi 2010 e como sempre usei os gatilhos do firebird para gerar o código sequencial, vi que pra o Unidac tem a forma via SQL, o que acontece é que meu banco é grande e esse retorno demora um pouco, segue abaixo o código e caso alguém use de outra forma, agradeço a ajuda!

 

  DM.IBQVerifica.close;
  DM.IBQVerifica.SQL.Clear;
  DM.IBQVerifica.SQL.Add('select max(Vendas.Codigo) from Vendas');
  DM.IBQVerifica.open;
  DM.IBVendaCODIGO.AsInteger := DM.IBQVerifica.Fields[0].AsInteger + 1;

[Juliomar Marchetti]

Cria um sequence e usa ele

isso vai ser normal quando aumentar mais e mais será pior. usa o sequence e resolve

[Élviro Cavalcanti]

Você tem algum exemplo de como usar? Sempre usei gerators.

[Juliomar Marchetti]

Isso Sequence é o generators

o que tu me mostrou acima lá é um max + 1 e não generators

[Élviro Cavalcanti]

38 minutos atrás, Juliomar Marchetti disse:

Cria um sequence e usa ele

isso vai ser normal quando aumentar mais e mais será pior. usa o sequence e resolve

Entendi, vou pesquisar na internet sobre como usar sequence e generators, fico grato pela ajuda mais uma vez !

[Juliomar Marchetti]

https://firebirdsql.org/refdocs/langrefupd21-ddl-sequence.html

primeira pagina do google