Amigos tenho a seguinte linha:
cmd:="SELECT co_tipo,co_tfla,co_natu FROM bdacon WHERE co_tipo=´"+VAR+"' ORDER BY co_tipo DESC"
USE SQL(cmd) NEW ALIAS TEMP125
SELECT TEMP125
DO WHILE ! EOF()
SELECT NATUREZA
DBSETORDER(1)
DBSEEK(TEMP125->co_natu)
SELECT TEMP125
AADD(array,{NATUREZA->na_nome,TEMP125->co_tipo})
DBSKIP()
ENDDO
Acontece que, para carregar cerca de 600 registros dessa forma esta demorando nos terminais 4 a 6 segundos. Como posso melhorar isso, parece que este relacionamento que faço, esta deixando lento o processo.
Fiquem com Deus
AOKISANTOS
FWH25+XHARBOUR 99.50
