RetNomCodNiv

Retorna o Nome e o código do Local do Empregado em um determinado nível.

Sintaxe: RetNomCodNiv (Numero xNumEmp, Numero xTipCol, Numero xNumCad, Numero xDatRef, Numero xNivIni, Numero xNivFim, Alfa End xNomeLoc, Alfa End xCodNivLoc)

Parâmetros:

Nome

Tipo

Descrição

xNumEmp

Numérico

Número da empresa.

xTipCol

Numérico

Tipo do colaborador.

xNumCad

Numérico

Cadastro (código) do colaborador.

xDatRef

Numérico

Data de referência.

xNivIni

Numérico

Nível inicial (O código do local será mostrado a partir deste nível).

xNivFim

Numérico

Nível final (O código do local será mostrado até este nível).

xNomeLoc

Alfa

Retorna o nome do local em um determinado nível.

xCodNivLoc

Alfa

Retorna o código do local do funcionário em um determinado nível.

Exemplo:

<div class="Code"><p>/* Deseja-se saber o nome e o código do local de um determinado nível. */</p><p>Definir alfa xNome;</p><p>Definir alfa xCodLoc;</p><p></p><p>/* xNome retornará o nome do local e xCodLoc retornará o código do local a partir do segundo nível até o quarto nível. */</p><p>RetNomCodNiv(r034fun.numemp,r034fun.tipcol,r034fun.numcad,DatSis,2,4,xNome,xCodLoc);</p></div>

Ou seja, para:

Empresa: 1
Tipo Col.: 1
Cadastro: 1
Nome Local: Compras
Cód. Local: 1.2.1.4

O retorno será:

Local: Compras
Código: 2.1.4

Exemplo de regra de apuração:

Para trazer o código do nível é obrigatório na regra acrescentar a seguinte linha antes da chamada da função RetNomCodNiv():

<div class="Code"><p>DatRef = DatFim;</p></div>

Então a regra fica sendo:

<div class="Code"><p>Definir Alfa VNomNiv;</p><p>Definir Alfa VCodLocNiv;</p><p>Definir Data VData;</p><p>DatRef = DatFim;</p><p>VData = DatPro;</p><p>RetNomCodNiv(R034Fun.NumEmp,R034Fun.TipCol,R034Fun.NumCad,vData,6,6,VNomNiv,VCodLocNiv);</p><p>...</p></div>

Utilização: Nas regras do gerador de relatórios, gerador de importação/exportação e regras de apuração.

Este artigo ajudou você?