ALTER TABLE LogPrecios ADD OpcionesAct VARCHAR(500)
GO
ALTER TABLE LogPreciosDet ADD EstadoItem INT DEFAULT(0) NOT NULL
GO
ALTER TABLE LogTmPedidos ADD Fecha SMALLDATETIME,FechaVence SMALLDATETIME,IdCliente VARCHAR(16),IdAgencia VARCHAR(16),IdVend VARCHAR(16)
,NomCliente VARCHAR(150),Agencia VARCHAR(150),Vendedor VARCHAR(150)
,Referencia VARCHAR(50),NumOrden VARCHAR(50)
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsLogPrecios]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsLogPrecios]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsLogPreciosDet]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsLogPreciosDet]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryLogPrecios]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryLogPrecios]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryLogPreciosCie]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryLogPreciosCie]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryLogPreciosDet]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryLogPreciosDet]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryLogPreciosDetLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryLogPreciosDetLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryLogPreciosLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryLogPreciosLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpLogPrecios]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpLogPrecios]
GO

SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryLogPreciosCie] @pmFecProg SMALLDATETIME,@pmIdCiaCie CHAR(2)
 AS 
 SELECT LP.IdLog AS NumLog,LP.IdCia AS CdCia,Fecha,Listas,SimbTarif,VrTarifa,BaseTarfa,FecProg,IdCiaCie,Estado
,Item,IdProducto,DescripProd,VrCosto,VrCostPmd,PrecioAnt1,PrecioAnt2,PrecioAnt3
,PrecioAnt4,PrecioAnt5,Precio1,Precio2,Precio3,Precio4,Precio5,IvaInc1,IvaInc2,IvaInc3,IvaInc4,IvaInc5
,TarifIva,BaseMgn1,BaseMgn2,BaseMgn3,BaseMgn4,BaseMgn5,CdMgn1,CdMgn2,CdMgn3,CdMgn4,CdMgn5
,TarifMgn1,TarifMgn2,TarifMgn3,TarifMgn4,TarifMgn5,CdDct1,CdDct2,CdDct3,CdDct4,CdDct5,TarifDct1,TarifDct2,TarifDct3,TarifDct4,TarifDct5
,CdMon1,CdMon2,CdMon3,CdMon4,CdMon5,IdCiaLta,LD.EstadoItem
 FROM LogPrecios AS LP INNER JOIN  LogPreciosDet AS LD ON LP.IdLog=LD.IdLog AND LP.IdCia=LD.IdCia
 WHERE  Tipo='PROGRAMADO' AND FecProg=@pmFecProg AND Estado=0
 AND (IdCiaCie=@pmIdCiaCie OR IdCiaCie=' ' OR IdCiaCie='00' OR IdCiaCie IS NULL)
 ORDER BY LP.IdCia,LP.IdLog,Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryLogPreciosDetLta] @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdCia CHAR(2)=Null
,@pmTipo VARCHAR(10)=Null,@pmEstado INT=Null,@pmIdLogIni INT=Null,@pmIdLogFin INT=Null
 AS 
 SELECT L.IdLog AS Id_log,L.IdCia AS CdCia,Fecha,Tipo,Listas,SimbTarif,VrTarifa,BaseTarfa,FecProg,IdCiaCie,Estado,IdUsuario,Nombre,Observacion,OpcionesAct
