if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelAlmBodegas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelAlmBodegas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelCausaVales]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelCausaVales] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelDevFvc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelDevFvc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelGruposMcia]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelGruposMcia] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelMercancias]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelMercancias] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelRangosPeso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelRangosPeso] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTarifasFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelTarifasFletes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTiposCarga]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelTiposCarga] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTiposCnd]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelTiposCnd] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTiposEsc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelTiposEsc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelTiposPcnto]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paDelTiposPcnto] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfAmtDetalle]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsAfAmtDetalle] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAlmBodegas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsAlmBodegas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsCausaVales]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsCausaVales] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsDevFvc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsDevFvc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsDiferidos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsDiferidos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsGruposMcia]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsGruposMcia] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMercancias]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsMercancias] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsRangosPeso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsRangosPeso] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTarifasFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsTarifasFletes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTiposCarga]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsTiposCarga] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTiposCnd]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsTiposCnd] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTiposEsc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsTiposEsc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTiposPcnto]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsTiposPcnto] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfAmt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_AfAmt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfAmt_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_AfAmt_Sel] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_EstCueCte_Dfv]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_EstCueCte_Dfv] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_EstCueCte_Fvc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_EstCueCte_Fvc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_EVcauDFV]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_EVcauDFV] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_vence_Fvc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_vence_Fvc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfAmortizaLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryAfAmortizaLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfAmortizaRes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryAfAmortizaRes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAlmBodegas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryAlmBodegas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryCausacVenceEvo]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryCausacVenceEvo] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryCausaVales]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryCausaVales] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryCausaValesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryCausaValesLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryCausaVales_Cr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryCausaVales_Cr] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDevFvc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDevFvc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDevFvc_Cr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDevFvc_Cr] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDevFvcDoc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDevFvcDoc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDevFvcLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDevFvcLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDevFvcNMes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDevFvcNMes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDevFvcVFec]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDevFvcVFec] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDiferidos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDiferidos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDiferidosAmt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDiferidosAmt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDiferidosHis]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDiferidosHis] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryDiferidosLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryDiferidosLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryGruposMcia]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryGruposMcia] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMercancias]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryMercancias] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMercanciasLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryMercanciasLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRangosPeso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryRangosPeso] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTarifasFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTarifasFletes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTarifasFletesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTarifasFletesLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTiposCarga]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTiposCarga] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTiposCnd]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTiposCnd] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTiposDocKar]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTiposDocKar] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTiposEsc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTiposEsc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTiposPcnto]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryTiposPcnto] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfAmtLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQrytm_AfAmtLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_KdexSub]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQrytm_KdexSub] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_MovVentasAes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQrytm_MovVentasAes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_vence_Ed]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQrytm_vence_Ed] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryValesRutas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryValesRutas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryValesRutas_Cr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryValesRutas_Cr] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehiculosMayPol]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryVehiculosMayPol] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpAlmBodegas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpAlmBodegas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpCausaVales]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpCausaVales] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpCausaValesAnu]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpCausaValesAnu] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpDevFvc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpDevFvc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpDiferidos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpDiferidos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpGruposMcia]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpGruposMcia] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMercancias]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpMercancias] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpRangosPeso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpRangosPeso] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTarifasFletes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpTarifasFletes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTiposCarga]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpTiposCarga] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTiposCnd]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpTiposCnd] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTiposEsc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpTiposEsc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTiposPcnto]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paUpTiposPcnto] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_CxCobrar]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_CxCobrar] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_CxCobrar_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInstm_CxCobrar_Sel] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsVencimientos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paInsVencimientos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVencimientos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryVencimientos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVencimientos_Crd]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryVencimientos_Crd] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVencimientosDoc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryVencimientosDoc] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_CxCobrar]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQrytm_CxCobrar] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVencAbonosLrc]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[paQryVencAbonosLrc] GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelAlmBodegas @pmIdBodega VARCHAR(4) AS DELETE FROM AlmBodegas WHERE IdBodega=@pmIdBodega GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paDelCausaVales @pmTipDoc VARCHAR(3),@pmDocumento INT,@pmIdCia CHAR(2) AS DELETE FROM Trn_CausaVales WHERE TipDoc=@pmTipDoc AND Documento=@pmDocumento AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelDevFvc @pmTipDev VARCHAR(3),@pmDevolucion INT,@pmIdCia CHAR(2) AS DELETE FROM Trn_DevFvc WHERE TipDev=@pmTipDev AND Devolucion=@pmDevolucion AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelGruposMcia @pmIdGrupo VARCHAR(10) AS DELETE FROM GruposMcia WHERE IdGrupo=@pmIdGrupo GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelMercancias @pmIdMercancia VARCHAR(16) AS DELETE FROM Mercancias WHERE IdMercancia=@pmIdMercancia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelRangosPeso @pmIdRango VARCHAR(4) AS DELETE FROM RangosPeso WHERE IdRango=@pmIdRango GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paDelTarifasFletes @pmIdOrigen VARCHAR(8),@pmIdDestino VARCHAR(8),@pmItem INT AS DELETE FROM TarifasFletes WHERE IdOrigen=@pmIdOrigen AND IdDestino=@pmIdDestino AND (Item>=ISNULL(@pmItem,0) AND Item<=ISNULL(@pmItem,2147483647)) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelTiposCarga @pmIdTipCarga VARCHAR(4) AS DELETE FROM TiposCarga WHERE IdTipCarga=@pmIdTipCarga GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelTiposCnd @pmIdTipoCon VARCHAR(4) AS DELETE FROM TiposCnd WHERE IdTipoCon=@pmIdTipoCon GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelTiposEsc @pmIdTipoEsc VARCHAR(4) AS DELETE FROM TiposEsc WHERE IdTipoEsc=@pmIdTipoEsc GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paDelTiposPcnto @pmIdTipoPre VARCHAR(4) AS DELETE FROM TiposPcnto WHERE IdTipoPre=@pmIdTipoPre GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInsAfAmtDetalle @pmNumero INT,@pmItem INT,@pmIdDiferido VARCHAR(30),@pmValorTotal MONEY,@pmVrAdiciones MONEY ,@pmVrDisminucion MONEY,@pmVrAcuAjustes MONEY,@pmVrAmortizaHis MONEY,@pmVrAmortizaMes MONEY,@pmVrAjustesInf MONEY ,@pmVrAjustesAmtza MONEY,@pmVrAmtzaHisAcum MONEY,@pmVrAmortizaAcum MONEY,@pmVrAjuAmtzaAcum MONEY,@pmVrCorrMonAcum MONEY ,@pmVrBaseCorrMon MONEY,@pmVrCorrMonDif MONEY,@pmTarifaAju DECIMAL(14,4),@pmIdCia CHAR(2),@pmCdCCosto VARCHAR(16),@pmCdSubCos VARCHAR(16) ,@pmCdDep VARCHAR(4),@pmNitRespons VARCHAR(16),@pmFecInicioAmtza SMALLDATETIME,@pmNPeriodos INT,@pmCuotaGal DECIMAL(14,4),@pmVentaGal DECIMAL(14,4),@pmVrInversion MONEY AS INSERT INTO Trn_AfAmtDetalle (Numero,Item,IdDiferido,ValorTotal,VrAdiciones,VrDisminucion,VrAcuAjustes,VrAmortizaHis,VrAmortizaMes,VrAjustesInf,VrAjustesAmtza ,VrAmtzaHisAcum,VrAmortizaAcum,VrAjuAmtzaAcum,VrCorrMonAcum,VrBaseCorrMon,VrCorrMonDif,TarifaAju,IdCia,CdCCosto,CdSubCos,CdDep,NitRespons,FecInicioAmtza,NPeriodos,CuotaGal,VentaGal,VrInversion) VALUES (@pmNumero,@pmItem,@pmIdDiferido,@pmValorTotal,@pmVrAdiciones,@pmVrDisminucion,@pmVrAcuAjustes,@pmVrAmortizaHis,@pmVrAmortizaMes ,@pmVrAjustesInf,@pmVrAjustesAmtza,@pmVrAmtzaHisAcum,@pmVrAmortizaAcum,@pmVrAjuAmtzaAcum,@pmVrCorrMonAcum,@pmVrBaseCorrMon,@pmVrCorrMonDif,@pmTarifaAju ,@pmIdCia,@pmCdCCosto,@pmCdSubCos,@pmCdDep,@pmNitRespons,@pmFecInicioAmtza,@pmNPeriodos,@pmCuotaGal,@pmVentaGal ,@pmVrInversion) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsAlmBodegas @pmIdBodega VARCHAR(4),@pmBodega VARCHAR(100),@pmDireccion VARCHAR(100),@pmTelBodega VARCHAR(50),@pmInactivo BIT AS INSERT INTO AlmBodegas (IdBodega,Bodega,Direccion,TelBodega,Inactivo) VALUES (@pmIdBodega,@pmBodega,@pmDireccion,@pmTelBodega,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInsCausaVales @pmTipDoc VARCHAR(3),@pmDocumento INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmIdConcepto VARCHAR(4),@pmIdCliente VARCHAR(16),@pmIdAgencia VARCHAR(16),@pmFechaVence SMALLDATETIME,@pmVrSubTotal MONEY,@pmVrDescuento MONEY,@pmVrImpuesto MONEY,@pmVrRetencion MONEY,@pmVrReteICA MONEY ,@pmVrReteIVA MONEY,@pmVrCargos MONEY,@pmVrOtrDcto MONEY,@pmVrCostos MONEY,@pmVrNeto MONEY,@pmBaseImp MONEY,@pmBaseRet MONEY,@pmBaseIca MONEY,@pmTarifaIva DECIMAL(14,4),@pmTarifaRet DECIMAL(14,4),@pmTarifaIca DECIMAL(14,4),@pmCodTarIva VARCHAR(4),@pmCodTarRet VARCHAR(4),@pmCodTarIca VARCHAR(4),@pmIdVend VARCHAR(16) ,@pmTarifaCom DECIMAL(14,4),@pmCodTarCom VARCHAR(4),@pmTipCom VARCHAR(3),@pmComprobante INT,@pmIdCiaCom CHAR(2),@pmAnulado BIT,@pmNumDev INT,@pmFecDev SMALLDATETIME,@pmObservacion VARCHAR(250),@pmIdEstado VARCHAR(4),@pmOrigenAdd VARCHAR(10),@pmTimeSys SMALLDATETIME,@pmIdCiaCrea CHAR(2),@pmIdUsuario VARCHAR(11) AS INSERT INTO Trn_CausaVales (TipDoc,Documento,IdCia,Fecha,IdConcepto,IdCliente,IdAgencia,FechaVence,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca,TarifaIva,TarifaRet,TarifaIca,CodTarIva,CodTarRet,CodTarIca,IdVend,TarifaCom,CodTarCom,OrigenAdd,TipCom,Comprobante,IdCiaCom,Anulado ,NumDev,FecDev,Observacion,IdEstado,TimeSys,IdCiaCrea,IdUsuario) VALUES (@pmTipDoc,@pmDocumento,@pmIdCia,@pmFecha,@pmIdConcepto,@pmIdCliente,@pmIdAgencia,@pmFechaVence,@pmVrSubTotal,@pmVrDescuento,@pmVrImpuesto,@pmVrRetencion,@pmVrReteICA,@pmVrReteIVA,@pmVrCargos,@pmVrOtrDcto,@pmVrCostos,@pmVrNeto,@pmBaseImp,@pmBaseRet,@pmBaseIca,@pmTarifaIva,@pmTarifaRet,@pmTarifaIca ,@pmCodTarIva,@pmCodTarRet,@pmCodTarIca,@pmIdVend,@pmTarifaCom,@pmCodTarCom,@pmOrigenAdd,@pmTipCom,@pmComprobante,@pmIdCiaCom,@pmAnulado,@pmNumDev,@pmFecDev,@pmObservacion,@pmIdEstado,@pmTimeSys,@pmIdCiaCrea,@pmIdUsuario) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsDevFvc @pmTipDev VARCHAR(3),@pmDevolucion INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmIdConcepto VARCHAR(4),@pmTipDoc VARCHAR(3),@pmFactura INT,@pmIdCiaDoc CHAR(2),@pmFecDoc SMALLDATETIME,@pmIdCliente VARCHAR(16),@pmIdAgencia VARCHAR(16),@pmVrSubTotal MONEY ,@pmVrDescuento MONEY,@pmVrImpuesto MONEY,@pmVrRetencion MONEY,@pmVrReteICA MONEY,@pmVrReteIVA MONEY,@pmVrCargos MONEY,@pmVrOtrDcto MONEY,@pmVrCostos MONEY,@pmVrNeto MONEY,@pmBaseImp MONEY,@pmBaseRet MONEY,@pmBaseIca MONEY,@pmIdVend VARCHAR(16),@pmTarifaCom DECIMAL(14,4) ,@pmCodTarCom VARCHAR(4),@pmModdDev VARCHAR(10),@pmTipCom VARCHAR(3),@pmComprobante INT,@pmIdCiaCom CHAR(2),@pmObservacion VARCHAR(250),@pmIdEstado VARCHAR(4),@pmOrigenAdd VARCHAR(10),@pmTimeSys SMALLDATETIME,@pmIdCiaCrea CHAR(2),@pmIdUsuario VARCHAR(11) AS INSERT INTO Trn_DevFvc (TipDev,Devolucion,IdCia,Fecha,IdConcepto,TipDoc,Factura,IdCiaDoc,FecDoc,IdCliente,IdAgencia,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca,IdVend,TarifaCom,CodTarCom,ModdDev,TipCom,Comprobante,IdCiaCom,Observacion,IdEstado,OrigenAdd,TimeSys,IdCiaCrea,IdUsuario) VALUES (@pmTipDev,@pmDevolucion,@pmIdCia,@pmFecha,@pmIdConcepto,@pmTipDoc,@pmFactura,@pmIdCiaDoc,@pmFecDoc,@pmIdCliente,@pmIdAgencia,@pmVrSubTotal,@pmVrDescuento,@pmVrImpuesto,@pmVrRetencion,@pmVrReteICA,@pmVrReteIVA,@pmVrCargos,@pmVrOtrDcto,@pmVrCostos,@pmVrNeto,@pmBaseImp,@pmBaseRet,@pmBaseIca,@pmIdVend ,@pmTarifaCom,@pmCodTarCom,@pmModdDev,@pmTipCom,@pmComprobante,@pmIdCiaCom,@pmObservacion,@pmIdEstado,@pmOrigenAdd,@pmTimeSys,@pmIdCiaCrea,@pmIdUsuario) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInsDiferidos @pmIdDiferido VARCHAR(30),@pmNomDiferido VARCHAR(250),@pmIdTipDif VARCHAR(4),@pmIdGrupo VARCHAR(4),@pmIdCCosto VARCHAR(16),@pmIdSubCos VARCHAR(16),@pmIdDep VARCHAR(4) ,@pmIdRespons VARCHAR(16),@pmIdCia CHAR(2),@pmFecInicio SMALLDATETIME,@pmValorTotal MONEY,@pmVrAdiciones MONEY,@pmVrDisminucion MONEY,@pmNumPeriodos INT,@pmFecFinAmtza SMALLDATETIME ,@pmAjustable BIT,@pmContable BIT,@pmVrAjuInfAcum MONEY,@pmVrAmtzaAcuHis MONEY,@pmVrAmtzaAcum MONEY,@pmVrAjuInfAmtza MONEY,@pmCuotasAmtza INT,@pmVrCorrMonDifAcu MONEY ,@pmCorrMonDiferida MONEY,@pmNumMesesDif INT,@pmFecUltAmtza SMALLDATETIME,@pmCueEnGrupo BIT,@pmIdCuenta VARCHAR(16),@pmIdCueAmortiza VARCHAR(16),@pmIdCueAjuDif VARCHAR(16),@pmIdCueCorrDif VARCHAR(16) ,@pmIdCueAjuAmtza VARCHAR(16),@pmIdCueCorrAA VARCHAR(16),@pmNumDoc VARCHAR(20),@pmReferencia VARCHAR(50),@pmDesUbicacion VARCHAR(150),@pmIdEstado VARCHAR(4),@pmFecRetiro SMALLDATETIME ,@pmIdCausal VARCHAR(4),@pmComentRetiro VARCHAR(250),@pmComentarios VARCHAR(250),@pmTipoAmtza CHAR(1),@pmNitCliente VARCHAR(16),@pmAgenCliente VARCHAR(16),@pmCantGalones DECIMAL (14,4),@pmIdProv VARCHAR(16) ,@pmFecCreacion SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO Diferidos (IdDiferido,NomDiferido,IdTipDif,IdGrupo,IdCCosto,IdSubCos,IdDep,IdRespons,IdCia,FecInicio,ValorTotal,VrAdiciones,VrDisminucion,NumPeriodos,FecFinAmtza,Ajustable,Contable,VrAjuInfAcum,VrAmtzaAcuHis,VrAmtzaAcum ,VrAjuInfAmtza,CuotasAmtza,VrCorrMonDifAcu,CorrMonDiferida,NumMesesDif,FecUltAmtza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA,NumDoc,Referencia,DesUbicacion,IdEstado,FecRetiro,IdCausal ,ComentRetiro,Comentarios,FecCreacion,IdUsuario,TipoAmtza,NitCliente,AgenCliente,CantGalones,IdProv) VALUES (@pmIdDiferido,@pmNomDiferido,@pmIdTipDif,@pmIdGrupo,@pmIdCCosto,@pmIdSubCos,@pmIdDep,@pmIdRespons,@pmIdCia,@pmFecInicio,@pmValorTotal,@pmVrAdiciones,@pmVrDisminucion,@pmNumPeriodos ,@pmFecFinAmtza,@pmAjustable,@pmContable,@pmVrAjuInfAcum,@pmVrAmtzaAcuHis,@pmVrAmtzaAcum,@pmVrAjuInfAmtza,@pmCuotasAmtza,@pmVrCorrMonDifAcu,@pmCorrMonDiferida,@pmNumMesesDif ,@pmFecUltAmtza,@pmCueEnGrupo,@pmIdCuenta,@pmIdCueAmortiza,@pmIdCueAjuDif,@pmIdCueCorrDif,@pmIdCueAjuAmtza,@pmIdCueCorrAA,@pmNumDoc,@pmReferencia,@pmDesUbicacion,@pmIdEstado,@pmFecRetiro,@pmIdCausal ,@pmComentRetiro,@pmComentarios,@pmFecCreacion,@pmIdUsuario,@pmTipoAmtza,@pmNitCliente,@pmAgenCliente,@pmCantGalones,@pmIdProv) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsGruposMcia @pmIdGrupo VARCHAR(10),@pmGrupoMcia VARCHAR(250),@pmInactivo BIT AS INSERT INTO GruposMcia (IdGrupo,GrupoMcia,Inactivo) VALUES (@pmIdGrupo,@pmGrupoMcia,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsMercancias @pmIdMercancia VARCHAR(16),@pmDescripMcia VARCHAR(150),@pmCodigoMcia VARCHAR(16),@pmIdGrupo VARCHAR(10),@pmUndMed VARCHAR(10) ,@pmIdUnd VARCHAR(4),@pmIdNat VARCHAR(4),@pmIdMnjo VARCHAR(4),@pmIdTmcia VARCHAR(4),@pmContenedor BIT,@pmIdProducto VARCHAR(16),@pmIdEstado VARCHAR(4),@pmInactivo BIT ,@pmFechaAdd SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO Mercancias (IdMercancia,DescripMcia,CodigoMcia,IdGrupo,UndMed,IdUnd,IdNat,IdMnjo,IdTmcia,Contenedor,IdProducto,IdEstado,Inactivo,FechaAdd,IdUsuario) VALUES (@pmIdMercancia,@pmDescripMcia,@pmCodigoMcia,@pmIdGrupo,@pmUndMed,@pmIdUnd,@pmIdNat,@pmIdMnjo,@pmIdTmcia,@pmContenedor,@pmIdProducto ,@pmIdEstado,@pmInactivo,@pmFechaAdd,@pmIdUsuario) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsRangosPeso @pmIdRango VARCHAR(4),@pmDescripRango VARCHAR(50) ,@pmValorInicial DECIMAL(14,4),@pmValorFinal DECIMAL(14,4),@pmInactivo BIT AS INSERT INTO RangosPeso (IdRango,DescripRango,ValorInicial,ValorFinal,Inactivo) VALUES (@pmIdRango,@pmDescripRango,@pmValorInicial,@pmValorFinal,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInsTarifasFletes @pmIdOrigen VARCHAR(8),@pmIdDestino VARCHAR(8),@pmItem INT,@pmTipoTarifa VARCHAR(10),@pmTarifClie MONEY,@pmTarifPago MONEY ,@pmTarifTabla MONEY,@pmIdMneda VARCHAR(5),@pmUndMed VARCHAR(10),@pmNitCliente VARCHAR(16),@pmCdNat VARCHAR(4),@pmCdTipoVeh VARCHAR(4) ,@pmCdRango VARCHAR(4),@pmInactivo BIT,@pmFechaCrea SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO TarifasFletes (IdOrigen,IdDestino,Item,TipoTarifa,TarifClie,TarifPago,TarifTabla,IdMneda,UndMed,NitCliente,CdNat,CdTipoVeh,CdRango,Inactivo,FechaCrea,IdUsuario) VALUES (@pmIdOrigen,@pmIdDestino,@pmItem,@pmTipoTarifa,@pmTarifClie,@pmTarifPago,@pmTarifTabla,@pmIdMneda,@pmUndMed,@pmNitCliente ,@pmCdNat,@pmCdTipoVeh,@pmCdRango,@pmInactivo,@pmFechaCrea,@pmIdUsuario) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsTiposCarga @pmIdTipCarga VARCHAR(4),@pmTipoCarga VARCHAR(50),@pmInactivo BIT AS INSERT INTO TiposCarga (IdTipCarga,TipoCarga,Inactivo) VALUES (@pmIdTipCarga,@pmTipoCarga,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsTiposCnd @pmIdTipoCon VARCHAR(4),@pmTipoContndor VARCHAR(50),@pmInactivo BIT AS INSERT INTO TiposCnd (IdTipoCon,TipoContndor,Inactivo) VALUES (@pmIdTipoCon,@pmTipoContndor,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsTiposEsc @pmIdTipoEsc VARCHAR(4),@pmTipoEscolta VARCHAR(50),@pmInactivo BIT AS INSERT INTO TiposEsc (IdTipoEsc,TipoEscolta,Inactivo) VALUES (@pmIdTipoEsc,@pmTipoEscolta,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paInsTiposPcnto @pmIdTipoPre VARCHAR(4),@pmPrecinto VARCHAR(50),@pmInactivo BIT AS INSERT INTO TiposPcnto (IdTipoPre,Precinto,Inactivo) VALUES (@pmIdTipoPre,@pmPrecinto,@pmInactivo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_AfAmt @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmIdDiferido VARCHAR(30),@pmtmCostoIni MONEY,@pmtmAdiciones MONEY,@pmtmDisminucion MONEY,@pmtmAcuAjustes MONEY,@pmtmAmortizaHis MONEY ,@pmtmAmortizaMes MONEY,@pmtmAjustesInf MONEY,@pmtmAjustesAmtza MONEY,@pmtmAmortizaAcum MONEY,@pmtmAjuAmtzaAcum MONEY,@pmtmCorrMonAcum MONEY,@pmtmBaseCorrMon MONEY,@pmtmCorrMonDif MONEY,@pmtmAmtzaHisAcum MONEY,@pmtmTarifa DECIMAL(14,4) ,@pmtmIdCia CHAR(2),@pmtmCdCCosto VARCHAR(16),@pmtmCdSubCos VARCHAR(16),@pmtmCdDep VARCHAR(4),@pmtmNitRespons VARCHAR(16),@pmtmNumPeriodos INT,@pmtmFechaIni SMALLDATETIME,@pmtmEstadoReg INT,@pmtmObservacion VARCHAR(150) ,@pmtmCuota DECIMAL(14,4),@pmtmGalones DECIMAL(14,4),@pmtmNitProvee VARCHAR(16),@pmtmInversion MONEY AS INSERT INTO tm_AfAmt (tmNumero,tmItem,tmIdDiferido,tmCostoIni,tmAdiciones,tmDisminucion,tmAcuAjustes,tmAmortizaHis,tmAmortizaMes,tmAjustesInf,tmAjustesAmtza,tmAmortizaAcum,tmAjuAmtzaAcum,tmCorrMonAcum,tmBaseCorrMon,tmCorrMonDif ,tmAmtzaHisAcum,tmTarifa,tmIdCia,tmCdCCosto,tmCdSubCos,tmCdDep,tmNitRespons,tmNumPeriodos,tmFechaIni,tmEstadoReg,tmObservacion,tmCuota,tmGalones,tmNitProvee,tmInversion) VALUES (@pmtmNumero,@pmtmItem,@pmtmIdDiferido,@pmtmCostoIni,@pmtmAdiciones,@pmtmDisminucion,@pmtmAcuAjustes,@pmtmAmortizaHis,@pmtmAmortizaMes,@pmtmAjustesInf,@pmtmAjustesAmtza,@pmtmAmortizaAcum,@pmtmAjuAmtzaAcum ,@pmtmCorrMonAcum,@pmtmBaseCorrMon,@pmtmCorrMonDif,@pmtmAmtzaHisAcum,@pmtmTarifa,@pmtmIdCia,@pmtmCdCCosto,@pmtmCdSubCos,@pmtmCdDep,@pmtmNitRespons,@pmtmNumPeriodos,@pmtmFechaIni,@pmtmEstadoReg,@pmtmObservacion,@pmtmCuota,@pmtmGalones,@pmtmNitProvee,@pmtmInversion) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_AfAmt_Sel @pmtmNumero VARCHAR(5),@pmNumero INT AS INSERT INTO tm_AfAmt (tmNumero,tmItem,tmIdDiferido,tmCostoIni,tmAdiciones,tmDisminucion,tmAcuAjustes,tmAmortizaHis,tmAmortizaMes,tmAjustesInf,tmAjustesAmtza,tmAmortizaAcum ,tmAjuAmtzaAcum,tmCorrMonAcum,tmBaseCorrMon,tmCorrMonDif,tmAmtzaHisAcum,tmTarifa,tmIdCia,tmCdCCosto,tmCdSubCos,tmCdDep,tmNitRespons,tmNumPeriodos,tmFechaIni ,tmEstadoReg,tmObservacion,tmCuota,tmGalones,tmNitProvee,tmInversion) SELECT @pmtmNumero,Item,DT.IdDiferido,DT.ValorTotal,DT.VrAdiciones,DT.VrDisminucion,VrAcuAjustes,VrAmortizaHis,VrAmortizaMes,VrAjustesInf,VrAjustesAmtza,VrAmortizaAcum,VrAjuAmtzaAcum ,VrCorrMonAcum,VrBaseCorrMon,VrCorrMonDif,VrAmtzaHisAcum,TarifaAju,DT.IdCia,CdCCosto,CdSubCos,CdDep,NitRespons,NPeriodos,FecInicioAmtza,1,'',CuotaGal,VentaGal,IdProv,VrInversion FROM Trn_AfAmtDetalle AS DT INNER JOIN Diferidos AS D ON DT.IdDiferido=D.IdDiferido WHERE Numero=@pmNumero GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_EstCueCte_Dfv @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmtmEst CHAR(2),@pmtmIndTip INT,@pmIdCia CHAR(2)=Null ,@pmIdVehiculo VARCHAR(10)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdClase VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null AS INSERT INTO tm_EstCueCte (tmEst, tmTipDoc, tmDocumento, tmIdCia, tmItem, tmIndTip, tmFecha, tmFecVence, tmValorDebito, tmValorCredito, tmValorAbono, tmIdCliente ,tmIdVehiculo, tmVehPropio, tmIdVendedor, tmComision, tmIdClase,tmIdCargo,tmIdBanco,tmIdAgencia,tmIdConcepto, tmDetalle, tmTipDcm, tmDocDev, tmIdCiaDcm, tmFecDcm, tmIdEstado , tmIdUsuario, tmTimeSys, tmSaldoAnt, tmSaldoAntCla, tmSaldoAntCia, tmSaldoAntDia,tmNuevoSaldo) SELECT @pmtmEst,TipDev, Devolucion,D.IdCia,Item,@pmtmIndTip,Fecha,FecVence,0,ValorFactura,0,D.IdCliente,VC.IdVehiculo,VC.VehPropio,VC.IdVendedor,0,VC.IdClase,IdCargo,'0','0',VC.IdConcepto ,D.Observacion,D.TipDoc, D.Factura, IdCiaDoc, FecDoc,D.IdEstado,D.IdUsuario,TimeSys,0,0,0,0,0 FROM Trn_DevFvc AS D INNER JOIN Trn_CausacVence AS VC ON D.TipDoc=VC.TipDoc AND D.Factura=VC.Documento AND D.IdCiaDoc=VC.IdCia INNER JOIN Vehiculos AS V ON VC.IdVehiculo=V.IdVehiculo WHERE TipDev='DFV' AND Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND D.IdCia LIKE ISNULL(@pmIdCia,'%%') AND VC.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') AND D.IdCliente LIKE ISNULL(@pmIdCliente,'%') AND VC.IdClase LIKE ISNULL(@pmIdClase,'%') AND IdGrupo LIKE ISNULL(@pmIdGrupo,'%') ORDER BY D.IdCia,Devolucion GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_EstCueCte_Fvc @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmtmEst CHAR(2),@pmtmIndTip INT,@pmIdCia CHAR(2)=Null ,@pmIdVehiculo VARCHAR(10)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdClase VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null AS INSERT INTO tm_EstCueCte (tmEst, tmTipDoc, tmDocumento, tmIdCia, tmItem, tmIndTip, tmFecha, tmFecVence, tmValorDebito, tmValorCredito, tmValorAbono, tmIdCliente ,tmIdAgencia, tmIdVehiculo, tmVehPropio, tmIdVendedor, tmComision, tmIdCargo, tmIdClase, tmIdConcepto, tmFecUltPago, tmFactura, tmReferencia,tmDetalle, tmCartulina ,tmIdUsuario,tmIdEstado,tmModalidad,tmCxPagar, tmTimeSys, tmAnulado, tmNumDev, tmFecDev,tmIdBanco, tmSaldoAnt, tmSaldoAntCla, tmSaldoAntCia, tmSaldoAntDia,tmNuevoSaldo) SELECT @pmtmEst,V.TipDoc, V.Documento, V.IdCia, Item,@pmtmIndTip,FecEmision, V.FecVence,ValorFactura,0,ValorAbono,V.IdCliente, V.IdAgencia, V.IdVehiculo,V.VehPropio, IdVendedor, Comision ,IdCargo, V.IdClase, V.IdConcepto,FecUltPago,V.Factura, V.Referencia,Detalle,NotaInt,C.IdUsuario,C.IdEstado,'FVC',0,TimeSys,Anulado,NumDev, FecDev,'0',0,0,0,0,0 FROM Trn_CausacVence AS V INNER JOIN Trn_CausaVales AS C ON V.TipDoc=C.TipDoc AND V.Documento=C.Documento AND V.IdCia=C.IdCia INNER JOIN Vehiculos AS VH ON V.IdVehiculo=VH.IdVehiculo WHERE V.TipDoc='FVC' AND FecEmision BETWEEN @pmFechaIni AND @pmFechaFin AND V.IdCia like ISNULL(@pmIdCia,'%%') AND V.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') AND V.IdCliente LIKE ISNULL(@pmIdCliente,'%') AND V.IdClase LIKE ISNULL(@pmIdClase,'%') AND IdGrupo LIKE ISNULL(@pmIdGrupo,'%') ORDER BY V.TipDoc, V.IdCia,V.Documento GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_EVcauDFV @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmtmEst CHAR(2),@pmIdCia CHAR(2)=Null ,@pmIdVehiculo VARCHAR(10)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdClase VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null,@pmIdAdmon VARCHAR(4)=Null AS INSERT INTO tm_EVcau (tmEst,tmTipo,tmDocmnto,tmIdCia,tmItem,tmFecha,tmGrupo,tmIdCargo,tmIdConcepto,tmValor,tmValorDev,tmVrGastos,tmIdCliente,tmIdVehiculo,tmVehPropio,tmIdConductor,tmModalidad,tmValorTotal,tmGalones,tmVrComb,tmDetalle,tmNumCheque,tmReferencia,tmIdClase,tmAnulado ,tmNumDev,tmFecDev,tmTipDcm,tmDocDev,tmIdCiaDcm,tmFecDcm,tmIdEstado,tmIdUsuario,tmTimeSys) SELECT @pmtmEst,TipDev, Devolucion, D.IdCia,Item+1000,Fecha,VC.TipDoc,IdCargo,D.IdConcepto,0,ValorFactura,(ValorFactura*-1),VC.IdCliente,VC.IdVehiculo,VC.VehPropio,VC.IdVendedor,D.TipDoc,VrSubTotal,0,0,D.Observacion,VC.Factura,VC.Referencia,VC.IdClase,0,0,Null,D.TipDoc,D.Factura,IdCiaDoc, FecDoc,D.IdEstado,D.IdUsuario,TimeSys FROM Trn_DevFvc AS D INNER JOIN Trn_CausacVence AS VC ON D.TipDoc=VC.TipDoc AND D.Factura=VC.Documento AND D.IdCiaDoc=VC.IdCia INNER JOIN Vehiculos AS V ON VC.IdVehiculo=V.IdVehiculo WHERE Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND D.IdCia like ISNULL(@pmIdCia,'%%') AND VC.IdVehiculo like ISNULL(@pmIdVehiculo,'%') AND VC.IdCliente like ISNULL(@pmIdCliente,'%') AND IdGrupo like ISNULL(@pmIdGrupo,'%') AND IdAdmon like ISNULL(@pmIdAdmon,'%') AND VC.IdClase like ISNULL(@pmIdClase,'%') GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_vence_Fvc @pmtmEst CHAR(2), @pmSaldo DECIMAL(14,2),@pmIdCia CHAR(2)=Null ,@pmIdVehiculo VARCHAR(10)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdClase VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null ,@pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null AS INSERT INTO tm_vence (tmEst, tmTipDoc, tmDocumento, tmIdCia, tmItem, tmFecEmision, tmFecVence, tmValorFactura, tmValorAbono, tmIdPropietario , tmIdVehiculo,tmIdAgencia, tmVehPropio, tmIdConductor, tmComision, tmIdCargo, tmIdClase, tmIdConcepto, tmFecUltPago, tmNotaInt, tmFecUltLiquida, tmFactura ,tmReferencia, tmDetalle, tmObservacion, tmModalidad, tmIdEstado, tmIdUsuario, tmTipCom, tmComprobante, tmIdCiaCom, tmTipDcm, tmDocmto ,tmIdCiaDcm, tmTimeSys, tmVencido, tmPorVencer, tmVence1, tmVence2, tmVence3, tmVence4) SELECT @pmtmEst,V.TipDoc, V.Documento, V.IdCia,Item,FecEmision,V.FecVence,ValorFactura,ValorAbono,V.IdCliente, V.IdVehiculo,V.IdAgencia,V.VehPropio, V.IdVendedor ,V.Comision ,V.IdCargo, V.IdClase, V.IdConcepto,FecUltPago,NotaInt,FecUltLiquida,V.Factura, V.Referencia,Detalle,F.Observacion,'FVC',F.IdEstado,F.IdUsuario,TipCom, Comprobante, IdCiaCom ,'FVC',0,'00',TimeSys,0,0,0,0,0,0 FROM Trn_CausacVence AS V INNER JOIN Trn_CausaVales AS F ON V.TipDoc=F.TipDoc AND V.Documento=F.Documento AND V.IdCia=F.IdCia INNER JOIN Vehiculos AS VH ON V.IdVehiculo=VH.IdVehiculo WHERE (ValorFactura-ValorAbono)>@pmSaldo AND V.TipDoc='FVC' AND (FecEmision>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND FecEmision<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME))) AND V.IdCia LIKE ISNULL(@pmIdCia,'%%') AND V.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') AND V.IdCliente LIKE ISNULL(@pmIdCliente,'%') AND V.IdClase LIKE ISNULL(@pmIdClase,'%') AND IdGrupo LIKE ISNULL(@pmIdGrupo,'%') GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryAfAmortizaLta @pmNumeroIni INT,@pmNumeroFin INT AS SELECT AMZ.Numero AS NumRegistro,Fecha,AMZ.Estado AS EstadoDoc,AMZ.IdUsuario AS CdUsuario,Usuario,FechaCrea,AMZ.IdCia AS CdCia,CI.Compania AS NomCia ,Item,D.IdDiferido AS CdDiferido,NomDiferido, D.ValorTotal AS ValorInicial, D.VrAdiciones AS ValAdiciones, D.VrDisminucion AS ValDisminucion, VrAcuAjustes, VrAmortizaHis, VrAmortizaMes, VrAjustesInf , VrAjustesAmtza,VrAmtzaHisAcum, VrAmortizaAcum, VrAjuAmtzaAcum, VrCorrMonAcum, VrBaseCorrMon, VrCorrMonDif, TarifaAju ,D.IdCia AS DetIdCia,CID.Compania AS DetNomCia,CdCCosto,CCosto,CdSubCos,SubCosto, CdDep, Dependencia,NitRespons,RazonSocial,FecInicioAmtza, NPeriodos --datos del diferido ,A.IdTipDif AS CdTipDif,TipoDiferido,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS DifCdCentro,A.IdSubCos AS DifCdSubcentro ,A.IdDep AS DifCdDep,DesUbicacion,IdRespons,A.IdCia AS DifIdCia,FecInicio,A.ValorTotal AS DifValTotal,A.VrAdiciones AS DifValAdiciones,A.VrDisminucion AS DifValDisminuc,A.NumPeriodos AS DifNumMeses ,FecFinAmtza,Ajustable,Contable,A.VrAjuInfAcum AS DifAjusInfAcum,A.VrAmtzaAcuHis AS DifAmtzaAcuHis,VrAmtzaAcum,A.VrAjuInfAmtza AS DifAjuInfAmtza,CuotasAmtza,VrCorrMonDifAcu,CorrMonDiferida,NumMesesDif ,A.FecUltAmtza AS DifFecUltAmza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA,NumDoc,Referencia,A.IdEstado AS CdEstado,ED.Estado AS EstadoDif ,Comentarios,A.FecCreacion AS DifFecCrea,VentaGal,CuotaGal,VrInversion FROM Trn_AfAmortiza AS AMZ INNER JOIN Trn_AfAmtDetalle AS D ON AMZ.Numero=D.Numero INNER JOIN Companias AS CI ON AMZ.IdCia=CI.IdCia INNER JOIN adm_Usuarios AS U ON AMZ.IdUsuario=U.IdUsuario INNER JOIN Diferidos AS A ON D.IdDiferido=A.IdDiferido INNER JOIN AfGrupos AS G ON A.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea INNER JOIN AfTiposDif AS TD ON A.IdTipDif=TD.IdTipDif INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado INNER JOIN Companias AS CID ON D.IdCia=CID.IdCia INNER JOIN CentroCosto AS CC ON D.CdCCosto=CC.IdCCosto INNER JOIN Dependencias AS DP ON D.CdDep=DP.IdDep INNER JOIN Terceros AS T ON D.NitRespons=T.IdTercero LEFT JOIN SubCentros AS SC ON D.CdSubCos=SC.IdSubCos WHERE AMZ.Numero BETWEEN @pmNumeroIni AND @pmNumeroFin GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryAfAmortizaRes @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdLinea VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null ,@pmIdCia CHAR(2)=Null,@pmIdTipDif VARCHAR(4)=Null,@pmIdDep VARCHAR(4)=Null,@pmIdRespons VARCHAR(16)=Null,@pmIdCCosto VARCHAR(16)=Null ,@pmIdDiferido VARCHAR(30) AS SELECT D.IdDiferido AS CdDiferido,NomDiferido,AMZ.Numero AS NumRegistro,Fecha,AMZ.Estado AS EstadoDoc,AMZ.IdUsuario AS CdUsuario,Usuario,FechaCrea,AMZ.IdCia AS CdCia,CI.Compania AS NomCia ,Item,D.ValorTotal AS ValorInicial, D.VrAdiciones AS ValAdiciones, D.VrDisminucion AS ValDisminucion, VrAcuAjustes, VrAmortizaHis, VrAmortizaMes, VrAjustesInf , VrAjustesAmtza,VrAmtzaHisAcum, VrAmortizaAcum, VrAjuAmtzaAcum, VrCorrMonAcum, VrBaseCorrMon, VrCorrMonDif, TarifaAju ,D.IdCia AS DetIdCia,CID.Compania AS DetNomCia,CdCCosto,CCD.CCosto AS NomCentroCosto,CdSubCos,SCD.SubCosto AS NomSubcentro, CdDep, DPD.Dependencia AS NomDepend ,NitRespons,TRD.RazonSocial AS DetResponsable,FecInicioAmtza, NPeriodos,VentaGal,CuotaGal,VrInversion --datos del diferido ,A.IdTipDif AS CdTipDif,TipoDiferido,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro ,CC.CCosto AS DifCentroCosto,A.IdSubCos AS CdSubcentro,SC.SubCosto AS DifSubCentro,A.IdDep AS CdDep,DP.Dependencia AS DifDependencia,DesUbicacion ,IdRespons,T.RazonSocial AS NomResponsable,A.IdCia AS CdCia,CIA.Compania AS DifNomCia,FecInicio,A.ValorTotal AS DifValTotal,A.VrAdiciones AS DifAdiciones,A.VrDisminucion AS DifDisminucion,NumPeriodos ,FecFinAmtza,Ajustable,Contable,VrAjuInfAcum,VrAmtzaAcuHis,VrAmtzaAcum,VrAjuInfAmtza,CuotasAmtza,VrCorrMonDifAcu,CorrMonDiferida,NumMesesDif ,FecUltAmtza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA,NumDoc,Referencia,A.IdEstado AS CdEstado,ED.Estado AS DifEstado ,FecRetiro,A.IdCausal AS CdCausal,Causal,ComentRetiro,Comentarios,FecCreacion,A.IdUsuario AS IdUsuari --DATOS DEL DIFERIDO FROM Trn_AfAmtDetalle AS D INNER JOIN Trn_AfAmortiza AS AMZ ON D.Numero=AMZ.Numero INNER JOIN Companias AS CI ON AMZ.IdCia=CI.IdCia INNER JOIN adm_Usuarios AS U ON AMZ.IdUsuario=U.IdUsuario INNER JOIN Diferidos AS A ON D.IdDiferido=A.IdDiferido INNER JOIN AfGrupos AS G ON A.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea INNER JOIN CentroCosto AS CC ON A.IdCCosto=CC.IdCCosto INNER JOIN AfTiposDif AS TD ON A.IdTipDif=TD.IdTipDif INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS T ON A.IdRespons=T.IdTercero INNER JOIN Companias AS CIA ON A.IdCia=CIA.IdCia INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado INNER JOIN Companias AS CID ON D.IdCia=CID.IdCia INNER JOIN CentroCosto AS CCD ON D.CdCCosto=CCD.IdCCosto INNER JOIN Dependencias AS DPD ON D.CdDep=DPD.IdDep INNER JOIN Terceros AS TRD ON D.NitRespons=TRD.IdTercero LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos LEFT JOIN AfCausales AS CA ON A.IdCausal=CA.IdCausal LEFT JOIN SubCentros AS SCD ON D.CdSubCos=SCD.IdSubCos WHERE Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND AMZ.Estado<>0 AND D.IdDiferido LIKE ISNULL(@pmIdDiferido ,'%') AND AMZ.IdCia LIKE ISNULL(@pmIdCia,'%%') AND G.IdLinea LIKE ISNULL(@pmIdLinea,'%') AND A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND D.CdDep LIKE ISNULL(@pmIdDep,'%') AND D.NitRespons LIKE ISNULL(@pmIdRespons,'%') AND D.CdCCosto LIKE ISNULL(@pmIdCCosto,'%') AND A.IdTipDif LIKE ISNULL(@pmIdTipDif,'%') ORDER BY AMZ.Numero,NomDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryAlmBodegas @pmIdBodega VARCHAR(4) AS IF @pmIdBodega IS NULL SELECT IdBodega,Bodega,Direccion,TelBodega FROM AlmBodegas WHERE Inactivo=0 ORDER BY IdBodega ELSE SELECT IdBodega,Bodega,Direccion,TelBodega,Inactivo FROM AlmBodegas WHERE IdBodega=@pmIdBodega GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryCausacVenceEvo @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdCia CHAR(2)=Null ,@pmIdVehiculo VARCHAR(10)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdClase VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null,@pmIdAdmon VARCHAR(4)=Null --causaciones prestamos y ndb AS SELECT TipDoc,IdCia,IdCliente,VC.IdVehiculo AS PlacaVeh,IdConductor,VC.IdClase AS CodClase,IdConcepto ,SUM(ValorFactura) AS STotal FROM Trn_CausacVence AS VC INNER JOIN Vehiculos AS V ON VC.IdVehiculo=V.IdVehiculo WHERE TipDoc IN ('ND1','PRE','FVC') AND FecEmision BETWEEN @pmFechaIni AND @pmFechaFin AND IdCia LIKE ISNULL(@pmIdCia,'%%') AND VC.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') AND IdCliente LIKE ISNULL(@pmIdCliente,'%') AND VC.IdClase LIKE ISNULL(@pmIdClase,'%') AND IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND IdAdmon LIKE ISNULL(@pmIdAdmon,'%') GROUP BY TipDoc,IdCia,IdCliente,VC.IdVehiculo,IdConductor,VC.IdClase,IdConcepto GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryCausaVales @pmTipDoc VARCHAR(3),@pmDocumento INT,@pmIdCia CHAR(2) AS SELECT TipDoc,Documento,IdCia,Fecha,IdConcepto,IdCliente,IdAgencia,FechaVence,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos ,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca,TarifaIva,TarifaRet,TarifaIca,CodTarIva,CodTarRet,CodTarIca,IdVend,TarifaCom,CodTarCom,OrigenAdd ,TipCom,Comprobante,IdCiaCom,Anulado,NumDev,FecDev,Observacion,IdEstado,TimeSys,FecUpdate,IdCiaCrea,IdUsuario FROM Trn_CausaVales WHERE TipDoc=@pmTipDoc AND Documento=@pmDocumento AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryCausaValesLta @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmDocumentoIni INT=Null, @pmDocumentoFin INT=Null ,@pmIdCia CHAR(2)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdVend VARCHAR(16)=Null AS SELECT TipDoc,Documento,F.IdCia AS CdCia,Compania,Fecha,F.IdConcepto AS CdConcepto,Concepto,IdCliente,T.RazonSocial AS NomCliente,F.IdAgencia AS CdAgencia,Agencia ,FechaVence,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca,TarifaIva,TarifaRet,TarifaIca ,CodTarIva,CodTarRet,CodTarIca,F.IdVend AS CdVend,VN.RazonSocial AS NomVendedor,TarifaCom,CodTarCom,TipCom,TipoCom,Comprobante,IdCiaCom ,Anulado,NumDev,FecDev,F.Observacion AS Observ,F.IdEstado AS CdEstado,Estado,TimeSys,FecUpdate,IdCiaCrea,OrigenAdd,F.IdUsuario AS CdUsuario,Usuario --Información del tercero ,T.TipoId AS TercTipo,T.Dv AS TercDv,T.Codigo AS TercCodigo,T.NomCial AS TercNomCial,T.SiglaRaz AS TercSigal,T.Direccion AS TercDireccion ,T.IdLocal AS TercCdCiudad,L.Localidad AS NomCiudad,L.IdDep AS CdDep,D.Departamento AS TercDpto,T.Telefono AS TercTelefono,T.Fax AS TercFax,T.e_mail AS TercEmail FROM Trn_CausaVales AS F INNER JOIN Companias AS CN ON F.IdCia=CN.IdCia INNER JOIN Terceros AS T ON F.IdCliente=T.IdTercero INNER JOIN Conceptos AS C ON F.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON F.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON F.IdUsuario=U.IdUsuario INNER JOIN Terceros AS VN ON F.IdVend=VN.IdTercero INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep LEFT JOIN Agencias AS A ON F.IdAgencia=A.IdAgencia LEFT JOIN TiposCom AS TC ON F.TipCom=TC.IdCom WHERE Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND F.IdCia LIKE ISNULL(@pmIdCia,'%%') AND (Documento>=ISNULL(@pmDocumentoIni,0) AND Documento<=ISNULL(@pmDocumentoFin,2147483647)) AND F.IdCliente LIKE ISNULL(@pmIdCliente,'%') AND F.IdVend LIKE ISNULL(@pmIdVend,'%') ORDER BY F.IdCia,Documento GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryCausaVales_Cr @pmTipDoc VARCHAR(3),@pmDocumentoIni INT,@pmDocumentoFin INT,@pmIdCia CHAR(2) AS SELECT F.TipDoc AS CdTipDoc,TipoDoc,F.Documento AS NumFactura,F.IdCia AS CdCia,Compania,F.Fecha AS FechaFact,F.IdConcepto AS CdConcepto,Concepto,IdCliente,T.RazonSocial AS NomCliente ,F.IdAgencia AS Id_agencia,Agencia,FechaVence,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca,F.TarifaIva AS TarifIva ,F.TarifaRet AS TarifRet,F.TarifaIca AS TarifIca,F.CodTarIva AS CdTarifIva,F.CodTarRet AS CdTarifRet,F.CodTarIca AS CdTarifIca,F.IdVend AS CdVend,VN.RazonSocial AS NomVendedor,TarifaCom,F.CodTarCom AS CdTarifCom ,OrigenAdd,TipCom,TipoCom,Comprobante,IdCiaCom,Anulado,NumDev,FecDev,F.Observacion AS Observ,F.IdEstado AS CdEstado,Estado,F.TimeSys AS Fecha_Add,FecUpdate,IdCiaCrea,F.IdUsuario AS CdUsuario,Usuario,Leyenda --Información del tercero ,T.TipoId AS TercTipo,T.Dv AS TercDv,T.Codigo AS TercCodigo,T.NomCial AS TercNomCial,T.SiglaRaz AS TercSigal,T.Direccion AS TercDireccion ,T.IdLocal AS TercCdCiudad,L.Localidad AS NomCiudad,L.IdDep AS CdDep,D.Departamento AS TercDpto,T.Telefono AS TercTelefono,T.Fax AS TercFax,T.e_mail AS TercEmail ,T.SitioWeb AS TercSitioWeb ,Item,K.IdProducto AS CodProducto,DescripProd,K.IdBodega AS CdBodega,Bodega,Descrip AS BodDescrip,Salidas,K.IdUnd AS CdUnid,UM.Unidad AS UnidMedida,VrUnitario,VrPrecio,VrCostProm ,K.TarifaIva AS KarTarifIva,VrIvaEnt,VrIvaSal,TarifaDct,VrDctoEnt,VrDctoSal,VrCostoEnt,VrCostoSal,VrBruto,K.Referencia AS KarReferencia,Descripcion ,CdProdEquiv,TipOrd,NumOrden,IdCiaOrd,K.Remision AS KarRemision,K.IdCiaRem AS KarCiaRem,K.Factura AS KarFactura,TipDocDev,NumDocDev,Unidades,pVehiculo ,ItemCombo,Servcios,NoVentas,EsCombo,EsProdBase,ListaPrec,VrBase,CdMoneda,VrTasaCamb,Referencia2,CodTarCmc --productos ,PM.Referencia AS Prod_Referencia,TipoRef,PM.IdSubgrupo AS CdSubgrupo,Subgrupo,S.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,PM.IdMarca AS CdMarca,Marca,Tamano,PM.UndMed AS CdUndMed ,SU.Unidad AS ProdUnidad,ExtciaMin,ExtciaMax,ExtciaAct,VrCostAnt,VrCosto,VrCostPmd,FecUltcom,FecUltVta,Seriales,Lotes,Combo,Tanques,DescripLong,Precio1,Precio2,Precio3,Precio4,Precio5 FROM Trn_CausaVales AS F INNER JOIN Trn_Kardex AS K ON F.TipDoc=K.TipDoc AND F.Documento=K.Documento AND F.IdCia=K.IdCia INNER JOIN Companias AS CN ON F.IdCia=CN.IdCia INNER JOIN Sys_TiposDoc AS TD ON F.TipDoc=TD.IdDoc INNER JOIN Terceros AS T ON F.IdCliente=T.IdTercero INNER JOIN Conceptos AS C ON F.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON F.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON F.IdUsuario=U.IdUsuario INNER JOIN Terceros AS VN ON F.IdVend=VN.IdTercero INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep INNER JOIN ProdMcias AS PM ON K.IdProducto=PM.IdProducto INNER JOIN Bodegas AS B ON K.IdBodega=B.IdBodega INNER JOIN UndMed AS UM ON K.IdUnd=UM.IdUnd INNER JOIN SubGrupos AS S ON PM.IdSubgrupo=S.IdSubgrupo INNER JOIN Grupos AS G ON S.IdGrupo=G.IdGrupo INNER JOIN Lineas AS LN ON G.IdLinea=LN.IdLinea INNER JOIN Marcas AS M ON PM.IdMarca=M.IdMarca INNER JOIN Sys_Um AS SU ON PM.UndMed=SU.UndMed LEFT JOIN Agencias AS A ON F.IdAgencia=A.IdAgencia LEFT JOIN TiposCom AS TCM ON F.TipCom=TCM.IdCom WHERE F.TipDoc=@pmTipDoc AND F.Documento BETWEEN @pmDocumentoIni AND @pmDocumentoFin AND F.IdCia=@pmIdCia AND EsProdBase=0 ORDER BY F.Documento GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryDevFvc @pmTipDev VARCHAR(3),@pmDevolucion INT,@pmIdCia CHAR(2) AS SELECT TipDev,Devolucion,IdCia,Fecha,IdConcepto,TipDoc,Factura,IdCiaDoc,FecDoc,IdCliente,IdAgencia,VrSubTotal,VrDescuento ,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca,IdVend,TarifaCom,CodTarCom ,ModdDev,TipCom,Comprobante,IdCiaCom,Observacion,IdEstado,OrigenAdd,TimeSys,IdCiaCrea,IdUsuario FROM Trn_DevFvc WHERE TipDev=@pmTipDev AND Devolucion=@pmDevolucion AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDevFvc_Cr @pmTipDev VARCHAR(3),@pmDevolucionIni INT,@pmDevolucionFin INT,@pmIdCia CHAR(2) AS SELECT TipDev,TipoDoc,Devolucion,F.IdCia AS CdCia,Compania,F.Fecha AS FechaDev,F.IdConcepto AS CdConcepto,Concepto,F.TipDoc AS TipFact,F.Factura AS NumFactura ,IdCiaDoc,FecDoc,IdCliente,T.RazonSocial AS NomCliente,F.IdAgencia AS CdAgencia,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca ,F.IdVend AS CdVend,VN.RazonSocial AS NomVendedor,TarifaCom,F.CodTarCom AS CdTarifCom,ModdDev,TipCom,TipoCom,Comprobante,IdCiaCom ,F.Observacion AS Observ,F.IdEstado AS CdEstado,Estado,OrigenAdd,F.TimeSys AS Fecha_Add,IdCiaCrea,F.IdUsuario AS CdUsuario,Usuario,Leyenda --Información del tercero ,T.TipoId AS TercTipo,T.Dv AS TercDv,T.Codigo AS TercCodigo,T.NomCial AS TercNomCial,T.SiglaRaz AS TercSigal,T.Direccion AS TercDireccion ,T.IdLocal AS TercCdCiudad,L.Localidad AS NomCiudad,L.IdDep AS CdDep,D.Departamento AS TercDpto,T.Telefono AS TercTelefono,T.Fax AS TercFax,T.e_mail AS TercEmail ,T.SitioWeb AS TercSitioWeb ,Item,K.IdProducto AS CodProducto,DescripProd,K.IdBodega AS CdBodega,Bodega,Descrip AS BodDescrip,Entradas,K.IdUnd AS CdUnid,UM.Unidad AS UnidMedida,VrUnitario,VrPrecio,VrCostProm ,K.TarifaIva AS KarTarifIva,VrIvaEnt,VrIvaSal,TarifaDct,VrDctoEnt,VrDctoSal,VrCostoEnt,VrCostoSal,VrBruto,K.Referencia AS KarReferencia,Descripcion ,CdProdEquiv,TipOrd,NumOrden,IdCiaOrd,K.Remision AS KarRemision,K.IdCiaRem AS KarCiaRem,K.Factura AS KarFactura,TipDocDev,NumDocDev,Unidades,CodTarCmc,pVehiculo ,ItemCombo,Servcios,NoVentas,EsCombo,EsProdBase,ListaPrec,VrBase,CdMoneda,VrTasaCamb,Referencia2 --productos ,PM.Referencia AS Prod_Referencia,TipoRef,PM.IdSubgrupo AS CdSubgrupo,Subgrupo,S.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,PM.IdMarca AS CdMarca,Marca,Tamano,PM.UndMed AS CdUndMed ,SU.Unidad AS ProdUnidad,ExtciaMin,ExtciaMax,ExtciaAct,VrCostAnt,VrCosto,VrCostPmd,FecUltcom,FecUltVta,Seriales,Lotes,Combo,Tanques,DescripLong,Precio1,Precio2,Precio3,Precio4,Precio5 FROM Trn_DevFvc AS F INNER JOIN Trn_Kardex AS K ON F.TipDev=K.TipDoc AND F.Devolucion=K.Documento AND F.IdCia=K.IdCia INNER JOIN Companias AS CN ON F.IdCia=CN.IdCia INNER JOIN Sys_TiposDoc AS TD ON F.TipDev=TD.IdDoc INNER JOIN Terceros AS T ON F.IdCliente=T.IdTercero INNER JOIN Conceptos AS C ON F.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON F.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON F.IdUsuario=U.IdUsuario INNER JOIN Terceros AS VN ON F.IdVend=VN.IdTercero INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep INNER JOIN ProdMcias AS PM ON K.IdProducto=PM.IdProducto INNER JOIN Bodegas AS B ON K.IdBodega=B.IdBodega INNER JOIN UndMed AS UM ON K.IdUnd=UM.IdUnd INNER JOIN SubGrupos AS S ON PM.IdSubgrupo=S.IdSubgrupo INNER JOIN Grupos AS G ON S.IdGrupo=G.IdGrupo INNER JOIN Lineas AS LN ON G.IdLinea=LN.IdLinea INNER JOIN Marcas AS M ON PM.IdMarca=M.IdMarca INNER JOIN Sys_Um AS SU ON PM.UndMed=SU.UndMed LEFT JOIN Agencias AS A ON F.IdAgencia=A.IdAgencia LEFT JOIN TiposCom AS TCM ON F.TipCom=TCM.IdCom WHERE TipDev=@pmTipDev AND Devolucion BETWEEN @pmDevolucionIni AND @pmDevolucionFin AND F.IdCia=@pmIdCia AND EsProdBase=0 ORDER BY F.Devolucion GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDevFvcDoc @pmTipDoc VARCHAR(3),@pmFactura INT ,@pmIdCiaDoc CHAR(2) AS SELECT TipDev,Devolucion,IdCia,Fecha,IdConcepto,TipDoc,Factura,IdCiaDoc,FecDoc,IdCliente,IdAgencia ,VrNeto,ModdDev,TipCom,Comprobante,IdCiaCom FROM Trn_DevFvc WHERE TipDoc=@pmTipDoc AND Factura=@pmFactura AND IdCiaDoc=@pmIdCiaDoc ORDER BY Devolucion,IdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDevFvcLta @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmDevolucionIni INT=Null, @pmDevolucionFin INT=Null ,@pmIdCia CHAR(2)=Null,@pmIdCliente VARCHAR(16)=Null,@pmIdVend VARCHAR(16)=Null AS SELECT TipDev,Devolucion,F.IdCia AS CdCia,Compania,Fecha,F.IdConcepto AS CdConcepto,Concepto,TipDoc,Factura,IdCiaDoc,FecDoc,IdCliente,T.RazonSocial AS NomCliente,F.IdAgencia AS CdAgencia,Agencia ,VrSubTotal,VrDescuento,VrImpuesto,VrRetencion,VrReteICA,VrReteIVA,VrCargos,VrOtrDcto,VrCostos,VrNeto,BaseImp,BaseRet,BaseIca ,F.IdVend AS CdVend,VN.RazonSocial AS NomVendedor,TarifaCom,CodTarCom,TipCom,TipoCom,Comprobante,IdCiaCom , ModdDev,F.Observacion AS Observ,F.IdEstado AS CdEstado,Estado,TimeSys,IdCiaCrea,OrigenAdd,F.IdUsuario AS CdUsuario,Usuario --Información del tercero ,T.TipoId AS TercTipo,T.Dv AS TercDv,T.Codigo AS TercCodigo,T.NomCial AS TercNomCial,T.SiglaRaz AS TercSigal,T.Direccion AS TercDireccion ,T.IdLocal AS TercCdCiudad,L.Localidad AS NomCiudad,L.IdDep AS CdDep,D.Departamento AS TercDpto,T.Telefono AS TercTelefono,T.Fax AS TercFax,T.e_mail AS TercEmail FROM Trn_DevFvc AS F INNER JOIN Companias AS CN ON F.IdCia=CN.IdCia INNER JOIN Terceros AS T ON F.IdCliente=T.IdTercero INNER JOIN Conceptos AS C ON F.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON F.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON F.IdUsuario=U.IdUsuario INNER JOIN Terceros AS VN ON F.IdVend=VN.IdTercero INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep LEFT JOIN Agencias AS A ON F.IdAgencia=A.IdAgencia LEFT JOIN TiposCom AS TC ON F.TipCom=TC.IdCom WHERE Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND F.IdCia LIKE ISNULL(@pmIdCia,'%%') AND (Devolucion>=ISNULL(@pmDevolucionIni,0) AND Devolucion<=ISNULL(@pmDevolucionFin,2147483647)) AND F.IdCliente LIKE ISNULL(@pmIdCliente,'%') AND F.IdVend LIKE ISNULL(@pmIdVend,'%') ORDER BY F.IdCia,Devolucion GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDevFvcNMes @pmAnno INT,@pmMes INT=Null,@pmIdCia CHAR(2)=Null,@pmIdPropietario VARCHAR(16)=Null ,@pmIdVehiculo VARCHAR(10)=Null AS SELECT VC.IdCliente AS NitCliente,VC.IdVehiculo AS PlacaVeh,D.IdCia AS CodCia,Month(Fecha) AS nMes,SUM(ValorFactura) AS SValNet FROM Trn_DevFvc AS D INNER JOIN Trn_CausacVence AS VC ON D.TipDoc=VC.TipDoc AND D.Factura=VC.Documento AND D.IdCiaDoc=VC.IdCia WHERE Year(Fecha)=@pmAnno AND Month(Fecha)=ISNULL(@pmMes, Month(Fecha)) AND D.IdCia LIKE ISNULL(@pmIdCia,'%%') AND VC.IdCliente LIKE ISNULL(@pmIdPropietario,'%') AND VC.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') GROUP BY VC.IdCliente,VC.IdVehiculo,D.IdCia,Month(Fecha) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDevFvcVFec @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdCia CHAR(2)=Null ,@pmIdPropietario VARCHAR(16)=Null,@pmIdVehiculo VARCHAR(10)=Null AS SELECT VC.IdCliente AS NitCliente,VC.IdVehiculo AS IdVehic,SUM(ValorFactura) AS SValNet FROM Trn_DevFvc AS D INNER JOIN Trn_CausacVence AS VC ON D.TipDoc=VC.TipDoc AND D.Factura=VC.Documento AND D.IdCiaDoc=VC.IdCia WHERE Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND D.IdCia LIKE ISNULL(@pmIdCia,'%%') AND VC.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') AND VC.IdCliente LIKE ISNULL(@pmIdPropietario,'%') GROUP BY VC.IdCliente,VC.IdVehiculo GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDiferidos @pmIdDiferido VARCHAR(30) AS SELECT IdDiferido,NomDiferido,IdTipDif,IdGrupo,IdCCosto,IdSubCos,IdDep,IdRespons,IdCia,FecInicio,ValorTotal,VrAdiciones,VrDisminucion,NumPeriodos ,FecFinAmtza,Ajustable,Contable,VrAjuInfAcum,VrAmtzaAcuHis,VrAmtzaAcum,VrAjuInfAmtza,CuotasAmtza,VrCorrMonDifAcu,CorrMonDiferida,NumMesesDif ,FecUltAmtza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA,NumDoc,Referencia,DesUbicacion,IdEstado ,FecRetiro,IdCausal,ComentRetiro,Comentarios,FecCreacion,IdUsuario,TipoAmtza,NitCliente,AgenCliente,CantGalones,IdProv FROM Diferidos WHERE IdDiferido=@pmIdDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDiferidosAmt @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME AS SELECT IdDiferido,NomDiferido,IdTipDif,IdGrupo,IdCCosto,IdSubCos,IdDep,IdRespons,IdCia,FecInicio,ValorTotal,VrAdiciones,VrDisminucion,NumPeriodos ,FecFinAmtza,Ajustable,Contable,CorrMonDiferida,NumMesesDif,FecUltAmtza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA ,IdEstado,FecRetiro,TipoAmtza,NitCliente,AgenCliente,CantGalones,IdProv FROM Diferidos WHERE FecInicio<=@pmFechaFin AND (IdEstado<>'9999' OR (IdEstado='9999' AND FecRetiro>=@pmFechaIni)) ORDER BY IdDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDiferidosHis @pmIdDiferido VARCHAR(30) AS SELECT A.IdDiferido AS CdDiferido,NomDiferido,A.IdTipDif AS CdTipDif,TipoDiferido,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro ,CC.CCosto AS DifCentroCosto,A.IdSubCos AS CdSubcentro,SC.SubCosto AS DifSubCentro,A.IdDep AS CdDep,DP.Dependencia AS DifDependencia,DesUbicacion ,IdRespons,T.RazonSocial AS NomResponsable,A.IdCia AS CdCia,CIA.Compania AS DifNomCia,FecInicio,A.ValorTotal AS DifValTotal,A.VrAdiciones AS DifAdiciones,A.VrDisminucion AS DifDisminucion,NumPeriodos ,FecFinAmtza,Ajustable,Contable,VrAjuInfAcum,VrAmtzaAcuHis,VrAmtzaAcum,VrAjuInfAmtza,CuotasAmtza,VrCorrMonDifAcu,CorrMonDiferida,NumMesesDif ,FecUltAmtza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA,NumDoc,Referencia,A.IdEstado AS CdEstado,ED.Estado AS DifEstado ,FecRetiro,A.IdCausal AS CdCausal,Causal,ComentRetiro,Comentarios,FecCreacion,A.IdUsuario AS IdUsuari --DATOS DEL DIFERIDO ,AMZ.Numero AS NumRegistro,Fecha,AMZ.Estado AS EstadoDoc,AMZ.IdUsuario AS CdUsuario,Usuario,FechaCrea,AMZ.IdCia AS CdCia,CI.Compania AS NomCia ,Item,D.ValorTotal AS ValorInicial, D.VrAdiciones AS ValAdiciones, D.VrDisminucion AS ValDisminucion, VrAcuAjustes, VrAmortizaHis, VrAmortizaMes, VrAjustesInf , VrAjustesAmtza,VrAmtzaHisAcum, VrAmortizaAcum, VrAjuAmtzaAcum, VrCorrMonAcum, VrBaseCorrMon, VrCorrMonDif, TarifaAju ,D.IdCia AS DetIdCia,CID.Compania AS DetNomCia,CdCCosto,CCD.CCosto AS NomCentroCosto,CdSubCos,SCD.SubCosto AS NomSubcentro, CdDep, DPD.Dependencia AS NomDepend ,NitRespons,TRD.RazonSocial AS DetResponsable,FecInicioAmtza, NPeriodos,TipoAmtza,NitCliente,AgenCliente,CantGalones ,IdProv,PV.RazonSocial AS NomProveedor FROM Diferidos AS A INNER JOIN AfGrupos AS G ON A.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea INNER JOIN CentroCosto AS CC ON A.IdCCosto=CC.IdCCosto INNER JOIN AfTiposDif AS TD ON A.IdTipDif=TD.IdTipDif INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS T ON A.IdRespons=T.IdTercero INNER JOIN Companias AS CIA ON A.IdCia=CIA.IdCia INNER JOIN Terceros AS PV ON A.IdProv=PV.IdTercero INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos LEFT JOIN AfCausales AS CA ON A.IdCausal=CA.IdCausal LEFT JOIN Trn_AfAmtDetalle AS D ON A.IdDiferido=D.IdDiferido LEFT JOIN Trn_AfAmortiza AS AMZ ON D.Numero=AMZ.Numero LEFT JOIN Companias AS CI ON AMZ.IdCia=CI.IdCia LEFT JOIN adm_Usuarios AS U ON AMZ.IdUsuario=U.IdUsuario LEFT JOIN Companias AS CID ON D.IdCia=CID.IdCia LEFT JOIN CentroCosto AS CCD ON D.CdCCosto=CCD.IdCCosto LEFT JOIN Dependencias AS DPD ON D.CdDep=DPD.IdDep LEFT JOIN Terceros AS TRD ON D.NitRespons=TRD.IdTercero LEFT JOIN SubCentros AS SCD ON D.CdSubCos=SCD.IdSubCos WHERE A.IdDiferido LIKE ISNULL(@pmIdDiferido ,'%') ORDER BY NomDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryDiferidosLta @pmIdGrupo VARCHAR(4)=Null,@pmIdLinea VARCHAR(4)=Null,@pmIdCCosto VARCHAR(16)=Null,@pmIdTipDif VARCHAR(4)=Null ,@pmIdDep VARCHAR(4)=Null,@pmIdRespons VARCHAR(16)=Null,@pmIdCia CHAR(2)=Null,@pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null ,@pmIdEstado VARCHAR(4)=Null AS SELECT IdDiferido,NomDiferido,A.IdTipDif AS CdTipDif,TipoDiferido,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubcentro,SubCosto ,A.IdDep AS CdDep,Dependencia,DesUbicacion,IdRespons,T.RazonSocial AS NomResponsable,A.IdCia AS CdCia,Compania,FecInicio,ValorTotal,VrAdiciones,VrDisminucion,NumPeriodos ,FecFinAmtza,Ajustable,Contable,VrAjuInfAcum,VrAmtzaAcuHis,VrAmtzaAcum,VrAjuInfAmtza,CuotasAmtza,VrCorrMonDifAcu,CorrMonDiferida,NumMesesDif ,FecUltAmtza,CueEnGrupo,IdCuenta,IdCueAmortiza,IdCueAjuDif,IdCueCorrDif,IdCueAjuAmtza,IdCueCorrAA,NumDoc,Referencia,A.IdEstado AS CdEstado,Estado ,FecRetiro,A.IdCausal AS CdCausal,Causal,ComentRetiro,Comentarios,FecCreacion,A.IdUsuario AS IdUsuari,Usuario,TipoAmtza,NitCliente,AgenCliente,CantGalones ,IdProv,PV.RazonSocial AS NomProveedor --datos del responsable ,T.Codigo AS TercCodigo,T.TipoId AS TercTipoId,T.Dv AS TercDv,T.NomCial AS TercNomCial,T.SiglaRaz AS TercSigla,T.Direccion AS TercDirecc,T.IdLocal AS CdLocalidad,Localidad ,LC.IdDep AS Cd_Depto,Departamento,T.Telefono AS TercTelefono,T.e_mail AS TercEmail FROM Diferidos AS A INNER JOIN AfGrupos AS G ON A.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea INNER JOIN CentroCosto AS CC ON A.IdCCosto=CC.IdCCosto INNER JOIN AfTiposDif AS TD ON A.IdTipDif=TD.IdTipDif INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS T ON A.IdRespons=T.IdTercero INNER JOIN Companias AS CI ON A.IdCia=CI.IdCia INNER JOIN Terceros AS PV ON A.IdProv=PV.IdTercero INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON A.IdUsuario=U.IdUsuario INNER JOIN Localidades AS LC ON T.IdLocal=LC.IdLocal INNER JOIN Departamentos AS D ON LC.IdDep=D.IdDep LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos LEFT JOIN AfCausales AS CA ON A.IdCausal=CA.IdCausal WHERE A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND G.IdLinea LIKE ISNULL(@pmIdLinea,'%') AND A.IdCCosto LIKE ISNULL(@pmIdCCosto,'%') AND A.IdTipDif LIKE ISNULL(@pmIdTipDif,'%') AND A.IdDep LIKE ISNULL(@pmIdDep,'%') AND IdRespons LIKE ISNULL(@pmIdRespons,'%') AND A.IdCia LIKE ISNULL(@pmIdCia,'%%') AND (FecInicio>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND FecInicio<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME))) AND A.IdEstado LIKE ISNULL(@pmIdEstado,'%') ORDER BY NomDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryGruposMcia @pmIdGrupo VARCHAR(10) AS IF @pmIdGrupo IS NULL SELECT IdGrupo,GrupoMcia FROM GruposMcia WHERE Inactivo=0 ORDER BY GrupoMcia ELSE SELECT IdGrupo,GrupoMcia,Inactivo FROM GruposMcia WHERE IdGrupo=@pmIdGrupo GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryMercancias @pmIdMercancia VARCHAR(16) AS SELECT IdMercancia,DescripMcia,CodigoMcia,IdGrupo,UndMed,IdUnd,IdNat,IdMnjo,IdTmcia,Contenedor,IdProducto ,IdEstado,Inactivo,FechaAdd,FechaUpdate,IdUsuario FROM Mercancias WHERE IdMercancia=@pmIdMercancia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryMercanciasLta @pmIdGrupo VARCHAR(10)=Null,@pmIdNat VARCHAR(4)=Null,@pmIdTmcia VARCHAR(4)=Null ,@pmInactivo BIT=Null AS SELECT IdMercancia,DescripMcia,M.IdGrupo AS CdGrupo,GrupoMcia,M.UndMed AS Und_Med,M.IdUnd AS CdUndPre,Unidad,UM.IdEmp AS CdEmp ,M.IdNat AS CdNat,Natlzaprod,M.IdMnjo AS CdMnjo,ManejoMcia,M.IdTmcia AS CdTmcia,TipoMcia,Contenedor,M.IdProducto AS CdProducto,DescripProd,CodigoMcia ,M.IdEstado AS CdEstado,Estado,M.Inactivo AS Inactvo,M.FechaAdd AS FechaCrea,M.FechaUpdate AS FechaAct,M.IdUsuario AS CdUsuario,Usuario FROM Mercancias AS M INNER JOIN GruposMcia AS G ON M.IdGrupo=G.IdGrupo INNER JOIN UndMed AS UM ON M.IdUnd=UM.IdUnd INNER JOIN TiposNat AS N ON M.IdNat=N.IdNat INNER JOIN TiposMnjo AS MM ON M.IdMnjo=MM.IdMnjo INNER JOIN TiposMcia AS TM ON M.IdTmcia=TM.IdTmcia INNER JOIN EstadoPro AS EP ON M.IdEstado=EP.IdEstado INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario LEFT JOIN ProdMcias AS P ON M.IdProducto=P.IdProducto WHERE M.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND M.IdNat LIKE ISNULL(@pmIdNat,'%') AND M.IdTmcia LIKE ISNULL(@pmIdTmcia,'%') AND (M.Inactivo=ISNULL(@pmInactivo,0) or M.Inactivo=ISNULL(@pmInactivo,1)) ORDER BY DescripMcia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryRangosPeso @pmIdRango VARCHAR(4) AS IF @pmIdRango IS NULL SELECT IdRango,DescripRango,ValorInicial,ValorFinal FROM RangosPeso WHERE Inactivo=0 ORDER BY IdRango ELSE SELECT IdRango,DescripRango,ValorInicial,ValorFinal,Inactivo FROM RangosPeso WHERE IdRango=@pmIdRango GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryTarifasFletes @pmIdOrigen VARCHAR(8),@pmIdDestino VARCHAR(8),@pmItem INT AS SELECT IdOrigen,IdDestino,Item,TipoTarifa,TarifClie,TarifPago,TarifTabla,IdMneda,UndMed ,NitCliente,CdNat,CdTipoVeh,CdRango,Inactivo,FechaCrea,IdUsuario FROM TarifasFletes WHERE IdOrigen=@pmIdOrigen AND IdDestino=@pmIdDestino AND Item=@pmItem GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryTarifasFletesLta @pmTipoTarifa VARCHAR(10)=Null,@pmIdOrigen VARCHAR(8)=Null,@pmIdDestino VARCHAR(8)=Null ,@pmNitCliente VARCHAR(16)=Null,@pmInactivo BIT=Null AS SELECT IdOrigen,O.Localidad AS CiuOrigen,IdDestino,D.Localidad AS CiuDestino,Item,TarifClie,TarifPago,TarifTabla,IdMneda,T.UndMed AS Und_Med,Unidad ,NitCliente,RazonSocial,CdNat,Natlzaprod,CdTipoVeh,TipoVehiculo,CdRango,DescripRango,T.Inactivo AS Inactvo,FechaCrea,T.IdUsuario AS CdUsuario,Usuario ,O.IdDep AS CdDep,DPO.Departamento AS DptoOrigen,D.IdDep AS CdDepDest,DPD.Departamento AS DptoDestino,TipoTarifa FROM TarifasFletes AS T INNER JOIN Localidades AS O ON T.IdOrigen=O.IdLocal INNER JOIN Localidades AS D ON T.IdDestino=D.IdLocal INNER JOIN Departamentos AS DPO ON O.IdDep=DPO.IdDep INNER JOIN Departamentos AS DPD ON D.IdDep=DPD.IdDep INNER JOIN adm_Usuarios AS U ON T.IdUsuario=U.IdUsuario LEFT JOIN Terceros AS TC ON T.NitCliente=TC.IdTercero LEFT JOIN Sys_Um AS UM ON T.UndMed=UM.UndMed LEFT JOIN TiposNat AS N ON T.CdNat=N.IdNat LEFT JOIN TiposVeh AS TV ON T.CdTipoVeh=TV.IdTipoVeh LEFT JOIN RangosPeso AS R ON T.CdRango=R.IdRango WHERE TipoTarifa LIKE ISNULL(@pmTipoTarifa,'%') AND IdOrigen LIKE ISNULL(@pmIdOrigen,'%') AND IdDestino LIKE ISNULL(@pmIdDestino,'%') AND NitCliente LIKE ISNULL(@pmNitCliente,'%') AND (T.Inactivo=ISNULL(@pmInactivo,0) or T.Inactivo=ISNULL(@pmInactivo,1)) ORDER BY O.Localidad,D.Localidad,Item GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryTiposCarga @pmIdTipCarga VARCHAR(4) AS IF @pmIdTipCarga IS NULL SELECT IdTipCarga,TipoCarga FROM TiposCarga WHERE Inactivo=0 ORDER BY IdTipCarga ELSE SELECT IdTipCarga,TipoCarga,Inactivo FROM TiposCarga WHERE IdTipCarga=@pmIdTipCarga GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryTiposCnd @pmIdTipoCon VARCHAR(4) AS BEGIN IF @pmIdTipoCon IS NULL SELECT IdTipoCon,TipoContndor FROM TiposCnd WHERE Inactivo=0 ORDER BY IdTipoCon ELSE SELECT IdTipoCon,TipoContndor,Inactivo FROM TiposCnd WHERE IdTipoCon=@pmIdTipoCon END GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryTiposDocKar @pmInactivo BIT=Null AS SELECT IdDoc,TipoDoc,IdDoc+' '+ TipoDoc AS DsTip FROM Sys_TiposDoc WHERE IdDoc IN ('AJF','AJS','COM','COT','DEI','DF1','DF2','DF3','DF4','DF5','DFC','DFO','DFV','DNP','DO1','DO2','DO3','DO4','DO5','DSI','DVE','DVN','DVP','DVS','ENT' ,'FC1','FC2','FC3','FC4','FC5','FCO','FCR','FIS','FO1','FO2','FO3','FO4','FO5','FVC','GUI','NPR','NTS','OCC','ODC','PAS','PED','PLA','REM','REQ','SAI','SAL') AND (Inactivo=ISNULL(@pmInactivo,0) or Inactivo=ISNULL(@pmInactivo,1)) ORDER BY IdDoc GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryTiposEsc @pmIdTipoEsc VARCHAR(4) AS IF @pmIdTipoEsc IS NULL SELECT IdTipoEsc,TipoEscolta FROM TiposEsc WHERE Inactivo=0 ORDER BY TipoEscolta ELSE SELECT IdTipoEsc,TipoEscolta,Inactivo FROM TiposEsc WHERE IdTipoEsc=@pmIdTipoEsc GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paQryTiposPcnto @pmIdTipoPre VARCHAR(4) AS IF @pmIdTipoPre IS NULL SELECT IdTipoPre,Precinto FROM TiposPcnto WHERE Inactivo=0 ORDER BY Precinto ELSE SELECT IdTipoPre,Precinto,Inactivo FROM TiposPcnto WHERE IdTipoPre=@pmIdTipoPre GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQrytm_AfAmtLta @pmtmNumero VARCHAR(5) AS SELECT tmItem,tmIdDiferido,NomDiferido,tmCostoIni,tmAdiciones,tmDisminucion,tmAcuAjustes,(tmCostoIni+tmAdiciones-tmDisminucion+tmAcuAjustes) AS CostoAjustado ,tmTarifa,tmAjustesInf,tmAmortizaMes,tmAmortizaAcum,tmAjuAmtzaAcum,tmAmortizaAcum+tmAjuAmtzaAcum AS TotalAmortizaAcum,tmAjustesAmtza ,tmAmtzaHisAcum,tmAmortizaHis,tmCorrMonAcum,tmBaseCorrMon,tmCorrMonDif,tmEstadoReg,tmObservacion,tmFechaIni,tmNumPeriodos ,tmIdCia,Compania,tmCdCCosto,CCosto,tmCdSubCos,SubCosto,tmCdDep,Dependencia,tmNitRespons,RazonSocial,D.IdEstado AS CdEstado,Estado,FecRetiro ,Ajustable,Contable,G.IdLinea AS CdLinea,Linea,D.IdGrupo AS CdGrupo,Grupo,tmCuota,tmGalones,IdProv,tmInversion FROM tm_AfAmt AS T INNER JOIN Diferidos AS D ON T.tmIdDiferido=D.IdDiferido INNER JOIN AfGrupos AS G ON D.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea INNER JOIN AfEstados AS ED ON D.IdEstado=ED.IdEstado LEFT JOIN CentroCosto AS CC ON T.tmCdCCosto=CC.IdCCosto LEFT JOIN Dependencias AS DP ON T.tmCdDep=DP.IdDep LEFT JOIN Terceros AS TR ON T.tmNitRespons=TR.IdTercero LEFT JOIN Companias AS CI ON T.tmIdCia=CI.IdCia LEFT JOIN SubCentros AS SC ON T.tmCdSubCos=SC.IdSubCos WHERE tmNumero=@pmtmNumero ORDER BY NomDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQrytm_KdexSub @pmtmNumero VARCHAR(5) AS SELECT IdSubgrupo,tmIdProducto,DescripProd,TipoRef,Combo,tmEsProdBase,COUNT(tmItem) AS SCANT,SUM(tmEntradas) AS SENT,SUM(tmSalidas) AS SSAL ,SUM(tmEntradas*tmVrUnitario) AS SCOSENT,SUM(tmSalidas*tmVrUnitario) AS SCOSSAL ,SUM(tmVrPrecio*tmEntradas) AS SVALENT,SUM(tmVrPrecio*tmSalidas) AS SVALSAL ,SUM(tmVrIva) AS SIVA,SUM(tmVrDcto) AS SDCT,SUM(tmVrRete) AS SRET,SUM(tmVrIca) AS SICA ,SUM(tmVrBruto*tmEntradas) AS SBRUENT,SUM(tmVrBruto*tmSalidas) AS SBRUSAL ,SUM(tmEntradas*tmImpGlobal) AS SGLOENT,SUM(tmSalidas*tmImpGlobal) AS SGLOSAL ,SUM(tmSobretasa*tmEntradas) AS SSOBENT,SUM(tmSobretasa*tmSalidas) AS SSOBSAL ,SUM(tmTasaNac*tmEntradas) AS SNACENT,SUM(tmTasaNac*tmSalidas) AS SNACSAL ,SUM(tmTasaDep*tmEntradas) AS SDEPENT,SUM(tmTasaDep*tmSalidas) AS SDEPSAL ,SUM(tmTasaMun*tmEntradas) AS SMUNENT,SUM(tmTasaMun*tmSalidas) AS SMUNSAL ,SUM(tmSoldicom*tmEntradas) AS SSOLENT,SUM(tmSoldicom*tmSalidas) AS SSOLSAL --Para los ajustes con cantidad en cero (0) ,SUM(tmVrUnitario) AS SCOSAJU,SUM(tmOtroImpto) AS SDVEAJU FROM tm_Kdex AS K INNER JOIN ProdMcias AS P ON K.tmIdProducto=P.IdProducto WHERE tmNumero=@pmtmNumero GROUP BY IdSubgrupo,tmIdProducto,DescripProd,TipoRef,Combo,tmEsProdBase ORDER BY IdSubgrupo,tmIdProducto GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQrytm_MovVentasAes @pmtmEst CHAR(2) AS SELECT tmIdProducto,DescripProd,tmIdCia,Compania,tmIdCliente,T.RazonSocial AS NomCliente,tmCdAgencia,Agencia,CodAgencia,tmIdVend,VN.RazonSocial AS Vendedor ,tmCdLocal,Localidad,L.IdDep AS CodDep,Departamento,tmCdSubzona,Subzona,SZ.IdZona AS CdZona,Zona ,tmEntradas,tmSalidas,tmCostoEnt,tmCostoSal,tmValorEnt,tmValorSal,tmDctosEnt,tmDctosSal,tmIvaEnt,tmIvaSal,tmImpGlobalEnt,tmImpGlobalSal,tmOtrosEnt,tmOtrosSal ,tmUnidVolumen,tmEntradas2,tmSalidas2,tmCostoEnt2,tmCostoSal2,tmValorEnt2,tmValorSal2,tmDctosEnt2,tmDctosSal2,tmIvaEnt2,tmIvaSal2,tmImpGlobalEnt2,tmImpGlobalSal2,tmOtrosEnt2,tmOtrosSal2,tmUnidVolumen2 ,tmItem --datos del tercero ,T.IdSector AS CdSector,SectorEco,T.IdRegimen AS CdRegimen,Regimen,T.TipEnte AS TercTipEnte,CLI.IdGrupo AS CdGrupoCli,GrupoClie ,CLI.CdBandera AS CliCdBandera,TB.TipoBandera AS CliBandera,A.CdBandera AS AgeCdBandera,TBA.TipoBandera AS AgeBandera ,CLI.IdVend AS IdVendDef,VD.RazonSocial AS VendedorDef,CLI.NContrato AS CliNumContrato,CiaContMay,A.NContrato AS AgeNContrato,CiaCont FROM tm_MovVentas AS V INNER JOIN ProdMcias AS PM ON V.tmIdProducto=PM.IdProducto INNER JOIN Terceros AS T ON V.tmIdCliente=T.IdTercero INNER JOIN RegimenDian AS RG ON T.IdRegimen=RG.IdRegimen INNER JOIN SectoresEco AS SE ON T.IdSector=SE.IdSector LEFT JOIN Agencias AS A ON V.tmCdAgencia=A.IdAgencia LEFT JOIN TercCliente AS CLI ON V.tmIdCliente=CLI.IdClie LEFT JOIN GruposCli AS GC ON CLI.IdGrupo=GC.IdGrupo LEFT JOIN Subzonas AS SZ ON V.tmCdSubzona=SZ.IdSzona LEFT JOIN Zonas AS Z ON SZ.IdZona=Z.IdZona LEFT JOIN Terceros AS VN ON V.tmIdVend=VN.IdTercero LEFT JOIN Companias AS CN ON V.tmIdCia=CN.IdCia LEFT JOIN Localidades AS L ON V.tmCdLocal=L.IdLocal LEFT JOIN Departamentos AS DP ON L.IdDep=DP.IdDep LEFT JOIN TiposBan AS TB ON CLI.CdBandera=TB.IdBandera LEFT JOIN TiposBan AS TBA ON A.CdBandera=TBA.IdBandera LEFT JOIN Terceros AS VD ON CLI.IdVend=VD.IdTercero WHERE tmEst=@pmtmEst ORDER BY T.RazonSocial GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQrytm_vence_Ed @pmtmEst CHAR(2) --Cartera edades AS SELECT tmEst, tmTipDoc, tmDocumento, tmIdCia, tmItem, tmFecEmision, tmFecVence, tmValorFactura, tmValorAbono , tmVencido, tmPorVencer, tmVence1,tmVence2, tmVence3, tmVence4, tmIdPropietario, tmIdVehiculo, tmIdClase FROM tm_vence WHERE tmEst=@pmtmEst AND tmTipDoc IN ('ADM','OTR','ND1','PRE','FVC') ORDER BY tmTipDoc,tmIdCia,tmDocumento,tmItem GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryValesRutas @pmTipDoc VARCHAR(3),@pmnRadica INT,@pmIdCia CHAR(2) AS SELECT Item,V.IdRuta AS CdRuta,DescripRuta,NomRuta,TipoRuta,Origen,Destino,CodRuta FROM Trn_ValesRutas AS V INNER JOIN TaxRutas AS R ON V.IdRuta=R.IdRuta WHERE TipDoc=@pmTipDoc AND nRadica=@pmnRadica AND IdCia=@pmIdCia ORDER BY Item GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryValesRutas_Cr @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdCia CHAR(2)=Null ,@pmTipoRango VARCHAR(3)=Null,@pmNumFormaIni INT=Null,@pmNumFormaFin INT=Null,@pmIdCliente VARCHAR(16)=Null ,@pmIdRuta VARCHAR(4)=Null AS SELECT VR.IdRuta AS CdRuta,DescripRuta,VR.TarifPago AS VrPago,VR.TarifCobro AS VrCobro,TipoRango,IdRango,NumSerie,NumForma,V.Fecha AS FechaServ,HoraServ,V.nRadica AS NumRadica,V.IdCia AS CdCia,Compania,V.Item AS ValeItem ,IdCliente,CL.RazonSocial AS NomCliente,V.IdAgencia AS ValAgencia,Agencia,NumMovil,CentCosto,Unidades,HoraRec,HoraEspera,FactUnid,FactRutas,FactHoras ,IdCuenta,CantPasaj,Usuarios,V.Observacion AS ValObserv,TipFac,NumFactura,IdCiaFac,FechaFac,V.Anulado AS ValAnulado,V.NumDev AS ValNumAnul,V.FecDev AS ValFechaDev ,FechaUp,CdUsuario,UV.Usuario AS ValUsuario--,VrPago,VrCobro --datos de radicación ,R.Fecha AS FechaRad,FechaVence,R.IdTercero AS NitTercero,T.RazonSocial AS NomTercero,R.Referencia AS DocReferncia,CxPagar,TipCom,Comprobante,IdCiaCom ,R.Anulado AS DocAnulado,R.NumDev AS DocNumDev,R.FecDev AS DocFecDev,R.Observacion AS Observ,R.IdUsuario AS IdUsuari,U.Usuario AS NomUsuario --datos de ruta ,NomRuta,TipoRuta,Origen,Destino,CodRuta,RT.TarifPago AS RutTarifPago,RT.TarifCobro AS RutTarifCobro ,CL.TipoId AS CliTipoId,CL.Dv AS CliDv,CL.Codigo AS CliCodigo,CL.NomCial AS CliNomCial,CL.Direccion AS CliDireccion,CL.IdLocal AS CliCdCiudad,L.Localidad AS NomCiudad,L.IdDep AS CdDep,Departamento,CL.Telefono AS CliTelefono FROM Trn_Vales AS V INNER JOIN Trn_RadicaVales AS R ON V.TipDoc=R.TipDoc AND V.nRadica=R.nRadica AND V.IdCia=R.IdCia INNER JOIN Terceros AS CL ON V.IdCliente=CL.IdTercero INNER JOIN Localidades AS L ON CL.IdLocal=L.IdLocal INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep INNER JOIN Companias AS CN ON V.IdCia=CN.IdCia INNER JOIN Terceros AS T ON R.IdTercero=T.IdTercero INNER JOIN adm_Usuarios AS U ON R.IdUsuario=U.IdUsuario INNER JOIN Trn_ValesRutas AS VR ON V.TipDoc=VR.TipDoc AND V.nRadica=VR.nRadica AND V.IdCia=VR.IdCia AND V.Item=VR.Item INNER JOIN TaxRutas AS RT ON VR.IdRuta=RT.IdRuta LEFT JOIN adm_Usuarios AS UV ON V.CdUsuario=UV.IdUsuario LEFT JOIN Agencias AS A ON V.IdAgencia=A.IdAgencia WHERE (R.Fecha>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND R.Fecha<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME))) AND V.IdCia LIKE ISNULL(@pmIdCia,'%%') AND TipoRango LIKE ISNULL(@pmTipoRango,'%') AND NumForma BETWEEN ISNULL(@pmNumFormaIni,0) AND ISNULL(@pmNumFormaFin,2147483647) AND IdCliente LIKE ISNULL(@pmIdCliente,'%') AND VR.IdRuta LIKE ISNULL(@pmIdRuta,'%') ORDER BY TipoRango,IdRango,NumForma GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryVehiculosMayPol @pmFecha SMALLDATETIME,@pmIdPropietario VARCHAR(16)=Null,@pmInactivo BIT=Null AS SELECT V.IdVehiculo AS PlacaVeh,NumVeh,V.IdTipoVeh AS CdTipo,TipoVehiculo,V.IdMarca AS CdMarca,M.Marca AS MarcaVeh,V.IdLinea AS CdLinea,LineaVeh ,V.IdColor AS CdColor,NomColor,Modelo,VehArtic,NumMotor,SerieChasis,NumSerie,ClaseMat,CdRemque ,Comptmtos,CapComp,NitEmpresa,NE.RazonSocial AS Empresa,IdPropietario,NP.RazonSocial AS Propietario ,V.IdConductor AS CedConductor,NC.RazonSocial AS Conductor,FecIngreso, V.FecVigencia AS FecVigContrato, FecRetiro,NumSoat,FecSoat,VigSoat,NitEmpSoat,NS.RazonSocial AS CiaAsegurdora ,TarjProp,FecTProp,VigTProp,RespCivil,FecRCivil,VigRCivil,RegNalCarga,FecRegNal,VigRegNal ,RevTecMec,FecTecMec,VigTecMec,CertGases,FecCertGas,VigCertGas,TarjOper,FecTarjOper,VigTarjOper,Descripcion,V.Observacion AS Observ ,FecPriServ,FecUltServ,TipoAfil,V.IdEstado AS CdEstado,Estado,V.Inactivo AS Inactvo,V.IdUsuario AS CdUsuario,Usuario ,V.FechaAdd AS Fec_Add,EV.NColor AS NumColor,OutDemand --documentos del conductor ,Licencia,LugarLic,CatLicencia,VigLicencia,CertJudicial,FecJudicial,VigJudicial ,NumTarjeta,EdicTarjeta,FecTarjeta,VigTarjeta,PasSeguridad,FecPasSeg,VigPasSeg --otras polizas ,VP.IdClase AS CodClase,ClasePoliza,Numero,FecEmision,VP.FecVigencia AS FecVencePoliza,NitCompania ,TCP.RazonSocial AS NombreCia,Valor,Comntarios FROM Vehiculos AS V INNER JOIN TiposVeh AS TV ON V.IdTipoVeh=TV.IdTipoVeh INNER JOIN Marcas AS M ON V.IdMarca=M.IdMarca INNER JOIN MarcasLin AS L ON V.IdLinea=L.IdLinea INNER JOIN TiposCol AS CL ON V.IdColor=CL.IdColor INNER JOIN Terceros AS NP ON V.IdPropietario=NP.IdTercero INNER JOIN Terceros AS NC ON V.IdConductor=NC.IdTercero INNER JOIN EstadoVeh AS EV ON V.IdEstado=EV.IdEstado INNER JOIN adm_Usuarios AS U ON V.IdUsuario=U.IdUsuario LEFT JOIN Terceros AS NE ON V.NitEmpresa=NE.IdTercero LEFT JOIN Terceros AS NS ON V.NitEmpSoat =NS.IdTercero LEFT JOIN TercCndtores AS CT ON V.IdConductor=CT.IdConductor LEFT JOIN ExpLicencias AS ELC ON CT.IdLugar=ELC.IdLugar LEFT JOIN VehPolizas AS VP ON V.IdVehiculo=VP.IdVehiculo LEFT JOIN ClasePol AS CLP ON VP.IdClase=CLP.IdClase LEFT JOIN Terceros AS TCP ON VP.NitCompania=TCP.IdTercero WHERE V.IdVehiculo<>'0' AND (VigSoat<=@pmFecha OR ISNULL(VigTProp,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigRCivil,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigRegNal,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigTecMec,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigCertGas,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigTarjOper,CAST('20781230' AS SMALLDATETIME))<=@pmFecha --DEL CONDUCTOR OR ISNULL(VigLicencia,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigJudicial,CAST('20781230' AS SMALLDATETIME))<=@pmFecha OR ISNULL(VigTarjeta,CAST('20781230' AS SMALLDATETIME))<=@pmFecha --OTRAS POLIZAS OR ISNULL(VP.FecVigencia,CAST('20781230' AS SMALLDATETIME))<=@pmFecha ) AND IdPropietario LIKE ISNULL(@pmIdPropietario,'%') AND (V.Inactivo=ISNULL(@pmInactivo,0) or V.Inactivo=ISNULL(@pmInactivo,1)) ORDER BY V.IdVehiculo GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpAlmBodegas @pmIdBodega VARCHAR(4),@pmBodega VARCHAR(100),@pmDireccion VARCHAR(100),@pmTelBodega VARCHAR(50),@pmInactivo BIT AS UPDATE AlmBodegas SET Bodega=@pmBodega,Direccion=@pmDireccion,TelBodega=@pmTelBodega,Inactivo=@pmInactivo WHERE IdBodega=@pmIdBodega GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paUpCausaVales @pmTipDoc VARCHAR(3),@pmDocumento INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmIdConcepto VARCHAR(4),@pmIdCliente VARCHAR(16),@pmIdAgencia VARCHAR(16),@pmFechaVence SMALLDATETIME,@pmVrSubTotal MONEY,@pmVrDescuento MONEY,@pmVrImpuesto MONEY ,@pmVrRetencion MONEY,@pmVrReteICA MONEY,@pmVrReteIVA MONEY,@pmVrCargos MONEY,@pmVrOtrDcto MONEY,@pmVrCostos MONEY,@pmVrNeto MONEY,@pmBaseImp MONEY,@pmBaseRet MONEY,@pmBaseIca MONEY,@pmTarifaIva DECIMAL(14,4),@pmTarifaRet DECIMAL(14,4),@pmTarifaIca DECIMAL(14,4) ,@pmCodTarIva VARCHAR(4),@pmCodTarRet VARCHAR(4),@pmCodTarIca VARCHAR(4),@pmIdVend VARCHAR(16),@pmTarifaCom DECIMAL(14,4),@pmCodTarCom VARCHAR(4),@pmTipCom VARCHAR(3),@pmComprobante INT,@pmIdCiaCom CHAR(2),@pmAnulado BIT,@pmNumDev INT,@pmFecDev SMALLDATETIME,@pmObservacion VARCHAR(250) ,@pmIdEstado VARCHAR(4),@pmFecUpdate SMALLDATETIME AS UPDATE Trn_CausaVales SET Fecha=@pmFecha,IdConcepto=@pmIdConcepto,IdCliente=@pmIdCliente,IdAgencia=@pmIdAgencia,FechaVence=@pmFechaVence,VrSubTotal=@pmVrSubTotal,VrDescuento=@pmVrDescuento,VrImpuesto=@pmVrImpuesto,VrRetencion=@pmVrRetencion,VrReteICA=@pmVrReteICA,VrReteIVA=@pmVrReteIVA,VrCargos=@pmVrCargos ,VrOtrDcto=@pmVrOtrDcto,VrCostos=@pmVrCostos,VrNeto=@pmVrNeto,BaseImp=@pmBaseImp,BaseRet=@pmBaseRet,BaseIca=@pmBaseIca,TarifaIva=@pmTarifaIva,TarifaRet=@pmTarifaRet,TarifaIca=@pmTarifaIca,CodTarIva=@pmCodTarIva,CodTarRet=@pmCodTarRet,CodTarIca=@pmCodTarIca,IdVend=@pmIdVend,TarifaCom=@pmTarifaCom ,CodTarCom=@pmCodTarCom,TipCom=@pmTipCom,Comprobante=@pmComprobante,IdCiaCom=@pmIdCiaCom,Anulado=@pmAnulado,NumDev=@pmNumDev,FecDev=@pmFecDev,Observacion=@pmObservacion,IdEstado=@pmIdEstado,FecUpdate=@pmFecUpdate WHERE TipDoc=@pmTipDoc AND Documento=@pmDocumento AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paUpCausaValesAnu @pmTipDoc VARCHAR(3),@pmDocumento INT,@pmIdCia CHAR(2) ,@pmAnulado BIT,@pmNumDev INT,@pmFecDev SMALLDATETIME,@pmObservacion VARCHAR(250),@pmIdEstado VARCHAR(4) AS UPDATE Trn_CausaVales SET Anulado=@pmAnulado,NumDev=@pmNumDev,FecDev=@pmFecDev ,Observacion=@pmObservacion,IdEstado=@pmIdEstado WHERE TipDoc=@pmTipDoc AND Documento=@pmDocumento AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpDevFvc @pmTipDev VARCHAR(3),@pmDevolucion INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmIdConcepto VARCHAR(4),@pmTipDoc VARCHAR(3),@pmFactura INT,@pmIdCiaDoc CHAR(2),@pmFecDoc SMALLDATETIME,@pmIdCliente VARCHAR(16),@pmIdAgencia VARCHAR(16),@pmVrSubTotal MONEY ,@pmVrDescuento MONEY,@pmVrImpuesto MONEY,@pmVrRetencion MONEY,@pmVrReteICA MONEY,@pmVrReteIVA MONEY,@pmVrCargos MONEY,@pmVrOtrDcto MONEY,@pmVrCostos MONEY,@pmVrNeto MONEY,@pmBaseImp MONEY,@pmBaseRet MONEY,@pmBaseIca MONEY,@pmIdVend VARCHAR(16),@pmTarifaCom DECIMAL(14,4) ,@pmCodTarCom VARCHAR(4),@pmModdDev VARCHAR(10),@pmTipCom VARCHAR(3),@pmComprobante INT,@pmIdCiaCom CHAR(2),@pmObservacion VARCHAR(250),@pmIdEstado VARCHAR(4) AS UPDATE Trn_DevFvc SET Fecha=@pmFecha,IdConcepto=@pmIdConcepto,TipDoc=@pmTipDoc,Factura=@pmFactura,IdCiaDoc=@pmIdCiaDoc,FecDoc=@pmFecDoc,IdCliente=@pmIdCliente,IdAgencia=@pmIdAgencia,VrSubTotal=@pmVrSubTotal,VrDescuento=@pmVrDescuento,VrImpuesto=@pmVrImpuesto,VrRetencion=@pmVrRetencion,VrReteICA=@pmVrReteICA ,VrReteIVA=@pmVrReteIVA,VrCargos=@pmVrCargos,VrOtrDcto=@pmVrOtrDcto,VrCostos=@pmVrCostos,VrNeto=@pmVrNeto,BaseImp=@pmBaseImp,BaseRet=@pmBaseRet,BaseIca=@pmBaseIca,IdVend=@pmIdVend,TarifaCom=@pmTarifaCom,CodTarCom=@pmCodTarCom,ModdDev=@pmModdDev ,TipCom=@pmTipCom,Comprobante=@pmComprobante,IdCiaCom=@pmIdCiaCom,Observacion=@pmObservacion,IdEstado=@pmIdEstado WHERE TipDev=@pmTipDev AND Devolucion=@pmDevolucion AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paUpDiferidos @pmIdDiferido VARCHAR(30),@pmNomDiferido VARCHAR(250),@pmIdTipDif VARCHAR(4),@pmIdGrupo VARCHAR(4),@pmIdCCosto VARCHAR(16),@pmIdSubCos VARCHAR(16) ,@pmIdDep VARCHAR(4),@pmIdRespons VARCHAR(16),@pmIdCia CHAR(2),@pmFecInicio SMALLDATETIME,@pmValorTotal MONEY,@pmVrAdiciones MONEY,@pmVrDisminucion MONEY,@pmNumPeriodos INT ,@pmFecFinAmtza SMALLDATETIME,@pmAjustable BIT,@pmContable BIT,@pmVrAjuInfAcum MONEY,@pmVrAmtzaAcuHis MONEY,@pmVrAmtzaAcum MONEY,@pmVrAjuInfAmtza MONEY,@pmCuotasAmtza INT ,@pmVrCorrMonDifAcu MONEY,@pmCorrMonDiferida MONEY,@pmNumMesesDif INT,@pmFecUltAmtza SMALLDATETIME,@pmCueEnGrupo BIT,@pmIdCuenta VARCHAR(16),@pmIdCueAmortiza VARCHAR(16) ,@pmIdCueAjuDif VARCHAR(16),@pmIdCueCorrDif VARCHAR(16),@pmIdCueAjuAmtza VARCHAR(16),@pmIdCueCorrAA VARCHAR(16),@pmNumDoc VARCHAR(20),@pmReferencia VARCHAR(50) ,@pmDesUbicacion VARCHAR(150),@pmIdEstado VARCHAR(4),@pmFecRetiro SMALLDATETIME,@pmIdCausal VARCHAR(4),@pmComentRetiro VARCHAR(250),@pmComentarios VARCHAR(250) ,@pmTipoAmtza CHAR(1),@pmNitCliente VARCHAR(16),@pmAgenCliente VARCHAR(16),@pmCantGalones DECIMAL (14,4),@pmIdProv VARCHAR(16) AS UPDATE Diferidos SET NomDiferido=@pmNomDiferido,IdTipDif=@pmIdTipDif,IdGrupo=@pmIdGrupo,IdCCosto=@pmIdCCosto,IdSubCos=@pmIdSubCos,IdDep=@pmIdDep ,IdRespons=@pmIdRespons,IdCia=@pmIdCia,FecInicio=@pmFecInicio,ValorTotal=@pmValorTotal,VrAdiciones=@pmVrAdiciones,VrDisminucion=@pmVrDisminucion ,NumPeriodos=@pmNumPeriodos,FecFinAmtza=@pmFecFinAmtza,Ajustable=@pmAjustable,Contable=@pmContable,VrAjuInfAcum=@pmVrAjuInfAcum,VrAmtzaAcuHis=@pmVrAmtzaAcuHis ,VrAmtzaAcum=@pmVrAmtzaAcum,VrAjuInfAmtza=@pmVrAjuInfAmtza,CuotasAmtza=@pmCuotasAmtza,VrCorrMonDifAcu=@pmVrCorrMonDifAcu,CorrMonDiferida=@pmCorrMonDiferida,NumMesesDif=@pmNumMesesDif ,FecUltAmtza=@pmFecUltAmtza,CueEnGrupo=@pmCueEnGrupo,IdCuenta=@pmIdCuenta,IdCueAmortiza=@pmIdCueAmortiza,IdCueAjuDif=@pmIdCueAjuDif,IdCueCorrDif=@pmIdCueCorrDif,IdCueAjuAmtza=@pmIdCueAjuAmtza ,IdCueCorrAA=@pmIdCueCorrAA,NumDoc=@pmNumDoc,Referencia=@pmReferencia,DesUbicacion=@pmDesUbicacion,IdEstado=@pmIdEstado,FecRetiro=@pmFecRetiro,IdCausal=@pmIdCausal ,ComentRetiro=@pmComentRetiro,Comentarios=@pmComentarios,TipoAmtza=@pmTipoAmtza,NitCliente=@pmNitCliente,AgenCliente=@pmAgenCliente,CantGalones=@pmCantGalones,IdProv=@pmIdProv WHERE IdDiferido=@pmIdDiferido GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpGruposMcia @pmIdGrupo VARCHAR(10),@pmGrupoMcia VARCHAR(250),@pmInactivo BIT AS UPDATE GruposMcia SET GrupoMcia=@pmGrupoMcia,Inactivo=@pmInactivo WHERE IdGrupo=@pmIdGrupo GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpMercancias @pmIdMercancia VARCHAR(16),@pmDescripMcia VARCHAR(150),@pmCodigoMcia VARCHAR(16),@pmIdGrupo VARCHAR(10),@pmUndMed VARCHAR(10),@pmIdUnd VARCHAR(4) ,@pmIdNat VARCHAR(4),@pmIdMnjo VARCHAR(4),@pmIdTmcia VARCHAR(4),@pmContenedor BIT,@pmIdProducto VARCHAR(16),@pmIdEstado VARCHAR(4),@pmInactivo BIT,@pmFechaUpdate SMALLDATETIME AS UPDATE Mercancias SET DescripMcia=@pmDescripMcia,CodigoMcia=@pmCodigoMcia,IdGrupo=@pmIdGrupo,UndMed=@pmUndMed,IdUnd=@pmIdUnd,IdNat=@pmIdNat,IdMnjo=@pmIdMnjo,IdTmcia=@pmIdTmcia ,Contenedor=@pmContenedor,IdProducto=@pmIdProducto,IdEstado=@pmIdEstado,Inactivo=@pmInactivo,FechaUpdate=@pmFechaUpdate WHERE IdMercancia=@pmIdMercancia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpRangosPeso @pmIdRango VARCHAR(4),@pmDescripRango VARCHAR(50),@pmValorInicial DECIMAL(14,4),@pmValorFinal DECIMAL(14,4),@pmInactivo BIT AS UPDATE RangosPeso SET DescripRango=@pmDescripRango,ValorInicial=@pmValorInicial,ValorFinal=@pmValorFinal,Inactivo=@pmInactivo WHERE IdRango=@pmIdRango GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paUpTarifasFletes @pmIdOrigen VARCHAR(8),@pmIdDestino VARCHAR(8),@pmItem INT,@pmTipoTarifa VARCHAR(10),@pmTarifClie MONEY,@pmTarifPago MONEY,@pmTarifTabla MONEY,@pmIdMneda VARCHAR(5) ,@pmUndMed VARCHAR(10),@pmNitCliente VARCHAR(16),@pmCdNat VARCHAR(4),@pmCdTipoVeh VARCHAR(4),@pmCdRango VARCHAR(4),@pmInactivo BIT AS UPDATE TarifasFletes SET TipoTarifa=@pmTipoTarifa,TarifClie=@pmTarifClie,TarifPago=@pmTarifPago,TarifTabla=@pmTarifTabla,IdMneda=@pmIdMneda,UndMed=@pmUndMed,NitCliente=@pmNitCliente ,CdNat=@pmCdNat,CdTipoVeh=@pmCdTipoVeh,CdRango=@pmCdRango,Inactivo=@pmInactivo WHERE IdOrigen=@pmIdOrigen AND IdDestino=@pmIdDestino AND Item=@pmItem GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpTiposCarga @pmIdTipCarga VARCHAR(4),@pmTipoCarga VARCHAR(50),@pmInactivo BIT AS UPDATE TiposCarga SET TipoCarga=@pmTipoCarga,Inactivo=@pmInactivo WHERE IdTipCarga=@pmIdTipCarga GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpTiposCnd @pmIdTipoCon VARCHAR(4),@pmTipoContndor VARCHAR(50),@pmInactivo BIT AS UPDATE TiposCnd SET TipoContndor=@pmTipoContndor,Inactivo=@pmInactivo WHERE IdTipoCon=@pmIdTipoCon GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpTiposEsc @pmIdTipoEsc VARCHAR(4),@pmTipoEscolta VARCHAR(50),@pmInactivo BIT AS UPDATE TiposEsc SET TipoEscolta=@pmTipoEscolta,Inactivo=@pmInactivo WHERE IdTipoEsc=@pmIdTipoEsc GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO CREATE PROCEDURE paUpTiposPcnto @pmIdTipoPre VARCHAR(4),@pmPrecinto VARCHAR(50),@pmInactivo BIT AS UPDATE TiposPcnto SET Precinto=@pmPrecinto,Inactivo=@pmInactivo WHERE IdTipoPre=@pmIdTipoPre GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_CxCobrar @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmFecVence SMALLDATETIME,@pmtmVrFactura MONEY,@pmtmTarifDcto DECIMAL(14,4) ,@pmtmTipoDcto CHAR(1),@pmtmTipoBase VARCHAR(10),@pmtmFecLmtDcto SMALLDATETIME,@pmtmReferencia VARCHAR(50),@pmtmDetalle VARCHAR(150) ,@pmtmTipRef VARCHAR(3),@pmtmDocRef INT,@pmtmIdCiaRef CHAR(2),@pmtmTotAbono MONEY,@pmtmFecPlazo SMALLDATETIME AS INSERT INTO tm_CxCobrar (tmNumero,tmItem,tmFecVence,tmVrFactura,tmTarifDcto,tmTipoDcto,tmTipoBase,tmFecLmtDcto,tmReferencia,tmDetalle,tmTipRef,tmDocRef,tmIdCiaRef,tmTotAbono,tmFecPlazo) VALUES (@pmtmNumero,@pmtmItem,@pmtmFecVence,@pmtmVrFactura,@pmtmTarifDcto,@pmtmTipoDcto,@pmtmTipoBase,@pmtmFecLmtDcto,@pmtmReferencia ,@pmtmDetalle,@pmtmTipRef,@pmtmDocRef,@pmtmIdCiaRef,@pmtmTotAbono,@pmtmFecPlazo) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInstm_CxCobrar_Sel @pmTipDoc VARCHAR(3),@pmFactura INT,@pmIdCia CHAR(2) ,@pmtmNumero VARCHAR(5) AS INSERT INTO tm_CxCobrar (tmNumero,tmItem,tmFecVence,tmVrFactura,tmTarifDcto,tmTipoDcto,tmTipoBase,tmFecLmtDcto,tmReferencia,tmDetalle,tmTipRef,tmDocRef,tmIdCiaRef,tmTotAbono,tmFecPlazo) SELECT @pmtmNumero,Item,FechaVence,VrFactura,TarifDcto,TipoDcto,TipoBase,FecLmtDcto,Referencia,Detalle,TipRef,DocRef,IdCiaRef,0,FecPlazoCal FROM Trn_Vencimientos WHERE TipDoc=@pmTipDoc AND Factura=@pmFactura AND IdCia=@pmIdCia GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paInsVencimientos @pmTipDoc VARCHAR(3),@pmFactura INT,@pmIdCia CHAR(2),@pmItem INT,@pmFecha SMALLDATETIME,@pmFechaVence SMALLDATETIME,@pmVrFactura MONEY,@pmVrAbonado MONEY ,@pmIdCliente VARCHAR(16),@pmIdAgencia VARCHAR(16),@pmIdVend VARCHAR(16),@pmComision DECIMAL(14,4),@pmTarifDcto DECIMAL(14,4),@pmTipoDcto CHAR(1),@pmTipoBase VARCHAR(10),@pmFecLmtDcto SMALLDATETIME ,@pmIdConcepto VARCHAR(4),@pmReferencia VARCHAR(50),@pmDetalle VARCHAR(150),@pmTipRef VARCHAR(3),@pmDocRef INT,@pmIdCiaRef CHAR(2),@pmFecUltPago SMALLDATETIME,@pmNumNota INT,@pmIdCiaNot CHAR(2) ,@pmTarifInt DECIMAL(14,4),@pmFecLiqMora SMALLDATETIME,@pmFecPlazoCal SMALLDATETIME AS INSERT INTO Trn_Vencimientos (TipDoc,Factura,IdCia,Item,Fecha,FechaVence,VrFactura,VrAbonado,IdCliente,IdAgencia,IdVend,Comision,TarifDcto,TipoDcto,TipoBase,FecLmtDcto,IdConcepto,Referencia,Detalle ,TipRef,DocRef,IdCiaRef,FecUltPago,NumNota,IdCiaNot,TarifInt,FecLiqMora,FecPlazoCal) VALUES (@pmTipDoc,@pmFactura,@pmIdCia,@pmItem,@pmFecha,@pmFechaVence,@pmVrFactura,@pmVrAbonado,@pmIdCliente,@pmIdAgencia,@pmIdVend,@pmComision,@pmTarifDcto,@pmTipoDcto ,@pmTipoBase,@pmFecLmtDcto,@pmIdConcepto,@pmReferencia,@pmDetalle,@pmTipRef,@pmDocRef,@pmIdCiaRef,@pmFecUltPago,@pmNumNota,@pmIdCiaNot,@pmTarifInt,@pmFecLiqMora,@pmFecPlazoCal) GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryVencimientos @pmTipDoc VARCHAR(3),@pmFactura INT,@pmIdCia CHAR(2),@pmItem INT AS SELECT TipDoc,Factura,IdCia,Item,Fecha,FechaVence,VrFactura,VrAbonado,IdCliente,IdAgencia,IdVend,Comision,TarifDcto,TipoDcto ,TipoBase,FecLmtDcto,IdConcepto,Referencia,Detalle,TipRef,DocRef,IdCiaRef,FecUltPago,NumNota,IdCiaNot,TarifInt,FecLiqMora,FecPlazoCal FROM Trn_Vencimientos WHERE TipDoc=@pmTipDoc AND Factura=@pmFactura AND IdCia=@pmIdCia AND (Item>=ISNULL(@pmItem,0) AND Item<=ISNULL(@pmItem,2147483647)) ORDER BY Item GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryVencimientos_Crd @pmTipDoc VARCHAR(3),@pmFacturaIni INT,@pmFacturaFin INT,@pmIdCia CHAR(2) AS SELECT TipDoc,TipoDoc,Factura,V.IdCia AS CdCia,Compania,Item,Fecha,FechaVence,VrFactura,VrAbonado ,IdCliente,T.RazonSocial AS NombCliente,V.IdAgencia AS IdAgenc,Agencia,CodAgencia,V.IdVend AS CdVend,VN.RazonSocial AS NomVendedor,Comision,TarifDcto,TipoDcto ,TipoBase,FecLmtDcto,V.IdConcepto AS CdConcepto,Concepto,V.Referencia AS Referncia,Detalle,TipRef,DocRef,IdCiaRef,FecUltPago,NumNota,IdCiaNot,TarifInt,FecLiqMora,FecPlazoCal FROM Trn_Vencimientos AS V INNER JOIN Terceros AS T ON V.IdCliente=T.IdTercero INNER JOIN Companias AS CN ON V.IdCia=CN.IdCia INNER JOIN Terceros AS VN ON V.IdVend=VN.IdTercero INNER JOIN Sys_TiposDoc AS TD ON V.TipDoc=TD.IdDoc INNER JOIN Conceptos AS C ON V.IdConcepto=C.IdConcepto LEFT JOIN Agencias AS A ON V.IdAgencia=A.IdAgencia WHERE TipDoc=@pmTipDoc AND Factura BETWEEN @pmFacturaIni AND @pmFacturaFin AND V.IdCia=@pmIdCia ORDER BY Item GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryVencimientosDoc @pmTipDoc VARCHAR(3),@pmFactura INT,@pmIdCia CHAR(2) AS SELECT Item,Fecha,FechaVence,VrFactura,VrAbonado,VrFactura-VrAbonado AS TotalSaldo,IdVend,Comision,TarifDcto,TipoDcto ,TipoBase,FecLmtDcto,IdConcepto,Referencia,Detalle,TipRef,DocRef,IdCiaRef,IdCliente,IdAgencia ,FecUltPago,NumNota,IdCiaNot,TarifInt,FecLiqMora,TipDoc,Factura,IdCia,FecPlazoCal FROM Trn_Vencimientos WHERE TipDoc=@pmTipDoc AND Factura=@pmFactura AND IdCia=@pmIdCia ORDER BY Item GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQrytm_CxCobrar @pmtmNumero VARCHAR(5),@pmtmItem INT AS SELECT tmItem,tmFecVence,tmVrFactura,tmDetalle,tmReferencia,tmTarifDcto,tmTipoDcto ,tmTipoBase,tmFecLmtDcto,tmTipRef,tmDocRef,tmIdCiaRef,tmNumero,tmTotAbono,tmFecPlazo FROM tm_CxCobrar WHERE tmNumero=@pmtmNumero AND (tmItem>=ISNULL(@pmtmItem,0) AND tmItem<=ISNULL(@pmtmItem,2147483647)) ORDER BY tmItem GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS OFF GO CREATE PROCEDURE paQryVencAbonosLrc @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmFecActual SMALLDATETIME,@pmIdCia CHAR(2)=Null,@pmIdCliente VARCHAR(16)=Null ,@pmIdAgencia VARCHAR(16)=Null,@pmIdVend VARCHAR(16)=Null,@pmFechaFacIni SMALLDATETIME=Null,@pmFechaFacFin SMALLDATETIME=Null,@pmIdZona VARCHAR(4)=Null ,@pmIdSzona VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=NULL AS SELECT VA.IdCliente AS NitCliente,T.RazonSocial AS NomCliente,VA.IdAgencia AS CdAgencia,A.Agencia AS NomAgencia,IdCiaFac,CI.Compania AS FactCompania,VA.TipDoc AS TipFact,TD.TipoDoc AS TipoFactura,VA.Factura AS NumFactura,VA.ItemFac AS NumVence ,V.Fecha AS FechaFact,FechaVence,FecPlazoCal,DATEDIFF(day,ISNULL(FecPlazoCal,FechaVence),@pmFecActual) AS DiasMora,VrFactura,VrAbonado,VrFactura-VrAbonado AS SaldoFactura --recibo ,TipRec,TR.TipoDoc AS TipoRecibo,VA.Recibo AS NumRecibo,VA.IdCia AS RecIdCia,CR.Compania AS RecCompania,VA.Item AS RecItem,VA.FecPago AS FechaPago ,DATEDIFF(day,ISNULL(FecPlazoCal,V.FechaVence),VA.FecPago) AS DiasPago,VrAbono ,CASE WHEN VrFactura<>0 AND VrAbono>0 THEN (DATEDIFF(day,V.Fecha,VA.FecPago) *VrAbono)/VrFactura ELSE 0 END AS PromDias,VA.Detalle AS RecDetalle,TipoAplica ,VA.IdVend AS RecCdVend,VR.RazonSocial AS RecVendedor,VrBaseCms,VA.Comision AS TarifComsCobro,VrDescto,VA.Fecha AS RecFecha ,V.IdAgencia AS FactIdAgencia,AF.Agencia AS FactAgencia,V.IdVend AS FactIdVend,VN.RazonSocial AS FactVendedor,V.Comision AS FactComision,V.Referencia AS FactReferencia,V.Detalle AS FactDetalle,TipRef,DocRef,IdCiaRef ,V.IdConcepto AS CdConcepto,Concepto --información del tercero ,T.TipoId AS TercTipo,T.Dv AS TercDv,T.Codigo AS TercCodigo,T.NomCial AS TercNomCial,T.Direccion AS TercDireccion,T.IdLocal AS TercCdCiudad ,L.Localidad AS NomCiudad,L.IdDep AS CdDep,D.Departamento AS TercDpto,T.Telefono AS TercTelefono,T.e_mail AS TercEmail ,T.IdSector AS CdSector,SectorEco --información del cliente ,CLI.IdSzona AS CdSubzona,Subzona,SZ.IdZona AS CdZona,Zona,CLI.IdGrupo AS CdGrupoCli,GrupoClie,VrCupo,VrSaldo,Contrato,CLI.NContrato AS CliNumContrato,CLI.CdBandera AS CliCdBandera,TB.TipoBandera AS CliBandera ,A.CodAgencia AS Cod_agencia,A.DirAgncia AS AgeDireccion,A.TelAgncia AS AgeTelefono,A.FaxAgncia AS AgeFax,A.IdLocal AS AgeIdCiudad,LA.Localidad AS AgeCiudad,LA.IdDep AS AgeCodDep ,DA.Departamento AS AgeDpto,A.Referencia AS AgeReferencia,A.NContrato AS AgeNumContrato,A.CiaCont AS AgeCiaCont,A.CdBandera AS AgeIdBandera,TBA.TipoBandera AS AgeBandera FROM Trn_VencAbonos AS VA INNER JOIN Trn_Vencimientos AS V ON VA.TipDoc=V.TipDoc AND VA.Factura=V.Factura AND VA.IdCiaFac=V.IdCia AND VA.ItemFac=V.Item INNER JOIN Companias AS CR ON VA.IdCia=CR.IdCia INNER JOIN Companias AS CI ON VA.IdCiaFac=CI.IdCia INNER JOIN Sys_TiposDoc AS TD ON VA.TipDoc=TD.IdDoc INNER JOIN Terceros AS T ON VA.IdCliente=T.IdTercero INNER JOIN Agencias AS A ON VA.IdAgencia=A.IdAgencia INNER JOIN Terceros AS VR ON VA.IdVend=VR.IdTercero INNER JOIN Agencias AS AF ON V.IdAgencia=AF.IdAgencia INNER JOIN Terceros AS VN ON V.IdVend=VN.IdTercero INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal INNER JOIN Departamentos AS D ON L.IdDep=D.IdDep INNER JOIN SectoresEco AS SE ON T.IdSector=SE.IdSector INNER JOIN TercCliente AS CLI ON VA.IdCliente=CLI.IdClie INNER JOIN Subzonas AS SZ ON CLI.IdSzona=SZ.IdSzona INNER JOIN Zonas AS Z ON SZ.IdZona=Z.IdZona INNER JOIN GruposCli AS GC ON CLI.IdGrupo=GC.IdGrupo INNER JOIN Localidades AS LA ON A.IdLocal=LA.IdLocal INNER JOIN Departamentos AS DA ON LA.IdDep=DA.IdDep LEFT JOIN Conceptos AS C ON V.IdConcepto=C.IdConcepto LEFT JOIN Sys_TiposDoc AS TR ON VA.TipRec=TR.IdDoc LEFT JOIN TiposBan AS TB ON CLI.CdBandera=TB.IdBandera LEFT JOIN TiposBan AS TBA ON A.CdBandera=TBA.IdBandera WHERE FecPago BETWEEN @pmFechaIni AND @pmFechaFin AND VA.IdCiaFac LIKE ISNULL(@pmIdCia,'%%') AND VA.IdCliente LIKE ISNULL(@pmIdCliente,'%') AND V.IdAgencia LIKE ISNULL(@pmIdAgencia,'%') AND V.IdVend LIKE ISNULL(@pmIdVend,'%') AND CLI.IdSzona LIKE ISNULL(@pmIdSzona,'%') AND SZ.IdZona LIKE ISNULL(@pmIdZona,'%') AND CLI.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND (V.Fecha>=ISNULL(@pmFechaFacIni,CAST('19100101' AS SMALLDATETIME)) AND V.Fecha<=ISNULL(@pmFechaFacFin,CAST('20781230' AS SMALLDATETIME))) ORDER BY T.RazonSocial,VA.FecPago,VA.Factura,VA.ItemFac GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO