Descrição
GlbUnlock [AS] - Libera explicitamente o flag de bloqueio para serialização de operações obtido pelo processo atual através da função GlbLock().
|
Sintaxe
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
Retorno
| Retorno |
Tipo |
Descrição |
| lRet |
Boolean
|
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.
|
Exemplo
#INCLUDE "TOTVS.CH"
User Function GlbUnlock()
If GlbLock()
MsgInfo("Bloqueio Global APPServer", 'UniversoADVPL')
GlbUnlock()
Else
MsgStop("Já existe outro Bloqueio Global neste APPServer", 'UniversoADVPL')
Endif
Return( Nil )
Resultado
Informações adicionais
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