Se Escopo13SalarioP1 ou Escopo13SalarioP2 ou Escopo13SalarioCP ou Escopo13SalarioP1Dom ou Escopo13SalarioP2Dom ou Escopo13SalarioCPDom Entao
   Se ContratoEstagiario Entao
      Retornar
   Fim
   ExecutaEmAfastGrupo1 = Verdadeiro
   ExecutaEmAfastGrupo2 = Verdadeiro
Fim

//Se ParamValorRef<>0 Entao
  // Resultado = ParamValorRef
   //ParamValorRef=0
   //Valor1Parcela13Salario=Round(Resultado)
   //Retornar
//Fim


Se ResAdto13SlDeFerias > 0 Entao
   Se Nao PagaResAdto13Na1Parcela Entao
      Retornar
   Fim
Fim

Se Mensalista ou Comissionado ou Tarefeiro Entao
   Temp1=Salario
Fim

Se Horista Entao
   Temp1=(Salario*HorasMensaisRAIS)
Fim

Se DocenteMensalista Entao
   Temp1=Salario*1.05
Fim

Se DocenteAulista Entao
   Temp1=UltimoSalarioAulista
Fim

Temp2=((Temp1+ValorMediaVarComissao13+ValorMediaVarHora13+ValorMediaVarValor13+ValorMediaVarFixa13CP+ValorMediaVarFixa13FX)/12)
Temp3=((Temp1/12)*AvosMaternidade13)
//Temp4=((Temp1/12)*AvosAcidente13)
Temp5=((Temp1/12)*AvosMaterAdocao13)
BaseFgtsMaternidade13=Temp3+Temp5
//BaseFgtsAcidente13=Temp4
Resultado=(Temp2*ParamValorRef)
Valor1Parcela13Salario=Round(Resultado)
ParamValorRef=ParamValorRef
//Se EscopoRescisaoDom=0 Entao
//     BaseFGTS13Salario = 0
 //    Retornar
//Senao
//    BaseFgts13Salario=BaseFgts13Salario+Temp3+Temp4
//   Retornar
//Fim

BaseFgts13Salario=BaseFgts13Salario+Temp3+Temp4+Temp5