Histórico da Página

...

Sin embargo, es fundamental comprender que el uso adecuado de MsUnlock es necesario para garantizar una correcta gestión de la concurrencia en entornos donde múltiples procesos pueden interactuar con los mismos datos. El comando debe ser utilizado de manera consciente para evitar bloqueos prolongados y posibles problemas de rendimiento o integridad de los datos.

USER FUNCTION EjemploIncorrecto()
    LOCAL nRegistro := 1
    
    // Bloqueando el registro utilizando RecLock
    RecLock("ARCHIVO", nRegistro)
    
    // Realizando la primera operación en el registro bloqueado
    dbEdit("ARCHIVO", nRegistro)
    dbReplace("ARCHIVO", nRegistro, "Primera modificación")
    
    // Liberando el bloqueo utilizando MsUnlock después de la primera operación
    MsUnlock("ARCHIVO", nRegistro)
    
    // Intentando bloquear nuevamente para la segunda operación
    RecLock("ARCHIVO", nRegistro) // Error aquí, el registro ya está bloqueado
    dbEdit("ARCHIVO", nRegistro)
    dbReplace("ARCHIVO", nRegistro, "Segunda modificación")
    
    // Liberando el bloqueo correctamente después de todas las operaciones
    MsUnlock("ARCHIVO", nRegistro)
RETURN

En este ejemplo incorrecto:

• El registro es bloqueado correctamente usando RecLock para la primera operación.
• Después de realizar la primera modificación, MsUnlock se utiliza prematuramente, liberando el bloqueo antes de realizar la segunda operación.
• Al intentar bloquear el registro nuevamente para la segunda operación, ocurre un error porque el registro ya está bloqueado por otra sesión o proceso.
• Esto puede causar inconsistencias o errores de concurrencia, ya que la segunda operación no puede continuar debido al bloqueo prematuramente liberado por MsUnlock.

USER FUNCTION EjemploCorrecto()
    LOCAL nRegistro := 1
    
    // Bloqueando el registro utilizando RecLock
    RecLock("ARCHIVO", nRegistro)
    
    // Realizando la primera operación en el registro bloqueado
    dbEdit("ARCHIVO", nRegistro)
    dbReplace("ARCHIVO", nRegistro, "Primera modificación")
    
    // Realizando la segunda operación en el mismo registro
    dbEdit("ARCHIVO", nRegistro)
    dbReplace("ARCHIVO", nRegistro, "Segunda modificación")
    
    // Liberando el bloqueo solamente después de todas las operaciones
    MsUnlock("ARCHIVO", nRegistro)
RETURN

En este ejemplo correcto:

• El registro es bloqueado correctamente usando RecLock.
• Las operaciones se realizan secuencialmente en el registro bloqueado.
• MsUnlock se utiliza únicamente después de completar todas las operaciones deseadas en el registro.
• Esto asegura que el registro permanezca bloqueado durante todas las modificaciones necesarias y se libere solo cuando todas las operaciones estén completas.
• De esta manera, garantizamos que otras sesiones o procesos puedan acceder al registro solo después de que se hayan realizado todas las modificaciones, evitando problemas de concurrencia y manteniendo la integridad de los datos.

En resumen, es crucial entender que MsUnlock no necesita ser utilizado después de cada cambio de registro, pero debe ser usado de manera adecuada, asegurando que el bloqueo se libere solo cuando todas las operaciones necesarias hayan sido completadas. Esto ayuda a evitar errores de concurrencia y asegura la integridad de los datos manipulados por el sistema.