SE ESCOPOSALARIO OU ESCOPOSALARIOCOMPL OU ESCOPORESCISAO OU ESCOPORESCISAOCOMPL ENTAO
   RESULTADO=PARAMVALORREF-VALOREVENTOORIGEM
   PARAMVALORREF=0
   ValorRemuneracao=ValorRemuneracao+Resultado
   RemuneracaoIntegral=RemuneracaoIntegral+Resultado
FIM

SE ESCOPOSALARIOCOMPL OU ESCOPORESCISAOCOMPL ENTAO
   SE RESULTADO<0 ENTAO
      RESULTADO=0
   FIM
VALOREVENTODIFERENCA=RESULTADO
FIM