if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsActivos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsActivos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsActivos_Anexo]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsActivos_Anexo]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsActivos_Partes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsActivos_Partes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfDetalle]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsAfDetalle]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfMovimiento]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsAfMovimiento]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfMovIngreso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsAfMovIngreso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfMovRetiro]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsAfMovRetiro]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfMovValoriza]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsAfMovValoriza]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsAfPartes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInsAfPartes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfDep]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfDep]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfDep_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfDep_Sel]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfDepPartes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfDepPartes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfDepPartesSel ]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfDepPartesSel ]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfIngreso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfIngreso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfIngreso_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfIngreso_Sel]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfRetiro]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfRetiro]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfRetiro_Dif]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfRetiro_Dif]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_AfRetiro_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paInstm_AfRetiro_Sel]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivos_Anexo]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivos_Anexo]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivos_Cr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivos_Cr]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivos_Partes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivos_Partes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivos_PartesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivos_PartesLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivosBar]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivosBar]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivosDep]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivosDep]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivosHis]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivosHis]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryActivosLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryActivosLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfDepreciaLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfDepreciaLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfDepreciaRes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfDepreciaRes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovimiento]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovimiento]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovIngreso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovIngreso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovIngresoCr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovIngresoCr]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovIngresoLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovIngresoLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovRetiroCr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovRetiroCr]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovRetiroLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovRetiroLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovValoriza]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovValoriza]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovValorizaCr]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovValorizaCr]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfMovValorizaLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfMovValorizaLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryAfPartesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQryAfPartesLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfDep]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfDep]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfDepLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfDepLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfDepPartesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfDepPartesLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfIngreso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfIngreso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfIngresoDso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfIngresoDso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfRetiro]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfRetiro]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_AfRetiroDso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paQrytm_AfRetiroDso]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpActivos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpActivos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpActivos_Anexo]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpActivos_Anexo]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpActivos_Partes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpActivos_Partes]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpActivos_PartesDis]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpActivos_PartesDis]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpActivos_PartesMej]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
 DROP PROCEDURE [dbo].[paUpActivos_PartesMej]
GO

SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivosLta] @pmIdGrupo VARCHAR(4)=Null,@pmIdLinea VARCHAR(4)=Null,@pmIdCCosto VARCHAR(16)=Null,@pmIdInstala VARCHAR(4)=Null
,@pmIdDep VARCHAR(4)=Null,@pmIdRespons VARCHAR(16)=Null,@pmIdCia CHAR(2)=Null,@pmIdProv VARCHAR(16)=Null,@pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null
,@pmNumEntrada INT=Null,@pmIdEstado VARCHAR(4)=Null
 AS 
 SELECT A.IdActivo AS CdActivo,NomActivo,NumSerie,CodInvent,CodBarras,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubcentro,SubCosto,A.IdInstala AS CdInstala,Instlacion,A.IdDep AS CdDep,Dependencia
,IdRespons,TR.RazonSocial AS Responsable,A.IdCia AS CdCia,Compania,IdProv,T.RazonSocial AS Proveedor,FecCompra,FecActivacion,NumOrden,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep
,VrMejoras,VrDisminucion,A.VidaUtil AS Vida_util,UndsProd,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep
,FecUltDep,Marca,Modelo,NumPlaca,NumDoc,Referencia,A.IdEstado AS CdEstado,Estado,FecRetiro,A.IdCausal AS CdCausal,Causal,VrVenta,TipoContable,VrSalvamento,DepPartes,FecCreacion,A.IdUsuario AS IdUsuari,Usuario
--datos de anexo
,IdCuenta,IdCueDep,IdCueGasto,IdCueAjuste,IdCueCorr,IdCueAjuDep,IdCueCorrAD
--datos del proveedor
,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 Activos 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 Instalaciones AS I ON A.IdInstala=I.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Companias AS CI ON A.IdCia=CI.IdCia INNER JOIN Terceros AS T ON A.IdProv=T.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
 LEFT JOIN Activos_Anexo AS AX ON A.IdActivo=AX.IdActivo
 WHERE A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND G.IdLinea LIKE ISNULL(@pmIdLinea,'%')
 AND A.IdCCosto LIKE ISNULL(@pmIdCCosto,'%') AND  A.IdInstala LIKE ISNULL(@pmIdInstala,'%')
 AND A.IdDep LIKE ISNULL(@pmIdDep,'%') AND IdRespons LIKE ISNULL(@pmIdRespons,'%')
 AND  A.IdCia LIKE ISNULL(@pmIdCia,'%%') AND IdProv LIKE ISNULL(@pmIdProv,'%')
 AND (FecActivacion>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND FecActivacion<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME)))
 AND (NumEntrada>=ISNULL(@pmNumEntrada,-1)  AND NumEntrada<=ISNULL(@pmNumEntrada,2147483647))
 AND A.IdEstado LIKE ISNULL(@pmIdEstado,'%')
 ORDER BY NomActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQrytm_AfDepLta] @pmtmNumero VARCHAR(5)
 AS 
 SELECT tmItem,tmIdActivo,NomActivo,tmPartes,(tmCostoIni+tmMejoras+tmAcuAjustes)-tmDisminucion AS TotalBase,tmSalvamento,tmMetodo,tmVidaUtil
,(tmVidaUtil/12) AS VUA,tmUnidades,tmCantidad,tmDepreciaMes,tmDepreciaHis,tmCostoIni,tmMejoras,tmDisminucion,tmDepreciaAcum
,tmAcuAjustes,tmTarifa,tmAjustesInf,tmAjuDepAcum,tmDepreciaAcum+tmAjuDepAcum AS BaseAjuDepAcum,tmAjustesDep,tmEstadoReg,tmObservacion,tmTipoContab
,tmFechaIni,FecFinDep,tmIdCia,Compania,tmCdCCosto,CCosto,tmCdSubCos,SubCosto,tmCdInstala,Instlacion,tmCdDep,Dependencia,tmNitRespons,RazonSocial
,A.IdEstado AS CdEstado,Estado,FecRetiro,Ajustable,Contable,NumPlaca,NumSerie,G.IdLinea AS CdLinea,Linea,A.IdGrupo AS CdGrupo,Grupo,tmCdGrupo
 FROM tm_AfDep AS T INNER JOIN Activos AS A ON T.tmIdActivo=A.IdActivo
 INNER JOIN  AfGrupos AS G ON A.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado
 LEFT JOIN CentroCosto AS CC ON T.tmCdCCosto=CC.IdCCosto LEFT JOIN Instalaciones AS I ON T.tmCdInstala=I.IdInstala
 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  NomActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivos_Cr] @pmIdGrupo VARCHAR(4)=Null,@pmIdLinea VARCHAR(4)=Null,@pmIdCia CHAR(2)=Null
,@pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null
 AS 
 SELECT IdActivo,NomActivo,NumSerie,CodInvent,CodBarras,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubcentro,SubCosto,A.IdInstala AS CdInstala,Instlacion,A.IdDep AS CdDep,Dependencia
,IdRespons,TR.RazonSocial AS Responsable,A.IdCia AS CdCia,Compania,IdProv,T.RazonSocial AS Proveedor,FecCompra,FecActivacion,NumOrden,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep
,VrMejoras,VrDisminucion,A.VidaUtil AS Vida_util,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep
,FecUltDep,Marca,Modelo,NumPlaca,NumDoc,Referencia,A.IdEstado AS CdEstado,Estado,FecRetiro,A.IdCausal AS CdCausal,Causal,VrVenta,TipoContable,VrSalvamento,DepPartes,UndsProd,FecCreacion,A.IdUsuario AS IdUsuari,Usuario
--datos del proveedor
,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 Activos 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 Instalaciones AS I ON A.IdInstala=I.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Companias AS CI ON A.IdCia=CI.IdCia INNER JOIN Terceros AS T ON A.IdProv=T.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.IdCia LIKE ISNULL(@pmIdCia,'%%')
 AND (FecActivacion>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND FecActivacion<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME)))
 ORDER BY IdActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfDepreciaRes]  @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdLinea VARCHAR(4)=Null,@pmIdGrupo VARCHAR(4)=Null
,@pmIdCia CHAR(2)=Null,@pmIdInstala VARCHAR(4)=Null,@pmIdDep VARCHAR(4)=Null,@pmIdRespons VARCHAR(16)=Null,@pmIdCCosto VARCHAR(16)=Null
,@pmIdActivo VARCHAR(30)=Null
 AS 
 SELECT DP.IdActivo AS CdActivo,NomActivo,Fecha,D.Numero AS NumDeprecia,D.IdUsuario AS CdUsuario,Usuario,FechaCrea,D.IdCia AS DepCdCia
,Item,VrCostoIni,DP.VrMejoras AS ValMejoras,DP.VrDisminucion AS ValDisminuc,VrAcuAjustes,VrDepreciaHis,VrDepreciaMes,VrAjustesInf,VrAjustesDep,VrDepreciaAcum
,VrAjuDepAcum,TarifaAju,DP.IdCia AS DetCodCia,CN.Compania AS DetCompania,CdCCosto,CCD.CCosto AS DetCentroCosto,CdSubCos,SCD.SubCosto AS DetSubCentro,CdInstala,INS.Instlacion AS DetInstacion
,CdDep,DE.Dependencia AS DetDependencia,NitRespons,TRD.RazonSocial AS DetNomResponsable,FecIniDep,MesesVida,MetodoDeprec
--datos del activo
,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro,CC.CCosto AS ActCentroCosto,A.IdSubCos AS CdSubcentro,SC.SubCosto AS ActSubCentro,A.IdInstala AS CdInstala,I.Instlacion AS ActInstalacion
,A.IdDep AS CdDep,DEP.Dependencia AS NomDependencia,IdRespons,TR.RazonSocial AS Responsable,A.IdCia AS CdCia,CI.Compania AS NomCia,IdProv,T.RazonSocial AS Proveedor
,FecCompra,FecActivacion,NumOrden,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep,A.VrMejoras AS TotMejoras,A.VrDisminucion AS TotDisminucion,A.VidaUtil AS Vida_util,FecFinDep,MetodoDep
,Ajustable,Contable,CueEnGrupo,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep,FecUltDep,Marca,Modelo,NumPlaca,NumDoc,Referencia,NumSerie,CodInvent,CodBarras
,A.IdEstado AS CdEstado,ED.Estado AS ActEstado,FecRetiro,A.IdCausal AS CdCausal,Causal,VrVenta,FecCreacion,VrSalvamnto,Unidades,Cantidad,Dep_Partes
 FROM  Trn_AfDetalle AS DP  INNER JOIN Trn_AfDeprecia  AS D ON  DP.Numero=D.Numero INNER JOIN adm_Usuarios AS U ON D.IdUsuario=U.IdUsuario
 INNER JOIN Activos AS A ON DP.IdActivo=A.IdActivo  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 Instalaciones AS I ON A.IdInstala=I.IdInstala
 INNER JOIN Dependencias AS DEP ON A.IdDep=DEP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Companias AS CI ON A.IdCia=CI.IdCia INNER JOIN Terceros AS T ON A.IdProv=T.IdTercero
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado 
 INNER JOIN Companias AS CN ON DP.IdCia=CN.IdCia
 LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos LEFT JOIN AfCausales AS CA ON A.IdCausal=CA.IdCausal
 LEFT JOIN CentroCosto AS CCD ON DP.CdCCosto=CCD.IdCCosto LEFT JOIN Instalaciones AS INS ON DP.CdInstala=INS.IdInstala
 LEFT JOIN Dependencias AS DE ON DP.CdDep=DE.IdDep LEFT JOIN Terceros AS TRD ON DP.NitRespons=TRD.IdTercero
 LEFT JOIN SubCentros AS SCD ON DP.CdSubCos=SCD.IdSubCos
 WHERE  D.Fecha BETWEEN  @pmFechaIni  AND @pmFechaFin AND D.Estado<>0  AND DP.IdActivo LIKE ISNULL(@pmIdActivo,'%')
 AND DP.IdCia LIKE ISNULL(@pmIdCia,'%%')  AND  G.IdLinea LIKE ISNULL(@pmIdLinea,'%') AND A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%')  
 AND DP.CdInstala LIKE ISNULL(@pmIdInstala,'%') AND DP.CdDep LIKE ISNULL(@pmIdDep,'%')
 AND DP.NitRespons LIKE ISNULL(@pmIdRespons,'%')  AND DP.CdCCosto LIKE ISNULL(@pmIdCCosto,'%')
 ORDER BY NomActivo,Fecha
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivosHis] @pmIdActivo VARCHAR(30)=Null
 AS 
 SELECT A.IdActivo AS CdActivo,NomActivo,NumSerie,CodInvent,CodBarras,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro,CC.CCosto AS ActCentroCosto
