dbo.Imperium_Carga_Docs_Contratistas_Servicio2

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO

CREATE OR ALTER PROCEDURE dbo.Imperium_Carga_Docs_Contratistas_Servicio2
@periodo int,
@IDCliente int

AS

BEGIN
 SET NOCOUNT ON;


/*  9700868 */
DECLARE @ERRORNUMBER SMALLINT 
declare  @periodoAnt int 

DECLARE @PeriodoModalidad int  
DECLARE @Modalidad VARCHAR(1)
/*
declare @periodo int = 201701
DECLARE @IDCliente INT = 5546348
*/
DECLARE @periodoV INT = NULL
DECLARE @periodoVAnt INT = NULL
DECLARE @periodoA INT = NULL
DECLARE @NombreCliente varchar(200)
DECLARE @periodoYear INT = NULL
DECLARE @periodoMonth INT = NULL

SET @periodoYear = convert(varchar(4),datepart(year,getdate()))
SET @periodoMonth = convert(varchar(2),datepart(month,getdate()))

SET @periodoYear = datepart(year,getdate())
SET @periodoMonth = datepart(month,getdate())

SET @periodoA = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())),2)

if (@periodoMonth = 1)
 begin
  set @periodoV = convert(varchar(4),@periodoYear-1) + RIGHT('00' +convert(varchar(2),12),2)
  set @periodoVAnt = convert(varchar(4),@periodoYear-1) + RIGHT('00' +convert(varchar(2),11),2)
 end

if (@periodoMonth > 1)
 begin
  set @periodoV = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())-1),2)
  set @periodoVAnt = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())-2),2)
 end


if @Periodo =  @periodoA
 BEGIN
  SET @Modalidad = 'A'
 END
ELSE
 BEGIN
  SET @Modalidad = 'V'
 END


set @periodoVAnt = dbo.PeriodoMenosDos()
set @periodoV = dbo.PeriodoVencido()
set @periodoA = dbo.PeriodoAdelantado()



if (@IDCliente = 9335603)
begin
 set @IDCliente = 0
end

DECLARE @LastDay_AnyMonth DATETIME
--Last Day of Any Month and Year
DECLARE @dtDate DATETIME, @nextMonth DATETIME, @LastDayNextMonth DATETIME
SET @dtDate = substring(CONVERT(varchar(6),@periodo),1,4) + '-' + substring(CONVERT(varchar(6),@periodo),5,2) + '-01'
SET @nextMonth = DATEADD(mm, 1, @dtDate)

set @LastDay_AnyMonth = DATEADD(s,-1,DATEADD(mm, DATEDIFF(m,0,@dtDate)+1,0)) 
set @LastDayNextMonth = DATEADD(s,-1,DATEADD(mm, DATEDIFF(m,0,@nextMonth)+1,0)) 
DECLARE @LastDayofTheMonth DATETIME
set @LastDayofTheMonth = DATEADD(s,-1,DATEADD(mm, DATEDIFF(m,0,getdate())+1,0))


DECLARE @tipo_doc INT,@estado_doc VARCHAR(1),@led_seccion VARCHAR(1),@cliente INT,@contratista INT,@empleado INT,@vehiculo INT
DECLARE @contratista_1 INT,@insertado DATETIME,@fecha_tolerancia DATETIME,@compliance_doc VARCHAR(1),@fecha_vigencia DATETIME,@doc_log VARCHAR(150),@grupo_doc INT
DECLARE @doc_id_lista INT

/*

DECLARE LedCargaDocs Cursor STATIC
FOR
*/


SELECT distinct led_tipos_doc.tipo_doc,
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.estado_doc,led_cliente_contratista.estado_inicial) as estado_doc,
/*
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.estado_doc,'N') as estado_doc,
*/
/*
iif(LDAnt.fecha_vigencia > GETDATE() and led_tipos_doc.periodicidad = 'E',LDAnt.estado_doc,'N') as estado_doc,
*/
led_tipos_doc.led_seccion,
led_contratistas.cliente,
led_contratistas.contratista,  
null as empleado,
null as vehiculo,
@periodo AS periodo,
led_contratistas.contratista_1,
GETDATE() as insertado,
/*
dateadd(ms,-3,Convert(varchar(10),
isnull(led_cliente_contratista.dias_tolerancia,0) + getdate(),111)) as fecha_tolerancia,
*/

