dbo.LN_Alta_Masiva_new

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/*
exec [LN_Alta_Masiva_new] 5546348, 'UY'
*/
CREATE OR ALTER PROCEDURE dbo.LN_Alta_Masiva_new 
@clienteproceso int,
@pais varchar(10)
AS
BEGIN
    SET NOCOUNT ON;
declare @FECHA_VIG_DESDE date = getdate()
declare @FECHA_VIG_HASTA date = getdate() + (365*3)
declare @idpadron int 
declare @cliente int 
declare @nombre varchar(150) 
declare @eMAIL varchar(150) 
declare @TE varchar(150) 
declare @clave varchar(10) = 'JHSYTRFS'
declare @Userid int = 15342812
declare @MODALIDAD varchar(10) 
declare @p_contraparte int = null
declare @idContra int = null
declare @familia int 
declare @gestion int = null 
declare @idAlta int 
declare @paisservicio varchar(2)
declare @contra int
declare @inf int
declare @solicitante int 
declare @idtipo int 
declare @datam int =5546717
declare @itemcontrato int = 382
declare @productoblue int = 4
declare @prioridad int = 5
declare @fechalimite varchar(10)='2022-09-30'
declare @productoleddemo int
declare @montoLCS decimal(15,2)
declare @TaxID varchar(50)
declare @servicio_contratado int = 47
declare @idImperium int
declare @tipo_contratista_imperium int
declare @estado_contratista_imperium  varchar(1)


DECLARE LEDALTAMASIVA Cursor
FOR

--declare @clienteproceso int =1562620024

SELECT distinct TOP 30 isnull(nombre,'') + ' ' + apellido as CONTACTO,EMAIL,TE,id_padron,ln_altas_masivas.cliente,ln_altas_masivas.familia,tipo_pago,id_alta,paisservicio,
solicitante,informe,producto,isnull(monto_lcs,0) as monto_lcs,taxid,ln_altas_masivas.servicio_contratado,contratista_imperium,
tipo_contratista_imperium,estado_contratista_imperium 
FROM ln_altas_masivas2 ln_altas_masivas inner join LN_familias on (LN_altas_masivas.familia=LN_familias.familia and LN_familias.cliente = @clienteproceso )
left join led_tipos_contratista on ln_familias.id_imperium=led_tipos_contratista.tipo_contratista 
where procesado = 0
and id_padron is not null 
and contraparte is null
and ln_altas_masivas.cliente = @clienteproceso and paisservicio = @pais 
order by ln_altas_masivas.familia



Open LEDALTAMASIVA

Fetch NEXT FROM LEDALTAMASIVA INTO @nombre, @eMAIL,@TE,@idpadron,@cliente,@familia,@MODALIDAD,@idAlta,@paisservicio,@solicitante,@idtipo,@productoleddemo,@montoLCS,@TaxID,@servicio_contratado,@idImperium,
@tipo_contratista_imperium,@estado_contratista_imperium



While @@FETCH_STATUS = 0

BEGIN



BEGIN TRY

 /* 1 – ALTA CONOCIENDO EL ID PADRON  */


EXEC LN_contrapartes_  'INSERT', @idContra OUTPUT, @idpadron, @cliente, null,1, @nombre, @eMAIL, @TE, NULL, NULL, @clave, @FECHA_VIG_DESDE, @FECHA_VIG_HASTA, @Userid, 0, NULL, @MODALIDAD,null,null,@paisservicio

/* 2 – INSERT EN FAMILIAS */

EXEC LN_contraparte_familias_ 'INSERT', @idContra, @familia, NULL, 'N', 1, @Userid

/* 3- INSERT EN GESTIONES */
 
EXEC LN_gestiones_ 'INSERT', @gestion OUTPUT, NULL, @idContra, @FECHA_VIG_DESDE, @FECHA_VIG_HASTA, NULL, @Userid
 
update ln_altas_masivas2 set procesado = 1,contraparte = @idContra where id_padron=@idpadron and id_alta=@idAlta

select 'UPDATE DE ALTAS MASIVAS'

END TRY
BEGIN CATCH

END CATCH




Fetch NEXT FROM LEDALTAMASIVA INTO @nombre, @eMAIL,@TE,@idpadron,@cliente,@familia,@MODALIDAD,@idAlta,@paisservicio,@solicitante,@idtipo,@productoleddemo,@montoLCS,@TaxID,@servicio_contratado,@idImperium,
@tipo_contratista_imperium,@estado_contratista_imperium

END 

CLOSE LEDALTAMASIVA
DEALLOCATE LEDALTAMASIVA


END

GO