PEALTGR1 - Remoção e Adição da checagem de exclusividade do sistema.

Este Ponto de Entrada permite remover ou adicionar a checagem de exclusividade de acesso ao sistema.

#include 'protheus.ch'

User function PEALTGR1()

Return .T. //suficiente para executar não estando em modo exclusivo

Português(Brasil)

Todas

Todos

Todas

n/a

booleano

.
.
.
if ExistBlock("PEALTGR1")
lRes := ExecBlock("PEALTGR1",.f.,.f.)
EndIf

If oAccControl:ExclusiveAccess() .OR. lRes
executara as modificacoes ou não dependendo do LRES
ENDIF
.
.
.

VEIXFUNB.PRW