
DROP VIEW VIEWPEDIDO;

create view VIEWPEDIDO( CODIGOEMP, CODIGOUNIDADE, TIPOEMPRESA, CODIGOEMPRESA, CODIGOAPLICACAO, CODIGOCATEGORIA, DATAPREVISTA, STATUSPAR, NUMEROPARCELA, SALDO, MOEDA) AS 
   SELECT 
      VNDAPECD.APECD_EMPRESA AS CODIGOEMP,
      VNDAPECD.APECD_UNIDADE AS CODIGOUNIDADE,
      VNDAPECD.APECD_TIPO_CLI AS TIPOEMPRESA,
      VNDAPECD.APECD_CLIENTE AS CODIGOEMPRESA,
      VNDAPEIT.APEIT_APLICACAO AS CODIGOAPLICACAO, 
      GRLAFAVE.AFAVE_DESEMBOLSO AS CODIGOCATEGORIA,
      VNDAPEPC.APEPC_DATA_PREV AS DATAPREVISTA,
      VNDAPEPC.APEPC_STATUS AS STATUSPAR,
      COUNT(*) AS NUMEROPARCELAS,
      SUM((VNDAPEPC.APEPC_QTD_PEDIDA-VNDAPEPC.APEPC_QTD_ENTREGUE)*
          (VNDAPEPC.APEPC_VALOR_ENC-VNDAPEPC.APEPC_VLR_DESCONTO)) AS SALDO,
      VNDAPEPC.APEPC_MOEDA AS MOEDA
   FROM  VNDAPEPC, VNDAPEIT, VNDAPECD, VNDADFIT, GRLAFAVE 
   WHERE VNDAPEPC.APEPC_QTD_PEDIDA <> VNDAPEPC.APEPC_QTD_ENTREGUE AND 
         VNDAPEIT.APEIT_EMPRESA   = VNDAPEPC.APEPC_EMPRESA AND
         VNDAPEIT.APEIT_UNIDADE   = VNDAPEPC.APEPC_UNIDADE AND
         VNDAPEIT.APEIT_PEDIDO    = VNDAPEPC.APEPC_PEDIDO AND 
         VNDAPEIT.APEIT_LINHA     = VNDAPEPC.APEPC_LINHA AND 
         VNDAPEIT.APEIT_EMPRESA   = VNDAPECD.APECD_EMPRESA AND
         VNDAPEIT.APEIT_UNIDADE   = VNDAPECD.APECD_UNIDADE AND
         VNDAPEIT.APEIT_PEDIDO    = VNDAPECD.APECD_PEDIDO AND 
         VNDAPEIT.APEIT_COD_ITEM  = VNDADFIT.ADFIT_COD_ITEM AND
         VNDADFIT.ADFIT_FAM_VENDA = GRLAFAVE.AFAVE_CODIGO AND
         VNDAPEPC.APEPC_STATUS   <> 'C' AND
         VNDAPEPC.APEPC_STATUS   <> 'E' 
   GROUP BY VNDAPECD.APECD_EMPRESA, VNDAPECD.APECD_UNIDADE, VNDAPECD.APECD_TIPO_CLI, VNDAPECD.APECD_CLIENTE, 
         VNDAPEIT.APEIT_APLICACAO, GRLAFAVE.AFAVE_DESEMBOLSO, VNDAPEPC.APEPC_DATA_PREV, VNDAPEPC.APEPC_STATUS,  
         VNDAPEPC.APEPC_MOEDA;

COMMENT ON VIEW VIEWPEDIDO IS "Valor Previsto em Pedidos por Empresa, Unidade, Tipo(C/F/R/T), CodigoEmpresa, Aplicacao, Categoria";