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.
Importante
Esta função, quando utilizada em modelos de relatórios, sofre influência da variável DatRef. Portanto, caso ela não seja utilizada no modelo para ter seu valor setado, a função irá retornar os códigos de locais utilizando a data final do cálculo ativo como data de referência, que pode fazer com que o local não seja retornado. Para sobrescrever a data de referência, basta zerar a variável DatRef via regra ou configurá-la como parâmetro de entrada do modelo, de acordo com a documentação da variável.
Sintaxe: RetornaCodLoc(vNumLoc,pCodLoc);
Parâmetros:
Nome | Tipo | Descrição |
vNumLoc | Numérico | Número do Local. |
pCodLoc | Numérico | Variável que retornará o código do local. |
Exemplo:
/* 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)
inicio
RetornaNivelLocal(r034fun.taborg,pcodloc, x, x, nivellocal);
Se (nivellocal = "")
inicio
/* Diminui um para voltar ao último nível onde tem dado. */
/* Diminui um para posicionar no nível pai. */
x = x - 2;
Pare;
fim;
x = x + 1;
fim;
RetornaNivelLocal(r034fun.taborg,pCodLoc, x, x, localpai);
y = 1;
Utilização:Gerador de Relatórios e Regras.