,A.IdSubCos AS CdSubcentro,SC.SubCosto AS ActSubCentro,A.IdInstala AS CdInstala,I.Instlacion AS ActInstalacion,A.IdDep AS CdDep,DEP.Dependencia AS NomDependencia
,IdRespons,TR.RazonSocial AS Responsable,A.IdCia AS CdCia,CI.Compania AS NomCia,IdProv,T.RazonSocial AS Proveedor,FecCompra,FecActivacion,NumOrden,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep
,A.VrMejoras AS TotMejoras,A.VrDisminucion AS TotDisminucion,A.VidaUtil AS Vida_util,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep
,FecUltDep,Marca,Modelo,NumPlaca,NumDoc,Referencia,A.IdEstado AS CdEstado,ED.Estado AS ActEstado,FecRetiro,A.IdCausal AS CdCausal,Causal,VrVenta,TipoContable,VrSalvamento,DepPartes,UndsProd,FecCreacion
--datos de depreciacion
,D.Numero AS NumDeprecia,Fecha,D.IdUsuario AS CdUsuario,Usuario,Item,VrCostoIni,DP.VrMejoras AS ValMejoras,DP.VrDisminucion AS ValDisminuc,VrAcuAjustes,VrDepreciaHis,VrDepreciaMes,VrAjustesInf,VrAjustesDep,VrDepreciaAcum
,VrAjuDepAcum,TarifaAju,DP.IdCia AS DetCodCia,CN.Compania AS DetCompania,CdCCosto,CCD.CCosto AS DetCentroCosto,CdSubCos,SCD.SubCosto AS DetSubCentro,CdInstala,INS.Instlacion AS DetInstacion,CdDep,DE.Dependencia AS DetDependencia
,NitRespons,TRD.RazonSocial AS DetNomResponsable,FecIniDep,MesesVida,MetodoDeprec
 FROM Activos 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 Instalaciones AS I ON A.IdInstala=I.IdInstala
 INNER JOIN Dependencias AS DEP ON A.IdDep=DEP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Companias AS CI ON A.IdCia=CI.IdCia INNER JOIN Terceros AS T ON A.IdProv=T.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_AfDetalle AS DP ON A.IdActivo=DP.IdActivo  LEFT JOIN Trn_AfDeprecia  AS D ON  DP.Numero=D.Numero
 LEFT JOIN adm_Usuarios AS U ON D.IdUsuario=U.IdUsuario
 LEFT JOIN Companias AS CN ON DP.IdCia=CN.IdCia
 LEFT JOIN CentroCosto AS CCD ON DP.CdCCosto=CCD.IdCCosto LEFT JOIN Instalaciones AS INS ON DP.CdInstala=INS.IdInstala
 LEFT JOIN Dependencias AS DE ON DP.CdDep=DE.IdDep LEFT JOIN Terceros AS TRD ON DP.NitRespons=TRD.IdTercero
 LEFT JOIN SubCentros AS SCD ON DP.CdSubCos=SCD.IdSubCos
 WHERE A.IdActivo LIKE ISNULL(@pmIdActivo,'%')
 ORDER BY NomActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfMovValorizaLta] @pmIdMov VARCHAR(4),@pmNumeroIni INT,@pmNumeroFin INT,@pmIdCia CHAR(2)
 AS 
 SELECT M.IdMov AS CdMov,TipoMov,M.Numero AS NumIngreso,M.IdCia AS CdCia,Compania,Fecha,Documento,Anulado,M.Observacion AS Observ,TipCom,Comprobante,IdCiaCom
,M.FecCreacion AS FechaCrea,M.IdUsuario AS CdUsuario,Usuario,Item,V.IdActivo AS CdActivo,NomActivo,Num_Parte,Concepto,Valor
,NitProvee,PV.RazonSocial AS Proveedor,FecAdquis,NumDocmto,DescripParte
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubCentro,SubCosto,A.IdInstala AS CdInstala,Instlacion
,A.IdDep AS CdDep,Dependencia,Marca,Modelo,NumPlaca,Referencia,IdRespons,TR.RazonSocial AS Responsable,A.IdEstado AS CdEstado,Estado
,FecActivacion,VrBaseDep,VrMejoras,VrDisminucion,A.VidaUtil AS MesesVida,FecFinDep,MetodoDep
 FROM Trn_AfMovimiento AS M  INNER JOIN Trn_AfMovValoriza AS V ON M.IdMov=V.IdMov AND M.Numero=V.Numero AND M.IdCia=V.IdCia
 INNER JOIN Companias AS CN ON M.IdCia=CN.IdCia INNER JOIN AfTiposMov AS TM ON M.IdMov=TM.IdMov
 INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario
 INNER JOIN Activos AS A ON V.IdActivo=A.IdActivo 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 Instalaciones AS INS ON A.IdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado  LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos
 LEFT JOIN Terceros AS PV ON V.NitProvee=PV.IdTercero
 WHERE M.IdMov=@pmIdMov AND M.Numero BETWEEN @pmNumeroIni AND @pmNumeroFin AND M.IdCia=@pmIdCia
 ORDER BY Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfDepreciaLta] @pmNumeroIni INT,@pmNumeroFin INT
 AS 
 SELECT D.Numero AS NumDeprecia,Fecha,D.Estado AS EstadoDoc,D.IdUsuario AS CdUsuario,Usuario,FechaCrea,D.IdCia AS CdCia
,Item,DP.IdActivo AS CdActivo,NomActivo,VrCostoIni,DP.VrMejoras AS ValMejoras,DP.VrDisminucion AS ValDisminuc,VrAcuAjustes,VrDepreciaHis,VrDepreciaMes,VrAjustesInf,VrAjustesDep,VrDepreciaAcum
,VrAjuDepAcum,TarifaAju,DP.IdCia AS DetCodCia,Compania,CdCCosto,CCosto,CdSubCos,SubCosto,CdInstala,Instlacion,CdDep,Dependencia,NitRespons,RazonSocial,FecIniDep,MesesVida,MetodoDeprec
,VrSalvamnto,Unidades,Cantidad,Dep_Partes
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,Marca,Modelo,NumPlaca,Referencia,A.IdEstado AS CdEstado,ED.Estado AS NomEstado
,FecActivacion,FecFinDep,Ajustable,Contable
 FROM Trn_AfDeprecia AS D INNER JOIN  Trn_AfDetalle AS DP ON D.Numero=DP.Numero
 INNER JOIN adm_Usuarios AS U ON D.IdUsuario=U.IdUsuario
 INNER JOIN Activos AS A ON DP.IdActivo=A.IdActivo INNER JOIN AfGrupos AS  G ON A.IdGrupo=G.IdGrupo INNER JOIN AfLineas AS L ON G.IdLinea=L.IdLinea
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado INNER JOIN Companias AS CN ON DP.IdCia=CN.IdCia
 INNER JOIN CentroCosto AS CC ON DP.CdCCosto=CC.IdCCosto INNER JOIN Instalaciones AS INS ON DP.CdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DE ON DP.CdDep=DE.IdDep INNER JOIN Terceros AS TR ON DP.NitRespons=TR.IdTercero
 LEFT JOIN SubCentros AS SC ON DP.CdSubCos=SC.IdSubCos
 WHERE D.Numero BETWEEN @pmNumeroIni  AND  @pmNumeroFin
 ORDER BY D.Numero,Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfMovIngresoLta] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
AS 
 SELECT M.IdMov AS CdMov,TipoMov,M.Numero AS NumIngreso,M.IdCia AS CdCia,Compania,Fecha,Documento,Anulado,M.Observacion AS Observ,TipCom,Comprobante,IdCiaCom
,M.FecCreacion AS FechaCrea,M.IdUsuario AS CdUsuario,Usuario
--datos del ingreso
,Item,I.IdActivo AS CdActivo,NomActivo,I.FecActivacion AS FecIngreso,VrBaseDep,I.VrMejoras AS ValMejoras,I.VrDisminucion AS ValDisminucion,I.VrAjuInfAcum AS ValAjuInf
,I.VrDepAcuHis AS ValDepHis,I.VrDepAcuAju AS ValDepAcumAju,I.VrAjuInfDep AS ValAjuInfDep,I.NumMesesDep AS NumMeses,I.FecUltDep AS FechaUltDep,Concepto
,A.VidaUtil AS MesesVidaUtil,FecFinDep,MetodoDep,Ajustable,Contable,NumParte,Cantidad
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubCentro,SubCosto,A.IdInstala AS CdInstala,Instlacion
,A.IdDep AS CdDep,Dependencia,Marca,Modelo,NumPlaca
,IdRespons,TR.RazonSocial AS Responsable,IdProv,TP.RazonSocial AS Proveedor,FecCompra,NumOrden,NumEntrada,A.IdEstado AS CdEstado,Estado
 FROM Trn_AfMovimiento AS M  INNER JOIN Trn_AfMovIngreso AS I ON M.IdMov=I.IdMov AND M.Numero=I.Numero AND M.IdCia=I.IdCia
 INNER JOIN Companias AS CN ON M.IdCia=CN.IdCia INNER JOIN AfTiposMov AS TM ON M.IdMov=TM.IdMov
 INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario
 INNER JOIN Activos AS A ON I.IdActivo=A.IdActivo 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 Instalaciones AS INS ON A.IdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Terceros AS TP ON A.IdProv=TP.IdTercero INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado
 LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos
 WHERE M.IdMov=@pmIdMov AND M.Numero=@pmNumero AND M.IdCia=@pmIdCia
 ORDER BY Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivos_PartesLta] @pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null,@pmIdEstado VARCHAR(4)=Null
 AS 
 SELECT P.IdActivo AS CdActivo,NomActivo,TipoContable,P.Item,DescParte,NumParte,P.FecIniDep,P.MetDeprec,P.VidaUtil,P.UndsProd,P.VrCompra
