dbo.LN_IMPERIUM_ALTA_MASIVA_USUARIOS

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
CREATE OR ALTER PROCEDURE dbo.LN_IMPERIUM_ALTA_MASIVA_USUARIOS 

AS
BEGIN
    SET NOCOUNT ON;

declare @contratista int, @contraparte int ,@email varchar(150),@apellido varchar(100),@nombre varchar(100),@usrID int,@username varchar(150),@country varchar(2),@active varchar(1),@idioma int,@cli int,@lastname varchar(100),@cooki varchar(60)

DECLARE LEDALTAMASIVA Cursor
FOR
/*
SELECT * FROM LED_CONTRATISTAS WHERE contratista IN (7472,7414)
SELECT * FROM LN_CONTRAPARTES WHERE CONTRAPARTE IN (161991,162045)
select * from led_contratista_usuarios where contratista IN (7472,7414)
select * from users_by_group where user_id in (861091399,513586065)
select * from users where user_id in (861091399,513586065)
select * from ln_altas_masivas2 where user_id in (861091399,513586065)

select users.email,users.user_id,ln_altas_masivas2.email,ln_altas_masivas2.user_id from users inner join ln_altas_masivas2 on (lower(ltrim(rtrim(users.email))) = lower(ltrim(rtrim(ln_altas_masivas2.email))))
where ln_altas_masivas2.id_padron is not null and ln_altas_masivas2.contraparte is not null and ln_altas_masivas2.contratista_imperium is not null
and ln_altas_masivas2.cliente = 2046807993
/*
update ln_altas_masivas2 set ln_altas_masivas2.user_id = users.user_id
from users inner join ln_altas_masivas2 on (lower(ltrim(rtrim(users.email))) = lower(ltrim(rtrim(ln_altas_masivas2.email))))
where ln_altas_masivas2.id_padron is not null and ln_altas_masivas2.contraparte is not null and ln_altas_masivas2.contratista_imperium is not null
and ln_altas_masivas2.cliente = 2046807993
*/
select users.email,users.user_id,ln_altas_masivas2.email,ln_altas_masivas2.user_id from users right join ln_altas_masivas2 on (lower(ltrim(rtrim(users.email))) = lower(ltrim(rtrim(ln_altas_masivas2.email))))
where ln_altas_masivas2.id_padron is not null and ln_altas_masivas2.contraparte is not null and ln_altas_masivas2.contratista_imperium is not null
and ln_altas_masivas2.cliente = 2046807993
and ln_altas_masivas2.user_id is null


/*
SELECT *,lower(ltrim(rtrim(email)))
FROM ln_altas_masivas2 
where id_padron is not null 
--and contraparte is not null and contratista_imperium is not null
AND USER_ID IS NULL
and cliente = 2046807993


*/

*/

