Boa tarde. Tudo bem? As funções RECCOUNT() e LASTREC() retornam zero (0) quando executado o trecho abaixo:
cQuery := " SELECT DISTINCT DCZ.DCZ_LOCAL,"
cQuery += " DCZ.DCZ_IDUNIT"
cQuery += " FROM "+RetSqlName('DCZ')+" DCZ"
cQuery += " WHERE DCZ.DCZ_FILIAL = '"+xFilial('DCZ')+"'"
cQuery += " AND DCZ.DCZ_EMBARQ = '"+cEmbarque+"'"
cQuery += " AND DCZ.DCZ_IDUNIT <> '"+Space(TamSX3("DCZ_IDUNIT")[1])+"'"
cQuery += " AND DCZ.DE_L_E_T = ' '"
cQuery := ChangeQuery(cQuery)
cAliasDCZ := GetNextAlias()
dbUseArea(.T.,'TOPCONN',TcGenQry(,,cQuery),cAliasDCZ,.F.,.T.)
Existe alguma particularidade para aplicar a função, por favor? Nunca consegui executar a contagem de registros.
Segue a solução alternativa:
//Contador
While (cAliasQry)->(!Eof())
nContador++
(cAliasQry)->(DbSkip())
EndDo
(cAliasQry)->(DbgoTop())
Obrigado.