ALTER TABLE Trn_TraFletes ADD IncOtroPago BIT DEFAULT(0) NOT NULL
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTraFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryTraFletes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTraFletesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryTraFletesLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTraFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpTraFletes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTraFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsTraFletes]
GO


SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTraFletesLta] @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME
 AS 
 SELECT T.Id,T.IdConcepto,C.Concepto,T.FechaInicio,T.FechaFinal,T.Importe,T.TipoTarif,T.TipoRuta,T.CdRuta,R.Ruta,R.Distkmt
,T.CdCiuOrigen,LO.Localidad AS CiuOrigen,LO.IdDep AS CdDepOri,DPO.Departamento AS DptoOrigen
,T.CdCiuDestino,LD.Localidad AS CiuDestino,LD.IdDep AS CdDepDest,DPD.Departamento AS DptoDestino
,T.CdTipoVeh,TipoVehiculo,T.TipoAfilVeh,T.Id_Vehiculo,T.NitCliente,NC.RazonSocial AS NomCliente,T.Estado_Mcia,T.IncOtroPago,T.EsDeduccion,T.EsDescuento,T.TarifDcto,T.FecInicioDcto,T.FecFinalDcto
,T.Observacion,T.Inactivo,T.FechaCrea,T.FechaAct,T.IdUsuario,Usuario
 FROM Trn_TraFletes AS T INNER JOIN TraConcPago AS C ON T.IdConcepto=C.IdConcepto
 INNER JOIN adm_Usuarios AS U ON T.IdUsuario=U.IdUsuario
 LEFT JOIN Rutas AS R ON T.CdRuta=R.IdRuta
 LEFT JOIN Localidades AS LO ON T.CdCiuOrigen=LO.IdLocal LEFT JOIN Departamentos AS DPO ON LO.IdDep=DPO.IdDep
 LEFT JOIN Localidades AS LD ON T.CdCiuDestino=LD.IdLocal LEFT JOIN Departamentos AS DPD ON LD.IdDep=DPD.IdDep
 LEFT JOIN Terceros AS NC ON T.NitCliente=NC.IdTercero LEFT JOIN TiposVeh AS TV ON T.CdTipoVeh=TV.IdTipoVeh
 WHERE T.FechaInicio BETWEEN @pmFechaIni AND @pmFechaFin
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsTraFletes] @pmIdConcepto VARCHAR(4),@pmFechaInicio SMALLDATETIME,@pmFechaFinal SMALLDATETIME,@pmImporte MONEY,@pmTipoTarif CHAR(1),@pmTipoRuta VARCHAR(10),@pmCdRuta VARCHAR(4),@pmCdCiuOrigen VARCHAR(8),@pmCdCiuDestino VARCHAR(8),@pmCdTipoVeh VARCHAR(4),@pmTipoAfilVeh VARCHAR(10),@pmId_Vehiculo VARCHAR(10),@pmNitCliente VARCHAR(16),@pmEstado_Mcia VARCHAR(20),@pmEsDeduccion BIT,@pmEsDescuento BIT
,@pmTarifDcto DECIMAL(14,4),@pmFecInicioDcto SMALLDATETIME,@pmFecFinalDcto SMALLDATETIME,@pmObservacion VARCHAR(500),@pmInactivo BIT,@pmIncOtroPago BIT,@pmFechaCrea SMALLDATETIME,@pmIdUsuario VARCHAR(11)
 AS 
 INSERT INTO Trn_TraFletes (IdConcepto,FechaInicio,FechaFinal,Importe,TipoTarif,TipoRuta,CdRuta,CdCiuOrigen,CdCiuDestino,CdTipoVeh,TipoAfilVeh,Id_Vehiculo,NitCliente,Estado_Mcia,IncOtroPago,EsDeduccion,EsDescuento,TarifDcto,FecInicioDcto,FecFinalDcto,Observacion,Inactivo,FechaCrea,IdUsuario)
 VALUES (@pmIdConcepto,@pmFechaInicio,@pmFechaFinal,@pmImporte,@pmTipoTarif,@pmTipoRuta,@pmCdRuta,@pmCdCiuOrigen,@pmCdCiuDestino,@pmCdTipoVeh,@pmTipoAfilVeh,@pmId_Vehiculo,@pmNitCliente,@pmEstado_Mcia,@pmIncOtroPago,@pmEsDeduccion,@pmEsDescuento,@pmTarifDcto,@pmFecInicioDcto,@pmFecFinalDcto,@pmObservacion,@pmInactivo,@pmFechaCrea,@pmIdUsuario)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpTraFletes] @pmId INT,@pmIdConcepto VARCHAR(4),@pmFechaInicio SMALLDATETIME,@pmFechaFinal SMALLDATETIME,@pmImporte MONEY,@pmTipoTarif CHAR(1),@pmTipoRuta VARCHAR(10),@pmCdRuta VARCHAR(4),@pmCdCiuOrigen VARCHAR(8),@pmCdCiuDestino VARCHAR(8),@pmCdTipoVeh VARCHAR(4),@pmTipoAfilVeh VARCHAR(10),@pmId_Vehiculo VARCHAR(10),@pmNitCliente VARCHAR(16),@pmEstado_Mcia VARCHAR(20),@pmEsDeduccion BIT,@pmEsDescuento BIT
,@pmTarifDcto DECIMAL(14,4),@pmFecInicioDcto SMALLDATETIME,@pmFecFinalDcto SMALLDATETIME,@pmObservacion VARCHAR(500),@pmInactivo BIT,@pmIncOtroPago BIT,@pmFechaAct SMALLDATETIME
 AS 
 UPDATE Trn_TraFletes SET IdConcepto=@pmIdConcepto,FechaInicio=@pmFechaInicio,FechaFinal=@pmFechaFinal,Importe=@pmImporte,TipoTarif=@pmTipoTarif,TipoRuta=@pmTipoRuta,CdRuta=@pmCdRuta,CdCiuOrigen=@pmCdCiuOrigen,CdCiuDestino=@pmCdCiuDestino,CdTipoVeh=@pmCdTipoVeh,TipoAfilVeh=@pmTipoAfilVeh,Id_Vehiculo=@pmId_Vehiculo,NitCliente=@pmNitCliente,Estado_Mcia=@pmEstado_Mcia,EsDeduccion=@pmEsDeduccion,EsDescuento=@pmEsDescuento,TarifDcto=@pmTarifDcto,FecInicioDcto=@pmFecInicioDcto,FecFinalDcto=@pmFecFinalDcto
,Observacion=@pmObservacion,Inactivo=@pmInactivo,FechaAct=@pmFechaAct,IncOtroPago=@pmIncOtroPago
 WHERE [Id]=@pmId
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTraFletes] @pmId INT
 AS 
 SELECT [Id],IdConcepto,FechaInicio,FechaFinal,Importe,TipoTarif,TipoRuta,CdRuta,CdCiuOrigen,CdCiuDestino,CdTipoVeh,TipoAfilVeh,Id_Vehiculo,NitCliente,Estado_Mcia,IncOtroPago,EsDeduccion,EsDescuento,TarifDcto,FecInicioDcto,FecFinalDcto,Observacion,Inactivo,FechaCrea,FechaAct,IdUsuario
 FROM Trn_TraFletes
 WHERE [Id]=@pmId
GO