@LastDayofTheMonth as fecha_tolerancia,


/*
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.compliance_doc,'B') as compliance_doc,
*/
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.compliance_doc,iif(led_cliente_contratista.estado_inicial='N','B',iif(led_cliente_contratista.estado_inicial='R','R',iif(led_cliente_contratista.estado_inicial='V','V',iif(led_cliente_contratista.estado_inicial='I','A','B'))))) as compliance_doc,

iif(LDAnt.fecha_vigencia > getdate(),LDAnt.fecha_vigencia,NULL) as fecha_vigencia,

/*
iif(LDAnt.fecha_vigencia > GETDATE() and led_tipos_doc.periodicidad = 'E',LDAnt.compliance_doc,'B') as compliance_doc,
iif(LDAnt.fecha_vigencia > getdate() and led_tipos_doc.periodicidad = 'E',LDAnt.fecha_vigencia,NULL) as fecha_vigencia,
*/

convert(varchar(16),getdate(),120) + ' GENERACION AUTOMATICA DE DOCUMENTOS' AS doc_log,
led_grupo_tipo_doc.grupo_doc,led_tipos_doc.tipo_doc_lista as doc_id_lista

FROM            led_contratistas 
 INNER JOIN led_cliente_contratista ON (led_contratistas.cliente = led_cliente_contratista.cliente AND led_contratistas.tipo_contratista = led_cliente_contratista.tipo_contratista)
 INNER JOIN clientes ON led_contratistas.cliente = clientes.cliente 
 inner JOIN led_tipos_doc ON led_cliente_contratista.tipo_doc = led_tipos_doc.tipo_doc 
 inner join led_grupo_tipo_doc ON led_cliente_contratista.tipo_doc = led_grupo_tipo_doc.tipo_doc
 inner join led_grupos_doc on led_grupo_tipo_doc.grupo_doc = led_grupos_doc.grupo_doc 
 INNER JOIN led_contratista_periodo on (led_contratistas.contratista = led_contratista_periodo.contratista and led_contratista_periodo.periodo = @periodo)
 left JOIN LED_DOCS LDAnt ON (LDAnt.tipo_doc = led_tipos_doc.tipo_doc AND LDAnt.led_seccion = led_tipos_doc.led_seccion AND LDAnt.contratista = led_contratistas.contratista 
 AND LDAnt.periodo = @periodoVAnt AND LDAnt.grupo_doc = led_grupo_tipo_doc.grupo_doc)
WHERE (clientes.cliente = @IDCliente) 
AND (led_cliente_contratista.activo = 1)
/*
and ((led_tipos_doc.doc_alta = 0 OR led_tipos_doc.doc_alta IS NULL)
and (led_tipos_doc.doc_baja = 0 OR led_tipos_doc.doc_baja IS NULL) or led_tipos_doc.doc_alta = 1 and (LDAnt.fecha_vigencia > getdate() OR LDAnt.fecha_vigencia IS NULL))
*/
and ( ISNULL(led_tipos_doc.doc_alta,0) = 0 
  or (led_tipos_doc.doc_alta = 1 /*and 
   (LDAnt.fecha_vigencia > getdate() OR LDAnt.fecha_vigencia IS NULL)*/
  ) )

and ISNULL(led_tipos_doc.doc_baja,0) = 0 

and led_contratistas.estado_contratista = 'A'
and led_grupos_doc.cliente = @IDCliente
and led_tipos_doc.modalidad = @Modalidad
/*
and LDAnt.contratista = @IDContratista
and led_contratistas.contratista = 189

and led_tipos_doc.tipo_doc = 694
*/
order by fecha_vigencia desc

/*
DECLARE @dbDocID BIGINT = 0
Open LedCargaDocs


Fetch NEXT FROM LedCargaDocs INTO @tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc,@doc_id_lista
While (@@FETCH_STATUS <> -1)

BEGIN
/*
SELECT 'A',@tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc,@doc_id_lista
*/
SET @dbDocID = 0
select @dbDocID = doc_id from led_docs
where tipo_doc = @tipo_doc
and periodo = @periodo
and led_seccion = @led_seccion
and contratista = @contratista
*/

