create or replace FUNCTION GETQTMETA(
   P_CDVENDEDOR   IN VENDEDOR.CDVENDEDOR%TYPE,
   P_CDPRODUTO    IN PRODUTO.CDPRODUTO%TYPE,
   P_DTINICIAL    IN NOTAFISCAL.DTEMISSAO%TYPE,
   P_DTFINAL      IN NOTAFISCAL.DTEMISSAO%TYPE) RETURN NUMBER IS

   V_QTMETAVENDA NUMBER;

BEGIN
   V_QTMETAVENDA := 0;

   SELECT SUM(MVD.QTMETAVENDA)
     INTO V_QTMETAVENDA
     FROM METAVENDEDOR MVD, PRODMETAVEND PMV
    WHERE MVD.CDVENDEDOR = P_CDVENDEDOR
      AND MVD.DTINIMETVEND BETWEEN P_DTINICIAL AND P_DTFINAL
      AND MVD.CDMETAVENDA  = PMV.CDMETAVENDA
      AND PMV.CDPRODUTO = P_CDPRODUTO;

   RETURN(V_QTMETAVENDA);
END;
/