Indexar

[JuniorVaz]

Ola, preciso de uma ajuda para filtrar e indexar um arquivo dbf.
Uso um banco de dados chamado FICCLI.DBF com varios campos: NUMCLI, VALOR, DATVENC, DATBAIXA, PGTO e outros
Preciso saber como faço para ele filtrar apenas os que tiverem "N" no campo pgto, depois, que ele coloque-os em ordem pelo campo DATVENC, que é um campo de data. E por ultimo, que dos que sobrarem da filtragem do campo PGTO, que ele some todos os campos VALOR, e gere uma variave XVALORTOTAL por exemplo... Ja fiz isso uma vez, mas não estou mais lembrado agora, deu branco

[rochinha]

Amiguinho

Faça assim:

[/CODE]
USE FICCLI
INDEX ON DATVENC TO FICCLI

JAPAGOS := 0
NAOPAGOS := 0

DO WHILE .NOT. EOF()
IF PAGTO = 'N'
NAOPAGOS := NAOPAGOS + VALOR
ENDIF
IF PAGTO # 'N'
JAPAGOS := JAPAGOS + VALOR
ENDIF
SKIP
ENDDO
[/CODE]

@braços :?)