[firebase-br] Procedure que gera Generator e Trigger para autonumeracao

[André]

Oi Pessoal,

Estou tentando gerar uma procedure que gera um
generator e uma trigger Before Insert para campos
autonumeracao. Ela está sendo criada sem problemas, no
entanto quando executo está dando erro.

Estou chamando a procedure da seguinte forma:
EXECUTE PROCEDURE "SP_Autonum"('Teste','Teste');

Abaixo segue a procedure:

SET TERM !!;
CREATE PROCEDURE "SP_Autonum"(Tabela varchar(30),
Campo VARCHAR(30) )
AS
DECLARE VARIABLE NOME_GENERATOR VARCHAR(100);
DECLARE VARIABLE TEXTO VARCHAR(4000);
BEGIN
	NOME_GENERATOR  = '"GN_' || :Tabela || '_' || :Campo
|| '"';
	TEXTO = 'CREATE GENERATOR ' || NOME_GENERATOR;
	EXECUTE STATEMENT TEXTO;

	TEXTO = TEXTO || 'CREATE TRIGGER "TR_' || :Tabela ||
'_BI_Autonum" FOR ' || :Tabela || '" BEFORE INSERT
POSITION 0 AS ';
	TEXTO = TEXTO || 'BEGIN';
	TEXTO = TEXTO || '	NEW."' || :Campo || '" = GEN_ID('
|| NOME_GENERATOR || ',1);';
	TEXTO = TEXTO || 'END;';
	EXECUTE STATEMENT TEXTO;
END;!!
SET TERM ;!!


Desde já, agradeco qualquer ajuda

Andre


	
	
		
_______________________________________________________ 
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/