dbo.LN_panel_control_excel_personal

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Assembly

Parameters

3
Name Data Type Length Description
@p_cliente int 4
@p_lista varchar -1
@p_servicio_contratado int 4

SQL Script

Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
-- =============================================
-- Author: <Author,,Name>
-- Create date: <Create Date,,>
-- Description: <Description,,>
-- =============================================
/*
[LN_panel_control_excel_personal] 5546348, '4193'
*/

CREATE OR ALTER PROCEDURE dbo.LN_panel_control_excel_personal 
  @p_cliente int,
  @p_lista varchar(max) = null, 
  @p_servicio_contratado int = 47

 
AS
BEGIN
 SET NOCOUNT ON;
 declare @valores table (contraparte int, gestion int, doc_id int, seccion int, campo int, tipo_campo varchar(1), nombre_campo varchar(200), etiqueta varchar(300),fila int, col int, valor_numerico float, valor_texto varchar(max), valor_fecha smalldatetime, valor_fecha_srt varchar(200))
 declare @contraparte int 

 if (@p_lista is NOT null)
 begin
  DECLARE C_Cursor CURSOR FOR
    select ln_contrapartes.contraparte 
    from ln_contrapartes 
    INNER JOIN dbo.DelimitedSplit8K(@p_lista, ',') Contrapartes ON LN_contrapartes.contraparte = Contrapartes.Item
    where cliente = @p_cliente 
    and ln_contrapartes.activo = 1
    and servicio_contratado = @p_servicio_contratado
 end
 else
 begin
  DECLARE C_Cursor CURSOR FOR
    select ln_contrapartes.contraparte 
    from ln_contrapartes     
    where cliente = @p_cliente 
    and ln_contrapartes.activo = 1
    and servicio_contratado = @p_servicio_contratado

 end 
 OPEN C_Cursor
 FETCH NEXT FROM C_Cursor INTO @contraparte
  WHILE @@fetch_status = 0
  BEGIN
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_PLANTILLA' 
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_PROFESIONALES'
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_ADMINISTRATIVOS' 
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_NO_CALIFICADOS' 
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_PLANTILLA_TEMP' 
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_PROFESIONALES_TEMP'    
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_ADMINISTRATIVOS_TEMP'
  insert into @valores exec ln_docs_valores @contraparte,  'TRABAJADORES_NO_CALIFICADOS_TEMP' 
  insert into @valores exec ln_docs_valores @contraparte,  'NA_TRABAJADORES' 
  FETCH NEXT FROM C_Cursor INTO @contraparte
  END 
 CLOSE C_Cursor
 DEALLOCATE C_Cursor 
  select contraparte, etiqueta, iif(valor_texto is null, convert(varchar,isnull(valor_numerico,'0')), 'X') as valor from @valores
END 
/*

select * from LN_contrapartes where contraparte = 4193
select * from padrones where id_padron = 41340686

*/

GO

Used By

No items found