dbo.SAAS_historial

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/*

exec SAAS_historial 63

*/
/*
select * from SAAS_Historial_Consultas where contraparte = 45099
select * from ln_contrapartes where contraparte = 45099

select * from saas_contratos
select * from saas_usuarios_contratos where saas_usuario=74

exec [SAAS_historial] 61,null,null,null

select * from saas_usuarios where nombre like '%vanesa%'

exec [SAAS_historial_0] 0,0,0, 515494256

*/
---
--- Este stored se usa en LN_Panel_Control_SAAS y LN_Panel_Control_SAAS_file, si se agrega o se saca alguna columna hay que tocar esos SP
---
CREATE OR ALTER PROCEDURE dbo.SAAS_historial 
 @p_saas_usuario_contrato int, 
 @p_saas_usuario int = 0,
 @p_contraparte int = 0, 
 @p_cliente int = 0
 
AS
BEGIN
 declare @cliente int 
 declare @pUsuario int

 SET NOCOUNT ON;
 if (@p_saas_usuario_contrato != 0) 
 begin 
  set @cliente = (select cliente from SAAS_Clientes 
         where saas_cliente = (select SAAS_Cliente
                    from SAAS_Usuarios_Contratos
                       where saas_usuario_contrato = @p_saas_usuario_contrato)) 

  set @pUsuario = (select distinct SAAS_Usuario from SAAS_Usuarios_Contratos where saas_usuario_contrato = @p_saas_usuario_contrato) 

  select distinct shc.estado, 
  shc.bancos_estado, 
  shc.cheques_estado, 
  shc.contables_estado,
  shc.patrimonio_estado,
  shc.fiscales_estado, 
  shc.formales_estado, 
  shc.legales_estado, 
  shc.black_list,
  convert(date,fecha_consulta,112) as fecha_consulta,
  SAAS_Contratos.nro_contrato as numero_contrato,
  padrones.nombre_persona as razon_social,padrones.identificacion,
  SAAS_Usuarios.nombre, SAAS_Usuarios.email as email, 
  iif(LN_cliente_nivel.texto_largo is not null, LN_cliente_nivel.texto_largo, estado) as texto, 
  shc.contraparte as contraparte, 
  p2.nombre_persona as asegurado, 
  final.color as color_final, 
  final.valor as estado_final, 
  /* 01/02/2023 se agrega el estado del contrato / cliente, antes solo traia los contratos activos */
  SAAS_Contratos.activo, 
  SAAS_Clientes.activo
  /*,
   shc.black_list,
   shc.black_list_score
   */
  from SAAS_Historial_Consultas shc
  left join ln_contrapartes on (ln_contrapartes.contraparte = shc.contraparte and ln_contrapartes.activo = 1) 
  inner join padrones on ln_contrapartes.id_padron = padrones.id_padron
  -- antes solo traia activo 1 de todo lo de abajo: Ahora si el cliente o contrato esta inactivo lo identifica como contrato_activo = 0
  -- pero si el usuario o el usuario contrato esta inactivo lo tiene que mandar al panel 
  inner join SAAS_Usuarios_Contratos on (SAAS_Usuarios_Contratos.saas_usuario_contrato = shc.saas_usuario_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Usuarios  on (SAAS_Usuarios.saas_usuario = SAAS_Usuarios_Contratos.saas_usuario and SAAS_Usuarios.activo in (0,1)) 
  inner join SAAS_Contratos on (SAAS_Contratos.saas_contrato = SAAS_Usuarios_Contratos.saas_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Clientes  on (SAAS_Clientes.saas_cliente = SAAS_Usuarios_Contratos.saas_cliente and SAAS_Clientes.activo in (0,1)) 
  inner join padrones p2 on p2.id_padron = SAAS_Clientes.id_padron

  left outer join ln_cliente_nivel 

      on (ln_cliente_nivel.cliente = @cliente 
          and ln_cliente_nivel.indicador = (select top 1 indicador from ln_indicadores where clave_indicador = 'AprobacionFinal')
          and texto = estado)
  inner join LN_gestiones on (shc.contraparte = LN_gestiones.contraparte and LN_gestiones.vigente = 1 and LN_gestiones.desde <= GETDATE() and LN_gestiones.hasta >= GETDATE())

  LEFT OUTER JOIN
    (select contraparte, gestion, 
            valor = isnull(ln_cliente_nivel.texto_largo,LN_contraparte_indicadores.valor_texto), 
      color = isnull(ln_cliente_nivel.color_fondo,'') 
      from LN_contraparte_indicadores 
      inner join LN_indicadores on LN_contraparte_indicadores.indicador = LN_indicadores.indicador
      left outer join ln_cliente_nivel 
      on (ln_cliente_nivel.cliente = @cliente 
          and ln_cliente_nivel.indicador = LN_indicadores.indicador 
          and desde <= LN_contraparte_indicadores.valor_numerico and hasta > LN_contraparte_indicadores.valor_numerico)
      where clave_indicador = 'AprobacionFinal') as final
      on (final.contraparte = shc.contraparte and
       final.gestion = LN_gestiones.gestion) 

  where 
  /*SAAS_Usuarios_Contratos.saas_usuario_contrato = @p_saas_usuario_contrato */
  /*SAAS_Usuarios_Contratos.saas_usuario_contrato in (select distinct saas_usuario_contrato from SAAS_Usuarios_Contratos where saas_usuario = @pUsuario and vigencia_desde < getdate() and isnull(vigencia_hasta,getdate()+100) > getdate() and activo = 1)*/
  /* INNER JOIN dbo.DelimitedSplit8K(@DOCS, ',') DOCS ON led_docs.doc_id = DOCS.Item*/
 /* SAAS_Usuarios_Contratos.saas_usuario_contrato in (select saas_usuario_contrato from SAAS_Usuarios_Contratos where saas_contrato in (
  select saas_contrato from SAAS_Usuarios_Contratos where saas_usuario_contrato=@p_saas_usuario_contrato)
  and vigencia_desde < getdate() and isnull(vigencia_hasta,getdate()+100) > getdate() and activo = 1)
 */
  SAAS_Usuarios_Contratos.saas_usuario_contrato in (select saas_usuario_contrato from SAAS_Usuarios_Contratos where saas_contrato in (select distinct saas_contrato from SAAS_Usuarios_Contratos where SAAS_Usuarios_Contratos.saas_usuario in (select saas_usuario from SAAS_Usuarios_Contratos where saas_usuario_contrato = @p_saas_usuario_contrato )))


  order by fecha_consulta desc
  return 
 end 

 
 if (@p_saas_usuario != 0) 
 begin 
  set @cliente = (select cliente from SAAS_Clientes 
         where saas_cliente = (select SAAS_Cliente
                    from SAAS_Usuarios
                       where saas_usuario = @p_saas_usuario)) 
  select distinct shc.estado, 
  shc.bancos_estado, 
  shc.cheques_estado, 
  shc.contables_estado,
  shc.patrimonio_estado,
  shc.fiscales_estado, 
  shc.formales_estado, 
  shc.legales_estado, 
  shc.black_list,
  convert(date,fecha_consulta,112) as fecha_consulta,
  SAAS_Contratos.nro_contrato as numero_contrato,
  padrones.nombre_persona as razon_social,padrones.identificacion,
  SAAS_Usuarios.nombre, SAAS_Usuarios.email as email, 
  iif(LN_cliente_nivel.texto_largo is not null, LN_cliente_nivel.texto_largo, estado) as texto, 
  shc.contraparte as contraparte, 
  p2.nombre_persona as asegurado, 
  final.color as color_final, 
  final.valor as estado_final, 
  /* 01/02/2023 se agrega el estado del contrato / cliente, antes solo traia los contratos activos */
  SAAS_Contratos.activo, 
  SAAS_Clientes.activo
  /*,
   shc.black_list,
   shc.black_list_score
   */
  from SAAS_Historial_Consultas shc
  left join ln_contrapartes on (ln_contrapartes.contraparte = shc.contraparte and ln_contrapartes.activo in (1)) 
  inner join padrones on ln_contrapartes.id_padron = padrones.id_padron
  -- antes solo traia activo 1 de todo lo de abajo: Ahora si el cliente o contrato esta inactivo lo identifica como contrato_activo = 0
  -- pero si el usuario o el usuario contrato esta inactivo lo tiene que mandar al panel 
  inner join SAAS_Usuarios_Contratos on (SAAS_Usuarios_Contratos.saas_usuario_contrato = shc.saas_usuario_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Usuarios  on (SAAS_Usuarios.saas_usuario = SAAS_Usuarios_Contratos.saas_usuario and SAAS_Usuarios.activo in (0,1)) 
  inner join SAAS_Contratos on (SAAS_Contratos.saas_contrato = SAAS_Usuarios_Contratos.saas_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Clientes  on (SAAS_Clientes.saas_cliente = SAAS_Usuarios_Contratos.saas_cliente and SAAS_Clientes.activo in (0,1)) 
  inner join padrones p2 on p2.id_padron = SAAS_Clientes.id_padron

  left outer join ln_cliente_nivel 
      on (ln_cliente_nivel.cliente = @cliente 
          and ln_cliente_nivel.indicador = (select top 1 indicador from ln_indicadores where clave_indicador = 'AprobacionFinal')
          and texto = estado)

  inner join LN_gestiones on (shc.contraparte = LN_gestiones.contraparte and LN_gestiones.vigente = 1 and LN_gestiones.desde <= GETDATE() and LN_gestiones.hasta >= GETDATE())

  LEFT OUTER JOIN
    (select contraparte, gestion, 
            valor = isnull(ln_cliente_nivel.texto_largo,LN_contraparte_indicadores.valor_texto), 
      color = isnull(ln_cliente_nivel.color_fondo,'') 
      from LN_contraparte_indicadores 
      inner join LN_indicadores on LN_contraparte_indicadores.indicador = LN_indicadores.indicador
      left outer join ln_cliente_nivel 
      on (ln_cliente_nivel.cliente = @cliente  
          and ln_cliente_nivel.indicador = LN_indicadores.indicador 
          and desde <= LN_contraparte_indicadores.valor_numerico and hasta > LN_contraparte_indicadores.valor_numerico)
      where clave_indicador = 'AprobacionFinal') as final
      on (final.contraparte = shc.contraparte and
       final.gestion = LN_gestiones.gestion) 
  where SAAS_Usuarios.saas_usuario = @p_saas_usuario or (SAAS_Usuarios_Contratos.saas_usuario_contrato in (select saas_usuario_contrato from SAAS_Usuarios_Contratos where saas_contrato in (
   select saas_contrato from SAAS_Usuarios_Contratos where saas_usuario_contrato=@p_saas_usuario_contrato)
   and vigencia_desde < getdate() and isnull(vigencia_hasta,getdate()+100) > getdate() and activo = 1))

  order by fecha_consulta desc
  return 
 end 

 
 if (@p_contraparte != 0) 
 begin 
  set @cliente = (select cliente from LN_contrapartes 
         where contraparte = @p_contraparte) 
  select distinct shc.estado, 
  shc.bancos_estado, 
  shc.cheques_estado, 
  shc.contables_estado,
  shc.patrimonio_estado,
  shc.fiscales_estado, 
  shc.formales_estado, 
  shc.legales_estado, 
  shc.black_list,
  convert(date,fecha_consulta,112) as fecha_consulta,
  SAAS_Contratos.nro_contrato as numero_contrato,
  padrones.nombre_persona as razon_social,padrones.identificacion,
  SAAS_Usuarios.nombre, SAAS_Usuarios.email as email, 
  iif(LN_cliente_nivel.texto_largo is not null, LN_cliente_nivel.texto_largo, estado) as texto, 
  shc.contraparte as contraparte, 
  p2.nombre_persona as asegurado, 
  final.color as color_final, 
  final.valor as estado_final, 
  /* 01/02/2023 se agrega el estado del contrato / cliente, antes solo traia los contratos activos */
  SAAS_Contratos.activo, 
  SAAS_Clientes.activo
  /*,
   shc.black_list,
   shc.black_list_score
   */
  from SAAS_Historial_Consultas shc
  left join ln_contrapartes on (ln_contrapartes.contraparte = shc.contraparte and ln_contrapartes.activo = 1) 
  inner join padrones on ln_contrapartes.id_padron = padrones.id_padron
  -- antes solo traia activo 1 de todo lo de abajo: Ahora si el cliente o contrato esta inactivo lo identifica como contrato_activo = 0
  -- pero si el usuario o el usuario contrato esta inactivo lo tiene que mandar al panel 
  inner join SAAS_Usuarios_Contratos on (SAAS_Usuarios_Contratos.saas_usuario_contrato = shc.saas_usuario_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Usuarios  on (SAAS_Usuarios.saas_usuario = SAAS_Usuarios_Contratos.saas_usuario and SAAS_Usuarios.activo in (0,1)) 
  inner join SAAS_Contratos on (SAAS_Contratos.saas_contrato = SAAS_Usuarios_Contratos.saas_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Clientes  on (SAAS_Clientes.saas_cliente = SAAS_Usuarios_Contratos.saas_cliente and SAAS_Clientes.activo in (0,1)) 
  inner join padrones p2 on p2.id_padron = SAAS_Clientes.id_padron

  left outer join ln_cliente_nivel 
      on (ln_cliente_nivel.cliente = @cliente 
          and ln_cliente_nivel.indicador = (select top 1 indicador from ln_indicadores where clave_indicador = 'AprobacionFinal')
          and texto = estado)

  inner join LN_gestiones on (shc.contraparte = LN_gestiones.contraparte and LN_gestiones.vigente = 1 and LN_gestiones.desde <= GETDATE() and LN_gestiones.hasta >= GETDATE())

  LEFT OUTER JOIN
    (select contraparte, gestion, 
            valor = isnull(ln_cliente_nivel.texto_largo,LN_contraparte_indicadores.valor_texto), 
      color = isnull(ln_cliente_nivel.color_fondo,'') 
      from LN_contraparte_indicadores 
      inner join LN_indicadores on LN_contraparte_indicadores.indicador = LN_indicadores.indicador
      left outer join ln_cliente_nivel 
      on (ln_cliente_nivel.cliente = @cliente  
          and ln_cliente_nivel.indicador = LN_indicadores.indicador 
          and desde <= LN_contraparte_indicadores.valor_numerico and hasta > LN_contraparte_indicadores.valor_numerico)
      where clave_indicador = 'AprobacionFinal') as final
      on (final.contraparte = shc.contraparte and
       final.gestion = LN_gestiones.gestion) 

  where shc.contraparte = @p_contraparte
  order by fecha_consulta desc
  return 
 end 

 if (@p_cliente != 0) 
 begin 
  set @cliente = @p_cliente
  select distinct shc.estado, 
  shc.bancos_estado, 
  shc.cheques_estado, 
  shc.contables_estado,
  shc.patrimonio_estado,
  shc.fiscales_estado, 
  shc.formales_estado, 
  shc.legales_estado, 
  shc.black_list,
  --fecha_consulta, 
  convert(date,fecha_consulta,112) as fecha_consulta,
  SAAS_Contratos.nro_contrato as numero_contrato,
  padrones.nombre_persona as razon_social,padrones.identificacion,
  SAAS_Usuarios.nombre, SAAS_Usuarios.email as email, 
  iif(LN_cliente_nivel.texto_largo is not null, LN_cliente_nivel.texto_largo, estado) as texto, 
  shc.contraparte as contraparte, 
  p2.nombre_persona as asegurado, 
  final.color as color_final, 
  final.valor as estado_final, 
  /* 01/02/2023 se agrega el estado del contrato / cliente, antes solo traia los contratos activos */
  SAAS_Contratos.activo, 
  SAAS_Clientes.activo
  /*,
   shc.black_list,
   shc.black_list_score
   */
  from SAAS_Historial_Consultas shc
  left join ln_contrapartes on (ln_contrapartes.contraparte = shc.contraparte and ln_contrapartes.activo = 1) 
  inner join padrones on ln_contrapartes.id_padron = padrones.id_padron
  -- antes solo traia activo 1 de todo lo de abajo: Ahora si el cliente o contrato esta inactivo lo identifica como contrato_activo = 0
  -- pero si el usuario o el usuario contrato esta inactivo lo tiene que mandar al panel 
  inner join SAAS_Usuarios_Contratos on (SAAS_Usuarios_Contratos.saas_usuario_contrato = shc.saas_usuario_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Usuarios  on (SAAS_Usuarios.saas_usuario = SAAS_Usuarios_Contratos.saas_usuario and SAAS_Usuarios.activo in (0,1)) 
  inner join SAAS_Contratos on (SAAS_Contratos.saas_contrato = SAAS_Usuarios_Contratos.saas_contrato and SAAS_Usuarios_Contratos.activo in (0,1)) 
  inner join SAAS_Clientes  on (SAAS_Clientes.saas_cliente = SAAS_Usuarios_Contratos.saas_cliente and SAAS_Clientes.activo in (0,1)) 
  inner join padrones p2 on p2.id_padron = SAAS_Clientes.id_padron

  left outer join ln_cliente_nivel 

      on (ln_cliente_nivel.cliente = @cliente 
          and ln_cliente_nivel.indicador = (select top 1 indicador from ln_indicadores where clave_indicador = 'AprobacionFinal')
          and texto = estado)
       
  inner join LN_gestiones on (shc.contraparte = LN_gestiones.contraparte and LN_gestiones.vigente = 1 and LN_gestiones.desde <= GETDATE() and LN_gestiones.hasta >= GETDATE())

  LEFT OUTER JOIN
    (select contraparte, gestion, 
            valor = isnull(ln_cliente_nivel.texto_largo,LN_contraparte_indicadores.valor_texto), 
      color = isnull(ln_cliente_nivel.color_fondo,'') 
      from LN_contraparte_indicadores 
      inner join LN_indicadores on LN_contraparte_indicadores.indicador = LN_indicadores.indicador
      left outer join ln_cliente_nivel 
      on (ln_cliente_nivel.cliente = @cliente 
          and ln_cliente_nivel.indicador = LN_indicadores.indicador 
          and desde <= LN_contraparte_indicadores.valor_numerico and hasta > LN_contraparte_indicadores.valor_numerico)
      where clave_indicador = 'AprobacionFinal') as final
      on (final.contraparte = shc.contraparte and
       final.gestion = LN_gestiones.gestion) 

  where SAAS_Clientes.cliente = @p_cliente 
  order by fecha_consulta desc
  return 
 end 



END

GO