Se EscopoRescisao ou EscopoRescisaoCompl ou EscopoRescisaoDom Entao Resultado=PARAMVALORREF-ValorEventoOrigem ParamValorRef=AvosFeriasProporcionais Se EscopoRescisaoCompl Entao Se Resultado<0 Entao Resultado=0 Fim ValorEventoDiferenca=Resultado Se ContratoVerdeAmarelo Entao ValorEventoDiferenca = 0 Fim Fim BaseFeriasProporcionais=BaseFeriasProporcionais+Resultado ValorTotalFP=ValorTotalFP+Resultado Fim