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

LerDisPrf

Verifica se Professor possui disciplinas em uma data específica. Se possuir retorna os dados das disciplinas.

Sintaxe: LerDisPrf(Numero datdisprf, Numero End temdisprf, Numero End coddisprf, Numero End codratdis, Alfa End marptodis, Numero End codhordis, Numero End inihordis, Numero End fimhordis, Alfa End oridisprf);

Parâmetros:

Nome	Tipo	Descrição
datdisvprf	Numérico	Data na qual se deseja verificar se o professor possui disciplina.
temdisprf	Numérico	Indica se professor possui disciplinas segundo a data informada. Retornará 1 se possuir e 0 se não possuir.
coddisprf	Numérico	Retorna o código da disciplina.
codratdis	Numérico	Retorna o código do rateio da disciplina.
marptodis	Alfa	Indica se professor marca ponto na disciplina (S ou N).
codhordis	Numérico	Retorna o código do horário da disciplina.
inihordis	Numérico	Retorna a marcação inicial do horário da disciplina.
fimhordis	Numérico	Retorna a marcação final do horário da disciplina.
oridisprf	Alfa	Retorna a origem da disciplina.

Exemplo:

Definir Alfa voridis;
Definir Alfa vmarpto;

/* Verifica Disciplinas do Professor na Data. */
TemDisPrf(DatPro,vtemdis);

Se (vtemdis = 1)
/* Lê Disciplinas do Professor na Data. */
LerDisPrf(DatPro, vtemdis, vcoddis, vcodrat, vmarpto, vcodhor, vinihor, vfimhor, voridis);

Utilização: Regras de apuração e regras de integração.

Disponível para os módulos: Administração de Pessoal e Controle de Ponto e Refeitório.