Se EscopoRescisaoCompl Entao
   Se DesconsiderarCalculoResComp <> 0 Entao
      Retornar
   Fim
Fim

ExecutaEmAfastGrupo1 = Verdadeiro
ExecutaEmAfastGrupo2 = Verdadeiro

// Para não executar no Mês/Ano da Data da Celebração
Se (EscopoSalarioCompl=1) e (DesconsiderarEventoNoMesDataCelebracao=1) Entao
   Retornar
Fim

Se Mensalista Entao
Temp1=Salario
Fim

Se Horista Entao
Temp1=(Salario*HorasMensaisRais)
Fim


Se EscopoSalario ou EscopoSalarioCompl ou EscopoRescisao ou EscopoRescisaoCompl ou Escopo13SalarioP1 ou Escopo13SalarioP1Compl ou Escopo13SalarioP2 ou Escopo13SalarioP2Compl Entao
   Resultado=(Temp1*(ParamValorRef/100))-ValorEventoOrigem
   ParamValorRef=ParamValorRef



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