Se ContratoIntermitente=1 ou ContratoVerdeAmarelo Entao
   Retornar
Fim

Se Escopo13SalarioP1 ou Escopo13SalarioP2 ou Escopo13SalarioCP Entao
   Se (DataAtualAno<2018 ou (DataAtualAno=2018 e DataAtualMes<05)) Entao
       Retornar
   Fim
   Se ContratoEstagiario Entao
      Retornar
   Fim
   ExecutaEmAfastGrupo1 = Verdadeiro
   ExecutaEmAfastGrupo2 = Verdadeiro
Fim

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

//Temp2=SalarioMinimo*(ParamValorRef/100)
Temp2=ParamValorRef                                              
ValorRemuneracao=ValorRemuneracao+Temp2
//ValorEventoDiferenca=Resultado

Se Escopo13SalarioP1 Entao
   // Para não calcular caso a empresa não pague o residuo
   Se ResAdto13SlDeFerias > 0 Entao
       Se Nao PagaResAdto13Na1Parcela Entao
          Retornar
       Fim
   Fim
   Resultado=((Temp2/12)*Avos13Salario)/2
   Temp3=((Temp2/12)*AvosMaternidade13)/2
   Temp4=((Temp2/12)*AvosAcidente13)/2
   Temp5 =  ((Temp2/12)*AvosServMilitar13)/2
   Valor1Parcela13Salario=Valor1Parcela13Salario+Resultado
   ParamValorRef=Avos13Salario/2
   BaseFGTSMaternidade13=BaseFGTSMaternidade13+Temp3
   BaseFGTSAcidente13=BaseFGTSAcidente13+Temp4
   Base13FGTSServicoMilitar = Base13FGTSServicoMilitar+ Temp5
   BaseFgts13Salario=BaseFgts13Salario+Resultado+Temp3+Temp4 +Temp5
   Base13FGTSAcidenteTrabalho = Base13FGTSAcidenteTrabalho + Temp4
   Retornar
Fim