Recuperar um ID gerado apos uma inserção
BLZ Gente Boa!
Eu preciso recuperar um ID gerado apos uma inserção em uma tabela, como eu faço isso???
Utilizo Firebird 2.0, Delphi 7 e ADO
Estou tentando criar um stored procedure mais ou menos assim:
como eu faço no delphi para recuperar esse id gerado: r_identrada
Eu preciso recuperar um ID gerado apos uma inserção em uma tabela, como eu faço isso???
Utilizo Firebird 2.0, Delphi 7 e ADO
Estou tentando criar um stored procedure mais ou menos assim:
r_identrada = next value for seq_erp006_id;
insert into erp006 (identrada, idfornecedor, dtentrada, notafiscal, serie, chaveacesso, idpedido, idusuario, dataup)
values (:r_identrada, :v_idfornecedor, :v_dataentrada, :v_notafiscal, :v_serie, :v_chaveacesso, :v_idpedido, :v_idusuario, current_timestamp);
suspend;como eu faço no delphi para recuperar esse id gerado: r_identrada
Silvio Morelo
Curtidas 1
Respostas
Eduardo Silva.
05/07/2016
Se você está utilizando Generators no campo IdEntrada você pode obter o valor com o código:
Voçê também pode criar uma rotina logo após o Insert utilizando o evento AfterPost da sua Query, tipo:
Existem várias possibilidades...
Boa Sorte
Eduardo Belo
beloelogica@gmail.com
SELECT GEN_ID(NOME_DO_GENERATOR,0) FROM RDB$DATABASE
Voçê também pode criar uma rotina logo após o Insert utilizando o evento AfterPost da sua Query, tipo:
Select MAX(IdEntrada) From erp006
Existem várias possibilidades...
Boa Sorte
Eduardo Belo
beloelogica@gmail.com
GOSTEI 0
Silvio Morelo
05/07/2016
Obrigado Eduardo
GOSTEI 0