/*
select TOP 10 /*users.email,users.user_id,*/ln_altas_masivas2.contratista_imperium,ln_altas_masivas2.contraparte, 
ln_altas_masivas2.email,ln_altas_masivas2.apellido,ln_altas_masivas2.nombre,
ln_altas_masivas2.user_id from users right join ln_altas_masivas2 on (lower(ltrim(rtrim(users.email))) = lower(ltrim(rtrim(ln_altas_masivas2.email))))
where ln_altas_masivas2.id_padron is not null and ln_altas_masivas2.contraparte is not null and ln_altas_masivas2.contratista_imperium is not null
and ln_altas_masivas2.cliente = 2046807993
and ln_altas_masivas2.user_id is null
*/
/*
SELECT ln_altas_masivas2.contratista_imperium,ln_altas_masivas2.contraparte, 
ln_altas_masivas2.email,ln_altas_masivas2.apellido,ln_altas_masivas2.nombre,
ln_altas_masivas2.user_id
FROM ln_altas_masivas2 
where id_padron is not null 
--and contraparte is not null and contratista_imperium is not null
AND USER_ID IS NULL
and cliente = 2046807993
*/
/*SELECT lower(ltrim(rtrim(superville_imperium.[mail principal]))) as email,lower(ltrim(rtrim(superville_imperium.[mail principal]))) as username,'AR' as country_code,'Y' as active_user, 29523 as idioma,5391 as cli_codigo,
superville_imperium.contacto as last_name,SUBSTRING(replace(CONVERT(varchar(60), NEWID()),'-',''),0,50) as cookie_id
FROM superville_imperium inner JOIN PADRONES  ON PADRONES.identificacion=superville_imperium.CUIT
inner join led_tipos_contratista on (substring(SUPERVILLE_IMPERIUM.FAMILIA,1,50) = led_tipos_contratista.nombre_tipo_contratista and led_tipos_contratista.tipo_contratista>268)
inner join ln_familias on led_tipos_contratista.tipo_contratista=ln_familias.id_imperium
left join users on users.email=ltrim(rtrim(superville_imperium.[mail principal]))
--inner join users on users.username=ltrim(rtrim(superville_imperium.[mail principal]))
where users.user_id is null
*/
SELECT lower(ltrim(rtrim(arcor_usuarios.email))) as email,lower(ltrim(rtrim(arcor_usuarios.email))) as username,'AR' as country_code,'Y' as active_user, 29523 as idioma,5391 as cli_codigo,
arcor_usuarios.nombre as last_name,SUBSTRING(replace(CONVERT(varchar(60), NEWID()),'-',''),0,50) as cookie_id
FROM arcor_usuarios left join users on arcor_usuarios.email=users.email
where users.user_id is null



Open LEDALTAMASIVA



--Fetch NEXT FROM LEDALTAMASIVA INTO @contratista, @contraparte,@email,@apellido,@nombre,@usrID

Fetch NEXT FROM LEDALTAMASIVA INTO @email, @username,@country,@active,@idioma,@cli,@lastname,@cooki

While @@FETCH_STATUS = 0

BEGIN

    DECLARE @ok  char(1)
    DECLARE @p_rand int
    DECLARE @p_rand_char varchar(120)
    DECLARE @i      int
    set @ok = 'N'  
     --select @ok
     WHILE (@ok = 'N')
     BEGIN
      set @i = @i + 1
      set @p_rand = ROUND(((999999999 - 1) * RAND() + 1), 0)
      set @p_rand_char = convert(varchar(120),newid())
      if (select count(*) from users where user_id = @p_rand or cookie_id = @p_rand_char) = 0 
      begin 
       
-- insert into users (user_id, cookie_id, username, active_user, email, user_created,first_name,last_name,password) 
       insert into users (user_id,email,username,country_code,active_user,idioma,cli_codigo,last_name,cookie_id,password)

       --values (@p_rand, @p_rand_char,  @email, 'Y', @email, getdate(),@nombre,@apellido,'JHSYTRFS')
       values (@p_rand,@email,@username,@country,@active,@idioma,@cli,@lastname,@cooki,'ArcorLED2023')
       set @ok = 'S'
       --select @ok
      end
     END   

    --if (@ok='S')
    if (@ok='H')
    begin
     update led_contratistas set user_id= @p_rand where contratista =@contratista AND CONTRATISTA = contratista_1 
     
     update ln_altas_masivas2 set user_id= @p_rand where contratista_imperium =@contratista AND contraparte = @contraparte and user_id is null

     BEGIN TRY
      insert into led_contratista_usuarios (contratista,user_id)
      values (@contratista,@p_rand)
     END TRY
     BEGIN CATCH
     END CATCH
     BEGIN TRY
      insert into users_by_group (user_id,group_id)
      values (@p_rand,23437828)
     END TRY
     BEGIN CATCH
     END CATCH
    end

--select @contratista as contratista, @contraparte as contraparte,@email as email,@apellido as apellido,@nombre as nombre ,@p_rand as USRIDNEW

--Fetch NEXT FROM LEDALTAMASIVA INTO @contratista, @contraparte,@email,@apellido,@nombre,@usrID
Fetch NEXT FROM LEDALTAMASIVA INTO @email, @username,@country,@active,@idioma,@cli,@lastname,@cooki

END 

CLOSE LEDALTAMASIVA
DEALLOCATE LEDALTAMASIVA
END
GO