//Rateio do Abono RateioEmUsoNesteEventoFerias=RateioFeriasAbono //Percentual informando ao lançar o evento Temp10=(SalarioMinimo+ValorMediaVarComissao+ValorMediaVarHora+ValorMediaVarValor+ValorMediaVarFixaSM+ValorMediaVarFixaSA+ValorMediaVarFixaFX+ValorMediaVarFixaCP)*(ParamValorRef/100) Se EscopoFerias ou EscopoFeriasCompl Entao Resultado=Temp10 Temp1=Resultado*(DiasAbonoMesAtual/TotalDiasDoMesAtual) Temp2=Resultado*(DiasAbono1MesSubSeq/TotalDiasDo1MesSubSeq) Temp3=Resultado*(DiasAbono2MesSubSeq/TotalDiasDo2MesSubSeq) Resultado=Temp1+Temp2+Temp3 ValorAbonoPecuniarioPago=ValorAbonoPecuniarioPago+Resultado ParamValorRef=0 Fim Se EscopoFeriasCompl Entao Se Resultado<0 Entao Resultado=0 Fim ValorEventoDiferenca=Resultado Fim