Se PercReducaoMP936<> 0 e HorasMensaisRedMP936 <> 0 Entao
   Temp7= HorasSemanaisRedMP936
   Temp8= HorasMensaisRedMP936
Senao
   Temp7= QtdeHsSemanaCentesimais
   Temp8= HorasMensaisRais
Fim
Se EscopoRescisaoCompl Entao
   Se DesconsiderarCalculoResComp<>0 Entao
      Retornar
   Fim
Fim
//MP 936 - Art.7 Inc. I - preserva o Salario Hora
   Temp4 = ValorRemuneracao
Se DiasTrabalhadosReduzido<>0 e HorasSemanaisRedMP936 <> 0 Entao
   Temp5 = Temp8/(1-(PercReducaoMP936/100))
Senao
   Temp5 = Temp8
Fim

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

Se EscopoSalario ou EscopoSalarioDom ou EscopoSalarioCompl ou EscopoRescisao ou EscopoRescisaoDom ou EscopoRescisaoCompl Entao
// Subtrairá o valor da gorjeta na remuneração conforme Lei 13.419 de 13 de março de 2017
   Se ConsiderarHorasCentesimais=1 Entao
      HorasCentesimais=Verdadeiro
      Temp1=((((ValorRemuneracao-ValorGorjeta)/Temp5)*1.50)*1.40*ParamValorRef)-ValorEventoOrigem
   Fim
   Se ConsiderarHorasCentesimais=0 Entao
      Temp1=((((ValorRemuneracao-ValorGorjeta)/Temp5)*1.50)*1.40*ParamValorRef)-ValorEventoOrigem
   Fim
   Resultado=Temp1
   BaseVariaveisHora=BaseVariaveisHora-Round(Resultado)
   BaseVariaveisHora=BaseVariaveisHora+(ParamvalorRef*2.10)
Fim
Se EscopoRescisaoCompl ou EscopoSalarioCompl Entao
   Se Resultado<0 Entao
      Resultado=0
   Fim
   BaseDsrHora=BaseDsrHora+ValorEventoOrigem
   ValorEventoDiferenca=Resultado
   Se ContratoVerdeAmarelo Entao
      ValorEventoDiferenca = 0
   Fim
Fim

Se EscopoSalario ou EscopoSalarioDom ou EscopoSalarioCompl ou EscopoRescisao ou EscopoRescisaoDom Entao
   RemuneracaoIntegral=RemuneracaoIntegral+Resultado
Fim