dbo.cursor_infodata

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Assembly

SQL Script

Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/*
select * from domicilios_todos where cuit = '20225157937' and tipo_domicilio = 'E'
exec [actualizar_datos_con_padron] '20225157937'
select * from domicilios_todos where cuit = '20225157937' and tipo_domicilio = 'E'
select * from padron_electoral where documento = '22515793'
*/

CREATE OR ALTER PROCEDURE dbo.cursor_infodata 

AS
BEGIN
    SET NOCOUNT ON;
 declare @nombre_empresa varchar(200), @usuario varchar(200) , @clave varchar(200) ,@email varchar(200) ,@identificacion varchar(20)
 declare @email_original varchar(200)
 declare @nombre_alternativo varchar(200)
 declare @user_id int
 declare @cliente int
 DECLARE C_infodata CURSOR FOR

 select top 2000  'INFODATA '+padrones.nombre_persona,padrones.nombre_persona,usuario,'111111111' as clave,correo,identificacion from infodata
 inner join padrones on padrones.identificacion = CUIT
 and correo  != 'ccta@ccipsta.com' and (isnull(procesado,0) = 0 ) and cuit != ''
 order by nombre_persona
 

 OPEN C_infodata
 FETCH NEXT FROM C_infodata INTO @nombre_alternativo,@nombre_empresa, @usuario, @clave,@email,@identificacion
 WHILE @@fetch_status = 0
 BEGIN
  set @cliente  = '' 
  set @email_original = ''
  set @user_id = ''
  --select * from infodata where correo = 'camaragm@ccgonzalezmoreno.com.ar'
  set @cliente = (select cliente from clientes where cuit = @identificacion)
  if(isnull(@cliente,'') = '')
  begin
   set @cliente = (select cast(rand() * 100000000 as int))
   if((select count(cliente) from clientes where  cliente = @cliente) > 0)
   begin
    select 'repetido 1'
    set @cliente = (select cast(rand() * 100000000 as int))
   end
   if((select count(cliente) from clientes where  cliente = @cliente) > 0)
   begin
    select 'repetido 2'
    set @cliente = (select cast(rand() * 100000000 as int))
   end
   
   insert into clientes (cliente,nombre_alternativo,nombre_cliente,iv_notificar_admin,country_code,identificador,numero,lista_creditos,cli_codigo,created_by,acceso_informes,pai_codigo,cuit)values(@cliente,@nombre_alternativo,@nombre_empresa,0,'AR','CUIT',@identificacion,1,@cliente,15342812,'M',54,@identificacion) 
   
  end
  set @user_id = (select cast(rand() * 100000000 as int))
  if((select count(@user_id) from users where  user_id = @user_id) > 0)
   begin

    set @user_id = (select cast(rand() * 100000000 as int))
   end
  insert into users (user_id,username,password,email,cli_codigo,country_code,active_user,cookie_id,user_created) values (@user_id,@email,@clave,@email,@cliente,'AR','Y',@user_id,getdate());
  
  --select * from usuarios_productos
  if(isnull(@cliente,'') != '' and isnull(@user_id,'') != '' )
  begin
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,2,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,5,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,6,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,7,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,8,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,9,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,10,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,11,0,0,1,getdate(),15342812) 
   insert into usuarios_productos (cliente,user_id,id_producto,id_seccion,limite_consumo,bloquear_consumo,activo,created,created_by) values (@cliente,@user_id,12,15,0,0,1,getdate(),15342812) 
  end

  update infodata set procesado = 1 where correo = @email
  FETCH NEXT FROM C_infodata INTO @nombre_alternativo,@nombre_empresa, @usuario, @clave,@email,@identificacion
 END  
 CLOSE C_infodata
 DEALLOCATE C_infodata


 /* Encriptamos los usuarios insertados */

 
declare @clave2 varchar(100), @correo2 varchar(60)

DECLARE infodataUsers CURSOR FOR
  select distinct top 100 clave,correo from infodata where correo in (select username from users where password != '@encripted')

 OPEN infodataUsers
 FETCH NEXT FROM infodataUsers INTO @clave2, @correo2
 WHILE @@fetch_status = 0
 BEGIN 

  exec user_login @correo2,'111111111', 99, 3, 20, 0, 'CHANGEPWD',@clave2


  FETCH NEXT FROM infodataUsers INTO @clave2, @correo2

 END  
 CLOSE infodataUsers
 DEALLOCATE infodataUsers



 insert into clientes_productos (cliente,cli_codigo,id_producto,limite_consumo,fecha_desde,fecha_hasta,tipo_paquete,consumido,bloquear_consumo,activo,created)
SELECT        cliente, cli_codigo, 
12 as id_producto, 
500 as limite_consumo, 
'2019-03-01' as fecha_desde, 
'2020-02-29' as fecha_hasta, 
'L' as tipo_paquete, null as consumido, 
1 as bloquear_consumo, 
1 as activo, 
getdate() as created
FROM            clientes
where cliente in (select distinct cliente from clientes where cuit in (select distinct cuit from infodata where cuit is not null and cuit != ''))
and cliente not in (select cliente from clientes_productos where cliente in (

select distinct cliente from clientes where cuit in (select distinct cuit from infodata where cuit is not null and cuit != '')
))


END
GO

Used By

No items found