Versão atual:

Receber valores de uma consulta

Eu tenho esse codigo que deve receber o valor de que a consulta retorna em cada campo da tabela SF2, mas ao inves de retornar o valor, ele ta retornando o nome do campo, como eu arrumo isso? Acredito que o problema esteja nas ultimas 5 linhas

Local aCampSF2 := FWSX3Util():GetAllFields('SF2', .F.)

cQuery := "SELECT DISTINCT " +;

" * " +;

"FROM " +;

RetSqlName("SF2") + " sf2 " +;

RetSqlName("SF3") + " sf3 " +;

RetSqlName("ZZ5") + " zz5 " +;

"WHERE " +;

"f2_filial = '" + cCodFilial + "' " +;

"AND " +;

"f2_doc = '" + cDoc + "' " +;

"AND " +; "f2_serie = '" + cSerie + "' " +;

"AND "+;

"f2_emissao = '" + cDtEmi + "' " +;

"AND " +;

"sf2.de_l_e_t = '*' "

//Criar alias temporário cAliasQry := MPSysOpenQuery(cQuery)

For nI := 1 To Len(aCampSF2)

aAdd(aDados, {(cAliasQry)->(aCampSF2[nI])})

Alert(cValToChar(aDados[nI, 1])

Next nI

Alert(Len(aDados))

Versão (1):

Ver a versão formatada

Receber valores de uma consulta

Comentário

new question