Description
Properties
| Name | Value |
|---|---|
| ANSI Nulls ON | True |
| Quoted Identifier ON | True |
| Encrypted | False |
| Execute As | |
| Assembly |
Parameters
8| Name | Data Type | Length | Description |
|---|---|---|---|
| @p_accion | varchar | 20 | |
| @p_cliente | int | 4 | |
| @p_userid | int | 4 | |
| @p_idblacklist | int | 4 | |
| @p_idpadron | int | 4 | |
| @p_causa | varchar | 100 | |
| @p_activo | bit | 1 | |
| @p_tipolista | varchar | 1 |
SQL Script
Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/*
exec Imperium_LISTAS 'LISTALL', 9936068,1,NULL,'E',1,NULL
*/
CREATE OR ALTER PROCEDURE dbo.Imperium_listas
@p_accion varchar(20), /* INSERTAR / EDITAR / MODIFICAR / LISTAR */
@p_cliente int,
@p_userid int,
@p_idblacklist INT = NULL,
@p_idpadron int = NULL,
@p_causa varchar(100) = NULL,
@p_activo bit = 1,
@p_tipolista varchar(1) = NULL
AS
BEGIN
SET NOCOUNT ON;
declare @V_accion varchar(20) = @p_accion
declare @V_cliente int = @p_cliente
declare @V_userid int = @p_userid
declare @V_idpadron int = @p_idpadron
declare @V_causa varchar(100) = @p_causa
declare @V_activo bit = @p_activo
declare @V_tipolista varchar(1) = @p_tipolista
DECLARE @V_idblacklist INT = @p_idblacklist
declare @V_Username varchar(100)
select @V_Username= first_name + ' ' + last_name from users where user_id = @V_userid
if (upper(@V_accion) = 'INSERTAR')
BEGIN
insert into led_blacklist (cliente,id_padron,causa,activo,tipo_lista)
values (@V_cliente,@V_idpadron,convert(varchar(20),getdate(),103) + ' ' + @V_Username + '<br>' + @V_causa,@V_activo,@V_tipolista)
END
if (upper(@V_accion) = 'MODIFICAR')
BEGIN
UPDATE led_blacklist set
led_blacklist.causa = led_blacklist.causa + '<br>' + convert(varchar(20),getdate(),103) + ' ' + @V_Username + ' ' + @V_causa,
led_blacklist.activo = @V_activo,
led_blacklist.tipo_lista = @V_tipolista
from led_blacklist INNER JOIN PADRONES on led_blacklist.id_padron= PADRONES.id_padron where led_blacklist.id_blacklist = @V_idblacklist
END
if (upper(@V_accion) = 'EDITAR')
BEGIN
select PADRONES.identificador,padrones.identificacion,padrones.nombre_persona,led_blacklist.causa,
led_blacklist.activo as estado,
led_blacklist.tipo_lista as tipo_lista
from led_blacklist INNER JOIN PADRONES on led_blacklist.id_padron= PADRONES.id_padron where led_blacklist.id_blacklist = @V_idblacklist
order by padrones.nombre_persona asc
END
if (upper(@V_accion) = 'LISTAR')
BEGIN
select led_blacklist.id_blacklist, PADRONES.identificador,padrones.identificacion,padrones.nombre_persona,led_blacklist.causa,
iif(led_blacklist.activo=1,'Activo','No Activo') as estado,
iif(led_blacklist.tipo_lista='X','Negra','Blanca') as tipo_lista,led_blacklist.tipo_lista as cod_tipo_lista
from led_blacklist INNER JOIN PADRONES on led_blacklist.id_padron= PADRONES.id_padron where cliente = @V_cliente order by padrones.nombre_persona asc
END
END
GO
GO
/*
exec Imperium_LISTAS 'LISTALL', 9936068,1,NULL,'E',1,NULL
*/
CREATE OR ALTER PROCEDURE dbo.Imperium_listas
@p_accion varchar(20), /* INSERTAR / EDITAR / MODIFICAR / LISTAR */
@p_cliente int,
@p_userid int,
@p_idblacklist INT = NULL,
@p_idpadron int = NULL,
@p_causa varchar(100) = NULL,
@p_activo bit = 1,
@p_tipolista varchar(1) = NULL
AS
BEGIN
SET NOCOUNT ON;
declare @V_accion varchar(20) = @p_accion
declare @V_cliente int = @p_cliente
declare @V_userid int = @p_userid
declare @V_idpadron int = @p_idpadron
declare @V_causa varchar(100) = @p_causa
declare @V_activo bit = @p_activo
declare @V_tipolista varchar(1) = @p_tipolista
DECLARE @V_idblacklist INT = @p_idblacklist
declare @V_Username varchar(100)
select @V_Username= first_name + ' ' + last_name from users where user_id = @V_userid
if (upper(@V_accion) = 'INSERTAR')
BEGIN
insert into led_blacklist (cliente,id_padron,causa,activo,tipo_lista)
values (@V_cliente,@V_idpadron,convert(varchar(20),getdate(),103) + ' ' + @V_Username + '<br>' + @V_causa,@V_activo,@V_tipolista)
END
if (upper(@V_accion) = 'MODIFICAR')
BEGIN
UPDATE led_blacklist set
led_blacklist.causa = led_blacklist.causa + '<br>' + convert(varchar(20),getdate(),103) + ' ' + @V_Username + ' ' + @V_causa,
led_blacklist.activo = @V_activo,
led_blacklist.tipo_lista = @V_tipolista
from led_blacklist INNER JOIN PADRONES on led_blacklist.id_padron= PADRONES.id_padron where led_blacklist.id_blacklist = @V_idblacklist
END
if (upper(@V_accion) = 'EDITAR')
BEGIN
select PADRONES.identificador,padrones.identificacion,padrones.nombre_persona,led_blacklist.causa,
led_blacklist.activo as estado,
led_blacklist.tipo_lista as tipo_lista
from led_blacklist INNER JOIN PADRONES on led_blacklist.id_padron= PADRONES.id_padron where led_blacklist.id_blacklist = @V_idblacklist
order by padrones.nombre_persona asc
END
if (upper(@V_accion) = 'LISTAR')
BEGIN
select led_blacklist.id_blacklist, PADRONES.identificador,padrones.identificacion,padrones.nombre_persona,led_blacklist.causa,
iif(led_blacklist.activo=1,'Activo','No Activo') as estado,
iif(led_blacklist.tipo_lista='X','Negra','Blanca') as tipo_lista,led_blacklist.tipo_lista as cod_tipo_lista
from led_blacklist INNER JOIN PADRONES on led_blacklist.id_padron= PADRONES.id_padron where cliente = @V_cliente order by padrones.nombre_persona asc
END
END
GO
Depends On
3Used By
No items found