/*
IF (@dbDocID = 0)
BEGIN
select @dbDocID as dbDocID, 'INSERTAMOS',@tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc,@doc_id_lista
END

Fetch NEXT FROM LedCargaDocs INTO @tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc,@doc_id_lista

END

CLOSE LedCargaDocs
DEALLOCATE LedCargaDocs
*/

/*

EXEC Imperium_Carga_Docs_Contratista3 201702,9700868

declare @periodo int = 201702
declare @IDCliente int = 9700868
declare @IDContratista int

DECLARE @ERRORNUMBER SMALLINT 
declare  @periodoAnt int 

DECLARE @PeriodoModalidad int  
DECLARE @Modalidad VARCHAR(1)

DECLARE @periodoV INT = NULL
DECLARE @periodoVAnt INT = NULL
DECLARE @periodoA INT = NULL
DECLARE @NombreCliente varchar(200)
DECLARE @periodoYear INT = NULL
DECLARE @periodoMonth INT = NULL

SET @periodoYear = convert(varchar(4),datepart(year,getdate()))
SET @periodoMonth = convert(varchar(2),datepart(month,getdate()))

SET @periodoYear = datepart(year,getdate())
SET @periodoMonth = datepart(month,getdate())

SET @periodoA = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())),2)

if (@periodoMonth = 1)
begin
set @periodoV = convert(varchar(4),@periodoYear-1) + RIGHT('00' +convert(varchar(2),12),2)
set @periodoVAnt = convert(varchar(4),@periodoYear-1) + RIGHT('00' +convert(varchar(2),11),2)
end

if (@periodoMonth > 1)
begin
set @periodoV = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())-1),2)
set @periodoVAnt = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())-2),2)
end


if @Periodo =  @periodoA
BEGIN
SET @Modalidad = 'A'
END
ELSE
BEGIN
SET @Modalidad = 'V'
END


/*

select @periodoV as periodoV,@periodoA as periodoA,@periodoVAnt as periodoVANT,@PERIODO AS PERIODO,@periodoYear as periodoYear,@periodoMonth as periodoMonth,@Modalidad AS Modalidad,@PeriodoModalidad AS PeriodoModalidad


set @periodoV = 201702
set @periodoVAnt = 201701
set @periodoA = 201703
*/
DECLARE @LastDay_AnyMonth DATETIME
DECLARE @LastDayofTheMonth DATETIME

--Last Day of Any Month and Year
DECLARE @dtDate DATETIME, @nextMonth DATETIME, @LastDayNextMonth DATETIME
SET @dtDate = substring(CONVERT(varchar(6),@periodo),1,4) + '-' + substring(CONVERT(varchar(6),@periodo),5,2) + '-01'
SET @nextMonth = DATEADD(mm, 1, @dtDate)

set @LastDay_AnyMonth = DATEADD(s,-1,DATEADD(mm, DATEDIFF(m,0,@dtDate)+1,0)) 
set @LastDayNextMonth = DATEADD(s,-1,DATEADD(mm, DATEDIFF(m,0,@nextMonth)+1,0)) 
set @LastDayofTheMonth = DATEADD(s,-1,DATEADD(mm, DATEDIFF(m,0,getdate())+1,0))



DECLARE @tipo_doc INT,@estado_doc VARCHAR(1),@led_seccion VARCHAR(1),@cliente INT,@contratista INT,@empleado INT,@vehiculo INT
DECLARE @contratista_1 INT,@insertado DATETIME,@fecha_tolerancia DATETIME,@compliance_doc VARCHAR(1),@fecha_vigencia DATETIME,@doc_log VARCHAR(150),@grupo_doc INT
DECLARE @doc_id_lista INT





