Libera explicitamente o flag de bloqueio para serialização de operações obtido pelo processo atual através da função GlbLock()
Sintaxe
GlbUnlock() |
Retorno
Nome | Tipo | Descrição |
|---|---|---|
lReleased | lógico | Retorna .T. caso o bloqueio tenta sido liberado. Caso não haja um bloqueio global a ser liberado, ou ele não tenha sido obtido pelo meu processo, ou já tenha sido liberado anteriormente, a função retorna .F. |
Exemplos
User Function teste()
If GlbLock()
MsgInfo("Somente eu tenho um Bloqueio Global neste APPServer")
GlbUnlock()
Else
MsgStop("Já existe outro Bloqueio Global neste APPServer")
Endif
Return
|
Abrangência
Microsiga Protheus 8.11 , Protheus 10, Protheus 11