Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!

CHAIN()

Propósito

Retornar a quantidade de registros de uma cadeia.

Sintaxe

CHAIN ()

Utilização

Retorna a quantidade de registros que atenderam a uma pesquisa feita pelo comando SEEK.

Se após o comando SEEK o resultado de EOF() for .T. Então a função CHAIN() retorna zero. O mesmo ocorrerá quando a pesquisa for feita por prefixo de uma chave caracter (SEEK $= <exp>).

Só é utilizada para pesquisas de igualdade de valores (SEEK = <exp>) e para arquivos de banco de dados.

Exemplos

O exemplo a seguir mostra-nos a utilização desta função numa pesquisa de igualdade de valores.

USE tab_depe

SEEK id2_func = 123

IF EOF()

  ? CHAIN ()    && Retornara 0 (zero)

ELSE

  ? CHAIN ()    && Retornara o numero de 

ENDIF        && registros da cadeia.

O exemplo a seguir mostra-nos a utilização desta função em pesquisa por prefixo de chave-cadeia de caracteres.

USE tab_depe

SEEK par_depe $= "FIL"

IF EOF()

  ? CHAIN ()    && Retornara 0 (zero)

ELSE

  ? CHAIN ()    && Retornara 0 (zero)

ENDIF

Consulte

SEEK, SKIP, EOF(), FCHAIN(), FOUND() e FPSKIP().

Anterior Sumário Próximo OpenBASE! o Banco de Dados inteligente. Fale conosco!