,P.VrBaseDep,P.VrMejoras,P.VrDisminuc,P.VrSalvamento,P.VrDepAcum,P.VrDepAcumHis,P.VrAjuAcum,P.VrAjuDepAcum,NitProv,T.RazonSocial AS Proveedor,CueEnAfijo,P.IdCuenta AS CdCuenta,IdCueDep,IdCueGasto
,CodNiifAct,CodNiifDep,CodNiifGasto,P.IdEstado AS CdEstado,EP.Estado AS DescEstado,Fec_Retiro,P.FecCreacion,P.IdUsuario AS CdUsuario,Usuario
--datos activo
,NumSerie,CodInvent,CodBarras,G.IdLinea AS CodLinea,Linea,A.IdGrupo AS CodGrupo,Grupo,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubcentro,SubCosto,A.IdInstala AS CdInstala,Instlacion,A.IdDep AS CdDep,Dependencia
,IdRespons,TR.RazonSocial AS Responsable,A.IdCia AS CdCia,Compania,FecActivacion,A.VrMejoras AS AfVrMejoras,A.VrDisminucion,Ajustable,Contable,Marca,Modelo,NumPlaca,NumDoc,Referencia
,A.IdEstado AS AfCodEstado,ET.Estado AS AFEstado,FecRetiro,A.IdCausal AS CdCausal,Causal,VrVenta,DepPartes,A.FecCreacion AS AfFechaCrea
--datos del proveedor
,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 Activos_Partes AS P INNER JOIN Activos AS A ON P.IdActivo=A.IdActivo INNER JOIN Terceros AS T ON P.NitProv=T.IdTercero
 INNER JOIN AfEstados AS EP ON P.IdEstado=EP.IdEstado  INNER JOIN adm_Usuarios AS U ON P.IdUsuario=U.IdUsuario
 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 Instalaciones AS I ON A.IdInstala=I.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Companias AS CI ON A.IdCia=CI.IdCia INNER JOIN AfEstados AS ET ON A.IdEstado=ET.IdEstado 
 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 (P.FecIniDep>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND P.FecIniDep<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME)))
 AND P.IdEstado LIKE ISNULL(@pmIdEstado,'%')
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfMovIngresoCr] @pmIdMov VARCHAR(4),@pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME
,@pmIdCia CHAR(2)=Null,@pmIdGrupo VARCHAR(4)=Null,@pmIdLinea VARCHAR(4)=Null,@pmIdActivo VARCHAR(30)=Null
AS 
 SELECT M.IdMov AS CdMov,TipoMov,M.Numero AS NumIngreso,M.IdCia AS CdCia,Compania,Fecha,Documento,Anulado,M.Observacion AS Observ,TipCom,Comprobante,IdCiaCom
,M.FecCreacion AS FechaCrea,M.IdUsuario AS CdUsuario,Usuario
--datos del ingreso
,Item,I.IdActivo AS CdActivo,NomActivo,I.FecActivacion AS FecIngreso,VrBaseDep,I.VrMejoras AS ValMejoras,I.VrDisminucion AS ValDisminucion,I.VrAjuInfAcum AS ValAjuInf
,I.VrDepAcuHis AS ValDepHis,I.VrDepAcuAju AS ValDepAcumAju,I.VrAjuInfDep AS ValAjuInfDep,I.NumMesesDep AS NumMeses,I.FecUltDep AS FechaUltDep,Concepto
,A.VidaUtil AS MesesVidaUtil,FecFinDep,MetodoDep,Ajustable,Contable,NumParte,Cantidad
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubCentro,SubCosto,A.IdInstala AS CdInstala,Instlacion
,A.IdDep AS CdDep,Dependencia,Marca,Modelo,NumPlaca
,IdRespons,TR.RazonSocial AS Responsable,IdProv,TP.RazonSocial AS Proveedor,FecCompra,NumOrden,NumEntrada,A.IdEstado AS CdEstado,Estado
 FROM Trn_AfMovimiento AS M  INNER JOIN Trn_AfMovIngreso AS I ON M.IdMov=I.IdMov AND M.Numero=I.Numero AND M.IdCia=I.IdCia
 INNER JOIN Companias AS CN ON M.IdCia=CN.IdCia INNER JOIN AfTiposMov AS TM ON M.IdMov=TM.IdMov
 INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario
 INNER JOIN Activos AS A ON I.IdActivo=A.IdActivo 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 Instalaciones AS INS ON A.IdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN Terceros AS TP ON A.IdProv=TP.IdTercero INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado
 LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos
 WHERE M.IdMov=@pmIdMov AND Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND M.IdCia LIKE ISNULL(@pmIdCia,'%%')
 AND A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND G.IdLinea LIKE ISNULL(@pmIdLinea,'%') AND I.IdActivo LIKE ISNULL(@pmIdActivo,'%')
 ORDER BY M.Numero,NomActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfMovRetiroLta] @pmIdMov VARCHAR(4),@pmNumeroIni INT,@pmNumeroFin INT,@pmIdCia CHAR(2)
 AS
 SELECT M.IdMov AS CdMov,TipoMov,M.Numero AS NumRetiro,M.IdCia AS CdCia,Compania,Fecha,Documento,Anulado,M.Observacion AS Observ,TipCom,Comprobante,IdCiaCom
,M.FecCreacion AS FechaCrea,M.IdUsuario AS CdUsuario,Usuario
,Item,R.IdActivo AS CdActivo,NomActivo,R.IdCausal AS CdCausal,Causal,NitTercero, NomTercero, VrCostoIni, R.VrMejoras AS ValMejoras,R.VrDisminucion AS ValDisminuc, VrAcuAjustes, VrDepAcum
,VrAjuDepAcum, VrIngreso,FechaRet, IdCueDeb,IdCueIng,Concepto,NumParte
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubCentro,SubCosto,A.IdInstala AS CdInstala,Instlacion
,A.IdDep AS CdDep,Dependencia,Marca,Modelo,NumPlaca,Referencia,IdRespons,TR.RazonSocial AS Responsable
,FecCompra,NumOrden,NumEntrada,FecActivacion,VrBaseDep,A.VrMejoras AS TotMejoras,A.VrDisminucion AS TotDisminuc,A.VidaUtil AS MesesVida,FecFinDep,MetodoDep,Ajustable,Contable,FecUltDep
,A.IdEstado AS CdEstado,Estado
 FROM Trn_AfMovimiento AS M  INNER JOIN Trn_AfMovRetiro AS R ON M.IdMov=R.IdMov AND M.Numero=R.Numero AND M.IdCia=R.IdCia
 INNER JOIN Companias AS CN ON M.IdCia=CN.IdCia INNER JOIN AfTiposMov AS TM ON M.IdMov=TM.IdMov
 INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario INNER JOIN AfCausales AS CR ON R.IdCausal=CR.IdCausal
 INNER JOIN Activos AS A ON R.IdActivo=A.IdActivo 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 Instalaciones AS INS ON A.IdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado  LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos
 WHERE M.IdMov=@pmIdMov AND M.Numero BETWEEN @pmNumeroIni AND @pmNumeroFin AND M.IdCia=@pmIdCia
 ORDER BY Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfMovRetiroCr] @pmIdMov VARCHAR(4),@pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME
,@pmIdCia CHAR(2)=Null,@pmIdGrupo VARCHAR(4)=Null,@pmIdLinea VARCHAR(4)=Null,@pmIdActivo VARCHAR(30)=Null
 AS
 SELECT M.IdMov AS CdMov,TipoMov,M.Numero AS NumRetiro,M.IdCia AS CdCia,Compania,Fecha,Documento,Anulado,M.Observacion AS Observ,TipCom,Comprobante,IdCiaCom
,M.FecCreacion AS FechaCrea,M.IdUsuario AS CdUsuario,Usuario
,Item,R.IdActivo AS CdActivo,NomActivo,R.IdCausal AS CdCausal,Causal,NitTercero, NomTercero, VrCostoIni, R.VrMejoras AS ValMejoras,R.VrDisminucion AS ValDisminuc, VrAcuAjustes, VrDepAcum
,VrAjuDepAcum, VrIngreso,FechaRet, IdCueDeb, IdCueIng, Concepto,NumParte
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubCentro,SubCosto,A.IdInstala AS CdInstala,Instlacion
,A.IdDep AS CdDep,Dependencia,Marca,Modelo,NumPlaca,Referencia,IdRespons,TR.RazonSocial AS Responsable
,FecCompra,NumOrden,NumEntrada,FecActivacion,VrBaseDep,A.VrMejoras AS TotMejoras,A.VrDisminucion AS TotDisminuc,A.VidaUtil AS MesesVida,FecFinDep,MetodoDep,Ajustable,Contable,FecUltDep
,A.IdEstado AS CdEstado,Estado
 FROM Trn_AfMovimiento AS M  INNER JOIN Trn_AfMovRetiro AS R ON M.IdMov=R.IdMov AND M.Numero=R.Numero AND M.IdCia=R.IdCia
 INNER JOIN Companias AS CN ON M.IdCia=CN.IdCia INNER JOIN AfTiposMov AS TM ON M.IdMov=TM.IdMov
 INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario INNER JOIN AfCausales AS CR ON R.IdCausal=CR.IdCausal
 INNER JOIN Activos AS A ON R.IdActivo=A.IdActivo 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 Instalaciones AS INS ON A.IdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado  LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos
 WHERE M.IdMov=@pmIdMov AND Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND M.IdCia LIKE ISNULL(@pmIdCia,'%%')
 AND A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND G.IdLinea LIKE ISNULL(@pmIdLinea,'%') AND R.IdActivo LIKE ISNULL(@pmIdActivo,'%')
 ORDER BY M.Numero,NomActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfMovValorizaCr] @pmIdMov VARCHAR(4),@pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME
,@pmIdCia CHAR(2)=Null,@pmIdGrupo VARCHAR(4)=Null,@pmIdLinea VARCHAR(4)=Null,@pmIdActivo VARCHAR(30)=Null
 AS 
 SELECT M.IdMov AS CdMov,TipoMov,M.Numero AS NumValoriza,M.IdCia AS CdCia,Compania,Fecha,Documento,Anulado,M.Observacion AS Observ,TipCom,Comprobante,IdCiaCom
,M.FecCreacion AS FechaCrea,M.IdUsuario AS CdUsuario,Usuario,Item,V.IdActivo AS CdActivo,NomActivo,Num_Parte,Concepto,Valor
,NitProvee,PV.RazonSocial AS Proveedor,FecAdquis,NumDocmto,DescripParte
--datos del activo
,NumSerie,A.IdGrupo AS CdGrupo,Grupo,G.IdLinea AS CdLinea,Linea,A.IdCCosto AS CdCentro,CCosto,A.IdSubCos AS CdSubCentro,SubCosto,A.IdInstala AS CdInstala,Instlacion
,A.IdDep AS CdDep,Dependencia,Marca,Modelo,NumPlaca,Referencia,IdRespons,TR.RazonSocial AS Responsable,A.IdEstado AS CdEstado,Estado
,FecActivacion,VrBaseDep,VrMejoras,VrDisminucion,A.VidaUtil AS MesesVida,FecFinDep,MetodoDep
 FROM Trn_AfMovimiento AS M  INNER JOIN Trn_AfMovValoriza AS V ON M.IdMov=V.IdMov AND M.Numero=V.Numero AND M.IdCia=V.IdCia
 INNER JOIN Companias AS CN ON M.IdCia=CN.IdCia INNER JOIN AfTiposMov AS TM ON M.IdMov=TM.IdMov
 INNER JOIN adm_Usuarios AS U ON M.IdUsuario=U.IdUsuario
 INNER JOIN Activos AS A ON V.IdActivo=A.IdActivo 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 Instalaciones AS INS ON A.IdInstala=INS.IdInstala
 INNER JOIN Dependencias AS DP ON A.IdDep=DP.IdDep INNER JOIN Terceros AS TR ON A.IdRespons=TR.IdTercero
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado  LEFT JOIN SubCentros AS SC ON A.IdSubCos=SC.IdSubCos
 LEFT JOIN Terceros AS PV ON  V.NitProvee=PV.IdTercero
 WHERE M.IdMov=@pmIdMov AND  Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND M.IdCia LIKE ISNULL(@pmIdCia,'%%')
 AND A.IdGrupo LIKE ISNULL(@pmIdGrupo,'%') AND G.IdLinea LIKE ISNULL(@pmIdLinea,'%') AND V.IdActivo LIKE ISNULL(@pmIdActivo,'%')
 ORDER BY M.Numero,NomActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsAfMovimiento] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmDocumento VARCHAR(20)
