CREATE OR REPLACE FUNCTION BUSCA_IMPOSTO_DESONERADO_ITEM(
   P_CDFILIAL     IN ITEMPRODUTO.CDFILIAL%TYPE,
   P_NRLANCTONF   IN ITEMPRODUTO.NRLANCTONF%TYPE,
   P_NRSEQITPROD  IN ITEMPRODUTO.NRSEQITPROD%TYPE) RETURN NUMBER

AS
   V_VRIMPOSTOIT ITEMPROIMPOS.VRIMPOSTOIT%TYPE;
BEGIN
   SELECT NVL(SUM(VRIMPOSTOIT), 0) AS VRIMPOSTOIT
     INTO V_VRIMPOSTOIT
     FROM ITEMPROIMPOS
    WHERE CDFILIAL = P_CDFILIAL
      AND NRLANCTONF = P_NRLANCTONF
      AND NRSEQITPROD = P_NRSEQITPROD
      AND IDIMPDESONERAIT = 'S'
      AND CDFISCALIT = '1';

   RETURN(V_VRIMPOSTOIT);
END;
/

-- VERSAO --
BEGIN ATUVEROBJ('BUSCA_IMPOSTO_DESONERADO_ITEM','6.35.017'); END;
/
