Nesse vídeo demonstraremos a utilização da função DbGoTop que serve para posicionar no primeiro registro de um alias (dependendo do índice utilizado).
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas #Include "TOTVS.ch" #Include "TopConn.ch" /*/{Protheus.doc} User Function zExe126 Posiciona no primeiro registro conforme o índice usado @type Function @author Atilio @since 14/12/2022 @see https://tdn.totvs.com/display/tec/DBGoTop @obs Função DbGoTop Parâmetros Não tem parâmetros Retorno Não tem retorno **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao **** /*/ User Function zExe126() Local aArea := FWGetArea() //Abre o cadastro de produtos, ordenando por descrição DbSelectArea("SB1") SB1->(DbSetOrder(3)) // B1_FILIAL + B1_DESC + B1_COD //Pula 5 registros SB1->(DbSkip(5)) //Posiciona no topo da tabela SB1->(DbGoTop()) //Mostra o último produto encontrado FWAlertInfo("O primeiro produto conforme a descrição é '" + Alltrim(SB1->B1_DESC) + "'", "Teste DbGoTop") FWRestArea(aArea) Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.