,@pmAnulado BIT,@pmObservacion VARCHAR(250),@pmTipCom VARCHAR(3),@pmComprobante INT,@pmIdCiaCom CHAR(2),@pmTipoCompNiif VARCHAR(3),@pmNumCompNiif INT
,@pmTipoCompFis VARCHAR(3),@pmNumCompFis INT,@pmFecCreacion SMALLDATETIME,@pmIdUsuario VARCHAR(11)
 AS 
 INSERT INTO Trn_AfMovimiento (IdMov,Numero,IdCia,Fecha,Documento,Anulado,Observacion,TipCom,Comprobante,IdCiaCom,FecCreacion,IdUsuario,TipoCompNiif,NumCompNiif,TipoCompFis,NumCompFis)
 VALUES (@pmIdMov,@pmNumero,@pmIdCia,@pmFecha,@pmDocumento,@pmAnulado,@pmObservacion,@pmTipCom,@pmComprobante,@pmIdCiaCom,@pmFecCreacion,@pmIdUsuario,@pmTipoCompNiif,@pmNumCompNiif,@pmTipoCompFis,@pmNumCompFis)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryAfMovimiento] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
 AS 
 SELECT IdMov,Numero,IdCia,Fecha,Documento,Anulado,Observacion,TipCom,Comprobante,IdCiaCom
,TipoCompNiif,NumCompNiif,TipoCompFis,NumCompFis,FecCreacion,IdUsuario
 FROM Trn_AfMovimiento
 WHERE IdMov=@pmIdMov AND Numero=@pmNumero AND IdCia=@pmIdCia
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfDep] @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmIdActivo VARCHAR(30),@pmtmCostoIni MONEY,@pmtmMejoras MONEY
,@pmtmDisminucion MONEY,@pmtmAcuAjustes MONEY,@pmtmDepreciaHis MONEY,@pmtmDepreciaMes MONEY,@pmtmAjustesInf MONEY,@pmtmAjustesDep MONEY
,@pmtmDepreciaAcum MONEY,@pmtmAjuDepAcum MONEY,@pmtmTarifa DECIMAL(14,4),@pmtmIdCia CHAR(2),@pmtmCdCCosto VARCHAR(16)
,@pmtmCdSubCos VARCHAR(16),@pmtmCdInstala VARCHAR(4),@pmtmCdDep VARCHAR(4),@pmtmNitRespons VARCHAR(16),@pmtmVidaUtil INT
,@pmtmMetodo VARCHAR(10),@pmtmFechaIni SMALLDATETIME,@pmtmEstadoReg INT,@pmtmObservacion VARCHAR(150),@pmtmCdGrupo VARCHAR(4)
,@pmtmSalvamento MONEY,@pmtmTipoContab VARCHAR(10),@pmtmPartes BIT,@pmtmUnidades INT,@pmtmCantidad INT
 AS 
 INSERT INTO tm_AfDep (tmNumero,tmItem,tmIdActivo,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepreciaHis,tmDepreciaMes,tmAjustesInf,tmAjustesDep,tmDepreciaAcum,tmAjuDepAcum,tmTarifa
,tmIdCia,tmCdCCosto,tmCdSubCos,tmCdInstala,tmCdDep,tmNitRespons,tmVidaUtil,tmMetodo,tmFechaIni,tmEstadoReg,tmObservacion,tmCdGrupo,tmSalvamento,tmTipoContab,tmPartes,tmUnidades,tmCantidad)
 VALUES (@pmtmNumero,@pmtmItem,@pmtmIdActivo,@pmtmCostoIni,@pmtmMejoras,@pmtmDisminucion,@pmtmAcuAjustes,@pmtmDepreciaHis,@pmtmDepreciaMes,@pmtmAjustesInf,@pmtmAjustesDep
,@pmtmDepreciaAcum,@pmtmAjuDepAcum,@pmtmTarifa,@pmtmIdCia,@pmtmCdCCosto,@pmtmCdSubCos,@pmtmCdInstala,@pmtmCdDep,@pmtmNitRespons,@pmtmVidaUtil,@pmtmMetodo,@pmtmFechaIni,@pmtmEstadoReg,@pmtmObservacion,@pmtmCdGrupo
,@pmtmSalvamento,@pmtmTipoContab,@pmtmPartes,@pmtmUnidades,@pmtmCantidad)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfDep_Sel] @pmtmNumero VARCHAR(5),@pmNumero INT
 AS 
 INSERT INTO tm_AfDep (tmNumero,tmItem,tmIdActivo,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepreciaHis,tmDepreciaMes,tmAjustesInf,tmAjustesDep,tmDepreciaAcum,tmAjuDepAcum,tmTarifa
,tmIdCia,tmCdCCosto,tmCdSubCos,tmCdInstala,tmCdDep,tmNitRespons,tmVidaUtil,tmMetodo,tmFechaIni,tmEstadoReg,tmObservacion,tmCdGrupo,tmSalvamento,tmTipoContab,tmPartes,tmUnidades,tmCantidad)
 SELECT @pmtmNumero,Item,IdActivo,VrCostoIni,VrMejoras,VrDisminucion,VrAcuAjustes,VrDepreciaHis,VrDepreciaMes,VrAjustesInf,VrAjustesDep,VrDepreciaAcum,VrAjuDepAcum,TarifaAju
,IdCia,CdCCosto,CdSubCos,CdInstala,CdDep,NitRespons,MesesVida,MetodoDeprec,FecIniDep,0,'',CdGrupoAct,VrSalvamnto,'0',Dep_Partes,Unidades,Cantidad
 FROM Trn_AfDetalle
 WHERE Numero=@pmNumero
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQrytm_AfDep] @pmtmNumero VARCHAR(5),@pmtmItem INT
 AS 
 SELECT tmNumero,tmItem,tmIdActivo,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepreciaHis,tmDepreciaMes,tmAjustesInf,tmAjustesDep
,tmDepreciaAcum,tmAjuDepAcum,tmTarifa,tmIdCia,tmCdCCosto,tmCdSubCos,tmCdInstala,tmCdDep,tmNitRespons,tmVidaUtil,tmMetodo
,tmFechaIni,tmEstadoReg,tmObservacion,tmCdGrupo,tmSalvamento,tmTipoContab,tmPartes,tmUnidades,tmCantidad
 FROM tm_AfDep
 WHERE tmNumero=@pmtmNumero AND tmItem=@pmtmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paInstm_AfRetiro_Dif] @pmtmNumero VARCHAR(5),@pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
 AS 
 INSERT INTO tm_AfRetiro (tmNumero,tmItem,tmIdActivo,tmIdCausal,tmNitTercero,tmNomTercero,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepAcum
,tmAjuDepAcum,tmVrIngreso,tmFechaRet,tmIdCueDeb,tmIdCueIng,tmConcepto,tmIdCia,tmCdCCosto,tmCdSubCos,tmNitRespons,tmNumParte)
 SELECT  @pmtmNumero,Item,R.IdDiferido,R.IdCausal,'0','',VrCostoIni,R.VrAdiciones,R.VrDisminucion,VrAcuAjustes,VrAmortizaAcum,VrAjuAmtzaAcum,0,FechaRet
,'','',Concepto,R.IdCia,IdCCosto,IdSubCos,IdRespons,0
 FROM Trn_AfDifRetiro AS R INNER JOIN Diferidos AS D ON R.IdDiferido=D.IdDiferido
 WHERE IdMov=@pmIdMov AND Numero=@pmNumero AND R.IdCia=@pmIdCia
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paInstm_AfIngreso_Sel] @pmtmNumero VARCHAR(5),@pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
 AS 
 BEGIN
 INSERT INTO tm_AfIngreso (tmNumero,tmItem,tmIdActivo,tmFecha,tmVrMejoras,tmVrDisminucion,tmVrAjuInfAcum,tmVrDepAcuHis,tmVrDepAcuAju,tmVrAjuInfDep,tmNumMeses
,tmVidaUtil,tmBaseDep,tmMetodo,tmFecUltDep,tmConcepto,tmUnidades,tmSalvamento,tmDepPartes,tmNumParte,tmCantidad)
 SELECT  @pmtmNumero,Item,I.IdActivo,I.FecActivacion,I.VrMejoras,I.VrDisminucion,I.VrAjuInfAcum,I.VrDepAcuHis,I.VrDepAcuAju,I.VrAjuInfDep,I.NumMesesDep
,VidaUtil,VrBaseDep,MetodoDep,I.FecUltDep,Concepto,UndsProd,VrSalvamento,DepPartes,NumParte,Cantidad
 FROM Trn_AfMovIngreso AS I INNER JOIN Activos AS A ON I.IdActivo=A.IdActivo
 WHERE IdMov=@pmIdMov AND Numero=@pmNumero AND I.IdCia=@pmIdCia AND A.DepPartes=0
--registros de partes
 INSERT INTO tm_AfIngreso (tmNumero,tmItem,tmIdActivo,tmFecha,tmVrMejoras,tmVrDisminucion,tmVrAjuInfAcum,tmVrDepAcuHis,tmVrDepAcuAju,tmVrAjuInfDep,tmNumMeses
,tmVidaUtil,tmBaseDep,tmMetodo,tmFecUltDep,tmConcepto,tmUnidades,tmSalvamento,tmDepPartes,tmNumParte,tmCantidad)
 SELECT  @pmtmNumero,I.Item,I.IdActivo,I.FecActivacion,I.VrMejoras,I.VrDisminucion,I.VrAjuInfAcum,I.VrDepAcuHis,I.VrDepAcuAju,I.VrAjuInfDep,I.NumMesesDep
,P.VidaUtil,P.VrBaseDep,P.MetDeprec,I.FecUltDep,Concepto,P.UndsProd,P.VrSalvamento,1,I.NumParte,I.Cantidad
 FROM Trn_AfMovIngreso AS I INNER JOIN Activos AS A ON I.IdActivo=A.IdActivo
 LEFT JOIN Activos_Partes AS P ON I.IdActivo=P.IdActivo AND I.NumParte=P.Item
 WHERE I.IdMov=@pmIdMov AND I.Numero=@pmNumero AND I.IdCia=@pmIdCia AND A.DepPartes=1
 END
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsAfMovIngreso] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2),@pmItem INT,@pmIdActivo VARCHAR(30)
,@pmFecActivacion SMALLDATETIME,@pmVrMejoras MONEY,@pmVrDisminucion MONEY,@pmVrAjuInfAcum MONEY,@pmVrDepAcuHis MONEY
,@pmVrDepAcuAju MONEY,@pmVrAjuInfDep MONEY,@pmNumMesesDep INT,@pmFecUltDep SMALLDATETIME,@pmConcepto VARCHAR(150),@pmNumParte INT,@pmCantidad INT
 AS 
 INSERT INTO Trn_AfMovIngreso (IdMov,Numero,IdCia,Item,IdActivo,FecActivacion,VrMejoras,VrDisminucion,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep,FecUltDep,Concepto,NumParte,Cantidad)
 VALUES (@pmIdMov,@pmNumero,@pmIdCia,@pmItem,@pmIdActivo,@pmFecActivacion,@pmVrMejoras,@pmVrDisminucion,@pmVrAjuInfAcum,@pmVrDepAcuHis,@pmVrDepAcuAju
,@pmVrAjuInfDep,@pmNumMesesDep,@pmFecUltDep,@pmConcepto,@pmNumParte,@pmCantidad)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryAfMovIngreso] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2),@pmItem INT
 AS 
 SELECT IdMov,Numero,IdCia,Item,IdActivo,FecActivacion,VrMejoras,VrDisminucion,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju
