dbo.LN_clasificacion_items_

Description

Properties

Name Value
ANSI Nulls ON

True

Quoted Identifier ON

True

Encrypted

False

Execute As
Assembly

Parameters

6
Name Data Type Length Description
@accion varchar 10
@p_item int 4
@p_clasificacion int 4
@p_cliente int 4
@p_contraparte int 4
@p_valor varchar 100

SQL Script

Copy
SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
-- =============================================
-- Author: <Author,,Name>
-- Create date: <Create Date,,>
-- Description: <Description,,>
-- =============================================
CREATE OR ALTER PROCEDURE dbo.LN_clasificacion_items_ 
 -- Add the parameters for the stored procedure here

 @accion       varchar(10),
 @p_item       int,
 @p_clasificacion    int,
 @p_cliente      int,
 @p_contraparte     int,
 @p_valor      varchar(100)

AS
BEGIN
 -- SET NOCOUNT ON added to prevent extra result sets from
 -- interfering with SELECT statements.
 SET NOCOUNT ON;

    -- Insert statements for procedure here


 IF (@accion = 'INSERT') BEGIN

  IF (@p_clasificacion > 0) BEGIN

   INSERT INTO LN_clasificacion_items
   (clasificacion, valor)
   VALUES
   (@p_clasificacion, @p_valor)

  END 

 END ELSE

  IF (@accion = 'UPDATE') BEGIN
    
   UPDATE LN_clasificacion_items SET
   valor = @p_valor
   WHERE item = @p_item

  END ELSE

   IF (@accion = 'DELETE') BEGIN

    DELETE FROM LN_clasificacion_items WHERE item = @p_item

   END ELSE

    IF (@accion = 'SELECT') BEGIN

     SELECT LN_clasificacion_items.item, LN_clasificacion_items.clasificacion, 
       LN_clasificacion_items.valor, LN_clasificaciones.nombre_clasificacion,
       LN_clasificaciones.tipo_clasificacion, LN_clasificaciones.cliente,
       clientes.nombre_cliente

     FROM LN_clasificacion_items INNER JOIN LN_clasificaciones ON
      LN_clasificacion_items.clasificacion = LN_clasificaciones.clasificacion
     INNER JOIN clientes ON LN_clasificaciones.cliente = clientes.cliente
     
     WHERE LN_clasificacion_items.item = @p_item

    END ELSE

     IF (@accion = 'SEARCH') BEGIN

      IF (@p_clasificacion > 0) BEGIN

       SELECT LN_clasificacion_items.item, LN_clasificacion_items.clasificacion, 
         LN_clasificacion_items.valor, LN_clasificaciones.nombre_clasificacion,
         LN_clasificaciones.tipo_clasificacion, LN_clasificaciones.cliente,
         clientes.nombre_cliente

       FROM LN_clasificacion_items INNER JOIN LN_clasificaciones ON
        LN_clasificacion_items.clasificacion = LN_clasificaciones.clasificacion
       INNER JOIN clientes ON LN_clasificaciones.cliente = clientes.cliente
     
       WHERE LN_clasificacion_items.clasificacion = @p_clasificacion
       ORDER BY LN_clasificacion_items.valor


      END ELSE

       IF (@p_cliente > 0) BEGIN

        SELECT LN_clasificacion_items.item, LN_clasificacion_items.clasificacion, 
          LN_clasificacion_items.valor, LN_clasificaciones.nombre_clasificacion,
          LN_clasificaciones.tipo_clasificacion, LN_clasificaciones.cliente,
          clientes.nombre_cliente

        FROM LN_clasificacion_items INNER JOIN LN_clasificaciones ON
         LN_clasificacion_items.clasificacion = LN_clasificaciones.clasificacion
        INNER JOIN clientes ON LN_clasificaciones.cliente = clientes.cliente
     
        WHERE LN_clasificaciones.cliente = @p_cliente
        ORDER BY LN_clasificaciones.nombre_clasificacion, LN_clasificacion_items.valor


       END ELSE

        IF (@p_contraparte > 0) BEGIN

         SELECT LN_clasificacion_items.item, LN_clasificacion_items.clasificacion, 
           LN_clasificacion_items.valor, LN_clasificaciones.nombre_clasificacion,
           LN_clasificaciones.tipo_clasificacion, LN_clasificaciones.cliente,
           clientes.nombre_cliente, 
           IIF(LN_contraparte_clasificacion.item <> '', 'selected', '') AS selected

         FROM LN_clasificacion_items INNER JOIN LN_clasificaciones ON
          LN_clasificacion_items.clasificacion = LN_clasificaciones.clasificacion
         INNER JOIN clientes ON LN_clasificaciones.cliente = clientes.cliente
         INNER JOIN LN_contrapartes ON clientes.cliente = LN_contrapartes.cliente
         LEFT OUTER JOIN LN_contraparte_clasificacion ON
          (LN_clasificacion_items.item = LN_contraparte_clasificacion.item
           AND LN_contraparte_clasificacion.contraparte = @p_contraparte)
          
     
         WHERE LN_contrapartes.contraparte = @p_contraparte
         ORDER BY LN_clasificaciones.nombre_clasificacion, LN_clasificacion_items.valor


        END

     END


 
END

GO

Used By

No items found