dbo.Imperium_Revertir_Documento

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO

CREATE OR ALTER PROCEDURE dbo.Imperium_Revertir_Documento
 @p_doc_id bigint = NULL,
 @p_user_id int = NULL
AS
BEGIN

 SET NOCOUNT ON;

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

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

  if (@estado = 'R' or @estado = 'V') begin

   declare @vcuit tinyint, @vcuil tinyint, @vdom tinyint, @tipo_doc int = null, @contratista int, @periodo int, @cliente 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,
     @periodo = led_docs.periodo,
     @cliente = led_docs.cliente

   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

   declare @nya varchar(100)

   select @nya = isnull(aliasname, '')  from users where user_id = @p_user_id
   declare @log varchar(200) = convert(varchar(10),getdate(),103)+' '+convert(varchar(5),getdate(),14)+': Documento verificado por el usuario '+@nya
      
   update led_docs set estado_doc = 'I',
        status_doc = 'I',
        compliance_doc = 'I',
        fecha_vigencia = @fecha_vigencia,
        verificado = GETDATE(),
        verificado_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 doc_id = @p_doc_id
    
   declare @contraparte   int = null 
   declare @contratista_1 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) = 'Se revierte el documento' +
             ' - Contratista: '     + convert(varchar,@contratista_1) + 
             ' ' +  @nombre_contratista_1 + 
             ' - Sub-Contratista: ' + convert(varchar,@contratista) +  
             ' ' +  @nombre_contratista 
    exec insertar_trazabilidad 
      @texto, @cliente, 'DOCUMENTOS','BACK', @contraparte, @p_user_id, @p_doc_id, '73'
   end 

  end

 end
 
END
GO