,VrAjuInfDep,NumMesesDep,FecUltDep,Concepto,NumParte,Cantidad
 FROM Trn_AfMovIngreso
 WHERE IdMov=@pmIdMov AND Numero=@pmNumero AND IdCia=@pmIdCia 
 AND (Item>=ISNULL(@pmItem,0)  AND Item<=ISNULL(@pmItem,2147483647))
 ORDER BY Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQrytm_AfRetiroDso] @pmtmNumero VARCHAR(5)
 AS 
 SELECT tmItem,tmIdActivo,NomActivo,DepPartes,tmNumParte,tmFechaRet,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes
,tmCostoIni+tmMejoras+tmAcuAjustes-tmDisminucion AS CostoAjustado,tmDepAcum,tmAjuDepAcum
,(tmCostoIni+tmMejoras+tmAcuAjustes-tmDisminucion)-(tmDepAcum+tmAjuDepAcum) AS ValorReal
,tmVrIngreso,tmVrIngreso-((tmCostoIni+tmMejoras+tmAcuAjustes-tmDisminucion)-(tmDepAcum+tmAjuDepAcum)) AS Utilidad
,tmIdCausal,Causal,tmIdCueDeb,tmIdCueIng,tmNitTercero,tmNomTercero,tmConcepto,tmIdCia,tmCdCCosto,tmCdSubCos
 FROM tm_AfRetiro  AS T INNER JOIN Activos AS A ON T.tmIdActivo=A.IdActivo
 INNER JOIN AfCausales AS C ON T.tmIdCausal=C.IdCausal
 WHERE tmNumero=@pmtmNumero 
 ORDER BY  tmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQrytm_AfDepPartesLta] @pmtmNumero VARCHAR(5)
 AS 
 SELECT tmItem,tmIdActivo,NomActivo,tmIdParte,DescParte,NumParte,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepreciaHis
,tmDepreciaMes,tmAjustesInf,tmAjustesDep,tmDepreciaAcum,tmAjuDepAcum,tmTarifa
,tmVidaUtil,tmMetodo,tmFechaIni,tmEstadoReg,tmObservacion,tmSalvamento,tmUnidades,tmCantidad
,P.IdEstado AS CdEstado,Estado,Fec_Retiro
 FROM tm_AfDepPartes AS T INNER JOIN Activos AS A ON T.tmIdActivo=A.IdActivo
 INNER JOIN Activos_Partes AS P ON T.tmIdActivo=P.IdActivo AND T.tmIdParte=P.Item
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado
 WHERE tmNumero=@pmtmNumero
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryAfPartesLta] @pmNumeroIni INT,@pmNumeroFin INT
 AS 
 SELECT D.Numero AS NumDeprecia,D.Item,D.IdActivo AS CdActivo,NomActivo,IdParte,DescParte,NumParte,D.VrBaseDep,D.VrCostoIni,D.VrMejoras,D.VrDisminuc
,D.VrAcumAju,D.VrDepAcum,VrDeprecia,VrDepHis,VrAjusteInf,VrAjuDeprec,VrAcumAjuDep,D.VrSalvamnto,D.Unidades,D.Cantidad
,D.FecIniDep,Vida_Util,D.MetDeprec,P.IdEstado AS CdEstado,ED.Estado AS NomEstado,Fec_Retiro
 FROM Trn_AfPartes AS D INNER JOIN Activos AS A ON D.IdActivo=A.IdActivo 
 INNER JOIN Activos_Partes AS P ON D.IdActivo=P.IdActivo AND D.IdParte=P.Item
 INNER JOIN AfEstados AS ED ON A.IdEstado=ED.IdEstado 
 WHERE D.Numero BETWEEN @pmNumeroIni AND @pmNumeroFin
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryActivos_Partes] @pmIdActivo VARCHAR(30),@pmItem INT
 AS 
 SELECT IdActivo,Item,DescParte,NumParte,FecIniDep,MetDeprec,VidaUtil,UndsProd,VrCompra,VrBaseDep,VrMejoras,VrDisminuc,VrSalvamento,VrDepAcum,VrDepAcumHis
,VrAjuAcum,VrAjuDepAcum,NitProv,IdEstado,FecCreacion,IdUsuario,CueEnAfijo,IdCuenta,IdCueDep,IdCueGasto,CodNiifAct,CodNiifDep,CodNiifGasto,Fec_Retiro
 FROM Activos_Partes
 WHERE IdActivo=@pmIdActivo AND Item=@pmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpActivos_PartesMej] @pmIdActivo VARCHAR(30),@pmItem INT,@pmVrMejoras MONEY,@pmAuto BIT
 AS 
 IF @pmAuto<>0 
  UPDATE Activos_Partes SET  VrMejoras=(VrMejoras+@pmVrMejoras)  WHERE IdActivo=@pmIdActivo AND Item=@pmItem
 ELSE
  UPDATE Activos_Partes SET  VrMejoras=@pmVrMejoras  WHERE IdActivo=@pmIdActivo AND Item=@pmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpActivos_PartesDis] @pmIdActivo VARCHAR(30),@pmItem INT,@pmVrDisminucion MONEY,@pmAuto BIT
 AS 
 IF @pmAuto<>0 
  UPDATE Activos_Partes SET  VrDisminuc=(VrDisminuc+@pmVrDisminucion)  WHERE IdActivo=@pmIdActivo AND Item=@pmItem
 ELSE
  UPDATE Activos_Partes SET  VrDisminuc=@pmVrDisminucion  WHERE IdActivo=@pmIdActivo AND Item=@pmItem
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsActivos_Partes] @pmIdActivo VARCHAR(30),@pmItem INT,@pmDescParte VARCHAR(250),@pmNumParte VARCHAR(30),@pmFecIniDep SMALLDATETIME,@pmMetDeprec VARCHAR(10),@pmVidaUtil INT,@pmUndsProd INT,@pmVrCompra MONEY,@pmVrBaseDep MONEY,@pmVrSalvamento MONEY
,@pmVrDepAcum MONEY,@pmVrDepAcumHis MONEY,@pmNitProv VARCHAR(16),@pmIdEstado VARCHAR(4),@pmFecCreacion SMALLDATETIME,@pmIdUsuario VARCHAR(11),@pmCueEnAfijo BIT,@pmIdCuenta VARCHAR(16),@pmIdCueDep VARCHAR(16),@pmIdCueGasto VARCHAR(16),@pmCodNiifAct VARCHAR(16),@pmCodNiifDep VARCHAR(16),@pmCodNiifGasto VARCHAR(16)
,@pmVrMejoras MONEY,@pmVrDisminuc MONEY,@pmVrAjuAcum MONEY,@pmVrAjuDepAcum MONEY,@pmFec_Retiro SMALLDATETIME
 AS 
 INSERT INTO Activos_Partes (IdActivo,Item,DescParte,NumParte,FecIniDep,MetDeprec,VidaUtil,UndsProd,VrCompra,VrBaseDep,VrMejoras,VrDisminuc,VrSalvamento,VrDepAcum,VrDepAcumHis,VrAjuAcum,VrAjuDepAcum,NitProv,IdEstado,FecCreacion,IdUsuario,CueEnAfijo,IdCuenta,IdCueDep,IdCueGasto,CodNiifAct,CodNiifDep,CodNiifGasto,Fec_Retiro)
 VALUES (@pmIdActivo,@pmItem,@pmDescParte,@pmNumParte,@pmFecIniDep,@pmMetDeprec,@pmVidaUtil,@pmUndsProd,@pmVrCompra,@pmVrBaseDep,@pmVrMejoras,@pmVrDisminuc,@pmVrSalvamento,@pmVrDepAcum,@pmVrDepAcumHis,@pmVrAjuAcum,@pmVrAjuDepAcum,@pmNitProv,@pmIdEstado,@pmFecCreacion,@pmIdUsuario,@pmCueEnAfijo,@pmIdCuenta,@pmIdCueDep,@pmIdCueGasto,@pmCodNiifAct,@pmCodNiifDep,@pmCodNiifGasto,@pmFec_Retiro)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpActivos_Partes] @pmIdActivo VARCHAR(30),@pmItem INT,@pmDescParte VARCHAR(250),@pmNumParte VARCHAR(30),@pmFecIniDep SMALLDATETIME,@pmMetDeprec VARCHAR(10),@pmVidaUtil INT,@pmUndsProd INT,@pmVrCompra MONEY,@pmVrBaseDep MONEY,@pmVrSalvamento MONEY,@pmVrDepAcum MONEY,@pmVrDepAcumHis MONEY
,@pmNitProv VARCHAR(16),@pmIdEstado VARCHAR(4),@pmCueEnAfijo BIT,@pmIdCuenta VARCHAR(16),@pmIdCueDep VARCHAR(16),@pmIdCueGasto VARCHAR(16),@pmCodNiifAct VARCHAR(16),@pmCodNiifDep VARCHAR(16),@pmCodNiifGasto VARCHAR(16)
,@pmVrMejoras MONEY,@pmVrDisminuc MONEY,@pmVrAjuAcum MONEY,@pmVrAjuDepAcum MONEY,@pmFec_Retiro SMALLDATETIME
 AS 
 UPDATE Activos_Partes SET DescParte=@pmDescParte,NumParte=@pmNumParte,FecIniDep=@pmFecIniDep,MetDeprec=@pmMetDeprec,VidaUtil=@pmVidaUtil,UndsProd=@pmUndsProd,VrCompra=@pmVrCompra,VrBaseDep=@pmVrBaseDep,VrSalvamento=@pmVrSalvamento,VrDepAcum=@pmVrDepAcum,VrDepAcumHis=@pmVrDepAcumHis,NitProv=@pmNitProv,IdEstado=@pmIdEstado
,CueEnAfijo=@pmCueEnAfijo,IdCuenta=@pmIdCuenta,IdCueDep=@pmIdCueDep,IdCueGasto=@pmIdCueGasto,CodNiifAct=@pmCodNiifAct,CodNiifDep=@pmCodNiifDep,CodNiifGasto=@pmCodNiifGasto,VrMejoras=@pmVrMejoras,VrDisminuc=@pmVrDisminuc,VrAjuAcum=@pmVrAjuAcum,VrAjuDepAcum=@pmVrAjuDepAcum,Fec_Retiro=@pmFec_Retiro
 WHERE IdActivo=@pmIdActivo AND Item=@pmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsAfDetalle] @pmNumero INT,@pmItem INT,@pmIdActivo VARCHAR(30),@pmVrCostoIni MONEY,@pmVrMejoras MONEY,@pmVrDisminucion MONEY,@pmVrAcuAjustes MONEY,@pmVrDepreciaHis MONEY,@pmVrDepreciaMes MONEY
