BusCadChefeLocal

Busca o chefe de um local especificado.

Variáveis definidas com a execução das funções BusCadChefe e BusCadChefeLocal:

Observações
  • A função BusCadChefeLocal também define o valor para as variáveis TabChe e LocChe, porém esta é somente uma informação a mais pois a função BusCadChefeLocal não busca o chefe nos níveis anteriores. Ou seja, o local do chefe encontrado será sempre o mesmo do local passado como parâmetro para a função BusCadChefeLocal. A única diferença é que o local passado por parâmetro refere-se ao CodLoc e o local retornado na variável LocChe refere-se ao NumLoc.
  • A variável TurCol não terá seu valor zerado ou definido pela função BusCadChefeLocal, pois esta função busca o chefe de um local específico e não de um colaborador. Com estas variáveis, o usuário poderá verificar se os turnos do colaborador e do chefe são os turnos esperados.

Sintaxe: BusCadChefeLocal(Numero NumEmp, Numero TabOrg, Alfa CodLoc, Numero Turno, Numero Nivel, Numero DatBas, Numero End EmpChe, Numero End
TipChe, Numero End CadChe, Alfa ConSub);

Parâmetros:

Nome

Tipo

Descrição

NumEmp

Numérico

Código da Empresa.

TabOrg

Numérico

Estrutura de organograma utilizado.

CodLoc

Alfa

Código do Local. Exemplo: “1.02.03”.

Turno

Numérico

Turno relacionado ao chefe.

Nivel

Numérico

Nível para procura do chefe na estrutura de organograma.

DatBas

Numérico

Data referência.

EmpChe

Numérico

Variável de retorno da empresa do chefe.

TipChe

Numérico

Variável de retorno do tipo do chefe.

CadChe

Numérico

Variável de retorno do cadastro do chefe.

ConSub

Alfa

Define se o substituto definido no cadastro da chefia deve ser considerado. Ou seja, se o valor do parâmetro ConSub for “S”e o chefe ou subchefe (definidos pelo campo Tipo Chefia da tela Chefes (FR080SUB)) encontrado estiver afastado na data informada no parâmetro DatBas, a função retornará o respectivo substituto, considerando-o como chefe.

Exemplo:

<div class="Code"><p>Definir Alfa CodLoc;<br></br><br></br>numEmp = 1;<br></br>tabOrg = 5;<br></br>codloc = "1.02.03";<br></br>turno = 2;<br></br>nivel = 2; <br></br><br></br>MontaData(05,05,2005, DatBas);<br></br>BusCadChefeLocal(numemp, taborg, codloc, turno, nivel, DatBas, EmpChe, TipChe, CadChe, "S");<br></br>Se (CadChe &#x3C;> 0)<br></br>Inicio<br></br>Mensagem(Retorna,"Chefe encontrado");<br></br>Fim;</p></div>

Utilização: Gerador de relatórios e editor de regras.

Este artigo ajudou você?