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:
/* Deseja-se saber o nome e o código do local de um determinado nível. */
Definir alfa xNome;
Definir alfa xCodLoc;
/* 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. */
RetNomCodNiv(r034fun.numemp,r034fun.tipcol,r034fun.numcad,DatSis,2,4,xNome,xCodLoc);
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():
DatRef = DatFim;
Então a regra fica sendo:
Definir Alfa VNomNiv;
Definir Alfa VCodLocNiv;
Definir Data VData;
DatRef = DatFim;
VData = DatPro;
RetNomCodNiv(R034Fun.NumEmp,R034Fun.TipCol,R034Fun.NumCad,vData,6,6,VNomNiv,VCodLocNiv);
...
Utilização: Nas regras do gerador de relatórios, gerador de importação/exportação e regras de apuração.
English
Español
