[firebase-br] duvida em procedure
emerson carrard
emersoncarrard em yahoo.com.br
Ter Mar 29 12:19:20 -03 2005
Bom dia pessoal
tenho a seguinte procedure:
CREATE PROCEDURE CRIATABELA (
IEMPRESA INTEGER)
AS
declare variable VSQL VARCHAR(300);
declare variable RVENDEDOR VARCHAR(30);
declare variable VSQLAUX VARCHAR(200);
declare variable cont integer;
declare variable cont2 integer;
begin
cont2=1;
VSQL= 'CREATE TABLE RELRESUMO(';
SELECT count(V.vendedor) FROM vendedor V
WHERE V.status='ATIVO' AND
V.perccomissaolubrificante IS NOT NULL
into :cont;
FOR
SELECT V.vendedor FROM vendedor V
WHERE V.status='ATIVO' AND
V.perccomissaolubrificante IS NOT NULL
INTO :RVENDEDOR
DO
BEGIN
if (cont<>cont2) then
begin
VSQLAUX=:RVENDEDOR||' '|| 'VARCHAR(50),';
VSQL = VSQL ||VSQLAUX;
end
else
begin
VSQLAUX=:RVENDEDOR||' '|| 'VARCHAR(50)';
VSQL = VSQL ||VSQLAUX;
end
cont2=cont2+1;
END
VSQL=VSQL||');';
execute statement VSQL;
end
ela tem a funcao de criar uma tabela usando sql dinamico ja depurei e verifiquei o comando sql que ela gera ta ok porem ao colocar a linha do execute statement ocorre um erro de parsing error no ib expert como faço pra executar o comando sql que montei?
uso fb 1.5.2
---------------------------------
Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora!
Mais detalhes sobre a lista de discussão lista