Gestão de Pessoas - Manual do Usuário > Customizações > Funções > RetVagAfaLoc

RetVagAfaLoc

A função RetVagAfaLoc retorna a quantidade de afastados no quadro efetivo em um determinado local, cargo, tipo de vaga e data passados como parâmetros.

Sintaxe: RetVagAfaLoc(Numero xNumEmp, Numero xTabOrg, Numero xNumLoc, Numero xEstCar, Alfa xCodCar, Numero xTurno, Numero xDatAlt, Numero End xVag, Numero xTipVag);

Parâmetros:

Nome	Tipo	Descrição
xNumEmp	Numérico	Número da empresa.
xTabOrg	Numérico	Tabela de organograma.
xNumLoc	Numérico	Número do local.
xEstCar	Numérico	Estrutura do cargo.
xCodCar	Alfa	Cargo.
xTurno	Numérico	Turno.
xDatAlt	Numérico	data da alteração.
xVag	Numérico	Vaga.
xTipVag	Numérico	Tipo de vaga.

Exemplo:

Definir alfa xCodLoc;
xNumEmp = EmpAtu;
xTabOrg = 1;
xCodLoc = "1.01";
xNumLoc = RetornaNumLoc(xTabOrg, xCodLoc);
xEstCar = RetEstCarEmp(xNumEmp, DatSis);
Definir alfa xCodCar;
xCodCar = "1";
xTurno = 9; @ Geral @
xTipVag = 2;
MontaData(01,01,2012,xDatAlt);
xTabOrg = 1;
RetVagAfaLoc(xNumEmp, xTabOrg, xNumLoc, xEstCar, xCodCar, xTurno, xDatAlt, xVag, xTipVag);
Se (xVag > 0)
inicio
...
fim

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

Disponível para o módulo: QL.