Preencher rapidamente um array com todos os dados do Alias
Enviado: 17 Jul 2018 11:25
Bom dia, Pessoal.
Estou passando por algumas dificuldades no uso da linguagem ADVPL em relação ao preenchimento de um array com informações de um determinado alias. O problema está na lentidão da operação. Usando o alias diretamente, eu consigo listar mais de 100000 registros de forma instântanea, mas quando tento enviá-los para um array aparece a lentidão (mais de 2 min). Como a linguagem advpl, até onde eu sei, deriva do clipper, gostaria de um apoio.
Abaixo está a estrutura que uso para preencher o array:
Local aMeuArray := {}
meuAlias->(DbGotop())
While !meuAlias->(EOF())
aadd(aMeuArray ,{meuAlias->campo1,meuAlias->campo2, .F.})
meuAlias->(DbSkip())
Enddo
Dúvida: há alguma outra forma de fazer o preenchimento do array com as informações vindas do alias?
Obrigado.
Estou passando por algumas dificuldades no uso da linguagem ADVPL em relação ao preenchimento de um array com informações de um determinado alias. O problema está na lentidão da operação. Usando o alias diretamente, eu consigo listar mais de 100000 registros de forma instântanea, mas quando tento enviá-los para um array aparece a lentidão (mais de 2 min). Como a linguagem advpl, até onde eu sei, deriva do clipper, gostaria de um apoio.
Abaixo está a estrutura que uso para preencher o array:
Local aMeuArray := {}
meuAlias->(DbGotop())
While !meuAlias->(EOF())
aadd(aMeuArray ,{meuAlias->campo1,meuAlias->campo2, .F.})
meuAlias->(DbSkip())
Enddo
Dúvida: há alguma outra forma de fazer o preenchimento do array com as informações vindas do alias?
Obrigado.