--Detalle de actualización
,Item,IdProducto,DescripProd,VrCosto,VrCostPmd,PrecioAnt1,PrecioAnt2,PrecioAnt3
,PrecioAnt4,PrecioAnt5,Precio1,Precio2,Precio3,Precio4,Precio5,IvaInc1,IvaInc2,IvaInc3,IvaInc4,IvaInc5
,TarifIva,BaseMgn1,BaseMgn2,BaseMgn3,BaseMgn4,BaseMgn5,CdMgn1,CdMgn2,CdMgn3,CdMgn4,CdMgn5
,TarifMgn1,TarifMgn2,TarifMgn3,TarifMgn4,TarifMgn5,CdDct1,CdDct2,CdDct3,CdDct4,CdDct5,TarifDct1,TarifDct2,TarifDct3,TarifDct4,TarifDct5
,IdCiaLta,TimeSys,FecUpdate,Sobretasa, ImpGlobal, Soldicom, IvaComb, PrecioRef,CostoRec --CdMon1,CdMon2,CdMon3,CdMon4,CdMon5
 FROM LogPrecios AS L INNER JOIN LogPreciosDet AS D ON L.IdLog=D.IdLog AND L.IdCia=D.IdCia
 WHERE Fecha BETWEEN @pmFechaIni  AND @pmFechaFin AND L.IdCia LIKE ISNULL(@pmIdCia,'%%')
 AND Tipo LIKE ISNULL(@pmTipo,'%')  
 AND (Estado>=ISNULL(@pmEstado,-1)  AND Estado<=ISNULL(@pmEstado,2147483647))
 AND L.IdLog BETWEEN  ISNULL(@pmIdLogIni,0)  AND ISNULL(@pmIdLogFin,2147483647)
 ORDER BY L.IdCia,L.IdLog,Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsLogPreciosDet] @pmIdLog INT,@pmIdCia CHAR(2),@pmItem INT,@pmIdProducto VARCHAR(16),@pmDescripProd VARCHAR(150),@pmVrCosto MONEY,@pmVrCostPmd MONEY,@pmPrecioAnt1 MONEY,@pmPrecioAnt2 MONEY
