if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelMttoEstados]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelMttoEstados] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelMttoOrden]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelMttoOrden] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelMttoSistemas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelMttoSistemas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelMttoTipos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelMttoTipos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelMttoTiposOdt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelMttoTiposOdt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelRequisicionOdt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelRequisicionOdt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelVehLecturas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelVehLecturas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paDelVehPartes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paDelVehPartes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoConceptos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoConceptos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoEstados]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoEstados] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoInspecciones]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoInspecciones] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoOrden]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoOrden] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoOrdenDet]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoOrdenDet] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoOrdenReq]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoOrdenReq] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoSistemas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoSistemas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoTipos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoTipos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsMttoTiposOdt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsMttoTiposOdt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_MttoDetalle]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInstm_MttoDetalle] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_MttoDetalle_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInstm_MttoDetalle_Sel] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_ReqDetalle]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInstm_ReqDetalle] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_ReqDetalle_Mtto]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInstm_ReqDetalle_Mtto] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInstm_ReqDetalle_Sel]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInstm_ReqDetalle_Sel] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsVehLecturas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsVehLecturas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsVehPartes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paInsVehPartes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoConceptos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoConceptos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoConceptosLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoConceptosLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoDiagnFmt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoDiagnFmt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoEstados]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoEstados] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoInspecciones]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoInspecciones] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoInspeccionesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoInspeccionesLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoOrden]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoOrden] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoOrdenDet]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoOrdenDet] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoOrdenFmt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoOrdenFmt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoOrdenLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoOrdenLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoOrdenReqFmt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoOrdenReqFmt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoSistemas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoSistemas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoTipos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoTipos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryMttoTiposOdt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryMttoTiposOdt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRequisicionLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryRequisicionLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRequisicionLtm]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryRequisicionLtm] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRequisicionMtto]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryRequisicionMtto] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRequisicionOrd]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryRequisicionOrd] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRequisicionPen]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryRequisicionPen] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryRequisicionSal]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryRequisicionSal] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_ReqDetalle]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQrytm_ReqDetalle] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehLecturas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryVehLecturas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehLecturasDso]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryVehLecturasDso] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehLecturasId]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryVehLecturasId] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehLecturasVeh]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryVehLecturasVeh] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehPartes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryVehPartes] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryVehPartesLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paQryVehPartesLta] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoConceptos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoConceptos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoEstados]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoEstados] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoInspecciones]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoInspecciones] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoOrden]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoOrden] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoOrdenAnu]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoOrdenAnu] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoOrdenDet]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoOrdenDet] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoSistemas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoSistemas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoTipos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoTipos] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpMttoTiposOdt]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpMttoTiposOdt] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpVehLecturas]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpVehLecturas] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpVehPartes]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) DROP PROCEDURE [dbo].[paUpVehPartes] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoOrden] @pmTipDoc VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmFechaOrden SMALLDATETIME,@pmFechaVence SMALLDATETIME,@pmIdTipoOdt VARCHAR(4),@pmIdCenSer VARCHAR(4),@pmIdVehiculo VARCHAR(10),@pmnRemolque VARCHAR(10) ,@pmIdConductor VARCHAR(16),@pmIdOperario VARCHAR(16),@pmIdSupervisor VARCHAR(16),@pmModalidad VARCHAR(10),@pmkmVehiculo INT,@pmkmRemolque INT,@pmVrServicios MONEY,@pmVrRepuestos MONEY,@pmVrManoObra MONEY,@pmVrOtros MONEY,@pmFechaCierre SMALLDATETIME ,@pmNitCenSer VARCHAR(16),@pmIdEstado VARCHAR(4),@pmAnulado BIT,@pmNumDev INT,@pmFecDev SMALLDATETIME,@pmObservacion VARCHAR(2000),@pmCdEstadoVeh VARCHAR(4),@pmOrigenAdd VARCHAR(10),@pmTimeSys SMALLDATETIME,@pmIdCiaCrea CHAR(2),@pmIdUsuario VARCHAR(11) AS INSERT INTO Trn_MttoOrden (TipDoc,NumOrden,IdCia,Fecha,FechaOrden,FechaVence,IdTipoOdt,IdCenSer,IdVehiculo,nRemolque,IdConductor,IdOperario,IdSupervisor,Modalidad,kmVehiculo,kmRemolque,VrServicios,VrRepuestos,VrManoObra,VrOtros,FechaCierre,NitCenSer,CdEstadoVeh ,IdEstado,Anulado,NumDev,FecDev,Observacion,OrigenAdd,TimeSys,IdCiaCrea,IdUsuario) VALUES (@pmTipDoc,@pmNumOrden,@pmIdCia,@pmFecha,@pmFechaOrden,@pmFechaVence,@pmIdTipoOdt,@pmIdCenSer,@pmIdVehiculo,@pmnRemolque,@pmIdConductor,@pmIdOperario,@pmIdSupervisor,@pmModalidad,@pmkmVehiculo,@pmkmRemolque,@pmVrServicios,@pmVrRepuestos ,@pmVrManoObra,@pmVrOtros,@pmFechaCierre,@pmNitCenSer,@pmCdEstadoVeh,@pmIdEstado,@pmAnulado,@pmNumDev,@pmFecDev,@pmObservacion,@pmOrigenAdd,@pmTimeSys,@pmIdCiaCrea,@pmIdUsuario) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoOrden] @pmTipDoc VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2),@pmFecha SMALLDATETIME,@pmFechaOrden SMALLDATETIME,@pmFechaVence SMALLDATETIME,@pmIdTipoOdt VARCHAR(4),@pmIdCenSer VARCHAR(4),@pmIdVehiculo VARCHAR(10),@pmnRemolque VARCHAR(10) ,@pmIdConductor VARCHAR(16),@pmIdOperario VARCHAR(16),@pmIdSupervisor VARCHAR(16),@pmModalidad VARCHAR(10),@pmkmVehiculo INT,@pmkmRemolque INT,@pmVrServicios MONEY,@pmVrRepuestos MONEY,@pmVrManoObra MONEY,@pmVrOtros MONEY,@pmFechaCierre SMALLDATETIME ,@pmNitCenSer VARCHAR(16),@pmIdEstado VARCHAR(4),@pmAnulado BIT,@pmNumDev INT,@pmFecDev SMALLDATETIME,@pmObservacion VARCHAR(2000),@pmCdEstadoVeh VARCHAR(4),@pmFecUpdate SMALLDATETIME AS UPDATE Trn_MttoOrden SET Fecha=@pmFecha,FechaOrden=@pmFechaOrden,FechaVence=@pmFechaVence,IdTipoOdt=@pmIdTipoOdt,IdCenSer=@pmIdCenSer,IdVehiculo=@pmIdVehiculo,nRemolque=@pmnRemolque,IdConductor=@pmIdConductor,IdOperario=@pmIdOperario,IdSupervisor=@pmIdSupervisor ,Modalidad=@pmModalidad,kmVehiculo=@pmkmVehiculo,kmRemolque=@pmkmRemolque,VrServicios=@pmVrServicios,VrRepuestos=@pmVrRepuestos,VrManoObra=@pmVrManoObra,VrOtros=@pmVrOtros,FechaCierre=@pmFechaCierre,NitCenSer=@pmNitCenSer,IdEstado=@pmIdEstado,CdEstadoVeh=@pmCdEstadoVeh ,Anulado=@pmAnulado,NumDev=@pmNumDev,FecDev=@pmFecDev,Observacion=@pmObservacion,FecUpdate=@pmFecUpdate WHERE TipDoc=@pmTipDoc AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoOrden] @pmTipDoc VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2) AS SELECT TipDoc,NumOrden,IdCia,Fecha,FechaOrden,FechaVence,IdTipoOdt,IdCenSer,IdVehiculo,nRemolque,IdConductor,IdOperario,IdSupervisor,Modalidad,kmVehiculo,kmRemolque,VrServicios,VrRepuestos,VrManoObra,VrOtros,FechaCierre,NitCenSer ,CdEstadoVeh,IdEstado,Anulado,NumDev,FecDev,Observacion,OrigenAdd,TimeSys,FecUpdate,IdCiaCrea,IdUsuario FROM Trn_MttoOrden WHERE TipDoc=@pmTipDoc AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paDelMttoOrden] @pmTipDoc VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2) AS DELETE FROM Trn_MttoOrden WHERE TipDoc=@pmTipDoc AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoOrdenLta] @pmTipDoc VARCHAR(3),@pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmIdCia CHAR(2)=Null ,@pmIdVehiculo VARCHAR(10)=Null AS SELECT NumOrden,O.IdCia AS CdCia,Compania,Fecha,FechaOrden,FechaVence,O.IdVehiculo,kmVehiculo,nRemolque,kmRemolque,O.IdTipoOdt AS CdTipoOdt,TipoOrden,O.IdCenSer AS CdCenSer,CentroServ ,O.IdConductor AS CedConductor,CDT.RazonSocial AS NomConductor,O.IdOperario AS NitOperario,T.RazonSocial AS NomOperario,IdSupervisor,NS.RazonSocial AS Supervisor,O.Modalidad ,VrServicios,VrRepuestos,VrManoObra,VrOtros,FechaCierre,NitCenSer,O.CdEstadoVeh,EV.Estado AS EstadoVeh,O.IdEstado AS CdEstado,ED.Estado AS EstadoDoc ,O.Anulado,NumDev,FecDev,O.Observacion AS Observ,O.TimeSys AS FechaCrea,O.FecUpdate AS FecActualiza,O.IdCiaCrea AS CdCIaCrea,O.OrigenAdd,O.IdUsuario AS CdUsuario,Usuario FROM Trn_MttoOrden AS O INNER JOIN Companias AS CN ON O.IdCia=CN.IdCia INNER JOIN EstadoDoc AS ED ON O.IdEstado=ED.IdEstado INNER JOIN MttoTiposOdt AS TOT ON O.IdTipoOdt=TOT.IdTipoOdt INNER JOIN CentrosServ AS CS ON O.IdCenSer=CS.IdCenSer INNER JOIN Terceros AS T ON O.IdOperario=T.IdTercero INNER JOIN Terceros AS CDT ON O.IdConductor=CDT.IdTercero INNER JOIN Terceros AS NS ON O.IdSupervisor=NS.IdTercero INNER JOIN adm_Usuarios AS U ON O.IdUsuario=U.IdUsuario LEFT JOIN EstadoVeh AS EV ON O.CdEstadoVeh=EV.IdEstado WHERE O.TipDoc=@pmTipDoc AND O.Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND O.IdCia LIKE ISNULL(@pmIdCia,'%%') AND O.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoTiposOdt] @pmIdTipoOdt VARCHAR(4) AS IF @pmIdTipoOdt IS NULL BEGIN SELECT IdTipoOdt,TipoOrden FROM MttoTiposOdt WHERE Inactivo=0 END ELSE BEGIN SELECT IdTipoOdt,TipoOrden,Inactivo FROM MttoTiposOdt WHERE IdTipoOdt=@pmIdTipoOdt END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paDelMttoTiposOdt] @pmIdTipoOdt VARCHAR(4) AS DELETE FROM MttoTiposOdt WHERE IdTipoOdt=@pmIdTipoOdt GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoTiposOdt] @pmIdTipoOdt VARCHAR(4),@pmTipoOrden VARCHAR(50),@pmInactivo BIT AS UPDATE MttoTiposOdt SET TipoOrden=@pmTipoOrden,Inactivo=@pmInactivo WHERE IdTipoOdt=@pmIdTipoOdt GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoTiposOdt] @pmIdTipoOdt VARCHAR(4),@pmTipoOrden VARCHAR(50),@pmInactivo BIT AS INSERT INTO MttoTiposOdt (IdTipoOdt,TipoOrden,Inactivo) VALUES (@pmIdTipoOdt,@pmTipoOrden,@pmInactivo) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoDiagnFmt] @pmTipOdt VARCHAR(3),@pmNumOrdenIni INT,@pmNumOrdenFin INT,@pmIdCia CHAR(2) AS SELECT DG.TipOdt,DG.NumOrden,DG.IdCia AS CdCia,Compania,DG.NumDiagn,FechaDiagn,TipoUnidad,NumVehic,DG.IdOperario,T.RazonSocial AS NomOperario ,DG.FechaCrea,DG.IdUsuario AS CdUsuario,Usuario,FechaOrden,O.IdTipoOdt AS CdTipoOdt,TipoOrden,O.IdCenSer AS CdCenSer,CentroServ ,O.Modalidad,O.kmVehiculo,O.kmRemolque,O.IdEstado AS CdEstado,Estado ,Item,D.IdInspec AS CdInspec,Inspeccion,ValorInspec,UndMedida,NumColor,D.Req_Mtto,D.Intervalo,D.Observacion AS Observ ,I.IdSistema AS CdSistema,Sistema,I.IdMtto AS CdMtto,TipoMtto,TipoDato FROM Trn_MttoDiagn AS DG INNER JOIN Trn_MttoDiagnDet AS D ON DG.TipOdt=D.TipOdt AND DG.NumOrden=D.NumOrden AND DG.IdCia=D.IdCia AND DG.NumDiagn=D.NumDiagn INNER JOIN Companias AS CN ON DG.IdCia=CN.IdCia INNER JOIN Terceros AS T ON DG.IdOperario=T.IdTercero INNER JOIN adm_Usuarios AS U ON DG.IdUsuario=U.IdUsuario INNER JOIN MttoInspecciones AS I ON D.IdInspec=I.IdInspec INNER JOIN MttoSistemas AS S ON I.IdSistema=S.IdSistema INNER JOIN MttoTipos AS TM ON I.IdMtto=TM.IdMtto INNER JOIN Trn_MttoOrden AS O ON DG.TipOdt=O.TipDoc AND DG.NumOrden=O.NumOrden AND DG.IdCia=O.IdCia INNER JOIN MttoTiposOdt AS TOT ON O.IdTipoOdt=TOT.IdTipoOdt INNER JOIN CentrosServ AS CS ON O.IdCenSer=CS.IdCenSer INNER JOIN EstadoDoc AS ED ON O.IdEstado=ED.IdEstado WHERE DG.TipOdt=@pmTipOdt AND DG.NumOrden BETWEEN @pmNumOrdenIni AND @pmNumOrdenFin AND DG.IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoOrdenFmt] @pmTipDoc VARCHAR(3),@pmNumOrdenIni INT,@pmNumOrdenFin INT,@pmIdCia CHAR(2) AS SELECT O.TipDoc AS IdTipDoc,TipoDoc,O.NumOrden,O.IdCia AS CdCia,Compania,Fecha,FechaOrden,FechaVence,O.IdVehiculo,NumVeh,kmVehiculo,nRemolque,kmRemolque,O.IdTipoOdt AS CdTipoOdt,TipoOrden,O.IdCenSer AS CdCenSer,CentroServ ,O.IdConductor AS CedConductor,CDT.RazonSocial AS NomConductor,O.IdOperario AS NitOperario,T.RazonSocial AS NomOperario,IdSupervisor,NSU.RazonSocial AS Supervisor,O.Modalidad ,VrServicios,VrRepuestos,VrManoObra,VrOtros,FechaCierre,NitCenSer,O.CdEstadoVeh,EV.Estado AS EstadoVeh,EV.NColor AS EdvNColor,EV.OutDemand,O.IdEstado AS CdEstado,ED.Estado AS EstadoDoc,ED.NColor AS EdNumColor ,O.Anulado,NumDev,FecDev,O.Observacion AS Observ,O.TimeSys AS FechaCrea,O.FecUpdate AS FecActualiza,O.IdCiaCrea AS CdCIaCrea,O.OrigenAdd,O.IdUsuario AS CdUsuario,Usuario ,D.Item,FechaServ,D.IdConc,D.Descripcion,Concepto,D.Cantidad,D.VrUnitario,UndMed,D.CdMtto,TipoMtto,D.IdEstado AS DetIdEstado,ESV.Estado AS DetEstado,ESV.NColor AS DetNumColor ,D.IdOperario AS DetNitOperario,NOD.RazonSocial AS DetOperario,NumVehic,NumParte,Req_Rep,Req_MO,D.FechaCrea AS DetFecCrea,D.IdUsuario AS DetCdUsuario,CO.IdSistema AS CdSistema,Sistema ,T.TipoId AS TercTipId,T.Dv AS TercDv,T.Codigo AS TercCodigo,T.NomCial AS TercNomCial,T.Direccion AS TercDireccion,T.IdLocal AS TercCdCiudad,L.Localidad AS NomCiudad ,T.Telefono AS TercTelefono,T.e_mail AS TercEmail ,V.IdTipoVeh AS CdTipVeh,TipoVehiculo,V.IdMarca AS CdMarca,M.Marca AS MarcaVeh,V.IdLinea AS CdLinVeh,LineaVeh,V.IdColor AS CdColor,NomColor,V.IdCrceria AS CdCarr,TipoCar,Modelo,Config ,PesoVacio,NumMotor,SerieChasis,NumSerie,CdRemque,NitEmpresa,NE.RazonSocial AS VehNomEmpresa,V.IdPoseedor AS NitPoseedor,NPO.RazonSocial AS Poseedor ,V.IdPpd AS CdTipProp,TipoProp,VehPropio,TipoAfil,NumSoat,FecSoat,VigSoat,NitEmpSoat,NS.RazonSocial AS CiaAsegurdora,V.Descripcion AS VehDescripcion,KmInicial,KmActual,Km2Actual,V.Ubicacion ,V.IdEstado AS VehCdEstado,EVH.Estado AS VehEstado,EVH.NColor AS VehEstColor,EVH.OutDemand AS VehNoDisponible,V.Inactivo AS VehInactivo ,Licencia,CatLicencia,CT.IdLugar AS CdLugar,LugarLic,FecLicencia,VigLicencia FROM Trn_MttoOrden AS O INNER JOIN Companias AS CN ON O.IdCia=CN.IdCia INNER JOIN EstadoDoc AS ED ON O.IdEstado=ED.IdEstado INNER JOIN MttoTiposOdt AS TOT ON O.IdTipoOdt=TOT.IdTipoOdt INNER JOIN CentrosServ AS CS ON O.IdCenSer=CS.IdCenSer INNER JOIN Terceros AS T ON O.IdOperario=T.IdTercero INNER JOIN Terceros AS CDT ON O.IdConductor=CDT.IdTercero INNER JOIN Terceros AS NSU ON O.IdSupervisor=NSU.IdTercero INNER JOIN adm_Usuarios AS U ON O.IdUsuario=U.IdUsuario INNER JOIN Sys_TiposDoc AS TD ON O.TipDoc=TD.IdDoc INNER JOIN Localidades AS L ON T.IdLocal=L.IdLocal INNER JOIN Trn_MttoOrdenDet AS D ON O.TipDoc=D.TipOdt AND O.NumOrden=D.NumOrden AND O.IdCia=D.IdCia INNER JOIN MttoConceptos AS CO ON D.IdConc=CO.IdConc INNER JOIN MttoSistemas AS S ON CO.IdSistema=S.IdSistema LEFT JOIN Terceros AS NOD ON D.IdOperario=NOD.IdTercero LEFT JOIN MttoTipos AS TM ON D.CdMtto=TM.IdMtto LEFT JOIN MttoEstados AS ESV ON D.IdEstado=ESV.IdEstado LEFT JOIN EstadoVeh AS EV ON O.CdEstadoVeh=EV.IdEstado LEFT JOIN Vehiculos AS V ON O.IdVehiculo=V.IdVehiculo LEFT JOIN TiposVeh AS TV ON V.IdTipoVeh=TV.IdTipoVeh LEFT JOIN Marcas AS M ON V.IdMarca=M.IdMarca LEFT JOIN TiposCol AS CL ON V.IdColor=CL.IdColor LEFT JOIN TiposCar AS TC ON V.IdCrceria=TC.IdCrceria LEFT JOIN Terceros AS NPO ON V.IdPoseedor=NPO.IdTercero LEFT JOIN TiposPpt AS TPR ON V.IdPpd=TPR.IdPpd LEFT JOIN MarcasLin AS LV ON V.IdLinea=LV.IdLinea 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 O.IdConductor=CT.IdConductor LEFT JOIN ExpLicencias AS EL ON CT.IdLugar=EL.IdLugar LEFT JOIN EstadoVeh AS EVH ON V.IdEstado=EVH.IdEstado WHERE O.TipDoc=@pmTipDoc AND O.NumOrden BETWEEN @pmNumOrdenIni AND @pmNumOrdenFin AND O.IdCia=@pmIdCia GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryMttoOrdenReqFmt] @pmTipOdt VARCHAR(3),@pmNumOrdenIni INT,@pmNumOrdenFin INT,@pmIdCiaOdt CHAR(2) AS SELECT R.TipDoc,R.Requisicion,R.IdCia AS CdCia,Compania,R.Fecha,Item,TipoItem,D.IdProducto AS CdProducto,D.Descripcion,DescripProd ,D.Cantidad,D.IdUnd AS CdUnd,Unidad,D.VrUnitario,D.CdBodega,Bodega,TipoRef,D.TipOdt,D.NumOrden AS Num_Orden,D.IdCiaOdt,EstadoReq ,D.TipSal,D.NumSalida,D.IdCiaSal,D.CantSalida,D.IdOperario AS CedOperario,T.RazonSocial AS Operario,D.CdCenServ,CentroServ ,D.NitTercero,NC.RazonSocial,D.NumVehic,D.NumParte,D.Observacion AS Observ,D.FechaCrea,D.IdUsuario AS CdUsuario,U.Usuario ,R.Modalidad,NumAprob,FecAprob,CdUsuAprob ,T.TipoId,T.Codigo,T.Dv,T.Telefono,T.TelMovil,T.e_mail FROM Trn_MttoOrdenReq AS D INNER JOIN Trn_Requisicion AS R ON D.TipReq=R.TipDoc AND D.Requisicion=R.Requisicion AND D.IdCia=R.IdCia INNER JOIN Companias AS CI ON R.IdCia=CI.IdCia INNER JOIN ProdMcias AS P ON D.IdProducto=P.IdProducto INNER JOIN UndMed AS UM ON D.IdUnd=UM.IdUnd LEFT JOIN Terceros AS T ON D.IdOperario=T.IdTercero LEFT JOIN Terceros AS NC ON D.NitTercero=NC.IdTercero LEFT JOIN Bodegas AS BG ON D.CdBodega=BG.IdBodega LEFT JOIN CentrosServ AS CS ON D.CdCenServ=CS.IdCenSer LEFT JOIN adm_Usuarios AS U ON D.IdUsuario=U.IdUsuario WHERE D.TipOdt=@pmTipOdt AND D.NumOrden BETWEEN @pmNumOrdenIni AND @pmNumOrdenFin AND D.IdCiaOdt=@pmIdCiaOdt GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryRequisicionMtto] @pmTipDoc VARCHAR(3),@pmRequisicionIni INT,@pmRequisicionFin INT,@pmIdCia CHAR(2) AS SELECT R.TipDoc AS CdTipo,TipoDoc,R.Requisicion,R.IdCia AS CdCia,Compania,Fecha,FechaVence,R.IdConcepto AS CdConcepto,Concepto,R.IdRespons AS CdOperario,T.RazonSocial AS NomOperario ,R.IdCCosto AS CdCCosto,CCosto,R.IdSubCos AS CdSubCos,R.IdDep AS CdDep,Dependencia,VrSubTotal,R.Cantidad AS CantTotal,R.NContrato AS NumOrden,R.IdCiaCont AS CdCiaOrden ,R.NitCliente AS NitCentServ,CL.RazonSocial AS NomCentServ,R.Modalidad,DirEntrega,R.IdLocEnt,Localidad,Departamento,NumAprob,FecAprob,CdUsuAprob,OrigenAdd,R.Anulado ,NomContacto,TelsContacto,EmailContacto,FecDev,R.Observacion AS Observ,R.IdEstado AS CdEstado,Estado,R.TimeSys AS FecCrea,R.FecUpdate,R.IdCiaCrea,R.IdUsuario AS CdUsuario,U.Usuario ,Item,TipoItem,D.IdProducto AS CdProducto,D.Descripcion,DescripProd,D.Cantidad,D.IdUnd AS CdUnd,Unidad,D.VrUnitario,D.CdBodega,Bodega,TipoRef,D.TipOdt,D.NumOrden AS Num_Orden,D.IdCiaOdt,EstadoReq ,D.TipSal,D.NumSalida,D.IdCiaSal,D.CantSalida,D.IdOperario AS DetIdOperario,NP.RazonSocial AS DetOperario,D.CdCenServ,CentroServ,D.NitTercero,NC.RazonSocial ,D.NumVehic,D.NumParte,D.Observacion AS DetObserv,D.FechaCrea AS DetFecCrea,D.IdUsuario AS DetCdUsuario,DU.Usuario AS DetUsuario ,T.TipoId,T.Codigo,T.Dv,T.Telefono,T.TelMovil,T.e_mail FROM Trn_Requisicion AS R INNER JOIN Trn_MttoOrdenReq AS D ON R.TipDoc=D.TipReq AND R.Requisicion=D.Requisicion AND R.IdCia=D.IdCia INNER JOIN Terceros AS T ON R.IdRespons=T.IdTercero INNER JOIN Conceptos AS C ON R.IdConcepto=C.IdConcepto INNER JOIN Companias AS CI ON R.IdCia=CI.IdCia INNER JOIN Sys_TiposDoc AS TD ON R.TipDoc=TD.IdDoc INNER JOIN EstadoDoc AS ED ON R.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON R.IdUsuario=U.IdUsuario INNER JOIN CentroCosto AS CC ON R.IdCCosto=CC.IdCCosto INNER JOIN Dependencias AS DP ON R.IdDep=DP.IdDep INNER JOIN Localidades AS L ON R.IdLocEnt=L.IdLocal INNER JOIN Departamentos AS DT ON L.IdDep=DT.IdDep INNER JOIN ProdMcias AS P ON D.IdProducto=P.IdProducto INNER JOIN UndMed AS UM ON D.IdUnd=UM.IdUnd LEFT JOIN Terceros AS CL ON R.NitCliente =CL.IdTercero LEFT JOIN Terceros AS NP ON D.IdOperario=NP.IdTercero LEFT JOIN Terceros AS NC ON D.NitTercero=NC.IdTercero LEFT JOIN Bodegas AS BG ON D.CdBodega=BG.IdBodega LEFT JOIN CentrosServ AS CS ON D.CdCenServ=CS.IdCenSer LEFT JOIN adm_Usuarios AS DU ON D.IdUsuario=DU.IdUsuario WHERE R.TipDoc=@pmTipDoc AND R.Requisicion BETWEEN @pmRequisicionIni AND @pmRequisicionFin AND R.IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoEstados] @pmIdEstado VARCHAR(4),@pmEstado VARCHAR(50),@pmNColor INT,@pmInactivo BIT AS INSERT INTO MttoEstados (IdEstado,Estado,NColor,Inactivo) VALUES (@pmIdEstado,@pmEstado,@pmNColor,@pmInactivo) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoEstados] @pmIdEstado VARCHAR(4),@pmEstado VARCHAR(50),@pmNColor INT,@pmInactivo BIT AS UPDATE MttoEstados SET Estado=@pmEstado,NColor=@pmNColor,Inactivo=@pmInactivo WHERE IdEstado=@pmIdEstado GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoEstados] @pmIdEstado VARCHAR(4) AS IF @pmIdEstado IS NULL BEGIN SELECT IdEstado,Estado,NColor FROM MttoEstados WHERE Inactivo=0 END ELSE BEGIN SELECT IdEstado,Estado,NColor,Inactivo FROM MttoEstados WHERE IdEstado=@pmIdEstado END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paDelMttoEstados] @pmIdEstado VARCHAR(4) AS DELETE FROM MttoEstados WHERE IdEstado=@pmIdEstado GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInstm_MttoDetalle_Sel] @pmtmNumero VARCHAR(5),@pmTipOdt VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2) AS INSERT INTO tm_MttoDetalle (tmNumero,tmItem,tmFecha,tmIdConc,tmDescripcion,tmCantidad,tmVrUnitario,tmUndMed,tmCdMtto,tmIdEstado,tmIdOperario,tmNumVehic,tmNumParte,tmReqRep,tmReqMO) SELECT @pmtmNumero,Item,FechaServ,IdConc,Descripcion,Cantidad,VrUnitario,UndMed,CdMtto,IdEstado,IdOperario,NumVehic,NumParte,Req_Rep,Req_MO FROM Trn_MttoOrdenDet WHERE TipOdt=@pmTipOdt AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoOrdenDet] @pmTipOdt VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2),@pmItem INT,@pmFechaServ SMALLDATETIME,@pmIdConc VARCHAR(4),@pmDescripcion VARCHAR(1000),@pmCantidad DECIMAL(14,4) ,@pmVrUnitario DECIMAL(16,6),@pmUndMed VARCHAR(50),@pmCdMtto VARCHAR(4),@pmIdEstado VARCHAR(4),@pmIdOperario VARCHAR(16),@pmNumVehic VARCHAR(10),@pmNumParte VARCHAR(20) ,@pmReq_Rep BIT,@pmReq_MO BIT,@pmFechaCrea SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO Trn_MttoOrdenDet (TipOdt,NumOrden,IdCia,Item,FechaServ,IdConc,Descripcion,Cantidad,VrUnitario,UndMed,CdMtto,IdEstado,IdOperario,NumVehic,NumParte,Req_Rep,Req_MO,FechaCrea,IdUsuario) VALUES (@pmTipOdt,@pmNumOrden,@pmIdCia,@pmItem,@pmFechaServ,@pmIdConc,@pmDescripcion,@pmCantidad,@pmVrUnitario,@pmUndMed,@pmCdMtto,@pmIdEstado,@pmIdOperario,@pmNumVehic,@pmNumParte ,@pmReq_Rep,@pmReq_MO,@pmFechaCrea,@pmIdUsuario) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoOrdenDet] @pmTipOdt VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2),@pmItem INT AS SELECT TipOdt,NumOrden,IdCia,Item,FechaServ,IdConc,Descripcion,Cantidad,VrUnitario,UndMed,CdMtto ,IdEstado,IdOperario,NumVehic,NumParte,Req_Rep,Req_MO,FechaCrea,IdUsuario FROM Trn_MttoOrdenDet WHERE TipOdt=@pmTipOdt AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia AND Item=@pmItem GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoOrdenDet] @pmTipOdt VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2),@pmItem INT,@pmFechaServ SMALLDATETIME,@pmIdConc VARCHAR(4),@pmDescripcion VARCHAR(1000) ,@pmCantidad DECIMAL(14,4),@pmVrUnitario DECIMAL(16,6),@pmUndMed VARCHAR(50),@pmCdMtto VARCHAR(4),@pmIdEstado VARCHAR(4) ,@pmIdOperario VARCHAR(16),@pmNumVehic VARCHAR(10),@pmNumParte VARCHAR(20),@pmReq_Rep BIT,@pmReq_MO BIT AS UPDATE Trn_MttoOrdenDet SET FechaServ=@pmFechaServ,IdConc=@pmIdConc,Descripcion=@pmDescripcion,Cantidad=@pmCantidad,VrUnitario=@pmVrUnitario,UndMed=@pmUndMed ,CdMtto=@pmCdMtto,IdEstado=@pmIdEstado,IdOperario=@pmIdOperario,NumVehic=@pmNumVehic,NumParte=@pmNumParte,Req_Rep=@pmReq_Rep,Req_MO=@pmReq_MO WHERE TipOdt=@pmTipOdt AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia AND Item=@pmItem GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryVehPartesLta] @pmIdVehiculo VARCHAR(10)=Null,@pmIdSistema VARCHAR(4)=Null AS SELECT TipoUnidad,P.IdVehiculo AS PlacaVeh,NumParte,DescripParte,P.IdSistema AS CdSistema,Sistema,TipoParte,TipoControl ,Intervalo_km,Intervalo_dias,P.kmActual,P.kmCambio,FechaCambio,CdProdRep,DescripProd,P.IdEstado AS CdEstado,E.Estado,E.NColor ,P.Inactivo,FechaRetiro,P.FechaCrea,P.IdUsuario AS CdUsuario,Usuario --datos del vehículo ,NumVeh,V.IdTipoVeh AS CdTipo,TipoVehiculo,V.IdMarca AS CdMarca,MV.Marca AS MarcaVeh,V.IdColor AS CdColor,CL.NomColor AS Color ,V.IdLinea AS CdLinea,V.Modelo,FecRep,SerieChasis,CdRemque,V.IdPropietario,NP.RazonSocial AS Propietario,FecIngreso,V.KmInicial,V.KmActual AS kmsActual ,V.Km2Actual,NumSoat,FecSoat,VigSoat,V.Descripcion,V.IdEstado AS VehCodEstado,EV.Estado AS VehEstado,EV.NColor AS VehEdoColor,V.Inactivo AS VehInactivo FROM VehPartes AS P INNER JOIN MttoSistemas AS S ON P.IdSistema=S.IdSistema INNER JOIN EstadoSer AS E ON P.IdEstado=E.IdEstado INNER JOIN adm_Usuarios AS U ON P.IdUsuario=U.IdUsuario LEFT JOIN ProdMcias AS M ON P.CdProdRep=M.IdProducto LEFT JOIN Vehiculos AS V ON P.IdVehiculo=V.IdVehiculo LEFT JOIN TiposVeh AS TV ON V.IdTipoVeh=TV.IdTipoVeh LEFT JOIN Marcas AS MV ON V.IdMarca=MV.IdMarca LEFT JOIN TiposCol AS CL ON V.IdColor=CL.IdColor LEFT JOIN Terceros AS NP ON V.IdPropietario=NP.IdTercero LEFT JOIN EstadoVeh AS EV ON V.IdEstado=EV.IdEstado WHERE P.IdVehiculo LIKE ISNULL(@pmIdVehiculo,'%') AND P.IdSistema LIKE ISNULL(@pmIdSistema,'%') GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryVehLecturasDso] @pmTipDoc VARCHAR(3)=Null,@pmpVehiculo VARCHAR(10)=Null,@pmFechaIni SMALLDATETIME=Null,@pmFechaFin SMALLDATETIME=Null AS SELECT TipDoc,L.Numero,L.IdCia AS CdCia,Compania,Item,Fecha,TipoUnidad,pVehiculo,KmsAnterior,KmsActual,Kms2Anterior,Kms2Actual ,TipoLectura,L.Observacion,L.TimeSys,L.IdUsuario AS CdUsuario,Usuario FROM Trn_VehLecturas AS L INNER JOIN adm_Usuarios AS U ON L.IdUsuario=U.IdUsuario INNER JOIN Companias AS C ON L.IdCia=C.IdCia LEFT JOIN Vehiculos AS V ON L.pVehiculo=V.IdVehiculo WHERE pVehiculo LIKE ISNULL(@pmpVehiculo,'%') AND TipDoc LIKE ISNULL(@pmTipDoc,'%') AND (L.Fecha>=ISNULL(@pmFechaIni,CAST('19100101' AS SMALLDATETIME)) AND L.Fecha<=ISNULL(@pmFechaFin,CAST('20781230' AS SMALLDATETIME))) GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paInstm_ReqDetalle_Mtto] @pmTipReq VARCHAR(3),@pmRequisicion INT,@pmIdCia CHAR(2) ,@pmtmNumero VARCHAR(5) AS INSERT INTO tm_ReqDetalle (tmNumero,tmItem,tmCdProducto,tmDescripcion,tmIdSubgrupo,tmCdBodega,tmCantidad ,tmIdUnd,tmVrUnitario,tmTipOrd,tmNumOrden,tmIdCiaOrd,tmTipSal,tmNSalida,tmIdCiaSal,tmFechaSal ,tmCantSalida,tmIdOperario,tmCdCenServ,tmNitTercero,tmNumVehic,tmNumParte,tmEstado,tmObservacion) SELECT @pmtmNumero,Item,IdProducto,Descripcion,'0',CdBodega,Cantidad,IdUnd,CAST (VrUnitario AS MONEY),TipOdt,NumOrden,IdCiaOdt ,TipSal,NumSalida,IdCiaSal,Null,CantSalida,IdOperario,CdCenServ,NitTercero,NumVehic,NumParte,EstadoReq,Observacion FROM Trn_MttoOrdenReq WHERE TipReq=@pmTipReq AND Requisicion=@pmRequisicion AND IdCia=@pmIdCia GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paInstm_ReqDetalle_Sel] @pmTipDoc VARCHAR(3),@pmRequisicion INT,@pmIdCia CHAR(2) ,@pmtmNumero VARCHAR(5) AS INSERT INTO tm_ReqDetalle (tmNumero,tmItem,tmCdProducto,tmDescripcion,tmIdSubgrupo,tmCdBodega,tmCantidad ,tmIdUnd,tmVrUnitario,tmTipOrd,tmNumOrden,tmIdCiaOrd,tmTipSal,tmNSalida,tmIdCiaSal,tmFechaSal ,tmCantSalida,tmIdOperario,tmCdCenServ,tmNitTercero,tmNumVehic,tmNumParte,tmEstado,tmObservacion) SELECT @pmtmNumero,Item,CdProducto,Descripcion,IdSubgrupo,CdBodega,Cantidad,IdUnd,VrUnitario,TipOrd,NumOrden,IdCiaOrd,TipSal,NSalida,IdCiaSal,FechaSal ,0,'0','','0','','',0,'' FROM Trn_ReqDetalle WHERE TipDoc=@pmTipDoc AND Requisicion=@pmRequisicion AND IdCia=@pmIdCia GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInstm_ReqDetalle] @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmCdProducto VARCHAR(16),@pmtmDescripcion VARCHAR(250) ,@pmtmIdSubgrupo VARCHAR(8),@pmtmCdBodega VARCHAR(4),@pmtmCantidad DECIMAL(14,4),@pmtmIdUnd VARCHAR(4),@pmtmVrUnitario MONEY ,@pmtmTipOrd VARCHAR(3),@pmtmNumOrden INT,@pmtmIdCiaOrd CHAR(2),@pmtmTipSal VARCHAR(3),@pmtmNSalida INT,@pmtmIdCiaSal CHAR(2),@pmtmFechaSal SMALLDATETIME ,@pmtmCantSalida DECIMAL(14,4),@pmtmIdOperario VARCHAR(16),@pmtmCdCenServ VARCHAR(4),@pmtmNitTercero VARCHAR(16),@pmtmNumVehic VARCHAR(10),@pmtmNumParte VARCHAR(20) ,@pmtmEstado INT,@pmtmObservacion VARCHAR(1000) AS INSERT INTO tm_ReqDetalle (tmNumero,tmItem,tmCdProducto,tmDescripcion,tmIdSubgrupo,tmCdBodega,tmCantidad,tmIdUnd,tmVrUnitario,tmTipOrd,tmNumOrden,tmIdCiaOrd ,tmTipSal,tmNSalida,tmIdCiaSal,tmFechaSal,tmCantSalida,tmIdOperario,tmCdCenServ,tmNitTercero,tmNumVehic,tmNumParte,tmEstado,tmObservacion) VALUES (@pmtmNumero,@pmtmItem,@pmtmCdProducto,@pmtmDescripcion,@pmtmIdSubgrupo,@pmtmCdBodega,@pmtmCantidad,@pmtmIdUnd,@pmtmVrUnitario ,@pmtmTipOrd,@pmtmNumOrden,@pmtmIdCiaOrd,@pmtmTipSal,@pmtmNSalida,@pmtmIdCiaSal,@pmtmFechaSal,@pmtmCantSalida,@pmtmIdOperario,@pmtmCdCenServ ,@pmtmNitTercero,@pmtmNumVehic,@pmtmNumParte,@pmtmEstado,@pmtmObservacion) GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQrytm_ReqDetalle] @pmtmNumero VARCHAR(5),@pmtmItem INT AS SELECT tmItem,tmCdProducto,tmDescripcion,tmIdSubgrupo,tmCdBodega,tmCantidad,tmIdUnd,tmVrUnitario ,tmTipOrd,tmNumOrden,tmIdCiaOrd,tmTipSal,tmNSalida,tmIdCiaSal,tmFechaSal ,tmCantSalida,tmIdOperario,tmCdCenServ,tmNitTercero,tmNumVehic,tmNumParte,tmEstado,tmObservacion,tmNumero FROM tm_ReqDetalle WHERE tmNumero=@pmtmNumero AND (tmItem>=ISNULL(@pmtmItem,0) AND tmItem<=ISNULL(@pmtmItem,2147483647)) ORDER BY tmItem GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryRequisicionOrd] @pmFechaIni SMALLDATETIME, @pmFechaFin SMALLDATETIME,@pmIdCia CHAR(2)=Null ,@pmIdRespons VARCHAR(16)=Null,@pmNitCliente VARCHAR(16)=Null AS SELECT R.Requisicion AS NumRequision,R.IdCia AS CdCia,Compania,Fecha,FechaVence,R.IdConcepto AS CdConcepto,Concepto,IdRespons,T.RazonSocial AS Responsable ,R.IdCCosto AS CdCentCosto,CCosto,R.IdSubCos AS CdSubCent,SubCosto,R.IdDep AS CdDep,Dependencia,R.NContrato AS NumContrato,IdCiaCont,NitCliente,CL.RazonSocial AS NomCliente,CdAgencia,Modalidad ,VrSubTotal,R.Cantidad AS CantTotal,DirEntrega,IdLocEnt,Localidad,NumAprob,FecAprob,R.Observacion AS Observ,R.IdEstado AS CdEstado,Estado --detalles ,Item,CdProducto,D.Descripcion AS DescProd,D.IdSubgrupo AS CdSubgrupo,Subgrupo,CdBodega,Bodega,D.Cantidad AS CantArtic,D.IdUnd AS CdUnidad,Unidad,VrUnitario,TipOrd,NumOrden,IdCiaOrd ,D.TipSal AS TipoSal,D.NSalida AS NumSalida,D.IdCiaSal AS CdCiaSal,D.FechaSal AS FecSalida --datos del cliente ,CL.TipoId AS TercTipo,CL.Dv AS TercDv,CL.Codigo AS TercCodigo,CL.NomCial AS TercNomCial,CL.SiglaRaz AS TercSigal,CL.Direccion AS TercDireccion FROM Trn_Requisicion AS R INNER JOIN Trn_ReqDetalle AS D ON R.TipDoc=D.TipDoc AND R.Requisicion=D.Requisicion AND R.IdCia=D.IdCia INNER JOIN Terceros AS T ON R.IdRespons=T.IdTercero INNER JOIN CentroCosto AS CC ON R.IdCCosto=CC.IdCCosto INNER JOIN Conceptos AS C ON R.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON R.IdEstado=ED.IdEstado INNER JOIN Companias AS CI ON R.IdCia=CI.IdCia INNER JOIN Dependencias AS DP ON R.IdDep=DP.IdDep INNER JOIN SubGrupos AS SG ON D.IdSubgrupo=SG.IdSubgrupo INNER JOIN UndMed AS UM ON D.IdUnd=UM.IdUnd LEFT JOIN Terceros AS CL ON R.NitCliente =CL.IdTercero LEFT JOIN TercCliente AS CLI ON R.NitCliente=CLI.IdClie LEFT JOIN SubCentros AS SC ON R.IdSubCos=SC.IdSubCos LEFT JOIN Localidades AS LC ON R.IdLocEnt=LC.IdLocal LEFT JOIN Bodegas AS B ON D.CdBodega=B.IdBodega WHERE R.TipDoc='REQ' AND R.Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND Anulado=0 AND R.IdCia LIKE ISNULL(@pmIdCia,'%%') AND IdRespons LIKE ISNULL(@pmIdRespons,'%') AND NitCliente LIKE ISNULL(@pmNitCliente,'%') ORDER BY R.IdCia,R.Requisicion GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoInspecciones] @pmIdInspec VARCHAR(4),@pmInspeccion VARCHAR(150),@pmIdSistema VARCHAR(4),@pmIdMtto VARCHAR(4) ,@pmTipoDato INT,@pmUndMed VARCHAR(50),@pmInactivo BIT AS INSERT INTO MttoInspecciones (IdInspec,Inspeccion,IdSistema,IdMtto,TipoDato,UndMed,Inactivo) VALUES (@pmIdInspec,@pmInspeccion,@pmIdSistema,@pmIdMtto,@pmTipoDato,@pmUndMed,@pmInactivo) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoInspecciones] @pmIdInspec VARCHAR(4),@pmInspeccion VARCHAR(150),@pmIdSistema VARCHAR(4),@pmIdMtto VARCHAR(4) ,@pmTipoDato INT,@pmUndMed VARCHAR(50),@pmInactivo BIT AS UPDATE MttoInspecciones SET Inspeccion=@pmInspeccion,IdSistema=@pmIdSistema,IdMtto=@pmIdMtto,TipoDato=@pmTipoDato,UndMed=@pmUndMed,Inactivo=@pmInactivo WHERE IdInspec=@pmIdInspec GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoInspecciones] @pmIdInspec VARCHAR(4) AS SELECT IdInspec,Inspeccion,IdSistema,IdMtto,TipoDato,UndMed,Inactivo FROM MttoInspecciones WHERE IdInspec=@pmIdInspec GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoInspeccionesLta] @pmIdSistema VARCHAR(4) AS SELECT I.IdInspec,Inspeccion,I.IdSistema AS CdSistema,Sistema,I.IdMtto AS CdMtto,TipoMtto,TipoDato,UndMed,I.Inactivo ,Item,Estado,ValorInicial,ValorFinal,NColor,ReqMtto FROM MttoInspecciones AS I INNER JOIN MttoSistemas AS S ON I.IdSistema=S.IdSistema INNER JOIN MttoTipos AS TM ON I.IdMtto=TM.IdMtto LEFT JOIN MttoInspecRangos AS R ON I.IdInspec=R.IdInspec WHERE I.IdSistema LIKE ISNULL(@pmIdSistema,'%') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoOrdenAnu] @pmTipDoc VARCHAR(3),@pmNumOrden INT,@pmIdCia CHAR(2) ,@pmIdEstado VARCHAR(4),@pmAnulado BIT,@pmNumDev INT,@pmFecDev SMALLDATETIME,@pmObservacion VARCHAR(2000) AS UPDATE Trn_MttoOrden SET IdEstado=@pmIdEstado,Anulado=@pmAnulado,NumDev=@pmNumDev,FecDev=@pmFecDev ,Observacion=@pmObservacion WHERE TipDoc=@pmTipDoc AND NumOrden=@pmNumOrden AND IdCia=@pmIdCia GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryRequisicionSal] @pmFechaIni SMALLDATETIME, @pmFechaFin SMALLDATETIME ,@pmRequisicionIni INT=Null,@pmRequisicionFin INT=Null,@pmIdCia CHAR(2)=Null,@pmIdConcepto VARCHAR(4)=Null,@pmIdRespons VARCHAR(16)=Null ,@pmIdCCosto VARCHAR(16)=Null,@pmNitCliente VARCHAR(16)=Null,@pmModalidad VARCHAR(10)=Null,@pmIdEstado VARCHAR(4)=Null ,@pmIdDep VARCHAR(4)=Null,@pmFechaSalIni SMALLDATETIME=Null,@pmFechaSalFin SMALLDATETIME=Null AS SELECT R.Requisicion AS NumRequision,R.IdCia AS CdCia,Compania,Fecha,FechaVence,D.IdSubgrupo AS CodSubgrupo,Subgrupo,SUM(D.Cantidad) AS CantReq ,D.IdUnd AS CdUnidad,Unidad ,TipoSalida,SD.NumSalida AS NroSalida,CdCiaSal,NomCiaSal,FecSalida,NumEntrada,CiaEntrada,SD.CdProducto AS CodProducto,NombreProd,CantEntradas,CantSalidas ,ValorUnit,CostoEntradas,CostoSalidas,TotalUnidades ,D.NumOrden AS NumOCompra,D.IdCiaOrd AS CdCiaOcompra,R.IdConcepto AS CdConcepto,Concepto,IdRespons,T.RazonSocial AS NomResponsable ,R.IdCCosto AS CdCentCosto,CCosto,R.IdSubCos AS CdSubCent,R.IdDep AS CdDep,Dependencia,NContrato,IdCiaCont ,NitCliente,CL.RazonSocial AS NomCliente,CdAgencia,Modalidad,NumAprob,FecAprob,R.Observacion AS Observ,R.IdEstado AS CdEstado,Estado FROM Trn_Requisicion AS R INNER JOIN Trn_ReqDetalle AS D ON R.TipDoc=D.TipDoc AND R.Requisicion=D.Requisicion AND R.IdCia=D.IdCia INNER JOIN Terceros AS T ON R.IdRespons=T.IdTercero INNER JOIN CentroCosto AS CC ON R.IdCCosto=CC.IdCCosto INNER JOIN Conceptos AS C ON R.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON R.IdEstado=ED.IdEstado INNER JOIN Companias AS CI ON R.IdCia=CI.IdCia INNER JOIN SubGrupos AS SG ON D.IdSubgrupo=SG.IdSubgrupo INNER JOIN UndMed AS UM ON D.IdUnd=UM.IdUnd INNER JOIN Dependencias AS DP ON R.IdDep=DP.IdDep LEFT JOIN Terceros AS CL ON R.NitCliente =CL.IdTercero LEFT JOIN (SELECT TipOrd,NumOrden,IdCiaOrd,K.TipDoc AS TipoSalida,K.Documento AS NumSalida,K.IdCia AS CdCiaSal,KC.Compania AS NomCiaSal ,K.Fecha AS FecSalida,K.Remision AS NumEntrada,K.IdCiaRem AS CiaEntrada,K.IdProducto AS CdProducto,PM.DescripProd AS NombreProd ,PM.IdSubgrupo AS CdSubgrupo,SG.Subgrupo AS NomSubgrupo,SUM(Entradas) AS CantEntradas,SUM(Salidas) AS CantSalidas,MAX(VrUnitario) AS ValorUnit,SUM(VrCostoEnt) AS CostoEntradas,SUM(VrCostoSal) AS CostoSalidas ,SUM(K.Unidades) AS TotalUnidades FROM Trn_Kardex AS K INNER JOIN Companias AS KC ON K.IdCia=KC.IdCia INNER JOIN ProdMcias AS PM ON K.IdProducto=PM.IdProducto INNER JOIN SubGrupos AS SG ON PM.IdSubgrupo=SG.IdSubgrupo WHERE TipDoc IN ('SAI','DSI') AND TipOrd='REQ' AND NumOrden>0 AND (Fecha>=ISNULL(@pmFechaSalIni,CAST('19100101' AS SMALLDATETIME)) AND Fecha<=ISNULL(@pmFechaSalFin,CAST('20781230' AS SMALLDATETIME))) GROUP BY TipOrd,NumOrden,IdCiaOrd,K.TipDoc,K.Documento,K.IdCia,KC.Compania,K.Fecha,K.Remision ,K.IdCiaRem,K.IdProducto,PM.DescripProd ,PM.IdSubgrupo,SG.Subgrupo) AS SD ON R.TipDoc=SD.TipOrd AND R.Requisicion=SD.NumOrden AND R.IdCia=SD.IdCiaOrd AND D.IdSubgrupo=SD.CdSubgrupo WHERE R.TipDoc='REQ' AND R.Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND Anulado=0 AND R.IdCia LIKE ISNULL(@pmIdCia,'%%') AND R.IdConcepto LIKE ISNULL(@pmIdConcepto,'%') AND IdRespons LIKE ISNULL(@pmIdRespons,'%') AND R.IdCCosto LIKE ISNULL(@pmIdCCosto,'%') AND NitCliente LIKE ISNULL(@pmNitCliente,'%') AND Modalidad LIKE ISNULL(@pmModalidad,'%') AND R.IdEstado LIKE ISNULL(@pmIdEstado,'%') AND R.IdDep LIKE ISNULL(@pmIdDep,'%') AND R.Requisicion BETWEEN ISNULL(@pmRequisicionIni,0) AND ISNULL(@pmRequisicionFin,2147483647) GROUP BY R.Requisicion,R.IdCia,Compania,Fecha,FechaVence,D.IdSubgrupo,Subgrupo,D.IdUnd,Unidad ,TipoSalida,SD.NumSalida,CdCiaSal,NomCiaSal,FecSalida,NumEntrada,CiaEntrada,SD.CdProducto,NombreProd,CantEntradas,CantSalidas ,ValorUnit,CostoEntradas,CostoSalidas,TotalUnidades ,D.NumOrden,D.IdCiaOrd,R.IdConcepto,Concepto,IdRespons,T.RazonSocial,R.IdCCosto,CCosto,R.IdSubCos ,R.IdDep,Dependencia,NContrato,IdCiaCont,NitCliente,CL.RazonSocial,CdAgencia,Modalidad,NumAprob,FecAprob ,R.Observacion,R.IdEstado,Estado GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryRequisicionLtm] @pmTipDoc VARCHAR(3),@pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME ,@pmIdCia CHAR(2)=Null,@pmModalidad VARCHAR(10)=Null AS SELECT R.Requisicion,R.IdCia AS CdCia,Compania,R.Fecha,FechaVence,R.NContrato AS NumOrden,R.IdCiaCont AS IdCiaOdt,R.Modalidad ,R.IdRespons AS CdOperario,T.RazonSocial AS Operario,R.NitCliente AS NitCentro,CL.RazonSocial AS NomCentroServ ,DirEntrega,IdLocEnt,Localidad,R.IdDep AS CdDep,Dependencia,VrSubTotal,Cantidad,NumAprob,FecAprob,CdUsuAprob ,TipSal,NumSalida,IdCiaSal,FechaSal,R.IdConcepto AS CdConcepto,Concepto,R.IdCCosto AS CdCCosto,CCosto,R.IdSubCos AS CdSubCos ,NomContacto,TelsContacto,EmailContacto,R.Anulado,FecDev,R.Observacion AS Observ,R.IdEstado AS CdEstado,Estado ,OrigenAdd,R.TimeSys,R.FecUpdate,R.IdCiaCrea,R.IdUsuario AS CdUsuario,Usuario FROM Trn_Requisicion AS R INNER JOIN Companias AS CI ON R.IdCia=CI.IdCia INNER JOIN Terceros AS T ON R.IdRespons=T.IdTercero INNER JOIN CentroCosto AS CC ON R.IdCCosto=CC.IdCCosto INNER JOIN Conceptos AS C ON R.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON R.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON R.IdUsuario=U.IdUsuario INNER JOIN Dependencias AS D ON R.IdDep=D.IdDep LEFT JOIN Terceros AS CL ON R.NitCliente =CL.IdTercero LEFT JOIN Localidades AS L ON R.IdLocEnt=L.IdLocal WHERE R.TipDoc=@pmTipDoc AND R.Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND R.IdCia LIKE ISNULL(@pmIdCia,'%%') AND R.Modalidad LIKE ISNULL(@pmModalidad,'%') GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryRequisicionPen] @pmRequisicionIni INT=Null,@pmRequisicionFin INT=Null,@pmIdCia CHAR(2)=Null ,@pmIdRespons VARCHAR(16)=Null,@pmNitCliente VARCHAR(16)=Null,@pmModalidad VARCHAR(10)=Null AS SELECT R.Requisicion AS NumRequis,R.IdCia AS CdCia,Fecha,FechaVence,IdRespons,T.RazonSocial AS NomResponsable ,Item,CdProducto,Descripcion,D.Cantidad AS CantArt,D.IdUnd AS CdUnid,Unidad,VrUnitario,D.Cantidad*VrUnitario AS ValorTotal ,R.IdConcepto AS CdConcepto,Concepto,R.IdCCosto AS CdCentCosto,CCosto,R.IdSubCos AS CdSubCent,R.IdDep AS CdDep,Dependencia ,NContrato,IdCiaCont,NitCliente,CL.RazonSocial AS NomCliente,CdAgencia,Modalidad,DirEntrega,NumAprob,FecAprob,CdUsuAprob ,R.Observacion AS Observ,TipOrd,NumOrden,IdCiaOrd,NomContacto,TelsContacto,EmailContacto FROM Trn_Requisicion AS R INNER JOIN Trn_ReqDetalle AS D ON R.TipDoc=D.TipDoc AND R.Requisicion=D.Requisicion AND R.IdCia=D.IdCia INNER JOIN Terceros AS T ON R.IdRespons=T.IdTercero INNER JOIN CentroCosto AS CC ON R.IdCCosto=CC.IdCCosto INNER JOIN Conceptos AS C ON R.IdConcepto=C.IdConcepto INNER JOIN Dependencias AS DP ON R.IdDep=DP.IdDep INNER JOIN UndMed AS UM ON D.IdUnd=UM.IdUnd LEFT JOIN Terceros AS CL ON R.NitCliente =CL.IdTercero WHERE R.TipDoc='REQ' AND R.Anulado=0 AND R.IdEstado='0001' AND NumAprob>0 AND R.Requisicion BETWEEN ISNULL(@pmRequisicionIni,0) AND ISNULL(@pmRequisicionFin,2147483647) AND R.IdCia LIKE ISNULL(@pmIdCia,'%%') AND IdRespons LIKE ISNULL(@pmIdRespons,'%') AND NitCliente LIKE ISNULL(@pmNitCliente,'%') AND Modalidad LIKE ISNULL(@pmModalidad,'%') ORDER BY R.IdCia,R.Requisicion,Item GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryVehLecturas] @pmTipDoc VARCHAR(3),@pmNumero INT,@pmIdCia CHAR(2),@pmItem INT AS SELECT TipDoc,Numero,IdCia,Item,Fecha,TipoUnidad,pVehiculo,KmsAnterior,KmsActual,Kms2Anterior,Kms2Actual,TipoLectura,Observacion,TimeSys,IdUsuario FROM Trn_VehLecturas WHERE TipDoc=@pmTipDoc AND Numero=@pmNumero AND IdCia=@pmIdCia AND Item=@pmItem GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paDelVehLecturas] @pmTipDoc VARCHAR(3),@pmNumero INT,@pmIdCia CHAR(2) AS DELETE FROM Trn_VehLecturas WHERE TipDoc=@pmTipDoc AND Numero=@pmNumero AND IdCia=@pmIdCia GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryVehLecturasVeh] @pmTipoUnidad VARCHAR(3),@pmpVehiculo VARCHAR(10)=Null AS SELECT TipDoc,Numero,IdCia,Item,Fecha,TipoUnidad,pVehiculo,KmsAnterior,KmsActual ,Kms2Anterior,Kms2Actual,TipoLectura,Observacion,TimeSys,IdUsuario FROM Trn_VehLecturas WHERE TipoUnidad=@pmTipoUnidad AND pVehiculo LIKE ISNULL(@pmpVehiculo,'%') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsVehLecturas] @pmTipDoc VARCHAR(3),@pmNumero INT,@pmIdCia CHAR(2),@pmItem INT,@pmFecha SMALLDATETIME,@pmTipoUnidad VARCHAR(3),@pmpVehiculo VARCHAR(10) ,@pmKmsAnterior INT,@pmKmsActual INT,@pmKms2Anterior INT,@pmKms2Actual INT,@pmTipoLectura VARCHAR(10),@pmObservacion VARCHAR(250),@pmTimeSys SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO Trn_VehLecturas (TipDoc,Numero,IdCia,Item,Fecha,TipoUnidad,pVehiculo,KmsAnterior,KmsActual,Kms2Anterior,Kms2Actual,TipoLectura,Observacion,TimeSys,IdUsuario) VALUES (@pmTipDoc,@pmNumero,@pmIdCia,@pmItem,@pmFecha,@pmTipoUnidad,@pmpVehiculo,@pmKmsAnterior,@pmKmsActual,@pmKms2Anterior,@pmKms2Actual,@pmTipoLectura,@pmObservacion,@pmTimeSys,@pmIdUsuario) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpVehLecturas] @pmTipDoc VARCHAR(3),@pmNumero INT,@pmIdCia CHAR(2),@pmItem INT,@pmFecha SMALLDATETIME,@pmTipoUnidad VARCHAR(3),@pmpVehiculo VARCHAR(10) ,@pmKmsAnterior INT,@pmKmsActual INT,@pmKms2Anterior INT,@pmKms2Actual INT,@pmTipoLectura VARCHAR(10),@pmObservacion VARCHAR(250) AS UPDATE Trn_VehLecturas SET Fecha=@pmFecha,TipoUnidad=@pmTipoUnidad,pVehiculo=@pmpVehiculo,KmsAnterior=@pmKmsAnterior,KmsActual=@pmKmsActual,Kms2Anterior=@pmKms2Anterior,Kms2Actual=@pmKms2Actual ,TipoLectura=@pmTipoLectura,Observacion=@pmObservacion WHERE TipDoc=@pmTipDoc AND Numero=@pmNumero AND IdCia=@pmIdCia AND Item=@pmItem GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryVehLecturasId] @pmTipDoc VARCHAR(3),@pmNumero INT,@pmIdCia CHAR(2) AS SELECT MAX(Item) AS MxNum FROM Trn_VehLecturas WHERE TipDoc=@pmTipDoc AND Numero=@pmNumero AND IdCia=@pmIdCia GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryVehPartes] @pmIdVehiculo VARCHAR(10),@pmNumParte VARCHAR(20) AS SELECT IdVehiculo,NumParte,DescripParte,IdSistema,TipoControl,Intervalo_km,Intervalo_dias,kmActual,kmCambio,FechaCambio,CdProdRep,TipoUnidad,TipoParte,IdEstado,Inactivo,FechaRetiro,FechaCrea,IdUsuario FROM VehPartes WHERE IdVehiculo=@pmIdVehiculo AND NumParte=@pmNumParte GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpVehPartes] @pmIdVehiculo VARCHAR(10),@pmNumParte VARCHAR(20),@pmDescripParte VARCHAR(250),@pmIdSistema VARCHAR(4),@pmTipoControl INT,@pmIntervalo_km INT,@pmIntervalo_dias INT,@pmkmActual INT,@pmkmCambio INT ,@pmFechaCambio SMALLDATETIME,@pmCdProdRep VARCHAR(16),@pmTipoUnidad CHAR(1),@pmTipoParte VARCHAR(10),@pmIdEstado VARCHAR(4),@pmInactivo BIT,@pmFechaRetiro SMALLDATETIME AS UPDATE VehPartes SET DescripParte=@pmDescripParte,IdSistema=@pmIdSistema,TipoControl=@pmTipoControl,Intervalo_km=@pmIntervalo_km,Intervalo_dias=@pmIntervalo_dias,kmActual=@pmkmActual,kmCambio=@pmkmCambio,FechaCambio=@pmFechaCambio,CdProdRep=@pmCdProdRep ,TipoUnidad=@pmTipoUnidad,TipoParte=@pmTipoParte,IdEstado=@pmIdEstado,Inactivo=@pmInactivo,FechaRetiro=@pmFechaRetiro WHERE IdVehiculo=@pmIdVehiculo AND NumParte=@pmNumParte GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsVehPartes] @pmIdVehiculo VARCHAR(10),@pmNumParte VARCHAR(20),@pmDescripParte VARCHAR(250),@pmIdSistema VARCHAR(4),@pmTipoControl INT,@pmIntervalo_km INT,@pmIntervalo_dias INT,@pmkmActual INT,@pmkmCambio INT ,@pmFechaCambio SMALLDATETIME,@pmCdProdRep VARCHAR(16),@pmTipoUnidad CHAR(1),@pmTipoParte VARCHAR(10),@pmIdEstado VARCHAR(4),@pmInactivo BIT,@pmFechaRetiro SMALLDATETIME,@pmFechaCrea SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO VehPartes (IdVehiculo,NumParte,DescripParte,IdSistema,TipoControl,Intervalo_km,Intervalo_dias,kmActual,kmCambio,FechaCambio,CdProdRep,TipoUnidad,TipoParte,IdEstado,Inactivo,FechaRetiro,FechaCrea,IdUsuario) VALUES (@pmIdVehiculo,@pmNumParte,@pmDescripParte,@pmIdSistema,@pmTipoControl,@pmIntervalo_km,@pmIntervalo_dias,@pmkmActual,@pmkmCambio,@pmFechaCambio,@pmCdProdRep,@pmTipoUnidad,@pmTipoParte,@pmIdEstado,@pmInactivo,@pmFechaRetiro,@pmFechaCrea,@pmIdUsuario) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paDelVehPartes] @pmIdVehiculo VARCHAR(10),@pmNumParte VARCHAR(20) AS DELETE FROM VehPartes WHERE IdVehiculo=@pmIdVehiculo AND NumParte=@pmNumParte GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoOrdenReq] @pmTipReq VARCHAR(3),@pmRequisicion INT,@pmIdCia CHAR(2),@pmItem INT,@pmTipoItem VARCHAR(10),@pmIdProducto VARCHAR(16),@pmDescripcion VARCHAR(250),@pmCantidad DECIMAL(14,4),@pmIdUnd VARCHAR(4),@pmVrUnitario DECIMAL(16,6),@pmCdBodega VARCHAR(4) ,@pmTipOdt VARCHAR(3),@pmNumOrden INT,@pmIdCiaOdt CHAR(2),@pmEstadoReq INT,@pmIdOperario VARCHAR(16),@pmCdCenServ VARCHAR(4),@pmNitTercero VARCHAR(16),@pmNumVehic VARCHAR(10),@pmNumParte VARCHAR(20),@pmTipSal VARCHAR(3),@pmNumSalida INT,@pmIdCiaSal CHAR(2),@pmCantSalida DECIMAL(14,4) ,@pmObservacion VARCHAR(1000),@pmFechaCrea SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO Trn_MttoOrdenReq (TipReq,Requisicion,IdCia,Item,TipoItem,IdProducto,Descripcion,Cantidad,IdUnd,VrUnitario,CdBodega,TipOdt,NumOrden,IdCiaOdt,EstadoReq,IdOperario,CdCenServ,NitTercero,NumVehic,NumParte,TipSal,NumSalida,IdCiaSal,CantSalida,Observacion,FechaCrea,IdUsuario) VALUES (@pmTipReq,@pmRequisicion,@pmIdCia,@pmItem,@pmTipoItem,@pmIdProducto,@pmDescripcion,@pmCantidad,@pmIdUnd,@pmVrUnitario,@pmCdBodega,@pmTipOdt,@pmNumOrden,@pmIdCiaOdt,@pmEstadoReq,@pmIdOperario,@pmCdCenServ,@pmNitTercero,@pmNumVehic,@pmNumParte,@pmTipSal,@pmNumSalida,@pmIdCiaSal,@pmCantSalida ,@pmObservacion,@pmFechaCrea,@pmIdUsuario) GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paDelRequisicionOdt] @pmTipOdt VARCHAR(3),@pmNumOrden INT,@pmIdCiaOdt CHAR(2) AS IF EXISTS (SELECT * FROM Trn_MttoOrdenReq WHERE TipOdt=@pmTipOdt AND NumOrden=@pmNumOrden AND IdCiaOdt=@pmIdCiaOdt) BEGIN DECLARE @TrnNombre VARCHAR(30) SET @TrnNombre = 'Trn_MttoOrdenReq' BEGIN TRANSACTION @TrnNombre DELETE FROM Trn_ReqDetalle FROM Trn_ReqDetalle INNER JOIN Trn_MttoOrdenReq ON Trn_ReqDetalle.TipDoc=Trn_MttoOrdenReq.TipReq AND Trn_ReqDetalle.Requisicion=Trn_MttoOrdenReq.Requisicion AND Trn_ReqDetalle.IdCia=Trn_MttoOrdenReq.IdCia WHERE Trn_MttoOrdenReq.TipOdt=@pmTipOdt AND Trn_MttoOrdenReq.NumOrden=@pmNumOrden AND Trn_MttoOrdenReq.IdCiaOdt=@pmIdCiaOdt DELETE FROM Trn_Requisicion FROM Trn_Requisicion INNER JOIN Trn_MttoOrdenReq ON Trn_Requisicion.TipDoc=Trn_MttoOrdenReq.TipReq AND Trn_Requisicion.Requisicion=Trn_MttoOrdenReq.Requisicion AND Trn_Requisicion.IdCia=Trn_MttoOrdenReq.IdCia WHERE Trn_MttoOrdenReq.TipOdt=@pmTipOdt AND Trn_MttoOrdenReq.NumOrden=@pmNumOrden AND Trn_MttoOrdenReq.IdCiaOdt=@pmIdCiaOdt COMMIT TRANSACTION @TrnNombre END GO SET ANSI_NULLS OFF GO SET QUOTED_IDENTIFIER OFF GO CREATE PROCEDURE [dbo].[paQryRequisicionLta] @pmFechaIni SMALLDATETIME, @pmFechaFin SMALLDATETIME,@pmRequisicionIni INT=Null ,@pmRequisicionFin INT=Null,@pmIdCia CHAR(2)=Null,@pmIdConcepto VARCHAR(4)=Null,@pmIdRespons VARCHAR(16)=Null ,@pmIdCCosto VARCHAR(16)=Null,@pmNitCliente VARCHAR(16)=Null,@pmModalidad VARCHAR(10)=Null,@pmAnulado BIT=Null ,@pmIdEstado VARCHAR(4)=Null AS SELECT Requisicion,IdCia,Fecha,FechaVence,R.IdConcepto AS CdConcepto,Concepto,IdRespons,T.RazonSocial AS NomResponsable ,R.IdCCosto AS CdCentCosto,CCosto,R.IdSubCos AS CdSubCent,R.IdDep AS CdDep,Dependencia,VrSubTotal,Cantidad,NContrato,IdCiaCont ,NitCliente,CL.RazonSocial AS NomCliente,CdAgencia,Modalidad,DirEntrega,IdLocEnt,TipSal,NumSalida,IdCiaSal,FechaSal,NumAprob,FecAprob,CdUsuAprob ,NomContacto,TelsContacto,EmailContacto,OrigenAdd,Anulado,FecDev,R.Observacion AS Observ,R.IdEstado AS CdEstado,Estado,TimeSys,FecUpdate,IdCiaCrea,R.IdUsuario AS IdUsuari,Usuario,TipDoc FROM Trn_Requisicion AS R INNER JOIN Terceros AS T ON R.IdRespons=T.IdTercero INNER JOIN CentroCosto AS CC ON R.IdCCosto=CC.IdCCosto INNER JOIN Conceptos AS C ON R.IdConcepto=C.IdConcepto INNER JOIN EstadoDoc AS ED ON R.IdEstado=ED.IdEstado INNER JOIN adm_Usuarios AS U ON R.IdUsuario=U.IdUsuario INNER JOIN Dependencias AS D ON R.IdDep=D.IdDep LEFT JOIN Terceros AS CL ON R.NitCliente =CL.IdTercero WHERE TipDoc='REQ' AND Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND IdCia LIKE ISNULL(@pmIdCia,'%%') AND R.IdConcepto LIKE ISNULL(@pmIdConcepto,'%') AND IdRespons LIKE ISNULL(@pmIdRespons,'%') AND R.IdCCosto LIKE ISNULL(@pmIdCCosto,'%') AND NitCliente LIKE ISNULL(@pmNitCliente,'%') AND Modalidad LIKE ISNULL(@pmModalidad,'%') AND R.IdEstado LIKE ISNULL(@pmIdEstado,'%') AND (Anulado=ISNULL(@pmAnulado,0) or Anulado=ISNULL(@pmAnulado,1)) AND Requisicion BETWEEN ISNULL(@pmRequisicionIni,0) AND ISNULL(@pmRequisicionFin,2147483647) ORDER BY IdCia,Requisicion GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoConceptosLta] @pmIdSistema VARCHAR(4)=Null,@pmIdMtto VARCHAR(4)=Null AS SELECT IdConc,Concepto,C.IdSistema AS CdSistema,Sistema,C.IdMtto AS CdMtto,TipoMtto,TipoControl ,Intervalo_km,Intervalo_dias,Req_Parte,CodigoMO,DescripProd,C.Inactivo,C.FechaCrea,C.IdUsuario AS CdUsuario,Usuario FROM MttoConceptos AS C INNER JOIN MttoSistemas AS S ON C.IdSistema=S.IdSistema INNER JOIN MttoTipos AS TM ON C.IdMtto=TM.IdMtto INNER JOIN adm_Usuarios AS U ON C.IdUsuario=U.IdUsuario LEFT JOIN ProdMcias AS P ON C.CodigoMO=P.IdProducto WHERE C.IdSistema LIKE ISNULL(@pmIdSistema,'%') AND C.IdMtto LIKE ISNULL(@pmIdMtto,'%') GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInstm_MttoDetalle] @pmtmNumero VARCHAR(5),@pmtmItem INT,@pmtmFecha SMALLDATETIME,@pmtmIdConc VARCHAR(4),@pmtmDescripcion VARCHAR(1000),@pmtmCantidad DECIMAL(14,4),@pmtmVrUnitario DECIMAL(16,6) ,@pmtmUndMed VARCHAR(50),@pmtmCdMtto VARCHAR(4),@pmtmIdEstado VARCHAR(4),@pmtmIdOperario VARCHAR(16),@pmtmNumVehic VARCHAR(10),@pmtmNumParte VARCHAR(20),@pmtmReqRep BIT,@pmtmReqMO BIT AS INSERT INTO tm_MttoDetalle (tmNumero,tmItem,tmFecha,tmIdConc,tmDescripcion,tmCantidad,tmVrUnitario,tmUndMed,tmCdMtto,tmIdEstado,tmIdOperario,tmNumVehic,tmNumParte,tmReqRep,tmReqMO) VALUES (@pmtmNumero,@pmtmItem,@pmtmFecha,@pmtmIdConc,@pmtmDescripcion,@pmtmCantidad,@pmtmVrUnitario,@pmtmUndMed,@pmtmCdMtto,@pmtmIdEstado,@pmtmIdOperario,@pmtmNumVehic,@pmtmNumParte,@pmtmReqRep,@pmtmReqMO) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoConceptos] @pmIdConc VARCHAR(4) AS SELECT IdConc,Concepto,IdSistema,IdMtto,TipoControl,Intervalo_km,Intervalo_dias,Req_Parte,CodigoMO,Inactivo,FechaCrea,IdUsuario FROM MttoConceptos WHERE IdConc=@pmIdConc GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoConceptos] @pmIdConc VARCHAR(4),@pmConcepto VARCHAR(150),@pmIdSistema VARCHAR(4),@pmIdMtto VARCHAR(4),@pmTipoControl INT ,@pmIntervalo_km INT,@pmIntervalo_dias INT,@pmReq_Parte BIT,@pmInactivo BIT,@pmCodigoMO VARCHAR(16),@pmFechaCrea SMALLDATETIME,@pmIdUsuario VARCHAR(11) AS INSERT INTO MttoConceptos (IdConc,Concepto,IdSistema,IdMtto,TipoControl,Intervalo_km,Intervalo_dias,Req_Parte,CodigoMO,Inactivo,FechaCrea,IdUsuario) VALUES (@pmIdConc,@pmConcepto,@pmIdSistema,@pmIdMtto,@pmTipoControl,@pmIntervalo_km,@pmIntervalo_dias,@pmReq_Parte,@pmCodigoMO,@pmInactivo,@pmFechaCrea,@pmIdUsuario) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoConceptos] @pmIdConc VARCHAR(4),@pmConcepto VARCHAR(150),@pmIdSistema VARCHAR(4),@pmIdMtto VARCHAR(4),@pmTipoControl INT ,@pmIntervalo_km INT,@pmIntervalo_dias INT,@pmReq_Parte BIT,@pmInactivo BIT,@pmCodigoMO VARCHAR(16) AS UPDATE MttoConceptos SET Concepto=@pmConcepto,IdSistema=@pmIdSistema,IdMtto=@pmIdMtto,TipoControl=@pmTipoControl,Intervalo_km=@pmIntervalo_km ,Intervalo_dias=@pmIntervalo_dias,Req_Parte=@pmReq_Parte,Inactivo=@pmInactivo,CodigoMO=@pmCodigoMO WHERE IdConc=@pmIdConc GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoSistemas] @pmIdSistema VARCHAR(4),@pmSistema VARCHAR(50),@pmInactivo BIT AS INSERT INTO MttoSistemas (IdSistema,Sistema,Inactivo) VALUES (@pmIdSistema,@pmSistema,@pmInactivo) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoSistemas] @pmIdSistema VARCHAR(4),@pmSistema VARCHAR(50),@pmInactivo BIT AS UPDATE MttoSistemas SET Sistema=@pmSistema,Inactivo=@pmInactivo WHERE IdSistema=@pmIdSistema GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoSistemas] @pmIdSistema VARCHAR(4) AS IF @pmIdSistema IS NULL BEGIN SELECT IdSistema,Sistema FROM MttoSistemas WHERE Inactivo=0 END ELSE BEGIN SELECT IdSistema,Sistema,Inactivo FROM MttoSistemas WHERE IdSistema=@pmIdSistema END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paDelMttoSistemas] @pmIdSistema VARCHAR(4) AS DELETE FROM MttoSistemas WHERE IdSistema=@pmIdSistema GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paInsMttoTipos] @pmIdMtto VARCHAR(4),@pmTipoMtto VARCHAR(50),@pmInactivo BIT AS INSERT INTO MttoTipos (IdMtto,TipoMtto,Inactivo) VALUES (@pmIdMtto,@pmTipoMtto,@pmInactivo) GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paUpMttoTipos] @pmIdMtto VARCHAR(4),@pmTipoMtto VARCHAR(50),@pmInactivo BIT AS UPDATE MttoTipos SET TipoMtto=@pmTipoMtto,Inactivo=@pmInactivo WHERE IdMtto=@pmIdMtto GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paQryMttoTipos] @pmIdMtto VARCHAR(4) AS IF @pmIdMtto IS NULL BEGIN SELECT IdMtto,TipoMtto FROM MttoTipos WHERE Inactivo=0 END ELSE BEGIN SELECT IdMtto,TipoMtto,Inactivo FROM MttoTipos WHERE IdMtto=@pmIdMtto END GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO CREATE PROCEDURE [dbo].[paDelMttoTipos] @pmIdMtto VARCHAR(4) AS DELETE FROM MttoTipos WHERE IdMtto=@pmIdMtto GO