,@pmVrAjustesInf MONEY,@pmVrAjustesDep MONEY,@pmVrDepreciaAcum MONEY,@pmVrAjuDepAcum MONEY,@pmTarifaAju DECIMAL(14,4),@pmIdCia CHAR(2),@pmCdCCosto VARCHAR(16),@pmCdSubCos VARCHAR(16),@pmCdInstala VARCHAR(4)
,@pmCdDep VARCHAR(4),@pmNitRespons VARCHAR(16),@pmFecIniDep SMALLDATETIME,@pmMesesVida INT,@pmMetodoDeprec VARCHAR(10),@pmCdGrupoAct VARCHAR(4),@pmVrSalvamnto MONEY,@pmUnidades INT,@pmCantidad INT,@pmDep_Partes BIT
 AS 
 INSERT INTO Trn_AfDetalle (Numero,Item,IdActivo,VrCostoIni,VrMejoras,VrDisminucion,VrAcuAjustes,VrDepreciaHis,VrDepreciaMes,VrAjustesInf,VrAjustesDep,VrDepreciaAcum,VrAjuDepAcum,TarifaAju,IdCia,CdCCosto,CdSubCos,CdInstala,CdDep,NitRespons
,FecIniDep,MesesVida,MetodoDeprec,CdGrupoAct,VrSalvamnto,Unidades,Cantidad,Dep_Partes)
 VALUES (@pmNumero,@pmItem,@pmIdActivo,@pmVrCostoIni,@pmVrMejoras,@pmVrDisminucion,@pmVrAcuAjustes,@pmVrDepreciaHis,@pmVrDepreciaMes,@pmVrAjustesInf,@pmVrAjustesDep,@pmVrDepreciaAcum,@pmVrAjuDepAcum
,@pmTarifaAju,@pmIdCia,@pmCdCCosto,@pmCdSubCos,@pmCdInstala,@pmCdDep,@pmNitRespons,@pmFecIniDep,@pmMesesVida,@pmMetodoDeprec,@pmCdGrupoAct,@pmVrSalvamnto,@pmUnidades,@pmCantidad,@pmDep_Partes)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQrytm_AfIngresoDso] @pmtmNumero VARCHAR(5)
 AS 
 SELECT tmItem,tmIdActivo,tmNumParte,NomActivo,tmFecha,tmBaseDep,tmVrMejoras,tmVrDisminucion,tmBaseDep+tmVrMejoras-tmVrDisminucion AS TotalBaseDep
,tmVrAjuInfAcum,tmVrDepAcuHis,tmVrDepAcuAju,tmVrAjuInfDep,tmNumMeses,tmFecUltDep,tmSalvamento,tmMetodo,tmVidaUtil,tmUnidades,tmCantidad
,tmDepPartes,tmConcepto,IdEstado,IdCCosto,IdSubCos,IdInstala,IdDep,IdRespons,IdGrupo
 FROM tm_AfIngreso AS T INNER JOIN Activos AS A ON T.tmIdActivo=A.IdActivo
 WHERE tmNumero=@pmtmNumero
 ORDER BY  tmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfIngreso] @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmIdActivo VARCHAR(30),@pmtmFecha SMALLDATETIME
,@pmtmVrMejoras MONEY,@pmtmVrDisminucion MONEY,@pmtmVrAjuInfAcum MONEY,@pmtmVrDepAcuHis MONEY,@pmtmVrDepAcuAju MONEY
,@pmtmVrAjuInfDep MONEY,@pmtmNumMeses INT,@pmtmVidaUtil INT,@pmtmBaseDep MONEY,@pmtmMetodo VARCHAR(10),@pmtmFecUltDep SMALLDATETIME,@pmtmConcepto VARCHAR(150)
,@pmtmUnidades INT,@pmtmSalvamento MONEY,@pmtmDepPartes BIT,@pmtmNumParte INT,@pmtmCantidad INT
 AS 
 INSERT INTO tm_AfIngreso (tmNumero,tmItem,tmIdActivo,tmFecha,tmVrMejoras,tmVrDisminucion,tmVrAjuInfAcum,tmVrDepAcuHis,tmVrDepAcuAju,tmVrAjuInfDep,tmNumMeses
,tmVidaUtil,tmBaseDep,tmMetodo,tmFecUltDep,tmConcepto,tmUnidades,tmSalvamento,tmDepPartes,tmNumParte,tmCantidad)
 VALUES (@pmtmNumero,@pmtmItem,@pmtmIdActivo,@pmtmFecha,@pmtmVrMejoras,@pmtmVrDisminucion,@pmtmVrAjuInfAcum,@pmtmVrDepAcuHis,@pmtmVrDepAcuAju
,@pmtmVrAjuInfDep,@pmtmNumMeses,@pmtmVidaUtil,@pmtmBaseDep,@pmtmMetodo,@pmtmFecUltDep,@pmtmConcepto,@pmtmUnidades,@pmtmSalvamento,@pmtmDepPartes,@pmtmNumParte,@pmtmCantidad)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQrytm_AfIngreso] @pmtmNumero VARCHAR(5),@pmtmItem INT
 AS 
 SELECT tmNumero,tmItem,tmIdActivo,tmFecha,tmVrMejoras,tmVrDisminucion,tmVrAjuInfAcum,tmVrDepAcuHis
,tmVrDepAcuAju,tmVrAjuInfDep,tmNumMeses,tmVidaUtil,tmBaseDep,tmMetodo,tmFecUltDep,tmConcepto,tmUnidades
,tmSalvamento,tmDepPartes,tmNumParte,tmCantidad
 FROM tm_AfIngreso
 WHERE tmNumero=@pmtmNumero AND tmItem=@pmtmItem
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivos_Anexo] @pmIdActivo VARCHAR(30)
 AS 
 SELECT IdActivo,IdCuenta,IdCueDep,IdCueGasto,IdCueAjuste,IdCueCorr,IdCueAjuDep,IdCueCorrAD,NumPoliza,NitCiaAseg
,FecPoliza,FecVigencia,VrAsegurado,VrCuotaMes,VendPoliza,TeleVend,DiasGarantia,ComentGarantia,Pignorado
,FecIniPignor,FecFinPignor,GarantPignor,Mantenimiento,NumContrato,FecIniCont,FecFinCont,Periodicidad,FecUltMnmto
,NitEmpMnmto,ComentMnmto,DesUbicacion,Comentarios,ComentRetiro,DatosTecnicos,CodNiifAct,CodNiifDep,CodNiifGasto
 FROM Activos_Anexo
 WHERE IdActivo=@pmIdActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paInsActivos_Anexo] @pmIdActivo VARCHAR(30),@pmIdCuenta VARCHAR(16),@pmIdCueDep VARCHAR(16),@pmIdCueGasto VARCHAR(16),@pmIdCueAjuste VARCHAR(16),@pmIdCueCorr VARCHAR(16),@pmIdCueAjuDep VARCHAR(16),@pmIdCueCorrAD VARCHAR(16),@pmNumPoliza VARCHAR(30),@pmNitCiaAseg VARCHAR(16),@pmFecPoliza SMALLDATETIME,@pmFecVigencia SMALLDATETIME,@pmVrAsegurado MONEY,@pmVrCuotaMes MONEY,@pmVendPoliza VARCHAR(150),@pmTeleVend VARCHAR(30),@pmDiasGarantia INT,@pmComentGarantia VARCHAR(250),@pmPignorado BIT
,@pmFecIniPignor SMALLDATETIME,@pmFecFinPignor SMALLDATETIME,@pmGarantPignor VARCHAR(150),@pmMantenimiento BIT,@pmNumContrato VARCHAR(20),@pmFecIniCont SMALLDATETIME,@pmFecFinCont SMALLDATETIME,@pmPeriodicidad INT,@pmFecUltMnmto SMALLDATETIME,@pmNitEmpMnmto VARCHAR(16),@pmComentMnmto VARCHAR(250),@pmDesUbicacion VARCHAR(100),@pmComentarios VARCHAR(250),@pmComentRetiro VARCHAR(250),@pmDatosTecnicos VARCHAR(4000),@pmCodNiifAct VARCHAR(16),@pmCodNiifDep VARCHAR(16),@pmCodNiifGasto VARCHAR(16)
 AS 
 INSERT INTO Activos_Anexo (IdActivo,IdCuenta,IdCueDep,IdCueGasto,IdCueAjuste,IdCueCorr,IdCueAjuDep,IdCueCorrAD,NumPoliza,NitCiaAseg,FecPoliza,FecVigencia,VrAsegurado,VrCuotaMes,VendPoliza,TeleVend,DiasGarantia,ComentGarantia,Pignorado,FecIniPignor,FecFinPignor,GarantPignor,Mantenimiento,NumContrato,FecIniCont,FecFinCont,Periodicidad,FecUltMnmto,NitEmpMnmto,ComentMnmto,DesUbicacion,Comentarios,ComentRetiro,DatosTecnicos,CodNiifAct,CodNiifDep,CodNiifGasto)
 VALUES (@pmIdActivo,@pmIdCuenta,@pmIdCueDep,@pmIdCueGasto,@pmIdCueAjuste,@pmIdCueCorr,@pmIdCueAjuDep,@pmIdCueCorrAD,@pmNumPoliza,@pmNitCiaAseg,@pmFecPoliza,@pmFecVigencia,@pmVrAsegurado,@pmVrCuotaMes,@pmVendPoliza,@pmTeleVend,@pmDiasGarantia,@pmComentGarantia,@pmPignorado,@pmFecIniPignor,@pmFecFinPignor,@pmGarantPignor,@pmMantenimiento,@pmNumContrato,@pmFecIniCont,@pmFecFinCont,@pmPeriodicidad,@pmFecUltMnmto,@pmNitEmpMnmto,@pmComentMnmto,@pmDesUbicacion
,@pmComentarios,@pmComentRetiro,@pmDatosTecnicos,@pmCodNiifAct,@pmCodNiifDep,@pmCodNiifGasto)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paUpActivos_Anexo] @pmIdActivo VARCHAR(30),@pmIdCuenta VARCHAR(16),@pmIdCueDep VARCHAR(16),@pmIdCueGasto VARCHAR(16),@pmIdCueAjuste VARCHAR(16),@pmIdCueCorr VARCHAR(16),@pmIdCueAjuDep VARCHAR(16),@pmIdCueCorrAD VARCHAR(16),@pmNumPoliza VARCHAR(30)
,@pmNitCiaAseg VARCHAR(16),@pmFecPoliza SMALLDATETIME,@pmFecVigencia SMALLDATETIME,@pmVrAsegurado MONEY,@pmVrCuotaMes MONEY,@pmVendPoliza VARCHAR(150),@pmTeleVend VARCHAR(30),@pmDiasGarantia INT,@pmComentGarantia VARCHAR(250),@pmPignorado BIT
,@pmFecIniPignor SMALLDATETIME,@pmFecFinPignor SMALLDATETIME,@pmGarantPignor VARCHAR(150),@pmMantenimiento BIT,@pmNumContrato VARCHAR(20),@pmFecIniCont SMALLDATETIME,@pmFecFinCont SMALLDATETIME,@pmPeriodicidad INT,@pmFecUltMnmto SMALLDATETIME
,@pmNitEmpMnmto VARCHAR(16),@pmComentMnmto VARCHAR(250),@pmDesUbicacion VARCHAR(100),@pmComentarios VARCHAR(250),@pmComentRetiro VARCHAR(250),@pmDatosTecnicos VARCHAR(4000),@pmCodNiifAct VARCHAR(16),@pmCodNiifDep VARCHAR(16),@pmCodNiifGasto VARCHAR(16)
 AS 
 UPDATE Activos_Anexo SET IdCuenta=@pmIdCuenta,IdCueDep=@pmIdCueDep,IdCueGasto=@pmIdCueGasto,IdCueAjuste=@pmIdCueAjuste,IdCueCorr=@pmIdCueCorr,IdCueAjuDep=@pmIdCueAjuDep,IdCueCorrAD=@pmIdCueCorrAD,NumPoliza=@pmNumPoliza,NitCiaAseg=@pmNitCiaAseg