,@pmPrecioAnt3 MONEY,@pmPrecioAnt4 MONEY,@pmPrecioAnt5 MONEY,@pmPrecio1 MONEY,@pmPrecio2 MONEY,@pmPrecio3 MONEY,@pmPrecio4 MONEY,@pmPrecio5 MONEY,@pmIvaInc1 BIT,@pmIvaInc2 BIT,@pmIvaInc3 BIT,@pmIvaInc4 BIT
,@pmIvaInc5 BIT,@pmTarifIva DECIMAL(14,4),@pmBaseMgn1 CHAR(1),@pmBaseMgn2 CHAR(1),@pmBaseMgn3 CHAR(1),@pmBaseMgn4 CHAR(1),@pmBaseMgn5 CHAR(1),@pmCdMgn1 VARCHAR(4),@pmCdMgn2 VARCHAR(4),@pmCdMgn3 VARCHAR(4)
,@pmCdMgn4 VARCHAR(4),@pmCdMgn5 VARCHAR(4),@pmTarifMgn1 DECIMAL(14,4),@pmTarifMgn2 DECIMAL(14,4),@pmTarifMgn3 DECIMAL(14,4),@pmTarifMgn4 DECIMAL(14,4),@pmTarifMgn5 DECIMAL(14,4),@pmCdDct1 VARCHAR(4),@pmCdDct2 VARCHAR(4)
,@pmCdDct3 VARCHAR(4),@pmCdDct4 VARCHAR(4),@pmCdDct5 VARCHAR(4),@pmTarifDct1 DECIMAL(14,4),@pmTarifDct2 DECIMAL(14,4),@pmTarifDct3 DECIMAL(14,4),@pmTarifDct4 DECIMAL(14,4),@pmTarifDct5 DECIMAL(14,4)
,@pmCdMon1 VARCHAR(5),@pmCdMon2 VARCHAR(5),@pmCdMon3 VARCHAR(5),@pmCdMon4 VARCHAR(5),@pmCdMon5 VARCHAR(5),@pmIdCiaLta CHAR(2),@pmSobretasa DECIMAL(14,4),@pmImpGlobal DECIMAL(14,4),@pmSoldicom DECIMAL(14,4)
,@pmIvaComb DECIMAL(14,4),@pmPrecioRef DECIMAL(14,4),@pmCostoRec DECIMAL(14,4),@pmEstadoItem INT
 AS 
 INSERT INTO LogPreciosDet (IdLog,IdCia,Item,IdProducto,DescripProd,VrCosto,VrCostPmd,PrecioAnt1,PrecioAnt2,PrecioAnt3,PrecioAnt4,PrecioAnt5,Precio1,Precio2,Precio3,Precio4,Precio5,IvaInc1,IvaInc2,IvaInc3,IvaInc4,IvaInc5,TarifIva,BaseMgn1,BaseMgn2,BaseMgn3
,BaseMgn4,BaseMgn5,CdMgn1,CdMgn2,CdMgn3,CdMgn4,CdMgn5,TarifMgn1,TarifMgn2,TarifMgn3,TarifMgn4,TarifMgn5,CdDct1,CdDct2,CdDct3,CdDct4,CdDct5,TarifDct1,TarifDct2,TarifDct3,TarifDct4,TarifDct5
,CdMon1,CdMon2,CdMon3,CdMon4,CdMon5,IdCiaLta,Sobretasa, ImpGlobal, Soldicom, IvaComb, PrecioRef, CostoRec,EstadoItem)
 VALUES (@pmIdLog,@pmIdCia,@pmItem,@pmIdProducto,@pmDescripProd,@pmVrCosto,@pmVrCostPmd,@pmPrecioAnt1,@pmPrecioAnt2,@pmPrecioAnt3,@pmPrecioAnt4,@pmPrecioAnt5,@pmPrecio1,@pmPrecio2,@pmPrecio3,@pmPrecio4,@pmPrecio5
,@pmIvaInc1,@pmIvaInc2,@pmIvaInc3,@pmIvaInc4,@pmIvaInc5,@pmTarifIva,@pmBaseMgn1,@pmBaseMgn2,@pmBaseMgn3,@pmBaseMgn4,@pmBaseMgn5,@pmCdMgn1,@pmCdMgn2,@pmCdMgn3,@pmCdMgn4,@pmCdMgn5,@pmTarifMgn1,@pmTarifMgn2
,@pmTarifMgn3,@pmTarifMgn4,@pmTarifMgn5,@pmCdDct1,@pmCdDct2,@pmCdDct3,@pmCdDct4,@pmCdDct5,@pmTarifDct1,@pmTarifDct2,@pmTarifDct3,@pmTarifDct4,@pmTarifDct5,@pmCdMon1,@pmCdMon2,@pmCdMon3,@pmCdMon4,@pmCdMon5,@pmIdCiaLta
,@pmSobretasa, @pmImpGlobal, @pmSoldicom, @pmIvaComb, @pmPrecioRef,@pmCostoRec,@pmEstadoItem)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryLogPreciosDet] @pmIdLog INT,@pmIdCia CHAR(2),@pmItem INT
 AS 
 SELECT IdLog,IdCia,Item,IdProducto,DescripProd,VrCosto,VrCostPmd,PrecioAnt1,PrecioAnt2,PrecioAnt3
,PrecioAnt4,PrecioAnt5,Precio1,Precio2,Precio3,Precio4,Precio5,IvaInc1,IvaInc2,IvaInc3,IvaInc4,IvaInc5
,TarifIva,BaseMgn1,BaseMgn2,BaseMgn3,BaseMgn4,BaseMgn5,CdMgn1,CdMgn2,CdMgn3,CdMgn4,CdMgn5
,TarifMgn1,TarifMgn2,TarifMgn3,TarifMgn4,TarifMgn5,CdDct1,CdDct2,CdDct3,CdDct4,CdDct5,TarifDct1,TarifDct2,TarifDct3,TarifDct4,TarifDct5
,CdMon1,CdMon2,CdMon3,CdMon4,CdMon5,IdCiaLta,Sobretasa, ImpGlobal, Soldicom, IvaComb, PrecioRef, CostoRec,EstadoItem
 FROM LogPreciosDet
 WHERE IdLog=@pmIdLog AND IdCia=@pmIdCia 
 AND (Item>=ISNULL(@pmItem,0)  AND Item<=ISNULL(@pmItem,2147483647))
 ORDER BY Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryLogPreciosLta] @pmTipo VARCHAR(10)=Null,@pmIdCia CHAR(2)=Null
