Versão atual:

Reaproveitamento da estrutura Dbuserarea com #FWTemporaryTable

Bom dia,

Gostaria de saber se tem como substituir a DbUserArea pela "função" FWTemporaryTable() no trecho abaixo reaproveitando a estrutura já criada na "cQry" já criada sem fazer muitas alterações.

cQry += " ORDER BY E1.E1_FILIAL,E1.E1_MOEDA,E1.E1_CLIENTE, E1.E1_LOJA, A1.A1_NREDUZ, A1.A1_NOME "

TRB := CriaTrab(Nil, .F.)

TCQuery cQry new alias "teste"

dbselectarea("teste")

COPY TO &TRB

dbCloseArea()


DbUseArea(.T., , TRB, "AGP", .F., .F.)

procregua(LastRec()) AGP->(dbGoTop()) if AGP->(EOF()) _lRet := .F. AGP->(DbCloseArea()) endif Ferase("TRB")

Versão (1):

Ver a versão formatada

Reaproveitamento da estrutura Dbuserarea com #FWTemporaryTable

Comentário

new question