,FecPoliza=@pmFecPoliza,FecVigencia=@pmFecVigencia,VrAsegurado=@pmVrAsegurado,VrCuotaMes=@pmVrCuotaMes,VendPoliza=@pmVendPoliza,TeleVend=@pmTeleVend,DiasGarantia=@pmDiasGarantia,ComentGarantia=@pmComentGarantia,Pignorado=@pmPignorado
,FecIniPignor=@pmFecIniPignor,FecFinPignor=@pmFecFinPignor,GarantPignor=@pmGarantPignor,Mantenimiento=@pmMantenimiento,NumContrato=@pmNumContrato,FecIniCont=@pmFecIniCont,FecFinCont=@pmFecFinCont,Periodicidad=@pmPeriodicidad,FecUltMnmto=@pmFecUltMnmto
,NitEmpMnmto=@pmNitEmpMnmto,ComentMnmto=@pmComentMnmto,DesUbicacion=@pmDesUbicacion,Comentarios=@pmComentarios,ComentRetiro=@pmComentRetiro,DatosTecnicos=@pmDatosTecnicos,CodNiifAct=@pmCodNiifAct,CodNiifDep=@pmCodNiifDep,CodNiifGasto=@pmCodNiifGasto
 WHERE IdActivo=@pmIdActivo
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsAfPartes] @pmNumero INT,@pmItem INT,@pmIdActivo VARCHAR(30),@pmIdParte INT,@pmVrBaseDep MONEY,@pmVrCostoIni MONEY,@pmVrMejoras MONEY,@pmVrDisminuc MONEY,@pmVrAcumAju MONEY,@pmVrDepAcum MONEY,@pmVrDeprecia MONEY
,@pmVrDepHis MONEY,@pmVrAjusteInf MONEY,@pmVrAjuDeprec MONEY,@pmVrAcumAjuDep MONEY,@pmVrSalvamnto MONEY,@pmUnidades INT,@pmCantidad INT,@pmFecIniDep SMALLDATETIME,@pmVida_Util INT,@pmMetDeprec VARCHAR(10)
 AS 
 INSERT INTO Trn_AfPartes (Numero,Item,IdActivo,IdParte,VrBaseDep,VrCostoIni,VrMejoras,VrDisminuc,VrAcumAju,VrDepAcum,VrDeprecia,VrDepHis,VrAjusteInf,VrAjuDeprec,VrAcumAjuDep,VrSalvamnto,Unidades,Cantidad,FecIniDep,Vida_Util,MetDeprec)
 VALUES (@pmNumero,@pmItem,@pmIdActivo,@pmIdParte,@pmVrBaseDep,@pmVrCostoIni,@pmVrMejoras,@pmVrDisminuc,@pmVrAcumAju,@pmVrDepAcum,@pmVrDeprecia,@pmVrDepHis,@pmVrAjusteInf,@pmVrAjuDeprec,@pmVrAcumAjuDep,@pmVrSalvamnto,@pmUnidades
,@pmCantidad,@pmFecIniDep,@pmVida_Util,@pmMetDeprec)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfDepPartesSel] @pmtmNumero VARCHAR(5),@pmNumero INT
 AS 
 INSERT INTO tm_AfDepPartes (tmNumero,tmItem,tmIdActivo,tmIdParte,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepreciaHis,tmDepreciaMes,tmAjustesInf,tmAjustesDep,tmDepreciaAcum
,tmAjuDepAcum,tmTarifa,tmVidaUtil,tmMetodo,tmFechaIni,tmEstadoReg,tmObservacion,tmSalvamento,tmUnidades,tmCantidad)
SELECT @pmtmNumero,Item,IdActivo,IdParte,VrCostoIni,VrMejoras,VrDisminuc,VrAcumAju,VrDepHis,VrDeprecia,VrAjusteInf,VrAjuDeprec,VrDepAcum,VrAcumAjuDep
,0,Vida_Util,MetDeprec,FecIniDep,0,'',VrSalvamnto,Unidades,Cantidad
FROM Trn_AfPartes
WHERE Numero=@pmNumero
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryAfMovValoriza] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
 AS 
 SELECT IdMov,Numero,IdCia,Item,IdActivo,Concepto,Valor,NitProvee,FecAdquis,NumDocmto,DescripParte,Num_Parte
 FROM Trn_AfMovValoriza
 WHERE IdMov=@pmIdMov AND Numero=@pmNumero AND IdCia=@pmIdCia
 ORDER BY Item
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsAfMovValoriza] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
,@pmItem INT,@pmIdActivo VARCHAR(30),@pmConcepto VARCHAR(250),@pmValor MONEY
,@pmNitProvee VARCHAR(16),@pmFecAdquis SMALLDATETIME,@pmNumDocmto VARCHAR(20),@pmDescripParte VARCHAR(150),@pmNum_Parte INT
 AS 
 INSERT INTO Trn_AfMovValoriza (IdMov,Numero,IdCia,Item,IdActivo,Concepto,Valor,NitProvee,FecAdquis,NumDocmto,DescripParte,Num_Parte)
 VALUES (@pmIdMov,@pmNumero,@pmIdCia,@pmItem,@pmIdActivo,@pmConcepto,@pmValor,@pmNitProvee,@pmFecAdquis,@pmNumDocmto,@pmDescripParte,@pmNum_Parte)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfDepPartes] @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmIdActivo VARCHAR(30),@pmtmIdParte INT,@pmtmCostoIni MONEY,@pmtmMejoras MONEY,@pmtmDisminucion MONEY,@pmtmAcuAjustes MONEY,@pmtmDepreciaHis MONEY,@pmtmDepreciaMes MONEY
,@pmtmAjustesInf MONEY,@pmtmAjustesDep MONEY,@pmtmDepreciaAcum MONEY,@pmtmAjuDepAcum MONEY,@pmtmTarifa DECIMAL(14,4),@pmtmVidaUtil INT,@pmtmMetodo VARCHAR(10),@pmtmFechaIni SMALLDATETIME,@pmtmEstadoReg INT,@pmtmObservacion VARCHAR(150)
,@pmtmSalvamento MONEY,@pmtmUnidades INT,@pmtmCantidad INT
 AS 
 INSERT INTO tm_AfDepPartes (tmNumero,tmItem,tmIdActivo,tmIdParte,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepreciaHis,tmDepreciaMes,tmAjustesInf,tmAjustesDep,tmDepreciaAcum,tmAjuDepAcum,tmTarifa,tmVidaUtil,tmMetodo,tmFechaIni,tmEstadoReg,tmObservacion,tmSalvamento,tmUnidades,tmCantidad)
 VALUES (@pmtmNumero,@pmtmItem,@pmtmIdActivo,@pmtmIdParte,@pmtmCostoIni,@pmtmMejoras,@pmtmDisminucion,@pmtmAcuAjustes,@pmtmDepreciaHis,@pmtmDepreciaMes,@pmtmAjustesInf,@pmtmAjustesDep,@pmtmDepreciaAcum,@pmtmAjuDepAcum,@pmtmTarifa,@pmtmVidaUtil
,@pmtmMetodo,@pmtmFechaIni,@pmtmEstadoReg,@pmtmObservacion,@pmtmSalvamento,@pmtmUnidades,@pmtmCantidad)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfRetiro_Sel] @pmtmNumero VARCHAR(5),@pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2)
 AS 
 INSERT INTO tm_AfRetiro (tmNumero,tmItem,tmIdActivo,tmIdCausal,tmNitTercero,tmNomTercero,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepAcum
,tmAjuDepAcum,tmVrIngreso,tmFechaRet,tmIdCueDeb,tmIdCueIng,tmConcepto,tmIdCia,tmCdCCosto,tmCdSubCos,tmNitRespons,tmNumParte)
 SELECT  @pmtmNumero,Item,R.IdActivo,R.IdCausal,NitTercero,NomTercero,VrCostoIni,R.VrMejoras,R.VrDisminucion,VrAcuAjustes,VrDepAcum
,VrAjuDepAcum,VrIngreso,FechaRet,IdCueDeb,IdCueIng,Concepto,R.IdCia,IdCCosto,IdSubCos,IdRespons,NumParte
 FROM Trn_AfMovRetiro AS R INNER JOIN  Activos AS A ON R.IdActivo=A.IdActivo
 WHERE R.IdMov=@pmIdMov AND R.Numero=@pmNumero AND R.IdCia=@pmIdCia
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivosDep] @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME
 AS 
 SELECT IdActivo,NomActivo,IdGrupo,IdCCosto,IdSubCos,IdInstala,IdDep,IdRespons,IdCia,IdProv,FecCompra,FecActivacion
,VrBaseDep,VrMejoras,VrDisminucion,VidaUtil,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo
,FecUltDep,IdEstado,FecRetiro,TipoContable,VrSalvamento,DepPartes,UndsProd
 FROM Activos
 WHERE FecActivacion<=@pmFechaFin 
 AND (IdEstado<>'9999'  OR (IdEstado='9999' AND FecRetiro>=@pmFechaIni))
 ORDER BY IdActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryActivosBar] @pmIdActivo VARCHAR(30),@pmCodBarras VARCHAR(30)
 AS 
 SELECT IdActivo,NomActivo,NumSerie,CodInvent,CodBarras,IdGrupo,IdCCosto,IdSubCos,IdInstala,IdDep,IdRespons,IdCia,IdProv,FecCompra,FecActivacion,NumOrden
,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep,VrMejoras,VrDisminucion,VidaUtil,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo
,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep,FecUltDep,Marca,Modelo,NumPlaca,NumDoc,Referencia,IdEstado,FecRetiro,IdCausal,VrVenta
,TipoContable,VrSalvamento,DepPartes,UndsProd,FecCreacion,IdUsuario
 FROM Activos
 WHERE IdActivo=@pmIdActivo OR (CodBarras=@pmCodBarras AND IdEstado<>'9999')
 ORDER BY  IdActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpActivos] @pmIdActivo VARCHAR(30),@pmNomActivo VARCHAR(250),@pmNumSerie VARCHAR(30),@pmCodInvent VARCHAR(16),@pmCodBarras VARCHAR(20),@pmIdGrupo VARCHAR(4),@pmIdCCosto VARCHAR(16),@pmIdSubCos VARCHAR(16),@pmIdInstala VARCHAR(4),@pmIdDep VARCHAR(4),@pmIdRespons VARCHAR(16),@pmIdCia CHAR(2),@pmIdProv VARCHAR(16)
,@pmFecCompra SMALLDATETIME,@pmFecActivacion SMALLDATETIME,@pmNumOrden INT,@pmIdCiaOrden CHAR(2),@pmNumEntrada INT,@pmIdCiaEnt CHAR(2),@pmVrCompra MONEY,@pmVrComercial MONEY,@pmVrBaseDep MONEY,@pmVrMejoras MONEY,@pmVrDisminucion MONEY,@pmVidaUtil INT,@pmFecFinDep SMALLDATETIME,@pmMetodoDep VARCHAR(10),@pmAjustable BIT
,@pmContable BIT,@pmCueEnGrupo BIT,@pmVrAjuInfAcum MONEY,@pmVrDepAcuHis MONEY,@pmVrDepAcuAju MONEY,@pmVrAjuInfDep MONEY,@pmNumMesesDep INT,@pmFecUltDep SMALLDATETIME,@pmMarca VARCHAR(30),@pmModelo VARCHAR(10),@pmNumPlaca VARCHAR(20),@pmNumDoc VARCHAR(20),@pmReferencia VARCHAR(50),@pmIdEstado VARCHAR(4)
,@pmFecRetiro SMALLDATETIME,@pmIdCausal VARCHAR(4),@pmVrVenta MONEY,@pmTipoContable VARCHAR(10),@pmVrSalvamento MONEY,@pmDepPartes BIT,@pmUndsProd INT
 AS 
 UPDATE Activos SET NomActivo=@pmNomActivo,NumSerie=@pmNumSerie,CodInvent=@pmCodInvent,CodBarras=@pmCodBarras,IdGrupo=@pmIdGrupo,IdCCosto=@pmIdCCosto,IdSubCos=@pmIdSubCos,IdInstala=@pmIdInstala,IdDep=@pmIdDep,IdRespons=@pmIdRespons,IdCia=@pmIdCia,IdProv=@pmIdProv,FecCompra=@pmFecCompra,FecActivacion=@pmFecActivacion
