Anonymous

CREATE PROCEDURE NEW_PROCEDURE (
    ANO VARCHAR(4),
    MES VARCHAR(2))
RETURNS (
    CARTEIRA FLOAT)
AS
DECLARE VARIABLE APAGAR FLOAT;
DECLARE VARIABLE LIQUIDADO FLOAT;
begin
  /* Procedure Text */
   LIQUIDADO = select coalesce(sum(contas_pagar_liq.valor_pagamento),0) from contas_pagar_liq  where contas_pagar_liq.vencimento < current_date and  extract(month from contas_pagar_liq.vencimento) = MES and  extract(year from contas_pagar_liq.vencimento) = ANO;

   APAGAR = select coalesce(sum(contas_pagar.valor -  contas_pagar.valor_pagamento),0) from contas_pagar where contas_pagar.vencimento < current_date and  extract(month from contas_pagar.vencimento) = MES and  extract(year from contas_pagar.vencimento) = ANO;
   CARTEIRA = LIQUIDADO + APAGAR;
   INTO: CARTEIRA;
  suspend;
end