QtdPar

Retorna a quantidade em minutos do campo “Quantidade” da programação de parada, durante o horário de trabalho. Para utilizar esta variável é necessário setar antes as funções FlePar e FpxPar.

Exemplo 1:

<div class="Code"><p>@ Verifica se existem programação de parada no dia. @</p><p><br></br>vret = FLePar;</p><p>Se(vret = 0)<br></br> Vapara Final;</p><p></p><p>@ Lê as várias programações do dia. @</p><p><br></br>Loop:<br></br>vret = FPxPar;</p><p>Se(vret = 0)<br></br> Vapara Final;</p><p></p><p>@ A partir daqui pode-se usar as variáveis . @<br></br>...</p><p></p><p>Vapara Loop;</p><p>Final:</p></div>

Exemplo 2:

<div class="Code"><p>vret = FLePar;<br></br>Se (vret = 1)<br></br> Cancel (1);</p><p>Loop1:<br></br>vret = FPxPar;</p><p>Se (vret = 1)<br></br> Inicio<br></br> ListaSecao ("Adicional_1");<br></br> Cancel (2);<br></br> Fim;</p><p>Se (codepa &#x3C;> 0) <br></br> ListaSecao ("Adicional_1");</p><p>Se ((FCodPar &#x3C;> CodPar) e (FCodPar &#x3C;> 0))<br></br> Inicio<br></br> ListaSecao ("Adicional_1");<br></br> fqtdpar = 0;<br></br> Fim;</p><p>FCodPar = CodPar;</p><p>Se (Qtdpar = 0)<br></br> StrAu = DesEPa;<br></br>Senao<br></br> StrAu = DesPar;</p><p>fqtdpar = fqtdpar + QtdPar;<br></br>tqtdpar = tqtdpar + QtdPar;</p><p>Vapara Loop1;</p></div>

Utilização: Somente nas regras de relatório de apuração e cartão ponto.

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

Este artigo ajudou você?