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
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
Depends On
3Used By
No items found