Se ContratoIntermitente=0 Entao Retornar Fim Temp1=SalarioMinimo Temp2=Temp1*(ParamValorRef/100) Se EscopoSalario ou EscopoSalarioCompl ou EscopoRescisao ou EscopoRescisaoCompl Entao Se Mensalista Entao Resultado=((Temp2/30)*DiasTrabalhoIntermitente)-ValorEventoOrigem Fim Se Horista Entao Resultado=((Temp2/HorasMensaisRais)*HorasTrabalhoIntermitente) Fim ValorSalarioPago=ValorSalarioPago+Resultado ValorRemuneracao=ValorRemuneracao+Resultado RemuneracaoIntegral=RemuneracaoIntegral+Resultado BaseContratoIntermitente=BaseContratoIntermitente+Resultado Fim Se EscopoSalarioCompl ou EscopoRescisaoCompl Entao Se Resultado<0 Entao Resultado=0 Fim ValorEventoDiferenca=Resultado Fim