Regra por processo 677 - Antes exclusão de vales gerados colaborador

Esta regra será chamada antes da exclusão de Vales Gerados, a cada colaborador, na rotina de Benefícios do módulo BS.

Recursos utilizados: Estarão disponíveis para consulta os campos NumEmp, TipCol, NumCad, CodVal e TabEve da tabela R162GER.

O campo DatVal também estará disponível, mas demonstrará sempre a Data Final da Competência informada. Isto porque a regra é chamada a cada colaborador, e não a cada dia, não tendo como mostrar adequadamente o DatVal e os demais campos, como QtdVal, VlrVal, StaVal e OriVal.

<div class="Code"><p>/* Não permite a Exclusão dos Vales de Código 5 – Refeição */<br></br><br></br>Se (R162GER.CodVal = 5)<br></br>Inicio<br></br> Mensagem(Retorna,"Não é Permitido Excluir os Vales do Tipo Refeição. [Ok]");<br></br> Cancel(1);<br></br>Fim;</p><p>/* Guarda as informações do vale excluído para ser usado na mensagem da RPP 678 - depois da exclusão */</p><p><br></br></p><p>Definir Alfa aNumCad;<br></br>Definir Alfa aCodVal;<br></br>IntParaAlfa(R162GER.NumCad, aNumCad);<br></br>IntParaAlfa(R162GER.CodVal, aCodVal);</p></div>

Disponível para o módulo: Módulo BS - rotina de Benefícios.