BOF( ) (Función)
Determina si el puntero de registro está situado al principio de una tabla.
BOF([nWorkArea | cTableAlias])
Valores devueltos
Logical
Parámetros
nWorkArea
Especifica el número del área de trabajo para una tabla abierta en otra área de trabajo.cTableAlias
Especifica el alias para una tabla abierta en otra área de trabajo.Si la tabla cuya condición de principio de archivo desea probar está abierta en un área de trabajo distinta de la seleccionada actualmente, utilice estos argumentos opcionales para especificar el número del área de trabajo o el alias para la tabla. Si no hay ninguna tabla abierta en el área de trabajo especificada, BOF( ) devolverá falso (.F.).
Observaciones
Utilice BOF( ) para probar la condición de principio de archivo de una tabla. BOF( ) devuelve verdadero (.T.) si ha intentado mover el puntero de registro a una posición anterior al primer registro de la tabla.
Ejemplo
El ejemplo siguiente abre la tabla customer
y muestra el nombre de la organización página a página, a partir del último registro de la tabla. La lista continúa hasta que se llegue al principio del archivo o hasta que se elija Cancelar.
CLOSE DATABASES
CLEAR
OPEN DATABASE (HOME() + "samples\data\testdata")
USE customer
GO BOTTOM
local recCtr, btnValue
recCtr = 0
btnValue = 1
DO WHILE btnValue = 1 AND NOT BOF()
? "Company : " + company
recCtr = recCtr + 1
if (recCtr % 20) = 0 then
btnValue =MESSAGEBOX ("Click OK to continue, Cancel to quit.",33)
clear
endif
Skip -1 && Move up one record
ENDDO
=MESSAGEBOX("Listing complete.",48)
Vea también
EOF( ) | FEOF( ) (Función) | _FEOF( ) (Rutina de biblioteca API)