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.

Este artigo ajudou você?