[firebase-br] Consulta Procedure

[Francisco A Souza]

veja a procedure ai abaixo, e adapte ao que precisa. ela pega todas as 
saidas de uma tabela e gera um saldo. vc so tem que acrescetar a tabela de 
entradas e fazer o calculo.
C REATE PROCEDURE CRIAGIROMES
RETURNS (
    ID_LOJA INTEGER,
    MES SMALLINT,
    ANO SMALLINT,
    CODIGO INTEGER,
    QUANTIDADE NUMERIC (18, 3),
    TOTAL NUMERIC (18, 6))
ASBEGIN
  FOR SELECT
      CF_ITENS.id_loja,
      EXTRACT(MONTH FROM CF.emissao) AS MES,
      EXTRACT(YEAR FROM CF.EMISSAO) AS ANO,
      CF_ITENS.CODIGO,
      SUM(CF_ITENS.QUANTIDADE) AS Quantidade,
      SUM(CF_ITENS.PRECO*cf_itens.quantidade) AS TOTAL
    FROM
      CF_ITENS
      LEFT JOIN CF ON (CF_ITENS.ID = CF.ID) AND (CF_ITENS.ID_LOJA = 
CF.ID_LOJA)
      WHERE CODIGO>0 AND CF.status<>'C'
    GROUP BY
      CF_ITENS.id_loja,MES,ANO,CF_ITENS.CODIGO

    INTO
      :ID_LOJA,
      :MES,
      :ANO,
      :CODIGO,
      :QUANTIDADE,
      :TOTAL
DO
BEGIN
 INSERT INTO TABELA_PRODUTOS_GIRO_MES (
    ID_PRODUTO,
    ID_LOJA,
    VENDAS,
    MES,
    ANO,
    TOTAL_VENDAS)
  VALUES (
    :CODIGO,
    :ID_LOJA,
    :QUANTIDADE,
    :MES,
    :ANO,
    :TOTAL);
    END
END
----- Original Message ----- 
From: "Paulo Sérgo Feix" <paulinhofeix em gmail.com>
To: "Forum Firebird" <lista em firebase.com.br>
Sent: Wednesday, August 23, 2006 4:24 PM
Subject: [firebase-br] Consulta Procedure


Ola Pessoal



Estou começando utilizar o as procedures do Firebird, só que não tenho
experiência nem uma neste campo.

Bem estou precisando fazer uma com culta de saldo de produtos.

Na tabela compra o total de entrada na tabela venda o total de saída, e na
tabela atualiza_prod, na verdade preciso ver o total de saldo por produto

Alguém poderia me ajudar?

Paulinho...




-- 
Paulinho...
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para editar sua configuração na lista, use o endereço 
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa



-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.405 / Virus Database: 268.11.5/425 - Release Date: 22/08/2006