ALTER TABLE TraFijos ADD CdRuta VARCHAR(4)
GO
CREATE TABLE Trn_NomVehiculo ( 
IdPeriodo VARCHAR(8) NOT NULL,
IdEmpleado VARCHAR(16) NOT NULL,
IdVehiculo VARCHAR(10) NOT NULL,
CantDias INT DEFAULT ((0)) NOT NULL
 CONSTRAINT PK_Trn_NomVehiculo PRIMARY KEY CLUSTERED (IdPeriodo,IdEmpleado,IdVehiculo),
 CONSTRAINT CK_Trn_NomVehiculoIdEmpleado CHECK ((len([IdEmpleado])>(0))),
 CONSTRAINT CK_Trn_NomVehiculoIdPeriodo CHECK ((len([IdPeriodo])>(0))),
 CONSTRAINT CK_Trn_NomVehiculoIdVehiculo CHECK ((len([IdVehiculo])>(0))))
GO
ALTER TABLE Trn_NomVehiculo ADD 
 CONSTRAINT FK_Trn_NomVehiculo_Empleados FOREIGN KEY (IdEmpleado) REFERENCES [dbo].[Empleados] (IdEmpleado)

INSERT INTO adm_Opciones (IdOpc,Opcion,TipoDato,Valor,NivUp,nModulo)
 VALUES ('CCA','CONCEPTO DE CAUSACION DE CONDUCTORES','VARCHAR','',4,'NOMINA')
INSERT INTO adm_Opciones (IdOpc,Opcion,TipoDato,Valor,NivUp,nModulo)
 VALUES ('CCN','CONCEPTO DE CUENTA POR COBRAR - CAUSACION CONDUCTORES','VARCHAR','',4,'NOMINA')
GO
INSERT INTO Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNOMCAU','NOMPRO','GEN',20,'Causación de Administración de Conductores','FRMNOMCAU','S',0,'')
GO
INSERT INTO Sys_Roles (IdObj,IdRole,Funcion)
 VALUES ('FRMNOMCAU','FEC','Permitir Modificar Fecha de Comprobante')
INSERT INTO Sys_Roles (IdObj,IdRole,Funcion)
 VALUES ('FRMNOMCAU','CIA','Permitir Seleccionar Compañía')
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paInsTraFijos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [dbo].[paInsTraFijos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQrytm_CompLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [dbo].[paQrytm_CompLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTraFijos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [dbo].[paQryTraFijos]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paQryTraFijosLta]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [dbo].[paQryTraFijosLta]
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[paUpTraFijos]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
DROP PROCEDURE [dbo].[paUpTraFijos]
GO

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQrytm_CompLta] @pmtmNumero VARCHAR(5) 
 AS 
 SELECT tmItem,tmIdCuenta,NomCuenta,tmDetalle,tmVrDebito,tmVrCredito,tmIdTercero,tmTercero,tmVrBase,tmTarifaBase
,tmIdCCosto,CCosto,tmIdSubCos,SubCosto,tmIdVehiculo,tmTipFac,tmFactura,tmIdCiaFac,tmItemFac,tmFecVence
,tmTipDoc,tmDocumento,tmIdCiaDoc,tmCodConce,tmReferncia,tmNitOtros,RazonSocial
 FROM tm_Comp AS D LEFT JOIN Puc AS P ON D.tmIdCuenta=P.IdCuenta
 LEFT JOIN Terceros AS T ON D.tmNitOtros=T.IdTercero
 LEFT JOIN CentroCosto AS O ON D.tmIdCCosto=O.IdCCosto LEFT JOIN SubCentros AS SC ON D.tmIdSubCos=SC.IdSubCos
 WHERE tmNumero=@pmtmNumero
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTraFijosLta] @pmTipoConc VARCHAR(10)=Null
 AS 
 SELECT Numero,IdConcepto,DescConc,TipoConc,Tarifa,TipoTarif,TipoAfilVeh
,CdTipoVeh,TipoVehiculo,TipoTerc,CdCiuOrigen,CdCiuDestino,pVehiculo,CedConductor,CdRuta,Anulado
 FROM TraFijos AS F LEFT JOIN TiposVeh AS TV ON F.CdTipoVeh=TV.IdTipoVeh
 WHERE TipoConc LIKE ISNULL(@pmTipoConc,'%')
 ORDER BY Numero
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paInsTraFijos] @pmNumero INT,@pmIdConcepto VARCHAR(4),@pmDescConc VARCHAR(250),@pmTipoConc VARCHAR(10)
,@pmTarifa DECIMAL(14,4),@pmTipoTarif CHAR(1),@pmTipoAfilVeh VARCHAR(10),@pmCdTipoVeh VARCHAR(4),@pmAnulado BIT,@pmTipoTerc CHAR(1)
,@pmCdCiuOrigen VARCHAR(8),@pmCdCiuDestino VARCHAR(8),@pmpVehiculo VARCHAR(10),@pmCedConductor VARCHAR(16),@pmCdRuta VARCHAR(4)
 AS 
 INSERT INTO TraFijos (Numero,IdConcepto,DescConc,TipoConc,Tarifa,TipoTarif,TipoAfilVeh,CdTipoVeh,TipoTerc,Anulado,CdCiuOrigen,CdCiuDestino,pVehiculo,CedConductor,CdRuta)
 VALUES (@pmNumero,@pmIdConcepto,@pmDescConc,@pmTipoConc,@pmTarifa,@pmTipoTarif,@pmTipoAfilVeh,@pmCdTipoVeh,@pmTipoTerc
,@pmAnulado,@pmCdCiuOrigen,@pmCdCiuDestino,@pmpVehiculo,@pmCedConductor,@pmCdRuta)
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paQryTraFijos] @pmNumero INT
 AS 
 SELECT Numero,IdConcepto,DescConc,TipoConc,Tarifa,TipoTarif,TipoAfilVeh,CdTipoVeh,TipoTerc,Anulado
,CdCiuOrigen,CdCiuDestino,pVehiculo,CedConductor,CdRuta
 FROM TraFijos
 WHERE Numero=@pmNumero
GO
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE PROCEDURE [dbo].[paUpTraFijos] @pmNumero INT,@pmIdConcepto VARCHAR(4),@pmDescConc VARCHAR(250),@pmTipoConc VARCHAR(10),@pmTarifa DECIMAL(14,4),@pmTipoTarif CHAR(1),@pmTipoAfilVeh VARCHAR(10)
,@pmCdTipoVeh VARCHAR(4),@pmAnulado BIT,@pmTipoTerc CHAR(1),@pmCdCiuOrigen VARCHAR(8),@pmCdCiuDestino VARCHAR(8),@pmpVehiculo VARCHAR(10),@pmCedConductor VARCHAR(16),@pmCdRuta VARCHAR(4)
 AS 
 UPDATE TraFijos SET IdConcepto=@pmIdConcepto,DescConc=@pmDescConc,TipoConc=@pmTipoConc,Tarifa=@pmTarifa,TipoTarif=@pmTipoTarif,TipoAfilVeh=@pmTipoAfilVeh,CdTipoVeh=@pmCdTipoVeh
,Anulado=@pmAnulado,TipoTerc=@pmTipoTerc,CdCiuOrigen=@pmCdCiuOrigen,CdCiuDestino=@pmCdCiuDestino,pVehiculo=@pmpVehiculo,CedConductor=@pmCedConductor,CdRuta=@pmCdRuta
 WHERE Numero=@pmNumero
GO