Histórico da Página

Sintaxis

DbGoBotton()

Propósito

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

...

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

...

WHILE !EOF()     // Ejecuta mientras no sea el final del archivo.

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

          dbSkip()

ENDDO

...