Bom dia pessoal...
Firebird 1.5, Delphi 7, Ibx
Bom dia, pessoal...
Estou colocando essa procedure numa ibquery, quando rodo da erro na
linha do execute statement...
Só que se rodar pelo ibexpert, ele gera a procedure normalmente...
Alguém já teve algum problema com isso...
CREATE PROCEDURE SP_SOMAITEMVENDIDO (
FILTRO VARCHAR(1000))
RETURNS (
QTD DECIMAL(15,7),
VLR DECIMAL(15,7))
AS
DECLARE VARIABLE SQ VARCHAR(2000);
begin
sq = ' select Sum(it.num_quantidade - it.num_qtdeestorno), Sum
(it.num_quantidade * it.vlr_unitario) from itemvenda it ' || 'left
join produto p on (p.cod_produto = it.cod_produto ) ';
if (filtro is not null) then
sq = sq || ' where ' || filtro;
execute statement sq
into :qtd, :vlr;
suspend;
end
[]s, muito obrigado e Feliz Natal...
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
