Se Mensalista Entao Temp1=Salario Fim Se Horista Entao Temp1=Salario*HorasMensaisRais Fim Temp2=Temp1*(ParamValorRef/100) Se EscopoSalario ou EscopoSalarioCompl ou EscopoRescisao ou EscopoRescisaoCompl Entao Resultado=Temp2-ValorEventoOrigem Fim Se EscopoSalarioCompl ou EscopoRescisaoCompl Entao Se Resultado<0 Entao Resultado=0 Fim ValorEventoDiferenca=Resultado Fim