× Linguagem de Programação ADVPL

Perguntas Alias do not exist _ADADOS

Mais
10 anos 9 meses atrás #21125 por VictorBDias
Olá pessoal
Estou com um problema com meu relatório em excel. Eu coloco para imprimir e da o seguinte erro: Alias do not exist _ADADOS.
O que é isso ? podem me ajudar?
segue o codigo

//Gera Excel :
MV_PAR05 == 2

SET DEVICE TO SCREEN

If !ApOleClient("MSExcel") // testa a interação com o excel.
MsgAlert("Microsoft Excel não instalado!")
Return Nil
EndIf

aCab := {"OP/Projeto","ITEM","SEQ/TAREFA","PRODUTO","DESCRIÇÃO","QUANTIDADE","VALOR" } //Criação de um cabeçalho sugestivo

dbSelectArea(_aDados)
dbGoTop()

While _aDados->(! Eof())
AADD(_aDados2, { _aDados[i,1], _aDados[i,2], _aDados[i,3], _aDados[i,4], _aDados[i,5], _aDados[i,6], _aDados[i,7] }) //adiciona aos dados Nome e Saldo
_aDados->(dbSkip())
Enddo

DlgToExcel({ {"ARRAY", "Produtos em Elaboração", aCab, aDados2} }) // utiiliza a função

Return Nil

endif

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 9 meses atrás #21128 por kanaamlrr
Respondido por kanaamlrr no tópico Alias do not exist _ADADOS
Victor,
Seu _aDados é um array e não uma tabela.
Dessa forma você deve utilizar o seguinte bloco de código:
//Gera Excel :
MV_PAR05 == 2

SET DEVICE TO SCREEN

If !ApOleClient("MSExcel") // testa a interação com o excel.
MsgAlert("Microsoft Excel não instalado!")
Return Nil
EndIf

aCab := {"OP/Projeto","ITEM","SEQ/TAREFA","PRODUTO","DESCRIÇÃO","QUANTIDADE","VALOR" } //Criação de um cabeçalho sugestivo

dbSelectArea(_aDados)
dbGoTop()

For i:= 1 To Len(_aDados)
AADD(_aDados2, { _aDados[i,1], _aDados[i,2], _aDados[i,3], _aDados[i,4], _aDados[i,5], _aDados[i,6], _aDados[i,7] }) //adiciona aos dados Nome e Saldo
Next i

DlgToExcel({ {"ARRAY", "Produtos em Elaboração", aCab, aDados2} }) // utiiliza a função

Return Nil

endif

Abraço!

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 9 meses atrás #21129 por VictorBDias
Respondido por VictorBDias no tópico Alias do not exist _ADADOS
Agora esta falando que minha variavel ADADOS2 nao existe, mas ela esta declarada.

Por favor Acessar ou Registrar para participar da conversa.

Mais
10 anos 9 meses atrás #21130 por VictorBDias
Respondido por VictorBDias no tópico Alias do not exist _ADADOS
Ah valeu cara, problema resolvido!!11

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.134 segundos
Joomla templates by a4joomla