dbSeek – Realizar uma busca na tabela através do índice

O comando dbSeek faz uma busca no banco de dados através de um índice existente.

Vamos fazer uma busca, por exemplo, na tabela SB1

dbSelectArea("SB1")
SB1->(dbSetOrder(1))
If SB1->( dbSeek(xFilial("SB1")+"000001") )
      //Faça algo aqui, o registro encontrado está posicionado neste momento
      Conout(SB1->B1_COD + "-" + SB1->B1_DESC)
EndIf

dbSelectArea("SB1")

SB1->(dbSetOrder(1))

If SB1->( dbSeek(xFilial("SB1")+"000001") )

//Faça algo aqui, o registro encontrado está posicionado neste momento

Conout(SB1->B1_COD + "-" + SB1->B1_DESC)

EndIf

Veja que inseri o dbSeek em uma estrutura condicional IF, ou seja, se não encontrar nada, você pode tratar via código uma alternativa, com um else, por exemplo.

Também, utilizei no dbSetOrder o índice 1 da tabela SB1. Você pode fazer o exemplo com outros índices.

Link do dbSeek no TDN

Sobre
Últimos Posts

Siga na rede

Fernando Bueno

Consultor em FBSOLUTIONS

Sou consultor na área de implantação de sistemas ERP, com experiência na análise e implantação de projetos de sistemas, configurando a estrutura do software, capacitando usuários-chaves, ministrando treinamentos e workshops.

Atuando desde 2005 no mercado de tecnologia, desenvolvendo e implantando e sistemas gerenciais, sistemas e sites web e ecommerce.

Siga-me no Linked In

Siga na rede

dbSeek – Realizar uma busca na tabela através do índice1 minutos de leitura

Fernando Bueno

Últimos posts por Fernando Bueno (exibir todos)