R3 completado + consulta con el profe

 El día de hoy me dediqué a hacer lo que me quedaba del SP insertar empleado y su conexión al backend (4 horas aprox). 

Además también le hice una CONSULTA CON EL PROFE (2:25 pm 24/4/2026) acerca de este SP, como recomendación me dijo que las validaciones de formato debían de ir al inicio, los SELECTS de empleado se podían unir en una sola y que el transaction debería de ser uno solo. Aplicando las correcciones correspondientes, este es el resultado: 

CREATE PROCEDURE dbo.procInsertarEmpleado
     @inValorDocumentoIdentidad VARCHAR(64)
    ,@inNombre VARCHAR (64)
    ,@inIdPuesto INT
    ,@inUsername VARCHAR(64) -- Username del usuario que intenta hacer la inserción
    ,@inPostInIP VARCHAR(64) -- IP del usuario que intenta hacer la inserción
    ,@outResultCode INT OUTPUT
AS
BEGIN
    SET NOCOUNT ON

    DECLARE @IdUsuario INT
    DECLARE @ValorID VARCHAR(64)
    DECLARE @NombreExistente VARCHAR(64)
    DECLARE @NombrePuesto VARCHAR(64)
    DECLARE @DescError VARCHAR(256)

    DECLARE @IdTipoEvento INT
    DECLARE @DescripcionEvento VARCHAR(256)

    SET @outResultCode = 0;

    BEGIN TRY

        -- Verifica que TODOS los caracteres sean numéricos
        IF (@inValorDocumentoIdentidad LIKE '%[^0-9]%')
        BEGIN
            SET @outResultCode = 50010;
        END

        -- Verificar que el nombre debe ser alfabético y puede contener espacios entre nombre y apellidos
        ELSE IF (@inNombre LIKE '%[^a-zA-Z ]%')
        BEGIN
            SET @outResultCode = 50009;
        END

        SELECT @IdUsuario = u.Id
        FROM dbo.Usuario AS u
        WHERE (u.Username = @inUsername);

        SELECT @NombrePuesto = p.Nombre
        FROM dbo.Puesto AS p
        WHERE (p.Id = @inIdPuesto);

        SELECT @ValorID = e.ValorDocumentoIdentidad
               ,@NombreExistente = e.Nombre
        FROM dbo.Empleado AS e
        WHERE (e.ValorDocumentoIdentidad = @inValorDocumentoIdentidad)
        OR (e.Nombre = @inNombre);

        -- Verifica que el valor del documento de identidad no esté repetido en la base de datos
        IF (@ValorID = @inValorDocumentoIdentidad)
        BEGIN
            SET @outResultCode = 50004;
        END

        -- Verificar que el nombre no esté repetido en la base de datos
        ELSE IF (@NombreExistente = @inNombre)
        BEGIN
            SET @outResultCode = 50005;
        END

        -- Registro de bitácora fallida, siempre que haya un error de validación
        IF (@outResultCode <> 0)
        BEGIN
            SELECT @DescError = er.Descripcion
            FROM dbo.Error AS er
            WHERE (er.Codigo = @outResultCode);
 
            SET @IdTipoEvento = 5;
            SET @DescripcionEvento = @DescError + ' ' + @inValorDocumentoIdentidad + ' ' + @inNombre + ' ' + @NombrePuesto;
        END

        ELSE
        BEGIN
            SET @IdTipoEvento = 6;
            SET @DescripcionEvento = @inValorDocumentoIdentidad + ' ' + @inNombre + ' ' + @NombrePuesto;
        END

        BEGIN TRANSACTION
            IF (@outResultCode = 0)
            BEGIN
                INSERT INTO dbo.Empleado (
                    IdPuesto
                    ,ValorDocumentoIdentidad
                    ,Nombre
                    ,FechaContratacion
                    ,SaldoVacaciones
                    ,EsActivo
                )
                VALUES (
                    @inIdPuesto
                    ,@inValorDocumentoIdentidad
                    ,@inNombre
                    ,GETDATE()
                    ,0
                    ,1
                );
            END

            -- Bitácora de eventos
            INSERT INTO dbo.BitacoraEvento (
                idTipoEvento
                ,Descripcion
                ,IdPostByUser
                ,PostInIP
                ,PostTime
            )
            VALUES (
                @IdTipoEvento
                ,@DescripcionEvento
                ,@IdUsuario
                ,@inPostInIP
                ,GETDATE()
            );
        COMMIT TRANSACTION

    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

