Histórico da Página

#include 'Protheus.ch'


User Function F580BROW()
    Local cNum    := '000000001'
    Local cFiltro := ""
    
    // ApenasPosiciona mostrana umatabela mensagemSE2
    MsgInfo("Browse foi carregado com DbSelectArea("SE2")
    
    // Monta a string do filtro
    cFiltro := "E2_FILIAL == '" + cValToCharxFilial("SE2->(RecCount())) + " registros", "Informação"") + "' .AND. "
    cFiltro += "E2_NUM == '" + cNum + "'"
    
    // Aplica o filtro usando DbSetFilter
    DbSetFilter({|| &(cFiltro)}, cFiltro)
    
    // Volta para o início da tabela
    SE2->(DbGoTop())
    
Return (NIL)