dbo.Imperium_Rechazar_Documento

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
-- =============================================
-- Author: <Author,,Name>
-- Create date: <Create Date,,>
-- Description: <Description,,>
-- =============================================
CREATE OR ALTER PROCEDURE dbo.Imperium_Rechazar_Documento
 -- Add the parameters for the stored procedure here
 @p_doc_id         bigint = NULL,
 @p_motivo_rechazo       varchar(250) = NULL,
 @p_user_id         int = NULL

AS
BEGIN
 -- SET NOCOUNT ON added to prevent extra result sets from
 -- interfering with SELECT statements.
 SET NOCOUNT ON;


 if (@p_doc_id > 0 AND @p_user_id > 0) begin

  declare @estado varchar(1)
  select @estado = estado_doc from led_docs where doc_id = @p_doc_id

  if (@estado = 'I') begin

   declare @vcuit tinyint, @vcuil tinyint, @vdom tinyint, @tipo_doc int = null, @contratista int, @contratista_1 int, @periodo int, @nombre_tipo_doc varchar(200),
     @nombre_persona varchar(100), @abreviatura varchar(10), @identificacion varchar(30), @cliente int, @nombre_cliente varchar(200), @usuario_contratista int

   select @vcuit = led_tipos_doc.validar_cuit,
     @vcuil = led_tipos_doc.validar_lista_cuil,
     @vdom = led_tipos_doc.validar_lista_dominios,
     @tipo_doc = led_tipos_doc.tipo_doc,
     @contratista = led_docs.contratista,
     @contratista_1 = led_contratistas.contratista_1,
     @usuario_contratista = contratista1.user_id,
     @periodo = led_docs.periodo,
     @nombre_tipo_doc = led_tipos_doc.nombre_tipo_doc,
     @nombre_persona = padrones.nombre_persona,
     @abreviatura = identificadores.abreviatura,
     @identificacion = padrones.identificacion,
     @nombre_cliente = clientes.nombre_cliente,
     @cliente = led_contratistas.cliente

   from led_docs inner join led_tipos_doc on led_docs.tipo_doc = led_tipos_doc.tipo_doc
   inner join led_contratistas on led_docs.contratista = led_contratistas.contratista
   inner join led_contratistas contratista1 on led_contratistas.contratista_1 = contratista1.contratista
   inner join padrones on led_contratistas.id_padron = padrones.id_padron
   inner join identificadores on padrones.identificador = identificadores.identificador
   inner join clientes on led_contratistas.cliente = clientes.cliente
   where led_docs.doc_id = @p_doc_id

   declare @nya varchar(100)

   --select @nya = isnull(first_name, '')+' '+isnull(last_name,'') from users where user_id = @p_user_id
   select @nya = isnull(aliasname, '')  from users where user_id = @p_user_id

   declare @log varchar(500) = convert(varchar(10),getdate(),103)+' '+convert(varchar(5),getdate(),14)+': Documento rechazado por el usuario '+@nya+ ' - Motivo del rechazo: ' + @p_motivo_rechazo
      
   update led_docs set estado_doc = 'R',
        status_doc = 'R',
        compliance_doc = 'R',
        texto_rechazo = @p_motivo_rechazo,
        rechazado = GETDATE(),
        rechazado_por = @p_user_id,
        doc_log = convert(varchar(max),doc_log)+char(13)+char(10)+@log
   where doc_id = @p_doc_id


   -- Verifico si hay que actualizar documentos hijos

   declare @secc varchar(1) = NULL
   set @secc = iif(@vcuit = 1, 'C', iif(@vcuil = 1, 'E', (iif(@vdom = 1, 'V', NULL))))

   if (@secc is not null) begin

    update led_docs set estado_doc = 'R',
         status_doc = 'R',
         compliance_doc = 'R',
         rechazado = GETDATE(),
         rechazado_por = @p_user_id,
         doc_log = convert(varchar(max),doc_log)+char(13)+char(10)+@log,
         aprobacion_parcial = 0,
         parcial_actualizado = 0,
         reapertura_por_alta = 0
    where led_seccion = @secc
    and contratista = @contratista
    and periodo = @periodo
    and doc_id_lista = @tipo_doc

   end

   --- Generar notificación

   declare @notificacion int, @texto_notificacion varchar(max) = 'El documento ' + @nombre_tipo_doc + ' correspondiente al período ' 
              + SUBSTRING(convert(varchar,@periodo),5,2)+'-'+SUBSTRING(convert(varchar,@periodo),1,4)
              + ' ha sido rechazado. <br><br>'
              + 'Contratante: ' + @nombre_cliente + '<br>'
              + 'Contratista: ' + @nombre_persona + ' (' + @abreviatura + ' ' + @identificacion + ')'
              + '<br><br>'
              + 'El motivo del rechazo es el siguiente: ' + @p_motivo_rechazo


   insert into led_notificaciones
   (horario, tipo_notificacion, texto_notificacion, visible_contratista, cliente, contratista, leido, horario_leido, usuario_de, usuario_para, doc_id)
   values
   (GETDATE(), 'A2C', @texto_notificacion, 1, @cliente, @contratista_1, 0, NULL, @p_user_id, @usuario_contratista, @p_doc_id)

   SET @notificacion = SCOPE_IDENTITY()

   update led_docs set notificacion = @notificacion
   where doc_id = @p_doc_id


   -- Trazabilidad
   /*insert into trazabilidad
    (texto, cliente, accion, id_plataforma, contraparte, user_id, created, doc_id)
    values
    (LEFT(@texto_notificacion,1000), @cliente, 'RECHAZAR_DOCUMENTO_IMPERIUM', 'IMPERIUM', @contratista, @p_user_id, GETDATE(), @p_doc_id)
    */
   
   declare @contraparte   int = null 
   declare @nombre_doc varchar(500)
   declare @nombre_contratista varchar(500)
   declare @nombre_contratista_1 varchar(500)

   select  @tipo_doc = led_tipos_doc.tipo_doc,
     @nombre_doc = led_tipos_doc.nombre_tipo_doc, 
     @contratista = led_docs.contratista,
     @periodo = led_docs.periodo
   from led_docs inner join led_tipos_doc on led_docs.tipo_doc = led_tipos_doc.tipo_doc
   where led_docs.doc_id = @p_doc_id

   select @contratista = led_contratistas.contratista, 
       @nombre_contratista = p.nombre_persona, 
       @contratista_1 = lc.contratista, 
       @nombre_contratista_1 = p1.nombre_persona 
     from led_contratistas 
     inner join padrones p on p.id_padron = led_contratistas.id_padron 
     inner join led_contratistas lc on lc.contratista = led_contratistas.contratista_1 
     inner join padrones p1 on p1.id_padron = lc.id_padron 
    where led_contratistas.contratista = @contratista 
   
   select @contraparte = contraparte 
    from ln_contrapartes where cliente = @cliente and id_imperium = @contratista_1

   if (@contraparte is not null) 
   begin 
    declare @texto varchar(1000) = 'Rechazo del documento' +
             ' - Contratista: '     + convert(varchar,@contratista_1) + 
             ' ' +  @nombre_contratista_1 + 
             ' - Sub-Contratista: ' + convert(varchar,@contratista) +  
             ' ' +  @nombre_contratista /*+ 
                ' - Período: '         + convert(varchar,@periodo) + 
                ' - Documento: '       + '(' + convert(varchar,@tipo_doc) + ') ' + @nombre_doc + 
                ' - Doc_id: '          + convert(varchar,@p_doc_id) */
    exec insertar_trazabilidad 
      @texto, @cliente, 'DOCUMENTOS','BACK', @contraparte, @p_user_id, @p_doc_id, '73'
   end 
   /* */ 

  end

 end

END
GO