Finalizacion del R2

El dia de hoy elabore el SP de MostrarEmpleados, la verdad lo considere mucho mas sencillo que de login, no tuve ningun problema a la hora de desarrollarlo ni de testearlo. Se hicieron pruebas de la cargas de datos con XML, por el momento se han cargado de forma correcta. Tambien se trabajo en la conexion del SP con python y el HTML. El tiempo de trabajo fueron como 2: 20 horas de trabajo como una 1 hora y veinte con la elaboracion de SP y el resto con la conexion al python con Flask.

Se muestra el SP de MostrarEmpleado

CREATE PROCEDURE dbo.procMostrarEmpleados

@inFiltro VARCHAR(64) -- Filtro de busqueda

,@inUsername VARCHAR(64) 

,@inPostInIP VARCHAR(64) 

,@outResultCode INT OUTPUT 

AS

BEGIN

DECLARE @IdUsuario INT

DECLARE @IdTipoEvento INT

DECLARE @DescripcionEvento VARCHAR(64)


SET NOCOUNT ON

SET @outResultCode = 0


BEGIN TRY


SELECT @IdUsuario = u.Id

    FROM dbo.Usuario AS u

    WHERE (u.Username = @inUsername)


IF (@inFiltro = '')

BEGIN

SELECT e.ValorDocumentoIdentidad, e.Nombre

FROM dbo.Empleado AS e

WHERE (e.EsActivo = 1)

ORDER BY e.Nombre ASC

END

ELSE

IF (ISNUMERIC(@inFiltro) = 1)

BEGIN

SELECT e.ValorDocumentoIdentidad, e.Nombre

FROM dbo.Empleado AS e

WHERE (e.ValorDocumentoIdentidad LIKE '%' + @inFiltro + '%') --Busca que @inFiltro este la identidad

AND (e.EsActivo = 1)

ORDER BY e.Nombre ASC

SET @IdTipoEvento = 12

SET @DescripcionEvento = @inFiltro

END

ELSE

BEGIN

SELECT e.ValorDocumentoIdentidad, e.Nombre

FROM dbo.Empleado AS e

WHERE (e.Nombre LIKE '%' + @inFiltro + '%') --Busca que @inFiltro este en el nombre

AND (e.EsActivo = 1)

ORDER BY e.Nombre ASC

SET @IdTipoEvento = 11

SET @DescripcionEvento = @inFiltro

END


IF (@inFiltro <> '') -- Si el filtro es vacio, no ingresa nada en la bitacora

BEGIN

BEGIN TRANSACTION -- Insertar evento en la bitacora

INSERT INTO dbo.BitacoraEvento (

IdTipoEvento

            ,Descripcion

            ,IdPostByUser

            ,PostInIP

            ,PostTime

)

        VALUES (

@IdTipoEvento

            ,@DescripcionEvento

            ,@IdUsuario

            ,@inPostInIP

            ,GETDATE()

       )

COMMIT TRANSACTION

END

 END TRY


    BEGIN CATCH

        INSERT INTO dbo.DBError (

            UserName

            ,Number

            ,State

            ,Severity

            ,Line

            ,[Procedure]

            ,Message

            ,DateTime

        )

        VALUES (

            @inUsername

            ,ERROR_NUMBER()

            ,ERROR_STATE()

            ,ERROR_SEVERITY()

            ,ERROR_LINE()

            ,ERROR_PROCEDURE()

            ,ERROR_MESSAGE()

            ,GETDATE()

        )

        SET @outResultCode = 50008

    END CATCH

END


Comments

Popular posts from this blog

Modificacion del ingreso de datos y finaiizacion de documentacion

Avance en el R3 Insertar empleado

SP insertar empleado terminado