Se ContratoIntermitente=1 ou ContratoVerdeAmarelo Entao
   Retornar
Fim

Se Escopo13SalarioP1 ou Escopo13SalarioP2 ou Escopo13SalarioCP Entao
Se ContratoEstagiario Entao
   Retornar
Fim
Fim

ExecutaEmAfastGrupo1 = Verdadeiro
ExecutaEmAfastGrupo2 = Verdadeiro

Temp2=ParamValorRef

Se Escopo13SalarioP2 Entao
   Resultado = Temp2
   ParamvalorRef=0
Fim