TOTVSTEC

Árvore de páginas

Tempo aproximado para leitura: 1 minuto

Obtém um flag de bloqueio para serialização de operações, com escopo na instância atual do Protheus Server em execução, com liberação explícita através da função GlbUnlock(). Caso não haja uma liberação explícita, haverá uma liberação automática do bloqueio no término do processo (Thread) em execução que obteve o bloqueio.

Sintaxe

GlbLock()

Retorno

Nome

Tipo

Descrição

lOwned

lógico

Retorna .T. caso o bloqueio tenha sido obtido para o processo atual. Caso a função retorne .F., já existe um outro processo ( Thread ) neste mesmo Protheus Server que possui um bloqueio.

Observações

  • O escopo do bloqueio não é restrito ao ambiente ( Environment ).

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

Veja também



  • Sem rótulos