Histórico da Página

Sintaxe

DbGoTop()

Propósito

Move o cursor da área de trabalho ativa para o primeiro registro lógico do arquivo de dados. Portanto, o arquivo de dados é posicionado no início.

Argumentos

Nenhum.

Exemplo

LOCAL nCount := 0     // Variável para verificar quantos registros existem no intervalo

dbSelectArea(“SA1”)

dbSetOrder(1)               // Chave do índice: A1_FILIAL + A1_COD + A1_LOJA

dbGoTop()

WHILE !BOF()     // Executa enquanto não for início do arquivo

          nCount++          // Incrementa a variável de controle de registros existentes no intervalo

          dbSkip(-1)

ENDDO

// Retorno esperado: 1, pois o dbGoTop() posiciona o ponteiro no primeiro registro.

MsgInfo(“Existem: “ + STRZERO(nCount, 6) + “ registros no intervalo.”)