SOFTLOCK()

Sintaxis

SOFTLOCK( <cAlias> )

Propósito

Traba el registro del archivo de datos marcado.

Argumentos

< cAlias >

Define el alias de referencia del área de trabajo activa, para el cual el registro marcado se trabará.

Utilización

Permite la reserva del registro marcado en el área de trabajo activa, para que otras operaciones, con excepción de la actual, no puedan actualizar este registro.

Esta difiere de la función RECLOCK(), pues no genera una obligación de actualización y puede ser sucedida por este.

En el ERP Protheus, el SOFTLOCK() se utiliza en los browses, antes de la confirmación de la operación de modificación y borrado, pues en este momento la misma aún no se hizo  efectiva, pero otras conexiones no pueden acceder a aquel registro pues está en mantenimiento, lo cual garantiza la integridad de la información.

Ejemplos

LOCAL lConfirma := .F.

dbSelectArea(“SA1”)

dbSetOrder(1)      // A1_FILIAL + A1_COD + A1_LOJA

dbSeek(xFilial(“SA1”) + “900001” + “01”)     // Búsqueda exacta.

IF FOUND()    // Evalúa el retorno de la búsqueda realizada.

          SOFTLOCK()     // Reserva el registro ubicado.

          // Función ilustrativa que muestra los datos del registro marcado y permite su modificación.

          lConfirma := ModificaSA1()

          IF lConfirma

                    RECLOCK(“SA1”, .F.)

                    SA1->A1_NOME := “MARCOS AURELIUS TERCEIRUS”

                    SA1->A1_NREDUZ := “MARCOS AURELIUS”

                    MSUNLOCK()     // Destraba el registro, liberando el RECLOCK() y el SOFTLOCK() del registro

          ENDIF

ENDIF