DBGoTo

Adilio Costa 4 comentários

Tempo de leitura: 1 minuto

A função DBGoTo posiciona em um determinado registro de um Alias(tabela corrente), conforme a ordem física (sequência sobre o recno). Ela é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL. 

 

Sintaxe:

DBGoTo(nRecno)

 

Parâmetro(s):

 

Retorno:

Nil

Observações:

  • A sequência lógica depende da ordem e do filtro ativo na tabela corrente.

Exemplo da função DBGoTo em ADVPL:

//Bibliotecas
#Include "Protheus.ch"
#Include "TOTVS.ch"
 
/*/{Protheus.doc} fCountTo
Exemplo da função DBGoTo em ADVPL
Link:https://tdn.totvs.com/display/tec/DBGoTo
@type function
@author Adilio Costa
@since 02/01/2025
@version 1.0
@?Inscreva-se no Blog ProtheusAdvpl:
https://www.protheusadvpl.com.br
@?Inscreva-se no Canal ProtheusAdvpl:
https://www.youtube.com/protheusadvpl
@?Siga-nos no Instagram:
https://www.instagram.com/protheusadvpl
@?Conheça os Cursos e Formações do ProtheusAdvpl:
https://cursos-e-formacoes-protheusadvpl.gr-site.com/

|Se esse conteúdo foi útil pra você nos ajude divulgando
ele e nossas redes sociais!!|
/*/
  
User Function fDBGoTo()
    Local aArea  := GetArea()
    Local nRecno := 100
     
    //Seleciona a" tabela de clientes SA1
    DBSelectArea("SA1")
     //Voltando ao topo da tabela
    SA1->(DBGoTop())
    //Posicionando no registro 100 da tabela de clientes SA1 e altera o nome
    SA1->(DBGoTo(nRecno)) 
    RecLock("SA1",.F.)
        SA1->A1_NOME = "Portal ProtheusAdvpl"
    MsUnLock()  
    
    //Restaura a área
    RestArea(aArea)
Return

 

 

É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br, até um próximo post, grande abraço e fica com Deus.

Link(s) de referência(s):

Receba as últimas atualizações do ProtheusAdvpl
Deixe seu melhor email
Nós respeitamos sua privacidade.

Artigos relacionados

4 Comentários


  3. https://www.tellern.com Telegram应用是开源的，Telegram下载的程序支持可重现的构建。Telegram同时适用于以下环境：Android安卓端，iPhone 和 iPad及MacOS的Apple端，Windows/Mac/Linux桌面版


  4. I think this is one of the most important information for me. And i’m glad reading your article. But wanna remark on some general things, The site style is perfect, the articles is really nice : D. Good job, cheers

Comentários encerrados.