English
Español
AcumulaRefeicoes
Esta função é utilizada para fazer totalizações separando as refeições por código.
Sintaxe: AcumulaRefeicoes(Alfa TipTot,Numero xnivloc,Numero xcodref,Numero xqtdref, Numero xvalref, Numero xusoref);
Parâmetros:Nome | Tipo | Descrição |
TipTot | Alfa | Indicar o tipo de totalização. A totalização pode ser por colaborador, por empresa, por local ou geral. Exemplo: cadastro, empresa, especial(para totalização por local), geral. |
xnivloc | Numérico | Indicar o nível do local para totalizar a refeição (deve ser informado somente quando Tip Tot for especial), ou seja, se o tipo de totalização for por cadastro este parâmetro deve ser igual a zero. |
xcodref | Numérico | Indicar qual o código da refeição. |
xqtdref | Numérico | Indicar qual a quantidade da refeição. |
xvalref | Numérico | Indicar qual o valor da refeição. |
xusoref | Numérico | Indicar qual o uso da refeição. |
<div class="Code"><p>/* A regra abaixo é utilizada no modelo Hrre006.ger, que lista as refeições dos colaboradores. */</p><p></p><p>/* Regra da Seção Detalhe1_Antes de Imprimir: */<br></br>vcodref = r070acc.codref;<br></br>vqtdref = r070acc.qtdacc;<br></br>vvalref = r070acc.valref;<br></br>vusoref = r070acc.usoref;<br></br>Se ((vqtdref = 0) e (vusoref <> 2))<br></br> vqtdref = 1;<br></br>/* Totaliza as marcações por colaborador. */<br></br>AcumulaRefeicoes("Cadastro",0,vcodref,vqtdref, vvalref, vusoref);<br></br>/* Totaliza as marcações por local conforme os níveis de quebra. */<br></br>AcumulaRefeicoes("0",esplevel,vcodref,vqtdref, vvalref, vusoref);<br></br>/* Regra da seção Subtotal1_Depois de Imprimir: */<br></br>vvlrcol = 0;<br></br>vqtdcol = 0;<br></br>vcodref = 1;<br></br>Enquanto (vcodref <= 999)<br></br>Inicio<br></br> LeRefeicoesAcumuladas("Cadastro",0,vcodref);<br></br> Se (qtrefr > 0)<br></br> Inicio<br></br> ListaSecao("Adicional_1");<br></br> vvlrcol = vvlrcol + vlrefr;<br></br> vqtdcol = vqtdcol + qtrefr;<br></br> Fim;<br></br> vcodref = vcodref + 1;<br></br>Fim;<br></br>ListaSecao("Adicional_2");</p></div>
Utilização: Gerador de Relatórios.
Disponível para o módulo: Controle de Ponto e Refeitório.
English
Español
