CREATE TABLE Trn_NiifRevelac ( 
TipCom VARCHAR(3) NOT NULL,
Comprobante INT DEFAULT ((0)) NOT NULL,
IdCia CHAR(2) DEFAULT ('01') NOT NULL,
Item INT DEFAULT ((0)) NOT NULL,
Titulo VARCHAR(250),
Comentario VARCHAR(3000) NOT NULL,
FechaCrea SMALLDATETIME NOT NULL,
IdUsuario VARCHAR(11) NOT NULL
 CONSTRAINT PK_Trn_NiifRevelac PRIMARY KEY CLUSTERED (TipCom,Comprobante,IdCia,Item),
 CONSTRAINT CK_Trn_NiifRevelacIdCia CHECK ((len([IdCia])>(0))),
 CONSTRAINT CK_Trn_NiifRevelacIdUsuario CHECK ((len([IdUsuario])>(0))),
 CONSTRAINT CK_Trn_NiifRevelacTipCom CHECK ((len([TipCom])>(0))))
GO
INSERT INTO ClaseTar (IdClase,NomClase,Inactivo)
 VALUES ('INT','TASA DE INTERES',0)
GO
INSERT INTO  Sys_Report (TipoRep,IdRep,Descripcion,Formato,TipoPapel,Orientacion,VistaPrevia,VerSetup,NumCopias,sp_Nombre,Ind_Location,NomRep)
 VALUES ('ANC','01','Predeterminado-Cuentas por Cobrar (Hz)','CrNiifCxc.rpt',1,2,1,0,1,'LogNiifCartera','LL','Niif-Ajustes a Cuentas por Cobrar')
INSERT INTO  Sys_Report (TipoRep,IdRep,Descripcion,Formato,TipoPapel,Orientacion,VistaPrevia,VerSetup,NumCopias,sp_Nombre,Ind_Location,NomRep)
 VALUES ('ANP','01','Predeterminado-Cuentas por Pagar (Hz)','CrNiifCxc.rpt',1,2,1,0,1,'LogNiifCartera','LL','Niif-Ajustes a Cuentas por Pagar')
INSERT INTO  Sys_Report (TipoRep,IdRep,Descripcion,Formato,TipoPapel,Orientacion,VistaPrevia,VerSetup,NumCopias,sp_Nombre,Ind_Location,NomRep)
 VALUES ('ANI','01','Predeterminado-Inventarios (Hz)','CrNiifInv.rpt',1,2,1,0,1,'LogNiifInv','LL','Niif-Ajustes a Inventarios')
INSERT INTO  Sys_Report (TipoRep,IdRep,Descripcion,Formato,TipoPapel,Orientacion,VistaPrevia,VerSetup,NumCopias,sp_Nombre,Ind_Location,NomRep)
 VALUES ('RVL','01','Predeterminado','CrNiifRev.rpt',1,1,1,0,1,'paQryNiifRevelacLta','','Revelaciones')
GO
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNCXC','MAINIF','GEN',7,'Comprobante de Ajustes a Cuentas por Cobrar','FRMNIIFCXC','NSNNNNNNNNNNN',0,'')
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNCXP','MAINIF','GEN',8,'Comprobante de Ajustes a Cuentas por Pagar','FRMNIIFCXC','NSNNNNNNNNNNN',0,'')
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMAIN','MAINIF','GEN',9,'Comprobante de Ajustes a Inventarios','FRMNIIFINV','NSNNNNNNNNNNN',0,'')
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNREV','MAINIF','GEN',10,'Revelaciones','FRMNIIFREV','NSNNNNNNNNNNN',0,'')
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNCXCTRA','TRANIF','GEN',7,'Comprobante de Ajustes a Cuentas por Cobrar','FRMNIIFCXC','NSNSNNNNNNNNN',0,'')
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNCXPTRA','TRANIF','GEN',8,'Comprobante de Ajustes a Cuentas por Pagar','FRMNIIFCXC','NSNSNNNNNNNNN',0,'')
INSERT INTO  Sys_ObjetosApp (IdObj,IdGrupo,SubModulo,IndObj,Nombre,Formulario,Permisos,NivelMinimo,NomArchivo)
 VALUES ('FRMNREVTRA','TRANIF','GEN',9,'Revelaciones','FRMNIIFREV','NSNSNNNNNNNNN',0,'')
GO
SET ANSI_NULLS OFF
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[paQryNiifRevelacLta] @pmFechaIni SMALLDATETIME,@pmFechaFin SMALLDATETIME,@pmTipCom VARCHAR(3),@pmIdCia CHAR(2)
 AS 
 SELECT R.TipCom,TipoCom,R.Comprobante AS NumComp,R.IdCia AS CdCia,Compania,C.Fecha,C.IdTercero AS NitTercero,T.RazonSocial,C.VrTotal,C.IdCta AS CdCta,NumeroCta
,CTA.IdBanco AS CdBanco,Banco,EnEfectivo,C.NumCheque AS ComNumCheque,FecCheque,Anulado,NumDev,FecDev,pVehiculo,C.VehPropio,CedCondtor,CD.RazonSocial AS NomConductor
,C.CodConce,CN.Concepto,Beneficiario,C.Integrado AS EsIntegracion,C.EsEgreso AS ComEsEgreso,C.Observacion AS Observ,C.IdEstado AS CdEstado
,TipoNiif,CtbTipo,CtbNumero,FisTipo,FisNumero,R.Item,R.Titulo,R.Comentario,R.FechaCrea,R.IdUsuario AS CdUsuario,Usuario
 FROM Trn_NiifRevelac AS R INNER JOIN Trn_NiifComp AS C ON R.TipCom=C.TipCom AND R.Comprobante=C.Comprobante AND R.IdCia=C.IdCia
 INNER JOIN Companias AS CI ON R.IdCia=CI.IdCia  INNER JOIN adm_Usuarios AS U ON R.IdUsuario=U.IdUsuario
 INNER JOIN TiposCom AS TC ON R.TipCom=TC.IdCom INNER JOIN Terceros AS T ON C.IdTercero=T.IdTercero
 LEFT JOIN Conceptos AS CN ON C.CodConce=CN.IdConcepto LEFT JOIN Terceros AS CD ON C.CedCondtor=CD.IdTercero 
 LEFT JOIN CtasCorrientes AS CTA ON C.IdCta=CTA.IdCta LEFT JOIN Bancos AS BCT ON CTA.IdBanco=BCT.IdBanco
 WHERE C.Fecha BETWEEN @pmFechaIni AND @pmFechaFin AND R.TipCom LIKE ISNULL(@pmTipCom,'%')
 AND C.IdCia LIKE ISNULL(@pmIdCia,'%%')
GO