Histórico da Página

Sintaxe

FOUND( )

Propósito

Verifica se a operação de pesquisa foi bem sucedida. Ou seja, se a chave de pesquisa foi encontrada.

Argumentos

Nenhum.

Utilização

Caso a pesquisa tenha sido bem sucedida, a função retorna verdadeiro (.T.). Caso contrário, retorna falso (.F.).

Caso o apontador de registros seja movido por qualquer outra função (dbSkip(), dbGoto(), etc.) que não seja dbSeek() ou MsSeek(), a função Found() sempre retornará falso (.F.).

Exemplos

dbSelectArea(“SA1”)

// De acordo com o arquivo SIX, a chave de pesquisa é A1_FILIAL + A1_COD + A1_LOJA

dbSetOrder(1)

dbSeek(“01” + “000001” + “02”)     // Filial: 01 / Código: 000001 / Loja: 02

IF FOUND()

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

ELSE

          MsgInfo(“Cliente não encontrado”, “Consulta por cliente”)

ENDIF