Você está aqui: Início Fórum Protheus/Microsiga/Totvs AdvPL (Advanced Protheus Language) Dúvidas Gerais For variable is not Local (TDS depois de atualizar)
  1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Dúvidas Gerais
  9. For variable is not Local (TDS depois de atualizar)
× Linguagem de Programação ADVPL

Perguntas For variable is not Local (TDS depois de atualizar)

Mais
10 anos 11 meses atrás - 10 anos 11 meses atrás #14792 por filipe.nanclarez
For variable is not Local (TDS depois de atualizar) foi criado 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.
Ultima edição: 10 anos 11 meses atrás por filipe.nanclarez.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 11 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.

Mais
8 anos 8 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 ????

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 8 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.

Mais
8 anos 8 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;
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.

Mais
8 anos 8 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 ???
/***************************************************************************/
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.

  1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Dúvidas Gerais
  9. For variable is not Local (TDS depois de atualizar)
Tempo para a criação da página:0.101 segundos
Joomla templates by a4joomla