dbo.sociedades_constituciones_asigna_cuit

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO

/*

exec sociedades_constituciones_asigna_cuit 'LISTAR',null,null,null,null,null,null,null,'N',5

*/


CREATE OR ALTER PROCEDURE dbo.sociedades_constituciones_asigna_cuit  
@p_accion varchar(20),
@cuit_sociedad varchar(50) = null,
@razon_social varchar(180) = null,
@fechaPub varchar(10) = null,
@codcargo varchar(5) = null,
@nombreintegrante varchar(150) = null,
@taxidIntegrante varchar(50) = null,
@IDFide int = null,
@p_ultdir varchar(1)='N',
@p_userid int


AS
BEGIN
    SET NOCOUNT ON;
/*

@cuit_sociedad
@razon_social
@fechaPub
@codcargo
@nombreintegrante
@taxidIntegrante 
@IDFide 

listar
lista_contrapartes
lista_full
filtro_cliente
filtro_contraparte

*/
 set @p_accion=upper(@p_accion)

 if (@p_accion='LISTAR')
 begin
  SELECT   top 100     id_fide, id_boletin, documento_soc, razon_social, domicilio_sociedad, localidad_sociedad_cod, localidad_sociedad, provincia_sociedad, provincia_sociedad_cod, provincia_boletin, fecha_publicacion, titulo, 
         tipo_publicacion, capita_social, fecha_constitucion, 
         iif(cargo = 'ZZZ','',cargo) as cargo,
         nombre_integrante, documento_integrante, domicilio_integrante, localidad_integrante_cod, localidad_integrante, provincia_integrante, nacionalidad_int, 
         estado_civil_int, fecha_nacimiento_int, tipodoc_int, nrdoc_int, cuit_int, profesion_int, provincia_int, cargo_int, duracion, objeto, fuente, codigo_archivo, contenido_archivo, created, created_by, nombre_file, 
         modified, modified_by, visible, cuit_integrante, tipo_publicacion_2, flag_soc, flag_int, procesado_socios, marcado, _datos_personas_proc
  FROM            sociedades_constituciones
  WHERE procesado='E'
  ORDER BY created desc, cargo, razon_social
 end

 if (@p_accion='UPDID')
 begin
  update sociedades_constituciones set documento_soc=@cuit_sociedad,razon_social=@razon_social,fecha_publicacion=@fechaPub,
  cargo=@codcargo,nombre_integrante=@nombreintegrante,documento_integrante=@taxidIntegrante,cuit_int=@taxidIntegrante,modified=getdate(),modified_by=@p_userid,
  cargo_int=@codcargo,procesado='P',tipo_publicacion_2='ASIG-HOMNONIMIA'
  where id_fide = @IDFide 

   /* ACÁ SE INSERTA EN LA TABLA SOCIOS */
   
    declare @periodo_ano varchar(4) = substring(@fechaPub,1,4)
    declare @periodo_mes varchar(2) = substring(@fechaPub,6,2)

    begin try
     if (@p_ultdir='S')
     begin
      update socios set c04_ultimo='N',modified=getdate(),modified_by=@p_userid,c04_periodo_desde=c04_periodo_ano + '-' + c04_periodo_mes,fuente='ASIG-HOMNONIMIA' 
      where c01_cuit=@cuit_sociedad and c01_cuit_soc=@taxidIntegrante 
      and ((ISNULL(c04_periodo_desde,'1900-01-01')<substring(@fechaPub,1,7))
      OR (ISNULL(c04_periodo_ano,'1900')<@periodo_ano and ISNULL(c04_periodo_mes,'01')<=@periodo_mes)) 
     end
    end try
    begin catch
    end catch

   /* FIN DE ACTUALIZAR LOS DIRECTORIOS ANTERIORES */
   
   insert into socios (c01_cuit, c01_cuit_soc, car_codigo,c04_ultimo, c04_periodo_desde,visible, created, created_by,fuente,c04_periodo_ano,c04_periodo_mes)
   values (@cuit_sociedad,@taxidIntegrante,@codcargo,@p_ultdir,substring(@fechaPub,1,7),1,getdate(),@p_userid,'ASIG-HOMNONIMIA',@periodo_ano,@periodo_mes)

 end

END

GO