MarcacoesCadastroHorario

Esta função retorna as batidas informadas no cadastramento do horário. Retorna os dados da tabela R004MHR.

Sintaxe: MarcacoesCadastroHorario(Numero xSeqReg);

<div class="Code"><p>/* Verifica se está tentando cadastrar um horário sem refeições. */</p><p>xseqmar = 1;</p><p>xtemref = 0;</p><p>MarcacoesCadastroHorario(xseqmar);</p><p></p><p>Enquanto(r004mhr.usobat &#x3C;> 0)</p><p>inicio</p><p>/* Verifica se é refeição. */</p><p>Se (r004mhr.usobat=4)</p><p>inicio</p><p>xtemref = 1;</p><p>Pare;</p><p>fim;</p><p>xseqmar = xseqmar + 1;</p><p>MarcacoesCadastroHorario(xseqmar);</p><p>fim;</p><p></p><p>Se (xtemref = 0)</p><p>Mensagem(Erro,"Não pode cadastrar horários sem refeição");</p></div>

Utilização: Apenas na regra por processo de gravação no Cadastramento de Horários.