,NumOrden=@pmNumOrden,IdCiaOrden=@pmIdCiaOrden,NumEntrada=@pmNumEntrada,IdCiaEnt=@pmIdCiaEnt,VrCompra=@pmVrCompra,VrComercial=@pmVrComercial,VrBaseDep=@pmVrBaseDep,VrMejoras=@pmVrMejoras,VrDisminucion=@pmVrDisminucion,VidaUtil=@pmVidaUtil,FecFinDep=@pmFecFinDep,MetodoDep=@pmMetodoDep,Ajustable=@pmAjustable
,Contable=@pmContable,CueEnGrupo=@pmCueEnGrupo,VrAjuInfAcum=@pmVrAjuInfAcum,VrDepAcuHis=@pmVrDepAcuHis,VrDepAcuAju=@pmVrDepAcuAju,VrAjuInfDep=@pmVrAjuInfDep,NumMesesDep=@pmNumMesesDep,FecUltDep=@pmFecUltDep,Marca=@pmMarca,Modelo=@pmModelo,NumPlaca=@pmNumPlaca,NumDoc=@pmNumDoc,Referencia=@pmReferencia,IdEstado=@pmIdEstado,FecRetiro=@pmFecRetiro,IdCausal=@pmIdCausal,VrVenta=@pmVrVenta
,TipoContable=@pmTipoContable,VrSalvamento=@pmVrSalvamento,DepPartes=@pmDepPartes,UndsProd=@pmUndsProd
 WHERE IdActivo=@pmIdActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryActivos] @pmIdActivo VARCHAR(30)
 AS 
 SELECT IdActivo,NomActivo,NumSerie,CodInvent,CodBarras,IdGrupo,IdCCosto,IdSubCos,IdInstala,IdDep,IdRespons,IdCia,IdProv,FecCompra,FecActivacion,NumOrden
,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep,VrMejoras,VrDisminucion,VidaUtil,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo
,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep,FecUltDep,Marca,Modelo,NumPlaca,NumDoc,Referencia,IdEstado,FecRetiro,IdCausal,VrVenta
,TipoContable,VrSalvamento,DepPartes,UndsProd,FecCreacion,IdUsuario
 FROM Activos
 WHERE IdActivo=@pmIdActivo
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsActivos] @pmIdActivo VARCHAR(30),@pmNomActivo VARCHAR(250),@pmNumSerie VARCHAR(30),@pmCodInvent VARCHAR(16),@pmCodBarras VARCHAR(20),@pmIdGrupo VARCHAR(4),@pmIdCCosto VARCHAR(16),@pmIdSubCos VARCHAR(16),@pmIdInstala VARCHAR(4),@pmIdDep VARCHAR(4),@pmIdRespons VARCHAR(16),@pmIdCia CHAR(2),@pmIdProv VARCHAR(16),@pmFecCompra SMALLDATETIME
,@pmFecActivacion SMALLDATETIME,@pmNumOrden INT,@pmIdCiaOrden CHAR(2),@pmNumEntrada INT,@pmIdCiaEnt CHAR(2),@pmVrCompra MONEY,@pmVrComercial MONEY,@pmVrBaseDep MONEY,@pmVrMejoras MONEY,@pmVrDisminucion MONEY,@pmVidaUtil INT,@pmFecFinDep SMALLDATETIME,@pmMetodoDep VARCHAR(10),@pmAjustable BIT,@pmContable BIT,@pmCueEnGrupo BIT,@pmVrAjuInfAcum MONEY
,@pmVrDepAcuHis MONEY,@pmVrDepAcuAju MONEY,@pmVrAjuInfDep MONEY,@pmNumMesesDep INT,@pmFecUltDep SMALLDATETIME,@pmMarca VARCHAR(30),@pmModelo VARCHAR(10),@pmNumPlaca VARCHAR(20),@pmNumDoc VARCHAR(20),@pmReferencia VARCHAR(50),@pmIdEstado VARCHAR(4),@pmFecRetiro SMALLDATETIME,@pmIdCausal VARCHAR(4),@pmVrVenta MONEY,@pmTipoContable VARCHAR(10),@pmVrSalvamento MONEY,@pmDepPartes BIT
,@pmUndsProd INT,@pmFecCreacion SMALLDATETIME,@pmIdUsuario VARCHAR(11)
 AS 
 INSERT INTO Activos (IdActivo,NomActivo,NumSerie,CodInvent,CodBarras,IdGrupo,IdCCosto,IdSubCos,IdInstala,IdDep,IdRespons,IdCia,IdProv,FecCompra,FecActivacion,NumOrden,IdCiaOrden,NumEntrada,IdCiaEnt,VrCompra,VrComercial,VrBaseDep,VrMejoras,VrDisminucion,VidaUtil,FecFinDep,MetodoDep,Ajustable,Contable,CueEnGrupo,VrAjuInfAcum,VrDepAcuHis,VrDepAcuAju,VrAjuInfDep,NumMesesDep,FecUltDep,Marca
,Modelo,NumPlaca,NumDoc,Referencia,IdEstado,FecRetiro,IdCausal,VrVenta,FecCreacion,IdUsuario,TipoContable,VrSalvamento,DepPartes,UndsProd)
 VALUES (@pmIdActivo,@pmNomActivo,@pmNumSerie,@pmCodInvent,@pmCodBarras,@pmIdGrupo,@pmIdCCosto,@pmIdSubCos,@pmIdInstala,@pmIdDep,@pmIdRespons,@pmIdCia,@pmIdProv,@pmFecCompra,@pmFecActivacion,@pmNumOrden,@pmIdCiaOrden,@pmNumEntrada,@pmIdCiaEnt,@pmVrCompra,@pmVrComercial,@pmVrBaseDep,@pmVrMejoras,@pmVrDisminucion,@pmVidaUtil,@pmFecFinDep,@pmMetodoDep,@pmAjustable,@pmContable,@pmCueEnGrupo,@pmVrAjuInfAcum,@pmVrDepAcuHis
,@pmVrDepAcuAju,@pmVrAjuInfDep,@pmNumMesesDep,@pmFecUltDep,@pmMarca,@pmModelo,@pmNumPlaca,@pmNumDoc,@pmReferencia,@pmIdEstado,@pmFecRetiro,@pmIdCausal,@pmVrVenta,@pmFecCreacion,@pmIdUsuario,@pmTipoContable,@pmVrSalvamento,@pmDepPartes,@pmUndsProd)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsAfMovRetiro] @pmIdMov VARCHAR(4),@pmNumero INT,@pmIdCia CHAR(2),@pmItem INT,@pmIdActivo VARCHAR(30),@pmIdCausal VARCHAR(4)
,@pmNitTercero VARCHAR(16),@pmNomTercero VARCHAR(150),@pmVrCostoIni MONEY,@pmVrMejoras MONEY,@pmVrDisminucion MONEY,@pmVrAcuAjustes MONEY
,@pmVrDepAcum MONEY,@pmVrAjuDepAcum MONEY,@pmVrIngreso MONEY,@pmFechaRet SMALLDATETIME,@pmIdCueDeb VARCHAR(16),@pmIdCueIng VARCHAR(16),@pmConcepto VARCHAR(250),@pmNumParte INT
 AS 
 INSERT INTO Trn_AfMovRetiro (IdMov,Numero,IdCia,Item,IdActivo,IdCausal,NitTercero,NomTercero,VrCostoIni,VrMejoras,VrDisminucion,VrAcuAjustes,VrDepAcum,VrAjuDepAcum,VrIngreso,FechaRet,IdCueDeb,IdCueIng,Concepto,NumParte)
 VALUES (@pmIdMov,@pmNumero,@pmIdCia,@pmItem,@pmIdActivo,@pmIdCausal,@pmNitTercero,@pmNomTercero,@pmVrCostoIni,@pmVrMejoras,@pmVrDisminucion,@pmVrAcuAjustes
,@pmVrDepAcum,@pmVrAjuDepAcum,@pmVrIngreso,@pmFechaRet,@pmIdCueDeb,@pmIdCueIng,@pmConcepto,@pmNumParte)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInstm_AfRetiro] @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmIdActivo VARCHAR(30),@pmtmIdCausal VARCHAR(4)
,@pmtmNitTercero VARCHAR(16),@pmtmNomTercero VARCHAR(150),@pmtmCostoIni MONEY,@pmtmMejoras MONEY,@pmtmDisminucion MONEY
,@pmtmAcuAjustes MONEY,@pmtmDepAcum MONEY,@pmtmAjuDepAcum MONEY,@pmtmVrIngreso MONEY,@pmtmFechaRet SMALLDATETIME
,@pmtmIdCueDeb VARCHAR(16),@pmtmIdCueIng VARCHAR(16),@pmtmConcepto VARCHAR(250),@pmtmIdCia CHAR(2)
,@pmtmCdCCosto VARCHAR(16),@pmtmCdSubCos VARCHAR(16),@pmtmNitRespons VARCHAR(16),@pmtmNumParte INT
 AS 
 INSERT INTO tm_AfRetiro (tmNumero,tmItem,tmIdActivo,tmIdCausal,tmNitTercero,tmNomTercero,tmCostoIni,tmMejoras,tmDisminucion,tmAcuAjustes,tmDepAcum
,tmAjuDepAcum,tmVrIngreso,tmFechaRet,tmIdCueDeb,tmIdCueIng,tmConcepto,tmIdCia,tmCdCCosto,tmCdSubCos,tmNitRespons,tmNumParte)
 VALUES (@pmtmNumero,@pmtmItem,@pmtmIdActivo,@pmtmIdCausal,@pmtmNitTercero,@pmtmNomTercero,@pmtmCostoIni,@pmtmMejoras
,@pmtmDisminucion,@pmtmAcuAjustes,@pmtmDepAcum,@pmtmAjuDepAcum,@pmtmVrIngreso,@pmtmFechaRet,@pmtmIdCueDeb,@pmtmIdCueIng
,@pmtmConcepto,@pmtmIdCia,@pmtmCdCCosto,@pmtmCdSubCos,@pmtmNitRespons,@pmtmNumParte)
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQrytm_AfRetiro] @pmtmNumero VARCHAR(5),@pmtmItem INT
 AS 
 SELECT tmNumero,tmItem,tmIdActivo,tmIdCausal,tmNitTercero,tmNomTercero,tmCostoIni,tmMejoras
,tmDisminucion,tmAcuAjustes,tmDepAcum,tmAjuDepAcum,tmVrIngreso,tmFechaRet,tmIdCueDeb,tmIdCueIng
,tmConcepto,tmIdCia,tmCdCCosto,tmCdSubCos,tmNitRespons,tmNumParte
 FROM tm_AfRetiro
 WHERE tmNumero=@pmtmNumero AND tmItem=@pmtmItem
GO