RetFimExe

Calcula a data limite de uma ocorrência, levando em consideração a data de pagamento do cálculo encontrado segundo os parâmetros.

Sintaxe: RetFimExe(Numero NumEmp, Numero TipCal, Data IniOco, Data FimOco, Numero QtdDia, Data End FimExe).

Parâmetros:

Nome	Tipo	Descrição
NumEmp	Numérico	Empresa.
TipCal	Numérico	Tipo de cálculo.
IniOco	Data	Data inicial da ocorrência.
FimOco	Data	Data final da ocorrência.
QtdDia	Numérico	Quantidade de dias para descontar da data de pagamento.
FimExe	Data	Data limite calculada.

Exemplo:

Definir Data xData;

@- Busca a data limite de uma ocorrência que não possui esta data informada -@

xData = R050OCO.FIMEXE;

Se (xData = 0)

Inicio

RetFimExe(EmpAtu, R050OCO.TipCal, R050OCO.IniOco, R050OCO.FimOco, R050OCO.QtdDia, xData);

Se (xData = 0)

Mensagem(Erro, "O sistema não conseguiu calcular a data limite da ocorrência.");

Fim;

Utilização: Gerador, regras e cubos.

Disponível para os módulos: Todos os módulos do Gestão de Pessoas | HCM.