VerLocAbr

Verifica se um local está em uma abrangência.

Sintaxe: Funcao VerLocAbr(Numero xTabOrg,Alfa xCodLoc,Alfa xAbrangencia, Numero End xRetorno);

Parâmetros:

Nome	Tipo	Descrição
xTabOrg	Numérico	Tabela de Organograma.
xCodLoc	Alfa	Código do Local.
xAbrangencia	Alfa	Abrangência.
xRetorno	Numérico	Variável para retorno (1 - Local está na abrangência, 0 - Não está).

Exemplo:

/* Verifica se o local 1 está na abrangência 2. */

Definir alfa vabrloc;

vabrloc = "2";

VerLocAbr(1,"1",vabrloc, vretloc);

Se (vretloc = 0)

Mensagem(Erro,"Local Não Está na Abrangência.");

Utilização: Em todas as regras.