SELECT distinct led_tipos_doc.tipo_doc,
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.estado_doc,led_cliente_contratista.estado_inicial) as estado_doc,
/*
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.estado_doc,'N') as estado_doc,
*/
/*
iif(LDAnt.fecha_vigencia > GETDATE() and led_tipos_doc.periodicidad = 'E',LDAnt.estado_doc,'N') as estado_doc,
*/
led_tipos_doc.led_seccion,
led_contratistas.cliente,
led_contratistas.contratista,  
null as empleado,
null as vehiculo,
@periodo AS periodo,
led_contratistas.contratista_1,
GETDATE() as insertado,
/*
dateadd(ms,-3,Convert(varchar(10),
isnull(led_cliente_contratista.dias_tolerancia,0) + getdate(),111)) as fecha_tolerancia,
*/

@LastDayofTheMonth as fecha_tolerancia,


/*
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.compliance_doc,'B') as compliance_doc,
*/
iif(LDAnt.fecha_vigencia > GETDATE(),LDAnt.compliance_doc,iif(led_cliente_contratista.estado_inicial='N','B',iif(led_cliente_contratista.estado_inicial='R','R',iif(led_cliente_contratista.estado_inicial='V','V',iif(led_cliente_contratista.estado_inicial='I','A','B'))))) as compliance_doc,

iif(LDAnt.fecha_vigencia > getdate(),LDAnt.fecha_vigencia,NULL) as fecha_vigencia,

/*
iif(LDAnt.fecha_vigencia > GETDATE() and led_tipos_doc.periodicidad = 'E',LDAnt.compliance_doc,'B') as compliance_doc,
iif(LDAnt.fecha_vigencia > getdate() and led_tipos_doc.periodicidad = 'E',LDAnt.fecha_vigencia,NULL) as fecha_vigencia,
*/

convert(varchar(16),getdate(),120) + ' GENERACION AUTOMATICA DE DOCUMENTOS' AS doc_log,
led_grupo_tipo_doc.grupo_doc,led_tipos_doc.tipo_doc_lista as doc_id_lista

FROM            led_contratistas 
INNER JOIN led_cliente_contratista ON (led_contratistas.cliente = led_cliente_contratista.cliente AND led_contratistas.tipo_contratista = led_cliente_contratista.tipo_contratista)
INNER JOIN clientes ON led_contratistas.cliente = clientes.cliente 
inner JOIN led_tipos_doc ON led_cliente_contratista.tipo_doc = led_tipos_doc.tipo_doc 
inner join led_grupo_tipo_doc ON led_cliente_contratista.tipo_doc = led_grupo_tipo_doc.tipo_doc
inner join led_grupos_doc on led_grupo_tipo_doc.grupo_doc = led_grupos_doc.grupo_doc 
INNER JOIN led_contratista_periodo on (led_contratistas.contratista = led_contratista_periodo.contratista and led_contratista_periodo.periodo = @periodo)
left JOIN LED_DOCS LDAnt ON (LDAnt.tipo_doc = led_tipos_doc.tipo_doc AND LDAnt.led_seccion = led_tipos_doc.led_seccion AND LDAnt.contratista = led_contratistas.contratista 
AND LDAnt.periodo = @periodoVAnt AND LDAnt.grupo_doc = led_grupo_tipo_doc.grupo_doc)
WHERE (clientes.cliente = @IDCliente) 
AND (led_cliente_contratista.activo = 1)
/*
and ((led_tipos_doc.doc_alta = 0 OR led_tipos_doc.doc_alta IS NULL)
and (led_tipos_doc.doc_baja = 0 OR led_tipos_doc.doc_baja IS NULL) or led_tipos_doc.doc_alta = 1 and (LDAnt.fecha_vigencia > getdate() OR LDAnt.fecha_vigencia IS NULL))
*/
and ( ISNULL(led_tipos_doc.doc_alta,0) = 0 
 or (led_tipos_doc.doc_alta = 1 /*and 
(LDAnt.fecha_vigencia > getdate() OR LDAnt.fecha_vigencia IS NULL)*/
) )

and ISNULL(led_tipos_doc.doc_baja,0) = 0 

and led_contratistas.estado_contratista = 'A'
and led_grupos_doc.cliente = @IDCliente
and led_tipos_doc.modalidad = @Modalidad
/*
and LDAnt.contratista = @IDContratista
and led_contratistas.contratista = 189

and led_tipos_doc.tipo_doc = 694
*/
order by fecha_vigencia desc



*/



END

GO