ExecutaEmAfastGrupo1=Verdadeiro ExecutaEmAfastGrupo2=Verdadeiro Temp2=ParamValorRef ValorRemuneracao=ValorRemuneracao+Temp2 RemuneracaoIntegral=RemuneracaoIntegral+Temp2 SE ESCOPOSALARIO OU ESCOPOSALARIOCOMPL OU ESCOPORESCISAO OU ESCOPORESCISAOCOMPL ENTAO RESULTADO=PARAMVALORREF-VALOREVENTOORIGEM PARAMVALORREF=0 FIM SE ESCOPOSALARIOCOMPL OU ESCOPORESCISAOCOMPL ENTAO SE RESULTADO<0 ENTAO RESULTADO=0 FIM VALOREVENTODIFERENCA=RESULTADO FIM