--------------------------------------------------------------------------
-- Play this script in PRUEBAS@VISANY to make it look like DESA@VISMAR
--                                                                      --
-- Please review the script before using it to make sure it won't       --
-- cause any unacceptable data loss.                                    --
--                                                                      --
-- PRUEBAS@VISANY Schema Extracted by User PRUEBAS 
-- DESA@VISMAR Schema Extracted by User DESA 

ALTER TABLE PREPARAMETRO
MODIFY(MULTIMON  DEFAULT 'N');

**VER FORMA
ALTER TABLE PREPARMONEDA
MODIFY(COMPREDONDEO NUMBER(5,2));
**VER FORMA
ALTER TABLE PREPARMONEDA
MODIFY(MULTREDONDEO NUMBER(5,2));

CREATE OR REPLACE FORCE VIEW PREDETLISTAV
(COD_CIA, COD_LISTA_PRECIO, COD_MONEDA, COD_ARTICULO, COSTO, 
 PRECIO_UNITARIO, PORC_UTILIDAD, DESCUENTO, DOCUMENTO)
AS 
select d.cod_cia, l.cod_lista_precio, d.cod_moneda, d.cod_articulo, d.costo,
       d.precio_unitario*(1+PORCENTAJE/100) precio_unitario,
       case when l.porcentaje>0 then porcentaje else 0 end porc_utilidad,
       case when l.porcentaje<0 then -porcentaje else 0 end descuento,
       d.documento
from predetlista d, prelista l
where d.cod_cia=l.cod_cia
  and d.cod_lista_precio=l.lista_madre
  and l.porcentaje is not null
  and not exists (select 1 from predetlista o
                  where o.cod_cia=d.cod_cia
                    and o.cod_lista_precio=l.cod_lista_precio
                    and o.cod_articulo=d.cod_articulo
                    and o.cod_moneda=d.cod_moneda)
union
select d.cod_cia, d.cod_lista_precio, d.cod_moneda, d.cod_articulo, d.costo,
       case when lista_madre is null then
          d.precio_unitario
       else
          nvl(DbPrecios.PrecioBase(d.cod_cia, d.cod_lista_precio, d.cod_articulo, d.cod_moneda),0)*(1+(porc_utilidad-descuento)/100)
       end precio_unitario,
       d.porc_utilidad, d.descuento, d.documento
from predetlista d, prelista l
where d.cod_cia=l.cod_cia
  and d.cod_lista_precio=l.cod_lista_precio;

_