Se Mensalista Entao
   Temp1=Salario
Fim

Se Horista Entao
   Temp1=Salario*HorasMensaisRais
Fim

Temp2=Temp1*(ParamValorRef/100)

ValorRemuneracao=ValorRemuneracao+Temp2
RemuneracaoIntegral=RemuneracaoIntegral+Temp2

Se EscopoSalario ou EscopoSalarioCompl ou EscopoRescisao ou EscopoRescisaoCompl Entao
   Resultado=Temp2-ValorEventoOrigem
Fim

Se EscopoSalarioCompl ou EscopoRescisaoCompl Entao
   Se Resultado<0 Entao
      Resultado=0
   Fim
   ValorEventoDiferenca=Resultado
Fim