Perguntas Ordenar coluna no browse de baixa automatica a pagar

Bom dia galera.

Preciso ordenar a coluna Nome Fornece no browse de baixa automatica a pagar. Alguém pode me ajudar?

Resolvido... segue o PE.


#INCLUDE "PROTHEUS.CH"

User Function F090TIT()

Local lRet := .F.
Local nValor := PARAMIXB[1]
Local aTitulos := {}
Local cNomeTab := cAliasSE2//"SCGN000010"
Local aArea := (cNomeTab)->(GetArea())
Local cChave := (cNomeTab)->(IndexKey())
Local cIndTRB := "E2_FILIAL+E2_NOMFOR"


If type("PARAMIXB[2]") != "U"

aTitulos := PARAMIXB[2]
If Len(aTitulos) == 0
If cChave <> cIndTRB

cIndex := CriaTrab( Nil, .F. )
cChave := IndexKey()

IndRegua(cNomeTab, cIndex, cIndTRB, , , "Selecionando Registros "+cNomeTab+"...")

EndIf

lRet := .F.
Else

If cChave <> cIndTRB


cIndex := CriaTrab( Nil, .F. )
cChave := IndexKey()

IndRegua(cNomeTab, cIndex, cIndTRB, , , "Selecionando Registros "+cNomeTab+"...")

EndIf
lRet := .T.
Endif
Else
lRet := .T.
Endif

//RestArea(aArea)

Return lRet