Description
Properties
| Name | Value |
|---|---|
| ANSI Nulls ON | True |
| Quoted Identifier ON | True |
| Encrypted | False |
| Execute As | |
| Assembly |
Parameters
3| Name | Data Type | Length | Description |
|---|---|---|---|
| @periodo | int | 4 | |
| @IDCliente | int | 4 | |
| @led_seccion | varchar | 1 |
SQL Script
Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE OR ALTER PROCEDURE dbo.Carga_Led_Score
@periodo int,
@IDCliente int,
@led_seccion varchar(1)
AS
BEGIN
SET NOCOUNT ON;
DECLARE @ERRORNUMBER SMALLINT
SELECT 'NO USAR'
/*
if (@periodo is null)
BEGIN
SET @periodo = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())),2)
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 @tipo_doc INT,@estado_doc 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 @estado_complianceV INT
DECLARE @estado_complianceR INT
DECLARE @estado_complianceB INT
DECLARE LedResumenPeriodo Cursor
FOR
select distinct led_contratista_periodo.contratista from led_contratista_periodo
INNER JOIN led_contratistas ON led_contratista_periodo.contratista = led_contratistas.contratista
INNER JOIN led_cliente_contratista ON led_contratistas.cliente = led_cliente_contratista.cliente
where led_contratistas.cliente = @IDCliente
and led_contratista_periodo.periodo = @periodo
Open LedResumenPeriodo
Fetch NEXT FROM LedResumenPeriodo INTO @contratista
While (@@FETCH_STATUS <> -1)
BEGIN
/*
SELECT @tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc
*/
BEGIN TRY
/*
select @contratista as contratista,
@periodo as periodo,
@led_seccion as led_seccion,
*/
SELECT
@estado_complianceV = (select count(*) as cantV from led_docs where contratista_1 = @contratista AND LED_SECCION = @led_seccion and periodo = @periodo and (compliance_doc = 'V' or (compliance_doc = 'B' and fecha_tolerancia > getdate()))),
@estado_complianceR = (select count(*) as cantV from led_docs where contratista_1 = @contratista AND LED_SECCION = @led_seccion and periodo = @periodo and (compliance_doc = 'R' or (compliance_doc = 'B' and fecha_tolerancia < getdate()))),
@estado_complianceB = (select count(*) as cantV from led_docs where contratista_1 = @contratista AND LED_SECCION = @led_seccion and periodo = @periodo and compliance_doc = 'B')
if (@estado_complianceR > 0)
begin
insert INTO led_compliance (contratista, periodo, led_seccion,estado_compliance)
VALUES (@contratista,@periodo,@led_seccion,'R')
end
if (@estado_complianceV > 0 AND @estado_complianceR = 0)
begin
insert INTO led_compliance (contratista, periodo, led_seccion,estado_compliance)
VALUES (@contratista,@periodo,@led_seccion,'V')
end
END TRY
BEGIN CATCH
/*
SET @ERRORNUMBER = 1
*/
/*
SELECT @ERRORNUMBER,@tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc
*/
/*
select 'insert into led_docs (
tipo_doc,
estado_doc,
led_seccion,
cliente,
contratista,
empleado,
vehiculo,
periodo,
contratista_1,
insertado,
fecha_tolerancia,
compliance_doc,
fecha_vigencia,
doc_log,
grupo_doc
)
values'
*/
/*
select @tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc
*/
select 'error'
END CATCH
Fetch NEXT FROM LedResumenPeriodo INTO @contratista
/*
Fetch NEXT FROM LedResumenPeriodo 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
*/
END
CLOSE LedResumenPeriodo
DEALLOCATE LedResumenPeriodo
*/
END
GO
GO
CREATE OR ALTER PROCEDURE dbo.Carga_Led_Score
@periodo int,
@IDCliente int,
@led_seccion varchar(1)
AS
BEGIN
SET NOCOUNT ON;
DECLARE @ERRORNUMBER SMALLINT
SELECT 'NO USAR'
/*
if (@periodo is null)
BEGIN
SET @periodo = convert(varchar(4),datepart(year,getdate())) + RIGHT('00' +convert(varchar(2),datepart(month,getdate())),2)
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 @tipo_doc INT,@estado_doc 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 @estado_complianceV INT
DECLARE @estado_complianceR INT
DECLARE @estado_complianceB INT
DECLARE LedResumenPeriodo Cursor
FOR
select distinct led_contratista_periodo.contratista from led_contratista_periodo
INNER JOIN led_contratistas ON led_contratista_periodo.contratista = led_contratistas.contratista
INNER JOIN led_cliente_contratista ON led_contratistas.cliente = led_cliente_contratista.cliente
where led_contratistas.cliente = @IDCliente
and led_contratista_periodo.periodo = @periodo
Open LedResumenPeriodo
Fetch NEXT FROM LedResumenPeriodo INTO @contratista
While (@@FETCH_STATUS <> -1)
BEGIN
/*
SELECT @tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc
*/
BEGIN TRY
/*
select @contratista as contratista,
@periodo as periodo,
@led_seccion as led_seccion,
*/
SELECT
@estado_complianceV = (select count(*) as cantV from led_docs where contratista_1 = @contratista AND LED_SECCION = @led_seccion and periodo = @periodo and (compliance_doc = 'V' or (compliance_doc = 'B' and fecha_tolerancia > getdate()))),
@estado_complianceR = (select count(*) as cantV from led_docs where contratista_1 = @contratista AND LED_SECCION = @led_seccion and periodo = @periodo and (compliance_doc = 'R' or (compliance_doc = 'B' and fecha_tolerancia < getdate()))),
@estado_complianceB = (select count(*) as cantV from led_docs where contratista_1 = @contratista AND LED_SECCION = @led_seccion and periodo = @periodo and compliance_doc = 'B')
if (@estado_complianceR > 0)
begin
insert INTO led_compliance (contratista, periodo, led_seccion,estado_compliance)
VALUES (@contratista,@periodo,@led_seccion,'R')
end
if (@estado_complianceV > 0 AND @estado_complianceR = 0)
begin
insert INTO led_compliance (contratista, periodo, led_seccion,estado_compliance)
VALUES (@contratista,@periodo,@led_seccion,'V')
end
END TRY
BEGIN CATCH
/*
SET @ERRORNUMBER = 1
*/
/*
SELECT @ERRORNUMBER,@tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc
*/
/*
select 'insert into led_docs (
tipo_doc,
estado_doc,
led_seccion,
cliente,
contratista,
empleado,
vehiculo,
periodo,
contratista_1,
insertado,
fecha_tolerancia,
compliance_doc,
fecha_vigencia,
doc_log,
grupo_doc
)
values'
*/
/*
select @tipo_doc,@estado_doc,@led_seccion,@cliente,@contratista,@empleado,@vehiculo,@periodo,@contratista_1,@insertado,@fecha_tolerancia,@compliance_doc,@fecha_vigencia,@doc_log,@grupo_doc
*/
select 'error'
END CATCH
Fetch NEXT FROM LedResumenPeriodo INTO @contratista
/*
Fetch NEXT FROM LedResumenPeriodo 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
*/
END
CLOSE LedResumenPeriodo
DEALLOCATE LedResumenPeriodo
*/
END
GO
Depends On
No items found
Used By
No items found