RetornaCodLoc

Retorna o código do local segundo o NumLoc informado.

Explicações sobre o organograma:

Código do Local - Código utilizado pela Empresa (usuário do sistema) que identifica um local (tabela de organograma).

Descrição do Local - Descrição utilizada pela Empresa (usuário do sistema) que descreve um local (tabela de organograma).

Número do Local - Número interno do sistema que representa um local (tabela de organograma). Obs: esta informação é utilizada nas tabelas do sistema, mas não tem significado real para o usuário do sistema.

Para converter esta informação para o código do local utilize a função RetornaCodLoc.

Sintaxe: RetornaCodLoc(vNumLoc,pCodLoc);

Parámetros:

Nome	Tipo	Descripción
vNumLoc	Numérico	Número do Local.
pCodLoc	Numérico	Variável que retornará o código do local.

Ejemplo:

/* Esta regra retornará o código do local e os locais pai. */

Definir alfa pcodloc;

vnumloc = r034fun.numloc;

RetornaCodLoc (vnumloc,pCodLoc);

Definir alfa nivellocal;

Definir alfa localpai;

x = 1;

Enquanto (x < 11)

Página de inicio

RetornaNivelLocal(r034fun.taborg,pcodloc, x, x, nivellocal);

Se (nivellocal = "")

Página de inicio

/* Diminui um para voltar ao último nível onde tem dado. */

/* Diminui um para posicionar no nível pai. */

x = x - 2;

Pare;

orden;

x = x + 1;

orden;

RetornaNivelLocal(r034fun.taborg,pCodLoc, x, x, localpai);

y = 1;

Utilização:Gerador de Relatórios e Regras.