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:

<div class="Code"><p>Definir Alfa voridis;<br></br>Definir Alfa vmarpto;<br></br><br></br>/* Verifica Disciplinas do Professor na Data. */<br></br>TemDisPrf(DatPro,vtemdis);<br></br><br></br>Se (vtemdis = 1)<br></br> /* Lê Disciplinas do Professor na Data. */<br></br> LerDisPrf(DatPro, vtemdis, vcoddis, vcodrat, vmarpto, vcodhor, vinihor, vfimhor, voridis);</p></div>

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.

Este artigo ajudou você?