dbo.RunLedRun

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Assembly

Parameters

4
Name Data Type Length Description
@periodo int 4
@IDCliente int 4
@led_seccion varchar 1
@IDContratista int 4

SQL Script

Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO

CREATE OR ALTER PROCEDURE  dbo.RunLedRun
@periodo int,
@IDCliente int,
@led_seccion varchar(1),
@IDContratista int

AS

BEGIN
 SET NOCOUNT ON;

DECLARE @ERRORNUMBER SMALLINT 
/*
BEGIN
exec Imperium_Inicio_Periodo
END
*/




DECLARE @periodoV INT = NULL
DECLARE @periodoVAnt INT = NULL
DECLARE @periodoA INT = NULL
DECLARE @NombreCliente varchar(200)
DECLARE @periodoYear INT = NULL
DECLARE @periodoMonth INT = NULL
declare @ModalidadForzada varchar(1) = 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


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




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


/*
select @periodoV as periodoV,@periodoA as periodoA,@periodoVAnt as periodoVANT,@PERIODO AS PERIODO,@periodoYear as periodoYear,@periodoMonth as periodoMonth,@ModalidadForzada AS Modalidad
*/


if (@IDCliente <> 9335603)
 BEGIN
  BEGIN
   EXEC Imperium_Carga_Docs_Contratista  @periodo,@IDCliente
  END
  BEGIN
   EXEC Imperium_Carga_Docs_Sub_Contratista  @periodo,@IDCliente
  END
  BEGIN
   EXEC Imperium_Carga_Docs_VEHICULOS_Contratista  @periodo,@IDCliente,@IDContratista,@ModalidadForzada
   /*exec Imperium_Carga_Docs_VEHICULOS_Contratista 201611,9936068,1282,'A'*/
  END
  BEGIN
   EXEC Imperium_Carga_Docs_Empleados_Contratista  @periodo,@IDCliente,@IDContratista,@ModalidadForzada
  END
 END
ELSE
 BEGIN
  /*
   BEGIN
   EXEC Imperium_Carga_Docs_Contratista  @periodo,@IDCliente
   END
   */

  BEGIN
   EXEC Imperium_Carga_Docs_Sub_Contratista  @periodo,@IDCliente
  END
  BEGIN
   EXEC Imperium_Carga_Docs_VEHICULOS_Contratista  @periodo,@IDCliente,@IDContratista,@ModalidadForzada
   /*exec Imperium_Carga_Docs_VEHICULOS_Contratista 201611,9936068,1282,'A'*/
  END
  BEGIN
   EXEC Imperium_Carga_Docs_Empleados_Contratista  @periodo,@IDCliente,@IDContratista,@ModalidadForzada
   /*
    EXEC Imperium_Multi_Carga_Docs_Empleados @IDCliente
    */

  END
 END



/*
delete led_docs where tipo_doc = 346 and estado_doc = 'N' and cliente = 5546348 
and insertado >  '2016-12-31 23:59:59.727'


delete led_docs where periodo = 201702 and tipo_doc in (
select tipo_doc from led_tipos_doc where modalidad = 'V') 



*/

/*
UPDATE LED_DOCS SET estado_doc = 'P',compliance_doc = 'P' where estado_doc = 'N' and periodo = 201705 and tipo_doc in (
select tipo_doc from led_tipos_doc where modalidad = 'V')
*/

/*
update led_docs set estado_doc = 'P',compliance_doc='P' where periodo=201707 and  tipo_doc in (select tipo_doc from led_tipos_doc where modalidad = 'V')
*/



/*
and doc_log like '%GENERACION AUTOMATICA%'
*/


BEGIN
 EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'C'

END

BEGIN
 EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'E'
END

BEGIN
 EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'V'
END

BEGIN
 EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'S'
END


/*
BEGIN
EXEC Carga_Led_Inicio_Periodo
END
*/

/*
BEGIN
EXEC Carga_Led_Docs_Contratista @periodo,@IDCliente
END

BEGIN
EXEC Carga_Led_Docs_Empleados @periodo,@IDCliente
END

BEGIN
EXEC Carga_Led_Docs_Sub_Contratista @periodo,@IDCliente
END

BEGIN
EXEC Carga_Led_Docs_Vehiculos @periodo,@IDCliente
END

BEGIN
EXEC Carga_Led_Compliance_Periodo @periodo,@IDCliente,@led_seccion
END

BEGIN
EXEC Carga_Led_Resumen_Periodo @periodo,@IDCliente
END
*/


END

GO

Used By

1