FOUND()

Sintaxis

FOUND( )

Propósito

Verifica si hubo éxito en la operación de búsqueda. Es decir, si la clave de búsqueda se ha encontrado.

Argumentos

Ninguno.

Utilización

Si la búsqueda ha tenido éxito, la función retorna verdadero (.T.). Si no, retorna falso (.F.).

Si el apuntador de registros ha sido movido por cualquier otra función (dbSkip(), dbGoto(), etc.) que no sea dbSeek() o MsSeek(), la función Found() siempre retornará falso (.F.).

Ejemplos

dbSelectArea(“SA1”)

// De acuerdo con el archivo SIX, la clave de búsqueda es A1_FILIAL + A1_COD + A1_LOJA

dbSetOrder(1)

dbSeek(“01” + “000001” + “02”)     // Sucursal: 01 / Código: 000001 / Tienda: 02

IF FOUND()

          MsgInfo(“Cliente encontrado”, “Consulta por cliente”)

ELSE

          MsgInfo(“Cliente no encontrado”, “Consulta por cliente”)

ENDIF