Mário esse assunto com DESCEND vem desde 2012 você é o autor do tópico:
http://www.pctoledo.com.br/forum/viewtopic.php?f=45&t=13702

Moderador: Moderadores
DBUSEAREA( .T.,"DBFCDX","TITULOS" )
INDEX ON PROTOCOLO+SERIE TAG TITCOD TO TITULOS // 1
INDEX ON SACADO+SITUACAO TAG TITSAC TO TITULOS // 2
INDEX ON CGC+SITUACAO TAG TITPESS TO TITULOS // 3
INDEX ON NUMDOC TAG TITDOC TO TITULOS // 4
INDEX ON DTOS(DTENTRADA)+PROTOCOLO TAG DTPROT TO TITULOS // 5
INDEX ON DTOS(DTPAGTO) TAG TITCANC TO TITULOS // 6
INDEX ON CODBANCO+DTOS(DTPROTESTO) TAG TITBCO TO TITULOS // 7
INDEX ON CODBANCO+PROTOCOLO+DTOS(DTPROTESTO) TAG TITBCOP TO TITULOS // 8
INDEX ON DTOS(DTPROTESTO) TAG TITDATA TO TITULOS // 9
INDEX ON CPF+SITUACAO TAG TITCPF TO TITULOS // 10
INDEX ON LIVAPT+FOLAPT+PROTOCOLO TAG TITLIV TO TITULOS // 11
INDEX ON DTOS(DTCHEQUE)+NUMCHEQUE TAG TITGUIA TO TITULOS // 12
INDEX ON NUMDISTRIB TAG TITDIST TO TITULOS // 13
INDEX ON DESCEND(PROTOCOLO+SERIE) TAG DESCOD TO TITULOS // 14 <-- esse Ãndice
INDEX ON ARQREMESSA TAG TITREM TO TITULOS // 15
INDEX ON SITUACAO TAG TITSIT TO TITULOS // 16
DBCLOSEAREA()
DBUSEAREA( .T.,"DBFCDX","TITULOS",, .T. )
SET INDEX TO TITULOS
DBSETORDER(14)
DBGOTOP()
DO EVENTS
Load Window Frm_11100
Frm_11100.center
Frm_11100.Btn_Inclui.Enabled := .T.
Frm_11100.Btn_Altera.Enabled := .T.
Frm_11100.Btn_Exclui.Enabled := .T.
Frm_11100.Text_1.SetFocus
Frm_11100.activate
TITULOS->( OrdSetFocus("DESCOD") )
TITULOS->( DbGoTop() )
// The example creates an ascending index and demonstrates
// the effect when the navigational order is reversed.
PROCEDURE Main
USE Customer
INDEX ON Upper(Lastname+Firstname) TO Cust01
GO TOP
? LastName // result: Alberts
GO BOTTOM
? LastName // result: Waters
OrdDescend( ,, .T. ) // change navigational order
SKIP -1 // skipping backwards from the last
// record hits begin of file.
? Bof() // result: .T.
GO BOTTOM
? Eof() // result: .F.
? LastName // result: Alberts
SKIP
? Eof() // Result: .T.
GO TOP
? LastName // result: Waters
USE
RETURN
Usuários vendo este fórum: Nenhum usuário registrado online e 5 visitantes