[firebase-br] Ajuda com Procedure

[Amabile Prioto]

Como posso fazer para mostrar os valores corretamente,
é possível fazer isso que estou fazendo?
Ou terei que criar duas procs?
Obrigado desde já.
Amabile.


CREATE PROCEDURE PROC_COMPRASMES(
    DATAINI DATE,
    DATAFIM DATE)
RETURNS (
    MES VARCHAR(8),
    TOTAL NUMERIC(15,2),
    TOTALR NUMERIC(15,2))
AS
begin

  FOR
    SELECT (EXTRACT (MONTH FROM PAGAR.EMISSAO) || '/'
|| EXTRACT (YEAR FROM PAGAR.EMISSAO)) AS MESANO,
SUM(PAGAR.VALOR) AS TOTAL, sum(pagar.VALOR -
pagar.valor) as totalr
        From PAGAR

        WHERE PAGAR.EMISSAO BETWEEN :DATAINI and
:DATAFIM
        AND TIPO NOT IN (4,6,7,8)
        GROUP BY   EXTRACT (MONTH FROM PAGAR.EMISSAO),
EXTRACT (YEAR FROM PAGAR.EMISSAO)
        INTO :MES,  :TOTAL, :TOTALR 
  DO



  FOR
    SELECT (EXTRACT (MONTH FROM RECEBER.EMISSAO) ||
'/' || EXTRACT (YEAR FROM RECEBER.EMISSAO)) AS MESANO,
sum(receber.valor - receber.valor) as total,
SUM(RECEBER.VALOR) AS TOTALR
        From RECEBER

        WHERE RECEBER.EMISSAO BETWEEN :DATAINI and
:DATAFIM
        AND TIPO NOT IN (4,6,7,8)
        GROUP BY   EXTRACT (MONTH FROM
RECEBER.EMISSAO), EXTRACT (YEAR FROM RECEBER.EMISSAO)
        INTO :MES,  :TOTAL , :TOTALR
  DO

  suspend;
end

__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/