- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- For variable is not Local (TDS depois de atualizar)
×
Linguagem de Programação ADVPL
Perguntas For variable is not Local (TDS depois de atualizar)
- filipe.nanclarez
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 10
- Obrigados Recebidos: 0
11 anos 5 meses atrás - 11 anos 5 meses atrás #14792
por filipe.nanclarez
Pessoa, boa tarde.
Depois de atualizar meu TDS, estou recebendo essa mensagem ao compilar. Para contornar eu acabo declaranco a variavel como local.
Mas hoje, fui compilar um projeto enorme, e tem for pra caramba. E já faz uma hora que tô aqui, declarando um monte de "i" e "j".
Alguém sabe desabilitar isso ?
Compilando arquivo CheckEst.prw...
ADVPL Preprocessor: Precompilation of file C:\Dev\DEVSTUDIO\DBTEC\DBTEC_DEVSTUDIO\Funções\CheckEst.prw ok.
CHECKEST.PRW(1748) For variable is not Local
Compilação finalizada.
Depois de atualizar meu TDS, estou recebendo essa mensagem ao compilar. Para contornar eu acabo declaranco a variavel como local.
Mas hoje, fui compilar um projeto enorme, e tem for pra caramba. E já faz uma hora que tô aqui, declarando um monte de "i" e "j".
Alguém sabe desabilitar isso ?
Compilando arquivo CheckEst.prw...
ADVPL Preprocessor: Precompilation of file C:\Dev\DEVSTUDIO\DBTEC\DBTEC_DEVSTUDIO\Funções\CheckEst.prw ok.
CHECKEST.PRW(1748) For variable is not Local
Compilação finalizada.
Ultima edição: 11 anos 5 meses atrás por filipe.nanclarez.
Por favor Acessar ou Registrar para participar da conversa.
- filipe.nanclarez
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 10
- Obrigados Recebidos: 0
11 anos 5 meses atrás #14835
por filipe.nanclarez
Respondido por filipe.nanclarez no tópico For variable is not Local (TDS depois de atualizar)
Pessoal, ninguém passou por isso?
Por favor Acessar ou Registrar para participar da conversa.
- edsonplacido
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 8
- Obrigados Recebidos: 0
9 anos 2 meses atrás #29058
por edsonplacido
Respondido por edsonplacido no tópico For variable is not Local (TDS depois de atualizar)
Estou com o mesmo problema.
Conseguiu resolver ????
Conseguiu resolver ????
Por favor Acessar ou Registrar para participar da conversa.
- edsonplacido
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 8
- Obrigados Recebidos: 0
9 anos 2 meses atrás #29082
por edsonplacido
Respondido por edsonplacido no tópico For variable is not Local (TDS depois de atualizar)
Alguem ???
Edson Placido Junior escreveu: Estou com o mesmo problema.
Conseguiu resolver ????
Por favor Acessar ou Registrar para participar da conversa.
- kanaamlrr
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 1576
- Obrigados Recebidos: 4
9 anos 2 meses atrás #29085
por kanaamlrr
Respondido por kanaamlrr no tópico For variable is not Local (TDS depois de atualizar)
Verifique se dentro do seu for a variável que está sendo utilizada está declarada como local dentro de sua rotina.
Dessa forma;
Abraço!!
Dessa forma;
Static Function suaFunc()
Local i := 0
For i := 1 To 10
//seu código
Next
Return
Abraço!!
Por favor Acessar ou Registrar para participar da conversa.
- edsonplacido
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 8
- Obrigados Recebidos: 0
9 anos 2 meses atrás #29086
por edsonplacido
Respondido por edsonplacido no tópico For variable is not Local (TDS depois de atualizar)
Esta como o exemplo abaixo. Nao esta declarada não, mais o problema é que no TDS antigo compila normal.
Não teria uma configuração no TDS novo para isso ???
Não teria uma configuração no TDS novo para isso ???
/***************************************************************************/
Static Function ValidPerg()
/***************************************************************************/
_sAlias:= Alias()
aRegs:= {}
dbSelectArea("SX1")
dbSetOrder(1)
cPerg:= PADR(cPerg,10)
// Grupo/Ordem/Pergunta/Perg.Esp/Perg.Ingl/Variavel/Tipo/Tamanho/Decimal/Presel/GSC/Valid/Var01/Def01/Cnt01/Var02/Def02/Cnt02/Var03/Def03/Cnt03/Var04/Def04/Cnt04/Var05/Def05/Cnt05
aAdd(aRegs,{cPerg,"01","Periodo De ?","","","mv_ch1","D",08,00,00,"G","","mv_par01","","","","","","","","","","","","","","","","","","","","","","","","",""})
aAdd(aRegs,{cPerg,"02","Periodo Até ?","","","mv_ch2","D",08,00,00,"G","","mv_par02","","","","","","","","","","","","","","","","","","","","","","","","",""})
aAdd(aRegs,{cPerg,"03","Filial De ?","","","mv_ch3","C",02,00,00,"G","","mv_par03","","","","","","","","","","","","","","","","","","","","","","","","",""})
aAdd(aRegs,{cPerg,"04","Filial Até ?","","","mv_ch4","C",02,00,00,"G","","mv_par04","","","","","","","","","","","","","","","","","","","","","","","","",""})
aAdd(aRegs,{cPerg,"05","Estoque Far.Vicera ?","","","mv_ch5","N",14,02,00,"G","","mv_par05","","","","","","","","","","","","","","","","","","","","","","","","",""})
aAdd(aRegs,{cPerg,"06","Estoque Far.Pena ?","","","mv_ch6","N",14,02,00,"G","","mv_par06","","","","","","","","","","","","","","","","","","","","","","","","",""})
aAdd(aRegs,{cPerg,"07","Estoque Oleo Vicera ?","","","mv_ch7","N",14,02,00,"G","","mv_par07","","","","","","","","","","","","","","","","","","","","","","","","",""})
AADD(aRegs,{cPerg,"08","CFO's ?","","","mv_ch8","C",50,00,00,"G","","mv_par08","","","","","","","","","","","","","","","","","","","","","","","","",""})
For i:=1 to Len(aRegs)
If !dbSeek(cPerg+aRegs[i,2])
RecLock("SX1",.T.)
For j:=1 to FCount()
If j <= Len(aRegs[i])
FieldPut(j,aRegs[i,j])
Endif
Next
MsUnlock()
Endif
Next
dbSelectArea(_sAlias)
Return
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- For variable is not Local (TDS depois de atualizar)
Tempo para a criação da página:0.101 segundos