dbo.monitoreos_envio_mails

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
--exec monitoreos_envio_mails
CREATE OR ALTER PROCEDURE dbo.monitoreos_envio_mails
@yesterday date = null
      
AS
BEGIN
 
  SET NOCOUNT ON;
  if (@yesterday is null) begin set @yesterday = GETDATE() - 1 end 
 
        declare @respuesta table (cliente int, nombre_cliente varchar(200), email varchar(200))
       declare @r_cliente int
  declare @r_user_id int
  declare @r_nombre_cliente varchar(200)
  declare @r_mail varchar(200)
  DECLARE bn CURSOR FOR
      --declare @yesterday date = getdate() - 1
   /*
    select distinct a.cliente, a.user_id
      from monitoreos a
     inner join monitoreos_resultados b
                on b.cuit = a.cuit 
                and convert(date, b.fecha) = @yesterday
      where a.visible = 1
      order by a.cliente
    */

   select distinct a.cliente, a.user_id
     from monitoreos a
     inner join monitoreos_resultados b on (b.cuit = a.cuit and convert(date, b.fecha) = @yesterday)

     /* 29/07/2024: controla que el cliente este activo y tenga el producto MAN */
     inner join clientes_productos cp on cp.cliente = a.cliente 
     inner join clientes c on c.cliente = a.cliente and c.estado_cliente = 'A'

     /* 29/07/2024: Si el cliente está unificado, veo que el cliente padre esté activo y tenga el producto MAN activo */
     left join clientes_union u on u.cliente = a.cliente 
     left join clientes cu on cu.cliente = u.cliente_union 
     left join clientes_productos cpu on cpu.cliente = u.cliente_union and cpu.id_producto = 16 
     /**/

     where a.visible = 1
       and cp.id_producto = 16  --> Mantenimiento de cartera
       and cp.activo = 1
       /* 29/07/2024: Si el cliente está unificado, veo que el cliente padre esté activo y tenga el producto MAN activo */
    and iif(u.cliente_union is not null, iif((cu.estado_cliente = 'A' and cpu.activo = 1),1,0) , 1) = 1 
    /**/
       --and a.cliente = 20872528
     order by a.cliente


  -- apertura del cursor
  OPEN bn 
  -- Lectura de la primera fila del cursor
  Fetch next from bn INTO  @r_cliente, @r_user_id

  WHILE (@@FETCH_STATUS <> -1 )

   BEGIN

    set @r_mail = null
       if (@r_user_id is not null and @r_user_id > 0)
    begin
       set @r_mail = (select email from users where user_id = @r_user_id) 
    end
    
    if (@r_mail is not null) 
    begin
       set @r_mail = (select top 1 email from users where user_id in (select user_id from usuarios_productos where cliente = @r_cliente))
    end  
    if (@r_mail is not null) 
    begin
       set @r_nombre_cliente = (select nombre_cliente from clientes where cliente = @r_cliente) 
       insert into @respuesta values (@r_cliente, @r_nombre_cliente, @r_mail)
    end 
    FETCH next from bn INTO  @r_cliente, @r_user_id

   END
   -- Cierra el cursor
   CLOSE bn
   -- Libera los recursos del cursor
   DEALLOCATE bn 

  --select distinct cliente, nombre_cliente, email from @respuesta
  select distinct cliente, nombre_cliente, 'maria.soria@fidelitas.com.ar' as email from @respuesta
END

GO