Post a Comment

Popular posts from this blog

Modificacion del ingreso de datos y finaiizacion de documentacion

El día de hoy se trabajó en el trabajo escrito y la modificación de la carga de datos, agregando un proceso iterativo en la inserción de movimientos de empleados, se utilizó una tabla variable para crear esta función. Además, se terminó la documentación. El trabajo fue de 2 horas. -- 7. Movimiento  DECLARE @TempMov TABLE (    -- Se usa tabla variable para recorrer los movimientos uno por uno     Fila INT IDENTITY(1,1)     ,ValorDocId VARCHAR(64)     ,TipoMov VARCHAR(64)     ,Fecha DATE     ,Monto MONEY     ,PostByUser VARCHAR(64)     ,PostInIP VARCHAR(64)     ,PostTime DATETIME ) -- Carga los movimientos del XML ordenados por fecha ascendente INSERT INTO @TempMov (ValorDocId, TipoMov, Fecha, Monto, PostByUser, PostInIP, PostTime) SELECT     x.value('@ValorDocId', 'VARCHAR(64)')     ,x.value('@TipoMov',   'VARCHAR(64)')     ,x.value('@Fecha',   ...
Read more

Avance en el R3 Insertar empleado

Image
Horas trabajadas: 3 aprox  Se hizo el apartado del frontend con el archivo insertar_empleado.html También se trabajó en el apartado del SP InsertarEmpleado, por ahora solo llevo las entradas y salidas, las verificaciones con sus respectivas modificaciones del @outResultCode dependiendo del tipo de error que se encuentre dentro del xml del documento. Aún queda la parte de BEGIN TRANSACTION y los CATCH He usado como referencia este video: https://youtu.be/QpHNUVbB9JA?si=Y0bCHNfjPq7SFkos CREATE PROCEDURE dbo . procInsertarEmpleado      @inValorDocumentoIdentidad VARCHAR ( 64 )     ,@inNombre VARCHAR ( 64 )     ,@inIdPuesto INT     ,@outResultCode INT OUTPUT AS BEGIN     SET NOCOUNT ON     DECLARE @ValorID VARCHAR ( 64 )     DECLARE @Nombre VARCHAR ( 64 )     SET @outResultCode = 0     BEGIN TRY         SELECT @ValorID = e . ValorDocumentoIdentidad  ...
Read more

SP insertar empleado terminado

Hoy terminé el SP de insertar empleado con ajustes para que cumplan con el R7 y R8, además de los TRANSACTION y del CATCH pendiente. Aproximadamente me tardé unas 3 horas CREATE PROCEDURE dbo . procInsertarEmpleado      @inValorDocumentoIdentidad VARCHAR ( 64 )     ,@inNombre VARCHAR ( 64 )     ,@inIdPuesto INT     ,@outResultCode INT OUTPUT     ,@inUsername VARCHAR ( 64 ) -- Username del usuario que intenta hacer la inserción     ,@inPostInIP VARCHAR ( 64 ) -- IP del usuario que intenta hacer la inserción AS BEGIN     SET NOCOUNT ON     DECLARE @IdUsuario INT     DECLARE @ValorID VARCHAR ( 64 )     DECLARE @Nombre VARCHAR ( 64 )     DECLARE @NombrePuesto VARCHAR ( 64 )     DECLARE @DescError VARCHAR ( 256 )     SET @outResultCode = 0     BEGIN TRY         -- Verifica que TODOS los caracteres sean numéricos ...
Read more