HorQua

Retorna o horário do colaborador na data para o quadro de horários. Considera trocas de horário, tabela de feriados da filial e busca os horários indexados conforme período do relatório. O índice é de 1 até 999.

Tipo: Numérico.

Exemplos: Na tela de Entrada é informado o período 25/06/2008 a 30/06/2008 para o colaborador “X” que tem os seguintes horários neste período: 0009,0009,0009,9998,9999,0002.

Logo, em uma regra podemos obter o valor de HorQua desta maneira:

<div class="Code"><p>@ Variáveis numéricas que recebem valor de HorQua em seu índice @<br></br>x = 1;<br></br>Hor1 = HorQua[x]; @ Hor1 vai ser 0009 @<br></br>x = 4;<br></br>Hor4 = HorQua[x]; @ Hor4 vai ser 9998 @<br></br>x = 6;<br></br>Hor6 = HorQua[x]; @ Hor6 vai ser 0002 @<br></br><br></br>Pode-se também em um controle sistema setar a variável de sistema HorQua e na propriedade 'Ocorrência' colocar seu índice (1 á 999), assim irá listar direto o valor.<br></br><br></br>@ Exemplo para listar todos os horários (com marcações após CodHor) do colaborador "X" em uma seção Adicional definida no modelo @<br></br><br></br>Definir Cursor cHorarios;<br></br>Definir Alfa HorStr[20];<br></br>Definir Cursor StrCur[100];<br></br><br></br>x = 1;<br></br>Enquanto (HorQua[x] &#x3C;> 0)<br></br>Inicio<br></br>Se (HorQua[x] > 9995) @ Não considerará Horários reservados (Folga, Feriado, DSR, Compensado) @<br></br>Pare;<br></br>horario = HorQua[x];<br></br>cHorarios.SQL "SELECT HORBAT FROM R004MHR WHERE CodHor = :horario";<br></br>cHorarios.Abrircursor();<br></br>enquanto (cHorarios.Achou)<br></br>Inicio<br></br>vHorBat = cHorarios.HorBat;<br></br>ConverteNumero(vHorBat, "hh:mm", "hora", horstr);<br></br>strcur = strcur + " " + horstr;<br></br>cHorarios.Proximo(); <br></br>Fim; <br></br>ListaSecao("Adicional_2");<br></br>cHorarios.FecharCursor(); <br></br>strcur = ""; <br></br>x++;<br></br>Fim;</p></div>

Esta variável é utilizada no modelo ‘Quadro de Horários’ (QH001.APU).

Utilização: Modelos da Categoria Quadro de Horários, extensão Apuração.

Disponível para o módulo: Controle de Ponto e Refeitório.