,@pmEstado INT=Null,@pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null
 AS 
 SELECT IdLog,IdCia,Fecha,Tipo,Listas,SimbTarif,VrTarifa,BaseTarfa,FecProg,IdCiaCie,Estado
,TimeSys,FecUpdate,IdUsuario,Nombre,Observacion,OpcionesAct
 FROM LogPrecios
 WHERE Tipo LIKE ISNULL(@pmTipo,'%')  AND IdCia LIKE ISNULL(@pmIdCia,'%%')
 AND (Estado>=ISNULL(@pmEstado,-1)  AND Estado<=ISNULL(@pmEstado,2147483647))
 AND (Fecha>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND Fecha<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME)))
 ORDER BY IdCia,IdLog
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsLogPrecios] @pmIdLog INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmTipo VARCHAR(10),@pmListas VARCHAR(10),@pmSimbTarif CHAR(1)
,@pmVrTarifa DECIMAL(14,4),@pmBaseTarfa VARCHAR(10),@pmFecProg SMALLDATETIME,@pmIdCiaCie CHAR(2),@pmEstado INT,@pmIdUsuario VARCHAR(11),@pmNombre VARCHAR(50)
,@pmObservacion VARCHAR(250),@pmOpcionesAct VARCHAR(500),@pmTimeSys SMALLDATETIME
 AS 
 INSERT INTO LogPrecios (IdLog,IdCia,Fecha,Tipo,Listas,SimbTarif,VrTarifa,BaseTarfa,FecProg,IdCiaCie,Estado,TimeSys,IdUsuario,Nombre,Observacion,OpcionesAct)
 VALUES (@pmIdLog,@pmIdCia,@pmFecha,@pmTipo,@pmListas,@pmSimbTarif,@pmVrTarifa,@pmBaseTarfa,@pmFecProg,@pmIdCiaCie,@pmEstado
,@pmTimeSys,@pmIdUsuario,@pmNombre,@pmObservacion,@pmOpcionesAct)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpLogPrecios] @pmIdLog INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmTipo VARCHAR(10),@pmListas VARCHAR(10),@pmSimbTarif CHAR(1),@pmVrTarifa DECIMAL(14,4)
,@pmBaseTarfa VARCHAR(10),@pmFecProg SMALLDATETIME,@pmIdCiaCie CHAR(2),@pmEstado INT,@pmIdUsuario VARCHAR(11),@pmNombre VARCHAR(50),@pmObservacion VARCHAR(250),@pmOpcionesAct VARCHAR(500),@pmFecUpdate SMALLDATETIME
 AS 
 UPDATE LogPrecios SET Fecha=@pmFecha,Tipo=@pmTipo,Listas=@pmListas,SimbTarif=@pmSimbTarif,VrTarifa=@pmVrTarifa,FecProg=@pmFecProg,IdCiaCie=@pmIdCiaCie
,Estado=@pmEstado,IdUsuario=@pmIdUsuario,Nombre=@pmNombre,Observacion=@pmObservacion,BaseTarfa=@pmBaseTarfa,OpcionesAct=@pmOpcionesAct,FecUpdate=@pmFecUpdate
 WHERE IdLog=@pmIdLog AND IdCia=@pmIdCia
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryLogPrecios] @pmIdLog INT,@pmIdCia CHAR(2)
 AS 
 SELECT IdLog,IdCia,Fecha,Tipo,Listas,SimbTarif,VrTarifa,BaseTarfa,FecProg,IdCiaCie,Estado
,TimeSys,FecUpdate,IdUsuario,Nombre,Observacion,OpcionesAct
 FROM LogPrecios
 WHERE IdLog=@pmIdLog AND IdCia=@pmIdCia
GO