Ver Mensaje Individual
  #4 (permalink)  
Antiguo 09/04/2010, 15:21
gctalico
 
Fecha de Ingreso: octubre-2006
Mensajes: 88
Antigüedad: 17 años, 6 meses
Puntos: 1
Respuesta: Como crear una bitacora

ESTE ES UN EJEMPLO

Código SQL:
Ver original
  1. -- Operacion de insercion en la tabla INSERT para asignar el folio
  2.   IF (@tynOperacion = 1)
  3.   BEGIN
  4.    --   Validar Duplicados
  5.    SELECT @iResult=COUNT(iCodArticulo) FROM TB_Articulo
  6.           WHERE vchClaveArticulo=@vchClaveArticulo
  7.  
  8.    IF (@iResult = 0)
  9.    BEGIN
  10.     -- Obtiene el nuevo folio e inserta para marcar la fila
  11.      EXECUTE @iCodArticulo = SP_Folio 3
  12.     IF (@iCodArticulo > 0)
  13.     BEGIN
  14.       -- Verifica si ya se encuntra el folio
  15.       SELECT @iResult = COUNT(iCodArticulo) FROM TB_Articulo WHERE iCodArticulo = @iCodArticulo
  16.       -- Verifica si existieron repeticiones
  17.       IF (@iResult = 0)
  18.         -- Inserta la fila con valor por defaul
  19.         INSERT TB_Articulo (iCodArticulo, vchClaveArticulo, vchDescripcion, smlLinea, smlCajaCon, fltPrecioPublico, fltCosto, tynIVA, tynImpuesto1, smlExistencia,tynEstatus)
  20.                   VALUES (@iCodArticulo, @vchClaveArticulo, @vchDescripcion, @smlLinea, @smlCaja, @fltPrecio, @fltCosto, @tynIVA, @tynImpuesto1, @smlExistencia,@tynEstatus)
  21.    
  22. -- ESTA ES LA PARTE DONDE INSERTA EN LA BITACORA AQUI PASAS
  23. --LOSPARAMETROS QUE QUIERES
  24.   IF (@@ERROR = 0)
  25.       BEGIN
  26.           SELECT @dttTimestamp = GETDATE()
  27.           SELECT @vchKey = RTRIM(CONVERT(VARCHAR(10), @iCodArticulo)) + RTRIM(@vchDescripcion)
  28.           EXECUTE SP_Bitacora 1, @smlOUsuario, @dttTimestamp, 'ARTICULOS', 'GUARDAR', @vchKey, 0
  29.          SELECT @iResult = @iCodArticulo
  30.       END
  31.  
  32.       ELSE
  33.         SELECT @iResult = -2 -- Error al insertar en tabla
  34.     END
  35.     ELSE
  36.       SELECT @iResult = -10 -- Error al obtener nuevo folio
  37.    END
  38.    ELSE
  39.      SELECT @iResult = -6 -- Articulo Duplicado
  40.   END


LA PARTE DONDE EJECUTA EL PROCEMIENTO LO PUEDE HACER EN LOS PROCEDIMIENTOS QUE TENGAS
SERIA AGREGAR LO MISMO A TODOS SOLO CAMBIAR ALGUNOS PARAMENTROS