Temp10=SalarioMinimo

Temp12=Temp10*(ParamValorRef/100)

Se EscopoRescisao ou EscopoRescisaoCompl Entao
   Resultado=Temp12-ValorEventoOrigem
   ParamValorRef=ParamValorRef
   ValorPensaoFerias=ValorPensaoFerias+Resultado
Fim

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