CodEpa
Retorna o código do motivo de parada na hora extra, conforme cadastro da programação de paradas. Para utilizar esta variável é necessário antes setar as funções FlePar e FpxPar.
Exemplo 1:
@ Verifica se existem programação de parada no dia. @
vret = FLePar;
Se(vret = 0)
Vapara Final;
@ Lê as várias programações do dia. @
Loop:
vret = FPxPar;
Se(vret = 0)
Vapara Final;
@ A partir daqui pode-se usar as variáveis. @
...
Vapara Loop;
Final:
Exemplo 2:
vret = FLePar;
Se (vret = 1)
Cancel (1);
Loop1:
vret = FPxPar;
Se (vret = 1)
Inicio
ListaSecao ("Adicional_1");
Cancel (2);
Fim;
Se (codepa <> 0)
ListaSecao ("Adicional_1");
Se ((FCodPar <> CodPar) e (FCodPar <> 0))
Inicio
ListaSecao ("Adicional_1");
fqtdpar = 0;
Fim;
FCodPar = CodPar;
Se (Qtdpar = 0)
StrAu = DesEPa;
Senao
StrAu = DesPar;
fqtdpar = fqtdpar + QtdPar;
tqtdpar = tqtdpar + QtdPar;
Vapara Loop1;
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.