Retornar a quantidade de registros de uma cadeia.
CHAIN ()
Retorna a quantidade de registros que atenderam a uma pesquisa feita pelo comando SEEK para arquivos de banco de dados..
Se após o comando SEEK o resultado de EOF() for .T. a função CHAIN() retorna zero. O mesmo ocorrerá quando a pesquisa for feita por prefixo de uma chave caracter (SEEK $= <exp>).
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 registros da cadeia
ENDIF
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
SEEK, SKIP, EOF(), FCHAIN(), FOUND() e FPSKIP().