DBGOTOP()

Sintaxis

DbGoTop()

Propósito

Mueve el cursor del área de trabajo activa al primer registro lógico del archivo de datos. Por lo tanto, el archivo de datos se ubica al inicio.

Argumentos

Ninguno.

Ejemplo

LOCAL nCount := 0     // Variable para verificar cuántos registros existen en el intervalo.

dbSelectArea(“SA1”)

dbSetOrder(1)               // Clave del índice: A1_FILIAL + A1_COD + A1_LOJA

dbGoTop()

WHILE !BOF()     // Ejecuta mientras no se inicie el archivo.

          nCount++          // Incrementa la variable de control de registros existentes en el intervalo.

          dbSkip(-1)

ENDDO

// Retorno esperado: 1, pues el dbGoTop() ubica el puntero en el primer registro.

MsgInfo(“Existen: “ + STRZERO(nCount, 6) + “ registros en el intervalo.”)