PPPRetImpExa

Retorna se o Exame passado como parâmetro deve ser impresso ou não. Quando o retorno for 1, o exame deve ser impresso.

Sintaxe: Funcao PPPRetImpExa(Numero aNumEmp, Numero aDatAdm, Numero aDatDem, Numero aDatExa, Numero aCodExa, Numero aOriExa, Alfa aEmiAgt, Alfa aExaPPR, Numero aExaTrf);

Parámetros:

Nome	Tipo	Descripción
aNumEmp	Numérico	Empresa.
aDatAdm	Numérico	Data de Admissão do Colaborador.
aDatDem	Numérico	Data de Demissão do Colaborador.
aDatExa	Numérico	Data do Exame.
aCodExa	Numérico	Código do Exame.
aOriExa	Numérico	Origem do Exame.
aEmiAgt	Alfa	Campo R086DEF.EmiAgt.
aExaPPR	Alfa	Campo R086DEF.ExaPPR.
aExaTrf	Numérico	Campo R086DEF.ExaTrf.

Ejemplo:

xImp = PPPRetImpExa(lc_numemp, lc_datadm, lc_datdem, xdatres, xcodexa, xtipori, xemiagt, xexappr, xexatrf);
Se (xImp = 1)
{
FDatExa = xdatres;
}

Utilização: Gerador de relatórios.