Histórico da Página

#include 'Protheus.ch'


User Function F580BROW()
    Local cNum    := '000000001'
    Local cFiltro := ""
    
    // Posiciona na tabela SE2
    DbSelectArea("SE2")
    
    // Monta a string do filtro
    cFiltro := "E2_FILIAL == '" + xFilial("SE2") + "' .AND. "
    cFiltro += "E2_NUM == '" + cNum + "'"
    
    // Aplica o filtro usando DbSetFilter
    DbSetFilter({|| &(cFiltro)}, cFiltro)
    
    // Volta para o início da tabela
    SE2->(DbGoTop())
    
Return (NIL)