Sql + Delphi + Generator

[tiago_pimenta]

Galera preciso pegar o valor de uma variavel que num generator que esse esta no meu banco de dados (Firebird) via sql no delphi

Não lembro direito mais acho que era algo como SELECT * FROM GENERATOR.

Mais não consigo passar ela pra uma variavel ... se alguém souber ou tiver um tutorial que ensine isso eu agradeceria....

OBS.: TEM QUE SER ASSIM , TEM QUE SER VIA GENERATOR.

Grato

[Guest Angelo]

Uma opcao é você criar tb uma procedure com uma variavel de retorno

CREATE GENERATOR GEN_contador;

SET GENERATOR GEN_contador TO 0

CREATE PROCEDURE contador RETURNS (

variavel_saida INTEGER

) AS

begin

variavel_saida = gen_id(gen_contador,1);

/* Procedure Text */

suspend;

end

Pegando a procedure dentro do sistema em Delphi

frmdm.IBSPGuiaRem.ExecProc;

total_arq := IBStoreProcedure.ParamByName('variavel_saida').AsInteger;